cics compile jcl

This forum provides the support of Dezhi Mainframe systems. Please post your questions about logon, usage of our mainframe environment.

Moderators: sysprog, prino, sfan, steve-myers, Tim001

Re: cics compile jcl

Postby CPANTX » Sun 28 Mar 2010, 08:10

I used CICSCOMP.

Code: Select all
****** ***************************** Top of Data ******************************
000100 //CPANTXJ  JOB (12345678),CPANTX,MSGCLASS=H,               
000200 //        MSGLEVEL=(1,1),CLASS=A,NOTIFY=&SYSUID                                     
000300 //COBS1    EXEC DFHEITVL,                                               
000400 //             OUTC=H,                                                 
000401 //             DSCTLIB=CPANTX.COBOL.LOADLIB,                                 
000402 //             PROGLIB=SYSFAN.CICS.LOAD                                 
000404 //*                                                                     
000405 //TRN.SYSIN    DD DSN=CPANTX.COBCIS.PRG(FIST),DISP=SHR               
000406 //*                                                                     
000407 //LKED.USERLIB  DD DSN=____________________,DISP=SHR                         
000408 //LKED.SYSIN  DD *                                                     
000409   NAME FIST(R)                                                     
000410 //*                                                                     
****** **************************** Bottom of Data ****************************


Please explain line no. 000407, what it does, and what should be DSN. It is not a standard linkage editor library name. Since it is in the linkage editor / binder step, it most likely is some object module library or load library, but what it should be? Will it work if we remove this line?
Please help.
CPANTX
 
Posts: 13
Joined: Mon 29 Jun 2009, 17:43

Re: cics compile jcl

Postby prino » Sun 04 Apr 2010, 22:58

CPANTX wrote:I used CICSCOMP.

Code: Select all
****** ***************************** Top of Data ******************************
000100 //CPANTXJ  JOB (12345678),CPANTX,MSGCLASS=H,               
000200 //        MSGLEVEL=(1,1),CLASS=A,NOTIFY=&SYSUID                                     
000300 //COBS1    EXEC DFHEITVL,                                               
000400 //             OUTC=H,                                                 
000401 //             DSCTLIB=CPANTX.COBOL.LOADLIB,                                 
000402 //             PROGLIB=SYSFAN.CICS.LOAD                                 
000404 //*                                                                     
000405 //TRN.SYSIN    DD DSN=CPANTX.COBCIS.PRG(FIST),DISP=SHR               
000406 //*                                                                     
000407 //LKED.USERLIB  DD DSN=____________________,DISP=SHR                         
000408 //LKED.SYSIN  DD *                                                     
000409   NAME FIST(R)                                                     
000410 //*                                                                     
****** **************************** Bottom of Data ****************************


Please explain line no. 000407, what it does, and what should be DSN. It is not a standard linkage editor library name. Since it is in the linkage editor / binder step, it most likely is some object module library or load library, but what it should be? Will it work if we remove this line?
Please help.


So what are "standard" DS names? If I have the following piece of JCL:

Code: Select all
//IEWL    EXEC PGM=IEWL,
//             PARM=('LET,LINECT=0,LIST,XREF',
//             'AMODE=31,RMODE=ANY')
//*
//SYSLIN    DD *
  INCLUDE MYOBJ(PLORK)
  NAME PLURK(R)
//*
//MYOBJ     DD DSN=&&OBJECT,
//             DISP=(OLD,DELETE)
//*
//SYSLMOD   DD DDNAME=&LLIB
//*
//MYLOAD    DD DSN=&LOAD,
//             DISP=SHR
//*
//TEMP      DD DSN=&&LOAD,
//             DISP=(OLD,PASS)
//*
//SYSLIB    DD DSN=CEE.SCEELKED,
//             DISP=SHR
//          DD DSN=SYS1.CSSLIB,
//             DISP=SHR
//*
//SYSUT1    DD UNIT=SYSDA,
//             SPACE=(CYL,(5,1))
//*
//SYSPRINT  DD SYSOUT=*,
//             DCB=(RECFM=FBA,LRECL=121,BLKSIZE=27951)


