*DECK TEXTNVF PROC TEXTNVF; # TITLE TEXTNVF - SYMPL TEXT FOR NVF. # BEGIN # TEXTNVF # # ** TEXTNVF - SYMPL TEXT FOR NVF. * * S.H. FISHER 82/06/02 * C.J. BRION 83/10/10 * * THIS PROC GENERATES A SYMPL TEXT FOR COMPILING NVF. * IT CONTAINS DEFINITIONS OF SYMBOLS, PARAMETERS, COMMON BLOCKS * ECT... USED THROUGHOUT THE PROGRAM. * # CONTROL STEXT; # **** # DEF SPTACSIZ$ #66#; # MAX SIZE OF SUB PTAC ENTRY # DEF SPTACSIZ2$ #67#; # MAX SIZE OF SUB PTAC ENTRY + 1 # DEF ACNLSIZ$ #2#; # NUMBER OF WORDS PER ACN LIST ENTRY # $BEGIN DEF TRAPVCB$ #50#; $END DEF NVFAN$ #1#; # APPLICATION NUMBER OF NVF # DEF ALTSIZ$ #4#; # NUMBER OF WORDS PER ALT ENTRY # DEF ASTSIZ$ #5#; # NUMBER OF WORDS PER AST ENTRY # DEF DEFAL$ #128#; # DEFAULT AL VALUE # DEF DEFLL$ #4#; # DEFAULT LL VALUE # DEF PIDLLSIZ$ #2#; # NUMBER OF WORDS PER LLPID LLINK ENTRY # DEF PTACSIZ$ #30#; # NUMBER OF WORDS PER PTAC ENTRY # DEF PAACSIZ$ #30#; # NUMBER WORDS PER PAAC ENTRY # DEF AATIME$ #1#; # A-A TIME REQUEST ID # DEF TATIME$ #2#; # T-A TIME REQUEST ID # DEF TSTIME$ #3#; # TERMINAL SESSION TIME REQUEST ID # DEF PDCTSIZ$ #9#; # NUM OF WORDS IN CONSOLE PORTION OF PDCT # DEF EMPTY$ #1#; # NUMBER WRDS IN EMPTY IN/OUTCALL BLK # DEF RAUSIZ$ #2#; # NUMBER OF WORDS PER RAU ENTRY # DEF RMLSIZ$ #1#; # NUMBER OF WORDS PER RML ENTRY # DEF VBRECDN$ #56#; # VCB REC SIZE SAME AS VBRECD$ IN TXVCBNV # DEF MULTI$ #1#; # MULTI HOST MODE INDICATOR # DEF SINGL$ #2#; # SINGLE HOST MODE IND # DEF VBESIZN$ #8#; # VCB NTRY SIZ SAME AS VBESIZ$ IN TXVCBNV # DEF VSQSIZ$ #3#; # NUMBER OF WORDS PER VSQ ENTRY # DEF AASECLEV$ #16#; # A-A SECURITY LEVEL # DEF VSSQSIZ$ #4#; # NUMBER OF WORDS PER VCBSSQ ENTRY # DEF LCFVRN$ #4#; # NUMBER OF WORDS IN LCF VERSION MSG # DEF HOPORD$ #0#; # HOP ACN LIST ORDINAL # DEF HOPPL$ #31#; # HOP PAGE LENGTH # DEF HOPTPL$ #32#; # HOP TURN PAGE LENGTH # DEF NOXPAR$ #X"3400"#; # NON-TRANSPARENT INPUT INDICATOR # DEF NSAWBP$ #O"77"#;# NS ACCESS WORD BIT POSITION # DEF NVFPID$ #2#; # NVF PROGRAM I.D. FOR FIELD LENGTH DUMP # DEF RVD$ #7#; # READ VCB DATA TAG # DEF WVD$ #1#; # WRITE VCB DATA TAG # $BEGIN DEF STRNUM$ #300#; # DEBUG TABLE LEN # $END # * REASON CODE DEFINITIONS FOR A-A FEATURE FOR RELEASE 1 OF SINGLE * HOST REPLACEMENT. # DEF RCNOVCB$ # 1 #; # NO AVAIL VCB # DEF RCMAXCN$ # 10 #; # APPL AT MAX CON # DEF RCNOAPP$ # 9 #; # APPL UNAVAILABLE # DEF RCNOPATH$ # 8 #; # NO PATH TO DEST APPL # DEF RCBADREQ$ # 4 #; # INVALID CON REQ # DEF RCUNKAPP$ # 13 #; # UNKNOWN APPL # # * THE FOLLOWING DEFS ARE USED TO DETERMINE WHETHER A USER- * VOLUNTEERED APPLICATION IS A RESERVED NAME. # DEF LOGIN$ # 1 #; # NAME IS "LOGIN" OR "HELLO" # DEF LOGOUT$ # 2 #; # NAME IS "LOGOUT" OR "BYE" # DEF NORESNAM$ # 0 #; # NOT A RESERVED NAME # # * THE FOLLOWING DEFS ARE HARD CODED VALUES FOR THE FLOW CONTROL * PARAMETERS TO BE USED FOR THE SINGLE HOST A-A FEATURE. # DEF INTRABL$ # 7 #; # ABL VALUE # DEF INTRADBL$ # 5 #; # DBL VALUE # DEF INTRADBZ$ # 2043 #; # DBZ VALUE # DEF INTRAUBL$ # 7 #; # UBL VALUE # DEF INTRAUBZ$ # 2000 #; # UBZ VALUE # # * DEFS OF NVF INTERNAL APPLICATION BLOCK TYPES(ABTS) AND PSEUDO * PFC/SFC-S FOR PROTOCOL REPONSES SENT FROM HOP I-LAYER TO * HOP C-LAYER. # DEF HOPTX$ #10#; # HOP TERMINAL TEXT ABT # DEF APPPR$ #9#; # PROTOCOL RESPONSE ABT # DEF APPPTX$ #8#; # PROMPT TEXT ABT # DEF APPTTX$ #7#; # TERMINAL TEXT ABT # DEF HOPSRTN$ #X"D045"#; # HOP/START/N PSEUD0 PFC/SFC # DEF HOPENDN$ #X"D046"#; # HOP/END/N PSEUD0 PFC/SFC # # **** # # ** THE FOLLOWING STATUS LIST IS FOR USE BY THE HOP PROTOCOL EVENT * PROCESSOR FOR CASING ON EVENT TYPES. # STATUS HPESTAT HOPSRT, # HOP/START # HOPENDW, # HOP/END-WARNING # HOPEND, # HOP/END # ; # ** HCNST - STATES ALLOWED FOR THE HOP ACN ENTRY. * * THIS STATUS LIST DEFINES THE ALLOWED STATES FOR THE ACN LIST * ENTRY FOR THE HOP. BECAUSE WE COMMUNICATE WITH THE HOP VIA A * TOTALLY DIFFERENT PROTOCOL THAN THAT FOR NOPS (WHO ARE TERMINAL * USERS), A DIFFERENT SET OF STATES ARE REQUIRED. # STATUS HCNST INACT, # INACTICE, NOT ASSIGNED # CREATE, # HOP/START IN PROGRESS # ACTIVE, # BOTH INPUT AND OUTPUT ALLOWED # COMMAND, # COMMAND IN PROGRESS,ONLY OUTPUT ALLOWED # BREAK, # BREAK OUTSTANDING # ENDED, # HOP/END IN PROGRESS # RESTART, # START WHILE END IN PROGRESS # STARTEND, # END WHILE START IN PROGRESS # STARTBRK, # BREAK WHILE START IN PROGRESS # RESBREAK; # START + BREAK WHILE END IN PROGRESS # # ** THE FOLLOWING STATUS LIST DEFINES ALL THE ERRORS THAT IS RETURNED * BY THE SERIAL SEARCHER. THESE ARE SET IN THE VCBSSQ ENTRIES BY * *NVFVPSR* AND RECOGNIZED BY *NVFOFVD*. * # STATUS SSEC NOERROR, # NO ERRORS DETECTED # NOMATCH, # NO MATCH FOUND IN THE VCB FILE # ABRT; # ABORT COMMAND FLAG IS SET # # ** LCFVRSN - COMMON BLOCK FOR LCF VERSION MESSAGE. * * THIS IS A COMMON BLOCK FOR THE LCF VERSION MESSAGE. * IT IS BUILT BY *NVFIAST* WHEN READING THE LCF AT * INITIALIZATION TIME. AND USED BY *NVFOPHC* WHEN * PROCESSING THE "HISTORY,ALL" COMMAND. * # COMMON LCFVRSN; BEGIN # LCFVRSN # ARRAY LCFVRN[00:00] S(LCFVRN$); BEGIN ITEM LFV$VRN C(00,00,12); # "LCF VERSION " # ITEM LFV$DAT C(01,12,20); # LCF CREATION TIME AND DATE # ITEM LFV$ZERO U(03,12,48); # ZERO BYTE TERMINATOR # END END # LCFVRSN # # ** NVFCITM - COMMON ITEM DEFINITIONS. * * NVFCITM IS A COMMON BLOCK CONTAINING GLOBAL ITEM DEFINIATIONS FOR * VARIOUS OVERLAYS OF NVF. # COMMON NVFCITM; BEGIN # NVFCITM # ITEM ABORTCMDF B; # ABORT-COMMAND FLAG # ITEM AL I; # AL VALUE FROM CONTROL CARD # ITEM LLVAL I; # LL VALUE FROM CONTROL CARD # ITEM NVFSTATE B; # TRUE IF IDLE/DISABLE HOST INITIATED # ITEM SSBUSYF B; # SERIAL SEARCHER BUSY FLAG # ITEM VAPMASK U; # VALID APPLICATION MASK # END # END NVFCITM # # ** NVFCARY - COMMON BASED ARRAY DEFINITIONS. * * NVFCARY IS A COMMON BLOCK CONTAINING GLOBAL BASED ARRAY * DEFINITIONS FOR THE VARIOUS OVERLAYS OF NVF. # COMMON NVFCARY; BEGIN # NVFCARY # # ** TVCBSSQ - TEMPLATE FOR AN ENTRY IN VCBSSQ. * * THE FOLLOWING BASED ARRAY IS A TEMPLATE FOR AN ENTRY IN THE * VCB-SERIAL-SEARCH-DATA-QUEUE (VCBSSQ). # BASED ARRAY TVCBSSQ[00:00] S(VSSQSIZ$); BEGIN ITEM TSS$TN C(00,00,07); # TERMINAL NAME # ITEM TSS$DT U(00,47,04); # DEVICE TYPE # ITEM TSS$UWORD U(01,00,60); # USER REFERENCE WORD # ITEM TSS$LTIME U(02,00,18); # LOGIN TIME # ITEM TSS$CATIME U(02,18,18); # CONNECTION TO APPL TIME # ITEM TSS$AACN U(02,36,12); # APPL-CONNECTION-NUMBER # ITEM TSS$EC U(02,48,03); # ERROR CODE # ITEM TSS$APENDF B(02,51,01); # LAST APPL FLAG # ITEM TSS$VENDF B(02,58,01); # END VCB SERIAL SEARCH FLAG # ITEM TSS$SWAPNM C(03,00,07); # SWITCHED APPL NAME # ITEM TSS$SWAPAN U(03,51,09); # SWITCHED APPL NUMBER # END # ** TVSQ - TEMPLATE FOR AN ENTRY IN VSQ. * * TVSQ IS A TEMPLATE FOR AN ENTRY IN THE VCB-SERIAL-SEARCH-REQUEST * QUEUE (VSQ). # BASED ARRAY TVSQ[00:00] S(VSQSIZ$); BEGIN ITEM TVS$APENDF B(00,48,01); # LAST APPL FLAG # ITEM TVS$WORDP U(00,51,06); # WORD POSITION # ITEM TVS$SGLEF B(00,59,01); # SINGLE-ENTRY-FLAG # ITEM TVS$VALUE U(01,00,60); # VALUE TO SEARCH # ITEM TVS$MASK U(02,00,60); # MASK FOR THE VALUE # END END # NVFCARY # # ** NVFCB - NVF CONTROL BLOCK. * * THIS COMMON BLOCK CONTAINS ITEMS RELATING TO NVF CONTROL AND * IDENTIFICATION. * # COMMON NVFCB; BEGIN # NVFCB # ITEM CRNT$NIN; # CURRENT INVOCATION NUMBER # ITEM CRNT$DPN; # CURRENT DUMP NUMBER # ITEM DBGFLAG B; # DEBUG CODE ON FLAG # END # NVFCB # # ** NVFINTR - COMMON BLOCK OF INTERRUPT LOCATIONS FOR MONITOR * ROUTINES. * * NVFINTR IS A COMMON BLOCK CONTAINING A GROUP OF WHOLE WORD ITEMS * THAT FUNCTION AS INTERRUPT CELLS FOR THE ROUTINES THAT ARE CALLED * BY THE STATUS WORKLIST PROCESSOR TO PROCESS ONE OR MORE QUEUES. * THESE CELLS PROVIDE A LINKAGE BETWEEN ONE OR MORE QUEUES AND A * SINGLE GIVEN MONITOR ROUTINE. THIS ASSOCIATION IS MADE AT * INITIALIZATION TIME WHEN *WDF* AND *QWD* TABLES (IN SSTEXT) ARE * BUILT BY PROC NVFIBWD. WHENEVER THE STATUS WORKLIST PROCESSOR IS * WATCHING A GIVEN INTERRUPT CELL AND THAT CELL BECOMES OR IS * NONZERO, THE CORRESPONDING MONITOR ROUTINE IS CALLED. THE * MONITORS THEMSELVES DETERMINE WHEN A GIVEN CELL WILL BE WATCHED * VIA THE FORMAL RETURN PARAMETER ARRAY *SWTESS* (COMMON DECK). * WHENEVER AN ENTRY IS PLACED IN A GIVEN QUEUE, THE ASSOCIATED * INTERRUPT WORD IS INCREMENTED. (NOTE: NOT ALL MONITOR ROUTINES * ARE TRIGGERED BY THESE INTERRUPT CELLS. SOME ARE TRIGGERED BY, * E.G., THE COMPLETE BIT). # COMMON NVFINTR; BEGIN ITEM INVTICR I; # INTERRUPT FOR PROC *NVFTICR* # ITEM INVVRVF I; # INTERRUPT FOR PROC *NVFVRVF* # ITEM INVVPSR I; # INTRP. FOR *NVFVPSR* TRIGGER BY VSQ # ITEM INVPSR I; # INTRP. FOR *NVFVPSR* TRIGGER BY *NVFVFSD# END # END NVFINTR # # ** *E ** TABLES - MEMORY MANAGEMENT COMMON BLOCK. * * COMMON BLOCK OF BASED ARRAY POINTER WORD AND LENGTH FOR TABLES * AND QUEUES USED BY THE *TABLE MANAGER*. ORDER OF *MEMLOC* AND * *FL* MUST BE PRESERVED FOR USE BY THE *TABLE MANAGER*. * FOR QUEUES, THE ENTRY-SIZE IS VARIABLE IN LENGTH AND EACH ENTRY * HAS THE FOLLOWING FORMAT: * 1) A ONE WORD WORD-COUNT FOR THE NUMBER OF WORDS IN THE ENTRY. * 2) A ONE WORD HEADER (ABH FORMAT), AND * 3) AN SM OR DATA AREA WITH A MAXIMUM SIZE OF 12 WORDS. # COMMON TABLES; BEGIN ITEM MEMLOC I; # 1ST MEMORY LOCATION OF MANAGED TBL AREA # ITEM FL I; # FIELD LENGTH # # ** ACN - APPLICATION CONNECTION NUMBER LIST. * * ACN LIST TABLE CONTAINS INFORMATION NEEDED BY THE C-LAYER ABOUT * ALL CONNECTIONS TO NVF. * * THE FOLLOWING IS THE FORMAT OF AN ACN LIST ENTRY. EACH ENTRY * IS 2-WORDS LONG. * * * 1 2 3 4 5 * 012345678901234567890123456789012345678901234567890123456789 *TEXT *TEXT *T,WORD0,1/I,1/B,4/CST,3/,3/BL,18/ABN,12/DBZ,18/ACN *ENDTEXT *T,WORD1,3/,6/BKCNT,6/BLCNT,3/,5/PCHA,1/G,9/,6/TRC,3/,9/WBCNT,9/PL *ENDTEXT * # BASED ARRAY ACN[00:00] S(ACNLSIZ$); BEGIN # **** # ITEM ACN$WORD0 U(00,00,60); # FIRST WORD REFERENCE # ITEM ACN$INIT B(00,00,01); # TRUE WHEN FC/INIT DONE # ITEM ACN$BLKF B(00,01,01); # BLK BLOCK RECEIVED FLAG# ITEM ACN$HOPST S:HCNST(00,02,04); # HOP PSEUDO ACN STATE # ITEM ACN$STATE U(00,02,04); # STATE OF CONNECTION # ITEM ACN$ABL U(00,09,03); # APPLICATION BLOCK LIM # ITEM ACN$ABN U(00,12,18); # APPLICATION BLOCK NUM # ITEM ACN$CNUM U(00,12,18); # TIMER CANCEL NUMBER # ITEM ACN$DBZ U(00,30,12); # APPLICATION BLOCK SIZE # ITEM ACN$ACN U(00,42,18); # APPLICATION CONNECT NR # ITEM ACN$WORD1 U(01,00,60); # SECOND WORD REFERENCE # ITEM ACN$BKCNT I(01,03,06); # OUTSTANDING BREAK CNT # ITEM ACN$BLCNT U(01,09,06); # OUTSTANDING BLOCK CNT # ITEM ACN$PCHAR C(01,18,01); # HOP PAGE CHARACTER # ITEM ACN$PWAIT B(01,23,01); # PAGE WAIT FLAG # ITEM ACN$BLKCNT U(01,27,06); # BLK BLOCKS RECEIVED # ITEM ACN$TRC U(01,33,06); # TERMINATE REASON CODE # ITEM ACN$IGNOR B(01,39,01); # HOP IGNORE FLAG # ITEM ACN$WBCNT U(01,42,09); # WAITING BLOCK COUNT # ITEM ACN$PL U(01,51,09); # PAGE LENGTH # # **** # END ITEM ACNLNGTH I; # LENGTH OF ACN TABLE # # ** ASQ - APPLICATION SM QUEUE. * * ASQ IS THE INPUT QUEUE TO THE MAINTAIN APPLICATION STATUS * PROCESS. IT CONTAINS SMS PERTINENT TO ESTABLISHING AND * TERMINATING COMMUNICATION BETWEEN AN APPLICATION AND THE * NETWORK. # BASED ARRAY ASQ[00:00] S(1); BEGIN ITEM ASQ$WORD U(00,00,60); # FULL WORD REFERENCE # END ITEM ASQLNGTH I; # ASQ QUEUE LENGTH # # ** *E ** AST - APPLICATION STATUS TABLE. * * AST TABLE CONTAINS AN ENTRY FOR EACH APPLICATION REPRESENTED IN * THE NOS VALIDATION COMMON DECK - COMTNAP. THIS IS A FIXED ENTRY- * SIZE TABLE. * * * THE FOLLOWING IS THE FORMAT OF AN AST ENTRY. EACH ENTRY * IS THREE WORDS LONG. * * * 1 2 3 4 5 * 012345678901234567890123456789012345678901234567890123456789 *TEXT *T,WORD0,42/ANAM,9/,9/AN *T,WORD1,24/JSN,18/,6/AWBP,1/B,1/U,1/D,1/N,2/,6/AAL *T,WORD2,18/MCN,18/TACN,18/AACN,1/P,1/F,1/K,1/N,1/A,1/ *ENDTEXT * * # BASED ARRAY AST[00:00] S(ASTSIZ$); BEGIN # **** # ITEM AST$WORD0 U(00,00,60); # WORD 0 REFERENCE # ITEM AST$WORD1 U(01,00,60); # WORD 1 REFERENCE # ITEM AST$WORD2 U(02,00,60); # WORD 2 REFERENCE # ITEM AST$WORD3 U(03,00,60); # WORD 3 REFERENCE # ITEM AST$WORD4 U(04,00,60); # WORD 4 REFERENCE # ITEM AST$ANAM C(00,00,07); # APPLICATION NAME # ITEM AST$PANAM C(00,00,07); # PRIMARY APPL NAME # ITEM AST$UPANAM U(00,00,42); # PRIMARY APPL NAME # ITEM AST$AN U(00,51,09); # APPLICATION NUMBER # ITEM AST$JSN C(01,00,04); # JOB SEQUENCE NUMBER # ITEM AST$RETRY U(01,24,08); # RETRY COUNT # ITEM AST$XFERF B(01,32,01); # NETWORK XFER CALLS ALLOWED # ITEM AST$AWBP U(01,42,06); # ACCESS WORD BIT POSITION # ITEM AST$BNUF B(01,48,01); # AWBP NOT UNIQUE TO APPL FLAG # ITEM AST$UIDF B(01,49,01); # UNIQUE IDENTIFR REQUIRED FLAG # ITEM AST$DIF B(01,50,01); # APPLICATION DISABLED FLAG # ITEM AST$DNF B(01,51,01); # APPLICATION DOWN FLAG # ITEM AST$SNPF B(01,52,01); # SEC NETON PENDING FLAG # ITEM AST$PRUF B(01,53,01); # ALLOWED TO USE PRU INTERFACE # ITEM AST$AAL U(01,54,06); # APPLICATION ACCESS LEVEL # ITEM AST$RICN B(02,05,01); # THIS APP RESTRICT INCOMG CONN # ITEM AST$MXICN U(02,06,12); # MAX INCOMMING CONNS ALLOWED # ITEM AST$MCN U(02,18,12); # TOTAL NUM OF CONN APPL ALLOWED# ITEM AST$TACN U(02,30,12); # CUREENT NUMBER OF T-A CONN # ITEM AST$AACN U(02,42,12); # CURRENT NUMBER OF A-A CONN # ITEM AST$PPF B(02,54,01); # PRIVILEGED PROGRAM FLAG # ITEM AST$PUF B(02,55,01); # PRIVILEGED USER FLAG (UNUSED) # ITEM AST$KDSPF B(02,56,01); # PERMISSION TO USE K-DSP FLAG # ITEM AST$NON B(02,57,01); # NET/OFF/N NEEDED # ITEM AST$AFN B(02,58,01); # FAIL/APPL/N NEEDED # ITEM AST$RS B(02,59,01); # REQUEST STARTABLE FLAG # ITEM AST$SANAM C(03,00,07); # SEC APPL NAME # ITEM AST$USANAM U(03,00,42); # SEC APPL NAME # ITEM AST$RACN I(03,42,12); # TOTAL NUMBER OF RESERVED CONN # ITEM AST$ICCN U(04,06,12); # TOTAL NUMBER OF INCOMING CONN # ITEM AST$MXCOP U(04,18,04); # MAXIMUM COPIES # ITEM AST$CUCOP U(04,22,04); # NUMBER ACTIVE COPIES # ITEM AST$PNCOP U(04,26,04); # NUMBER PENDING COPIES # ITEM AST$PAPAST U(04,30,09); # PRIMARY AST ORDINAL # ITEM AST$TCAN U(04,42,18); # CANCEL NUMBER FOR START TIMER # # **** # END ITEM ASTLNGTH I; # LENGTH OF AST TABLE # # ** *E ** ALTB - AUTO LOGIN TABLE. * * ALTB IS USED TO STORE AUTO LOGIN INFORMATION. EACH ENTRY SHOULD * CONTAIN A TERMINAL NAME, FAMILY, USER, AND APPLICATION NAMES. * THIS TABLE IS ACCESSED WHEN THE AUTO LOGIN FLAG IN THE INCOMING * CR/ITE/R SM IS SET. * * * THE FOLLOWING IS THE FORMAT OF AN ALTB ENTRY. EACH ENTRY * IS FOUR WORDS LONG. * * * 1 2 3 4 5 * 012345678901234567890123456789012345678901234567890123456789 *TEXT *T,WORD0,42/TNAM,18/ *T,WORD1,42/FNAM,3/FI,15/ *T,WORD2,42/UNAM,3/UI,15/ *T,WORD3,42/ANAM,3/AI,15/ *ENDTEXT * * # BASED ARRAY ALTB [00:00] S(ALTSIZ$); BEGIN # **** # ITEM ALT$TNAM C(00,00,07); # TERMINAL NAME # ITEM ALT$FNAM C(01,00,07); # FAMILY NAME # ITEM ALT$FIND U(01,42,03); # FAMILY INDICATOR # ITEM ALT$UNAM C(02,00,07); # USER NAME # ITEM ALT$UIND U(02,42,03); # USER INDICATOR # ITEM ALT$ANAM C(03,00,07); # APPLICATION NAME # ITEM ALT$AIND U(03,42,03); # APPLICATION INDICATOR # ITEM ALT$WRD0 U(00,00,60); ITEM ALT$WRD1 U(01,00,60); ITEM ALT$WRD2 U(02,00,60); ITEM ALT$WRD3 U(03,00,60); # **** # END ITEM ALTL; # AUTO LOGIN TABLE LENGTH # # ** CPMRQ - CPM REQUEST QUEUE. * * CPMRQ IS THE INPUT QUEUE TO ISSUE-CPM-REQUEST ROUTINE. IT * CONTAINS CPM REQUEST 56B (VALID) AND/OR 73B (DECREMENT FAMILY * COUNT). # BASED ARRAY CPMRQ[00:00] S(1); BEGIN ITEM CPM$WORD U(00,00,60); # FULL WORD REFERENCE # END ITEM CPMLNGTH I; # CPMRQ QUEUE LENGTH # # ** CTQ - CONNECTION TRAFFIC QUEUE. * * CTQ IS THE INPUT QUEUE TO THE C-LAYER. IT CONTAINS CONNECTION * SMS, PROTOCOL SMS, DATA BLOCKS, TERMINAL TEXT, AND PROTOCOL * RESPONSE SMS. # BASED ARRAY CTQ[00:00] S(1); BEGIN ITEM CTQ$WORD U(00,00,60); # FULL WORD REFERENCE # END ITEM CTQLNGTH I; # CTQ QUEUE LENGTH # # ** IFMC - INCREMENTED FAMILY COUNT TABLE * * THIS TABLE IS USED TO HOLD THE FAMILY NAMES AND THE NUMBER OF * INCREMENTED FAMILY COUNT FOR THE PARTICULAR FAMILY NAME. * WHEN NAM CRASHES, THIS TABLE WILL BE USED TO DECREMENT ALL THE * FAMILY COUNTS THAT WERE INCREMENTED BY NVF. # BASED ARRAY IFMC[00:00] S(1); BEGIN ITEM IFMC$WORD U(00,00,60); # FULL WORD REFERENCE # ITEM IFMC$FNAM C(00,00,07); # FAMILY NAME # ITEM IFMC$COUNT U(00,48,12); # INCREMENTED FAMILY COUNT # END ITEM IFCLNGTH I; # IFC TABLE LENGTH # # ** OPTQ - OPERATOR TYPEIN QUEUE. * * OPTQ IS THE INPUT QUEUE TO RECOGNIZE OPERATOR COMMAND PROCESS. * IT CONTAINS ALL INCOMING COMMANDS FROM THE HOP. # BASED ARRAY OPTQ[00:00] S(1); BEGIN ITEM OPQ$WORD U(00,00,60); # FULL WORD REFERENCE # END ITEM OPQL I; # LENGTH OF OPERATOR TYPEIN QUEUE # # ** PEQ - PROTOCOL EVENT QUEUE. * * PEQ RECEIVES ALL CONNECTION/OPERATOR RELATED ASYNCHROOUS * SUPERVISORY MESSAGES THAT MUST BE PROCESSED BY THE * HOP-PROTOCOL-EVENT PROCESS EXCEPT FOR THE FC/BRK SM, * WHICH IS PASSED TO THE INNER LAYER AS AN OPERATOR TYPEIN * (THE FC/BRK IS USED AS A PIPE CLEANER BETWEEN THE * CONNECTION AND INNER LAYERS AND HENCE MUST BE PROCESSED * AFTER(SYNCHRONOUS WITH) ANY TYPEINS ALREADY QUEUED FOR * THE INNER LAYER). # BASED ARRAY PEQ[00:00] S(1); BEGIN ITEM PEQ$WORD U(00,00,60); # FULL WORD REFERENCE # END ITEM PEQL I; # PEQ QUEUE LENGTH # # ** HCQ - HOP PROGRAM CONTROL QUEUE. * * HCQ IS THE INPUT QUEUE TO PERFORM PROGRAM CONTROL PROCESS. IT * CONTAINS SMS PERTINENT TO COMMUNICATION BETWEEN THE HOP AND NVF * FOR PROGRAM CONTROL. # BASED ARRAY HCQ[00:00] S(1); BEGIN ITEM HCQ$WORD U(00,00,60); # FULL WORD REFERENCE # END ITEM HCQLNGTH I; # HCQ QUEUE LENGTH # # ** OTQ - OUTGOING TRAFFIC QUEUE. * * OTQ CONTAINS OUTGOING SMS AND DATA BLOCKS FROM NVF TO NIP. # BASED ARRAY OTQ[00:00] S(1); BEGIN ITEM OTQ$WORD U(00,00,60); # FULL WORD REFERENCE # END ITEM OTQLNGTH I; # OTQ QUEUE LENGTH # # ** PDCT - PASSIVE DEVICE CONNECTION TABLE * * PDCT TABLE CONTAINS AN ENTRY FOR EACH TERMINAL THAT IS A CLUSTER * TYPE TERMINAL, I.E., ONE THAT SUPPORTS BATCH DEVICES. THIS IS A * VARIABLE ENTRY-SIZE TABLE, WITH EACH ENTRY CONTAINING CONSOLE * INFORMATION FOLLOWED BY PASSIVE DEVICE INFORMATION. THE CONSOLE * INFORMATION PORTION OF THE ENTRY HAS A FIXED SIZE OF *PDCTSIZ$* * WORDS. THE PASSIVE INFORMATION PORTION OF THE ENTRY IS VARIABLE * IN SIZE, DEPENDING ON THE NUMBER OF PASSIVE DEVICES, EACH DEVICE * TAKING UP ONE WORD. # BASED ARRAY PDCT[00:00] S(1); BEGIN ITEM PDT$WORD U(00,00,60); # FULL WORD REFERENCE # ITEM PDT$CN C(00,00,07); # TERMINAL NAME OF CONSOLE # ITEM PDT$WC U(00,54,06); # NUMBER OF WORDS IN THIS ENTRY # ITEM PDT$CAPP C(00,00,07); # APPLICATION NAME # ITEM PDT$CSTAT U(00,45,03); # STATE OF CONSOLE DEVICE # ITEM PDT$CVCB U(00,48,12); # VCB ORDINAL OF CONSOLE DEVICE # ITEM PDT$FWORD U(00,00,60); # REFERENCE FAMILY WORD # ITEM PDT$FNAM C(00,00,07); # FAMILY NAME # ITEM PDT$FORD U(00,48,06); # FAMILY ORDINAL # ITEM PDT$UWORD U(00,00,60); # REFERENCE USER WORD # ITEM PDT$AHMT U(00,00,60); # SYSTEM RESOURCE AVAIL TO USER # ITEM PDT$AHDS U(00,00,60); # SYSTEM RESOURCE AVAIL TO USER # ITEM PDT$AAWC U(00,00,60); # ACCESS CONTROL WORD # ITEM PDT$ATWD U(00,00,60); # TERMINAL CHARACTERISTICS # ITEM PDT$AAVW U(00,00,60); # APPLICATION VALIDATION WORD # ITEM PDT$PN C(00,00,07); # TERMINAL NAME OF PASSIVE DEF # ITEM PDT$PSTAT U(00,45,03); # STATE OF PASSIVE DEVICE # ITEM PDT$PVCB U(00,48,12); # VCB ORDINAL OF PASSIVE DEVICE # END ITEM PDTLNGTH I; # LENGTH OF PDCT TABLE # # ** *E ** PTAC - PENDING TERMINAL TO APPLICATION CONNECTION TABLE * * PTAC TABLE CONTAINS AN ENTRY FOR EACH TERMINAL CONNECTED TO * *NVF*. THIS IS A FIXED ENTRY-SIZE TABLE. * * * THE FOLLOWING IS THE FORMAT OF A PTAC ENTRY. EACH ENTRY *TEXT * IS 30-WORDS LONG. *ENDTEXT * * * 1 2 3 4 5 * 012345678901234567890123456789012345678901234567890123456789 *TEXT *T,WORD0,42/TNAM,3/,1/I,1/E,1/A,12/ACN *TEXT *T,WORD1,12/VCB,3/AB,4/SDT,4/DT,5/TC,4/DO,8/PW,8/PL,11/XBZ,1/I *ENDTEXT *T,WORD2,42/OCN,6/SL,11/DBZ,1/ *T,WORD3,30/CNTIME,30/SWTIME *T,WORD4,42/FNAM,6/,6/FORD,1/ ,1/F,1/V,1/S,1/L,1/ *T,WORD5,6/UBZ,54/ *T,WORD6,42/UNUM,18/ *T,WORD7,42/SWTAPP,18/ *T,WORD8,60/ *T,WORD9,60/AHMT *T,WORD10,60/AHDS *T,WORD11,12/AAWC,24/ABITS,24/ *T,WORD12,60/ATWD *T,WORD13,60/ASWI *T,WORD14,42/ALIFAM,3/FI,15/ *T,WORD15,42/ALIUSR,3/UI,15/ *T,WORD16,42/ALIAPP,3/AI,15/ *T,WORD17,42/ADSAPP,6/ASTOR,11/,1/V *TEXT *T,WORD18,42/VLTFAM,5/VLTF,3/USE,3/APP,4/STAT,3/PRO *ENDTEXT *T,WORD19,42/VLTUSR,18/CNUM *TEXT *T,WORD20,42/VLTPW,9/ ,8/RC,1/A *T,WORD21,42/VLTAPP,6/UBZ,2/ ,7/INLGTH,1/D,1/P,1/I *ENDTEXT *TEXT *T,WORD22,60/CHARGE NUMBER *T,WORD23,60/PROJECT NUMBER *T,WORD24,60/PROJECT NUMBER *TEXT *T,WORD25,30/LCNTIM,30/LSWTIM *T,WORD26,9/PRIAN,1/ ,8/LRC *T,WORD27,60/PID *T,WORD28,60/PID *T,WORD29,60/EXPDAT *ENDTEXT *ENDTEXT *ENDTEXT * * # BASED ARRAY PTAC[00:00] S(PTACSIZ$); BEGIN # **** # ITEM PTA$TWORD U(00,00,60); # REFERENCE TERMINAL NAME WORD # ITEM PTA$TN C(00,00,07); # TERMINAL NAME # ITEM PTA$TNAM U(00,00,42); # TERM NAME (INTEGER FIELD) # ITEM PTA$NET B(00,42,01); # NETWORK TYPE # ITEM PTA$RCNA B(00,43,01); # CR/RCN/A SENT FLAG # ITEM PTA$LCF B(00,44,01); # LOANED CONNECTION FLAG # ITEM PTA$ICF B(00,45,01); # INTERACTIVE CAPABILITY FLAG # ITEM PTA$SPTAC B(00,46,01); # SUB PTAC EXISTS FLAG # ITEM PTA$ALIF B(00,47,01); # AUTO-LOGIN FLAG # ITEM PTA$ACN U(00,48,12); # APPLICATION CONNECTION NUMBER # ITEM PTA$VCB U(01,00,12); # VCB ORDINAL # ITEM PTA$ABL U(01,12,03); # APPLICATION BLOCK LIMIT # ITEM PTA$SDT U(01,15,04); # SUB-DEVICE TYPE # ITEM PTA$DT U(01,19,04); # DEVICE TYPE # ITEM PTA$TC U(01,23,05); # TERMINAL CLASS # ITEM PTA$DO U(01,28,04); # DEVICE ORDINAL # ITEM PTA$PW U(01,32,08); # PAGE WIDTH # ITEM PTA$PL U(01,40,08); # PAGE LENGTH # ITEM PTA$XBZ U(01,48,11); # TRANSMISSION BLOCK SIZE # ITEM PTA$IUVF B(01,59,01); # INITIAL USER VALIDATION FLAG # ITEM PTA$OCN C(02,00,07); # OWNING CONSOLE NAME # ITEM PTA$SL U(02,44,04); # SECURITY LEVEL # ITEM PTA$DBZ U(02,48,11); # DOWNLINE BLOCK SIZE # ITEM PTA$HW B(02,59,01); # HARDWIRED FLAG # ITEM PTA$CNTIME U(03,00,30); # CONNECT TIME - MODDHHMMSS # ITEM PTA$SWTIME U(03,30,30); # SWITCH TIME - MODDHHMMSS # ITEM PTA$FWORD U(04,00,60); # REFERENCE FAMILY WORD # ITEM PTA$FNAM C(04,00,07); # FAMILY NAME # ITEM PTA$FORD U(04,45,09); # FAMILY ORDINAL # ITEM PTA$IFCTF B(04,55,01); # INCREMENT FAMILY COUNT FLAG # ITEM PTA$DVERR B(04,56,01); # DEVICE ERROR FLAG # ITEM PTA$SCINV U(04,57,02); # REF SECURITY CT AND INV LOGIN # ITEM PTA$SCEF B(04,57,01); # SECURITY COUNT EXHAUSTED FLAG # ITEM PTA$INVLF B(04,58,01); # INVALID LOGIN FLAG # ITEM PTA$PWORD U(05,00,60); # REFERENCE PASSWORD # ITEM PTA$PASSWD C(05,00,07); # PASSWORD # ITEM PTA$UWORD U(06,00,60); # REFERENCE USER WORD # ITEM PTA$UNUM C(06,00,07); # USER NUMBER # ITEM PTA$UIDX U(06,42,18); # USER INDEX # ITEM PTA$AWORD U(07,00,60); # REFERENCE APPLICATION WORD # ITEM PTA$SWTAPP C(07,00,07); # APPLICATION TO SWITCH TO # ITEM PTA$SWTAN U(07,42,09); # SWITCHED APPL NUMBER # ITEM PTA$VTP U(07,52,08); # VTP VERSION # ITEM PTA$AHMT U(09,00,60); # SYSTEM RESOURCE AVAIL TO USER # ITEM PTA$AHDS U(10,00,60); # SYSTEM RESOURCE AVAIL TO USER # ITEM PTA$AAWC U(11,00,60); # ACCESS CONTROL WORD # ITEM PTA$CACA B(11,33,01); # CONCURRENT ACCESS ALLOWED # ITEM PTA$COPI B(11,34,01); # PERSONAL ID NOT NEEDED # ITEM PTA$WSV B(02,42,01); # WAIT FOR SECOND VALIDATION # ITEM PTA$IFU B(02,43,01); # INVALID FAMILY/USER NAME # ITEM PTA$ATWD U(12,00,60); # TERMINAL CHARACTERISTICS # ITEM PTA$AAVW U(13,00,60); # APPLICATION VALIDATION WORD # ITEM PTA$ALIFAM C(14,00,07); # AUTO-LOGIN FAMILY NAME # ITEM PTA$FAMIND U(14,42,03); # MANDATORY/DEFAULT FAMILY # ITEM PTA$AFWRD U(14,00,60); ITEM PTA$ALIUSR C(15,00,07); # AUTO-LOGIN USER NAME # ITEM PTA$USRIND U(15,42,03); # MANDATORY/DEFAULT USER # ITEM PTA$AUWRD U(15,00,60); ITEM PTA$ALIAPP C(16,00,07); # AUTO-LOGIN APPLICATION NAME # ITEM PTA$APPIND U(16,42,03); # MANDATORY/PRIMARY APPLICATION # ITEM PTA$AAWRD U(16,00,60); ITEM PTA$VDSAPP C(17,00,07); # VALIDUS APPLICATION NAME # ITEM PTA$VDSF B(17,59,01); # VALIDUS APPL EXIST FLAG # ITEM PTA$VLTFAM C(18,00,07); # VOLUNTEERED FAMILY NAME # ITEM PTA$VLTF U(18,42,05); # REF ALL VOLUNTEERED FLAGS # ITEM PTA$VFF B(18,42,01); # VOLUNTEERED FAMILY EXIST FLAG # ITEM PTA$VUF B(18,43,01); # VOLUNTEERED USER EXIST FLAG # ITEM PTA$VPF B(18,44,01); # VOLUNTEERED PASSWD EXIST FLAG # ITEM PTA$VAF B(18,45,01); # VOLUNTEERED APPL EXIST FLAG # ITEM PTA$VPIDF B(18,46,01); # VOLUNTEERED PERSONAL ID FLAG # ITEM PTA$USERCT U(18,47,03); # USER RETRY COUNT # ITEM PTA$APPLCT U(18,50,03); # APPLICATION RETRY COUNT # ITEM PTA$STATE U(18,53,04); # STATE OF THIS TERMINAL # ITEM PTA$PROMPT U(18,57,03); # CURRENT PROMPT FOR TERMINAL # ITEM PTA$VLTUSR C(19,00,07); # VOLUNTEERED USER NAME # ITEM PTA$CNUM U(19,42,18); # TIMER CANCELLATION NUMBER # ITEM PTA$VLTPW C(20,00,07); # VOLUNTEERED PASSWORD # ITEM PTA$RC U(20,51,08); # REASON CODE FOR CR/TRM SM # ITEM PTA$AFF B(20,59,01); # APPLICATION FAILED FLAG # ITEM PTA$VAWORD U(21,00,60); # REF VOLUNTEERED APPL WORD # ITEM PTA$VLTAPP C(21,00,07); # VOLUNTEERED APPLICATION NAME # ITEM PTA$UBZ U(21,42,06); # UPLINE BLOCK SIZE # ITEM PTA$INLGTH U(21,50,07); # CHARACTER LENGTH OF LOGIN LINE# ITEM PTA$INVPID B(21,57,01); # INVALID PERSONAL ID ENTERED # ITEM PTA$PWEXPF B(21,58,01); # PASSWORD EXPIRATION DATE SET # ITEM PTA$INVAF B(21,59,01); # INVALID APPLICATION FLAG # ITEM PTA$LCNTIM U(25,00,30); # LOAN CONNECT TIME # ITEM PTA$LSWTIM U(25,30,30); # LOAN SWITCH TIME # ITEM PTA$PRIAN U(26,00,09); # PRI APPL NUMBER # ITEM PTA$LRC U(26,10,08); # LOAN CONNECTION REASON CODE # ITEM PTA$PID C(27,00,20); # PERSONAL IDENTIFIER FIELD # ITEM PTA$APPPID C(27,00,07); # PID ACTUALLY AN APPL ENTRY # ITEM PTA$EXPDAT C(29,00,10); # PASSWORD EXPIRATION DATE # ITEM PTA$CHGNUM C(22,00,10); # CHARGE NUMBER # ITEM PTA$PRJNUM C(23,00,20); # PROJECT NUMBER # # **** # END ITEM PTALNGTH I; # LENGTH OF PTAC TABLE # # ** SPTAC - SUB PTAC TABLE. * * THIS TABLE CONTAINS THE OPTIONAL WORDS OF THE CR/RCN/R SM * FOR A LOANED CONNECTION TYPE. # BASED ARRAY SPTAC[00:00] S(1); BEGIN ITEM SPT$WORD U(00,00,60); ITEM SPT$VCB U(00,12,12); # OWNING PTAC VCB ORDINAL # ITEM SPT$ESIZE U(00,48,12); # ENTRY SIZE IN CM WORDS # ITEM SPT$WRD2 U(01,00,60); END ITEM SPTACL I; # LENGTH OF SPTAC TABLE # # ** * ** RAU - RESTRICTED APPLICATION USER TABLE. * * RAU TABLE CONTAINS AN ENTRY FOR EACH APPLICATION THAT CAN HAVE * ONLY 1 UNIQUE FAMILY/USER CONNECTED TO IT. THIS IS A FIXED * ENTRY-SIZE TABLE. * * * THE FOLLOWING IS THE FORMAT OF A RAU ENTRY. EACH ENTRY * IS 1-WORD LONG. * * * 1 2 3 4 5 * 012345678901234567890123456789012345678901234567890123456789 *TEXT *TEXT *T,9/AN,21/,18/UIDX,3/,9/FORD *ENDTEXT *ENDTEXT * * # BASED ARRAY RAU[00:00] S(RAUSIZ$); BEGIN # **** # ITEM RAU$AN U(00,00,09); # APPLICATION NUMBER # ITEM RAU$FNAM C(01,00,07); # FAMILY NAME # ITEM RAU$UIDX U(01,42,18); # USER INDEX # # **** # END ITEM RAULNGTH I; # LENGTH OF RAU TABLE # # ** * ** RML - RESTRICT MULTIPLE LOGINS TABLE. * * THE RML TABLE CONTAINS AN ENTRY FOR EACH INTERACTIVE USER WHICH * IS RESTRICTED MULTIPLE CONCURRENT LOGINS. * * THE FOLLOWING IS THE FORMAT OF A RML ENTRY. EACH ENTRY * IS 1-WORD LONG. * *TEXT *T,42/FAMILY NAME,18/USER INDEX *ENDTEXT * * # BASED ARRAY RML[00:00] S(RMLSIZ$); BEGIN # **** # ITEM RML$FNAM C(00,00,07); # FAMILY ORDINAL # ITEM RML$UIDX U(00,42,18); # USER INDEX # # **** # END ITEM RMLLNGTH I; # LENGTH OF RML TABLE # # ** TAINPQ - TERMINAL TO APPLICATION INPUT QUEUE. * * TAINPQ IS THE INPUT QUEUE TO THE T-A PROCESS. IT CONTAINS * CONNECTION SMS, PROTOCOL SMS, AND DATA BLOCKS. EACH ENTRY IS * COPIED TO A FIXED BUFFER PRIOR TO BEING PROCESSED. # BASED ARRAY TAINPQ[00:00] S(1); BEGIN ITEM TAQ$WORD U(00,00,60); # FULL WORD REFERENCE # END ITEM TAQLNGTH I; # TAINPQ QUEUE LENGTH # # ** TRQ - TIMER REQUEST QUEUE. * * TRQ IS USED TO RETAIN TIMER REQUESTS UNTIL THE TIME * HAS EXPIRED. THEN THE TIMER REQUEST BLOCK IS RETURNED * TO THE REQUESTOR. IT IS USED ONLY BY THE FOLLOWING * SS ROUTINES: * *SSCATR* *SSCCTR* *SSCRTR* # BASED ARRAY TRQ[00:00] S(1); BEGIN ITEM TRQ$WORD U(00,00,60); # FULL WORD REFERENCE # END ITEM TRQLNGTH I; # TRQ QUEUE LENGTH # # ** USQ - UNSOLICITED STATUS QUEUE. * * USQ IS THE INPUT QUEUE TO UPDATE-HISTORY-BUFFER PROCESS. * IT CONTAINS REPORTS OF SIGNIFICANT EVENTS, PERTINENT TO NVF, * OCCURRING IN THE NETWORK WHICH MAY REQUIRE OPERATOR ATTENTION. # BASED ARRAY USQ[00:00] S(1); BEGIN ITEM USQ$WORD U(00,00,60); # FULL WORD REFERENCE # END ITEM USQLNGTH I; # USQ QUEUE LENGTH # # ** HSBUF - HISTORY BUFFER. * * HSBUF CONTAINS REPORTS OF SIGNIFICANT EVENTS, PERTINENT TO NVF * OCCURRING IN THE NETWORK WHICH MAY REQUIRE OPERATOR ATTAEENTION. * IT IS A SUBSET OF UNSOLICITED-STATUS-QUEUE (USQ). # BASED ARRAY HSBUF[00:00] S(1); BEGIN ITEM HSB$WORD U(00,00,60); # FULL WORD REFERENCE # ITEM HSB$ZERO U(00,48,12); # ZERO BYTE TERMINATOR # END ITEM HSBL; # HISTORY BUFFER LENGTH # # ** VCBRDQ - VCB (VALIDATION CONTROL BLOCK) READ DATA QUEUE. * * VCBRDQ IS THE INPUT QUEUE TO RECEIVE-VCB-DATA PROCESS. IT * CONTAINS INFORMATION PERTAINING TO A CONNECTION THAT HAS BEEN * SUCCESSFULLY SWITCHED TO AN APPLICATION. # BASED ARRAY VCBRDQ[00:00] S(1); BEGIN ITEM VRD$WORD U(00,00,60); # FULL WORD REFERENCE # END ITEM VRDLNGTH I; # VCBRDQ QUEUE LENGTH # # ** VSQ - VCB (VALIDATION CONTROL BLOCK) SERIAL-SEARCH REQUEST QUEUE. * * VSQ IS THE INPUT QUEUE TO THE PROCESS-SERIAL-SEARCH-REQUEST * ROUTINE. IT CONTAINS REQUEST(S) FOR AN ENTRY(IES) IN THE * VCB FILE THAT MATCHES A GIVEN SET OF VALUES. # BASED ARRAY VSQ[00:00] S(1); BEGIN ITEM VSQ$WORD U(00,00,60); # FULL WORD REFERENCE # END ITEM VSQL I; # VSQ QUEUE LENGTH # # ** VCBSSQ - VCB (VALIDATION CONTROL BLOCK) SERIAL SEARCH DATA QUEUE. * * VCBSSQ IS THE DESTINATION QUEUE FOR DATA FROM A SERIAL SEARCH OF * THE VCB FILE. IT CONTAINS DATA IN THE FORMAT OF ONE VCB RECORD * PER ENTRY. IT IS BUILT BY *NVFVDCD* AND PROCESSED BY *NVFVFSD*. * THE DEFINED ARRAY ENTRY SIZE IS ONE WORD TO FACILITATE STORAGE * MOVING. # BASED ARRAY VCBSSQ[00:00] S(1); BEGIN ITEM VSS$WORD U(00,00,60); # FULL WORD REFERENCE # END ITEM VSSLNGTH I; # VCBSSQ QUEUE LENGTH # # ** VDATAQ - VALIDATION DATA QUEUE. * * VDATAQ IS THE INPUT QUEUE TO VERIFY-VALIDATION-DATA PROCESS. IT * CONTAINS VALIDATION DATA RETURNED FOR A CPM 56B REQUEST. EACH * ENTRY IS COPIED TO A FIXED BUFFER PRIOR TO BEING PROCESSED. # BASED ARRAY VDATAQ[00:00] S(1); BEGIN ITEM VDQ$WORD U(00,00,60); # FULL WORD REFERENCE # END ITEM VDQLNGTH I; # VDATAQ QUEUE LENGTH # # ** VRQ - VCB (VALIDATION CONTROL BLOCK) REQUEST QUEUE. * * VRQ IS THE INPUT QUEUE TO READ-VCB-FILE ROUTINE. IT CONTAINS * READ/WRITE VCB FILE REQUEST. # BASED ARRAY VRQ[00:00] S(1); BEGIN ITEM VRQ$WORD U(00,00,60); # FULL WORD REFERENCE # END ITEM VRQLNGTH I; # VRQ QUEUE LENGTH # # ** VWBT - VCB WRITE BLOCK TABLE. * * VWBT IS THE DESTINATION TABLE FOR DATA FROM A VCB WRITE REQUEST. * IT CONTAINS DATA IN THE FORMAT OF ONE VCB RECORD PER ENTRY. IT * IS BUILD BY *NVFVDCD* AND PROCESSED BY *NVFVWVF*. # BASED ARRAY VWBT[00:00] S(VBRECDN$); BEGIN ITEM VWB$WORD U(00,00,60); # FULL WORD REFERENCE # ITEM VWB$ORD U(00,48,12); # VCB ORDINAL # ITEM VWB$RPA U(00,48,09); # RELATIVE PRU ADDRESS # ITEM VWB$ENTRY U(00,57,03); # ENTRY NUMBER # END ITEM VWBLNGTH I; # VWBT TABLE LENGTH # # ** VWT - VCB WRITE REQUEST TABLE. * * VWT CONTAINS PENDING WRITE REQUESTS. IT IS BUILT BY *NVFVRVF* * AND PROCESSED BY *NVFVDCD*. # BASED ARRAY VWT[00:00] S(VBESIZN$); BEGIN ITEM VWT$WORD U(00,00,60); # FULL WORD REFERENCE # ITEM VWT$ORD U(00,48,12); # VCB ORDINAL # END ITEM VWTLNGTH I; # VWT TABLE LENGTH # # ** WBQ - WAITING BLOCK QUEUE. * * THIS QUEUE CONTAINS BLOCKS FOR ALL ACN S THAT CANNOT BE SENT. * THE CONNECTION MAY NOT HAVE BEEN INITIALIZED OR THE OUTSTANDING * BLOCK COUNT MAY BE AT LIMIT OR IN A INHIBITED OR WAITING STATE. * # BASED ARRAY WBQ[00:00] S(1); BEGIN ITEM WBQ$WORD U(00,00,60); # FULL WORD REFERENCE # ITEM WBQ$LICNT U(00,12,12); # HOP LINE COUNT # ITEM WBQ$ESIZE U(00,48,12); # ENTRY SIZE IN CM WORDS # ITEM WBQ$ABT U(01,00,06); # APP. BLOCK TYPE # ITEM WBQ$ABHACN U(01,06,12); # ACN IN ABH # ITEM WBQ$ABN U(01,18,18); # APPLICATION BLOCK NUMBER # ITEM WBQ$ACT U(01,36,04); # APP. CHARACTER TYPE # ITEM WBQ$NCP U(00,43,01); # NO CURSOR POSITION FLAG # ITEM WBQ$NFE U(01,44,01); # NO FORMAT EFFECTOR # ITEM WBQ$TLC U(01,48,12); # TEXT LENGTH # ITEM WBQ$PSFC U(02,00,16); # PSC/SFC IN SM # ITEM WBQ$CRSACN U(02,24,12); # ACN IN CR/SWT # ITEM WBQ$HIAF B(02,59,01); # HOP INPUT ALLOWED FLAG # END ITEM WBQLNGTH I; # LENGTH OF WBQ TABLE # # ** IWBQ - INCOMING WAITING BLOCK QUEUE. * * THIS QUEUE IS USED TO BUFFER BLK BLOCKS AS THEY COME INTO NVF. * THESE BLOCKS ARE KEPT HERE UNTIL THE MSG BLOCK COMES IN * INDICATING THE END OF THE TEXT. THE BLOCK IS THEN SENT TO THE * INNER LAYER FOR PROCESSING AND EDITING. # BASED ARRAY IWBQ [00:00] S(1); BEGIN ITEM IWQ$WORD I(00,00,60); # FULL WORD REFERENCE # ITEM IWQ$ACN U(00,06,12); # ACN VALUE OF BLK BLOCK # ITEM IWQ$WC U(00,48,12); # ENTRY WORD COUNT # END ITEM IWBQL I; # IWBQ TABLE LENGTH # # ** *E ** PAAC - PENDING A-A CONNECTION TABLE. * * THIS QUEUE HOLDS THE PENDING CONNECTION ENTRIES FOR APPLI- * CATION TO APPLICATION CONNECTIONS. * * * THE FOLLOWING IS THE FORMAT OF A PAAC ENTRY. EACH ENTRY * IS 15-WORDS LONG. * * * 1 2 3 4 5 * 012345678901234567890123456789012345678901234567890123456789 *TEXT *T,WORD0,18/RHID,4/MOD,2/,12/NACN,12/ACN,12/VCB *T,WORD1,4/SL,2/,4/ST,2/,8/IAPRC,1/ ,24/ABITS,4/DT,3/HR,8/PORT *T,WORD2,42/IAPNM,8/IAPAN,1/ ,9/IAPAST *T,WORD3,42/RAPNM,8/RAPAN,1/ ,9/RAPAST *T,WORD4,42/FAM,6/FORD,7/,1/F,1/P,2/SC,1/ *T,WORD5,42/USER,18/USRIDX *T,WORD6,30/OUTCUR(INCUR),30/OUTNXT(INNXT) *T,WORD7,30/CNTIME,30/SWTIME *T,WORD8,42/SWAP,8/SWAPAN,1/ ,9/SWAPAST *T,WORD9,8/NUMOUT,1/ ,8/SNODE,1/ ,8/DNOD,34/ *T,WORD10,60/AAWC *T,WORD11,60/ *T,WORD12,60/ *T,WORD13,60/ *T,WORD14,60/ *ENDTEXT * * # BASED ARRAY PAAC [00:00] S(PAACSIZ$); BEGIN # **** # ITEM PA$RHID C(00,00,03); # REMOTE HOST ID # ITEM PA$URHID U(00,00,18); ITEM PA$MODE U(00,18,04); # MULTI ORSINGLE HOST MODE # ITEM PA$NACN U(00,24,12); # NVF ACN # ITEM PA$ACN U(00,36,12); # CONNECTED APPL ACN # ITEM PA$VCB U(00,48,12); # VCB ORDINAL OF CONNECTION # ITEM PA$SL U(01,00,04); # SECURITY OR ACCESS LEVEL # ITEM PA$ICMCN B(01,05,01); # THIS IS AN INCOMMING CONN # ITEM PA$STATE U(01,06,06); # STATE OF PAAC # ITEM PA$IAPRC U(01,12,08); # REASON CODE FROM CR/IAP/R # ITEM PA$DT U(01,21,04); # DEVICE TYPE,5=INTR,6=INTER # ITEM PA$ICT U(01,27,04); # INPUT CHAR TYPE # ITEM PA$SMAN U(01,31,09); # CR/IAP/SM APPL NUM (REPEAT)# ITEM PA$IAPNM C(02,00,07); # CALLING APPL NAME # ITEM PA$IAPAN U(02,42,09); # CALLING APPL NUMBER # ITEM PA$WORD3 U(03,00,60); ITEM PA$RAPNM C(03,00,07); # CALLED APPL NAME # ITEM PA$RAPAN U(03,42,09); # CALLED APPL NUMBER # ITEM PA$VAL0 U(04,00,60); # VALIDATION WORD 0 # ITEM PA$FAM C(04,00,07); # FAMILY NAME # ITEM PA$FORD U(04,48,06); # FAMILY ORDINAL # ITEM PA$UPFCF B(04,55,01); # INC FAM COUNT FLAG # ITEM PA$UPWF B(04,56,01); # USE PASSWORD FLAG # ITEM PA$SCINV U(04,57,02); # REF SEC COUNT & INV LOGIN # ITEM PA$SCEF B(04,57,01); # SEC COUNT EXHAUSTED FLAG # ITEM PA$INVLF B(04,58,01); # INVALID LOGIN FLAG # ITEM PA$VAL1 U(05,00,60); # VALIDATION WORD 1 # ITEM PA$VAL2 U(06,00,60); # VALIDATION WORD 2 # ITEM PA$USER C(06,00,07); # USER NAME # ITEM PA$USRIDX U(06,42,18); # USER INDEX # ITEM PA$OUTCUR U(05,00,30); # CURRENT OUTCALL RWD # ITEM PA$INCUR U(05,00,30); # CURRENT INCALL RWD # ITEM PA$OUTNXT U(05,30,30); # NEXT OUTCALL RWD # ITEM PA$INNXT U(05,30,30); # NEXT INCALL RWD # ITEM PA$VAL3 U(07,00,60); # VALIDATION WORD 3 # ITEM PA$CNTIME U(07,00,30); # CONNECT TIME # ITEM PA$SWTIME U(07,30,30); # SWITCH TIME # ITEM PA$VAL4 U(08,00,60); # VALIDATION WORD 4 # ITEM PA$VAL5 U(09,00,60); # VALIDATION WORD 5 # ITEM PA$AHMT U(09,00,60); # RESOURCE AVAILABLE TO USER # ITEM PA$VAL6 U(10,00,60); # VALIDATION WORD 6 # ITEM PA$AHDS U(10,00,60); # RESOURCE AVAILABLE TO USER # ITEM PA$VAL7 U(11,00,60); # VALIDATION WORD 7 # ITEM PA$AAWC U(11,00,60); # ACCESS CONTROL WORD # ITEM PA$ABITS U(11,12,24); # REF APPL BITS OF AAWC # ITEM PA$VAL8 U(12,00,60); # VALIDATION WORD 8 # ITEM PA$ATWD U(12,00,60); # UNUSED VALIDATION WORD # ITEM PA$VAL9 U(13,00,60); # VALIDATION WORD 9 # ITEM PA$AAVW U(13,00,60); # APPLICATION VALIDATION WORD # ITEM PA$SWAP C(14,00,07); # SWITCHED APPL NAME # ITEM PA$SWAPAN U(14,42,09); # SWITCHED APPL AN # ITEM PA$NUMOUT U(15,00,08); # NUMBER OUTCALL ATTEMPTS # ITEM PA$VSTATE U(15,27,06); # VCB STATE # ITEM PA$SMSIZ U(15,33,08); # WRD LENGTH OF RAP # ITEM PA$FACWRD U(15,41,08); # START WORD FOR SM FACS # ITEM PA$FACSBIT U(15,49,08); # START BIT FOR SM FACS # ITEM PA$ICWRD2 U(16,00,60); # INCALL BLK WRD 2 # ITEM PA$PRI B(16,00,01); # PRIORITY FLAG # ITEM PA$DBL U(16,04,08); # DOWNLINE BLK LIMIT # ITEM PA$DBZ U(16,12,16); # DOWNLINE BLK SIZE # ITEM PA$ABL U(16,28,08); # APPL BLK LIMIT # ITEM PA$UBL U(16,36,08); # UPLINE BLK LIMIT # ITEM PA$UBZ U(16,44,08); # UPLINE BLK SIZE # ITEM PA$PORT U(16,52,08); # ACCESS PORT # ITEM PA$ICWRD3 U(17,00,60); # INCALL BLK WORD 3 # ITEM PA$WS U(17,16,04); # WINDOW SIZE # ITEM PA$DPLS U(17,20,08); # DATA PACKET LEN # ITEM PA$WININ U(17,28,04); # WIN SIZE IN # ITEM PA$WINOUT U(17,32,04); # WIN SIZE OUT # ITEM PA$DPLIN U(17,36,08); # PKT SIZE IN # ITEM PA$DPLOUT U(17,44,08); # PKT SIZE OUT # ITEM PA$RHWRD U(00,00,60); ITEM PA$CNWRD U(01,00,60); ITEM PA$IAPWRD U(02,00,60); ITEM PA$RAPWRD U(03,00,60); ITEM PA$FWORD U(04,00,60); ITEM PA$UWORD U(06,00,60); ITEM PA$TIMWRD U(07,00,60); ITEM PA$SWAPWRD U(14,00,60); ITEM PA$LLWRD U(15,00,60); ITEM PA$RAPSM U(18,00,60); # CR/RAP/N SM AREA # ITEM PA$RAPSM0 U(18,00,60); # WRD 0 OF RAP SM # ITEM PA$RAPSM1 U(19,00,60); # WRD 1 OF RAP SM # ITEM PA$RAPSM2 U(20,00,60); # WRD 2 OF RAP SM # ITEM PA$RAPSM3 U(21,00,60); # WRD 3 OF RAP SM # ITEM PA$RAPSM4 U(22,00,60); # WRD 4 OF RAP SM # ITEM PA$SNODE U(20,00,08); # SOURCE NODE # ITEM PA$DNOD U(20,08,08); # DESTINATION NODE # ITEM PA$WSIZ U(20,16,08); # WINDOW SIZE # ITEM PA$PSIZ U(20,24,08); # PKT SIZE # ITEM PA$DTEL U(20,32,08); # ZERO LEN DTE LEN # ITEM PA$FCL U(20,40,08); # FACILITY OCTET LEN # ITEM PA$NOFAC U(20,48,12); # EMPTY SPACE # ITEM PA$CNUM U(23,00,18); # CANCELLATION NUMBER # ITEM PA$LID C(23,18,03); # LOGICAL IDENTIFIER # ITEM PA$ULID U(23,18,18); ITEM PA$PID C(23,36,03); # PHYSICAL IDENTIFIER # ITEM PA$UPID U(23,36,18); ITEM PA$LPIDFC U(23,54,06); # LID/PID FUNCTION CODE # ITEM PA$CUACPID U(24,00,11); # CURRENT ACPID LOCATION # ITEM PA$NXACPID U(24,11,11); # NEXT ACPID LOCATION # ITEM PA$LIDSTAT U(24,22,08); # LID STATUS # ITEM PA$PIDSTAT U(24,30,08); # PID STATUS # ITEM PA$ACPIDL U(24,38,08); # LEN OF ACPID ENTRY # ITEM PA$PIDBIAS U(24,46,08); # PID ENTRY BIAS TO ACPID ETRY# ITEM PA$ACPIDNUM U(25,00,08); # NUMBER OF PIDS IN ACPID # ITEM PA$IAPPIDF B(25,30,01); # IAP SM PID SPECIFIED FLAG # ITEM PA$IAPSFF B(25,33,01); # IAP STORE/FORWARD PID FLAG # ITEM PA$OUTSPEC B(25,36,01); # OUTCALL PARMS ON CR/IAP SM # ITEM PA$PATHNXT U(25,37,11); # NEXT PATH AVAIL IN LLPID # ITEM PA$PIDCUR U(25,48,12); # CUR PID LOCATION IN LLPID # END # **** # ITEM PACLNGTH I; # LENGTH OF PAAC TABLE # # ** AAINPQ - APPL TO APPL INPUT QUEUE. * * THIS QUEUE IS THE INPUT QUEUE TO THE A-A PROCESS. # BASED ARRAY AAINPQ [00:00] S(1); BEGIN ITEM AAQ$WORD U(00,00,60); # FULL WORD REF # END ITEM AAQL I; # LEN OF AAINPQ # # ** OUTSMQ - OUTCALL REQUEST MESSAGE QUEUE. * * THIS QUEUE IS THE MAIN INPUT QUEUE FOR THE OUTCALL REQUEST * OVERLAY. IT WILL CONTAIN CR/IAP/R SMS. # BASED ARRAY OUTSMQ [00:00] S(1); BEGIN ITEM OUTS$WORD U(00,00,60); # WORD REFERENCE # END ITEM OUTSMQL I; # LENGTH OF OUTSMQ # # ** INSMQ - INCALL MESSAGE QUEUE. * * THIS QUEUE IS THE MAIN INPUT QUEUE FOR THE INCALL REQUEST * OVERLAY. IT WILL CONTAIN CR/RAP/R SMS. # BASED ARRAY INSMQ [00:00] S(1); BEGIN ITEM INS$WORD U(00,00,60); # WORD REFERENCE # END ITEM INSMQL I; # LENGTH OF INSMQ # # ** AAVCBRDQ - A-A VCB RECEIVE DATA QUEUE. * * RECEIVE VCB DATA QUEUE FOR A-A. # BASED ARRAY AAVCBRDQ [00:00] S(1); BEGIN ITEM AAVC$WORD U(00,00,60); END ITEM AAVCLNGTH I; # AAVCDATAQ LENGTH # # ** FACTAB - TABLE FOR HOLDING THE FACILITY PAIRS FOR A-A. # BASED ARRAY FACTAB [00:00] S(1); BEGIN ITEM FACT$WORD U(00,00,60); END ITEM FACTABL I; # LENGTH OF FACTAB # # * LLPID - LOGICAL LINK TO PID TABLE. # BASED ARRAY LLPID [00:00] S(1); BEGIN ITEM LLP$WORD U(00,00,60); # WORD REFERENCE # ITEM LLP$PNAME C(00,00,03); # PID NAME # ITEM LLP$ACLL U(00,37,11); # ACTIVE LOG LINKS FOR PID # ITEM LLP$PIDSTAT B(00,48,01); # PID ACCESSIBLE FLAG # ITEM LLP$LLCNT U(00,49,11); # LOG LINKS DEFINED FOR PID # ITEM LLP$WORD1 U(01,00,60); # WORD 1 REFERENCE # ITEM LLP$DN U(01,00,08); # DESTINATION NODE OF LLINK # ITEM LLP$SN U(01,08,08); # SOURCE NODE OF LLINK # ITEM LLP$PORT U(01,16,08); # NPU CALL ACCESS PORT # ITEM LLP$DTEL U(01,24,08); # CALLED DTE ADDR LENGTH # ITEM LLP$LLSTAT B(01,59,01); # LLINK STATUS # ITEM LLP$DTEA U(02,00,60); # DTE ADDRESS # END ITEM LLPIDL I; # LENGTH OF LLPID TABLE # # ** ACPID - ACTIVE PID TABLE. * * THIS TABLE CONTAINS ENTRIES FOR EACH A-A CONNECTION THAT * DICTATES THE USE OF LID/PID ATTRIBUTES IN ORDER TO * ESTABLISH AN A-A OUTCALL. # BASED ARRAY ACPID [00:00] S(1); BEGIN ITEM ACP$WORD0 U(00,00,60); ITEM ACP$WORD1 U(01,00,60); ITEM ACP$WORD2 U(02,00,60); ITEM ACP$WORD3 U(03,00,60); ITEM ACP$SMID U(00,00,12); # ENTRY IDENTIFIER # ITEM ACP$ESIZ U(00,48,12); # ENTRY SIZE IN CM WORDS # ITEM ACP$VCB U(01,18,18); # OWNING PAAC VCB ORDINAL # ITEM ACP$FC U(02,00,12); # FUNCTION CODE - SETPIDA # ITEM ACP$SPANP U(02,12,12); # NUNBER PIDS - SETPIDA # ITEM ACP$SPARES1 U(02,24,11); # RESERVED # ITEM ACP$SPANWID B(02,35,01); # NETWORD ID-SETPIDA # ITEM ACP$SPARES2 U(02,36,06); # RESERVED # ITEM ACP$RC U(02,42,08); # RETURN REASON CODE # ITEM ACP$RES3 U(02,50,10); # RESERVED # ITEM ACP$CBIT B(02,59,01); # FET BUSY BIT # ITEM ACP$SPAPID C(03,00,03); # 3 CHAR PID-SETPIDA # ITEM ACP$SPAUPID U(03,00,18); ITEM ACP$SPARES3 U(03,18,38); # RESERVED # ITEM ACP$SPAST U(03,56,04); # RETURN NETWORK STATUS # ITEM ACP$GLCWC U(02,00,12); # WORD COUNT-GETLIDC # ITEM ACP$GLCRES1 U(02,12,30); # RESERVED # ITEM ACP$GLCLID C(03,00,03); # 3 CHAR LID-GETLIDC # ITEM ACP$GLCULID U(03,00,18); ITEM ACP$GLCRES2 U(03,18,30); # RESERVED # ITEM ACP$GLCNP U(03,48,12); # NUMBER PIDS-GETLIDC # ITEM ACP$GLCPID C(04,00,03); # 3 CHAR PID 1-GETLIDC # ITEM ACP$GLCUPID U(04,00,18); ITEM ACP$GLCSF B(04,18,01); # STORE AND FORWARD-GETLIDC# ITEM ACP$GLCRES3 U(04,19,37); # RESERVED # ITEM ACP$GLCST U(04,56,04); # RET PID STATUS-GETLIDC # ITEM ACP$GPAPID C(02,00,03); # 3 CHAR PID-GETPIDA # ITEM ACP$GPAUPID U(02,00,18); ITEM ACP$GPARES1 U(02,18,24); # RESERVED # ITEM ACP$GPARPID C(03,00,03); # 3 CHAR PID-GETPIDA # ITEM ACP$GPARUPID U(03,00,18); ITEM ACP$GPARES2 U(03,18,38); # RESERVED # ITEM ACP$GPAST U(03,56,04); # RET PID STATUS-GETPIDA # END ITEM ACPIDL I; # ACPID TABLE LENGTH # # ** AALPID - A-A LID/PID FUNCTION QUEUE. * * THIS IS AN INPUT QUEUE TO THE MAIN A-A DISPATCHER. * IT CONTAINS STATUS QUEUE ENTRIES FROM COMPLETED * GETLIDC AND GETPIDA SFM FUNCTION REQUESTS. # BASED ARRAY AALPID [00:00] S(1); BEGIN ITEM AAL$WORD U(00,00,60); END ITEM AALPIDL I; # LENGTH OF AALPID TABLE # # ** LPIDFXQ - LID/PID FUNCTION QUEUE. * * THIS QUEUE IS AN INPUT QUEUE TO THE OUTCALL REQUEST OVERLAY. * IT CONTAINS THE COMPLETED STATUS FROM A GETLIDC OR GETPIDA * RA+1 FUNCTION CALL. # BASED ARRAY LPIDFXQ [00:00] S(1); BEGIN ITEM LP$WC U(00,48,12); # ENTRY SIZE IN CM WORDS # ITEM LP$VCB U(01,24,12); # OWNING PAAC VCB # END ITEM LPIDFXQL I; # LENGTH OF LPIDFXQ # # ** APOUTCL - APPLICATION SUPPLIED OUTCALL PARAMETERS * * THIS TABLE IS USED TO HOLD THE APPLICATION SUPPLIED OUTCALL * PARAMETERS WHICH MAY BE SPECIFIED IN THE CR/IAP/R SM. # BASED ARRAY APOUTCL [00:00] S(1); BEGIN ITEM APO$VCB U(00,36,12); # OWNING PAAC VCB # ITEM APO$WC U(00,48,12); # ENTRY SIZE IN CM WORDS # ITEM APO$WORD U(00,00,60); # FULL WORD REFERENCE # END ITEM APOUTCLL I; # LENGTH OF APOUTCL # # ** TEND - DUMMY LAST TABLE. * * TEND TABLE SERVES NO PURPOSE EXCEPT TO TERMINATE THE VECTOR OF * TABLE POINTERS USED BY THE *TABLE MANAGER*. # BASED ARRAY TEND[00:00] S(1); BEGIN ITEM TND$FL I(00,00,60); # CONTAINS ADDRESS AT END OF FL # END ITEM TNDTEND I; # CONTAINS TOTAL STORAGE USED # END # END TABLES # END # END TEXTNVF # TERM