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

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