Control Data Corporation 3300 Reference Manual page 64

Computer systems usasi cobol/ master
Table of Contents

Advertisement

3-30
Floating msertion Editing
The symbols used for floating insertion are: the currency symbol (cs) , and
the editing sign symbols
+
or -. They are mutually exclusive as floating
insertion characters in a given PICTURE string. Floating insertion editing is
indicated by using at least two of the floating symbols in the leftmost numeric
character positions. Any other insertion symbols embedded in the string of
floating insertion symbols or
to
the immediate right of the string are part of
the floating string.
Floating insertion in a PICTURE may be represented in two ways:
Any or all leading numeric character poSitions to the left of the decimal
point are insertion symbols.
All numeric character positions in the picture are represented by the
floating insertion symbol.
The first case results in a single insertion character placed in the position
immediately preceding the first nonzero character or the decimal point,
whichever is encountered first.
The result in the second case depends on the value of the data.
If
the value is
zero, the entire edited item will contain spaces.
If
the value is not zero,
the insertion character is placed in the position immediately preceding the
first nonzero character or the decimal point, whichever is encountered first.
Examples:
PICTURE
Data
Item
Result Item
------- or 7(-)
0 0 0 01 0 0
I~I~I~I~ ~
~
~I
7(+)
0 0 0 112 3
I~I~I~I+
1 2 31
4(+).99
0 0 0 112 3
1~1~1+11
2 3
$$$$$.99
0 0 4 31 5 9
1~1$1413
5 9
7($)
0 0 0 01 0
1
0
161~1~1~1~1~1~
5($).99
1
0 0 0
01 215
1~1~1~1$1·1215
The PICTURE character string must contain at least one more floating
insertion character than the maximum number of significant digits in the
item to be edited. All floating insertion characters are counted in the size
of the item.
60229400

Advertisement

Table of Contents
loading
Need help?

Need help?

Do you have a question about the 3300 and is the answer not in the manual?

This manual is also suitable for:

3500

Table of Contents