*COMDECK NX$ADEF
#     NX$DEF  - FIP AND FIPXFR DEFINITIONS. # 
  
# 
**    NX$DEF  - FIP AND FIPXFR DEFINITIONS. 
* 
*     NX$DEF  CONTAINS THE DEFINITIONS GLOBAL TO THE FIP PROGRAM. 
# 
  
# 
**    INSTALLATION PARAMETER TYPE DEFINITIONS.
# 
  
      DEF MAXFILEXFR #4#;            # MAXIMUM NUMBER OF FILE XFERS # 
      DEF MAXFILEXM1 #3#;            # MAX NUMBER MINUS 1              #
      DEF XFRDELAY   #O"3777"#;      # TRANSFER DELAY CONSTANT #
  
# 
*     STATUS DEFINITIONS FOR NETXFR-S REPLY STATUS WORD  AND/OR 
*     DAYFILE MESSAGE ORDINAL  AND/OR  FILE TRANSFER TABLE ERROR
*     ORDINAL (FTTERRORD).
# 
  
*CALL COM$XRC 
# 
*     DEFINITIONS FOR JOB ORIGIN TYPE 
# 
      DEF JOT$SYOT #0# ;           # SYSTEM ORIGIN TYPE                #
      DEF JOT$BCOT #1# ;           # LOCAL BATCH                       #
      DEF JOT$EIOT #2# ;           # REMOTE BATCH                      #
      DEF JOT$TXOT #3# ;           # INTERACTIVE JOB                   #
  
# 
*     CIO DEFINITIONS 
# 
  
# 
*     DEFINITIONS FOR CIO ERROR CODES.
# 
  
      DEF EOI$CIO    #1#;            # END OF INFORMATION # 
  
# 
*     DEFINITIONS FOR CIO LEVEL NUMBERS.
# 
  
      DEF EOF       #O"17"#;         # END OF FILE #
  
# 
*     DEFINITIONS OF ALLOWED FILE RESIDENT DEVICE TYPES FOR CIO I/O.
# 
  
      DEF AY #O"13"#;                # 844-2X SINGLE DENSITY DISK # 
      DEF AZ #O"14"#;                # 844-4X DOUBLE DENSITY DISK # 
      DEF AH #O"15"#;                # 819 DISK # 
      DEF AJ #O"17"#;                # 885 DISK # 
      DEF AX #O"20"#;                # ECS RESIDENT # 
      DEF MT #O"40"#;                # SEVEN TRACK TAPE # 
      DEF NT #O"41"#;                # NINE TRACK TAPE #
      DEF MTMF #O"42"#;              # SEVEN TRACK MULTIFILE MEMBER # 
      DEF NTMF #O"43"#;              # NINE TRACK MULTIFILE MEMBER #
  
# 
*     DEFINITIONS FOR I/O FUNCTION CODES. 
# 
  
      DEF CIO$RPHR   #O"000"#;     # BACKSPACE ONE PRU                 #
      DEF CIO$OPENR  #O"140"#;
      DEF CIO$OPENW  #O"144"# ; 
      DEF CIO$CLOSE  #O"150"#;
      DEF CIO$REWIND #O"54"#;      # REWIND FILE                       #
      DEF CIO$READ   #O"10"#; 
      DEF CIO$READT  #O"12"#;      # READ TAPE (BINARY) # 
      DEF CIO$BKSPRU #O"44"#;      # BACKSPACE PRU #
      DEF CIO$BMODE  #O"2"#;       # READ MODE (BINARY OR CODED) #
      DEF CIO$PERRC  #O"4"#;       # PARITY ERROR CODE (TAPE) # 
  
      DEF CIO$READC  #O"200"#;
      DEF CIO$WRITE  #O"14"#; 
      DEF CIO$WRITET #O"16"#;      # WRITE TAPE (BINARY) #
      DEF CIO$WRITEC #O"204"#;
      DEF CIO$WRITEF #O"34"#; 
      DEF CIO$WRITER #O"24"#; 
      DEF CIO$EOI    #O"741031"#;  # EOI IN FET STATUS                 #
      DEF CIO$NORMAL #O"11"#;      # RETURN CODE FOR NORMAL READ       #
      DEF CIO$EOR    #O"21"#;      # RETURN CODE FOR EOR FOUND         #
      DEF CIO$EOF    #O"31"#;      # RETURN CODE FOR EOF FOUND         #
  
