
Reply to comment
Reply
Click the +1 button below to share it with your friends and colleagues
Share this if you liked it!
Click the +1 button below to share it with your friends and colleagues
t-decoration:none;text-underline:none'>IBM DB2 Certification
LOGOUT
Number of Registered users 714
|
Yes, allocate an internal reader file and write the JCL to that file
//SUBJCL DD SYSOUT=(A,INTRDR)
SELECT SUBJCL-FILE ASSIGN TO SUBJCL.
........
FD SUBJCL-FILE
RECORDING MODE IS F
BLOCK CONTAINS 0 RECORDS.
01 SUBJCL-REC PIC X(80).
.......
OPEN OUTPUT SUBJCL-FILE.
MOVE JCL-LINE1 TO SUBJCL-REC.
WRITE SUBJCL-REC.
MOVE JCL-LINE2 TO SUBJCL-REC.
WRITE SUBJCL-REC.
.........
CLOSE SUBJCL-FILE.