Page 2 of 2

Re: how can I create marcos library

PostPosted: Tue Mar 11, 2008 10:14 pm
by yurad
1 J E S 2 J O B L O G -- S Y S T E M S Y 0 7 -- N O D E M C C
0
12.35.19 JOB07914 ---- TUESDAY, 11 MAR 2008 ----
12.35.19 JOB07914 IRR010I USERID YD37 IS ASSIGNED TO THIS JOB.
12.35.19 JOB07914 ICH70001I YD37 LAST ACCESS AT 10:45:05 ON TUESDAY, MARCH 11, 2008
12.35.19 JOB07914 $HASP373 YD37TST1 STARTED - INIT 3 - CLASS 0 - SYS SY07
12.35.19 JOB07914 DTM4750I JOB CPU LIMITED TO 0:05
12.35.19 JOB07914 IEF403I YD37TST1 - STARTED - TIME=12.35.19
12.35.19 JOB07914 XACT01I YD37TST1 1 EZTP01 EZTPA00 -------- R0000
12.35.19 JOB07914 IEF404I YD37TST1 - ENDED - TIME=12.35.19
12.35.19 JOB07914 XACT01I YD37TST1 -------- EOJ
12.35.19 JOB07914 $HASP395 YD37TST1 ENDED
0------ JES2 JOB STATISTICS ------
- 11 MAR 2008 JOB EXECUTION DATE
- 14 CARDS READ
- 94 SYSOUT PRINT RECORDS
- 0 SYSOUT PUNCH RECORDS
- 8 SYSOUT SPOOL KBYTES
- 0.00 MINUTES EXECUTION TIME
1 //YD37TST1 JOB (@@WXP@@@,PU),'ESYTRIEVE TST', JOB07914
// CLASS=0,MSGCLASS=Q,NOTIFY=&SYSUID,REGION=6500K
IEFC653I SUBSTITUTION JCL - (@@WXP@@@,PU),'ESYTRIEVE TST',CLASS=0,MSGCLASS=Q,NOTIFY=YD37,REGION=6500K
2 //EZTP01 EXEC PGM=EZTPA00
3 //PRT1 DD SYSOUT=*,
// DCB=(RECFM=FBA,LRECL=133,BLKSIZE=3990)
4 //SYSPRINT DD SYSOUT=*
5 //SYSOUT DD SYSOUT=*
6 //SYSABOUT DD SYSOUT=*
7 //SYSDBOUT DD SYSOUT=*
8 //SYSUDUMP DD SYSOUT=*
/*
9 //SYSIN DD *
JALINFO-SCANNED BY THRUPUT MANAGER JAL 48 ON SY07
JALINFO-SUBMITTED ON SY07. NODE=MCC. REMOTE=0. INPUT DEVICE=INTRDR
DTM1458I 2008.071 12:35:19 JOB YD37TST1 REQUEUED TO CLASS=0
ICH70001I YD37 LAST ACCESS AT 10:45:05 ON TUESDAY, MARCH 11, 2008
IEF236I ALLOC. FOR YD37TST1 EZTP01
IEF237I JES2 ALLOCATED TO PRT1
IEF237I JES2 ALLOCATED TO SYSPRINT
IEF237I JES2 ALLOCATED TO SYSOUT
IEF237I JES2 ALLOCATED TO SYSABOUT
IEF237I JES2 ALLOCATED TO SYSDBOUT
IEF237I JES2 ALLOCATED TO SYSUDUMP
IEF237I JES2 ALLOCATED TO SYSIN
IEF142I YD37TST1 EZTP01 - STEP WAS EXECUTED - COND CODE 0000
IEF285I YD37.YD37TST1.JOB07914.D0000102.? SYSOUT
IEF285I YD37.YD37TST1.JOB07914.D0000103.? SYSOUT
IEF285I YD37.YD37TST1.JOB07914.D0000104.? SYSOUT
IEF285I YD37.YD37TST1.JOB07914.D0000105.? SYSOUT
IEF285I YD37.YD37TST1.JOB07914.D0000106.? SYSOUT
IEF285I YD37.YD37TST1.JOB07914.D0000107.? SYSOUT
IEF285I YD37.YD37TST1.JOB07914.D0000101.? SYSIN
************************************************************************************************************************************
* STEP TERMINATION STATISTICS *
* *
* STEP NAME EZTP01 START TIME 12:35:19.23 VIRT SYS USED 328K PAGE INS 0 STEP CPU 00:00:00.01 *
* PGM NAME EZTPA00 STOP TIME 12:35:19.38 VIRT CORE USED 4,112K PAGE OUTS 0 JOB CPU 00:00:00.01 *
* DISPATCH PRTY 0 ELAP. TIME 00:00:00.15 NUMBER SWAPS 0 NUMBER PAGES 0 SRB TIME 00:00:00.00 *
* PERF. GROUP 0 SERV UNITS 330 TRANS ACT TIME 00:00:00.13 COMPLETION CODE R0000 *
* MAIN STORAGE UNITS 20 CPU UNITS 291 SRB UNITS 4 I/O UNITS 15 *
************************************************************************************************************************************
* EXCP STATISTICS *
* *
* DDNAME CC# UNIT EXCP COUNT DDNAME CC# UNIT EXCP COUNT DDNAME CC# UNIT EXCP COUNT DDNAME CC# UNIT EXCP COUNT *
* *
* *
* EXCP TOTAL 0 VIO PAGE INS 0 VIO PAGE OUTS 0 PAGES SWAPPED IN 0 *
* *
************************************************************************************************************************************
IEF373I STEP/EZTP01 /START 2008071.1235
IEF374I STEP/EZTP01 /STOP 2008071.1235 CPU 0MIN 00.01SEC SRB 0MIN 00.00SEC VIRT 4112K SYS 328K EXT 96K SYS 10448K
************************************************************************************************************************************
* JOB TERMINATION STATISTICS *
* *
* JOB NAME YD37TST1 JOB07914 CPU TIME 00:00:00.01 SRB TIME 00:00:00.00 *
* *
* PROGRAMMER ESYTRIEVE TST INIT DATE 03/11/08 08.071 INITIATION TIME 12:35:19.23 *
* *
* SYSTEM ID SY07 TERM DATE 03/11/08 08.071 TERMINATION TIME 12:35:19.39 *
* *
* CLASS 0 PERF. GROUP 0 SERV UNIT 330 ELAPSED TIME 00:00:00.16 *
* *
* MAIN STORAGE UNITS 20 CPU UNITS 291 SRB UNITS 4 I/O UNITS 15 *
* *
************************************************************************************************************************************
IEF375I JOB/YD37TST1/START 2008071.1235
IEF376I JOB/YD37TST1/STOP 2008071.1235 CPU 0MIN 00.01SEC SRB 0MIN 00.00SEC
103/11/08 12.35.19 CA-EASYTRIEVE PLUS-6.4 0311 PAGE 1
CIBC
0PROGRAMS AND ALL SUPPORTING MATERIALS COPYRIGHT (C) 1982, 1996 BY COMPUTER ASSOCIATES INTL. INC.
- 1 JOB INPUT NULL
2 STOP
0OPTIONS FOR THIS RUN - ABEXIT SNAP DEBUG (STATE FLDCHK NOXREF) LIST (PARM FILE) PRESIZE 512
SORT (DEVICE SYSALLDA ALTSEQ NO MSG DEFAULT MEMORY 512 WORK 6) VFM ( 256)


Re: how can I create marcos library

PostPosted: Fri Mar 14, 2008 12:18 am
by yurad
PANDD1 works! I just tried names that may make sense.

Thank you, guys!

Re: how can I create marcos library

PostPosted: Fri Mar 14, 2008 5:19 am
by dick scherrer
Thank you for posting your resolution :)

Now that you know the answer, you should be able to spot it in the opts module.

d

Re: how can I create marcos library

PostPosted: Tue Mar 18, 2008 1:03 am
by yurad
PANDD1 works. Thank you, guys!

Re: how can I create marcos library

PostPosted: Tue Mar 18, 2008 2:08 am
by dick scherrer
You're welcome :)

Did you look in the opts module to verify where it is (in case you need to this in some other ezt environment)?