Hi Guyz,
My requirement is to empty out a PS file but not to delete.
How would I do that. Is there any Utility. If any other
way, plz answer. Thanks.
Answers were Sorted based on User's Feedback
Answer / mithun suresh
Pushpa, I created a PS with FBA and put some recs in and
ran the same above JCL. To me it worked. Have u checked
what error u r getting. Try the below stuff with SORT util.
//STEP01 EXEC PGM=SORT
//SYSPRINT DD SYSOUT=*
//SYSOUT DD SYSOUT=*
//SORTIN DD DSN=USERID.DATASET,DISP=SHR
//SORTOUT DD DSN=USERID.DATASET,DISP=SHR
//SYSIN DD *
SORT FIELDS=COPY,STOPAFT=0
Is This Answer Correct ? | 15 Yes | 1 No |
Answer / bill cecchini
Use the dataset itself to get the required DCB attributes.
//STEP01 EXEC PGM=IEBGENER
//SYSUT1 DD DUMMY,DCB=USERID.DATASET
//SYSUT2 DD DSN=USERID.DATASET,DISP=SHR
//SYSPRINT DD SYSOUT=*
//SYSIN DD DUMMY
Is This Answer Correct ? | 6 Yes | 1 No |
Answer / mithun suresh
Hi, try this out
Option 1: Use IEBGENER Utility
//DELJOB JOB ..........
//STEP01 EXEC PGM=IEBGENER
//SYSPRINT DD SYSOUT=*
//SYSIN DD DUMMY
//SYSUT1 DD *
//SYSUT2 DD DSN=USERID.DATASET,DISP=SHR
Is This Answer Correct ? | 9 Yes | 6 No |
Answer / ram g
it will work with iebgener also ..create a dummy file with
fba format and use in your utility jcl
Is This Answer Correct ? | 1 Yes | 0 No |
Answer / abhilash
Why are you wasting your time and CPU time ... just open
the file in edit mode and type D99999 before first
record ... it will empty the file.. Cheers..
Plz dont waste CPU time....
Is This Answer Correct ? | 8 Yes | 8 No |
Answer / anand
//NUAEA62T JOB ,'DAILY REPORTS',
// MSGLEVEL=(1,1),MSGCLASS=Q,
// CLASS=D,NOTIFY=&SYSUID
//STEP1 EXEC PGM=IEBGENER
//SYSOUT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUT1 DD *
//SYSUT2 DD DSN=Test,DISP=SHR
/*
Is This Answer Correct ? | 0 Yes | 1 No |
Answer / pushpa
Yes we can do it by using the IEBGENER utility.
I have a question here By using the IEBGENER Utility I was
able to do this only for PS with RECFM =VB , but its not
working for PS with RECFM = FBA.
Is there any specific reason for this.
Please Clarify.
Is This Answer Correct ? | 0 Yes | 2 No |
Try This :
//JOBCARD
//STEP1 EXEC PGM=IEFRBR14
//DD1 DD DSN=FILE1,DISP=(MOD,DELETE,DELETE)
May need to code DCB and SPACE parameter.
//DD2 DD DSN=FILE1,DISP=(NEW,CATLG,CATLG)
MUST need to code DCB and SPACE parameter.
//
Ply respond with YES or NO.
Thanks
Garry
Is This Answer Correct ? | 0 Yes | 3 No |
Answer / sachin borase
//JOBNAME
//S1 EXEC PGM=IEFRBR14
//DD1 DD DSN=FILE1,DISP=(NEW,CATLG,DELETE)
//S2 EXEC PGM=SORT
//SORTIN DD DSN=FILE1
//SORTOUT DD DSN=FILE2,DISP=OLD
//SYSIN DD *
SORT FIELDS=COPY
/*
Is This Answer Correct ? | 0 Yes | 6 No |
Does jcl support automatic restart?
wht happens if blksize = 0 and lrec = 0 ?
Matching Logic in Jcl not in cobol.Could any one please answer this question
What is the function of the dd mgmtclas keyword in sms datasets?
AM HAVING A FILE WHICH CONTAIN 12 DATS OUT OF WHICH 4 ARE DUPLICATES HOW TO REMOVE THE DUPLICATE FILES IN JCL? CAN I GET THE PROGRAM FOR THIS
If a (+1) generation dataset is created in the first step of a job, how can it be referenced in later steps of the same job for input?
What do you understand by the term notcat 2 – gs?
How do you create a temporary dataset? Where will you use them?
i have 10 steps in my jcl. -->if i want to execute my program from 5th step what i have to do? don't give //* in ur previous steps --> if i want to execute my program from 1to 5 steps only what i have to do?
What is the purpose of the PARM keyword in the EXEC statement?
what do you mean By spooling? Expand SPOOL?
How to execute step2,step1, step3 if step1,2,3 are in order