I have a input file.
Data like: ABCDEFGH....
i want out put file like
AB
BC
CD
DE....How can do this??
Answer Posted / sathish
//JOB CARD
//S1 EXEC PGM=SORT
//SYSPRINT DD SYSOUT=*
//SYSOUT DD SYSOUT=*
//SORTOUT DD SYSOUT=*
//SORTIN DD *
ABCDEFGH
/*
//SYSIN DD *
SORT FIELDS=COPY
OUTFIL REMOVECC,NODETAIL,HEADER1=(1:1,2,/,1:3,2,/,1:5,2,/,1:7,2)
/*
| Is This Answer Correct ? | 1 Yes | 0 No |
Post New Answer View All Answers
In sms datasets, what is the function of the dd mgmtclas keyword?
What are the parameter we cannot use in procedure? How many instream we can write in single jcl?
Explain the function of dd disp parameter?
What is the difference between the positional and keyword parameters? Give examples.
What dd statement is used to supply the name of a dataset?
What is the purpose of disp parameter?
Describe the various parameters utilized in the creation of a gdg?
What is the function of dd disp parameter?
How does jcl act on code(if you take a cobol program)?
what is the compile process of cobol program expalin with code
What is the motivation behind coding class parameter in job statement?
how you can direct the data to spool using SYSOUT option?
How do you submit a job for execution?
For what purpose steplib and joblib are used ?
WORKING-STORAGE SECTION. 77 W-A PIC 9(3)V99 VALUE 23.75. 77 W-B PIC ZZ9V99 VALUE 123.45. PROCEDURE DIVISION. MOVE W-A TO W-B. DISPLAY W-B. STOP RUN. compiler : IGYGR1080-S A "VALUE" clause literal was not compatible with the data category o subject data item. The "VALUE" clause was discarded. WORKING-STORAGE SECTION. 77 W-A PIC 9(3)V99 VALUE 23.75. 77 W-B PIC ZZ9V99. PROCEDURE DIVISION. MOVE 123.45 TO W-B. MOVE W-A TO W-B. DISPLAY W-B. STOP RUN. 2375