$PCE mapping

Table 1. Structure PCE
Offset
Dec
Offset
Hex
Type Len Name(Dim) Description
0 (0) STRUCTURE 0 PCE , Processor Control Element
0 (0) CHARACTER 4  PCEEYE(0) Eye catcher
0 (0) BITSTRING 1   (0) $SAVE area (see $PSV)
0 (0) X'A0' 0  PCELPSV "PSVLABAD-PSV+PCE,4,C'A'" Last $SAVE area
0 (0) X'99' 0  PCEXITID "PSVEXID-PSV+PCE,1,C'F'" Exit ID last invoked
0 (0) X'9C' 0  PCEDOM68 "PSVADDR-PSV+PCE,4,C'F'" Domid for $HASP068
176 (B0) ADDRESS 4  PCEPREV ADDRESS OF PREVIOUS PCE
180 (B4) ADDRESS 4  PCENEXT ADDRESS OF NEXT PCE
184 (B8) ADDRESS 4  PCEPCEA NEXT READY/WAITING PCE
188 (BC) ADDRESS 4  PCEPCEB PREVIOUS READY/WAITING PCE
192 (C0) ADDRESS 4  PCEERA ADDR OF ERA FOR ERROR FROM WHICH PCE IS ATTEMPTING TO RECOVER
196 (C4) ADDRESS 4  PCEPRE ADDRESS OF NEWEST PRE
200 (C8) BITSTRING 1  PCEEWF PROCESSOR EVENT WAIT FIELD
201 (C9) BITSTRING 1  PCEFLAGS PROCESSOR FLAGS
      1... ....  PCETRACE "B'10000000'" Processor eligible for tracing
      .1.. ....  PCEDSPXP "B'01000000'" Processor permanently exempt from non-dispatchability
      ..1. ....  PCEDSPXT "B'00100000'" Processor temporarily exempt from non-dispatchability
      ...1 ....  PCENWIOP "B'00010000'" Implicit $WAITs in I/O processing should be prohibited (currently used only by $IOERROR)
      .... 1...  PCETRPSF "B'00001000'" Short $TRACE requested
      .... .1..  PCETRLDS "B'00000100'" Relds indicator
      .... ..1.  PCEPRIO "B'00000010'" High priority pce
      .... ...1  PCEREQIR "B'00000001'" PCE is required (terminate JES2 if PCE abends).
202 (CA) BITSTRING 1  PCEFLAG2 More PCE flags
      1... ....  PCE2ENDD "B'10000000'" PCE has been terminated & will never be dispatched
      .1.. ....  PCE2EBUF "B'01000000'" Emergency buffers allowed
      ..1. ....  PCE2EVNT "B'00100000'" An exception event has occured for PCE this dispatcher cycle
      ...1 ....  PCE2INIT "B'00010000'" PCE has initialized far enough to allow DETACH
      .... 1...  PCE2QSUS "B'00001000'" PCE needed CKPT queues last time it ran
      .... .1..  PCE2XWTR "B'00000100'" PCE is a PSO or SAPI PCE
      .... ..1.  PCE2SJID "B'00000010'" Maintain PCEJOBID
      .... ...1  PCE2SJIX "B'00000001'" Maintain PCEJQEIX
203 (CB) BITSTRING 1  PCEFLGCS PCE 'compare-and-swap' flag Flags in this byte may be manipulated by subtasks and therefore must use CS logic (OIL and NIL) to set/reset the bits.
      1... ....  PCEGEMOK "B'10000000'" PCE is allowed to obtain emergency CMBs
      .1.. ....  PCECEMER "B'01000000'" PCE currently owns an emergency CMB
      ..1. ....  PCEPRIVI "B'00100000'" PCE can may only be used by privileged jobs
