127 lines
3.1 KiB
Plaintext
127 lines
3.1 KiB
Plaintext
Microsoft COBOL MS-DOS Release 2.1
|
||
|
||
REFMAN.DOC
|
||
|
||
Additions to the Microsoft COBOL Compiler
|
||
Reference Manual
|
||
|
||
September 3, 1985
|
||
|
||
|
||
|
||
|
||
|
||
The following information was not available when the
|
||
Microsoft COBOL Compiler Reference Manual was printed,
|
||
but will appear in future versions of that document.
|
||
|
||
|
||
|
||
|
||
|
||
|
||
|
||
|
||
|
||
|
||
|
||
|
||
|
||
|
||
|
||
CONTENTS
|
||
|
||
CHAPTER 6 DATA DIVISION
|
||
|
||
6.2 Record Description Entry
|
||
|
||
6.2.5 Numeric Items
|
||
|
||
3. Binary Item
|
||
|
||
|
||
CHAPTER 7 PROCEDURE DIVISION
|
||
|
||
7.2 Arithmetic Statements
|
||
|
||
7.2.1 SIZE ERROR Option
|
||
|
||
7.6 PROCEDURE DIVISION Statements
|
||
|
||
7.6.1 ACCEPT Statement
|
||
|
||
7.6.1.1 Format 1 ACCEPT Statement
|
||
|
||
|
||
|
||
|
||
CHAPTER 6 DATA DIVISION
|
||
|
||
6.2 Record Description Entry
|
||
|
||
6.2.5 Numeric Items
|
||
|
||
3. Binary Item
|
||
|
||
Warning: Regardless of the number of digits
|
||
specified in the PICTURE clause for
|
||
a COMP-0 or COMP-4 item, truncation
|
||
and the SIZE ERROR condition occur
|
||
only when a value moved to such an
|
||
item exceeds the range (described
|
||
above) for a 2-byte (COMP-0) or 4-
|
||
byte (COMP-4) SIGNED binary integer.
|
||
A COMP-0 item has an implicit PICTURE
|
||
S9(5), and a COMP-4 item has an
|
||
implicit PICTURE S9(10).
|
||
|
||
Binary items are always considered
|
||
to be signed, even if the PICTURE
|
||
omits the sign character S.
|
||
|
||
|
||
|
||
CHAPTER 7 PROCEDURE DIVISION
|
||
|
||
|
||
7.2 Arithmetic Statements
|
||
|
||
7.2.1 SIZE ERROR Option
|
||
|
||
Warning: For binary items, defined with
|
||
USAGE COMP-0 or COMP-4, truncation
|
||
and the SIZE ERROR condition occur
|
||
only when a value moved to such an
|
||
item exceeds the range for a 2-byte
|
||
(COMP-0) or 4-byte (COMP-4) SIGNED
|
||
binary integer. A COMP-0 item has
|
||
an implicit PICTURE S9(5), and a
|
||
COMP-4 item has an implicit PICTURE
|
||
S9(10), regardless of the number of
|
||
digits specified in the PICTURE
|
||
clause.
|
||
|
||
|
||
7.6 PROCEDURE DIVISION Statements
|
||
|
||
7.6.1 ACCEPT Statement
|
||
|
||
The Format 1 ACCEPT obtains date or time
|
||
information from the operating system. It
|
||
places the amount of data specified into
|
||
identifier, regardless of the size of
|
||
identifier. (For example, DATE will move
|
||
6 digits of information even if identifier
|
||
is PIC XX). Be sure identifier is large enough
|
||
to hold the output of ACCEPT.
|
||
|
||
7.6.1.1 Format 1 ACCEPT Statement
|
||
|
||
LINE NUMBER
|
||
|
||
a two-digit value. The ACCEPT ... FROM LINE
|
||
NUMBER is provided for compatibility with
|
||
other COBOL's, but in Microsoft COBOL the
|
||
value of LINE NUMBER is always "00".
|
||
|