ibm:vm370-lib:macro:equates.macro_src
Table of Contents
EQUATES Source
References
- Fixes Applied : 0
- This Source Date : Saturday, December 9, 1978
- Last Fix ID : [Unmodified]
Source Listing
- EQUATES.MACRO.txt
- MACRO 00001000
- EQUATES 00002000
- PUSH PRINT 00002200
- AIF ('&SYSPARM' NE 'SUP').ACC01 00002400
- PRINT OFF,NOGEN 00002600
- .ACC01 ANOP 00002800
- * 00003000
- *** CMS EQUATE SYMBOLS 00004000
- * 00005000
- SPACE 2 00006000
- * BITS DEFINED IN THE PROGRAM STATUS WORD (PSW) 00007000
- SPACE 00008000
- CHAN0 EQU X'80' - BIT 00 - CHANNEL 0 MASK 00009000
- CHAN1 EQU X'40' - BIT 01 - CHANNEL 1 MASK 00010000
- CHAN2 EQU X'20' - BIT 02 - CHANNEL 2 MASK 00011000
- CHAN3 EQU X'10' - BIT 03 - CHANNEL 3 MASK 00012000
- CHAN4 EQU X'08' - BIT 04 - CHANNEL 4 MASK 00013000
- CHAN5 EQU X'04' - BIT 05 - CHANNEL 5 MASK 00014000
- CHANM EQU X'02' - BIT 06 - INPUT/OUTPUT MASK 00015000
- EXTM EQU X'01' - BIT 07 - EXTERNAL MASK 00016000
- SPACE 00017000
- ECMM EQU X'08' - BIT 12 - EXTENDED CONTROL MODE MASK 00018000
- MCKM EQU X'04' - BIT 13 - MACHINE CHECK MASK 00019000
- WAIT EQU X'02' - BIT 14 - WAIT STATE MASK 00020000
- PROB EQU X'01' - BIT 15 - PROBLEM STATE MASK 00021000
- SPACE 00022000
- FOFM EQU X'08' - BIT 36 - FIXED-POINT OVERFLOW MASK 00023000
- DOFM EQU X'04' - BIT 37 - DECIMAL OVERFLOW MASK 00024000
- EUFM EQU X'02' - BIT 38 - EXPONENT UNDERFLOW MASK 00025000
- SIGM EQU X'01' - BIT 39 - SIGNIFICANCE MASK 00026000
- SPACE 2 00027000
- * BITS DEFINED IN THE CHANNEL STATUS WORD (CSW) 00028000
- SPACE 00029000
- ATTN EQU X'80' - BIT 32 - ATTENTION 00030000
- SM EQU X'40' - BIT 33 - STATUS MODIFIER 00031000
- CUE EQU X'20' - BIT 34 - CONTROL UNIT END 00032000
- BUSY EQU X'10' - BIT 35 - BUSY 00033000
- CE EQU X'08' - BIT 36 - CHANNEL END 00034000
- DE EQU X'04' - BIT 37 - DEVICE END 00035000
- UC EQU X'02' - BIT 38 - UNIT CHECK 00036000
- UE EQU X'01' - BIT 39 - UNIT EXCEPTION 00037000
- SPACE 00038000
- PCI EQU X'80' - BIT 40 - PROGRAM-CONTROLLED INTERRUPTION 00039000
- ICL EQU X'40' - BIT 41 - INCORRECT LENGTH 00040000
- PGC EQU X'20' - BIT 42 - PROGRAM CHECK 00041000
- PTC EQU X'10' - BIT 43 - PROTECTION CHECK 00042000
- CDC EQU X'08' - BIT 44 - CHANNEL DATA CHECK 00043000
- CCC EQU X'04' - BIT 45 - CHANNEL CONTROL CHECK 00044000
- ICC EQU X'02' - BIT 46 - INTERFACE CONTROL CHECK 00045000
- CHC EQU X'01' - BIT 47 - CHAINING CHECK 00046000
- EJECT 00047000
- * 00048000
- *** CMS EQUATE SYMBOLS 00049000
- * 00050000
- SPACE 2 00051000
- * COMMON CHANNEL COMMAND CODES 00052000
- SPACE 00053000
- WRITE EQU X'01' - WRITE 00054000
- READ EQU X'02' - READ 00055000
- NOP EQU X'03' - NO OPERATION 00056000
- SENSE EQU X'04' - SENSE 00057000
- WRDATA EQU X'05' - WRITE DATA 00058000
- RDDATA EQU X'06' - READ DATA 00059000
- SEEK EQU X'07' - SEEK 00060000
- TIC EQU X'08' - TRANSFER IN CHANNEL 00061000
- WRITE1 EQU X'09' - WRITE AND SPACE 1 00062000
- RDCONS EQU X'0A' - READ FROM CONSOLE 00063000
- SETSEC EQU X'23' - SET SECTOR 00064000
- SEARCH EQU X'31' - SEARCH ID EQUAL 00065000
- SPACE 2 00066000
- * BITS DEVINED IN A CHANNEL COMMAND WORD (CCW) 00067000
- SPACE 00068000
- CD EQU X'80' - BIT 32 - CHAIN DATA 00069000
- CC EQU X'40' - BIT 33 - COMMAND CHAIN 00070000
- SILI EQU X'20' - BIT 34 - SUPPRESS INCORRECT LENGTH 00071000
- SKIP EQU X'10' - BIT 35 - SUPPRESS DATA TRANSFER 00072000
- PCIF EQU X'08' - BIT 36 - CAUSE PROGRAM CONTROL INTERRUPT 00073000
- IDA EQU X'04' - BIT 37 - INDIRECT DATA ADDRESS 00074000
- EJECT 00075000
- POP PRINT 00075100
- MEND 00076000
ibm/vm370-lib/macro/equates.macro_src.txt · Last modified: 2023/08/06 13:38 by Site Administrator