HP DDL D40 Reference Manual page 125

Definition Attributes
If a numeric, national, or alphanumeric field is not defined in or referenced by a
RECORD statement, the maximum field length is 32,767 bytes.
If a numeric, national, or alphanumeric field is defined in or referenced by a
RECORD statement, the maximum field length is the maximum record length,
which depends on file type:
Entry-sequenced files
Key-sequenced files
Relative files
Unstructured files
PICTURE Clause Examples
The following example illustrates PICTURE clauses that describe ASCII character
fields:
DEF ascii-pictures
02 alpha-field
02 alphanum-2 PIC X (10) .
02 alphanum-1 PIC AAX (4) 9 (4) .
02 nat-field
02 unsigned
02 signed-1
02 signed-1
02 signed-2
02 signed-3
02 imp-decimal PIC 9 (3) V9 (2) .
END .
The following example illustrates PICTURE clauses that describe binary fields:
DEF binary-pictures .
02 binary-int
02 binary-int -s PIC S9 (4) COMP .
02 binary-int 2 PIC 9 (5) COMP.
02 binary-int2-s PIC S9 (5) COMP .
02 binary-int4
02 binary-int4-s PIC S9 (10) COMP .
END .
Appendix C, DDL Data
similar PICTURE clauses to host-language source-code output.
Data Definition Language (DDL) Reference Manual—426798-002
4,072 bytes
4,062 bytes
4,072 bytes
4,096 bytes
PIC A (10) .
PIC N (5) .
PIC 9 (5) .
PIC S9 (5) .
PIC 9 (5)S .
PIC T9 (5) .
PIC 9 (5)T .
PIC 9 (4) COMP .
PIC 9 (10) COMP .
Translation, contains tables showing how DDL translates
6- 31
10 alphabetic characters
10 alphanumeric characters
10 alphanumeric characters
5 two-byte national characters
5 unsigned digits
5 digits plus leading sign
5 digits plus trailing sign
5 digits plus embedded leading sign
5 digits plus embedded training sign
5 digits with implied decimal point
VST604.vsd
2-byte unsigned integer
2-byte signed integer
4-byte unsigned integer
4-byte signed integer
8-byte unsigned integer
8-byte signed integer
VST605.vsd
PICTURE Clause