FORMS

Prolog  

Control Block Contents  
   FORMS DSECT
   UFORM DSECT

Storage Layout  

Cross Reference (Contains links to field and bit definitions)  

FORMS Prolog

 NAME       : HCPFORMS
 DESCRIPTION: System spool output forms and user forms
 DSECT      : FORMS (primary)
 FUNCTION   : To contain the default forms for each spool device
              type and to contain the anchor for the chain of user
              form names and the operator form names to which they
              are equivalent.
 LOCATED BY : PFXSYS -> SYSCM
              SYSCM(SYSFORMT) -> FORMS
              FORMS(FORMANCH) -> UFORM
              UFORM(UFORMNXT) -> UFORM   etc.
 CREATED BY : SYSFORM macro or HCPZPP via entries in SYSTEM CONFIG
 DELETED BY : Not deleted
 RELOCATION CONSIDERATIONS : None

FORMS Control Block Content

FORMS DSECT

Hex   Dec Type/Val   Lng Label (dup)    Comments
---- ---- --------- ---- -------------- --------
0000    0 Structure      FORMS          System spool output forms and user forms
0000    0 Character    8 FORMDRDR       Default reader form
0008    8 Character    8 FORMDPRT       Default printer form
0010   16 Character    8 FORMDPCH       Default punch form
0018   24 Character    8 FORMDCON       Default console form
0020   32 Address      4 FORMANCH       Anchor for User Form entries
0024   36 Address      4 *              Reserved for future IBM use
          00000028       FORMSSIZ       *-FORMS Length of FORMS base
          00000005       FORMDSIZ       (*-FORMS+7)/8 Length in double
                                        words

UFORM DSECT

Hex   Dec Type/Val   Lng Label (dup)    Comments
---- ---- --------- ---- -------------- --------
0000    0 Structure      UFORM          System spool output forms and user forms
0000    0 Address      4 UFORMNXT       Address of next UFORM entry
0004    4 Bitstring    1 UFORMFLG       Flag byte for UFORM
             Bits set in UFORMFLG
          1... ....      UFORMNAR       X'80' Set on if the form is
                                        narrow
0005    5 Bitstring    1 * (3)          Reserved for future IBM use
0008    8 Character    8 UFORMNAM       User form name
0010   16 Character    8 UFORMOPR       Equivalent operator form
          00000018       UFORMSIZ       *-UFORM Size of UFORM entry
          00000003       UFORMDSZ       (*-UFORM+7)/8 Size in double
                                        words

FORMS Storage Layout

          
*** FORMS - System spool output forms and user forms
*
*     +-------------------------------------------------------+
*   0 |                       FORMDRDR                        |
*     +-------------------------------------------------------+
*   8 |                       FORMDPRT                        |
*     +-------------------------------------------------------+
*  10 |                       FORMDPCH                        |
*     +-------------------------------------------------------+
*  18 |                       FORMDCON                        |
*     +---------------------------+---------------------------+
*  20 |         FORMANCH          |///////////////////////////|
*     +---------------------------+---------------------------+
*  28
*
*** FORMS - System spool output forms and user forms
          
*** UFORM - System spool output forms and user forms
*
*     +---------------------------+------+--------------------+
*   0 |         UFORMNXT          |:RMFLG|////////////////////|
*     +---------------------------+------+--------------------+
*   8 |                       UFORMNAM                        |
*     +-------------------------------------------------------+
*  10 |                       UFORMOPR                        |
*     +-------------------------------------------------------+
*  18
*
*** UFORM - System spool output forms and user forms

FORMS Cross Reference

Symbol         Dspl Value
-------------- ---- -----
FORMANCH       0020
FORMDCON       0018
FORMDPCH       0010
FORMDPRT       0008
FORMDRDR       0000
FORMDSIZ       0024 00000005
FORMSSIZ       0024 00000028
UFORMDSZ       0010 00000003
UFORMFLG       0004
UFORMNAM       0008
UFORMNAR       0004 80
UFORMNXT       0000
UFORMOPR       0010
UFORMSIZ       0010 00000018