PSCB mapping

Table 1. Structure PSCB
`Offset Dec`	`Offset Hex`	`Type`	`Len`	`Name(Dim)`	`Description`
`0`	`(0)`	`STRUCTURE`	`108`	`PSCB`
`0`	`(0)`	`CHARACTER`	`7`	`PSCBUSER`	`USERID PADDED RIGHT WITH BLANKS`
`7`	`(7)`	`ADDRESS`	`1`	`PSCBUSRL`	`LENGTH OF USERID`
`8`	`(8)`	`CHARACTER`	`8`	`PSCBGPNM`	`ESOTERIC GROUP NAME INIT BY LOGON USED BY DYNAMIC ALLOC WHEN UNITNAME NOT SPECIFIED BUT IS REQUIRED`
`16`	`(10)`	`CHARACTER`	`2`	`PSCBATR1`	`A 16 BIT STRING OF USER ATTRIBUTES`
		`1... ....`		`PSCBCTRL`	`OPERATOR COMMAND USER`
		`.1.. ....`		`PSCBACCT`	`ACCOUNT`
		`..1. ....`		`PSCBJCL`	`SUBMIT BITS`
		`...1 ....`		`PSCBVMNT`	`CNTL VOL MOUNT AUTH Y02669`
		`.... 1...`		`PSCBATTN`	`LINE DELETE CHAR IS ATTN Y02669`
		`.... .1..`		`PSCBRCVR`	`EDIT RECOVER/NORECOVER`
`NOTE-- BIT PSCBRCVR IS USED DIFFERENTLY 1 MEANS NO EDIT RECOVERY CAPABILTY 0 MEANS EDIT RECOVERY CAPABILITY`
		`.... ..1.`		`PSCBRRBA`	`REPLACE USER RBA AT LOGOFF TIME`
		`.... ...1`		`PSCBCNAU`	`CONSOLE authority`
`17`	`(11)`	`BITSTRING`	`1`	`*`	`Not used`
`18`	`(12)`	`CHARACTER`	`2`	`PSCBATR2`	`A 16 BIT STRING CONTAINING THE USERDATA FIELD`
`20`	`(14)`	`UNSIGNED`	`4`	`PSCBLTIM`	`DOUBLEWORD FOR LOGON Y02669`
`24`	`(18)`	`UNSIGNED`	`4`	`PSCBLTI2`	`TIME IN STORE CLOCK Y02669 UNITS Y02669`
`28`	`(1C)`	`CHARACTER`	`1`	`PSCBSUBH`	`SUBMIT HOLD CLASS`
`29`	`(1D)`	`CHARACTER`	`1`	`PSCBSUBC`	`SUBMIT CLASS`
`30`	`(1E)`	`CHARACTER`	`1`	`PSCBSUBM`	`SUBMIT MSGCLASS`
`31`	`(1F)`	`CHARACTER`	`1`	`PSCBSOUT`	`SYSOUT CLASS`
`32`	`(20)`	`UNSIGNED`	`1`	`PSCBU8L`	`USERID LEN FOR PSCBUID8`
`33`	`(21)`	`CHARACTER`	`3`	`PSCBDRBA`	`ADDRESS OF USER MAIL DIRECTORY`
`36`	`(24)`	`SIGNED`	`4`	`*`	`RESERVED`
`40`	`(28)`	`CHARACTER`	`8`	`PSCBDEST`	`DEST FOR SYSOUT Y02669 DATA SETS Y02669`
`48`	`(30)`	`ADDRESS`	`4`	`PSCBRLGB`	`PTR TO RELOGON BUFFER`
`52`	`(34)`	`ADDRESS`	`4`	`PSCBUPT`	`PTR TO USER PROFILE TABLE`
`56`	`(38)`	`SIGNED`	`2`	`PSCBUPTL`	`LENGTH OF UPT`
`58`	`(3A)`	`CHARACTER`	`1`	`PSCBCHAR`	`USER'S CHAR DELETE CHAR Y02669`
`59`	`(3B)`	`CHARACTER`	`1`	`PSCBLINE`	`USER'S LINE DELETE CHAR Y02669`
`60`	`(3C)`	`ADDRESS`	`4`	`PSCBRSZ`	`REGION SIZE REQUESTED IN 2K UNITS`
`64`	`(40)`	`CHARACTER`	`8`	`PSCBU`	`RESERVED FOR INSTALLATION USE`
`72`	`(48)`	`CHARACTER`	`12`	`PSCBEXWD`	`LOGON INSTALLATION EXIT USER WORD STRUCTURE`
`72`	`(48)`	`UNSIGNED`	`4`	`PSCBEXK`	`KEY OF USER WORD`
`76`	`(4C)`	`UNSIGNED`	`4`	`PSCBEXL`	`LENGTH OF USER WORD`
`80`	`(50)`	`ADDRESS`	`4`	`PSCBEXD`	`THE USER WORD`
`84`	`(54)`	`CHARACTER`	`8`	`PSCBUID8`	`8 CHARACTER USERID`
`92`	`(5C)`	`UNSIGNED`	`4`	`*`	`RESERVED`
`96`	`(60)`	`UNSIGNED`	`4`	`*`	`RESERVED`
`100`	`(64)`	`UNSIGNED`	`4`	`*`	`RESERVED`
`104`	`(68)`	`UNSIGNED`	`4`	`*`	`RESERVED`

Table 2. Constants for PSCB
`Len`	`Type`	`Value`	`Name`	`Description`
`7`	`CHARACTER`	`>7BYTES`	`PSCBUGT7`	`VALUE WHEN USERID LEN GREATER THAN 7`

Table 3. Cross Reference for PSCB
`Name`	`Offset`	`Hex Tag`
`PSCB`	`0`
`PSCBACCT`	`10`	`40`
`PSCBATR1`	`10`
`PSCBATR2`	`12`
`PSCBATTN`	`10`	`08`
`PSCBCHAR`	`3A`
`PSCBCNAU`	`10`	`01`
`PSCBCTRL`	`10`	`80`
`PSCBDEST`	`28`
`PSCBDRBA`	`21`
`PSCBEXD`	`50`
`PSCBEXK`	`48`
`PSCBEXL`	`4C`
`PSCBEXWD`	`48`
`PSCBGPNM`	`8`
`PSCBJCL`	`10`	`20`
`PSCBLINE`	`3B`
`PSCBLTIM`	`14`
`PSCBLTI2`	`18`
`PSCBRCVR`	`10`	`04`
`PSCBRLGB`	`30`
`PSCBRRBA`	`10`	`02`
`PSCBRSZ`	`3C`
`PSCBSOUT`	`1F`
`PSCBSUBC`	`1D`
`PSCBSUBH`	`1C`
`PSCBSUBM`	`1E`
`PSCBU`	`40`
`PSCBUID8`	`54`
`PSCBUPT`	`34`
`PSCBUPTL`	`38`
`PSCBUSER`	`0`
`PSCBUSRL`	`7`
`PSCBU8L`	`20`
`PSCBVMNT`	`10`	`10`