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.

Answer Posted / 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



Post New Answer       View All Answers


Please Help Members By Posting Answers For Below Questions

Is it possible to left uncode disp? If yes, how?

708


which parameter is use to declare the name of dataset in dd statement?

737


What are the parameter we cannot use in procedure? How many instream we can write in single jcl?

583


Is their any set of rules for dd? Explain.

664


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

699






What is the syntax of JCL statement?

696


How to remove the spaces at end of each record in the output file Via COBOL program? note: The file has a VB length ----TRY

860


Explain the hierarchy levels in jcl?

1120


When The Define Jcl Is Not Available, How Can You Get Information About A Vsam File's Organisation ?

747


I want to join to input files and write the matching fields on to an output file but i dont want the output file a sorted one

1933


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

1039


How does jcl act on a cobol code?

659


How to compare two files in SYNCSORT and on the mismatch record should be deleted from second file.

5062


Explain the function of //cntl statement?

659


how to do automated restart when a job abends?

854