@portll/cobolwork 0.3.0 → 0.4.0
This diff represents the content of publicly available package versions that have been released to one of the supported registries. The information contained in this diff is provided for informational purposes only and reflects changes between package versions as they appear in their respective public registries.
- package/README.md +19 -9
- package/lib/cics-commands.mjs +308 -42
- package/lib/consequence.mjs +6 -0
- package/lib/dataflow.mjs +54 -23
- package/lib/explain.mjs +31 -5
- package/lib/exploitability.mjs +49 -4
- package/lib/gate.mjs +31 -9
- package/lib/kernel/findings.mjs +2 -0
- package/lib/kernel/registry.mjs +2 -0
- package/lib/kernel/source-tree.mjs +1 -0
- package/lib/options.mjs +6 -2
- package/lib/packs.mjs +4 -0
- package/lib/parser.mjs +67 -12
- package/lib/precompile-cics.mjs +9 -3
- package/lib/precompile.mjs +3 -2
- package/lib/revision.json +1 -1
- package/lib/sarif.mjs +3 -2
- package/lib/scan.mjs +2 -1
- package/lib/sets/abend.mjs +148 -0
- package/lib/sets/compile.mjs +2 -1
- package/lib/sets/hidden.mjs +1 -1
- package/lib/sets/jcl.mjs +1 -0
- package/lib/sets/recon.mjs +1 -0
- package/lib/utilities.mjs +2 -0
- package/lib/verify.mjs +2 -1
- package/lib/words.mjs +377 -17
- package/package.json +1 -1
- package/rules/compliance-cobit2019.json +48 -0
- package/rules/compliance-dora.json +52 -0
- package/rules/compliance-ffiec.json +52 -0
- package/rules/compliance-nist80053.json +52 -0
package/lib/words.mjs
CHANGED
|
@@ -10,23 +10,383 @@
|
|
|
10
10
|
// licensed on the project's own terms rather than on another project's. See LICENSING.md.
|
|
11
11
|
//
|
|
12
12
|
// Attested by, retrieved 2026-09-24:
|
|
13
|
-
// ACUCOBOL-GT Appendices v9.0.1, Appendix B "ACUCOBOL-GT Reserved Words" and Appendix F
|
|
14
|
-
//
|
|
15
|
-
//
|
|
16
|
-
//
|
|
17
|
-
//
|
|
18
|
-
//
|
|
19
|
-
//
|
|
20
|
-
//
|
|
21
|
-
//
|
|
22
|
-
//
|
|
23
|
-
//
|
|
24
|
-
//
|
|
25
|
-
//
|
|
26
|
-
//
|
|
27
|
-
//
|
|
28
|
-
//
|
|
29
|
-
//
|
|
13
|
+
// ACUCOBOL-GT Appendices v9.0.1, Appendix B "ACUCOBOL-GT Reserved Words" and Appendix F
|
|
14
|
+
// "Intrinsic Functions"; ACUCOBOL-GT Reference Manual v8.1.3; Appendices, ACUCOBOL-GT v8.1.3;
|
|
15
|
+
// RM/COBOL Language Reference Manual, Second Edition (Version 12, Liant Software), Appendix A
|
|
16
|
+
// "Reserved Words"; RM/COBOL Language Reference Manual Version 8.0 - ACUCOBOL-GT Appendices
|
|
17
|
+
// v9.0.1, Appendix B.2 Reserved Word List (primary source for ACUCOBOL words); ACUCOBOL-GT
|
|
18
|
+
// Appendices v9.0.1, Appendix B.1 Conventions (the dialect-marker legend); ACUCOBOL-GT
|
|
19
|
+
// Appendices v9.0.1, Appendix F.2.1 Function Definitions (intrinsic function table); ACUCOBOL-GT
|
|
20
|
+
// Appendices v9.0.1 WebWorks page manifest; its section titles "F.n <NAME> Function"
|
|
21
|
+
// independently name every intrinsic function; ACUCOBOL-GT User's Guide v9.0.1 section 2.2.9
|
|
22
|
+
// Reserved Word Options (-R2/-R8/-Ra/-Ri/-Rr/-Rs/-Rv: the compiler switches that correspond to
|
|
23
|
+
// the appendix markers); Appendices, ACUCOBOL-GT v8.1.3 (Micro Focus) - Appendix B Reserved
|
|
24
|
+
// Words and Appendix F Intrinsic Functions; second, independent extraction of the same two
|
|
25
|
+
// lists; Reference Manual, ACUCOBOL-GT v8.1.3 (Micro Focus) - special registers, SPECIAL-NAMES
|
|
26
|
+
// system-names, ACCEPT FROM DATE YYYYMMDD syntax; RM/COBOL Language Reference Manual, Second
|
|
27
|
+
// Edition (Version 12, Liant Software, copyright 1985-2008, as served by
|
|
28
|
+
// supportline.microfocus.com) - Appendix A Reserved Words, Table 37 Context-Sensitive Words,
|
|
29
|
+
// Tables 38-42 Nonreserved System-Names, and Chapter 1 Special Registers; RM/COBOL Language
|
|
30
|
+
// Reference Manual Version 8.0 (Liant Software) - Appendix A Reserved Words; cross-check of the
|
|
31
|
+
// v12 list
|
|
32
|
+
// CICS Transaction Server for z/OS Version 5 Release 3, Application Programming Reference
|
|
33
|
+
// (SC34-7402-00), Appendix H 'BMS-related constants' - Appendix H, BMS-related constants: Table
|
|
34
|
+
// 24 (DFHBMSCA) and Table 1 (DFHAID)
|
|
35
|
+
// Fujitsu BS2000 COBOL2000 V1.6 COBOL Compiler Reference Manual; Fujitsu BS2000 COBOL85 V2.3A
|
|
36
|
+
// Reference Manual (U3979-J-Z125-6-7600); FUJITSU Software NetCOBOL V11.0 Language Reference
|
|
37
|
+
// (B1WD-3304-02ENZ0(00), October 2014); Bull DPS7000/XTA NOVASCALE 7000 GCOS 7 COBOL85 Reference
|
|
38
|
+
// Manual (47 A2 05UL 04, November 1997) - COBOL2000 V1.6 Reference Manual, "COBOL words":
|
|
39
|
+
// reserved words, compiler-directive words, context-sensitive words, special registers
|
|
40
|
+
// (English); COBOL2000 V1.6 Sprachbeschreibung, "COBOL-Woerter" (German edition; fetched only to
|
|
41
|
+
// confirm the reserved words are the English COBOL words); COBOL2000 V1.6 Reference Manual,
|
|
42
|
+
// "Overview of intrinsic functions" (English); COBOL2000 V1.6 COBOL Compiler Reference Manual,
|
|
43
|
+
// full PDF (English): corroborates the HTML parse; implementor-name Table 8; ASSIGN device
|
|
44
|
+
// names; BS2000 COBOL85 V2.3A Reference Manual, U3979-J-Z125-6-7600 (English): reserved words
|
|
45
|
+
// table, special registers Table 2-5, implementor-names Table 3-1; FUJITSU Software NetCOBOL
|
|
46
|
+
// V11.0 Language Reference, B1WD-3304-02ENZ0(00), October 2014 (English): Appendix A List of
|
|
47
|
+
// Reserved Words, intrinsic functions, special registers, SPECIAL-NAMES function-names; Bull
|
|
48
|
+
// DPS7000/XTA NOVASCALE 7000 GCOS 7 COBOL85 Reference Manual, 47 A2 05UL 04, November 1997
|
|
49
|
+
// (English): Appendix A COBOL Reserved Words, special registers
|
|
50
|
+
// User Interface Programming, ACUCOBOL-GT Version 8.1.3 (Micro Focus,
|
|
51
|
+
// E-01-UI-100501-ACUCOBOL-GT-8.1.3); Reference Manual, ACUCOBOL-GT Version 8.1.3 (Micro Focus);
|
|
52
|
+
// Appendices, ACUCOBOL-GT Version 8.1.3 (Micro Focus); ACUCOBOL-GT User's Guide Version 9.0.1
|
|
53
|
+
// section 2.2.9 and Appendices Version 9.0.1 Appendix B.2; RM/COBOL Language Reference Manual,
|
|
54
|
+
// Second Edition (Version 12, Liant Software), Appendix A Table 37; RM/COBOL Language Reference
|
|
55
|
+
// Manual Version 8.0 (Liant Software), Appendix A Table A-1 - User Interface Programming,
|
|
56
|
+
// ACUCOBOL-GT 8.1.3 (form E-01-UI-100501-ACUCOBOL-GT-8.1.3). Primary source for this pass: 3.2
|
|
57
|
+
// Control Types, Handles, and IDs; 4.4 Styles and Special Properties; Chapter 5 Control Types
|
|
58
|
+
// Reference, whose per-control 5.n.1 Common Properties / STYLES and 5.n.2 Special Properties
|
|
59
|
+
// lists define every style and special property; 5.2 Global Styles; Chapter 6 Events Reference;
|
|
60
|
+
// and the manual index, which repeats each property as '<WORD>, <CONTROL-TYPE> style|special
|
|
61
|
+
// property <page>'; Reference Manual, ACUCOBOL-GT 8.1.3. Used for 5.8 Screen Section general
|
|
62
|
+
// format (5-92..5-94), 6.4.9 Common Screen Options (EVENT-LIST / AX-EVENT-LIST /
|
|
63
|
+
// EXCLUDE-EVENT-LIST at 6-34, MAX-HEIGHT / MAX-WIDTH / MIN-HEIGHT / MIN-WIDTH at 6-43), 6.6
|
|
64
|
+
// DISPLAY Formats 11 and 12 (window phrases MIN-SIZE, MAX-SIZE, MIN-LINES, MAX-LINES, NO-CLOSE
|
|
65
|
+
// at 6-186..6-196), and the ACCEPT ... FROM STANDARD OBJECT 'Object-Name / Resource' table at
|
|
66
|
+
// 6-92..6-93; Appendices, ACUCOBOL-GT 8.1.3. Appendix B Reserved Words (the list these words are
|
|
67
|
+
// missing from, and the source of the alphabet-heading letters), Appendix H Configuration
|
|
68
|
+
// Variables and Appendix I Library Routines (where STDIN, TIMESTAMP, WINAPI, XOR, STDOUT, STDERR
|
|
69
|
+
// turn out to live); ACUCOBOL-GT User's Guide 9.0.1, 2.2.9 Reserved Word Options. The -Rw entry
|
|
70
|
+
// is the vendor's own statement that control names and property names are NOT reserved words:
|
|
71
|
+
// 'This option also allows you to suppress some non-reserved words, such as control names (e.g.,
|
|
72
|
+
// "entry-field", "label") or property names (e.g., "max-text", "bitmap-number").'; ACUCOBOL-GT
|
|
73
|
+
// Appendices 9.0.1, Appendix B.2 Reserved Word List. Re-parsed here only as a negative control:
|
|
74
|
+
// 629 tokens harvested, and not one of the 86 words attested below appears in it; RM/COBOL
|
|
75
|
+
// Language Reference Manual, Second Edition (Version 12, Liant Software, copyright 1985-2008, as
|
|
76
|
+
// served by supportline.microfocus.com), Appendix A, Table 37 'Context-Sensitive Words' - the
|
|
77
|
+
// table that attests BACKGROUND, CASE-INSENSITIVE, END-COPY, END-REPLACE, FOREGROUND, TRIMMED,
|
|
78
|
+
// WHILE; RM/COBOL Language Reference Manual Version 8.0 (Liant Software). Appendix A, Table A-1
|
|
79
|
+
// 'Context-Sensitive Words', which carries BACKGROUND, CASE-INSENSITIVE, FOREGROUND and TRIMMED
|
|
80
|
+
// but not END-COPY, END-REPLACE or WHILE
|
|
81
|
+
// Adjudication of the 21 residue words against the first pass's 230-file corpus plus newly
|
|
82
|
+
// searched vendor documentation. Documents relied on: ACUCOBOL-GT 8.1.3 User Interface
|
|
83
|
+
// Programming, 8.1.3 Reference Manual, 8.1.3 Appendices and 9.0.1 Appendices Appendix B.2
|
|
84
|
+
// Reserved Word List; Heirloom Computing Elastic COBOL Language Reference Manual Appendix
|
|
85
|
+
// (August 2012); Micro Focus Visual COBOL 9.0 Reserved Words Table and Context-sensitive Words
|
|
86
|
+
// Table; IBM Enterprise COBOL for z/OS 6.4 'Reserved words'; IBM COBOL for VSE/ESA Language
|
|
87
|
+
// Reference SC26-8073-02 Table 48; Veryant isCOBOL Evolve 2021R2 Appendix D 'Intrinsic
|
|
88
|
+
// Functions' and isCOBOL Evolve 2023 R1 Overview; RM/COBOL Language Reference Manual, Second
|
|
89
|
+
// Edition (Version 12, Liant Software); Unisys COBOL ANSI-85 Programming Reference Manual Vol.1
|
|
90
|
+
// (86001518-307); ISO/IEC 1989:20xx CD 1.2 (2009-08-23); COBOL Consortium (Japan) summary of
|
|
91
|
+
// ISO/IEC 1989:2023 - ACUCOBOL-GT 8.1.3 User Interface Programming, ch.5 FRAME 'special
|
|
92
|
+
// properties': the LOW-COLOR property definition entry at 5-70 and the index entry 'LOW-COLOR,
|
|
93
|
+
// FRAME special property 5-70'; Heirloom Computing, Elastic COBOL Language Reference Manual
|
|
94
|
+
// Appendix (rev. August 2012): FRAME 'Properties Table' p.69 with columns
|
|
95
|
+
// Name/MODIFY/INQUIRE/Descriptions, the BAR 'Properties Table', and the copybook constants list
|
|
96
|
+
// (FP-*, BRS-*); Micro Focus Visual COBOL 9.0, Context-sensitive Words Table: the full GUI
|
|
97
|
+
// property-word set including every BITMAP-prefixed word, TRANSPARENT-COLOR, DOT-DASH and
|
|
98
|
+
// NO-TAB; Micro Focus Visual COBOL 9.0, Reserved Words Table: METACLASS, UNEQUAL, and the
|
|
99
|
+
// BINARY-CHAR/-SHORT/-LONG/-DOUBLE usage set; IBM Enterprise COBOL for z/OS 6.4, appendix
|
|
100
|
+
// 'Reserved words': EGCS, and the BINARY-CHAR/-SHORT/-LONG/-DOUBLE usage set; IBM COBOL for
|
|
101
|
+
// VSE/ESA Language Reference, SC26-8073-02, Table 48 'Reserved Words' p.454: the sequence AREA,
|
|
102
|
+
// AREA-VALUE, AREAS; ACUCOBOL-GT 9.0.1 Appendices, Appendix B.2 Reserved Word List: 624 distinct
|
|
103
|
+
// words, containing no GUI property names at all; ACUCOBOL-GT 8.1.3 Reference Manual, Procedure
|
|
104
|
+
// Division relation-condition general format '{ IS UNEQUAL TO obj-item }' at 6-222; Veryant
|
|
105
|
+
// isCOBOL Evolve 2021R2, Appendix D 'Intrinsic Functions': the complete table of all 66
|
|
106
|
+
// intrinsic functions isCOBOL provides; Veryant isCOBOL Evolve 2023 R1 Overview: the only
|
|
107
|
+
// literal 'Content-Length' in the entire corpus, an HTTP response header inside a logged SOAP
|
|
108
|
+
// trace; RM/COBOL Language Reference Manual, Second Edition (Version 12, Liant Software,
|
|
109
|
+
// copyright 1985-2008, as served by supportline.microfocus.com): ACCEPT/FULL prose using the
|
|
110
|
+
// phrase 'field terminator'; ACUCOBOL-GT 8.1.3 Appendices: the line-drawing figure enumeration
|
|
111
|
+
// whose item 10 reads 'missing right line'; Unisys COBOL ANSI-85 Programming Reference Manual
|
|
112
|
+
// Vol.1 (86001518-307): VREADTIMER prose 'the ACCEPT statement with the TIMER option for the
|
|
113
|
+
// microsecond timer'; COBOL Consortium (Japan), overview of the new features of the 2023 edition
|
|
114
|
+
// of the COBOL international standard; the only new word-like items it names are SHIFT-L,
|
|
115
|
+
// SHIFT-LC, SHIFT-R, SHIFT-RC; ISO/IEC 1989:20xx CD 1.2 dated 2009-08-23, full 910-page text
|
|
116
|
+
// (zip member STD.BK.pdf), searched for every candidate intrinsic-function name in this scope
|
|
117
|
+
// Bull DPS7000/XTA GCOS 7 COBOL 85 Reference Manual (47 A2 05UL Rev04, November 1997); FUJITSU
|
|
118
|
+
// Software NetCOBOL V11.0 Language Reference (B1WD-3304-02ENZ0(00), October 2014); Fujitsu
|
|
119
|
+
// BS2000 COBOL85 V2.3A Reference Manual (U3979-J-Z125-6-7600) and BS2000 COBOL2000 V1.6 COBOL
|
|
120
|
+
// Compiler Reference Manual; IBM Enterprise COBOL for z/OS V6.4 Language Reference
|
|
121
|
+
// (SC27-8713-03) with its IBM Docs 'SPECIAL-NAMES paragraph' and 'Reserved words' topics; HP
|
|
122
|
+
// COBOL II/XL Reference Manual (HP 3000 / MPE iX, doc id B3150090013); Heirloom Computing
|
|
123
|
+
// Elastic COBOL Language Reference Manual; Unisys COBOL ANSI-85 Programming Reference Manual
|
|
124
|
+
// Volume 1 (8600 1518-307, February 2003); HP COBOL Manual for TNS and TNS/R Programs
|
|
125
|
+
// (522555-006); ACUCOBOL-GT Reference Manual and Appendices v8.1.3; Micro Focus Visual COBOL 6.0
|
|
126
|
+
// COBOL Language Reference, 'Switch-Names'; COBOL Consortium of Japan, '2023 nen-ban COBOL
|
|
127
|
+
// kokusai kikaku no shin-kinou no gaiyou'; INCITS, 'Available Now - 2023 Edition of ISO/IEC
|
|
128
|
+
// 1989, COBOL' - Bull DPS7000/XTA GCOS 7 COBOL 85 Reference Manual, 47 A2 05UL Rev04 (Nov 1997):
|
|
129
|
+
// Appendix A 'COBOL Reserved Words' (pp. A-1..A-16 = PDF pp. 611-626), chapter 3 'System-Names',
|
|
130
|
+
// Appendix C 'The ANSI Flagger'; FUJITSU Software NetCOBOL V11.0 Language Reference,
|
|
131
|
+
// B1WD-3304-02ENZ0(00) (Oct 2014): 6.2 'Procedure Division Header' Format (p.238), 6.4.6 CALL
|
|
132
|
+
// statement Formats 1 and 2 (pp.277-279), Appendix A 'List of Reserved Words' (pp.684-704),
|
|
133
|
+
// SPECIAL-NAMES function-name-2 SWITCH-n rule (p.92); Fujitsu BS2000 COBOL85 V2.3A Reference
|
|
134
|
+
// Manual, U3979-J-Z125-6-7600: glossary entry 'Implementor-name' (p.21), Table 3-1
|
|
135
|
+
// 'Implementor-names and their meanings' (p.126), reserved-words list row 'USW-1...USW-31'
|
|
136
|
+
// (p.58); Fujitsu BS2000 COBOL2000 V1.6 COBOL Compiler Reference Manual: glossary entry
|
|
137
|
+
// 'Implementor-name', Table 8 'Implementor-names and their meanings' (6.2.3.1, pp.199-200); IBM
|
|
138
|
+
// Enterprise COBOL for z/OS V6.4 Language Reference, SC27-8713-03: OCCURS clause 'Format 2:
|
|
139
|
+
// variable-length tables' and the UNBOUNDED syntax-element description (p.203); ALLOCATE
|
|
140
|
+
// statement Format and 'LOC phrase' (pp.313-315); XML GENERATE statement Format,
|
|
141
|
+
// 'XML-DECLARATION phrase' and 'NAMESPACE and NAMESPACE-PREFIX phrases' (p.483ff); XML PARSE
|
|
142
|
+
// statement Format and 'VALIDATING phrase'; IBM Enterprise COBOL for z/OS 6.4, 'SPECIAL-NAMES
|
|
143
|
+
// paragraph': the environment-name-2 entry that states the UPSI range; IBM Enterprise COBOL for
|
|
144
|
+
// z/OS 6.4, appendix 'Reserved words' (one table; columns Word / Reserved / Standard only /
|
|
145
|
+
// Potential reserved words; 515 word rows) - the negative check for the IBM candidates; COBOL
|
|
146
|
+
// Consortium of Japan (COBOL ), '2023 COBOL ' by Wataru Takagi (Hitachi), 2024-10-08, updated
|
|
147
|
+
// 2025-05-16: item (3) names the four boolean shift operators added by ISO/IEC 1989:2023;
|
|
148
|
+
// INCITS, 'Available Now - 2023 Edition of ISO/IEC 1989, COBOL': reproduces the ISO/IEC
|
|
149
|
+
// 1989:2023 foreword 'main changes' list, which includes '- Boolean shifting operators'
|
|
150
|
+
// (corroborates the feature; does not name the words); Reference Manual, ACUCOBOL-GT v8.1.3:
|
|
151
|
+
// SPECIAL-NAMES paragraph, Syntax Rule 1 - the ACUCOBOL switch-name range (pp.4-6/4-7);
|
|
152
|
+
// Appendices, ACUCOBOL-GT v8.1.3: Appendix D 'List of Errors', messages 'Invalid switch number',
|
|
153
|
+
// 'Missing switch number' and 'Unknown switch' - each restates the SWITCH-1..SWITCH-26 range;
|
|
154
|
+
// Heirloom Computing, Elastic COBOL Language Reference Manual: SWITCH clause general rule 4,
|
|
155
|
+
// 'Certain aliases exist for the switches for compatibility with more platforms', and its
|
|
156
|
+
// Name/Synonyms table (PDF pp.144-145), which names UPSI-0 through UPSI-9; Unisys COBOL ANSI-85
|
|
157
|
+
// Programming Reference Manual Volume 1, 8600 1518-307 (Feb 2003): SPECIAL-NAMES switch-name
|
|
158
|
+
// clause - the Unisys SW1..SW8 range; HP COBOL Manual for TNS and TNS/R Programs, 522555-006:
|
|
159
|
+
// 'System-Name Clause With a STATUS Phrase' - the HP NonStop SWITCH-1..SWITCH-15 range; HP COBOL
|
|
160
|
+
// II/XL Reference Manual (HP 3000, MPE/iX 5.0 documentation, doc id B3150090013; 3kranger.com
|
|
161
|
+
// HTTrack mirror of docs.hp.com), 'SPECIAL-NAMES Paragraph': Table 6-1 'HP COBOL II Feature,
|
|
162
|
+
// Switch, and Device Names' with the Switch Name row 'SW0 through SW15', and the 'Software
|
|
163
|
+
// Switches' subsection; HP COBOL II/XL Reference Manual, Appendix F 'COBOL Reserved Word List',
|
|
164
|
+
// Table F-1 - negative check: the SWn switch-names are not in it; Micro Focus Visual COBOL 6.0
|
|
165
|
+
// COBOL Language Reference, 'Switch-Names' (Environment Division) - the Micro Focus switch
|
|
166
|
+
// numbering
|
|
167
|
+
// ISO/IEC 1989, Information technology - Programming languages, their environments and system
|
|
168
|
+
// software interfaces - Programming language COBOL. Re-derived from the three full draft texts
|
|
169
|
+
// reachable without a paywall: (1) ISO/IEC FCD 1989:2001 (E), Final Committee Draft, working
|
|
170
|
+
// document ISO/IEC/JTC 1/SC 22/WG 4 N 0147, 2001-01-15, 891 pp, circulated by the SC 22
|
|
171
|
+
// secretariat as SC 22 N 3204 - the draft of the edition published as ISO/IEC 1989:2002; (2)
|
|
172
|
+
// ISO/IEC 1989:20xx CD 1.2 (E), Committee Draft International Standard, 2009-08-23, 910 pp,
|
|
173
|
+
// distributed as std.zip by INCITS PL22.4 (formerly J4); and (3) ISO/IEC 1989:20xx FCD 1.0 (E),
|
|
174
|
+
// Final Committee Draft International Standard, 2010-07-13, 901 pp, circulated as SC 22 N 4561
|
|
175
|
+
// 'Text for FCD ballot or comment' - the latest full text on the track to ISO/IEC 1989:2014,
|
|
176
|
+
// fetched by this pass. Clause numbering of the published editions was confirmed against the
|
|
177
|
+
// official Contents-only previews of ISO/IEC FDIS 1989:2013, ISO/IEC 1989:2014 and ISO/IEC
|
|
178
|
+
// 1989:2023. - ISO/IEC FCD 1989:2001 (E) (WG4 N 0147), 891 pp: 8.9 Reserved words p.140, 8.10
|
|
179
|
+
// Context-sensitive words p.143, 8.12 Compiler-directive reserved words p.146, 8.2 Locales p.59
|
|
180
|
+
// and 8.2.1 Locale field names p.60, 14.7.11.2.5 Exception-names and exception conditions with
|
|
181
|
+
// Table 13 pp.401-405; ISO/IEC 1989:20xx CD 1.2 (E), 2009-08-23, 910 pp: 8.9 Reserved words
|
|
182
|
+
// p.154, 8.10 Context-sensitive words p.157, 8.12 Compiler-directive words p.161, 7.3.20 TURN
|
|
183
|
+
// directive p.58, 8.2 Locales p.65 and 8.2.1 Locale field names p.66, 14.6.12.1.5
|
|
184
|
+
// Exception-names and exception conditions with Table 14 pp.422-427, 14.6.12.2 Incompatible data
|
|
185
|
+
// p.427; NEW THIS PASS. SC 22 N 4561, 'Text for FCD ballot or comment', dated 2010-08-06,
|
|
186
|
+
// carrying the full ISO/IEC 1989:20xx FCD 1.0 (E) of 2010-07-13, 901 pp - the latest full draft
|
|
187
|
+
// text of the 2014 edition that is publicly reachable: 8.9 Reserved words p.156, 8.10
|
|
188
|
+
// Context-sensitive words p.159, 8.12 Compiler-directive words p.163, 14.6.12.1.5
|
|
189
|
+
// Exception-names and exception conditions with Table 14 p.426; ISO/IEC 1989:2014 official
|
|
190
|
+
// preview, cover plus Contents to p.xv: 8.9 Reserved words p.167, 8.10 Context-sensitive words
|
|
191
|
+
// p.170, 8.12 Compiler-directive words p.174, 11.9.7 FLOAT-BINARY clause and 11.9.8
|
|
192
|
+
// FLOAT-DECIMAL clause p.220. No word lists; ISO/IEC FDIS 1989:2013 (E) official preview, voting
|
|
193
|
+
// 2013-09-18 to 2013-11-18, served under the 2014 catalogue entry 51416; URL re-verified by
|
|
194
|
+
// sha256 this pass. Contents only, carrying 11.9.7 FLOAT-BINARY clause and 11.9.8 FLOAT-DECIMAL
|
|
195
|
+
// clause. No word lists; ISO/IEC 1989:2023 official preview, cover plus Contents to p.xv:
|
|
196
|
+
// 8.5.2.9 Message-tag category p.164, 8.9 Reserved words p.205, 8.10 Context-sensitive words
|
|
197
|
+
// p.209, 11.9.8 FLOAT-BINARY clause and 11.9.9 FLOAT-DECIMAL clause p.275. No word lists; INCITS
|
|
198
|
+
// PL22.4 (J4) 08-0116 (S-16), 'Candidate features for a future revision'. Cited only for the
|
|
199
|
+
// negative finding on EXCLUSIVE-OR; Archived INCITS PL22.4 (J4) document index, 2016 snapshot.
|
|
200
|
+
// Cited only for the negative findings on FLOAT-DECIMAL-7 and ENGRAVED. The first pass did not
|
|
201
|
+
// record the exact Wayback timestamp and web.archive.org answered 'Temporarily Offline' during
|
|
202
|
+
// this pass, so the URL is given in the date-prefix form; RM/COBOL Language Reference Manual,
|
|
203
|
+
// Second Edition (Version 12, Liant Software, copyright 1985-2008, as served by
|
|
204
|
+
// supportline.microfocus.com). Cited only for the negative finding on CURRENCY-SYMBOL, which
|
|
205
|
+
// occurs there solely inside the RUN-ATTR configuration keyword EDIT-CURRENCY-SYMBOL
|
|
206
|
+
// Micro Focus Visual COBOL 9.0 COBOL Language Reference, appendix "Context-sensitive Words
|
|
207
|
+
// Table" (topic id HRLHLHARES04), with the same manual's "Reserved Words Table"
|
|
208
|
+
// (HRLHLHARES01U005) and "Special registers" (HRLHLHCLANU020); Micro Focus Net Express 3.1
|
|
209
|
+
// Language Reference (Appendix D "Reserved Words", lrares.htm, and Chapter 2 "COBOL Language",
|
|
210
|
+
// lrclan.htm); and Micro Focus Server Express 6.0 Language Reference, "reuze" doc set
|
|
211
|
+
// (lhclan.htm). Micro Focus publishes these HTML topic sets without form numbers; the topic ids
|
|
212
|
+
// above are the documents' own DC.Identifier values. - Appendix: Context-sensitive Words Table
|
|
213
|
+
// (DC.Identifier HRLHLHARES04) - the table that attests all 181 words; Appendix: Reserved Words
|
|
214
|
+
// Table, with the dialect-code legend - checked as negative evidence: none of the 13 hunted
|
|
215
|
+
// registers, and none of the 181, is a row of it; Special registers, Table 1 (Visual COBOL 9.0)
|
|
216
|
+
// - read in full; ADDRESS OF, CURRENT-DATE, DEBUG-ITEM, JSON-CODE, JSON-STATUS, LENGTH OF,
|
|
217
|
+
// LINAGE-COUNTER, RETURN-CODE, SHIFT-IN, SHIFT-OUT, SORT-*, TALLY, TIME-OF-DAY, WHEN-COMPILED,
|
|
218
|
+
// XML-* only; Net Express 3.1 Language Reference, Appendix D: Reserved Words - the file cited
|
|
219
|
+
// for 7 words; the string is an unrendered HTML comment at the head of D.3 and is NOT used as
|
|
220
|
+
// attestation; Net Express 3.1 Language Reference, Chapter 2 COBOL Language - 2.2.4.6 Special
|
|
221
|
+
// Registers (12-row table) and 2.2.4.7 Predefined Object Identifiers; fetched by this pass as
|
|
222
|
+
// negative evidence for the 13; Server Express 6.0 ('reuze') Language Reference, COBOL Language
|
|
223
|
+
// chapter - Table 2: Special Registers (22 rows); fetched live by this pass as negative evidence
|
|
224
|
+
// for the 13
|
|
225
|
+
// GnuCOBOL Programmer’s Guide, for GnuCOBOL 3.2 (15 January 2023 build), Gary L. Cutler and
|
|
226
|
+
// Vincent B. Coen - 8.1.11 CONCAT and CONCATENATE, 8.1.58 MODULE-CALLER-ID, 8.1.61 MODULE-ID,
|
|
227
|
+
// 8.1.63 MODULE-SOURCE (Intrinsic Functions); 7.7 Special Registers (NUMBER-OF-CALL-PARAMETERS);
|
|
228
|
+
// 7.8.1.5 ACCEPT FROM DATE/TIME (MICROSECOND-TIME); 7.7 Special Registers and Appendix C1
|
|
229
|
+
// Internal registers (COB-CRT-STATUS); 8.1.59, 8.1.60, 8.1.62, 8.1.64 and Appendix C2 Intrinsic
|
|
230
|
+
// Functions (MODULE-DATE, MODULE-FORMATTED-DATE, MODULE-PATH, MODULE-TIME); 8.1.88, 8.1.89 and
|
|
231
|
+
// Appendix C2 (SUBSTITUTE, SUBSTITUTE-CASE); 5.1.3 SPECIAL-NAMES rule 14 and Appendix C4 System
|
|
232
|
+
// names: device (STDIN, STDOUT, STDERR); Appendix C1 Common reserved words (B-SHIFT-L,
|
|
233
|
+
// B-SHIFT-R, B-SHIFT-LC, B-SHIFT-RC, NOTHING, NONNUMERIC, NESTED, FLOAT-INFINITY, PHYSICAL,
|
|
234
|
+
// ACTIVATING, TOP-LEVEL, CURRENT, STACK, ANUM, HEX, NAT, FLOAT-NOT-A-NUMBER, PASCAL, STDCALL);
|
|
235
|
+
// An earlier build of the same guide, which attests five of the seven; CONCAT and
|
|
236
|
+
// MICROSECOND-TIME postdate it
|
|
237
|
+
// IBM Enterprise COBOL for z/OS, V6.4 Language Reference (SC27-8713-03, seventh edition, 28
|
|
238
|
+
// April 2026 update) - Special registers; Intrinsic functions; Function definitions (Table of
|
|
239
|
+
// functions); SPECIAL-NAMES paragraph (Meanings of environment names); WRITE for sequential
|
|
240
|
+
// files (channel environment-names); DEBUG-ITEM special register; Enterprise COBOL for z/OS 6.4
|
|
241
|
+
// Language Reference, complete PDF (SC27-8713-03); Text rendering of the PDF, used for
|
|
242
|
+
// cross-checking only
|
|
243
|
+
// IBM Enterprise COBOL for z/OS, Version 6.4, Language Reference -- appendix "Reserved words"
|
|
244
|
+
// (form number SC27-8713-03, not attested in the fetched bytes) - Reserved words
|
|
245
|
+
// IBM COBOL for AIX 5.1 Language Reference (SC27-5403-00) and its IBM Docs "Reserved words"
|
|
246
|
+
// appendix; IBM COBOL for Linux on x86 1.1/1.2 Language reference (SC28-3117-01) and its
|
|
247
|
+
// "Reserved words" appendix; IBM COBOL for VSE/ESA Language Reference Release 1 (SC26-8073-02)
|
|
248
|
+
// Appendix D; Enterprise COBOL for z/OS Compiler and Runtime Migration Guide V3R4 (GC27-1409-04)
|
|
249
|
+
// Appendix B and Enterprise COBOL for z/OS 6.4 Migration Guide (GC27-8715-03) Appendix B, whose
|
|
250
|
+
// reserved-word comparison tables attest IBM COBOL, VS COBOL II and OS/VS COBOL; IBM VS COBOL
|
|
251
|
+
// for OS/VS Release 2.4 (GC26-3857-3) - IBM COBOL for AIX 5.1 - Appendix "Reserved words" (Table
|
|
252
|
+
// 1), raw HTML table, 512 word rows; IBM COBOL for Linux on x86 1.1 - Appendix "Reserved words"
|
|
253
|
+
// (Table 1), 515 word rows; IBM COBOL for Linux on x86 1.2 - Appendix "Reserved words" (Table
|
|
254
|
+
// 1), 515 word rows; COBOL for AIX Language Reference V5.1, SC27-5403-00 - "Special registers"
|
|
255
|
+
// (p.16-48), "Function-names"/Table 58 table of functions and Chapter 22 function sections,
|
|
256
|
+
// Table 6 "Meanings of environment names" (p.114), Appendix F "Reserved words" (Table 66); IBM
|
|
257
|
+
// COBOL for Linux on x86 1.2 Language reference, SC28-3117-01 - "Special registers", Part 7
|
|
258
|
+
// intrinsic-function chapters, Table 5 "Meanings of environment names" (p.98), "Reserved words"
|
|
259
|
+
// appendix; Enterprise COBOL for z/OS Compiler and Runtime Migration Guide V3R4, GC27-1409-04 -
|
|
260
|
+
// Appendix B "COBOL reserved word comparison", Table 46 (PDF pages 266-283 = book pages
|
|
261
|
+
// 245-262): one row per word, columns Enterprise COBOL / IBM COBOL / VS COBOL II / OS/VS COBOL;
|
|
262
|
+
// Enterprise COBOL for z/OS 6.4 Migration Guide, GC27-8715-03 - Appendix B "COBOL reserved word
|
|
263
|
+
// comparison", Table 55 (PDF pages 328-350), same four columns; used as the second edition of
|
|
264
|
+
// the same table and to adjudicate two disagreements with GC27-1409-04; IBM COBOL for VSE/ESA
|
|
265
|
+
// Language Reference Release 1, SC26-8073-02 - Appendix D "Reserved Words", Table 48 (7 pages,
|
|
266
|
+
// two column-groups per page: COBOL/VSE | Standard Only | RFD); also "Special Registers" (p.8ff)
|
|
267
|
+
// and Table 4 "Meanings of Environment Names"; IBM VS COBOL for OS/VS Release 2.4, GC26-3857-3
|
|
268
|
+
// (the OS/VS COBOL language manual; scanned IBM publication with an OCR text layer, mirrored by
|
|
269
|
+
// bitsavers) - "Reserved words" (book p.15, the six types incl. special registers), APPLY
|
|
270
|
+
// CORE-INDEX format (book p.369), special register LABEL-RETURN (book p.375), FIPS-flagging
|
|
271
|
+
// lists of special registers (book p.343/348), Appendix F "OS/VS COBOL Reserved Word List". Used
|
|
272
|
+
// for adjudication and for two words only, never as a bulk source, because OCR corrupts digits
|
|
273
|
+
// (SKIP1 -> "SKIPI", C01 -> "COl", UPSI-0 -> "UPSI-O")
|
|
274
|
+
// IBM interface-block field definitions: CICS TS 6.x 'EIB fields including EIBRESP and EIBRESP2'
|
|
275
|
+
// and Data Areas 'EIB - EXEC interface block' (DFHEIBLK); IMS 15.4 Application Programming
|
|
276
|
+
// 'Specifying the DL/I interface block (DIB)'; Db2 13 for z/OS SQL Reference 'The included
|
|
277
|
+
// SQLCA', 'Description of SQLCA fields', 'The included SQLDA' and 'SQLDA field descriptions' -
|
|
278
|
+
// CICS TS 6.x: EIB fields including EIBRESP and EIBRESP2 (29 EIB fields, COBOL PICTURE per
|
|
279
|
+
// field); CICS TS Data Areas: EIB - EXEC interface block (DFHEIBLK layout, offsets, reserved
|
|
280
|
+
// fields); CICS TS 5.3: EIB fields (cross-check of the same 29 names and pictures); CICS TX
|
|
281
|
+
// 10.1: EXEC interface block (EIB) fields (adds EIBLABEL, COBOL-only); TXSeries for
|
|
282
|
+
// Multiplatforms 11.1: EXEC interface block (EIB) fields (second attestation of EIBLABEL); IBM
|
|
283
|
+
// APAR PI88564 (CICS standalone translator for COBOL): DFHEIGDI, EIBCPOSN, EIBCALEN generated
|
|
284
|
+
// COMP/COMP-5; CICS TS 5.6: COBOL translation output (copybooks DFHEIBLK and DFHEIBLC); IMS 15.4
|
|
285
|
+
// Application Programming: Specifying the DL/I interface block (DIB) - COBOL variable names and
|
|
286
|
+
// PICTUREs; IMS 13 Application Programming: Specifying the DIB (older edition - shows the
|
|
287
|
+
// fillers absent from the COBOL list); Db2 13 for z/OS SQL Reference: The included SQLCA (COBOL
|
|
288
|
+
// declaration generated by INCLUDE SQLCA); Db2 13 for z/OS SQL Reference: Description of SQLCA
|
|
289
|
+
// fields (per-field data types; SQLCADE note); Db2 13 for z/OS SQL Reference: The included SQLDA
|
|
290
|
+
// (COBOL declaration generated by INCLUDE SQLDA); Db2 13 for z/OS SQL Reference: SQLDA field
|
|
291
|
+
// descriptions
|
|
292
|
+
// Intrinsic functions of COBOL across editions and vendors, re-derived from: IBM Enterprise
|
|
293
|
+
// COBOL for z/OS 6.4 Language Reference (SC27-8713) and 6.2/6.3/6.4 What's New; Micro Focus
|
|
294
|
+
// COBOL Language Reference (Visual COBOL 3.0 PU12 and reuze 60d); ACUCOBOL-GT 10.0.1 Reference
|
|
295
|
+
// Manual Appendix F; FUJITSU Software NetCOBOL V11.0 User's Guide B1WD-3306-01ENZ0 Appendix D;
|
|
296
|
+
// Veryant isCOBOL Evolve 2021R2 Appendix D; NIST SP 500-203 (ANSI X3.23A-1989 intrinsic function
|
|
297
|
+
// addendum); INCITS announcement of ISO/IEC 1989:2023 with the third edition's change list;
|
|
298
|
+
// ISO/IEC 1989:2014 and :2023 free previews - Enterprise COBOL for z/OS 6.4 Language Reference,
|
|
299
|
+
// Part 7 'Intrinsic functions' (one child topic per function, each named and defined);
|
|
300
|
+
// '2002/2014 COBOL Standard features implemented in Enterprise COBOL V3 or later' - rows 'New
|
|
301
|
+
// intrinsic functions' and 'Support for industry standard date and time formats'; 'IBM
|
|
302
|
+
// extensions and COBOL standards' - list of functions that are extensions to the 85 COBOL
|
|
303
|
+
// Standard; Enterprise COBOL 6.2 What's New - 'added as part of the 2014 COBOL Standard' list
|
|
304
|
+
// and 'added as IBM extensions' list; Enterprise COBOL 6.3 What's New - 'Support for 2002 COBOL
|
|
305
|
+
// Standard' vs 'Support for 2014 COBOL Standard' date/time function lists; Enterprise COBOL 6.4
|
|
306
|
+
// What's New - new CONTENT-OF intrinsic function, user-defined functions and function
|
|
307
|
+
// prototypes; Micro Focus Visual COBOL 3.0 PU12, COBOL Language Reference, 'Definitions of
|
|
308
|
+
// Functions' table (live microfocus.com now serves a JS marketing shell; retrieved from the
|
|
309
|
+
// Internet Archive copy of the vendor page); Micro Focus COBOL Language Reference, 'Intrinsic
|
|
310
|
+
// Functions' chapter intro; Micro Focus COBOL Language Reference, 'Definitions of Functions'
|
|
311
|
+
// table; ACUCOBOL-GT 10.0.1 Reference Manual, Appendix F 'Intrinsic Functions' > 'Function
|
|
312
|
+
// Definitions' table (live page now a JS marketing shell; Internet Archive copy of the vendor
|
|
313
|
+
// page); FUJITSU Software NetCOBOL V11.0 User's Guide (B1WD-3306-01ENZ0), Appendix D 'Intrinsic
|
|
314
|
+
// Function List', Table D.1 (software.fujitsu.com now answers curl with a JS security
|
|
315
|
+
// checkpoint; Internet Archive copy of the vendor PDF); Fujitsu NetCOBOL FAQ #3880, which spells
|
|
316
|
+
// the UCS2-OF function name in text (used only to attest that spelling); Veryant isCOBOL Evolve
|
|
317
|
+
// 2021R2, Appendices > 'Intrinsic Functions' - 'The table below shows all available intrinsic
|
|
318
|
+
// functions'; NIST SP 500-203, Conformance test specifications for COBOL intrinsic function
|
|
319
|
+
// module - the 42 functions of ANSI X3.23A-1989 (the Intrinsic Function Addendum carried into
|
|
320
|
+
// the later editions); INCITS (the US national body for COBOL) announcement of ISO/IEC
|
|
321
|
+
// 1989:2023, reproducing the third edition's 'The main changes are as follows' list - the
|
|
322
|
+
// COUNT-family evidence; ISO/IEC 1989:2023 free preview (cover, copyright page and Contents
|
|
323
|
+
// pages iii-xv): confirms the 2023 structure, including new subclause '9.1.18 Commit and
|
|
324
|
+
// Rollback'; truncated before clause 15 'Intrinsic functions'; ISO/IEC 1989:2014 free preview
|
|
325
|
+
// (Contents pages iii-xv): clause 15 'Intrinsic functions' begins at page 627 and the Contents
|
|
326
|
+
// stops at 15.3, so the per-function subclauses are not in the preview; RM/COBOL Language
|
|
327
|
+
// Reference Manual, Second Edition (Version 12, Liant Software, copyright 1985-2008, as served
|
|
328
|
+
// by supportline.microfocus.com) - negative check: no intrinsic function chapter, no occurrence
|
|
329
|
+
// of 'intrinsic', so this dialect contributed no words
|
|
330
|
+
// ISO/IEC 1989, Information technology - Programming languages, their environments and system
|
|
331
|
+
// software interfaces - Programming language COBOL. Re-derived from the two public draft texts
|
|
332
|
+
// of the standard that are reachable without a paywall: (1) ISO/IEC FCD 1989:2001 (E), Final
|
|
333
|
+
// Committee Draft, working document ISO/IEC JTC 1/SC 22/WG 4 N 0147, dated 2001-01-15,
|
|
334
|
+
// circulated by the SC 22 secretariat as SC 22 N 3204 - this is the draft of the edition
|
|
335
|
+
// published as ISO/IEC 1989:2002; and (2) ISO/IEC 1989:20xx CD 1.2 (E), Committee Draft
|
|
336
|
+
// International Standard, dated 2009-08-23, distributed as file std.zip by the INCITS PL22.4
|
|
337
|
+
// (formerly J4) COBOL Task Group - this is a draft on the track to ISO/IEC 1989:2014. The
|
|
338
|
+
// official ISO previews of ISO/IEC 1989:2014 and ISO/IEC 1989:2023 (front matter only) were used
|
|
339
|
+
// to confirm clause numbering but contain no word lists. - ISO/IEC FCD 1989:2001 (WG4 N 0147):
|
|
340
|
+
// 8.9 Reserved words, 8.10 Context-sensitive words, 8.11 Intrinsic function names, 8.12
|
|
341
|
+
// Compiler-directive reserved words, Table 13 Exception-names; SC22 document register entry
|
|
342
|
+
// identifying N3204 as "FCD Ballot on FCD 1989 ... Cobol" (provenance); Archived INCITS PL22.4
|
|
343
|
+
// (formerly J4) COBOL Task Group distribution of the working draft standard; contains the single
|
|
344
|
+
// member STD.BK.pdf; ISO/IEC 1989:20xx CD 1.2, dated 2009-08-23 (ISO/IEC 1989:2014 track): 8.9
|
|
345
|
+
// Reserved words, 8.10 Context-sensitive words, 8.11 Intrinsic function names, 8.12
|
|
346
|
+
// Compiler-directive words, Table 14 Exception-names; ISO/IEC 1989:2023 official preview (cover
|
|
347
|
+
// plus Contents through page xv only): confirms that the 2023 edition still carries 8.9 Reserved
|
|
348
|
+
// words (p.205) and 8.11 Intrinsic function names (p.213); contains no word lists; ISO/IEC
|
|
349
|
+
// 1989:2014 official preview (cover plus Contents through page xv only): 8.9 Reserved words
|
|
350
|
+
// (p.167), 8.11 Intrinsic function names (p.173), 15 Intrinsic functions (p.627); contains no
|
|
351
|
+
// word lists; IBM COBOL for Linux on x86 1.2 Language Reference, "Reserved words": corroboration
|
|
352
|
+
// only. Its third column "Potential reserved words" is stated to include "words reserved in the
|
|
353
|
+
// 2002 COBOL Standard"
|
|
354
|
+
// Micro Focus Visual COBOL 9.0 COBOL Language Reference - Reserved Words Table,
|
|
355
|
+
// Context-sensitive Words Table, COBOL Words, Special registers, Definitions of Functions, The
|
|
356
|
+
// Special-Names Paragraph; with Micro Focus Net Express 3.1 Language Reference, Appendix D:
|
|
357
|
+
// Reserved Words - Reserved Words Table (and the dialect-code legend); Context-sensitive Words
|
|
358
|
+
// Table; Reserved Words (appendix front matter); COBOL Words (category definitions); Special
|
|
359
|
+
// registers; Definitions of Functions (intrinsic functions); Intrinsic Functions (chapter front
|
|
360
|
+
// matter); The Special-Names Paragraph (implementor-names = system-names); Net Express 3.1
|
|
361
|
+
// Language Reference, Appendix D: Reserved Words
|
|
362
|
+
// Reserved-word appendices of six independent COBOL implementations: Veryant isCOBOL Evolve 2025
|
|
363
|
+
// R1 Appendices, Appendix A 'isCOBOL Reserved Words'; Heirloom Computing Elastic COBOL Language
|
|
364
|
+
// Reference Manual Appendix, revision August 2012, Appendix A 'COBOL Reserved Words' and
|
|
365
|
+
// Appendix B 'Elastic COBOL Reserved Words'; Stratus VOS COBOL Language R010-03, Appendix A
|
|
366
|
+
// 'COBOL Reserved Words'; HP COBOL Manual for TNS and TNS/R Programs, part number 522555-006,
|
|
367
|
+
// Section 21 'Reserved Words'; Unisys COBOL ANSI-85 Programming Reference Manual Volume 1, Basic
|
|
368
|
+
// Implementation, form 8600 1518-307 (February 2003), Appendix B 'Reserved Words'; VSI COBOL
|
|
369
|
+
// Reference Manual, VSI COBOL Version 3.1-7 for OpenVMS, Appendix A 'VSI COBOL for OpenVMS
|
|
370
|
+
// Reserved Words' - Stratus VOS COBOL Language (R010-03), Appendix A 'COBOL Reserved Words' -
|
|
371
|
+
// word source; Stratus VOS COBOL Language (R010-03), 'COBOL Words' - consulted to test whether
|
|
372
|
+
// the COMP-n digits are enumerated anywhere (they are not); Veryant isCOBOL Evolve 2025 R1,
|
|
373
|
+
// Appendices, Appendix A 'isCOBOL Reserved Words' - word source; Veryant isCOBOL 2025 R1
|
|
374
|
+
// Language Reference contents - corroborates hyphen spelling (WORKING-STORAGE, SPECIAL-NAMES,
|
|
375
|
+
// FILE-CONTROL, I-O-CONTROL); Veryant isCOBOL 2025 R1 Language Reference, PERFORM - corroborates
|
|
376
|
+
// hyphen spelling (END-PERFORM); Heirloom Computing, Elastic COBOL Language Reference Manual
|
|
377
|
+
// Appendix (rev. August 2012), Appendix A 'COBOL Reserved Words' and Appendix B 'Elastic COBOL
|
|
378
|
+
// Reserved Words' - word source; Heirloom Computing, Elastic COBOL Language Reference Manual -
|
|
379
|
+
// consulted for a separate intrinsic-function name list; its chapter 15 defines function
|
|
380
|
+
// semantics but publishes no extractable name table; HP COBOL Manual for TNS and TNS/R Programs
|
|
381
|
+
// (HP part number 522555-006), Section 21 'Reserved Words', sub-lists 'All Reserved Words' and
|
|
382
|
+
// 'HP Reserved Words' - word source; Unisys COBOL ANSI-85 Programming Reference Manual Volume 1,
|
|
383
|
+
// Basic Implementation (form 8600 1518-307, Feb 2003), Appendix B 'Reserved Words' - word
|
|
384
|
+
// source; VSI COBOL Reference Manual, VSI COBOL Version 3.1-7 for OpenVMS, Appendix A 'VSI COBOL
|
|
385
|
+
// for OpenVMS Reserved Words' - word source; COBOL-IT Compiler Suite Getting Started v4.1 -
|
|
386
|
+
// PROVENANCE EVIDENCE ONLY, no words taken from it: establishes the OpenCOBOL lineage on which
|
|
387
|
+
// COBOL-IT was excluded; Broadcom TechDocs 'CA Realia II Workbench' bookshelf - GAP EVIDENCE:
|
|
388
|
+
// names the COBOL Reference Guide 3.3 (b009451e.pdf) and 3.2 (b009341e.pdf) whose PDFs sit
|
|
389
|
+
// behind Broadcom OAuth
|
|
30
390
|
|
|
31
391
|
export const RESERVED_WORDS = new Set(`3-D ABORT-TRANSACTION ABSENT ABSTRACT ACCEPT ACCESS ACQUIRE ACTION ACTIVE-CLASS ACTIVE-X ACTUAL ADD
|
|
32
392
|
ADDRESS ADDRESS-ARRAY ADDRESS-OFFSET ADJUSTABLE-COLUMNS ADVANCE ADVANCING AFP-5A AFTER ALIAS ALIGNED
|
package/package.json
CHANGED
|
@@ -1,6 +1,6 @@
|
|
|
1
1
|
{
|
|
2
2
|
"name": "@portll/cobolwork",
|
|
3
|
-
"version": "0.
|
|
3
|
+
"version": "0.4.0",
|
|
4
4
|
"description": "COBOL, JCL and CICS security analysis with zero runtime dependencies: reference-format parser, cross-program data flow, mainframe credential rules. Plugs into commitwork.",
|
|
5
5
|
"license": "AGPL-3.0-or-later",
|
|
6
6
|
"author": "Portll <john@portll.net>",
|
|
@@ -1522,6 +1522,54 @@
|
|
|
1522
1522
|
"idsOnly": true
|
|
1523
1523
|
}
|
|
1524
1524
|
},
|
|
1525
|
+
{
|
|
1526
|
+
"kind": "compliance",
|
|
1527
|
+
"ruleId": "input-causes-abend",
|
|
1528
|
+
"framework": "cobit-2019",
|
|
1529
|
+
"clause": "DSS06.02",
|
|
1530
|
+
"rationale": "The rule reports: An input the program accepts ends its run with an abend. That is information processed without the control that keeps it valid, authorised and accurate, which is what this practice asks of business process controls.",
|
|
1531
|
+
"source": {
|
|
1532
|
+
"doc": "cobit2019",
|
|
1533
|
+
"retrieved": "2026-09-20",
|
|
1534
|
+
"idsOnly": true
|
|
1535
|
+
}
|
|
1536
|
+
},
|
|
1537
|
+
{
|
|
1538
|
+
"kind": "compliance",
|
|
1539
|
+
"ruleId": "input-causes-abend-s0c4",
|
|
1540
|
+
"framework": "cobit-2019",
|
|
1541
|
+
"clause": "DSS06.02",
|
|
1542
|
+
"rationale": "The rule reports: An input the program accepts ends its run with a protection exception (S0C4). That is information processed without the control that keeps it valid, authorised and accurate, which is what this practice asks of business process controls.",
|
|
1543
|
+
"source": {
|
|
1544
|
+
"doc": "cobit2019",
|
|
1545
|
+
"retrieved": "2026-09-20",
|
|
1546
|
+
"idsOnly": true
|
|
1547
|
+
}
|
|
1548
|
+
},
|
|
1549
|
+
{
|
|
1550
|
+
"kind": "compliance",
|
|
1551
|
+
"ruleId": "input-causes-abend-s0c7",
|
|
1552
|
+
"framework": "cobit-2019",
|
|
1553
|
+
"clause": "DSS06.02",
|
|
1554
|
+
"rationale": "The rule reports: An input the program accepts ends its run with a data exception (S0C7). That is information processed without the control that keeps it valid, authorised and accurate, which is what this practice asks of business process controls.",
|
|
1555
|
+
"source": {
|
|
1556
|
+
"doc": "cobit2019",
|
|
1557
|
+
"retrieved": "2026-09-20",
|
|
1558
|
+
"idsOnly": true
|
|
1559
|
+
}
|
|
1560
|
+
},
|
|
1561
|
+
{
|
|
1562
|
+
"kind": "compliance",
|
|
1563
|
+
"ruleId": "input-causes-abend-subscript-range",
|
|
1564
|
+
"framework": "cobit-2019",
|
|
1565
|
+
"clause": "DSS06.02",
|
|
1566
|
+
"rationale": "The rule reports: An input the program accepts drives a subscript or reference modification out of range, and the run abends. That is information processed without the control that keeps it valid, authorised and accurate, which is what this practice asks of business process controls.",
|
|
1567
|
+
"source": {
|
|
1568
|
+
"doc": "cobit2019",
|
|
1569
|
+
"retrieved": "2026-09-20",
|
|
1570
|
+
"idsOnly": true
|
|
1571
|
+
}
|
|
1572
|
+
},
|
|
1525
1573
|
{
|
|
1526
1574
|
"kind": "compliance",
|
|
1527
1575
|
"ruleId": "intermediate-result-loses-high-order-digits",
|