Position 40 (Internal Data Type)

This entry allows you to specify how a standalone field, parameter, or data-structure subfield is stored internally. This entry pertains strictly to the internal representation of the data item being defined, regardless of how the data item is stored externally (that is, if it is stored externally). To define variable-length character, graphic, and UCS-2 formats, you must specify the keyword VARYING; otherwise, the format will be fixed length.

Entry

Explanation

Blank

When the LIKE keyword is not specified:

• If the decimal positions entry is blank, then the item is defined as character
• If the decimal positions entry is not blank, then the item is defined as packed numeric if it is a standalone field or parameter; or as zoned numeric if it is a subfield.

Note:

The entry must be blank whenever the LIKE, LIKEDS and LIKEREC keywords are specified.

A

Character (Fixed or Variable-length format)

B

Numeric (Binary format)

C

UCS-2 (Fixed or Variable-length format)

D

Date

F

Numeric (Float format)

G

Graphic (Fixed or Variable-length format)

I

Numeric (Integer format)

N

Character (Indicator format)

O

Object

P

Numeric (Packed decimal format)

S

Numeric (Zoned format)

T

Time

U

Numeric (Unsigned format)

Z

Timestamp

*

Basing pointer or procedure pointer