Retro1.org codex

*DECK     TXINNVF 
PROC TXINNVF; 
# TITLE TXINNVF - SYMPL TEXT FOR NVF INITIALIZATION ROUTINES.          #
# 
*     DATE              82/10/04. 
# 
CONTROL STEXT;
 
      BEGIN  # TXINNVF #
 
# 
**    WDFNV - WORKLIST DEFINITIONS. 
* 
*     THIS DEFINES THE SYMBOLS TO BE USED IN MAKING 
*     WORKLIST REQUESTS.
*     THE ORDER IN THE STATUS LIST SETS THE PRIORITY OF THE WORKLIST
*     REQUEST, FIRST IS THE HIGHEST PRIORITY, LAST IS LOWEST PRIORITY.
* 
*     ORIGINALLY THE DESIGN OF NVF SPECIFIED THAT THE ORDER IN THIS 
*     STATUS LIST SHOULD NOT EFFECT HOW NVF WOULD WORK.  IN OTHER 
*     WORDS THE PRIORITY IN WHICH WORKLISTS ARE PROCESSED SHOULD NOT
*     EFFECT NVF WORKING CORRECTLY.  THIS HAS SINCE BEEN VIOLATED.
*     THE *NCDQE* HAS BEEN PUT BEFORE *NTDQE* AND *NADQE* HAS BEEN
*     PUT BEFORE *NSDQE* BECAUSE THERE SEEMED TO BE NO OTHER WAY OF 
*     SOLVING THE PROBLEM.  IF THERE IS ANY NEED TO CHANGE THE ORDER
*     OF THIS STATUS LIST, THEN THE ABOVE MENTIONED PRIORITIES NEED 
*     TO BE KEPT INTACT.
# 
 
      STATUS WWDF 
 
        SCRTR,                         # SS RETURN-TIMER-REQUEST       #
        SACNI,                         # SS CONTROL-NETWORK-INTERFACE  #
        SOEOP,                         # SS EXECUTE-OVERLAY-PROGRAM    #
        NCDQE,                         # NVF DISPATCH-C-LAYER-Q-ENTRY  #
        NTDQE,                         # NVF DISPATCH-T/A-QUEUE-ENTRY  #
        NTICR,                         # NVF ISSUE-CPM-REQUEST         #
        NVRVF,                         # NVF READ-VCB-FILE             #
        NADQE,                         # NVF A-A QUEUE DISPATCH        #
        NAIAP,                         # NVF A-A OUTCALL SM QUEUE      #
        NSDQE,                         # NVF DISPATCH-APPL-QUEUE-ENTRY #
        NOAPE,                         # NVF ACTION-HOP-PROTO-EVENTS   #
        NOROC,                         # NVF RECOGNIZE-OPERATOR-COMMAND#
        NVPSR,                         # NVF PROCESS-VCB-SS-REQUESTS   #
        NOLNE,                         # NVF LOG NETWORK EVENTS        #
        NOFVD,                         # NVF PREPARE STATUS SERACH     #
        NOPPC,                         # NVF PREPARE PROGRAM CONTROL   #
        NICNE,                         # NVF COMPLETE NVF EXECUTION    #
        NARAP,                           # NVF A-A INCALL SM QUEUE #
        DUMMY,                         # DUMMY-ENTRY-FOR-DISABLING     #
      ; 
 
 
# 
**    NVFODF - NVF PRIMARY OVERLAY DEFINITIONS. 
* 
*     THIS STATUS LIST DEFINES THE PRIMARY OVERLAY NUMBERS FOR NVF. 
*     THESE OVERLAY NUMBERS ARE USED BY THE EXECUTION SEQUENCING
*     ROUTINES TO IDENTIFY THE REQUIRED OVERLAY WHEN AN OVERLAY TYPE
*     WORKLIST REQUEST IS PROCESSED.  THE STATUS LIST ORDER MUST BE 
*     SYNCHRONIZED WITH THE *OVERLAY* LOADER DIRECTIVES IN THE SOURCE 
*     CODE. 
# 
      STATUS NVFODF          # NVF OVERLAY NUMBERS                     #
        NMAIN,               # (0,0) - T-A CONN, SERVICES + SCHED CODE #
        NLAAC,               # (1,0) - A-A CONNECTION OVERLAY          #
        NLAEP,               # (2,0) - APPLICATION/EVENT OVERLAY       #
        NLOPC,               # (3,0) - OPERATOR COMMAND OVERLAY        #
        NLOPE,               # (4,0) - OPERATOR EVENT OVERLAY          #
        NLIAP,               # (5,0) - A-A OUTCALL OVERLAY #
        NLRAP,               # (6,0) - A-A INCALL OVERLAY # 
         ;
 
 
# 
*     THE FOLLOWING SEVERAL STATUS LISTS DEFINE THE ENTRY POINT NUMBERS 
*     FOR THE VARIOUS OVERLAYS DEFINED BY THE PRECEEDING STATUS LIST. 
*     WHEN EXECUTION IS TRANSFERRED TO AN OVERLAY, THE ENTRY POINT
*     NUMBER IS PASSED TO THAT OVERLAY SO THAT THE OVERLAY CAN SWITCH 
*     TO THE REQUIRED ROUTINE.
# 
 
# 
*     EPAAC - ENTRY POINT DEFINITIONS FOR A-A CONNECTION OVERLAY. 
# 
      STATUS EPAAC           # (1,0) OVERLAY ENTRY POINT NUMBERS       #
        NADQE                # DISPATCH A-A INPUT QUEUE ENTRY          #
         ;
 
# 
*     EPAEP - ENTRY POINT DEFINITIONS FOR APPLICATION AND EVENT 
*             PROCESSING OVERLAY. 
# 
      STATUS EPAEP           # (2,0) OVERLAY ENTRY POINT NUMBERS       #
        NSDQE,               # DISPATCH APPLICATION STATUS QUEUE ENTRY #
        NOLNE,               # LOG NETWORK EVENTS                      #
        NICNE,               # COMPLETE NVF EXECUTION                  #
         ;
 
# 
*     EPOPC - ENTRY POINT DEFINITIONS FOR OPERATOR COMMAND OVERLAY. 
# 
      STATUS EPOPC           # (3,0) OVERLAY ENTRY POINT NUMBERS       #
        NOROC,               # RECOGNIZE OPERATOR COMMAND              #
         ;
 
# 
*     EPOPE - ENTRY POINT DEFINITIONS FOR OPERATOR EVENT PROCESSING 
*             OVERLAY.
# 
      STATUS EPOPE           # (4,0) OVERLAY ENTRY POINT NUMBERS       #
        NOAPE,               # ACTION PROTOCOL EVENT                   #
        NOPPC,               # PERFORM PROGRAM CONTROL COMMANDS        #
        NOFVD,               # FORMAT VCB DATA (INTO USER:/TERM: LINE) #
         ;
 
# 
*     EPIAP - ENTRY POINT DEFS FOR A-A OUTCALL REQUEST OVERLAY. 
# 
 
      STATUS EPIAP           # (5,0) OVERLAY ENTRY POINT NUMBERS #
        NOIAP,               # MAIN DISPATCHER #
        ; 
 
# 
*     EPRAP - ENTRY POINT DEFS FOR A-A INCALL REQUEST OVERLAY . 
# 
 
      STATUS EPRAP           # (6,0) OVERLAY ENTRY POINT NUMBERS #
        NORAP,               # MAIN DISPATCHER #
        ; 
 
 
 
 
      END  # TXINNVF #
 TERM