EMS FastStart Manual

DDL, Copy Libraries and Templates Example
EMS FastStart Manual–133701
D-3
ATM Example, COBOL85 COPYLIB: ATM1COB
CONSTANT Atm-evt-security-breach VALUE IS 201.
CONSTANT Atm-evt-hw-failure VALUE IS 202.
?SETSECTION Atm-action-id
*----------------------------------------------------------------------
*
* ACTION EVENT IDENTIFIER DESCRIPTION:
*
* There is an action identifier associated with each action event
* message. This Action ID is used by VIEWPOINT to match an
* action-attention event message with the corresponding
* action-completion event message.
*
*----------------------------------------------------------------------
CONSTANT Atm-action-id-1 VALUE IS 1.
CONSTANT Atm-action-id-2 VALUE IS 2.
CONSTANT Atm-action-id-3 VALUE IS 3.
CONSTANT Atm-action-id-4 VALUE IS 4.
CONSTANT Atm-action-id-5 VALUE IS 5.
?SETSECTION Atm-constant-values
*----------------------------------------------------------------------
*
* CONSTANT VALUE IDENTIFIER DESCRIPTION:
*
* These are constants that can be used globally in the ATM subsystem.
*
*----------------------------------------------------------------------
CONSTANT Atm-val-false VALUE IS 0.
CONSTANT Atm-val-true VALUE IS 1.
ATM Example, COBOL85 COPYLIB: ATM1COB
*---------------------------------------------------------------------
*
* EMS FastStart - T9263C20 - (17MAR91)
*
* DDL Source Library File, Language Dependant
*
* Produced by the DDL compilation of ATM1DDLS
*
* Generation Time: January 18, 1991 13:58:07
*
*----------------------------------------------------------------------
?SECTION ZSPI-DDL-CHAR254,TANDEM
*---------------------------------------------------------------------
* Source EXTRADDL source schema file for user defined SPI data types.
*---------------------------------------------------------------------
*
* EMS FastStart - T9263C20 - (17MAR91)
*
* File Type: DDL Source Schema
*
* Source File Name: Extraddl
*
* Generation Time: July 7, 1988
*
* Language Compiler Required: Data Definition Language (DDL)
*
* Compiler Version Required: C20
*
* Source Library File Produced: None, see below.
*
*