Seq # *Modification Id* Act
----------------------------+
00001 M00S00001.comafet +++|
00002 M00S00002.comafet +++|# COMAFET - DEFINITION OF *FET* FIELDS. #
00003 M00S00003.comafet +++| CONTROL NOLIST;
00004 M00S00004.comafet +++| CONTROL IFEQ LISTCON,1;
00005 M00S00005.comafet +++| CONTROL LIST;
00006 M00S00006.comafet +++| CONTROL FI;
00007 M00S00007.comafet +++| BEGIN # COMAFET #
00008 M00S00008.comafet +++|
00009 M00S00009.comafet +++|#
00010 M00S00010.comafet +++|*** COMAFET - CONTAINS BASED ARRAY WITH DEFINITION OF *FET* FIELDS.
00011 M00S00011.comafet +++|*
| Line S00001 Modification History |
M01 (Added by) | 281l803 |
Seq # *Modification Id* Act
----------------------------+
00012 M01S00001.281l803 +++|* COPYRIGHT CONTROL DATA SYSTEMS INC. 1992.
00013 M01S00002.281l803 +++|*
00014 M00S00012.comafet +++|* *COMAFET* CONTAINS THE *FET* DESCRIPTION WHICH IS USED BY
00015 M00S00013.comafet +++|* *ZSETFET* IN INITIALIZING A *FET* FOR A FILE. FIELD NAMES
00016 M00S00014.comafet +++|* BEGINNING WITH *FET$MSF* DEFINE FIELDS IN THE *MSF* *FET* ONLY.
00017 M00S00015.comafet +++|#
00018 M00S00016.comafet +++|
00019 M00S00017.comafet +++| COMMON AFETCOM;
00020 M00S00018.comafet +++| BEGIN # AFETCOM DESCRIPTION #
00021 M00S00019.comafet +++|
00022 M00S00020.comafet +++| BASED
00023 M00S00021.comafet +++| ARRAY FETSET S(RFETL); # *FET* DEFINITION #
00024 M00S00022.comafet +++| BEGIN
00025 M00S00023.comafet +++| ITEM FET$LFN C(00,00,07); # LOGICAL FILE NAME #
00026 M00S00024.comafet +++| ITEM FET$LN U(00,42,04); # LEVEL NUMBER #
00027 M00S00025.comafet +++| ITEM FET$AT U(00,46,04); # ABNORMAL TERMINATION CODES #
00028 M00S00026.comafet +++| ITEM FET$CODE U(00,50,10); # REQUEST/RETURN CODE #
00029 M00S00027.comafet +++| ITEM FET$EOI B(00,50,01); # END-OF-INFORMATION BIT #
00030 M00S00028.comafet +++| ITEM FET$LOCK B(00,59,01); # *FET* INTERLOCK BIT #
00031 M00S00029.comafet +++| ITEM FET$DT U(01,00,12); # DEVICE TYPE #
00032 M00S00030.comafet +++| ITEM FET$R B(01,12,01); # RANDOM ACCESS BIT #
00033 M00S00031.comafet +++| ITEM FET$UP B(01,14,01); # USER PROCESSING BIT #
00034 M00S00032.comafet +++| ITEM FET$EP B(01,15,01); # ERROR PROCESSING BIT #
00035 M00S00033.comafet +++| ITEM FET$L U(01,36,06); # *FET* LENGTH (OVER 5 WORDS) #
00036 M00S00034.comafet +++| ITEM FET$FRST U(01,42,18); # *FWA* OF *CIO* BUFFER #
00037 M00S00035.comafet +++| ITEM FET$IN U(02,42,18); # IN POINTER FOR *CIO* BUFFER #
00038 M00S00036.comafet +++| ITEM FET$OUT U(03,42,18); # OUT POINTER FOR *CIO* BUFFER
00039 M00S00037.comafet +++| #
00040 M00S00038.comafet +++| ITEM FET$MSFPRU U(04,00,24); # NEXT *PRU* TO WRITE TO STREAM
00041 M00S00039.comafet +++| #
00042 M00S00040.comafet +++| ITEM FET$FNTP U(04,00,12); # *FNT* POINTER #
00043 M00S00041.comafet +++| ITEM FET$PRU U(04,24,18); # PHYSICAL RECORD UNIT SIZE #
00044 M00S00042.comafet +++| ITEM FET$MSFSAF B(04,35,01); # *MSF* STREAMING ACTIVE FLAG #
00045 M00S00043.comafet +++| ITEM FET$MSFR1 U(04,36,06); # RESERVED FOR CDC #
00046 M00S00044.comafet +++| ITEM FET$LIM U(04,42,18); # *LWA*+1 OF *CIO* BUFFER #
00047 M00S00045.comafet +++| ITEM FET$FWRK U(05,12,18); # *FWA* OF WORKING STORAGE #
00048 M00S00046.comafet +++| ITEM FET$LWRK U(05,42,18); # *LWA*+1 OF WORKING STORAGE #
00049 M00S00047.comafet +++| ITEM FET$LA U(05,42,18); # LIST ADDRESS #
00050 M00S00048.comafet +++| ITEM FET$CRI U(06,00,30); # CURRENT RANDOM INDEX #
00051 M00S00049.comafet +++| ITEM FET$W B(06,30,01); # RANDOM REWRITE INDEX #
00052 M00S00050.comafet +++| ITEM FET$RR U(06,31,29); # *RSA* FOR RANDOM *I/O*
00053 M00S00051.comafet +++| REQUEST #
00054 M00S00052.comafet +++| ITEM FET$DEC U(06,31,29); # DETAIL ERROR CODE #
00055 M00S00053.comafet +++| ITEM FET$IL U(07,24,18); # INDEX LENGTH #
00056 M00S00054.comafet +++| ITEM FET$IF U(07,42,18); # *FWA* OF INDEX BUFFER #
00057 M00S00055.comafet +++| END
00058 M00S00056.comafet +++|
00059 M00S00057.comafet +++| END # AFETCOM DESCRIPTION #
00060 M00S00058.comafet +++|
00061 M00S00059.comafet +++| END # COMAFET #
00062 M00S00060.comafet +++|
00063 M00S00061.comafet +++| CONTROL LIST;