i am trying to copy a PS file into VSAM file in step2 by
using PGM=IDCAMS,COND=(0,LT) and the pS file is getting
sorted in the step1. I got the return code 00 for step1 but
step2 got flushed. can u please help on this. Below is My
JCL.

SEPP050 EXEC
PGM=SORT,REGION=6144K
SYSIN DD DSN=SYSCMN.PROD.CCLIB
(F5910BNN),

DISP=SHR
SYSOUT DD
SYSOUT=*
SYSUDUMP DD
SYSOUT=A
SORTIN DD
DSN=Z1225BT.F5910EPP.HISOUT,

DISP=SHR
SORTOUT DD
DSN=Z1225BT.F5910EPP.HISOUT.SORTOUT5,
DISP=
(NEW,CATLG,DELETE),UNIT=DELQ,
SPACE=(CYL,
(500,500),RLSE),
DCB=
(RECFM=FB,LRECL=1606,BLKSIZE=16060,BUFNO=15)
SORTWK01 DD UNIT=SYSDA,SPACE=(CYL,
(1))
SORTWK02 DD UNIT=SYSDA,SPACE=(CYL,
(1))
SORTWK03 DD UNIT=SYSDA,SPACE=(CYL,
(1))
SORTWK04 DD UNIT=SYSDA,SPACE=(CYL,
(1))
SYSIN1 DD UNIT=VIO,SPACE=
(80,1)
*

SEPP060 EXEC PGM=IDCAMS,COND=
(0,LT)
SYSPRINT DD
SYSOUT=*
SYSOUT DD
SYSOUT=*
SYSLIST DD
SYSOUT=*
***

DD01 DD DSN=Z1225BT.F5910EPP.HISOUT.SORTOUT,
// DISP=SHR
//***
//DD01O DD DSN=Z1225BT.F5910PHS,
// DISP=SHR,
// AMP=(AMORG,'BUFND=12,BUFNI=5')
//SYSIN DD DSN=SYSCMN.PROD.CCLIB(F5910BBB),
//
DISP=SHR



Output RC for the two steps:

SDCBPJ05 SEPP050 00 236 .00 .00 .0
SDCBPJ05 SEPP060 FLUSH 0 .00 .00 .0

Answer Posted / vs kumar

Do not use the cond code. As per your jcl the second step
is always skipping. Remove the cond code and try it.

Is This Answer Correct ?    1 Yes 0 No



Post New Answer       View All Answers


Please Help Members By Posting Answers For Below Questions

what JCL Procedures?

691


How gdg are concatenated?

661


What is the syntax of JCL statement?

682


Is it possible to code instream data in a PROC?

740


Is it possible to define dd statements as you want?

640






What is job control language?

603


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) ?

1742


How can unused space allocation be returned to the system when a dataset is closed?

800


How to execute 2nd and 4th steps among 5 steps in jcl proc?

742


How can values be passed from the job stream to an executable program?

864


I want my job (careerride) to be executed in 1 minute and 2 seconds. How do I do that?

702


What is catelog procedure and how many catelog procedure to use in one job?

7428


What methodology can be adapted to transfer data to a program that is coded using the exec statement?

598


What is the purpose of dd?

718


How does jcl act on a cobol code?

647