HP System Dictionary/XL COBOL Definition Extractor (32257-90001)

C- 103
I , J , K If e = 0, then S9(n) COMP where
b d n
--- ------- ---
2 d < 4 d
d > 4 4
4 d < 5 5
5 <= d <= 9 d
d > 9 9
8 d < 10 10
10 <= d <= 18 d
d > 18 18
If b does not equal 2, 4, or 8 then SDCDE issues a warning message and generates the
PICTURE clause as X(d)
If e > 0, then S9(n)V9(e) COMP where
b d n
--- ------- ---
2 d <= 5 d-e-1
d > 5 4-e
4 d < 6 5-e
6 <= d <= 10 d-e-1
d > 10 9-e
8 d < 11 10-e
11 <= d <= 19 d-e-1
d > 19 18-e
If b does not equal 2, 4, or 8 then SDCDE issues a warning message and generates the
PICTURE clause as X(d)
If e < 0, SDCDE issues a warning and generates the PICTURE clause as if e = 0
I+ , J+ , K+ If e = 0, then 9(n) COMP where
(see I , J , K above for the value of n)
If e > 0, then 9(n)V9(e) COMP where
If e < 0, SDCDE issues a warning and generates the PICTURE clause as if e = 0
R , E , B , S , D SDCDE issues a warning message and generates the PICTURE clause as X(b)
* SDCDE searches ELEMENT references ELEMENT relationship to find the element
definition
Table 3:
System Dictionary
Element Type
COBOL PICTURE Clause