NAME       : HCPRSPBK
 DESCRIPTION: REAL SPOOL DEVICE BLOCK
 DSECT      : RSPBK
 FUNCTION   : CONTAINS CONTROL INFORMATION FOR A
              REAL SPOOLING DEVICE.
 LOCATED BY : RSPANCH field in RSPHDR
              RDEVRSP FIELD OF HCPRDEV
              CKPRSPB FIELD OF HCPCKPBK
 CREATED BY : HCPRIO, HCPZRP and HCPZPO
 DELETED BY : HCPZRP, HCPZPO and HCPZSF
 RELOCATION CONSIDERATIONS : None

 RSPBK DSECT
Top of page

Hex   Dec Type/Val   Lng Label (dup)    Comments
---- ---- --------- ---- -------------- --------
0000    0 Structure      RSPBK          REAL SPOOL DEVICE BLOCK
0000    0 Bitstring    1 RSPSTAT        SPOOLING DEVICE STATUS FLAGS
          1... ....      RSPPDED        X'80' RSPPDED DEVICE 'PSEUDO
                                        DEDICATED' TO 'RSPUSER'
          .1.. ....      RSPOSEP        X'40' RSPOSEP SEPARATOR ROUTINE
                                        ACTIVE
          ..1. ....      RSPRSTRT       X'20' RSPRSTRT IPL TIME RESTART
                                        OF FILE
          ...1 ....      RSPDLOCK       X'10' RSPDLOCK SPDBK FRAME IS
                                        'LOCKED'
          .... 1...      RSPOPEN        X'08' RSPOPEN A file is open on
                                        the reader
          .... .1..      RSPDNUM3       X'04' RSPDNUM3 Third RSPADNUM
                                        overflow bit
          .... ..1.      RSPDNUM2       X'02' RSPDNUM2 Second RSPADNUM
                                        overflow bit
          .... ...1      RSPDNUM1       X'01' RSPDNUM1 First RSPADNUM
                                        overflow bit
0001    1 Bitstring    1 RSPFLAG        SPOOLING DEVICE CONTROL FLAGS
          1... ....      RSPDRAN        X'80' RSPDRAN DEVICE IS DRAINED
          .1.. ....      RSPFLUSH       X'40' RSPFLUSH DEVICE TO BE
                                        FLUSHED
          ..1. ....      RSPSPAC        X'20' RSPSPAC FORCE SINGLE
                                        SPACING ON PRINTER
          ...1 ....      RSPREPO        X'10' RSPREPO REPOSITION FILE
                                        (FWD OR BKWD)
          .... 1...      RSPSEP         X'08' RSPSEP FILE SEPARATORS
                                        WANTED
          .... .1..      RSPULD         X'04' RSPULD UCS VERIFIED
          .... ..1.      RSPDRING       X'02' RSPDRING DEVICE IS BEING
                                        DRAINED
          .... ...1      RSPNOAFP       X'01' RSPNOAFP Device can NOT
                                        accept AFP files
0002    2 Bitstring    1 RSPFLAG1       SPOOLING DEVICE FLAGS
          1... ....      RSPWAIT        X'80' RSPWAIT PUNCH WAITING FOR
                                        INTERRUPT TO PUNCH ID CARD.
          .1.. ....      RSPSEPPR       X'40' RSPSEPPR SEPARATOR HEADER
                                        PRINTED
          ..1. ....      RSPIOACT       X'20' RSPIOACT HCPRSPIO IS
                                        PROCESSING A FILE
          ...1 ....      RSPBEG         X'10' RSPBEG SELECT FILES WITH
                                        3800 LOAD CCW'S IF ALL APPEAR AT
                                        THE BEGINNING
          .... 1...      RSPANY         X'08' RSPANY ALLOW 3800 LOAD CCWS
                                        ANYWHERE
          .... .1..      RSPURGE        X'04' RSPURGE PURGE FILES W/ 3800
                                        LOAD CHECKS
          .... ..1.      RSPINPRT       X'02' RSPINPRT INITIALIZE THE
                                        PRINTER
          .... ...1      RSPDVACT       X'01' RSPDVACT ACTIVE (MAY BE
                                        AWAITING PROMPT)
