ibm:vm370-lib:copy:equ.copy_src
Table of Contents
EQU Source
References
- Fixes Applied : 3
- This Source Date : Friday, December 8, 1978
- Last Fix ID : [HRC063DK]
Source Listing
- EQU.COPY.txt
- *COPY EQU 00001000
- PUSH PRINT 00001200
- AIF ('&SYSPARM' NE 'SUP').EQU01 00001400
- PRINT OFF,NOGEN 00001600
- .EQU01 ANOP 00001800
- * 00003000
- *** CP370 EQUATE SYMBOLS - MACHINE USAGE 00004000
- * 00005000
- SPACE 1 00006000
- * BITS DEFINED IN STANDARD/EXTENDED PSW 00007000
- EXTMODE EQU X'08' BIT 12 - EXTENDED MODE 00008000
- MCHEK EQU X'04' BIT 13 - MACHINE CHECK ENABLED 00009000
- WAIT EQU X'02' BIT 14 - WAIT STATE 00010000
- PROBMODE EQU X'01' BIT 15 - PROBLEM STATE 00011000
- SPACE 1 00012000
- * BITS DEFINED IN EXTENDED PSW 00013000
- PERMODE EQU X'40' BIT 01 - PER ENABLED 00014000
- TRANMODE EQU X'04' BIT 05 - TRANSLATE MODE 00016000
- IOMASK EQU X'02' BIT 06 - SUMMARY IO MASK 00017000
- EXTMASK EQU X'01' BIT 07 - SUMMARY EXTERNAL MASK 00018000
- SPACE 1 00019000
- * BITS DEFINED IN CHANNEL STATUS WORD - CSW 00020000
- ATTN EQU X'80' BIT 32 - ATTENTION 00021000
- SM EQU X'40' BIT 33 - STATUS MODIFIER 00022000
- CUE EQU X'20' BIT 34 - CONTROL UNIT END 00023000
- BUSY EQU X'10' BIT 35 - BUSY 00024000
- CE EQU X'08' BIT 36 - CHANNEL END 00025000
- DE EQU X'04' BIT 37 - DEVICE END 00026000
- UC EQU X'02' BIT 38 - UNIT CHECK 00027000
- UE EQU X'01' BIT 39 - UNIT EXCEPTION 00028000
- * 00029000
- PCI EQU X'80' BIT 40 - PROGRAM-CONTROL INTERRUPT 00030000
- IL EQU X'40' BIT 41 - INCORRECT LENGTH 00031000
- PRGC EQU X'20' BIT 42 - PROGRAM CHECK 00032000
- PRTC EQU X'10' BIT 43 - PROTECTION CHECK 00033000
- CDC EQU X'08' BIT 44 - CHANNEL DATA CHECK 00034000
- CCC EQU X'04' BIT 45 - CHANNEL CONTROL CHECK 00035000
- IFCC EQU X'02' BIT 46 - INTERFACE CONTROL CHECK 00036000
- CHC EQU X'01' BIT 47 - CHAINING CHECK 00037000
- SPACE 1 00038000
- * BITS DEFINED IN CHANNEL COMMAND WORD - CCW 00039000
- CD EQU X'80' BIT 32 - CHAIN DATA 00040000
- CC EQU X'40' BIT 33 - COMMAND CHAIN 00041000
- SILI EQU X'20' BIT 34 - SUPPRESS INCORRECT LENGTH IND. 00042000
- SKIP EQU X'10' BIT 35 - SUPPRESS DATA TRANSFER 00043000
- PCIF EQU X'08' BIT 36 - PROGRAM-CONTROL INTERRUPT FETCH 00044000
- IDA EQU X'04' BIT 37 - INDIRECT DATA ADDRESS 00045000
- SPACE 1 00046000
- * BITS DEFINED IN SENSE BYTE 0 -- COMMON TO MOST DEVICES 00047000
- CMDREJ EQU X'80' BIT 0 - COMMAND REJECT 00048000
- INTREQ EQU X'40' BIT 1 - INTERVENTION REQUIRED 00049000
- BUSOUT EQU X'20' BIT 2 - BUS OUT 00050000
- EQCHK EQU X'10' BIT 3 - EQUIPMENT CHECK 00051000
- DATACHK EQU X'08' BIT 4 - DATA CHECK 00052000
- EJECT 00053000
- * 00054000
- *** CP370 EQUATE SYMBOLS - EXTENDED CONTROL REGISTERS 00055000
- * 00056000
- SPACE 2 00057000
- * BITS DEFINED IN CREG 0 00058000
- SPACE 1 00059000
- * BYTE 0 00060000
- BLKMPX EQU X'80' BIT 00 - ENABLE BLOCK MULTIPLEXING 00061000
- SSMSUPP EQU X'40' BIT 01 - ENABLE SSM SUPPRESSION 00062000
- TODSYNC EQU X'20' TOD SYNC CONTROL @V407595 00062100
- NOSSKCK EQU X'01' DISABLE SPEC OP ON SSK WITH 4K KEY HRC004DK 00062500
- SPACE 1 00063000
- * BYTE 1 00064000
- PAGE4K EQU X'80' BIT 08 - USE 4K PAGES 00065000
- PAGE2K EQU X'40' BIT 09 - USE 2K PAGES 00066000
- SEG1M EQU X'10' BIT 11 - USE 1M SEGMENTS 00067000
- SPACE 1 00068000
- * BYTE 2 00069000
- MFAMASK EQU X'80' BIT 16 - MALFUNCTION ALERT MASK @V407508 00069100
- EMSMASK EQU X'40' BIT 17 - EMERGENCY SIGNAL MASK @V407508 00069200
- XCMASK EQU X'20' BIT 18 - EXTERNAL CALL MASK @V407508 00069300
- SYNCMASK EQU X'10' BIT 19 - TOD SYNC CHECK MASK @V407508 00069400
- CKCMASK EQU X'08' BIT 20 - MASK ON CLOCK COMPARATOR INT. 00070000
- CPTMASK EQU X'04' BIT 21 - MASK ON CPU TIMER INT. 00071000
- SPACE 1 00072000
- * BYTE 3 00073000
- INTMASK EQU X'80' BIT 24 - MASK ON INTERVAL TIMER INT. 00074000
- KEYMASK EQU X'40' BIT 25 - MASK ON OPERATOR KEY INT. 00075000
- SIGMASK EQU X'20' BIT 26 - MASK ON EXTERNAL SIGNALS 2-7 00076000
- SPACE 2 00077000
- * BITS DEFINED IN CREG 9 00078000
- SPACE 1 00079000
- * BYTE 0 00080000
- PERSUBR EQU X'80' BIT 00 - MONITOR SUCCESSFUL BRANCHES 00081000
- PERIFET EQU X'40' BIT 01 - MONITOR INSTRUCTION FETCHES 00082000
- PERSALT EQU X'20' BIT 02 - MONITOR STORAGE ALTERATION 00083000
- PERGPRS EQU X'10' BIT 03 - MONITOR REGISTER ALTERATION 00084000
- SPACE 2 00085000
- * BITS DEFINED IN CREG14 00086000
- SPACE 1 00087000
- * BYTE 0 00088000
- HARDSTOP EQU X'80' BIT 00 - CHECK STOP CONTROL 00089000
- SYNCLOG EQU X'40' BIT 01 - SYNCHRONOUS LOGOUT CONTROL 00090000
- IOLOG EQU X'20' BIT 02 - I/O LOGOUT CONTROL 00091000
- RECOVRPT EQU X'08' BIT 04 - RECOVERY REPORT MASK 00092000
- CONFGRPT EQU X'04' BIT 05 - CONFIGURATION REPORT MASK 00093000
- DAMAGRPT EQU X'02' BIT 06 - EXTERNAL DAMAGE REPORT MASK 00094000
- WARNGRPT EQU X'01' BIT 07 - WARNING CONDITION REPORT MASK 00095000
- SPACE 1 00096000
- * BYTE 1 00097000
- ASYNELOG EQU X'80' BIT 08 - ASYNCHRONOUS EXTENDED LOGOUT CTL 00098000
- ASYNFLOG EQU X'40' BIT 09 - ASYNCHRONOUS FIXED LOGOUT CTL 00099000
- EJECT 00100000
- * 00101000
- *** CP370 EQUATE SYMBOLS - CP USAGE 00102000
- * 00103000
- SPACE 1 00104000
- * BITS DEFINED FOR TRANS MACRO 00105000
- BRING EQU X'80' BRING REQUESTED PAGE 00106000
- DEFER EQU X'40' DEFER EXECUTION UNTIL PAGE IN CORE 00107000
- LOCK EQU X'20' LOCK PAGE FOR IO OPERATION 00108000
- IOERETN EQU X'10' RETURN I/O ERRORS TO CALLER 00109000
- SYSTEM EQU X'08' CALL TO DMKPTRAN FOR SYSTEM V.M. SPACE 00110000
- VFAULT EQU X'04' DMKPTRAN CALL FOR VIRTUAL PAGE- @V407594 00110050
- * CALLER WON'T UTILIZE REAL ADDRESS@V407594 00110060
- SPACE 2 00110100
- * EQUATES FOR PARM FIELD FOR CALLS TO DMKBLDRT/DMKBLDRL 00110200
- DELSEGS EQU X'80' RELEASE THE SEGMENT TABLES 00110300
- DELPAGES EQU X'40' RELEASE THE PAGE/SWAP TABLES 00110400
- VRALOC EQU X'20' ATTEMPT ALLOCATION OF V=R AREA 00110450
- PAGTONLY EQU X'10' ONLY 1 PAGETABLE AND RETURN @V408246 00110470
- NEWPAGES EQU X'08' BUILD NEW PAGE/SWAP TABLE 00110500
- NEWSEGS EQU X'04' BUILD NEW SEGMENT TABLE 00110600
- KEEPSEGS EQU X'02' RETAIN INFORMATION IN OLD SEGMENT TABLE 00110700
- OLDVMSEG EQU X'01' VMSEG POINTER IN VMBLOK VALID 00110800
- SPACE 1 00111000
- * BITS DEFINED FOR TERMINAL I/O VIA DMKQCN: 00112500
- HILIGHT EQU X'8000' OUTPUT - HILIGHTED DATA STREAM HRC101DK 00112510
- HOLDSCR EQU X'2000' OUTPUT - HOLD SCREEN FOR THIS MESSAGE HRC101DK 00112520
- NOQUEUE EQU X'1000' OUTPUT - DO NOT QUEUE THIS MESSAGE HRC063DK 00112530
- NOTRESP EQU X'4000' OUTPUT - MESSAGE NOT A CMD RESPONSE 00112550
- ERRMSG EQU X'0800' OUTPUT - CONTROL PROGRAM ERROR MESSAGE 00113000
- NORET EQU X'0400' OUTPUT - RETURN IMMEDIATELY AFTER CALL 00113500
- DFRET EQU X'0200' OUTPUT - FRET BUFFER AFTER QUEUEING 00114000
- OPERATOR EQU X'0100' OUTPUT - MESSAGE FOR SYSTEM OPERATOR 00114500
- LOGDROP EQU X'80' OUTPUT - LOGOFF & DROP LINE AFTER MESSAGE 00115000
- LOGHOLD EQU X'40' OUTPUT - LOGOFF & HOLD LINE AFTER MESSAGE 00115500
- PRIORITY EQU X'20' OUTPUT - WRITE THIS MESSAGE IMMEDIATELY 00116000
- VMGENIO EQU X'10' I/O REQUEST GENERATED BY VIRTUAL MACHINE 00116500
- NOAUTO EQU X'04' OUTPUT - SUPPRESS AUTO CARRIAGE RETURN 00117000
- ALARM EQU X'02' OUTPUT - SOUND THE AUDIBLE ALARM 00117500
- NOTIME EQU X'01' OUTPUT - SUPPRESS TIME STAMP ON MESSAGE 00118000
- INHIBIT EQU X'08' INPUT - PREVENT DISPLAY OF THIS DATA 00118500
- EDIT EQU X'04' INPUT - EDIT INPUT DATA FOR CORRECTIONS 00119000
- UCASE EQU X'02' INPUT - TRANSLATE DATA TO UPPER CASE 00119500
- SPACE 2 00120000
- * EQUATES FOR SPOOL FILE RECOVERY ROUTINE - DMKCKS 00120050
- RDRCHN EQU X'01' SFBLOK GOES ON RDR CHAIN 00120100
- PCHCHN EQU X'02' SFBLOK GOES ON PUNCH CHAIN 00120150
- PRTCHN EQU X'04' SFBLOK GOES ON PRINT CHAIN 00120200
- ADDSFB EQU X'08' ADD NEW SFBLOK TO RECOVERY CYL 00120250
- CHGSFB EQU X'10' CHANGE EXISTING SFBLOK 00120300
- DELSFB EQU X'20' DELETE SFBLOK FROM CHECKPOINT 00120350
- OPNSFB EQU X'40' IT IS AN OPEN PRINT-PUNCH FILE 00120400
- ACTSFB EQU X'80' FILE BEING PRINTED OR PUNCHED 00120450
- CHGRDV EQU X'0100' CHANGE ATTRIBUTES OF REAL DEVICE 00120500
- CHGSHQ EQU X'0200' CHECKPOINT A SHQBLOK 00120550
- EJECT 00121000
- SPACE 00121100
- * MONITOR CLASS AND CODE DEFINITIONS 00121200
- SPACE 00121300
- MNCLPERF EQU X'00' MONITOR PERFORM CLASS 00121400
- * 00121500
- MNCOSYS EQU X'0000' PERFORM CLASS, SYSTEM PERFORMANCE 00121600
- MNCOTH EQU X'0061' MONITOR TAPE HEADER RECORD 00121700
- MNCOTT EQU X'0062' MONITOR TAPE TRAILER RECORD 00121800
- MNCOSUS EQU X'0063' MONITOR COLLECTION SUSPENSION 00121900
- * RECORD 00122000
- SPACE 00122100
- MNCLRESP EQU X'01' MONITOR RESPONSE CLASS 00122200
- * 00122300
- MNCOBRD EQU X'0000' RESPONSE CLASS, BEGIN READ CODE 00122400
- MNCOWRIT EQU X'0001' RESPONSE CLASS, WRITE CODE 00122500
- MNCOERD EQU X'0002' RESPONSE CLASS, END READ CODE 00122600
- SPACE 00122700
- MNCLSCH EQU X'02' MONITOR SCHEDULE CLASS 00122800
- * 00122900
- MNCODQ EQU X'0002' SCHEDULE CLASS, DROP QUEUE CODE 00123000
- MNCOAQ EQU X'0003' SCHEDULE CLASS, ADD TO QUEUE CODE 00123100
- MNCOAEL EQU X'0004' SCHEDULE CLASS, ADD TO ELIGABLE LIST CODE 00123200
- SPACE 00123300
- MNCLUSER EQU X'04' MONITOR USER CLASS 00123400
- * 00123500
- MNCOUSER EQU X'0000' USER CLASS, USER DATA 00123600
- SPACE 00123700
- MNCLINST EQU X'05' MONITOR INSTRUCTION SIMULATION CLASS 00123800
- * 00123900
- MNCOSIM EQU X'0000' INST CLASS, INSTRUCTION SIMULATION CODE 00124000
- SPACE 00124100
- MNCLDAST EQU X'06' MONITOR DASD/TAPE CLASS 00124200
- * 00124300
- MNCODASH EQU X'0000' DASTAP CLASS, FIRST RECORD 00124400
- MNCODAS EQU X'0001' DASTAP CLASS, DATA RECORDS 00124500
- SPACE 00124600
- MNCLSEEK EQU X'07' MONITOR DASD CLASS 00124700
- * 00124800
- MNCOCYL EQU X'0000' DASD CLASS, SEEKS CODE 00124900
- SPACE 00125000
- MNCLSYS EQU X'08' MONITOR SYSTEM PROFILE CLASS 00125100
- * 00125200
- MNCODA EQU X'0002' SYS CLASS, DASD DATA 00125300
- EJECT 00125400
- * SIGNAL MACRO EQUATES @V407510 00125420
- SIGSENSE EQU X'01' SENSE ORDER CODE @V407510 00125440
- SIGXC EQU X'02' EXTERNAL CALL ORDER CODE @V407510 00125460
- SIGEMS EQU X'03' EMERGENCY SIGNAL ORDER CODE @V407510 00125480
- SIGSTART EQU X'04' START ORDER CODE @V407510 00125500
- SIGSTOP EQU X'05' STOP ORDER CODE @V407510 00125520
- SIGREST EQU X'06' RESTART ORDER CODE @V407510 00125540
- SIGIPR EQU X'07' INITIAL PROGRAM RESET ORDER CODE @V407510 00125560
- SIGPR EQU X'08' PROGRAM RESET ORDER CODE @V407510 00125580
- SIGSSS EQU X'09' STOP AND STORE STATUS ORDER CODE @V407510 00125600
- SIGIML EQU X'0A' INITIAL MICROPROGRAM LOAD @V407510 00125620
- * ORDER CODE @V407510 00125640
- SIGICR EQU X'0B' INITIAL CPU RESET ORDER CODE @V407510 00125660
- SIGCR EQU X'0C' CPU RESET ORDER CODE @V407510 00125680
- * EMERGENCY SIGNALS @V407510 00125700
- SIGQUI EQU X'800' QUIESCE EMERGENCY SIGNAL @V407510 00125720
- SIGEXT EQU X'400' EXTEND EMERGENCY SIGNAL @V407510 00125740
- SIGSYNC EQU X'200' CLOCK SYNCHRONIZATION @V407510 00125760
- * EMERGENCY SIGNAL @V407510 00125780
- SIGSHD EQU X'100' SHUTDOWN EMERGENCY SIGNAL @V407510 00125800
- SIGCLK EQU X'080' CLOCK CHECK SIGNAL @V407510 00125820
- * EXTERNAL CALL SIGNALS @V407510 00125840
- SIGAPR EQU X'800' AUTOMATIC PROCESSOR RECOVERY @V407510 00125860
- * EXTERNAL CALL SIGNAL @V407510 00125880
- SIGRES EQU X'400' RESUME EXTERNAL CALL SIGNAL @V407510 00125900
- SIGWAKE EQU X'200' WAKEUP EXTERNAL CALL SIGNAL @V407510 00125920
- SIGDISP EQU X'100' DISPATCH EXTERNAL CALL SIGNAL @V407510 00125940
- EJECT 00125960
- * TRACE MACRO EQUATES @V407508 00125980
- TRCEXT EQU X'01' EXTERNAL INTERRUPT ENTRY @V407508 00126000
- TRCSVC EQU X'02' SVC INTERRUPT ENTRY @V407508 00126020
- TRCPGM EQU X'03' PROGRAM INTERRUPT ENTRY @V407508 00126040
- TRCMCH EQU X'04' MACHINE CHECK INTERRUPT ENTRY @V407508 00126060
- TRCIO EQU X'05' I/O INTERRUPT ENTRY @V407508 00126080
- TRCFREE EQU X'06' FREE STORAGE ENTRY @V407508 00126100
- TRCFRET EQU X'07' RETURN STORAGE ENTRY @V407508 00126120
- TRCSCH EQU X'08' ENTER SCHEDULER ENTRY @V407508 00126140
- TRCDROP EQU X'09' QUEUE DROP ENTRY @V407508 00126160
- TRCRUN EQU X'0A' RUN USER ENTRY @V407508 00126180
- TRCSIO EQU X'0B' START I/O ENTRY @V407508 00126200
- TRCUNSTK EQU X'0C' UNSTACK I/O INTERRUPT ENTRY @V407508 00126220
- TRCCSW EQU X'0D' VIRTUAL CSW STORE ENTRY @V407508 00126240
- TRCTIO EQU X'0E' TEST I/O ENTRY @V407508 00126260
- TRCHALT EQU X'0F' HALT DEVICE ENTRY @V407508 00126280
- TRCUNBLK EQU X'10' UNSTACK IOBLOK OR TRQBLOK ENTRY @V407508 00126300
- TRCNCP EQU X'11' NCP BTU ENTRY @V407508 00126320
- TRCLOK EQU X'12' SPIN LOCK ENTRY @V407510 00126340
- TRCSIGP EQU X'13' SIGP ENTRY @V407508 00126360
- TRCCLCH EQU X'14' CLEAR CHANNEL ENTRY 00126365
- SPACE 3 00126380
- * SWTCHVM MACRO EQUATES @V407508 00126400
- SPACE 1 00126420
- SVMSTAY EQU X'01' STACK CPEXBLOK FOR CURRENT PROC @V407508 00126440
- SVMNOUPD EQU X'02' LOCK VM WITH NOUPDT OPTION @V407508 00126460
- SVMUNLOK EQU X'04' ONLY UNLOCK CURRENT VM @V407508 00126480
- EJECT 00126500
- * 00127000
- *** CP370 EQUATE SYMBOLS - CP USAGE 00128000
- * 00129000
- * SYMBOLIC REGISTER EQUATES 00130000
- R0 EQU 0 00131000
- R1 EQU 1 00132000
- R2 EQU 2 00133000
- R3 EQU 3 00134000
- R4 EQU 4 00135000
- R5 EQU 5 00136000
- R6 EQU 6 00137000
- R7 EQU 7 GENERAL 00138000
- R8 EQU 8 REGISTER 00139000
- R9 EQU 9 DEFINITIONS 00140000
- R10 EQU 10 00141000
- R11 EQU 11 00142000
- R12 EQU 12 00143000
- R13 EQU 13 00144000
- R14 EQU 14 00145000
- R15 EQU 15 00146000
- * 00147000
- Y0 EQU 0 FLOATING 00148000
- Y2 EQU 2 POINT 00149000
- Y4 EQU 4 REGISTER 00150000
- Y6 EQU 6 DEFINITIONS 00151000
- * 00152000
- C0 EQU 0 00153000
- C1 EQU 1 00154000
- C2 EQU 2 00155000
- C3 EQU 3 00156000
- C4 EQU 4 00157000
- C5 EQU 5 00158000
- C6 EQU 6 00159000
- C7 EQU 7 CONTROL 00160000
- C8 EQU 8 REGISTER 00161000
- C9 EQU 9 DEFINITIONS 00162000
- C10 EQU 10 00163000
- C11 EQU 11 00164000
- C12 EQU 12 00165000
- C13 EQU 13 00166000
- C14 EQU 14 00167000
- C15 EQU 15 00168000
- EJECT 00169000
- POP PRINT 00170000
- SPACE 00171000
ibm/vm370-lib/copy/equ.copy_src.txt · Last modified: 2023/08/06 13:36 by Site Administrator