204 (CC) SIGNED 2  PCENDSPC NON-DISPATCHABILITY COUNT - IF NON-ZERO PROCESSOR NOT DISPATCHED UNLESS EXEMPT VIA PCEDSPXP/XT
206 (CE) SIGNED 2  PCEID PROCESSOR TYPE
208 (D0) SIGNED 4  PCEUSER0 RESERVED FOR USER
212 (D4) SIGNED 4  PCEUSER1 RESERVED FOR USER
216 (D8) SIGNED 4  PCEPOSTD(0) PCE Post EWF fullword
216 (D8) BITSTRING 3 Reserved for future use
219 (DB) BITSTRING 1  PCEPSTEW PCE POST EWF value
220 (DC) ADDRESS 4  PCEPSTCH PCE POST chain pointer
224 (E0) 1  PCEWTTIM Time PCE $WAITed (STCKE)
      NOTE THAT THE FOLLOWING FIELDS (THROUGH PCEDEVTP) MUST
      CORRESPOND TO THE DCT FIELDS (THROUGH DCTDEVTP)
240 (F0) DBL WORD 8   (0) Ensure DWORD alignment
         ORG -(DCTPCE-DCT) ESTABLISH THE PCEDADCT
232 (E8) DBL WORD 8  PCEDADCT(0) USING STORAGE FOR THE DCT FIELDS NOT IN A DA DCT
240 (F0) ADDRESS 4  PCEDCTPC DA DCT - DCTPCE
244 (F4) SIGNED 4  PCEDCTFL DCTSTAT-DCTFLAGS-DCTFLAG2
248 (F8) BITSTRING 4  PCESEEK MTTR value for $EXCP
252 (FC) BITSTRING 4 Reserved (part of MQTR)
248 (F8) DBL WORD 8  PCEMQTRD(0) 8 byte addr for STG
248 (F8) BITSTRING 1  PCESEEKF 'FF'x if MQTR is set
249 (F9) BITSTRING 1 Reserved (part of MTTR)
250 (FA) BITSTRING 6  PCEMQTR MQTR value for $EXCP
256 (100) ADDRESS 4  PCEBUFAD BUFFER ADDRESS FOR $EXCP
260 (104) ADDRESS 4  PCEIOEWF PCE WITH EWF TO POST OR EXIT ADDRESS
264 (108) SIGNED 2  PCEBUFCN Active buffer count
266 (10A) BITSTRING 1  PCEDEVTP DA DCT FLAGS FOR $EXCP
      .... ....  PCEDARD "B'00000000'" Direct access read request
      .... ...1  PCEDAWR "B'00000001'" Direct access write request
267 (10B) BITSTRING 1  PCEDAFL3 DA DCT flag byte (see DCTFLAG3 for bits)
267 (10B) X'1C' 0  PCEDALEN "*-PCEDCTPC" Length of DA DCT in PCE
268 (10C) SIGNED 2  PCELENG PCE LENGTH
270 (10E) ADDRESS 1  PCEROLOQ Holding area for JQE/JOE 'prior' queue type
271 (10F) SIGNED 1  PCESEQ PCE sequence number
272 (110) ADDRESS 4  PCEDCT ADDRESS OF DCT (IF ANY)
276 (114) ADDRESS 4  PCEJQE ADDRESS OF JQE (IF ANY)
         JOBID or JQE index of the current job. This is
         maintained by $DOGJQE for use by the monitor.
         If the first 4 bytes of PCEJOBID is zero, then
         either there is no current job or the second 4
         bytes is a JQE index.
280 (118) CHARACTER 8  PCEJOBID JOB ID of current job
280 (118) SIGNED 4 Zero
284 (11C) SIGNED 4  PCEJQEIX JOB index of current job
288 (120) ADDRESS 4  PCEPTAB Addr of PCETAB
292 (124) ADDRESS 4  PCEFSACB ADDRESS OF FSACB, IF ANY
296 (128) ADDRESS 4  PCEWAVE ADDRESS OF WAVE (IF ANY)
300 (12C) ADDRESS 4  PCENTITY ADR OF ENTITY AREA (IF ANY)
304 (130) SIGNED 2  PCEASID Associated address space
306 (132) BITSTRING 1  PCEFLAG3 More PCE flags
      1... ....  PCE3HPFL "B'10000000'" PCE invoked HPUTFULL
      .1.. ....  PCE3NO$W "B'01000000'" $WAIT prohibited
      ..1. ....  PCE3PST1 "B'00100000'" $$POST ELEM= looks for available PCE to post
      ...1 ....  PCE3SQSU "B'00010000'" PCE low prio for $QSUSE
