TITLEDOCJCLPS  GENJOB.  LIST PROGRAMMER'S GUIDE FROM SEQUENTIAL FILES. 00000100
C***********************************************************************
C                 COPYRIGHT ATLANTIC RICHFIELD COMPANY 1991            *
C***********************************************************************
//JOBNAME JOB (453739000,,,Y00272),'SUBMITTER',                         00000200
// NOTIFY=LOGON,           DOCJCLPS   GENJOB           PREFIX           00000300
// CLASS=R                                                              00000400
/*USER S=SEISMIC
/*JOBPARM ROOM=G111,COPIES=1                                            00000500
/*ROUTE  PRINT LOCAL                                                    00000600
/*MESSAGE  *                         PARM1 PARM2 PARM3 PARM4 PARM5      00000700
/*MESSAGE  ****************  GAP   PRC  **************************      00000800
/*MESSAGE  ***   JOB         SEND OUTPUT TO SUBMITTER                   00000900
/*MESSAGE  ***   JOBNAME     ROOM G111                                  00001000
/*MESSAGE  ***   TIME=TTT    REGION=000K                                00001100
/*MESSAGE  *******************************************************      00001200
/*MESSAGE  *                         PARM6 PARM7 PARM8 PARM9 PARMA      00001300
//LIST   EXEC PGM=UTLPG,REGION=512K,TIME=TTT                            00001400
//STEPLIB DD DSN=DBG.SPARC.LOAD,DISP=SHR                                00001500
//FT01F001 DD DSN=DBGFAC.LOGOP.DATA,DISP=SHR                            00001600
//FT03F001 DD *                                                         00001700
COPIES 1 1CA                                                            00001800
                SPARC PROGRAMMER'S GUIDE                                00001900
//FT05F001 DD DSN=DBGFAC.DOCSECA.DATA,DISP=SHR                          00002000
//         DD DSN=DBGFAC.DOCSECB.DATA,DISP=SHR                          00002100
//         DD DSN=DBGFAC.DOCSECC.DATA,DISP=SHR                          00002105
//         DD DSN=DBGFAC.DOCSECD.DATA,DISP=SHR                          00002110
//         DD DSN=DBGFAC.PTABDEF.DATA,DISP=SHR                          00002115
//         DD DSN=DBGFAC.DOCSECE.DATA,DISP=SHR                          00002120
//         DD DSN=DBGFAC.PTABMSTR.DATA,DISP=SHR                         00002125
//         DD DSN=DBGFAC.DOCSECF.DATA,DISP=SHR                          00002130
//         DD DSN=DBGFAC.DOCSECG.DATA,DISP=SHR                          00002135
//         DD DSN=DBGFAC.DOCSECH.DATA,DISP=SHR                          00002140
//         DD DSN=DBGFAC.DOCSECI.DATA,DISP=SHR                          00002145
//         DD DSN=DBGFAC.DOCSECJ.DATA,DISP=SHR                          00002150
//FT08F001 DD SYSOUT=E,DCB=(RECFM=FBA,LRECL=133,BLKSIZE=133) LOGO       00002300
//FT04F001 DD SYSOUT=E,DCB=(RECFM=FBA,LRECL=133,BLKSIZE=133) T. O. C.   00002400
//FT06F001 DD SYSOUT=E,DCB=(RECFM=FBA,LRECL=133,BLKSIZE=133) MAIN TEXT  00002500
//FT10F001 DD DSN=PREFIX.DOCGTOC.DATA,UNIT=TSODA,SPACE=(TRK,(2,1)),     00002600
//            DCB=(BLKSIZE=19040),DISP=(NEW,CATLG,DELETE)    T. O. C.   00002700
      END                                                               00002800