.ENABLE SUBSTITUTION
.ENABLE GLOBAL
.IFNINS SKD INS SKED1/TASK=...SKD
.ASKS ANS WHAT IS THE INPUT SOURCE NAME
.ASKS ED WHICH EDITOR IS TO BE USED
'ED' 'ANS'.SKD
PIP FOR004.DAT='ANS'.SKD
SKD
PIP 'ANS'.SKL=FOR005.DAT
PIP FOR004.DAT;*/DE,FOR005.DAT;*