0003    3 Bitstring    1 RSPFMFLG       FORMS PROCESSING FLAGS
          1... ....      RSPAUTO        X'80' RSPAUTO OUTPUT DEVICE IN
                                        AUTO MODE
          .1.. ....      RSPMAN         X'40' RSPMAN OUTPUT DEVICE IN
                                        MANUAL MODE
          ..1. ....      RSPSETUP       X'20' RSPSETUP PRINTER IN SETUP
                                        MODE
          ...1 ....      RSPFMNT        X'10' RSPFMNT OUTPUT DEVICE IS
                                        WAITING FOR A FORM TO BE MOUNTED
          .... 1...      RSPSETRQ       X'08' RSPSETRQ PRINTER REQUIRES
                                        FORMS ALIGNMENT
          .... .1..      RSPFMCHG       X'04' RSPFMCHG FORM NEEDS TO BE
                                        CHANGED
          .... ..1.      RSPSTRT        X'02' RSPSTRT START COMMAND
                                        ISSUED
          .... ...1      RSPSTPRT       X'01' RSPSTPRT PRT HAS BEEN
                                        STARTED
0004    4 Bitstring    1 RSPPQMAX       MAX SIZE OF 3800 DELAYED PURGE Q
0005    5 Bitstring    1 RSPPQCNT       CURRENT SIZE OF DELAYED PURGE Q
0006    6 Bitstring    1 RSPCURP        CURRENT 3800 PAPER SIZE
0007    7 Bitstring    1 RSPIMPFL       Flag for impact printer info
          1... ....      RSPFOLD        X'80' RSPFOLD FOLD characters
                                        into uppercase
          .1.. ....      RSPC1L1        X'40' RSPC1L1 Channel 1 is line 1
                                        of the form in the loaded,
                                        default FCB
          ..1. ....      RSPINDEX       X'20' RSPINDEX INDEX set on START
                                        command
          ...1 ....      RSPFCBCH       X'10' RSPFCBCH FCB needs to be
                                        changed
          .... 1...      RSPUCSCH       X'08' RSPUCSCH UCS needs to be
                                        changed
          .... .1..      RSPFLDCH       X'04' RSPFLDCH FOLD option has
                                        changed
          .... ..1.      RSPFFCBS       X'02' RSPFFCBS Accept LOADFCB
                                        CCWs from file
          .... ...1      RSPFLDL        X'01' RSPFLDL File deleted during
                                        closure
0008    8 Character    2 RSPINDX        Value of the first print position
                                        as specified with INDEX option
000A   10 Signed       2 RSPADNUM       RELATIVE SPDBK NUMBER
000C   12 Signed       4 RSPBUFF        Address of buffer to contain FCB
                                        or UCS for an impact printer
