HP 3000 Manuals

ANS85H Table [ Micro Focus COBOL Compatibility Guide ] MPE/iX 5.0 Documentation


Micro Focus COBOL Compatibility Guide

ANS85H Table 

Directive:            ANS85

Definition:           ANSI'85 Standard COBOL at High Level

--------------------------------------------------------------------------------------------------
|                                    |                   |                   |                   |
|              Features              |  When Introduced  |     Effect of     |      Status       |
|                                    |                   |     Directive     |                   |
|                                    |                   |                   |                   |
--------------------------------------------------------------------------------------------------
|                                    |                   |                   |                   |
| ACCEPT FROM DAY-OF-WEEK            |        1.1        |         R         |                   |
|                                    |                   |                   |                   |
| ANSI 85 High features implemented  |        1.4        |                   |         G         |
| at Int cert'n                      |                   |                   |                   |
|                                    |                   |                   |                   |
| ANSI 85 High certification         |        2.0        |                   |                   |
|                                    |                   |                   |                   |
| CALL: ON EXCEPTION                 |        1.1        |                   |                   |
|                                    |                   |                   |                   |
| CALL: BY REFERENCE/CONTENT         |        1.1        |         R         |                   |
| identifier                         |                   |                   |                   |
|                                    |                   |                   |                   |

| CANCEL closes all files in         |        LII        |                   |                   |
| subprogram                         |                   |                   |                   |
|                                    |                   |                   |                   |
| CLOSE FOR REMOVAL allowed on       |        LII        |                   |                   |
| one-reel file                      |                   |                   |                   |
|                                    |                   |                   |                   |
| COMMON clause                      |        2.0        |         R         |                   |
|                                    |                   |                   |                   |
| Comma, space, and semi-colon       |        1.1        |                   |                   |
| interchangeable                    |                   |                   |                   |
|                                    |                   |                   |                   |
| DISPLAY WITH NO ADVANCING          |        1.1        |                   |                   |
|                                    |                   |                   |                   |
| DIVIDE: do subscr of remainder     |        1.1        |                   |                   |
| after store quot'nt                |                   |                   |                   |
|                                    |                   |                   |                   |
| END PROGRAM header                 |        1.1        |         R         |                   |
|                                    |                   |                   |                   |
| EVALUATE                           |        1.1        |                   |                   |
|                                    |                   |                   |                   |
| EXTERNAL clause                    |        2.0        |         R         |                   |
|                                    |                   |                   |                   |
| GLOBAL clause                      |        2.0        |         R         |                   |
|                                    |                   |                   |                   |
| INITIAL clause                     |        2.0        |         R         |                   |
|                                    |                   |                   |                   |
| INITIALIZE statement               |        1.1        |         R         |                   |
|                                    |                   |                   |                   |
| INSPECT CONVERTING                 |        1.1        |         R         |                   |
|                                    |                   |                   |                   |
| INSPECT with multiple REPLACING    |        LII        |                   |                   |
| CHARS                              |                   |                   |                   |
|                                    |                   |                   |                   |
| INSPECT with multiple BEFORE/AFTER |        1.1        |                   |                   |
|                                    |                   |                   |                   |
| INSPECT with multiple id-lits      |        LII        |                   |                   |
|                                    |                   |                   |                   |
| LINAGE clause:  qualified          |        LII        |                   |                   |
| data-names allowed                 |                   |                   |                   |
|                                    |                   |                   |                   |
--------------------------------------------------------------------------------------------------

          Table 23-0.  (cont.) 

--------------------------------------------------------------------------------------------------
|                                    |                   |                   |                   |
|              Features              |  When Introduced  |     Effect of     |      Status       |
|                                    |                   |     Directive     |                   |
|                                    |                   |                   |                   |
--------------------------------------------------------------------------------------------------
|                                    |                   |                   |                   |
| LINAGE: if no FOOTING only page    |        LII        |                   |                   |
| full gives e-o-p                   |                   |                   |                   |
|                                    |                   |                   |                   |
| MOVE with de-editing               |        LII        |                   |                   |
|                                    |                   |                   |                   |
| Nested programs                    |        2.0        |                   |                   |
|                                    |                   |                   |                   |
| OCC DEP, & DEP item subord:  as    |        1.1        |         C         |                   |
| target, max length                 |                   |                   |                   |
|                                    |                   |                   |                   |
| OCCURS DEPENDING item can be zero  |        1.1        |                   |                   |
|                                    |                   |                   |                   |

