|
DataMuseum.dkPresents historical artifacts from the history of: IBM System/3 |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about IBM System/3 Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - metrics - download
Length: 2794 (0xaea)
Types: s3xseg
Names: »S$ETAS«
└─⟦4498c64f7⟧ Bits:30009191 5704-sc2.V05.ccp
└─⟦95ee7795b⟧
└─⟦this⟧ »S$ETAS«
MACRO 00010000
.********************************************************************** 00020000
.* * 00030000
.* NAME: $ETAS * 00040000
.* * 00050000
.* MODIFICATION LEVEL: VERSION 4, MODIFICATION LEVEL 0 OF 5704-SC2 * 00060000
.* * 00070000
.* FUNCTION: * 00080000
.* * 00090000
.* . CCP GENERATION SECOND PASS MACRO INSTRUCTION -- DEFINE * 00100000
.* SYMBOLS FOR TERMINAL ATTRIBUTE SET -- FOR: * 00110000
.* * 00120000
.* . OFFSETS OF FIELDS * 00130000
.* . FOR VALUES WITHIN FIELDS * 00140000
.* * 00150000
.* INPUT OPERANDS: * 00160000
.* * 00170000
.* . NONE * 00180000
.* * 00190000
.********************************************************************** 00200000
$ETAS 00210000
.* 00220000
TEXT 00230000
.* 00240000
*********************************************************************** 00250000
* T E R M I N A L A T T R I B U T E S S E T * 00260000
*********************************************************************** 00270000
SPACE 2 00280000
TASCCP EQU 0 BEGINNING OF TAS ENTRY 00290000
SPACE 1 00300000
* ATTRIBUTES BYTE 1 00310000
SPACE 1 00320000
TASAT1 EQU TASCCP-1+1 ATTRIBUTE BYTE 1 00330000
SPACE 1 00340000
TASTRN EQU BIT0 0-TRANSLATE 00350000
* 1-DON'T TRANSLATE 00360000
TASCAS EQU BIT1 0-FORCE UPPER CASE TRANSLATE 00370000
* 1-DO NOT FORCE UPPER CASE 00380000
TASCNC EQU BIT2 0-ON SWITCHED LINE, ANSWER 00390000
* 1-ON SWITCHED LINE, CALL OUT 00400000
TASAUT EQU BIT3 0-ON SW LINE, MANUAL CONNECT 00410000
* 1-ON SW LINE, AUTO CONNECT 00420000
TASINX EQU BIT4 0-TUBBKF IS BLOCKING FACTOR 00423000
* 1-TUBBKF IS INDEX TO CURRENT TAS 00426000
TASRSV EQU BIT5+BIT6 RESERVED BITS 00430000
TASDFF EQU BIT7 0-DO NOT USE DFF 00440000
* 1-USE DISPLAY FORMAT FACILITY 00450000
SPACE 1 00460000
* ATTRIBUTES BYTE 2 00470000
SPACE 1 00480000
TASAT2 EQU TASAT1+1 ATTRIBUTE BYTE 2 00490000
SPACE 1 00500000
TASREC EQU BIT0 0-DATA FORMAT IS NOT RECORD MODE 00510000
* 1-DATA FORMAT IS RECORD MODE 00520000
TASBLK EQU BIT1 0-DATA FORMAT NOT BLOCK MODE 00530000
* 1-DATA FORMAT IS BLOCK MODE 00540000
TASMSG EQU BIT2 0-DATA FORMAT NOT MESSAGE MODE 00550000
* 1-DATA FORMAT IS MESSAGE MODE 00560000
TASITB EQU BIT3 0-NO ITB SUPPORT 00570000
* 1-ITB SUPPORT 00580000
TASTSP EQU BIT4 0-NON-TRANSPARENCY MODE 00590000
* 1-TRANSPARENCY MODE 00600000
TASVFY EQU BIT5 0-VERIFY EXCHANGE ID 00610000
* 1-NO EXCHANGE ID VERIFICATION 00620000
TASPAN EQU BIT6 0-NO SPANNED RECORD SUPPORT 00630000
* 1-SUPPORT SPANNED RECORDS 00640000
TASVRL EQU BIT7 0-NO VARIABLE LENGTH SUPPORT 00650000
* 1-SUPPORT VARIABLE LENGTH RECORD 00660000
SPACE 1 00670000
* RECORD AND BLOCK LENGTHS 00680000
SPACE 1 00690000
TASRCL EQU TASAT2+2 RECORD LENGTH 00700000
SPACE 1 00710000
TASBKF EQU TASRCL+1 BLOCKING FACTOR 00720000
SPACE 1 00730000
TASLN EQU TASBKF-TASCCP+1 LENGTH OF TERMINAL ATTRIBUTE SET 00740000
SPACE 1 00750000
MEND 00760000