Previous Topic: CA IDMS KeywordsNext Topic: EMPLOYEE Database Definition


Notes to Teleprocessing Monitor Users

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 Guidelines

TP monitor Coding Requirements

TP Monitor Coding Guidelines

While there are no special coding requirements for TP monitor transactions, the following guidelines should be adhered to:

TP monitor Coding Requirements

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.