0010   16 Signed       4 RSPSPID        System spid of active file
0014   20 Signed       2 RSPDEV         SPOOLING DEVICE DEVICE NUMBER
0016   22 Signed       2 RSPSEQNO       FILE SEQUENCE NUMBER
0018   24 Address      4 RSPSPF         ADDRESS OF THE ACTIVE SPFBK
001C   28 Address      4 RSPSPA         ADDRESS OF THE CURRENT SPABK
0020   32 Address      4 RSPRDEV        SPOOLING DEVICE RDEV BLK ADDRESS
0024   36 Address      4 RSPDPQ         3800 DELAYED PURGE QUEUE ADDRESS
0028   40 Address      4 RSPSIL         ADDRESS OF A SILBK
002C   44 Address      4 RSPIMG         ADDRESS OF AN IMGBK
0030   48 Dbl-Word     8 RSPPAGEA (0)   3800 IO BUFFER A ADDRESSES
0030   48 Address      4 RSPVPGA        VPAGE ADDR OF 3800 IO BUFFER - A
0034   52 Address      4 RSPFRMA        FRAME ADDR OF 3800 IO BUFFER - A
0038   56 Dbl-Word     8 RSPPAGEB (0)   3800 IO BUFFER B ADDRESSES
0038   56 Address      4 RSPVPGB        VPAGE ADDR OF 3800 IO BUFFER - B
003C   60 Address      4 RSPFRMB        FRAME ADDR OF 3800 IO BUFFER - B
0040   64 Address      4 RSPSVPG        SAVE VPAGE ADDR FOR LATER RELEASE
0044   68 Character    4 RSPFLASH       FORMS OVERLAY ACTIVE ON A 3800
0048   72 Character    4 RSPCHARS       PRINTER CHARACTER SET NAME
004C   76 Character    4 RSPFCB         PRINTER FCB NAME
0050   80 Character    8 RSPUSER        USERID OF 'DEDICATED' DEVICE
0058   88 Character    8 RSPCLASS       SPOOL CLASSES
0060   96 Character    8 RSPFORM        PRINT OR PUNCH FORM NUMBER
0068  104 Character    8 RSPIMAGE       IMAGELIB ACTIVE ON A PRINTER
0070  112 Character   32 RSPDESTS       Four 8-character DEST values
0070  112 Dbl-Word     8 RSPDEST1       First DEST value
0078  120 Dbl-Word     8 RSPDEST2       Second DEST value
0080  128 Dbl-Word     8 RSPDEST3       Third DEST value
0088  136 Dbl-Word     8 RSPDEST4       Fourth DEST value
0090  144 Character    8 RSPSCLAB       PRINTER SECURITY LABEL
0098  152 Signed       4 RSPRAND        RANDOM NO. FOR SEPARATOR PAGES
009C  156 Address      4 RSPFWDPT       Forward pointer to next RSPBK
00A0  160 Signed       4 RSPMAXR        Maximum number of records/file
00A4  164 Bitstring    1 RSPSRFLG       Flag to mark source of RSPBK
          1... ....      RSPSRFRE       X'80' RSPSRFRE RSPBK obtained
                                        from free storage
          .1.. ....      RSPSRSEN       X'40' RSPSRSEN RSPBK built as a
                                        result of sense
00A5  165 Bitstring    1 RSPLPP         Separator lines-per-page
00A6  166 Bitstring    1 RSPFLAG2       Miscellaneous flags
          1... ....      RSPNOMRK       X'80' RSPNOMRK Skip MARKFORM for
                                        3800
00A7  167 Bitstring    1 *              Reserved for future IBM use
00A8  168 Signed       4 * (6)          Reserved for future IBM use
          00000018       RSPSIZE        (*-RSPBK+7)/8 RSPBK SIZE IN
                                        DOUBLE-WORDS

          
*** RSPBK - REAL SPOOL DEVICE BLOCK
*
*     +------+------+------+------+------+------+------+------+
*   0 |:STAT |:FLAG |:FLAG1|:FMFLG|:PQMAX|:PQCNT|:CURP |:IMPFL|
*     +------+------+------+------+------+------+------+------+
*   8 |  RSPINDX    |  RSPADNUM   |         RSPBUFF           |
*     +-------------+-------------+-------------+-------------+
*  10 |         RSPSPID           |   RSPDEV    |  RSPSEQNO   |
*     +---------------------------+-------------+-------------+
*  18 |          RSPSPF           |          RSPSPA           |
*     +---------------------------+---------------------------+
*  20 |         RSPRDEV           |          RSPDPQ           |
*     +---------------------------+---------------------------+
*  28 |          RSPSIL           |          RSPIMG           |
*     +---------------------------+---------------------------+
*  30 |         RSPVPGA           |         RSPFRMA           |
*     +---------------------------+---------------------------+
*  38 |         RSPVPGB           |         RSPFRMB           |
*     +---------------------------+---------------------------+
*  40 |         RSPSVPG           |         RSPFLASH          |
*     +---------------------------+---------------------------+
*  48 |         RSPCHARS          |          RSPFCB           |
*     +---------------------------+---------------------------+
*  50 |                       RSPUSER                         |
*     +-------------------------------------------------------+
*  58 |                       RSPCLASS                        |
*     +-------------------------------------------------------+
*  60 |                       RSPFORM                         |
*     +-------------------------------------------------------+
*  68 |                       RSPIMAGE                        |
*     +-------------------------------------------------------+
*  70 |                                                       |
*     =                       RSPDESTS                        =
*     |                                                       |
*     +-------------------------------------------------------+
*  90 |                       RSPSCLAB                        |
*     +---------------------------+---------------------------+
*  98 |         RSPRAND           |         RSPFWDPT          |
*     +---------------------------+------+------+------+------+
*  A0 |         RSPMAXR           |:SRFLG|RSPLPP|:FLAG2|//////|
*     +---------------------------+------+------+------+------+
*  A8 |///////////////////////////////////////////////////////|
*     =///////////////////////////////////////////////////////=
*     |///////////////////////////////////////////////////////|
*     +-------------------------------------------------------+
*  C0
*
*** RSPBK - REAL SPOOL DEVICE BLOCK
          
