Programmable Interfaces › Application Interface › Writing Requirements

Writing Requirements

Follow these guidelines when writing the CICS Application Interface:

• Use the CA Top Secret Application Interface via an EXEC CICS LINK (or a DFHPC TYPE=LINK) statement.
• The name of the CA Top Secret Application Interface program that you are linking to is TSSCAI.
• TSSCAI and TSSCAIN must have CSD entries like the one shown below (the example shows that the program is written in the Assembler language).
• Note the effect of OPTIONS(22) and OPTIONS(64) control options on the operation of TSSCAI.

  You must add a CSD entry for modules TSSCAI and TSSCAIN with EXECKEY(CICS) when issuing TSSCAI calls.

  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) DATALOTION(BELOW)
  DEFINE PROGRAM(TSSCAIN) 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) DATALOTION(BELOW)
  

• You must pass the Application Interface a parameter list. The parameter list is passed by a temporary storage queue or by Command‑Level COMMAREA.
• The length of the COMMAREA or the temporary storage queues that contain the Application Interface parameter list must be:
  • For Release V4L1-320 bytes
  • For Release V4L2-370 bytes
  • For Release V4L3-370 or 1138 bytes (The 1138 value refers to the FACLIST, RESLIST, and FLDXTR calls; all other calls use 370 bytes.)
  • For Release V4L4-370 or 1138 bytes (The 1138 value refers to the FACLIST, RESLIST, and FLDXTR calls; all other calls use 370 bytes.)
  • For Release V5L1-370 bytes, 1138 bytes, or larger. (The 1138 value refers to the FACLIST, RESLIST, and FLDXTR calls; all other calls use 370 bytes.).

    V5L1 requires that you fill in TSSLRTN with the length of TSSRTN, that is MVC TSSLRTN,=AL4(L'TSSRTN)

• If your release of CICS supports concurrency, you can specify CONCURRENCY(THREADSAFE) in the RDO entry for TSSCAI and TSSCAIN.