SPGBK

Prolog  

Control Block Contents  
   SPGBK DSECT

Storage Layout  

Cross Reference (Contains links to field and bit definitions)  

SPGBK Prolog

 Name       : HCPSPGBK
 Description: Spool File Get Block
 DSECT      : SPGBK
 Function   : The SPGBK contains information used to get
              spool file data via the *SPL system service
 Located by : Passed by virtual machine application via
              IUCV SEND
 Created by : Virtual machine application
 Deleted by : Virtual machine application

SPGBK Control Block Content

SPGBK DSECT

Hex   Dec Type/Val   Lng Label (dup)    Comments
---- ---- --------- ---- -------------- --------
0000    0 Structure      SPGBK          Spool File Get Block
0000    0 Character    8 SPGUSER        Userid owing file to be selected
0008    8 Signed       2 SPGSPID        Spoolid of file to be selected
000A   10 Bitstring    1 SPGQUEUE       D*1 Specification of file queue
     Settings for SPGQUEUE
          00000001       SPGRDR         1 Select RDR queue
          00000002       SPGPRT         2 Select PRT queue
          00000003       SPGPUN         3 Select PUN queue
000B   11 Bitstring    1 SPGOPTN        D*2 SELECT and GET flag byte
          1... ....      SPGSPEC        X'80' Select specific file
                                        (SPGUSER and SPGSPID)
          .1.. ....      SPGNEXT        X'40' Select next unseen file
                                        (SPGUSER and SPGQUEUE)
          ..1. ....      SPGRESET       X'20' Reset all seen bits
                                        (SPGUSER and SPGQUEUE)
          ...1 ....      SPGGSFB        X'10' Return SFBLOK data
          .... 1...      SPGG3800       X'08' Return 3800 data
          .... .1..      SPGGSPLK       X'04' Return SPLINK data
                                        (SPGSPLKS and SPGSPLKN)
          .... ..1.      SPGGXAB        X'02' Return XAB data
          .... ...1      SPGNOSEL       X'01' Request for data only, file
                                        remains unselected
          1... ....      SPGPURGE       X'80' Purge the file
          .1.. ....      SPGUHOLD       X'40' Put the file in user hold
          ..1. ....      SPGSHOLD       X'20' Put the file in system hold
          ...1 ....      SPGDECR        X'10' Decrement the copy count
000C   12 Signed       4 *              Reserved
0010   16 Signed       4 SPGSPLKS       Starting SPLINK number to return
0014   20 Signed       4 SPGSPLKN       Number of SPLINKS to return
0018   24 Address      4 SPGSFBA        Address to return SFBLOK data
001C   28 Address      4 SPG3800A       Address to return 3800 data
0020   32 Address      4 SPGSPLKA       Address to return SPLINK data
0024   36 Address      4 SPGXABA        Address to return XAB data
0028   40 Bitstring    1 SPGSFBL        D*3 Length of SFBLOK data
                                        requested (d-words)
0029   41 Bitstring    1 SPG3800L       D*4 Length of 3800 data requested
                                        (d-words)
002A   42 Signed       2 SPGXABL        Len of XAB data requested (bytes)
002C   44 Signed       4 *              Reserved
          00000030       SPGSIZEB       (*-SPGBK) Size in bytes
          00000006       SPGSIZED       (*-SPGBK+7)/8 Size in d-words

SPGBK Storage Layout

          
*** SPGBK - Spool File Get Block
*
*     +-------------------------------------------------------+
*   0 |                       SPGUSER                         |
*     +-------------+------+------+---------------------------+
*   8 |  SPGSPID    |:QUEUE|:OPTN |///////////////////////////|
*     +-------------+------+------+---------------------------+
*  10 |         SPGSPLKS          |         SPGSPLKN          |
*     +---------------------------+---------------------------+
*  18 |         SPGSFBA           |         SPG3800A          |
*     +---------------------------+---------------------------+
*  20 |         SPGSPLKA          |         SPGXABA           |
*     +------+------+-------------+---------------------------+
*  28 |:SFBL |:3800L|  SPGXABL    |///////////////////////////|
*     +------+------+-------------+---------------------------+
*  30
*
*** SPGBK - Spool File Get Block

SPGBK Cross Reference

Symbol         Dspl Value
-------------- ---- -----
SPGDECR        000B 10
SPGGSFB        000B 10
SPGGSPLK       000B 04
SPGGXAB        000B 02
SPGG3800       000B 08
SPGNEXT        000B 40
SPGNOSEL       000B 01
SPGOPTN        000B
SPGPRT         000A 00000002
SPGPUN         000A 00000003
SPGPURGE       000B 80
SPGQUEUE       000A
SPGRDR         000A 00000001
SPGRESET       000B 20
SPGSFBA        0018
SPGSFBL        0028
SPGSHOLD       000B 20
SPGSIZEB       002C 00000030
SPGSIZED       002C 00000006
SPGSPEC        000B 80
SPGSPID        0008
SPGSPLKA       0020
SPGSPLKN       0014
SPGSPLKS       0010
SPGUHOLD       000B 40
SPGUSER        0000
SPGXABA        0024
SPGXABL        002A
SPG3800A       001C
SPG3800L       0029