B.3 Extensions
ACUCOBOL-GT contains many extensions to the ANSI standard. These are
summarized below:
- Terminal-oriented source format
- Compile-time modification of source by Identification Area flags
- IS RESIDENT PROGRAM clause
- An index item may subscript a table other than the one it is associated with.
Index data items may be used any place a numeric data item is allowed
- Apostrophes may be used to delimit nonnumeric literals. Hexadecimal literals
are allowed
- A procedure name may be the same as a data item name
- The word ALPHABET is optional when you are declaring an alphabet-name in the
SPECIAL-NAMES paragraph
- The ASSIGN TO clause may have a data item specified for the external file
name. Also, the external file name is optional in the clause
- An optional device type may be specified in an ASSIGN clause
- WITH COMPRESSION, WITH ENCRYPTION added to ASSIGN clause
- LINE and BINARY options in ORGANIZATION clause
- COLLATING SEQUENCE clause
- COMPRESSION CONTROL clause
- LOCK MODE clause
- LENGTH OF clause for data literals
- RECORD-POSITION clause for data items
- RESERVE clause with the NO or ALTERNATE options
- Split key specification for indexed files
- FILE STATUS clause for sort files
- Additional SPECIAL-NAMES clauses: CONSOLE IS CRT, CRT STATUS, CURSOR IS, EVENT
STATUS, and NUMERIC SIGN SEPARATE
- SEGMENT-LIMIT clause (level 2 segmentation feature)
- VALUE OF FILE-ID clause
- USAGE COMP-1, COMP-2, COMP-3, COMP-4, COMP-5, COMP-6, COMP-N, COMP-X, FLOAT,
DOUBLE, and HANDLE
- USAGE types:
SIGNED-SHORT
| UNSIGNED-SHORT
|
SIGNED-INT
| UNSIGNED-INT
|
SIGNED-LONG
| UNSIGNED-LONG
 |
Tables may contain up to 15 dimensions
- A PICTURE string may contain up to 100 characters
- Level 78 constant names
- WHEN SET TO FALSE phrase for level 88 condition-names. A FALSE phrase added
to the SET statement
- SCREEN SECTION
- SCREEN SECTION BEFORE, AFTER, and EXCEPTION embedded procedures
- SCREEN SECTION EVENT procedures
- IS SPECIAL-NAMES phrase in record description entry
- CHAINING phrase added to Procedure Division header
- Non-display data items may be specified in a NUMERIC class condition
- USE statements may reference sort files
- RETURN-CODE special register
- ACCEPT with screen control
- ACCEPT FROM SYSTEM-INFO, TERMINAL-INFO, INPUT STATUS, LINE NUMBER,
COMMAND-LINE, ESCAPE KEY, CENTURY-DATE, CENTURY-DAY, STANDARD OBJECT, and WINDOW HANDLE
- ACCEPT FROM SCREEN
- ACCEPT CONTROL statement
- ACCEPT ALLOWING messages phrase
- ACCEPT external-form-item statement
- ADD TABLE statement
- CALL RUN statement
- CALL PROGRAM statement
- CALL THREAD statement
- Literals allowed in the USING portion of a CALL statement. Also, non-level 01
group items may be listed in the USING phrase
- BULK-ADDITION phrase for OPEN statement
- BY VALUE phrase for CALL statement
- OMITTED/NULL phrase for CALL statement
- NOT ON OVERFLOW accepted for CALL statement
- ALL option for CANCEL statement
- CHART option for CANCEL statement
- CHAIN statement
- CLOSE WINDOW statement
- COMMIT statement
- COPY RESOURCE statement
- CREATE statement
- DELETE FILE statement
- DESTROY statement
- DISPLAY with screen control
- DISPLAY SUBWINDOW/WINDOW statement
- DISPLAY FLOATING WINDOW statement
- DISPLAY SCREEN statement
- DISPLAY LINE statement
- DISPLAY BOX statement
- DISPLAY UPON WINDOW TITLE statement
- DISPLAY UPON COMMAND-LINE statement
- DISPLAY INITIAL WINDOW statement
- DISPLAY INDEPENDENT WINDOW statement
- DISPLAY TOOL-BAR statement
- DISPLAY control-type statement
- DISPLAY MESSAGE BOX statement
- DISPLAY external-form-item statement
- DRAW CHART statement
- ENTER CHART DATA statement
- GOBACK statement
- INQUIRE CONTROL statement
- INQUIRE WINDOW statement
- INITIATE CHART statement
- LOCK THREAD statement
- LABEL CHART statement
- TRAILING option on INSPECT statement
- MODIFY statement
- WITH LOCK and ALLOWING phrases added to OPEN statement
- MASS-UPDATE option on OPEN statement
- WITH NO LOCK and ALLOWING phrases on READ statement
- PERFORM THREAD statement
- PREVIOUS option on READ statement
- Literal allowed in FROM phrase of REWRITE and WRITE statements
- SEND message statement
- RECEIVE message statement
- SET CHART ATTRIBUTE statement
- SET FILE-PREFIX statement
- SET ENVIRONMENT statement
- SET EXCEPTION statement
- SET TO ADDRESS OF statement
- SET TO SIZE OF statement
- SET HANDLE statement
- SET THREAD statement
- SET WINDOW statement
- STOP THREAD statement
- SUBTRACT TABLE statement
- LESS THAN and LESS THAN OR EQUAL options on START statement
- UNLOCK statement
- DECLARATIVE procedures may reference procedures outside of DECLARATIVES
- Recursive CALLs
- Dynamically determined SORT keys
- EXIT PERFORM, EXIT PARAGRAPH and EXIT SECTION
- ROLLBACK clause for LOCK MODE phrase, on SELECT statement in FILE-CONTROL
paragraph
- COMMIT statement may indicate end of transaction and cause changes to be
written to transaction log file
- ROLLBACK statement
- SET statement with ADDRESS OF clause sets address of linkage data item to
specified value
- START TRANSACTION statement
- SUPPRESS clause for the COPY statement
- USE active_x_control_item and USE ole_object_item statements
- USE FOR REPORTING statement
- UNLOCK THREAD statement
- WAIT statement