How to Modify the SCF Static Options

Some of the options provided by the CA IPC at installation are Session Control Facility (SCF) static options. These options include the several program name prefixes and the names of the SCF panel and member libraries. You can reset these options, but only by modifying, reassembling, and relinking the static options block that is contained in the load module SC00OPTS.

To change any of the SCF static options, perform the following steps:

  1. Get the following source for SC00OPTS from your site CA IPC CUSMAC library:
              'PRINT GEN
              TITLE 'SC00OPTS - Session Control Facility Option Block'
     *----------------------------------------------------------------------*
     *         S C 0 0 O P T S
     * This is the SCF option control block CSECT.  It is assembled         *
     * and then is loaded into a VLS blocked-data member, SCF#OPTIONS for   *
     * shipment to customers as the dynamic option/control block.           *
     *----------------------------------------------------------------------*
     SC00OPTS    TYPE=CSECT                                                 X
                     EDPFX=ED,              EDK program prefix              X
                     PDPFX=@I,              PDF program prefix              X
                     PNLIB=ADRPNL,          SCF panel library name          X
                     PSSPFX=SCPS,           PSS program prefix              X
                     QCODE=C' ',            character used in enqueue names X
                     SCFPFX=SC00,           SCF program prefix              X
                     SECRTY=N,              external security option        X
                     SESSID=TERMID          CICS user-id                    X
                     VLSLIB=ADRLIB          SCF data member library name
    
    TYPE

    Specifies the type of option block to generate. There are two possible values:

    CSECT

    A CSECT is generated. You must specify this option to assemble the SCF option block, SC00OPTS.

    DSECT|DS

    A simple DSECT (that is, a control block with DS declaratives and a simple label at the origin) is generated.

    EDPFX

    The two-character EDK (Editor Kernel) program prefix.

    PDPFX

    The two-character PDF (Panel Definition Facility) program prefix.

    PNLIB

    The one- to eight-character SCF (Session Control Facility) panel library name.

    Note: Before you modify this value, see How to Change Default File Names.

    PSSPFX

    The four-character PSS (Print Subsystem) program prefix.

    QCODE

    A single byte that ensures that enqueue names are unique across systems. Code a single character without quotes or use the format C'x'.

    Note: Before you change this value, make sure all affected CICS systems and batch jobs are not running. If they are running, the library can become corrupted.

    SCFPFX

    The four-character SCF (Session Control Facility) program prefix.

    SECRTY

    Specifies whether SCF enables external security during sign in to determine the signin authorization for the user.

    N

    Does not enable external security checking (default).

    Y

    Enables external security checking. An error message displays if the CA Common Services SSF security interface is not installed during sign in.

    SESSID

    Specifies whether, for CICS only, to use the CICS terminal ID or operator ID to determine the signin authorization for the user.

    TERMID

    Permits SCF to use the CICS terminal ID (default).

    OPID

    Ignored. Processed as TERMID.

    VLSLIB

    The one- to eight-character name of the SCF (Session Control Facility) member library.

  2. Make any necessary changes to SC00OPTS.
  3. Save the modified source back to your CA IPC CUSMAC library.
  4. Use the following JCL as a model to reassemble and relink SC00OPTS. (Refer to INSTJCL member VQCUS01.)
    //         JOBCARD
    //*
    //ASMMEMS PROC VQUSR='CAI.CHLQ.CUSLIB'                 IPC CUSLIB
    //                            
    //             VQTML='PRODHLQ.CAVQMAC',                IPC CAIMAC
    //             VQCML='CAI.CHLQ.CUSMAC',                IPC CUSMAC
    //             ASMBLR='ASMA90',
    //             SYSOUT=*=
    //*
    //*
    //*    ASSEMBLE/LINK TO CUSLIB
    //*
    //ASM      EXEC PGM=&ASMBLR,PARM='DECK,NOOBJ',REGION=2048K
    //SYSLIB   DD DSN=SYS1.MACLIB,DISP=SHR
    //         DD  DISP=SHR,
    //         DSN=&VQCML
    //         DD  DISP=SHR,
    //         DSN=&VQTML
                   
    //SYSUT1   DD  DSN=&&SYSUT1,SPACE=(1024,(120,120),,,ROUND),
    //         UNIT=VIO,DCB=BUFNO=1
    //SYSPUNCH DD  DSN=&&ASMOBJ,UNIT=SYSDA,
    //         SPACE=(3120,(400,100),RLSE),
    //         DISP=(,PASS),
    //         DCB=BLKSIZE=3120
    //SYSPRINT DD  SYSOUT=&SYSOUT
    //*
    //LNKSTP  EXEC PGM=IEWL,COND=(5,LT,ASMSTP),
    //             PARM='LIST,LET,XREF,MAP'
    //SYSLIN   DD  DSN=&&ASMOBJ,DISP=(OLD,DELETE)
    //         DD  DDNAME=SYSIN
    //SYSLMOD  DD  DSN=&VQUSR,
    //         DISP=SHR
    //SYSUT1   DD  DSN=&&SYSUT1,SPACE=(1024,(120,120),,,ROUND),
    //         UNIT=VIO,DCB=BUFNO=1
    //SYSPRINT DD  SYSOUT=&SYSOUT
    //*
    //  PEND
    //*
    //*
    //*   EXECUTE ASMMEMS PROC
    //*
    //STEP1C EXEC ASMMEMS
    //*
    //ASMSTP.SYSIN DD DISP=SHR,
    //         DSN=CAI.CHLQ.CUSMAC(SC00OPTS)
    //LNKSTP.SYSIN DD *
     NAME SC00OPTS(R)
    /*
    //