SDISC Assembler Call - NetEx

FORTRAN NETEX Request BlocksThe FORTRAN user builds an NRB by declaring it to be an array of 40 INTEGER elements. Various membersof this array will hold the information to be transferred to NETEX, and others will contain the informationthat is returned by NETEX. If more than one NRB will be required to service a program, then several ofthese NRB arrays must be declared. Before these NRB arrays are used for any NETEX request, it is advisableto zero all the elements of the array. This will allow defaults for fields not explicitly used by the caller to takeeffect. Thus a sample declaration might be as follows.INTEGER RNRB(40), WNRB(40)DATA RNRB /40*0/DATA WNRB /40*0/The NETEX FORTRAN subroutines have the philosophy that arguments commonly passed to NETEX (suchas a data buffer address) will be passed as parameters to the subroutine. “Exotic” parameters to be passed toNETEX, such as maximum input block size, will be supplied by storing the desired value in the proper memberof the NRB array. When the request completes, the FORTRAN program directly accesses the desiredelements of the NRB array to determine if the operation completed properly. If NRB is declared as a 40 elementarray of integers, the elements of the array will be as shown in the following table.Element Type Name FunctionNRB(l) INTEGER NRBSTAT NETEX request status returned to userNRB(2) INTEGER NRBIND Data type indication from OFFER/READNRB(3) INTEGER WRELEN Length of dataNRB(4) INTEGER NRBUBIT Unused bit countNRB(5) INTEGER NRBREQ User request codeNRB(5) INTEGER NRBNREF NETEX ref no identifying connectionNRB(7) INTEGER NRBBUFA Starting address of user dataNRB(8) INTEGER NRBBUFA Length of users bufferNRB(9) INTEGER NRBMODE Datamode for write-type requestNRB(lO) INTEGER NRBTIME Request timeout in secondsNRB(ll) INTEGER NRBCLASS Class of serviceNRB(12) INTEGER NRBMAXRT Maximum data rate permittedNRB(13) INTEGER NRBBLKI Max buffer size for input requestsNRB(14) INTEGER NRBBLKO Max buffer size for output requestsNRB(15) INTEGER NRBRESV1 ReservedNRB(16) INTEGER NRBRESV2 ReservedNRB(17) INTEGER NRBPROTA Odata addressNRB(18) INTEGER NRBPROTL Odata length (octets)NRB(19) CHARACTER*8 NRBPNAME Name of process to OFFER/CONNECT (8b)NRB(21) CHARACTER*8 NRBHNANE Name of destination host (8 bytes)NRB(23) INTEGER NRBRESV3 ReservedNRB(24) INTEGER NRBUSER Installation useNRB(25) NRBOSDEP Reserved for op system dependent infotoNRB(40)Page 48 FORTRAN Interface MAN-REF-H307IP-04