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

Name a few IBM utility programs, and explain its function.

4972


I have many files which i am receiving from client everyday. I have one step for every file to check for empty or not. Here client gives 30 files i need to check for every file for empty or not and i need to perform 30 steps. Can I do it in single step. Dynamically i need to change the File name in my step.

1214


How can a stopped job be started again?

1191


What are the jcl procedures?

1121


Is it possible to define dd statements as you want?

1113


What is the use of disp parameter?

1138


if the submitter of a job wants to inform another user about the job completion, how can it be done?

1248


Explain the function of //cntl statement?

1168


can any one plzzzzzz tell the jcl code for creating ps using idcams

11664


How to run cobol program using jcl?

1228


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

1477


Can I send output of job to my remote device careerride123?

1137


How can a fb file convert to vb file using sort program?

1335


Explain how can the submitting users racf authority be overridden in a job stream?

1126


How to submit a jcl from cics?

1150