| OPEN EXTEND on inx file, provided  |        1.5        |                   |                   |
| seq access mode                    |                   |                   |                   |
|                                    |                   |                   |                   |
| OPEN EXTEND on rel file, provided  |        1.4        |                   |                   |
| seq access mode                    |                   |                   |                   |
|                                    |                   |                   |                   |
| OPTIONAL with all organizations in |        1.4        |                   |                   |
| all open-modes                     |                   |                   |                   |
|                                    |                   |                   |                   |
| PADDING CHARACTER clause           |        1.1        |                   |         D         |
|                                    |                   |                   |                   |
| PERFORM VARYING: rules on when     |        LII        |                   |                   |
| control var's set                  |                   |                   |                   |
|                                    |                   |                   |                   |
| PERFORM VARYING: rules on when     |        LII        |                   |                   |
| subsc's evaluated                  |                   |                   |                   |
|                                    |                   |                   |                   |
| PERFORM with TEST AFTER/BEFORE     |        1.1        |         R         |                   |
|                                    |                   |                   |                   |
| PERFORM with at least 6 AFTER      |        1.1        |                   |                   |
| phrases (we allow 6)               |                   |                   |                   |
|                                    |                   |                   |                   |
| Picstring can be continued         |        1.1        |                   |                   |
|                                    |                   |                   |                   |
| Qualification to 50 levels         |        1.1        |                   |                   |
|                                    |                   |                   |                   |
| READ NEXT allowed on file with seq |        1.1        |                   |                   |
| organization                       |                   |                   |                   |
|                                    |                   |                   |                   |
| READ NEXT after OPEN & WRITEs gets |        2.0        |                   |                   |
| new 1st record                     |                   |                   |                   |
|                                    |                   |                   |                   |
| RECORD DELIMITER                   |        1.4        |                   |         D         |
|                                    |                   |                   |                   |
| REPLACE statement                  |        2.0        |                   |                   |
|                                    |                   |                   |                   |
| REWRITE alt key before next next   |        LII        |                   |                   |
| READ gets it                       |                   |                   |                   |
|                                    |                   |                   |                   |
| Reference modification (other than |        1.4        |                   |                   |
| in conditions)                     |                   |                   |                   |
|                                    |                   |                   |                   |
| Reference modification in          |        1.4        |                   |         I         |
| conditions                         |                   |                   |                   |
|                                    |                   |                   |                   |
| SET condition-name TRUE            |        1.1        |         R         |                   |
|                                    |                   |                   |                   |
--------------------------------------------------------------------------------------------------

          Table 23-0.  (cont.) 

--------------------------------------------------------------------------------------------------
|                                    |                   |                   |                   |
|              Features              |  When Introduced  |     Effect of     |      Status       |
|                                    |                   |     Directive     |                   |
|                                    |                   |                   |                   |
--------------------------------------------------------------------------------------------------
|                                    |                   |                   |                   |
| START statement with > =           |        1.3        |                   |                   |
|                                    |                   |                   |                   |
| STRING: subscr's computed at start |        LII        |                   |                   |
| of statement                       |                   |                   |                   |
|                                    |                   |                   |                   |

| STRING with group-item in INTO     |        1.1        |                   |                   |
| phrase                             |                   |                   |                   |
|                                    |                   |                   |                   |
| SYMBOLIC CHARACTERS clause         |        1.1        |                   |                   |
|                                    |                   |                   |                   |
| Subscripting to 7 levels           |        1.1        |                   |                   |
|                                    |                   |                   |                   |
| USE: GLOBAL phrase                 |        2.0        |                   |                   |
|                                    |                   |                   |                   |
| USE: GLOBAL phrase with BEFORE     |        2.0        |                   |                   |
| REPORTING                          |                   |                   |                   |
|                                    |                   |                   |                   |
| Variable-length records via RECORD |        1.4        |                   |                   |
| VARYING                            |                   |                   |                   |
|                                    |                   |                   |                   |
| Variable-length records in         |        2.0        |                   |                   |
| SORT/MERGE                         |                   |                   |                   |
|                                    |                   |                   |                   |
| WRITE: END-OF-PAGE not allowed w/  |        LII        |                   |                   |
| ADVANCING PAGE                     |                   |                   |                   |
|                                    |                   |                   |                   |
--------------------------------------------------------------------------------------------------



MPE/iX 5.0 Documentation