用于编译和链接包含更新的CICS参数的SIT的CICS JCL过程

Question

CICS是否提供了组装SIT的程序？我目前正在检查https://www.ibm.com/docs/en/cics-ts/5.3?topic=library-cics-supplied-procedures，但我找不到任何使用EXEC PGM=DFHSIP的东西。我自己还没有达到编写JCL的程度，所以我真的在努力寻找如何组装更新后的DFHSIT宏的示例。

Answer 1

DFHSIP是主CICS程序，不用于组装SIT表。最好看看CICS提供的proc DFHEITAL。这是一个很好的例子，如何翻译，编译和linkedit汇编程序。

但是，SIT表不应该与CICS存根程序进行转换或链接。下面是我以前用来编译CICS表的一个示例：

//ASM    EXEC PGM=ASMA90,REGION=0M,
//            PARM='DECK,NOOBJECT,LIST’
//SYSLIB   DD DSN=<cicshlq>.SDFHMAC,DISP=SHR
//         DD DSN=<cicshlq>.SDFHSAMP,DISP=SHR
//         DD DSN=SYS1.MACLIB,DISP=SHR
//SYSUT1   DD UNIT=SYSDA,SPACE=(1700,(400,400))
//SYSUT2   DD UNIT=SYSDA,SPACE=(1700,(400,400))
//SYSUT3   DD UNIT=SYSDA,SPACE=(1700,(400,400))
//SYSPUNCH DD DSN=&&LOADSET,
//            UNIT=SYSDA,DISP=(,PASS),
//            SPACE=(400,(100,100))
//SYSPRINT DD SYSOUT=A
//SYSIN    DD DATA,DLM='<>'
<source>
<>
//LKED   EXEC PGM=IEWL,REGION=0M,
//            PARM='LIST,XREF',COND=(7,LT,ASM)
//SYSLIB   DD DSN=<cicshlq>.SDFHLOAD,DISP=SHR
//SYSLMOD DD DSN=<output>,DISP=SHR
//SYSUT1   DD UNIT=SYSDA,DCB=BLKSIZE=1024,
//            SPACE=(1024,(200,20))
//SYSPRINT DD SYSOUT=A
//SYSLIN   DD DSN=&&LOADSET,DISP=(OLD,DELETE)
//         DD DDNAME=SYSIN
//SYSIN DD *
  NAME  <name>(R)
/*

Answer 2

通常没有必要组装一张新的坐桌。您可以在启动CICS区域时将SIT参数作为覆盖传递。我发现大多数CICS系统都是通过提供的SIT加载模块(DFHSIT或DFHSIT6$)之一启动的，并通过SYSIN提供定制的SIT覆盖。请参阅https://www.ibm.com/docs/en/cics-ts/5.3?topic=regions-specifying-system-initialization-parameters-before-startup

请注意，人们不组装新的SIT表的主要原因是SIT负载模块必须驻留在APF授权的数据集中。在大多数企业中，很少允许对APF授权的数据集进行写访问，并且在绝对需要更新时会严格检查。