HP 3000 Manuals HP 3000 Manuals
RM Table
Directive: RM
Definition: RM/COBOL 2
Feature When Intro- Effect of Status
duced Directive
ACCEPT/DISPLAYs all treated as full 1.3 C
screen
ACCEPT/DISPLAY enhanced for RM 2.0 G
compatibility
ACCEPT: ON EXCEPTION RM-style 2.0 -
ASSIGN: INPUT with external file-name 2.0 - D
ASSIGN: INPUT-OUTPUT with external 2.0 - D
file-name
ASSIGN: OUTPUT with external file-name 2.0 - D
ASSIGN: PRINT with external file-name 2.0 - D
ASSIGN: RANDOM with external file-name 2.0 - D
ASSIGN: "PRINTER" as external 2.0 -
file-name
ASSIGN clause enhanced with RM options 2.0 G
BEEP clause/option 1.3 R
BLINK clause/option 1.3 R
BLINK phrase in ACCEPT (not in WITH 2.0 -
phrase)
CALL: literals as parameters 2.0 -
CONVERT phrase in ACCEPT 2.0 R
Comparing alphan data in numeric & -
alphan items 2.0
Compatibility with RM COBOL 2.0 -
DISPLAY SPACE treated as DISPLAY " " 2.0 C
ECHO phrase in ACCEPT 2.0 -
Feature When Intro- Effect of Status
duced Directive
END PROGRAM header 1.1 R
ERASE phrase in ACCEPT (= BLANK 2.0 -
SCREEN)
ERASE EOL phrase in ACCEPT 2.0 -
ERASE EOS phrase in ACCEPT 2.0 -
EXIT PROGRAM closes files opened in 2.0 C
the subprog
File Section initialized to spaces 2.0 C
HIGH phrase in ACCEPT (=HIGHLIGHT) 2.0 R
Highlighting is on by default 2.0 C
I-O-statuses: values as in RM COBOL 1.5 C I
Index is 2 bytes COMP-X 1.3 C I
Index can be set by other than SET LII C
Initial data-byte value defaults to 2.0 C
X"00"
LINE phrase in ACCEPT (not in AT 2.0 -
phrase)
Lock mode defaults to AUTOMATIC 2.0 C
LOW phrase in ACCEPT 2.0 -
MODE IS BLOCK automatic (ACC/DIS group 1.3 C
in one go)
NO BEEP phrase in ACCEPT 2.0 -
NUMERIC SIGN IS TRAILING SEPARATE is 2.0 C
default
Nonnumeric literal up to 2047 chars 2.0 -
(Data Div)
OFF phrase in ACCEPT (=SECURE but 2.0 -
displays blanks)
ORGANIZATION: BINARY 2.0 -
SEQUENTIAL(=sequential)
ORGANIZATION SEQUENTIAL treated as 2.0 C
LINE SEQ
Organization defaults to LINE 2.0 C
SEQUENTIAL
PERFORM behavior as in RM and MS 2.0 - I
POSITION/POS phrase in ACCEPT (= 2.0 -
COLUMN option)
Feature When Intro- Effect of Status
duced Directive
PROMPT phrase in ACCEPT (not in WITH 2.0 -
phrase)
Procedure Division is optional 1.1 E
REVERSE phrase in ACCEPT (= 2.0 R
REVERSE-VIDEO)
REWRITE on LINE SEQUENTIAL files 2.0 E
Re-try locked record (like RM) 1.5 C
SIZE phrase in ACCEPT (not in WITH 2.0 -
phrase)
STOP RUN 2.0 -
numeric-literal/integer-data-item
Screen Section: defaults config'able 2.0 -
to RM
Screen can be read (Config option) 2.0 -
Spaces in numeric items 1.4 C I
Subscript allowed to be out of range 1.1 - I
TAB phrase in ACCEPT 2.0 -
Trunc' to space avail' not PIC size on 1.5 C I
all COMP
UNLOCK statement LII R
UNIT phrase (documentary) in ACCEPT 2.0 -
UPDATE phrase (recognizes tab key) 2.0 -
USAGE BINARY 1.1 R
USAGE COMP means unpacked with top 2.0 C
nybbles zero
USAGE COMPUTATIONAL-1/COMP-1 (always 2.0 R
S9(4) COMP)
USAGE COMPUTATIONAL-3/COMP-3 LII R
USAGE COMPUTATIONAL-6/COMP-6 2.0 -
VALUE OF LABEL IS literal 2.0 -