Golgappa.net | Golgappa.org | BagIndia.net | BodyIndia.Com | CabIndia.net | CarsBikes.net | CarsBikes.org | CashIndia.net | ConsumerIndia.net | CookingIndia.net | DataIndia.net | DealIndia.net | EmailIndia.net | FirstTablet.com | FirstTourist.com | ForsaleIndia.net | IndiaBody.Com | IndiaCab.net | IndiaCash.net | IndiaModel.net | KidForum.net | OfficeIndia.net | PaysIndia.com | RestaurantIndia.net | RestaurantsIndia.net | SaleForum.net | SellForum.net | SoldIndia.com | StarIndia.net | TomatoCab.com | TomatoCabs.com | TownIndia.com
Interested to Buy Any Domain ? << Click Here >> for more details...

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 / muttaiah

1. cond=(0,lt) is false in this case the sepp060 should
execute. Better don't include cond and try to see what will
happen.
generally this cond parm is so confusing that sometimes we
get much confused whether it will execute when the
condition if true or false.

Is This Answer Correct ?    1 Yes 0 No



Post New Answer       View All Answers


Please Help Members By Posting Answers For Below Questions

What do you know about jcl?

1128


write a jcl to execute a job by 7:00 am on jan 20,1986?

1098


what are the types of abends that occur on job failure? And explain the possible causes of these

1597


What is the function of the dd avgrec keyword in sms datasets?

1317


//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 /*

1436


in ways data can be passed to a COBOL program from JCL?

1198


How does jcl act on a cobol code?

1168


WORKING-STORAGE SECTION. 01 GROSS-PAY. 05 BASIC-PAY PIC 9(5). 05 ALLOWENCES PIC 9(3). PROCEDURE DIVISION. MOVE 1000 TO BASIC-PAY. MOVE 250 TO ALLOWENCES. DISPLAY GROSS-PAY. STOP RUN. 77 W-A PIC 9(3)V99 VALUE 23.75 77 W-B PIC ZZ9V99 VLAUE 123.45 after the statement MOVE W-A TO W-B what will be W-B's value? a.123.75 b.b23.75 (where b indicates space) c.023.75 d.invalid move

1338


Can an individual step be restricted from using all the jobs allowed cpu time?

1536


What is the purpose of disp parameter?

1104


How to pass data to a program that is coded in an exec statement?

1313


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

1421


Name the parameters which can be used to limit the number of records written to a sysout dataset?

1131


What are hierarchy levels in jcl?

1507


How do you run a COBOL batch program from a JCL? How do you run a COBOL/DB2 program?

1240