Previous Topic: CSD PROGRAM and TRANSACTION Sample EntriesNext Topic: PROFILE Entries for the CICS Component


Sample Entries for the CA Top Secret Component

The following example shows how to define PROFILE, TRANSACTION, and PROGRAM entries for the CA Top Secret component. The examples can be found in member TSSCSD in data set CAI.CAKOJCL0.

DEFINE PROFILE(TOPSPROF) GROUP(TOPSGRP)
         DESCRIPTION(CA Top Secret CICS Interface)
         SCRNSIZE(DEFAULT) UCTRAN(YES)
         PRINTERCOMP(NO) JOURNAL(NO) MSGJRNL(NO)
         MSGINTEG(NO) ONEWTE(NO)
         CHAINCONTROL(NO) DVSUPRT(ALL)
         INBFMH(EODS) RAQ(NO) LOGREC(NO)
         NEPCLASS(0) RTIMOUT(NO)
DEFINE TRANSACTION(PTSM) GROUP(TOPSGRP)                     
         DESCRIPTION(CA-SECURITY/CICS Administration Menu)  
         PROGRAM(TSSCPTSM) TWASIZE(8)                       
         PROFILE(TOPSPROF) STATUS(ENABLED) DYNAMIC(NO)      
         PRIORITY(1) DTIMOUT(NO)                            
         RESTART(NO) SPURGE(NO)            
         TASKDATALOC(BELOW) TASKDATAKEY(USER)               
         TPURGE(NO) DUMP(YES) TRACE(YES)                    
         RESSEC(NO) CMDSEC(NO)                              
DEFINE TRANSACTION(PTSS) GROUP(TOPSGRP)
         DESCRIPTION(CA‑SECURITY/CICS Administration Menu)
         PROGRAM(TSSCPTSS) TWASIZE(8)
         PROFILE(TOPSPROF) STATUS(ENABLED) DYNAMIC(NO)
         PRIORITY(1) DTIMOUT(NO)
         RESTART(NO) SPURGE(NO)
         TASKDATALOC(BELOW) TASKDATAKEY(USER)
         TPURGE(NO) DUMP(YES) TRACE(YES)
         RESSEC(NO) CMDSEC(NO)
DEFINE TRANSACTION(TSS) GROUP(TOPSGRP)
         DESCRIPTION(CA Top Secret Administration Interface)
         PROGRAM(TSSCICS) TWASIZE(0)
         PROFILE(TOPSPROF) STATUS(ENABLED) DYNAMIC(NO)
         PRIORITY(1) DTIMOUT(NO)
         RESTART(NO) SPURGE(NO)
         TASKDATALOC(BELOW) TASKDATAKEY(USER)
         TPURGE(NO) DUMP(YES) TRACE(YES)
         RESSEC(NO) CMDSEC(NO)                          
DEFINE PROGRAM(TSSCAI) GROUP(TOPSGRP)
         DESCRIPTION(CA Top Secret Application Interface Stub)
         LANGUAGE(ASSEMBLER) RELOAD(NO) EXECKEY(CICS)
         RESIDENT(NO) USAGE(NORMAL) USELPACOPY(NO)
         STATUS(ENABLED) CEDF(NO) DATALOCATION(BELOW)
DEFINE PROGRAM(TSSCAIN) GROUP(TOPSGRP)
         DESCRIPTION(CA Top Secret Application Interface)
         LANGUAGE(ASSEMBLER) RELOAD(NO) EXECKEY(CICS)
         RESIDENT(NO) USAGE(NORMAL) USELPACOPY(NO)
         STATUS(ENABLED) CEDF(NO) DATALOCATION(BELOW)
DEFINE PROGRAM(TSSCICS) GROUP(TOPSGRP)
         DESCRIPTION(CA Top Secret Administration Interface Stub)
         LANGUAGE(ASSEMBLER) RELOAD(NO) EXECKEY(USER)
         RESIDENT(NO) USAGE(NORMAL) USELPACOPY(NO)
         STATUS(ENABLED) CEDF(NO) DATALOCATION(BELOW)
DEFINE PROGRAM(TSSCICSN) GROUP(TOPSGRP)
         DESCRIPTION(CA Top Secret Administration Interface)
         LANGUAGE(ASSEMBLER) RELOAD(NO) EXECKEY(CICS)
         RESIDENT(NO) USAGE(NORMAL) USELPACOPY(NO)
         STATUS(ENABLED) CEDF(NO) DATALOCATION(BELOW)
DEFINE PROGRAM(TSSCPTSM) GROUP(TOPSGRP)
         DESCRIPTION(CA Top Secret Administration Menu Interface)
         LANGUAGE(ASSEMBLER) RELOAD(NO) EXECKEY(USER)
         RESIDENT(NO) USAGE(NORMAL) USELPACOPY(NO)
         STATUS(ENABLED) CEDF(NO) DATALOCATION(BELOW)
DEFINE PROGRAM(TSSCPTSS) GROUP(TOPSGRP)
         DESCRIPTION(CA Top Secret Administration Menu Interface)
         LANGUAGE(ASSEMBLER) RELOAD(NO) EXECKEY(USER)
         RESIDENT(NO) USAGE(NORMAL) USELPACOPY(NO)
         STATUS(ENABLED) CEDF(NO) DATALOCATION(BELOW)
DEFINE PROGRAM(TSSCPLT) GROUP(TOPSGRP)
          DESCRIPTION(CA-TOP SECRET CICS INITIALIZATION VERIFICATION)
          LANGUAGE(ASSEMBLER) RELOAD(NO) EXECKEY(CICS)
          RESIDENT(NO) USAGE(NORMAL) USELPACOPY(NO)
          STATUS(ENABLED) CEDF(NO) DATALOCATION(ANY)

To run the TSS command above the line, use the following definition.

DEFINE TRANSACTION(TSS) GROUP(TOPSGRP)
         DESCRIPTION(CA Top Secret Administration Interface)
         PROGRAM(TSSCICSN) TWASIZE(0)
         PROFILE(TOPSPROF) STATUS(ENABLED) DYNAMIC(NO)
         PRIORITY(1) DTIMOUT(NO)
         RESTART(NO) SPURGE(NO)
         TASKDATALOC(ANY) TASKDATAKEY(USER)
         TPURGE(NO) DUMP(YES) TRACE(YES)
         RESSEC(NO) CMDSEC(NO)