Retro1.org codex

User Tools

Site Tools

Trace: • OMOVE • NVFIBSW
cdc:nos2.source:nam5871:nvfibsw

Table of Contents

NVFIBSW

Table Of Contents

  • [00003] PROC NVFIBSW
  • [00004] NVFIBSW - BUILD STATUS WORKLIST DEFINITIONS.
  • [00008] BUILD STATUS WORKLIST DEFINITIONS.
  • [00031] PROC SSACNI
  • [00032] PROC SSOCOL
  • [00033] PROC NVFTICR
  • [00034] PROC NVFVRVF
  • [00035] PROC NVFVPSR

Source Code

NVFIBSW.txt 
  1. *DECK     NVFIBSW 
  2. USETEXT          TEXTSS 
  3. PROC NVFIBSW; 
  4. # TITLE NVFIBSW - BUILD STATUS WORKLIST DEFINITIONS.                   #
  5.  
  6.       BEGIN # NVFIBSW # 
  7. # 
  8. **    NVFIBSW - BUILD STATUS WORKLIST DEFINITIONS.
  9. * 
  10. *     S. H. FISCHER.         81/08/31.
  11. * 
  12. *     THIS ROUTINE IS PART OF THE INTIALIZATION PROCESS FOR NVF.
  13. *     ITS JOB IS TO BUILD THE STATUS WORKLIST DEFINITIONS TABLE.
  14. * 
  15. *     PROC NVFIBSW
  16. * 
  17. *     ENTRY NONE. 
  18. * 
  19. *     EXIT       SWT TABLE INITIALIZED. 
  20. * 
  21. # 
  22.  
  23.  
  24.  
  25.  
  26. # 
  27. ****  PROC NVFIBSW XREF LIST. 
  28. # 
  29.       XREF
  30.         BEGIN 
  31.         PROC SSACNI;
  32.         PROC SSOCOL;
  33.         PROC NVFTICR; 
  34.         PROC NVFVRVF; 
  35.         PROC NVFVPSR; 
  36.         END 
  37. # 
  38. ****
  39. # 
  40.  
  41.  
  42.  
  43.  
  44.       SWTA = 5;                        # NUMBER OF ACTIVE ENTRIES      #
  45.  
  46.  
  47.       SWT$RTN[0] = LOC(SSACNI);        # CONTROL NETWORK INTERFACE     #
  48.       SWT$ADDR1[0] = LOC(SWTA); 
  49.       SWT$INIT1[0] = 0; 
  50.       SWT$ADDR2[0] = 0;                # DISABLE SECOND CHECK          #
  51.  
  52.  
  53.       SWT$RTN[1] = LOC(NVFTICR);       # ISSUE CPM REQUEST             #
  54.       SWT$ADDR1[1] = LOC(SWTA); 
  55.       SWT$INIT1[1] = 0; 
  56.       SWT$ADDR2[1] = 0;                # DISABLE SECOND CHECK          #
  57.  
  58.  
  59.       SWT$RTN[2] = LOC(NVFVRVF);       # READ VCB FILE                 #
  60.       SWT$ADDR1[2] = LOC(SWTA); 
  61.       SWT$INIT1[2] = 0; 
  62.       SWT$ADDR2[2] = 0;                # DISABLE SECOND CHECK          #
  63.  
  64.  
  65.       SWT$RTN[3] = LOC(NVFVPSR);       # PROCESS VCB SERIAL-SEARCH REQ #
  66.       SWT$ADDR1[3] = LOC(SWTA); 
  67.       SWT$INIT1[3] = 0; 
  68.       SWT$ADDR2[3] = 0;                # DISABLE SECOND CHECK          #
  69.  
  70.  
  71.       SWT$RTN[4] = LOC(SSOCOL);        # CONTROL OVERLAY LOADING       #
  72.       SWT$ADDR1[4] = LOC(SWTA); 
  73.       SWT$INIT1[4] = 0; 
  74.       SWT$ADDR2[4] = 0;                # DISABLE SECOND CHECK          #
  75.  
  76.  
  77.       END # NVFIBSW # 
  78.  
  79.       TERM
cdc/nos2.source/nam5871/nvfibsw.txt · Last modified: 2023/08/05 17:23 by Site Administrator