15 lines
400 B
Plaintext
15 lines
400 B
Plaintext
//****
|
|
//* DTSUC30A - LOAD QTRLY CONTRIBUTION/WAGE DATA FROM ADP
|
|
//* (SPEC FROM ADP BECAUSE OF DSN!)
|
|
//****
|
|
//STEP0100 EXEC PGM=IDCAMS,
|
|
// COND=(0,LT)
|
|
//SYSPRINT DD SYSOUT=*
|
|
//STEP0100.INDD01 DD DSN='100.DC.RATES.REQ',
|
|
// UNIT=CART,
|
|
// VOL=SER=&TVOLSER.,
|
|
// LABEL=&LVLABEL.,
|
|
//*** LABEL=(1,SL,EXPDT=98000),
|
|
// DISP=SHR
|
|
//**
|