29 lines
1.0 KiB
Plaintext
Executable File
29 lines
1.0 KiB
Plaintext
Executable File
*------------------------------------------------------------------------*
|
|
*
|
|
* MASTER SOFTWARE DESIGN, INC.
|
|
*
|
|
* STANDARD 'GEN-UTILITY' MENU COMMON STATEMENTS
|
|
*
|
|
* 'GEN.COMMON' IS A STANDARD COPYBOOK (OR $INCLUDE) RECORD WHICH
|
|
* IS USED ON THE MAJORITY OF 'CMS' PROGRAMS
|
|
*
|
|
COMMON CUR.MENU,LAST.MENU
|
|
COMMON GEN.REC(75),GEN.SCREEN,MODKEY,GENKEY,GEN.DETAIL,GEN.KEYS,GEN.DOC
|
|
COMMON RTCOD,SYSTEM.SETUP
|
|
*
|
|
* CMS - COMMON PARAMATERS
|
|
*
|
|
COMMON PM,BA,LTR,PG,EVENT.FILE,FUND.FILE,IT,PM.TRANS,PM.PLEDGES,INVENTORY
|
|
COMMON PM.DATA,BA.DATA,PT.DATA,PM.DATA.HOLD,DF.DATA,STSCODES,INDEXES,PASS
|
|
COMMON PART.KEY,FUNCT,RETURN.CODE,PROCESS,UPDATE
|
|
COMMON TRNS,PL.DATA,BA.KEY,NEW.TRANS,PLG.ARRAY,OEPOINT,INV.ARRAY
|
|
COMMON ORDERS,JNL,JNLSW,JNLCOMM,TRAN.TYPES ;* ADDED 'JNL' 8.1.89
|
|
COMMON PM.LETTERS,PM.JOURNAL,NOTES.FILE
|
|
*
|
|
CS=@(-1) ; CR=@(-3) ; CL=@(-4) ; RV=@(-13) ; ERV=@(-14)
|
|
VM=CHAR(253) ; SVM=CHAR(252) ; AM=CHAR(254) ; BEEP=CHAR(7)
|
|
PF1='<' ; PF2='P' ; PF3='/'
|
|
PROMPT " "
|
|
*
|
|
*------------------------------------------------------------------------*
|