307 (133) BITSTRING 1 Reserved for future use
308 (134) ADDRESS 4  PCEACTCT PCE active count
312 (138) ADDRESS 4  PCEPCECT Ptr to PCE counters (see $PCEHCTD/$PCEHCTA)
316 (13C) ADDRESS 4  PCEBKLCT Ptr to backlog counter
320 (140) SIGNED 2  PCEPNADJ PCE pain adjustment
322 (142) BITSTRING 2 Reserved for future use
324 (144) ADDRESS 4  PCEWORKA ADDRESS OF PCE WORK AREA
328 (148) DBL WORD 8  PCEWORK(0) VARIABLE LENGTH PROCESSOR WORK AREA
         PCEID - BYTE1
      .... ....  PCENODEV "X'00'" PCEID BYTE1 = 0 INDICATES NON- DEVICE PROCESSOR
      .... ...1  PCELCLID "X'01'" LOCAL SPECIAL PCE ID
      .... ..1.  PCERJEID "X'02'" REMOTE SPECIAL PCE ID
      .... .1..  PCENJEID "X'04'" NETWORK SPECIAL PCE ID, INDICATES NJE OR XFR JT/JR/ST/SR
      .... 1...  PCEINRID "X'08'" INTERNAL SPECIAL PCE ID
      1... ....  PCEPRSID "X'80'" PRINT SPECIAL PCE ID
      .1.. ....  PCEPUSID "X'40'" PUNCH SPECIAL PCE ID
      ..1. ....  PCEXFRID "X'20'" XFR SPECIAL PCE ID
         PCEID - BYTE2 (UNIQUE PCE ID) - HASP DEFINITIONS
         HASP PCE IDS ARE ASSIGNED FROM 1 AND INCREASE. USER PCE IDS
         PCE IDS SHOULD BE ASSIGNED FROM 255 AND DECREASE. EACH PCE
         TYPE IS DEFINED IN THE HASP OR USER PCE TABLE, WITH POSSIBLY
         MULTIPLE ENTRIES FOR EACH UNIQUE PCE ID (WITH DIFFERENT
         VALUES FOR PCEID BYTE1).
                            Work
                             Area
                              Macro Descriptive name
