User Tools

Site Tools


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

Common COMCLNI

Library Member Format: MODIFY

Source

Seq #  *Modification Id* Act 
----------------------------+
00001  M00S00001.comclni +++|          CTEXT  COMCLNI - LOAD NETWORK INTERFACE.
00002  M00S00002.comclni +++|          BASE   D
00003  M00S00003.comclni +++|          IF     -DEF,QUAL$,1
00004  M00S00004.comclni +++|          QUAL   COMCLNI
Line S00005 Modification History
M01 (Removed by) 281l803
Seq #  *Modification Id* Act 
----------------------------+
00005  M01S00005.281l803 ---|*         COMMENT COPYRIGHT CONTROL DATA CORPORTATION, 1982.
Line S00001 Modification History
M01 (Added by) 281l803
Seq #  *Modification Id* Act 
----------------------------+
00006  M01S00001.281l803 +++|*         COMMENT  COPYRIGHT CONTROL DATA SYSTEMS INC.  1992.
00007  M00S00006.comclni +++| COMCLNI  SPACE  4,10
00008  M00S00007.comclni +++|***       COMCLNI - LOAD NETWORK INTERFACE.
00009  M00S00008.comclni +++|*
00010  M00S00009.comclni +++|*         C.A. WENDT         82/03/05.
00011  M00S00010.comclni +++| COMCLNI  SPACE  4,10
00012  M00S00011.comclni +++|***       *CONCLNI* CONSISTS OF ROUTINES AND TABLES USED TO
00013  M00S00012.comclni +++|*         LOAD THE NETWORK INTERFACE.  IT IS EXECUTED ONLY IF
00014  M00S00013.comclni +++|*         NETWORK TERMINALS ARE PRESENT.
00015  M00S00014.comclni +++| LNI      SPACE  4,10
00016  M00S00015.comclni +++|**        LNI - LOAD NETWORK INTERFACE.
00017  M00S00016.comclni +++|*
00018  M00S00017.comclni +++|*         *LNI* LOADS THE NETWORK INTERFACE, *IAFEX4*, AND
00019  M00S00018.comclni +++|*         APPROPRIATE TABLES DURING *IAF* INITIALIZATION.
00020  M00S00019.comclni +++|*
00021  M00S00020.comclni +++|*         CALLS  CTP, LNA, MTT, PNT.
00022  M00S00021.comclni +++|*
00023  M00S00022.comclni +++|*         MACROS MOVE, OVERLAY.
00024  M00S00023.comclni +++|*
00025  M00S00024.comclni +++|*         XREF   COMCLOD, COMCMVE.
00026  M00S00025.comclni +++|
00027  M00S00026.comclni +++|
00028  M00S00027.comclni +++| LNI      SUBR               ENTRY/EXIT
00029  M00S00028.comclni +++|          OVERLAY (=6LIAFEX4),101B,S  LOAD *IAFEX4* OVERLAY
00030  M00S00029.comclni +++|          MOVE   /IAFEX4/TINSTL,/IAFEX4/TINST,TINS2
00031  M00S00030.comclni +++|          RJ     CTP         CHECK FOR AIP TRACE PARAMETER
00032  M00S00031.comclni +++|          RJ     LNA         LOAD NETWORK AIP SUBROUTINES
00033  M00S00032.comclni +++|          RJ     PNT         PRESET NETWORK TERMINAL POINTERS
00034  M00S00033.comclni +++|          RJ     MTT         MODIFY TRANSLATION TABLE
00035  M00S00034.comclni +++|          EQ     LNIX        RETURN
00036  M00S00035.comclni +++|
00037  M00S00036.comclni +++| CTP      SPACE  4,20
00038  M00S00037.comclni +++|**        CTP - CHECK FOR AIP TRACE PARAMETER.
00039  M00S00038.comclni +++|*
00040  M00S00039.comclni +++|*         ENTRY  (ATPV) = VALUE ENTERED FOR *T* PARAMETER, IF ANY.
00041  M00S00040.comclni +++|*                       .EQ. *+*, TRACE IS NOT ACTIVE.
00042  M00S00041.comclni +++|*                       .EQ. 0, USE DEFAULT MESSAGE COUNT.
00043  M00S00042.comclni +++|*
00044  M00S00043.comclni +++|*         EXIT   (/IAFEX4/ATMC) = MESSAGE COUNT USED TO CONTROL
00045  M00S00044.comclni +++|*                                 PROCESSING OF TRACE OUTPUT FILE.
00046  M00S00045.comclni +++|*                               = ZERO, IF TRACE IS NOT SELECTED.
00047  M00S00046.comclni +++|*                               = NEGATIVE, IF PROCESS TRACE FILE
00048  M00S00047.comclni +++|*                                 AT IAF TERMINATION ONLY.
00049  M00S00048.comclni +++|*                TO *ABT* IF ERROR IN PARAMETER.
00050  M00S00049.comclni +++|*                (X2) = ERROR MESSAGE.
00051  M00S00050.comclni +++|*
00052  M00S00051.comclni +++|*         USES   X - 1, 2, 3, 4, 5, 6.
00053  M00S00052.comclni +++|*                A - 1, 5, 6.
00054  M00S00053.comclni +++|*                B - 7.
00055  M00S00054.comclni +++|*
00056  M00S00055.comclni +++|*         CALLS  DXB.
00057  M00S00056.comclni +++|
00058  M00S00057.comclni +++|
00059  M00S00058.comclni +++| CTP1     SA6    /IAFEX4/ATMC SET MESSAGE COUNT
00060  M00S00059.comclni +++|
00061  M00S00060.comclni +++| CTP      SUBR               ENTRY/EXIT
00062  M00S00061.comclni +++|          SA1    ATPV        GET ARGUMENT
00063  M00S00062.comclni +++|          SX6    DMCT        SET DEFAULT MESSAGE COUNT
00064  M00S00063.comclni +++|          SX4    X1-1R+
00065  M00S00064.comclni +++|          ZR     X1,CTP1     IF DEFAULT MESSAGE COUNT SELECTED
00066  M00S00065.comclni +++|          SX6    B0+         ASSUME TRACE NOT SELECTED
00067  M00S00066.comclni +++|          ZR     X4,CTP1     IF TRACE IS NOT SELECTED
00068  M00S00067.comclni +++|
00069  M00S00068.comclni +++|*         PROCESS *T=NNNNNNN*.
00070  M00S00069.comclni +++|
00071  M00S00070.comclni +++|          LX1    6
00072  M00S00071.comclni +++|          SX6    -B1         SET MESSAGE COUNT NEGATIVE
00073  M00S00072.comclni +++|          SX3    X1-1R*
00074  M00S00073.comclni +++|          ZR     X3,CTP1     IF T=* OPTION SELECTED
00075  M00S00074.comclni +++|          LX1    -6
00076  M00S00075.comclni +++|          SB7    B1+         INDICATE DECIMAL BASE FOR CONVERSION
00077  M00S00076.comclni +++|          BX5    X1          VALUE TO BE CONVERTED
00078  M00S00077.comclni +++|          RJ     DXB         DISPLAY CODE TO BINARY CONVERSION
00079  M00S00078.comclni +++|          SX2    =C* ERROR IN IAFEX PARAMETER - T.*
00080  M00S00079.comclni +++|          NZ     X4,ABT      IF ERROR IN CONVERSION
00081  M00S00080.comclni +++|          ZR     X6,CTP1     IF TRACE IS NOT SELECTED
00082  M00S00081.comclni +++|          SX4    X6-MNCT     CHECK MESSAGE COUNT
00083  M00S00082.comclni +++|          NG     X4,ABT      IF SELECTED VALUE TOO LOW
00084  M00S00083.comclni +++|          EQ     CTP1        RETURN
00085  M00S00084.comclni +++| LNA      SPACE  4,25
00086  M00S00085.comclni +++|**        LNA - LOAD NETWORK AIP RELOCATABLE SUBROUTINES.
00087  M00S00086.comclni +++|*
00088  M00S00087.comclni +++|*         1.  LOADS RELOCATABLE AIP SUBROUTINES.
00089  M00S00088.comclni +++|*         2.  LINKS AIP ENTRY POINTS TO NETWORK LINKAGE SUB-
00090  M00S00089.comclni +++|*             ROUTINES.
00091  M00S00090.comclni +++|*
00092  M00S00091.comclni +++|*         ENTRY  (/IAFEX4/ATMC) = MESSAGE COUNT USED TO CONTROL
00093  M00S00092.comclni +++|*                                 PROCESSING OF TRACE OUTPUT FILE.
00094  M00S00093.comclni +++|*                               = ZERO, IF TRACE IS NOT SELECTED.
00095  M00S00094.comclni +++|*                               = NEGATIVE, IF PROCESS TRACE FILE
00096  M00S00095.comclni +++|*                                 AT IAF TERMINATION ONLY.
00097  M00S00096.comclni +++|*
00098  M00S00097.comclni +++|*         EXIT   (LWAA) = LWA+1 OF COMPLETED AIP LOAD.
00099  M00S00098.comclni +++|*                TO *ABT* IF AIP LOAD ERROR.
00100  M00S00099.comclni +++|*
00101  M00S00100.comclni +++|*         USES   X - 1, 2, 4, 5, 6.
00102  M00S00101.comclni +++|*                A - 1, 2, 5, 6, 7.
00103  M00S00102.comclni +++|*
00104  M00S00103.comclni +++|*         CALLS  LOADER=, SYS=.
00105  M00S00104.comclni +++|*
00106  M00S00105.comclni +++|*         MACROS LOADER, RETURN.
00107  M00S00106.comclni +++|
00108  M00S00107.comclni +++|
00109  M00S00108.comclni +++| LNA      SUBR               ENTRY/EXIT
00110  M00S00109.comclni +++|
00111  M00S00110.comclni +++|*         LOAD RELOCATABLE AIP SUBROUTINES FROM SYSTEM LIBRARY.
00112  M00S00111.comclni +++|
00113  M00S00112.comclni +++|          SA1    /IAFEX4/ATMC GET AIP TRACE MESSAGE COUNT
00114  M00S00113.comclni +++|          ZR     X1,LNA1     IF TRACE IS NOT ACTIVE
00115  M00S00114.comclni +++|          LOADER TLRT        LOAD TRACE VERSION OF AIP
00116  M00S00115.comclni +++|          SA5    TLKT        ENTRY POINT LINK TABLE FOR TRACE
00117  M00S00116.comclni +++|          EQ     LNA2        CONTINUE PROCESSING
00118  M00S00117.comclni +++|
00119  M00S00118.comclni +++| LNA1     LOADER TLDR        LOAD NON-TRACE VERSION OF AIP
00120  M00S00119.comclni +++|          SA5    TLCK        ENTRY POINT LINK TABLE
00121  M00S00120.comclni +++| LNA2     SX2    =C* AIP LOAD ERROR.*
00122  M00S00121.comclni +++|          NG     X6,ABT      IF FATAL LOAD ERROR
00123  M00S00122.comclni +++|          SA7    LWAA        STORE LWA+1 OF COMPLETED LOAD
00124  M00S00123.comclni +++|          RETURN L           RETURN LOADER PARAMETER FILE
00125  M00S00124.comclni +++|          MX4    -18         SET INSTRUCTION MASK
00126  M00S00125.comclni +++|
00127  M00S00126.comclni +++|*         PLUG ENTRY POINT ADDRESSES INTO AIP LINK SUBROUTINES.
00128  M00S00127.comclni +++|
00129  M00S00128.comclni +++| LNA3     ZR     X5,LNAX     IF END OF TABLE
00130  M00S00129.comclni +++|          SA1    X5+B1       READ LINK INSTRUCTION
00131  M00S00130.comclni +++|          AX5    30          READ ENTRY POINT ADDRESS
00132  M00S00131.comclni +++|          SA2    X5+B1
00133  M00S00132.comclni +++|          BX1    X4*X1       MASK LINK INSTRUCTION
00134  M00S00133.comclni +++|          BX2    -X4*X2
00135  M00S00134.comclni +++|          BX6    X1+X2       INSERT ENTRY POINT
00136  M00S00135.comclni +++|          SA6    A1          REWRITE LINK INSTRUCTION
00137  M00S00136.comclni +++|          SA5    A5+B1       READ NEXT TABLE ENTRY
00138  M00S00137.comclni +++|          NZ     X2,LNA3     IF NOT NULL ENTRY POINT
00139  M00S00138.comclni +++|          SX2    =C* MISSING AIP ENTRY POINT.*
00140  M00S00139.comclni +++|          EQ     ABT         ABORT INITIALIZATION
00141  M00S00140.comclni +++| MTT      SPACE  4,20
00142  M00S00141.comclni +++|**        MTT - MODIFY TRANSLATION TABLE.
00143  M00S00142.comclni +++|*
00144  M00S00143.comclni +++|*         MTT MODIFIES THE COMMON DECK *COMTVDT* TRANSLATION
00145  M00S00144.comclni +++|*         TABLE TO CORRESPOND TO EITHER 64 OR 63 CHARACTER SET
00146  M00S00145.comclni +++|*         DEPENDING UPON INSTALLATION SELECTION.
00147  M00S00146.comclni +++|*
00148  M00S00147.comclni +++|*         ENTRY  (CSMR) = 64 CHARACTER SET IF BIT 59 SET.
00149  M00S00148.comclni +++|*                TVXD  = FWA OF TRANSLATION TABLE.
00150  M00S00149.comclni +++|*                TVXD63 = 63 CHARACTER SET MODIFICATION TABLE.
00151  M00S00150.comclni +++|*                TVXD64 = 64 CHARACTER SET MODIFICATION TABLE.
00152  M00S00151.comclni +++|*
00153  M00S00152.comclni +++|*         EXIT   TRANSLATION TABLE MODIFIED.
00154  M00S00153.comclni +++|*
00155  M00S00154.comclni +++|*         USES   A - 1, 2, 6.
00156  M00S00155.comclni +++|*                X - 1, 2, 6.
00157  M00S00156.comclni +++|*                B - 6.
00158  M00S00157.comclni +++|
00159  M00S00158.comclni +++|
00160  M00S00159.comclni +++| MTT      SUBR               ENTRY/EXIT
00161  M00S00160.comclni +++|          SA1    CSMR        READ INSTALLATION OPTION
00162  M00S00161.comclni +++|          SB6    /IAFEX4/TVXD64  ASSUME 64 CHARACTER SET
00163  M00S00162.comclni +++|          NG     X1,MTT1     IF 64 CHARACTER SET
00164  M00S00163.comclni +++|          SB6    /IAFEX4/TVXD63  SET 63 CHARACTER SET
00165  M00S00164.comclni +++| MTT1     SA1    B6+         READ MODIFICATION TABLE ENTRY
00166  M00S00165.comclni +++|          NG     X1,MTTX     IF END OF TABLE, RETURN
00167  M00S00166.comclni +++|          SA2    A1+B1       READ SUBSTITUTION
00168  M00S00167.comclni +++|          SB6    B6+2
00169  M00S00168.comclni +++|          BX6    X2          STORE SUBSTITUTION
00170  M00S00169.comclni +++|          SA6    /IAFEX4/TVXD+X1
00171  M00S00170.comclni +++|          EQ     MTT1        CONTINUE
00172  M00S00171.comclni +++| PNT      SPACE  4,30
00173  M00S00172.comclni +++|**        PNT - PRESET NETWORK TERMINAL POINTERS.
00174  M00S00173.comclni +++|*
00175  M00S00174.comclni +++|*         PNT ADDS AN ENTRY TO THE *VDRL* TABLE FOR NETWORK TERMINALS.
00176  M00S00175.comclni +++|*         THE DRIVER NAME AND TERMINAL COUNT ARE SET INTO THIS *VDRL*
00177  M00S00176.comclni +++|*         WORD.  NETWORK TERMINALS POINTERS AND COUNTERS ARE ALSO
00178  M00S00177.comclni +++|*         INITIALIZED.
00179  M00S00178.comclni +++|*
00180  M00S00179.comclni +++|*         ENTRY  (VNTP) = NETWORK TERMINAL COUNT.
00181  M00S00180.comclni +++|*
00182  M00S00181.comclni +++|*         EXIT   (VNTP) = 36/ FIRST, 24/LAST NETWORK TERMINAL.
00183  M00S00182.comclni +++|*                (VDRL + N) = DRIVER POINTER WORD.
00184  M00S00183.comclni +++|*                   11/0, 1/IL, 24/DN, 12/TC, 12/0.
00185  M00S00184.comclni +++|*                      N  = NETWORK DRIVER ORDINAL.
00186  M00S00185.comclni +++|*                      IL = INTERLOCK BIT.
00187  M00S00186.comclni +++|*                      DN = DRIVER NAME.
00188  M00S00187.comclni +++|*                      TC = TERMINAL COUNT.
00189  M00S00188.comclni +++|*                (NDRO) = NETWORK DRIVER ORDINAL.
00190  M00S00189.comclni +++|*                (/IAFEX4/NSPA) = NETWORK STACK POINTER ADDRESS.
00191  M00S00190.comclni +++|*
00192  M00S00191.comclni +++|*                TO *ABT* IF MULTIPLEXER TABLE OVERFLOW.
00193  M00S00192.comclni +++|*
00194  M00S00193.comclni +++|*         USES   A - 1, 2, 3, 6, 7.
00195  M00S00194.comclni +++|*                X - 1, 2, 3, 4, 6, 7.
00196  M00S00195.comclni +++|*                B - 6.
00197  M00S00196.comclni +++|*
00198  M00S00197.comclni +++|*         CALLS  ABT.
00199  M00S00198.comclni +++|
00200  M00S00199.comclni +++|
00201  M00S00200.comclni +++| PNT      SUBR               ENTRY/EXIT
00202  M00S00201.comclni +++|
00203  M00S00202.comclni +++|*         INITIALIZE NETWORK DRIVER STACK POINTER WORD.
00204  M00S00203.comclni +++|
00205  M00S00204.comclni +++|          SA3    VNTP        GET NETWORK TERMINAL COUNT
00206  M00S00205.comclni +++|          SB6    B0          CLEAR TABLE INDEX
00207  M00S00206.comclni +++|          MX4    -12
00208  M00S00207.comclni +++|          SX2    VPST        INITIALIZE ACCUMULATOR
00209  M00S00208.comclni +++|          SX6    X3
00210  M00S00209.comclni +++|          LX6    12
00211  M00S00210.comclni +++|
00212  M00S00211.comclni +++|*         COUNT LIVE MUX TERMINALS.
00213  M00S00212.comclni +++|
00214  M00S00213.comclni +++| PNT1     SA1    VDRL+B6     READ DRIVER TABLE WORD
00215  M00S00214.comclni +++|          NG     X1,PNT2     IF END OF DRIVER POINTER WORDS
00216  M00S00215.comclni +++|          AX1    12          ADD MUX TERMINAL COUNT
00217  M00S00216.comclni +++|          BX1    -X4*X1
00218  M00S00217.comclni +++|          IX2    X2+X1
00219  M00S00218.comclni +++|          SB6    B6+B1       ADVANCE TABLE POINTER
00220  M00S00219.comclni +++|          EQ     PNT1        LOOP FOR NEXT DRIVER
00221  M00S00220.comclni +++|
00222  M00S00221.comclni +++|*         ADD NETWORK DRIVER POINTER TO VDRL TABLE.
00223  M00S00222.comclni +++|
00224  M00S00223.comclni +++| PNT2     SX7    3RIAF       SET DRIVER NAME
00225  M00S00224.comclni +++|          LX7    24
00226  M00S00225.comclni +++|          BX6    X6+X7       INSERT NETWORK TERMINAL COUNT
00227  M00S00226.comclni +++|          SA6    A1          ADD ENTRY TO *VDRL* TABLE
00228  M00S00227.comclni +++|          SX7    A1          SET STACK POINTER ADDRESS
00229  M00S00228.comclni +++|          SA7    /IAFEX4/NSPA  STORE STACK POINTER ADDRESS
00230  M00S00229.comclni +++|          SX7    X7-VDRL     SET NETWORK DRIVER ORDINAL
00231  M00S00230.comclni +++|          SA7    NDRO
00232  M00S00231.comclni +++|
00233  M00S00232.comclni +++|*         SET NETWORK TERMINAL POINTER WORD.
00234  M00S00233.comclni +++|
00235  M00S00234.comclni +++|          IX6    X2+X3       UPPER NETWORK TERMINAL BOUND
00236  M00S00235.comclni +++|          SX6    X6-1
00237  M00S00236.comclni +++|          LX2    24          LOWER NETWORK TERMINAL BOUND
00238  M00S00237.comclni +++|          BX6    X6+X2       MERGE BOUNDS
00239  M00S00238.comclni +++|          SA6    A3          STORE VNTP
00240  M00S00239.comclni +++|
00241  M00S00240.comclni +++|*         SET UP NETWORK TIMEOUT MESSAGE.
00242  M00S00241.comclni +++|
00243  M00S00242.comclni +++|          SX1    NTODL
00244  M00S00243.comclni +++|          RJ     CDD         TRANSLATE TO DISPLAY CODE
00245  M00S00244.comclni +++|          SA2    /IAFEX4/DMTOS
00246  M00S00245.comclni +++|          MX1    24
00247  M00S00246.comclni +++|          LX4    54
00248  M00S00247.comclni +++|          BX6    X1*X4
00249  M00S00248.comclni +++|          BX6    X6+X2
00250  M00S00249.comclni +++|          SA6    A2          INSERT INTO MESSAGE
00251  M00S00250.comclni +++|          EQ     PNTX        RETURN
00252  M00S00251.comclni +++| TLCK     SPACE  4,20
00253  M00S00252.comclni +++|**        TLCK - AIP ENTRY POINT LINK TABLE.
00254  M00S00253.comclni +++|*
00255  M00S00254.comclni +++|*T,       30/LDRM, 30/LNKI
Figure

