; TWENEX system bits ; This file is generated from MONSYM.MAC by the Convert Monsym macro ; in the MACCNV EMACS library. .AUXIL IFNDEF DEFSYM,[;ALLOW USER TO USE SYMBOLS IN OTHER WAYS IF HE WISHES. ;BUT NORMALLY, DEFSYM FOO==BAR DOES FOO==BAR WITH ERROR CHECK. DEFINE DEFSYM X/ IRPS Z,,[X] IFNDEF Z,.QUOTE/.QUOTE/X .ELSE [ $$TEM1==Z .QUOTE/.QUOTE/X IFN Z-$$TEM1,.ERR Z MULTIPLY .QUOTE`.QUOTE/DEFINED/` ] .ISTOP TERMIN TERMIN IFLE .MLLIT,.ERR .MLLIT MUST BE 1; SETTING IT TO 1. .MLLIT==1 $$TEMP==1 ] .ELSE $$TEMP==0 DEFSYM LOGIN=:JSYS 1 DEFSYM CRJOB=:JSYS 2 DEFSYM LGOUT=:JSYS 3 DEFSYM CACCT=:JSYS 4 DEFSYM EFACT=:JSYS 5 DEFSYM SMON=:JSYS 6 DEFSYM TMON=:JSYS 7 DEFSYM GETAB=:JSYS 10 DEFSYM ERSTR=:JSYS 11 DEFSYM GETER=:JSYS 12 DEFSYM GJINF=:JSYS 13 DEFSYM TIME=:JSYS 14 DEFSYM RUNTM=:JSYS 15 DEFSYM SYSGT=:JSYS 16 DEFSYM GNJFN=:JSYS 17 DEFSYM GTJFN=:JSYS 20 DEFSYM OPENF=:JSYS 21 DEFSYM CLOSF=:JSYS 22 DEFSYM RLJFN=:JSYS 23 DEFSYM GTSTS=:JSYS 24 DEFSYM STSTS=:JSYS 25 DEFSYM DELF=:JSYS 26 DEFSYM SFPTR=:JSYS 27 DEFSYM JFNS=:JSYS 30 DEFSYM FFFFP=:JSYS 31 DEFSYM RDDIR=:JSYS 32 DEFSYM CPRTF=:JSYS 33 DEFSYM CLZFF=:JSYS 34 DEFSYM RNAMF=:JSYS 35 DEFSYM SIZEF=:JSYS 36 DEFSYM GACTF=:JSYS 37 DEFSYM STDIR=:JSYS 40 DEFSYM DIRST=:JSYS 41 DEFSYM BKJFN=:JSYS 42 DEFSYM RFPTR=:JSYS 43 DEFSYM CNDIR=:JSYS 44 DEFSYM RFBSZ=:JSYS 45 DEFSYM SFBSZ=:JSYS 46 DEFSYM SWJFN=:JSYS 47 DEFSYM BIN=:JSYS 50 DEFSYM BOUT=:JSYS 51 DEFSYM SIN=:JSYS 52 DEFSYM SOUT=:JSYS 53 DEFSYM RIN=:JSYS 54 DEFSYM ROUT=:JSYS 55 DEFSYM PMAP=:JSYS 56 DEFSYM RPACS=:JSYS 57 DEFSYM SPACS=:JSYS 60 DEFSYM RMAP=:JSYS 61 DEFSYM SACTF=:JSYS 62 DEFSYM GTFDB=:JSYS 63 DEFSYM CHFDB=:JSYS 64 DEFSYM DUMPI=:JSYS 65 DEFSYM DUMPO=:JSYS 66 DEFSYM DELDF=:JSYS 67 DEFSYM ASND=:JSYS 70 DEFSYM RELD=:JSYS 71 DEFSYM CSYNO=:JSYS 72 DEFSYM PBIN=:JSYS 73 DEFSYM PBOUT=:JSYS 74 DEFSYM PSIN=:JSYS 75 DEFSYM PSOUT=:JSYS 76 DEFSYM MTOPR=:JSYS 77 DEFSYM CFIBF=:JSYS 100 DEFSYM CFOBF=:JSYS 101 DEFSYM SIBE=:JSYS 102 DEFSYM SOBE=:JSYS 103 DEFSYM DOBE=:JSYS 104 DEFSYM GTABS=:JSYS 105 DEFSYM STABS=:JSYS 106 DEFSYM RFMOD=:JSYS 107 DEFSYM SFMOD=:JSYS 110 DEFSYM RFPOS=:JSYS 111 DEFSYM RFCOC=:JSYS 112 DEFSYM SFCOC=:JSYS 113 DEFSYM STI=:JSYS 114 DEFSYM DTACH=:JSYS 115 DEFSYM ATACH=:JSYS 116 DEFSYM DVCHR=:JSYS 117 DEFSYM STDEV=:JSYS 120 DEFSYM DEVST=:JSYS 121 DEFSYM MOUNT=:JSYS 122 DEFSYM DSMNT=:JSYS 123 DEFSYM INIDR=:JSYS 124 DEFSYM SIR=:JSYS 125 DEFSYM EIR=:JSYS 126 DEFSYM SKPIR=:JSYS 127 DEFSYM DIR=:JSYS 130 DEFSYM AIC=:JSYS 131 DEFSYM IIC=:JSYS 132 DEFSYM DIC=:JSYS 133 DEFSYM RCM=:JSYS 134 DEFSYM RWM=:JSYS 135 DEFSYM DEBRK=:JSYS 136 DEFSYM ATI=:JSYS 137 DEFSYM DTI=:JSYS 140 DEFSYM CIS=:JSYS 141 DEFSYM SIRCM=:JSYS 142 DEFSYM RIRCM=:JSYS 143 DEFSYM RIR=:JSYS 144 DEFSYM GDSTS=:JSYS 145 DEFSYM SDSTS=:JSYS 146 DEFSYM RESET=:JSYS 147 DEFSYM RPCAP=:JSYS 150 DEFSYM EPCAP=:JSYS 151 DEFSYM CFORK=:JSYS 152 DEFSYM KFORK=:JSYS 153 DEFSYM FFORK=:JSYS 154 DEFSYM RFORK=:JSYS 155 DEFSYM RFSTS=:JSYS 156 DEFSYM SFORK=:JSYS 157 DEFSYM SFACS=:JSYS 160 DEFSYM RFACS=:JSYS 161 DEFSYM HFORK=:JSYS 162 DEFSYM WFORK=:JSYS 163 DEFSYM GFRKH=:JSYS 164 DEFSYM RFRKH=:JSYS 165 DEFSYM GFRKS=:JSYS 166 DEFSYM DISMS=:JSYS 167 DEFSYM HALTF=:JSYS 170 DEFSYM GTRPW=:JSYS 171 DEFSYM GTRPI=:JSYS 172 DEFSYM RTIW=:JSYS 173 DEFSYM STIW=:JSYS 174 DEFSYM SOBF=:JSYS 175 DEFSYM RWSET=:JSYS 176 DEFSYM GETNM=:JSYS 177 DEFSYM GET=:JSYS 200 DEFSYM SFRKV=:JSYS 201 DEFSYM SAVE=:JSYS 202 DEFSYM SSAVE=:JSYS 203 DEFSYM SEVEC=:JSYS 204 DEFSYM GEVEC=:JSYS 205 DEFSYM GPJFN=:JSYS 206 DEFSYM SPJFN=:JSYS 207 DEFSYM SETNM=:JSYS 210 DEFSYM FFUFP=:JSYS 211 DEFSYM DIBE=:JSYS 212 DEFSYM FDFRE=:JSYS 213 DEFSYM GDSKC=:JSYS 214 DEFSYM LITES=:JSYS 215 DEFSYM TLINK=:JSYS 216 DEFSYM STPAR=:JSYS 217 DEFSYM ODTIM=:JSYS 220 DEFSYM IDTIM=:JSYS 221 DEFSYM ODCNV=:JSYS 222 DEFSYM IDCNV=:JSYS 223 DEFSYM NOUT=:JSYS 224 DEFSYM NIN=:JSYS 225 DEFSYM STAD=:JSYS 226 DEFSYM GTAD=:JSYS 227 DEFSYM ODTNC=:JSYS 230 DEFSYM IDTNC=:JSYS 231 DEFSYM FLIN=:JSYS 232 DEFSYM FLOUT=:JSYS 233 DEFSYM DFIN=:JSYS 234 DEFSYM DFOUT=:JSYS 235 DEFSYM CRDIR=:JSYS 240 DEFSYM GTDIR=:JSYS 241 DEFSYM DSKOP=:JSYS 242 DEFSYM SPRIW=:JSYS 243 DEFSYM DSKAS=:JSYS 244 DEFSYM SJPRI=:JSYS 245 DEFSYM STO=:JSYS 246 DEFSYM ARCF=:JSYS 247 DEFSYM ASNDP=:JSYS 260 DEFSYM RELDP=:JSYS 261 DEFSYM ASNDC=:JSYS 262 DEFSYM RELDC=:JSYS 263 DEFSYM STRDP=:JSYS 264 DEFSYM STPDP=:JSYS 265 DEFSYM STSDP=:JSYS 266 DEFSYM RDSDP=:JSYS 267 DEFSYM WATDP=:JSYS 270 DEFSYM GTNCP=:JSYS 272 DEFSYM GTHST=:JSYS 273 DEFSYM ATNVT=:JSYS 274 DEFSYM CVSKT=:JSYS 275 DEFSYM CVHST=:JSYS 276 DEFSYM FLHST=:JSYS 277 DEFSYM GCVEC=:JSYS 300 DEFSYM SCVEC=:JSYS 301 DEFSYM STTYP=:JSYS 302 DEFSYM GTTYP=:JSYS 303 DEFSYM BPT=:JSYS 304 DEFSYM GTDAL=:JSYS 305 DEFSYM WAIT=:JSYS 306 DEFSYM HSYS=:JSYS 307 DEFSYM USRIO=:JSYS 310 DEFSYM PEEK=:JSYS 311 DEFSYM MSFRK=:JSYS 312 DEFSYM ESOUT=:JSYS 313 DEFSYM SPLFK=:JSYS 314 DEFSYM ADVIS=:JSYS 315 DEFSYM JOBTM=:JSYS 316 DEFSYM DELNF=:JSYS 317 DEFSYM SWTCH=:JSYS 320 DEFSYM TFORK=:JSYS 321 DEFSYM RTFRK=:JSYS 322 DEFSYM UTFRK=:JSYS 323 DEFSYM SCTTY=:JSYS 324 DEFSYM OPRFN=:JSYS 326 DEFSYM SETER=:JSYS 336 ;159 Begin addition DEFSYM PUPI=:JSYS 441 DEFSYM PUPO=:JSYS 442 DEFSYM PUPNM=:JSYS 443 DEFSYM PUPSK=:JSYS 444 ;159 End addition ;NEW (NOT IN BBN TENEX) JSYS'S ADDED STARTING AT 500 DEFSYM RSCAN=:JSYS 500 DEFSYM HPTIM=:JSYS 501 DEFSYM CRLNM=:JSYS 502 DEFSYM INLNM=:JSYS 503 DEFSYM LNMST=:JSYS 504 DEFSYM RDTXT=:JSYS 505 DEFSYM SETSN=:JSYS 506 DEFSYM GETJI=:JSYS 507 DEFSYM MSEND=:JSYS 510 DEFSYM MRECV=:JSYS 511 DEFSYM MUTIL=:JSYS 512 DEFSYM ENQ=:JSYS 513 DEFSYM DEQ=:JSYS 514 DEFSYM ENQC=:JSYS 515 DEFSYM SNOOP=:JSYS 516 DEFSYM SPOOL=:JSYS 517 DEFSYM ALLOC=:JSYS 520 DEFSYM CHKAC=:JSYS 521 DEFSYM TIMER=:JSYS 522 DEFSYM RDTTY=:JSYS 523 DEFSYM TEXTI=:JSYS 524 DEFSYM UFPGS=:JSYS 525 DEFSYM SFPOS=:JSYS 526 DEFSYM SYERR=:JSYS 527 DEFSYM DIAG=:JSYS 530 DEFSYM SINR=:JSYS 531 DEFSYM SOUTR=:JSYS 532 DEFSYM RFTAD=:JSYS 533 DEFSYM SFTAD=:JSYS 534 DEFSYM TBDEL=:JSYS 535 DEFSYM TBADD=:JSYS 536 DEFSYM TBLUK=:JSYS 537 DEFSYM STCMP=:JSYS 540 DEFSYM SETJB=:JSYS 541 DEFSYM GDVEC=:JSYS 542 DEFSYM SDVEC=:JSYS 543 DEFSYM COMND=:JSYS 544 DEFSYM PRARG=:JSYS 545 DEFSYM GACCT=:JSYS 546 DEFSYM LPINI=:JSYS 547 DEFSYM GFUST=:JSYS 550 DEFSYM SFUST=:JSYS 551 DEFSYM ACCES=:JSYS 552 DEFSYM RCDIR=:JSYS 553 DEFSYM RCUSR=:JSYS 554 DEFSYM MSTR=:JSYS 555 DEFSYM STPPN=:JSYS 556 DEFSYM PPNST=:JSYS 557 DEFSYM PMCTL=:JSYS 560 DEFSYM PLOCK=:JSYS 561 DEFSYM BOOT=:JSYS 562 DEFSYM UTEST=:JSYS 563 DEFSYM USAGE=:JSYS 564 DEFSYM WILD=:JSYS 565 DEFSYM VACCT=:JSYS 566 DEFSYM NODE=:JSYS 567 DEFSYM ADBRK=:JSYS 570 DEFSYM SINM=:JSYS 571 DEFSYM SOUTM=:JSYS 572 DEFSYM SWTRP=:JSYS 573 DEFSYM GETOK=:JSYS 574 DEFSYM RCVOK=:JSYS 575 DEFSYM GIVOK=:JSYS 576 DEFSYM SKED=:JSYS 577 DEFSYM MTU=:JSYS 600 DEFSYM XRIR=:JSYS 601 DEFSYM XSIR=:JSYS 602 DEFSYM GTBLT=:JSYS 634 DEFSYM VTSOP=:JSYS 635 DEFSYM RTMOD=:JSYS 636 DEFSYM STMOD=:JSYS 637 DEFSYM RTCHR=:JSYS 640 DEFSYM STCHR=:JSYS 641 DEFSYM DBGIM=:JSYS 677 ;TEMPORARY JSYS DEFINITIONS ;151 Begin addition DEFSYM SEND=:JSYS 740 DEFSYM RECV=:JSYS 741 DEFSYM OPEN=:JSYS 742 DEFSYM CLOSE=:JSYS 743 DEFSYM SCSLV=:JSYS 744 DEFSYM STAT=:JSYS 745 DEFSYM CHANL=:JSYS 746 DEFSYM ABORT=:JSYS 747 ;151 End addition ;TEMPORARY JSYS DEFINITIONS DEFSYM SNDIM=:JSYS 750 DEFSYM RCVIM=:JSYS 751 DEFSYM ASNSQ=:JSYS 752 DEFSYM RELSQ=:JSYS 753 ;151 Begin addition DEFSYM SNDIN=:JSYS 754 DEFSYM RCVIN=:JSYS 755 DEFSYM ASNIQ=:JSYS 756 DEFSYM RELIQ=:JSYS 757 ;151 End addition DEFSYM METER=:JSYS 766 DEFSYM SMAP=:JSYS 767 DEFSYM THIBR=:JSYS 770 DEFSYM TWAKE=:JSYS 771 DEFSYM MRPAC=:JSYS 772 DEFSYM SETPV=:JSYS 773 DEFSYM MTALN=:JSYS 774 DEFSYM TTMSG=:JSYS 775 DEFSYM MDDT=:JSYS 777 ;ERROR CONDITION INSTRUCTIONS. THESE ARE NOP'S UNLESS IMMEDIATELY ;FOLLOWING A JSYS WHICH FAILS. DEFSYM ERJMP=:JUMP 16,0 ;JUMP ON ERROR DEFSYM ERCAL=:JUMP 17,0 ;CALL ON ERROR (SIMULATE PUSHJ 17,ADR) ; THE FOLLOWING OPCODES ARE USED TO PERFORM THE EXTENDED ; ADDRESSING FUNCTIONS. DEFSYM XJRSTF=: ;RESTORE FLAGS AND PC DEFSYM XJEN=: ;RESTORE FLAGS,PC AND DISMISS DEFSYM XPCW=: ;EXCHANGE FLAGS AND PC DEFSYM XSFM=: ;SAVE PC FLAGS IN MEMORY DEFSYM XMOVEI=: ;EXTENDED MOVEI DEFSYM XHLLI=: ;INSTRUCTION TO PUT IMMEDIATE ADDRESS IN LH ;OTHER VARIANTS OF JRST DEFSYM PORTAL=: DEFSYM JRSTF=: DEFSYM JEN=: DEFSYM IFIW==:1_35. ;INSTRUCTION FORMAT INDIRECT WORD DEFSYM EFIW==:0 ;EXTENDED FORMAT INDIRECT WORD ;THE NO-OPERATION INSTRUCTION (MAY CHANGE FROM PROCESSOR TO PROCESSOR) DEFSYM NOP=: ;SPECIAL LOSEG SYMBOLS DEFSYM .JBHSO==:75 ; 0 ,, HIGHSEG ORIGIN PAGE NUMBER DEFSYM .JBEDV==:112 ;POINTER TO EXEC DATA VECTOR DEFSYM .EDCNT==:0 ;'EDV',,COUNT (INCLUDES THIS WORD) DEFSYM .EDHSB==:1 ;POINTER TO HIDDEN SYMBOL MAP SWITCHING BLOCK DEFSYM .EDSYM==:2 ;.JBSYM IN SYMBOL SPACE DEFSYM .EDUSY==:3 ;.JBUSY IN SYMBOL SPACE DEFSYM .EDHSF==:4 ;POINTER TO SYMBOLS HIDDEN FLAG WORD ;***************************************** ;JSYS SPECIFIC ARGUMENTS ;THE FOLLOWING ARE ORDERED ALPHABETICALLY BY JSYS NAME ;***************************************** ;ACCES - ACCESS A DIRECTORY (E.G., BY CONNECTING) DEFSYM AC%CON==:1_35. ;CONNECT TO THE SPECIFIED DIRECTORY DEFSYM AC%OWN==:1_34. ;GAIN OWNERSHIP DEFSYM AC%REM==:1_33. ;REMOVE OWNERSHIP ;OFFSETS IN ARGUMENT BLOCK DEFSYM .ACDIR==:0 ;DIRECTORY DESIGNATOR DEFSYM .ACPSW==:1 ;POINTER TO PASSWORD STRING DEFSYM .ACJOB==:2 ;JOB NUMBER (-1 FOR SELF) ;ADBRK - Address break JSYS function codes and bits ;FUNCTION CODES DEFSYM .ABSET==:0 ;SET USER ADDRESS BREAK DEFSYM .ABRED==:1 ;READ USER ADDRESS BREAK DEFSYM .ABCLR==:2 ;CLEAR USER ADDRESS BREAK DEFSYM .ABGAD==:3 ;GET ADDRESS OF TRAPPED INSTRUCTION ;FUNCTION BITS FOR FUNCTION .ABSET DEFSYM AB%RED==:1_35. ;READ DEFSYM AB%WRT==:1_34. ;WRITE DEFSYM AB%XCT==:1_33. ;EXECUTE ;ALLOC JSYS FUNCTION CODES DEFSYM .ALCAL==:0 ;ALLOCATE A DEVICE ; ARCF DEFSYM .ARRAR==:0 ; Request file archive (user) DEFSYM .ARCLR==:0 ; Clear the request DEFSYM .ARSET==:1 ; Set the request ; AR%NDL can be specified in AC2, defined elsewhere DEFSYM .ARRIV==:1 ; Request file migration (system) DEFSYM .AREXM==:2 ; File exempt from migration (system) DEFSYM .ARRFR==:3 ; Request file's contents be restored to disk DEFSYM AR%NMS==:1_35. ; Request no msg on restoration DEFSYM AR%WAT==:1_34. ; Wait for file to be restored to disk DEFSYM .ARDIS==:4 ; Clear archive status for file DEFSYM AR%CR1==:1_35. ; Clear 1st run info DEFSYM AR%CR2==:1_34. ; Clear 2nd run info DEFSYM .ARSST==:5 ; Set archive status for file DEFSYM .AROFL==:0 ; Flags DEFSYM AR%O1==:1_35. ; Set run 1 info DEFSYM AR%O2==:1_34. ; Set run 2 info DEFSYM AR%OFL==:1_33. ; Flush contents of file DEFSYM AR%ARC==:1_32. ; Set FB%ARC (archive the file) DEFSYM AR%CRQ==:1_31. ; Clear archive/migration request DEFSYM .ARTP1==:1 ; Tape 1 ID DEFSYM .ARSF1==:2 ; XWD TSN 1, TFN 1 DEFSYM AR%TSN==:777777_18. ; Tape saveset number DEFSYM AR%TFN==:777777_0. ; Tape file number DEFSYM .ARTP2==:3 ; Tape 2 ID DEFSYM .ARSF2==:4 ; XWD TSN 2, TFN 2 ;;; AR%TSN==:777777B17 ; Tape saveset number ;;; AR%TFN==:777777B35 ; Tape file number DEFSYM .ARODT==:5 ; Date and time DEFSYM .ARPSZ==:6 ; Number of pages in the file (.ARGST only) DEFSYM .ARRST==:6 ; Restore contents to archived file DEFSYM .ARGST==:7 ; Get tape info for file (blk as for ARSST) DEFSYM .ARRFL==:10 ; Retrieve failed DEFSYM .ARNAR==:11 ; Set/clear resist archive ; Function & reason codes for IPCF msgs DEFSYM .RETM==:0 ; Send retrieve message DEFSYM .RETR==:0 ; Normal retrieve DEFSYM .RETRW==:1 ; User waiting for retrieve DEFSYM .NOTM==:1 ; Send notification message DEFSYM .FLXP==:0 ; Archive file expunged DEFSYM .ACLR==:1 ; Archive status cleared ;ATNVT ;TOPS20AN DEFSYM AN%NTP==:1_33. ;TOPS20AN ;NEW TELNET PROTOCOL DEFSYM AN%SUP==:1_32. ;99 SUPDUP protocol ;ATACH DEFSYM AT%CCJ==:1_35. ;^C JOB WHEN ATTACHED DEFSYM AT%NAT==:1_34. ;NO ATTACH DEFSYM AT%TRM==:1_33. ;ATTACH JOB TO TERMINAL IN REGISTER 4 DEFSYM AT%JOB==:777777_0. ;JOB NUMBER ;BOOT DEFSYM .BTROM==:0 ;ACTIVATE ROM BOOT DEFSYM .BTDTE==:0 ;DTE-20 NUMBER DEFSYM .BTLDS==:1 ;LOAD SECONDARY BOOTSTRAP PROGRAM DEFSYM .BTERR==:1 ;ERROR FLAGS DEFSYM .BTSEC==:2 ;ADDRESS OF SECONDARY BOOTSTRAP PROGRAM DEFSYM .BTLOD==:2 ;LOAD MEMORY (OBSOLETE) DEFSYM .BTSMP==:2 ;SEND MOP MESSAGE DEFSYM .BTFLG==:3 ;FLAGS DEFSYM BT%BEL==:1_35. ;SEND TO -11 DOORBELL AFTER SETUP DEFSYM .BTCNT==:4 ;NUMBER OF BYTES TO BE TRANSFERRED DEFSYM .BTLPT==:5 ;BYTE POINTER TO DATA TO BE LOADED DEFSYM .BTDMP==:3 ;DUMP MEMORY DEFSYM .BTDPT==:5 ;BYTE POINTER TO DESTINATION OF DUMPED DATA DEFSYM .BTIPR==:4 ;INITIALIZE COMMUNICATIONS PROTOCOL DEFSYM .BTPRV==:1 ;PROTOCOL VERSION NUMBER DEFSYM .BTTPR==:5 ;TERMINATE COMMUNICATIONS PROTOCOL DEFSYM .BTSTS==:6 ;RETURN PROTOCOL STATUS DEFSYM .BTCOD==:1 ;STATUS CODE DEFSYM .BTBEL==:7 ;WAIT FOR DOORBELL DEFSYM .BTRMP==:10 ;READ MOP MESSAGE DEFSYM .BTMPT==:5 ;POINTER TO DESTINATION FOR MOP MESSAGE DEFSYM .BTKML==:11 ;LOAD KMC11 DEFSYM .BTKMC==:0 ;KMC11 ADDRESS DEFSYM .BTKER==:1 ;ERROR FLAGS DEFSYM BT%CVE==:1_35. ;CRAM VERIFY ERROR (RH IS BAD DATA) DEFSYM BT%DVE==:1_34. ;DRAM VERIFY ERROR (RH IS BAD DATA) DEFSYM BT%RVE==:1_33. ;REG VERIFY ERROR (RH IS BAD DATA) DEFSYM .BTKCC==:2 ;COUNT OF CRAM DATA DEFSYM .BTKCP==:3 ;POINTER TO CRAM DATA (16 BIT DATA) DEFSYM .BTKDC==:4 ;COUNT OF DRAM DATA DEFSYM .BTKDP==:5 ;POINTER TO DRAM DATA (8 BIT DATA) DEFSYM .BTKRC==:6 ;COUNT OF REGISTER DATA DEFSYM .BTKRP==:7 ;POINTER TO REGISTER DATA (16 BIT DATA) DEFSYM .BTKSA==:10 ;RH IS STARTING ADDRESS DEFSYM BT%KSA==:1_35. ;IS SET RH WANT TO START KMC11 DEFSYM .BTKMD==:12 ;DUMP KMC11 DEFSYM .BTRLC==:13 ;RETURN LINE COUNTERS DEFSYM .BTPRT==:0 ;PORT NUMBER DEFSYM BT%ZRO==:1_35. ;CLEAR COUNTERS AFTER READING DEFSYM .BTZTM==:1 ;TIME SINCE COUNTERS HAVE BEEN ZEROED DEFSYM .BTSCC==:2 ;STATUS COUNT COUNT DEFSYM .BTSCP==:3 ;STATUS COUNT POINTER DEFSYM .BTRCC==:4 ;RECEIVE COUNT COUNT DEFSYM .BTRCP==:5 ;RECEIVE COUNT POINTER DEFSYM .BTTCC==:6 ;TRANSMIT COUNT COUNT DEFSYM .BTTCP==:7 ;TRANSMIT COUNT POINTER DEFSYM .BTCLI==:14 ;CONVERT LINEID TO PORT NUMBER DEFSYM .BTLID==:1 ;POINTER TO ASCIZ LINE-ID DEFSYM .BTCPN==:15 ;CONVERT PORT NUMBER TO LINE-ID DEFSYM .BTSTA==:16 ;SET STATION POLLING STATUS DEFSYM .BTSSP==:17 ;SET LINE STARTUP PRIORITY DEFSYM .BTPRI==:1 ;PRIORITY VALUE DEFSYM .BTSTP==:20 ;SET STATION POLLING PRIORITY DEFSYM .BTSDD==:21 ;SEND DDCMP MESSAGE DEFSYM .BTMSG==:1 ;ADDR OF MESSAGE DEFSYM .BTLEN==:2 ;BYTE COUNT OF MESSAGE DEFSYM .BTRDD==:22 ;RECEIVE A MESSAGE FROM DDCMP DEFSYM .BTSUP==:1 ;STATION CAME UP DEFSYM .BTSDW==:2 ;STATION WENT DOWN DEFSYM .BTCMP==:3 ;XMIT COMPLETE DEFSYM .BTSSF==:4 ;STARTUP FAILED DEFSYM BT%CTL==:1_35. ;CONTROL MESSAGE DEFSYM .BTCHN==:23 ;ASSIGN A SOFTWARE INTERRUPT CHANNEL DEFSYM .BTESI==:1 ;CHANNEL NUMBER ;CFORK DEFSYM CR%MAP==:1_35. ;SET MAP FOR NEW FORK TO POINT TO ; THIS PROCESS DEFSYM CR%CAP==:1_34. ;MAKE CAPABILITIES IDENTICAL DEFSYM CR%ACS==:1_32. ;SET ACS FROM BLOCK DEFSYM CR%ST==:1_31. ;START PROCESS AT PC DEFSYM CR%PCV==:777777_0. ;VALUE OF PC ;CHFDB DEFSYM CF%NUD==:1_35. ;NO UPDATE DIRECTORY DEFSYM CF%DSP==:777_18. ;FDB DISPLACEMENT DEFSYM CF%JFN==:777777_0. ;JFN ;CHKAC JSYS DEFINITIONS ;CHKAC FLAG DEFINITIONS DEFSYM CK%JFN==:1_35. ;JFN IS GIVEN AS AN ARGUMENT ;CHKAC ARGUMENT BLOCK OFFSET VALUES DEFSYM .CKAAC==:0 ;ACCESS CODE DEFSYM .CKALD==:1 ;LOGGED IN USER NUMBER OF USER DEFSYM .CKACD==:2 ;CONNECTED DIR NUMBER OF USER DEFSYM .CKAEC==:3 ;ENABLED CAPABILITIES OF USER BEING CHK'D DEFSYM .CKAUD==:4 ;DIR NUMBER OF DIRECTORY CONTAINING FILE DEFSYM .CKAPR==:5 ;PROTECTION OF FILE ;CHKAC ACCESS CODES DEFSYM .CKARD==:0 ;READ AN EXISTING FILE DEFSYM .CKAWT==:1 ;WRITE AN EXISTING FILE DEFSYM .CKAWR==:1 ; (ANOTHER NAME FOR ABOVE) DEFSYM .CKAEX==:2 ;EXECUTE AN EXISTING FILE DEFSYM .CKAAP==:3 ;APPEND TO AN EXISTING FILE DEFSYM .CKADL==:4 ;GET DIR LISTING OF AN EXISTING FILE DEFSYM .CKADR==:6 ;READ THE DIRECTORY DEFSYM .CKAOF==:7 ;OPEN FILES IN DIR (NOT IMPLEMENTED) DEFSYM .CKACN==:10 ;CONNECT TO A DIR DEFSYM .CKACF==:11 ;CREATE FILES IN DIR ;CLOSF DEFSYM CO%NRJ==:1_35. ;NO RELEASE JFN DEFSYM CO%WCL==:1_34. ;TOPS20AN ;WAIT UNTIL MATCHING CLS IS RECEIVED DEFSYM CO%JFN==:777777_0. ;JFN ;CLZFF DEFSYM CZ%NIF==:1_35. ;NO INFERIOR FORK FILES DEFSYM CZ%NSF==:1_34. ;NO SELF FORK FILES DEFSYM CZ%NRJ==:1_33. ;NO RELEASE JFN DEFSYM CZ%NCL==:1_32. ;NO CLOSE FILE DEFSYM CZ%UNR==:1_31. ;UNRESTRICT DEFSYM CZ%ARJ==:1_30. ;ALWAYS RELEASE JFN DEFSYM CZ%ABT==:1_29. ;ABORT DEFSYM CZ%NUD==:1_28. ;NO UPDATE DIRECTORY DEFSYM CZ%PRH==:777777_0. ;PROCESS HANDLE ;CNDIR DEFSYM CN%CKP==:1_35. ;CHECK PASSWORD ONLY DEFSYM CN%NOC==:1_34. ;NO CONNECT DEFSYM CN%JOB==:1_33. ;DOING CONNECT FOR ANOTHER JOB DEFSYM CN%DIR==:777777_0. ;DIRECTORY NUMBER ;COMND ;COMND - COMMAND STATE BLOCK DEFSYM .CMFLG==:0 ;USER FLAGS,,REPARSE DISPATCH ADDRESS DEFSYM .CMIOJ==:1 ;INJFN,,OUTJFN DEFSYM .CMRTY==:2 ;^R BUFFER POINTER DEFSYM .CMBFP==:3 ;PTR TO TOP OF BUFFER DEFSYM .CMPTR==:4 ;PTR TO NEXT INPUT TO BE PARSED DEFSYM .CMCNT==:5 ;COUNT OF SPACE LEFT IN BUFFER AFTER PTR DEFSYM .CMINC==:6 ;COUNT OF CHARACTERS FOLLOWING PTR DEFSYM .CMABP==:7 ;ATOM BUFFER POINTER DEFSYM .CMABC==:10 ;ATOM BUFFER SIZE DEFSYM .CMGJB==:11 ;ADR OF GTJFN ARG BLOCK DEFSYM CM%GJB==:777777 ;ADR OF GTJFN ARG BLOCK ;COMND - FUNCTION DESCRIPTOR BLOCK DEFSYM .CMFNP==:0 ;FUNCTION AND POINTER DEFSYM CM%FNC==:777_27. ;FUNCTION CODE DEFSYM CM%FFL==:777_18. ;FUNCTION-SPECIFIC FLAGS DEFSYM CM%LST==:777777 ;LIST POINTER TO OTHER BLOCKS DEFSYM .CMDAT==:1 ;DATA FOR FUNCTION DEFSYM .CMHLP==:2 ;HELP TEXT POINTER DEFSYM .CMDEF==:3 ;DEFAULT STRING POINTER DEFSYM .CMBRK==:4 ;FIELD BREAK MASK POINTER ;COMND - FLAGS IN .CMFLG DEFSYM CM%ESC==:1_35. ;ESC SEEN DEFSYM CM%NOP==:1_34. ;NO PARSE DEFSYM CM%EOC==:1_33. ;END OF COMMAND SEEN DEFSYM CM%RPT==:1_32. ;REPEAT PARSE NEEDED DEFSYM CM%SWT==:1_31. ;SWITCH TERMINATED WITH ":" DEFSYM CM%PFE==:1_30. ;PREVIOUS FIELD ENDED WITH ESC DEFSYM CM%RAI==:1_29. ;RAISE INPUT DEFSYM CM%XIF==:1_28. ;EXCLUDE INDIRECT FILES DEFSYM CM%WKF==:1_27. ;WAKEUP AFTER EACH FIELD ;FUNCTION BLOCK FLAGS (IN WORD .CMFNP) DEFSYM CM%BRK==:1_22. ;BREAK MASK PRESENT DEFSYM CM%PO==:1_21. ;PARSE-ONLY DEFSYM CM%HPP==:1_20. ;HELP POINTER PRESENT DEFSYM CM%DPP==:1_19. ;DEFAULT POINTER PRESENT DEFSYM CM%SDH==:1_18. ;SUPPRESS DEFAULT HELP MESSAGE ;FLAGS FOR CMDIR FUNCTION DEFSYM CM%DWC==:1_35. ;DIRECTORY WILD CARDING ALLOWED ;FLAGS FOR CMTAD FUNCTION DEFSYM CM%IDA==:1_35. ;INPUT DATE DEFSYM CM%ITM==:1_34. ;INPUT TIME DEFSYM CM%NCI==:1_33. ;NO CONVERT TO INTERNAL ;FLAGS IN KEYWORD TABLE (FIRST WORD OF STRING IF B0-6 = 0) DEFSYM CM%INV==:1_0. ;INVISIBLE DEFSYM CM%NOR==:1_1. ;NO-RECOGNIZE (PLACEHOLDER) DEFSYM CM%ABR==:1_2. ;ABBREVIATION FOR ANOTHER ENTRY DEFSYM CM%FW==:1_28. ;FLAG WORD (MUST ALWAYS BE ON) ;COMND - FUNCTION CODES DEFSYM .CMKEY==:0 ;KEYWORD DEFSYM .CMNUM==:1 ;NUMBER DEFSYM .CMNOI==:2 ;NOISE WORD DEFSYM .CMSWI==:3 ;SWITCH DEFSYM .CMIFI==:4 ;INPUT FILE DEFSYM .CMOFI==:5 ;OUTPUT FILE DEFSYM .CMFIL==:6 ;GENERAL FILESPEC DEFSYM .CMFLD==:7 ;ARBITRARY FIELD DEFSYM .CMCFM==:10 ;CONFIRM DEFSYM .CMDIR==:11 ;DIRECTORY NAME DEFSYM .CMUSR==:12 ;USER NAME DEFSYM .CMCMA==:13 ;COMMA DEFSYM .CMINI==:14 ;INIT LINE DEFSYM .CMFLT==:15 ;FLOATING POINT NUMBER DEFSYM .CMDEV==:16 ;DEVICE NAME DEFSYM .CMTXT==:17 ;TEXT TO ACTION CHAR DEFSYM .CMTAD==:20 ;TIME AND DATE DEFSYM .CMQST==:21 ;QUOTED STRING DEFSYM .CMUQS==:22 ;UNQUOTED STRING DEFSYM .CMTOK==:23 ;TOKEN DEFSYM .CMNUX==:24 ;NUMBER DELIMITED BY NON-DIGIT DEFSYM .CMACT==:25 ;ACCOUNT DEFSYM .CMNOD==:26 ;NODE NAME ;CRDIR DEFSYM CD%LEN==:1_35. ;FLAGS ,, LENGTH OF CRDIR BLOCK DEFSYM CD%PSW==:1_34. ;SET PASSWORD STRING DEFSYM CD%LIQ==:1_33. ;SET LOGGED IN QUOTA DEFSYM CD%PRV==:1_32. ;SET PRIVILEGES DEFSYM CD%MOD==:1_31. ;SET MODE BITS DEFSYM CD%LOQ==:1_30. ;SET LOGGED OUT QUOTA DEFSYM CD%NUM==:1_29. ;SET DIRECTORY NUMBER FROM PARAM BLK DEFSYM CD%FPT==:1_28. ;SET DEFAULT FILE PROTECTION DEFSYM CD%DPT==:1_27. ;SET DIRECTORY PROTECTION DEFSYM CD%RET==:1_26. ;SET DEFAULT RETENTION COUNT DEFSYM CD%LLD==:1_25. ;SET LAST LOGIN DATE DEFSYM CD%UGP==:1_24. ;SET USER GROUPS DEFSYM CD%DGP==:1_23. ;SET DIRECTORY GROUPS DEFSYM CD%SDQ==:1_22. ;SET SUBDIRECTORY QUOTA DEFSYM CD%CUG==:1_21. ;SET CREATABLE USER GROUPS DEFSYM CD%DAC==:1_20. ;SET DEFAULT ACCOUNT DEFSYM CD%NMF==:1_19. ;11 DON'T MAKE A MAIL FILE DEFSYM CD%DEL==:1_18. ;DELETE DIRECTORY DEFSYM CD%APB==:777777_0. ;ADDRESS OF PARAMETER BLOCK DEFSYM .CDLEN==:0 ;LENGTH OF ARGUMENT BLOCK DEFSYM CD%NSQ==:1_35. ;DO NOT UPDATE QUOTAS OF SUPERIOR DIR DEFSYM CD%NCE==:1_34. ;DO NOT CHANGE PARAMETERS OF EXISTING DIRS DEFSYM CD%NED==:1_33. ; Set def online exp from .CDDNE DEFSYM CD%FED==:1_32. ; Set def offline exp from .CDDFE DEFSYM .CDPSW==:1 ;POINTER TO PASSWORD STRING DEFSYM .CDLIQ==:2 ;LOGGED IN QUOTA DEFSYM .CDPRV==:3 ;PRIVILEGE WORD DEFSYM .CDMOD==:4 ;MODE WORD DEFSYM CD%DIR==:1_35. ;DIRECTORY NAME FOR CNDIR ONLY (FILES ONLY) DEFSYM CD%ANA==:1_34. ;ALPHANUMERIC ACCOUNTS DEFSYM CD%RLM==:1_33. ;REPEAT LOGIN MESSAGES DEFSYM CD%HPW==:1_18. ;143 Supplying hashed password DEFSYM CD%DAR==:1_28. ; Archived online expired files DEFSYM .CDLOQ==:5 ;LOGGED OUT QUOTA DEFSYM .CDNUM==:6 ;DIRECTORY NUMBER DEFSYM .CDFPT==:7 ;DEFAULT FILE PROTECTION DEFSYM .CDDPT==:10 ;DIRECTORY PROTECTION DEFSYM .CDRET==:11 ;DEFAULT RETENTION COUNT DEFSYM .CDLLD==:12 ;LAST LOGIN DATE DEFSYM .CDUGP==:13 ;USER GROUPS DEFSYM .CDDGP==:14 ;DIRECTORY GROUPS DEFSYM .CDSDQ==:15 ;MAXIMUM NUMBER OF SUBDIRECTORIES DEFSYM .CDCUG==:16 ;POINTER TO CREATABLE USER GROUP LIST DEFSYM .CDDAC==:17 ;POINTER TO DEFAULT ACCOUNT DEFSYM .CDDNE==:20 ; Default online expiration DEFSYM .CDDFE==:21 ; Default offline expiration ;CRJOB DEFSYM CJ%LOG==:1_35. ;ATTEMPT TO LOG IN THE NEW JOB DEFSYM CJ%NAM==:1_34. ;USE NAME AND PSWD IN ARG BLK DEFSYM CJ%ACT==:3_32. ;WHERE TO GET ACCOUNT DEFSYM .CJUCA==:0 ;USE CURRENT ACCT OF CREATOR DEFSYM .CJUAA==:1 ;USE ACCOUNT IN ARG BLOCK DEFSYM .CJUDA==:2 ;USE DEFAULT ACCOUNT OF NEW USER DEFSYM CJ%ETF==:1_31. ;PUT EXEC IN TOP FORK DEFSYM CJ%FIL==:1_30. ;GET FILE IN ARG BLOCK DEFSYM CJ%ACS==:1_29. ;LOAD THE ACS FROM ARG BLOCK DEFSYM CJ%OWN==:1_28. ;RETAIN OWNERSHIP OF NEW JOB DEFSYM CJ%WTA==:1_27. ;NEW JOB WAITS TIL ATTACHED DEFSYM CJ%NPW==:1_26. ;NO PASSWORD CHECK AT LOGIN TIME DEFSYM CJ%NUD==:1_25. ;NO UPDATE OF LAST-LOGIN DATE DEFSYM CJ%SPJ==:1_24. ;DO SPJFN IN NEW JOB FROM ARG BLK DEFSYM CJ%CAP==:1_23. ;PASS ENABLED CAPABILITIES AS ALLOWED DEFSYM CJ%CAM==:1_22. ;CAPABILITY MASK AT LOGIN DEFSYM CJ%SLO==:1_21. ;SIGNAL (IPCF) AT LOGOUT TIME DEFSYM CJ%DSN==:1_18. ;DISOWN EXISTING JOB # IN 3 DEFSYM .CJNAM==:0 ;NAME STRING POINTER DEFSYM .CJPSW==:1 ;PASSWORD STRING POINTER DEFSYM .CJACT==:2 ;ACCOUNT DESIGNATOR/STRING DEFSYM .CJFIL==:3 ;FILE NAME STRING POINTER DEFSYM .CJSFV==:4 ;SFRKV OFFSET DEFSYM .CJTTY==:5 ;TTY DESIGNATOR, OR NULL DESIGNATOR DEFSYM .CJTIM==:6 ;TIME LIMIT DEFSYM .CJACS==:7 ;ADDRESS OF 16. WORDS OF AC'S DEFSYM .CJEXF==:10 ;EXEC FLAGS, FOR EXEC AC1 DEFSYM .CJPRI==:11 ;PRIMARY JFN'S FOR SPJFN IN NEW JOB DEFSYM .CJCPU==:12 ;CPU LIMIT (0 IF NONE) DEFSYM .CJCAM==:13 ;CAPABILITY MASK TO APPLY TO LOGIN DEFSYM .CJSLO==:14 ;PID TO SIGNAL AT LOGOUT TIME DEFSYM CR%PRA==:2545 ;MAGIC # FOR EXEC/CRJOB LINKAGE VIA PRARG ;CRLNM DEFSYM .CLNJ1==:0 ;DELETE 1 LOGICAL NAME FROM JOB DEFSYM .CLNS1==:1 ;DELETE 1 LOGICAL NAME FROM SYSTEM DEFSYM .CLNJA==:2 ;DELETE ALL JOB WIDE LOGICAL NAMES DEFSYM .CLNSA==:3 ;DELETE ALL SYSTEM LOGICAL NAMES DEFSYM .CLNJB==:4 ;CREATE A JOB WIDE LOGICAL NAME DEFSYM .CLNSY==:5 ;CREATE A SYSTEM WIDE LOGICAL NAME ;DELDF DEFSYM DD%DTF==:1_35. ;DELETE TEMPORARY FILES DEFSYM DD%DNF==:1_34. ;DELETE NONEXISTENT FILES DEFSYM DD%RST==:1_33. ;REBUILD THE SYMBOL TABLE DEFSYM DD%CHK==:1_32. ;CHECK THE DIR FOR CONSISTENCY ONLY ;DELF DEFSYM DF%NRJ==:1_35. ;DON'T RELEASE JFN DEFSYM DF%EXP==:1_34. ;EXPUNGE CONTENTS DEFSYM DF%FGT==:1_33. ;FORGET (EXPUNGE W/O DEASSIGNING ADDRESSES) DEFSYM DF%DIR==:1_32. ;DELETE, FORGET, AND EXPUNGE A DIRECTORY ; FILE. (ONLY IF ^E-CREATE KILL FAILED) DEFSYM DF%ARC==:1_31. ; Delete of archive status file allowed DEFSYM DF%CNO==:1_30. ; Delete only contents of file ; Immediate expunge implied DEFSYM DF%JFN==:777777_0. ;JFN ;DIAG JSYS DEFINITIONS DEFSYM DG%ADT==:7_33. ;ADDRESS TYPE FIELD DEFSYM DG%DVC==:177_26. ;DEVICE CODE FIELD DEFSYM .DGRH0==:130 ;MBC0 DEFSYM .DGRH7==:137 ;MBC7 DEFSYM DG%UNI==:77_6. ;UNIT NUMBER DEFSYM DG%SUN==:77_0. ;SUBUNIT NUMBER ;DIAG JSYS FUNCTION CODES DEFSYM .DGACU==:1 ;ASSIGN DEVICE DEFSYM .DGACH==:2 ;ASSIGN CONTROLLER AND ALL DEVICES DEFSYM .DGRCH==:3 ;RELEASE DEVICE(S) DEFSYM .DGSCP==:4 ;SETUP CHANNEL PROGRAM DEFSYM .DGRCP==:5 ;RELEASE CHANNEL PROGRAM DEFSYM .DGGCS==:6 ;GET CHANNEL STATUS ;DIAG NEW CONTROL FUNCTIONS DEFSYM .DGGEM==:100 ;LEAVE LARGE HOLE FOR MORE RH20 FUNCTIONS ;GET MEM (FOR TGHA) DEFSYM .DGREM==:101 ;RELEASE MEM (FOR TGHA) DEFSYM .DGPDL==:102 ;UNIT ONLINE ;DSKAS DEFSYM DA%DEA==:1_35. ;DEASSIGN DISK ADDRESS DEFSYM DA%ASF==:1_34. ;ASSIGN FREE PAGE DEFSYM DA%CNV==:1_33. ;CONVERT SOFTWARE TO HARDWARE ADDRESS DEFSYM DA%HWA==:1_32. ;HARDWARE ADDRESS GIVEN DEFSYM DA%INI==:1_31. ;INITIALIZE THE BIT TABLE DEFSYM DA%WRT==:1_30. ;WRITE THE BIT TABLE FILE DEFSYM DA%ADR==:777777_0. ;DISK ADDRESS ;DVCHR, DEVUNT AND DVCH1 BIT DEFINITIONS DEFSYM DV%OUT==:1_35. ;DEVICE CAN DO OUTPUT DEFSYM DV%IN==:1_34. ;DEVICE CAN DO INPUT DEFSYM DV%DIR==:1_33. ;DEVICE HAS A DIRECTORY DEFSYM DV%AS==:1_32. ;DEVICE IS ASSIGNABLE DEFSYM DV%MDD==:1_31. ;DEVICE IS A MULTIPLE DIRECTORY DEVICE DEFSYM DV%AV==:1_30. ;DEVICE IS AVAILABLE TO THIS JOB DEFSYM DV%ASN==:1_29. ;DEVICE IS ASSIGNED BY ASND DEFSYM DV%MDV==:1_28. ;RESERVED (HISTORICAL) DEFSYM DV%MNT==:1_27. ;DEVICE IS MOUNTED DEFSYM DV%TYP==:777_18. ;DEVICE TYPE FIELD DEFSYM DV%PSD==:1_17. ;PSEUDO DEVICE DEFSYM DV%UNT==:77777 ;UNIT MASK DEFSYM DV%MOD==:177777_0. ;DEVICE DATA MODE DEFSYM DV%M0==:1_0. ;DEVICE CAN BE OPENED IN MODE 0 DEFSYM DV%M1==:1_1. ;DEVICE CAN BE OPENED IN MODE 1 DEFSYM DV%M2==:1_2. ;DEVICE CAN BE OPENED IN MODE 2 DEFSYM DV%M3==:1_3. ;DEVICE CAN BE OPENED IN MODE 3 DEFSYM DV%M4==:1_4. ;DEVICE CAN BE OPENED IN MODE 4 DEFSYM DV%M5==:1_5. ;DEVICE CAN BE OPENED IN MODE 5 DEFSYM DV%M6==:1_6. ;DEVICE CAN BE OPENED IN MODE 6 DEFSYM DV%M7==:1_7. ;DEVICE CAN BE OPENED IN MODE 7 DEFSYM DV%M10==:1_8. ;DEVICE CAN BE OPENED IN MODE 10 DEFSYM DV%M11==:1_9. ;DEVICE CAN BE OPENED IN MODE 11 DEFSYM DV%M12==:1_10. ;DEVICE CAN BE OPENED IN MODE 12 DEFSYM DV%M13==:1_11. ;DEVICE CAN BE OPENED IN MODE 13 DEFSYM DV%M14==:1_12. ;DEVICE CAN BE OPENED IN MODE 14 DEFSYM DV%M15==:1_13. ;DEVICE CAN BE OPENED IN MODE 15 DEFSYM DV%M16==:1_14. ;DEVICE CAN BE OPENED IN MODE 16 DEFSYM DV%M17==:1_15. ;DEVICE CAN BE OPENED IN MODE 17 DEFSYM D1%SPL==:1_35. ;DEVICE IS SPOOLED DEFSYM D1%ALC==:1_34. ;DEVICE IS UNDER CONTROL OF ALLOCATOR DEFSYM D1%VVL==:1_33. ;VOLUME VALID DEFSYM D1%NIU==:1_32. ;DEVICE SLOT IS NOT IN USE (FOR STRUCTURES ; NOT YET MOUNTED) DEFSYM D1%INI==:1_31. ;DEVICE IS BEING INITIALIZED (STRUCTURE ; IS AVAILABLE ONLY TO THE FORK WHOSE NUMBER ; IS STORED IN SDBSTS) ;DEVICE TYPE DEFINITIONS DEFSYM .DVDSK==:0 ;DISK DEFSYM .DVMTA==:2 ;MAGTAPE DEFSYM .DVDTA==:3 ;DECTAPE DEFSYM .DVPTR==:4 ;PAPER TAPE READER DEFSYM .DVPTP==:5 ;PAPER TAPE PUNCH DEFSYM .DVDSP==:6 ;DISPLAY DEFSYM .DVLPT==:7 ;LINE PRINTER DEFSYM .DVCDR==:10 ;CARD READER DEFSYM .DVFE==:11 ;FRONT END DEVICE DEFSYM .DVTTY==:12 ;TERMINAL DEFSYM .DVPTY==:13 ;PTY DEFSYM .DVNUL==:15 ;NULL DEVICE DEFSYM .DVNET==:16 ;ARPA NETWORK DEFSYM .DVPLT==:17 ;PLOTTER DEFSYM .DVCDP==:21 ;CARD PUNCH DEFSYM .DVDCN==:22 ;DECNET ACTIVE COMPONENT DEFSYM .DVSRV==:23 ;DECENT PASSIVE COMPONENT DEFSYM .DVATS==:24 ;APPLICATIONS TERMINAL SERVICE DEFSYM .DVADS==:25 ;AYDIN DISPLAY ;DSKOP DEFSYM DOP%SA==:1_35. ;SOFTWARE ADDRESS DEFSYM DOP%AT==:3_34. ;ADDRESS TYPE FIELD DEFSYM .DOPPU==:1 ;PHYSICAL CHANNEL AND UNIT DEFSYM DOP%CN==:37_29. ;CHANNEL NUMBER DEFSYM DOP%UN==:77_23. ;UNIT NUMBER DEFSYM DOP%UA==:37777777 ;UNIT ADDRESS DEFSYM .DOPSR==:2 ;STRUCTURE AND RELATIVE ADDRESS DEFSYM DOP%SN==:777_25. ;STRUCTURE NUMBER DEFSYM DOP%RA==:177777777 ;RELATIVE ADDRESS DEFSYM DOP%EO==:1_25. ;ERROR IF UNIT OFFLINE DEFSYM DOP%IL==:1_24. ;INHIBIT ERROR LOGGING DEFSYM DOP%IR==:1_23. ;INHIBIT ERROR RECOVERY DEFSYM DOP%WR==:1_21. ;WRITE DEFSYM DOP%CT==:777777_0. ;WORD COUNT ;DUMPI/DUMPO DEFSYM DM%NWT==:1_35. ;NO WAIT FOR COMPLETION DEFSYM DM%FIN==:1_34. ;FINISH PREVIOUS REQUEST ;***NOT INPLEMENTED YET*** DEFSYM DM%PTR==:777777_0. ;POINTER TO COMMAND LIST ;DEFINE DECNET DISCONNECT CODES. THESE ARE STIPULATED BY THE NSP SPEC ;AND MAY HAVE MEANININGS NOT IMPLIED BY THE COMMENTS DEFSYM .DCX0==:0 ;NO SPECIAL ERROR DEFSYM .DCX1==:1 ;RESOURCE ALLOCATION FAILURE DEFSYM .DCX2==:2 ;DESTINATION NODE DOES NOT EXIST DEFSYM .DCX3==:3 ;NODE SHUTTING DOWN DEFSYM .DCX4==:4 ;DESTINATION PROCESS DOES NOT EXIST DEFSYM .DCX5==:5 ;INVALID NAME FIELD DEFSYM .DCX6==:6 ;DESTINATION PROCESS QUEUE OVERFLOW DEFSYM .DCX7==:7 ;UNSPECIFIED ERROR DEFSYM .DCX8==:8. ;THIRD PARTY ABORTED LINK DEFSYM .DCX9==:9. ;USER ABORT (ASYNCHRONOUS DISCONNECT) DEFSYM .DCX11==:11. ;UNDEFINED ERROR CODE DEFSYM .DCX21==:21. ;CI WITH ILLEGAL DESTINATION ADDRESS DEFSYM .DCX22==:22. ;CC WITH ILLEGAL DESTINATION ADDRESS DEFSYM .DCX23==:23. ;CI OR CC WITH ZERO SOURCE ADDRESS DEFSYM .DCX24==:24. ;FLOW CONTROL VIOLATION DEFSYM .DCX32==:32. ;TOO MANY CONNECTIONS TO NODE DEFSYM .DCX33==:33. ;TOO MANY CONNECTIONS TO DEST. PROCESS DEFSYM .DCX34==:34. ;ACCESS NOT PERMITTED DEFSYM .DCX35==:35. ;LOGICAL LINK SERVICES MISMATCH DEFSYM .DCX36==:36. ;INVALID ACCOUNT DEFSYM .DCX37==:37. ;SEGSIZE TOO SMALL DEFSYM .DCX38==:38. ;PROCESS ABORTED DEFSYM .DCX39==:39. ;NO PATH TO DESTINATION NODE DEFSYM .DCX40==:40. ;LINK ABORTED DUE TO DATA LOSS DEFSYM .DCX41==:41. ;DESTINATION PROCESS DOES NOT EXIST DEFSYM .DCX42==:42. ;CONFIRMATION IF DI DEFSYM .DCX43==:43. ;IMAGE DATA FIELD TOO LONG ;EFACT - FACT FILE ENTRY DEFINITIONS DEFSYM .EFHDR==:0 ;HEADER WORD DEFSYM EF%COD==:777_27. ;ENTRY TYPE CODE DEFSYM EF%JOB==:777_18. ;JOB NUMBER DEFSYM EF%LIN==:7777_6. ;LINE NUMBER DEFSYM EF%SIZ==:77_0. ;ENTRY SIZE DEFSYM .EFUSR==:1 ;USER NUMBER WORD DEFSYM .EFTAD==:2 ;TIME AND DATE OF ENTRY ; FACT FILE ENTRY TYPE CODES DEFSYM .EFLGI==:501 ;LOGIN DEFSYM .EFLGO==:141 ;LOGOUT DEFSYM .EFCAC==:502 ;CHANGE ACCOUNT DEFSYM .EFATT==:142 ;CONSOLE ATTACH DEFSYM .EFDET==:143 ;CONSOLE DETACH DEFSYM .EFCHK==:201 ;CHECKPOINT DEFSYM .EFSDU==:540 ;START DISK-UTILIZATION ENTRIES DEFSYM .EFDSK==:601 ;DISK SPACE UTILIZATION DEFSYM .EFTIM==:741 ;TIME SET DEFSYM .EFRES==:740 ;SYSTEM RESTARTED DEFSYM .EFLPT==:401 ;LINE PRINTER USAGE DEFSYM .EFCDR==:402 ;CARD READER USAGE ;ENQ/DEQ BIT DEFINITIONS AND FUNCTION CODES ;FUNCTION CODES DEFSYM .ENQBL==:0 ;ENQ BLOCK OPTION DEFSYM .ENQAA==:1 ;ENQ ALLOCATE ONLY IF AVAILABLE DEFSYM .ENQSI==:2 ;ENQ SOFTWARE INTERRUPT WHEN LOCKED DEFSYM .ENQMA==:3 ;ENQ MODIFY ACCESS DEFSYM .DEQDR==:0 ;DEQ RESOURCE DEFSYM .DEQDA==:1 ;DEQ ALL RESOURCES OF THIS FORK DEFSYM .DEQID==:2 ;DEQ THIS ID NUMBER DEFSYM .ENQCS==:0 ;ENQC STATUS DEFSYM .ENQCG==:1 ;ENQC GET ENQ/DEQ QUOTA FOR A JOB DEFSYM .ENQCC==:2 ;ENQC CHANGE ENQ/DEQ QUOTA FOR A JOB DEFSYM .ENQCD==:3 ;ENQC DUMP LOCKS AND QUEUE ENTRIES ;BIT DEFINITIONS DEFSYM EN%SHR==:1_35. ;SHARABLE REQUEST DEFSYM EN%BLN==:1_34. ;BYPASS LEVEL NUMBER DEFSYM EN%NST==:1_33. ;ALLOW NESTING DEFSYM EN%LTL==:1_32. ;LONG TERM LOCK DEFSYM EN%LVL==:777_18. ;LEVEL NUMBER DEFSYM EN%JOB==:777777_0. ;JOB NUMBER DEFSYM EN%QCE==:1_35. ;ERROR CODE IN RH OF STATUS WORD DEFSYM EN%QCL==:1_35. ;LOCK DUMP (.ENQCD ONLY) DEFSYM EN%QCO==:1_34. ;THIS FORK OWNS THE LOCK DEFSYM EN%QCQ==:1_33. ;THIS FORK IS IN THE QUEUE FOR THIS LOCK DEFSYM EN%QCT==:1_33. ;LOCK CONTAINS A TEXT STRING DEFSYM EN%QCX==:1_32. ;THE LOCK IS LOCKED EXCLUSIVELY DEFSYM EN%QCB==:1_31. ;USER IS BLOCKED FOR LOCK ;ENQ/DEQ ARGUMENT BLOCK DATA STRUCTURE DEFSYM .ENQLN==:0 ;# OF LOCKS ,, LENGTH OF ARGUMENT BLOCK DEFSYM .ENHLN==:77_30. ;LENGTH OF HEADER AREA DEFSYM .ENNLK==:7777_18. ;NUMBER OF LOCKS DEFSYM .ENALN==:777777_0. ;LENGTH OF ARGUMENT BLOCK DEFSYM .ENQID==:1 ;PSI CHANNEL # ,, REQUEST ID DEFSYM .ENQLV==:2 ;FLAGS & LEVEL NUMBER ,, JFN, -1, -2, OR -3 DEFSYM .ENQUC==:3 ;STRING POINTER OR USER CODE DEFSYM .ENQRS==:4 ;# OF RESOURCES IN POOL ,, # OF RESOURCES WANTED DEFSYM .ENQMS==:5 ;ADDRESS OF RESOURCE BLOCK ;ENQC DUMP DATA STRUCTURE DEFSYM .ENQDF==:0 ;FLAGS + LEVEL # ,, OFN, 400000+JOB #, -2, OR -3 ;OR: FLAGS + PSI # ,, JOB # OF Q-ENTRY CREATOR DEFSYM .ENQDR==:1 ;TOTAL RESOURCES IN POOL ,, RESOURCES REMAINING DEFSYM .ENQDT==:2 ;TIME STAMP OF LAST REQUEST LOCKED DEFSYM .ENQDC==:3 ;USER CODE OF LOCK OR START OF TEXT STRING DEFSYM .ENQDI==:1 ;GROUP # OR # REQUESTED ,, ENQ ID ;FLOUT/DFOUT ;FORMAT CONTROL WORD DEFSYM FL%SGN==:3_34. ;FIRST FIELD SIGN CONTROL DEFSYM .FLDIG==:0 ;DIGIT DEFSYM .FLSPC==:1 ;SPACE DEFSYM .FLPLS==:2 ;PLUS SIGN DEFSYM .FLSPA==:3 ;SPACE DEFSYM FL%JUS==:3_32. ;FIRST FIELD JUSTIFICATION CONTROL DEFSYM .FLLSP==:0 ;LEADING SPACES DEFSYM .FLLZR==:1 ;LEADING ZEROS DEFSYM .FLLAS==:2 ;LEADING ASTERISKS DEFSYM .FLTSP==:3 ;TRAILING SPACES DEFSYM FL%ONE==:1_31. ;FIRST FIELD NONBLANK DEFSYM FL%DOL==:1_30. ;DOLLAR SIGN PREFIX DEFSYM FL%PNT==:1_29. ;DECIMAL POINT DEFSYM FL%EXP==:3_27. ;THIRD FIELD EXPONENT CONTROL DEFSYM .FLEXN==:0 ;NO EXPONENT DEFSYM .FLEXE==:1 ;E EXPONENT PREFIX DEFSYM .FLEXD==:2 ;D EXPONENT PREFIX DEFSYM .FLEXM==:3 ;*10^ EXPONENT PREFIX DEFSYM FL%ESG==:3_25. ;EXPONENT SIGN CONTROL DEFSYM .FLDGE==:0 ;DIGIT DEFSYM .FLPLE==:1 ;PLUS SIGN DEFSYM .FLSPE==:2 ;SPACE DEFSYM .FLDGT==:3 ;DIGIT DEFSYM FL%OVL==:1_24. ;COLUMN OVERFLOW DEFSYM FL%RND==:37_18. ;DIGIT POSITION FOR ROUNDING DEFSYM FL%FST==:77_12. ;FIRST FIELD WIDTH DEFSYM FL%SND==:77_6. ;SECOND FIELD WIDTH DEFSYM FL%THD==:77_0. ;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 DEFSYM .GDFSM==:17_32. ;TOPS20AN ;FINITE MACHINE STATE ;TTY BITS DEFSYM GD%PAR==:1_0. ;IF ON, TERMINAL ACCEPTS PARITY ;GET DEFSYM GT%ADR==:1_16. ;USE ADDRESS LIMITS IN AC2 DEFSYM GT%PRL==:1_15. ;PRELOAD PAGES DEFSYM GT%NOV==:1_14. ;DON'T OVERLAY EXISTING PAGES DEFSYM GT%FL2==:1_13. ;IF ON, AC3 CONTAINS FLAGS DEFSYM G2%FCH==:1_35. ;MAKE FAST-CACHE ENTRY DEFSYM GT%JFN==:7777_0. ;JFN ;GETAB - TABLE INDICES DEFSYM .JOBTT==:0 ;JOB NUMBER TO TTY NUMBER DEFSYM .JOBRT==:1 ;JOB RUNTIME DEFSYM .TICKP==:2 ;TICKS PER SECOND DEFSYM .JOBDI==:3 ;JOB NUMBER TO DIRECTORY NUMBERS (OBS) DEFSYM .TTYJO==:4 ;TTY NUMBER TO JOB NUMBER DEFSYM .NCPGS==:5 ;NUMBER PHYSICAL CORE PAGES DEFSYM .DEVNA==:6 ;DEVICE NAME DEFSYM .DEVCH==:7 ;DEVICE CHARACTERISTICS DEFSYM .DEVUN==:10 ;DEVICE UNIT NUMBERS DEFSYM .DSKER==:11 ;DISK ERROR WORDS DEFSYM .DRMER==:12 ;DRUM ERROR WORDS DEFSYM .SYSVE==:13 ;VERSION TEXT DEFSYM .SYSTA==:14 ;STATISTICS DEFSYM .QTIME==:15 ;SCHED QUEUE TIMES DEFSYM .JOBNA==:16 ;JOB NUMBER TO PROGRAM NAME DEFSYM .SNAME==:17 ;SUBSYSTEM NAME DEFSYM .STIME==:20 ; " TIME DEFSYM .SPFLT==:21 ; " PAGE FAULTS DEFSYM .SSIZE==:22 ; " SIZE INTEGRAL DEFSYM .SNBLK==:23 ; " NUMBER WAKEUPS DEFSYM .DBUGS==:24 ;DBUGSW, DCHKSW DEFSYM .LOGDE==:25 ;LOG, JOB 0 DESIGNATORS DEFSYM .PTYPA==:26 ;PTY PARAMETERS ;DEFSYM .SYMTA==:27 ;GTTAB SYMBOL TABLE DEFSYM .DWNTI==:30 ;HSYS VARIABLES DEFSYM .JOBPN==:31 ;JOB NUMBER TO PROGRAM NAME DEFSYM .BLDTD==:32 ;MONITOR BUILD TIME AND DATE DEFSYM .LSTDR==:33 ;LAST DIR NUMBER ASSIGNED (OBS) DEFSYM .APRID==:34 ;APR SERIAL NUMBER DEFSYM .HQLAV==:35 ;HIGH QUEUE LOAD AVERAGES DEFSYM .LQLAV==:36 ;LOW QUEUE LOAD AVERAGES DEFSYM .NETRD==:37 ;TOPS20AN ;ARPANET STATUS DEFSYM .IMPHR==:40 ;TOPS20AN ;HOST READY DEFSYM .HSTST==:41 ;TOPS20AN ;DEAD HOST STATUS DEFSYM .HSTNA==:42 ;TOPS20AN ;HOST NAMES DEFSYM .HOSTN==:43 ;TOPS20AN ;HOST NAME INDEX DEFSYM .NETLS==:44 ;TOPS20AN ;LOCAL SOCKET DEFSYM .NETFS==:45 ;TOPS20AN ;FOREIGN SOCKET DEFSYM .NETAW==:46 ;TOPS20AN ;ARPA CONNECTION ADDRESS DEFSYM .NETBA==:47 ;TOPS20AN ;BIT ALLOCATION DEFSYM .NETST==:50 ;TOPS20AN ;CONNECTION STATUS DEFSYM .NETBU==:51 ;TOPS20AN ;ARPANET BUFFERS DEFSYM .NETBT==:52 ;TOPS20AN ;BYTE COUNT STATISTICS DEFSYM .IMPL1==:53 ;TOPS20AN ;IMP LINK TABLE ONE DEFSYM .IMPL2==:54 ;TOPS20AN ;IMP LINK TABLE TWO DEFSYM .IMPL3==:55 ;TOPS20AN ;IMP LINK TABLE THREE DEFSYM .IMPL4==:56 ;TOPS20AN ;IMP LINK TABLE FOUR DEFSYM .LHOST==:57 ;TOPS20AN ;LOCAL HOST NUMBER DEFSYM .JBONT==:60 ;OWNING JOB DEFSYM .NSWPG==:61 ;DEFAULT SWAPPING PAGES ;GETJI DEFSYM .JIJNO==:0 ;JOB NUMBER DEFSYM .JITNO==:1 ;TERMINAL NUMBER DEFSYM .JIUNO==:2 ;USER NUMBER DEFSYM .JIDNO==:3 ;DIRECTORY NUMBER DEFSYM .JISNM==:4 ;SUBSYS NAME DEFSYM .JIPNM==:5 ;PROGRAM NAME DEFSYM .JIRT==:6 ;RUN TIME DEFSYM .JICPJ==:7 ;CONTROLLING PTY JOB NUMBER DEFSYM .JIRTL==:10 ;RUN TIME LIMIT (SET BY TIMER JSYS) DEFSYM .JIBAT==:11 ;CONTROLLED BY BATCH DEFSYM .JIDEN==:12 ;MAGTAPE DEFAULT DENSITY DEFSYM .JIPAR==:13 ;MAGTAPE DEFAULT PARITY DEFSYM .JIDM==:14 ;MAGTAPE DEFAULT DATA MODE DEFSYM .JIRS==:15 ;MAGTAPE DEFAULT RECORD SIZE DEFSYM .JIDFS==:16 ;DEFERRED SPOOLING DEFSYM .JILNO==:17 ;LOGGED-IN DIRECTORY NUMBER DEFSYM .JISRM==:20 ;POINTER TO JOB SESSION REMARK DEFSYM .JILLN==:21 ;LAST LOGIN DATE & TIME DEFSYM .JISRT==:22 ;JOB RUNTIME AT START OF THIS ACCOUNTING SESSION DEFSYM .JISCT==:23 ;JOB CONSOLE TIME AT START OF THIS SESSION DEFSYM .JIT20==:24 ;-1 IF AT TOPS20 COMMAND LEVEL DEFSYM .JISTM==:25 ;DATE & TIME JOB WAS INITIALIZED DEFSYM .JIBCH==:26 ;BATCH STREAM AND FLAGS DEFSYM OB%WTO==:3_34. ;WRITE TO OPERATOR CAPABILITIES DEFSYM .OBALL==:0 ;WTO AND WTOR ALLOWED DEFSYM .OBNWR==:1 ;NO WTOR ALLOWED DEFSYM .OBNOM==:2 ;NO MESSAGE ALLOWED DEFSYM OB%BSS==:1_25. ;BATCH STREAM NUMBER SET DEFSYM OB%BSN==:177_18. ;BATCH-STREAM NUMBER DEFSYM .JILLO==:27 ;LOGICAL LOCATION (NODE NAME) DEFSYM .JIMAX==:.JILLO ;CURRENT HIGHEST GETJI OFFSET ;GFRKS DEFSYM GF%GFH==:1_35. ;GET RELATIVE FORK HANDLES DEFSYM GF%GFS==:1_34. ;GET FORK STATUS ;GFUST DEFSYM .GFAUT==:0 ;GET FILE AUTHOR DEFSYM .GFLWR==:1 ;GET FILE LAST WRITER ;GTHST ;TOPS20AN DEFSYM .GTHSZ==:0 ;HOST TABLE SIZES DEFSYM .GTHIX==:1 ;INDEX TO STRING CONVERSION DEFSYM .GTHNS==:2 ;NUMBER TO STRING CONVERSION DEFSYM .GTHSN==:3 ;STRING TO NUMBER CONVERSION DEFSYM .GTHHN==:4 ;HOST NUMBER TO STATUS DEFSYM .GTHHI==:5 ;HOST INDEX TO STATUS ;GETOK DEFINITIONS DEFSYM .GOASD==:1 ;ASSIGN DEVICE DEFSYM .GEERB==:0 ;ERROR BLOCK ADDRESS DEFSYM .GEADD==:1 ;DEVICE DESIGNATOR DEFSYM .GOCAP==:2 ;ENABLE CAPABILITIES DEFSYM .GENCP==:1 ;NEW CAPABILITIES DEFSYM .GOCJB==:3 ;ALLOW CRJOB JSYS DEFSYM .GOLOG==:4 ;ALLOW LOGINS DEFSYM .GELUN==:1 ;USER NUMBER DEFSYM .GOCFK==:5 ;ALLOW CFORK JSYS DEFSYM .GEFCT==:1 ;NUMBER OF FORKS DEFSYM .GOTBR==:6 ;ALLOW SET TERMINAL BAUD RATE DEFSYM .GELIN==:1 ;LINE NUMBER DEFSYM .GESPD==:2 ;SPEED DEFSYM .GOLGO==:7 ;ALLOW LOGOUT DEFSYM .GEUSD==:1 ;PAGES USED DEFSYM .GEQUO==:2 ;QUOTA DEFSYM .GERLG==:3 ;USER REQUESTING LOGOUT DEFSYM .GOENQ==:10 ;ALLOW SET ENQ QUOTA DEFSYM .GEEQU==:1 ;DESIRED QUOTA DEFSYM .GEEUN==:2 ;JOB NUMBER DEFSYM .GOCRD==:11 ;ALLOW CREDIR DEFSYM .GOSMT==:12 ;ALLOW SMOUNT DEFSYM .GESDE==:1 ;DEVICE DESIGNATOR DEFSYM .GOMDD==:13 ;ALLOW MDDT ENTRY DEFSYM .GOCLS==:14 ;VERIFY CLASS ASSIGNMENT FOR A JOB DEFSYM .GEJOB==:1 ;JOB # DEFSYM .GECLS==:2 ;CLASS DESIRED DEFSYM .GOCL0==:15 ;SET CLASS AT LOGIN DEFSYM .GOMTA==:16 ;MT ACCESS REQUEST DEFSYM .GEACC==:1 ;ACCESS CODE FROM HDR1 DEFSYM .GEUSN==:2 ;USER NUMBER DEFSYM .GEUNT==:3 ;MT UNIT NUMBER DEFSYM .GEACD==:4 ;DESIRED ACCESS (BITS) DEFSYM .GELTP==:5 ;LABEL TYPE DEFSYM .GOACC==:17 ;ACCESS AND CONNECT DEFSYM .GOAC0==:1 ;FLAGS FROM ACESS JSYS DEFSYM .GOAC1==:2 ;DIRECTORY NUMBER DEFSYM .GOOAD==:20 ;ASSIGN DUE TO OPENF ;.GEADD IS THE ARG OFFSET FOR THE ; DEVICE DESIGNATOR DEFSYM .GOKMZ==:20. ;MAX ARGUMENT BLOCK SIZE FOR GETOK REQUEST ;ERROR BLOCK ADDRESS OFFSETS DEFSYM .GESIZ==:0 ;SIZE OF THIS BLOCK DEFSYM .GEERN==:1 ;ERROR NUMBER DEFSYM .GEPTR==:2 ;POINTER TO ERROR STRING DEFSYM .GEBSZ==:3 ;STRING SIZE ;GTJFN DEFINITIONS ;FLAGS PROVIDED TO GTJFN ON CALL DEFSYM GJ%FOU==:1_35. ;FILE IS FOR OUTPUT USE DEFSYM GJ%NEW==:1_34. ;NEW FILE ONLY DEFSYM GJ%OLD==:1_33. ;OLD FILE ONLY DEFSYM GJ%MSG==:1_32. ;PRINT AN APPROPRIATE MESSAGE DEFSYM GJ%CFM==:1_31. ;CONFIRMATION IS REQUIRED DEFSYM GJ%TMP==:1_30. ;TEMPORARY DEFSYM GJ%NS==:1_29. ;DONT SEARCH SEARCH LISTS DEFSYM GJ%ACC==:1_28. ;NO ACCESS BY OTHER FORKS DEFSYM GJ%DEL==:1_27. ;IGNORE "DELETED" BIT DEFSYM GJ%JFN==:3_25. ;JFN USE FIELD DEFSYM .GJDNU==:0 ;DO NOT USE JFN PROVIDED DEFSYM .GJERR==:2 ;ERROR IF CANNOT USE JFN PROVIDED DEFSYM .GJALT==:3 ;USE ALTERNATE IF CANNOT USE GIVEN JFN DEFSYM GJ%IFG==:1_24. ;ACCEPT INPUT FILE GROUP DESCRIPTORS DEFSYM GJ%OFG==:1_23. ;ACCEPT OUTPUT FILE GROUP DESCRIPTORS DEFSYM GJ%FLG==:1_22. ;RETURN FLAGS DEFSYM GJ%PHY==:1_21. ;PHYSICAL DEVICE ONLY DEFSYM GJ%XTN==:1_20. ;EXTENDED FORMAT (E+11 EXISTS) DEFSYM GJ%FNS==:1_19. ;ACCUMULATOR 2 CONTAINS JOB FILE NUMBERS DEFSYM GJ%SHT==:1_18. ;SHORT CALL FORMAT ;FLAGS PROVIDED TO GTJFN (IN SECOND FLAG WORD) DEFSYM G1%RND==:1_35. ;RETURN ON NULL(IN ALTERNATE FLAG WORD) DEFSYM G1%RBF==:1_34. ;^R BUFFER IS DISJOINT (OBSOLETE) DEFSYM G1%NLN==:1_33. ;NO LONG NAMES DEFSYM G1%RCM==:1_32. ;RETURN CONFIRM MESSAGE DEFSYM G1%RIE==:1_31. ;RETURN WHEN MAIN STRING IS EMPTY DEFSYM G1%IIN==:1_30. ; Ignore invisible status DEFSYM G1%SLN==:1_29. ;SUPPRESS EXPANSION OF LOGICAL NAMES ;FLAGS RETURNED BY GTJFN DEFSYM GJ%DEV==:1_35. ;ASTERISK WAS GIVEN FOR DEVICE DEFSYM GJ%UNT==:1_34. ;ASTERISK WAS GIVEN FOR UNIT DEFSYM GJ%DIR==:1_33. ;ASTERISK WAS GIVEN FOR DIRECTORY DEFSYM GJ%NAM==:1_32. ;ASTERISK WAS GIVEN FOR NAME DEFSYM GJ%EXT==:1_31. ;ASTERISK WAS GIVEN FOR EXTENSION DEFSYM GJ%VER==:1_30. ;ASTERISK WAS GIVEN FOR GENERATION DEFSYM GJ%UHV==:1_29. ;USE HIGHEST GENERATION DEFSYM GJ%NHV==:1_28. ;USE NEXT HIGHER GENERATION DEFSYM GJ%ULV==:1_27. ;USE LOWEST GENERATION DEFSYM GJ%PRO==:1_26. ;PROTECTION GIVEN DEFSYM GJ%ACT==:1_25. ;ACCOUNT GIVEN DEFSYM GJ%TFS==:1_24. ;TEMPORARY FILE SPECIFIED (;T) DEFSYM GJ%GND==:1_23. ;COMPLEMENT OF GJ%DEL ON CALL DEFSYM GJ%GIV==:1_18. ; Comp of G1%IIV ;GTJFN TABLE OFFSETS DEFSYM .GJGEN==:0 ;FLAGS ,, GENERATION DEFSYM .GJDEF==:<0 0> ;DEFAULT GENERATION DEFSYM .GJNHG==:<0 -1> ;NEXT HIGHER GENERATION DEFSYM .GJLEG==:<0 -2> ;LOWEST EXISTING GENERATION DEFSYM .GJALL==:<0 -3> ;ALL GENERATIONS (I.E., ;*) DEFSYM .GJSRC==:1 ;SOURCE JFN ,, OUTPUT JFN DEFSYM .GJDEV==:2 ;DEFAULT DEVICE DEFSYM .GJDIR==:3 ;DEFAULT DIRECTORY DEFSYM .GJNAM==:4 ;DEFAULT NAME DEFSYM .GJEXT==:5 ;DEFAULT EXTENSTION DEFSYM .GJPRO==:6 ;DEFAULT PROTECTION DEFSYM .GJACT==:7 ;DEFAULT ACCOUNT DEFSYM .GJJFN==:10 ;DESIRED JFN DEFSYM .GJF2==:11 ;SECOND GROUP FLAGS,,COUNT DEFSYM .GJCPP==:12 ;COPY BUFFER POINTER DEFSYM .GJCPC==:13 ;COPY BUFFER COUNT DEFSYM .GJRTY==:14 ;RETYPE (^R) POINTER DEFSYM .GJBFP==:15 ;TOP OF BUFFER POINTER DEFSYM .GJATR==:16 ;POINTER TO ARBITRARY ATTRIBUTE BLOCK ;GNJFN - FLAGS RETURNED DEFSYM GN%STR==:1_22. ;STRUCTURE CHANGED DEFSYM GN%DIR==:1_21. ;DIRECTORY CHANGED DEFSYM GN%NAM==:1_20. ;NAME CHANGED DEFSYM GN%EXT==:1_19. ;EXTENSION CHANGED ;GTNCP ;TOPS20AN DEFSYM .GTNSZ==:0 ;SIZE OF TABLE DEFSYM .GTNIX==:1 ;NCP INDEX DEFSYM .GTNNI==:2 ;NVT INPUT DEFSYM .GTNNO==:3 ;NVT OUTPUT DEFSYM .GTNJF==:4 ;JFN DEFSYM .NCIDX==:0 ;NCP INDEX DEFSYM .NCFHS==:1 ;FOREIGN HOST DEFSYM .NCLSK==:2 ;LOCAL SOCKET DEFSYM .NCFSK==:3 ;FOREIGN SOCKET DEFSYM .NCFSM==:4 ;FINITE STATE MACHINE STATE DEFSYM .NCLNK==:5 ;LINK DEFSYM .NCNVT==:6 ;NVT, -1 IF NOT A TELNET CONNECTION DEFSYM .NCSIZ==:7 ;BYTE SIZE OF CONNECTION DEFSYM .NCMSG==:10 ;MSG ALLOC DEFSYM .NCBAL==:11 ;BIT ALLOC DEFSYM .NCDAL==:12 ;DESIRED ALLOC DEFSYM .NCBTC==:13 ;BITS XFERRED DEFSYM .NCBPB==:14 ;BYTES/BUFFER DEFSYM .NCCLK==:15 ;TIME-OUT COUNTDOWN DEFSYM .NCSTS==:16 ;CONNECTION STATUS ;GTRPW DEFSYM PF%USR==:1_35. ;PAGE FAIL WORD - USER MODE REFERENCE DEFSYM PF%WRT==:1_30. ; " - WRITE REFERENCE DEFSYM TSW%RD==:1_21. ;TRAP STATUS WORD - READ DEFSYM TSW%WT==:1_20. ; " - WRITE DEFSYM TSW%WR==:1_20. ; (ANOTHER NAME FOR ABOVE) DEFSYM TSW%EX==:1_19. ; " - EXECUTE DEFSYM TSW%MN==:1_18. ; " - MONITOR MODE REFERENCE ;GTSTS BITS RETURNED IN 2 DEFSYM GS%OPN==:1_35. ;FILE IS OPEN DEFSYM GS%RDF==:1_34. ;IF OPEN, FILE IS OPEN FOR READ DEFSYM GS%WRF==:1_33. ;IF OPEN, FILE IS OPEN FOR WRITE DEFSYM GS%XCF==:1_32. ;IF OPEN, FILE IS OPEN FOR EXECUTE DEFSYM GS%RND==:1_31. ;OK TO RESET BYTE POINTER ; (FILE IS NOT APPEND) DEFSYM GS%APT==:1_30. ;ACCESS PER PAGE TABLE ; (NOT IMPLEMENTED -- OBSOLETE) DEFSYM GS%CAL==:1_29. ;OK TO CALL AS A PROCEDURE ; (NOT IMPLEMENTED -- OBSOLETE) DEFSYM GS%LNG==:1_28. ;FILE IS LONG DEFSYM GS%EOF==:1_27. ;AT END OF FILE ON READ DEFSYM GS%ERR==:1_26. ;FILE MAY BE IN ERROR DEFSYM GS%NAM==:1_25. ;FILE HAS A NAME (JFN EXISTS) DEFSYM GS%AST==:1_24. ;ONE OR MORE FIELDS OF NAME ; IS WILD DEFSYM GS%ASG==:1_23. ;JFN IS BEING ASSIGNED DEFSYM GS%HLT==:1_22. ;TERMINATE ON I/O ERROR DEFSYM GS%FRK==:1_18. ;JFN IS RESTRICTED TO CREATING FORK DEFSYM GS%PLN==:1_17. ;DON'T STRIP LINE NUMBERS ON SIN/BIN DEFSYM GS%MOD==:17_0. ;DATA MODE DEFSYM .GSNRM==:0 ;NORMAL MODE DEFSYM .GSIMG==:10 ;IMAGE (BINARY) MODE DEFSYM .GSDMP==:17 ;DUMP MODE ;HPTIM DEFSYM .HPELP==:0 ;ELAPSED TIME DEFSYM .HPRNT==:1 ;RUN TIME ;IDCNV (ALSO IDTNC AND ODCNV) DEFSYM IC%DSA==:1_35. ;DAYLIGHT SAVINGS IF APPROPRIATE DEFSYM IC%ADS==:1_34. ;APPLY DAYLIGHT SAVINGS DEFSYM IC%UTZ==:1_33. ;USE TIME ZONE GIVEN DEFSYM IC%JUD==:1_32. ;USE JULIAN DATE CONVERSION DEFSYM IC%TMZ==:77_18. ;TIME ZONE DEFSYM IC%TIM==:777777_0. ;LOCAL TIME ;IDTIM & IDTNC DEFSYM IT%NDA==:1_35. ;NO DATE DEFSYM IT%NNM==:1_34. ;NO NUMERIC MONTH DEFSYM IT%SNM==:1_33. ;SECOND NUMBER IS MONTH DEFSYM IT%ERR==:1_32. ;ERROR IF NUMBERS ARE NOT IN SPECIFIED ; ORDER DEFSYM IT%NTI==:1_29. ;NO TIME DEFSYM IT%NIS==:1_28. ;NO SECONDS DEFSYM IT%AIS==:1_27. ;ALWAYS INCLUDE SECONDS DEFSYM IT%NAC==:1_26. ;NO COLON ALLOWED BETWEEN HH AND MM DEFSYM IT%AAC==:1_25. ;ALWAYS ALLOW COLON DEFSYM IT%AMS==:1_24. ;ALWAYS INTERPRET ONE COLON AS HHMM:SS DEFSYM IT%AHM==:1_23. ;ALWAYS INTERPRET ONE COLON AS HH:MM DEFSYM IT%N24==:1_21. ;NO 24-HOUR FORMAT DEFSYM IT%NTM==:1_20. ;NO TIME MODIFIER (AM, PM) DEFSYM IT%NTZ==:1_19. ;NO TIME ZONE ;.IMOPR - MONITOR ROUTINE USED BY MDDT AND SNOOP. THIS IS NOT ;A JSYS SO THAT CALLS ARE FAST. DEFSYM .IMALC==:1 ;ALLOCATE PAGES FOR USE IN MAPPING SYMBOLS DEFSYM .IMMAP==:2 ;MAP PAGES OF THE SYMBOL TABLE DEFSYM .IMUMP==:3 ;UNMAP PAGES OF THE SYMBOL TABLE ;INLNM DEFSYM .INLJB==:0 ;GET JOB WIDE LOGICAL NAME FROM INDEX DEFSYM .INLSY==:1 ;GET SYSTEM LOGICAL NAME FROM INDEX ;IPCF BIT DEFINITIONS AND DATA STRUCTURES ;PACKET FORMAT DEFSYM .IPCFL==:0 ;FLAGS WORD DEFSYM IP%CFB==:1_35. ;DON'T BLOCK READ DEFSYM IP%CFS==:1_34. ;INDIRECT SENDER'S PID DEFSYM IP%CFR==:1_33. ;INDIRECT RECEIVER'S PID DEFSYM IP%CFO==:1_32. ;OVERDRAW SEND DEFSYM IP%TTL==:1_31. ;TRUNCATE ON TOO LARGE MESSAGE DEFSYM IP%CPD==:1_30. ;CREATE A PID ON THE SEND DEFSYM IP%JWP==:1_29. ;MAKE THE CREATED PID BE JOB WIDE DEFSYM IP%NOA==:1_28. ;NO ACCESS OF PID BY OTHER FORKS DEFSYM IP%CFP==:1_17. ;SENDER IS PRIV'D AND IS ENVOKING PRIVS DEFSYM IP%CFV==:1_16. ;PAGE TRANSFER MODE DEFSYM IP%CFZ==:1_15. ;ZERO LENGTH MESSAGE WAS SENT DEFSYM IP%INT==:1_14. ; Internal call - unavailable to users DEFSYM IP%CFE==:77_6. ;ERROR FIELD ;ERRORS SENT BY INFO DEFSYM .IPCPI==:15 ;INSUFFICIENT PRIVILEGE DEFSYM .IPCUF==:16 ;ILLEGAL FUNCTION DEFSYM .IPCSN==:67 ;SEND INFO YOUR NAME DEFSYM .IPCFF==:72 ;INFO FREE SPACE EXHAUSTED DEFSYM .IPCBP==:74 ;PID HAS NO NAME OR IS ILLEGAL DEFSYM .IPCDN==:75 ;DUPLICATE NAME DEFSYM .IPCNN==:76 ;UNKNOWN NAME DEFSYM .IPCEN==:77 ;ILLEGAL NAME DEFSYM .IPCKM==:66 ;NOTIFICATION THAT PID HAS BEEN DELETED DEFSYM IP%CFC==:7_3. ;SYSTEM SENDER CODE DEFSYM .IPCCC==:1 ;SENT BY [SYSTEM]IPCF DEFSYM .IPCCF==:2 ;SENT BY SYSTEM WIDE [SYSTEM]INFO DEFSYM .IPCCP==:3 ;SENT BY RECEIVER'S [SYSTEM]INFO DEFSYM IP%CFM==:7_0. ;SPECIAL MESSAGE RETURN FIELD DEFSYM .IPCFN==:1 ;MESSAGE WAS NOT DELIVERED DEFSYM .IPCFS==:1 ;PID OF SENDER DEFSYM .IPCFR==:2 ;PID OF RECEIVER DEFSYM .IPCFP==:3 ;POINTER TO MESSAGE BLOCK DEFSYM .IPCFD==:4 ;LOGGED IN DIR OF SENDER DEFSYM .IPCFC==:5 ;ENABLED CAPABILITIES OF SENDER DEFSYM .IPCSD==:6 ;CONNECTED DIRECTORY NUMBER OF SENDER DEFSYM .IPCAS==:7 ;POINTER TO ACCOUNT STRING OF SENDER DEFSYM .IPCLL==:10 ;POINTER TO LOGICAL LOCATION OF SENDER DEFSYM .IPCSU==:26 ;SPOOL MESSAGE CODE FROM IPCC DEFSYM .IPCSL==:27 ;LOGOUT MESSAGE CODE FROM IPCC DEFSYM .IPCSA==:30 ;RESOURCE ALLOCATOR MESSAGE CODE DEFSYM .IPCDS==:31 ;STRUCTURE DISMOUNT MESSAGE CODE FROM IPCC DEFSYM .IPCLI==:32 ;LOGIN MESSAGE CODE FROM IPCC DEFSYM .IPCLO==:33 ;LOGOUT MESSAGE TO CREATOR FROM IPCC DEFSYM .IPCKP==:34 ;DELETED PID MESSAGE FROM IPCC DEFSYM .IPCCA==:35 ;CREATE AN APPLICATION (RESERVED FOR TPS USE) DEFSYM .IPCTR==:36 ;REQUEST FROM TAPE DEFSYM .IPCMS==:37 ;STRUCTURE MOUNT MESSAGE CODE FROM IPCC DEFSYM .IPCRS==:40 ;STRUCTURE REMOVAL MSSG CODE FROM IPCC DEFSYM .IPCSR==:41 ; Archive message code from IPCC DEFSYM .IPCSS==:15 ;IPCC REQUEST TO INFO TO DELETE PIDS ;[SYSTEM] INFO DEFINITIONS DEFSYM .IPCI0==:0 ;CODE,,FUNCTION DEFSYM .IPCIW==:1 ;FIND PID FOR NAME DEFSYM .IPCIG==:2 ;FIND NAME FOR PID DEFSYM .IPCII==:3 ;ASSIGN NAME TO PID DEFSYM .IPCIJ==:4 ;ASSIGN NAME TO PID DEFSYM .IPCIK==:5 ;NOTIFY WHEN SPECIFIED PID IS KILLED DEFSYM .IPCIS==:15 ;MONITOR DROP PID FUNCTION DEFSYM .IPCI1==:1 ;PID TO GET A COPY OF REPLY DEFSYM .IPCI2==:2 ;START OF DATA ;JFNS DEFSYM JS%DEV==:7_33. ;DEVICE FIELD OUTPUT CONTROL DEFSYM JS%DIR==:7_30. ;DIRECTORY FIELD OUTPUT CONTROL DEFSYM JS%NAM==:7_27. ;NAME FIELD OUTPUT CONTROL DEFSYM JS%TYP==:7_24. ;FILE TYPE FIELD OUTPUT CONTROL DEFSYM JS%GEN==:7_21. ;GENERATION FIELD OUTPUT CONTROL DEFSYM JS%PRO==:7_18. ;PROTECTION FIELD OUTPUT CONTROL DEFSYM JS%ACT==:7_15. ;ACCOUNT FIELD OUTPUT CONTROL ;VALUES FOR ABOVE 7 FIELDS: DEFSYM .JSNOF==:0 ;NEVER OUTPUT FIELD DEFSYM .JSAOF==:1 ;ALWAYS OUTPUT FIELD DEFSYM .JSSSD==:2 ;SUPPRESS IF SYSTEM DEFAULT DEFSYM JS%TMP==:1_14. ;RETURN ;T IF TEMP FILE DEFSYM JS%SIZ==:1_13. ;RETURN SIZE DEFSYM JS%CDR==:1_12. ;RETURN CREATION DATE DEFSYM JS%LWR==:1_11. ;RETURN LAST WRITE DEFSYM JS%LRD==:1_10. ;RETURN LAST READ DEFSYM JS%PTR==:1_9. ;AC 2 HOLDS STRING POINTER NOT JFN DEFSYM JS%ATR==:1_8. ;RETURN ATTRIBUTES DEFSYM JS%AT1==:1_7. ;RETURN 1 SPECIFIC ATTRIBUTE DEFSYM JS%OFL==:1_6. ;RETURN ;OFF-LINE IF OFFLINE FILE DEFSYM JS%PSD==:1_3. ;PUNCTUATE SIZE AND DATE DEFSYM JS%TBR==:1_2. ;TAB BEFORE FIELDS RETURNED DEFSYM JS%TBP==:1_1. ;TAB BEFORE POSSIBLE FIELDS DEFSYM JS%PAF==:1_0. ;PUNCTUATE ALL FIELDS ;LNMST DEFSYM .LNSJB==:0 ;GET JOB WIDE DEFINITION OF A LN DEFSYM .LNSSY==:1 ;GET SYSTEM DEFINITION OF A LOGICAL NAME ;LOCK DEFSYM LK%CNT==:1_35. ;USE COUNT IN AC3 DEFSYM LK%PHY==:1_34. ;USE AC1 AS PHYSICAL PAGE NUMBER DEFSYM LK%NCH==:1_33. ;MAP PAGES CACHE INHIBITED DEFSYM LK%AOL==:1_32. ;ALLOW LOCKING IN OFFLINE PAGES ;METER JSYS DEFS. DEFSYM .MEREA==:1 ;READ EBOX TICKS DEFSYM .MERMA==:2 ;READ MBOX TICKS ;MSTR DEFSYM .MSRNU==:0 ;READ STATUS OF NEXT DISK UNIT DEFSYM .MSRUS==:1 ;READ STATUS OF A DISK UNIT DEFSYM .MSRCH==:0 ;CHANNEL NUMBER DEFSYM .MSRCT==:1 ;CONTROLLER NUMBER DEFSYM .MSRUN==:2 ;UNIT NUMBER DEFSYM .MSRST==:3 ;STATUS DEFSYM MS%MNT==:1_35. ;THIS UNIT IS PART OF A MOUNTED STRUCTURE DEFSYM MS%16B==:1_34. ;THIS UNIT WRITTEN IN 16-BIT MODE ; (RESERVED FOR FUTURE) DEFSYM MS%DIA==:1_33. ;THIS UNIT IS CURRENTLY IN USE BY AN ; ON-LINE DIAGNOSTIC DEFSYM MS%OFL==:1_32. ;THIS UNIT IS OFF-LINE DEFSYM MS%ERR==:1_31. ;THERE WAS AN ERROR READING THIS UNIT DEFSYM MS%BBB==:1_30. ;ONE OF THE BAT BLOCKS IS BAD DEFSYM MS%HBB==:1_29. ;ONE OF THE HOME BLOCKS IS BAD DEFSYM MS%WLK==:1_28. ;UNIT IS WRITE-LOCKED DEFSYM MS%TYP==:777_18. ;DISK TYPE CODE ; DEFINED THE SAME AS .UTTXX IN PHYPAR DEFSYM .MSRP4==:1 ;RP04 DEFSYM .MSRP5==:5 ;RP05 DEFSYM .MSRP6==:6 ;RP06 DEFSYM .MSRP7==:7 ;RP07 DEFSYM .MSRM3==:11 ;RM03 DEFSYM .MSRSN==:4 ;STRUCTURE NAME DEFSYM .MSRSA==:5 ;STRUCTURE ALIAS DEFSYM .MSRNS==:6 ;UNIT # IN STRUCTURE,,# OF UNITS IN STRUCTURE DEFSYM .MSRSW==:7 ;NUMBER OF PAGES FOR SWAPPING DEFSYM .MSRUI==:10 ;UNIT ID DEFSYM .MSROI==:13 ;OWNER ID DEFSYM .MSRFI==:16 ;FILE-SYSTEM ID DEFSYM .MSRSP==:21 ;NUMBER OF SECTORS PER PAGE DEFSYM .MSRSC==:22 ;NUMBER OF SECTORS PER CYLINDER DEFSYM .MSRPC==:23 ;NUMBER OF PAGES PER CYLINDER DEFSYM .MSRCU==:24 ;NUMBER OF CYLINDERS PER UNIT DEFSYM .MSRSU==:25 ;NUMBER OF SECTORS PER UNIT DEFSYM .MSRBT==:26 ;NUMBER OF BIT-WORDS IN BIT TABLE PER CYLINDER DEFSYM .MSRLN==:27 ;MAX LENGTH OF ARGUMENT BLOCK IN WORDS DEFSYM .MSMNT==:2 ;MOUNT A STRUCTURE DEFSYM .MSTNM==:0 ;NAME OF STRUCTURE DEFSYM .MSTAL==:1 ;ALIAS NAME DEFSYM .MSTNU==:2 ;NUMBER OF UNITS IN STRUCTURE DEFSYM .MSTFL==:2 ;FLAGS (LHS) DEFSYM MS%FLG==:777777,,0 ;MASK FOR .MSTFL DEFSYM MS%NFH==:1_35. ;NO FIX BAD HOME BLOCK DEFSYM MS%NFB==:1_34. ;NO FIX BAD BAT BLOCK DEFSYM MS%XCL==:1_33. ;MOUNT FOR EXCLUSIVE USE BY JOB DEFSYM MS%IGN==:1_32. ;IGNORE ERRORS DEFSYM .MSTUI==:3 ;START OF UNIT INFORMATION DEFSYM .MSTCH==:0 ;CHANNEL NUMBER DEFSYM .MSTCT==:1 ;CONTROLLER NUMBER DEFSYM .MSTUN==:2 ;UNIT NUMBER DEFSYM .MSTNO==:3 ;# OF ARGUMENT WORDS/UNIT DEFSYM .MSDIS==:3 ;DISMOUNT A STRUCTURE DEFSYM .MSDNM==:0 ;NAME OF STRUCTURE DEFSYM .MSGSS==:4 ;GET STATUS OF A STRUCTURE DEFSYM .MSGSN==:0 ;STRUCTURE NAME (ALIAS) DEFSYM .MSGST==:1 ;STATUS DEFSYM MS%PS==:1_35. ;STRUCTURE IS A PUBLIC STRUCTURE DEFSYM MS%DIS==:1_34. ;STRUCTURE IS BEING DISMOUNTED DEFSYM MS%DOM==:1_33. ;STRUCTURE IS DOMESTIC DEFSYM MS%PPS==:1_32. ;STRUCTURE IS THE PRIMARY PUBLIC STRUCTURE DEFSYM MS%INI==:1_31. ;STRUCTURE IS BEING INITIALIZED DEFSYM MS%LIM==:1_30. ;STRUCTURE LIMITED TO 2050 SIZES DEFSYM MS%NRS==:1_29. ;STRUCTURE IS NOT REGULATED DEFSYM .MSGNU==:2 ;NUMBER OF UNITS IN STRUCTURE DEFSYM .MSGMC==:3 ;MOUNT COUNT DEFSYM .MSGFC==:4 ;OPEN FILE COUNT DEFSYM .MSGSI==:5 ;STRUCTURE ID DEFSYM .MSGLN==:6 ;LENGTH OF ARGUMENT BLOCK DEFSYM .MSSSS==:5 ;SET STATUS OF A STRUCTURE DEFSYM .MSSSN==:0 ;STRUCTURE NAME DEFSYM .MSSST==:1 ;NEW STATUS BITS DEFSYM .MSSMW==:2 ;MASK WORD OF BITS TO BE CHANGED DEFSYM .MSSLN==:3 ;LENGTH OF ARGUMENT BLOCK DEFSYM .MSINI==:6 ;INITIALIZE A STRUCTURE DEFSYM .MSINM==:0 ;NAME OF STRUCTURE DEFSYM .MSIAL==:1 ;ALIAS NAME DEFSYM .MSINU==:2 ;NUMBER OF UNITS IN STRUCTURE DEFSYM .MSIFL==:2 ;FLAGS (LHS) ;FLAGS DEFINED IN .MSMNT FUNCTION DEFSYM MS%FCN==:77_18. ;FUNCTION CODE DEFSYM .MSCRE==:1 ;CREATE NEW FILE SYSTEM DEFSYM .MSRRD==:2 ;RECONSTRUCT THE ROOT-DIRECTORY DEFSYM .MSWHB==:3 ;WRITE THE HOME BLOCKS DEFSYM .MSRIX==:4 ;REBUILD INDEX TABLE (IDXFIL) DEFSYM .MSISU==:3 ;START OF UNIT INFORMATION DEFSYM .MSICH==:0 ;CHANNEL NUMBER DEFSYM .MSICT==:1 ;CONTROLLER NUMBER DEFSYM .MSIUN==:2 ;UNIT NUMBER DEFSYM .MSINO==:3 ;# OF ARGUMENT WORDS/UNIT DEFSYM .MSIST==:6 ;STATUS WORD DEFSYM .MSISW==:7 ;NUMBER OF PAGES FOR SWAPPING ON THIS UNIT DEFSYM .MSIFE==:10 ;NUMBER OF PAGES FOR FRONT-END FILE SYSTEM DEFSYM .MSIUI==:11 ;UNIT ID DEFSYM .MSIOI==:14 ;OWNER ID DEFSYM .MSIFI==:17 ;FILE SYSTEM ID DEFSYM .MSIFB==:22 ;NUMBER OF PAGES FOR BOOTSTRAP.BIN (OPTIONAL) DEFSYM .MSIMC==:7 ;INCREMENT MOUNT COUNT DEFSYM .MSDMC==:10 ;DECREMENT MOUNT COUNT DEFSYM .MSDEV==:0 ;DEVICE DESIGNATOR OR STRUCTURE DEFSYM .MSJOB==:1 ;JOB NUMBER FOR WHICH TO CHANGE COUNT DEFSYM .MSGSU==:11 ;GET STRUCTURE USERS DEFSYM .MSUAL==:0 ;POINTER TO ALIAS OF STRUCTURE DEFSYM .MSUFL==:1 ;FLAGS,,# OF ITEMS RETURNED DEFSYM MS%GTA==:1_35. ;GET USERS WHO HAVE ACCESSED STRUCTURE DEFSYM MS%GTM==:1_34. ;GET USERS WHO HAVE MOUNTED STRUCTURE DEFSYM MS%GTC==:1_33. ;GET USERS WHO ARE CONNECTED TO STRUCTURE DEFSYM .MSUJ1==:2 ;FIRST JOB NUMBER RETURNED DEFSYM .MSHOM==:12 ;MODIFY HOMEBLOCK WORD DEFSYM .MSHNM==:0 ;POINTER TO ALIAS, OR DESIGNATOR FOR ALIAS DEFSYM .MSHOF==:1 ;OFFSET INTO HOMEBLOCK OF WORD BEING CHANGED DEFSYM .MSHVL==:2 ;NEW VALUES FOR BITS BEING CHANGED DEFSYM .MSHMK==:3 ;MASK DECLARING WHICH BITS BEING CHANGED DEFSYM .MSICF==:13 ;INCREMENT MOUNT COUNT ON A FORK BASIS DEFSYM .MSDCF==:14 ;DECREMENT MOUNT COUNT ON A FORK BASIS DEFSYM .MSDEV==:0 ;DEVICE DESIGNATOR OR STRUCTURE DEFSYM .MSOFL==:15 ;ENABLE PSI INTERRUPTS INTERRUPTS FOR ; DISK (FOR DEVICE ALLOCATOR) DEFSYM .MSCHN==:0 ;CHANNEL ON WHICH TO RECEIVE INTERRUPT DEFSYM .MSIIC==:16 ;IGNORE INCREMENT CHECK FOR STRUCTURE USE ;MTOPR - FUNCTION CODES DEFSYM .MOCLE==:0 ;CLEAR ERRORS DEFSYM .MONOP==:31 ;NOP (WAIT FOR ACTIVITY TO STOP) DEFSYM .MOREW==:1 ;REWIND DEFSYM .MOEOF==:3 ;WRITE EOF DEFSYM .MODTE==:4 ;ASSIGN FE DEVICE TO A DTE DEFSYM .MOFWR==:6 ;FORWARD SPACE RECORD DEFSYM .MOBKR==:7 ;BACKSPACE RECORD DEFSYM .MORUL==:11 ;REWIND AND UNLOAD DEFSYM .MOERS==:13 ;ERASE TAPE DEFSYM .MOFWF==:16 ;FORWARD SPACE FILE DEFSYM .MOBKF==:17 ;BACKSPACE FILE DEFSYM .MOSPD==:26 ;SET TTY SPEED (FOR KL ONLY) DEFSYM .MORSP==:27 ;READ LINE SPEED (FOR KL ONLY) DEFSYM MO%RMT==:1_35. ;FLAG TO SAY LINE IS REMOTE DEFSYM MO%AUT==:1_34. ;FLAG TO SAY LINE IS "AUTO" SPEED ; (RSX20F ONLY) DEFSYM .MOSDR==:2 ;SET READ DIRECTION DEFSYM .MORDR==:26 ;READ READ DIRECTION DEFSYM .MOEOT==:10 ;SKIP TO LOGICAL END OF TAPE DEFSYM .MOSRS==:5 ;SET RECORD SIZE DEFSYM .MORRS==:15 ;READ RECORD SIZE DEFSYM .MOSDN==:24 ;SET DENSITY DEFSYM .MORDN==:12 ;READ DENSITY DEFSYM .MOSDM==:4 ;SET DATA MODE DEFSYM .MORDM==:14 ;READ DATA MODE DEFSYM .MOSPR==:20 ;SET PARITY DEFSYM .MORPR==:21 ;READ PARITY DEFSYM .MONRB==:22 ;GET NUMBER OF REMAINING BYTES IN RECORD DEFSYM .MOFOU==:23 ;FORCE OUT RECORD DEFSYM .MOINF==:25 ;GET INFORMATION ABOUT TAPE DEFSYM .MOICT==:0 ;COUNT OF ARGUMENTS TO BE RETURNED DEFSYM .MOITP==:1 ;MAGTAPE TYPE CODE ; DEFINED THE SAME AS .UTTXX IN PHYPAR DEFSYM .MTT45==:3 ;MAGTAPE TYPE TU45 DEFSYM .MTT77==:13 ;MAGTAPE TYPE TU77 DEFSYM .MTT78==:15 ;MAGTAPE TYPE TU78 DEFSYM .MTT70==:17 ;MAGTAPE TYPE TU70 DEFSYM .MTT71==:20 ;MAGTAPE TYPE TU71 DEFSYM .MTT72==:21 ;MAGTAPE TYPE TU72 DEFSYM .MTT73==:22 ;RESERVED FOR 200 IPS STC GCR DRIVE DEFSYM .MOIID==:2 ;MAGTAPE REEL ID DEFSYM .MOISN==:3 ;CHAN,CONTROLLER,UNIT ,, SERIAL # DEFSYM .MOIRD==:4 ;# OF READS DONE DEFSYM .MOIWT==:5 ;# OF WRITES DONE DEFSYM .MOIRC==:6 ;RECORD # FROM BOT DEFSYM .MOIFC==:7 ;FILE COUNT ON TAPE DEFSYM .MOISR==:10 ;# OF SOFT READ ERRORS DEFSYM .MOISW==:11 ;# OF SOFT WRITE ERRORS DEFSYM .MOIHR==:12 ;# OF HARD READ ERRORS DEFSYM .MOIHW==:13 ;# OF HARD WRITE ERRORS DEFSYM .MOIRF==:14 ;# RECORDS READ DEFSYM .MOIWF==:15 ;# OF FRAMES WRITTEN DEFSYM .MOLOC==:32 ;ATTACH MT TO MTA DEFSYM .MOCNT==:0 ;OFFSET FOR COUNT DEFSYM .MOMTN==:1 ;OFFSET FOR MT NUMBER DEFSYM .MOLBT==:2 ;LABEL TYPE (.LTxxx) DEFSYM .MODNS==:3 ;DENSITY (.SJDxx) DEFSYM .MOAVL==:4 ;ADDRESS OF VOLUME LABELS DEFSYM .MONVL==:5 ;# OF VOLUME LABELS (VOL1 + UVLSs) DEFSYM .MOCVN==:6 ;CURRENT VOLUME NUMBER WITHIN SET DEFSYM .MOVSN==:7 ;VOLUME SET NAME DEFSYM .MOSTA==:37 ;CURRENT MAGTAPE STATUS DEFSYM .MODDN==:1 ;1ST WORD OF .MOSTA DENSITIES CAPABLE DEFSYM SJ%CP2==:1_34. ;200 BPI DEFSYM SJ%CP5==:1_33. ;556 BPI DEFSYM SJ%CP8==:1_32. ;800 BPI DEFSYM SJ%C16==:1_31. ;1600 BPI DEFSYM SJ%C62==:1_30. ;6250 BPI DEFSYM .MODDM==:2 ;2ND WORD OF .MOSTA DATA MODES CAPABLE DEFSYM SJ%CMC==:1_34. ;CORE DUMP MODE DEFSYM SJ%CM6==:1_33. ;SIXBIT DEFSYM SJ%CMA==:1_32. ;ANSI ASCII DEFSYM SJ%CM8==:1_31. ;INDUSTRY COMPATABLE DEFSYM SJ%CMH==:1_30. ;HIGH DENSITY MODE DEFSYM .MOTRK==:3 ;3RD WORD OF .MOSTA NUMBER OF TRACKS DEFSYM SJ%7TR==:1_34. ;7 TRACK DRIVE DEFSYM SJ%9TR==:1_33. ;9 TRACK DRIVE DEFSYM .MOCST==:4 ;4TH WORD OF .MOSTA TAPE STATUS DEFSYM SJ%OFS==:1_35. ;OFF LINE DEFSYM SJ%MAI==:1_34. ;MAINTENANCE MODE ENABLED DEFSYM SJ%MRQ==:1_33. ;MAINTENANCE MODE REQUESTED DEFSYM SJ%BOT==:1_32. ;BOT DEFSYM SJ%REW==:1_31. ;REWINDING DEFSYM SJ%WLK==:1_30. ;WRITE LOCKED DEFSYM .MODVT==:5 ;5TH WORD OF .MOSTA DEVICE TYPE ; DEFINITIONS FOR THIS ARE SAME AS USED IN .MTALN DEFSYM .MOOFL==:40 ;PSI FOR MAGTAPES DEFSYM .MOPST==:42 ;PSI FOR EOT ON MT'S ; T3/ PSI ASSIGNMENT (-1 => CLEAR) DEFSYM .MORVS==:.MOREW ;REWIND VOLUME SET DEFSYM .MORVL==:43 ;REWIND CURRENT VOLUME DEFSYM .MOVLS==:44 ;VOLUME SWITCH FOR UNLABELED TAPES DEFSYM .MONTR==:45 ;SET/CLEAR NO TRANSLATE FLAG ; T3/ -1 => DON'T CONVERT EBCDIC TO ASCII ; T3/0=> CONVERT DEFSYM .MORDL==:46 ;READ USER LABELS ; T2/ GETS LABEL I.D. ; T3/ SP TO WHERE 76 CHARCTERS ARE TO BE PLACED DEFSYM .MOWUL==:47 ;WRITE USER LABELS ; T2/ LABEL I.D. ; T3/ SP TO 76 CHARACTERS OF DATA DEFSYM .MORLI==:50 ;READ LABEL INFORMATION FOR MT DEFSYM .MOMTP==:1 ;TYPE OF LABEL DEFSYM .MOMVN==:2 ;VOLUME NAME DEFSYM .MOMOW==:3 ;OWNER DEFSYM .MOMFM==:4 ;FORMAT OF TAPE FILE DEFSYM .MOMRL==:5 ;RECORD LENGTH DEFSYM .MOMBL==:6 ;BLOCK LENGTH DEFSYM .MOMCD==:7 ;CREATION DATE DEFSYM .MOMED==:10 ;EXPIRATION DATE DEFSYM .MOMFI==:11 ;FILE NAME DEFSYM .MOMGN==:12 ;GENERATION NUMBER DEFSYM .MOMGV==:13 ;GENERATION VERSION NUMBER DEFSYM .MOVMB==:14 ;VALUE OF MODE BYTE DEFSYM .MOSMV==:51 ;SET MODE VALUE DEFSYM .TPFST==:0 ;STREAM MODE DEFSYM .TPFCP==:1 ;ALL FORMATTING CONTROLS PRESENT DEFSYM .TPFFC==:2 ;FORTRAN CONTROLS PRESENT DEFSYM .TPFNC==:3 ;NO CONTROLS PRESENT DEFSYM .TPFMX==:3 ;MAX VALUE OF FIELD DEFSYM .MOSDS==:52 ;SET DEFERRED VOLUME-SWITCH MODE DEFSYM .MOPSI==:27 ;SET ERROR PSI FOR LPT AND CDR DEFSYM MO%MSG==:1_35. ;SUPPRESS STANDARD CTY MESSAGES DEFSYM .MOSID==:27 ;SET REEL I.D. DEFSYM .MOIEL==:30 ;INHIBIT ERROR LOGGING DEFSYM .MOSHV==:45 ;SET HDR1 AND HDR2 VALUES FOR MT DEFSYM .MOFMT==:1 ;OFFSET FOR FORMAT DEFSYM .MOEPD==:2 ;EXPIRATION DATE DEFSYM .MOBSZ==:3 ;BLOCK SIZE DEFSYM .MORSZ==:4 ;RECORD SIZE ;DEF FOR IPCF MESSAGE SENT ON A VOLUME SWITCH OR OTHER CONDITION ;MESSAGE CODE IS .IPCTR. OFFSETS THAT FOLLOW ARE ;RELATIVE TO WORD CONTAINING .IPCTR. DEFSYM .VMCOD==:0 ;CODE FOR THIS MESSAGE ; IS SUBCODE OF .IPCTR FUNCTION DEFSYM .VMABT==:1 ;ABORT CLOSE DEFSYM .VMICN==:2 ;INTERNAL ERROR (HOPEFULLY NOT USED) DEFSYM .VMERR==:3 ;LABEL R/W ERROR DEFSYM .VMVSM==:4 ;VOLUME SWITCH DEFSYM .VMSTS==:5 ;UNIT STATUS CHANGE (NOT USED YET) DEFSYM .VMUNL==:6 ;UNIT UNLOAD DEFSYM .VMREW==:7 ;REWIND DEFSYM .VSMTN==:1 ;MT NUMBER DEFSYM .VSFLG==:2 ;FLAGS DEFSYM VS%FLG==:-1_18. ;FLAGS PART OF WORD DEFSYM VS%WRT==:1_35. ;WRITE PREVIOUS VOLUME WAS OPENED FOR WRITE DEFSYM VS%COD==:777777 ;CODE DEFSYM .VSMNV==:1 ;MOUNT NTH VOLUME DEFSYM .VSFST==:2 ;MOUNT FIRST VOLUME DEFSYM .VSLST==:3 ;MOUNT LAST VOLUME DEFSYM .VSMRV==:4 ;MOUNT RELATIVE VOLUME NUMBER (SIGNED) DEFSYM .VSFLS==:5 ;FORCE LABELED TAPE VOLUME-SWITCH DEFSYM .VSCNT==:3 ;VOLUME NUMBER (SIGNED IF VS%MRV IS ON) DEFSYM .MOLVF==:32 ;LOAD DEVICE'S VFU DEFSYM .MORVF==:33 ;READ VFU FILE NAME DEFSYM .MOLTR==:34 ;LOAD TRANSLATION RAM DEFSYM .MORTR==:35 ;READ RAM FILE NAME DEFSYM .MOSTS==:36 ;SET SOFTWARE STATUS DEFSYM .MORST==:37 ;READ SOFTWARE STATUS DEFSYM MO%LPC==:1 ;PAGE COUNTER OVERFLOW DEFSYM MO%LCI==:2 ;CHARACTER INTERRUPT (HARD ERROR) DEFSYM MO%LVF==:4 ;VFU ERROR. PAPER MUST BE RE-ALIGNED DEFSYM MO%LVU==:20 ;LINE PRINTER HAS OPTICAL VFU DEFSYM MO%RPE==:40 ;RAM PARITY ERROR DEFSYM MO%RCK==:1 ;READ CHECK DEFSYM MO%PCK==:2 ;PICK CHECK DEFSYM MO%SCK==:4 ;STACK CHECK DEFSYM MO%HEM==:10 ;HOPPER EMPTY DEFSYM MO%SFL==:20 ;STACKER FULL DEFSYM MO%FNX==:1_18. ;NON-EXISTENT DEVICE DEFSYM MO%OL==:1_19. ;DEVICE IS OFF-LINE DEFSYM MO%HE==:1_20. ;HARDWARE ERROR DEFSYM MO%SER==:1_21. ;SOFTWARE ERROR DEFSYM MO%IOP==:1_22. ;I/O IN PROGRESS DEFSYM MO%EOF==:1_23. ;END OF FILE ; 1B11 ;RESERVED DEFSYM MO%FER==:1_25. ;FATAL ERROR DEFSYM MO%LCP==:1_35. ;LOWER CASE PRINTER DEFSYM MO%RLD==:1_34. ;FRONT-END WAS RELOADED DEFSYM .MOFLO==:40 ;FLUSH OUTPUT ;SEE SETJB FOR VARIOUS ARGUMENT VALUES DEFSYM .MOSNT==:34 ;SET TTY NON-TERMINAL STATUS DEFSYM .MOSMN==:1 ;NO SYSTEM MESSAGES(I.E. SUPPRESS) DEFSYM .MOSMY==:0 ;YES SYSTEM MESSAGES(DEFAULT) DEFSYM .MORNT==:35 ;READ TTY NON-TERMINAL STATUS ;PTY MTOPR NUMBERS DEFSYM .MOAPI==:24 ;ASSIGN PTY INTERRUPT CHANNELS DEFSYM MO%WFI==:1_35. ;ENABLE WAITING FOR INPUT DEFSYM MO%OIR==:1_34. ;ENABLE OUTPUT IS WAITING DEFSYM MO%SIC==:77_18. ;SOFTWARE INTERRUPT CHANNEL DEFSYM .MOPIH==:25 ;TEST PTY INPUT HUNGRY DEFSYM .MONWI==:0 ;NOT WAITING FOR INPUT DEFSYM .MOWFI==:-1 ;WAITING FOR INPUT DEFSYM .MOBAT==:26 ;SET BATCH BIT DEFSYM .MOJCB==:1 ;JOB CONTROLLED BY BATCH DEFSYM .MONCB==:0 ;JOB NOT CONTROLLED BY BATCH ;TTY MODE DEFINITIONS DEFSYM .MORLW==:30 ;READ WIDTH DEFSYM .MOSLW==:31 ;SET WIDTH DEFSYM .MORLL==:32 ;READ LENGTH DEFSYM .MOSLL==:33 ;SET LENGTH DEFSYM .MOSIG==:36 ;SET "IGNORE INPUT WHEN INACTIVE" BIT DEFSYM .MORBM==:37 ;READ 128 CHARACTER BREAK MASK DEFSYM MO%WN1==:776117,,777740 ;BIT DEFINITIONS FOR NON-FORMATTING CONTROL DEFSYM MO%WN2==:0 ;FOR ASCII CODES 40-777 DEFSYM MO%WN3==:0 ;FOR ASCII CODES 100-137 DEFSYM MO%WN4==:20 ;FOR ASCII CODES 137-177 DEFSYM MO%WF1==:001260,,000420 ;FORMATTING CONTROL BITS DEFSYM MO%WF2==:0 ;FOR ASCII CODES 40-77 DEFSYM MO%WF3==:0 ;FOR ASCII CODES 100-137 DEFSYM MO%WF4==:20 ;FOR ASCII CODES 140-177 DEFSYM MO%WP1==:000400,,400 ;PUNCTUATION BIT DEFINITIONS DEFSYM MO%WP2==:777774,,001760 ; FOR ASCII CODES 40-77 DEFSYM MO%WP3==:400000,,000760 ; FOR ASCII CODES 100-137 DEFSYM MO%WP4==:400000,,000760 ; FOR ASCII CODES 140-177 DEFSYM MO%WA1==:400 ;ALPHANUMERICS DEFINITIONS DEFSYM MO%WA2==:000003,,776000 ; FOR ASCII CODES 40-77 DEFSYM MO%WA3==:377777,,777000 ; FOR ASCII CODES 100-137 DEFSYM MO%WA4==:377777,,777020 ; FOR ASCII CODES 140-177 DEFSYM .MOSBM==:40 ;SET 128 CHARACTER BREAK MASK DEFSYM .MORFW==:41 ;READ FIELD WIDTH DEFSYM .MOSFW==:42 ;SET FIELD WIDTH DEFSYM .MOXOF==:43 ;SET/CLEAR XOFF/XON HANDLING DEFSYM .MOOFF==:0 ;TURN OFF XON/XOFF PROCESSING DEFSYM .MOONX==:1 ;TURN ON XON/XOFF PROCESSING DEFSYM .MORXO==:44 ;READ VALUE OF XOFF BIT DEFSYM .MOSLC==:45 ;SET LINE COUNTER DEFSYM .MORLC==:46 ;READ LINE COUNTER DEFSYM .MOSLM==:47 ;SET LINE COUNTER MAXIMUM DEFSYM .MORLM==:50 ;READ LINE COUNTER MAXIMUM DEFSYM .MOTPS==:51 ;PSI FOR NON-CONTROLLING TERMINAL DEFSYM .MOFCI==:52 ;221 Read full 12-bit character ;NET MTOPR NUMBERS DEFSYM .MOACP==:20 ;TOPS20AN ;ACCEPT CONNECTION ON SOCKET DEFSYM .MOSND==:21 ;TOPS20AN ;SEND ALL CURENTLY BUFFERED BYTES DEFSYM .MOSIN==:22 ;TOPS20AN ;SEND INS/INR COMMAND DEFSYM .MOAIN==:24 ;TOPS20AN ;ASSIGN INS/INR AND FSM PSI CHANNELS DEFSYM MO%NIN==:77_30. ;TOPS20AN ;INS/INR SOFTWARE INTERRUPT CHANNEL DEFSYM MO%FSM==:77_18. ;TOPS20AN ;FSM CHANGE OF STATE INTERRUPT CHANNEL ;DEFINITIONS FOR DECNET DEFSYM .MOACN==:24 ;ASSIGN CONNECT INTERRUPT CHANNEL DEFSYM MO%CDN==:777_27. ;CONNECT INTERRUPT CHANNEL DEFSYM MO%INA==:777_18. ;INTERRUPT MESSAGE CHANNEL DEFSYM MO%DAV==:777_9. ;DATA AVAILABLE CHANNEL DEFSYM .MONCI==:777 ;NO CHANGE DEFSYM .MOCIA==:776 ;CLEAR INTERRUPT ASSIGNMENT DEFSYM .MORLS==:25 ;READ LINK STATUS DEFSYM MO%CON==:1_35. ;LINK IS CONNECTED DEFSYM MO%SRV==:1_34. ;LINK IS A SERVER DEFSYM MO%WFC==:1_33. ;WAITING FOR A CONNECT DEFSYM MO%WCC==:1_32. ;WAITING FOR THIS LINK TO CONFIRM DEFSYM MO%EOM==:1_31. ;EOM PRESENT IN INPUT BUFFER DEFSYM MO%ABT==:1_30. ;CONNECTION ABORTED DEFSYM MO%SYN==:1_29. ;SYNCH DI RECIEVED DEFSYM MO%INT==:1_28. ;INT MESSAGE AVAILABLE DEFSYM MO%LWC==:1_27. ;LINK WAS CONNECTED DEFSYM .MORHN==:26 ;READ HOST NAME DEFSYM .MORTN==:27 ;READ TASK NAME DEFSYM .MORUS==:30 ;READ USER DATA DEFSYM .MORPW==:31 ;READ PASSWORD DEFSYM .MORAC==:32 ;READ ACCOUNT DEFSYM .MORDA==:33 ;READ OPTIONAL DATA DEFSYM .MORCN==:34 ;READ CONNECT OBJECT NUMBER DEFSYM .MORIM==:35 ;READ INTERRUPT MESSAGE DEFSYM .MOSIM==:36 ;SEND INTERRUPT MESSAGE DEFSYM .MOROD==:37 ;READ OBJ-DESC OF CONNECTION DEFSYM .MOCLZ==:40 ;CLOSE/REJECT A CONNECTION DEFSYM .MOCC==:41 ;ACCEPT A CONNECTION DEFSYM .MORSS==:42 ;READ SEGMENT SIZE ;DEFINITIONS FOR ATS ;FUNCTION CODES FOR MTOPR ARE IN COLUMN 1 DEFSYM .MOAMO==:1 ;SET MODE WORD DEFSYM .MOAMM==:1 ;MESSAGE MODE DEFSYM .MOADM==:2 ;DATA MODE DEFSYM .MOAAT==:2 ;ACQUIRE TERMINAL DEFSYM MO%AER==:1_35. ;HTN FIELD CONTAINS AN ERROR CODE DEFSYM .MOASI==:3 ;ENABLE INTERRUPTS DEFSYM MO%IFL==:777_27. ;FUNCTION TO BE PERFORMED DEFSYM .MOAAI==:0 ;ASSIGN INTERRUPT CHANNEL DEFSYM .MOADI==:1 ;DEASSIGN INTERRUPT CHANNEL DEFSYM MO%IEV==:777_18. ;EVENT BEING ASSIGNED OR DEASSIGNED DEFSYM .MOADT==:0 ;DATA ARRIVAL DEFSYM .MOAST==:1 ;STATUS ARRIVAL DEFSYM MO%ACH==:777777_0. ;CHANNEL NUMBER DEFSYM .MORCD==:4 ;GET STATUS DEFSYM MO%WDV==:777_0. ;WHICH DEVICES TO REPORT ON DEFSYM .MOALD==:0 ;ALL TERMINALS DEFSYM .MOCHG==:1 ;TERMINALS WHOSE STATUS HAS CHANGED DEFSYM .MOLST==:2 ;TERMINALS SPECIFIED IN LIST DEFSYM MO%ARM==:1_35. ;ASK THE RESOURCE MANAGER DEFSYM MO%MDA==:1_34. ;MORE DATA AVAILABLE FOR THIS JFN DEFSYM AT%OPN==:1_35. ;HTN IS OPEN AND USABLE DEFSYM AT%TCL==:1_34. ;NRM CLOSED TERMINAL VIA STATUS-REPORT DEFSYM AT%DHT==:1_33. ;DEASSIGNING HTN DEFSYM AT%TXF==:1_32. ;TERMINAL IS XOFF'D DEFSYM AT%UND==:1_31. ;DEVICE REQUESTED IS UNDEFINED DEFSYM AT%NAV==:1_30. ;DEVICE REQUESTED IS NOT AVAILABLE DEFSYM AT%OFL==:1_29. ;DEVICE REQUESTED IS OFFLINE DEFSYM AT%FUL==:1_28. ;SERVER IS FULL DEFSYM AT%UNS==:1_27. ;DEVICE TYPE IS UNSUPPORTED DEFSYM AT%REJ==:1_26. ;NODE NRM REJECTED THE REQUEST DEFSYM AT%MIE==:1_25. ;MONITOR INTERNAL ERROR (NODE OR HOST) DEFSYM AT%STF==:1_24. ;VT62 START-UP FAILED DEFSYM AT%CRJ==:1_23. ;CONNECTION WAS REJECTED DEFSYM AT%NDP==:1_22. ;DATA PIPE IS NOT OPEN DEFSYM AT%SER==:777777_0. ;STATUS REPORT ERROR CODE (18 BITS) DEFSYM .MOADE==:5 ;DEASSIGN TERMINAL DEFSYM MO%AAB==:1_35. ;DON'T SEND REMAINING DATA ;FUNCTION CODES FOR AYDIN DISPLAY MTOPR DEFSYM .MOFLE==:0 ;FLUSH ERRORS DEFSYM .MORER==:1 ;RETURN AYDIN ERROR CODE DEFSYM .MOWAT==:2 ;WAIT FOR ACTIVITY TO STOP DEFSYM MO%RWC==:777777_18. ;REMAINING WORD COUNT DEFSYM MO%LER==:777777_0. ;LAST AYDIN ERROR CODE ;DEFS FOR MTU JSYS ;FUNCTIONS: DEFSYM .MTNVV==:1 ;SET NO VOLUME VALID DEFSYM .MTCNT==:0 ;COUNT WORD DEFSYM .MTCOD==:1 ;ERROR CODE DEFSYM .MTPTR==:2 ;SP TO OPERATOR RESPONSE DEFSYM .MTRAL==:2 ;READ ALL LABELS DEFSYM .MTVL1==:1 ;SP TO VOL1 AREA DEFSYM .MTVL2==:2 ;SP TO VOL2 AREA DEFSYM .MTHD1==:3 ;SP TO HDR1 AREA DEFSYM .MTHD2==:4 ;SP TO HDR2 AREA DEFSYM .MTASI==:3 ;RETURN MT TO MTA ASSOCIATION DEFSYM .MTPHU==:1 ;RETURN MTA UNIT NUMBER HERE DEFSYM .MTNUL==:-1 ;NO ASSIGNMENT CODE DEFSYM .MTCVV==:4 ;CLEAR VV ;MUTIL JSYS FUNCTION CODES DEFSYM .MUENB==:1 ;ENABLE PID FOR RECEIVING DEFSYM .MUDIS==:2 ;DISABLE PID FROM RECEIVING DEFSYM .MUGTI==:3 ;GET PID OF [SYSTEM]INFO DEFSYM .MUCPI==:4 ;CREATE A PRIVATE INFO FOR A JOB DEFSYM .MUDES==:5 ;DESTROY A PID DEFSYM .MUCRE==:6 ;CREATE A PID DEFSYM .MUSSQ==:7 ;SET SEND AND RECEIVE QUOTAS DEFSYM .MUCHO==:10 ;CHANGE OWNER OF A PID DEFSYM .MUFOJ==:11 ;FIND OWNER'S JOB NUMBER DEFSYM .MUFJP==:12 ;FIND JOB'S PIDS DEFSYM .MUFSQ==:13 ;FIND SEND AND RECEIVE QUOTAS DEFSYM .MUFFP==:15 ;FIND FORK'S PIDS DEFSYM .MUSPQ==:16 ;SET PID QUOTA DEFSYM .MUFPQ==:17 ;FIND PID QUOTA DEFSYM .MUQRY==:20 ;QUERY DEFSYM .MUAPF==:21 ;ASSOCIATE A PID WITH A FORK DEFSYM .MUPIC==:22 ;PUT PID ON AN INTERRUPT CHANNEL DEFSYM .MUDFI==:23 ;DEFINE PID OF [SYSTEM]INFO DEFSYM .MUSSP==:24 ;SET SYSTEM PID TABLE DEFSYM .MURSP==:25 ;READ SYSTEM PID TABLE DEFSYM .MUMPS==:26 ;GET MAXIMUM PACKET SIZE DEFSYM .MUSKP==:27 ;SET PID TO RECEIVE KILLED PID MESSAGE DEFSYM .MURKP==:30 ;READ PID THAT RECEIVES KILLED PID MESSAGES DEFSYM .MUSPS==:31 ;Get system maximum packet size ;SYSTEM PID TABLE INDEX VALUES DEFSYM .SPIPC==:0 ;PID OF IPCC DEFSYM .SPINF==:1 ;PID OF INFO DEFSYM .SPQSR==:2 ;PID OF QUASAR DEFSYM .SPMDA==:3 ;PID OF QSRMDA DEFSYM .SPOPR==:4 ;PID OF OPERATOR JOB (ORION) DEFSYM .SPNSR==:5 ;PID OF NETSER ;NODE DEFSYM .NDSLN==:0 ;SET LOCAL NODE NAME DEFSYM .NDGLN==:1 ;GET LOCAL NODE NAME DEFSYM .NDNOD==:0 ;POINTER TO NODE NAME DEFSYM .NDSNM==:2 ;SET LOCAL NODE NUMBER DEFSYM .NDGNM==:3 ;GET LOCAL NODE NUMBER DEFSYM .NDSLP==:4 ;SET LOOPBACK ON PORT DEFSYM .NDPRT==:0 ;PORT TO SET IN LOOPBACK DEFSYM .NDCLP==:5 ;CLEAR LOOPBACK ON PORT DEFSYM .NDFLP==:6 ;FIND LOOPBACK PORT DEFSYM ND%LPR==:1_35. ;LOOPBACK RUNNING DEFSYM ND%LPA==:1_34. ;LOOPBACK ASSIGNED TO PORT DEFSYM .NDSNT==:7 ;SET NETWORK TOPOLOGY INFORMATION DEFSYM .NDGNT==:10 ;GET NETWORK TOPOLOGY INFORMATION DEFSYM .NDNND==:0 ;NUMBER OF NODE BLOCK POINTERS FOLLOWING DEFSYM .NDCNT==:1 ;NUMBER OF WORDS IN A NODE BLOCK DEFSYM .NDBK1==:2 ;FIRST ADDRESS OF A NODE BLOCK ;NODE BLOCK DEFINITIONS DEFSYM .NDNAM==:0 ;POINTER TO ASCIZ NODE NAME DEFSYM .NDSTA==:1 ;NODE STATE DEFSYM .NDSON==:0 ;ON DEFSYM .NDSOF==:1 ;OFF DEFSYM .NDNXT==:2 ;POINTER TO ASCIZ NEARER NEIGHBOR STRING DEFSYM .NDNBS==:3 ;NODE BLOCK SIZE DEFSYM .NDSIC==:11 ;SET TOPOLOGY CHANGE INTERRUPT CHANNEL DEFSYM .NDCHN==:0 ;CHANNEL NUMBER DEFSYM .NDCIC==:12 ;CLEAR NETWORK TOPOLOGY INTERRUPT DEFSYM .NDGVR==:13 ;GET NSP VERSION INFORMATION DEFSYM .NDNVR==:0 ;NUMBER OF VERSIONS RETURNED DEFSYM .NDCVR==:1 ;POINTER TO COMMUNICATONS VERSION BLOCK DEFSYM .NDRVR==:2 ;POINTER TO ROUTING VERSION BLOCK DEFSYM .NDVER==:0 ;VERSION NUMBER DEFSYM .NDECO==:1 ;ECO NUMBER DEFSYM .NDCST==:2 ;CUSTOMER LEVEL DEFSYM .NDGLI==:14 ;GET LINE INFORMATION DEFSYM .NDNLN==:0 ;<# OF ENTRIES FOLLOWING>,,<# LINE RETURNED> DEFSYM .NDCNT==:1 ;NUMBER OF WORDS IN A LINE BLOCK ; LINE BLOCK DEFINITION DEFSYM .NDLNM==:0 ;NSP PORT (LINE) NUMBER DEFSYM .NDLST==:1 ;STATE OF LINE DEFSYM .NDLON==:1 ;ON DEFSYM .NDLOF==:2 ;OFF DEFSYM .NDLCN==:3 ;CONTROLLER LOOPBACK DEFSYM .NDLCB==:4 ;CABLE LOOPBACK DEFSYM .NDLND==:2 ;BYTE POINTER NODE AT END OF LINE DEFSYM .NDLSZ==:3 ;SIZE OF BLOCK DEFSYM .NDVFY==:15 ;VERIFY NODE NAME DEFSYM .NDFLG==:1 ;FLAGS RETURNED BY MONITOR DEFSYM ND%EXM==:1_35. ;NODE SPECFIED EXACTLY MATCHES A KNOWN NODE ;NOUT DEFSYM NO%MAG==:1_35. ;OUTPUT MAGNITUDE DEFSYM NO%SGN==:1_34. ;OUTPUT SIGN DEFSYM NO%LFL==:1_33. ;LEADING FILLER DEFSYM NO%ZRO==:1_32. ;FILL WITH ZERO'S DEFSYM NO%OOV==:1_31. ;OUTPUT ON COLUMN OVERFLOW DEFSYM NO%AST==:1_30. ;OUTPUT ASTERISKS ON OVERFLOW DEFSYM NO%COL==:177_18. ;NUMBER OF COLUMNS TO USE DEFSYM NO%RDX==:777777 ;RADIX DEFSYM OF%FDT==:1_2. ;FORCE DATE UPDATE ;ODCNV -- SEE IDCNV FOR BITS ;ODTIM DEFSYM OT%NDA==:1_35. ;DO NOT OUTPUT DATE DEFSYM OT%DAY==:1_34. ;OUTPUT DAY OF WEEK DEFSYM OT%FDY==:1_33. ;OUTPUT NUMERIC MONTH DEFSYM OT%NMN==:1_32. ;OUTPUT NUMERIC MONTH DEFSYM OT%FMN==:1_31. ;OUTPUT MONTH IN FULL DEFSYM OT%4YR==:1_30. ;OUTPUT 4-DIGIT YEAR DEFSYM OT%DAM==:1_29. ;OUTPUT DAY AFTER MONTH DEFSYM OT%SPA==:1_28. ;OUTPUT SPACES IN DATE DEFSYM OT%SLA==:1_27. ;OUTPUT SLASHES IN DATE DEFSYM OT%NTM==:1_26. ;DO NOT OUTPUT TIME DEFSYM OT%NSC==:1_25. ;DO NOT OUTPUT SECONDS DEFSYM OT%12H==:1_24. ;OUTPUT 12-HOUR FORMAT DEFSYM OT%NCO==:1_23. ;DO NOT OUTPUT COLON DEFSYM OT%TMZ==:1_22. ;OUTPUT TIME ZONE DEFSYM OT%SCL==:1_18. ;SUPPRESS COLUMNIZATION ;ODTNC -- SEE IDCNV FOR BITS ;OPENF DEFSYM OF%BSZ==:77_30. ;BYTE SIZE DEFSYM OF%MOD==:17_26. ;MODE DEFSYM OF%HER==:1_17. ;HALT ON IO ERROR DEFSYM OF%RD==:1_16. ;READ DEFSYM OF%WR==:1_15. ;WRITE DEFSYM OF%EX==:1_14. ;EXECUTE (RESERVED FOR THE FUTURE) DEFSYM OF%APP==:1_13. ;APPEND DEFSYM OF%THW==:1_10. ;THAWED DEFSYM OF%AWT==:1_9. ;ALWAYS WAIT DEFSYM OF%PDT==:1_8. ;PRESERVE DATES DEFSYM OF%NWT==:1_7. ;NEVER WAIT DEFSYM OF%RTD==:1_6. ;RESTRICTED DEFSYM OF%PLN==:1_5. ;SET TO DISABLE LINE NUMBER CHECKING FOR ; NON-LINE NUMBER FILES DEFSYM OF%DUD==:1_4. ;DON'T UPDATE TO DISK BY DDMP DEFSYM OF%OFL==:1_3. ;ALLOW OPENING THE DEVICE EVEN IF OFFLINE DEFSYM OF%FDT==:1_2. ;FORCE DATE UPDATE DEFSYM OF%RAR==:1_1. ; Wait if file is off-line ;PMAP BIT DEFINITIONS DEFSYM PM%CNT==:1_35. ;RH WORD CONTAINS A COUNT DEFSYM PM%MVP==:1_34. ;MOVE PAGE INSTEAD OF INDIRECT POINTER ; (NOT IMPLEMENTED DEFSYM PM%RD==:1_33. ;READ DEFSYM PM%WT==:1_32. ;WRITE DEFSYM PM%WR==:1_32. ; (ANOTHER NAME FOR ABOVE) DEFSYM PM%EX==:1_31. ;EXECUTE (RESERVED FOR THE FUTURE) DEFSYM PM%RWX==:7_31. ;CONVENIENT ABBREV FOR RD+WT+EX DEFSYM PM%PLD==:1_30. ;PRELOAD PAGES BEING MAPPED DEFSYM PM%IND==:1_29. ;USE INDIRECT PTRS (RESERVED FOR THE FUTURE) DEFSYM PM%TPU==:1_27. ;TRAP TO USER ; (NOT IMPLEMENTED -- OBSOLETE) DEFSYM PM%CPY==:1_26. ;COPY ON WRITE DEFSYM PM%ABT==:1_24. ;ABORT UNMAP. DEFSYM PM%RPT==:777777_0. ;REPEAT COUNT ;PMCTL - PHYSICAL MEMORY CONTROL DEFSYM .MCRCE==:0 ;READ CACHE ENABLE DEFSYM .MCSCE==:1 ;SET CACHE ENABLE DEFSYM .MCCST==:0 ;ARGLIST OFFSET FOR CACHE STATE DEFSYM MC%CEN==:1 ;CACHE ENABLED DEFSYM .MCRPS==:2 ;READ PAGE STATUS DEFSYM .MCSPS==:3 ;SET PAGE STATUS DEFSYM .MCPPN==:0 ;ARGLIST OFFSET FOR PHYSICAL PAGE NUMBER DEFSYM .MCPST==:1 ;ARGLIST OFFSET FOR PAGE STATE DEFSYM .MCPSA==:0 ;PAGE AVAILABLE DEFSYM .MCPSS==:1 ;PAGE IN TRANSITION STATE DEFSYM .MCPSO==:2 ;PAGE OFFLINE DEFSYM .MCPSE==:3 ;PAGE OFFLINE DUE TO ERROR DEFSYM .MCRME==:4 ;READ MEMORY ERROR INFORMATION DEFSYM .PMMER==:1 ;MOS MEMORY ERROR DEFSYM .PMMTP==:0 ;ENTRY HEADER AND TYPE DEFSYM .PMMRG==:1 ;ERROR REGISTER DEFSYM .PMMSY==:2 ;SYNDROME DEFSYM .PMMBN==:3 ;BLOCK NUMBER DEFSYM .PMMSB==:4 ;SPARE BIT NUMBER DEFSYM .PMMEA==:5 ;ERROR ADDRESS DEFSYM .PMMSN==:6 ;START OF SERIAL NUMBERS DEFSYM .PMMNS==:4 ;# OF SERIAL NUMBERS TO STORE ;PRARG - PROCESS ARGUMENTS ;FUNCTION CODE DEFINITIONS DEFSYM .PRARD==:1 ;READ ARGUMENT BLOCK DEFSYM .PRAST==:2 ;SET ARGUMENT BLOCK ;RCUSR AND RCDIR ; FLAGS SUPPLIED ON CALL DEFSYM RC%PAR==:1_21. ;PARTIAL RECOGNITION IS ALLOWED DEFSYM RC%STP==:1_20. ;STEP WILDCARD (RCDIR ONLY) DEFSYM RC%AWL==:1_19. ;ALLOW WILDCARDS (RCDIR ONLY) DEFSYM RC%EMO==:1_18. ;EXACT MATCH ONLY ; FLAGS RETURNED DEFSYM RC%DIR==:1_35. ;FILES-ONLY DIRECTORY DEFSYM RC%ANA==:1_34. ;ALPHANUMERIC ACCOUNTS ALLOWED DEFSYM RC%RLM==:1_33. ;REPEAT LOGIN MESSAGE DEFSYM RC%NOM==:1_32. ;NO MATCH FOUND DEFSYM RC%AMB==:1_31. ;AMBIGUOUS DEFSYM RC%NMD==:1_30. ;NO MORE DIRS - RETURNED IF STP IS REQUESTED DEFSYM RC%WLD==:1_29. ;WILDCARD DIR WAS INPUT ;RCVOK DEFSYM .RCFCJ==:0 ;FUNCTION CODE,, JOB NUMBER DEFSYM .RCUNO==:1 ;USER NUMBER DEFSYM .RCCDR==:2 ;CONNECTED DIRECTORY DEFSYM .RCRQN==:3 ;REQUEST NUMBER DEFSYM .RCNUA==:4 ;NUMBER OF USER ARGS DEFSYM .RCARA==:5 ;POINTER TO USER ARGS DEFSYM .RCCAP==:6 ;CURRENT CAPABILITIES DEFSYM .RCTER==:7 ;TERMINAL NUMBER DEFSYM .RCRJB==:10 ;REQUESTED JOB ;RDTTY AND TEXTI DEFSYM RD%BRK==:1_35. ;BREAK ON REGULAR BREAK SET DEFSYM RD%TOP==:1_34. ;BREAK ON TOPS10 BREAK SET DEFSYM RD%PUN==:1_33. ;BREAK ON PUNCTUATION DEFSYM RD%BEL==:1_32. ;BREAK ON END OF LINE DEFSYM RD%CRF==:1_31. ;SUPPRESS CR (RETURNS LF ONLY) DEFSYM RD%RND==:1_30. ;RETURN IF NOTHING TO DELETE DEFSYM RD%JFN==:1_29. ;JFNS GIVEN FOR SOURCE DEFSYM RD%RIE==:1_28. ;RETURN ON INPUT (BUFFER) EMPTY DEFSYM RD%BBG==:1_27. ;BEGINNING OF (DEST) BUFFER GIVEN DEFSYM RD%BEG==:1_26. ;RETURN IMMEDIATELY WHEN TYPIST EDITS TO .RDBKL DEFSYM RD%RAI==:1_25. ;RAISE LOWERCASE INPUT DEFSYM RD%SUI==:1_24. ;SUPPRESS ^U INDICATION DEFSYM RD%BTM==:1_23. ;BREAK CHARACTER TERMINATED INPUT DEFSYM RD%BFE==:1_22. ;RETURNED BECAUSE BUFFER EMPTY DEFSYM RD%BLR==:1_21. ;BACKUP LIMIT REACHED ;TEXTI ARG BLOCK DEFSYM .RDCWB==:0 ;COUNT OF WORDS IN BLOCK DEFSYM .RDFLG==:1 ;FLAGS DEFSYM .RDIOJ==:2 ;IO JFNS DEFSYM .RDDBP==:3 ;DEST BYTE POINTER DEFSYM .RDDBC==:4 ;DEST BYTE COUNT DEFSYM .RDBFP==:5 ;TOP OF BUFFER POINTER DEFSYM .RDRTY==:6 ;RETYPE (^R) POINTER DEFSYM .RDBRK==:7 ;BREAK SET MASK POINTER DEFSYM .RDBKL==:10 ;BACKUP LIMIT POINTER ;RFSTS DEFSYM RF%LNG==:1_35. ;LONG FORM OF RFSTS CALL, ARG BLOCK IN 2 DEFSYM RF%PRH==:777777_0. ;PROCESS HANDLE ;RFSTS ARG BLOCK DEFSYM .RFCNT==:0 ;XWD COUNT OF WORDS RETURNED, ; MAXIMUM WORDS TO RETURN DEFSYM .RFPSW==:1 ;PROCESS STATUS WORD DEFSYM .RFPFL==:2 ;PROCESS' PC FLAGS DEFSYM .RFPPC==:3 ;PROCESS' PC DEFSYM .RFSFL==:4 ;STATUS FLAGS FOR PROCESS: DEFSYM RF%EXO==:1_35. ;PROCESS IS EXECUTE-ONLY ;PROCESS STATUS WORD DEFSYM RF%FRZ==:1_35. ;PROCESS IS FROZEN DEFSYM RF%STS==:377777_18. ;PROCESS STATUS CODE DEFSYM .RFRUN==:0 ;RUNNABLE DEFSYM .RFIO==:1 ;DISMISSED FOR I/O DEFSYM .RFHLT==:2 ;HALTED DEFSYM .RFFPT==:3 ;FORCED PROCESS TERMINATION DEFSYM .RFWAT==:4 ;WAITING FOR INFERIOR PROCESS DEFSYM .RFSLP==:5 ;SLEEP DEFSYM .RFTRP==:6 ;JSYS TRAPPED DEFSYM .RFABK==:7 ;ADDRESS BREAK FREEZE DEFSYM .RFSIG==:10 ;27 SIGNAL JFN FREEZE DEFSYM RF%SIC==:777777_0. ;SOFTWARE INTERRUPT CHANNNEL ;RFTAD/SFTAD DEFSYM .RSWRT==:0 ;WRITE DATE WORD DEFSYM .RSCRV==:1 ;CREATION DATE WORD DEFSYM .RSREF==:2 ;REFERENCE DATE WORD DEFSYM .RSCRE==:3 ;INTERNAL SYSTEM WRITE DATE WORD DEFSYM .RSTDT==:4 ; Tape write date word DEFSYM .RSNET==:5 ; Online expiration date/interval word DEFSYM .RSFET==:6 ; Offline expiration date/interval word ;RMAP DEFSYM RM%RD==:1_33. ;READ ACCESS ALLOWED DEFSYM RM%WR==:1_32. ;WRITE ACCESS ALLOWED DEFSYM RM%EX==:1_31. ;EXECUTE ACCESS ALLOWED DEFSYM RM%PEX==:1_30. ;PAGE EXISTS DEFSYM RM%CPY==:1_26. ;COPY ON WRITE ;RPACS/SPACS BIT DEFINITIONS DEFSYM PA%RD==:1_33. ;READ ACCESS ALLOWED DEFSYM PA%WT==:1_32. ;WRITE ACCESS ALLOWED DEFSYM PA%WR==:1_32. ; (ANOTHER NAME FOR ABOVE) DEFSYM PA%EX==:1_31. ;EXECUTE ACCESS ALLOWED ; (RESERVED FOR THE FUTURE) DEFSYM PA%PEX==:1_30. ;PAGE EXISTS DEFSYM PA%IND==:1_29. ;INDIRECT POINTER DEFSYM PA%TPU==:1_27. ;TRAP TO USER ; (NOT IMPLEMENTED -- OBSOLETE) DEFSYM PA%CPY==:1_26. ;COPY ON WRITE DEFSYM PA%PRV==:1_25. ;PRIVATE DEFSYM P1%RD==:1_15. ;READ ACCESS ALLOWED IN 1ST POINTER DEFSYM P1%WR==:1_14. ;WRITE ACCESS ALLOWED IN 1ST POINTER DEFSYM P1%WT==:1_14. ; (ANOTHER NAME FOR ABOVE) DEFSYM P1%EX==:1_13. ;EXECUTE ACCESS ALLOWED IN 1ST POINTER ; (RESERVED FOR THE FUTURE) DEFSYM P1%PEX==:1_12. ;PAGE EXISTS IN 1ST POINTER DEFSYM P1%CPY==:1_8. ;COPY-ON-WRITE IN 1ST POINTER ;RSCAN DEFSYM .RSINI==:0 ;MAKE RESCAN BUFFER AVAILABLE FOR INPUT DEFSYM .RSCNT==:1 ;COUNT CHARACTERS LEFT TO READ FROM RESCAN BUFFER ;RTIW DEFSYM RT%DIM==:1_35. ;DEFERRED TERMINAL INTERRUPT MASK GIVEN DEFSYM RT%PRH==:777777 ;PROCESS HANDLE ;SCTTY DEFSYM .SCRET==:0 ;RETURN DESIGNATOR (CTTY) FOR FORK DEFSYM .SCSET==:1 ;SET SCTTY FOR FORK DEFSYM .SCRST==:2 ;CLEAR FORK CTTY (RESTORE JOB CTTY) ;SCVEC DEFSYM .SVEAD==:0 ;ENTRY ADDRESS DEFSYM .SVINE==:1 ;INITIAL ENTRY FOR SETUP DEFSYM .SVGET==:2 ;ENTRY ADDRESS FOR GET SHARE FILE ROUTINE DEFSYM .SV40==:3 ;ADDRESS TO GET LOCATION 40 DEFSYM .SVRPC==:4 ;ADDRESS TO GET RETURN PC DEFSYM .SVMAK==:5 ;ENTRY FOR MAKE SHARE FILE ROUTINE DEFSYM .SVCST==:6 ;2 WORD BLOCK FOR CONTROL-C/START PROCESSING ;SDVEC DEFSYM .SDEAD==:0 ;ENTRY ADDRESS DEFSYM .SDINE==:1 ;INITIAL ENTRY DEFSYM .SDVER==:2 ;DMS VERSION DEFSYM .SDDMS==:3 ;ADDRESS TO STORE DMS JSYS DEFSYM .SDRPC==:4 ;ADDRESS TO STORE RETURN PC ;SETJB FUNCTION CODES DEFSYM .SJDEN==:0 ;SET DEFAULT MAGTAPE DENSITY DEFSYM .SJDDN==:0 ;SYSTEM DEFAULT DENSITY DEFSYM .SJDN2==:1 ;200 BPI DEFSYM .SJDN5==:2 ;556 BPI DEFSYM .SJDN8==:3 ;800 BPI DEFSYM .SJD16==:4 ;1600 BPI DEFSYM .SJD62==:5 ;6250 BPI DEFSYM .SJPAR==:1 ;SET DEFAULT MAGTAPE PARITY DEFSYM .SJPRO==:0 ;ODD PARITY DEFSYM .SJPRE==:1 ;EVEN PARITY DEFSYM .SJDM==:2 ;SET DEFAULT MAGTAPE DATA MODE DEFSYM .SJDDM==:0 ;SYSTEM DEFAULT DATA MODE DEFSYM .SJDMC==:1 ;CORE DUMP MODE DEFSYM .SJDM6==:2 ;SIX BIT BYTE MODE (FOR 7-TRACK DRIVES) DEFSYM .SJDMA==:3 ;ANSI ASCII MODE (7 BITS IN 8 BIT BYTE) DEFSYM .SJDM8==:4 ;INDUSTRY COMPATIBLE MODE DEFSYM .SJDMH==:5 ;HI-DENSITY MODE (9 EIGHT BIT ; BYTES IN 2 WORDS) DEFSYM .SJRS==:3 ;SET DEFAULT MAGTAPE RECORD SIZE DEFSYM .SJDFS==:4 ;SET DEFERRED SPOOLING DEFSYM .SJSPI==:0 ;IMMEDIATE MODE SPOOLING DEFSYM .SJSPD==:1 ;DEFERRED MODE SPOOLING DEFSYM .SJSRM==:5 ;SET JOB SESSION REMARK DEFSYM .SJT20==:6 ;DECLARE WHETHER TOPS20 COMMAND LEVEL OR NOT DEFSYM .SJDFR==:7 ; Set default job retrieval mode DEFSYM .SJRFA==:0 ; OPENF should always fail DEFSYM .SJRWA==:1 ; OPENF should always request & wait DEFSYM .SJBAT==:10 ;SET BATCH FLAGS AND STREAM ;SEE .JIBCH FOR FIELD DEFINITIONS DEFSYM .SJLLO==:11 ;SET JOB LOCATION ;SFORK DEFSYM SF%CON==:1_35. ;CONTINUE PROCESS, IGNORE PC IN AC2 DEFSYM SF%PRH==:777777_0. ;PROCESS HANDLE ;SFUST DEFSYM .SFAUT==:0 ;SET AUTHOR STRING DEFSYM .SFLWR==:1 ;SET LAST WRITER STRING ;SMON FUNCTION CODES AND BIT DEFINITIONS (SYSTEM FLAGS) DEFSYM .SFFAC==:0 ;ALLOW FACT ENTRIES DEFSYM .SFCDE==:1 ;CHECKDISK FOUND ERRORS DEFSYM .SFCDR==:2 ;CHECKDISK RUNNING DEFSYM .SFMST==:3 ;MANUAL START IN PROGRESS DEFSYM .SFRMT==:4 ;REMOTE LOGINS ALLOWED DEFSYM .SFPTY==:5 ;PTY LOGINS ALLOWED DEFSYM .SFCTY==:6 ;CTY LOGIN ALLOWED DEFSYM .SFOPR==:7 ;OPERATOR IN ATTENDANCE DEFSYM .SFLCL==:10 ;LOCAL LOGINS ALLOWED DEFSYM .SFBTE==:11 ;BIT TABLE ERRORS FOUND ON STARTUP DEFSYM .SFCRD==:12 ;USER CAN CHANGE DIRECTORY CHARACTERISTICS DEFSYM .SFNVT==:13 ;TOPS20AN ;NVT LOGIN ALLOWED DEFSYM .SFWCT==:14 ;WHEEL LOGIN ON CTY ALLOWED DEFSYM .SFWLC==:15 ;WHEEL LOGIN ON LOCAL TERMINALS ALLOWED DEFSYM .SFWRM==:16 ;WHEEL LOGIN ON REMOTE TERMINALS ALLOWED DEFSYM .SFWPT==:17 ;WHEEL LOGIN ON PTY'S ALLOWED DEFSYM .SFWNV==:20 ;TOPS20AN ;WHEEL LOGIN ON NVT'S ALLOWED DEFSYM .SFUSG==:21 ;USAGE FILE IN USE DEFSYM .SFFLO==:22 ;FULL LATENCY OPTIMIZATION ;CAUTION: SETTING THIS REQUIRES THAT THE ; SYSTEM BE AT REVISION LEVEL 10, AND ; THAT RH20 BOARD M8555 BE AT REVISION LEVEL D. ; OTHERWISE, THE FILE-SYSTEM MAY BE DAMAGED. DEFSYM .SFMTA==:23 ;MAGTAPE ALLOCATION ENABLED ;BELOW ARE FUNCTION CODES THAT DO NOT MAP DIRECTLY INTO BITS DEFSYM .SFNTN==:44 ;TOPS20AN ;NETWORK ON/OFF CONTROL DEFSYM .SFNDU==:45 ;TOPS20AN ;NET DOWN/UP REQUEST DEFSYM .SFNHI==:46 ;TOPS20AN ;NET HOST TABLE INITIALIZE DEFSYM .SFTMZ==:47 ;SET TIME ZONE THIS SYSTEM IS IN DEFSYM .SFLHN==:50 ;TOPS20AN ;SET LOCAL HOST NUMBER OF THIS NET SITE DEFSYM .SFAVR==:51 ;ACCOUNT VALIDATION ON/OFF DEFSYM .SFSTS==:52 ;ENABLE/DISABLE STATUS REPORTING DEFSYM .SFSOK==:53 ;GETOK/GIVOK DEFAULT SETTING DEFSYM .SFMCY==:54 ;SET MAX ORDINARY OFFLINE EXP PERIOD DEFSYM .SFRDU==:55 ;READ DATE UPDATE FUNCTION DEFSYM .SFACY==:56 ;SET MAX ARCHIVE EXP PERIOD DEFSYM .SFRTW==:57 ;SET [NO] RETRIEVAL WAITS NON-0 => NO WAIT DEFSYM .SFTDF==:60 ;TAPE MOUNT CONTROLS DEFSYM MT%UUT==:1_35. ;UNLOAD UNREADABLE TAPES DEFSYM .SFWSP==:61 ;WORKING SET PRELOADING ;159 Begin addition DEFSYM .SFNTD==:62 ;Initialize PUP directory DEFSYM .SFRTE==:63 ;Set PUP routing DEFSYM .SFPBG==:64 ;Set PUP bug switch ;159 End addition ;206 Begin addition DEFSYM .SFCHA==:65 ;Turn on and off Chaos Net Access needed flag ;206 End addition DEFSYM SF%FAC==:1_<35.-.RADIX10.,<.SFFAC>> ;FACT ENTRIES ALLOWED DEFSYM SF%CDE==:1_<35.-.RADIX10.,<.SFCDE>> ;CHECKDISK FOUND ERRORS DEFSYM SF%CDR==:1_<35.-.RADIX10.,<.SFCDR>> ;CHECKDISK RUNNING DEFSYM SF%MST==:1_<35.-.RADIX10.,<.SFMST>> ;MANUAL START IN PROGRESS DEFSYM SF%RMT==:1_<35.-.RADIX10.,<.SFRMT>> ;REMOTE LOGINS ALLOWED DEFSYM SF%PTY==:1_<35.-.RADIX10.,<.SFPTY>> ;PTY LOGINS ALLOWED DEFSYM SF%CTY==:1_<35.-.RADIX10.,<.SFCTY>> ;CTY LOGIN ALLOWED DEFSYM SF%OPR==:1_<35.-.RADIX10.,<.SFOPR>> ;OPERATOR IN ATTENDANCE DEFSYM SF%LCL==:1_<35.-.RADIX10.,<.SFLCL>> ;LOCAL LOGINS ALLOWED DEFSYM SF%BTE==:1_<35.-.RADIX10.,<.SFBTE>> ;BIT TABLE ERRORS FOUND ON STARTUP DEFSYM SF%CRD==:1_<35.-.RADIX10.,<.SFCRD>> ;USER CAN CHANGE DIRECTORY CHARACTERISTICS DEFSYM SF%NVT==:1_<35.-.RADIX10.,<.SFNVT>> ;TOPS20AN ;NVT LOGINS ALLOWED DEFSYM SF%USG==:1_<35.-.RADIX10.,<.SFUSG>> ;USAGE FILE IN USE DEFSYM SF%FLO==:1_<35.-.RADIX10.,<.SFFLO>> ;FULL LATENCY OPTIMIZATION IN USE ;CAUTION: SETTING THIS REQUIRES THAT THE ; SYSTEM BE AT REVISION LEVEL 10, AND ; THAT RH20 BOARD M8555 BE AT REVISION LEVEL D. ; OTHERWISE, THE FILE-SYSTEM MAY BE DAMAGED. DEFSYM SF%MTA==:1_<35.-.RADIX10.,<.SFMTA>> ;MAGTAPE ALLOCATION ENABLED DEFSYM SF%EOK==:1_35. ;ENABLE ACCESS CHECKING DEFSYM SF%DOK==:1_34. ;ALLOW ACCESS IF CHECKING DISABLED ;SINM JSYS DEFINITIONS DEFSYM SI%TMG==:1_35. ;TRUNCATE MESSAGE DEFSYM SI%EOM==:1_34. ;END-OF-MESSAGE FOUND ;SIR JSYS (NEW FORM) DEFSYM SI%VER==:7_18. ;VERSION OF SIR IN T1 DEFSYM SI%LEV==:77_30. ;LEVEL FIELD IN CHNTAB DEFSYM SI%ADR==:7777,,-1 ;ADDRESS OF INTERRUPT ROUTINE IN CHNTAB ;SKED JSYS DEFSYM .SACNT==:0 ;ARGUMENT BLOCK OFFSET FOR COUNT ;FUNCTION CODES DEFSYM .SKRBC==:1 ;READ BIAS CONTROL KNOB DEFSYM .SAKNB==:1 ;OFFSET FOR KNOB VALUE DEFSYM .SKSBC==:2 ;SET BIAS CONTROL KNOB DEFSYM .SKRCS==:3 ;READ SHARE OF A CLASS DEFSYM .SACLS==:1 ;CLASS DEFSYM .SASHR==:2 ;SHARE DEFSYM .SAUSE==:3 ;USE DEFSYM .SA1ML==:4 ;1 MINUTE LOAD AVERAGE DEFSYM .SA5ML==:5 ;5 MINUTE LOAD AVERAGE DEFSYM .SA15L==:6 ;15 MINUTE LOAD DEFSYM .SKSCS==:4 ;SET SHARE OF A CLASS DEFSYM .SKICS==:5 ;START OR STOP CLASS SCHEDULING DEFSYM .SACTL==:1 ;WORD FOR CONTROL BITS DEFSYM .SKSCJ==:6 ;SET CLASS OF A JOB DEFSYM .SAJOB==:1 ;JOB DEFSYM .SAJCL==:2 ;CLASS OF JOB DEFSYM .SAWA==:3 ;WA ON/OFF SWITCH DEFSYM .SKRJP==:7 ;READ CLASS PARAMETERS FOR A JOB DEFSYM .SAJSH==:3 ;JOB'S SHARE ALLOTMENT DEFSYM .SAJUS==:4 ;JOB'S CURRENT USE DEFSYM .SKBCR==:10 ;READ CLASS SETTING FOR BATCH JOBS DEFSYM .SABCL==:1 ;BATCH CLASS DEFSYM .SKBCS==:11 ;SET CLASS FOR BATCH JOBS DEFSYM .SKBBG==:12 ;RUN BATCH JOBS ON DREGS QUEUE DEFSYM .SADRG==:1 ;WORD TO SPECIFY DREGS OR NOT DEFSYM .SKDDC==:13 ;SET SYSTEM CLASS DEFAULT DEFSYM .SADCL==:1 ;DEFAULT CLASS WORD DEFSYM .SKRCV==:14 ;READ STATUS DEFSYM SK%ACT==:1_35. ;CLASS BY ACCOUNTS DEFSYM SK%WDF==:1_34. ;WITHHOLD WINDFALL DEFSYM SK%STP==:1_33. ;CLASS SCHEDULER OFF DEFSYM SK%DRG==:1_32. ;BATCH JOBS ARE BEING RUN ON DREGS QUEUE ;SNOOP JSYS DEFINITIONS ;SNOOP FUNCTION CODES DEFSYM .SNPLC==:0 ;LOCK CODE INTO MONITOR VIRT MEMORY DEFSYM .SNPLS==:1 ;LOCK DOWN THE SWAPPABLE MONITOR DEFSYM .SNPDB==:2 ;DEFINE A BREAK POINT DEFSYM .SNPIB==:3 ;INSERT THE BREAK POINTS DEFSYM .SNPRB==:4 ;REMOVE THE BREAK POINTS DEFSYM .SNPUL==:5 ;UNLOCK AND RELEASE ALL SNOOP RESOURCES DEFSYM .SNPSY==:6 ;LOOK UP A MONITOR SYMBOL DEFSYM .SNPAD==:7 ;LOOK UP ADDRESS IN SYMBOL TABLE DEFSYM .SNRMA==:10 ;26 READ MONITOR ADDRESS-BREAK DEFSYM .SNSMA==:11 ;26 SET MONITOR ADDRESS BREAK DEFSYM SN%XCT==:1_26. ;26 TRAP XCT ACCESS DEFSYM SN%RD==:1_25. ;26 TRAP READ ACCESS DEFSYM SN%WR==:1_24. ;26 TRAP WRITE ACCESS DEFSYM SN%UM==:1_23. ;26 TRAP USERMODE ACCESS DEFSYM SN%ADR==:37777777 ;26 TRAP ADDRESS (23 BITS) ;SOUTM JSYS DEFINITIONS DEFSYM SO%WMG==:1_35. ;WRITE END-OF-MESSAGE ;SPOOL JSYS FUNCTION CODES DEFSYM .SPLDI==:0 ;DEFINE AN INPUT SPOOLING DEVICE DEFSYM .SPLSD==:1 ;SET DIRECTORY OF SPOOLED DEVICE DEFSYM .SPLRD==:2 ;READ DIRECTORY OF SPOOLED DEVICE ;FLAGS IN SPOOL MESSAGE ON LOGOUT AND SPOOLED FILE CLOSE DEFSYM SP%BAT==:1_35. ;JOB IS A BATCH JOB DEFSYM SP%DFS==:1_34. ;SPOOLING IS DEFERRED DEFSYM SP%ELO==:1_33. ;JOB EXECUTED LGOUT JSYS ITSELF DEFSYM SP%FLO==:1_32. ;JOB FORCED TO LOG OUT BY TRAP IN TOP FK DEFSYM SP%OLO==:1_31. ;OTHER JOB AIMED LGOUT AT THIS ONE ;SPOOL ARGUMENT BLOCK DEFSYM .SPLDV==:0 ;DEVICE DESIGNATOR DEFSYM .SPLNA==:1 ;NAME STRING DEFSYM .SPLDR==:1 ;DIRECTORY NUMBER DEFSYM .SPLGN==:2 ;GENERATION NUMBER ;SSAVE DEFSYM SS%NNP==:777777_18. ;NEGATIVE NUMBER OF PAGES DEFSYM SS%CPY==:1_17. ;ALLOW COPY-ON-WRITE DEFSYM SS%UCA==:1_16. ;USE CURRENT ACCESS DEFSYM SS%RD==:1_15. ;ALLOW READ ACCESS DEFSYM SS%WR==:1_14. ;ALLOW WRITE ACCESS DEFSYM SS%EXE==:1_13. ;ALLOW EXECUTE ACCESS DEFSYM SS%FPN==:777_0. ;FIRST PAGE NUMBER ;STCMP DEFSYM SC%LSS==:1_35. ;T1 LESS THAN T2 DEFSYM SC%SUB==:1_34. ;T1 SUBSTRING OF T2 DEFSYM SC%GTR==:1_33. ;T1 GREATER THAN T2 ;STDIR DEFSYM ST%DIR==:1_35. ;FILES ONLY DIRECTORY DEFSYM ST%ANA==:1_34. ;ALPHANUMERIC ACCOUNTS DEFSYM ST%RLM==:1_33. ;REPEAT LOGIN MESSAGE ;STIW DEFSYM ST%DIM==:1_35. ;SET DEFERRED INTERRUPT MASK DEFSYM ST%PRH==:777777_0. ;PROCESS HANDLE ;SWTRP DEFINITIONS DEFSYM .SWART==:0 ;SET ARITHMETIC TRAP DEFSYM .SWRAT==:1 ;READ ARITHMETIC TRAP DEFSYM .SWLUT==:2 ;SET LUUO ADDRESS DEFSYM .SWRLT==:3 ;READ LUUO ADDRESS DEFSYM .ARPFL==:0 ;OFFSET IN TRAP BLOCK FOR PC FLAGS DEFSYM .AROPC==:1 ;OFFSET FOR OLD PC VALUE DEFSYM .AREFA==:2 ;OFFSET FOR E DEFSYM .ARNPC==:3 ;OFFSET FOR NEW PC WORD ;TBLUK DEFSYM TL%NOM==:1_35. ;NO MATCH DEFSYM TL%AMB==:1_34. ;AMBIGUOUS DEFSYM TL%ABR==:1_33. ;LEGAL ABBREVIATION DEFSYM TL%EXM==:1_32. ;EXACT MATCH ;TFORK ;FUNCTION CODES IN LH AC1 DEFSYM .TFSET==:0 ;SET TRAPS AS SPEC'D BY BIT TABLE DEFSYM .TFRAL==:1 ;REMOVE ALL TRAPS SET BY THIS FORK DEFSYM .TFRTP==:2 ;REMOVE TRAPS SET BY THIS FORK DEFSYM .TFSPS==:3 ;SET JSYS TRAP PSI CHAN IN LH(2) DEFSYM .TFRPS==:4 ;READ JSYS TRAP PSI CHAN INTO LH(2) DEFSYM .TFTST==:5 ;TEST IF SELF MONITORED DEFSYM .TFRES==:6 ;REMOVE TRAPS FROM ALL INFERIORS, CLR PSI DEFSYM .TFUUO==:7 ;SET UUO TRAPS FOR FORK DEFSYM .TFSJU==:8 ;SET BOTH UUO AND JSYS TRAPS DEFSYM .TFRUU==:9 ;REMOVE UUO TRAPS ;TIMER DEFINITIONS DEFSYM .TIMRT==:0 ;SET TIME LIMIT DEFSYM .TIMEL==:1 ;SET ELAPSED TIME CLOCK DEFSYM .TIMDT==:2 ;SET DATE & TIME CLOCK DEFSYM .TIMDD==:3 ;DELETE AN EXPLICT DATE & TIME CLOCK DEFSYM .TIMBF==:4 ;DELETE ALL ENTIRES BEFORE D&T DEFSYM .TIMAL==:5 ;DELETE ALL (INCLUDES TIME LIMIT) ;TLINK DEFSYM TL%CRO==:1_35. ;CLEAR REMOTE TO OBJECT LINK DEFSYM TL%COR==:1_34. ;CLEAR OBJECT TO REMOTE LINK DEFSYM TL%EOR==:1_33. ;ESTABLIST OBJECT TO REMOTE LINK DEFSYM TL%ERO==:1_32. ;ESTABLISH REMOTE TO OBJECT LINK DEFSYM TL%SAB==:1_31. ;SET ACCEPT BIT FOR OBJECT DEFSYM TL%ABS==:1_30. ;ACCEPT BIT STATE DEFSYM TL%STA==:1_29. ;SET OR CLEAR ADVICE DEFSYM TL%AAD==:1_28. ;ACCEPT ADVICE DEFSYM TL%OBJ==:777777_0. ;OBJECT DESIGNATOR ;UFPGS DEFSYM UF%NOW==:1_35. ;NO WAIT ON UPDATE ;UTEST FUNCTION CODES DEFSYM .UTSET==:0 ;START TESTING DEFSYM .UTCLR==:1 ;STOP TESTING AND RETURN RESULTS ;UTEST ARGUMENT BLOCK DEFSYM .UTADR==:0 ;STARTING ADDRESS OF CODE DEFSYM .UTLEN==:1 ;LENGTH OF CODE DEFSYM .UTMAP==:2 ;START OF BIT MAP ;USAGE DEFSYM .USENT==:0 ;WRITE ENTRY DEFSYM .USCLS==:1 ;CLOSE OUT CURRENT FILE DEFSYM .USCKP==:2 ;PERFORM CHECKPOINT DEFSYM .USLGI==:3 ;LOGIN DEFSYM .USLGO==:4 ;LOGOUT DEFSYM .USSEN==:5 ;SESSION END DEFSYM .USCKI==:6 ;SET CHECKPOINT INTERVAL DEFSYM .USENA==:7 ;ENABLE ACCOUNT VALIDATION DEFSYM .USCAS==:10 ;CHANGE ACCOUNTING SHIFT NOW DEFSYM .USSAS==:11 ;SET AUTOMATIC ACCOUNTING SHIFT CHANGE TIMES DEFSYM .USRAS==:12 ;READ AUTOMATIC ACCOUNTING SHIFT CHANGE TIMES ;TABLE ENTRY FORMAT FOR .USSAS/.USRAS: DEFSYM US%DOW==:177_29. ;DAY-OF-WEEK BITS DEFSYM US%SSM==:777777 ;TIME IN SECONDS SINCE MIDNIGHT ;UTFRK DEFSYM UT%TRP==:1_35. ;ITRAP (OR DO ERJMP/ERCAL) TRAPPED JSYS ;WILD FUNCTIONS DEFSYM .WLSTR==:0 ;COMPARE TWO STRINGS DEFSYM .WLJFN==:1 ;COMPARE TWO JFNS ;WILD FLAGS AND BITS DEFSYM WL%LCD==:1_35. ;DON'T CONVERT LOWER CASE TO UPPER CASE DEFSYM WL%NOM==:1_35. ;STRINGS DID NOT MATCH DEFSYM WL%ABR==:1_34. ;NON-WILD STRING IS ABBREVIATION OF WILD STRING DEFSYM WL%DEV==:1_34. ;DEVICE FIELD DID NOT MATCH DEFSYM WL%DIR==:1_33. ;DIRECTORY FIELD DID NOT MATCH DEFSYM WL%NAM==:1_32. ;NAME FIELD DID NOT MATCH DEFSYM WL%EXT==:1_31. ;FILE TYPE DID NOT MATCH DEFSYM WL%GEN==:1_30. ;GENERATION NUMBER DID NOT MATCH ;ARGUMENT BLOCK OFFSETS FOR XSIR AND XRIR JSYS'S DEFSYM .SICNT==:0 ;LENGTH OF BLOCK DEFSYM .SILVT==:1 ;ADDRESS OF LEVEL TABLE DEFSYM .SICHT==:2 ;ADDRESS OF CHANNEL TABLE ;SCHEDULER CONTROL FLAGS (JSYS NOT YET DEFINED) DEFSYM SK%CYT==:1_17. ;CYCLE TIME DEFSYM SK%IOC==:1_16. ;IO QUANTUM CHARGE DEFSYM SK%HT1==:1_15. ;LIMIT HOLD TIME DEFSYM SK%HT2==:1_14. ;NO HOLD TIME AFTER SKIPPED FORK DEFSYM SK%HQR==:1_13. ;HIGH QUEUE FORK HAVE PRIORITY UNDER LOAD ;SK%LQR==:1B23 ;LOW QUEUE RESERVE ;SK%BQE==:1B24 ;BALSET QUEUE ON ENTRY DEFSYM SK%RSQ==:1_10. ;QUICK RESCHEDULE ON WAKEUPS DEFSYM SK%RQ1==:1_9. ;REQUEUE TO QUEUE 1 DEFSYM SK%TTP==:1_8. ;TTY PREFERENCE DEFSYM SK%WCF==:1_7. ;WAIT CREDIT PROPORTIONAL TO LOAD AV ;*********************************************** ;GENERAL FIELD AND VALUE DEFINITIONS ;USED BY MANY JSYSES ;*********************************************** ;GENERAL FORK HANDLES DEFSYM .FHSLF==:400000 ;SELF DEFSYM .FHSUP==:<0 -1> ;SUPERIOR DEFSYM .FHTOP==:<0 -2> ;TOP IN JOB DEFSYM .FHSAI==:<0 -3> ;SELF AND INFERIORS DEFSYM .FHINF==:<0 -4> ;INFERIORS DEFSYM .FHJOB==:<0 -5> ;ALL IN JOB ;FIELDS OF JFN MODE WORD DEFSYM TT%OSP==:1_35. ;OUTPUT SUPPRESS DEFSYM TT%MFF==:1_34. ;MECHANICAL FORMFEED PRESENT DEFSYM TT%TAB==:1_33. ;MECHANICAL TAB PRESENT DEFSYM TT%LCA==:1_32. ;LOWER CASE CAPABILITIES PRESENT DEFSYM TT%LEN==:177_25. ;PAGE LENGTH DEFSYM TT%WID==:177_18. ;PAGE WIDTH DEFSYM TT%WAK==:17_12. ;WAKEUP FIELD DEFSYM TT%WK0==:1_17. ;WAKEUP CLASS 0 (UNUSED) DEFSYM TT%IGN==:1_16. ;IGNORE TT%WAK ON SFMOD DEFSYM TT%WKF==:1_15. ;WAKEUP ON FORMATING CONTROL CHARS DEFSYM TT%WKN==:1_14. ;WAKEUP ON NON-FORMATTING CONTROLS DEFSYM TT%WKP==:1_13. ;WAKEUP ON PUNCTUATION DEFSYM TT%WKA==:1_12. ;WAKEUP ON ALPHANUMERICS DEFSYM TT%ECO==:1_11. ;ECHOS ON DEFSYM TT%ECM==:1_10. ;ECHO MODE DEFSYM TT%ALK==:1_9. ;ALLOW LINKS DEFSYM TT%AAD==:1_8. ;ALLOW ADVICE (NOT IMPLEMENTED) DEFSYM TT%DAM==:3_6. ;DATA MODE DEFSYM .TTBIN==:0 ;BINARY DEFSYM .TTASC==:1 ;ASCII DEFSYM .TTATO==:2 ;ASCII AND TRANSLATE OUTPUT ONLY DEFSYM .TTATE==:3 ;ASCII AND TRANSLATE ECHOS ONLY DEFSYM TT%UOC==:1_5. ;UPPER CASE OUTPUT CONTROL DEFSYM TT%LIC==:1_4. ;LOWER CASE INPUT CONTROL DEFSYM TT%DUM==:3_2. ;DUPLEX MODE DEFSYM .TTFDX==:0 ;FULL DUPLEX DEFSYM .TT0DX==:1 ;NOT USED, RESERVED DEFSYM .TTHDX==:2 ;HALF DUPLEX (CHARACTER) DEFSYM .TTLDX==:3 ;LINE HALF DUPLEX DEFSYM TT%PGM==:1_1. ;PAGE MODE DEFSYM TT%CAR==:1_0. ;CARRIER STATE ;99 Begin addition ; Terminal characteristics word DEFSYM TC%MOV==:1_35. ; Absolute or relative cursor motion DEFSYM TC%BS==: 1_34. ; Cursor back at least (backspace) DEFSYM TC%HOM==:1_33. ; Home to top left hand corner DEFSYM TC%CLR==:1_32. ; Clear entire screen at least DEFSYM TC%SCL==:1_31. ; Clear selective portions of screen DEFSYM TC%LID==:1_30. ; Line insert/delete DEFSYM TC%CID==:1_29. ; Character insert/delete DEFSYM TC%VBL==:1_28. ; Visible bell DEFSYM TC%MET==:1_27. ; Has META (8-bit) key DEFSYM TC%SCR==:1_26. ; Scrolls on down from bottom line DEFSYM TC%RSC==:1_25. ; Reverse-scrolls on up from top-line DEFSYM TC%OVR==:1_24. ; Overwrites DEFSYM TC%FCI==:1_23. ;221 Has full 12-bit input capability DEFSYM TC%PRT==:1_18. ; Printing terminal DEFSYM TC%WRP==:1_17. ; Outputting in last line pos will CRLF ; Terminal mode word DEFSYM TM%DPY==:1_35. ; Process ^P codes DEFSYM TM%SCR==:1_34. ; Scroll mode / Wrap mode DEFSYM TM%MOR==:1_33. ; More processing enabled DEFSYM TM%MVR==:1_32. ; Verbose sort of more DEFSYM TM%MSM==:1_31. ; Smart about more DEFSYM TM%VBL==:1_30. ; Use visible bell for ^G DEFSYM TM%ITP==:1_18. ; Intelligent terminal protocol in use ;99 End addition ;DIRECTORY PROTECTION DEFINITIONS (3 6-BIT FIELDS: OWNER, GROUP, WORLD) DEFSYM DP%RD==:40 ;READING DIRECTORY IS ALLOWED DEFSYM DP%CN==:10 ;CONNECT TO DIR, OR CHANGE PROT/ACCOUNT DEFSYM DP%CF==:4 ;CREATING FILES IN DIR IS ALLOWED ;FILE PROTECTION DEFINITIONS (3 6-BIT FIELDS: OWNER, GROUP, WORLD) DEFSYM FP%DIR==:2 ;DIRECTORY LISTING DEFSYM FP%APP==:4 ;APPEND DEFSYM FP%EX==:10 ;EXECUTE DEFSYM FP%WR==:20 ;WRITE DEFSYM FP%RD==:40 ;READ ;INPUT AND OUTPUT IDENTIFIERS DEFSYM .PRIIN==:100 ;PRIMARY INPUT DEFSYM .PRIOU==:101 ;PRIMARY OUTPUT DEFSYM .NULIO==:377777 ;NULL DESIGNATOR DEFSYM .SIGIO==:677777 ;27 SIGNAL JFN DEFSYM .CTTRM==:777777 ;JOB'S CONTROLLING TERMINAL DEFSYM .DVDES==:600000 ;UNIVERSAL DEVICE CODE DEFSYM .TTDES==:400000 ;UNIVERSAL TERMINAL CODE ;MAGTAPE DEVICE STATUS BITS DEFSYM MT%ILW==:1_17. ;ILLEGAL WRITE DEFSYM MT%DVE==:1_16. ;DEVICE ERROR DEFSYM MT%DAE==:1_15. ;DATA ERROR DEFSYM MT%SER==:1_14. ;SUPPRESS ERROR RECOVERY PROCEDURES DEFSYM MT%EOF==:1_13. ;EOF (FILE MARK) DEFSYM MT%IRL==:1_12. ;INCORRECT RECORD LENGTH DEFSYM MT%BOT==:1_11. ;BEGINNING OF TAPE DEFSYM MT%EOT==:1_10. ;END OF TAPE DEFSYM MT%EVP==:1_9. ;EVEN PARITY DEFSYM MT%DEN==:3_7. ;DENSITY (0 IS 'NORMAL') DEFSYM .MTLOD==:1 ;LOW DENSITY (200 BPI) DEFSYM .MTMED==:2 ;MEDIUM DENSITY (556 BPI) DEFSYM .MTHID==:3 ;HIGH DENSITY (800 BPI) DEFSYM MT%CCT==:7_4. ;CHARACTER COUNTER DEFSYM MT%NSH==:1_3. ;DATA MODE OR DENSITY NOT SUPPORTED BY HARDWARE ;DEVICE DATA MODES DEFSYM .DMASC==:1 ;ASCII DEFSYM .DMIMG==:10 ;IMAGE DEFSYM .DMIMB==:13 ;IMAGE BINARY DEFSYM .DMBIN==:14 ;BINARY ;DEFINED PSI CHANNELS DEFSYM .ICAOV==:6 ;ARITHMETIC OVERFLOW DEFSYM .ICFOV==:7 ;FLOATING OVERFLOW DEFSYM .ICPOV==:9. ;PDL OVERFLOW DEFSYM .ICEOF==:10. ;END OF FILE DEFSYM .ICDAE==:11. ;DATA ERROR DEFSYM .ICQTA==:12. ;QUOTA/DISK EXCEEDED DEFSYM .ICTOD==:14. ;TIME OF DAY (NOT IMPLEMENTED) DEFSYM .ICILI==:15. ;ILLEG INSTRUCTION DEFSYM .ICIRD==:16. ;ILLEGAL READ DEFSYM .ICIWR==:17. ;ILLEGAL WRITE DEFSYM .ICIEX==:18. ;ILLEGAL EXECUTE (NOT IMPLEMENTED) DEFSYM .ICIFT==:19. ;INFERIOR FORK TERMINATION DEFSYM .ICMSE==:20. ;MACHINE SIZE EXCEEDED DEFSYM .ICTRU==:21. ;TRAP TO USER (NOT IMPLEMENTED) DEFSYM .ICNXP==:22. ;NONEXISTENT PAGE REFERENCED ;TERMINAL TYPE NUMBERS DEFSYM .TT33==:0 ;MODEL 33 DEFSYM .TT35==:1 ;MODEL 35 DEFSYM .TT37==:2 ;MODEL 37 DEFSYM .TTTI==:3 ;2 TI DEFSYM .TTIMX==:4 ;2 IMLAX DEFSYM .TTDM==:5 ;2 DM2500 DEFSYM .TTHP==:6 ;2 HP2640 DEFSYM .TTNVT==:7 ;2 NVT DEFSYM .TTDEF==:8. ;DEFAULT DEFSYM .TTIDL==:9. ;IDEAL DEFSYM .TTV05==:10. ;VT05 DEFSYM .TTV50==:11. ;VT50 DEFSYM .TTL30==:12. ;LA30 DEFSYM .TTG40==:13. ;GT40 DEFSYM .TTL36==:14. ;LA36 DEFSYM .TTV52==:15. ;VT52 ;& Begin modification DEFSYM .TTGLS==:16. ;2 GLASS TTY DEFSYM .TTFOX==:17. ;35 FOX 1100 DEFSYM .TTV10==:18. ;105 VT100 (in VT52 mode) DEFSYM .TTT10==:19. ;126 Teleray 1061 DEFSYM .TTH19==:20. ;131 Heath 19 DEFSYM .TTC10==:21. ;141 Concept 100 DEFSYM .TT100==:22. ;VT100 (in ANSI mode) DEFSYM .TTL38==:23. ;LA38 DEFSYM .TT120==:24. ;LA120 DEFSYM .TTPTV==:25. ;Plasma TV DEFSYM .TTSUP==:26. ;99 SUPDUP VT DEFSYM .TTHP0==:27. ;207 HP2645 ;& End modification ;DEFINED TERMINAL CODES DEFSYM .TICBK==:0 ;BREAK DEFSYM .TICCA==:1 ;^A DEFSYM .TICCB==:2 ;^B DEFSYM .TICCC==:3 ;^C DEFSYM .TICCD==:4 ;.RADIX 10., DEFSYM .TICCE==:5 ;^E DEFSYM .TICCF==:6 ;^F DEFSYM .TICCG==:7 ;^G DEFSYM .TICCH==:8. ;^H DEFSYM .TICCI==:9. ;^I DEFSYM .TICCJ==:10. ;^J DEFSYM .TICCK==:11. ;^K DEFSYM .TICCL==:12. ;^L DEFSYM .TICCM==:13. ;^M DEFSYM .TICCN==:14. ;^N DEFSYM .TICCO==:15. ;^O DEFSYM .TICCP==:16. ;^P DEFSYM .TICCQ==:17. ;^Q DEFSYM .TICCR==:18. ;^R DEFSYM .TICCS==:19. ;^S DEFSYM .TICCT==:20. ;^T DEFSYM .TICCU==:21. ;^U DEFSYM .TICCV==:22. ;^V DEFSYM .TICCW==:23. ;^W DEFSYM .TICCX==:24. ;^X DEFSYM .TICCY==:25. ;^Y DEFSYM .TICCZ==:26. ;^Z DEFSYM .TICES==:27. ;ESC DEFSYM .TICRB==:28. ;RUBOUT DEFSYM .TICSP==:29. ;SPACE DEFSYM .TICRF==:30. ;CARRIER OFF DEFSYM .TICTI==:31. ;TYPEIN DEFSYM .TICTO==:32. ;TYPEOUT ;CAPABILITIES DEFSYM SC%CTC==:1_35. ;CONTROL-C DEFSYM SC%GTB==:1_34. ;GETAB DEFSYM SC%MMN==:1_33. ;MAP MONITOR DEFSYM SC%LOG==:1_32. ;LOGGING FUNCTIONS DEFSYM SC%MPP==:1_31. ;MAP PRIVILEGED PAGES DEFSYM SC%SDV==:1_30. ;SPECIAL DEVICES DEFSYM SC%SCT==:1_29. ;ASSIGN TTY AS CONTROLLING FOR FORK (SCTTY) DEFSYM SC%SUP==:1_26. ;SUPERIOR ACCESS DEFSYM SC%FRZ==:1_18. ;FREEZE ON TERMINATING CONDITIONS DEFSYM SC%WHL==:1_17. ;WHEEL DEFSYM SC%OPR==:1_16. ;OPERATOR DEFSYM SC%CNF==:1_15. ;CONFIDENTIAL INFORMATION ACCESS DEFSYM SC%MNT==:1_14. ;MAINTENANCE DEFSYM SC%IPC==:1_13. ;IPCF PRIVILEGES DEFSYM SC%ENQ==:1_12. ;ENQ/DEQ PRIVILEGES DEFSYM SC%NWZ==:1_11. ;TOPS20AN ;NET WIZARD PRIVILEGES (ASNSQ, ETC.) DEFSYM SC%NAS==:1_10. ;TOPS20AN ;NETWORK ABSOLUTE SOCKET PRIVILEGE ;206 Begin addition DEFSYM SC%CHA==:1_9. ;LOCAL MIT ;CHAOS NET PRIVILEGES ;206 End addition ;OUTMODED NAMES FOR BITS IN DIRECTORY MODE WORD - USE CD%XXX ;EQUIVALENTS DEFSYM MD%FO==:CD%DIR ;FILES ONLY DIRECTORY DEFSYM MD%SA==:CD%ANA ;STRING ACCOUNT ALLOWED DEFSYM MD%RLM==:CD%RLM ;REPEAT LOGIN MESSAGE ;FDB DEFINITIONS DEFSYM .FBHDR==:0 ;HEADER WORD DEFSYM FB%LEN==:177_0. ;LENGTH OF THIS FDB DEFSYM .FBCTL==:1 ;FLAGS DEFSYM FB%TMP==:1_35. ;FILE IS TEMPORARY DEFSYM FB%PRM==:1_34. ;FILE IS PERMANENT DEFSYM FB%NEX==:1_33. ;FILE DOES NOT HAVE AN EXTENSION YET DEFSYM FB%DEL==:1_32. ;FILE IS DELETED DEFSYM FB%NXF==:1_31. ;FILE IS NONEXISTENT DEFSYM FB%LNG==:1_30. ;FILE IS A LONG FILE DEFSYM FB%SHT==:1_29. ;FILE HAS COMPRESSED PAGE TABLE DEFSYM FB%DIR==:1_28. ;FILE IS A DIRECTORY FILE DEFSYM FB%NOD==:1_27. ;FILE IS NOT TO BE DUMPED BY BACKUP SYSTEM DEFSYM FB%BAT==:1_26. ;FILE HAS AT LEAST ONE BAD PAGE IN IT DEFSYM FB%SDR==:1_25. ;THIS DIRECTORY HAS SUBDIRECTORIES DEFSYM FB%ARC==:1_24. ; File has archive status DEFSYM FB%INV==:1_23. ; File is invisible DEFSYM FB%OFF==:1_22. ; File is offline DEFSYM FB%FCF==:17_18. ;FILE CLASS FIELD DEFSYM .FBNRM==:0 ;NON-RMS DEFSYM .FBRMS==:1 ;RMS FILES ;& Begin modification DEFSYM .FBKEP==:3 ; KEEP THIS PROGRAM DEFSYM .FBEPH==:4 ; EPHEMERAL ; Note: Our local bits have been squeezed into the RH, not so sure ; this is a Good Thing. DEFSYM FB%UND==:1_0. ;5 PERPETUAL FILE ;& End modification DEFSYM .FBEXL==:2 ;LINK TO FDB OF NEXT EXTENSION DEFSYM .FBADR==:3 ;DISK ADDRESS OF INDEX BLOCK DEFSYM .FBPRT==:4 ;PROTECTION OF THE FILE DEFSYM .FBCRE==:5 ;TIME AND DATE OF LAST WRITE DEFSYM .FBUSE==:6 ;LAST WRITER ,, AUTHOR (OBS) DEFSYM .FBAUT==:6 ;POINTER TO AUTHOR STRING DEFSYM .FBGEN==:7 ;GENERATION ,, DIR # DEFSYM FB%GEN==:777777_18. ;GENERATION NUMBER DEFSYM .FBDRN==:7 ;GENERATION ,, DIR # DEFSYM FB%DRN==:777777 ;DIR NUMBER DEFSYM .FBACT==:10 ;ACCOUNT DEFSYM .FBBYV==:11 ;RETENTION+BYTE SIZE+MODE ,, # OF PAGES DEFSYM FB%RET==:77_30. ;RETENTION COUNT DEFSYM FB%BSZ==:77_24. ;BYTE SIZE DEFSYM FB%MOD==:17_18. ;LAST OPENF MODE DEFSYM FB%PGC==:777777 ;PAGE COUNT DEFSYM .FBSIZ==:12 ;EOF POINTER DEFSYM .FBCRV==:13 ;TIME AND DATE OF CREATION OF FILE DEFSYM .FBWRT==:14 ;TIME AND DATE OF LAST USER WRITE DEFSYM .FBREF==:15 ;TIME AND DATE OF LAST NON-WRITE ACCESS DEFSYM .FBCNT==:16 ;# OF WRITES ,, # OF REFERENCES DEFSYM .FBBK0==:17 ;BACKUP WORDS (5) DEFSYM .FBBK1==:20 DEFSYM .FBBK2==:21 DEFSYM .FBBBT==:22 ; Bits,,#pages in offline file DEFSYM AR%RAR==:1_34. ; Request archive by user DEFSYM AR%RIV==:1_33. ; Request invol migration by system DEFSYM AR%NDL==:1_32. ; Do not delete contents of file when archived DEFSYM AR%NAR==:1_31. ; Please don't migrate this file DEFSYM AR%EXM==:1_30. ; File exempt from migration DEFSYM AR%1ST==:1_29. ; 1st pass of archive/collection run complete DEFSYM AR%RFL==:1_28. ; Retrieve failed DEFSYM AR%WRN==:1_27. ; USER WARNED OF APPROACHING EXPIRATION DEFSYM AR%RSN==:7_18. ; Reason pushed offline DEFSYM .AREXP==:1 ; File expired DEFSYM .ARARR==:2 ; Archive was requested DEFSYM .ARRIR==:3 ; Migration was requested DEFSYM AR%PSZ==:777777 ; RH is pg count when file went offline DEFSYM .FBNET==:23 ; On-line expiration date/interval DEFSYM .FBUSW==:24 ;USER SETTABLE WORD DEFSYM .FBGNL==:25 ;LINK TO NEXT GENERATION FILE DEFSYM .FBNAM==:26 ;POINTER TO NAME BLOCK DEFSYM .FBEXT==:27 ;POINTER TO EXTENSION BLOCK DEFSYM .FBLWR==:30 ;POINTER TO LAST WRITER STRING DEFSYM .FBTDT==:31 ; Archive or collection date & time DEFSYM .FBFET==:32 ; Offline expiration date/interval DEFSYM .FBTP1==:33 ; Tape ID for run 1 tape DEFSYM .FBSS1==:34 ; Saveset #,,Tape file # for run 1 tape DEFSYM .FBTP2==:35 ; Tape ID for run 2 tape DEFSYM .FBSS2==:36 ; Saveset #,,Tape file # for run 2 tape DEFSYM .FBLN0==:30 ;LENGTH OF VERSION 0 FDB DEFSYM .FBLN1==:37 ;LENGTH OF VERSION 1 FDB DEFSYM .FBLXT==:37 ; Minimum length for archive/virtual dsk sys DEFSYM .FBLEN==:37 ;LENGTH OF THE FDB ;CARD READER DEFINITIONS DEFSYM .CRILC==:"\ ;ILLEGAL CHARACTER CODE ;A WORD IS DISTINGUISHED FROM A BYTE POINTER BY THE VALUE 5 IN BITS 0-2 ;USE THESE DEFINITIONS TO TEST FOR A NUMBER AS FOLLOWS: ; LOAD AC,NMFLG,LOC ; CAIE AC,NUMVAL DEFSYM NMFLG==:7_33. DEFSYM NUMVAL==:5 ;MAGTAPE LABEL TYPES DEFSYM .LTUNL==:1 ;UNLABELED DEFSYM .LTANS==:2 ;ANSI STANDARD DEFSYM .LTEBC==:3 ;EBCDIC DEFSYM .LTT20==:4 ;TOPS-20 DEFSYM .LTMAX==:4 ;MAXIMUM LABEL TYPE ; MAGTAPE DRIVE TYPES DEFSYM .TMDR9==:1 ;9-TRACK DEFSYM .TMDR7==:2 ;7-TRACK DEFSYM .TMDMX==:2 ;MAXIMUM DRIVE-TYPE VALUE ;DEFINITIONS FOR COMMUNICATIONS PROTOCOLS ;DEFINE THE SUPPORTED PROTOCOL TYPES DEFSYM .VN20F==:0 ;RSX20F PROTOCOL DEFSYM .VNMCB==:1 ;MCB DECNET PROTOCOL DEFSYM .VNDDC==:2 ;DDCMP PROTOCOL DEFSYM .VNMOP==:3 ;MOP (DDCMP MAINTENANCE) MODE DEFSYM .VNCNL==:4 ;CONTROLLER LOOPBACK DEFSYM .VNCBL==:5 ;CABLE LOOPBACK ;DEFINE BITS USED WHEN RELOADING AN -11 DEFSYM RM%ROM==:1_35. ;IF SET, ACTIVATE ROM ;99 Begin addition ; VTS function codes DEFSYM .VTCNT==:1 ; First arg is repeat count unless otherwise ; defined DEFSYM .VTNOP==:0 ; NOP - force cursor update DEFSYM .VTFWD==:1 ; Cursor forward DEFSYM .VTBCK==:2 ; Cursor back DEFSYM .VTUP==:3 ; Cursor up DEFSYM .VTDWN==:4 ; Cursor down DEFSYM .VTHRZ==:5 ; Set horizontal pos DEFSYM .VTHRA==:1 ; value DEFSYM .VTVRT==:6 ; Set vertical pos DEFSYM .VTVRA==:1 ; value DEFSYM .VTMOV==:7 ; Move cursor (x and y) DEFSYM .VTPOS==:1 ; Y coord,,X coord DEFSYM .VTHOM==:10 ; Home up DEFSYM .VTHMD==:11 ; Home down DEFSYM .VTADV==:12 ; Advance to next line DEFSYM .VTSAV==:13 ; Save pos DEFSYM .VTRES==:14 ; Restore pos DEFSYM .VTCLR==:15 ; Clear window DEFSYM .VTCEW==:16 ; Clear to end-of-window DEFSYM .VTCEL==:17 ; Clear to end-of-line DEFSYM .VTERA==:20 ; Erase character ??? DEFSYM .VTBEC==:21 ; Backspace and erase DEFSYM .VTLID==:22 ; Line insert/delete ; .VTCNT==:1 ; Repeat count DEFSYM .VTYLM==:2 ; First line,,Last line DEFSYM .VTCID==:23 ; Character insert/delete ; .VTCNT==:1 ; Repeat count DEFSYM .VTXLM==:2 ; First char,,Last char DEFSYM .VTESC==:24 ; Output VTS escape ; DPYOP JSYS (this should really be in the proper alphabetical place) ; Flags in AC2 DEFSYM DP%AG1==:1_34. ; First arg (in 3) exists DEFSYM DP%AG2==:1_33. ; Second arg (in 4) exists ;99 End insertion ;*********************************************** ;GENERAL FIELD AND VALUE DEFINITIONS ;USED BY TOPS20AN JSYS'S ;*********************************************** ;STATES OF A CONNECTION IN ARPANET NCP ; RETURNED IN B0-B3 OF GDSTS ON A NET CONNECTION ; ALSO AVAILABLE IN A GETAB, BUT THAT'S NOT THE PREFERRED WAY ; TO READ THEM, IF YOU HAVE A JFN FOR THE CONNECTION. DEFSYM .NSCZD==:01 ;CLOSED DEFSYM .NSPND==:02 ;PENDING DEFSYM .NSLSN==:03 ;LISTENING DEFSYM .NSRCR==:04 ;REQUEST FOR CONNECTION RECEIVED DEFSYM .NSCW1==:05 ;CLOSE WAIT SUB ONE (NCP CLOSE) DEFSYM .NSRCS==:06 ;REQUEST FOR CONNECTION SENT DEFSYM .NSOPN==:07 ;OPENED DEFSYM .NSCSW==:10 ;CLOSE WAIT (NCP CLOSE) DEFSYM .NSDTW==:11 ;FINAL DATA WAIT DEFSYM .NSRF1==:12 ;RFNM WAIT SUB ONE (NORMAL NCP CLOSE) DEFSYM .NSCZW==:13 ;CLOSE WAIT (PROGRAM CLOSE) DEFSYM .NSRF2==:14 ;RFNM WAIT SUB TWO (UNEXPECTED NCP CLOSE) DEFSYM .NSFRE==:16 ;FREE ;HOST STATUS BITS DEFSYM HS%UP==:1_35. ;HOST IS UP DEFSYM HS%VAL==:1_34. ;VALID STATUS DEFSYM HS%DAY==:7_31. ;DAY WHEN UP IF DOWN DEFSYM HS%HR==:37_26. ;HOUR DEFSYM HS%MIN==:17_22. ;5 MIN INTERVAL DEFSYM HS%RSN==:17_18. ;REASON DEFSYM HS%SRV==:1_17. ;HOST IS SERVER DEFSYM HS%USR==:1_16. ;HOST IS USER DEFSYM HS%NCK==:1_15. ;HOST NAME STRING WAS NICKNAME DEFSYM HS%STY==:77_9. ;SYSTEM TYPE MASK DEFSYM HS%NEW==:1_8. ;HOST DOES NEW PROTOCOL DEFSYM HS%NAM==:1_7. ;HOST HAS NAME DEFSYM .HS10X==:1_9. ;TENEX DEFSYM .HSITS==:2_9. ;ITS DEFSYM .HSDEC==:3_9. ;TOPS-10 DEFSYM .HSTIP==:4_9. ;TIP DEFSYM .HSMTP==:5_9. ;MTIP DEFSYM .HSELF==:6_9. ;ELF DEFSYM .HSANT==:7_9. ;ANTS DEFSYM .HSMLT==:10_9. ;MULTICS DEFSYM .HST20==:11_9. ;TOPS-20 DEFSYM .HSUNX==:12_9. ;UNIX ;ERROR CODE DEFINITIONS DEFSYM .ERBAS==:600000 ;BASE VALUE FOR ALL ERROR CODES DEFSYM LGINX1==:.ERBAS+10 ;Invalid account identifier DEFSYM LGINX2==:.ERBAS+11 ;Directory is "files-only" and cannot be logged in to DEFSYM LGINX3==:.ERBAS+12 ;Internal format of directory is incorrect DEFSYM LGINX4==:.ERBAS+13 ;Invalid password DEFSYM LGINX5==:.ERBAS+14 ;Job is already logged in DEFSYM CRJBX1==:.ERBAS+20 ;Invalid parameter or function bit combination DEFSYM CRJBX2==:.ERBAS+21 ;Illegal for created job to enter MINI-EXEC DEFSYM CRJBX3==:.ERBAS+22 ;Reserved DEFSYM CRJBX4==:.ERBAS+23 ;Terminal is not available DEFSYM CRJBX5==:.ERBAS+24 ;Unknown name for LOGIN DEFSYM CRJBX6==:.ERBAS+25 ;Insufficient system resources DEFSYM CRJBX7==:.ERBAS+26 ;Reserved DEFSYM LOUTX1==:.ERBAS+35 ;Illegal to specify job number when logging out own job DEFSYM LOUTX2==:.ERBAS+36 ;Invalid job number DEFSYM CACTX1==:.ERBAS+45 ;Invalid account identifier DEFSYM CACTX2==:.ERBAS+46 ;Job is not logged in DEFSYM EFCTX1==:.ERBAS+50 ;WHEEL or OPERATOR capability required DEFSYM EFCTX2==:.ERBAS+51 ;Entry cannot be longer than 64 words DEFSYM EFCTX3==:.ERBAS+52 ;Fatal error when accessing FACT file DEFSYM GJFX1==:.ERBAS+55 ;Desired JFN invalid DEFSYM GJFX2==:.ERBAS+56 ;Desired JFN not available DEFSYM GJFX3==:.ERBAS+57 ;No JFN available DEFSYM GJFX4==:.ERBAS+60 ;Invalid character in filename DEFSYM GJFX5==:.ERBAS+61 ;Field cannot be longer than 39 characters DEFSYM GJFX6==:.ERBAS+62 ;Device field not in a valid position DEFSYM GJFX7==:.ERBAS+63 ;Directory field not in a valid position DEFSYM GJFX8==:.ERBAS+64 ;Directory terminating delimiter is not preceded by a valid beginning delimiter DEFSYM GJFX9==:.ERBAS+65 ;More than one name field is not allowed DEFSYM GJFX10==:.ERBAS+66 ;Generation number is not numeric DEFSYM GJFX11==:.ERBAS+67 ;More than one generation number field is not allowed DEFSYM GJFX12==:.ERBAS+70 ;More than one account field is not allowed DEFSYM GJFX13==:.ERBAS+71 ;More than one protection field is not allowed DEFSYM GJFX14==:.ERBAS+72 ;Invalid protection DEFSYM GJFX15==:.ERBAS+73 ;Invalid confirmation character DEFSYM GJFX16==:.ERBAS+74 ;No such device DEFSYM GJFX17==:.ERBAS+75 ;No such directory name DEFSYM GJFX18==:.ERBAS+76 ;No such filename DEFSYM GJFX19==:.ERBAS+77 ;No such file type DEFSYM GJFX20==:.ERBAS+100 ;No such generation number DEFSYM GJFX21==:.ERBAS+101 ;File was expunged DEFSYM GJFX22==:.ERBAS+102 ;Insufficient system resources (Job Storage Block full) DEFSYM GJFX23==:.ERBAS+103 ;Exceeded maximum number of files per directory DEFSYM GJFX24==:.ERBAS+104 ;File not found DEFSYM GJFX27==:.ERBAS+107 ;File already exists (new file required) DEFSYM GJFX28==:.ERBAS+110 ;Device is not on line DEFSYM GJFX29==:.ERBAS+111 ;Device is not available to this job DEFSYM GJFX30==:.ERBAS+112 ;Account is not numeric DEFSYM GJFX31==:.ERBAS+113 ;Invalid wildcard designator DEFSYM GJFX32==:.ERBAS+114 ;No files match this specification DEFSYM GJFX33==:.ERBAS+115 ;Filename was not specified DEFSYM GJFX34==:.ERBAS+116 ;Invalid character "?" in file specification DEFSYM GJFX35==:.ERBAS+117 ;Directory access privileges required DEFSYM OPNX1==:.ERBAS+120 ;File is already open DEFSYM OPNX2==:.ERBAS+121 ;File does not exist DEFSYM OPNX3==:.ERBAS+122 ;Read access required DEFSYM OPNX4==:.ERBAS+123 ;Write access required DEFSYM OPNX5==:.ERBAS+124 ;Execute access required DEFSYM OPNX6==:.ERBAS+125 ;Append access required DEFSYM OPNX7==:.ERBAS+126 ;Device already assigned to another job DEFSYM OPNX8==:.ERBAS+127 ;Device is not on line DEFSYM OPNX9==:.ERBAS+130 ;Invalid simultaneous access DEFSYM OPNX10==:.ERBAS+131 ;Entire file structure full DEFSYM OPNX12==:.ERBAS+133 ;List access required DEFSYM OPNX13==:.ERBAS+134 ;Invalid access requested DEFSYM OPNX14==:.ERBAS+135 ;Invalid mode requested DEFSYM OPNX15==:.ERBAS+136 ;Read/write access required DEFSYM OPNX16==:.ERBAS+137 ;File has bad index block DEFSYM OPNX17==:.ERBAS+140 ;No room in job for long file page table DEFSYM OPNX18==:.ERBAS+141 ;Unit Record Devices are not available DEFSYM OPNX19==:.ERBAS+142 ;IMP is not up DEFSYM OPNX20==:.ERBAS+143 ;Host is not up DEFSYM OPNX21==:.ERBAS+144 ;Connection refused DEFSYM OPNX22==:.ERBAS+145 ;Connection byte size does not match DEFSYM DESX1==:.ERBAS+150 ;Invalid source/destination designator DEFSYM DESX2==:.ERBAS+151 ;Terminal is not available to this job DEFSYM DESX3==:.ERBAS+152 ;JFN is not assigned DEFSYM DESX4==:.ERBAS+153 ;Invalid use of terminal designator or string pointer DEFSYM DESX5==:.ERBAS+154 ;File is not open DEFSYM DESX6==:.ERBAS+155 ;Device is not a terminal DEFSYM DESX7==:.ERBAS+156 ;JFN cannot refer to output wildcard designators DEFSYM DESX8==:.ERBAS+157 ;File is not on disk DEFSYM CLSX1==:.ERBAS+160 ;File is not open DEFSYM CLSX2==:.ERBAS+161 ;File cannot be closed by this process DEFSYM RJFNX1==:.ERBAS+165 ;File is not closed DEFSYM RJFNX2==:.ERBAS+166 ;JFN is being used to accumulate filename DEFSYM RJFNX3==:.ERBAS+167 ;JFN is not accessible by this process DEFSYM DELFX1==:.ERBAS+170 ;Delete access required DEFSYM SFPTX1==:.ERBAS+175 ;File is not open DEFSYM SFPTX2==:.ERBAS+176 ;Illegal to reset pointer for this file DEFSYM SFPTX3==:.ERBAS+177 ;Invalid byte number DEFSYM CNDIX1==:.ERBAS+200 ;Invalid password DEFSYM CNDIX3==:.ERBAS+202 ;Invalid directory number DEFSYM CNDIX5==:.ERBAS+204 ;Job is not logged in DEFSYM SFBSX1==:.ERBAS+210 ;Illegal to change byte size for this opening of file DEFSYM SFBSX2==:.ERBAS+211 ;Invalid byte size DEFSYM IOX1==:.ERBAS+215 ;File is not opened for reading DEFSYM IOX2==:.ERBAS+216 ;File is not opened for writing DEFSYM IOX3==:.ERBAS+217 ;File is not open for random access DEFSYM IOX4==:.ERBAS+220 ;End of file reached DEFSYM IOX5==:.ERBAS+221 ;Device or data error DEFSYM IOX6==:.ERBAS+222 ;Illegal to write beyond absolute end of file DEFSYM PMAPX1==:.ERBAS+240 ;Invalid access requested DEFSYM PMAPX2==:.ERBAS+241 ;Invalid use of PMAP DEFSYM SPACX1==:.ERBAS+245 ;Invalid access requested DEFSYM FRKHX1==:.ERBAS+250 ;Invalid process handle DEFSYM FRKHX2==:.ERBAS+251 ;Illegal to manipulate a superior process DEFSYM FRKHX3==:.ERBAS+252 ;Invalid use of multiple process handle DEFSYM FRKHX4==:.ERBAS+253 ;Process is running DEFSYM FRKHX5==:.ERBAS+254 ;Process has not been started DEFSYM FRKHX6==:.ERBAS+255 ;All relative process handles in use DEFSYM SPLFX1==:.ERBAS+260 ;Process is not inferior or equal to self DEFSYM SPLFX2==:.ERBAS+261 ;Process is not inferior to self DEFSYM SPLFX3==:.ERBAS+262 ;New superior process is inferior to intended inferior DEFSYM GTABX1==:.ERBAS+267 ;Invalid table number DEFSYM GTABX2==:.ERBAS+270 ;Invalid table index DEFSYM GTABX3==:.ERBAS+271 ;GETAB capability required DEFSYM RUNTX1==:.ERBAS+273 ;Invalid process handle -3 or -4 DEFSYM STADX1==:.ERBAS+275 ;WHEEL or OPERATOR capability required DEFSYM STADX2==:.ERBAS+276 ;Invalid date or time DEFSYM ASNDX1==:.ERBAS+300 ;Device is not assignable DEFSYM ASNDX2==:.ERBAS+301 ;Illegal to assign this device DEFSYM ASNDX3==:.ERBAS+302 ;No such device DEFSYM ATACX1==:.ERBAS+320 ;Invalid job number DEFSYM ATACX2==:.ERBAS+321 ;Job already attached DEFSYM ATACX3==:.ERBAS+322 ;Incorrect user number DEFSYM ATACX4==:.ERBAS+323 ;Invalid password DEFSYM ATACX5==:.ERBAS+324 ;This job has no controlling terminal DEFSYM STDVX1==:.ERBAS+332 ;No such device DEFSYM DEVX1==:.ERBAS+335 ;Invalid device designator DEFSYM DEVX2==:.ERBAS+336 ;Device already assigned to another job DEFSYM DEVX3==:.ERBAS+337 ;Device is not on line DEFSYM MNTX1==:.ERBAS+345 ;Internal format of directory is incorrect DEFSYM MNTX2==:.ERBAS+346 ;Device is not on line DEFSYM MNTX3==:.ERBAS+347 ;Device is not mountable DEFSYM TERMX1==:.ERBAS+350 ;Invalid terminal code DEFSYM TLNKX1==:.ERBAS+351 ;Illegal to set remote to object before object to remote DEFSYM ATIX1==:.ERBAS+352 ;Invalid software interrupt channel number DEFSYM ATIX2==:.ERBAS+353 ;Control-C capability required DEFSYM TLNKX2==:.ERBAS+356 ;Link was not received within 15 seconds DEFSYM TLNKX3==:.ERBAS+357 ;Links full DEFSYM TTYX1==:.ERBAS+360 ;Device is not a terminal DEFSYM RSCNX1==:.ERBAS+361 ;Overflowed rescan buffer, input string truncated DEFSYM RSCNX2==:.ERBAS+362 ;Invalid function code DEFSYM CFRKX3==:.ERBAS+363 ;Insufficient system resources DEFSYM KFRKX1==:.ERBAS+365 ;Illegal to kill top level process DEFSYM KFRKX2==:.ERBAS+366 ;Illegal to kill self DEFSYM RFRKX1==:.ERBAS+367 ;Processes are not frozen DEFSYM HFRKX1==:.ERBAS+370 ;Illegal to halt self with HFORK DEFSYM GFRKX1==:.ERBAS+371 ;Invalid process handle DEFSYM GETX1==:.ERBAS+373 ;Invalid save file format DEFSYM GETX2==:.ERBAS+374 ;System Special Pages Table full DEFSYM TFRKX1==:.ERBAS+375 ;Undefined function code DEFSYM TFRKX2==:.ERBAS+376 ;Unassigned fork handle or not immediate inferior DEFSYM SFRVX1==:.ERBAS+377 ;Invalid position in entry vector DEFSYM OPRFX1==:.ERBAS+401 ;Undefined operator function DEFSYM OPRFX2==:.ERBAS+402 ;Invalid operator function argument DEFSYM OPRFX3==:.ERBAS+403 ;Insufficient capabilities to perform requested function DEFSYM NOUTX1==:.ERBAS+407 ;Radix is not in range 2 to 36 DEFSYM NOUTX2==:.ERBAS+410 ;Column overflow DEFSYM TFRKX3==:.ERBAS+411 ;Fork(s) not frozen DEFSYM IFIXX1==:.ERBAS+414 ;Radix is not in range 2 to 10 DEFSYM IFIXX2==:.ERBAS+415 ;First nonspace character is not a digit DEFSYM IFIXX3==:.ERBAS+416 ;Overflow (number is greater than 2**35 ) DEFSYM GFDBX1==:.ERBAS+424 ;Invalid displacement DEFSYM GFDBX2==:.ERBAS+425 ;Invalid number of words DEFSYM GFDBX3==:.ERBAS+426 ;List access required DEFSYM CFDBX1==:.ERBAS+430 ;Invalid displacement DEFSYM CFDBX2==:.ERBAS+431 ;Illegal to change specified bits DEFSYM CFDBX3==:.ERBAS+432 ;Write or owner access required DEFSYM CFDBX4==:.ERBAS+433 ;Invalid value for specified bits DEFSYM DUMPX1==:.ERBAS+440 ;Command list error DEFSYM DUMPX2==:.ERBAS+441 ;JFN is not open in dump mode DEFSYM DUMPX3==:.ERBAS+442 ;Address error (too big or crosses end of memory) DEFSYM DUMPX4==:.ERBAS+443 ;Access error (cannot read or write data in memory) DEFSYM RNAMX1==:.ERBAS+450 ;Files are not on same device DEFSYM RNAMX2==:.ERBAS+451 ;Destination file expunged DEFSYM RNAMX3==:.ERBAS+452 ;Write or owner access to destination file required DEFSYM RNAMX4==:.ERBAS+453 ;Quota exceeded in destination of rename DEFSYM BKJFX1==:.ERBAS+454 ;Illegal to back up terminal pointer twice DEFSYM TIMEX1==:.ERBAS+460 ;Time cannot be greater than 24 hours DEFSYM ZONEX1==:.ERBAS+461 ;Time zone out of range DEFSYM ODTNX1==:.ERBAS+462 ;Time zone must be USA or Greenwich DEFSYM DILFX1==:.ERBAS+464 ;Invalid date format DEFSYM TILFX1==:.ERBAS+465 ;Invalid time format DEFSYM DATEX1==:.ERBAS+466 ;Year out of range DEFSYM DATEX2==:.ERBAS+467 ;Month is not less than 12 DEFSYM DATEX3==:.ERBAS+470 ;Day of month too large DEFSYM DATEX4==:.ERBAS+471 ;Day of week is not less than 7 DEFSYM DATEX5==:.ERBAS+472 ;Date out of range DEFSYM DATEX6==:.ERBAS+473 ;System date and time are not set DEFSYM SMONX1==:.ERBAS+516 ;WHEEL or OPERATOR capability required DEFSYM SACTX1==:.ERBAS+530 ;File is not on multiple-directory device DEFSYM SACTX2==:.ERBAS+531 ;Insufficient system resources (Job Storage Block full) DEFSYM SACTX3==:.ERBAS+532 ;Directory requires numeric account DEFSYM SACTX4==:.ERBAS+533 ;Write or owner access required DEFSYM GACTX1==:.ERBAS+540 ;File is not on multiple-directory device DEFSYM GACTX2==:.ERBAS+541 ;File expunged DEFSYM FFUFX1==:.ERBAS+544 ;File is not open DEFSYM FFUFX2==:.ERBAS+545 ;File is not on multiple-directory device DEFSYM FFUFX3==:.ERBAS+546 ;No used page found DEFSYM DSMX1==:.ERBAS+555 ;File(s) not closed DEFSYM RDDIX1==:.ERBAS+560 ;Illegal to read directory for this device DEFSYM SIRX1==:.ERBAS+570 ;Table address is not greater than 20 DEFSYM SSAVX1==:.ERBAS+600 ;Illegal to save files on this device DEFSYM SSAVX2==:.ERBAS+601 ;Page count is not less than or equal to 1000 DEFSYM SEVEX1==:.ERBAS+610 ;Entry vector is not less than 1000 DEFSYM WHELX1==:.ERBAS+614 ;WHEEL or OPERATOR capability required DEFSYM CAPX1==:.ERBAS+615 ;WHEEL or OPERATOR capability required DEFSYM PEEKX2==:.ERBAS+617 ;Read access failure on monitor page DEFSYM CRDIX1==:.ERBAS+620 ;WHEEL or OPERATOR capability required DEFSYM CRDIX2==:.ERBAS+621 ;Illegal to change number of old directory DEFSYM CRDIX3==:.ERBAS+622 ;Insufficient system resources (Job Storage Block full) DEFSYM CRDIX4==:.ERBAS+623 ;Superior directory full DEFSYM CRDIX5==:.ERBAS+624 ;Directory name not given DEFSYM CRDIX7==:.ERBAS+626 ;File(s) open in directory DEFSYM GTDIX1==:.ERBAS+640 ;WHEEL or OPERATOR capability required DEFSYM GTDIX2==:.ERBAS+641 ;Invalid directory number DEFSYM FLINX1==:.ERBAS+650 ;First character is not blank or numeric DEFSYM FLINX2==:.ERBAS+651 ;Number too small DEFSYM FLINX3==:.ERBAS+652 ;Number too large DEFSYM FLINX4==:.ERBAS+653 ;Invalid format DEFSYM FLOTX1==:.ERBAS+660 ;Column overflow in field 1 or 2 DEFSYM FLOTX2==:.ERBAS+661 ;Column overflow in field 3 DEFSYM FLOTX3==:.ERBAS+662 ;Invalid format specified DEFSYM HPTX1==:.ERBAS+670 ;Undefined clock number DEFSYM FDFRX1==:.ERBAS+700 ;Not a multiple-directory device DEFSYM FDFRX2==:.ERBAS+701 ;Invalid directory number DEFSYM GTHSX1==:.ERBAS+704 ;Unknown host number DEFSYM GTHSX2==:.ERBAS+705 ;No number for that host name DEFSYM GTHSX3==:.ERBAS+707 ;No string for that Host number DEFSYM ATNX1==:.ERBAS+710 ;Invalid receive JFN DEFSYM ATNX2==:.ERBAS+711 ;Receive JFN not opened for read DEFSYM ATNX3==:.ERBAS+712 ;Receive JFN not open DEFSYM ATNX4==:.ERBAS+713 ;Receive JFN is not a NET connection DEFSYM ATNX5==:.ERBAS+714 ;Receive JFN has been used DEFSYM ATNX6==:.ERBAS+715 ;Receive connection refused DEFSYM ATNX7==:.ERBAS+716 ;Invalid send JFN DEFSYM ATNX8==:.ERBAS+717 ;Send JFN not opened for write DEFSYM ATNX9==:.ERBAS+720 ;Send JFN not open DEFSYM ATNX10==:.ERBAS+721 ;Send JFN is not a NET connection DEFSYM ATNX11==:.ERBAS+722 ;Send JFN has been used DEFSYM ATNX12==:.ERBAS+723 ;Send connection refused DEFSYM ATNX13==:.ERBAS+724 ;Insufficient system resources (No NVT's) DEFSYM CVHST1==:.ERBAS+727 ;No string for that Host number DEFSYM CVSKX1==:.ERBAS+730 ;Invalid network JFN DEFSYM CVSKX2==:.ERBAS+731 ;Local socket invalid in this context DEFSYM SNDIX1==:.ERBAS+732 ;Invalid message size DEFSYM SNDIX2==:.ERBAS+733 ;Insufficient system resources (No buffers available) DEFSYM SNDIX3==:.ERBAS+734 ;Illegal to specify NCP links 0 - 72 DEFSYM SNDIX4==:.ERBAS+735 ;Invalid header value for this queue DEFSYM SNDIX5==:.ERBAS+736 ;IMP down DEFSYM NTWZX1==:.ERBAS+737 ;NET WIZARD capability required DEFSYM ASNSX1==:.ERBAS+740 ;Insufficient system resources (All special queues in use) DEFSYM ASNSX2==:.ERBAS+741 ;Link(s) assigned to another special queue DEFSYM SQX1==:.ERBAS+742 ;Special network queue handle out of range DEFSYM SQX2==:.ERBAS+743 ;Special network queue not assigned DEFSYM GTNCX1==:.ERBAS+746 ;Invalid network JFN DEFSYM GTNCX2==:.ERBAS+747 ;Invalid or inactive NVT DEFSYM RNAMX5==:.ERBAS+750 ;Destination file is not closed DEFSYM RNAMX6==:.ERBAS+751 ;Destination file has bad page table DEFSYM RNAMX7==:.ERBAS+752 ;Source file expunged DEFSYM RNAMX8==:.ERBAS+753 ;Write or owner access to source file required DEFSYM RNAMX9==:.ERBAS+754 ;Source file is nonexistent DEFSYM RNMX10==:.ERBAS+755 ;Source file is not closed DEFSYM RNMX11==:.ERBAS+756 ;Source file has bad page table DEFSYM RNMX12==:.ERBAS+757 ;Illegal to rename to self DEFSYM GJFX36==:.ERBAS+760 ;Internal format of directory is incorrect DEFSYM ILINS1==:.ERBAS+770 ;Undefined operation code DEFSYM ILINS2==:.ERBAS+771 ;Undefined JSYS DEFSYM ILINS3==:.ERBAS+772 ;UUO simulation facility not available DEFSYM CRLNX1==:.ERBAS+1000 ;Logical name is not defined DEFSYM INLNX1==:.ERBAS+1001 ;Index is beyond end of logical name table DEFSYM LNSTX1==:.ERBAS+1002 ;No such logical name DEFSYM MLKBX1==:.ERBAS+1003 ;Lock facility already in use DEFSYM MLKBX2==:.ERBAS+1004 ;Too many pages to be locked DEFSYM MLKBX3==:.ERBAS+1005 ;Page is not available DEFSYM MLKBX4==:.ERBAS+1006 ;Illegal to remove previous contents of user map DEFSYM VBCX1==:.ERBAS+1007 ;Display data area not locked in core DEFSYM RDTX1==:.ERBAS+1010 ;Invalid string pointer DEFSYM GFKSX1==:.ERBAS+1011 ;Area too small to hold process structure DEFSYM GTJIX1==:.ERBAS+1013 ;Invalid index DEFSYM GTJIX2==:.ERBAS+1014 ;Invalid terminal line number DEFSYM GTJIX3==:.ERBAS+1015 ;Invalid job number DEFSYM IPCFX1==:.ERBAS+1016 ;Length of packet descriptor block cannot be less than 4 DEFSYM IPCFX2==:.ERBAS+1017 ;No message for this PID DEFSYM IPCFX3==:.ERBAS+1020 ;Data too long for user's buffer DEFSYM IPCFX4==:.ERBAS+1021 ;Receiver's PID invalid DEFSYM IPCFX5==:.ERBAS+1022 ;Receiver's PID disabled DEFSYM IPCFX6==:.ERBAS+1023 ;Send quota exceeded DEFSYM IPCFX7==:.ERBAS+1024 ;Receiver quota exceeded DEFSYM IPCFX8==:.ERBAS+1025 ;IPCF free space exhausted DEFSYM IPCFX9==:.ERBAS+1026 ;Sender's PID invalid DEFSYM IPCF10==:.ERBAS+1027 ;WHEEL capability required DEFSYM IPCF11==:.ERBAS+1030 ;WHEEL or IPCF capability required DEFSYM IPCF12==:.ERBAS+1031 ;No free PID's available DEFSYM IPCF13==:.ERBAS+1032 ;PID quota exceeded DEFSYM IPCF14==:.ERBAS+1033 ;No PID's available to this job DEFSYM IPCF15==:.ERBAS+1034 ;No PID's available to this process DEFSYM IPCF16==:.ERBAS+1035 ;Receive and message data modes do not match DEFSYM IPCF17==:.ERBAS+1036 ;Argument block too small DEFSYM IPCF18==:.ERBAS+1037 ;Invalid MUTIL JSYS function DEFSYM IPCF19==:.ERBAS+1040 ;No PID for [SYSTEM] INFO DEFSYM IPCF20==:.ERBAS+1041 ;Invalid process handle DEFSYM IPCF21==:.ERBAS+1042 ;Invalid job number DEFSYM IPCF22==:.ERBAS+1043 ;Invalid software interrupt channel number DEFSYM IPCF23==:.ERBAS+1044 ;[SYSTEM] INFO already exists DEFSYM IPCF24==:.ERBAS+1045 ;Invalid message size DEFSYM IPCF25==:.ERBAS+1046 ;PID does not belong to this job DEFSYM IPCF26==:.ERBAS+1047 ;PID does not belong to this process DEFSYM IPCF27==:.ERBAS+1050 ;PID is not defined DEFSYM IPCF28==:.ERBAS+1051 ;PID not accessible by this process DEFSYM IPCF29==:.ERBAS+1052 ;PID already being used by another process DEFSYM IPCF30==:.ERBAS+1053 ;Job is not logged in DEFSYM GNJFX1==:.ERBAS+1054 ;No more files in this specification DEFSYM ENQX1==:.ERBAS+1055 ;Invalid function DEFSYM ENQX2==:.ERBAS+1056 ;Level number too small DEFSYM ENQX3==:.ERBAS+1057 ;Request and lock level numbers do not match DEFSYM ENQX4==:.ERBAS+1060 ;Number of pool and lock resources do not match DEFSYM ENQX5==:.ERBAS+1061 ;Lock already requested DEFSYM ENQX6==:.ERBAS+1062 ;Requested locks are not all locked DEFSYM ENQX7==:.ERBAS+1063 ;No ENQ on this lock DEFSYM ENQX8==:.ERBAS+1064 ;Invalid access change requested DEFSYM ENQX9==:.ERBAS+1065 ;Invalid number of blocks specified DEFSYM ENQX10==:.ERBAS+1066 ;Invalid argument block length DEFSYM ENQX11==:.ERBAS+1067 ;Invalid software interrupt channel number DEFSYM ENQX12==:.ERBAS+1070 ;Invalid number of resources requested DEFSYM ENQX13==:.ERBAS+1071 ;Indirect or indexed byte pointer not allowed DEFSYM ENQX14==:.ERBAS+1072 ;Invalid byte size DEFSYM ENQX15==:.ERBAS+1073 ;ENQ/DEQ capability required DEFSYM ENQX16==:.ERBAS+1074 ;WHEEL or OPERATOR capability required DEFSYM ENQX17==:.ERBAS+1075 ;Invalid JFN DEFSYM ENQX18==:.ERBAS+1076 ;Quota exceeded DEFSYM ENQX19==:.ERBAS+1077 ;String too long DEFSYM ENQX20==:.ERBAS+1100 ;Locked JFN cannot be closed DEFSYM ENQX21==:.ERBAS+1101 ;Job is not logged in DEFSYM IPCF31==:.ERBAS+1102 ;Invalid page number DEFSYM IPCF32==:.ERBAS+1103 ;Page is not private DEFSYM PMAPX3==:.ERBAS+1104 ;Illegal to move shared page into file DEFSYM PMAPX4==:.ERBAS+1105 ;Illegal to move file page into process DEFSYM PMAPX5==:.ERBAS+1106 ;Illegal to move special page into file DEFSYM PMAPX6==:.ERBAS+1107 ;Disk quota exceeded DEFSYM SNOPX1==:.ERBAS+1110 ;WHEEL or OPERATOR capability required DEFSYM SNOPX2==:.ERBAS+1111 ;Invalid function DEFSYM SNOPX3==:.ERBAS+1112 ;.SNPLC function must be first DEFSYM SNOPX4==:.ERBAS+1113 ;Only one .SNPLC function allowed DEFSYM SNOPX5==:.ERBAS+1114 ;Invalid page number DEFSYM SNOPX6==:.ERBAS+1115 ;Invalid number of pages to lock DEFSYM SNOPX7==:.ERBAS+1116 ;Illegal to define breakpoints after inserting them DEFSYM SNOPX8==:.ERBAS+1117 ;Breakpoint is not set on instruction DEFSYM SNOPX9==:.ERBAS+1120 ;No more breakpoints allowed DEFSYM SNOP10==:.ERBAS+1121 ;Breakpoints already inserted DEFSYM SNOP11==:.ERBAS+1122 ;Breakpoints not inserted DEFSYM SNOP12==:.ERBAS+1123 ;Invalid format for program name symbol DEFSYM SNOP13==:.ERBAS+1124 ;No such program name symbol DEFSYM SNOP14==:.ERBAS+1125 ;No such symbol DEFSYM SNOP15==:.ERBAS+1126 ;Not enough free pages for snooping DEFSYM SNOP16==:.ERBAS+1127 ;Multiply defined symbol DEFSYM IPCF33==:.ERBAS+1130 ;Invalid index into system PID table DEFSYM SNOP17==:.ERBAS+1131 ;Breakpoint already defined DEFSYM OPNX23==:.ERBAS+1132 ;Disk quota exceeded DEFSYM GJFX37==:.ERBAS+1133 ;Input deleted DEFSYM CRLNX2==:.ERBAS+1134 ;WHEEL or OPERATOR capability required DEFSYM INLNX2==:.ERBAS+1135 ;Invalid function DEFSYM LNSTX2==:.ERBAS+1136 ;Invalid function DEFSYM ALCX1==:.ERBAS+1137 ;Invalid function DEFSYM ALCX2==:.ERBAS+1140 ;WHEEL or OPERATOR capability required DEFSYM ALCX3==:.ERBAS+1141 ;Device is not assignable DEFSYM ALCX4==:.ERBAS+1142 ;Invalid job number DEFSYM ALCX5==:.ERBAS+1143 ;Device already assigned to another job DEFSYM SPLX1==:.ERBAS+1144 ;Invalid function DEFSYM SPLX2==:.ERBAS+1145 ;Argument block too small DEFSYM SPLX3==:.ERBAS+1146 ;Invalid device designator DEFSYM SPLX4==:.ERBAS+1147 ;WHEEL or OPERATOR capability required DEFSYM SPLX5==:.ERBAS+1150 ;Illegal to specify 0 as generation number for first file DEFSYM CLSX3==:.ERBAS+1151 ;File still mapped DEFSYM CRLNX3==:.ERBAS+1152 ;Invalid function DEFSYM ALCX6==:.ERBAS+1153 ;Device assigned to user job, but will be given to allocator when released DEFSYM CKAX1==:.ERBAS+1154 ;Argument block too small DEFSYM CKAX2==:.ERBAS+1155 ;Invalid directory number DEFSYM CKAX3==:.ERBAS+1156 ;Invalid access code DEFSYM TIMX1==:.ERBAS+1157 ;Invalid function DEFSYM TIMX2==:.ERBAS+1160 ;Invalid process handle DEFSYM TIMX3==:.ERBAS+1161 ;Time limit already set DEFSYM TIMX4==:.ERBAS+1162 ;Illegal to clear time limit DEFSYM SNOP18==:.ERBAS+1163 ;Data page is not private or copy-on-write DEFSYM GJFX38==:.ERBAS+1164 ;File not found because output-only device was specified DEFSYM GJFX39==:.ERBAS+1165 ;Logical name loop detected DEFSYM CRDIX8==:.ERBAS+1166 ;Invalid directory number DEFSYM CRDIX9==:.ERBAS+1167 ;Internal format of directory is incorrect DEFSYM CRDI10==:.ERBAS+1170 ;Maximum directory number exceeded; index table needs expanding DEFSYM DELDX1==:.ERBAS+1171 ;WHEEL or OPERATOR capability required DEFSYM DELDX2==:.ERBAS+1172 ;Invalid directory number DEFSYM GACTX3==:.ERBAS+1173 ;Internal format of directory is incorrect DEFSYM DIAGX1==:.ERBAS+1174 ;Invalid function DEFSYM DIAGX2==:.ERBAS+1175 ;Device is not assigned DEFSYM DIAGX3==:.ERBAS+1176 ;Argument block too small DEFSYM DIAGX4==:.ERBAS+1177 ;Invalid device type DEFSYM DIAGX5==:.ERBAS+1200 ;WHEEL, OPERATOR, or MAINTENANCE capability required DEFSYM DIAGX6==:.ERBAS+1201 ;Invalid channel command list DEFSYM DIAGX7==:.ERBAS+1202 ;Illegal to do I/O across page boundary DEFSYM DIAGX8==:.ERBAS+1203 ;No such device DEFSYM DIAGX9==:.ERBAS+1204 ;Unit does not exist DEFSYM DIAG10==:.ERBAS+1205 ;Subunit does not exist DEFSYM SYEX1==:.ERBAS+1206 ;Unreasonable SYSERR block size DEFSYM SYEX2==:.ERBAS+1207 ;No buffer space available for SYSERR DEFSYM MTOX1==:.ERBAS+1210 ;Invalid function DEFSYM IOX7==:.ERBAS+1211 ;Insufficient system resources (Job Storage Block full) DEFSYM IOX8==:.ERBAS+1212 ;Monitor internal error DEFSYM MTOX5==:.ERBAS+1213 ;Invalid hardware data mode for magnetic tape DEFSYM DUMPX5==:.ERBAS+1214 ;No-wait dump mode not supported for this device DEFSYM DUMPX6==:.ERBAS+1215 ;Dump mode not supported for this device DEFSYM IOX9==:.ERBAS+1216 ;Function legal for sequential write only DEFSYM CLSX4==:.ERBAS+1217 ;Device still active DEFSYM MTOX2==:.ERBAS+1220 ;Record size was not set before I/O was done DEFSYM MTOX3==:.ERBAS+1221 ;Function not legal in dump mode DEFSYM MTOX4==:.ERBAS+1222 ;Invalid record size DEFSYM MTOX6==:.ERBAS+1223 ;Invalid magnetic tape density DEFSYM OPNX25==:.ERBAS+1224 ;Device is write locked DEFSYM GJFX40==:.ERBAS+1225 ;Undefined attribute in file specification DEFSYM MTOX7==:.ERBAS+1226 ;WHEEL or OPERATOR capability required DEFSYM LOUTX3==:.ERBAS+1227 ;WHEEL or OPERATOR capability required DEFSYM LOUTX4==:.ERBAS+1230 ;LOG capability required DEFSYM CAPX2==:.ERBAS+1231 ;WHEEL, OPERATOR, or MAINTENANCE capability required DEFSYM SSAVX3==:.ERBAS+1232 ;Insufficient system resources (Job Storage Block full) DEFSYM SSAVX4==:.ERBAS+1233 ;Directory area of EXE file is more than one page DEFSYM TDELX1==:.ERBAS+1234 ;Table is empty DEFSYM TADDX1==:.ERBAS+1235 ;Table is full DEFSYM TADDX2==:.ERBAS+1236 ;Entry is already in table DEFSYM TLUKX1==:.ERBAS+1237 ;Internal format of table is incorrect DEFSYM IOX10==:.ERBAS+1240 ;Record is longer than user requested DEFSYM CNDIX2==:.ERBAS+1241 ;WHEEL or OPERATOR capability required DEFSYM CNDIX4==:.ERBAS+1242 ;Invalid job number DEFSYM CNDIX6==:.ERBAS+1243 ;Job is not logged in DEFSYM SJBX1==:.ERBAS+1244 ;Invalid function DEFSYM SJBX2==:.ERBAS+1245 ;Invalid magnetic tape density DEFSYM SJBX3==:.ERBAS+1246 ;Invalid magnetic tape data mode DEFSYM TMONX1==:.ERBAS+1247 ;Invalid TMON function DEFSYM SMONX2==:.ERBAS+1250 ;Invalid SMON function DEFSYM SJBX4==:.ERBAS+1251 ;Invalid job number DEFSYM SJBX5==:.ERBAS+1252 ;Job is not logged in DEFSYM SJBX6==:.ERBAS+1253 ;WHEEL or OPERATOR capability required DEFSYM GTJIX4==:.ERBAS+1254 ;No such job DEFSYM ILINS4==:.ERBAS+1255 ;UUO simulation is disabled DEFSYM ILINS5==:.ERBAS+1256 ;RMS facility is not available DEFSYM COMNX1==:.ERBAS+1257 ;Invalid COMND function code DEFSYM COMNX2==:.ERBAS+1260 ;Field too long for internal buffer DEFSYM COMNX3==:.ERBAS+1261 ;Command too long for internal buffer DEFSYM COMNX4==:.ERBAS+1262 ;Invalid character in input DEFSYM PRAX1==:.ERBAS+1263 ;Invalid PRARG function code DEFSYM PRAX2==:.ERBAS+1264 ;No room in monitor data base for argument block DEFSYM COMNX5==:.ERBAS+1265 ;Invalid string pointer argument DEFSYM COMNX6==:.ERBAS+1266 ;Problem in indirect file DEFSYM COMNX7==:.ERBAS+1267 ;Error in command DEFSYM PRAX3==:.ERBAS+1270 ;PRARG argument block too large DEFSYM CKAX4==:.ERBAS+1271 ;File is not on disk DEFSYM GACCX1==:.ERBAS+1272 ;Invalid job number DEFSYM GACCX2==:.ERBAS+1273 ;No such job DEFSYM MTOX8==:.ERBAS+1274 ;Argument block too long DEFSYM DBRKX1==:.ERBAS+1275 ;No interrupts in progress DEFSYM SJPRX1==:.ERBAS+1276 ;Job is not logged in DEFSYM GJFX41==:.ERBAS+1277 ;File name must not exceed 6 characters DEFSYM GJFX42==:.ERBAS+1300 ;File type must not exceed 3 characters DEFSYM GACCX3==:.ERBAS+1301 ;Confidential Information Access capability required DEFSYM TIMEX2==:.ERBAS+1302 ;Downtime cannot be more than 7 days in the future DEFSYM DELFX2==:.ERBAS+1303 ;File cannot be expunged because it is currently open DEFSYM DELFX3==:.ERBAS+1304 ;System scratch area depleted; file not deleted DEFSYM DELFX4==:.ERBAS+1305 ;Directory symbol table could not be rebuilt DEFSYM DELFX5==:.ERBAS+1306 ;Directory symbol table needs rebuilding DEFSYM DELFX6==:.ERBAS+1307 ;Internal format of directory is incorrect DEFSYM DELFX7==:.ERBAS+1310 ;FDB formatted incorrectly; file not deleted DEFSYM DELFX8==:.ERBAS+1311 ;FDB not found; file not deleted DEFSYM FRKHX7==:.ERBAS+1312 ;Process page cannot exceed 777 DEFSYM DIRX1==:.ERBAS+1313 ;Invalid directory number DEFSYM DIRX2==:.ERBAS+1314 ;Insufficient system resources DEFSYM DIRX3==:.ERBAS+1315 ;Internal format of directory is incorrect DEFSYM UFPGX1==:.ERBAS+1316 ;File is not open for write DEFSYM LNGFX1==:.ERBAS+1317 ;Page table does not exist and file not open for write DEFSYM IPCF34==:.ERBAS+1320 ;Cannot receive into an existing page DEFSYM COMNX8==:.ERBAS+1321 ;Number base out of range 2-10 DEFSYM MTOX9==:.ERBAS+1322 ;Output still pending DEFSYM MTOX10==:.ERBAS+1323 ;VFU or RAM file cannot be OPENed DEFSYM MTOX11==:.ERBAS+1324 ;Data too large for buffers DEFSYM MTOX12==:.ERBAS+1325 ;Input error or not all data read DEFSYM MTOX13==:.ERBAS+1326 ;Argument block too small DEFSYM MTOX14==:.ERBAS+1327 ;Invalid software interrupt channel number DEFSYM SAVX1==:.ERBAS+1330 ;Illegal to save files on this device DEFSYM MTOX15==:.ERBAS+1331 ;Device does not have Direct Access (programmable) VFU DEFSYM MTOX16==:.ERBAS+1332 ;VFU or Translation Ram file must be on disk DEFSYM LPINX1==:.ERBAS+1333 ;Invalid unit number DEFSYM LPINX2==:.ERBAS+1334 ;WHEEL or OPERATOR capability required DEFSYM LPINX3==:.ERBAS+1335 ;Illegal to load RAM or VFU while device is OPEN DEFSYM MTOX17==:.ERBAS+1336 ;Device is not on line DEFSYM LGINX6==:.ERBAS+1337 ;No more job slots available for logging-in DEFSYM DESX9==:.ERBAS+1340 ;Invalid operation for this device DEFSYM ACESX1==:.ERBAS+1341 ;Argument block too small DEFSYM ACESX2==:.ERBAS+1342 ;Insufficient system resources DEFSYM DSKOX1==:.ERBAS+1343 ;Channel number too large DEFSYM DSKOX2==:.ERBAS+1344 ;Unit number too large DEFSYM MSTRX1==:.ERBAS+1345 ;Invalid function DEFSYM MSTRX2==:.ERBAS+1346 ;WHEEL or OPERATOR capability required DEFSYM MSTRX3==:.ERBAS+1347 ;Argument block too small DEFSYM MSTRX4==:.ERBAS+1350 ;Insufficient system resources DEFSYM MSTRX5==:.ERBAS+1351 ;Drive is not on-line DEFSYM MSTRX6==:.ERBAS+1352 ;Home blocks are bad DEFSYM MSTRX7==:.ERBAS+1353 ;Invalid structure name DEFSYM MSTRX8==:.ERBAS+1354 ;Could not get OFN for ROOT-DIRECTORY DEFSYM MSTRX9==:.ERBAS+1355 ;Could not MAP ROOT-DIRECTORY DEFSYM MSTX10==:.ERBAS+1356 ;ROOT-DIRECTORY bad DEFSYM MSTX11==:.ERBAS+1357 ;Could not initialize Index Table DEFSYM MSTX12==:.ERBAS+1360 ;Could not OPEN Bit Table File DEFSYM MSTX13==:.ERBAS+1361 ;Backup copy of ROOT-DIRECTORY is bad DEFSYM MSTX14==:.ERBAS+1362 ;Invalid channel number DEFSYM MSTX15==:.ERBAS+1363 ;Invalid unit number DEFSYM MSTX16==:.ERBAS+1364 ;Invalid controller number DEFSYM DSKX01==:.ERBAS+1365 ;Invalid structure number DEFSYM DSKX02==:.ERBAS+1366 ;Bit table is being initialized DEFSYM DSKX03==:.ERBAS+1367 ;Bit table has not been initialized DEFSYM DSKX04==:.ERBAS+1370 ;Bit table being initialized by another job DEFSYM GFUSX1==:.ERBAS+1371 ;Invalid function DEFSYM GFUSX2==:.ERBAS+1372 ;Insufficient system resources DEFSYM SFUSX1==:.ERBAS+1373 ;Invalid function DEFSYM SFUSX2==:.ERBAS+1374 ;Insufficient system resources DEFSYM SFUSX3==:.ERBAS+1375 ;No such user name DEFSYM RCDIX1==:.ERBAS+1376 ;Insufficient system resources DEFSYM RCDIX2==:.ERBAS+1377 ;Invalid directory specification DEFSYM RCDIX3==:.ERBAS+1400 ;Invalid structure name DEFSYM RCDIX4==:.ERBAS+1401 ;Monitor internal error DEFSYM RCUSX1==:.ERBAS+1402 ;Insufficient system resources DEFSYM TDELX2==:.ERBAS+1403 ;Invalid table entry location DEFSYM TIMX5==:.ERBAS+1404 ;Invalid software interrupt channel number DEFSYM LSTRX1==:.ERBAS+1405 ;Process has not encountered any errors DEFSYM SWJFX1==:.ERBAS+1406 ;Illegal to swap same JFN DEFSYM MTOX18==:.ERBAS+1407 ;Invalid software interrupt channel number DEFSYM OPNX26==:.ERBAS+1410 ;Illegal to open a string pointer DEFSYM DELFX9==:.ERBAS+1411 ;File is not a directory file DEFSYM CRDIX6==:.ERBAS+1412 ;Directory file is mapped DEFSYM COMNX9==:.ERBAS+1413 ;End of input file reached DEFSYM STYPX1==:.ERBAS+1414 ;Invalid terminal type DEFSYM PMAPX7==:.ERBAS+1415 ;Illegal to map file on dismounted structure DEFSYM DSKOX3==:.ERBAS+1416 ;Invalid structure number DEFSYM DESX10==:.ERBAS+1417 ;Structure is dismounted DEFSYM DSKOX4==:.ERBAS+1420 ;Invalid address type specified DEFSYM MSTX17==:.ERBAS+1421 ;All units in a structure must be of the same type DEFSYM MSTX18==:.ERBAS+1422 ;No more units in system DEFSYM MSTX19==:.ERBAS+1423 ;Unit is already part of a mounted structure DEFSYM MSTX20==:.ERBAS+1424 ;Data error reading HOME blocks DEFSYM MSTX21==:.ERBAS+1425 ;Structure is not mounted DEFSYM MSTX22==:.ERBAS+1426 ;Illegal to change specified bits DEFSYM CRDI11==:.ERBAS+1427 ;Invalid terminating bracket on directory DEFSYM MSTX23==:.ERBAS+1430 ;Could not write HOME blocks DEFSYM ACESX3==:.ERBAS+1431 ;Password is required DEFSYM ACESX4==:.ERBAS+1432 ;Function not allowed for another job DEFSYM ACESX5==:.ERBAS+1433 ;No function specified for ACCES DEFSYM STRX05==:.ERBAS+1434 ;No such user name DEFSYM ACESX6==:.ERBAS+1435 ;Directory is not accessed DEFSYM STRX01==:.ERBAS+1436 ;Structure is not mounted DEFSYM STRX02==:.ERBAS+1437 ;Insufficient system resources DEFSYM IOX11==:.ERBAS+1440 ;Quota exceeded or disk full DEFSYM IOX12==:.ERBAS+1441 ;Insufficient system resources (Swapping space full) DEFSYM STRX03==:.ERBAS+1442 ;No such directory name DEFSYM STRX04==:.ERBAS+1443 ;Ambiguous directory specification DEFSYM PPNX1==:.ERBAS+1444 ;Invalid PPN DEFSYM PPNX2==:.ERBAS+1445 ;Structure is not mounted DEFSYM PPNX3==:.ERBAS+1446 ;Insufficient system resources DEFSYM PPNX4==:.ERBAS+1447 ;Invalid directory number DEFSYM SPLX6==:.ERBAS+1450 ;No directory to write spooled files into DEFSYM CRDI12==:.ERBAS+1451 ;Structure is not mounted DEFSYM GFUSX3==:.ERBAS+1452 ;File expunged DEFSYM GFUSX4==:.ERBAS+1453 ;Internal format of directory is incorrect DEFSYM RNMX13==:.ERBAS+1454 ;Insufficient system resources DEFSYM SJBX8==:.ERBAS+1455 ;Illegal to perform this function DEFSYM DECRSV==:.ERBAS+1456 ;DEC reserved bits not zero DEFSYM FFFFX1==:.ERBAS+1457 ;No free pages in file DEFSYM WILDX1==:.ERBAS+1460 ;Second JFN cannot be wild DEFSYM SNOP20==:.ERBAS+1461 ;Monitor address break in use by another process DEFSYM SNOP19==:.ERBAS+1462 ;Illegal address break flag bits DEFSYM DELX13==:.ERBAS+1463 ;Can't delete perpetual file ; ERROR CODES 1463-1534 ARE AVAILABLE****** ;26 DEFSYM TIMX6==:.ERBAS+1535 ;Time has already passed DEFSYM TIMX7==:.ERBAS+1536 ;No space available for a clock DEFSYM TIMX8==:.ERBAS+1537 ;User clock allocation exceeded DEFSYM TIMX9==:.ERBAS+1540 ;No such clock entry found DEFSYM TIMX10==:.ERBAS+1541 ;No system date and time DEFSYM SCTX1==:.ERBAS+1550 ;Invalid function code DEFSYM SCTX2==:.ERBAS+1551 ;Terminal already in use as controlling terminal DEFSYM SCTX3==:.ERBAS+1552 ;Illegal to redefine the job's controlling terminal DEFSYM SCTX4==:.ERBAS+1553 ;SC%SCT capability required ; Error codes 1554-1677 are available ****** DEFSYM SFUSX4==:.ERBAS+1700 ;File expunged DEFSYM SFUSX5==:.ERBAS+1701 ;Write or owner access required DEFSYM SFUSX6==:.ERBAS+1702 ;No such user name DEFSYM GETX3==:.ERBAS+1703 ;Illegal to overlay existing pages DEFSYM FILX01==:.ERBAS+1704 ;File is not open DEFSYM ARGX01==:.ERBAS+1705 ;Invalid password DEFSYM CAPX3==:.ERBAS+1706 ;WHEEL capability required DEFSYM CAPX4==:.ERBAS+1707 ;WHEEL or IPCF capability required DEFSYM CAPX6==:.ERBAS+1711 ;ENQ/DEQ capability required DEFSYM CAPX7==:.ERBAS+1712 ;Confidential Information Access Capability required DEFSYM ARGX02==:.ERBAS+1713 ;Invalid function DEFSYM ARGX03==:.ERBAS+1714 ;Illegal to change specified bits DEFSYM ARGX04==:.ERBAS+1715 ;Argument block too small DEFSYM ARGX05==:.ERBAS+1716 ;Argument block too long DEFSYM ARGX06==:.ERBAS+1717 ;Invalid page number DEFSYM ARGX07==:.ERBAS+1720 ;Invalid job number DEFSYM ARGX08==:.ERBAS+1721 ;No such job DEFSYM ARGX09==:.ERBAS+1722 ;Invalid byte size DEFSYM ARGX10==:.ERBAS+1723 ;Invalid access requested DEFSYM ARGX11==:.ERBAS+1724 ;Invalid directory number DEFSYM ARGX12==:.ERBAS+1725 ;Invalid process handle DEFSYM ARGX13==:.ERBAS+1726 ;Invalid software interrupt channel number DEFSYM MONX01==:.ERBAS+1727 ;Insufficient system resources DEFSYM MONX02==:.ERBAS+1730 ;Insufficient system resources (JSB full) DEFSYM MONX03==:.ERBAS+1731 ;Monitor internal error DEFSYM MONX04==:.ERBAS+1732 ;Insufficient system resources (Swapping space full) DEFSYM ARGX14==:.ERBAS+1733 ;Invalid account identifier DEFSYM ARGX15==:.ERBAS+1734 ;Job is not logged in DEFSYM FILX02==:.ERBAS+1735 ;Write or owner access required DEFSYM FILX03==:.ERBAS+1736 ;List access required DEFSYM DEVX4==:.ERBAS+1737 ;Device is not assignable DEFSYM FILX04==:.ERBAS+1740 ;File is not on multiple-directory device DEFSYM ARGX16==:.ERBAS+1741 ;Password is required DEFSYM ARGX17==:.ERBAS+1742 ;Invalid argument block length DEFSYM ARGX18==:.ERBAS+1743 ;Invalid structure name DEFSYM DEVX5==:.ERBAS+1744 ;No such device DEFSYM DIRX4==:.ERBAS+1745 ;Invalid directory specification DEFSYM FILX05==:.ERBAS+1746 ;File expunged DEFSYM STRX06==:.ERBAS+1747 ;No such user number DEFSYM MSTX24==:.ERBAS+1750 ;Illegal to dismount the Public Structure DEFSYM MSTX25==:.ERBAS+1751 ;Invalid number of swapping pages DEFSYM MSTX26==:.ERBAS+1752 ;Invalid number of Front-End-Filesystem pages DEFSYM LOUTX5==:.ERBAS+1753 ;Illegal to log out job 0 DEFSYM GJFX43==:.ERBAS+1754 ;More than one ;T specification is not allowed DEFSYM MTOX19==:.ERBAS+1755 ;Invalid terminal page width DEFSYM MTOX20==:.ERBAS+1756 ;Invalid terminal page length DEFSYM MSTX27==:.ERBAS+1757 ;Specified unit is not a disk DEFSYM MSTX28==:.ERBAS+1760 ;Could not initialize bit table for structure DEFSYM MSTX29==:.ERBAS+1761 ;Could not reconstruct ROOT-DIRECTORY DEFSYM DSKX05==:.ERBAS+1763 ;Disk assignments and deassignments are currently prohibited DEFSYM DSKX06==:.ERBAS+1764 ;Invalid disk address DEFSYM DSKX07==:.ERBAS+1765 ;Address cannot be deassigned because it is not assigned DEFSYM DSKX08==:.ERBAS+1766 ;Address cannot be assigned because it is already assigned DEFSYM COMX10==:.ERBAS+1767 ;Invalid default string DEFSYM MSTX30==:.ERBAS+1770 ;Incorrect Bit Table counts on structure DEFSYM LOCKX1==:.ERBAS+1771 ;Illegal to lock other than a private page DEFSYM LOCKX2==:.ERBAS+1772 ;Requested page unavailable DEFSYM LOCKX3==:.ERBAS+1773 ;Attempt to lock too much memory DEFSYM ILLX01==:.ERBAS+1774 ;Illegal memory read DEFSYM ILLX02==:.ERBAS+1775 ;Illegal memory write DEFSYM ILLX03==:.ERBAS+1776 ;Memory data parity error DEFSYM ILLX04==:.ERBAS+1777 ;Reference to non-existent page DEFSYM MSTX31==:.ERBAS+2000 ;Structure already mounted DEFSYM MSTX32==:.ERBAS+2001 ;Structure was not mounted DEFSYM MSTX33==:.ERBAS+2002 ;Structure is unavailable for mounting DEFSYM STDIX1==:.ERBAS+2003 ;The STDIR JSYS has been replaced by RCDIR and RCUSR DEFSYM CNDIX7==:.ERBAS+2004 ;The CNDIR JSYS has been replaced by ACCES DEFSYM PMCLX1==:.ERBAS+2005 ;Illegal page state or state transition DEFSYM PMCLX2==:.ERBAS+2006 ;Requested physical page is unavailable DEFSYM PMCLX3==:.ERBAS+2007 ;Requested physical page contains errors DEFSYM DLFX10==:.ERBAS+2010 ;Cannot delete directory; file still mapped DEFSYM DLFX11==:.ERBAS+2011 ;Cannot delete directory file in this manner DEFSYM GJFX44==:.ERBAS+2012 ;Account string does not match DEFSYM UTSTX1==:.ERBAS+2013 ;Invalid function code DEFSYM UTSTX2==:.ERBAS+2014 ;Area of code too large to test DEFSYM UTSTX3==:.ERBAS+2015 ;UTEST facility in use by another process DEFSYM BOTX01==:.ERBAS+2016 ;Invalid DTE-20 number DEFSYM BOTX02==:.ERBAS+2017 ;Invalid byte size DEFSYM DCNX1==:.ERBAS+2020 ;Invalid network file name DEFSYM DCNX5==:.ERBAS+2021 ;No more logical links available DEFSYM DCNX3==:.ERBAS+2022 ;Invalid object DEFSYM DCNX4==:.ERBAS+2023 ;Invalid task name DEFSYM DCNX9==:.ERBAS+2024 ;Object is already defined DEFSYM DCNX8==:.ERBAS+2025 ;Invalid network operation DEFSYM DCNX11==:.ERBAS+2026 ;Link aborted DEFSYM DCNX12==:.ERBAS+2027 ;String exceeds 16 bytes DEFSYM TTYX01==:.ERBAS+2030 ;Line is not active DEFSYM BOTX03==:.ERBAS+2031 ;Invalid protocol version number DEFSYM MONX05==:.ERBAS+2032 ;Insufficient system resources (no resident free space) DEFSYM ARGX19==:.ERBAS+2033 ;Invalid unit number DEFSYM COMX11==:.ERBAS+2035 ;Invalid CMRTY pointer DEFSYM COMX12==:.ERBAS+2036 ;Invalid CMBFP pointer DEFSYM COMX13==:.ERBAS+2037 ;Invalid CMPTR pointer DEFSYM COMX14==:.ERBAS+2040 ;Invalid CMABP pointer DEFSYM COMX15==:.ERBAS+2041 ;Invalid default string pointer DEFSYM COMX16==:.ERBAS+2042 ;Invalid help message pointer DEFSYM COMX17==:.ERBAS+2043 ;Invalid byte pointer in function block DEFSYM NPXAMB==:.ERBAS+2044 ;Ambiguous DEFSYM NPXNSW==:.ERBAS+2045 ;Not a switch - does not begin with slash DEFSYM NPXNOM==:.ERBAS+2046 ;Does not match switch or keyword DEFSYM NPXNUL==:.ERBAS+2047 ;Null switch or keyword given DEFSYM NPXINW==:.ERBAS+2050 ;Invalid guide word DEFSYM NPXNC==:.ERBAS+2051 ;Not confirmed DEFSYM NPXICN==:.ERBAS+2052 ;Invalid character in number DEFSYM NPXIDT==:.ERBAS+2053 ;Invalid device terminator DEFSYM NPXNQS==:.ERBAS+2054 ;Not a quoted string - quote missing at beginning or end DEFSYM NPXNMT==:.ERBAS+2055 ;Does not match token DEFSYM NPXNMD==:.ERBAS+2056 ;Does not match directory or user name DEFSYM NPXCMA==:.ERBAS+2057 ;Comma not given DEFSYM GJFX45==:.ERBAS+2060 ;Illegal to request multiple specifications for the same attribute DEFSYM GJFX46==:.ERBAS+2061 ;Attribute value is required DEFSYM GJFX47==:.ERBAS+2062 ;Attribute does not take a value DEFSYM MSTX34==:.ERBAS+2063 ;Unit is write-locked DEFSYM GJFX48==:.ERBAS+2064 ;GTJFN input buffer is empty DEFSYM GJFX49==:.ERBAS+2065 ;Invalid attribute for this device DEFSYM SJBX7==:.ERBAS+2077 ;Remark exceeds 39 characters DEFSYM DELF10==:.ERBAS+2100 ;Directory still contains subdirectory DEFSYM CRDI13==:.ERBAS+2101 ;Request exceeds superior directory working quota DEFSYM CRDI14==:.ERBAS+2102 ;Request exceeds superior directory permanent quota DEFSYM CRDI15==:.ERBAS+2103 ;Request exceeds superior directory subdirectory quota DEFSYM CRDI16==:.ERBAS+2104 ;Invalid user group DEFSYM ENACX1==:.ERBAS+2105 ;Account validation data base file not completely closed DEFSYM ENACX2==:.ERBAS+2106 ;Cannot get a JFN for