Trailing-Edge
-
PDP-10 Archives
-
bls36v42
-
monsym.mac
Click monsym.mac to
see without markup as text/plain
There are 38 other files named monsym.mac in the archive. Click here to see a list.
; *** Edit 7519 to MONSYM.MAC by GSCOTT on 10-Sep-87, for SPR #21564
; Remove bad definiton of .QBDMX
; *** Edit 7519 to MONSYM.MAC by GSCOTT on 3-Sep-87
; Add USGX04 - Invalid terminal line number
; *** Edit 7506 to MONSYM.MAC by RASPUZZI on 28-Jul-87 (TCO 7.1028)
; Fix spelling error in TCPX32 error code.
; *** Edit 7491 to MONSYM.MAC by MCCOLLUM on 5-Jun-87, for SPR #21635
; Add ENACX5 error code for use by ENACT routine in JSYSA
; *** Edit 7462 to MONSYM.MAC by EVANS on 28-Apr-87, for SPR #19914
; Do not allow removal of Subdirectory-user-goups-allowed if the group number
; is in use in a subdirectory
; Add new error for CRDIR% - RE: JSYSF edit 7461
; *** Edit 7436 to MONSYM.MAC by GSCOTT on 3-Apr-87, for SPR #21488
; Add MTOPR functions .MOHUP (62) and .MOUHU (63) for terminals
; *** Edit 7431 to MONSYM.MAC by MCCOLLUM on 31-Mar-87
; Add error code MSTX51 for use by the MSTR% JSYS when STRTAB is full
; *** Edit 7424 to MONSYM.MAC by EVANS on 11-Mar-87
; Add VT300 - dependent monitor edit 7423 and EXEC edit 3055
; *** Edit 7412 to MONSYM.MAC by RASPUZZI on 24-Jan-87, for SPR #18873
; Change directory and username break masks so they don't include ^V
; *** Edit 7409 to MONSYM.MAC by RASPUZZI on 22-Jan-87, for SPR #21507
; Add new error code for NTINF% (TTYX04)
; *** Edit 7370 to MONSYM.MAC by RASPUZZI on 30-Sep-86, for SPR #21272
; Add error message GNJFX2 for GNJFN% when current file vanishes.
; *** Edit 7353 to MONSYM.MAC by JROSSELL on 11-Aug-86, for SPR #21161
; Add error codes for .DSKOP
; *** Edit 7331 to MONSYM.MAC by LOMARTIRE on 27-Jun-86, for SPR #21275
; Add MSTX50 error code
; *** Edit 7327 to MONSYM.MAC by MCCOLLUM on 24-Jun-86, for SPR #21297
; Add symbols for new SMON function to enable/disable LAT logins.
; *** Edit 7323 to MONSYM.MAC by RASPUZZI on 17-Jun-86, for SPR #20058
; Add a new error code for online date out of range and change the off line
; date out of range error slightly.
; *** Edit 7322 to MONSYM.MAC by WONG on 17-Jun-86, for SPR #20898 (TCO none)
; Define SF%LSN for .SFPTR JSYS to state whether to include LSN or not in its
; calculation.
; *** Edit 7258 to MONSYM.MAC by WONG on 14-Mar-86, for SPR #18580
; Add 3 new SETJB% functions.
; *** Edit 7214 to MONSYM.MAC by WAGNER on 19-Dec-85, for SPR #20844
; Change error message for NPXNMD to include mention of structure not mounted.
; *** Edit 7213 to MONSYM.MAC by GRANT on 19-Dec-85
; Add .CSTAT, the table number for the CI statistics table CISTAT
;------------------------- Autopatch Tape # 12 -------------------------
; UPD ID= 148, SNARK:<6.1.UTILITIES>MONSYM.MAC.310, 17-Jul-85 10:53:41 by WAGNER
;Remove TCO 6.1.1479 - Some people actually use .ERCOD, cannot purge it
; UPD ID= 147, SNARK:<6.1.UTILITIES>MONSYM.MAC.309, 10-Jul-85 13:40:07 by WAGNER
;TCO 6.1.1479 - Purge .ERCOD on second pass to save storage in UNV
; UPD ID= 130, SNARK:<6.1.UTILITIES>MONSYM.MAC.308, 3-Jun-85 13:33:35 by TBOYLE
;TCO 6.1.1421 - Add PAGPTN. Internal error return for PAGEM.
; UPD ID= 128, SNARK:<6.1.UTILITIES>MONSYM.MAC.307, 22-May-85 13:51:23 by MCCOLLUM
;Put back symbols .QBEVT and .QBDLK that were removed by UPD ID 126
; UPD ID= 127, SNARK:<6.1.UTILITIES>MONSYM.MAC.306, 20-May-85 14:48:32 by MCCOLLUM
;TCO 6.1.1402 - Reserve error codes 6000-6777 for custmoers. QAR 838366.
; UPD ID= 126, SNARK:<6.1.UTILITIES>MONSYM.MAC.305, 17-May-85 16:42:09 by DMCDANIEL
;Insert the following TCO's:
; TCO 6.2281 - Add .PVEXP, value = 2, obsolete .PVSTR.
; TCO 6.2280 - Add QU%TAB, QU%NXL, QU%RCL for SNA. (Per MAYBERRY).
; TCO 6.2262 - Change JS%DEV back to 3 bits/obsolete. Add JS%DVN.
; UPD ID= 125, SNARK:<6.1.UTILITIES>MONSYM.MAC.304, 14-May-85 16:58:26 by JROSSELL
;TCO 6.1.1389 - Remove one of the definitions of .QBSNA
; UPD ID= 115, SNARK:<6.1.UTILITIES>MONSYM.MAC.303, 23-Apr-85 17:06:03 by GROSSMAN
;TCO 6.1.1336 - Add .EIPHY and .EIHRD.
; UPD ID= 105, SNARK:<6.1.UTILITIES>MONSYM.MAC.301, 25-Mar-85 12:03:23 by LOMARTIRE
;TCO 6.1.1286 - Add MS%IAC
; UPD ID= 99, SNARK:<6.1.UTILITIES>MONSYM.MAC.300, 20-Mar-85 08:48:24 by GROSSMAN
;More TCO 6.1.1054 - Make .EIBMX global.
; UPD ID= 97, SNARK:<6.1.UTILITIES>MONSYM.MAC.299, 14-Mar-85 15:29:15 by WAGNER
;TCO 6.1.1263 - Add 2 symbols fixing documentation error with SKED%.
; UPD ID= 95, SNARK:<6.1.UTILITIES>MONSYM.MAC.298, 12-Mar-85 15:37:09 by GROSSMAN
;More TCO 6.1.1202 - Fix value of symbols in receive failure bit mask.
; UPD ID= 91, SNARK:<6.1.UTILITIES>MONSYM.MAC.297, 5-Mar-85 14:51:42 by HAUDEL
;TCO 6.1.1232 - Add SCA connection management symbols for SCS%.
; UPD ID= 88, SNARK:<6.1.UTILITIES>MONSYM.MAC.296, 25-Feb-85 12:28:13 by GRANT
;TCO 6.1.1220 - Add MS%SVD
; UPD ID= 87, SNARK:<6.1.UTILITIES>MONSYM.MAC.295, 25-Feb-85 08:38:53 by WAGNER
;Modify range for IFIXX1 to ^D36, QAR 706379
; UPD ID= 84, SNARK:<6.1.UTILITIES>MONSYM.MAC.294, 19-Feb-85 13:32:07 by GROSSMAN
;TCO 6.1.1210 - Add symbols for NI% Read Portal Counters.
; UPD ID= 83, SNARK:<6.1.UTILITIES>MONSYM.MAC.293, 19-Feb-85 09:20:27 by LOMARTIRE
;TCO 6.1.1195 - Add MSTX47, MSTX48, MSTX49. Change text of MSTX45 and MSTX44.
; UPD ID= 82, SNARK:<6.1.UTILITIES>MONSYM.MAC.292, 18-Feb-85 22:18:34 by GROSSMAN
;TCO 6.1.1202 - Add symbols for NI% Read Channel Counters function.
; UPD ID= 76, SNARK:<6.1.UTILITIES>MONSYM.MAC.291, 11-Feb-85 08:42:30 by GRANT
;TCO 6.1.1183 - Add MSCPX4
; UPD ID= 73, SNARK:<6.1.UTILITIES>MONSYM.MAC.290, 29-Jan-85 14:35:30 by GROSSMAN
;TCO 6.1.1162 - Add NI% state .EISRR.
; UPD ID= 69, SNARK:<6.1.UTILITIES>MONSYM.MAC.289, 21-Jan-85 15:35:10 by MCCOLLUM
;TCO 6.1.1148 - Add definitions for PDV memory map block
; UPD ID= 67, SNARK:<6.1.UTILITIES>MONSYM.MAC.288, 16-Jan-85 15:56:16 by GROSSMAN
;TCO 6.1.1138 - Add .EIGET, .EIRET, and error code NIECIO.
; UPD ID= 64, SNARK:<6.1.UTILITIES>MONSYM.MAC.287, 31-Dec-84 09:34:15 by LOMARTIRE
;TCO 6.1.1096 - Add the .CFHSC function to the CNFIG% JSYS
; UPD ID= 62, SNARK:<6.1.UTILITIES>MONSYM.MAC.286, 18-Dec-84 14:26:49 by HAUDEL
;TCO 6.1.1087 - Add .DGWMD and .DGRMD DIAG% function codes.
; UPD ID= 61, SNARK:<6.1.UTILITIES>MONSYM.MAC.285, 18-Dec-84 14:06:14 by HAUDEL
;TCO 6.1.1090 - Add SCSFRK error code by changing one version of
;SCSNQD error code.
; UPD ID= 56, SNARK:<6.1.UTILITIES>MONSYM.MAC.284, 7-Dec-84 15:13:56 by HALPIN
;TCO 6.1.1075 - Make BXSAD a two word field by changing BXPRO from 12 to 13
; and BXBMX from 13 to 14.
;
; UPD ID= 53, SNARK:<6.1.UTILITIES>MONSYM.MAC.283, 30-Nov-84 17:42:34 by GROSSMAN
;TCO 6.1.1065 - Add NIERTE
; UPD ID= 51, SNARK:<6.1.UTILITIES>MONSYM.MAC.282, 20-Nov-84 10:05:04 by GLINDELL
;Add .QBSNA and .QBDFG argument blocks to QUEUE% jsys
; UPD ID= 46, SNARK:<6.1.UTILITIES>MONSYM.MAC.281, 16-Nov-84 19:03:21 by MELOHN
; Add .SFLTS SMON symbol for LAT State
; UPD ID= 44, SNARK:<6.1.UTILITIES>MONSYM.MAC.280, 15-Nov-84 14:17:48 by GROSSMAN
;TCO 6.1.1054 - Change NI% symbols to avoid conflicts with rest of monitor.
; UPD ID= 40, SNARK:<6.1.UTILITIES>MONSYM.MAC.279, 12-Nov-84 23:23:20 by GROSSMAN
;TCO 6.1.1045 - Add all symbols for the NI% JSYS.
; UPD ID= 39, SNARK:<6.1.UTILITIES>MONSYM.MAC.278, 9-Nov-84 14:40:29 by GLINDELL
;TCO 6.1.1033 - Add .QBEVT and .QBDLK
; UPD ID= 38, SNARK:<6.1.UTILITIES>MONSYM.MAC.277, 6-Nov-84 22:12:07 by PAETZOLD
;Add some 5.4 symbols that slipped through the cracks.
; UPD ID= 35, SNARK:<6.1.UTILITIES>MONSYM.MAC.276, 2-Nov-84 15:31:27 by MCLEAN
;make diag21 instead of diag20
; UPD ID= 623, SNARK:<6.UTILITIES>MONSYM.MAC.275, 30-Oct-84 21:43:48 by MOSER
;TCO 6.2196 - ADD .MSMID
; UPD ID= 622, SNARK:<6.UTILITIES>MONSYM.MAC.274, 30-Oct-84 16:52:51 by MCLEAN
;add diag20
; UPD ID= 621, SNARK:<6.UTILITIES>MONSYM.MAC.273, 29-Oct-84 08:06:48 by GRANT
;Fix .SQDSE
; UPD ID= 620, SNARK:<6.UTILITIES>MONSYM.MAC.272, 28-Oct-84 11:26:32 by PRATT
;TCO 6.1.1022 - Add NTINF% jsys and it's symbols
; UPD ID= 619, SNARK:<6.UTILITIES>MONSYM.MAC.271, 24-Oct-84 19:55:50 by GRANT
;Add .SQNNM and adjust .SQDHV
; UPD ID= 616, SNARK:<6.UTILITIES>MONSYM.MAC.270, 23-Oct-84 15:46:59 by HALL
;ADD .QBSNA PER BRANDT
; UPD ID= 615, SNARK:<6.UTILITIES>MONSYM.MAC.269, 22-Oct-84 13:47:32 by HALPIN
; Change value of LOWFNC in NTMAN% symbol definitions back to -3. I changed
; it to -4 in edit 610. LOWFNC is not used in V6.1.
;
; UPD ID= 613, SNARK:<6.UTILITIES>MONSYM.MAC.268, 18-Oct-84 16:14:34 by PAETZOLD
;TCO 6.1.1024 - Add .GTHLA function of GTHST.
; UPD ID= 610, SNARK:<6.UTILITIES>MONSYM.MAC.267, 17-Oct-84 14:38:44 by HALPIN
;Update NTMAN% JSYS symbols for 6.1
;
; UPD ID= 607, SNARK:<6.UTILITIES>MONSYM.MAC.266, 12-Oct-84 17:55:36 by GLINDELL
;Add NTMX17 and .NDSDP function .NDFLO
; UPD ID= 606, SNARK:<6.UTILITIES>MONSYM.MAC.265, 9-Oct-84 13:19:22 by PALMIERI
;Add ND%RUK
; UPD ID= 605, SNARK:<6.UTILITIES>MONSYM.MAC.264, 9-Oct-84 11:41:46 by GLINDELL
;Add error code NTMX3
; UPD ID= 604, SNARK:<6.UTILITIES>MONSYM.MAC.263, 9-Oct-84 10:21:04 by GLINDELL
;Add ND%LGL and ND%RCH
; UPD ID= 601, SNARK:<6.UTILITIES>MONSYM.MAC.262, 26-Sep-84 17:06:31 by WEISBACH
;Add LATOP% definitions
; UPD ID= 600, SNARK:<6.UTILITIES>MONSYM.MAC.261, 25-Sep-84 15:53:45 by PALMIERI
;Add .MORFT to read format type of DECnet source process names
;Chnage defintions of Router types to comform with network management
; UPD ID= 599, SNARK:<6.UTILITIES>MONSYM.MAC.260, 25-Sep-84 13:25:24 by GRANT
;Add .DGxxx for DIAG% READ-COUNTERS function for the CI
; UPD ID= 598, SNARK:<6.UTILITIES>MONSYM.MAC.259, 25-Sep-84 10:50:28 by EVANS
;TCO 6.2222 - Add support for VT200 terminals.
; UPD ID= 596, SNARK:<6.UTILITIES>MONSYM.MAC.258, 17-Sep-84 16:08:26 by PURRETTA
;Update copyright notice.
; UPD ID= 584, SNARK:<6.UTILITIES>MONSYM.MAC.257, 17-Aug-84 20:36:02 by GROSSMAN
;TCO 6.1.1101 - Add NI% JSYS
; UPD ID= 579, SNARK:<6.UTILITIES>MONSYM.MAC.256, 10-Aug-84 17:12:33 by CDUNN
;Add function .SSRPS (Return path status) to SCS% definitions
; UPD ID= 575, SNARK:<6.UTILITIES>MONSYM.MAC.255, 7-Aug-84 16:12:28 by CDUNN
;Add SCSIBN to list of error codes
; UPD ID= 573, SNARK:<6.UTILITIES>MONSYM.MAC.254, 31-Jul-84 10:24:35 by PAETZOLD
;TCO 6.1.1010 - New error codes for IPNIDV and friends.
; UPD ID= 572, SNARK:<6.UTILITIES>MONSYM.MAC.253, 30-Jul-84 17:12:56 by TBOYLE
;Make SPLFK% symbols all global.
; UPD ID= 571, SNARK:<6.UTILITIES>MONSYM.MAC.252, 30-Jul-84 15:05:31 by MCCOLLUM
; Fix unbalanced paren in CIUNOP error definition.
; UPD ID= 556, SNARK:<6.UTILITIES>MONSYM.MAC.251, 2-Jul-84 07:23:38 by GRANT
;Remove VC.CIP, it's not going to be used afterall
; UPD ID= 555, SNARK:<6.UTILITIES>MONSYM.MAC.250, 20-Jun-84 16:20:41 by TBOYLE
;Make all CNFIG% symbols global
; UPD ID= 553, SNARK:<6.UTILITIES>MONSYM.MAC.249, 19-Jun-84 15:16:19 by GUNN
;~6.0 Add .RCADR function to LLMOP%.
; UPD ID= 552, SNARK:<6.UTILITIES>MONSYM.MAC.248, 19-Jun-84 14:20:32 by MCLEAN
;CHANGE CODES FOR DON'T CARE DISKS
; UPD ID= 550, SNARK:<6.UTILITIES>MONSYM.MAC.247, 15-Jun-84 23:43:22 by MCLEAN
;ADD CODES FOR DON'T CARE DISKS
; UPD ID= 548, SNARK:<6.UTILITIES>MONSYM.MAC.246, 11-Jun-84 09:27:19 by HAUDEL
;CHANGE ERROR STRING FOR DIAG30 .
; UPD ID= 546, SNARK:<6.UTILITIES>MONSYM.MAC.245, 7-Jun-84 21:14:26 by MCLEAN
;ADD NEW DSKOP ERROR CODES
; UPD ID= 544, SNARK:<6.UTILITIES>MONSYM.MAC.244, 6-Jun-84 14:32:24 by GLINDELL
;~6.0 Add .NDINT, .NDNNN and .NDNTA to NODE% jsys
; UPD ID= 543, SNARK:<6.UTILITIES>MONSYM.MAC.243, 4-Jun-84 10:32:31 by HAUDEL
;Add SQ%CVD and SQ%WRT
; UPD ID= 542, SNARK:<6.UTILITIES>MONSYM.MAC.242, 3-Jun-84 15:56:34 by PAETZOLD
;Add .HSVMS and .HSTAC
; UPD ID= 540, SNARK:<6.UTILITIES>MONSYM.MAC.241, 30-May-84 16:56:28 by GLINDELL
;~6.0 Add .NDBSZ to NODE% jsys
; UPD ID= 538, SNARK:<6.UTILITIES>MONSYM.MAC.240, 30-May-84 14:30:07 by PAETZOLD
;Correct the BBN TCP JSYS flags once and for all.
; UPD ID= 537, SNARK:<6.UTILITIES>MONSYM.MAC.239, 30-May-84 14:10:42 by TBOYLE
;Add .MSTSP true sectors per page for MSTR drive status call.
; UPD ID= 536, SNARK:<6.UTILITIES>MONSYM.MAC.237, 25-May-84 13:04:38 by MCLEAN
;ADD DOP%PS
; UPD ID= 534, SNARK:<6.UTILITIES>MONSYM.MAC.236, 22-May-84 13:47:32 by GUNN
;~6.0 Make LLMOP function codes be decimal radix.
; UPD ID= 532, SNARK:<6.UTILITIES>MONSYM.MAC.235, 18-May-84 07:27:01 by MCINTEE
;~6.0 Add definitions CTERM - .MOTXT & .MOCTM & RD%CON
; UPD ID= 530, SNARK:<6.UTILITIES>MONSYM.MAC.234, 11-May-84 09:50:45 by GUNN
;~6.0 Add LM%CCF to get both LM%CMN and LM%CBF.
; UPD ID= 529, SNARK:<6.UTILITIES>MONSYM.MAC.233, 9-May-84 16:52:35 by GUNN
;~6.0 Add LM%CMN for ASCII Console Command and Poll.
; UPD ID= 528, SNARK:<6.UTILITIES>MONSYM.MAC.232, 8-May-84 15:19:20 by GUNN
;~6.0 Change order of .LMCIF argument word to conform to architecture
; and make it easier to place in BOOT message using DNP2BY.
; UPD ID= 527, SNARK:<6.UTILITIES>MONSYM.MAC.231, 8-May-84 15:02:13 by GLINDELL
;~6.0 Add new NODE% jsys function code .NDSDP
; UPD ID= 526, SNARK:<6.UTILITIES>MONSYM.MAC.230, 8-May-84 14:16:26 by GLINDELL
;~6.0 Add error code NODX16
; UPD ID= 522, SNARK:<6.UTILITIES>MONSYM.MAC.229, 25-Apr-84 13:05:36 by LOMARTIRE
;Add error code SCSTBF
; UPD ID= 521, SNARK:<6.UTILITIES>MONSYM.MAC.228, 25-Apr-84 10:45:03 by HAUDEL
;Fix typo in previous edit.
; UPD ID= 520, SNARK:<6.UTILITIES>MONSYM.MAC.227, 23-Apr-84 08:55:58 by HAUDEL
;Add error codes DIAG22 through DIAG30.
; UPD ID= 518, SNARK:<6.UTILITIES>MONSYM.MAC.226, 17-Apr-84 10:34:46 by GROSSMAN
;TCO 6.2035 - Add new SMON% function .SFSEA to set Ethernet address.
; UPD ID= 514, SNARK:<6.UTILITIES>MONSYM.MAC.225, 30-Mar-84 13:42:42 by CDUNN
;Fix missed referance to SBI. Change to node number. Node code change, only
;change to comments and text of error string for SCSISB.
; UPD ID= 511, SNARK:<6.UTILITIES>MONSYM.MAC.224, 28-Mar-84 01:09:26 by CDUNN
;More TCO 6.1127 - Update SCS% symbols and pictures to reflect reality.
; UPD ID= 507, SNARK:<6.UTILITIES>MONSYM.MAC.223, 20-Mar-84 10:16:23 by GUNN
;Add .LMCCL and .LMCCP for LLMOP% .RCSND function.
; UPD ID= 506, SNARK:<6.UTILITIES>MONSYM.MAC.222, 20-Mar-84 08:30:15 by GRANT
;Remove SF%KLP
; UPD ID= 505, SNARK:<6.UTILITIES>MONSYM.MAC.221, 19-Mar-84 16:56:23 by MOSER
;TCO 6.2003 - ADD .JILJI
; UPD ID= 504, SNARK:<6.UTILITIES>MONSYM.MAC.219, 19-Mar-84 14:42:02 by HAUDEL
;Change .DGPVL and .DGPND definitions for KLIPA'S counter function
; UPD ID= 503, SNARK:<6.UTILITIES>MONSYM.MAC.218, 17-Mar-84 13:00:32 by PAETZOLD
;More TCO 6.1733 - Add .IPRIB, .IPSIB, and .HSFUZ.
; UPD ID= 500, SNARK:<6.UTILITIES>MONSYM.MAC.217, 11-Mar-84 10:45:34 by PAETZOLD
;More TCO 6.1733 - Add HS%GAT, HS%NET, and .TCSFN.
; UPD ID= 496, SNARK:<6.UTILITIES>MONSYM.MAC.216, 5-Mar-84 15:50:50 by PAETZOLD
;More TCO 6.1733 - Make the DEFSTRs only be defined in the DEFIP. macro.
; UPD ID= 495, SNARK:<6.UTILITIES>MONSYM.MAC.215, 5-Mar-84 13:52:52 by TBOYLE
;SPLFK - Add new support symbols.
; UPD ID= 494, SNARK:<6.UTILITIES>MONSYM.MAC.214, 5-Mar-84 13:24:59 by PAETZOLD
;TCO 6.1733 - Add IP header structure definitions
; UPD ID= 493, SNARK:<6.UTILITIES>MONSYM.MAC.213, 5-Mar-84 13:21:51 by MOSER
;TCO 6.1984 - ADD .MOIRB FUNCTION CODE
; UPD ID= 491, SNARK:<6.UTILITIES>MONSYM.MAC.211, 28-Feb-84 13:43:28 by CJOHNSON
;TCO 6.1921 - Make IFIXX3 message include 2**35 as overflow
; UPD ID= 490, SNARK:<6.UTILITIES>MONSYM.MAC.210, 27-Feb-84 09:58:00 by PRATT
;TCO 6.1966 - Add IP%MON in .IPCFL word
; UPD ID= 488, SNARK:<6.UTILITIES>MONSYM.MAC.209, 25-Feb-84 06:03:01 by GRANT
;Add .DGDIP and .DGDMC
; UPD ID= 487, SNARK:<6.UTILITIES>MONSYM.MAC.208, 21-Feb-84 13:31:28 by MCCOLLUM
;TCO 6.1972 - Add MTNX01 error code for MTALN% JSYS
; UPD ID= 483, SNARK:<6.UTILITIES>MONSYM.MAC.207, 15-Feb-84 14:57:26 by GRANT
;Change .DGPOL to .DGUCD
;Add .DGRIP, .DGRLC, KLPX14, and KLPX15.
; UPD ID= 478, SNARK:<6.UTILITIES>MONSYM.MAC.206, 10-Feb-84 14:01:51 by GUNN
;~6.0 - Change order of LLMOP% arguments .LMPWD/.LMCIF for functions
; .RCRBT & .RCRSV
; Change definition of field LM%ICH for LLMOP%
; UPD ID= 477, SNARK:<6.UTILITIES>MONSYM.MAC.205, 8-Feb-84 14:43:28 by TBOYLE
;Change CF%CIN from using bits 0-17 to using 14-17
; UPD ID= 462, SNARK:<6.UTILITIES>MONSYM.MAC.204, 1-Feb-84 10:59:03 by PRATT
;TCO 6.1956 - Add .SFXEC and XC%FST for EXEC flags
; UPD ID= 461, SNARK:<6.UTILITIES>MONSYM.MAC.203, 31-Jan-84 15:09:41 by MCCOLLUM
;TCO 6.1961 - PURGE symbols .CHLFD, .CHCRT, .CHFFD. They belong in MACSYM.
; UPD ID= 460, SNARK:<6.UTILITIES>MONSYM.MAC.202, 30-Jan-84 11:08:54 by MCINTEE
;TCO 6.1959 ADD .MOTCE, .MORTC, MTOX21, .TITCE
; UPD ID= 455, SNARK:<6.UTILITIES>MONSYM.MAC.201, 24-Jan-84 19:49:09 by MCLEAN
;ADD KLPX13
; UPD ID= 454, SNARK:<6.UTILITIES>MONSYM.MAC.200, 24-Jan-84 15:44:47 by HAUDEL
;TCO 6.1546 - ADD PERFORMANCE COUNTER ERROR MESSAGE FOR THE KLIPA
; UPD ID= 452, SNARK:<6.UTILITIES>MONSYM.MAC.199, 24-Jan-84 13:48:44 by MCCOLLUM
;TCO 6.1950 - Add SM%RWX definition
; UPD ID= 450, SNARK:<6.UTILITIES>MONSYM.MAC.198, 23-Jan-84 18:27:29 by MOSER
;More inquisition fixes. DO NOT CHANGE ERROR CODES EVER!!!
; UPD ID= 448, SNARK:<6.UTILITIES>MONSYM.MAC.197, 23-Jan-84 17:22:14 by PAETZOLD
;Fix up TCP error code definitions. We need a Spanish inquisition.
; UPD ID= 447, SNARK:<6.UTILITIES>MONSYM.MAC.196, 23-Jan-84 16:36:57 by MOSER
;MORE 6.1562 - Change text of MSCPX2 and MSCPX3 errors
; UPD ID= 444, SNARK:<6.UTILITIES>MONSYM.MAC.195, 23-Jan-84 16:08:04 by PRATT
;TCO 6.1947 - Remove the .QJxxx symbols for QUEUE%, make them local to JSYSA.
; UPD ID= 443, SNARK:<6.UTILITIES>MONSYM.MAC.194, 20-Jan-84 16:13:06 by MOSER
;TCO 6.1944 ADD .MSDSH AND .MSDSN
; UPD ID= 441, SNARK:<6.UTILITIES>MONSYM.MAC.193, 20-Jan-84 15:14:11 by MOSER
;MORE 6.1562 - UPDATE SMON% STUFF FOR NEW FORMAT OF .SFMSD. DUMP .SFSMS
; UPD ID= 440, SNARK:<6.UTILITIES>MONSYM.MAC.192, 20-Jan-84 11:00:48 by MCINTEE
;Add RD%NED
; UPD ID= 439, SNARK:<6.UTILITIES>MONSYM.MAC.191, 19-Jan-84 19:23:30 by TBOYLE
;Add CF%MCA, CF%CH1, CF%CH2, CF%CI, remove CF%CHO
; UPD ID= 438, SNARK:<6.UTILITIES>MONSYM.MAC.190, 18-Jan-84 17:02:48 by GLINDELL
;~6.0 Add error code NTMX2
; UPD ID= 432, SNARK:<6.UTILITIES>MONSYM.MAC.189, 15-Jan-84 14:06:19 by GLINDELL
;~6.0 Add .NTSLM function to NTMAN%
; UPD ID= 430, SNARK:<6.UTILITIES>MONSYM.MAC.188, 13-Jan-84 16:00:02 by PAETZOLD
;More TCO 6.1927 - Add XPEK03 and XPEK04
; UPD ID= 429, SNARK:<6.UTILITIES>MONSYM.MAC.187, 12-Jan-84 17:21:15 by GRANT
;Add KLPX12 - virtual circuit not closed
; UPD ID= 428, SNARK:<6.UTILITIES>MONSYM.MAC.186, 12-Jan-84 17:03:20 by GRANT
;Add new virtual circuit state VC.CIP - close in progress
; UPD ID= 427, SNARK:<6.UTILITIES>MONSYM.MAC.185, 12-Jan-84 15:14:43 by PAETZOLD
;More TCO 6.1927 - Add XPEK01 and XPEK02
; UPD ID= 426, SNARK:<6.UTILITIES>MONSYM.MAC.184, 10-Jan-84 14:40:54 by HALL
;Change message for SCSNBA to be specific
; UPD ID= 425, SNARK:<6.UTILITIES>MONSYM.MAC.183, 10-Jan-84 14:23:26 by TBOYLE
;UN-NIM CNFIG% JSYS
; UPD ID= 424, SNARK:<6.UTILITIES>MONSYM.MAC.182, 10-Jan-84 14:20:24 by TBOYLE
; UPD ID= 420, SNARK:<6.UTILITIES>MONSYM.MAC.181, 7-Jan-84 11:16:16 by PAETZOLD
;TCO 6.1927 - Add .XPJSB and .XPPSB stuff
; UPD ID= 419, SNARK:<6.UTILITIES>MONSYM.MAC.180, 6-Jan-84 13:23:36 by TBOYLE
;correct .CFCND arguments.
; UPD ID= 416, SNARK:<6.UTILITIES>MONSYM.MAC.179, 21-Dec-83 11:21:18 by PURRETTA
; UPD ID= 415, SNARK:<6.UTILITIES>MONSYM.MAC.178, 21-Dec-83 09:34:34 by PURRETTA
;"NIM" the CNFIG% JSYS until implemented.
; UPD ID= 414, SNARK:<6.UTILITIES>MONSYM.MAC.177, 20-Dec-83 17:20:09 by PRATT
;TCO 6.1796 - Add TTMSX2, the refused message or link error
; UPD ID= 413, SNARK:<6.UTILITIES>MONSYM.MAC.176, 19-Dec-83 17:04:17 by TBOYLE
;More CNFIG support. CFGxxx error codes. and .CFGKL.
; UPD ID= 412, SNARK:<6.UTILITIES>MONSYM.MAC.175, 19-Dec-83 14:03:54 by PRATT
;TCO 6.1916 - Define "display" argument types to QUEUE%
; UPD ID= 410, SNARK:<6.UTILITIES>MONSYM.MAC.174, 19-Dec-83 13:20:09 by PRATT
;TCO 6.1915 - Define .IPCCG, "IPCF packet came from QUEUE% jsys"
; UPD ID= 408, SNARK:<6.UTILITIES>MONSYM.MAC.173, 19-Dec-83 07:44:20 by GRANT
;Add KLPX11
; UPD ID= 407, SNARK:<6.UTILITIES>MONSYM.MAC.172, 16-Dec-83 15:41:14 by TBOYLE
;ADD SYMBOLS TO SUPPORT CNFIG% JSYS
; UPD ID= 406, SNARK:<6.UTILITIES>MONSYM.MAC.171, 14-Dec-83 17:15:09 by MILLER
;TCO 6.1452. Add MSTX44 error
; UPD ID= 405, SNARK:<6.UTILITIES>MONSYM.MAC.170, 14-Dec-83 15:46:45 by PAETZOLD
;Add TCPX42 and TCPX43
; UPD ID= 404, SNARK:<6.UTILITIES>MONSYM.MAC.169, 14-Dec-83 14:06:34 by GRANT
;Create error codes KLPX1 - KLPX10
; UPD ID= 401, SNARK:<6.UTILITIES>MONSYM.MAC.168, 14-Dec-83 06:08:17 by GRANT
;Move VC.xxx here from SCAPAR
; UPD ID= 399, SNARK:<6.UTILITIES>MONSYM.MAC.167, 13-Dec-83 13:12:47 by CDUNN
;More TCO 6.1127 - Fix SCS% DMA offsets...
; UPD ID= 391, SNARK:<6.UTILITIES>MONSYM.MAC.166, 5-Dec-83 19:37:03 by CDUNN
;More TCO 6.1127 - Fix random SCS% symbols to match the functional spec
; UPD ID= 382, SNARK:<6.UTILITIES>MONSYM.MAC.165, 28-Nov-83 15:57:51 by TBOYLE
;TCO 6.1876 - DEFS for MSTR: .MSRLS and .MSRSS, bump .MSRLN by 2.
; UPD ID= 381, SNARK:<6.UTILITIES>MONSYM.MAC.163, 28-Nov-83 15:06:51 by PRATT
;TCO 6.1796 - Defs for MTOPR: .MORTF, .MOSTF, MO%NUM, MO%NTM
; UPD ID= 380, SNARK:<6.UTILITIES>MONSYM.MAC.162, 28-Nov-83 11:40:47 by GLINDELL
;More TCO 6.1.1004 - Flag definitions ~6.0
; UPD ID= 379, SNARK:<6.UTILITIES>MONSYM.MAC.161, 28-Nov-83 11:34:11 by GLINDELL
;TCO 6.1.1004 - Add definitions for set/read link parameters and quotas
; UPD ID= 378, SNARK:<6.UTILITIES>MONSYM.MAC.160, 28-Nov-83 10:36:06 by GLINDELL
;TCO 6.1882 - Add D1%MTO bit "allow MTOPR for this device without jfn open"
; UPD ID= 374, SNARK:<6.UTILITIES>MONSYM.MAC.159, 17-Nov-83 16:36:14 by CDUNN
;More TCO 6.1127 - Fix SCS% JSYS argument block to reflect reality and add
;a new error code or two.
; UPD ID= 370, SNARK:<6.UTILITIES>MONSYM.MAC.158, 14-Nov-83 23:58:36 by PAETZOLD
;TCO 6.1864 - Add .GTHLN and .GTHNT functions to GTHST%
; UPD ID= 367, SNARK:<6.UTILITIES>MONSYM.MAC.157, 9-Nov-83 06:09:17 by GRANT
;Add SF%KLP - KLIPA initialization completed
; UPD ID= 366, SNARK:<6.UTILITIES>MONSYM.MAC.156, 8-Nov-83 09:00:16 by MCINTEE
;~6.0 - Remove NSP jsys.
; UPD ID= 365, SNARK:<6.UTILITIES>MONSYM.MAC.155, 1-Nov-83 11:57:22 by PAETZOLD
;Add DEFJS's for MONRD and DBGRD so that they stay reserved
; UPD ID= 364, SNARK:<6.UTILITIES>MONSYM.MAC.153, 31-Oct-83 16:57:01 by CJOHNSON
;TCO 6.1845 - Add new CHFDB error code CFDBX5 "No FDB for non-directory devices"
; UPD ID= 361, SNARK:<6.UTILITIES>MONSYM.MAC.152, 22-Oct-83 08:54:12 by PAETZOLD
;TCO 6.1836 - Add .IPGWY
; UPD ID= 360, SNARK:<6.UTILITIES>MONSYM.MAC.151, 12-Oct-83 08:15:40 by MILLER
;TCO 6.1826. Add IPCF36
; UPD ID= 359, SNARK:<6.UTILITIES>MONSYM.MAC.150, 10-Oct-83 17:30:40 by MOSER
;TCO 6.1746 - ADD LK%EPN
; UPD ID= 355, SNARK:<6.UTILITIES>MONSYM.MAC.149, 3-Oct-83 12:05:13 by MURPHY
;Get rid of SK%RQM, not used.
; UPD ID= 348, SNARK:<6.UTILITIES>MONSYM.MAC.148, 7-Sep-83 14:11:19 by PURRETTA
;Remove unwanted widgets in comments.
; UPD ID= 347, SNARK:<6.UTILITIES>MONSYM.MAC.147, 24-Aug-83 18:27:27 by PRATT
;TCO 6.1779 - Add TB%ABR for TBADD and TBDEL
; UPD ID= 346, SNARK:<6.UTILITIES>MONSYM.MAC.146, 24-Aug-83 12:53:48 by PAETZOLD
;TCO 6.1761 - Add VT131 support
; UPD ID= 329, SNARK:<6.UTILITIES>MONSYM.MAC.145, 1-Aug-83 09:22:32 by HAUDEL
;TCO 6.1744 - Add to .MOINF function of MTORP jsys
; UPD ID= 325, SNARK:<6.UTILITIES>MONSYM.MAC.144, 25-Jul-83 17:44:26 by MCCOLLUM
;TCO 6.1743 - Add XPEEK% JSYS definitions
; UPD ID= 324, SNARK:<6.UTILITIES>MONSYM.MAC.143, 22-Jul-83 11:45:59 by MCINTEE
;TCO 6.1030 - Add GJFX55 error code
; UPD ID= 323, SNARK:<6.UTILITIES>MONSYM.MAC.142, 22-Jul-83 09:55:19 by MURPHY
;TCO 6.1719 - Customer control of hangup action.
;TCO 6.1568 - Customer control of time after carrier off.
; UPD ID= 322, SNARK:<6.UTILITIES>MONSYM.MAC.141, 21-Jul-83 23:58:50 by PAETZOLD
;TCO 6.1733 - No more NCP
; UPD ID= 321, SNARK:<6.UTILITIES>MONSYM.MAC.140, 20-Jul-83 16:19:06 by GUNN
;TCO 6.1.1003 - Add DNA Phase IV Ethernet LLMOP Support ~6.0
;~6.0 Add LLMX05 error code - LLMOP% Invalid KLNI channel specified
;~6.0 Add LLMX04 error code - LLMOP% Nonexistent Request Number
;~6.0 Add LLMX03 error code - LLMOP% Invalid Byte Pointer
;~6.0 Add LLMX02 error code - LLMOP% State is OFF
;~6.0 Add LLMX01 error code - LLMOP% Transmit Datagram Failed
;~6.0 Add LLMOP% JSYS
; UPD ID= 320, SNARK:<6.UTILITIES>MONSYM.MAC.139, 18-Jul-83 16:13:12 by JCAMPBELL
;TCO 6.1728 - Add FB%FOR (FORTRAN data file) to .FBCTL in FDB.
; UPD ID= 314, SNARK:<6.UTILITIES>MONSYM.MAC.138, 7-Jul-83 15:16:56 by MURPHY
;TCO 6.1716 - ADD XJRST.
; UPD ID= 313, SNARK:<6.UTILITIES>MONSYM.MAC.137, 7-Jul-83 15:04:24 by CDUNN
;More TCO 6.1127 - Fix .SSGDE block to allow specification of fork or
;connection when retriving DMA events. Also add new SCS% error codes
; UPD ID= 307, SNARK:<6.UTILITIES>MONSYM.MAC.136, 5-Jul-83 13:36:25 by MURPHY
;.EDSEC added to .JBEDV
; UPD ID= 296, SNARK:<6.UTILITIES>MONSYM.MAC.135, 20-Jun-83 13:09:44 by MOSER
;TCO 6.1562 - .ERR for SMON errors
; UPD ID= 290, SNARK:<6.UTILITIES>MONSYM.MAC.134, 8-Jun-83 10:59:13 by CHALL
;TCO 6. XXX Add .RFSIG to PSW and .SIGIO to I/O identifiers
; UPD ID= 287, SNARK:<6.UTILITIES>MONSYM.MAC.133, 20-May-83 14:35:15 by MCINTEE
;Add more ~6.0 comments
; UPD ID= 285, SNARK:<6.UTILITIES>MONSYM.MAC.132, 20-May-83 13:49:47 by CDUNN
;More TCO 6.1127 - Add .ERR error definitions for internal SCA error codes
; UPD ID= 283, SNARK:<6.UTILITIES>MONSYM.MAC.131, 17-May-83 13:16:14 by CDUNN
;More TCO 6.1127 - Make SCS% message and datagram send definitions the same
; UPD ID= 281, SNARK:<6.UTILITIES>MONSYM.MAC.130, 9-May-83 18:41:59 by WEETON
;tco 6.1611 - Add two new symbol "DA%AIN" and "MSTX43"
; UPD ID= 280, SNARK:<6.UTILITIES>MONSYM.MAC.129, 9-May-83 08:17:20 by HALL
;TCO 6.1636 - Move APCON JSYS to 625
; UPD ID= 275, SNARK:<6.UTILITIES>MONSYM.MAC.128, 3-May-83 13:32:31 by COBB
;TCO 6.1637 - SMON/TMON function for SPEAR event counts
; UPD ID= 274, SNARK:<6.UTILITIES>MONSYM.MAC.127, 2-May-83 15:41:37 by LEACHE
; UPD ID= 273, SNARK:<6.UTILITIES>MONSYM.MAC.126, 29-Apr-83 14:33:41 by HALL
;TCO 6.1636 - Reserve JSYS number for FPS array processor
; UPD ID= 272, SNARK:<6.UTILITIES>MONSYM.MAC.125, 27-Apr-83 13:49:57 by MOSER
;TCO 6.1562 - ADD SMON FUNCTIONS .SFSMS AND .SFMSD
; UPD ID= 270, SNARK:<6.UTILITIES>MONSYM.MAC.124, 26-Apr-83 13:15:31 by CDUNN
;More TCO 6.1127 - Add .SQLRP to receive datagram and message for SCS%
; UPD ID= 269, SNARK:<6.UTILITIES>MONSYM.MAC.123, 21-Apr-83 07:42:08 by WACHS
;TCO 6.1620 - define MS%2PT
; UPD ID= 268, SNARK:<6.UTILITIES>MONSYM.MAC.122, 20-Apr-83 15:22:34 by PAETZOLD
;TCO 6.1619 - Add H19
; UPD ID= 265, SNARK:<6.UTILITIES>MONSYM.MAC.121, 20-Apr-83 04:00:15 by WACHS
;More 6.1127 - DIAG symbols
; UPD ID= 264, SNARK:<6.UTILITIES>MONSYM.MAC.120, 18-Apr-83 05:23:02 by GRANT
;TCO 6.1127 - fix .SQLPN, add .LBEVT and SQ%SBL
; UPD ID= 262, SNARK:<6.UTILITIES>MONSYM.MAC.119, 16-Apr-83 19:17:55 by PAETZOLD
;TCO 6.1557 - TCP Merge
; UPD ID= 260, SNARK:<6.UTILITIES>MONSYM.MAC.118, 13-Apr-83 22:04:27 by CDUNN
;More TCO 6.1127 - Add symbols for the length of each SCS% block. Do general
;cleanup of SCS% blocks.
; UPD ID= 254, SNARK:<6.UTILITIES>MONSYM.MAC.117, 12-Apr-83 07:43:58 by MCINTEE
;More 6.0 comments
; UPD ID= 253, SNARK:<6.UTILITIES>MONSYM.MAC.116, 12-Apr-83 01:56:36 by CDUNN
;More TCO 6.1127 - Remove dependancy on SCAPAR, also remove all referances
;to FTCI and FTKLIPA
; UPD ID= 252, SNARK:<6.UTILITIES>MONSYM.MAC.115, 11-Apr-83 00:12:43 by CDUNN
;More TCO 6.1127 - Update DMA functions to conform to new scheme.
; UPD ID= 251, SNARK:<6.UTILITIES>MONSYM.MAC.114, 8-Apr-83 05:15:49 by WACHS
;More TCO 6.1127 - Add DIAG error codes
; UPD ID= 250, SNARK:<6.UTILITIES>MONSYM.MAC.113, 8-Apr-83 05:06:35 by CDUNN
;More TCO 6.1127 - Update .SSMAP to conform to the new map scheme
; UPD ID= 249, SNARK:<6.UTILITIES>MONSYM.MAC.112, 8-Apr-83 04:48:29 by CDUNN
;More TCO 6.1127 - Two more error codes for SCS% JSYS
; UPD ID= 248, SNARK:<6.UTILITIES>MONSYM.MAC.111, 6-Apr-83 14:35:51 by COBB
;TCO 6.1594 - Add new def's for QUEUE% debugging features.
; UPD ID= 241, SNARK:<6.UTILITIES>MONSYM.MAC.107, 25-Mar-83 05:12:54 by WACHS
;TCO 6.1569 Add CI DIAG functions
; UPD ID= 247, SNARK:<6.UTILITIES>MONSYM.MAC.110, 6-Apr-83 07:21:30 by FLEMMING
; UPD ID= 245, SNARK:<6.UTILITIES>MONSYM.MAC.109, 4-Apr-83 07:09:07 by WACHS
;TCO 6.1569 Add CI DIAG functions
; UPD ID= 244, SNARK:<6.UTILITIES>MONSYM.MAC.108, 2-Apr-83 22:49:46 by LEACHE
;TC0 6.1247 Add more password encryption definitions
; UPD ID= 238, SNARK:<6.UTILITIES>MONSYM.MAC.106, 22-Mar-83 08:02:52 by WACHS
;Add DIAG15, DIAG16
; UPD ID= 230, SNARK:<6.UTILITIES>MONSYM.MAC.104, 21-Mar-83 13:45:27 by CHALL
;Change messages for NODX13, NODX14 to be more general
; UPD ID= 229, SNARK:<6.UTILITIES>MONSYM.MAC.104, 16-Mar-83 19:19:57 by GUNN
;Reserve JSYS 624 for future use.
; UPD ID= 227, SNARK:<6.UTILITIES>MONSYM.MAC.103, 15-Mar-83 17:34:52 by MILLER
;TCO 6.1546 once again
; UPD ID= 226, SNARK:<6.UTILITIES>MONSYM.MAC.102, 15-Mar-83 16:55:11 by MILLER
;TCO 6.1546. Add DIAG% function for reading SYSERR counter
; UPD ID= 220, SNARK:<6.UTILITIES>MONSYM.MAC.101, 8-Mar-83 21:59:27 by CDUNN
;More TCO 6.1127 - Fix .SQTXT to point to start of user data, not start of
;SCA header
; UPD ID= 219, SNARK:<6.UTILITIES>MONSYM.MAC.100, 7-Mar-83 21:36:12 by CDUNN
;More TCO 6.1127 - Change default to include CI symbols
; UPD ID= 218, SNARK:<6.UTILITIES>MONSYM.MAC.99, 4-Mar-83 09:29:47 by CDUNN
;More TCO 6.1127 - Additional symbol support for SCS%. Also another error
;message
; UPD ID= 217, SNARK:<6.UTILITIES>MONSYM.MAC.98, 3-Mar-83 09:16:06 by CHALL
;Add .NDRDB and associated data def's for NODE JSYS
;Add NODX12, NODX13, NODX14, NODX15
; UPD ID= 214, SNARK:<6.UTILITIES>MONSYM.MAC.97, 25-Feb-83 12:06:09 by MURPHY
;More 6.1514 - ERJMPR and ERCALR which always put error code in AC1.
; UPD ID= 213, SNARK:<6.UTILITIES>MONSYM.MAC.96, 25-Feb-83 00:04:38 by MURPHY
;TCO 6.1514 - ERJMPS and ERCALS which don't store error code in AC.
; UPD ID= 212, SNARK:<6.UTILITIES>MONSYM.MAC.95, 22-Feb-83 20:06:19 by MILLER
;Once more...
; UPD ID= 211, SNARK:<6.UTILITIES>MONSYM.MAC.94, 22-Feb-83 19:49:38 by MILLER
;TCO 6.1520. Add SMON/TMON bit for disk preallocation
; UPD ID= 209, SNARK:<6.UTILITIES>MONSYM.MAC.93, 16-Feb-83 09:38:47 by MCINTEE
;ADD ERROR CODES FOR SCJSYS
; UPD ID= 208, SNARK:<6.UTILITIES>MONSYM.MAC.92, 11-Feb-83 03:48:16 by WACHS
;Add definition for TA78
; UPD ID= 207, SNARK:<6.UTILITIES>MONSYM.MAC.91, 9-Feb-83 14:08:07 by CHALL
;ADD .NDCIN AND ASSOCIATED NB BEGSTR FOR NODE JSYS
;ADD NODX07, NODX10, NODX11
; UPD ID= 205, SNARK:<6.UTILITIES>MONSYM.MAC.90, 9-Feb-83 13:46:04 by WEETON
; UPD ID= 202, SNARK:<6.UTILITIES>MONSYM.MAC.89, 4-Feb-83 04:56:20 by WACHS
;TCO 6.1355 - add defs for RA80, RA81, RA60 disks
; UPD ID= 201, SNARK:<6.UTILITIES>MONSYM.MAC.88, 2-Feb-83 13:55:09 by GRANT
;TCO 6.1484 - add function .NTPSI to NTMAN%
; UPD ID= 194, SNARK:<6.UTILITIES>MONSYM.MAC.87, 20-Jan-83 07:43:56 by GRANT
;TCO 6.1473 - update DECnet disconnect codes and error messages
; UPD ID= 189, SNARK:<6.UTILITIES>MONSYM.MAC.86, 14-Jan-83 03:12:50 by CDUNN
;Fix problem with edit 187. Put referance to CI only symbol under feature test.
; UPD ID= 188, SNARK:<6.UTILITIES>MONSYM.MAC.85, 14-Jan-83 03:06:26 by CDUNN
;More TCO 6.1126 Add yet another error code for the SCS% JSYS
; UPD ID= 187, SNARK:<6.UTILITIES>MONSYM.MAC.84, 12-Jan-83 22:06:00 by CDUNN
;More TCO 6.1127 and 6.1452 Fix forgotten bracket on new MSTR errors, also
;add more errors for SCS%.
; UPD ID= 186, SNARK:<6.UTILITIES>MONSYM.MAC.82, 12-Jan-83 13:36:06 by MILLER
;MORE TCO 6.1452. Fix names of errors
; UPD ID= 185, SNARK:<6.UTILITIES>MONSYM.MAC.81, 12-Jan-83 12:42:24 by CDUNN
;More TCO 6.1127 Fix some block definitions and add more error codes.
; UPD ID= 184, SNARK:<6.UTILITIES>MONSYM.MAC.80, 11-Jan-83 19:35:23 by MILLER
;TCO 6.1452. Add defs and error messages for .MSCSM function of MSTR
; UPD ID= 181, SNARK:<6.UTILITIES>MONSYM.MAC.79, 6-Jan-83 13:25:19 by MCINTEE
;TCO 6.1441 - Add .MONVR
; UPD ID= 178, SNARK:<6.UTILITIES>MONSYM.MAC.78, 3-Jan-83 16:15:02 by LOMARTIRE
;TCO 6.1433 - Add code for ^ESET [NO] LOGINS-ALLOWED DECNET-LINES command
; UPD ID= 177, SNARK:<6.UTILITIES>MONSYM.MAC.77, 29-Dec-82 04:01:06 by WACHS
;TCO 6.1355 Add error code for CI DIAG JSYS
; UPD ID= 176, SNARK:<6.UTILITIES>MONSYM.MAC.76, 28-Dec-82 23:46:46 by CDUNN
;More TCO 6.1127 Fix JSYS blocks to include the remote SBI as needed.
; UPD ID= 173, SNARK:<6.UTILITIES>MONSYM.MAC.75, 15-Dec-82 14:55:44 by CDUNN
;Changes for the SCS% JSYS. Update arg blocks and define forgotten symbols.
; UPD ID= 155, SNARK:<6.UTILITIES>MONSYM.MAC.74, 12-Oct-82 20:19:39 by CDUNN
;Add more error codes for the SCS% JSYS
; UPD ID= 153, SNARK:<6.UTILITIES>MONSYM.MAC.73, 6-Oct-82 00:57:14 by CDUNN
;Fix some block definitions for the SCS% JSYS
; UPD ID= 152, SNARK:<6.UTILITIES>MONSYM.MAC.72, 3-Oct-82 18:29:35 by CDUNN
;More error codes for the SCS% JSYS
; UPD ID= 151, SNARK:<6.UTILITIES>MONSYM.MAC.71, 2-Oct-82 17:29:44 by CDUNN
;More error codes for the SCS% JSYS
; UPD ID= 148, SNARK:<6.UTILITIES>MONSYM.MAC.70, 30-Sep-82 13:00:51 by CDUNN
;More symbols for the SCS% JSYS
; UPD ID= 145, SNARK:<6.UTILITIES>MONSYM.MAC.69, 28-Sep-82 13:11:46 by MCINTEE
;TCO 6.1056 - TYPO in previous edit
; UPD ID= 144, SNARK:<6.UTILITIES>MONSYM.MAC.68, 28-Sep-82 13:04:29 by MCINTEE
;TCO 6.1056 - Make JS%DEV smaller, to make room for JS%NOD
; UPD ID= 143, SNARK:<6.UTILITIES>MONSYM.MAC.67, 28-Sep-82 09:01:42 by LEACHE
;More TCO 6.1273 Change MS%EXL TO MS%EXC
; UPD ID= 139, SNARK:<6.UTILITIES>MONSYM.MAC.66, 27-Sep-82 09:56:20 by LEACHE
;More TCO 6.1247 - Make AC%PWD 1B3
; UPD ID= 138, SNARK:<6.UTILITIES>MONSYM.MAC.65, 24-Sep-82 11:32:22 by LEACHE
;More TCO 6.1273 - add MS%CRD, MS%IDX, and MS%EXL
; UPD ID= 137, SNARK:<6.UTILITIES>MONSYM.MAC.64, 23-Sep-82 19:24:50 by PAETZOLD
;TCO 6.1281 - Add OPRFN as an obsolete JSYS so we never use it.
; Update copyright and remove pre release 5 edit history.
; UPD ID= 134, SNARK:<6.UTILITIES>MONSYM.MAC.63, 22-Sep-82 20:44:53 by CDUNN
;More symbols for the SCS% JSYS
; UPD ID= 132, SNARK:<6.UTILITIES>MONSYM.MAC.62, 20-Sep-82 13:14:33 by LEACHE
;More of previous
; UPD ID= 131, SNARK:<6.UTILITIES>MONSYM.MAC.61, 20-Sep-82 10:55:20 by LEACHE
;TCO 6.1273 Add MS%ASG and MS%MXB
; UPD ID= 129, SNARK:<6.UTILITIES>MONSYM.MAC.60, 14-Sep-82 18:15:23 by LEACHE
;TCO 6.1247 add CRDI28
; UPD ID= 128, SNARK:<6.UTILITIES>MONSYM.MAC.59, 13-Sep-82 19:41:15 by MILLER
;tco 6.1094. Define MS%EXL FOR CFS
; UPD ID= 127, SNARK:<6.UTILITIES>MONSYM.MAC.58, 8-Sep-82 22:36:27 by LEACHE
;TCO 6.1247 Add CRDI26 and CRDI27
; UPD ID= 126, SNARK:<6.UTILITIES>MONSYM.MAC.57, 3-Sep-82 13:24:15 by LEACHE
;MORE TCO 6.1247
; UPD ID= 124, SNARK:<6.UTILITIES>MONSYM.MAC.56, 2-Sep-82 20:26:49 by LEACHE
;TCO 6.1247 - Add definitions for password encryption
; UPD ID= 121, SNARK:<6.UTILITIES>MONSYM.MAC.55, 19-Aug-82 17:51:00 by LEACHE
;TCO 6.1232 - ADD TTYX03
; UPD ID= 119, SNARK:<6.UTILITIES>MONSYM.MAC.54, 19-Aug-82 09:41:46 by MCINTEE
;TCO 6.1030 - Clean up DAP% error strings
; UPD ID= 118, SNARK:<6.UTILITIES>MONSYM.MAC.53, 19-Aug-82 09:35:06 by MCINTEE
;TCO 6.1230 - Add symbols for remote alias support (.CDxxx, CD%xxx, RNxxx)
; UPD ID= 117, SNARK:<6.UTILITIES>MONSYM.MAC.52, 10-Aug-82 09:17:30 by MILLER
;TCO 6.1025 again. Add the JSYS definition
; UPD ID= 108, SNARK:<6.UTILITIES>MONSYM.MAC.51, 2-Aug-82 18:53:09 by MILLER
;TCO 6.1025. Add defs for WSMGR
; UPD ID= 106, SNARK:<6.UTILITIES>MONSYM.MAC.50, 31-Jul-82 12:15:34 by WALLACE
;TCO 6.1105 - Add error code CTSX13 to be used by CTS Libraries
; UPD ID= 105, SNARK:<6.UTILITIES>MONSYM.MAC.49, 31-Jul-82 12:11:12 by CDUNN
;More symbols yet for the SCS% JSYS
; UPD ID= 104, SNARK:<6.UTILITIES>MONSYM.MAC.48, 30-Jul-82 12:19:48 by WALLACE
;TCO 6.1104 and TCO 6.1105 - Add flags for DYNLB%, more offsets for
; terminal data base, and more function codes for CTSOP%
; UPD ID= 103, SNARK:<6.UTILITIES>MONSYM.MAC.47, 30-Jul-82 11:50:10 by CDUNN
;Add more symbols yet for the SCS% JSYS
; UPD ID= 99, SNARK:<6.UTILITIES>MONSYM.MAC.46, 15-Jul-82 13:46:14 by VBROWNELL
; Add more error codes for NODE%
; UPD ID= 96, SNARK:<6.UTILITIES>MONSYM.MAC.45, 15-Jul-82 12:46:53 by CDUNN
;Add symbols to support the SCS% JSYS
; UPD ID= 95, SNARK:<6.UTILITIES>MONSYM.MAC.44, 1-Jul-82 11:20:00 by CHALL
;TCO 6.1182 ADD DEFINITIONS TO SUPPORT DECNET-36 AND THE NSP% JSYS
; UPD ID= 94, SNARK:<6.UTILITIES>MONSYM.MAC.43, 30-Jun-82 16:04:41 by MCINTEE
;TCO 6.1030 - Add the DAP% jsys definition & its error strings
; UPD ID= 88, SNARK:<6.UTILITIES>MONSYM.MAC.42, 16-Jun-82 11:59:22 by MURPHY
;More 6.1126 - Note "$" symbols created by DEFSTR, etc.
; UPD ID= 87, SNARK:<6.UTILITIES>MONSYM.MAC.41, 11-Jun-82 16:39:16 by HALL
;TCO 6.1000 - Support the 2080
; Add offsets for argument blocks for address break
; UPD ID= 86, SNARK:<6.UTILITIES>MONSYM.MAC.40, 11-Jun-82 09:01:38 by HALL
;TCO 6.1000 - Support the 2080
; Add more error codes for address break
;TCO 6.1000 - Support the 2080
; Add data for address break
; UPD ID= 85, SNARK:<6.UTILITIES>MONSYM.MAC.39, 10-Jun-82 07:35:29 by HALL
;TCO 6.1000 - Support the 2080
; Add bit definition for address break
; UPD ID= 77, SNARK:<6.UTILITIES>MONSYM.MAC.38, 4-Jun-82 13:41:51 by HALL
;More on previous edit. Use error name consistent with existing one
; UPD ID= 76, SNARK:<6.UTILITIES>MONSYM.MAC.37, 4-Jun-82 13:37:13 by HALL
;Add error message for address break when EXEC mode break in effect.
; UPD ID= 66, SNARK:<6.UTILITIES>MONSYM.MAC.36, 26-May-82 19:34:45 by WALLACE
;TCO 6.1104 and 6.1105 Add Dynamically Linked Libraries and Canonical
; Terminal Support
; Add Error Codes for DYNLB% and CTSOP% JSYS's
; Add Symbols for DYNLB% JSYS
; Add Symbols for CTSOP% JSYS and the Library Descriptor Block
; Add Definitions for DYNLB% and CTSOP% JSYS's
; UPD ID= 54, SNARK:<6.UTILITIES>MONSYM.MAC.35, 21-May-82 11:06:20 by PAETZOLD
;More TCO 6.1138 - Make BBN TCP JSYSi of the new type
; UPD ID= 53, SNARK:<6.UTILITIES>MONSYM.MAC.34, 21-May-82 09:28:15 by PAETZOLD
;More TCO 6.1138 - Correct things one more time
; UPD ID= 52, SNARK:<6.UTILITIES>MONSYM.MAC.33, 20-May-82 13:45:35 by MILLER
;TCO 6.1142. Restore edits lost in ID=49
; UPD ID= 51, SNARK:<6.UTILITIES>MONSYM.MAC.32, 19-May-82 17:45:50 by PAETZOLD
;More TCP 6.1138 - Use the correct number of commas this time
; UPD ID= 50, SNARK:<6.UTILITIES>MONSYM.MAC.31, 19-May-82 16:24:51 by MCINTEE
;TCO 6.1143 - Add new bit definition G1%LOC - local files only GTJFN
; UPD ID= 49, SNARK:<6.UTILITIES>MONSYM.MAC.30, 19-May-82 15:42:47 by COBB
;TCO 6.1142 - Add new bit definitions and block description to QUEUE% for FACTSW
; UPD ID= 43, SNARK:<6.UTILITIES>MONSYM.MAC.29, 19-May-82 10:09:03 by MILLER
;TCO 6.1142. Add definition for new FACTSW bit
; UPD ID= 42, SNARK:<6.UTILITIES>MONSYM.MAC.28, 18-May-82 09:55:40 by GRANT
;TCO 6.1140 - .NTEVQ
; UPD ID= 40, SNARK:<6.UTILITIES>MONSYM.MAC.27, 15-May-82 20:14:19 by PAETZOLD
;TCO 6.1138 - Document the BBN IP and TCP JSYSes in JSTAB
; UPD ID= 38, SNARK:<6.UTILITIES>MONSYM.MAC.26, 4-May-82 12:10:26 by MURPHY
;TCO 6.1126 - Comment to describe symbol conventions.
; UPD ID= 34, SNARK:<6.UTILITIES>MONSYM.MAC.25, 9-Apr-82 10:26:05 by CHALL
;TCO 6.1087 - ADD .TT102 TO THE TERMINAL TYPE NUMBERS
; UPD ID= 33, SNARK:<6.UTILITIES>MONSYM.MAC.24, 13-Mar-82 17:02:20 by MILLER
;TCO 6.1066. ADD DEFS FOR 2080 DIAG CONSOLE FUNCTIONS
; UPD ID= 25, SNARK:<6.UTILITIES>MONSYM.MAC.23, 22-Jan-82 17:02:59 by MURPHY
;TCO 5.1697 - XSSEV%, XGSEV%, etc.
; UPD ID= 24, SNARK:<6.UTILITIES>MONSYM.MAC.22, 22-Jan-82 15:54:24 by PAETZOLD
;TCO 5.1699 - Add .TT125 and .TTK10
; UPD ID= 23, SNARK:<6.UTILITIES>MONSYM.MAC.21, 21-Jan-82 10:30:36 by COBB
;TCO 6.1057 - Add error codes, arguments, Jsys def'n for QUEUE%
;Correct grammar errors in ARCFX3, ARCFX4, ARCFX9, and ARCX16
; UPD ID= 22, SNARK:<6.UTILITIES>MONSYM.MAC.13, 18-Jan-82 10:17:23 by PAETZOLD
;Add BOTX20 and ILLX05
; UPD ID= 18, SNARK:<6.UTILITIES>MONSYM.MAC.12, 14-Jan-82 09:15:02 by MCINTEE
;TCO 6.1056 - Add JS%NOD
;TCO 6.1055 - Add GJ%NOD
; UPD ID= 17, SNARK:<6.UTILITIES>MONSYM.MAC.11, 13-Jan-82 16:48:12 by PAETZOLD
;TCO 5.1673 - Add BOTX19
; UPD ID= 16, SNARK:<6.UTILITIES>MONSYM.MAC.10, 6-Jan-82 09:39:13 by MILLER
;TCO 6.1054. ADD .GOATJ DEF FOR ATACH ACJ
; UPD ID= 15, SNARK:<6.UTILITIES>MONSYM.MAC.9, 5-Jan-82 13:43:53 by MILLER
;TCO 6.1053. ADD FB%WNC
; UPD ID= 14, SNARK:<6.UTILITIES>MONSYM.MAC.8, 3-Dec-81 14:04:40 by COBB
;TCO 6.1041 - ADD .SPDBG TO SYSTEM PID TABLE (for QUEUE% jsys)
; UPD ID= 11, SNARK:<6.UTILITIES>MONSYM.MAC.7, 10-Nov-81 10:47:18 by HALL
;TCO 6.1037 - ADD PDL OVERFLOW TO SWTRP JSYS
;TCO 6.1000 - ADD SW%NMI BIT TO SWTRP JSYS
; UPD ID= 10, SNARK:<6.UTILITIES>MONSYM.MAC.6, 6-Nov-81 12:50:32 by CHALL
;TCO 6.1036 ADD CM%NSF - "SUFFIX MAY BE OMITTED" FLAG FOR COMND
; UPD ID= 8, SNARK:<6.UTILITIES>MONSYM.MAC.5, 26-Oct-81 19:55:44 by SOUTH
;tco 5.1598 - insert symbols for DN60 protocol in DTESRV.
; UPD ID= 7, SNARK:<6.UTILITIES>MONSYM.MAC.4, 16-Oct-81 12:25:50 by MURPHY
;FH%EPN
; UPD ID= 6, SNARK:<6.UTILITIES>MONSYM.MAC.3, 29-Sep-81 10:10:03 by PAETZOLD
;TCO 5.1536 - INSERT .BTD60 AND .VND60
; UPD ID= 5, SNARK:<6.UTILITIES>MONSYM.MAC.2, 14-Aug-81 16:50:40 by MURPHY
;.GJNOD, GJFX54
; UPD ID= 14, SNARK:<5.UTILITIES>MONSYM.MAC.61, 30-Jul-81 07:10:57 by FLEMMING
;Add definitions for XGTPW
; UPD ID= 10, SNARK:<5.UTILITIES>MONSYM.MAC.60, 24-Jul-81 16:08:55 by SCHMITT
;TCO 5.1433 - Add SMAPX2 and PMAPX8 error codes
; UPD ID= 7, SNARK:<5.UTILITIES>MONSYM.MAC.59, 18-Jul-81 17:53:52 by PAETZOLD
;Fix typo - TTYXO2 should be TTYX02
; UPD ID= 5, SNARK:<5.UTILITIES>MONSYM.MAC.58, 17-Jul-81 16:13:44 by MURPHY
;MORE 5.1390 - TTYX02
; UPD ID= 4, SNARK:<5.UTILITIES>MONSYM.MAC.57, 17-Jul-81 14:48:24 by PAETZOLD
;TCO 5.1301 - Add .SCOUN getab index
;Also Remove TCO 5.1302 as it is no longer needed
; UPD ID= 3, SNARK:<5.UTILITIES>MONSYM.MAC.56, 16-Jul-81 13:45:28 by GRANT
;TCO 5.1418 - Symbol for new NODE JSYS function .NDRNM; also, .NDMAX
; UPD ID= 1, SNARK:<5.UTILITIES>MONSYM.MAC.55, 8-Jul-81 17:45:52 by MURPHY
;TCO 5.1398 - IOX34, IOX35
;TCO 5.1396 - JP%SYS
; UPD ID= 2272, SNARK:<5.UTILITIES>MONSYM.MAC.54, 30-Jun-81 11:44:59 by MURPHY
;ANTX01
;<5.UTILITIES>MONSYM.MAC.53, 29-Jun-81 18:58:47, Edit by PAETZOLD
;<5.UTILITIES>MONSYM.MAC.52, 29-Jun-81 18:52:52, Edit by PAETZOLD
;ANTX01 - ADD DEFINITION WITHOUT STRING SO TTYSRV ASSEMBLES
; UPD ID= 2249, SNARK:<5.UTILITIES>MONSYM.MAC.51, 24-Jun-81 12:18:00 by LEACHE
;TCO 5.1383 Modify definition of DESX7
; UPD ID= 2242, SNARK:<5.UTILITIES>MONSYM.MAC.50, 23-Jun-81 14:31:02 by MURPHY
;REMOVE EXTRANEOUS XHLLI DEF
; UPD ID= 2222, SNARK:<5.UTILITIES>MONSYM.MAC.49, 19-Jun-81 10:20:39 by GRANT
;TCO 5.1375 - Add ATACX6 and ATACX7
; UPD ID= 1925, SNARK:<5.UTILITIES>MONSYM.MAC.48, 1-May-81 12:06:28 by PAETZOLD
;TCO 5.1302 add .GOTRK for GETOK subsystem (compiler) access
;also .GETYP for block type of .GOTRK function
; UPD ID= 1915, SNARK:<5.UTILITIES>MONSYM.MAC.44, 30-Apr-81 16:50:59 by CHALL
;Define FB%NDL in the FDB and error message DELX13 (2453)
; UPD ID= 1861, SNARK:<5.UTILITIES>MONSYM.MAC.43, 21-Apr-81 18:27:59 by MURPHY
; UPD ID= 1796, SNARK:<5.UTILITIES>MONSYM.MAC.42, 7-Apr-81 12:44:53 by GRANT
;Change wording of NSPX25
; UPD ID= 1794, SNARK:<5.UTILITIES>MONSYM.MAC.41, 6-Apr-81 15:57:23 by GRANT
;Make COMX21 upper/lower case
; UPD ID= 1773, SNARK:<5.UTILITIES>MONSYM.MAC.40, 25-Mar-81 17:53:26 by GRANT
;Update Copyright
; UPD ID= 1699, SNARK:<5.UTILITIES>MONSYM.MAC.39, 16-Mar-81 08:18:39 by FLEMMING
;add definitions for XRMAP
; UPD ID= 1531, SNARK:<5.UTILITIES>MONSYM.MAC.38, 7-Feb-81 21:31:08 by GRANT
;ADD COMX21
; UPD ID= 1530, SNARK:<5.UTILITIES>MONSYM.MAC.37, 7-Feb-81 21:23:01 by GRANT
;Network Management only needs 1 error code, remove the others
;Add 2 Network Management functions - .NTMAP and .NTREX
; UPD ID= 1528, SNARK:<5.UTILITIES>MONSYM.MAC.36, 6-Feb-81 17:03:00 by MURPHY
;OF%RDU
; UPD ID= 1474, SNARK:<5.UTILITIES>MONSYM.MAC.35, 22-Jan-81 11:59:21 by ZIMA
;Comment-only edit to .GERLG
; UPD ID= 1448, SNARK:<5.UTILITIES>MONSYM.MAC.34, 15-Jan-81 16:00:10 by FLEMMING
;add code for SMAP/RSMAP
; UPD ID= 1327, SNARK:<5.UTILITIES>MONSYM.MAC.33, 1-Dec-80 16:09:12 by OSMAN
;TCO 5.1205 - ADD XGVEC AND XSVEC
;tco 5.1204 - Add XSFRK jsys
; UPD ID= 1313, SNARK:<5.UTILITIES>MONSYM.MAC.32, 25-Nov-80 16:30:26 by GRANT
;New NTMAN% JSYS symbols and error messages
; UPD ID= 1298, SNARK:<5.UTILITIES>MONSYM.MAC.31, 19-Nov-80 16:53:05 by MURPHY
;SH%LPM
; UPD ID= 1282, SNARK:<5.UTILITIES>MONSYM.MAC.29, 18-Nov-80 12:00:11 by OSMAN
;Fix GET bit definitions
; UPD ID= 1271, SNARK:<5.UTILITIES>MONSYM.MAC.28, 13-Nov-80 16:25:00 by OSMAN
;Add GETX5
; UPD ID= 1243, SNARK:<5.UTILITIES>MONSYM.MAC.27, 7-Nov-80 09:56:36 by OSMAN
;tco 5.1189 - Add new GET symbols
; UPD ID= 1204, SNARK:<5.UTILITIES>MONSYM.MAC.26, 28-Oct-80 16:55:09 by MURPHY
;SK%CL1
; UPD ID= 1164, SNARK:<5.UTILITIES>MONSYM.MAC.25, 15-Oct-80 11:48:51 by MOSER
;TCO 5.1173 - ADD .LSxxx SYMBOLS FOR MAGTAPE LABEL STATE
; UPD ID= 1144, SNARK:<5.UTILITIES>MONSYM.MAC.24, 9-Oct-80 22:41:43 by ENGEL
;ADD CIBDFQ
; UPD ID= 1096, SNARK:<5.UTILITIES>MONSYM.MAC.23, 1-Oct-80 16:14:45 by BLOUNT
;re-define .FBLN1 to be 31 (it changed in Release 4)
; UPD ID= 1055, SNARK:<5.UTILITIES>MONSYM.MAC.22, 26-Sep-80 12:00:36 by MURPHY
;ARG BLOCK SYMBOLS FOR .MOSNH
; UPD ID= 1048, SNARK:<5.UTILITIES>MONSYM.MAC.21, 25-Sep-80 16:25:36 by GRANT
;Add NTMAN% JSYS definitions
;Add .NDNNO and .NDMSK to NODE JSYS
; UPD ID= 1037, SNARK:<5.UTILITIES>MONSYM.MAC.20, 24-Sep-80 14:55:23 by ZIMA
;TCO 5.1155 - ADD GJFX53
; UPD ID= 1022, SNARK:<5.UTILITIES>MONSYM.MAC.19, 16-Sep-80 16:00:24 by GRANT
;NSPX24 - NSPX26
; UPD ID= 984, SNARK:<5.UTILITIES>MONSYM.MAC.18, 3-Sep-80 14:46:14 by GRANT
;NTMX1 - NTMX5
; UPD ID= 926, SNARK:<5.UTILITIES>MONSYM.MAC.17, 20-Aug-80 10:29:45 by MURPHY
;.MOANT, .MOSNH
; UPD ID= 921, SNARK:<5.UTILITIES>MONSYM.MAC.16, 19-Aug-80 15:19:29 by MURPHY
;.GSSMB
; UPD ID= 877, SNARK:<5.UTILITIES>MONSYM.MAC.15, 12-Aug-80 10:51:01 by OSMAN
;tco 5.1130 - Change wording of SEVEX1
; UPD ID= 817, SNARK:<5.UTILITIES>MONSYM.MAC.14, 30-Jul-80 16:55:33 by OSMAN
;More 5.1105 - Add .POLOC
; UPD ID= 816, SNARK:<5.UTILITIES>MONSYM.MAC.13, 30-Jul-80 16:45:36 by OSMAN
;More 5.1105 - Add PDVX03
; UPD ID= 800, SNARK:<5.UTILITIES>MONSYM.MAC.12, 24-Jul-80 16:45:34 by OSMAN
;More 5.1105 - Add SSAVX5
; UPD ID= 771, SNARK:<5.UTILITIES>MONSYM.MAC.11, 22-Jul-80 09:07:14 by OSMAN
;tco 5.1105 - Put in PDVOP% definitions
; UPD ID= 656, SNARK:<5.UTILITIES>MONSYM.MAC.10, 16-Jun-80 17:22:43 by KONEN
;TCO 5.1063 -- ADD .MSISN AND .MSRSE TO MSTR
;CHANGE PS: ERROR MESSAGES TO SAY SYSTEM STRUCTURE
; UPD ID= 618, SNARK:<5.UTILITIES>MONSYM.MAC.9, 9-Jun-80 16:21:42 by LYONS
;TCO 5.1062 ADD MSTR BITS FOR READ AFTER WRITE FOR SWAP AND DATA SPACE
; UPD ID= 595, SNARK:<5.UTILITIES>MONSYM.MAC.8, 3-Jun-80 17:10:46 by MURPHY
;ADD SYSTEM MESSAGE LEVEL BITS TO SMON/TMON
; UPD ID= 582, SNARK:<5.UTILITIES>MONSYM.MAC.7, 1-Jun-80 23:56:29 by ZIMA
;TCO 5.1055 - CORRECT DEFINITION OF TL%AAD TO ==:
; UPD ID= 580, SNARK:<5.UTILITIES>MONSYM.MAC.6, 31-May-80 23:11:23 by DBELL
;TCO 5.1048 - ADD ERROR CODES FOR MULTIPLE-PAGE DSKOPS
; UPD ID= 479, SNARK:<5.UTILITIES>MONSYM.MAC.5, 25-Apr-80 14:09:34 by ENGEL
;ADD LCBDBP,LCLNER,LCNOND
; UPD ID= 396, SNARK:<5.UTILITIES>MONSYM.MAC.4, 1-Apr-80 17:19:47 by LYONS
;ADD SC%ANA, SC%DNA AS PRIVE, AND GETOK FUNCTIONS .GOANA, .GODNA
; UPD ID= 384, SNARK:<5.UTILITIES>MONSYM.MAC.3, 27-Mar-80 14:04:37 by ENGEL
;ADD CILENR
; UPD ID= 380, SNARK:<5.UTILITIES>MONSYM.MAC.2, 26-Mar-80 16:15:41 by ENGEL
;ADD CIXXX CODES
; UPD ID= 370, SNARK:<4.1.UTILITIES>MONSYM.MAC.14, 26-Mar-80 11:12:31 by DBELL
;TCO 4.1.1119 - ADD RP20 DEFINITIONS
; UPD ID= 301, SNARK:<4.1.UTILITIES>MONSYM.MAC.13, 3-Mar-80 12:36:15 by HALL
;MAKE SMAP BE PART OF THE STANDARD MONITOR (FOR INHOUSE, AT LEAST)
; UPD ID= 286, SNARK:<4.1.UTILITIES>MONSYM.MAC.12, 20-Feb-80 17:59:33 by MURPHY
;SK%TOP, SK%RQM
; UPD ID= 282, SNARK:<4.1.UTILITIES>MONSYM.MAC.11, 20-Feb-80 13:25:35 by MURPHY
;FIELDS FOR SJPRI, SPRIW
; UPD ID= 235, SNARK:<4.1.UTILITIES>MONSYM.MAC.10, 31-Jan-80 16:44:53 by DBELL
;FIX JS%SPC TO INCLUDE JS%PAF
; UPD ID= 227, SNARK:<4.1.UTILITIES>MONSYM.MAC.9, 25-Jan-80 17:02:47 by DBELL
;TCO 4.1.1074 - ADD SYMBOL JS%SPC FOR JFNS
; UPD ID= 188, SNARK:<4.1.UTILITIES>MONSYM.MAC.8, 8-Jan-80 09:12:13 by KONEN
;ADD MORE BOOT ERROR MESSAGES
; UPD ID= 180, SNARK:<4.1.UTILITIES>MONSYM.MAC.7, 31-Dec-79 12:51:31 by GRANT
;MONX06 - make the message better
; UPD ID= 178, SNARK:<4.1.UTILITIES>MONSYM.MAC.6, 28-Dec-79 14:11:55 by GRANT
;Add MONX06 error code
;<4.1.UTILITIES>MONSYM.MAC.5, 16-Nov-79 13:49:40, EDIT BY MILLER
;TCO 4.1.1021 ADD TTMSX1 ERROR CODE
;<4.1.UTILITIES>MONSYM.MAC.4, 13-Nov-79 09:27:17, EDIT BY OSMAN
;MORE 4.1.1016 - Change .CHFF to .CHFFD
;<4.1.UTILITIES>MONSYM.MAC.3, 13-Nov-79 07:51:35, EDIT BY R.ACE
;TCO 4.1.1018 - REMOVE EFACT JSYS FROM MONITOR
;<4.1.UTILITIES>MONSYM.MAC.2, 12-Nov-79 16:06:49, EDIT BY OSMAN
;tco 4.1.1016 - Allow formfeed to end lines
;THIS SOFTWARE IS FURNISHED UNDER A LICENSE AND MAY BE USED
;OR COPIED ONLY IN ACCORDANCE WITH THE TERMS OF SUCH LICENSE.
;
;COPYRIGHT (C) DIGITAL EQUIPMENT CORPORATION 1976, 1984.
;ALL RIGHTS RESERVED.
SALL
IFNDEF REL,<REL==0> ;ASSEMBLING REL IF NON-0
IFE REL,<
UNIVERSAL MONSYM - TOPS20 MONITOR CALL DEFINITIONS AND ERROR MNEMONICS
>
IFN REL,<
TITLE MONSYM - TOPS20 MONITOR CALL DEFINITIONS AND ERROR MNEMONICS
IFNDEF .PSECT,<
.DIRECT .XTABM>
>
SEARCH MACSYM ;SOME SYMBOLS ARE DEFINED VIA MACROS
COMMENT !
Certain conventions are observed regarding the construction of
symbols as follows: ("x" represents any alphanumeric)
xxxxx. an opdef or macro defininition
xxxxx% a JSYS
.xxxxx a constant value
xx%xxx a mask, i.e., a bit or bits which specify a
field
Symbols containing multiple periods may be used
internally by some macros.
Symbols containing "$" are not used or defined by DEC
and are reserved for customer use. Note however that certain
macros in MACSYM create symbols containing "$" by prefixing
a "$" to a name supplied by the user. DEFSTR, MSKSTR,
and the stack variable macros all do this.
All JSYS names are defined as xxxxx%. Those existing prior to
release 4 are also defined without the trailing "%".
For JSYS argument values, the symbol is usually divided into
a general part relating to the JSYS, and a specific part
identifying the function. The form gg%sss is used for
fields, and the form .ggsss is used for constant values.
For example, GJ%OLD, GJ%FNS, and .GJDEF are all defined as
arguments to GTJFN%.
!;end comment
;NOTE:
; THE FOLLOWING SYMBOLS ARE RESERVED:
;
; SYMBOL RESERVED BY
; ====== ===========
;
; .OF??? RMS-20
; .SZ??? RMS-20
; .PS??? RMS-20
;MACRO TO DEFINE JSYS NAMES
DEFINE DEFJS (NAME,NUM,SECT,XTRA,OLDNEW)<
OPDEF NAME'% [104B8+NUM]
IFDEF .PSECT,<
INTERN NAME'%>
IFIDN <OLDNEW>,<OLD>,<
OPDEF NAME [104B8+NUM]
IFDEF .PSECT,<
INTERN NAME>>>
;JSYS DEFINITIONS WITH 'NIM' AS A FOURTH ARGUMENT ARE CLASSIFIED
; AS 'NOT IN MONITOR'
DEFINE JSLIST <
DEFJS LOGIN,1,MSEC1,,OLD
DEFJS CRJOB,2,MSEC1,,OLD
DEFJS LGOUT,3,MSEC1,,OLD
DEFJS CACCT,4,MSEC1,,OLD
DEFJS EFACT,5,MSEC1,NIM,OLD
DEFJS SMON,6,MSEC1,,OLD
DEFJS TMON,7,MSEC1,,OLD
DEFJS GETAB,10,MSEC1,,OLD
DEFJS ERSTR,11,MSEC1,,OLD
DEFJS GETER,12,MSEC1,,OLD
DEFJS GJINF,13,MSEC1,,OLD
DEFJS TIME,14,MSEC1,,OLD
DEFJS RUNTM,15,MSEC1,,OLD
DEFJS SYSGT,16,MSEC1,,OLD
DEFJS GNJFN,17,MSEC1,,OLD
DEFJS GTJFN,20,MSEC1,,OLD
DEFJS OPENF,21,MSEC1,,OLD
DEFJS CLOSF,22,MSEC1,,OLD
DEFJS RLJFN,23,MSEC1,,OLD
DEFJS GTSTS,24,MSEC1,,OLD
DEFJS STSTS,25,MSEC1,,OLD
DEFJS DELF,26,MSEC1,,OLD
DEFJS SFPTR,27,MSEC1,,OLD
DEFJS JFNS,30,MSEC1,,OLD
DEFJS FFFFP,31,MSEC1,,OLD
DEFJS RDDIR,32,MSEC1,,OLD ;OBSOLETE,,OLD
DEFJS CPRTF,33,,NIM,OLD
DEFJS CLZFF,34,MSEC1,,OLD
DEFJS RNAMF,35,MSEC1,,OLD
DEFJS SIZEF,36,MSEC1,,OLD
DEFJS GACTF,37,MSEC1,,OLD
DEFJS STDIR,40,MSEC1,,OLD ;OBSOLETE,,OLD
DEFJS DIRST,41,MSEC1,,OLD
DEFJS BKJFN,42,MSEC1,,OLD
DEFJS RFPTR,43,MSEC1,,OLD
DEFJS CNDIR,44,,NIM,OLD
DEFJS RFBSZ,45,MSEC1,,OLD
DEFJS SFBSZ,46,MSEC1,,OLD
DEFJS SWJFN,47,MSEC1,,OLD
DEFJS BIN,50,MSEC1,,OLD
DEFJS BOUT,51,MSEC1,,OLD
DEFJS SIN,52,MSEC1,,OLD
DEFJS SOUT,53,MSEC1,,OLD
DEFJS RIN,54,MSEC1,,OLD
DEFJS ROUT,55,MSEC1,,OLD
DEFJS PMAP,56,MSEC1,,OLD
DEFJS RPACS,57,MSEC1,,OLD
DEFJS SPACS,60,MSEC1,,OLD
DEFJS RMAP,61,MSEC1,,OLD
DEFJS SACTF,62,MSEC1,,OLD
DEFJS GTFDB,63,MSEC1,,OLD
DEFJS CHFDB,64,MSEC1,,OLD
DEFJS DUMPI,65,MSEC1,,OLD
DEFJS DUMPO,66,MSEC1,,OLD
DEFJS DELDF,67,MSEC1,,OLD
DEFJS ASND,70,MSEC1,,OLD
DEFJS RELD,71,MSEC1,,OLD
DEFJS CSYNO,72,,NIM,OLD
DEFJS PBIN,73,MSEC1,,OLD
DEFJS PBOUT,74,MSEC1,,OLD
DEFJS PSIN,75,,NIM,OLD
DEFJS PSOUT,76,MSEC1,,OLD
DEFJS MTOPR,77,MSEC1,,OLD
DEFJS CFIBF,100,MSEC1,,OLD
DEFJS CFOBF,101,MSEC1,,OLD
DEFJS SIBE,102,MSEC1,,OLD
DEFJS SOBE,103,MSEC1,,OLD
DEFJS DOBE,104,MSEC1,,OLD
DEFJS GTABS,105,MSEC1,,OLD ;OBSOLETE
DEFJS STABS,106,MSEC1,,OLD ;OBSOLETE
DEFJS RFMOD,107,MSEC1,,OLD
DEFJS SFMOD,110,MSEC1,,OLD
DEFJS RFPOS,111,MSEC1,,OLD
DEFJS RFCOC,112,MSEC1,,OLD
DEFJS SFCOC,113,MSEC1,,OLD
DEFJS STI,114,MSEC1,,OLD
DEFJS DTACH,115,MSEC1,,OLD
DEFJS ATACH,116,MSEC1,,OLD
DEFJS DVCHR,117,MSEC1,,OLD
DEFJS STDEV,120,MSEC1,,OLD
DEFJS DEVST,121,MSEC1,,OLD
DEFJS MOUNT,122,MSEC1,,OLD ;OBSOLETE
DEFJS DSMNT,123,,,OLD ;OBSOLETE
DEFJS INIDR,124,MSEC1,,OLD ;OBSOLETE
DEFJS SIR,125,MSEC1,,OLD
DEFJS EIR,126,MSEC1,,OLD
DEFJS SKPIR,127,MSEC1,,OLD
DEFJS DIR,130,MSEC1,,OLD
DEFJS AIC,131,MSEC1,,OLD
DEFJS IIC,132,MSEC1,,OLD
DEFJS DIC,133,MSEC1,,OLD
DEFJS RCM,134,MSEC1,,OLD
DEFJS RWM,135,MSEC1,,OLD
DEFJS DEBRK,136,MSEC1,,OLD
DEFJS ATI,137,MSEC1,,OLD
DEFJS DTI,140,MSEC1,,OLD
DEFJS CIS,141,MSEC1,,OLD
DEFJS SIRCM,142,MSEC1,,OLD
DEFJS RIRCM,143,MSEC1,,OLD
DEFJS RIR,144,MSEC1,,OLD
DEFJS GDSTS,145,MSEC1,,OLD
DEFJS SDSTS,146,MSEC1,,OLD
DEFJS RESET,147,MSEC1,,OLD
DEFJS RPCAP,150,MSEC1,,OLD
DEFJS EPCAP,151,MSEC1,,OLD
DEFJS CFORK,152,MSEC1,,OLD
DEFJS KFORK,153,MSEC1,,OLD
DEFJS FFORK,154,MSEC1,,OLD
DEFJS RFORK,155,MSEC1,,OLD
DEFJS RFSTS,156,MSEC1,,OLD
DEFJS SFORK,157,MSEC1,,OLD
DEFJS SFACS,160,MSEC1,,OLD
DEFJS RFACS,161,MSEC1,,OLD
DEFJS HFORK,162,MSEC1,,OLD
DEFJS WFORK,163,MSEC1,,OLD
DEFJS GFRKH,164,MSEC1,,OLD
DEFJS RFRKH,165,MSEC1,,OLD
DEFJS GFRKS,166,MSEC1,,OLD
DEFJS DISMS,167,MSEC1,,OLD
DEFJS HALTF,170,MSEC1,,OLD
DEFJS GTRPW,171,MSEC1,,OLD
DEFJS GTRPI,172,MSEC1,,OLD
DEFJS RTIW,173,MSEC1,,OLD
DEFJS STIW,174,MSEC1,,OLD
DEFJS SOBF,175,MSEC1,,OLD
DEFJS RWSET,176,MSEC1,,OLD
DEFJS GETNM,177,MSEC1,,OLD
DEFJS GET,200,MSEC1,,OLD
DEFJS SFRKV,201,MSEC1,,OLD
DEFJS SAVE,202,MSEC1,,OLD
DEFJS SSAVE,203,MSEC1,,OLD
DEFJS SEVEC,204,MSEC1,,OLD
DEFJS GEVEC,205,MSEC1,,OLD
DEFJS GPJFN,206,MSEC1,,OLD
DEFJS SPJFN,207,MSEC1,,OLD
DEFJS SETNM,210,MSEC1,,OLD
DEFJS FFUFP,211,MSEC1,,OLD
DEFJS DIBE,212,MSEC1,,OLD
DEFJS FDFRE,213,,NIM,OLD
DEFJS GDSKC,214,MSEC1,,OLD
DEFJS LITES,215,MSEC1,,OLD ;OBSOLETE
DEFJS TLINK,216,MSEC1,,OLD
DEFJS STPAR,217,MSEC1,,OLD
DEFJS ODTIM,220,MSEC1,,OLD
DEFJS IDTIM,221,MSEC1,,OLD
DEFJS ODCNV,222,MSEC1,,OLD
DEFJS IDCNV,223,MSEC1,,OLD
DEFJS NOUT,224,MSEC1,,OLD
DEFJS NIN,225,MSEC1,,OLD
DEFJS STAD,226,MSEC1,,OLD
DEFJS GTAD,227,MSEC1,,OLD
DEFJS ODTNC,230,MSEC1,,OLD
DEFJS IDTNC,231,MSEC1,,OLD
DEFJS FLIN,232,MSEC1,,OLD
DEFJS FLOUT,233,MSEC1,,OLD
DEFJS DFIN,234,MSEC1,,OLD
DEFJS DFOUT,235,MSEC1,,OLD
DEFJS CRDIR,240,MSEC1,,OLD
DEFJS GTDIR,241,MSEC1,,OLD
DEFJS DSKOP,242,MSEC1,,OLD
DEFJS SPRIW,243,MSEC1,,OLD
DEFJS DSKAS,244,MSEC1,,OLD
DEFJS SJPRI,245,MSEC1,,OLD
DEFJS STO,246,MSEC1,,OLD
DEFJS ARCF,247,MSEC1,,OLD ;ARCHIVE SYSTEM JSYS
DEFJS ASNDP,260,,NIM,OLD
DEFJS RELDP,261,,NIM,OLD
DEFJS ASNDC,262,,NIM,OLD
DEFJS RELDC,263,,NIM,OLD
DEFJS STRDP,264,,NIM,OLD
DEFJS STPDP,265,,NIM,OLD
DEFJS STSDP,266,,NIM,OLD
DEFJS RDSDP,267,,NIM,OLD
DEFJS WATDP,270,,NIM,OLD
DEFJS GTNCP,272,,NIM,OLD ;TOPS20AN, Obsolete
DEFJS GTHST,273,MSEC1,,OLD ;TOPS20AN
DEFJS ATNVT,274,MSEC1,,OLD ;TOPS20AN
DEFJS CVSKT,275,,NIM,OLD ;TOPS20AN, Obsolete
DEFJS CVHST,276,MSEC1,,OLD ;TOPS20AN
DEFJS FLHST,277,,NIM,OLD ;TOPS20AN, Obsolete
DEFJS GCVEC,300,MSEC1,,OLD
DEFJS SCVEC,301,MSEC1,,OLD
DEFJS STTYP,302,MSEC1,,OLD
DEFJS GTTYP,303,MSEC1,,OLD
DEFJS BPT,304,MSEC1,,OLD ;OBSOLETE
DEFJS GTDAL,305,MSEC1,,OLD
DEFJS WAIT,306,MSEC1,,OLD
DEFJS HSYS,307,MSEC1,,OLD
DEFJS USRIO,310,MSEC1,,OLD
DEFJS PEEK,311,MSEC1,,OLD
DEFJS MSFRK,312,MSEC1,,OLD
DEFJS ESOUT,313,MSEC1,,OLD
DEFJS SPLFK,314,MSEC1,,OLD
DEFJS ADVIS,315,,NIM,OLD
DEFJS JOBTM,316,,NIM,OLD
DEFJS DELNF,317,MSEC1,,OLD
DEFJS SWTCH,320,MSEC1,,OLD ;OBSOLETE
DEFJS TFORK,321,MSEC1,,OLD
DEFJS RTFRK,322,MSEC1,,OLD
DEFJS UTFRK,323,MSEC1,,OLD
DEFJS SCTTY,324,MSEC1,,OLD
DEFJS OPRFN,326,,NIM,OLD ;TOPS20AN, Obsolete
DEFJS SETER,336,MSEC1,,OLD
;NEW (NOT IN BBN TENEX) JSYS'S ADDED STARTING AT 500
DEFJS RSCAN,500,MSEC1,,OLD
DEFJS HPTIM,501,MSEC1,,OLD
DEFJS CRLNM,502,MSEC1,,OLD
DEFJS INLNM,503,MSEC1,,OLD
DEFJS LNMST,504,MSEC1,,OLD
DEFJS RDTXT,505,MSEC1,,OLD ;OBSOLETED BY RDTTY AND TEXTI
DEFJS SETSN,506,MSEC1,,OLD
DEFJS GETJI,507,MSEC1,,OLD
DEFJS MSEND,510,MSEC1,,OLD
DEFJS MRECV,511,MSEC1,,OLD
DEFJS MUTIL,512,MSEC1,,OLD
DEFJS ENQ,513,MSEC1,,OLD
DEFJS DEQ,514,MSEC1,,OLD
DEFJS ENQC,515,MSEC1,,OLD
DEFJS SNOOP,516,MSEC1,,OLD
DEFJS SPOOL,517,MSEC1,,OLD
DEFJS ALLOC,520,MSEC1,,OLD
DEFJS CHKAC,521,MSEC1,,OLD
DEFJS TIMER,522,MSEC1,,OLD
DEFJS RDTTY,523,MSEC1,,OLD
DEFJS TEXTI,524,MSEC1,,OLD
DEFJS UFPGS,525,MSEC1,,OLD
DEFJS SFPOS,526,MSEC1,,OLD
DEFJS SYERR,527,MSEC1,,OLD
DEFJS DIAG,530,MSEC1,,OLD
DEFJS SINR,531,MSEC1,,OLD
DEFJS SOUTR,532,MSEC1,,OLD
DEFJS RFTAD,533,MSEC1,,OLD
DEFJS SFTAD,534,MSEC1,,OLD
DEFJS TBDEL,535,MSEC1,,OLD
DEFJS TBADD,536,MSEC1,,OLD
DEFJS TBLUK,537,MSEC1,,OLD
DEFJS STCMP,540,MSEC1,,OLD
DEFJS SETJB,541,MSEC1,,OLD
DEFJS GDVEC,542,MSEC1,,OLD
DEFJS SDVEC,543,MSEC1,,OLD
DEFJS COMND,544,MSEC1,,OLD
DEFJS PRARG,545,MSEC1,,OLD
DEFJS GACCT,546,MSEC1,,OLD
DEFJS LPINI,547,MSEC1,,OLD
DEFJS GFUST,550,MSEC1,,OLD
DEFJS SFUST,551,MSEC1,,OLD
DEFJS ACCES,552,MSEC1,,OLD
DEFJS RCDIR,553,MSEC1,,OLD
DEFJS RCUSR,554,MSEC1,,OLD
DEFJS MSTR,555,MSEC1,,OLD
DEFJS STPPN,556,MSEC1,,OLD
DEFJS PPNST,557,MSEC1,,OLD
DEFJS PMCTL,560,MSEC1,,OLD
DEFJS PLOCK,561,MSEC1,,OLD
DEFJS BOOT,562,MSEC1,,OLD
DEFJS UTEST,563,MSEC1,,OLD
DEFJS USAGE,564,MSEC1,,OLD
DEFJS WILD,565,MSEC1
DEFJS VACCT,566,MSEC1,,OLD
DEFJS NODE,567,MSEC1,,OLD
DEFJS ADBRK,570,MSEC1,,OLD
DEFJS SINM,571,MSEC1
DEFJS SOUTM,572,MSEC1
DEFJS SWTRP,573,MSEC1
DEFJS GETOK,574,MSEC1
DEFJS RCVOK,575,MSEC1
DEFJS GIVOK,576,MSEC1
DEFJS SKED,577,MSEC1 ;SCHEDULER CONTROL JSYS
DEFJS MTU,600,MSEC1 ;MTU JSYS
DEFJS XRIR,601,MSEC1 ;EXTENDED RIR
DEFJS XSIR,602,MSEC1 ;EXTENDED SIR
DEFJS PDVOP,603,MSEC1 ;MANIPULATE PROGRAM DATA VECTORS
DEFJS NTMAN,604,MSEC1 ;DECNET NETWORK MANAGEMENT INTERFACE
DEFJS XSFRK,605,MSEC1 ;START FORK AT GLOBAL PC
DEFJS XGVEC,606,MSEC1 ;GET FULL ENTRY VECTOR
DEFJS XSVEC,607,MSEC1 ;SET FULL ENTRY VECTOR
DEFJS RSMAP,610,MSEC1 ;READ SECTION MAP
DEFJS XRMAP,611,MSEC1 ;EXTENDED RMAP
DEFJS XGTPW,612,MSEC1 ;EXTENDED GET TRAP WORD
DEFJS XSSEV,613,MSEC1 ;EXTENDED SET SPECIAL ENTRY VECTOR
DEFJS XGSEV,614,MSEC1 ;EXTENDED GET SPECIAL ENTRY VECTOR
DEFJS QUEUE,615,MSEC1 ;QUEUE REQUEST TO COMPONENT
DEFJS DYNLB,616,MSEC1 ;DYNamic LiBrary
DEFJS CTSOP,617,MSEC1 ;Canonical Terminal Support OPeration
DEFJS DAP,620,MSEC1 ;~6.0 Data Access Protocol
DEFJS SCS,622,MSEC1 ;SCA user interface JSYS
DEFJS WSMGR,623,MSEC1 ;Working-set manager JSYS
DEFJS LLMOP,624,MSEC1 ;~6.0 Low Level MOP for Ethernet DLL
DEFJS APCON,625,,NIM ;Reserved for FPS array processor support
DEFJS XPEEK,626,MSEC1 ;EXTENDED PEEK
DEFJS CNFIG,627,MSEC1 ;CONFIGURATION INFORMATION
DEFJS NI,630,MSEC1 ;Direct Ethernet Interface
DEFJS LATOP,631,MSEC1 ;~6.0 LAT Operation Display and Control
DEFJS NTINF,632,MSEC1 ;NETWORK INFORMATION JSYS
DEFJS MONRD,717,,NIM ;Reserved for MONRD
DEFJS DBGRD,720,,NIM ;Reserved for MONRD debuging
;TOPS20AN JSYS DEFINITIONS
DEFJS SEND,740,MSEC1 ;TOPS20AN, BBN TCP JSYS Interface
DEFJS RECV,741,MSEC1 ;TOPS20AN, BBN TCP JSYS Interface
DEFJS OPEN,742,MSEC1 ;TOPS20AN, BBN TCP JSYS Interface
DEFJS CLOSE,743,MSEC1 ;TOPS20AN, BBN TCP JSYS Interface
DEFJS SCSLV,744,MSEC1 ;TOPS20AN, BBN TCP JSYS Interface
DEFJS STAT,745,MSEC1 ;TOPS20AN, BBN TCP JSYS Interface
DEFJS CHANL,746,MSEC1 ;TOPS20AN, BBN TCP JSYS Interface
DEFJS ABORT,747,MSEC1 ;TOPS20AN, BBN TCP JSYS Interface
DEFJS SNDIM,750,MSEC1,,OLD ;TOPS20AN, Send IMP Special Queue Message
DEFJS RCVIM,751,MSEC1,,OLD ;TOPS20AN, Receive IMP Special Queue Message
DEFJS ASNSQ,752,MSEC1,,OLD ;TOPS20AN, Assign IMP Special Queue
DEFJS RELSQ,753,MSEC1,,OLD ;TOPS20AN, Release IMP Special Queue
DEFJS SNDIN,754,MSEC1 ;TOPS20AN, Send Internet Message
DEFJS RCVIN,755,MSEC1 ;TOPS20AN, Receive Internet Message
DEFJS ASNIQ,756,MSEC1 ;TOPS20AN, Assign Internet Queue
DEFJS RELIQ,757,MSEC1 ;TOPS20AN, Release Internet Queue
DEFJS IPOPR,760,MSEC1 ;TOPS20AN, IP Functions JSYS
DEFJS TCOPR,761,MSEC1 ;TOPS20AN, TCP Functions JSYS
;TEMPORARY JSYS DEFINITIONS
DEFJS METER,766,MSEC1 ;METER JSYS. FOR KL ONLY
DEFJS SMAP,767,MSEC1 ;CREATE AND MAP SECTIONS
DEFJS THIBR,770,MSEC1,,OLD
DEFJS TWAKE,771,MSEC1,,OLD
DEFJS MRPAC,772,MSEC1,,OLD
DEFJS SETPV,773,,NIM,OLD
DEFJS MTALN,774,MSEC1,,OLD
DEFJS TTMSG,775,MSEC1,,OLD
DEFJS MDDT,777,MSEC1
> ;;; END OF DEFINE JSLIST
;NOW EXPAND THE JSYS DEFINITIONS
JSLIST
;ERROR CONDITION INSTRUCTIONS. THESE ARE NOP'S UNLESS IMMEDIATELY
;FOLLOWING A JSYS WHICH FAILS.
OPDEF ERJMPR [JUMP 12,0] ;JUMP ON ERROR, ALWAYS PUT ERROR CODE IN AC1
OPDEF ERCALR [JUMP 13,0] ;CALL ON ERROR, ALWAYS PUT ERROR CODE IN AC1
OPDEF ERJMPS [JUMP 14,0] ;JUMP ON ERROR, SUPPRESS ERROR CODE IN AC
OPDEF ERCALS [JUMP 15,0] ;CALL ON ERROR, SUPPRESS ERROR CODE IN AC
OPDEF ERJMP [JUMP 16,0] ;JUMP ON ERROR
OPDEF ERCAL [JUMP 17,0] ;CALL ON ERROR (SIMULATE PUSHJ 17,ADR)
IFNDEF FOR,<
IFDEF .PSECT,<
INTERN ERJMP,ERCAL,ERJMPS,ERCALS,ERJMPR,ERCALR
>>
DEFINE GOPDEF (OP,DEF)<
OPDEF OP [DEF]
IFNDEF FOR,<
IFDEF .PSECT,<
INTERN OP>>>
; THE FOLLOWING OPCODES ARE USED TO PERFORM THE EXTENDED
; ADDRESSING FUNCTIONS.
GOPDEF XJRSTF,<JRST 5,0> ;RESTORE FLAGS AND PC
GOPDEF XJEN,<JRST 6,0> ;RESTORE FLAGS,PC AND DISMISS
GOPDEF XPCW,<JRST 7,0> ;EXCHANGE FLAGS AND PC
GOPDEF XSFM,<JRST 14,0> ;SAVE PC FLAGS IN MEMORY
GOPDEF XJRST,<JRST 15,0> ;JUMP TO C(E)
GOPDEF XMOVEI,<SETMI 0,0> ;EXTENDED MOVEI
GOPDEF XHLLI,<HLLI 0,0> ;INSTRUCTION TO PUT IMMEDIATE ADDRESS IN LH
;OTHER VARIANTS OF JRST
GOPDEF PORTAL,<JRST 1,0>
GOPDEF JRSTF,<JRST 2,0>
GOPDEF JEN,<JRST 12,0>
IFIW==:1B0 ;INSTRUCTION FORMAT INDIRECT WORD
EFIW==:0 ;EXTENDED FORMAT INDIRECT WORD
;THE NO-OPERATION INSTRUCTION (MAY CHANGE FROM PROCESSOR TO PROCESSOR)
GOPDEF NOP,<TRN 0,0>
.NODDT NOP
;SPECIAL LOSEG SYMBOLS
.JBHSO==:75 ; 0 ,, HIGHSEG ORIGIN PAGE NUMBER
.JBEDV==:112 ;POINTER TO EXEC DATA VECTOR
.EDCNT==:0 ;'EDV',,COUNT (INCLUDES THIS WORD)
.EDHSB==:1 ;POINTER TO HIDDEN SYMBOL MAP SWITCHING BLOCK
.EDSYM==:2 ;.JBSYM IN SYMBOL SPACE
.EDUSY==:3 ;.JBUSY IN SYMBOL SPACE
.EDHSF==:4 ;POINTER TO SYMBOLS HIDDEN FLAG WORD
.EDSEC==:5 ;SECTION (AS VIRTUAL ADDRESS) OF SYMTABS
;*****************************************
;JSYS SPECIFIC ARGUMENTS
;THE FOLLOWING ARE ORDERED ALPHABETICALLY BY JSYS NAME
;*****************************************
;ACCES - ACCESS A DIRECTORY (E.G., BY CONNECTING)
AC%CON==:1B0 ;CONNECT TO THE SPECIFIED DIRECTORY
AC%OWN==:1B1 ;GAIN OWNERSHIP
AC%REM==:1B2 ;REMOVE OWNERSHIP
AC%PWD==:1B3 ;CHECK PASSWORD
;OFFSETS IN ARGUMENT BLOCK
.ACDIR==:0 ;DIRECTORY DESIGNATOR
.ACPSW==:1 ;POINTER TO PASSWORD STRING
.ACJOB==:2 ;JOB NUMBER (-1 FOR SELF)
;ADBRK - Address break JSYS function codes and bits
;FUNCTION CODES
.ABSET==:0 ;SET USER ADDRESS BREAK
.ABRED==:1 ;READ USER ADDRESS BREAK
.ABCLR==:2 ;CLEAR USER ADDRESS BREAK
.ABGAD==:3 ;GET ADDRESS OF TRAPPED INSTRUCTION
.ABSRG==:4 ;SET ADDRESS BREAK RANGE
.ABRRG==:5 ;READ ADDRESS BREAK RANGE
.ABGBR==:6 ;GET ADDRESS BREAK DATA
;FUNCTION BITS FOR FUNCTION .ABSET
AB%RED==:1B0 ;READ
AB%WRT==:1B1 ;WRITE
AB%XCT==:1B2 ;EXECUTE
AB%SEC==:1B3 ;BREAK ON THIS OFFSET IN ANY SECTION (KC ONLY)
;Offsets in argument blocks
.ABHDR==:0 ;HEADER (COUNT)
.ABLOB==:1 ;LOWER BOUND ADDRESS
.ABUPB==:2 ;UPPER BOUND ADDRESS
.ABFLG==:3 ;FLAGS
.ABBPC==:1 ;PC WHERE BREAK OCCURRED
.ABBAD==:2 ;ADDRESS WHERE BREAK OCCURRED
;ALLOC JSYS FUNCTION CODES
.ALCAL==:0 ;ALLOCATE A DEVICE
; ARCF
.ARRAR==:0 ; Request file archive (user)
.ARCLR==:0 ; Clear the request
.ARSET==:1 ; Set the request
; AR%NDL can be specified in AC2, defined elsewhere
.ARRIV==:1 ; Request file migration (system)
.AREXM==:2 ; File exempt from migration (system)
.ARRFR==:3 ; Request file's contents be restored to disk
AR%NMS==:1B0 ; Request no msg on restoration
AR%WAT==:1B1 ; Wait for file to be restored to disk
.ARDIS==:4 ; Clear archive status for file
AR%CR1==:1B0 ; Clear 1st run info
AR%CR2==:1B1 ; Clear 2nd run info
.ARSST==:5 ; Set archive status for file
.AROFL==:0 ; Flags
AR%O1==:1B0 ; Set run 1 info
AR%O2==:1B1 ; Set run 2 info
AR%OFL==:1B2 ; Flush contents of file
AR%ARC==:1B3 ; Set FB%ARC (archive the file)
AR%CRQ==:1B4 ; Clear archive/migration request
.ARTP1==:1 ; Tape 1 ID
.ARSF1==:2 ; XWD TSN 1, TFN 1
AR%TSN==:777777B17 ; Tape saveset number
AR%TFN==:777777B35 ; Tape file number
.ARTP2==:3 ; Tape 2 ID
.ARSF2==:4 ; XWD TSN 2, TFN 2
;;; AR%TSN==:777777B17 ; Tape saveset number
;;; AR%TFN==:777777B35 ; Tape file number
.ARODT==:5 ; Date and time
.ARPSZ==:6 ; Number of pages in the file (.ARGST only)
.ARRST==:6 ; Restore contents to archived file
.ARGST==:7 ; Get tape info for file (blk as for ARSST)
.ARRFL==:10 ; Retrieve failed
.ARNAR==:11 ; Set/clear resist archive
; Function & reason codes for IPCF msgs
.RETM==:0 ; Send retrieve message
.RETR==:0 ; Normal retrieve
.RETRW==:1 ; User waiting for retrieve
.NOTM==:1 ; Send notification message
.FLXP==:0 ; Archive file expunged
.ACLR==:1 ; Archive status cleared
;ASNIQ - IP assign queue (requires NET WIZ capability, SC%NWZ)
;AC1 - LH flags, Queue descriptor block address
AQ%SCR==1B0 ; Use RPI device (secure)
AQ%SPT==1B1 ; Single port protocol
AQ%ICM==1B2 ; Permit send/receive of ICMP messages
.INTVR==4 ; Internet protocol version number
; Queue descriptor block format
.IQPRV==^D0 ; Internet protocol value (bits 24-31)
.IQFHV==^D1 ; Internet foreign host value (bits 0-31)
.IQSHV==^D2 ; Internet source host value (bits 0-31)
.IQPTV==^D3 ; Internet port value, local bits 0-15, foreign bits 16-31
.IQPRM==^D4 ; Mask for protocol value (bits 24-31)
.IQFHM==^D5 ; Mask for foreign host value (bits 0-31)
.IQSHM==^D6 ; Mask for source host value (bits 0-31)
.IQPTM==^D7 ; Mask for port value, local bits 0-15, foreign bits 16-31
; Note: port(s) follow IP header if .IQPTM is non-zero
; Note: If AS%SPT is specified, the (single) port is
.IQLEN==^D8 ; in bits 0-15 (bits 16-31 should be zero)
; Internet Message Header Structures
.IPKVR==0 ; Word with version, type of service, etc
.IPKSG==1 ; Word with segmentation info
.IPKPR==2 ; Word with time to live, checksum, protocol
.IPKSH==3 ; Word with source host
.IPKDH==4 ; Word with destination host
DEFINE DEFIP.<
DEFSTR(PIVER,.IPKVR,3,4) ; PACKET.INTERNET.VERSION
DEFSTR(PIDO,.IPKVR,7,4) ; PACKET.INTERNET.DATA-OFFSET
DEFSTR(PITOS,.IPKVR,15,8) ; PACKET.INTERNET.TYPE-OF-SERVICE
DEFSTR(PIPRC,.IPKVR,10,3) ; PACKET.IP.PRECEDENCE
DEFSTR(PILDY,.IPKVR,11,1) ; PACKET.IP.LOW-DELAY
DEFSTR(PIHTR,.IPKVR,12,1) ; PACKET.IP.HIGH-THROUGHPUT
DEFSTR(PIHRL,.IPKVR,13,1) ; PACKET.IP.HIGH-RELIABILITY
DEFSTR(PIPL,.IPKVR,31,16) ; PACKET.INTERNET.PACKET-LENGTH
DEFSTR(PISID,.IPKSG,15,16) ; PACKET.INTERNET.SEGMENT-ID
DEFSTR(PIFLG,.IPKSG,18,3) ; PACKET.INTERNET.FLAGS
DEFSTR(PIDF,.IPKSG,17,1) ; PACKET.INTERNET.DONT-FRAGMENT
DEFSTR(PIMF,.IPKSG,18,1) ; PACKET.INTERNET.MULTIFRAGMENT
DEFSTR(PIFO,.IPKSG,31,13) ; PACKET.INTERNET.FRAGMENT-OFFSET
DEFSTR(PITTL,.IPKPR,7,8) ; PACKET.INTERNET.TIME-TO-LIVE
DEFSTR(PIPRO,.IPKPR,15,8) ; PACKET.INTERNET.PROTOCOL
DEFSTR(PICKS,.IPKPR,31,16) ; PACKET.INTERNET.HEADER-CHECKSUM
DEFSTR(PISH,.IPKSH,31,32) ; PACKET.INTERNET.SOURCE-HOST
DEFSTR(PIDH,.IPKDH,31,32) ; PACKET.INTERNET.DESTINATION-HOST
> ; END OF DEFINE DEFIP.
;ATNVT ;TOPS20AN
AN%TCP==:1B0 ;TOPS20AN ; RH of 1 contains TCP JCN instead
; of JFN; Implies AN%NTP
AN%NTP==:1B2 ;TOPS20AN ;NEW TELNET PROTOCOL
;ATACH
AT%CCJ==:1B0 ;^C JOB WHEN ATTACHED
AT%NAT==:1B1 ;NO ATTACH
AT%TRM==:1B2 ;ATTACH JOB TO TERMINAL IN REGISTER 4
AT%JOB==:777777B35 ;JOB NUMBER
;BOOT
.BTROM==:0 ;ACTIVATE ROM BOOT
.BTDTE==:0 ;DTE-20 NUMBER
.BTLDS==:1 ;LOAD SECONDARY BOOTSTRAP PROGRAM
.BTERR==:1 ;ERROR FLAGS
.BTSEC==:2 ;ADDRESS OF SECONDARY BOOTSTRAP PROGRAM
.BTLOD==:2 ;LOAD MEMORY (OBSOLETE)
.BTSMP==:2 ;SEND MOP MESSAGE
.BTFLG==:3 ;FLAGS
BT%BEL==:1B0 ;SEND TO -11 DOORBELL AFTER SETUP
.BTCNT==:4 ;NUMBER OF BYTES TO BE TRANSFERRED
.BTLPT==:5 ;BYTE POINTER TO DATA TO BE LOADED
.BTDMP==:3 ;DUMP MEMORY
.BTDPT==:5 ;BYTE POINTER TO DESTINATION OF DUMPED DATA
.BTIPR==:4 ;INITIALIZE COMMUNICATIONS PROTOCOL
.BTPRV==:1 ;PROTOCOL VERSION NUMBER
.BTTPR==:5 ;TERMINATE COMMUNICATIONS PROTOCOL
.BTSTS==:6 ;RETURN PROTOCOL STATUS
.BTCOD==:1 ;STATUS CODE
.BTBEL==:7 ;WAIT FOR DOORBELL
.BTRMP==:10 ;READ MOP MESSAGE
.BTMPT==:5 ;POINTER TO DESTINATION FOR MOP MESSAGE
.BTKML==:11 ;LOAD KMC11
.BTKMC==:0 ;KMC11 ADDRESS
.BTKER==:1 ;ERROR FLAGS
BT%CVE==:1B0 ;CRAM VERIFY ERROR (RH IS BAD DATA)
BT%DVE==:1B1 ;DRAM VERIFY ERROR (RH IS BAD DATA)
BT%RVE==:1B2 ;REG VERIFY ERROR (RH IS BAD DATA)
.BTKCC==:2 ;COUNT OF CRAM DATA
.BTKCP==:3 ;POINTER TO CRAM DATA (16 BIT DATA)
.BTKDC==:4 ;COUNT OF DRAM DATA
.BTKDP==:5 ;POINTER TO DRAM DATA (8 BIT DATA)
.BTKRC==:6 ;COUNT OF REGISTER DATA
.BTKRP==:7 ;POINTER TO REGISTER DATA (16 BIT DATA)
.BTKSA==:10 ;RH IS STARTING ADDRESS
BT%KSA==:1B0 ;IS SET RH WANT TO START KMC11
.BTKMD==:12 ;DUMP KMC11
.BTRLC==:13 ;RETURN LINE COUNTERS
.BTPRT==:0 ;PORT NUMBER
BT%ZRO==:1B0 ;CLEAR COUNTERS AFTER READING
.BTZTM==:1 ;TIME SINCE COUNTERS HAVE BEEN ZEROED
.BTSCC==:2 ;STATUS COUNT COUNT
.BTSCP==:3 ;STATUS COUNT POINTER
.BTRCC==:4 ;RECEIVE COUNT COUNT
.BTRCP==:5 ;RECEIVE COUNT POINTER
.BTTCC==:6 ;TRANSMIT COUNT COUNT
.BTTCP==:7 ;TRANSMIT COUNT POINTER
.BTCLI==:14 ;CONVERT LINEID TO PORT NUMBER
.BTLID==:1 ;POINTER TO ASCIZ LINE-ID
.BTCPN==:15 ;CONVERT PORT NUMBER TO LINE-ID
.BTD60==:16 ;DN60 PROTOCOL OPERATION
DEFSTR (BT6DTE,0,35,36) ;DTE number
.BT6DTE==:0
DEFSTR (BT6ERR,1,35,36) ;returned error flags
.BT6ERR==:1
;protocol flags
D6%BSY==:1B0 ;port is busy - sign bitness is used in testing
D6%QHD==:1B1 ;header has been queued
D6%HDD==:1B2 ;to -11 done for header seen
D6%NDT==:1B3 ;this is a no-data-transfer operation
D6%RED==:1B4 ;this is a read data type operation
D6%QDT==:1B5 ;data has been queued(for write fcn)
D6%DTD==:1B6 ;to -11 done for write data seen
D6%RBL==:1B7 ;to -10 doorbell for response header seen
D6%RDN==:1B8 ;to -10 done for response header seen
D6%DBL==:1B9 ;to -10 doorbell for read data seen
D6%DDN==:1B10 ;to -10 done for read data seen
D6%FDN==:1B11 ;to -10 done for read data was faked
;error flags
D6%BDP==:1B30 ;bad data byte ptr
D6%ARD==:1B31 ;11 attempted to send read data when
; when none was expected
D6%TRS==:1B32 ;timed out waiting for response header
D6%TDT==:1B33 ;timed out waiting for read data
D6%TPO==:1B34 ;timed out waiting for port to be free
D6%NT6==:1B35 ;not a DN60 front end
DEFSTR (BT6HBC,2,17,18) ;DN60 header byte count
.BT6HBC==:2
DEFSTR (BT6HDR,2,35,18) ;DN60 header address(begins on word)
.BT6HDR==:2
DEFSTR (BT6DBC,3,35,36) ;data byte count
.BT6DBC==:3
; positive = write data mode
; zero = no data transfer
; negative = read data mode
DEFSTR (BT6PTR,4,35,36) ;data byte ptr
.BT6PTR==:4
;the following are returned for timing analysis
DEFSTR (BT6TMR,5,35,36) ;time of request
.BT6TMR==:5
DEFSTR (BT6TAS,6,35,36) ;TIME DTE ASSIGNED
.BT6TAS==:6
DEFSTR (BT6THQ,7,35,36) ;time header queued to 11
.BT6THQ==:7
DEFSTR (BT6TRD,10,35,36) ;time of -10 done for response header
.BT6TRD==:10
DEFSTR (BT6TDD,11,35,36) ;time of -10 done for data
.BT6TDD==:11
DEFSTR (BT6TFR,12,35,36) ;time finished request
.BT6TFR==:12
.BTSTA==:16 ;SET STATION POLLING STATUS
.BTSSP==:17 ;SET LINE STARTUP PRIORITY
.BTPRI==:1 ;PRIORITY VALUE
.BTSTP==:20 ;SET STATION POLLING PRIORITY
.BTSDD==:21 ;SEND DDCMP MESSAGE
.BTMSG==:1 ;ADDR OF MESSAGE
.BTLEN==:2 ;BYTE COUNT OF MESSAGE
.BTRDD==:22 ;RECEIVE A MESSAGE FROM DDCMP
.BTSUP==:1 ;STATION CAME UP
.BTSDW==:2 ;STATION WENT DOWN
.BTCMP==:3 ;XMIT COMPLETE
.BTSSF==:4 ;STARTUP FAILED
BT%CTL==:1B0 ;CONTROL MESSAGE
.BTCHN==:23 ;ASSIGN A SOFTWARE INTERRUPT CHANNEL
.BTESI==:1 ;CHANNEL NUMBER
;CFORK
CR%MAP==:1B0 ;SET MAP FOR NEW FORK TO POINT TO
; THIS PROCESS
CR%CAP==:1B1 ;MAKE CAPABILITIES IDENTICAL
CR%ACS==:1B3 ;SET ACS FROM BLOCK
CR%ST==:1B4 ;START PROCESS AT PC
CR%PCV==:777777B35 ;VALUE OF PC
;CHFDB
CF%NUD==:1B0 ;NO UPDATE DIRECTORY
CF%DSP==:777B17 ;FDB DISPLACEMENT
CF%JFN==:777777B35 ;JFN
;CHKAC JSYS DEFINITIONS
;CHKAC FLAG DEFINITIONS
CK%JFN==:1B0 ;JFN IS GIVEN AS AN ARGUMENT
;CHKAC ARGUMENT BLOCK OFFSET VALUES
.CKAAC==:0 ;ACCESS CODE
.CKALD==:1 ;LOGGED IN USER NUMBER OF USER
.CKACD==:2 ;CONNECTED DIR NUMBER OF USER
.CKAEC==:3 ;ENABLED CAPABILITIES OF USER BEING CHK'D
.CKAUD==:4 ;DIR NUMBER OF DIRECTORY CONTAINING FILE
.CKAPR==:5 ;PROTECTION OF FILE
;CHKAC ACCESS CODES
.CKARD==:0 ;READ AN EXISTING FILE
.CKAWT==:1 ;WRITE AN EXISTING FILE
.CKAWR==:1 ; (ANOTHER NAME FOR ABOVE)
.CKAEX==:2 ;EXECUTE AN EXISTING FILE
.CKAAP==:3 ;APPEND TO AN EXISTING FILE
.CKADL==:4 ;GET DIR LISTING OF AN EXISTING FILE
.CKADR==:6 ;READ THE DIRECTORY
.CKAOF==:7 ;OPEN FILES IN DIR (NOT IMPLEMENTED)
.CKACN==:10 ;CONNECT TO A DIR
.CKACF==:11 ;CREATE FILES IN DIR
;CLOSF
CO%NRJ==:1B0 ;NO RELEASE JFN
CO%WCL==:1B1 ;TOPS20AN ;WAIT UNTIL MATCHING CLS IS RECEIVED
CO%JFN==:777777B35 ;JFN
;CLZFF
CZ%NIF==:1B0 ;NO INFERIOR FORK FILES
CZ%NSF==:1B1 ;NO SELF FORK FILES
CZ%NRJ==:1B2 ;NO RELEASE JFN
CZ%NCL==:1B3 ;NO CLOSE FILE
CZ%UNR==:1B4 ;UNRESTRICT
CZ%ARJ==:1B5 ;ALWAYS RELEASE JFN
CZ%ABT==:1B6 ;ABORT
CZ%NUD==:1B7 ;NO UPDATE DIRECTORY
CZ%PRH==:777777B35 ;PROCESS HANDLE
;CNDIR
CN%CKP==:1B0 ;CHECK PASSWORD ONLY
CN%NOC==:1B1 ;NO CONNECT
CN%JOB==:1B2 ;DOING CONNECT FOR ANOTHER JOB
CN%DIR==:777777B35 ;DIRECTORY NUMBER
;CNFIG%
.CFGKL==:4 ;Processor ID for KL.
.CFINF==:0 ;Return hardware and software information
.CFLEN==:0 ;Base word of every argument block
MSKSTR (CF%WDP,<>,<-1,,0>) ;Words processed mask
MSKSTR (CF%LOB,<>,<0,,-1>) ;Length of block
.CFIPR==:1 ;type of processor
.CFISE==:2 ;serial number of processor
.CFIUC==:3 ;CPU microcode version number
.CFIHO==:4 ;CPU hardware options
CF%50Z==:1B0 ;line power is 50 hertz
CF%CHI==:1B1 ;cache is installed
CF%CHN==:1B2 ;channel bit in APRID
CF%EKL==:1B3 ;this is an extended KL
CF%MOS==:1B4 ;system has a master oscillator
CF%MCA==:1B5 ;system has MCA25 Pager cache
CF%CH1==:1B6 ;cache control bit 1
CF%CH2==:1B7 ;cache control bit 2
CF%CI==:1B8 ;system has a CI
.CFIMO==:5 ;CPU microcode options
CF%T20==:1B0 ;TOPS-20 paging implemented
CF%EAD==:1B1 ;microcode handles extended addressing
CF%UCO==1B2 ;non-standard microcode loaded
.CFISO==:6 ;TOPS-20 static software options
CF%CFS==:1B0 ;CFS capability installed
CF%DCN==:1B1 ;DECNET capability installed
CF%ARP==:1B2 ;ARPANET capability installed
.CFIVR==:7 ;TOPS-20 operating system version
.CFILN==:8 ;Maximum length of block
.CFCIN==:1 ;Return CFS information
.CFNCN==:1 ;The number of CFS nodes up
.CFCDO==:2 ;CFS dynamic options
CF%CFR==:1B0 ;CFS connected to another host at least once
.CFCLN==:3 ;Maximum length of block
.CFCSE==:2 ;Return serial numbers of CFS nodes
.CFCS1==:1 ;CI node number,,serial number of first host
MSKSTR (CF%CIN,<>,<17,,0>) ;CI node number
MSKSTR (CF%HSN,<>,<0,,-1>) ;host serial number
.CFCND==:3 ;Return node names of CFS hosts
.CFNND==:0 ;Number of nodes returned,,length of block
MSKSTR (CF%NND,<>,<-1,,0>) ;Number of nodes returned
.CFBP1==:1 ;Byte pointer to ASCIZ node name of first host
.CFHSC==:4 ;Return node names of HSC hosts
.CFNHN==:0 ;Number of nodes returned,,length of block
MSKSTR (CF%NHN,<>,<-1,,0>) ;Number of nodes returned
.CFHP1==:1 ;Byte pointer to ASCIZ node name of first host
;COMND
;COMND - COMMAND STATE BLOCK
.CMFLG==:0 ;USER FLAGS,,REPARSE DISPATCH ADDRESS
.CMIOJ==:1 ;INJFN,,OUTJFN
.CMRTY==:2 ;^R BUFFER POINTER
.CMBFP==:3 ;PTR TO TOP OF BUFFER
.CMPTR==:4 ;PTR TO NEXT INPUT TO BE PARSED
.CMCNT==:5 ;COUNT OF SPACE LEFT IN BUFFER AFTER PTR
.CMINC==:6 ;COUNT OF CHARACTERS FOLLOWING PTR
.CMABP==:7 ;ATOM BUFFER POINTER
.CMABC==:10 ;ATOM BUFFER SIZE
.CMGJB==:11 ;ADR OF GTJFN ARG BLOCK
CM%GJB==:777777 ;ADR OF GTJFN ARG BLOCK
;COMND - FUNCTION DESCRIPTOR BLOCK
.CMFNP==:0 ;FUNCTION AND POINTER
CM%FNC==:777B8 ;FUNCTION CODE
CM%FFL==:777B17 ;FUNCTION-SPECIFIC FLAGS
CM%LST==:777777 ;LIST POINTER TO OTHER BLOCKS
.CMDAT==:1 ;DATA FOR FUNCTION
.CMHLP==:2 ;HELP TEXT POINTER
.CMDEF==:3 ;DEFAULT STRING POINTER
.CMBRK==:4 ;FIELD BREAK MASK POINTER
;COMND - FLAGS IN .CMFLG
CM%ESC==:1B0 ;ESC SEEN
CM%NOP==:1B1 ;NO PARSE
CM%EOC==:1B2 ;END OF COMMAND SEEN
CM%RPT==:1B3 ;REPEAT PARSE NEEDED
CM%SWT==:1B4 ;SWITCH TERMINATED WITH ":"
CM%PFE==:1B5 ;PREVIOUS FIELD ENDED WITH ESC
CM%RAI==:1B6 ;RAISE INPUT
CM%XIF==:1B7 ;EXCLUDE INDIRECT FILES
CM%WKF==:1B8 ;WAKEUP AFTER EACH FIELD
;FUNCTION BLOCK FLAGS (IN WORD .CMFNP)
CM%NOC==:1B11 ;SEMI COLON DOES NOT CAUSE COMMENT
CM%NSF==:1B12 ;SUFFIX MAY BE OMITTED IF DESIRED
CM%BRK==:1B13 ;BREAK MASK PRESENT
CM%PO==:1B14 ;PARSE-ONLY
CM%HPP==:1B15 ;HELP POINTER PRESENT
CM%DPP==:1B16 ;DEFAULT POINTER PRESENT
CM%SDH==:1B17 ;SUPPRESS DEFAULT HELP MESSAGE
;FLAGS FOR CMDIR FUNCTION
CM%DWC==:1B0 ;DIRECTORY WILD CARDING ALLOWED
;FLAGS FOR CMTAD FUNCTION
CM%IDA==:1B0 ;INPUT DATE
CM%ITM==:1B1 ;INPUT TIME
CM%NCI==:1B2 ;NO CONVERT TO INTERNAL
;FLAGS IN KEYWORD TABLE (FIRST WORD OF STRING IF B0-6 = 0)
CM%INV==:1B35 ;INVISIBLE
CM%NOR==:1B34 ;NO-RECOGNIZE (PLACEHOLDER)
CM%ABR==:1B33 ;ABBREVIATION FOR ANOTHER ENTRY
CM%FW==:1B7 ;FLAG WORD (MUST ALWAYS BE ON)
;COMND - FUNCTION CODES
.CMKEY==:0 ;KEYWORD
.CMNUM==:1 ;NUMBER
.CMNOI==:2 ;NOISE WORD
.CMSWI==:3 ;SWITCH
.CMIFI==:4 ;INPUT FILE
.CMOFI==:5 ;OUTPUT FILE
.CMFIL==:6 ;GENERAL FILESPEC
.CMFLD==:7 ;ARBITRARY FIELD
.CMCFM==:10 ;CONFIRM
.CMDIR==:11 ;DIRECTORY NAME
.CMUSR==:12 ;USER NAME
.CMCMA==:13 ;COMMA
.CMINI==:14 ;INIT LINE
.CMFLT==:15 ;FLOATING POINT NUMBER
.CMDEV==:16 ;DEVICE NAME
.CMTXT==:17 ;TEXT TO ACTION CHAR
.CMTAD==:20 ;TIME AND DATE
.CMQST==:21 ;QUOTED STRING
.CMUQS==:22 ;UNQUOTED STRING
.CMTOK==:23 ;TOKEN
.CMNUX==:24 ;NUMBER DELIMITED BY NON-DIGIT
.CMACT==:25 ;ACCOUNT
.CMNOD==:26 ;NODE NAME
;DEFINE BREAK MASKS
BRINI. ;INITIALIZE BREAK MASK FOR STANDARD FIELD
BRKCH. (0,37) ;ALL CONTROL CHARACTERS
BRKCH. (40,54) ;SPACE THROUGH COMMA
BRKCH. (56,57) ;DOT AND SLASH
BRKCH. (72,77) ;COLON THROUGH QUESTION MARK
BRKCH. (100) ;ATSIGN
BRKCH. (133,140) ;OPEN BRACKET THROUGH ACCENT GRAVE
BRKCH. (173,177) ;CLOSE BRACKET THROUGH TILDE
FLDB0.==W0. ;STANDARD FIELD BREAK MASK
FLDB1.==W1.
FLDB2.==W2.
FLDB3.==W3.
;KEYWORD BREAK SET. SAME AS STANDARD FIELD FOR NOW
KEYB0.==FLDB0.
KEYB1.==FLDB1.
KEYB2.==FLDB2.
KEYB3.==FLDB3.
;USERNAME BREAK SET. BREAKS ON EVERYTHING EXCEPT DOT AND ALPHABETICS.
UNBRK. "." ;MODIFY FIELD BREAK SET INTO USER BREAK SET. DON'T BREAK ON DOT
UNBRK. "%" ;DON'T BREAK ON PERCENT
UNBRK. "*" ;STAR
UNBRK. "$" ;ALLOW DOLLARSIGN! (I NEVER KNEW THAT BEFORE)
UNBRK. "_" ;ALLOW UNDERSCORE IN ATOM
;**;[7412] Add 1 line at USRB0.-2L MDR 22-JAN-87
UNBRK. "V"-100 ;[7412] ^V is a no-no in user name
USRB0.==W0.
USRB1.==W1.
USRB2.==W2.
USRB3.==W3.
;ACCOUNT MASK CURRENTLY THE SAME AS USER MASK (+ ^V)
;**;[7412] Add 1 line at ACTB0.-2L MDR 22-JAN-87
BRKCH. "V"-100 ;But include ^V this time
;**;[7412] Change 4 lines at ACTB0. MDR 22-JAN-87
ACTB0.==W0. ;[7412]
ACTB1.==W1. ;[7412]
ACTB2.==W2. ;[7412]
ACTB3.==W3. ;[7412]
;FILESPEC FIELD - FILESPEC PUNCTUATION CHARACTERS
;ARE LEGAL ( :, <, >, ., ;)
UNBRK. ":" ;MODIFY USERNAME BREAK SET INTO FILE BREAK SET. DON'T BREAK ON THESE
UNBRK. "<"
UNBRK. ">"
UNBRK. "["
UNBRK. "]"
UNBRK. ";"
FILB0.==W0.
FILB1.==W1.
FILB2.==W2.
FILB3.==W3.
;**;[7412] Add DIRBx. MDR 22-JAN-87
;DIRECTORY FIELD - DIRECTORY PUNCTUATION CHARACTERS
UNBRK. "V"-100 ;[7412] Don't allow ^V
;**;[7412] Add 4 lines at DIRB0. MDR 22-JAN-87
DIRB0.==W0. ;[7412]
DIRB1.==W1. ;[7412]
DIRB2.==W2. ;[7412]
DIRB3.==W3. ;[7412]
;READ DEVICE NAME
BRINI. FLDB0.,FLDB1.,FLDB2.,FLDB3. ;VERY SIMILAR TO STANDARD FIELD
UNBRK. "$" ;ALLOW DOLLARSIGN IN DEVICE NAME (LIKE FILESPEC)
UNBRK. "_" ;UNDERSCORE TOO
DEVB0.==W0.
DEVB1.==W1.
DEVB2.==W2.
DEVB3.==W3.
;READ TO END OF LINE
BRINI. ;INITIALIZE END OF LINE BREAK SET
BRKCH. .CHLFD ;BREAK ON LINEFEED
BRKCH. .CHCRT ;AND CARRIAGE RETURN
BRKCH. .CHFFD ;FORMFEED IS VALID END-OF-LINE
PURGE .CHLFD,.CHCRT,.CHFFD ;DEFINED IN MACSYM
EOLB0.==W0.
EOLB1.==W1.
EOLB2.==W2.
EOLB3.==W3.
;CRDIR
CD%LEN==:1B0 ;FLAGS ,, LENGTH OF CRDIR BLOCK
CD%PSW==:1B1 ;SET PASSWORD STRING
CD%LIQ==:1B2 ;SET LOGGED IN QUOTA
CD%PRV==:1B3 ;SET PRIVILEGES
CD%MOD==:1B4 ;SET MODE BITS
CD%LOQ==:1B5 ;SET LOGGED OUT QUOTA
CD%NUM==:1B6 ;SET DIRECTORY NUMBER FROM PARAM BLK
CD%FPT==:1B7 ;SET DEFAULT FILE PROTECTION
CD%DPT==:1B8 ;SET DIRECTORY PROTECTION
CD%RET==:1B9 ;SET DEFAULT RETENTION COUNT
CD%LLD==:1B10 ;SET LAST LOGIN DATE
CD%UGP==:1B11 ;SET USER GROUPS
CD%DGP==:1B12 ;SET DIRECTORY GROUPS
CD%SDQ==:1B13 ;SET SUBDIRECTORY QUOTA
CD%CUG==:1B14 ;SET CREATABLE USER GROUPS
CD%DAC==:1B15 ;SET DEFAULT ACCOUNT
CD%PPN==:1B16 ;SET PROJECT-PROGRAMMER NUMBER
CD%DEL==:1B17 ;DELETE DIRECTORY
CD%APB==:777777B35 ;ADDRESS OF PARAMETER BLOCK
.CDLEN==:0 ;LENGTH OF ARGUMENT BLOCK
CD%NSQ==:1B0 ;DO NOT UPDATE QUOTAS OF SUPERIOR DIR
CD%NCE==:1B1 ;DO NOT CHANGE PARAMETERS OF EXISTING DIRS
CD%NED==:1B2 ; Set def online exp from .CDDNE
CD%FED==:1B3 ; Set def offline exp from .CDDFE
CD%RNA==:1B4 ;~6.0 set remote alias list from @.CDDRN
CD%PEN==:1B5 ; Set password encryption version from .CDPEV
; And encryption date from .CDPDT
CD%PED==:1B6 ; Set password expiration date from .CDPED
CD%PMU==:1B7 ; Set max password use count from .CDPMU
.CDPSW==:1 ;POINTER TO PASSWORD STRING
.CDLIQ==:2 ;LOGGED IN QUOTA
.CDPRV==:3 ;PRIVILEGE WORD
.CDMOD==:4 ;MODE WORD
CD%DIR==:1B0 ;DIRECTORY NAME FOR CNDIR ONLY (FILES ONLY)
CD%ANA==:1B1 ;ALPHANUMERIC ACCOUNTS
CD%RLM==:1B2 ;REPEAT LOGIN MESSAGES
CD%DAR==:1B7 ; Archived online expired files
.CDLOQ==:5 ;LOGGED OUT QUOTA
.CDNUM==:6 ;DIRECTORY NUMBER
.CDFPT==:7 ;DEFAULT FILE PROTECTION
.CDDPT==:10 ;DIRECTORY PROTECTION
.CDRET==:11 ;DEFAULT RETENTION COUNT
.CDLLD==:12 ;LAST LOGIN DATE
.CDUGP==:13 ;USER GROUPS
.CDDGP==:14 ;DIRECTORY GROUPS
.CDSDQ==:15 ;MAXIMUM NUMBER OF SUBDIRECTORIES
.CDCUG==:16 ;POINTER TO CREATABLE USER GROUP LIST
.CDDAC==:17 ;POINTER TO DEFAULT ACCOUNT
.CDDNE==:20 ; Default online expiration
.CDDFE==:21 ; Default offline expiration
.CDDRN==:22 ;~6.0 Pointer to remote alias list
;(More)
CRDMAX==:100 ;~6.0 Maximum length of remote alias list
;offsets in remote alias list entry
.CDSIZ==:0 ;~6.0 flags,,length
;flags for this list entry - NOTE - only CD%PAS & CD%ACC are compatible
CD%NEW==:1B0 ;~6.0 this is a new alias
CD%KIL==:1B1 ;~6.0 delete the remote alias with this node
CD%PAS==:1B2 ;~6.0 change password for an existing remote alias
CD%ACC==:1B3 ;~6.0 change account for an existing remote alias
.CDNXT==:1 ;~6.0 next entry in list (0 if end of list)
.CDNOD==:2 ;~6.0 node byte pointer (ASCIZ)
.CDUSR==:3 ;~6.0 user byte pointer (ASCIZ)
.CDPAS==:4 ;~6.0 password byte pointer (ASCIZ)
.CDACC==:5 ;~6.0 account byte pointer (ASCIZ)
;offsets in user free space block
.CDRLN==:0 ;~6.0 used words,,size of free space
.CDLST==:1 ;~6.0 the first list entry
.CDPEV==:23 ;Password encryption version
.CDPDT==:24 ;Password encryption date
.CDPED==:25 ;Expiration date of password
.CDPMU==:26 ;Maximum use count of password
.CDPPN==:27 ;TOPS-10 PPN (for compatability)
;CRJOB
CJ%LOG==:1B0 ;ATTEMPT TO LOG IN THE NEW JOB
CJ%NAM==:1B1 ;USE NAME AND PSWD IN ARG BLK
CJ%ACT==:3B3 ;WHERE TO GET ACCOUNT
.CJUCA==:0 ;USE CURRENT ACCT OF CREATOR
.CJUAA==:1 ;USE ACCOUNT IN ARG BLOCK
.CJUDA==:2 ;USE DEFAULT ACCOUNT OF NEW USER
CJ%ETF==:1B4 ;PUT EXEC IN TOP FORK
CJ%FIL==:1B5 ;GET FILE IN ARG BLOCK
CJ%ACS==:1B6 ;LOAD THE ACS FROM ARG BLOCK
CJ%OWN==:1B7 ;RETAIN OWNERSHIP OF NEW JOB
CJ%WTA==:1B8 ;NEW JOB WAITS TIL ATTACHED
CJ%NPW==:1B9 ;NO PASSWORD CHECK AT LOGIN TIME
CJ%NUD==:1B10 ;NO UPDATE OF LAST-LOGIN DATE
CJ%SPJ==:1B11 ;DO SPJFN IN NEW JOB FROM ARG BLK
CJ%CAP==:1B12 ;PASS ENABLED CAPABILITIES AS ALLOWED
CJ%CAM==:1B13 ;CAPABILITY MASK AT LOGIN
CJ%SLO==:1B14 ;SIGNAL (IPCF) AT LOGOUT TIME
CJ%DSN==:1B17 ;DISOWN EXISTING JOB # IN 3
.CJNAM==:0 ;NAME STRING POINTER
.CJPSW==:1 ;PASSWORD STRING POINTER
.CJACT==:2 ;ACCOUNT DESIGNATOR/STRING
.CJFIL==:3 ;FILE NAME STRING POINTER
.CJSFV==:4 ;SFRKV OFFSET
.CJTTY==:5 ;TTY DESIGNATOR, OR NULL DESIGNATOR
.CJTIM==:6 ;TIME LIMIT
.CJACS==:7 ;ADDRESS OF 16. WORDS OF AC'S
.CJEXF==:10 ;EXEC FLAGS, FOR EXEC AC1
.CJPRI==:11 ;PRIMARY JFN'S FOR SPJFN IN NEW JOB
.CJCPU==:12 ;CPU LIMIT (0 IF NONE)
.CJCAM==:13 ;CAPABILITY MASK TO APPLY TO LOGIN
.CJSLO==:14 ;PID TO SIGNAL AT LOGOUT TIME
CR%PRA==:2545 ;MAGIC # FOR EXEC/CRJOB LINKAGE VIA PRARG
;CRLNM
.CLNJ1==:0 ;DELETE 1 LOGICAL NAME FROM JOB
.CLNS1==:1 ;DELETE 1 LOGICAL NAME FROM SYSTEM
.CLNJA==:2 ;DELETE ALL JOB WIDE LOGICAL NAMES
.CLNSA==:3 ;DELETE ALL SYSTEM LOGICAL NAMES
.CLNJB==:4 ;CREATE A JOB WIDE LOGICAL NAME
.CLNSY==:5 ;CREATE A SYSTEM WIDE LOGICAL NAME
;CTSOP%
;CTSOP% Function Codes
.CTCAL==:1 ;Canonical Operation Call
.CTLNK==:2 ;Link Canonical Library
.CTOVL==:3 ;Overload Canonical Library
.CTDLK==:4 ;De-Link Canonical Library
.CTGDB==:5 ;Get CTS Terminal Data Base
.CTBTF==:6 ;Bind Terminal and Fork
.CTUTF==:7 ;Un-Bind Terminal and Fork
.CTGBT==:10 ;Get Bound Terminals
.CTSIC==:11 ;Set Interrupt Channel
.CTCIC==:12 ;Clear Interrupt Channel
.CTROB==:13 ;Read from CTS Sequence Output Buffer
.CTGOC==:14 ;Get CTS Sequence Output Buffer Count
.CTDOE==:15 ;Dismiss until CTS Sequence Output Buffer Empty
;Offsets into the Argument Block
.CTHDR==:0 ;Header Word: Flags,,Length (including header)
CT%LNM==:1B0 ;Library Name Given
.CTIOJ==:1 ;I/O Designator
.CTDBL==:1 ;Length of Data Block
.CTCHN==:1 ;Channel Number
.CTCOC==:2 ;Canonical Operation Code
.CTLNM==:2 ;Byte Pointer to Library Name
.CTCDB==:2 ;Address of CTS Descriptor Block
.CTFHN==:2 ;Relative Fork Handle
.CTDSD==:2 ;Destination Designator
.CTRCT==:2 ;Returned Count
.CTDBA==:3 ;Address of Data Block
.CTBCT==:3 ;Byte Count
.CTCNT==:4 ;Counts (Possible Number,,Actual Number)
.CTTBT==:4 ;Terminating Byte
;CTS Descriptor Block
.CBHDR==:0 ;Header Word: Flags,,Length (including header)
.CBPPN==:1 ;Process Page Number
.CBNPG==:2 ;Number of Pages
.CBLID==:3 ;Two Word Lock ID to be Used by Fork
;CTS Terminal Data Base
.TDLOK==:0 ;Lock Word (-1 if free)
.TDLID==:1 ;Two Word Lock Id
.TDNST==:3 ;Nesting Count
.TDLTM==:4 ;Time Data Base was Last Locked
.TDIOJ==:5 ;I/O Designator for This Terminal
.TDIMG==:6 ;Address of Screen Image
;DELDF
DD%DTF==:1B0 ;DELETE TEMPORARY FILES
DD%DNF==:1B1 ;DELETE NONEXISTENT FILES
DD%RST==:1B2 ;REBUILD THE SYMBOL TABLE
DD%CHK==:1B3 ;CHECK THE DIR FOR CONSISTENCY ONLY
;DELF
DF%NRJ==:1B0 ;DON'T RELEASE JFN
DF%EXP==:1B1 ;EXPUNGE CONTENTS
DF%FGT==:1B2 ;FORGET (EXPUNGE W/O DEASSIGNING ADDRESSES)
DF%DIR==:1B3 ;DELETE, FORGET, AND EXPUNGE A DIRECTORY
; FILE. (ONLY IF ^E-CREATE KILL FAILED)
DF%ARC==:1B4 ; Delete of archive status file allowed
DF%CNO==:1B5 ; Delete only contents of file
; Immediate expunge implied
DF%JFN==777777B35 ;JFN
;DIAG JSYS DEFINITIONS
DG%ADT==:7B2 ;ADDRESS TYPE FIELD
DG%DVC==:177B9 ;DEVICE CODE FIELD
.DGRH0==:130 ;MBC0
.DGRH7==:137 ;MBC7
DG%UNI==:77B29 ;UNIT NUMBER
DG%SUN==:77B35 ;SUBUNIT NUMBER
;DIAG JSYS FUNCTION CODES
.DGACU==:1 ;ASSIGN DEVICE
.DGACH==:2 ;ASSIGN CONTROLLER AND ALL DEVICES
.DGRCH==:3 ;RELEASE DEVICE(S)
.DGSCP==:4 ;SETUP CHANNEL PROGRAM
.DGRCP==:5 ;RELEASE CHANNEL PROGRAM
.DGGCS==:6 ;GET CHANNEL STATUS
;DIAG NEW CONTROL FUNCTIONS
.DGGEM==:100 ;LEAVE LARGE HOLE FOR MORE RH20 FUNCTIONS
;GET MEM (FOR TGHA)
.DGREM==:101 ;RELEASE MEM (FOR TGHA)
.DGPDL==:102 ;UNIT ONLINE
.DGCSL==:103 ;DO 2080 CONSOLE FUNCTIONS
.DGSPC==:0 ;PSEUDO-CONSOLE
.DGRDE==:1 ;READ EMM
.DGIEM==:2 ;ENABLE/DISABLE INTERRUPT FOR EMM
.DGRTE==:3 ;WRITE EMM
.DGDXX==:4 ;SET DNxx line
.DGUCD==:104 ;LOAD/DUMP KLIPA U-CODE
.DGRIP==:0 ;DEFAULT KLIPA U-CODE LOAD IN PROGRESS
.DGRLC==:1 ;DEFAULT KLIPA U-CODE LOAD COMPLETE
.DGDIP==:2 ;DEFAULT KLIPA U-CODE DUMP IN PROGRESS
.DGDMC==:3 ;DEFAULT KLIPA U-CODE DUMP COMPLETE
.DGRST==:105 ;RESET REMOTE SYSTEM
.DGSTR==:106 ;START REMOTE SYSTEM
.DGCTR==:107 ;PERFORMANCE COUNTER FUNCTIONS
.DGGTC==:0 ;GET COUNTERS
.DGGVC==:1 ;RELINQUISH COUNTERS
.DGPTC==:2 ;POINT AND CLEAR COUNTERS
.DGRDC==:3 ;READ COUNTERS
.DGPVL==:2 ;MONOTONIC COUNTER,,OWNER'S FORK NUMBER
.DGPND==:3 ;KLIPA U-CODE VERSION
.DGP0A==:4 ;PORT 0 ACKS
.DGP0N==:5 ;PORT 0 NAKS
.DGP0R==:6 ;PORT 0 NO RESPONSES
.DGP1A==:7 ;PORT 1 ACKS
.DGP1N==:10 ;PORT 1 NAKS
.DGP1R==:11 ;PORT 1 NO RESPONSES
.DGPDD==:12 ;DATAGRAMS DISCARDED
.DGPXC==:13 ;PACKETS TRANSMITTED
.DGPRC==:14 ;PACKETS RECEIVED
.DGPTG==:15 ;TARGET NODE
.DGCRC==:16 ;PACKETS RECEIVED WITH CRC ERRORS
.DGEW1==:17 ;ERROR WORD 1
.DGEW2==:20 ;ERROR WORD 2
.DGEW3==:21 ;ERROR WORD 3
.DGEW4==:22 ;ERROR WORD 4
.DGEW5==:23 ;ERROR WORD 5
.DGEW6==:24 ;ERROR WORD 6
.DGRSC==:110 ;read SYSERR counter
.DGCNT==:1 ;Where the count is
.DGENB==:111 ;ENABLE .DGACH FOR A CI PORT
.DGWMD==:112 ;WRITE MAINTENANCE DATA
.DGRMD==:113 ;READ MAINTENANCE DATA
;DSKAS
DA%DEA==:1B0 ;DEASSIGN DISK ADDRESS
DA%ASF==:1B1 ;ASSIGN FREE PAGE
DA%CNV==:1B2 ;CONVERT SOFTWARE TO HARDWARE ADDRESS
DA%HWA==:1B3 ;HARDWARE ADDRESS GIVEN
DA%INI==:1B4 ;INITIALIZE THE BIT TABLE
DA%WRT==:1B5 ;WRITE THE BIT TABLE FILE
DA%AIN==:1B6 ;ABORT INITIALIZATION OF BITTABLE FILE
DA%ADR==:777777B35 ;DISK ADDRESS
;DVCHR, DEVUNT AND DVCH1 BIT DEFINITIONS
DV%OUT==:1B0 ;DEVICE CAN DO OUTPUT
DV%IN==:1B1 ;DEVICE CAN DO INPUT
DV%DIR==:1B2 ;DEVICE HAS A DIRECTORY
DV%AS==:1B3 ;DEVICE IS ASSIGNABLE
DV%MDD==:1B4 ;DEVICE IS A MULTIPLE DIRECTORY DEVICE
DV%AV==:1B5 ;DEVICE IS AVAILABLE TO THIS JOB
DV%ASN==:1B6 ;DEVICE IS ASSIGNED BY ASND
DV%MDV==:1B7 ;RESERVED (HISTORICAL)
DV%MNT==:1B8 ;DEVICE IS MOUNTED
DV%TYP==:777B17 ;DEVICE TYPE FIELD
DV%PSD==:1B18 ;PSEUDO DEVICE
DV%UNT==:77777 ;UNIT MASK
DV%MOD==:177777B35 ;DEVICE DATA MODE
DV%M0==:1B35 ;DEVICE CAN BE OPENED IN MODE 0
DV%M1==:1B34 ;DEVICE CAN BE OPENED IN MODE 1
DV%M2==:1B33 ;DEVICE CAN BE OPENED IN MODE 2
DV%M3==:1B32 ;DEVICE CAN BE OPENED IN MODE 3
DV%M4==:1B31 ;DEVICE CAN BE OPENED IN MODE 4
DV%M5==:1B30 ;DEVICE CAN BE OPENED IN MODE 5
DV%M6==:1B29 ;DEVICE CAN BE OPENED IN MODE 6
DV%M7==:1B28 ;DEVICE CAN BE OPENED IN MODE 7
DV%M10==:1B27 ;DEVICE CAN BE OPENED IN MODE 10
DV%M11==:1B26 ;DEVICE CAN BE OPENED IN MODE 11
DV%M12==:1B25 ;DEVICE CAN BE OPENED IN MODE 12
DV%M13==:1B24 ;DEVICE CAN BE OPENED IN MODE 13
DV%M14==:1B23 ;DEVICE CAN BE OPENED IN MODE 14
DV%M15==:1B22 ;DEVICE CAN BE OPENED IN MODE 15
DV%M16==:1B21 ;DEVICE CAN BE OPENED IN MODE 16
DV%M17==:1B20 ;DEVICE CAN BE OPENED IN MODE 17
D1%SPL==:1B0 ;DEVICE IS SPOOLED
D1%ALC==:1B1 ;DEVICE IS UNDER CONTROL OF ALLOCATOR
D1%VVL==:1B2 ;VOLUME VALID
D1%NIU==:1B3 ;DEVICE SLOT IS NOT IN USE (FOR STRUCTURES
; NOT YET MOUNTED)
D1%INI==:1B4 ;DEVICE IS BEING INITIALIZED (STRUCTURE
; IS AVAILABLE ONLY TO THE FORK WHOSE NUMBER
; IS STORED IN SDBSTS)
D1%MTO==:1B5 ;DEVICE CAN DO MTOPR WITHOUT JFN OPENED
;DEVICE TYPE DEFINITIONS
.DVDSK==:0 ;DISK
.DVMTA==:2 ;MAGTAPE
.DVDTA==:3 ;DECTAPE
.DVPTR==:4 ;PAPER TAPE READER
.DVPTP==:5 ;PAPER TAPE PUNCH
.DVDSP==:6 ;DISPLAY
.DVLPT==:7 ;LINE PRINTER
.DVCDR==:10 ;CARD READER
.DVFE==:11 ;FRONT END DEVICE
.DVTTY==:12 ;TERMINAL
.DVPTY==:13 ;PTY
.DVNUL==:15 ;NULL DEVICE
.DVNET==:16 ;ARPA NETWORK
.DVPLT==:17 ;PLOTTER
.DVCDP==:21 ;CARD PUNCH
.DVDCN==:22 ;DECNET ACTIVE COMPONENT
.DVSRV==:23 ;DECENT PASSIVE COMPONENT
.DVATS==:24 ;APPLICATIONS TERMINAL SERVICE
.DVADS==:25 ;AYDIN DISPLAY
;DSKOP
DOP%SA==:1B0 ;SOFTWARE ADDRESS
DOP%AT==:3B1 ;ADDRESS TYPE FIELD
.DOPPU==:1 ;PHYSICAL CHANNEL AND UNIT
DOP%CN==:37B6 ;CHANNEL NUMBER (OLD FORMAT)
DOP%UN==:77B12 ;UNIT NUMBER (OLD FORMAT)
DOP%UA==:37777777 ;UNIT ADDRESS
.DOPSR==:2 ;STRUCTURE AND RELATIVE ADDRESS
DOP%SN==:777B10 ;STRUCTURE NUMBER
DOP%RA==:177777777 ;RELATIVE ADDRESS
DOP%C2==:7777B11 ;CHANNEL NUMBER (NEW FORMAT)
DOP%K2==:7777B23 ;CONTROLLER NUMBER (NEW FORMAT)
DOP%U2==:7777B35 ;UNIT NUMBER (NEW FORMAT)
DOP%NF==:1B9 ;USE NEW FORMAT FOR CHANNEL, UNIT NUMBERS
DOP%EO==:1B10 ;ERROR IF UNIT OFFLINE
DOP%IL==:1B11 ;INHIBIT ERROR LOGGING
DOP%IR==:1B12 ;INHIBIT ERROR RECOVERY
DOP%PS==:1B13 ;PHYSICAL SECTOR ADDRESSING
DOP%WR==:1B14 ;WRITE
DOP%CT==:777777B35 ;WORD COUNT
;DUMPI/DUMPO
DM%NWT==:1B0 ;NO WAIT FOR COMPLETION
DM%FIN==:1B1 ;FINISH PREVIOUS REQUEST
;***NOT INPLEMENTED YET***
DM%PTR==:777777B35 ;POINTER TO COMMAND LIST
;DYNLB%
.DYLNK==:1 ;Link Dynamic Library
.DYOVL==:2 ;Overload Dynamic Library
.DYDLK==:3 ;De-Link Dynamic Library
.DYLCL==:4 ;Link Canonical Library
;Flags for DYNLB%
DY%IML==:1B0 ;Ignore Any Previously Mapped Library
;Library Descriptor Block
.LBHDR==:0 ;Header Word: Flags,,Length (including header)
LB%CTS==:1B0 ;Library is a CTS Library
.LBTVA==:1 ;Address of Transfer Vector
.LBCDB==:2 ;Address of Canonical Descriptor Block
;DEFINE DECNET DISCONNECT CODES. THESE ARE STIPULATED BY THE NSP SPEC
;AND MAY HAVE MEANININGS NOT IMPLIED BY THE COMMENTS
.DCX0==:0 ;REJECT OR DISCONNECT BY OBJECT
.DCX1==:1 ;RESOURCE ALLOCATION FAILURE
.DCX2==:2 ;DESTINATION NODE DOES NOT EXIST
.DCX3==:3 ;REMOTE NODE SHUTTING DOWN
.DCX4==:4 ;DESTINATION PROCESS DOES NOT EXIST
.DCX5==:5 ;INVALID PROCESS NAME FIELD
.DCX6==:6 ;OBJECT IS BUSY
.DCX7==:7 ;UNSPECIFIED ERROR
.DCX8==:^D8 ;ABORT BY MANAGEMENT
.DCX9==:^D9 ;ABORT BY OBJECT
.DCX10==:^D10 ;INVALID NODE NAME
.DCX11==:^D11 ;LOCAL NODE SHUT
.DCX21==:^D21 ;CI WITH ILLEGAL DESTINATION ADDRESS
.DCX22==:^D22 ;CC WITH ILLEGAL DESTINATION ADDRESS
.DCX23==:^D23 ;CI OR CC WITH ZERO SOURCE ADDRESS
.DCX24==:^D24 ;FLOW CONTROL VIOLATION
.DCX32==:^D32 ;TOO MANY CONNECTIONS TO NODE
.DCX33==:^D33 ;TOO MANY CONNECTIONS TO DEST. PROCESS
.DCX34==:^D34 ;ACCESS NOT PERMITTED
.DCX35==:^D35 ;LOGICAL LINK SERVICES MISMATCH
.DCX36==:^D36 ;INVALID ACCOUNT
.DCX37==:^D37 ;SEGSIZE TOO SMALL
.DCX38==:^D38 ;NO RESPONSE FROM DESTINATION PROCESS
.DCX39==:^D39 ;NODE UNREACHABLE
.DCX40==:^D40 ;LINK ABORTED DUE TO DATA LOSS
.DCX41==:^D41 ;DESTINATION PROCESS DOES NOT EXIST
.DCX42==:^D42 ;CONFIRMATION OF DI
.DCX43==:^D43 ;IMAGE DATA FIELD TOO LONG
;EFACT - FACT FILE ENTRY DEFINITIONS
.EFHDR==:0 ;HEADER WORD
EF%COD==:777B8 ;ENTRY TYPE CODE
EF%JOB==:777B17 ;JOB NUMBER
EF%LIN==:7777B29 ;LINE NUMBER
EF%SIZ==:77B35 ;ENTRY SIZE
.EFUSR==:1 ;USER NUMBER WORD
.EFTAD==:2 ;TIME AND DATE OF ENTRY
; FACT FILE ENTRY TYPE CODES
.EFLGI==:501 ;LOGIN
.EFLGO==:141 ;LOGOUT
.EFCAC==:502 ;CHANGE ACCOUNT
.EFATT==:142 ;CONSOLE ATTACH
.EFDET==:143 ;CONSOLE DETACH
.EFCHK==:201 ;CHECKPOINT
.EFSDU==:540 ;START DISK-UTILIZATION ENTRIES
.EFDSK==:601 ;DISK SPACE UTILIZATION
.EFTIM==:741 ;TIME SET
.EFRES==:740 ;SYSTEM RESTARTED
.EFLPT==:401 ;LINE PRINTER USAGE
.EFCDR==:402 ;CARD READER USAGE
;ENQ/DEQ BIT DEFINITIONS AND FUNCTION CODES
;FUNCTION CODES
.ENQBL==:0 ;ENQ BLOCK OPTION
.ENQAA==:1 ;ENQ ALLOCATE ONLY IF AVAILABLE
.ENQSI==:2 ;ENQ SOFTWARE INTERRUPT WHEN LOCKED
.ENQMA==:3 ;ENQ MODIFY ACCESS
.DEQDR==:0 ;DEQ RESOURCE
.DEQDA==:1 ;DEQ ALL RESOURCES OF THIS FORK
.DEQID==:2 ;DEQ THIS ID NUMBER
.ENQCS==:0 ;ENQC STATUS
.ENQCG==:1 ;ENQC GET ENQ/DEQ QUOTA FOR A JOB
.ENQCC==:2 ;ENQC CHANGE ENQ/DEQ QUOTA FOR A JOB
.ENQCD==:3 ;ENQC DUMP LOCKS AND QUEUE ENTRIES
;BIT DEFINITIONS
EN%SHR==:1B0 ;SHARABLE REQUEST
EN%BLN==:1B1 ;BYPASS LEVEL NUMBER
EN%NST==:1B2 ;ALLOW NESTING
EN%LTL==:1B3 ;LONG TERM LOCK
EN%LVL==:777B17 ;LEVEL NUMBER
EN%JOB==:777777B35 ;JOB NUMBER
EN%QCE==:1B0 ;ERROR CODE IN RH OF STATUS WORD
EN%QCL==:1B0 ;LOCK DUMP (.ENQCD ONLY)
EN%QCO==:1B1 ;THIS FORK OWNS THE LOCK
EN%QCQ==:1B2 ;THIS FORK IS IN THE QUEUE FOR THIS LOCK
EN%QCT==:1B2 ;LOCK CONTAINS A TEXT STRING
EN%QCX==:1B3 ;THE LOCK IS LOCKED EXCLUSIVELY
EN%QCB==:1B4 ;USER IS BLOCKED FOR LOCK
;ENQ/DEQ ARGUMENT BLOCK DATA STRUCTURE
.ENQLN==:0 ;# OF LOCKS ,, LENGTH OF ARGUMENT BLOCK
.ENHLN==:77B5 ;LENGTH OF HEADER AREA
.ENNLK==:7777B17 ;NUMBER OF LOCKS
.ENALN==:777777B35 ;LENGTH OF ARGUMENT BLOCK
.ENQID==:1 ;PSI CHANNEL # ,, REQUEST ID
.ENQLV==:2 ;FLAGS & LEVEL NUMBER ,, JFN, -1, -2, OR -3
.ENQUC==:3 ;STRING POINTER OR USER CODE
.ENQRS==:4 ;# OF RESOURCES IN POOL ,, # OF RESOURCES WANTED
.ENQMS==:5 ;ADDRESS OF RESOURCE BLOCK
;ENQC DUMP DATA STRUCTURE
.ENQDF==:0 ;FLAGS + LEVEL # ,, OFN, 400000+JOB #, -2, OR -3
;OR: FLAGS + PSI # ,, JOB # OF Q-ENTRY CREATOR
.ENQDR==:1 ;TOTAL RESOURCES IN POOL ,, RESOURCES REMAINING
.ENQDT==:2 ;TIME STAMP OF LAST REQUEST LOCKED
.ENQDC==:3 ;USER CODE OF LOCK OR START OF TEXT STRING
.ENQDI==:1 ;GROUP # OR # REQUESTED ,, ENQ ID
;FLOUT/DFOUT
;FORMAT CONTROL WORD
FL%SGN==:3B1 ;FIRST FIELD SIGN CONTROL
.FLDIG==:0 ;DIGIT
.FLSPC==:1 ;SPACE
.FLPLS==:2 ;PLUS SIGN
.FLSPA==:3 ;SPACE
FL%JUS==:3B3 ;FIRST FIELD JUSTIFICATION CONTROL
.FLLSP==:0 ;LEADING SPACES
.FLLZR==:1 ;LEADING ZEROS
.FLLAS==:2 ;LEADING ASTERISKS
.FLTSP==:3 ;TRAILING SPACES
FL%ONE==:1B4 ;FIRST FIELD NONBLANK
FL%DOL==:1B5 ;DOLLAR SIGN PREFIX
FL%PNT==:1B6 ;DECIMAL POINT
FL%EXP==:3B8 ;THIRD FIELD EXPONENT CONTROL
.FLEXN==:0 ;NO EXPONENT
.FLEXE==:1 ;E EXPONENT PREFIX
.FLEXD==:2 ;D EXPONENT PREFIX
.FLEXM==:3 ;*10^ EXPONENT PREFIX
FL%ESG==:3B10 ;EXPONENT SIGN CONTROL
.FLDGE==:0 ;DIGIT
.FLPLE==:1 ;PLUS SIGN
.FLSPE==:2 ;SPACE
.FLDGT==:3 ;DIGIT
FL%OVL==:1B11 ;COLUMN OVERFLOW
FL%RND==:37B17 ;DIGIT POSITION FOR ROUNDING
FL%FST==:77B23 ;FIRST FIELD WIDTH
FL%SND==:77B29 ;SECOND FIELD WIDTH
FL%THD==:77B35 ;THIRD FIELD WIDTH
;GDSTS
;SEE MTOPR FOR CARD READER AND LINE PRINTER STATUS BITS
;SEE GENERAL FIELD AND VALUE SECTION FOR MAGTAPE STATUS BITS
;SEE TOPS20AN SECTION FOR NETWORK STATUS BITS
.GDFSM==:17B3 ;TOPS20AN ;FINITE MACHINE STATE
;TTY BITS
GD%PAR==:1B35 ;IF ON, TERMINAL ACCEPTS PARITY
;GET
;Argument block for GET:
.GFLAG==:0 ;FLAG WORD
GT%LOW==:1B0 ;USE LOW ADDRESS IN .GLOW
GT%HGH==:1B1 ;USE HIGH ADDRESS IN .GHIGH
GT%BAS==:1B2 ;USE BASE SECTION IN .GBASE
GT%CCH==:1B3 ;CLEAR PROGRAM CACHE
GT%CSH==:1B4 ;CACHE THIS PROGRAM
GT%ADR==:1B19 ; (IN AC1) USE ADDRESS LIMITS IN AC2
GT%PRL==:1B20 ; (IN AC1) PRELOAD PAGES
GT%NOV==:1B21 ; (IN AC1) DON'T OVERLAY EXISTING PAGES
GT%ARG==:1B22 ; (IN AC1) IF ON, AC2 CONTAINS ADDRESS OF ARG BLOCK
GT%JFN==:7777B35 ; (IN AC1) JFN
.GLOW==:1 ;LOW ADDRESS IF GT%LOW ON
.GHIGH==:2 ;HIGH ADDRESS IG GT%HGH ON
.GBASE==:3 ;BASE IF GT%BAS ON
;GETAB - TABLE INDICES
.JOBTT==:0 ;JOB NUMBER TO TTY NUMBER
.JOBRT==:1 ;JOB RUNTIME
.TICKP==:2 ;TICKS PER SECOND
.JOBDI==:3 ;JOB NUMBER TO DIRECTORY NUMBERS (OBS)
.TTYJO==:4 ;TTY NUMBER TO JOB NUMBER
.NCPGS==:5 ;NUMBER PHYSICAL CORE PAGES
.DEVNA==:6 ;DEVICE NAME
.DEVCH==:7 ;DEVICE CHARACTERISTICS
.DEVUN==:10 ;DEVICE UNIT NUMBERS
.DSKER==:11 ;DISK ERROR WORDS
.DRMER==:12 ;DRUM ERROR WORDS
.SYSVE==:13 ;VERSION TEXT
.SYSTA==:14 ;STATISTICS
.QTIME==:15 ;SCHED QUEUE TIMES
.JOBNA==:16 ;JOB NUMBER TO PROGRAM NAME
.SNAME==:17 ;SUBSYSTEM NAME
.STIME==:20 ; " TIME
.SPFLT==:21 ; " PAGE FAULTS
.SSIZE==:22 ; " SIZE INTEGRAL
.SNBLK==:23 ; " NUMBER WAKEUPS
.DBUGS==:24 ;DBUGSW, DCHKSW
.LOGDE==:25 ;LOG, JOB 0 DESIGNATORS
.PTYPA==:26 ;PTY PARAMETERS
.SYMTA==:27 ;GTTAB SYMBOL TABLE
.DWNTI==:30 ;HSYS VARIABLES
.JOBPN==:31 ;JOB NUMBER TO PROGRAM NAME
.BLDTD==:32 ;MONITOR BUILD TIME AND DATE
.LSTDR==:33 ;LAST DIR NUMBER ASSIGNED (OBS)
.APRID==:34 ;APR SERIAL NUMBER
.HQLAV==:35 ;HIGH QUEUE LOAD AVERAGES
.LQLAV==:36 ;LOW QUEUE LOAD AVERAGES
.NETRD==:37 ;TOPS20AN ;ARPANET STATUS
.IMPHR==:40 ;TOPS20AN ;HOST READY
.HSTST==:41 ;TOPS20AN ;DEAD HOST STATUS
.HSTNA==:42 ;TOPS20AN ;HOST NAMES
.HOSTN==:43 ;TOPS20AN ;HOST NAME INDEX
.NETLS==:44 ;TOPS20AN ;LOCAL SOCKET
.NETFS==:45 ;TOPS20AN ;FOREIGN SOCKET
.NETAW==:46 ;TOPS20AN ;ARPA CONNECTION ADDRESS
.NETBA==:47 ;TOPS20AN ;BIT ALLOCATION
.NETST==:50 ;TOPS20AN ;CONNECTION STATUS
.NETBU==:51 ;TOPS20AN ;ARPANET BUFFERS
.NETBT==:52 ;TOPS20AN ;BYTE COUNT STATISTICS
.IMPL1==:53 ;TOPS20AN ;IMP LINK TABLE ONE
.IMPL2==:54 ;TOPS20AN ;IMP LINK TABLE TWO
.IMPL3==:55 ;TOPS20AN ;IMP LINK TABLE THREE
.IMPL4==:56 ;TOPS20AN ;IMP LINK TABLE FOUR
.LHOST==:57 ;TOPS20AN ;LOCAL HOST NUMBER
.JBONT==:60 ;OWNING JOB
.NSWPG==:61 ;DEFAULT SWAPPING PAGES
.SCOUN==:62 ;COUNT SNAMES TABLE
.MONVR==:63 ;MONITOR VERSION (ADDRESS 137)
;**;[7213] Add 1 line at (.MONVR=)+1 CEG 19-Dec-85
.CSTAT==:64 ;[7213] CI STATISTICS
;GETJI
.JIJNO==:0 ;JOB NUMBER
.JITNO==:1 ;TERMINAL NUMBER
.JIUNO==:2 ;USER NUMBER
.JIDNO==:3 ;DIRECTORY NUMBER
.JISNM==:4 ;SUBSYS NAME
.JIPNM==:5 ;PROGRAM NAME
.JIRT==:6 ;RUN TIME
.JICPJ==:7 ;CONTROLLING PTY JOB NUMBER
.JIRTL==:10 ;RUN TIME LIMIT (SET BY TIMER JSYS)
.JIBAT==:11 ;CONTROLLED BY BATCH
.JIDEN==:12 ;MAGTAPE DEFAULT DENSITY
.JIPAR==:13 ;MAGTAPE DEFAULT PARITY
.JIDM==:14 ;MAGTAPE DEFAULT DATA MODE
.JIRS==:15 ;MAGTAPE DEFAULT RECORD SIZE
.JIDFS==:16 ;DEFERRED SPOOLING
.JILNO==:17 ;LOGGED-IN DIRECTORY NUMBER
.JISRM==:20 ;POINTER TO JOB SESSION REMARK
.JILLN==:21 ;LAST LOGIN DATE & TIME
.JISRT==:22 ;JOB RUNTIME AT START OF THIS ACCOUNTING SESSION
.JISCT==:23 ;JOB CONSOLE TIME AT START OF THIS SESSION
.JIT20==:24 ;-1 IF AT TOPS20 COMMAND LEVEL
.JISTM==:25 ;DATE & TIME JOB WAS INITIALIZED
.JIBCH==:26 ;BATCH STREAM AND FLAGS
OB%WTO==3B1 ;WRITE TO OPERATOR CAPABILITIES
.OBALL==0 ;WTO AND WTOR ALLOWED
.OBNWR==1 ;NO WTOR ALLOWED
.OBNOM==2 ;NO MESSAGE ALLOWED
OB%BSS==1B10 ;BATCH STREAM NUMBER SET
OB%BSN==177B17 ;BATCH-STREAM NUMBER
.JILLO==:27 ;LOGICAL LOCATION (NODE NAME)
.JILJI==:30 ;LOCAL JOB INDEX
;**;[7258]
.JIBSN==:31 ;[7258]Batch sequence number
.JIBJN==:32 ;[7258]Batch Job name
.JIBID==:33 ;[7258]Batch request ID
.JIMAX==:.JIBID ;[7258]Current highest GETJI offset
;GFRKS
GF%GFH==:1B0 ;GET RELATIVE FORK HANDLES
GF%GFS==:1B1 ;GET FORK STATUS
;GFUST
.GFAUT==:0 ;GET FILE AUTHOR
.GFLWR==:1 ;GET FILE LAST WRITER
;GTHST ;TOPS20AN
.GTHSZ==:0 ;HOST TABLE SIZES
.GTHIX==:1 ;INDEX TO STRING CONVERSION
.GTHNS==:2 ;NUMBER TO STRING CONVERSION
.GTHSN==:3 ;STRING TO NUMBER CONVERSION
.GTHHN==:4 ;HOST NUMBER TO STATUS
.GTHHI==:5 ;HOST INDEX TO STATUS
.GTHLN==:6 ;GET LOCAL NUMBER ON A NETWORK
.GTHNT==:7 ;GET STATUS TABLE OF A NETWORK
.GTHLA==:10 ;GET ADDRESSES OF NETWORK INTERFACES
;GETOK DEFINITIONS
.GOASD==:1 ;ASSIGN DEVICE
.GEERB==:0 ;ERROR BLOCK ADDRESS
.GEADD==:1 ;DEVICE DESIGNATOR
.GOCAP==:2 ;ENABLE CAPABILITIES
.GENCP==:1 ;NEW CAPABILITIES
.GOCJB==:3 ;ALLOW CRJOB JSYS
.GOLOG==:4 ;ALLOW LOGINS
.GELUN==:1 ;USER NUMBER
.GOCFK==:5 ;ALLOW CFORK JSYS
.GEFCT==:1 ;NUMBER OF FORKS
.GOTBR==:6 ;ALLOW SET TERMINAL BAUD RATE
.GELIN==:1 ;LINE NUMBER
.GESPD==:2 ;SPEED
.GOLGO==:7 ;ALLOW LOGOUT
.GEUSD==:1 ;PAGES USED
.GEQUO==:2 ;QUOTA
.GERLG==:3 ;JOB TO BE LOGGED OUT, -1 FOR CALLER
.GOENQ==:10 ;ALLOW SET ENQ QUOTA
.GEEQU==:1 ;DESIRED QUOTA
.GEEUN==:2 ;JOB NUMBER
.GOCRD==:11 ;ALLOW CREDIR
.GOSMT==:12 ;ALLOW SMOUNT
.GESDE==:1 ;DEVICE DESIGNATOR
.GOMDD==:13 ;ALLOW MDDT ENTRY
.GOCLS==:14 ;VERIFY CLASS ASSIGNMENT FOR A JOB
.GEJOB==:1 ;JOB #
.GECLS==:2 ;CLASS DESIRED
.GOCL0==:15 ;SET CLASS AT LOGIN
.GOMTA==:16 ;MT ACCESS REQUEST
.GEACC==:1 ;ACCESS CODE FROM HDR1
.GEUSN==:2 ;USER NUMBER
.GEUNT==:3 ;MT UNIT NUMBER
.GEACD==:4 ;DESIRED ACCESS (BITS)
.GELTP==:5 ;LABEL TYPE
.GOACC==:17 ;ACCESS AND CONNECT
.GOAC0==:1 ;FLAGS FROM ACESS JSYS
.GOAC1==:2 ;DIRECTORY NUMBER
.GOOAD==:20 ;ASSIGN DUE TO OPENF
;.GEADD IS THE ARG OFFSET FOR THE
; DEVICE DESIGNATOR
.GODNA==:21 ;ACCESS TO DECNET
.GOANA==:22 ;ACCESS TO ARPANET
.GOATJ==:23 ;ATACH JSYS
.GOTJB==:1 ;TAGET JOB NUMBER
.GOTTY==:2 ;SOURCE TTY NUMBER
.GOKMZ==:^D20 ;MAX ARGUMENT BLOCK SIZE FOR GETOK REQUEST
;ERROR BLOCK ADDRESS OFFSETS
.GESIZ==:0 ;SIZE OF THIS BLOCK
.GEERN==:1 ;ERROR NUMBER
.GEPTR==:2 ;POINTER TO ERROR STRING
.GEBSZ==:3 ;STRING SIZE
;GTJFN DEFINITIONS
;FLAGS PROVIDED TO GTJFN ON CALL
GJ%FOU==:1B0 ;FILE IS FOR OUTPUT USE
GJ%NEW==:1B1 ;NEW FILE ONLY
GJ%OLD==:1B2 ;OLD FILE ONLY
GJ%MSG==:1B3 ;PRINT AN APPROPRIATE MESSAGE
GJ%CFM==:1B4 ;CONFIRMATION IS REQUIRED
GJ%TMP==:1B5 ;TEMPORARY
GJ%NS==:1B6 ;DONT SEARCH SEARCH LISTS
GJ%ACC==:1B7 ;NO ACCESS BY OTHER FORKS
GJ%DEL==:1B8 ;IGNORE "DELETED" BIT
GJ%JFN==:3B10 ;JFN USE FIELD
.GJDNU==:0 ;DO NOT USE JFN PROVIDED
.GJERR==:2 ;ERROR IF CANNOT USE JFN PROVIDED
.GJALT==:3 ;USE ALTERNATE IF CANNOT USE GIVEN JFN
GJ%IFG==:1B11 ;ACCEPT INPUT FILE GROUP DESCRIPTORS
GJ%OFG==:1B12 ;ACCEPT OUTPUT FILE GROUP DESCRIPTORS
GJ%FLG==:1B13 ;RETURN FLAGS
GJ%PHY==:1B14 ;PHYSICAL DEVICE ONLY
GJ%XTN==:1B15 ;EXTENDED FORMAT (E+11 EXISTS)
GJ%FNS==:1B16 ;ACCUMULATOR 2 CONTAINS JOB FILE NUMBERS
GJ%SHT==:1B17 ;SHORT CALL FORMAT
;FLAGS PROVIDED TO GTJFN (IN SECOND FLAG WORD)
G1%RND==:1B0 ;RETURN ON NULL(IN ALTERNATE FLAG WORD)
G1%RBF==:1B1 ;^R BUFFER IS DISJOINT (OBSOLETE)
G1%NLN==:1B2 ;NO LONG NAMES
G1%RCM==:1B3 ;RETURN CONFIRM MESSAGE
G1%RIE==:1B4 ;RETURN WHEN MAIN STRING IS EMPTY
G1%IIN==:1B5 ; Ignore invisible status
G1%SLN==:1B6 ;SUPPRESS EXPANSION OF LOGICAL NAMES
G1%LOC==:1B7 ;Local files only
;FLAGS RETURNED BY GTJFN
GJ%DEV==:1B0 ;ASTERISK WAS GIVEN FOR DEVICE
GJ%UNT==:1B1 ;ASTERISK WAS GIVEN FOR UNIT
GJ%DIR==:1B2 ;ASTERISK WAS GIVEN FOR DIRECTORY
GJ%NAM==:1B3 ;ASTERISK WAS GIVEN FOR NAME
GJ%EXT==:1B4 ;ASTERISK WAS GIVEN FOR EXTENSION
GJ%VER==:1B5 ;ASTERISK WAS GIVEN FOR GENERATION
GJ%UHV==:1B6 ;USE HIGHEST GENERATION
GJ%NHV==:1B7 ;USE NEXT HIGHER GENERATION
GJ%ULV==:1B8 ;USE LOWEST GENERATION
GJ%PRO==:1B9 ;PROTECTION GIVEN
GJ%ACT==:1B10 ;ACCOUNT GIVEN
GJ%TFS==:1B11 ;TEMPORARY FILE SPECIFIED (;T)
GJ%GND==:1B12 ;COMPLEMENT OF GJ%DEL ON CALL
GJ%NOD==:1B13 ;NODE NAME WAS GIVEN
GJ%GIV==:1B17 ; Comp of G1%IIV
;GTJFN TABLE OFFSETS
.GJGEN==:0 ;FLAGS ,, GENERATION
.GJDEF==:<Z 0> ;DEFAULT GENERATION
.GJNHG==:<Z -1> ;NEXT HIGHER GENERATION
.GJLEG==:<Z -2> ;LOWEST EXISTING GENERATION
.GJALL==:<Z -3> ;ALL GENERATIONS (I.E., ;*)
.GJSRC==:1 ;SOURCE JFN ,, OUTPUT JFN
.GJDEV==:2 ;DEFAULT DEVICE
.GJDIR==:3 ;DEFAULT DIRECTORY
.GJNAM==:4 ;DEFAULT NAME
.GJEXT==:5 ;DEFAULT EXTENSTION
.GJPRO==:6 ;DEFAULT PROTECTION
.GJACT==:7 ;DEFAULT ACCOUNT
.GJJFN==:10 ;DESIRED JFN
.GJF2==:11 ;SECOND GROUP FLAGS,,COUNT
.GJCPP==:12 ;COPY BUFFER POINTER
.GJCPC==:13 ;COPY BUFFER COUNT
.GJRTY==:14 ;RETYPE (^R) POINTER
.GJBFP==:15 ;TOP OF BUFFER POINTER
.GJATR==:16 ;POINTER TO ARBITRARY ATTRIBUTE BLOCK
.GJNOD==:17 ;DEFAULT NODE
;GNJFN - FLAGS RETURNED
GN%STR==:1B13 ;STRUCTURE CHANGED
GN%DIR==:1B14 ;DIRECTORY CHANGED
GN%NAM==:1B15 ;NAME CHANGED
GN%EXT==:1B16 ;EXTENSION CHANGED
;GTNCP ;TOPS20AN
.GTNSZ==:0 ;SIZE OF TABLE
.GTNIX==:1 ;NCP INDEX
.GTNNI==:2 ;NVT INPUT
.GTNNO==:3 ;NVT OUTPUT
.GTNJF==:4 ;JFN
.NCIDX==:0 ;NCP INDEX
.NCFHS==:1 ;FOREIGN HOST
.NCLSK==:2 ;LOCAL SOCKET
.NCFSK==:3 ;FOREIGN SOCKET
.NCFSM==:4 ;FINITE STATE MACHINE STATE
.NCLNK==:5 ;LINK
.NCNVT==:6 ;NVT, -1 IF NOT A TELNET CONNECTION
.NCSIZ==:7 ;BYTE SIZE OF CONNECTION
.NCMSG==:10 ;MSG ALLOC
.NCBAL==:11 ;BIT ALLOC
.NCDAL==:12 ;DESIRED ALLOC
.NCBTC==:13 ;BITS XFERRED
.NCBPB==:14 ;BYTES/BUFFER
.NCCLK==:15 ;TIME-OUT COUNTDOWN
.NCSTS==:16 ;CONNECTION STATUS
;GTRPW
PF%USR==:1B0 ;PAGE FAIL WORD - USER MODE REFERENCE
PF%WTF==:1B1 ; " - WRITE REFERENCE (XGTPW)
PF%WRT==:1B5 ; " - WRITE REFERENCE
TSW%RD==:1B14 ;TRAP STATUS WORD - READ
TSW%WT==:1B15 ; " - WRITE
TSW%WR==:1B15 ; (ANOTHER NAME FOR ABOVE)
TSW%EX==:1B16 ; " - EXECUTE
TSW%MN==:1B17 ; " - MONITOR MODE REFERENCE
;GTSTS BITS RETURNED IN 2
GS%OPN==:1B0 ;FILE IS OPEN
GS%RDF==:1B1 ;IF OPEN, FILE IS OPEN FOR READ
GS%WRF==:1B2 ;IF OPEN, FILE IS OPEN FOR WRITE
GS%XCF==:1B3 ;IF OPEN, FILE IS OPEN FOR EXECUTE
GS%RND==:1B4 ;OK TO RESET BYTE POINTER
; (FILE IS NOT APPEND)
GS%APT==:1B5 ;ACCESS PER PAGE TABLE
; (NOT IMPLEMENTED -- OBSOLETE)
GS%CAL==:1B6 ;OK TO CALL AS A PROCEDURE
; (NOT IMPLEMENTED -- OBSOLETE)
GS%LNG==:1B7 ;FILE IS LONG
GS%EOF==:1B8 ;AT END OF FILE ON READ
GS%ERR==:1B9 ;FILE MAY BE IN ERROR
GS%NAM==:1B10 ;FILE HAS A NAME (JFN EXISTS)
GS%AST==:1B11 ;ONE OR MORE FIELDS OF NAME
; IS WILD
GS%ASG==:1B12 ;JFN IS BEING ASSIGNED
GS%HLT==:1B13 ;TERMINATE ON I/O ERROR
GS%FRK==:1B17 ;JFN IS RESTRICTED TO CREATING FORK
GS%PLN==:1B18 ;DON'T STRIP LINE NUMBERS ON SIN/BIN
GS%MOD==:17B35 ;DATA MODE
.GSNRM==:0 ;NORMAL MODE
.GSSMB==:1 ;SMALL BUFFER MODE (DCN:, SRV:)
.GSIMG==:10 ;IMAGE (BINARY) MODE
.GSDMP==:17 ;DUMP MODE
;HPTIM
.HPELP==:0 ;ELAPSED TIME
.HPRNT==:1 ;RUN TIME
;IDCNV (ALSO IDTNC AND ODCNV)
IC%DSA==:1B0 ;DAYLIGHT SAVINGS IF APPROPRIATE
IC%ADS==:1B1 ;APPLY DAYLIGHT SAVINGS
IC%UTZ==:1B2 ;USE TIME ZONE GIVEN
IC%JUD==:1B3 ;USE JULIAN DATE CONVERSION
IC%TMZ==:77B17 ;TIME ZONE
IC%TIM==777777B35 ;LOCAL TIME
;IDTIM & IDTNC
IT%NDA==:1B0 ;NO DATE
IT%NNM==:1B1 ;NO NUMERIC MONTH
IT%SNM==:1B2 ;SECOND NUMBER IS MONTH
IT%ERR==:1B3 ;ERROR IF NUMBERS ARE NOT IN SPECIFIED
; ORDER
IT%NTI==:1B6 ;NO TIME
IT%NIS==:1B7 ;NO SECONDS
IT%AIS==:1B8 ;ALWAYS INCLUDE SECONDS
IT%NAC==:1B9 ;NO COLON ALLOWED BETWEEN HH AND MM
IT%AAC==:1B10 ;ALWAYS ALLOW COLON
IT%AMS==:1B11 ;ALWAYS INTERPRET ONE COLON AS HHMM:SS
IT%AHM==:1B12 ;ALWAYS INTERPRET ONE COLON AS HH:MM
IT%N24==:1B14 ;NO 24-HOUR FORMAT
IT%NTM==:1B15 ;NO TIME MODIFIER (AM, PM)
IT%NTZ==:1B16 ;NO TIME ZONE
;.IMOPR - MONITOR ROUTINE USED BY MDDT AND SNOOP. THIS IS NOT
;A JSYS SO THAT CALLS ARE FAST.
.IMALC==:1 ;ALLOCATE PAGES FOR USE IN MAPPING SYMBOLS
.IMMAP==:2 ;MAP PAGES OF THE SYMBOL TABLE
.IMUMP==:3 ;UNMAP PAGES OF THE SYMBOL TABLE
;INLNM
.INLJB==:0 ;GET JOB WIDE LOGICAL NAME FROM INDEX
.INLSY==:1 ;GET SYSTEM LOGICAL NAME FROM INDEX
;IPCF BIT DEFINITIONS AND DATA STRUCTURES
;PACKET FORMAT
.IPCFL==:0 ;FLAGS WORD
IP%CFB==:1B0 ;DON'T BLOCK READ
IP%CFS==:1B1 ;INDIRECT SENDER'S PID
IP%CFR==:1B2 ;INDIRECT RECEIVER'S PID
IP%CFO==:1B3 ;OVERDRAW SEND
IP%TTL==:1B4 ;TRUNCATE ON TOO LARGE MESSAGE
IP%CPD==:1B5 ;CREATE A PID ON THE SEND
IP%JWP==:1B6 ;MAKE THE CREATED PID BE JOB WIDE
IP%NOA==:1B7 ;NO ACCESS OF PID BY OTHER FORKS
IP%MON==:1B8 ; Reserved for monitor - unavailable to users
IP%CFP==:1B18 ;SENDER IS PRIV'D AND IS ENVOKING PRIVS
IP%CFV==:1B19 ;PAGE TRANSFER MODE
IP%CFZ==:1B20 ;ZERO LENGTH MESSAGE WAS SENT
IP%INT==:1B21 ; Internal call - unavailable to users
IP%EPN==:1B22 ;PAGE NUMBER IS 18 BITS
IP%CFE==:77B29 ;ERROR FIELD
;ERRORS SENT BY INFO
.IPCPI==:15 ;INSUFFICIENT PRIVILEGE
.IPCUF==:16 ;ILLEGAL FUNCTION
.IPCSN==:67 ;SEND INFO YOUR NAME
.IPCFF==:72 ;INFO FREE SPACE EXHAUSTED
.IPCBP==:74 ;PID HAS NO NAME OR IS ILLEGAL
.IPCDN==:75 ;DUPLICATE NAME
.IPCNN==:76 ;UNKNOWN NAME
.IPCEN==:77 ;ILLEGAL NAME
.IPCKM==:66 ;NOTIFICATION THAT PID HAS BEEN DELETED
IP%CFC==:7B32 ;SYSTEM SENDER CODE
.IPCCC==:1 ;SENT BY [SYSTEM]IPCF
.IPCCF==:2 ;SENT BY SYSTEM WIDE [SYSTEM]INFO
.IPCCP==:3 ;SENT BY RECEIVER'S [SYSTEM]INFO
.IPCCG==:4 ;SENT BY SYSTEM FOR QUEUE%
IP%CFM==:7B35 ;SPECIAL MESSAGE RETURN FIELD
.IPCFN==:1 ;MESSAGE WAS NOT DELIVERED
.IPCFS==:1 ;PID OF SENDER
.IPCFR==:2 ;PID OF RECEIVER
.IPCFP==:3 ;POINTER TO MESSAGE BLOCK
.IPCFD==:4 ;LOGGED IN DIR OF SENDER
.IPCFC==:5 ;ENABLED CAPABILITIES OF SENDER
.IPCSD==:6 ;CONNECTED DIRECTORY NUMBER OF SENDER
.IPCAS==:7 ;POINTER TO ACCOUNT STRING OF SENDER
.IPCLL==:10 ;POINTER TO LOGICAL LOCATION OF SENDER
.IPCSU==:26 ;SPOOL MESSAGE CODE FROM IPCC
.IPCSL==:27 ;LOGOUT MESSAGE CODE FROM IPCC
.IPCSA==:30 ;RESOURCE ALLOCATOR MESSAGE CODE
.IPCDS==:31 ;STRUCTURE DISMOUNT MESSAGE CODE FROM IPCC
.IPCLI==:32 ;LOGIN MESSAGE CODE FROM IPCC
.IPCLO==:33 ;LOGOUT MESSAGE TO CREATOR FROM IPCC
.IPCKP==:34 ;DELETED PID MESSAGE FROM IPCC
.IPCCA==:35 ;CREATE AN APPLICATION (RESERVED FOR TPS USE)
.IPCTR==:36 ;REQUEST FROM TAPE
.IPCMS==:37 ;STRUCTURE MOUNT MESSAGE CODE FROM IPCC
.IPCRS==:40 ;STRUCTURE REMOVAL MSSG CODE FROM IPCC
.IPCSR==:41 ; Archive message code from IPCC
.IPCSS==:15 ;IPCC REQUEST TO INFO TO DELETE PIDS
;[SYSTEM] INFO DEFINITIONS
.IPCI0==:0 ;CODE,,FUNCTION
.IPCIW==:1 ;FIND PID FOR NAME
.IPCIG==:2 ;FIND NAME FOR PID
.IPCII==:3 ;ASSIGN NAME TO PID
.IPCIJ==:4 ;ASSIGN NAME TO PID
.IPCIK==:5 ;NOTIFY WHEN SPECIFIED PID IS KILLED
.IPCIS==:15 ;MONITOR DROP PID FUNCTION
.IPCI1==:1 ;PID TO GET A COPY OF REPLY
.IPCI2==:2 ;START OF DATA
;JFNS
JS%DEV==:7B2 ;DEVICE FIELD OUTPUT CONTROL [OBSOLETE]
JS%NOD==:1B0 ;NODE FIELD OUTPUT CONTROL - .JSSSD IS ILLEGAL
JS%DVN==:3B2 ;DEVICE FIELD OUTPUT CONTROL
JS%DIR==:7B5 ;DIRECTORY FIELD OUTPUT CONTROL
JS%NAM==:7B8 ;NAME FIELD OUTPUT CONTROL
JS%TYP==:7B11 ;FILE TYPE FIELD OUTPUT CONTROL
JS%GEN==:7B14 ;GENERATION FIELD OUTPUT CONTROL
JS%PRO==:7B17 ;PROTECTION FIELD OUTPUT CONTROL
JS%ACT==:7B20 ;ACCOUNT FIELD OUTPUT CONTROL
;VALUES FOR ABOVE 8 FIELDS:
.JSNOF==:0 ;NEVER OUTPUT FIELD
.JSAOF==:1 ;ALWAYS OUTPUT FIELD
.JSSSD==:2 ;SUPPRESS IF SYSTEM DEFAULT
JS%TMP==:1B21 ;RETURN ;T IF TEMP FILE
JS%SIZ==:1B22 ;RETURN SIZE
JS%CDR==:1B23 ;RETURN CREATION DATE
JS%LWR==:1B24 ;RETURN LAST WRITE
JS%LRD==:1B25 ;RETURN LAST READ
JS%PTR==:1B26 ;AC 2 HOLDS STRING POINTER NOT JFN
JS%ATR==:1B27 ;RETURN ATTRIBUTES
JS%AT1==:1B28 ;RETURN 1 SPECIFIC ATTRIBUTE
JS%OFL==:1B29 ;RETURN ;OFF-LINE IF OFFLINE FILE
JS%PSD==:1B32 ;PUNCTUATE SIZE AND DATE
JS%TBR==:1B33 ;TAB BEFORE FIELDS RETURNED
JS%TBP==:1B34 ;TAB BEFORE POSSIBLE FIELDS
JS%PAF==:1B35 ;PUNCTUATE ALL FIELDS
JS%SPC==:<FLD(.JSAOF,JS%DEV)>!<FLD(.JSAOF,JS%DIR)>!<FLD(.JSAOF,JS%NAM)>!
<FLD(.JSAOF,JS%TYP)>!<FLD(.JSAOF,JS%GEN)>!JS%PAF ;MASK FOR WHOLE SPEC
;~6.0 LATOP% - LAT Host
;LATOP% Function Code Definitions
.LASET==0 ;Set
.LACLR==1 ;Clear
.LASCH==2 ;Show characteristics of host
.LASTC==3 ;Show terminal connects
.LASAS==4 ;Show adjacent servers
.LASCO==5 ;Show counters
.LAZCO==6 ;Zero counters
;LATOP% argument block definitions
.LAACT==0 ;Argument block count
.LAFCN==1 ;LATOP% function code
.LAPRM==2 ;SET/CLEAR parameter number
.LAVAL==3 ;SET/CLEAR new parameter value
.LABCT==2 ;SHOW Buffer count
.LABFA==3 ;SHOW Buffer Address
.LAQUA==4 ;SET/SHOW/ZERO Qualifier
.LADSC==5 ;Service description for .LPSRV
LA%RAT==1B0 ;Set rating flag for .LPSRV
LA%DSC==1B1 ;Set description flag for .LPSRV
;LATOP% Parameter definitions
.LPMAC==1 ;Maximum active circuits
.LPMCO==2 ;Maximum connects
.LPNUM==3 ;Host number
.LPLAS==4 ;Lat access state
.LPRLI==5 ;Retransmit limit
.LPTIM==6 ;Retransmit timer
.LPMTI==7 ;Multicast timer
.LPCOD==10 ;Access codes
.LPNNM==11 ;Host name
.LPNID==12 ;Host identification
.LPSRV==13 ;Host service
;LATOP% LAT access states
LS.OFF==0 ;LAT Access State OFF
LS.ON==1 ;LAT Access State ON
;~6.0 LLMOP% - Low Level MOP for Ethernet Data Link Layer
;LLMOP% Function Code Definitions
.LLMIN==:^D0 ;Low fence
.ELDIR==:^D0 ;Ethernet Loop Direct
.ELAST==:^D1 ;Ethernet Loop Assisted
.ELRPY==:^D2 ;Ethernet Loop Read Reply
.ELAIC==:^D3 ;Ethernet Loop Assign Interrupt Channel
.ELABT==:^D4 ;Ethernet Loop Abort
.ELSTS==:^D5 ;Ethernet Loop Request Status
.RCRID==:^D6 ;Remote Console Read Identity
.RCRCT==:^D7 ;Remote Console Read Counters
.RCIDS==:^D8 ;Remote Console Identify Self
.RCRBT==:^D9 ;Remote Console Remote Boot
.RCRPY==:^D10 ;Remote Console Read Reply
.RCRSV==:^D11 ;Reserve Remote Console
.RCREL==:^D12 ;Release Remote Console
.RCSND==:^D13 ;Send Console Command
.RCPOL==:^D14 ;Console Response Poll
.RCAIC==:^D15 ;Remote Console Assign Interrupt Channel
.RCABT==:^D16 ;Remote Console Abort Request
.RCSTS==:^D17 ;Remote Console Request Status
.RCADR==:^D18 ;Obtain Channel Addresses
.LLMAX==:^D18 ;High fence
;LLMOP% Argument Block Definitions
;Common prefix for all functions
.LMCID==:0 ;Channel Id and Flags
LM%MRF==:MASKB(0,0) ;More Replies Flag
;For .RCSND only
LM%CBF==:MASKB(16,16) ;Command Break Flag
LM%MNO==:MASKB(17,17) ;Message Number
LM%CCF==:LM%MNO!LM%CBF ;Console Command Control Flags
;For .RCPOL only
LM%RDL==:MASKB(7,7) ;Receive Data Lost Flag
LM%RDO==:MASKB(15,15) ;Response Data Lost Flag
LM%CDL==:MASKB(16,16) ;Command Data Lost Flag
LM%RCF==:LM%MNO!LM%RDO!LM%CDL ;Console Response Control Flags
LM%CID==:MASKB(34,35) ;Channel-id
;Suffix for .RCRID,.RCRCT,.RCIDS,.RCRBT,
; .RCRSV,.RCREL,.RCSND,.RCPOL,
; .RCRPY,.ELDIR,.ELAST,.ELRPY
.LMDST==:1 ;Destination Address
.LMSRC==:.LMDST ;Source Address for .ELRPY and .RCRPY only
LM%MCA==:MASKB(7,7) ;Multicast Address Bit
LM%AB0==:MASKB(0,7) ;Address Byte 0
LM%AB1==:MASKB(8,15) ;Address Byte 1
LM%AB2==:MASKB(16,23) ;Address Byte 2
LM%AB3==:MASKB(24,31) ;Address Byte 3
LM%AB4==:LM%AB0 ;Address Byte 4
LM%AB5==:LM%AB1 ;Address Byte 5
;Suffix for .ELSTS,.RCSTS
.LMSTF==:1 ;Request Status and Flags
LM%RTC==:MASKB(18,35) ;Status Return Code
.LMPND==:0 ;Request Pending, Not Complete
.LMSUC==:1 ;Success, Complete
.LMABT==:2 ;Aborted
.LMTXF==:3 ;Transmit Failed
.LMCCE==:4 ;Channel Communication Error
.LMCST==:2 ;KLNI Channel Status
;Suffix for .RCAIC,.ELAIC
.LMICF==:1 ;Interrupt channel and flags
LM%AIC==:MASKB(0,0) ;Assign Interrupt Channel
LM%ENU==:MASKB(1,1) ;Enable Unsolicited Receipt
LM%ICH==:MASKB(12,17) ;Interrupt Channel Number
;Suffix for .RCADR
.LMHWA==:1 ;Local KLNI channel hardware address
.LMPYA==:3 ;Local KLNI channel current physical address
;Suffix for .RCRID,.RCRCT,.RCSND,.ELDIR,.ELAST,.ELRPY,.RCRPY,.RCPOL
; .ELSTS,.RCSTS,.ELABT,.RCABT
.LMREQ==:3 ;Request Number
.LMPID==:.LMREQ ;Remote Console Port Id
LM%PID==:MASKB(0,17) ;Port Id
LM%REQ==:MASKB(18,35) ;Request Id
;Suffix for .RCRBT Remote Boot and .RCRSV Reserve Console
.LMPWD==:3 ;Password Verification Code
.LMCIF==:5 ;Control Information
LM%BSV==:MASKB(27,27) ;Boot Server
.LMSDF==:0 ;System Default
.LMRSS==:1 ;Requesting System
LM%BDV==:MASKB(26,26) ;Boot Device
.LMSDF==:0 ;System Default
.LMRSD==:1 ;Specified Device
LM%PRO==:MASKB(28,35) ;Processor to Boot
.LMSSP==:0 ;System Processor
.LMCMP==:1 ;Communications Processor
.LMDID==:6 ;Device Id
.LMSID==:7 ;Software Id
;Suffix for .ELRPY,.RCRPY,.RCPOL,.RCSND,.ELDIR,.ELAST
.LMRBL==:4 ;LLMOP Response Buffer Length
LM%RML==:MASKB(0,17) ;Returned Message Length
LM%MBL==:MASKB(18,35) ;Maximum Buffer Length
.LMRBP==:5 ;LLMOP Response Buffer Pointer
.LMLBL==:.LMRBL ;Loop Buffer Length
.LMLBP==:.LMRBP ;Loop Buffer Pointer
.LMLDL==:.LMRBL ;Loopback Data Length
.LMLDP==:.LMRBP ;Loopback Data Pointer
;Suffix for .ELAST
.LMAST==:6 ;Assistant Address
.LMHLP==:10 ;Assistant Level
.LMXMT==:1 ;Transmit
.LMRCV==:2 ;Receive
.LMFUL==:3 ;Full
;~6.0
;LNMST
.LNSJB==:0 ;GET JOB WIDE DEFINITION OF A LN
.LNSSY==:1 ;GET SYSTEM DEFINITION OF A LOGICAL NAME
;LOCK
LK%CNT==:1B0 ;USE COUNT IN AC3
LK%PHY==:1B1 ;USE AC1 AS PHYSICAL PAGE NUMBER
LK%NCH==:1B2 ;MAP PAGES CACHE INHIBITED
LK%AOL==:1B3 ;ALLOW LOCKING IN OFFLINE PAGES
LK%EPN==:1B4 ;PAGE NUMBER IS ABSOLUTE NOT SECTION RELATIVE
;METER JSYS DEFS.
.MEREA==:1 ;READ EBOX TICKS
.MERMA==:2 ;READ MBOX TICKS
;MSTR
.MSRNU==:0 ;READ STATUS OF NEXT DISK UNIT
.MSRUS==:1 ;READ STATUS OF A DISK UNIT
.MSRCH==:0 ;CHANNEL NUMBER
.MSRCT==:1 ;CONTROLLER NUMBER
.MSRUN==:2 ;UNIT NUMBER
.MSRST==:3 ;STATUS
MS%MNT==:1B0 ;THIS UNIT IS PART OF A MOUNTED STRUCTURE
MS%16B==:1B1 ;THIS UNIT WRITTEN IN 16-BIT MODE
; (RESERVED FOR FUTURE)
MS%DIA==:1B2 ;THIS UNIT IS CURRENTLY IN USE BY AN
; ON-LINE DIAGNOSTIC
MS%OFL==:1B3 ;THIS UNIT IS OFF-LINE
MS%ERR==:1B4 ;THERE WAS AN ERROR READING THIS UNIT
MS%BBB==:1B5 ;ONE OF THE BAT BLOCKS IS BAD
MS%HBB==:1B6 ;ONE OF THE HOME BLOCKS IS BAD
MS%WLK==:1B7 ;UNIT IS WRITE-LOCKED
MS%2PT==:1B8 ;UNIT IS POTENTIALLY DUAL-PORTED BETWEEN SYSTEMS
MS%TYP==:777B17 ;DISK TYPE CODE
; DEFINED THE SAME AS .UTTXX IN PHYPAR
.MSRP4==:1 ;RP04
.MSRP5==:5 ;RP05
.MSRP6==:6 ;RP06
.MSRP7==:7 ;RP07
.MSRM3==:11 ;RM03
.MSR20==:24 ;RP20
.MSR80==:27 ;RA80
.MSR81==:30 ;RA81
.MSR60==:31 ;RA60
MS%SVD==:1B18 ;UNIT IS SERVED (ONLINE VIA MSCP SERVER)
MS%IAC==:1B19 ;Unit is inaccessible due to homeblock checking
.MSRSN==:4 ;STRUCTURE NAME
.MSRSA==:5 ;STRUCTURE ALIAS
.MSRNS==:6 ;UNIT # IN STRUCTURE,,# OF UNITS IN STRUCTURE
.MSRSW==:7 ;NUMBER OF PAGES FOR SWAPPING
.MSRUI==:10 ;UNIT ID
.MSROI==:13 ;OWNER ID
.MSRFI==:16 ;FILE-SYSTEM ID
.MSRSP==:21 ;NUMBER OF SECTORS PER PAGE
.MSRSC==:22 ;NUMBER OF SECTORS PER CYLINDER
.MSRPC==:23 ;NUMBER OF PAGES PER CYLINDER
.MSRCU==:24 ;NUMBER OF CYLINDERS PER UNIT
.MSRSU==:25 ;NUMBER OF SECTORS PER UNIT
.MSRBT==:26 ;NUMBER OF BIT-WORDS IN BIT TABLE PER CYLINDER
.MSRSE==:27 ;CPU SERIAL # IF STRUCTURE IS USED FOR BOOTING
.MSRLS==:30 ;NUMBER OF LOST SECTORS PER CYLINDER
.MSRSS==:31 ;NUMBER OF SECTORS PER SURFACE
.MSDSH==:32 ;HIGH ORDER DRIVE SERIAL NUMBER
.MSDSN==:33 ;LOW ORDER DRIVE SERIAL NUMBER
.MSTSP==:34 ;TRUE NUMBER OF SECTORS PER PAGE
.MSMID==:35 ;MAINTANENCE ID - ID ALL PACKS IN STR
.MSRLN==:36 ;MAX LENGTH OF ARGUMENT BLOCK IN WORDS
.MSMNT==:2 ;MOUNT A STRUCTURE
.MSTNM==:0 ;NAME OF STRUCTURE
.MSTAL==:1 ;ALIAS NAME
.MSTNU==:2 ;NUMBER OF UNITS IN STRUCTURE
.MSTFL==:2 ;FLAGS (LHS)
MS%FLG==:777777,,0 ;MASK FOR .MSTFL
MS%NFH==:1B0 ;NO FIX BAD HOME BLOCK
MS%NFB==:1B1 ;NO FIX BAD BAT BLOCK
MS%XCL==:1B2 ;MOUNT FOR EXCLUSIVE USE BY JOB
MS%IGN==:1B3 ;IGNORE ERRORS
MS%EXL==:1B4 ;CFS mount exclusive
.MSTUI==:3 ;START OF UNIT INFORMATION
.MSTCH==:0 ;CHANNEL