029LNKI3059LDRM

00256  M00S00255.comclni +++|*            LDRM = ADDRESS OF LDREQ *ENTRY* MACRO.
00257  M00S00256.comclni +++|*            LNKI = ADDRESS OF LINKAGE SUBROUTINE.
00258  M00S00257.comclni +++|
00259  M00S00258.comclni +++|
00260  M00S00259.comclni +++| TLCK     BSS    0
00261  M00S00260.comclni +++|
00262  M00S00261.comclni +++|          VFD    30/CHK,30//IAFEX4/NETCHEK
Line S00262 Modification History
M01 (Removed by) ns2408
Seq #  *Modification Id* Act 
----------------------------+
00263  M01S00262.ns2408  ---|          VFD    30/GET,30//IAFEX4/NETGET
00264  M01S00263.ns2408  ---|          VFD    30/GTF,30//IAFEX4/NETGETF
00265  M01S00264.ns2408  ---|          VFD    30/GTL,30//IAFEX4/NETGETL
00266  M01S00265.ns2408  ---|          VFD    30/GFL,30//IAFEX4/NETGTFL
Line S00001 Modification History
M01 (Added by) ns2408
Seq #  *Modification Id* Act 
----------------------------+
00267  M01S00001.ns2408  +++|          VFD    30/FNC,30//IAFEX4/NETFUNC
00268  M01S00002.ns2408  +++|          VFD    30/GET,30//IAFEX4/NETGETQ
00269  M01S00003.ns2408  +++|          VFD    30/GTL,30//IAFEX4/NETGTLQ
00270  M00S00266.comclni +++|          VFD    30/OFF,30//IAFEX4/NETOFF
00271  M00S00267.comclni +++|          VFD    30/NON,30//IAFEX4/NETON
Line S00268 Modification History
M01 (Removed by) ns2408
Seq #  *Modification Id* Act 
----------------------------+
00272  M01S00268.ns2408  ---|          VFD    30/PUT,30//IAFEX4/NETPUT
00273  M01S00269.ns2408  ---|          VFD    30/PTF,30//IAFEX4/NETPUTF
Line S00004 Modification History
M01 (Added by) ns2408
Seq #  *Modification Id* Act 
----------------------------+
00274  M01S00004.ns2408  +++|          VFD    30/PUT,30//IAFEX4/NETPUTS
00275  M00S00270.comclni +++|          VFD    30/SEP,30//IAFEX4/NETSETP
00276  M00S00271.comclni +++|
00277  M00S00272.comclni +++|          CON    0           END OF TABLE
00278  M00S00273.comclni +++| TLDR     SPACE  4,20
00279  M00S00274.comclni +++|**        TLDR - USER CALL LOADER REQUEST TABLE.
00280  M00S00275.comclni +++|
00281  M00S00276.comclni +++|
00282  M00S00277.comclni +++| TLDR     LDREQ  BEGIN,/IAFEX4/TINST,/IAFINI/FWA
00283  M00S00278.comclni +++|          LDREQ  MAP,N
00284  M00S00279.comclni +++|          LDREQ  PRESET,ZERO
00285  M00S00280.comclni +++|          LDREQ  PASSLOC,((MSG=,0,0,//MSG=))
00286  M00S00281.comclni +++|          LDREQ  PASSLOC,((SYS=,0,0,//SYS=))
00287  M00S00282.comclni +++|          LDREQ  PASSLOC,((RCL=,0,0,//RCL=))
00288  M00S00283.comclni +++|          LDREQ  PASSLOC,((WNB=,0,0,//WNB=))
00289  M00S00284.comclni +++|
00290  M00S00285.comclni +++|*         RELOCATABLE AIP SUBROUTINE REQUEST TABLE.
00291  M00S00286.comclni +++|
00292  M00S00287.comclni +++|          LDREQ  LIBLOAD,NETIO,(NETCHEK)
Line S00288 Modification History
M01 (Removed by) ns2408
Seq #  *Modification Id* Act 
----------------------------+
00293  M01S00288.ns2408  ---|          LDREQ  LIBLOAD,NETIO,(NETGET)
00294  M01S00289.ns2408  ---|          LDREQ  LIBLOAD,NETIO,(NETGETF)
00295  M01S00290.ns2408  ---|          LDREQ  LIBLOAD,NETIO,(NETGTFL)
00296  M01S00291.ns2408  ---|          LDREQ  LIBLOAD,NETIO,(NETGETL)
Line S00005 Modification History
M01 (Added by) ns2408
Seq #  *Modification Id* Act 
----------------------------+
00297  M01S00005.ns2408  +++|          LDREQ  LIBLOAD,NETIO,(NETFUNC)
00298  M01S00006.ns2408  +++|          LDREQ  LIBLOAD,NETIO,(NETGETQ)
00299  M01S00007.ns2408  +++|          LDREQ  LIBLOAD,NETIO,(NETGTLQ)
00300  M00S00292.comclni +++|          LDREQ  LIBLOAD,NETIO,(NETOFF)
00301  M00S00293.comclni +++|          LDREQ  LIBLOAD,NETIO,(NETON)
Line S00294 Modification History
M01 (Removed by) ns2408
Seq #  *Modification Id* Act 
----------------------------+
00302  M01S00294.ns2408  ---|          LDREQ  LIBLOAD,NETIO,(NETPUT)
00303  M01S00295.ns2408  ---|          LDREQ  LIBLOAD,NETIO,(NETPUTF)
Line S00008 Modification History
M01 (Added by) ns2408
Seq #  *Modification Id* Act 
----------------------------+
00304  M01S00008.ns2408  +++|          LDREQ  LIBLOAD,NETIO,(NETPUTS)
00305  M00S00296.comclni +++|          LDREQ  LIBLOAD,NETIO,(NETSETP)
00306  M00S00297.comclni +++|
00307  M00S00298.comclni +++|*         ENTRY POINT ADDRESS TABLE.
00308  M00S00299.comclni +++|
00309  M00S00300.comclni +++| CHK      LDREQ  ENTRY,(NETCHEK)
Line S00301 Modification History
M01 (Removed by) ns2408
Seq #  *Modification Id* Act 
----------------------------+
00310  M01S00301.ns2408  ---| GET      LDREQ  ENTRY,(NETGET)
00311  M01S00302.ns2408  ---| GFL      LDREQ  ENTRY,(NETGTFL)
00312  M01S00303.ns2408  ---| GTF      LDREQ  ENTRY,(NETGETF)
00313  M01S00304.ns2408  ---| GTL      LDREQ  ENTRY,(NETGETL)
Line S00009 Modification History
M01 (Added by) ns2408
Seq #  *Modification Id* Act 
----------------------------+
00314  M01S00009.ns2408  +++| FNC      LDREQ  ENTRY,(NETFUNC)
00315  M01S00010.ns2408  +++| GET      LDREQ  ENTRY,(NETGETQ)
00316  M01S00011.ns2408  +++| GTL      LDREQ  ENTRY,(NETGTLQ)
00317  M00S00305.comclni +++| OFF      LDREQ  ENTRY,(NETOFF)
00318  M00S00306.comclni +++| NON      LDREQ  ENTRY,(NETON)
Line S00307 Modification History
M01 (Removed by) ns2408
Seq #  *Modification Id* Act 
----------------------------+
00319  M01S00307.ns2408  ---| PUT      LDREQ  ENTRY,(NETPUT)
00320  M01S00308.ns2408  ---| PTF      LDREQ  ENTRY,(NETPUTF)
Line S00012 Modification History
M01 (Added by) ns2408
Seq #  *Modification Id* Act 
----------------------------+
00321  M01S00012.ns2408  +++| PUT      LDREQ  ENTRY,(NETPUTS)
00322  M00S00309.comclni +++| SEP      LDREQ  ENTRY,(NETSETP)
00323  M00S00310.comclni +++|
00324  M00S00311.comclni +++|*         LOAD REQUEST COMPLETION.
00325  M00S00312.comclni +++|
00326  M00S00313.comclni +++|          LDREQ  SATISFY,(NETIO)
00327  M00S00314.comclni +++|          LDREQ  SATISFY
00328  M00S00315.comclni +++|          LDREQ  END
00329  M00S00316.comclni +++|          SPACE  4,10
00330  M00S00317.comclni +++|**        TLKT - AIP ENTRY POINT LINK TABLE FOR AIP TRACE.
00331  M00S00318.comclni +++|*
00332  M00S00319.comclni +++|*T        30/ LDRM,30/ LNKI
Figure

029 LNKI3059 LDRM

00333  M00S00320.comclni +++|*         LDRM = ADDRESS OF LDREQ *ENTRY* MACRO CALL.
00334  M00S00321.comclni +++|*         LNKI = ADDRESS OF LINKAGE SUBROUTINE.
00335  M00S00322.comclni +++|
00336  M00S00323.comclni +++|
00337  M00S00324.comclni +++| TLKT     BSS    0
00338  M00S00325.comclni +++|          VFD    30/NCK,30//IAFEX4/NETCHEK
Line S00326 Modification History
M01 (Removed by) ns2408
Seq #  *Modification Id* Act 
----------------------------+
00339  M01S00326.ns2408  ---|          VFD    30/NGE,30//IAFEX4/NETGET
00340  M01S00327.ns2408  ---|          VFD    30/NGT,30//IAFEX4/NETGETF
00341  M01S00328.ns2408  ---|          VFD    30/NGF,30//IAFEX4/NETGTFL
00342  M01S00329.ns2408  ---|          VFD    30/NGL,30//IAFEX4/NETGETL
Line S00013 Modification History
M01 (Added by) ns2408
Seq #  *Modification Id* Act 
----------------------------+
00343  M01S00013.ns2408  +++|          VFD    30/NFC,30//IAFEX4/NETFUNC
00344  M01S00014.ns2408  +++|          VFD    30/NGE,30//IAFEX4/NETGETQ
00345  M01S00015.ns2408  +++|          VFD    30/NGL,30//IAFEX4/NETGTLQ
00346  M00S00330.comclni +++|          VFD    30/NOF,30//IAFEX4/NETOFF
00347  M00S00331.comclni +++|          VFD    30/NEN,30//IAFEX4/NETON
Line S00332 Modification History
M01 (Removed by) ns2408
Seq #  *Modification Id* Act 
----------------------------+
00348  M01S00332.ns2408  ---|          VFD    30/NPT,30//IAFEX4/NETPUT
00349  M01S00333.ns2408  ---|          VFD    30/NPF,30//IAFEX4/NETPUTF
Line S00016 Modification History
M01 (Added by) ns2408
Seq #  *Modification Id* Act 
----------------------------+
00350  M01S00016.ns2408  +++|          VFD    30/NPT,30//IAFEX4/NETPUTS
00351  M00S00334.comclni +++|          VFD    30/NRL,30//IAFEX4/NETREL
00352  M00S00335.comclni +++|          VFD    30/NST,30//IAFEX4/NETSETP
00353  M00S00336.comclni +++|          CON    0           END OF TABLE
00354  M00S00337.comclni +++|          SPACE  4,10
00355  M00S00338.comclni +++|**        TLRT - LOADER REQUEST TABLE FOR AIP TRACE.
00356  M00S00339.comclni +++|
00357  M00S00340.comclni +++| TLRT     LDREQ  BEGIN,/IAFEX4/TINST,/IAFINI/FWA
00358  M00S00341.comclni +++|          LDREQ  MAP,N
00359  M00S00342.comclni +++|          LDREQ  PRESET,ZERO
00360  M00S00343.comclni +++|
00361  M00S00344.comclni +++|*         RELOCATABLE AIP SUBROUTINE REQUEST TABLE.
00362  M00S00345.comclni +++|
00363  M00S00346.comclni +++|          LDREQ  LIBLOAD,NETIOD,(NETCHEK)
Line S00347 Modification History
M01 (Removed by) ns2408
Seq #  *Modification Id* Act 
----------------------------+
00364  M01S00347.ns2408  ---|          LDREQ  LIBLOAD,NETIOD,(NETGET)
00365  M01S00348.ns2408  ---|          LDREQ  LIBLOAD,NETIOD,(NETGETF)
00366  M01S00349.ns2408  ---|          LDREQ  LIBLOAD,NETIOD,(NETGTFL)
00367  M01S00350.ns2408  ---|          LDREQ  LIBLOAD,NETIOD,(NETGETL)
Line S00017 Modification History
M01 (Added by) ns2408
Seq #  *Modification Id* Act 
----------------------------+
00368  M01S00017.ns2408  +++|          LDREQ  LIBLOAD,NETIOD,(NETFUNC)
00369  M01S00018.ns2408  +++|          LDREQ  LIBLOAD,NETIOD,(NETGETQ)
00370  M01S00019.ns2408  +++|          LDREQ  LIBLOAD,NETIOD,(NETGTLQ)
00371  M00S00351.comclni +++|          LDREQ  LIBLOAD,NETIOD,(NETOFF)
00372  M00S00352.comclni +++|          LDREQ  LIBLOAD,NETIOD,(NETON)
Line S00353 Modification History
M01 (Removed by) ns2408
Seq #  *Modification Id* Act 
----------------------------+
00373  M01S00353.ns2408  ---|          LDREQ  LIBLOAD,NETIOD,(NETPUT)
00374  M01S00354.ns2408  ---|          LDREQ  LIBLOAD,NETIOD,(NETPUTF)
Line S00020 Modification History
M01 (Added by) ns2408
Seq #  *Modification Id* Act 
----------------------------+
00375  M01S00020.ns2408  +++|          LDREQ  LIBLOAD,NETIOD,(NETPUTS)
00376  M00S00355.comclni +++|          LDREQ  LIBLOAD,NETIOD,(NETREL)
00377  M00S00356.comclni +++|          LDREQ  LIBLOAD,NETIOD,(NETSETP)
00378  M00S00357.comclni +++|
00379  M00S00358.comclni +++|*         ENTRY POINT ADDRESS TABLE.
00380  M00S00359.comclni +++|
00381  M00S00360.comclni +++| NCK      LDREQ  ENTRY,(NETCHEK)
Line S00361 Modification History
M01 (Removed by) ns2408
Seq #  *Modification Id* Act 
----------------------------+
00382  M01S00361.ns2408  ---| NGE      LDREQ  ENTRY,(NETGET)
00383  M01S00362.ns2408  ---| NGT      LDREQ  ENTRY,(NETGETF)
00384  M01S00363.ns2408  ---| NGF      LDREQ  ENTRY,(NETGTFL)
00385  M01S00364.ns2408  ---| NGL      LDREQ  ENTRY,(NETGETL)
Line S00021 Modification History
M01 (Added by) ns2408
Seq #  *Modification Id* Act 
----------------------------+
00386  M01S00021.ns2408  +++| NFC      LDREQ  ENTRY,(NETFUNC)
00387  M01S00022.ns2408  +++| NGE      LDREQ  ENTRY,(NETGETQ)
00388  M01S00023.ns2408  +++| NGL      LDREQ  ENTRY,(NETGTLQ)
00389  M00S00365.comclni +++| NOF      LDREQ  ENTRY,(NETOFF)
00390  M00S00366.comclni +++| NEN      LDREQ  ENTRY,(NETON)
Line S00367 Modification History
M01 (Removed by) ns2408
Seq #  *Modification Id* Act 
----------------------------+
00391  M01S00367.ns2408  ---| NPT      LDREQ  ENTRY,(NETPUT)
00392  M01S00368.ns2408  ---| NPF      LDREQ  ENTRY,(NETPUTF)
Line S00024 Modification History
M01 (Added by) ns2408
Seq #  *Modification Id* Act 
----------------------------+
00393  M01S00024.ns2408  +++| NPT      LDREQ  ENTRY,(NETPUTS)
00394  M00S00369.comclni +++| NRL      LDREQ  ENTRY,(NETREL)
00395  M00S00370.comclni +++| NST      LDREQ  ENTRY,(NETSETP)
00396  M00S00371.comclni +++|
00397  M00S00372.comclni +++|*         LOAD REQUEST COMPLETION.
00398  M00S00373.comclni +++|
00399  M00S00374.comclni +++|          LDREQ  SATISFY,(NETIOD)
00400  M00S00375.comclni +++|          LDREQ  SATISFY
00401  M00S00376.comclni +++|          LDREQ  END
00402  M00S00377.comclni +++|          SPACE  4,10
00403  M00S00378.comclni +++|          BASE   *
00404  M00S00379.comclni +++| QUAL$    IF     -DEF,QUAL$
00405  M00S00380.comclni +++|          QUAL   *
00406  M00S00381.comclni +++| LNI      EQU    /COMCLNI/LNI
00407  M00S00382.comclni +++| QUAL$    ENDIF
00408  M00S00383.comclni +++|          ENDX
cdc/nos2.source/opl.opl871/common/comclni.txt ยท Last modified: (external edit)