II14452: USERS OF DOS/VS RPG II RELEASE 1.3.0 WISHING TO RUN APPLICATIONS IN CICS TS ON Z/VSE 4.3 AND ABOVE

APAR status

• INTRAN

Error description

• DOS/VS RPG II RELEASE 1.3.0 online applications cannot run in
  CICS TS as language RPG is not supported.
  
  With ptf UK60655 for apar PM22788 against DOS/VS RPG II
  Release 1.3.0 compiler, online RPG II application program
  can be compiled to run in CICS TS.
  Note: UK60655 supercedes UK58484.
  
  The following will be required to be done to setup the
  environment for compiling online RPG applications to run
  
  o  Activation of required CICS/VSE Programs / Macros / Samples
     Two jobs are provided in ICCF library 59 which need to be
     executed/submitted to activate the required CICS/VSE parts
     to support RPGII in a CICS TS environment.
  
     RPGINST
     1. This Job will define a new sublibrary called PRD2.RPGII
     2. will linkedit phase DFHERP1$ (CICS/VSE RPGII translator)
        into this newly defined sublibrary.
     3. will catalog the CICS/VSE BMS Map structures (A-books)
        DFHANRAT, DFHANRWC, DFHMDC, DFHMDCL, DFHMDF, DFHMDI,
        DFHMRPG, DFHMSD, DFHPRMCK and DFHSYS into sublibrary
        PRD2.RPGII .
     4. and will catalogs R-type members DFHAID, DFHEIBLK,
        DFHEIVAR, DFHBMSCA and DFHMSRCA into sublibrary PRD2.RPGII
  
     RPGSAMPL
     This job will catalog CICS/VSE supplied RPG Sample
     applications into PRD2.RPGII sublibrary (same sublibrary
     as used for the other CICS/VSE supplied parts).
  
     Following is a list of the RPG Sample applications which
     will be cataloged as R-type members:
        DFHXFILE, DFHXLOGA, DFHXL86O, DFHXRALL, DFHXRBRW,
        DFHXRCOM, DFHXRMA,  DHFXRMB,  DFHXRMC,  DFHXRMD, DFHXRMK,
        DFHXRML,  DFHXRMNU, DHFXRREN, DFHXRREP and DFH29080.
  
  o  When at least the RPGINST job has been submitted successfully
     then you must add the new sublibrary PRD2.RPGII to the
     LIBDEFs in member C$$RPONL in ICCF library 2.
  
  
  When the environment has be established then the following
  has to be done to run RPG II online application in CICS TS,
  
  o  compile with EXEC PARM option of CICSTS
     e.g. // EXEC RPGII,PARM='CICSTS'  (refer below for sample)
  
  o  link edit including new ILNERI object where previously
     DFHERI was included.
  
  o  define the program to CICS TS as language type ASSEMBLER
  
  o  define the program to CICS TS as RELOAD=YES
  
  sample compile JCL to compile for CICS TS
  
     * $$ JOB JNM=DFHXRMNU,CLASS=0
     * $$ PUN DISP=I,PRI=6,CLASS=0
     // JOB DFHXAMNU
     // ASSGN SYSIPT,SYSRDR
     // EXEC IESINSRT
     // JOB DFHXAMNU
     // LIBDEF *,SEARCH=(testlib.sublib,prd2.rpg,PRD2.RPGII)
     // LIBDEF PHASE,CATALOG=testlib.sublib
     // OPTION CATAL
        PHASE XDFHRMNU,*
        INCLUDE ILNERI
     // EXEC RPGII,PARM='CICSTS'
     * $$ END
     // LIBDEF *,SEARCH=(testlib.sublib,prd2.rpg,PRD2.RPGII)
     // OPTION DECK
     // EXEC DFHERP1$
     * $$ SLI MEM=DFHXRMNU.R,S=PRD2.RPGII
     /*
     // EXEC IESINSRT
     /*
     // EXEC LNKEDT
     /*
     #&
     $ $$ EOJ
     * $$ END
     /&
     * $$ EOJ
  
  Also batch applications compiled with UK60655 applied
  will function as before. Note that linkedit of batch
  compiles will now have UNRESOLVED EXTERNAL REFERENCES
  WXTRN DFHEI1 with LAST RETURN CODE WAS 0002.
  
  Note that the RPG II online application is restricted to CICS
  API calls as described in CICS/DOS/VSE Version 1 Release 6
  Application Programmer's Reference Manual (RPGII) that are
  supported in CICS TS.
  
  UK97635 for apar PM94531 corrects a defect where the CICS
  program storage is not released for an RPG II applcation.
  
  Note: - RPG II online applications have to be relinked with the
          ILNERI updated by UK97635
  
        - The ILNERI must be the first object included in linking
          the phase. Failure to do so will result in the program
          storage not being released.
          e.g.
               PHASE RPGPROG,*
                INCLUDE ILNERI
                INCLUDE ....
                INCLUDE ....
  
        - add program RPGIICLN and transaction CRPG to the CSD
  
          DEFINE PROG(RPGIICLN) GROUP(group) DA(BELOW) LANG(A)
          DEFINE TRANS(CRPG)    GROUP(group) PROG(RPGIICLN)
  
        - Transaction security for CRPG has to be allowed.
  
        - The program RPGIICLN has to be in sublibrary which is
          in the CICS LIBDEF SEARCH chain.
  

Local fix

Problem summary

Problem conclusion

Temporary fix

Comments

APAR Information

• APAR is sysrouted FROM one or more of the following:

• APAR is sysrouted TO one or more of the following:

Fix information

Applicable component levels