Previous Topic Next topic Print topic


To install or update DGS mainframe files

Restriction: This topic applies only when the AppMaster Builder AddPack has been installed, and applies only to Windows platforms.
  1. Pre-allocate the following TSO/mainframe datasets, substituting a high-level dataset name qualifier appropriate to your own site for your.name. Use the same qualifier for both datasets. These datasets are used to store the files that you upload from the %ProgramFiles(x86)%\Micro Focus\Enterprise Developer\etc\mainframe directory.
    your.name.CNTL.X
    A sequential fixed block file
    organization  PS
    record format FB
    record length 80
    block size    6160
    
    your.name.ISPPLIB.X
    A sequential fixed block file
    organization  PS
    record format FB
    record length 80
    block size    6160
     
    your.name.ISPPLIBH.X
    A sequential fixed block file
    organization  PS
    record format FB
    record length 80
    block size    6160
    
    your.name.ISPSLIB.X
    A sequential fixed block file
    organization  PS
    record format FB
    record length 80
    block size    6160
     
    your.name.LOADLIB2.X
    A sequential fixed block file
    organization  PS
    record format FB
    record length 80
    block size    3120
    
  2. Transfer the binary files to the TSO/mainframe datasets you just created. Transfer to the mainframe using binary mode (no ASCII to EBCDIC conversion). Although this example shows the appropriate ftp commands, you can also transfer the files using IND$FILE or any other file transfer tool that you have:
    put CNTL.bin        'your.name.CNTL.X'
    put IPSPPLIB.bin    'your.name.ISPPLIB.X'
    put IPSPPLIBH.bin   'your.name.ISPPLIBH.X'
    put ISPSLIB.bin     'your.name.ISPSLIB.X'
    put LOADLOIB2.bin   'your.name.LOADLIB2.X'
    
  3. Transfer the instjcl.txt fileto any suitable PDS, substituting the name of the PDS for your.pds. Transfer this file to the mainframe in ASCII mode. Although this example shows the appropriate ftp commands, you can also transfer the files using IND$FILE or any other file transfer tool that you have:
    put instjcl.txt 'your.pds(INSTJCL)'
  4. Customize the installation JCL by editing the INSTJCL member:
    //jobname JOB (9999,9999),'DEFINE ',
    //   MSGCLASS=X,CLASS=A,NOTIFY=&SYSUID,
    //   MSGLEVEL=(1,1)
    //*******************************************************
    //DGSINST PROC PREFIX=
    //DELETE  EXEC PGM=IEFBR14
    //DEL1 DD DSN=&PREFIX..CNTL,DISP=(MOD,DELETE),
    //        SPACE=(TRK,(1))
    //DEL2 DD DSN=&PREFIX..ISPPLIB,DISP=(MOD,DELETE),
    //        SPACE=(TRK,(1))
    //DEL3 DD DSN=&PREFIX..ISPSLIB,DISP=(MOD,DELETE),
    //        SPACE=(TRK,(1))
    //DEL4 DD DSN=&PREFIX..ISPPLIBH,DISP=(MOD,DELETE),
    //        SPACE=(TRK,(1))
    //DEL5 DD DSN=&PREFIX..LOADLIB,DISP=(MOD,DELETE),
    //        SPACE=(TRK,(1))
    //STEP20  EXEC PGM=IEFBR14
    //CREATE1 DD DSN=&PREFIX..CNTL,SPACE=(CYL,(5,2,80)),
    //        DCB=(LRECL=80,RECFM=FB,BLKSIZE=22480),
    //        UNIT=SYSDA,DISP=(NEW,CATLG)
    //CREATE2 DD DSN=&PREFIX..ISPPLIB,SPACE=(CYL,(5,2,80)),
    //        DCB=(LRECL=80,RECFM=FB,BLKSIZE=22480),
    //        UNIT=SYSDA,DISP=(NEW,CATLG)
    //CREATE3 DD DSN=&PREFIX..ISPPLIBH,SPACE=(CYL,(5,2,80)),
    //        DCB=(LRECL=80,RECFM=FB,BLKSIZE=22480),
    //        UNIT=SYSDA,DISP=(NEW,CATLG)
    //CREATE4 DD DSN=&PREFIX..ISPSLIB,SPACE=(CYL,(5,2,80)),
    //        DCB=(LRECL=80,RECFM=FB,BLKSIZE=22480),
    //        UNIT=SYSDA,DISP=(NEW,CATLG)
    //CREATE5 DD DSN=&PREFIX..LOADLIB,SPACE=(CYL,(5,2,80)),
    //        DCB=(LRECL=0,RECFM=U,BLKSIZE=22528),
    //        UNIT=SYSDA,DISP=(NEW,CATLG)
    //RECEIVE1 EXEC PGM=IKJEFT01,REGION=1024K
    //SYSUDUMP DD SYSOUT=*
    //SYSPRINT DD SYSOUT=*
    //SYSOUT   DD SYSOUT=*
    //SYSTSPRT DD SYSOUT=*
    //INFILE   DD DSN=&PREFIX..CNTL.X,DISP=SHR
    //SYSTSIN DD DUMMY
    //RECEIVE2 EXEC PGM=IKJEFT01,REGION=1024K
    //SYSUDUMP DD SYSOUT=*
    //SYSPRINT DD SYSOUT=*
    //SYSOUT   DD SYSOUT=*
    //SYSTSPRT DD SYSOUT=*
    //INFILE   DD DSN=&PREFIX..ISPPLIB.X,DISP=SHR
    //SYSTSIN DD DUMMY
    //RECEIVE3 EXEC PGM=IKJEFT01,REGION=1024K
    //SYSUDUMP DD SYSOUT=*
    //SYSPRINT DD SYSOUT=*
    //SYSOUT   DD SYSOUT=*
    //SYSTSPRT DD SYSOUT=*
    //INFILE   DD DSN=&PREFIX..ISPPLIBH.X,DISP=SHR
    //SYSTSIN DD DUMMY
    //RECEIVE4 EXEC PGM=IKJEFT01,REGION=1024K
    //SYSUDUMP DD SYSOUT=*
    //SYSPRINT DD SYSOUT=*
    //SYSOUT   DD SYSOUT=*
    //SYSTSPRT DD SYSOUT=*
    //INFILE   DD DSN=&PREFIX..ISPSLIB.X,DISP=SHR
    //SYSTSIN DD DUMMY
    //RECEIVE5 EXEC PGM=IKJEFT01,REGION=1024K
    //SYSUDUMP DD SYSOUT=*
    //SYSPRINT DD SYSOUT=*
    //SYSOUT   DD SYSOUT=*
    //SYSTSPRT DD SYSOUT=*
    //INFILE   DD DSN=&PREFIX..LOADLIB2.X,DISP=SHR
    //SYSTSIN DD DUMMY
    //  PEND
    //DGSINST EXEC DGSINST,
    //       PREFIX='your.name'
    //RECEIVE1.SYSTSIN DD *
      RECEIVE INDDNAME(INFILE)
         DSN('your.name.CNTL')
    /*
    //RECEIVE2.SYSTSIN DD *
      RECEIVE INDDNAME(INFILE)
         DSN('your.name.ISPPLIB')
    /*
    //RECEIVE3.SYSTSIN DD *
      RECEIVE INDDNAME(INFILE)
         DSN('your.name.ISPPLIBH')
    /*
    //RECEIVE4.SYSTSIN DD *
      RECEIVE INDDNAME(INFILE)
         DSN('your.name.ISPSLIB')
    /*
    //RECEIVE5.SYSTSIN DD *
      RECEIVE INDDNAME(INFILE)
         DSN('your.name.LOADLIB2')
    /*
    
    • Tailor the job card as needed
    • Set the PREFIX variable to the high level qualifier that you used for the CNTL.X, ISPPLIB.X, ISPPLIBH.X, ISPSLIB.X and LOADLIB2.X datasets
    • Change the dataset in the RECEIVE DSN parameter to:
      • your.name.CNTL
      • your.name.ISPPLIB
      • your.name.ISPPLIBH
      • your.name.ISPSLIB
      • your.name.LOADLIB2

      where your.name is the high level qualifier specified in the PREFIX variable.

  5. Submit INSTJCL to:
    • Allocate five libraries:
      • your.name.CNTL
      • your.name.ISPPLIB
      • your.name.ISPPLIBH
      • your.name.ISPSLIB
      • your.name.LOADLIB2
    • Populate the libraries with the data extracted from:
      • your.name.CNTL.X
      • your.name.ISPPLIB.X
      • your.name.ISPPLIBH.X
      • your.name.ISPSLIB.X
      • your.name.LOADLIB2.X
  6. Edit APS CLIST/Logon Procedures:
    • In the appropriate APS logon procedure or CLIST, enter your.name.ISPPLIB and your.name.ISPPLIBH as the first two files associated with the ISPPLIB DD name
    • In the appropriate APS logon procedure or CLIST enter your.name.ISPSPLIB as the first file associated with the ISPSLIB DD name
  7. Copy the following APSCNTL files to your mainframe APS installation area CNTL PDS:
    • your.name.ISPSLIB.CNTL.APSHEX
    • your.name.ISPSLIB.CNTL.APSHXMFG
Previous Topic Next topic Print topic