; ----- ----- break bit equates used for tp package ----- ----- T$BRK = 1000 ; extra bits to inform .IDV BRK = T$BRK ; that BREAK's should be sent ; ----- ----- defines layout for communication area (in .IDV) ----- ----- .=0 BLKB 10. ; 'PHDR' area for .IDV HPOQ: BLKL 1 ; base of controlled/controlling Q VTAMX: BLKL 1 ; address of VTAM.TDV HIRES: BLKL 1 ; hi resolution clock XM1010: BLKL 1 ; real 1010 emulate vector OF1010: BLKL 1 ; offset to emulate routine XDATE: BLKL 1 ; expiration date ; ----- ----- defines layout for queue blocks on HPO chain ----- ----- .=0 QBLNK: BLKL 1 ; standard link to next queue block QBFLG: BLKL 1 ; control flags QBCTLG = 1 ; this is a controlling job QBCTLD = 2 ; this is a controlled job QBGARD = 4 ; this is a VGUARDed job QBBAT = 10 ; the is batch enqueue queue block QBENQ = 20 ; batch queue is enqued QBSUBW = 100 ; SUBMIT has updated the batch queue QBSUBK = 200 ; SUBMIT has 'killed' a running job QBSUPR = 1000 ; clock wakeups are suppressed QBCLKW = 2000 ; clock wakeup QBTINW = 10000 ; controlled job has input QBKBIW = 20000 ; controlling job has input QBTOW = 40000 ; controlled job has output QBGONE = 100000 ; controlling job AMOS'd QBCHEK = 200000 ; ok to check security now QBQUIT = 400000 ; shutdown flag QBGOOD = 1000000 ; security valid QBDATE = 2000000 ; has not expired QBTRM: BLKL 1 ; controlled job TRMDEF QBJCB: BLKL 1 ; controlled job JCB QBCJCB: BLKL 1 ; controlling job JCB QBUPDT: BLKL 1 ; time of last wakeup QBTDV: BLKL 1 ; controlled job TDV header QBSECR: BLKL 1 ; security codes