Interested to Buy Any Domain ? << Click Here >> for more details...
I have a input file.
Data like: ABCDEFGH....
i want out put file like
AB
BC
CD
DE....How can do this??
- 7 Answers
- 12932 Views
- UST, I also Faced
- E-Mail Answers
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
which parameter is use to declare the name of dataset in dd statement?
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
Explain the function of //jcllib statement?
How does jcl act on a cobol code?
How can an in-stream dataset be terminated?
what is the JCL statement consists of?
Matching Logic in Jcl not in cobol.Could any one please answer this question
Can I send output of job to my remote device careerride123?
How to read and write a single record into a file. I would like to use it to enter a single 8-character piece of information and use it to put it into a variable for processing in JCL. Thank you
How to resolve the error "WER488A JOIN CAPACITY EXCEEDED" I am using SYNCSORT with JOINKEYS to compare 2 files. I am Getting error - > WER488A JOIN CAPACITY EXCEEDED There are 2 files to be compared with about 2 million records each. LRECL is 3665. Can somebody give a pointer as to how to resolve this problem? I am using SYNCSORT with JOINKEYS to compare 2 files. I am Getting error - > WER488A JOIN CAPACITY EXCEEDED There are 2 files to be compared with about 2 million records each. LRECL is 3665. Can somebody give a pointer as to how to resolve this problem?
How to code these statements in JCL: CLEANUP INITIAL(NO) RESTART(NO) DYNALLOC(NO) job definition..?
What statement can be used to send data to another mvs jes3 node?
When The Define Jcl Is Not Available, How Can You Get Information About A Vsam File's Organisation ?
What is Cataloged Procedures?
Explain the function of the steplib dd statement?
