Google
 

Trailing-Edge - PDP-10 Archives - ap-c800d-sb - cobolk.exe
There are 4 other files named cobolk.exe in the archive. Click here to see a list.
?p``?xG>{Kb)n<Zfn`INXg#	tzs)b"{rE@@hd(K
|!| ! '{F
.
@$<p@`$<pFp$@pHp(@p4pPpp00p$pHp>p>p8
p2
p$pHp@p>p<p:p8p6p4p2p0p.p,p(p*p$p$pHp<p$0pHpHp$HpHp$HpHp$HpHp$HpHp$HpHp$HpHpHp$HpHp$HpHpHp$HpHpFpDpBp<
p8p6p4p2p0pHp$HpHp$0p$Hp	Hp	6$p	$$p	Hp	$Hp
Hp
$Hp
Hp
$HpHp$HpHp$Hp
Hp
$<pHp$HpHp$HpHp<p0p.p,p$pHpDpBp@p>p<p:p8p6p4p2p0p.p,p*p(p&p&p$p"p pppppppppp
p
pp$HpHp*<p(p4pPpp$HpHp6$p$$pHp0p:p8p6p4p2p$pHp$<p$HpHp(<pPp4pp$DpHp6$p$$pHp6$pFpDpBp@p>p<p:p&p$pHp(<p
p4pPpp$Hp$HpHp$Hpppppp
p
ppppp$HpHpHp$<pFpDp4p$Hp$<pHp(@p4ppPp$HpHp$HpHp6$p$$p$p$p6$pHp$HpHp$HpHp$HpHp$HpHp$HpHp$<pDp@p<p6
pHp6$p$$p$p$HpHp$Hp$Hp4p2p2p0p.p,p&pB
2
$0HHG>{G>{,5H,~,>  	t`t ah+,^,~,^,+%,++
&,>,>  ,I 6
"6\ ,IR 4\" 6
",I,^,^
&,~
&+  	hah@ ++
&	bah ,~ah :x:x,~
&+e,7
&Z,D 7[p0Z8*|.Zp
&pa`d +e
!4$d&l)t+/D2 ,I (
"6\,I7\+= (
",I7\+C (-
"[,D (
"Z,D (.
"
&,~ 1`zp4HD.(
"azp,~+F 14V*.6
"`tp+I,~ (A`QHx+O,x5HN:x,~4A<4\U.Ta TaZP04w,~
&2>x 4.(
"`tp+V
&+m,Q:A0Z1Z,~+^4\`,Q:G<@4Z]5\Zl,~NKQZMWYP  ``	`ZA4 n1z!+p 5 Z: < \A+1 \:@@A+1 ^| >u*>|-:s@+q-:s 4 5 Z: TA+16\o \(!<r+@.62\6+t n+h
&
&7-:s u+e Tu4:0t+},T u,~ Hu
&;>x 4.(
"`tp+
& u u+m},^ HxZ+CO
,Z` = :	x'+4X : 8 	x	z
+	
6+ ,~TRANSMISSION ERROR FOR 
MOUNT ANOTHER REEL ON TO RETRY, TYPE CONTINUE
?CANNOT CONTINUE
() NO FILE NAME) INCORRECT PROJ-PROG NO.) PROTECTION FAILURE) FILE BEING MODIFIED) BAD UFD OR BAD RIB) NO ROOM, OR QUOTA EXCEEDED) WRITE LOCK) NOT ENOUGH TABLE SPACE IN MONITOR) UNKNOWN ERROR$
HBAD TABLE-LINK AT $
x G>{G>{>? CANNOT CONTINUE COMPILATION
6$ILLEGAL UUO AT LOCATION 4m1tw+D14x+F1t}+E1t+F0t7+F TX+E7Tn6TTn5TL4m&4)V|&4)V|&4)V)T
.t4mt ,~@)XFDIAGNOSTIC NO. XXXX FROM PHASE AFFIRST WORD NOT 'IDENTIFICATION'FBLOCKING FACTOR GREATER THAN 4095FMORE THAN ONE PROGRAM-IDFIMPROPER PROGRAM-IDWDECsystem-10 ASSUMEDFMORE THAN ONE OBJECT-COMPUTER PARAGRAPHFIMPROPER PARAGRAPH NAMEFTHE WORD 'SELECT' EXPECTEDFFILE SELECTED MORE THAN ONCEF'ASSIGN' IS THE ONLY ALLOWED WORD HEREFNO DEVICE NAME SPECIFIEDFONLY ONE DEVICE OF THIS TYPE ALLOWEDFNO FILE NAME GIVENFPROCESSING MODE MUST BE SEQUENTIALFIMPROPER ACCESS MODEFCLAUSE DUPLICATEDFTHIS CANNOT BE A DATA NAMEFIMPROPER CLAUSEFIMPROPER SEGMENT LIMITFTHIS FILE NOT SELECTEDFTHIS CANNOT BE A FILE-NAMEFPOSITION NUMBER REQUIREDFNOT ON SAME DEVICE AS PREVIOUS FILE LISTEDFCANNOT BE USED AS A MNEMONIC NAMEFPOSITIVE INTEGER REQUIREDFCANNOT BE USED AS A CONDITION NAMEFMUST BE A SINGLE-CHARACTER NON-NUMERIC LITERALFALREADY IN USE AS A MNEMONIC NAMEFMORE THAN ONE RERUN CLAUSE FOR THIS FILEFPARAGRAPH APPEARS MORE THAN ONCEFNO DATA DIVISIONFNO PROCEDURE DIVISIONFALL RECORDS FOR THIS FILE MUST HAVE SAME USAGEFTHIS FILE ALREADY DEFINEDFRECORD NAME NOT UNIQUE WITHIN THIS FILEFTHIS IS A MULTI-DEVICE FILEWTHIS RECORD NOT MENTIONED IN DATA RECORDS CLAUSEFNO RECORD NAME GIVENFTHIS IS NOT PREVIOUS ITEM AT THIS LEVELFTHIS IS NOT A NUMERIC ITEMFUSAGE CONFLICTS WITH GROUP ITEMFTHIS CLAUSE NOT VALID FOR GROUP ITEMFIMPROPER SECTION NAMEFNOT A SORT FILEFTHIS MUST BE A LITERALFNOT ALLOWED IN THIS SECTIONFDATA NAME NOT DEFINED IN THIS RECORDFNEW RECORD EXPECTED HEREFNO VALUE GIVENFIMPROPER PICTURE - THIS CHARACTER INVALIDFIMPROPER PICTURE - THIS CHARACTER NOT
ALLOWED IN COMBINATION WITH PRECEDING CHARACTERSFA WORD MAY NOT BEGIN WITH A HYPHENFA WORD MAY NOT END WITH A HYPHENFTOO MANY CHARACTERS IN THE WORDFTOO MANY CHARACTERS IN THE LITERALFINVALID CHARACTERFCANNOT BE USED AS AN INDEX NAMEFTHIS ITEM DOES NOT HAVE USAGE INDEXFNOT UNIQUELY DEFINEDFMORE THAN THREE LEVELS OF OCCURSFVALUE OF ID MUST BE A DISPLAY FIELD OF 9 CHARACTERSFVALUE OF DATE-WRITTEN MUST BE A DISPLAY FIELD OF 6 CHARACTERSFLEVEL NUMBERS MAY NOT EXCEED 49FINVALID CLAUSES FOR GROUP ITEMFREDEFINES NOT VALID AT RECORD LEVEL IN FILE SECTIONF'FOR' EXPECTEDFINDEX USAGE ITEMS MAY NOT HAVE A PICTUREW'JUSTIFIED' CLAUSE INVALID WITH NUMERIC ITEMSWNO ENDING QUOTE ON THIS LITERALWNO LEADING QUOTE ON CONTINUED LITERALFTOO MANY CHARACTERS IN PICTUREFIMPROPER CONTINUATION CHARACTERFLIBRARY ROUTINE NOT FOUNDFNO LIBRARY SPECIFIED IN COMMAND STRINGFIMPROPER CHARACTER FOR NUMERIC LITERALFMORE THAN ONE DECIMAL POINTWSHOULD NOT BE PRECEDED BY A SPACEWSHOULD BE FOLLOWED BY A SPACEFFILE DESCRIPTOR EXPECTEDWPRECEDING SPACE ASSUMEDFLINE TOO LONGFIMPROPER DEVICE NAMEFRIGHT PARENTHESIS EXPECTEDFALREADY IN USE AS A CONDITION NAMEFRELATIONAL OPERATOR EXPECTEDF'ON' OR 'OFF' EXPECTEDFINTERMEDIATE RESULT TOO LARGEFVALUES NOT ALLOWED IN LINKAGE SECTIONFALTERING INDEPENDENT SEGMENT FROM ANOTHER SEGMENTFNOT IMPLEMENTED IN THIS VERSION OF COBOLFEXTERNAL PROGRAM NAME EXPECTEDFDUMMY ARGUMENT MUST BE AN 01 LINKAGE SECTION ITEMWTHIS PARAGRAPH IS NEVER ALTEREDFILLEGAL ENTRY NAMEFDECIMAL PLACES NOT ALLOWEDFNO FILE-DESCRIPTOR FOR THIS FILEFMUST BE AN INTEGER IN THE RANGE 0 - 66FMUST BE A PRINTER CHANNELFNOT YET IMPLEMENTEDFIDENTIFIER EXPECTEDWNOT A DEVICE NAME -- TTY ASSUMEDFCANNOT BE A DATA-NAMEFNOT DEFINEDWNO CORRESPONDING ELEMENTSFNOT A GROUP NAMEF'ERROR' EXPECTEDF'SIZE ERROR' ASSUMEDFSIZE ERROR CLAUSE INCORRECTFNUMERIC LITERAL OR IDENTIFIER EXPECTEDFAT LEAST TWO ITEMS MUST APPEAR BEFORE 'GIVING'FCANNOT BE ALTEREDF'PROCEED' EXPECTEDFPARAGRAPH NAME EXPECTEDWALTERED TO PROCEED TO ITSELFFFILE NAME EXPECTEDF'NO REWIND' OR 'LOCK' EXPECTEDF'NO REWIND' EXPECTEDF'BY' OR 'INTO' EXPECTEDF'GIVING' CLAUSE REQUIREDF'ALL', 'LEADING', OR 'UNTIL FIRST' EXPECTEDF1-CHARACTER NON-NUMERIC LITERAL EXPECTEDF'BY' EXPECTEDWPERIOD ASSUMEDF'DEPENDING ON' CLAUSE EXPECTEDF'TIMES' EXPECTEDF'END' EXPECTEDF'AT END' OR 'INVALID KEY' CLAUSE MISSINGFIDENTIFIER, INDEX, OR 'TO' EXPECTEDFIDENTIFIER, INDEX, OR LITERAL EXPECTEDFIDENTIFIER, INDEX, 'TO', 'UP', OR 'DOWN' EXPECTEDFINDEX OR IDENTIFIER EXPECTEDFILLEGAL ITEM IN EXPRESSION. COMPILER ERRORFUNBALANCED PARENTHESIS IN EXPRESSIONF'TO' EXPECTEDW'DIVISION' EXPECTEDFPARAGRAPH OR SECTION NAME EXPECTEDFSECTION NAME EXPECTEDW'SECTION' EXPECTEDFONLY NOTES MAY APPEAR IN REMAINDER OF THIS PARAGRAPHFNOT A DECLARATIVE SENTENCEF'BEFORE' OR 'AFTER' EXPECTEDF'BEGINNING', 'ENDING', OR 'ERROR' EXPECTEDF'REEL', 'FILE', OR 'UNIT' EXPECTEDF'LABEL' EXPECTEDF'PROCEDURE' EXPECTEDFSTATEMENT EXPECTEDF'=' EXPECTEDF'TALLYING' OR 'REPLACING' EXPECTEDFA GROUP ITEM MAY NOT BE A MINOR KEYF'.' OR 'ELSE' EXPECTEDF'SENTENCE' EXPECTEDF'INPUT', 'OUTPUT', OR 'I-O' EXPECTEDFPROCEDURE NAME EXPECTEDFTOO MANY LEVELS OF VARYINGF'FROM' EXPECTEDF'UNTIL' EXPECTEDFRECORD NAME EXPECTEDWTHIS STATEMENT DOES NOTHINGF'KEY' EXPECTEDF'DECLARATIVES' EXPECTEDFEXTERNAL NAME EXPECTEDF'MACRO', 'FORTRAN', OR 'FORTRAN-IV' EXPECTEDF'FIRST' EXPECTEDF'ALL', 'LEADING', 'FIRST', OR 'UNTIL FIRST' EXPECTEDFILLEGAL SEQUENCE OF PRIORITIESFNULL PROCEDURE DIVISIONFNULL DECLARATIVESF'RUN' OR LITERAL EXPECTEDFDUPLICATE SECTION NAMEFDUPLICATE PARAGRAPH IN THIS SECTIONFTHIS FILE ALREADY APPEARS IN A 'SAME RECORD AREA' CLAUSEFTHIS FILE ALREADY APPEARS IN A 'SAME AREA' CLAUSEFIMPROPER CHARACTER FOR CURRENCY SIGNFFD EXPECTEDF'LABEL RECORDS' CLAUSE REQUIREDFTWO SECTIONS HAVE THIS NAMEFTHIS PARAGRAPH NAME MUST BE QUALIFIEDFA SECTION, AS WELL AS A PARAGRAPH IN THE CURRENT SECTION,
HAS THIS NAMEFTHIS PROCEDURE NAME IS NOT DEFINEDFNOT A PICTUREFNULL LITERALFILLEGAL USE OF FIGURATIVE CONSTANTFIMPROPER REFERENCE OF PROCEDURE NAME IN OR OUT OF DECLARATIVESFFIGURATIVE CONSTANT OR NON-NUMERIC LITERAL MUST FOLLOW 'ALL'FTHIS PROCEDURE NAME IS MULTIPLY DEFINEDWTHIS STATEMENT CANNOT BE REACHEDFTOO MANY LEVELS OF QUALIFICATIONFIMPROPER QUALIFICATIONFTHIS FILE IS NEVER OPENEDF'BLOCK CONTAINS N RECORDS' MUST BE SPECIFIED FOR RANDOM ACCESS FILESFFILE-LIMITS REQUIREDFMULTIPLE REEL/UNIT NOT ALLOWEDFONLY ONE DEVICE ALLOWEDFLABELS MUST BE STANDARDFVALUE OF ID REQUIREDFNO DATA RECORD SPECIFIEDFNO DEVICES SPECIFIEDFTHE WORD 'DATA' EXPECTEDWFILE NEVER OPENEDFACCESS MODE MUST BE RANDOMFNOT A RECORD IN THE FILE SECTIONFMUST CONTAIN AN INTEGERW'AT END' ASSUMEDW'INVALID KEY' ASSUMEDFTHIS LITERAL MAY CONTAIN ONLY DISPLAY-6 CHARACTERSFIMPROPER CLASSWCONDITION ALWAYS TRUEWCONDITION ALWAYS FALSEFWRONG NUMBER OF OPERANDS PASSED FROM PHASE D -- COMPILER ERRORFFOUND OUTSIDE AN EXPRESSION -- COMPILER ERRORFEXPRESSION GENERATOR CONFUSED -- COMPILER ERRORWIMPOSSIBLE TO GET SIZE ERRORWROUNDING NOT NECESSARYFIMPROPER RANGE OF PERFORMFPICTURE REQUIREDFPICTURE NOT PERMITTEDF'BLANK WHEN ZERO' NOT ALLOWED AT GROUP LEVELF'BLANK WHEN ZERO' ALLOWED ONLY ON NUMERIC DISPLAY ITEMSF'JUSTIFIED' CLAUSE NOT ALLOWED AT GROUP LEVELF'SYNCHRONIZED' CLAUSE NOT ALLOWED AT GROUP LEVELWAT LEAST ONE AND NO MORE THAN EIGHT DATA NAMES MUST
BE GIVEN IN A FILE STATUS CLAUSEWTHIS RECORD NOT MENTIONED IN DATA RECORDS OR
LABEL RECORDS CLAUSE -- DATA RECORD ASSUMED
FA MAXIMUM OF 4095 OCCURRENCES ALLOWEDFCONDITION-NAME MULTIPLY DEFINED FOR THIS ITEMFCONTROL IDENTIFIER OR 'FINAL' EXPECTEDW'EXIT' FOR THIS PROCEDURE CANNOT BE REACHEDW'OTHERS' EXPECTEDFVALUE CLAUSE AT HIGHER LEVEL SUPERSEDES VALUE
CLAUSE AT THIS LEVELFVALUE CLAUSE MAY NOT APPEAR IN A DATA DESCRIPTION CONTAINING,
OR SUBORDINATE TO AN ENTRY CONTAINING, AN OCCURS CLAUSEFGROUP ITEMS MAY HAVE ONLY FIGURATIVE CONSTANTS OR NON-NUMERIC
LITERALS AS VALUESFVALUE CLAUSE NOT PERMITTED IN FILE SECTIONWNON-NUMERIC LITERAL IN VALUE CLAUSE TRUNCATED TO SIZE OF ITEMFDIVISION BY ZERO NOT PERMITTEDFACTUAL KEY MUST BE A COMPUTATIONAL ITEM OF TEN OR FEWER DIGITSFCLASS OF DATA ITEM INCONSISTENT WITH VALUEFNON-STANDARD CHARACTERS IN VALUE CLAUSEFSWITCH NUMBERS MUST BE IN THE RANGE 0 THROUGH 35FUSAGE CONFLICTS WITH PICTUREFTOO MANY DIGITS TO LEFT OF DECIMAL POINT IN VALUE CLAUSEFTOO MANY DIGITS TO RIGHT OF DECIMAL POINT IN VALUE CLAUSEFAN ITEM SUBORDINATE TO ONE CONTAINING A VALUE CLAUSE MUST NOT
BE JUSTIFIED OR SYNCHRONIZED, AND MUST HAVE USAGE DISPLAY-6, DISPLAY-7
OR DISPLAY-9FVALUE NOT IN RANGE DESCRIBED BY PICTUREWVALUE MAY NOT BE SIGNEDFWRONG NUMBER OF SUBSCRIPTSFIMPROPER SUBSCRIPTFVALUE GREATER THAN NUMBER OF OCCURRENCESFDATA ITEMS WITH LEVELS OF 01, 66, OR 77 MAY NOT APPEAR IN
A 'RENAMES' CLAUSEFDATA ITEMS REQUIRING SUBSCRIPTING MAY NOT APPEAR IN A
'RENAMES' CLAUSEFDATA ITEMS APPEARING IN A 'RENAMES ... THRU ...' CLAUSE MUST
BELONG TO THE SAME RECORDFDATA ITEMS APPEARING IN A 'RENAMES ... THRU ...' CLAUSE MAY NEITHER BE
SUBORDINATE TO THE OTHERFTHE AREA DEFINED BY THE SECOND DATA ITEM IN A 'RENAMES ... THRU ...'
CLAUSE MUST FOLLOW THE AREA DEFINED BY THE FIRSTFLITERAL OR FIGURATIVE CONSTANT EXPECTEDFANOTHER INDEPENDENT ITEM HAS THIS NAMEF'IF' SYNTAX SCAN ERROR -- IMPROPER UNNESTING--COMPILER ERRORFUNBALANCED PARENTHESESFNO CURRENT PARAGRAPH - COMPILER ERRORFNULL TABLE LINK - COMPILER ERRORFMUST BE NUMERIC, AND HAVE NO DECIMAL PLACESFONLY GROUP ITEMS ALLOWED IN 'CORRESPONDING'FMAY REDEFINE ONLY THE CURRENT DATA ITEMFMUST BE AN 01-LEVEL REPORT GROUP ITEMFMORE THAN 12 NESTED REDEFINITIONSFAN ENTRY CONTAINING, OR SUBORDINATE TO AN ENTRY
CONTAINING, AN 'OCCURS' CLAUSE MAY NOT BE REDEFINEDF'VALUE' CLAUSE IS NOT PERMITTED IN A REDEFINITIONAREDEFINITION IS NOT THE SAME SIZE AS THE REDEFINED ITEMFTHIS MUST BE GREATER THAN THE FIRST INTEGERFIMPROPER USE OF 'ALL'FMUST BE SUBSCRIPTEDFMAY NOT BE SUBSCRIPTEDFBAD USAGE -- COMPILER ERRORFTOO MANY LEVELS OF SUBSCRIPTINGFMUST HAVE A SIZE OF 10 DIGITS OR LESSFCANNOT CONTINUE AFTER AN EMPTY OR COMMENT LINEF'ASCENDING' OR 'DESCENDING' EXPECTEDF'RENAMES' EXPECTEDFSORT GENERATOR CONFUSED -- COMPILER ERRORFIMPROPER NAME FOR INDEPENDENT ITEMFA RECORD CONTAINING DISPLAY-7 ITEMS MAY NOT
CONTAIN ITEMS OF ANY OTHER USAGEFTHIS CANNOT BE A LIBRARY-NAMEF'COPY' STATEMENT MUST BE TERMINATED BY A PERIODFLEFT PARENTHESIS EXPECTEDFIDENTIFIER, NUMERIC LITERAL, OR MNEMONIC-NAME EXPECTEDFFILLER MAY NOT BE REFERENCED DIRECTLYFTHIS MUST BE A SWITCH ON OR OFF STATUSFTHIS FILE MUST NOT APPEAR IN AN SDFCANNOT HAVE BOTH 'USING' AND 'INPUT PROCEDURE'FMUST HAVE EITHER 'USING' OR 'INPUT PROCEDURE'FCANNOT HAVE BOTH 'GIVING' AND 'OUTPUT PROCEDURE'FMUST HAVE EITHER 'GIVING' OR 'OUTPUT PROCEDURE'F'VALUE' EXPECTEDFTHERE IS AN INDEPENDENT ITEM OF THIS NAMEFIMPROPER FIGURATIVE CONSTANT IN VALUE CLAUSEFNO 'RESULT' FOUND -- COMPILER ERRORWROUNDING NOT DONE WITH COMP-1 FIELDSF'BLOCK CONTAINS' MUST BE SPECIFIED FOR A FILE OPENED FOR
INPUT-OUTPUTWONLY EIGHT SIGNIFICANT PLACES USED FOR COMP-1F'THRU' EXPECTEDFAT LEAST 3 DEVICES MUST BE ASSIGNED TO A SORT FILEWSYNTAX SCAN SUSPENDED AT THIS CHARACTERWSYNTAX SCAN RESUMED AT THIS CHARACTERFTHIS PROCEDURE-NAME MUST BE IN DECLARATIVESFTHIS PROCEDURE-NAME MUST NOT BE IN DECLARATIVESFTHIS PROCEDURE-NAME MUST BE IN AN INPUT PROCEDUREFTHIS PROCEDURE-NAME IS IN AN INPUT PROCEDUREFTHIS PROCEDURE-NAME MUST BE IN AN OUTPUT PROCEDUREFTHIS PROCEDURE-NAME IS IN AN OUTPUT PROCEDUREFLITERALS AND RESERVED WORDS MAY NOT BE REPLACEDFA WORD MAY NOT BE REPLACED BY A RESERVED WORDFAN ITEM MAY NOT EXCEED 262,143 CHARACTERSFTHIS IS NEITHER A DATA-NAME NOR A PROCEDURE-NAMEF'AT END' CLAUSE REQUIREDF'INVALID KEY' CLAUSE REQUIREDF'AT END' AND 'INVALID KEY' NOT ALLOWEDFTHIS ITEM MUST NOT BE COMPUTATIONAL-1FA RECORD IN THE FILE SECTION MAY NOT EXCEED 4095 CHARACTERSFMORE THAN 12 NESTED 'IF'/'SEARCH' STATEMENTSFMORE THAN 12 CONDITIONS NESTED IN 'IF' STATEMENTFOCCURS IS ILLEGAL AT 01 LEVEL IN FILE SECTIONFVERB NAME EXPECTEDFINVALID DENSITYFODD OR EVEN REQUIREDFNON-SIXBIT CHARACTER IN VALUE OF DISPLAY-6 ITEMFA NUMERIC ITEM MAY NOT EXCEED 18 DIGITSFTWO LITERALS MAY NOT BE COMPAREDFINSUFFICIENT QUALIFICATIONFFEWER THAN 6 CHARACTERS IN DATE-WRITTENWFEWER THAN 9 CHARACTERS IN IDENTIFICATIONFSECOND HALF OF PROJECT-PROGRAMMER NUMBER MISSINGFMUST BE AN OCTAL INTEGER OF 6 DIGITS OR LESSFIMPROPER MODEFREPORT NAME MUST BE UNIQUEFFILE SECTION MUST PRECEDE REPORT SECTIONFDATA ITEM HAS IMPROPER SIZE FOR THIS USEWSHOULD BEGIN IN A-MARGINFREPORT NOT SPECIFIED IN A REPORT CLAUSE IN FILE SECTIONFLINE NUMBER GREATER THAN PAGE LIMITFPAGE LIMIT MUST BE POSITIVE AND LESS THAN 512FCONTROL IDENTIFIER EXPECTEDFIF USED, 'FINAL' MUST BE THE FIRST CONTROLF'DEPENDING' VARIABLES MUST BE COMP AND 10 DIGITS OR LESSFCLAUSE NOT LEGAL IN REPORT GROUPFUSAGE NOT LEGAL IN REPORT SECTIONFCLAUSE LEGAL ONLY IN REPORT GROUPF'PAGE' EXPECTEDFMUST BE LESS THAN PAGE LIMITFNOT A CONTROL IDENTIFIERFONLY ONE GROUP OF THIS TYPE ALLOWED PER REPORTF'HEADING' OR 'FOOTING' REQUIREDFREPORT ITEM TYPE REQUIREDFNOT DECLARED AS A CONTROLFITEM REFERENCED BY A 'SUM' CLAUSE MUST BE SOURCE ITEM IN
'TYPE DETAIL' OR ITEM IN 'TYPE CONTROL FOOTING' WHICH HAS
A 'SUM' CLAUSEFREPORT-NAME EXPECTEDFITEM WILL NOT FIT IN PRINT LINEFNOT A 'TYPE DETAIL' ITEMFITEM IS SUMMED IN REPORT SECTION, THEREFORE IT MUST BE NUMERICFONLY A CONTROL-FOOTING GROUP MAY HAVE A SUMFITEM REFERENCED BY A 'SUM UPON' CLAUSE MUST BE 'TYPE DETAIL'FADVANCING CLAUSE ILLEGAL WITH RECORDING MODE OTHER
THAN ASCIIFVALUE OF USER-NUMBER MUST BE COMP ITEM WITH
FEWER THAN 11 DIGITSFMUST BE DEFINED IN EITHER THE FILE OR WORKING-STORAGE SECTIONFRESET MAY BE USED ONLY WITH CONTROL-FOOTING ITEMSFMUST BE A CONTROLFMUST BE A HIGHER LEVEL CONTROL THAN THAT OF THIS GROUPFVALID ONLY FOR FILES WITH ACCESS MODE INDEXEDF'ADVANCING' ALLOWED ONLY ON SEQUENTIAL FILESFIMPROPER USAGEFRECORD KEY AND SYMBOLIC KEY MUST BE SAME CLASSFRECORD KEY AND SYMBOLIC KEY MUST BE SAME USAGEFRECORD KEY AND SYMBOLIC KEY MUST BE SAME SIZEFRECORD KEY AND SYMBOLIC KEY MUST HAVE THE SAME
NUMBER OF DECIMAL PLACESFINDEXED FILES MUST NOT BE BINARYFRECORD KEY MUST BE IN APPROPRIATE RECORDFREDEFINES NESTING CONFUSED -- COMPILER ERRORFSEARCHED ITEMS MUST HAVE 'OCCURS' CLAUSE WITH 'INDEXED' OPTIONFA KEY OF MORE MAJOR PRIORITY THAN THIS WAS NOT SPECIFIEDFONE OPERAND IN EVERY 'WHEN' CONDITION MUST BE A SEARCH KEYFASSOCIATED DATA ITEM MUST BE A SEARCH KEYFCONDITION NAME MUST HAVE ONLY A SINGLE VALUEF'SEARCH ALL' REQUIRES 'KEY' CLAUSE IN TABLE DEFINITIONFCODE MUST NOT CONTAIN NON-SIXBIT CHARACTERSW'ON/OFF' EXPECTED - 'ON' ASSUMEDFONLY EQUALITY CONDITIONS ALLOWED IN 'SEARCH ALL'F'WHEN' EXPECTEDFTHE ONLY CONNECTIVE IN 'WHEN' CLAUSE IS 'AND'FSYMBOLIC KEY REQUIREDFRECORD KEY REQUIREDF'RECORDS' OR 'CHARACTERS' REQUIREDFCALL ARGUMENT MUST BE WORD-ALIGNEDFDUPLICATE ENTRY DEFINITIONFILLEGAL TO CALL INTERNAL ENTRYFPAGE-COUNTER AND LINE-COUNTER MAY NOT BE INDEPENDENTLY DEFINED WHEN REPORT WRITER FEATURES ARE USEDFIMPROPER PUNCTUATIONFNOT DECLARED IN AN ENTRY OR PD USING CLAUSEFDUPLICATE WORKING-STORAGE SECTIONFSET-NAME OR 'ANY' EXPECTEDF'SET' EXPECTEDF'ERROR-STATUS' EXPECTEDFILLEGAL COMBINATION OF ERROR-STATUS USE PROCEDURESFAREA-NAME EXPECTEDFDUPLICATE SCHEMA SECTIONF'ALL', 'RECORD', 'AREA', 'SET', OR SET-NAME EXPECTEDWTHIS NAME SHOULDN'T BE MORE THAN 6 CHARACTERSF'INTO' EXPECTEDF'ALL' OR SET-NAME EXPECTEDF'COMPILE' EXPECTEDF'INVALID', 'ONLY', 'SELECTIVE', OR 'ALL' EXPECTEDF'SELECTIVE', 'ONLY', 'ALL', OR RECORD-NAME EXPECTEDFRECORD-NAME, SET-NAME, AREA-NAME, OR 'RUN-UNIT' EXPECTEDF'RECORD' EXPECTEDF'FOR' EXPECTEDF'AREA' OR 'SET' EXPECTEDF'SUB-SCHEMA' OR SUB-SCHEMA NAME EXPECTEDFINVOKE STATEMENT MUST FOLLOW SCHEMA SECTIONFSET-NAME EXPECTEDF'CURRENT' EXPECTEDFAMBIGUOUS OR INCORRECT RSE SPECIFICATIONF'EXCLUSIVE', 'PROTECTED', OR 'RETRIEVAL' EXPECTEDFSET-NAME OR AREA-NAME EXPECTEDF'RECORD' OR RECORD-NAME EXPECTEDFNO MORE THAN 10 AREA-NAMES ALLOWED PER OPEN STATEMENTFINCORRECT PRIVACY KEYF'UPDATE' EXPECTEDFDECLARATIVES MUST IMMEDIATELY FOLLOW PROCEDURE DIVISIONFDUPLICATE COMMUNICATION SECTIONFCOMMUNICATION SECTION MUST PRECEDE REPORT SECTIONFMORE THAN 11 DATA ITEMS IN INPUT CDFCD-NAME EXPECTEDF'INITIAL', 'INPUT' OR 'OUTPUT' EXPECTEDF'INPUT' EXPECTEDFINVALID QUEUE SPECIFICATIONF'DATE', 'TIME' OR 'COUNT' EXPECTEDF'LENGTH' EXPECTEDF'IS' OR DATA-NAME EXPECTEDF'OCCURS' EXPECTEDF'DESTINATION' EXPECTEDF'CLASS' EXPECTEDFNUMBER OF OCCURENCES IN DESTINATION TABLE MUST BE LESS THAN 51FMORE THAN ONE 'INITIAL' INPUT CDWCLAUSE PREVIOUSLY USEDF'INPUT' OR 'OUTPUT' EXPECTEDF'TERMINAL' OR CD-NAME EXPECTEDFINVALID PASSWORDF'MESSAGE' OR 'COUNT' EXPECTEDF'COUNT' EXPECTEDFMUST BE AN OUTPUT CDFMUST BE ALPHANUMERICFINVALID END INDICATORFDUPLICATE CD-NAMEF'FROM' OR 'WITH' EXPECTEDFMUST BE AN INPUT CDF'MESSAGE' or 'SEGMENT' expectedF'POINTER' EXPECTEDF'OVERFLOW' EXPECTEDF'DELIMITED BY' CLAUSE REQUIREDFMUST BE A CHANNEL NUMBERFCANNOT BE  AN EDITED ITEMFPOINTER, COUNTER OR TALLYING ITEM HAS TOO FEW DIGITSFRECEIVING ITEM CONTAINED IN CD-RECORDF'STATUS' EXPECTEDF'OR' OR 'INTO' EXPECTEDW'CANCEL' IS NOT IMPLEMENTED YET -- THIS SENTENCE IGNOREDFTHIS SECTION IS OUT OF ORDERFSCHEMA NAME MAY NOT ALSO BE A RESERVED WORD OR DATA NAME OR PROGRAM IDFDUPLICATE CONTROL HEADING GROUP FOR THIS IDENTIFIERFDUPLICATE CONTROL FOOTING GROUP FOR THIS IDENTIFIERFCOLUMN NUMBER MUST BE GREATER THAN PREVIOUS ONE IN REPORT LINEF'SOURCE' OR 'VALUE' OR (FOR CONTROL FOOTING ONLY) 'SUM' CLAUSE REQUIREDFRESET CLAUSE NOT ALLOWED AT GROUP LEVELFGROUP INDICATE CLAUSE NOT ALLOWED AT GROUP LEVELFCOLUMN NUMBER ILLEGAL AT GROUP LEVELF'SOURCE' OR 'SUM' OR 'VALUE' CLAUSE NOT ALLOWED AT GROUP LEVELF'NEXT GROUP' CLAUSE ALLOWED ONLY AT AN 01 GROUP LEVELF'RESET FINAL' CLAUSE ALLOWED ONLY IF THERE IS A 'CONTROL FINAL'F'GROUP INDICATE' CLAUSE ALLOWED ONLY FOR TYPE DETAILFCONTROL FOOTING LINE NUMBER MUST BE FROM  FIRST DETAIL TO FOOTING INCLUSIVEFCONTROL HEADING OR DETAIL LINE NUMBER MUST BE FROM FIRST DETAIL TO LAST DETAIL INCLUSIVEFPAGE HEADING LINE NUMBER MUST BE FROM HEADING TO FIRST DETAIL INCLUSIVEFREPORT HEADING OR REPORT FOOTING LINE NUMBER MUST BE FROM HEADING TO PAGE-LIMIT INCLUSIVEFPAGE FOOTING LINE NUMBER MUST BE FROM FOOTING TO PAGE-LIMIT INCLUSIVEFRECORD MUST BE IN A SORT FILEFHEADING MUST BE .LE. TO FIRST DETAILFFIRST DETAIL MUST BE .LE. TO LAST DETAILFLAST DETAIL MUST BE .LE. TO FOOTINGFCOPY NOT ALLOWED WITHIN A LIBRARYFNOT ALLOWED IN LINKAGE SECTIONFSUBSCRIPT MAY NOT BE IN LINKAGE SECTIONFSUBSCRIPTED SUBSCRIPT NOT ALLOWEDWLEFT-MOST TRUNCATIONFTHERE MUST BE A LINE CLAUSE WITH OR BEFORE THE FIRST COLUMN CLAUSE IN A REPORT GROUP.WMOST SIGNIFICANT DIGITS TRUNCATEDWLEAST SIGNIFICANT DIGITS TRUNCATEDALEFT-MOST TRUNCATION ONARIGHT-MOST TRUNCATION ONAMOST SIGNIFICANT DIGITS TRUNCATED ONALEAST SIGNIFICANT DIGITS TRUNCATED ONAZEROES PUT INTOFCONFLICTS WITH A USE PROCEDURE IN SECTIONFCLASS CONFLICTS WITH CLASS OF LITERAL SPECIFIED AS
VALUE FOR CONDITION NAMEFUSAGE MUST BE 'INDEX'.FCLASS MUST BE ALPHANUMERIC.FWRONG SIZE FOR THIS ITEM.FUSAGE MUST BE 'DISPLAY'.FCLASS MUST BE NUMERIC.FCAN NOT HAVE ANY DECIMAL PLACES.FCAN NOT BE IN THE LINKAGE SECTION.FCAN NOT BE IN THE FILE SECTION.FCAN NOT HAVE A JUSTIFIED CLAUSE.FCAN NOT BE EDITED.FCAN NOT BE SUBSCRIPTED.FBLANK WHEN ZERO NOT ALLOWED.FMUST NOT BE SIGNED.FMAY NOT BE USED AS A FILE STATUS ITEM.FILLEGAL CANCEL OF INTERNAL ENTRYFEBCDIC FILES MAY NOT HAVE NON-STANDARD LABELSWCAN NOT FOLLOW A LEVEL 77 ITEM - ASSUMING LEVEL 01WMAXIMUM COMPARE LENGTH OF 2047 CHARACTERS IS EXCEEDEDFCOBOL REGRETS THAT NEITHER A NON-NUMERIC LITERAL NOR A LONG NUMERIC LITERAL NOR A FIGURATIVE CONSTANT MAY BE USED TO IDENTIFY A RECORD TO BE RETAINEDFPLEASE UNDERSTAND THAT WHEN IDENTIFYING A RECORD OF A SEQUENTIAL OR RANDOM FILE TO BE RETAINED, A COMP VALUE MUST BE USEDFA DATA NAME OR LITERAL USED TO IDENTIFY A RECORD OF AN INDEXED FILE TO BE RETAINED MUST MATCH THE SYMBOLIC KEY OF THE FILE IN USAGE AND SIZEFCOBOL REGRETS THAT ONLY SIXTEEN FILES MAY BE OPENED BY A SINGLE OPEN STATEMENTFFILES BEING OPENED FOR SIMULTANEOUS UPDATE MUST BE OPENED FOR INPUT-OUTPUT (I-O)WTHE PRESENCE OF A FOR CLAUSE ALONE DOES NOT OPEN A FILE FOR SIMULTANEOUS UPDATE; AN OTHERS CLAUSE IS REQUIREDFRELATIVE INDEXING IS NOT ALLOWED ON DYNAMICLY SUBSCRIPTED STRING/UNSTRING ITEMS.FRECEIVING ITEM MAY NOT BE EDITED OR JUSTIFIED.FINVALID RECORDING MODE.FBOTH 'WRITE ADVANCING' AND 'WRITE POSITIONING' CLAUSES ARE USED ON THIS FILE.FIDENTIFIER OR NUMERIC LITERAL EXPECTED.FONLY 'AFTER POSITIONING' IS ALLOWED.FPOSITIONING ITEM MUST BE DESCRIBED BY 'PIC X'.FMUST BE AN INTEGER IN THE RANGE 0 - 3.FALL RECORDS IN A FILE WHOSE RECORDING MODE IS F MUST BE THE SAME SIZE.FONLY DENSITIES OF 800 OR 1600 BPI ARE ALLOWED WITH STANDARD ASCII.WTHIS REPORT GROUP WILL CAUSE BLANK LINES TO BE PRINTED SINCE IT CONTAINS A LINE CLAUSE BUT NO COLUMN CLAUSES.WMAXIMUM ALTERNATE AREAS EXCEEDED; SET TO MAXIMUM VALUE OF 62FVARIABLE IN THIS CONTEXT MUST BE DEFINED IN SUB-SCHEMAWMAXIMUM OF 1023 CHARACTERS WILL BE ACCEPTEDWROUNDING IGNOREDFWITH SEQUENCE CHECK EXPECTEDF'OCCURS' MAXIMUM OF 32,767 EXCEEDEDFTRANSACTION-NAME EXPECTEDFACTUAL KEY REQUIRED ONLY FOR RANDOM FILESFBYTE AND BINARY MODE NOT BOTH ALLOWEDFHAS A DEPENDING VARIABLE NOT DECLARED IN AN ENTRY OR PD USING CLAUSE.FLINKAGE subscripts must be USAGE COMP with fewer than 11 digits, and may not have an additiveWSequenced (/S) source file assumed.FMaximum of 18 decimal places exceededFIllegal for this dataname to have a scaling factorF'==' expected.WDevice missing -- TTY assumedFLIBRARY file not foundFCorresponding END DECLARATIVES not seenWRerun count maximum of 65535 assumedFKEY not contained in sort-file.WDISPLAY-6, DISPLAY-7 oR DISPLAY-9 expected -- DISPLAY-6 assumedFThis item may not have a depending variable.FSORT KEY must not contain an OCCURS clauseFRecord size must match RECORD CONTAINS clause in FD of file whose recording mode is FFIdentifier or non-numeric literal expected.FIdentifier, non-numeric literal, or "SIZE" expected.WIncorrect and ambiguous syntax.WPeriod ignored.WRECORD CONTAINS clause does not match max. record size, RECORD CONTAINS clause IGNORED.FBLOCK CONTAINS character count too small, FILE IS UNBLOCKED.(
:Q:T:X:[:]:`:d:g:j:m:q:t:x:z:~:::::
:
::::::!:&:*:.:2:4:6:;:>:C:F:K:M:R:U:X:\:_:a:c:f:j:m:o:t:}::::
::::::!:':+:.:4:6:::?:C:G:J:N:Q:U:Y:\:_:c:f:h:j:l:o:s:v:y:|:::
:::::::#:&:):+:/:1:3:6:8:::<:?:C:H:J:L:O:R:T:W:Z:\:e:d:h:j:l:o:q:s:x:|::::
::::::!:%:':(:,:3:9:>:A:E:G:J:Q:T:W:Z:\:_:b:d:g:i:l:p:r:t:w:|:~:::
:::::::!:&:,:1:6:?:H:L:Q:U:Z:\:c:o:w:|:	:	:	
:	:	:	:	:	#:	):	8:	=:	?:	B:	D:	I:	Q:	X:	a:	k:	w:	|:
:
:
	:
:
:
:
:
:
":
%:
0:
5:
;:
@:
B:
E:
G:
J:
N:
R:
W:
[:
]:
a:
e:
m:
q:
v:
y:
::::::::!:%:*:.:2:::?:A:F:K:O:S:X:^:c:h:m:r:w:|:
:
:
:
:
:
:
:
 :
%:
':
):
+:
0:
5:
8:
;:
@:
D:
I:
N:
P:
S:
W:
\:
_:
e:
i:
n:
q:
u:
{:
:::
::::":(:,:1:7:<:?:D:F:K:N:P:T:X:[:_:i:l:p:t:w:y:{::::::::::":(:*:,:/:4:8:::<:A:F:J:M:S:U:W:]:a:f:j:l:q:s:v:z:|:::::
::::::: :":%:':):,:/:2:4:7:::=:@:F:J:L:N:T:W:_:d:j:p:x:|:::
::::%:.:6:?:G:J:N:S:W:Z:^:b:f:h:q:u:y:{:~:::::":':):1:6:::?:C:J:Q:]:c:i:n:p:s:w:z:~::
::::!:#:&:):-:1:5:;:@:E:N:R:X:[:]:fp:``,~?`}+H},~:zf+,>
F!`X(y,+'z
,^+
F`H+FF+FFF(y,$,^+3(,(>`#7=,5H4,^,^,#+#4:<&:Q\x6@,8[x.(+(>+HnHz:+@+A-"C+S-"C+S,~ B <,>
&*
"n
&,&INXP+g
 6&8.:)Z}=vJ  \PXBP s5VO 68VP\!8K8@z Vf+h,p++S$INX~+S * 
) 04T^ PX!6K8@x
<+\(,[+f,0.,*lV
&/ ,@
&1 <% \n u+e,l :,>/*+^,l =+d
&=+a
&A ,@+a,g & J $< P.&,[+)3&+m,)+k n1T#,~,g+v,[+|aP+x,4~,O (,87D E6@,8`|`+y+s (,8 *,~4@AB (,8 *,~ G,>+~OAB,g MZX<*<h+,[+~4p~ I,>4I,O4I04z0t+ L,>,>,[+,W,^ N,>(N.( ,8 (,82O,% (,8 ,>4H,80H+> (,8,8,8+,+ Q,>+,% (,8 (,8=jC (,8 * T+i (,8 (,8=
C V,>4V,O (,84W+O /0:,~ W,b,3.1:++ (,8<j1 (,8+) (,8 *,~ (,8 (,8 (,8 (+8.(?`~+;6AB
"H},~f+9
&X&$	`4HC,8+> [4HC.(
"`vp+@,~!`,G (,8,8!` \.(,8`vp+G,~ \`vp4HK.(,8avp,~+L!8@54R (,8#`&4)V~5TR 6)V1V,~ (X,8+Sap+Y ^+Z4^ T|,>4_+J?`+^:x,~D+\
DaP@+]
&_	b
+^ ..(,8=nca|p+3,6+b (0J,8 g,>,l i,> *,~!0X4j67[,7avp,~5Hm,~ k,>7l,75Hr m,> ,D (.,8 p,> n,8 r,> ,m *,+HrHsHtHuHvHwHxHyHzH{H|H}H~HHHH]nH18 JgH1
@KI$@2MaJ~H1
@NM&fH1	0P[:.H1@QG>vH1SeC>H1TK?H1VC3$@ WKc$@ YmfH1 ZY'$@ \i>H1`]inH1`_M2~H1
@`eH1 bGCNH1pcQ2&H1ekN.H1fI
&H1%@hG$@
@iGJ6H1~LH<q\Pt'?CATASTROPHE IN PHASE , DUMP BEING TAKEN
PLEASE PRINT DSK:.DMP, AND SUBMIT
A MACHINE READABLE COPY OF THE SOURCE FILE WITH AN SPR
 - NOT FOUND

H8 - FOUND EMPTY

H;?CAN NOT INITIALIZE THE DISK FOR DUMP
?CAN NOT OPEN DUMP FILE:  HENDIT OPERATOR
HEDIAG #HH( WITH ADDED DATA HJ, FROM PHASE HL
PWHICH ISN'T HEREHO****** CONTINUATION OF HR LINE HU4H
hERROR WHILE WRITING DUMP FILE
H$
H
FLOTAB+H]
<ERROR READING SCRATCH FILE
TYPE 'CONTINUE' TO IGNORE ERROR
****** Hf ******

HgCOBOL-68 VERSION HiHp [Hl -- DUMPED IN PHASE Hm OF PROGRAM HpFILTAB+DATAB+CONTAB+LITAB+PROTAB+EXTAB+VALTAB+MNETAB+TODAYTALLYSPACEZEROQUOTEHIGH-VALUELOW-VALUEALL********************