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. <>