Programming Interface Information: This information is NOT intended to be
used as Programming Interfaces of VM/ESA. It is to be used for diagnosis only.

FNSDT

Prolog  

Control Block Contents  

FNSDT DSECT

Storage Layout  

Cross Reference (Contains links to field and bit definitions)  

FNSDT Prolog

Name : DMSFNSDT Description: Date/Time Workarea DSECT DSECT : FNSDT Function : This macro maps the workarea used by DMSFNSTM to compute the date/time that is put in the FST.

 

FNSDT Control Block Content


FNSDT DSECT

Hex Dec Type/Val Lng Label (dup) Comments ---- ---- --------- ---- -------------- -------- 0000 0 Structure FNSDT Date/Time Workarea DSECT 0000 0 Character 2 FNSMM Month (EBCDIC) 0002 2 Character 1 * Reserved for '/' 0003 3 Character 2 FNSDD Day (EBCDIC) 0005 5 Character 1 * Reserved for '/' 0006 6 Character 2 FNSYY Year (EBCDIC) 0008 8 Character 2 FNSHH Hours (EBCDIC or UNPKed) 000A 10 Character 1 * Reserved for ':' 000B 11 Character 2 FNSTT Minutes (EBCDIC or UNPKed) 000D 13 Character 1 * Reserved for ':' 000E 14 Character 2 FNSSS Seconds (EBCDIC or UNPKed) 0010 16 Character 13 FNSUPDT (0) Date/time in UNPKed decimal 0010 16 Character 2 FNSUPYY Year 0012 18 Character 2 FNSUPMM Month 0014 20 Character 2 FNSUPDD Day 0016 22 Character 2 FNSUPHH Hours 0018 24 Character 2 FNSUPTT Minutes 001A 26 Character 2 FNSUPSS Seconds 001C 28 Character 1 FNSUPSN Sign byte 001D 29 Character 6 FNSDATI (0) Date/time in PACKed decimal 001D 29 Character 1 FNSPYY Year 001E 30 Character 1 FNSPMM Month 001F 31 Character 1 FNSPDD Day 0020 32 Character 1 FNSPHH Hours 0021 33 Character 1 FNSPTT Minutes 0022 34 Character 1 FNSPSS Seconds 0023 35 Character 1 * Reserved 0024 36 Character 4 * Reserved 0010 16 Signed 4 FNSINMPL (0) DMSINMTS plist 0010 16 Address 4 FNSITOD Ptr to current TOD 0014 20 Address 4 FNSITODM Ptr to TOD at previous midnight 0018 24 Address 4 FNSIJUL Ptr to Julian day, CL3 001C 28 Address 4 FNSICDAT Ptr to current date MM/DD/YY, CL8 0020 32 Address 4 FNSICTIM Ptr to current time HH:MM:SS, CL8 0024 36 Address 4 FNSICENT Ptr to upper half of 4-digit yr 0028 40 Bitstring 1 FNSCENT Upper half of 4-digit year 00000029 FNSDTLEN *-FNSDT Length of FNSDT

 

FNSDT Storage Layout

*** FNSDT - Date/Time Workarea DSECT
*
*     +-------------+------+-------------+------+-------------+
*   0 |   FNSMM     |//////|   FNSDD     |//////|   FNSYY     |
*     +-------------+------+-------------+------+-------------+
*   8 |   FNSHH     |//////|   FNSTT     |//////|   FNSSS     |
*     +-------------+------+------+------+------+-------------+
*  10 |  FNSUPYY    |  FNSUPMM    |  FNSUPDD    |  FNSUPHH    |
*     +-------------+-------------+------+------+------+------+
*  18 |  FNSUPTT    |  FNSUPSS    |:UPSN |FNSPYY|FNSPMM|FNSPDD|
*     +------+------+------+------+------+------+------+------+
*  20 |FNSPHH|FNSPTT|FNSPSS|//////|///////////////////////////|
*     +------+------+------+------+---------------------------+
*  28 |:CENT | 29
*     +------+
*
*** FNSDT - Date/Time Workarea DSECT
*** Overlay for FNSUPDT in FNSDT
*
*     +---------------------------+---------------------------+
*  10 |         FNSITOD           |         FNSITODM          |
*     +---------------------------+---------------------------+
*  18 |         FNSIJUL           |         FNSICDAT          |
*     +---------------------------+---------------------------+
*  20 |         FNSICTIM          |         FNSICENT          |
*     +---------------------------+---------------------------+
*  28
*
*** Overlay for FNSUPDT in FNSDT

 

FNSDT Cross Reference

(contains links to field and bit definitions)
Symbol         Dspl Value
-------------- ---- -----

FNSCENT 0028

FNSDATI 001D

FNSDD 0003

FNSDTLEN 0028 00000029

FNSHH 0008

FNSICDAT 001C

FNSICENT 0024

FNSICTIM 0020

FNSIJUL 0018

FNSINMPL 0010

FNSITOD 0010

FNSITODM 0014

FNSMM 0000

FNSPDD 001F

FNSPHH 0020

FNSPMM 001E

FNSPSS 0022

FNSPTT 0021

FNSPYY 001D

FNSSS 000E

FNSTT 000B

FNSUPDD 0014

FNSUPDT 0010

FNSUPHH 0016

FNSUPMM 0012

FNSUPSN 001C

FNSUPSS 001A

FNSUPTT 0018

FNSUPYY 0010

FNSYY 0006


This information is based on VM/ESA 2.4.0.
Last updated on 12 Aug 1999 at 11:16:35 EDT.
Copyright IBM Corporation, 1990, 1999