! *** PREDECLARED TYPES %IF %DECLARED ( %BASIC$QUADWORD_DECLARED ) = 0 %THEN RECORD BASIC$QUADWORD LONG FILL ( 2 ) END RECORD %LET %BASIC$QUADWORD_DECLARED = 1 %END %IF %IF %DECLARED ( %BASIC$OCTAWORD_DECLARED ) = 0 %THEN RECORD BASIC$OCTAWORD LONG FILL ( 4 ) END RECORD %LET %BASIC$OCTAWORD_DECLARED = 1 %END %IF %IF %DECLARED ( %BASIC$HFLOAT_AXP_DECLARED ) = 0 %THEN RECORD BASIC$HFLOAT_AXP LONG FILL ( 4 ) END RECORD %LET %BASIC$HFLOAT_AXP_DECLARED = 1 %END %IF %IF %DECLARED ( %BASIC$F_FLOATING_COMPLEX_DECL ) = 0 %THEN RECORD BASIC$F_FLOATING_COMPLEX SINGLE REAL_PART SINGLE IMAGINARY_PART END RECORD %LET %BASIC$F_FLOATING_COMPLEX_DECL = 1 %END %IF %IF %DECLARED ( %BASIC$D_FLOATING_COMPLEX_DECL ) = 0 %THEN RECORD BASIC$D_FLOATING_COMPLEX DOUBLE REAL_PART DOUBLE IMAGINARY_PART END RECORD %LET %BASIC$D_FLOATING_COMPLEX_DECL = 1 %END %IF %IF %DECLARED ( %BASIC$G_FLOATING_COMPLEX_DECL ) = 0 %THEN RECORD BASIC$G_FLOATING_COMPLEX GFLOAT REAL_PART GFLOAT IMAGINARY_PART END RECORD %LET %BASIC$G_FLOATING_COMPLEX_DECL = 1 %END %IF %IF %DECLARED ( %BASIC$H_FLOAT_AXP_CMPLX_DCL ) = 0 %THEN RECORD BASIC$H_FLOATING_COMPLEX_AXP BASIC$HFLOAT_AXP REAL_PART BASIC$HFLOAT_AXP IMAGINARY_PART END RECORD %LET %BASIC$H_FLOAT_AXP_CMPLX_DCL = 1 %END %IF ! ! This SDL File Generated by VAX-11 Message V04-00 on 9-MAR-2021 22:27:58.38 ! ! FILE: COBMSG.MSG EDIT: HR 04-NOV-2000 ! ! ! ! COPYRIGHT 2000 COMPAQ COMPUTER CORPORATION ! ! COMPAQ REGISTERED IN U.S. PATENT AND TRADEMARK OFFICE. ! ! CONFIDENTIAL COMPUTER SOFTWARE. VALID LICENSE FROM COMPAQ REQUIRED ! FOR POSSESSION, USE OR COPYING. CONSISTENT WITH FAR 12.211 AND 12.212, ! COMMERCIAL COMPUTER SOFTWARE, COMPUTER SOFTWARE DOCUMENTATION, AND ! TECHNICAL DATA FOR COMMERCIAL ITEMS ARE LICENSED TO THE U.S. GOVERNMENT ! UNDER VENDOR'S STANDARD COMMERCIAL LICENSE. ! ! ! ! ! EDIT HISTORY: ! X-12 HR HOWARD RUTIEZER 04-NOV-2000 ! ADD RESDETCON, OVFDETCON, UNDDETCON. ! FROM EDIT HISTORY OF COB_MSG.SRC, ABOUT NOV-1999 - SZYMANSKI. ! BRANDING CHANGES. ! ! X-11 LNG LOUIS GROSS 21-JAN-1998 ! ADDED MESSAGES FOR DIGITAL COBOL ! ! X-10 LNG LOUIS GROSS 29-JUN-1995 ! ! ADDED MESSAGES FOR DEC COBOL. ! X-9 CKJ CATHY KIMMEL JOLY 14-SEP-1994 ! ! ADDED MESSAGE FOR DEC COBOL. ! ! X-8 CKJ CATHY KIMMEL JOLY 11-JUL-1994 ! ! ADDED MESSAGES FOR DEC COBOL. ! ! X-7 CKJ CATHY KIMMEL JOLY 03-MAR-1994 ! ! ADDED MESSAGE FOR DEC COBOL. ! ! X-6 CKJ CATHY KIMMEL JOLY 28-JAN-1994 ! ! CHANGED MESSAGE TEXT FOR DEC COBOL. ! ! X-5 CKJ CATHY KIMMEL JOLY 15-DEC-1993 ! ! ADD MORE ISAM MESSAGES FOR DEC COBOL. ! ! X-4 CKJ CATHY KIMMEL JOLY 10-NOV-1993 ! ! ADD NOISAM MESSAGE FOR DEC COBOL. ! ! ! X-3 KC KEN COWAN 1-APR-1993 ! ! MERGE DEC$COBMSG.MSG INTO COBMSG.MSG. TRANSLATED VAX ! COBOL PROGRAMS AND NATIVE DEC COBOL PROGRAMS NOW ! SHARE THE SAME MESSAGE SOURCE FILE, THOUGH THEY USE ! SOME DIFFERENT MESSAGE CODES. ! ! ! X-2 RAB RICHARD A. BISHOP 19-MAY-1992 ! MERGE ANOTHER CHANGE (RANDOMBOUNDS) FROM BLADE. ! ! OLD AUDIT TRAIL.... ! ! X-3 RAB RICHARD A. BISHOP 29-JAN-1992 ! MERGE INTO ALPHA THE POST-V5.4 CHANGES IN VMS. ! SINCE THERE HAVE BEEN NO CHANGES IN THE ALPHA VERSION ! OF THIS FILE SINCE V5.4 (OTHER THAN AUDIT TRAIL), WHAT ! FOLLOWS IS THE AUDIT TRAIL FROM THE VMS MASTERPACK. ! ! =============================================================== ! ! 2-001 - CONVERT TO MESSAGE UTILITY SOURCE FORMAT. ADAPTED FROM COBMSG.MDL ! VERSION 1-019. SBL 22-APR-1981 ! 2-002 - USE COB$ FACILITY FOR COB$_NORMAL. SBL 27-APR-1981 ! 2-003 - COPIED CHANGES MADE TO COBMSG.MDL TO THIS MSG FILE. THE MESSAGES ! ADDED INCLUDE COB$_LSTHNDUSE, COB$_LSTHNDLDB, AND COB$_EXPDBOVER. ! LB 7-MAY-81. ! 2-004 - ADDED COB$_KEYNOTMAT. PDG 24-JUL-81. ! 2-005 - ADDED .TITLE PDG 26-JUL-81. ! 2-006 - ADDED COB$_UNLUNOFIL AND COB$_RECNOTLOC. PDG 7-AUG-81. ! 2-007 - UPDATED COPYRIGHT DATE AND FIXED SPELLING ERROR. LB 9-AUG-81. ! 2-008 - ADDED COB$_UNLNO_CUR. LB 29-OCT-81. ! 2-009 - CHANGED COB$_GOTNO_ALT TO BE COB$_GOTO_ALT. THIS HAD BEEN IN ! ERROR IN THIS FILE AS WELL AS IN COBERROR. LB 1-APR-82. ! 2-010 - CHANGE TITLE TO COB$MSGDEF. SBL 28-AUG-1982 ! 2-011 - ADDED COB$_ERRDURPOS FOR COB$POS_ERASE AND COB$_REAMP_D_R ! FOR COB$IOEXCEPTION. LGB 6-SEP-83 ! ADDED COB$_INVDEFVAL FOR COB$ACCEPT LGB 3-OCT-83 ! 2-012 - ADDED NUMEROUS CODES FOR COBOL V4.0 SUPPORT FOR COB$IOEXCEPTION. ! DJM 17-NOV-86 ! 2-013 - CHANGED MESSAGE AND SEVERITY FOR COB$_INTDIVZER AND COB$_UNDEF_EXP ! AS THE PROGRAM IS ALLOWED TO CONTINUE WITH THE NEW STANDARD. ! ALSO - ADD MESSAGE COB$_DIVBYZER. DJM 27-APR-1987 ! 2-014 - REMOVE REFERENCE TO ISAM. DJM 30-DEC-1987 ! 2-015 - ADD MULFILERR FOR COB$MFT. DJM 28-MAR-1988. ! 2-016 - ADD COB$NOTIMP. MDL 23-OCT-1989 ! 2-017 - ADD CODES FOR COBOL V5 INTRINSIC FUNCTIONS. KC 14-NOV-1991. ! 2-018 - ADD RANDOM BOUNDS. KC 24-JAN-1992. ! ! + ! SYMBOLS ARE DEFINED FOLLOWING THE STANDARD FOR GLOBAL NAMES: ! ! COB$_ABCMNOXYZ ! ! IN ADDITION, THE LIBRARY STANDARDS SPECIFY THAT THE LETTERS "abc", "mno", ! AND "xyz" ARE THE FIRST THREE LETTERS OF THE FIRST THREE WORDS OF THE ERROR ! MESSAGE, NOT COUNTING ARTICLES AND PREPOSITIONS. ! ! ! MACRO-32 PROGRAMMING: ! ! THE MACRO CALL: ! ! $COBDEF ! ! WILL CAUSE ALL SYMBOLS TO BE MADE AVAILABLE TO THE MODULE. ! THE RUN-TIME LIBRARY DECLARES THESE SYMBOLS AS EXTERNAL; ! THE MACROS ARE PROVIDED ONLY FOR THE CONVENIENCE OF THE USER. ! - ! ! ! ; NOTE: ERROR CODES MUST NOT OVERLAP SUCCESS CODES??? DECLARE LONG CONSTANT COB$_FACILITY = 25 DECLARE LONG CONSTANT COB$_NORMAL = 1671169 ! COBOL V4 SUPPORT, NEXT 2 MESSAGES DECLARE LONG CONSTANT COB$_READUPKEY = 1671177 DECLARE LONG CONSTANT COB$_RECNOTSIZ = 1671185 DECLARE LONG CONSTANT COB$_GOTO_ALT = 1671236 DECLARE LONG CONSTANT COB$_RECACTPER = 1671244 DECLARE LONG CONSTANT COB$_NESERRPER = 1671252 DECLARE LONG CONSTANT COB$_TIMOVELON = 1671260 DECLARE LONG CONSTANT COB$_OCCDEPOVE = 1671268 DECLARE LONG CONSTANT COB$_SUBOVELON = 1671276 DECLARE LONG CONSTANT COB$_ERRDURSOR = 1671284 DECLARE LONG CONSTANT COB$_UNEINSCON = 1671292 DECLARE LONG CONSTANT COB$_CALFAI = 1671300 DECLARE LONG CONSTANT COB$_INVLINVAL = 1671308 ! ***** NO_USEPRO MUST BE THE FIRST ERROR ! ***** MESSAGE ASSOCIATED WITH ! ***** COB$IOEXCEPTION. IT IS USED AS ! ***** THE BASE OF AN ENCODING ALGORITHM. ! DECLARE LONG CONSTANT COB$_NO_USEPRO = 1671316 DECLARE LONG CONSTANT COB$_ERRON_FIL = 1671324 DECLARE LONG CONSTANT COB$_OPTMISOPE = 1671332 DECLARE LONG CONSTANT COB$_FILALRLOC = 1671340 DECLARE LONG CONSTANT COB$_FILALROPE = 1671348 DECLARE LONG CONSTANT COB$_FILCLOLOC = 1671356 DECLARE LONG CONSTANT COB$_NO_SPACE = 1671364 DECLARE LONG CONSTANT COB$_FILNOTFOU = 1671372 DECLARE LONG CONSTANT COB$_OPTMISCLO = 1671380 DECLARE LONG CONSTANT COB$_FILALRCLO = 1671388 DECLARE LONG CONSTANT COB$_NO_NEXLOG = 1671396 DECLARE LONG CONSTANT COB$_OPTMISREA = 1671404 DECLARE LONG CONSTANT COB$_NO_NEXVAL = 1671412 DECLARE LONG CONSTANT COB$_RECLOCREA = 1671420 DECLARE LONG CONSTANT COB$_RECLOC_OK = 1671428 DECLARE LONG CONSTANT COB$_REAUNOFIL = 1671436 DECLARE LONG CONSTANT COB$_REAINCOPE = 1671444 DECLARE LONG CONSTANT COB$_WRIBEYBOU = 1671452 DECLARE LONG CONSTANT COB$_WRIUNOFIL = 1671460 DECLARE LONG CONSTANT COB$_WRIINCOPE = 1671468 DECLARE LONG CONSTANT COB$_REWNO_R_S = 1671476 DECLARE LONG CONSTANT COB$_REWUNOFIL = 1671484 DECLARE LONG CONSTANT COB$_REWINCOPE = 1671492 DECLARE LONG CONSTANT COB$_RECNOTEXI = 1671500 DECLARE LONG CONSTANT COB$_OPTMISSTA = 1671508 DECLARE LONG CONSTANT COB$_RECLOCSTA = 1671516 DECLARE LONG CONSTANT COB$_STAUNOFIL = 1671524 DECLARE LONG CONSTANT COB$_STAINCOPE = 1671532 DECLARE LONG CONSTANT COB$_RECLOCWRI = 1671540 DECLARE LONG CONSTANT COB$_RECLOCDEL = 1671548 DECLARE LONG CONSTANT COB$_DELNO_R_S = 1671556 DECLARE LONG CONSTANT COB$_DELUNOFIL = 1671564 DECLARE LONG CONSTANT COB$_DELINCOPE = 1671572 DECLARE LONG CONSTANT COB$_RECLOCREW = 1671580 DECLARE LONG CONSTANT COB$_WRIDUPKEY = 1671588 DECLARE LONG CONSTANT COB$_WRICREDUP = 1671596 DECLARE LONG CONSTANT COB$_WRINOTASC = 1671604 DECLARE LONG CONSTANT COB$_WRIDUPALT = 1671612 DECLARE LONG CONSTANT COB$_REWCREDUP = 1671620 DECLARE LONG CONSTANT COB$_PRIKEYCHA = 1671628 DECLARE LONG CONSTANT COB$_REWDISDUP = 1671636 DECLARE LONG CONSTANT COB$_WRIDISDUP = 1671644 DECLARE LONG CONSTANT COB$_REASMAMIN = 1671652 DECLARE LONG CONSTANT COB$_EOFON_ACC = 1671660 DECLARE LONG CONSTANT COB$_ERRDURACC = 1671668 DECLARE LONG CONSTANT COB$_DISMORMAX = 1671676 DECLARE LONG CONSTANT COB$_INTEXPOVE = 1671684 DECLARE LONG CONSTANT COB$_INTEXPUND = 1671692 DECLARE LONG CONSTANT COB$_INTRESOPE = 1671700 DECLARE LONG CONSTANT COB$_NO_MES_00 = 1671708 ! PLACE HOLDER. WAS INTDIVZER DECLARE LONG CONSTANT COB$_INVDECDIG = 1671716 DECLARE LONG CONSTANT COB$_NO_MES_01 = 1671724 ! PLACE HOLDER. WAS UNDEF_EXP DECLARE LONG CONSTANT COB$_WRISMAMIN = 1671732 DECLARE LONG CONSTANT COB$_REWSMAMIN = 1671740 DECLARE LONG CONSTANT COB$_NAMNOTLIN = 1671748 DECLARE LONG CONSTANT COB$_INVCHANAM = 1671756 DECLARE LONG CONSTANT COB$_ORGNOTMAT = 1671764 DECLARE LONG CONSTANT COB$_CANFAIL = 1671772 DECLARE LONG CONSTANT COB$_INVARG = 1671780 DECLARE LONG CONSTANT COB$_FAIGET_VM = 1671788 DECLARE LONG CONSTANT COB$_FAIFREEVM = 1671796 DECLARE LONG CONSTANT COB$_ERRDURDIS = 1671804 DECLARE LONG CONSTANT COB$_USE_EXIT = 1671812 DECLARE LONG CONSTANT COB$_RECACTUSE = 1671820 DECLARE LONG CONSTANT COB$_FATINTERR = 1671828 DECLARE LONG CONSTANT COB$_FAIGET_EF = 1671836 DECLARE LONG CONSTANT COB$_SETEXTFAI = 1671844 DECLARE LONG CONSTANT COB$_INVDECDAT = 1671852 DECLARE LONG CONSTANT COB$_LSTHNDUSE = 1671860 DECLARE LONG CONSTANT COB$_LSTHNDLDB = 1671868 DECLARE LONG CONSTANT COB$_EXPDBOVER = 1671876 DECLARE LONG CONSTANT COB$_KEYNOTMAT = 1671884 DECLARE LONG CONSTANT COB$_UNLUNOFIL = 1671892 DECLARE LONG CONSTANT COB$_RECNOTLOC = 1671900 DECLARE LONG CONSTANT COB$_UNLNO_CUR = 1671908 DECLARE LONG CONSTANT COB$_REAMP_D_R = 1671916 DECLARE LONG CONSTANT COB$_ERRDURPOS = 1671924 DECLARE LONG CONSTANT COB$_INVDEFVAL = 1671932 ! COBOL V4 SUPPORT, NEXT 10 MESSAGES DECLARE LONG CONSTANT COB$_REARECTOB = 1671940 DECLARE LONG CONSTANT COB$_WRIRECTOB = 1671948 DECLARE LONG CONSTANT COB$_DEVNOTAPL = 1671956 DECLARE LONG CONSTANT COB$_INVRECSIZ = 1671964 DECLARE LONG CONSTANT COB$_RECSIZEXC = 1671972 DECLARE LONG CONSTANT COB$_INVRECTYP = 1671980 DECLARE LONG CONSTANT COB$_INVBLKFAC = 1671988 DECLARE LONG CONSTANT COB$_CONCODSET = 1671996 DECLARE LONG CONSTANT COB$_COLSEQKEY = 1672004 DECLARE LONG CONSTANT COB$_CONPADCHR = 1672012 ! EDIT 2-013 DECLARE LONG CONSTANT COB$_MULFILERR = 1672020 ! EDIT 2-016 DECLARE LONG CONSTANT COB$_NOTIMP = 1672028 ! EDIT 2-017, COBOL V5.0 SUPPORT DECLARE LONG CONSTANT COB$_INTDATEBOUNDS = 1672036 DECLARE LONG CONSTANT COB$_INTDAYBOUNDS = 1672044 DECLARE LONG CONSTANT COB$_DAYINTBOUNDS = 1672052 DECLARE LONG CONSTANT COB$_DATEINTBOUNDS = 1672060 DECLARE LONG CONSTANT COB$_FACTBOUNDS = 1672068 DECLARE LONG CONSTANT COB$_NUMVALARGINV = 1672076 DECLARE LONG CONSTANT COB$_LOWERLENZERO = 1672084 DECLARE LONG CONSTANT COB$_UPPERLENZERO = 1672092 DECLARE LONG CONSTANT COB$_REVERSELENZERO = 1672100 DECLARE LONG CONSTANT COB$_ANNUITYBOUNDS = 1672108 DECLARE LONG CONSTANT COB$_CHARBOUNDS = 1672116 DECLARE LONG CONSTANT COB$_MODBOUNDS = 1672124 DECLARE LONG CONSTANT COB$_PRESVALBOUNDS = 1672132 DECLARE LONG CONSTANT COB$_REMBOUNDS = 1672140 DECLARE LONG CONSTANT COB$_RANDOMBOUNDS = 1672148 DECLARE LONG CONSTANT COB$_INTDIVZER = 1679170 DECLARE LONG CONSTANT COB$_DIVBY_ZER = 1679178 DECLARE LONG CONSTANT COB$_UNDEF_EXP = 1679186 ! ! ! THIS FILE IS AUTOMATICALLY GENERATED. DO NOT EDIT IT BY HAND. ! INSTEAD CHANGE COB_MSG.SRC AND RERUN THE MESSAGE CONVERT UTILITY ! ! NOTE: THIS FILE GETS CHECKED INTO [STARLET] FACILITY ! IT DOES NOT GO INTO [DEC$COBRTL]. ! ! ! ! VAX COBOL USES 0-499, 1000 ONWARD DECLARE LONG CONSTANT COB$_INFO = 1675171 DECLARE LONG CONSTANT COB$_VERSION = 1675179 DECLARE LONG CONSTANT COB$_BUG_CHECK = 1675188 DECLARE LONG CONSTANT COB$_INVDATE = 1675196 DECLARE LONG CONSTANT COB$_NOTCOBSPE = 1675204 DECLARE LONG CONSTANT COB$_INVARGCOB = 1675212 DECLARE LONG CONSTANT COB$_SUCCESS = 1675217 DECLARE LONG CONSTANT COB$_DUPLICATE_OK = 1675227 DECLARE LONG CONSTANT COB$_RECORD_SHORT = 1675235 DECLARE LONG CONSTANT COB$_RECORD_LONG = 1675244 DECLARE LONG CONSTANT COB$_CREATED = 1675251 DECLARE LONG CONSTANT COB$_NOT_REEL = 1675259 DECLARE LONG CONSTANT COB$_EOF_DETECTED = 1675268 DECLARE LONG CONSTANT COB$_EOF_OPTIONAL = 1675276 DECLARE LONG CONSTANT COB$_ALREADY_AT_EOF = 1675284 DECLARE LONG CONSTANT COB$_READ_TOO_LARGE = 1675292 DECLARE LONG CONSTANT COB$_KEY_CHANGED = 1675300 DECLARE LONG CONSTANT COB$_DUPLICATE_KEY = 1675308 DECLARE LONG CONSTANT COB$_RECORD_NOT_FOUND = 1675316 DECLARE LONG CONSTANT COB$_KEY_TOO_LARGE = 1675324 DECLARE LONG CONSTANT COB$_PERMANENT_ERROR = 1675332 DECLARE LONG CONSTANT COB$_BOUNDARY = 1675340 DECLARE LONG CONSTANT COB$_FILE_NOT_FOUND = 1675348 DECLARE LONG CONSTANT COB$_IO_NOT_MASS_STORAGE = 1675356 DECLARE LONG CONSTANT COB$_NOT_MASS_STORAGE = 1675364 DECLARE LONG CONSTANT COB$_CLOSE_LOCKED = 1675372 DECLARE LONG CONSTANT COB$_FILE_ATTRIB = 1675380 DECLARE LONG CONSTANT COB$_ALREADY_OPEN = 1675388 DECLARE LONG CONSTANT COB$_NOT_OPEN = 1675396 DECLARE LONG CONSTANT COB$_NO_CURRENT = 1675404 DECLARE LONG CONSTANT COB$_REWRITE_SIZE = 1675412 DECLARE LONG CONSTANT COB$_WRITE_SIZE = 1675420 DECLARE LONG CONSTANT COB$_NO_NEXT_RECORD = 1675428 DECLARE LONG CONSTANT COB$_NOT_INPUT = 1675436 DECLARE LONG CONSTANT COB$_NOT_OUTPUT = 1675444 DECLARE LONG CONSTANT COB$_NOT_IO = 1675452 DECLARE LONG CONSTANT COB$_LOCKED_OK = 1675460 DECLARE LONG CONSTANT COB$_FILE_LOCKED = 1675468 DECLARE LONG CONSTANT COB$_LOCKED_FAILED = 1675476 DECLARE LONG CONSTANT COB$_DEVICE_FULL_OPEN = 1675484 DECLARE LONG CONSTANT COB$_CLOSE_ERROR = 1675492 ! NOTIMP SHARED WITH VAX COBOL MESSAGES IN COBMSG.MSG DECLARE LONG CONSTANT COB$_FAILURE = 1675500 DECLARE LONG CONSTANT COB$_END_OF_VOLUME = 1675508 DECLARE LONG CONSTANT COB$_NOT_END_OF_VOLUME = 1675516 DECLARE LONG CONSTANT COB$_NO_LOCKING = 1675524 DECLARE LONG CONSTANT COB$_INVALID_KEY = 1675532 DECLARE LONG CONSTANT COB$_END_OF_PAGE = 1675540 DECLARE LONG CONSTANT COB$_CONVERSION_ERROR = 1675548 DECLARE LONG CONSTANT COB$_SCR_NORMAL = 1675553 DECLARE LONG CONSTANT COB$_SCR_BUG_CHECK = 1675564 DECLARE LONG CONSTANT COB$_SCR_ERROR = 1675570 DECLARE LONG CONSTANT COB$_SCR_EOF = 1675579 DECLARE LONG CONSTANT COB$_SCR_CVTERR = 1675586 DECLARE LONG CONSTANT COB$_SCR_CVT_OFW = 1675594 DECLARE LONG CONSTANT COB$_SCR_NOTTY = 1675602 DECLARE LONG CONSTANT COB$_SCR_INVKEY = 1675610 DECLARE LONG CONSTANT COB$_SCR_INVDAT = 1675618 DECLARE LONG CONSTANT COB$_SCR_FULL = 1675626 DECLARE LONG CONSTANT COB$_SCR_NOT_FULL = 1675634 DECLARE LONG CONSTANT COB$_SCR_REQUIRED = 1675642 DECLARE LONG CONSTANT COB$_SCR_INVLINE = 1675650 DECLARE LONG CONSTANT COB$_SCR_INVCOL = 1675658 DECLARE LONG CONSTANT COB$_SCR_HEIGHT = 1675667 DECLARE LONG CONSTANT COB$_SCR_WIDTH = 1675675 DECLARE LONG CONSTANT COB$_SCR_NOCOLOR = 1675683 ! DIVBY_ZER SHARED WITH VAX COBOL MESSAGES IN COBMSG.MSG ! UNDEF_EXP SHARED WITH VAX COBOL MESSAGES IN COBMSG.MSG ! INVDECDAT SHARED WITH VAX COBOL MESSAGES IN COBMSG.MSG ! GOTO_ALT SHARED WITH VAX COBOL MESSAGES IN COBMSG.MSG ! RECACTPER SHARED WITH VAX COBOL MESSAGES IN COBMSG.MSG ! NESERRPER SHARED WITH VAX COBOL MESSAGES IN COBMSG.MSG ! TIMOVELON SHARED WITH VAX COBOL MESSAGES IN COBMSG.MSG ! RECACTUSE SHARED WITH VAX COBOL MESSAGES IN COBMSG.MSG ! SUBOVELON SHARED WITH VAX COBOL MESSAGES IN COBMSG.MSG ! INTDATEBOUNDS SHARED WITH VAX COBOL MESSAGES IN COBMSG.MSG ! INTDAYBOUNDS SHARED WITH VAX COBOL MESSAGES IN COBMSG.MSG ! DAYINTBOUNDS SHARED WITH VAX COBOL MESSAGES IN COBMSG.MSG ! DATEINTBOUNDS SHARED WITH VAX COBOL MESSAGES IN COBMSG.MSG ! FACTBOUNDS SHARED WITH VAX COBOL MESSAGES IN COBMSG.MSG ! NUMVALARGINV SHARED WITH VAX COBOL MESSAGES IN COBMSG.MSG ! LOWERLENZERO SHARED WITH VAX COBOL MESSAGES IN COBMSG.MSG ! UPPERLENZERO SHARED WITH VAX COBOL MESSAGES IN COBMSG.MSG ! REVERSELENZERO SHARED WITH VAX COBOL MESSAGES IN COBMSG.MSG ! ANNUITYBOUNDS SHARED WITH VAX COBOL MESSAGES IN COBMSG.MSG ! CHARBOUNDS SHARED WITH VAX COBOL MESSAGES IN COBMSG.MSG ! MODBOUNDS SHARED WITH VAX COBOL MESSAGES IN COBMSG.MSG ! PRESVALBOUNDS SHARED WITH VAX COBOL MESSAGES IN COBMSG.MSG ! REMBOUNDS SHARED WITH VAX COBOL MESSAGES IN COBMSG.MSG DECLARE LONG CONSTANT COB$_INSVIRMEM = 1675692 DECLARE LONG CONSTANT COB$_STRING_OVERFLOW = 1675700 DECLARE LONG CONSTANT COB$_INVALID_FNAME = 1675708 DECLARE LONG CONSTANT COB$_SWITCH_FAIL = 1675716 DECLARE LONG CONSTANT COB$_INVALID_SWITCH = 1675724 DECLARE LONG CONSTANT COB$_NOT_LOCKED = 1675732 DECLARE LONG CONSTANT COB$_NOT_LOCKED_REL = 1675740 DECLARE LONG CONSTANT COB$_SIZE_CHANGED = 1675748 DECLARE LONG CONSTANT COB$_CALL_FAILED = 1675756 DECLARE LONG CONSTANT COB$_CANCEL_FAILED = 1675764 DECLARE LONG CONSTANT COB$_INVALID_RECORD = 1675772 DECLARE LONG CONSTANT COB$_USE_EXECUTED = 1675780 DECLARE LONG CONSTANT COB$_FILE_NOT_PRESENT = 1675788 DECLARE LONG CONSTANT COB$_UNLOCK_FAILED = 1675796 DECLARE LONG CONSTANT COB$_RECORD_KEY_ZERO = 1675804 DECLARE LONG CONSTANT COB$_DISPLAY_ERROR = 1675812 DECLARE LONG CONSTANT COB$_ACCEPT_ERROR = 1675820 DECLARE LONG CONSTANT COB$_OPEN_ERROR = 1675828 DECLARE LONG CONSTANT COB$_READ_ERROR = 1675836 DECLARE LONG CONSTANT COB$_WRITE_ERROR = 1675844 DECLARE LONG CONSTANT COB$_REWRITE_ERROR = 1675852 DECLARE LONG CONSTANT COB$_DELETE_ERROR = 1675860 DECLARE LONG CONSTANT COB$_START_ERROR = 1675868 DECLARE LONG CONSTANT COB$_UNLOCK_ERROR = 1675876 DECLARE LONG CONSTANT COB$_SORT_ERROR = 1675884 DECLARE LONG CONSTANT COB$_KEY_MATCH_ERROR = 1675892 DECLARE LONG CONSTANT COB$_KEY_COUNT_ERROR = 1675900 DECLARE LONG CONSTANT COB$_INVALID_FOOTING = 1675908 DECLARE LONG CONSTANT COB$_PAGE_SIZE = 1675916 DECLARE LONG CONSTANT COB$_ACCEPT_CVT_ERROR = 1675924 DECLARE LONG CONSTANT COB$_OPEN_MFT = 1675932 DECLARE LONG CONSTANT COB$_DEVICE_FULL = 1675940 DECLARE LONG CONSTANT COB$_RECORD_EXCEEDED = 1675948 DECLARE LONG CONSTANT COB$_DEVICE_FULL_KEY = 1675956 DECLARE LONG CONSTANT COB$_SUBSCRIPT = 1675964 DECLARE LONG CONSTANT COB$_MFT_POSITION = 1675972 DECLARE LONG CONSTANT COB$_NOISAM = 1675980 DECLARE LONG CONSTANT COB$_ISAM_KEY_OVERLAP = 1675988 DECLARE LONG CONSTANT COB$_ISAM_BADFILE = 1675996 ! RANDOMBOUNDS SHARED WITH VAX COBOL MESSAGES IN COBMSG.MSG DECLARE LONG CONSTANT COB$_ORDLENONE = 1676004 DECLARE LONG CONSTANT COB$_INVTERM = 1676012 DECLARE LONG CONSTANT COB$_INVTERMDB = 1676020 DECLARE LONG CONSTANT COB$_INVARGMTH = 1676028 DECLARE LONG CONSTANT COB$_ISAM_BADKEY = 1676036 DECLARE LONG CONSTANT COB$_NOEXTFH = 1676044 DECLARE LONG CONSTANT COB$_ENCINA_UNKNOWN_ERROR = 1676052 DECLARE LONG CONSTANT COB$_FCNTLERR = 1676060 DECLARE LONG CONSTANT COB$_LOCKERR = 1676068 DECLARE LONG CONSTANT COB$_NOMOREL = 1676076 DECLARE LONG CONSTANT COB$_ISAM_INVKEY = 1676084 DECLARE LONG CONSTANT COB$_INVALID_TAPE = 1676092 DECLARE LONG CONSTANT COB$_TAPE_ERROR = 1676100 DECLARE LONG CONSTANT COB$_TAPE_SUPPORT = 1676108 DECLARE LONG CONSTANT COB$_CORRECT_TAPE = 1676115 DECLARE LONG CONSTANT COB$_NEXT_TAPE = 1676123 DECLARE LONG CONSTANT COB$_TAPE_PROMPT = 1676131 DECLARE LONG CONSTANT COB$_TAPE_SEQUENCE = 1676138 DECLARE LONG CONSTANT COB$_END_OF_TAPE = 1676148 DECLARE LONG CONSTANT COB$_TAPE_ABORT = 1676156 DECLARE LONG CONSTANT COB$_TAPE_DEVICE = 1676163 DECLARE LONG CONSTANT COB$_TAPE_ENTER = 1676171 DECLARE LONG CONSTANT COB$_TAPE_IN_USE = 1676180 DECLARE LONG CONSTANT COB$_TAPE_WRLOCK = 1676188 DECLARE LONG CONSTANT COB$_TAPE_OFFLINE = 1676194 DECLARE LONG CONSTANT COB$_INVLOCK = 1676204 DECLARE LONG CONSTANT COB$_NOALPHAUPROG = 1676210 DECLARE LONG CONSTANT COB$_BUFTOOSMALL = 1676218 DECLARE LONG CONSTANT COB$_COM_BUGCHECK = 1676226 DECLARE LONG CONSTANT COB$_ILLPICT = 1676234 DECLARE LONG CONSTANT COB$_BIGAPIC = 1676242 DECLARE LONG CONSTANT COB$_BIGNPIC = 1676250 DECLARE LONG CONSTANT COB$_BIGANPIC = 1676258 DECLARE LONG CONSTANT COB$_BIGANEPIC = 1676266 DECLARE LONG CONSTANT COB$_BIGNEPIC = 1676274 DECLARE LONG CONSTANT COB$_PICLENEXT = 1676282 DECLARE LONG CONSTANT COB$_PICLONG = 1676290 DECLARE LONG CONSTANT COB$_PICREPEAT = 1676298 DECLARE LONG CONSTANT COB$_PIC1ONLY = 1676306 DECLARE LONG CONSTANT COB$_PICPAREN = 1676314 DECLARE LONG CONSTANT COB$_RT_FLOAT = 1676322 DECLARE LONG CONSTANT COB$_PICMUTEX1 = 1676330 DECLARE LONG CONSTANT COB$_PICMUTEX2 = 1676338 DECLARE LONG CONSTANT COB$_PICMUTEX3 = 1676346 DECLARE LONG CONSTANT COB$_PICMUTEX4 = 1676354 DECLARE LONG CONSTANT COB$_ARGLIMIT = 1676362 ! INTDIVZER SHARED WITH VAX COBOL MESSAGES IN COBMSG.MSG ! INTEXPOVE SHARED WITH VAX COBOL MESSAGES IN COBMSG.MSG ! INTEXPUND SHARED WITH VAX COBOL MESSAGES IN COBMSG.MSG ! INTRESOPE SHARED WITH VAX COBOL MESSAGES IN COBMSG.MSG DECLARE LONG CONSTANT COB$_BADVERS_S = 1676372 DECLARE LONG CONSTANT COB$_BADVERS_I = 1676379 DECLARE LONG CONSTANT COB$_FILE_LOCKED_PERM = 1676388 DECLARE LONG CONSTANT COB$_INVFUNCARG = 1676396 DECLARE LONG CONSTANT COB$_RESDETCON = 1676402 DECLARE LONG CONSTANT COB$_OVFDETCON = 1676410 DECLARE LONG CONSTANT COB$_UNDDETCON = 1676418