# 
*     FET BUFFER SIZE CONSIDERATIONS. 
* 
*     RMS PRU SIZE (ALL MODES)
*                  = 64 WORDS + 2 CONTROL WORDS (NOS) 
*                  = 64 WORDS + 1 CONTROL WORD (NOS/BE).
* 
*     LOCAL (CIO) DATA BLOCK (RMS)
*                  = 2 RMS PRUS = 132 WORDS (NOS) 
*                  = 2 RMS PRUS = 130 WORDS (NOS/BE)
* 
*     LOCAL (CIO) DATA BLOCK (MAGNETIC TAPE)
*                  = 514 WORDS (NOS)
*                  = 512 WORDS (NOS/BE) 
* 
*     RHF BINARY DATA BLOCK (UH/US/UU MODE) (SEE NOTE 1.) 
*                  = 6 RMS PRUS = 6*66 = 396 (NOS)
*                  = 6 RMS PRUS = 6*65 = 390 (NOS/BE) 
* 
*     RHF CHARACTER DATA BLOCK (C6/C8 MODE) (SEE NOTE 1.) 
*                  = 12 RMS PRUS = 12*66 = 792 (NOS)
*                  = 12 RMS PRUS = 12*65 = 780 (NOS/BE) 
* 
*     FET BUFFER SPACE CALCULATION. 
* 
*     FIP (XFRINIT) SETS THE LOCAL FET BUFFER SIZE TO THE LARGER OF 
*            FETBUFSIZE * 1000/(BUFRATIO[MODE]+1000)
*         OR MINBUFL
* 
*     FIP SETS THE RHF FET BUFFER SIZE TO THE LARGER OF 
*            FETBUFSIZE - (LOCAL BUFFER SIZE) 
*         OR MINBUFR[MODE]
* 
*     FETBUFSIZE IS THE INSTALLATION PARAMETER SPECIFYING THE TOTAL 
*          NUMBER OF WORDS TO BE ASSIGNED TO THE LOCAL AND RHF FET
*          BUFFERS. 
* 
*     BUFRATIO IS THE RATIO OF LOCAL TO RHF BUFFER SIZES: 
*          A VALUE OF 1000  -      1  :  1
*          A VALUE OF 2000  -      1  :  2
* 
*     MINBUFL IS THE MINIMUM LOCAL BUFFER SIZE. 
* 
*     MINBUFR[0/-1/-2/-3/-4] ARE THE MINIMUM RHF FET BUFFER SIZES FOR 
*          MODES UH, US, UU, C6, AND C8, RESPECTIVELY.
* 
*     NOTES.
* 
*     1. EXTRA WORDS (2 NOS BINARY, 66 NOS CODED, 65 NOS/BE) ARE ADDED
*        TO THE RHF FET BUFFER BECAUSE THE NAD DRIVER, NDR, REQUIRES
*        EXTRA SPACE WHEN RECEIVING A FULL BLOCK WITH END-OF-RECORD.
* 
*     2. BOTH BUFFERS ARE COMBINED INTO ONE FOR SINGLE-BUFFER  I/O, 
*        I.E., WHEN THE LOCAL DEVICE IS RMS AND THE TRANSFER MODE 
*        IS UH, US, OR UU.
# 
  
      DEF MINBUFL    # 133 #;     # LOCAL FET         66*2 + 1 #
      DEF MINBUFR0   # 399 #;     # RHF FET (UH)  66*6 + 2 + 1 #
      DEF MINBUFR1   # 399 #;     # RHF FET (US)  66*6 + 2 + 1 #
      DEF MINBUFR2   # 399 #;     # RHF FET (UU)  66*6 + 2 + 1 #
      DEF MINBUFR3   # 859 #;     # RHF FET (C6) 66*12 + 66 + 1 # 
      DEF MINBUFR4   # 859 #;     # RHF FET (C8) 66*12 + 66 + 1 # 
  
      DEF BUFRATIO0  # 1000 #;    # LOCAL:RHF BUFF RATIO (UH) # 
      DEF BUFRATIO1  # 1000 #;    # LOCAL:RHF BUFF RATIO (US) # 
      DEF BUFRATIO2  # 1000 #;    # LOCAL:RHF BUFF RATIO (UU) # 
      DEF BUFRATIO3  # 2000 #;    # LOCAL:RHF BUFF RATIO (C6) # 
      DEF BUFRATIO4  # 1000 #;    # LOCAL:RHF BUFF RATIO (C8) # 
  
