KDCDEF input file DynamicTravel for UTM application TRAVEL

*************************************
*    BANK program                   *
*************************************
PROGRAM BANK,     COMP=C, SHARED-OBJECT=BANK
*************************************
*    TRAVEL programs                *
*************************************
PROGRAM SIGN1,    COMP=C
PROGRAM SIGN2,    COMP=C
PROGRAM BDTAC,    COMP=C
PROGRAM TRRECEIV, COMP=C, SHARED-OBJECT=TRAVEL
PROGRAM STRTEX,   COMP=C, SHARED-OBJECT=TRAVEL
PROGRAM MMENUE,   COMP=C, SHARED-OBJECT=TRAVEL
PROGRAM TRINFO1,  COMP=C, SHARED-OBJECT=TRAVEL
PROGRAM TRINFO2,  COMP=C, SHARED-OBJECT=TRAVEL
PROGRAM TRINFO3,  COMP=C, SHARED-OBJECT=TRAVEL
PROGRAM TRINFO4,  COMP=C, SHARED-OBJECT=TRAVEL
PROGRAM TRINFO5,  COMP=C, SHARED-OBJECT=TRAVEL
PROGRAM TRINFO6,  COMP=C, SHARED-OBJECT=TRAVEL
PROGRAM CANCEL,   COMP=C, SHARED-OBJECT=TRAVEL
PROGRAM CANCALL,  COMP=C, SHARED-OBJECT=TRAVEL
PROGRAM TRINQU,   COMP=C, SHARED-OBJECT=TRAVEL
**** Administration
PROGRAM KDCADM,   COMP=C
PROGRAM KDCDADM,  COMP=C 
PROGRAM KDCPADM,  COMP=C 
*************************************
*      TACS BANK                    *
*************************************
TAC BANK, PROGRAM=BANK, LOCK=5
*************************************
*      TACS TRAVEL AGENCY           *
*************************************
TAC KDCBADTC, PROGRAM=BDTAC, TYPE=D
TAC KDCSGNTC, PROGRAM=SIGN1, TYPE=D
TAC SIGNON2 , PROGRAM=SIGN2, TYPE=D
TAC MMENUE  , PROGRAM=MMENUE  , LOCK=5
TAC INFO1   , PROGRAM=TRINFO1 , LOCK=5
TAC INFO2   , PROGRAM=TRINFO2 , LOCK=5
TAC INFO3   , PROGRAM=TRINFO3 , LOCK=5
TAC INFO4   , PROGRAM=TRINFO4 , LOCK=5
TAC INFO5   , PROGRAM=TRINFO5 , LOCK=5
TAC INFO6   , PROGRAM=TRINFO6 , LOCK=5
TAC TRRECEIV, PROGRAM=TRRECEIV, LOCK=5
TAC CANCEL  , PROGRAM=CANCEL  , LOCK=5, CALL=NEXT,  TYPE=D
TAC CANCALL , PROGRAM=CANCALL , LOCK=5, CALL=FIRST, TYPE=D
TAC INQUIRY , PROGRAM=TRINQU  , LOCK=5
*
**** ADMINISTRATION DIALOG ***
TAC KDCTAC  , LOCK=1, ADMIN=Y, PROGRAM=KDCADM
TAC KDCLTERM, LOCK=1, ADMIN=Y, PROGRAM=KDCADM
TAC KDCPTERM, LOCK=1, ADMIN=Y, PROGRAM=KDCADM
TAC KDCSWTCH, LOCK=1, ADMIN=Y, PROGRAM=KDCADM
TAC KDCSEND , LOCK=1, ADMIN=Y, PROGRAM=KDCADM
TAC KDCAPPL , LOCK=1, ADMIN=Y, PROGRAM=KDCADM
TAC KDCUSER , LOCK=1, ADMIN=Y, PROGRAM=KDCADM
TAC KDCDIAG , LOCK=1, ADMIN=Y, PROGRAM=KDCADM
TAC KDCLOG  , LOCK=1, ADMIN=Y, PROGRAM=KDCADM
TAC KDCINF  , LOCK=1, ADMIN=Y, PROGRAM=KDCADM
TAC KDCHELP , LOCK=1, ADMIN=Y, PROGRAM=KDCADM
TAC KDCLPAP , LOCK=1, ADMIN=Y, PROGRAM=KDCADM
TAC KDCLTAC , LOCK=1, ADMIN=Y, PROGRAM=KDCADM
TAC KDCSHUT , LOCK=1, ADMIN=Y, PROGRAM=KDCADM
TAC KDCTCL  , LOCK=1, ADMIN=Y, PROGRAM=KDCADM
TAC TACDADM  , PROGRAM=KDCDADM, LOCK=1, ADMIN=Y
TAC TACPADM  , PROGRAM=KDCPADM, LOCK=1, ADMIN=Y
*** ADMINISTRATION ASYNCHRON ***
TAC KDCTACA , LOCK=1, ADMIN=Y, TYPE=A, PROGRAM=KDCADM
TAC KDCLTRMA, LOCK=1, ADMIN=Y, TYPE=A, PROGRAM=KDCADM
TAC KDCPTRMA, LOCK=1, ADMIN=Y, TYPE=A, PROGRAM=KDCADM
TAC KDCSWCHA, LOCK=1, ADMIN=Y, TYPE=A, PROGRAM=KDCADM
TAC KDCUSERA, LOCK=1, ADMIN=Y, TYPE=A, PROGRAM=KDCADM
TAC KDCSENDA, LOCK=1, ADMIN=Y, TYPE=A, PROGRAM=KDCADM
TAC KDCAPPLA, LOCK=1, ADMIN=Y, TYPE=A, PROGRAM=KDCADM
TAC KDCDIAGA, LOCK=1, ADMIN=Y, TYPE=A, PROGRAM=KDCADM
TAC KDCLOGA , LOCK=1, ADMIN=Y, TYPE=A, PROGRAM=KDCADM
TAC KDCINFA , LOCK=1, ADMIN=Y, TYPE=A, PROGRAM=KDCADM
TAC KDCHELPA, LOCK=1, ADMIN=Y, TYPE=A, PROGRAM=KDCADM
TAC KDCLPAPA, LOCK=1, ADMIN=Y, TYPE=A, PROGRAM=KDCADM
TAC KDCLTACA, LOCK=1, ADMIN=Y, TYPE=A, PROGRAM=KDCADM
TAC KDCSHUTA, LOCK=1, ADMIN=Y, TYPE=A, PROGRAM=KDCADM
TAC KDCTCLA , LOCK=1, ADMIN=Y, TYPE=A, PROGRAM=KDCADM
* 
***********************************************
*** USER statements                         ***
***********************************************
USER SUPERUSR, PERMIT=ADMIN,    PASS='$23ADM--', PROTECT-PW=(8, MAX)        -
             , KSET=MASTER
USER UTMADMIN, PERMIT=ADMIN,    PASS='$23ADM--', PROTECT-PW=(8, MAX)        -
             , KSET=UTMADMIN
USER CHARGE1 , PASS='%aJ1df-+', PROTECT-PW=( ,MED)  -
             , KSET=OFFCHRG
USER CHARGE2 , PASS='%aJ1df-+', PROTECT-PW=( , MED) -
             , KSET=OFFCHRG
*            .
***********************************************
*** PTERM/LTERM statements                  ***
***********************************************
PTERM PRINTX,  LTERM=PRINTER, PTYPE=PRINTER, CONNECT=YES
LTERM PRINTER, USAGE=O