$MSCWORK mapping

Table 1. Structure PCE
`Offset Dec`	`Offset Hex`	`Type`	`Len`	`Name(Dim)`	`Description`
`0`	`(0)`	`STRUCTURE`	`0`	`PCE`	`, Continue PCE DSECT`
`320`	`(140)`	`BITSTRING`	`12`	`MSCTQE`	`Timer queue element`
`332`	`(14C)`	`BITSTRING`	`1`	`MSCFLAG`	`Misc PCE work flags`
		`1... ....`		`MSCWANTQ`	`"B'10000000'" PCE needs access to the CKPT`
		`..1. ....`		`MSCBSEQE`	`"B'00100000'" Dynamic BERT queue sequence error $DISTERR issued`
		`...1 ....`		`MSCJGLOG`	`"B'00010000'" Jobgroup log takeover already processed`
`333`	`(14D)`	`BITSTRING`	`3`		`Reserved for future use`
`336`	`(150)`	`DBL WORD`	`8`	`MSCPADTM`	`Time stamp for PAD and Master JQE processing`
`344`	`(158)`	`DBL WORD`	`8`	`MSCMONTM`	`Time stamp monitor restart`
`352`	`(160)`	`DBL WORD`	`8`	`MSCCPLTM`	`Time stamp $CPOOL contract`
`MACRO-DATE = 03/16/15`
`360`	`(168)`	`SIGNED`	`4`	`(0)`	`ESTABLISH A FULLWORD BOUNDARY`
`360`	`(168)`	`X'168'`	`0`	`MSCENQ`	`"*" X02113`
`360`	`(168)`	`ADDRESS`	`1`		`PELLAST flag byte. X02113`
`361`	`(169)`	`ADDRESS`	`1`		`PELMILEN - RNAME length.`
`362`	`(16A)`	`BITSTRING`	`1`
`PELFLAG - flag byte 2.`
`363`	`(16B)`	`ADDRESS`	`1`		`PELRET - return code byte.`
`364`	`(16C)`	`ADDRESS`	`4`		`QNAME ADDRESS`
`368`	`(170)`	`ADDRESS`	`4`		`RNAME ADDRESS`
`368`	`(170)`	`X'168'`	`0`	`MSCENQL`	`"MSCENQ,*-MSCENQ" Field to reference ENQ MF=L`
`MACDATE 12/25/13`
`372`	`(174)`	`ADDRESS`	`4`	`MSCPOST`	`. 1ST WORD - ECB ADDRESS`
`376`	`(178)`	`ADDRESS`	`4`		`. 2ND WORD - ASCB ADDRESS`
`380`	`(17C)`	`ADDRESS`	`4`		`. 3RD WORD - ERRET ADDRESS`
`384`	`(180)`	`ADDRESS`	`4`		`. 4TH WORD - BYTE0,ECBKEY`
`392`	`(188)`	`DBL WORD`	`8`	`(0)`	`Alignment`
`392`	`(188)`	`X'48'`	`0`	`MSCPCEWL`	`"*-PCEWORK" Length of misc PCE work area`

Table 2. Cross Reference for $MSCWORK
`Name`	`Offset`	`Hex Tag`
`MSCBSEQE`	`14C`	`20`
`MSCCPLTM`	`160`
`MSCENQ`	`168`	`168`
`MSCENQL`	`170`	`168`
`MSCFLAG`	`14C`
`MSCJGLOG`	`14C`	`10`
`MSCMONTM`	`158`
`MSCPADTM`	`150`
`MSCPCEWL`	`188`	`48`
`MSCPOST`	`174`
`MSCTQE`	`140`
`MSCWANTQ`	`14C`	`80`
`PCE`	`0`