PDS Macro library



Unicenter CA-Easytrieve Plus Report Generator: CA's information retrieval and data management tool

PDS Macro library

Postby Rod » Fri Oct 30, 2009 3:31 am

I cannot figure out how to get my own PDS Macro library, I am using 6.4, z/OS, my job abends with a 0c4 and the system is not finding/using my PANDD statement, I found in these forums to look at eztpopt but it looks like assembler code, I do not have a panvalet library. I just want to use the same file definition for all jobs. My ezt.include has a file named cdbdef with macro on line 1. I have tried inserting MACDDN and MAC#LIB statements in the JCL but they error out I guess because I have not figured out where they actually get placed in the JCL. I have read users and reference guides, they mention it all but do not get included in any examples. Please tell me what is missing in my JCL. Thanks in advance.

*******B006 MACRO SYSTEM - PAN , PM015 DD CARD MISSING PANDD1*
1 %CDBDEF
2 JOB INPUT CDBREC NAME ENV-REPORTS
2 *******B082 NAME IS UNDEFINED - CDBREC
*************************** BOTTOM OF DATA **************************

Here is my JCL
/STEP02 EXEC PGM=EZTPA00,REGION=6M
/STEPLIB DD DSN=IDCSHR.EASYPLUS,DISP=SHR
/SYSOUT DD SYSOUT=*
/SYSUDUMP DD DUMMY
/EZTVFM DD UNIT=DISK,SPACE=(4096,(500,500),,,ROUND)
/SYSPRINT DD SYSOUT=*
/*DBREC DD DSN=DHSC.R8300522.UPK1(0),UNIT=CART,DISP=SHR
/CDBREC DD DSN=DHS9002.RESEARCH.SAMP0116,DISP=SHR
/PANDD DD DSN=DHS9002.EZT.INCLUDE,DISP=SHR
/DATAOUT DD DSN=DHS9002.FILES.EZT011X,
/ UNIT=DISK,
/ DISP=(NEW,CATLG,DELETE),
/ SPACE=(CYL,(100,15),RLSE),
/ DCB=(LRECL=136,BLKSIZE=30600,RECFM=FB)
/*
%CDBDEF
JOB INPUT CDBREC NAME ENV-REPORTS
Rod
 
Posts: 9
Joined: Fri Oct 30, 2009 1:53 am
Has thanked: 0 time
Been thanked: 0 time

Re: PDS Macro library

 

Re: PDS Macro library

Postby dick scherrer » Fri Oct 30, 2009 11:30 pm

Hello and welcome to the forum,

You have a PANDD but the error messages says PANDD1. . .

Several places i've been simply concatenate the file definition into the source input. This way many programs can share the definition without having to create a macro.
Hope this helps,
d.sch.
User avatar
dick scherrer
Global moderator
 
Posts: 6269
Joined: Sat Jun 09, 2007 8:58 am
Has thanked: 3 times
Been thanked: 93 times

Re: PDS Macro library

Postby Rod » Sat Oct 31, 2009 12:02 am

Is there any way to do an include at execution?
Rod
 
Posts: 9
Joined: Fri Oct 30, 2009 1:53 am
Has thanked: 0 time
Been thanked: 0 time

Re: PDS Macro library

Postby Rod » Sat Oct 31, 2009 12:24 am

also, where does the MACDDN and MAC#LIB statements go? Thanks.
Rod
 
Posts: 9
Joined: Fri Oct 30, 2009 1:53 am
Has thanked: 0 time
Been thanked: 0 time

Re: PDS Macro library

Postby dick scherrer » Sat Oct 31, 2009 12:29 am

Hello,

Is there any way to do an include at execution?
Yes.
Several places i've been simply concatenate the file definition into the source input.

//SYSIN    DD DSN=EZ.SRS.TEST.CTL(CSTAT1),DISP=SHR     the ezt pgm start       
//         DD DSN=EZ.COPYLIB1.Y2K(EDTL2K),DISP=SHR     a file def               
//         DD DSN=EZ.COPYLIB1.Y2K(EMST2K),DISP=SHR        another
//         DD DSN=EZ.SRS.TEST.CTL(CSTATK),DISP=SHR      more ezt code 
//         DD DSN=EZ.SRS.TEST.CTL(CSTATR1A),DISP=SHR    a report start
//         DD DSN=EZ.SRS.TEST.CTL(D&RUNYYMM),DISP=SHR   some header info 
//         DD DSN=EZ.SRS.TEST.CTL(CSTATR1B),DISP=SHR    a report end
Hope this helps,
d.sch.
User avatar
dick scherrer
Global moderator
 
Posts: 6269
Joined: Sat Jun 09, 2007 8:58 am
Has thanked: 3 times
Been thanked: 93 times

Re: PDS Macro library

Postby Rod » Sat Oct 31, 2009 12:57 am

Thanks and yes, I was just playing myself and was going to post this code that I created to still have the main login in the JCL. Just a simple little 1st job to make sure I have the JCL part right.

//SYSIN DD DSN=DHS9002.EZT.INCLUDE(CDBDEF),DISP=SHR
// DD *
JOB INPUT CDBREC NAME ENV-REPORTS
// DD DSN=DHS9002.EZT.INCLUDE(PTRDEF),DISP=SHR
// DD *
IF COUNTY = '011'
PRINT ENV-REPORT
END-IF
GO TO JOB
REPORT ENV-REPORT LINESIZE 125 SPACE 1
LINE PACASELD CATEGORY COUNTY BASIC CASENAME CASEADDR CASECITY CASEZIP
END
Rod
 
Posts: 9
Joined: Fri Oct 30, 2009 1:53 am
Has thanked: 0 time
Been thanked: 0 time

Re: PDS Macro library

Postby dick scherrer » Sat Oct 31, 2009 1:43 am

Hello,

I have tried inserting MACDDN and MAC#LIB statements in the JCL
They do not go in JCL, they are part of the Easytrieve Options table.
Hope this helps,
d.sch.
User avatar
dick scherrer
Global moderator
 
Posts: 6269
Joined: Sat Jun 09, 2007 8:58 am
Has thanked: 3 times
Been thanked: 93 times


Return to CA-Easytrieve

 


  • Related topics
    Replies
    Views
    Last post