# 
*     INSTALLATION PARAMETER. 
# 
      DEF FETBUFSIZE # 3200 #;    # TOTAL FET BUFFER SIZE # 
      DEF CIO$LENPRU # 3 #;       # NUMBER OF PRUS IN DISK FET         #
      DEF MXIVT$SIZE # 260 #;       # SIZE OF NETGET BUFFER FOR XFR    #
      DEF LEN$FET   #7#;            # LENGTH OF LOCAL FILE FET         #
      DEF LEN$FETW   #05#;          # LENGTH OF ARRAY XFRHOLD          #
      DEF LEN$CMB    #09# ;         # LENGTH OF CONVERSION PARAM BLK   #
      DEF LEN$CIOB   #193# ;        # LENGTH OF CIO BUFFER, 3 PRUS     #
      DEF LEN$CHK    # 66 #;        # LENGTH OF CHECK MARK STATUS BUFF #
      DEF CHK$START  # 2 #;         # INDEX OF THE CHECKMARK BUFFER    #
                                    # WHERE THE FIRST NON-ZERO CHECMARK#
                                    # BEGINS                           #
      DEF BYTE$SIZE # 8 #;         # NUMBER OF BITS PER OCTET          #
      DEF DDEND     # 44 #;        # END BIT OF DD                     #
      DEF DDSTART   # 20 #;        # FIRST BIT OF DD                   #
      DEF STARTBIT # 28 #;         # START BIT OF DD IF RIGHT JUSTIFIED#
      DEF DDLEN     # 32 #;        # LEGNTH OF DD IN BITS              #
      DEF ASCII$ZERO # X"30" #;    # VALUE OF ASCII ZERO               #
      DEF TBH$HSIZE  #06# ;         # LENGTH OF TBH IN OCTECTS         #
  
  
  
  
# 
*  DEFINE USER DATA DECLARATION TYPES (AS USED BY FIPXFR) 
# 
  
      DEF NUMDD   #5#;             # NUMBER OF LEGAL DATA DECS #
      DEF MINDD   #0#;             # MINIMUM VALUE OF A LEGAL DD #
      DEF MAXDD   #4#;             # MAXIMUN VALUE OF A LEGAL DD #
  
      DEF UH      #0#;             # BINARY DATA WITH EMBEDDED
                                      CONTROL WORDS # 
      DEF UU      #1#;             # BINARY DATA, UNSTRUCTURED #
      DEF US      #2#;             # BINARY DATA, STRUCTURED #
      DEF C6      #3#;             # DISPLAY CODE WITH Z-BYTES #
      DEF C8      #4#;             # ASCII WITH Z-BYTES # 
      DEF CN      #5#;             # ASCII SENT/RECEIVED OVER THE 
                                      NETWORK. ITS 8/12 ASCII WITH
                                      UNIT SEPARATORS. THIS IS NOT
                                      A LEGAL DATA DEC FOR AN 
                                      APPLICATION TO SPECIFY #
  
      DEF ROUND #14# ;
      DEF FACT #15# ; 
