Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- BROWSE TWS830.SEQQSKL0(EQQLMTAB) - 01.00 Line 00000000 Col 001 080
- Command ===> Scroll ===> CSR
- ----+----1----+----2----+----3----+----4----+----5----+----6----+----7----+----8
- ********************************* Top of Data **********************************
- //OPCINSTA JOB (9999),'OPCSAMPLES',CLASS=A,MSGCLASS=Q, 00010000
- // MSGLEVEL=(1,1),REGION=0M,NOTIFY=&SYSUID
- //ASSEMBLE EXEC PGM=ASMA90,PARM='OBJECT,NODECK' 00020000
- //*
- //* Licensed Materials - Property of IBM
- //* 5698-A17
- //* (C) Copyright IBM Corp. 1990, 2006 ALL RIGHTS RESERVED.
- //* US Government Users Restricted Rights - Use, duplication
- //* or disclosure restricted by GSA ADP Schedule Contract
- //* with IBM Corp.
- //*
- //SYSLIB DD DSN=SYS1.MACLIB,DISP=SHR 00030000
- //SYSUT1 DD UNIT=SYSDA,SPACE=(1700,(400,50)) 00040000
- //SYSLIN DD DSN=&LOADSET,UNIT=SYSDA,SPACE=(80,(250,50)), 00050000
- // DISP=(,PASS) 00060000
- //SYSPRINT DD SYSOUT=* 00070000
- //SYSIN DD * 00080000
- EQQLMTAB MODETAB 00090000
- MODEENT LOGMODE=NCFSPARM, C00100000
- FMPROF=X'04', C00110000
- TSPROF=X'04', C00120000
- PRIPROT=X'F3', C00130000
- SECPROT=X'F3', C00140000
- COMPROT=X'0000', C00150000
- PSERVIC=X'000000000000000000000000', C00160000
- RUSIZES=X'8787' 00170000
- MODEEND 00180000
- END 00190000
- //LINK EXEC PGM=IEWL,PARM='XREF,LIST,LET,CALL' 00200000
- //SYSPRINT DD SYSOUT=* 00210000
- //SYSLMOD DD DSN=ADCD.Z110S.VTAMLIB(EQQLMTAB),DISP=SHR 00220000
- //SYSUT1 DD UNIT=SYSDA,SPACE=(1700,(400,50)) 00230000
- //SYSLIN DD DSN=&LOADSET,DISP=(OLD,DELETE) 00240000
- ******************************** Bottom of Data ********************************
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement