This appendix describes special considerations relating to application programs running under teleprocessing (TP) monitors supported by CA IDMS (that is, CICS, INTERCOMM, SHADOW, TASK/MASTER, UTM, and WESTI).
This section contains the following topics:
TP monitor Coding Requirements
While there are no special coding requirements for TP monitor transactions, the following guidelines should be adhered to:
Note: The same rules apply to the COPY IDMS statements used to insert logical-record source code components into the program: IDMS-RECORDS MANUAL should be coded in the ENVIRONMENT DIVISION; SUBSCHEMA-LR-NAMES should be copied into the WORKING-STORAGE SECTION; and SUBSCHEMA-CTRL, SUBSCHEMA-LR-CTRL, and SUBSCHEMA-LR-RECORDS should be copied into the LINKAGE-SECTION (except under CICS-EXEC or CICS-EXEC-AUTO, when all required components should be copied into the WORKING-STORAGE SECTION).
TP MONITOR |
IF MODE IS |
IDMS-CONTROL SECTION |
WORKING-STORAGE SECTION |
LINKAGE SECTION |
PROCEDURE DIVISION |
---|---|---|---|---|---|
CICS |
CICS |
IDMS-RECORDS MANUAL. |
COPY IDMS SUBSCHEMA-NAMES |
*01 TWA 03 FILLER PIC S9(8) COMP SYNC. 03 COPY IDMS SUBSCHEMA-CTRL. 03 COPY IDMS SUBSCHEMA-RECORDS. OR **COPY IDMS SUBSCHEMA-CTRL COPY IDMS SUBSCHEMA-RECORDS.
(A CICS GETMAIN must be issued for the SUBSCHEMA-CTRL and for each record being copied.)
|
COPY IDMS IDMS-WAIT. |
|
CICS-EXEC |
IDMS-RECORDS MANUAL. |
COPY IDMS SUBSCHEMA-CTRL. |
|
|
|
CICS-EXEC-AUTO |
|
COPY IDMS SUBSCHEMA-NAMES.
|
|
|
|
|
|
COPY IDMS SUBSCHEMA-RECORDS. |
|
|
INTERCOMM |
INTERCOMM INTERCOMM-AUTO |
IDMS-RECORDS MANUAL. |
COPY IDMS SUBSCHEMA-NAMES. |
COPY IDMS SUBSCHEMA-CTRL. COPY IDMS SUBSCHEMA-RECORDS. |
|
SHADOW |
SHADOW SHAD-AUTOSTATUS |
IDMS-RECORDS MANUAL. |
COPY IDMS SUBSCHEMA-NAMES. |
COPY IDMS SUBSCHEMA-CTRL. COPY IDMS SUBSCHEMA-RECORDS |
|
UTM |
UTM UTM-AUTOSTATUS |
IDMS-RECORDS MANUAL. |
COPY IDMS SUBSCHEMA-NAMES. |
COPY KCKBC. 05 X PIC S9 (8) COMP SYNC. 05 COPY IDMS SUBSCHEMA-CTRL. 05 COPY IDMS SUBSCHEMA-RECORDS. COPY KCPAC. |
MOVE LOW-VALUES to SUBSCHEMA_CTRL before each BIND RUN-UNIT. |
WESTI |
WESTI-REENT WESTI-REENT-AUTO |
IDMS-RECORDS MANUAL. |
COPY IDMS SUBSCHEMA-NAMES. |
COPY IDMS SUBSCHEMA-CTRL. COPY IDMS SUBSCHEMA-RECORDS. |
|
*If SUBSCHEMA-CTRL, SUBSCHEMA_RECORDS, and additional data does not exceed 4,096 bytes. **If SUBSCHEMA-CTRL, SUBSCHEMA_RECORDS, and additional data exceeds 4,096 bytes. |
Copyright © 2014 CA.
All rights reserved.
|
|