# 
*     SPECIAL REASON CODE FOR PRUONA RETURNED TO APPLICATION BY NIP 
# 
      DEF RETRY$PRA # 5 #;         # RETRY ON PRUON ABONORMAL          #
      DEF INTRA$PRA # 4  #;        # PRUONA REASON CODE FOR INTRAHOST  #
                                   # AT RECEIVER END                   #
      DEF INTRA$PRS # 1 #;         # PRUONA REASON CODE FOR INTRAHOST  #
                                   # AT SENDER END                     #
# 
*     DEFINE DATA DECLARATION TYPE AS USED BY THE NETWORK DRIVER (NDR). 
# 
  
      DEF BINARY #1#;              # BINARY FILES - UH, UU, OR US # 
      DEF CODED  #3#;              # CODED FILES - C6 OR C8 # 
  
#     FACILITY PARAMETER, SPECIFYING THE OPTIONS AVAILABLE DURING THE 
*     FILE TRANSFER PHASE 
# 
      DEF MFACIL # O"15" #;        # CHECKMARKING USED PARAMETER       #
      DEF SFACIL # O"23" #;        # SEND SR REQUIRED                  #
      DEF RFACIL # O"22" #;        # RESTART ALLOWED IN THIS RUN       #
      DEF BLANK  # O"55" #;        # BLANK FACILITY                    #
# 
     DEFINITIONS FOR LEVEL SYN. SUPERVISORY MESSAGE.
# 
  
      DEF LEV7$SS     X$ 3330"# ;       # SS MESSAGE                   #
      DEF LEV7$MS     X$ 3331"# ;       # MS                           #
      DEF LEV7$ES     X$ 3332"# ;       # ES                           #
      DEF LEV7$RR     X$ 3333"# ;       # RR                           #
      DEF LEV7$MR     X$ 3334"# ;       # MR                           #
      DEF LEV7$QR     X$ 3335"# ;       # QR                           #
      DEF LEV7$ER     X$ 3336"# ;       # ER                           #
      DEF LEV7$SR     X$ 3337"# ;       # SR                           #
  
      DEF LEN$LEV7    #02# ;           # LENGTH OF LEVEL 7 MESSAGE     #
      DEF LEN$LEV7O   #14# ;           # IN OCTETS IS 15 ( USE ONLY 14)#
      DEF PRDER1 # X"30303030" #;  # NO ERROR                          #
      DEF PRDER2 # X"30303230" #;  # RETRYABLE RECEIVE  ERROR          #
      DEF PRDER3 # X"30303231" #;  # NON-RETRYABLE RECEIVER ERROR      #
      DEF PRDER4 # X"30303232" #;  # PROTOCOL ERROR                    #
      DEF PRDER5 # X"30303233" #;  # GO NOT ACCEPTED                   #
      DEF PRDER6 # X"30303238" #;  # RETRYABLE SENDER ERROR            #
      DEF PRDER7 # X"30303239" #;  # NON-RETRYABLE SENDER ERROR        #
      DEF PRDER8 # X"30303241" #;  # PROTOCOL ERROR                    #
      DEF PRDER9 # X"30303242" #;  # GO NOT ACCEPTED                   #
  
*CALL AIPSTDF 
# 
*     DEFINITIONS FOR FTTDIRECN.
# 
  
      DEF RECEIVE  # 0 #; 
      DEF SEND     # 1 #; 
      DEF OCTETSIZE #8# ; 
      DEF WORDLENGTH #60# ; 
      DEF TOTALHDRBLK #24# ;             # TOTAL POSSIBLE NUMBER OF HDR#
                                         # FOR BLK BLOCKS FROM CCP     #
  
# 
*     DEFINITIONS FOR STATE TABLE ORDINALS
# 
      DEF PRUSEND #0# ; 
      DEF PRURECEIVE #1# ;
      DEF CHARSEND #2# ;
      DEF CHARRECVR #3# ; 
      DEF ERRORD # 4 #;            # DUMMY VALUE FOR WRONG ORDINAL     #
      DEF ONE # 1 #;               # ACTION 1                          #
      DEF TWO # 2 #;               # ACTION 2                          #
