Files
DUTAS/JCL/DTSEMTPS.jcl
2025-07-21 11:20:11 -04:00

32 lines
1.4 KiB
Plaintext

//DTSTPSEM JOB (UI,4300,3400,T),CHGDC.MNE,CLASS=P,MSGCLASS=X, 00010014
//** TYPRUN=SCAN, 00011014
// NOTIFY=ECNTSUP,REGION=0M 00014018
/*ROUTE PRINT U@PRT65 - BY Z/OS UPGRADE
//**** 00040000
//**** 00520000
/*JOBPARM LINES=99999
/*OUTPUT REPT DEST=LOCAL,FORMS=REPT
//***************************************************************
//* U1000 CONVERTS OUTPUT TO RICHTEXT .RTF
//* INCLUDE JOB SEPARATORS
//* U1001 CONVERTS OUTPUT TO RICHTEXT .RTF
//* OMITS ALL JOB SEPARATORS INFORMATION
//* U1002 CONVERTS OUTPUT TO ACROBAT FORMAT (.PDF)
//* OMITS ALL JOB SEPARATORS INFORMATION
//* U1003 CONVERTS OUTPUT TO SIMPLE TEXT FORMAT (.TXT)
//* OMITS ALL JOB SEPARATORS INFORMATION
//***************************************************************
//EMAIL EXEC PGM=IEBGENER,
// REGION=4M
//SYSPRINT DD SYSOUT=*
//OUT1 OUTPUT DEST=U1003,
// USERDATA=('TO:MARK.POWELL@DC.GOV',
// 'FILEDESC: TPS SI SECOND NOTICE ',
// 'FILENAME:TPSSIREPT.TXT')
//SYSUT1 DD DISP=SHR,
// DSN=DOESTAX.PROD.CHARGESI.QTR092
//SYSUT2 DD SYSOUT=A,OUTPUT=*.OUT1
//SYSIN DD DUMMY
//SYSUDUMP DD SYSOUT=(*,,DUMP)
//*