Compaq COBOL AAQ2G1FTK - Manual (Page 589)

Porting to Compaq COBOL from Other Compilers
D.1 Porting Assistance
produce fatal diagnostic messages for programs that have successfully compiled
before.
D.2 Flagged Foreign Extensions
Compaq COBOL porting assistance recognizes the foreign syntax shown in
the following list and provides helpful diagnostic messages when they are
encountered:
• ADDRESS OF in CALL statement
• ADDRESS OF in SET statement
• AFTER POSITIONING in WRITE statement
• EJECT statement
• ENTER statement
• ENTRY statement
• EXAMINE statement
• GOBACK statement
• ON statement
• PURGE statement
• RECEIVE statement
• SEND statement
• SERVICE statement
• SKIP statement
• TRANSFORM statement
• PASSWORD for SELECT statement
• DISPLAY-1 as PICTURE USAGE
• FILE STATUS with a second target
• LENGTH OF in CALL USING statement
The last two features in this list are always detected. All others in the list are
under control of the foreign extensions option because they require recognition of
foreign reserved words.
D.3 Implemented Extensions
The following foreign extensions are implemented in Compaq COBOL to make it
easier to port programs:
• ZEROES and ZEROS can be used in a BLANK WHEN ZERO clause.
• EQUAL can be used instead of the equal sign (=) in a COMPUTE statement.
• An empty INPUT-OUTPUT section is accepted and flagged with an
Informational message, rather than issuing a Fatal message.
• The REMARKS paragraph can be used in the Identification Division.
The last feature in this list is under control of the foreign extensions option
because it requires the foreign reserved word REMARKS. The other extensions
are provided in Compaq COBOL.
Porting to Compaq COBOL from Other Compilers D–3