Then "MYOBJ" is "standard" enough for the Binder to work it's ways!

From
Shakespeare wrote:What's in a name? that which we call a rose
By any other name would smell as sweet; (Romeo and Juliet, 1600)
Robert AH Prins
robert.ah.prins @ the.17+Gb.Google thingy
Some programming here :mrgreen:
prino
 
Posts: 479
Joined: Sat 06 Jun 2009, 21:41
Location: Vilnius, Lithuania

Re: cics compile jcl

Postby CPANTX » Thu 22 Apr 2010, 05:02

This complile JCL is generic and can be used by all by making changes according to their respective load libraries. Please tell what are those changes and which lines will have those changes?

Code: Select all
****** ***************************** Top of Data ******************************
000100 //CPANTXJ  JOB (12345678),CPANTX,MSGCLASS=H,               
000200 //        MSGLEVEL=(1,1),CLASS=A,NOTIFY=&SYSUID                                     
000300 //COBS1    EXEC DFHEITVL,                                               
000400 //             OUTC=H,                                                 
000401 //             DSCTLIB=CPANTX.COBOL.LOADLIB,                                 
000402 //             PROGLIB=SYSFAN.CICS.LOAD                                 
000404 //*                                                                     
000405 //TRN.SYSIN    DD DSN=CPANTX.COBCIS.PRG(FIST),DISP=SHR               
000406 //*                                                                     
000407 //LKED.USERLIB  DD DSN=____________________,DISP=SHR                         
000408 //LKED.SYSIN  DD *                                                     
000409   NAME FIST(R)                                                     
000410 //*                                                                     
****** **************************** Bottom of Data ****************************


Thanks
CPANTX
 
Posts: 13
Joined: Mon 29 Jun 2009, 17:43

Re: cics compile jcl

Postby CPANTX » Sun 25 Apr 2010, 06:53

Regarding above JCL,

-line no. 000401 contains DSN where symbolic map resides.
-line no. 000402 contains DSN where physical map resides.

-the other two changes are in line no. 000405 and 000409 where DSN where source code resides and name of the source code itself is given respectively.

Now, I just want to know what should be in line no. 000407. Secondly, is this line necessary?

These kinds of JCLs are installation specific and I need to know installation specific changes in this JCL in order to go forward.

Please help.
CPANTX
 
Posts: 13
Joined: Mon 29 Jun 2009, 17:43

Re: cics compile jcl

Postby CPANTX » Wed 12 May 2010, 17:56

Please help regarding above, any member who may help.
CPANTX
 
Posts: 13
Joined: Mon 29 Jun 2009, 17:43

Re: cics compile jcl

Postby prino » Wed 12 May 2010, 19:32

CPANTX wrote:Regarding above JCL,

-line no. 000401 contains DSN where symbolic map resides.
-line no. 000402 contains DSN where physical map resides.

-the other two changes are in line no. 000405 and 000409 where DSN where source code resides and name of the source code itself is given respectively.

Now, I just want to know what should be in line no. 000407. Secondly, is this line necessary?

These kinds of JCLs are installation specific and I need to know installation specific changes in this JCL in order to go forward.

Please help.


Line 407 is not required. Just look (in SDSF) at one of the many jobs that is submitted every day to assemble CICS maps, copy the JCL and adapt it for your own needs.
Robert AH Prins
robert.ah.prins @ the.17+Gb.Google thingy
Some programming here :mrgreen:
prino
 
Posts: 479
Joined: Sat 06 Jun 2009, 21:41
Location: Vilnius, Lithuania


Return to Dezhi systems: Mainframe

Who is online

Users browsing this forum: No registered users and 0 guests

cron