|
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: 3556 (0xde4)
Types: s3xseg
Names: »S$ESIT«
└─⟦d0bc1a931⟧ Bits:30009189 5704-sc1.V08.ccp
└─⟦64693a1c9⟧
└─⟦this⟧ »S$ESIT«
MACRO 00010000
.********************************************************************** 00020000
.* STATUS: RELEASE 5 * 00030000
.* * 00040000
.* NAME: $ESIT * 00050000
.* * 00060000
.* FUNCTION: DEFINE THE LABELS NEEDED TO REFERENCE THE 'SYSTEM * 00070000
.* INFORMATION TABLE' IN $CCPFILE. * 00080000
.* * 00090000
.* INPUT OPERANDS: NONE * 00100000
.********************************************************************** 00110000
$ESIT 00120000
TEXT 00130000
*********************************************************************** 00140000
* S Y S T E M I N F O R M A T I O N T A B L E O F F S E T S * 00150000
*********************************************************************** 00160000
SITCCP EQU 0 00170000
SITMXP EQU SITCCP-1+1 MAX NO. CONCURRENT USER PROGRAMS 00180000
SITMUA EQU SITMXP+1 MIN NO. 256-BYTE BLOCKS 00190000
* FOR CCP USER PROGRAM AREA 00200000
SITMTB EQU SITMUA+2 MIN NO. BYTES, TP HOLD BUFR AREA 00210000
SITCPW EQU SITMTB+6 PASSWORD IF CCP PASSWORD USED, 00220000
* OTHERWISE X'40' 00230000
SPACE 00240000
SITDED EQU SITCPW+1 DEVICES DEDICATED TO CCP 00250000
SITPRT EQU BIT0 1=PRINTER DEDICATED 00260000
SIT501 EQU BIT1 1=2501 DEDICATED READER 00270000
SITM1R EQU BIT2 1=MFCU1/MFCM1 DEDICATED READER 00280000
SITM1P EQU BIT3 1=MFCU1/MFCM1 DEDICATED PUNCH 00290000
SITM1C EQU BIT4 1=MFCU1/MFCM1 DEDICATED COMBINED 00300000
SITM2R EQU BIT5 1=MFCU2/MFCM2 DEDICATED READER 00310000
SITM2P EQU BIT6 1=MFCU2/MFCM2 DEDICATED PUNCH 00320000
SITM2C EQU BIT7 1=MFCU2/MFCM2 DEDICATED COMBINED 00330000
SPACE 00340000
SITDD2 EQU SITDED+1 CONTINUATION OF SITDED. 00350000
SIT14R EQU BIT0 1=1442 DEDICATED READER 00360000
SIT14P EQU BIT1 1=1442 DEDICATED PUNCH 00370000
SIT14C EQU BIT2 1=1442 DEDICATED COMBINED. 00380000
SIT37R EQU BIT5 1=3741 DEDICATED INPUT. 00390000
SIT37P EQU BIT6 1=3741 DEDICATED OUTPUT. 00400000
SPACE 00410000
SITFLG EQU SITDD2+1 FLAG BYTE 00420000
SITDFU EQU BIT0 PACK FOR DISPLAY FORMATS 00430000
* 0=PROGRAM PACK 00440000
* 1=SYSTEM PACK 00450000
SITFMT EQU BIT1 1=DFF SUPPORTED IN THIS SET 00460000
* 0=DFF NOT SUPPORTED IN THIS SET 00470000
SITDFF EQU BIT2 1=ALL TERMINAL ATTRIBUTES DFF 00480000
* 0=NON-DFF TERMINAL ATTRIB. EXIST 00490000
SPACE 00500000
SITRV2 EQU SITFLG+1 RESERVED 00510000
SITFSQ EQU SITRV2+1 NO. FILE SECTOR ENQUEUE BLOCKS 00520000
SITRQL EQU SITFSQ+1 MAX LENGTH PGM RQST + DATA 00530000
SITNQL EQU SITRQL+1 MAX LENGTH NON PGM RQST COMMAND 00540000
SITMCL EQU SITNQL+2 MAX TERMINAL COMMAND LENGTH 00550000
SITTAS EQU SITMCL+1 HIGHEST TAS ID VALUE 00560000
SITSTT EQU SITTAS+1 NO. OF STT ENTRIES 00570000
SITNPC EQU SITSTT+1 NO. OF PCT ENTRIES 00580000
SITLPC EQU SITNPC+1 LENGTH OF LONGEST PCT ENTRY 00590000
SITSID EQU SITLPC+1 SET ID OF THIS SET 00600000
SITSYM EQU SITSID+1 NUMBER OF SYMFILES IN SET 00610000
SITTRM EQU SITSYM+1 NUMBER OF COMMAND TRMNLS IN SET 00620000
SITRUF EQU SITTRM+2 READ UNDER FORMAT - LENGTH 00630000
SITPOL EQU SITRUF+4 POLL TIME IN UNITS 00640000
* 300 UNITS = 1 SECOND. 00650000
* 00000001 = 'NO' 00660000
* 00000000 = KEYWORD NOT GIVEN. 00670000
SITWIT EQU SITPOL+2 WAIT TIME IN UNITS 00680000
* 300 UNITS = 1 SECOND. 00690000
* 0001 = 'NO' 00700000
* 0000 = KEYWORD NOT GIVEN. 00710000
SPACE 00720000
SITRV1 EQU SITWIT+4 RESERVED 00730000
SPACE 00740000
SITEND EQU SITRV1 END OF SIT 00750000
SITLEN EQU SITEND+1 LENGTH OF SIT 00760000
SITDAT EQU SITRV1+6 SYSTEM DATE AT TIME OF 00762000
* ASSIGNMENT SET BUILD 00764000
SITTIM EQU SITDAT+4 SYSTEM TIME(IF SUPPORTED) AT 00766000
* ASSIGNMENT SET BUILD 00768000
MEND 00770000