328 (148) X'1' 0  PCERDRID "1" $RDRWORK - Input Services
328 (148) X'2' 0  PCEASYID "2" $ASYWORK - Asynchronous I/O
328 (148) X'3' 0  PCECNVID "3" $CNVWORK - Converter
328 (148) X'4' 0  PCEXEQID "4" $XEQWORK - Execution
328 (148) X'5' 0  PCEPSOID "5" $PSOWORK - Process SYSOUT
328 (148) X'6' 0  PCEOUTID "6" $OUTWORK - Output
328 (148) X'7' 0  PCEPRTID "7" $PPPWORK - Print $FSSWORK - FSS Print Support
328 (148) X'8' 0  PCEPUNID "8" $PPPWORK - Punch
328 (148) X'9' 0  PCEPRGID "9" $PRGWORK - Purge
328 (148) X'A' 0  PCECONID "10" $COMWORK - Command
328 (148) X'B' 0  PCEMLMID "11" $MLMWORK - Multi-leaving Line Mgr
328 (148) X'C' 0  PCETIMID "12" $TIMWORK - STIMER/TTIMER
328 (148) X'D' 0  PCECKPID "13" $CKPWORK - Checkpoint
328 (148) X'E' 0  PCEJPAID "14" $JPAWORK - Priority Aging
328 (148) X'F' 0  PCEWRMID "15" $WARMWRK - Warm Start
328 (148) X'10' 0  PCENJTID "16" $NJTWORK - NJE Job Transmitter
328 (148) X'11' 0  PCENJRID "17" $RDRWORK - NJE Job Receiver
328 (148) X'12' 0  PCENSTID "18" $NSTWORK - NJE SYSOUT Transmitter
328 (148) X'13' 0  PCENSRID "19" $NSRWORK - NJE SYSOUT Receiver
328 (148) X'14' 0  PCENPMID "20" $NPMWORK - NJE Path Manager
328 (148) X'15' 0  PCERCPID "21" $RCPWORK - Remote Console
328 (148) X'16' 0  PCETEXID "22" $TEXWORK - Time Excession Monitor
328 (148) X'17' 0  PCEINTID "23" $CIRWORK - Initialization
328 (148) X'18' 0  PCEVTLID "24" $TLGWORK - Event Trace Log
328 (148) X'19' 0  PCEXFMID "25" $XFMWORK - SPOOL Transfer I/O Mgr
328 (148) X'1A' 0  PCESPMID "26" $SPMWORK - SPOOL Manager
328 (148) X'1B' 0  PCENRRID "27" $RDRWORK - NJE Route Receiver
328 (148) X'1C' 0  PCENRTID "28" $NJTWORK - NJE Route Transmitter
328 (148) X'1D' 0  PCESNFID "29" $SNFWORK - SPOOL sniffer
328 (148) X'1E' 0  PCERESID "30" $RESWORK - Resource Manager
328 (148) X'1F' 0  PCESTCID "31" $STCWORK - STATUS/CANCEL
328 (148) X'20' 0  PCESPNID "32" $SPNWORK - Spin Services
328 (148) X'21' 0  PCESFSID "33" $SFRWORK - Scheduler Services
328 (148) X'22' 0  PCEOPAID "34" $OPAWORK - Output Priority Aging
328 (148) X'23' 0  PCEFCLID "35" $FCLWORK - FSS Cleanup on EOM
328 (148) X'24' 0  PCEXCFID "36" $XPWORK - Coupling
328 (148) X'25' 0  PCEJCMID "37" $JCMWORK - Job Command Processor
328 (148) X'26' 0  PCEARMID "38" $ARMWORK - ARM support processor
328 (148) X'27' 0  PCEXCMID "39" $XCMWORK - XCF Command Processor
328 (148) X'28' 0  PCESPIID "40" $SPIWORK - Sysout API Processor
328 (148) X'29' 0  PCEDILID "41" $DILWORK - 'Do It Later' processor
328 (148) X'2A' 0  PCEENFID "42" $ENFWORK - ENF LISTEN processor
328 (148) X'2B' 0  PCEALIID "43" $ALIWORK - Acquire lock & cleanup
328 (148) X'2C' 0  PCEMSCID "44" $MSCWORK - Miscellaneous processor
328 (148) X'2D' 0  PCEEOMID "45" $EOMWORK - End-of-Memory processor
328 (148) X'2E' 0  PCEJQRID "46" $JQRWORK - JQE Request processor
328 (148) X'2F' 0  PCEIRCID "47" $IRCWORK - Internal reader cleanup
328 (148) X'30' 0  PCEDWNID "48" $DAWNWRK - DAWN processor
328 (148) X'31' 0  PCENRMID "49" $NRMWORK - NJE Resource Monitor
328 (148) X'32' 0  PCECDCID "50" $CDCWORK - Cross-system Device
328 (148) X'33' 0  PCEDLSID "51" $DLSWORK - Deadline scheduling
328 (148) X'34' 0  PCEJOIID "52" $JOEIWRK - JOEI processor
328 (148) X'35' 0  PCEEDSID "53" $EDSWORK - Email Delivery services
328 (148) X'36' 0  PCEPCYID "54" $PCYWORK - Policy services
Table 2. Cross Reference for $PCE
Name Offset Hex Tag
PCE 0
PCEACTCT 134
PCEALIID 148 2B
PCEARMID 148 26
PCEASID 130
PCEASYID 148 2
PCEBKLCT 13C
PCEBUFAD 100
PCEBUFCN 108
PCECDCID 148 32
PCECEMER CB 40
PCECKPID 148 D
PCECNVID 148 3
PCECONID 148 A
PCEDADCT E8
PCEDAFL3 10B
PCEDALEN 10B 1C
PCEDARD 10A 0
PCEDAWR 10A 1
PCEDCT 110
PCEDCTFL F4
PCEDCTPC F0
PCEDEVTP 10A
PCEDILID 148 29
PCEDLSID 148 33
PCEDOM68 0 9C
PCEDSPXP C9 40
PCEDSPXT C9 20
PCEDWNID 148 30
PCEEDSID 148 35
PCEENFID 148 2A
PCEEOMID 148 2D
PCEERA C0
PCEEWF C8
PCEEYE 0
PCEFCLID 148 23
PCEFLAGS C9
PCEFLAG2 CA
PCEFLAG3 132
PCEFLGCS CB
PCEFSACB 124
PCEGEMOK CB 80
PCEID CE
PCEINRID 148 8
PCEINTID 148 17
PCEIOEWF 104
PCEIRCID 148 2F
PCEJCMID 148 25
PCEJOBID 118
PCEJOIID 148 34
PCEJPAID 148 E
PCEJQE 114
PCEJQEIX 11C
PCEJQRID 148 2E
PCELCLID 148 1
PCELENG 10C
PCELPSV 0 A0
PCEMLMID 148 B
PCEMQTR FA
PCEMQTRD F8
PCEMSCID 148 2C
PCENDSPC CC
PCENEXT B4
PCENJEID 148 4
PCENJRID 148 11
PCENJTID 148 10
PCENODEV 148 0
PCENPMID 148 14
PCENRMID 148 31
PCENRRID 148 1B
PCENRTID 148 1C
PCENSRID 148 13
PCENSTID 148 12
PCENTITY 12C
PCENWIOP C9 10
PCEOPAID 148 22
PCEOUTID 148 6
PCEPCEA B8
PCEPCEB BC
PCEPCECT 138
PCEPCYID 148 36
PCEPNADJ 140
PCEPOSTD D8
PCEPRE C4
PCEPREV B0
PCEPRGID 148 9
PCEPRIO C9 2
PCEPRIVI CB 20
PCEPRSID 148 80
PCEPRTID 148 7
PCEPSOID 148 5
PCEPSTCH DC
PCEPSTEW DB
PCEPTAB 120
PCEPUNID 148 8
PCEPUSID 148 40
PCERCPID 148 15
PCERDRID 148 1
PCEREQIR C9 1
PCERESID 148 1E
PCERJEID 148 2
PCEROLOQ 10E
PCESEEK F8
PCESEEKF F8
PCESEQ 10F
PCESFSID 148 21
PCESNFID 148 1D
PCESPIID 148 28
PCESPMID 148 1A
PCESPNID 148 20
PCESTCID 148 1F
PCETEXID 148 16
PCETIMID 148 C
PCETRACE C9 80
PCETRLDS C9 4
PCETRPSF C9 8
PCEUSER0 D0
PCEUSER1 D4
PCEVTLID 148 18
PCEWAVE 128
PCEWORK 148
PCEWORKA 144
PCEWRMID 148 F
PCEWTTIM E0
PCEXCFID 148 24
PCEXCMID 148 27
PCEXEQID 148 4
PCEXFMID 148 19
PCEXFRID 148 20
PCEXITID 0 99
PCE2EBUF CA 40
PCE2ENDD CA 80
PCE2EVNT CA 20
PCE2INIT CA 10
PCE2QSUS CA 8
PCE2SJID CA 2
PCE2SJIX CA 1
PCE2XWTR CA 4
PCE3HPFL 132 80
PCE3NO$W 132 40
PCE3PST1 132 20
PCE3SQSU 132 10