Author: Learncoholic
Posted: Fri Apr 07, 2017 6:56 pm (GMT 5.5)
Arun,
I tried the below SORT card to get the O/P I required:
Thanks to Rahul & Arun for all the Help.
_________________
Thanks for not dumping it
Posted: Fri Apr 07, 2017 6:56 pm (GMT 5.5)
Arun,
I tried the below SORT card to get the O/P I required:
| Code: |
INREC IFTHEN=(WHEN=INIT, OVERLAY=(85:1,15)), IFTHEN=(WHEN=INIT, FINDREP=(IN=C' ',OUT=C'0',STARTPOS=1,ENDPOS=15)), IFTHEN=(WHEN=(1,15,FS,EQ,NUM), OVERLAY=(1:85,15,SFF,EDIT=(IIIIIIIIIIIIIII),LENGTH=15, 1:1,15,SQZ=(SHIFT=LEFT),16:16,64)), IFTHEN=(WHEN=NONE, OVERLAY=(1:85,15,SQZ=(SHIFT=LEFT),16:16,64)), IFOUTLEN=80 |
Thanks to Rahul & Arun for all the Help.
_________________
Thanks for not dumping it