Elements in MS COBOL not in USASI COBOL
Record Description Clauses (cont'd):
ZERO SUPPRESS
CHECK PROTECT
FLOAT DOLLAR SIGN
PROCEDURE DIVISION:
Conditional statement connectives or operators:
OTHERWISE
THEN
UNEQUAL
EQ
NQ
GR
LS
Alternate Methods Available in Both
Z used as replacement character in PICTURE
*
used as replacement character in PICTURE
currency symbol
($)
used as replacement
character in PICTURE
ELSE
; (semicolon)
NOT EQUAL TO or NOT
=
EQUAL TO or
=
NOT EQUAL TO or NOT
=
GREATER or
>
LESS or
<
Elements Common to MS and USASI COBOL
RESERVE
1
~Ot
1
~
ALTERNATE AREA
In
eger- \
clause in FILE-CONTROL
For M8 COBOL:
For USASI COBOL:
NO
1
2
H-2
Produces no buffering
Produces single buffering
(or clause omitted)
Produces double buffering
NO
1
2
(or clause omitted)
Produces no buffering for unblocked files
Produces single buffering for unblocked
files and double buffering for blocked
sequential files
Produces double buffering for blocked
and unblocked sequential files
60229400
Need help?
Do you have a question about the 3300 and is the answer not in the manual?