//GDGJOB01 JOB (ACCT),'GDG CHECK',CLASS=A,MSGCLASS=X //STEP010 EXEC PGM=IEFBR14 //OUT1 DD DSN=FINPROD.BILLING.HISTORY(+1),DISP=SHR,SPACE=(TRK,(1,1)),UNIT=SYSDA //IN1 DD DSN=FINPROD.BILLING.HISTORY(-1),DISP=SHR GDG BASE ------- FINPROD.BILLING.HISTORY LIMIT----------1 SCRATCH EMPTY