*** Overlay for RSPDESTS in RSPBK
*
*     +-------------------------------------------------------+
*  70 |                       RSPDEST1                        |
*     +-------------------------------------------------------+
*  78 |                       RSPDEST2                        |
*     +-------------------------------------------------------+
*  80 |                       RSPDEST3                        |
*     +-------------------------------------------------------+
*  88 |                       RSPDEST4                        |
*     +-------------------------------------------------------+
*  90
*
*** Overlay for RSPDESTS in RSPBK

 
Symbol         Dspl Value
-------------- ---- -----
RSPADNUM       000A
RSPANY         0002 08
RSPAUTO        0003 80
RSPBEG         0002 10
RSPBUFF        000C
RSPCHARS       0048
RSPCLASS       0058
RSPCURP        0006
RSPC1L1        0007 40
RSPDESTS       0070
RSPDEST1       0070
RSPDEST2       0078
RSPDEST3       0080
RSPDEST4       0088
RSPDEV         0014
RSPDLOCK       0000 10
RSPDNUM1       0000 01
RSPDNUM2       0000 02
RSPDNUM3       0000 04
RSPDPQ         0024
RSPDRAN        0001 80
RSPDRING       0001 02
RSPDVACT       0002 01
RSPFCB         004C
RSPFCBCH       0007 10
RSPFFCBS       0007 02
RSPFLAG        0001
RSPFLAG1       0002
RSPFLAG2       00A6
RSPFLASH       0044
RSPFLDCH       0007 04
RSPFLDL        0007 01
RSPFLUSH       0001 40
RSPFMCHG       0003 04
RSPFMFLG       0003
RSPFMNT        0003 10
RSPFOLD        0007 80
RSPFORM        0060
RSPFRMA        0034
RSPFRMB        003C
RSPFWDPT       009C
RSPIMAGE       0068
RSPIMG         002C
RSPIMPFL       0007
RSPINDEX       0007 20
RSPINDX        0008
RSPINPRT       0002 02
RSPIOACT       0002 20
RSPLPP         00A5
RSPMAN         0003 40
RSPMAXR        00A0
RSPNOAFP       0001 01
RSPNOMRK       00A6 80
RSPOPEN        0000 08
RSPOSEP        0000 40
RSPPAGEA       0030
RSPPAGEB       0038
RSPPDED        0000 80
RSPPQCNT       0005
RSPPQMAX       0004
RSPRAND        0098
RSPRDEV        0020
RSPREPO        0001 10
RSPRSTRT       0000 20
RSPSCLAB       0090
RSPSEP         0001 08
RSPSEPPR       0002 40
RSPSEQNO       0016
RSPSETRQ       0003 08
RSPSETUP       0003 20
RSPSIL         0028
RSPSIZE        00A8 00000018
RSPSPA         001C
RSPSPAC        0001 20
RSPSPF         0018
RSPSPID        0010
RSPSRFLG       00A4
RSPSRFRE       00A4 80
RSPSRSEN       00A4 40
RSPSTAT        0000
RSPSTPRT       0003 01
RSPSTRT        0003 02
RSPSVPG        0040
RSPUCSCH       0007 08
RSPULD         0001 04
RSPURGE        0002 04
RSPUSER        0050
RSPVPGA        0030
RSPVPGB        0038
RSPWAIT        0002 80