NAME       : DBGSECT
 DESCRIPTION: Debug Work Area
 DSECT      : DBGSECT
 FUNCTION   : Mapping macro which maps the debug
              information found at abnormal termination.
              DBGSECT is the DSECT used by DEBUG for saving
              registers, PSWs, and other data. V-constants in
              DMSDBD, DMSDBG, and DMSITE point to the DEBUG
              work area. DBGSECT is called by the DBGSECT
              macro.

 DBGSECT DSECT
Top of page

Hex   Dec Type/Val   Lng Label (dup)    Comments
---- ---- --------- ---- -------------- --------
0000    0 Structure      DBGSECT        Debug Work Area
      STORAGE AND CONSTANTS FOR NEWLIN AND CONTROL
0008    8 Dbl-Word     8 * (0)
0008    8 Dbl-Word     8 ARGS (5)       ARGUMENTS STORED HERE
          00000028       MVCNT1         *-ARGS NUMBER OF BYTES IN ARGS
          00000020       MVCNT          MVCNT1-8 NEEDED FOR SET GPR
                                        COMMAND
          00000030       ARGMAX         * END OF ARGUMENT AREA
0030   48 Bitstring    1 JFLAGS (6)     FLAGS CORRESPONDING TO ARGS
      ONE FLAG FOR EACH PARAMETER: 00 = NUMERIC (0 - 9)
                                   F0 = HEX (A - F, 0 - 9)
                                   FF = ALPHABETIC (A - F)
0036   54 Bitstring    1 ARGSCT         NUMBER OF ARGUMENTS IN CMD LINE
          0000002F       MVCNT2         *-ARGS FOR INITIALIZING TO ZERO
      THE FOLLOWING VARIABLES ARE USED BY DEBUG AND DEBDUMP
0038   56 Dbl-Word     8 DEC            BINARY WORD
0040   64 Dbl-Word     8 LASTLINE (8)   32 BYTE FOR LAST LINE DUMPED
0080  128 Signed       4 SAVE1          DEBDUMP USES FOR LINE COUNT
0084  132 Signed       4 SAVE2
0088  136 Signed       4 DBGSAV1 (16)   DEBUG BALR-CALL SAVE
00C8  200 Character   11 LINE           I/O BUFFER
00D3  211 Bitstring    1 LINE1 (87)
012A  298 Character    1 LINE1B
012B  299 Bitstring    1 LINE1A (32)
014B  331 Character    1 LINE1C
014C  332 Bitstring    1 LINE1D
          11.. 1...      DBGOUT         LINE DBGOUT OUTPUT BUFFER
014D  333 Bitstring    1 DBGSWTCH       INTERNAL DEBUG STATUS FLAGS
          ..1. ....      DBDEXIT        X'20' DBDEXIT SIGNALS EXIT FROM
                                        DEBDUMP
          ...1 ....      DBDDMSG        X'10' DBDDMSG SIGNALS DUPLICATE
                                        MSG IN DEBDUMP
          .... 1...      DBGSET         X'08' DBGSET SIGNALS SET COMMAND
          .... .1..      DBGPERM        X'04' DBGPERM RESERVED FOR FUTURE
                                        USE
          .... ..1.      DBGCOND        X'02' DBGCOND RESERVED FOR FUTURE
                                        USE THE FOLLOWING IS USED BY
                                        DMSDBD
014E  334 Bitstring    1 MSGFLAG        INIT MESSAGE FLAG TO NOT USE
014F  335 Address      1 DUPMSG         MESSAGE BUFFER
0150  336 Character   80 MSG

 
*** DBGSECT - Debug Work Area
*
*     +-------------------------------------------------------+
*   0 |                       DBGSECT                         |
*     +-------------------------------------------------------+
*   8 |                                                       |
*     =                         ARGS                          =
*     |                                                       |
*     +-----------------------------------------+------+------+
*  30 |                 JFLAGS                  |ARGSCT|//////|
*     +-----------------------------------------+------+------+
*  38 |                         DEC                           |
*     +-------------------------------------------------------+
*  40 |                                                       |
*     =                       LASTLINE                        =
*     |                                                       |
*     +---------------------------+---------------------------+
*  80 |          SAVE1            |          SAVE2            |
*     +---------------------------+---------------------------+
*  88 |                                                       |
*     =                       DBGSAV1                         =
*     |                                                       |
*     +-------------------------------------------------------+
*  C8 |                         LINE                          |
*     |                    +----------------------------------+
*     |                    |                                  |
*     +--------------------+                                  |
*  D8 |                                                       |
*     =                        LINE1                          =
*     |             +------+----------------------------------+
* 128 |             |LINE1B|                                  |
*     +-------------+------+                                  |
* 130 |                                                       |
*     =                        LINE1A                         =
*     |                    +------+------+------+------+------+
* 148 |                    |LINE1C|LINE1D|:SWTCH|:FLAG |DUPMSG|
*     +--------------------+------+------+------+------+------+
* 150 |                                                       |
*     =                         MSG                           =
*     |                                                       |
*     +-------------------------------------------------------+
* 1A0
*
*** DBGSECT - Debug Work Area

 
Symbol         Dspl Value
-------------- ---- -----
ARGMAX         0008 00000030
ARGS           0008
ARGSCT         0036
DBDDMSG        014D 10
DBDEXIT        014D 20
DBGCOND        014D 02
DBGOUT         014C C8
DBGPERM        014D 04
DBGSAV1        0088
DBGSET         014D 08
DBGSWTCH       014D
DEC            0038
DUPMSG         014F
JFLAGS         0030
LASTLINE       0040
LINE           00C8
LINE1          00D3
LINE1A         012B
LINE1B         012A
LINE1C         014B
LINE1D         014C
MSG            0150
MSGFLAG        014E
MVCNT          0008 00000020
MVCNT1         0008 00000028
MVCNT2         0036 0000002F
SAVE1          0080
SAVE2          0084