# 
*     DEFINITIONS FOR ENTRY SIZE OF ASYNC MESSAGES
# 
      DEF ENTY1 # 1 #;             # ENTRY SIZE 1                      #
      DEF ENTY2 # 2 #;             # ENTRY SIZE 2                      #
      DEF MINUS2 # -2 #;           # VALUE OF -2                       #
# 
*     DEFINITIONS FOR ENTRY SIZE OF DATA MESSAGES 
# 
      DEF ENTY1$ASC # 8 #;         # ENTRY SIZE 1 FOR ACT = 2          #
      DEF ENTY2$ASC # 15 #;        # ENTRY SIZE 2 FOR ACT = 2          #
# 
      DEFINITION FOR APPLICATION BLOCK LIMIT. 
# 
      DEF ABLLIMIT #7# ;               # MAX OF ABL                    #
# 
      LIST NUMBER 1 IS RESERVED FOR XFR CONNECTIONS.
# 
      DEF XFR$LIST #63# ; 
  
#     DEFINITION FOR BLOCK SIZE.
# 
      DEF IVT$MAX$BSZ #1920# ;         # MAX OF CHARS FOR IVT MODE     #
      DEF ONE$PRU #480# ;              # NUMBER CHARS IN 1 PRU         #
      DEF TWO$PRU #960# ;              # 2 PRU IN CHARS                #
      DEF THREE$PRU #1440# ;           # 3 PRU                         #
  
# 
*     DEFINITION FOR MAXRETRY COUNT 
# 
      DEF MAXRETRY # 12 #;             # MAXIMUM NUMBER FOR RETRY      #
  
# 
*     DEFINITIONS FOR FTTCOUNT. 
# 
      DEF MAXFTTCOUN #50# ;            # MAX VALUE FOR FTTCOUNT        #
  
# 
*     DEFINITIONS FOR MAXIMUM UNACKED CHECKMARK 
# 
      DEF MXCWS # 32 #;                # MAX NO. OF UNACKED CHECKMARKS #
  
# 
*     DEFINITIONS FOR MAXIMUM INITIAL CHECKMARK VALUE 
# 
      DEF MXICKVAL # 9999 #;           # MAX INITIAL CHECKMARK VALUE   #
# 
*     DEFINITIONS FOR EXCESS NUMBER OF WORDS NEEDED FOR 
*     REALLOCATION OF CIO BUFFER FOR INTRAHOST PORU XFR 
# 
  
      DEF INTR$EXCESS # 128 #;
# 
      DEF FINITION FOR THE SIZE OF FTT ENTRY. 
# 
      DEF FTTENTRYSIZE #7# ;           # SIZE OF FTT ENTRY             #
# 
      DEFINITION FOR CHECKMARK WINDOW SIZE
# 
      DEF MSWINDOWSZ # 20 #;           # CHECK MARK WINDOW SIZE        #
# 
      DEFINITION FOR CHARACTER MODE BUFFER
# 
      DEF TBH$LEN # 6 #;               # LENGTH OF TBH IN OCTETS       #
      DEF INITNBYTE # 4 #;             # INITIAL NBYTE VALUE IN CMB    #
# 
      DEF FOR CHARACTER MODE CONVERSION BLOCK.
# 
      DEF CMV$BLK$SZ #4# ;
# 
      DEFINITIONS FOR CHARACTER SET 63 PRESETTING.
# 
      DEF DLE         #X"800"# ;       # DELETE THE CHARACTER          #
      DEF ZBT         #X"801"# ;       # CONVERT CHAR TO Z BYTE        #
      DEF CVT         #X"000"# ;       # NORMAL CONVERSION             #
      DEF ZBT63       #X"802"# ;       # CONVERT CHAR TO Z-BYTE C63    #
      DEF COL         #X"803"# ;       # PROTECT 64 CHAR SET COLON     #
  
  
