I have a input file.
Data like: ABCDEFGH....
i want out put file like
AB
BC
CD
DE....How can do this??
Answer Posted / mdv
Two step process:
1.
Input file:
ABCDEF
//sysih dd *
sort fields = copy
outrec fields = (1,2,78X,2,2,78X,3,2,78X,4,2,78X,5,2,78X)
Step 1 output file will be:
ABBCCDDEEF
2.
//STEP EXEC PGM=ICETOOL
//TOOLMSG DD SYSOUT=*
//DFSMSG DD SYSOUT=*
//IN DD *
ABBCCDDEEF
//OUT DD DISP=OLD,DSN=file-FB_lrec/80
//TOOLIN DD *
RESIZE FROM(IN) TO(OUT) TOLEN(80)
OUT DD dataset will have the required.
Thanks
HTH
| Is This Answer Correct ? | 1 Yes | 0 No |
Post New Answer View All Answers
What is the purpose of dd * statement in jcl?
How jcl work to handle various input output file operations?
Many jcl statements contain specific values designed to direct and control the execution of the statement. What are these fields called?
//S10 EXEC PGM=ICETOOL //TOOLMSG DD SYSOUT=* //DFSMSG DD SYSOUT=* //CON DD DSN=VAR.INPUT1,DISP=SHR // DD DSN=VAR.INPUT2,DISP=SHR //OUT DD DSN=VAR.OUTPUT,DISP=(NEW,CATLG,DELETE), // SPACE=(CYL,(5,5)),UNIT=SYSDA //TOOLIN DD * * Splice the needed data from the two VB files together SPLICE FROM(CON) TO(OUT) ON(5,5,CH) WITHALL - WITH(12,5) WITH(22,20) VLENMAX /*
What is the motivation behind coding class parameter in job statement?
What is the maximum length of a single line of jcl?
what happens in conversion stage in job processing?
What are the jcl procedures?
how would you create a temporary dataset? And where will you use them?
What do you know about jcl?
Name a few IBM utility programs, and explain its function.
How can the attributes of one sms dataset be copied to another dataset?
What does a disposition of (MOD,DELETE,DELETE) mean ?
We can use PASS with permanent datasets also. THEN Which is the condition in which we may use PASS (instead of KEEP) with permanent data sets, while there is no need to specify UNIT and VOL for them like temporary data sets (in cas we use KEEP for permanent data sets) ?
How to remove the spaces at end of each record in the output file Via COBOL program? note: The file has a VB length ----TRY