User Tools

Site Tools


cdc:nos2.source:opl.opl871:common:comafet

Common COMAFET

Library Member Format: MODIFY

Source

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;
cdc/nos2.source/opl.opl871/common/comafet.txt ยท Last modified: (external edit)