Rational Developer for System z
COBOL for Windows, Version 7.5, Programming Guide


ADATA identification record - X'0001'

The following table shows the contents of the ADATA identification record.

Table 103. ADATA identification record
Field Size Description
Time (binary) XL8 Universal Time (UT) as a binary number of microseconds since midnight Greenwich Mean Time, with the low-order bit representing 1 microsecond. This time can be used as a time-zone-independent time stamp.

On Windows and AIX systems, only bytes 5-8 of the field are used as a fullword binary field that contains the time.

CCSID1 XL2 Coded Character Set Identifier
Character-set flags XL1
X'80'
EBCDIC (IBM-037)
X'40'
ASCII (IBM-1252)
Code-page name length XL2 Length of the code-page name that follows
Code-page name CL(n) Name of the code page
  1. The appropriate CCS flag will always be set. If the CCSID is set to nonzero, the code-page name length will be zero. If the CCSID is set to zero, the code-page name length will be nonzero and the code-page name will be present.

Terms of use | Feedback

Copyright IBM Corporation 1996, 2008.
This information center is powered by Eclipse technology. (http://www.eclipse.org)