|
|
| Author |
Message |
elangovan_paulraj
New User
Joined: 03 Jan 2008
Posts: 1
Location: Chennai
|
|
|
|
Hi All,
I am relatively new to mainframes.
I have step in my JCL that uses IEBGENER to route the file created in a previous step to a printer and another destination (say 'X') which is a central repository.
The requirement now is to stop the file getting printed in the printer but to continue sending the file to the central repository 'X'.
Please find the JCL below.
//JOB1 JOB (MTZ6R3),'STATEMENTS',CLASS=A,MSGCLASS=C,
// MSGLEVEL=1,TIME=1440,COND=(0,NE)
// JCLLIB ORDER=(XXXX.XXXX.XXXX,YYYY.YYY.YYYY)
//JOBLIB DD DSN=ZZZZ.AAAA.LINKLIB,DISP=SHR
/*JOBPARM M=999999,L=999999
/*OUTPUT OPTI DEST=X
//P010 EXEC JOB1PROC
//P030 EXEC PGM=IEBGENER
//SYSPRINT DD SYSOUT=C
//SYSOUT DD SYSOUT=C
//SYSIN DD DUMMY
//SYSUT1 DD DSN='File generated in proc JOB1PROC' ,DISP=SHR
//SYSUT2 DD SYSOUT=(A,,OPTI),
// DCB=(RECFM=FBA,LRECL=133,BLKSIZE=1330)
Please let me know how to achieve my requirement.
Thanks
Elan |
|
| Back to top |
|
 |
References
|
 Posted: Thu Jul 17, 2008 12:10 pm Post subject: Re: To stop a file getting printed in a printer |
|
|
|
|
Anuj D.
Senior Member
Joined: 22 Apr 2006
Posts: 1706
Location: Mumbai, India
|
|
|
|
Hi,
Do you know what CLASS is been assigned to prnters at your shop ? It seems it's CLASS "C".
| Code: |
| //SYSOUT DD SYSOUT=C |
If so, removing above from the JCL might help.(I assume you are aloowed to edit the JCL.) |
|
| Back to top |
|
|
expat
Global Moderator
Joined: 14 Mar 2007
Posts: 2962
Location: Brussels once more ...
|
|
|
|
//SYSUT1 DD DSN='File generated in proc JOB1PROC' ,DISP=SHR
//SYSUT2 DD SYSOUT=(A,,OPTI),
// DCB=(RECFM=FBA,LRECL=133,BLKSIZE=1330)
This routes one copy of the report, where is the other copy routed - is it included in the PROC ? |
|
| Back to top |
|
|
|
|
|
