DataMuseum.dk

Presents historical artifacts from the history of:

CR80 Wang WCS documentation floppies

This is an automatic "excavation" of a thematic subset of
artifacts from Datamuseum.dk's BitArchive.

See our Wiki for more about CR80 Wang WCS documentation floppies

Excavated with: AutoArchaeologist - Free & Open Source Software.


top - download

⟦e59667fd7⟧ Wang Wps File

    Length: 38642 (0x96f2)
    Types: Wang Wps File
    Notes: Spelunked
    Names: »~ORPHAN74.00«

Derivation

└─⟦a5d18cecd⟧ Bits:30006104 8" Wang WCS floppy, CR 0164A
    └─ ⟦this⟧ »~ORPHAN74.00« 

WangText

…1d……00……00……00……00…J…02……00……00…J
J…07…I…08…I…0e…I H…0a…H…0b…0…08…0…0d…0…02…0…06…0…07…/…09…/…0c…/…0f…/
/…06….…0a….…0e….…01….…05…-…08…-…09…-…0d…-…00…-…06…,…09…,…0c…,…00…, ,…07…+…0b…+…00…+ +…06……86…1                                             …02…           …02…   …02…
                           

…02…CPS/SDS/035

…02…MSN/820514…02……02…
SUPERVISOR VDU
DETAILED DESIGN SPECIFICATION…02……02…CAMPS







4.2.2    S̲u̲p̲e̲r̲v̲i̲s̲o̲r̲ ̲F̲u̲n̲c̲t̲i̲o̲n̲ ̲C̲o̲n̲t̲r̲o̲l̲ ̲S̲u̲b̲p̲a̲c̲k̲a̲g̲e̲ ̲(̲S̲F̲C̲O̲)̲

         SFCO Controls the execution of Supervisor Transactions,
         thereby controlling the functional behaviour of SVDIA
         and SRETR.

         Conrol is imposed by issue of commands and reception
         of answers.

         SFCO is controlled by SVCO with respect to if and which
         transactions may be executed. SVCO control is imposed
         by use of commands and answers to commands.



4.2.2.1  F̲u̲n̲c̲t̲i̲o̲n̲a̲l̲ ̲S̲p̲e̲c̲i̲f̲i̲c̲t̲i̲o̲n̲

         The subpackage has the functional responsibilities
         as listed below:

         -   React on SVCO control Commands

         -   Execution of f/c key entered commands

         -   Supervisor command validation

         -   Transaction Sequencing Control

         -   Transaction Accounting
         -   Transaction Interruption 

         -   Sending Request to the CAMPS System

         -   Supervisor Command Execution 

         Refer fig. 4.2.2.1-1 through 4.2.2.l-2




            Fig. 4.2.2.1-1 to fig. 4.2.2.1-2 


4.2.2.1.1    S̲F̲C̲O̲ ̲S̲o̲f̲t̲w̲a̲r̲e̲ ̲E̲r̲r̲o̲r̲ ̲F̲u̲n̲c̲t̲i̲o̲n̲s̲ ̲(̲1̲.̲0̲)̲

         a)  Q̲u̲e̲u̲e̲ ̲E̲r̲r̲o̲r̲ ̲R̲e̲p̲o̲r̲t̲i̲n̲g̲ ̲(̲1̲.̲1̲)̲

             Reports to SSC that an unexpected or erroneous
             queue element has been received. 

         b)  I̲n̲t̲e̲r̲n̲a̲l̲ ̲E̲r̲r̲r̲ ̲R̲e̲p̲o̲r̲t̲i̲n̲g̲ ̲1̲.̲2̲)̲

             Reports to SSC that an unexpected (illegal) event
             has occurred during Software execution.



4.2.2.1.2    F̲/̲C̲ ̲K̲e̲y̲ ̲C̲o̲m̲m̲a̲n̲d̲ ̲F̲u̲n̲c̲t̲i̲o̲n̲s̲ ̲(̲2̲.̲0̲)̲

         a)  D̲i̲s̲p̲l̲a̲y̲ ̲E̲r̲r̲o̲r̲ ̲M̲e̲s̲s̲a̲g̲e̲ ̲(̲2̲.̲1̲)̲

             Reads and validates a number entered in the command
             line f the VDU Header Area. If the number is valid
             the corresponding error message is displayed otherwise
             an error message indicating the parameter error
             is displayed. 

         b) D̲i̲s̲p̲l̲a̲y̲ ̲P̲a̲r̲e̲n̲t̲ ̲M̲e̲n̲u̲ ̲(̲2̲.̲2̲)̲

             Fetches the parent Menu of the Menu currently dispayed
             and displayes it in the VDU Format  Area. If the
             Menu displayed is the Supervisor Menu (ancestor)
             an error message is displayed in the responseline
             of the VDU Header Area. 

         c) ̲S̲u̲p̲e̲r̲v̲i̲s̲o̲r̲ ̲C̲o̲m̲m̲a̲n̲d̲ ̲E̲x̲e̲c̲u̲t̲i̲o̲n̲ ̲F̲u̲n̲c̲t̲i̲o̲n̲s̲ ̲(̲2̲.̲3̲)̲

             These are the funtions for execution of supervisor
             commands identified by command code and command
             parameters. (Refer section 4.2.2.l.4)



4.2.2.1.3    S̲V̲C̲O̲ ̲C̲o̲n̲t̲r̲o̲l̲ ̲F̲u̲n̲c̲t̲i̲o̲n̲s̲ ̲(̲3̲.̲0̲)̲

         a)  S̲t̲a̲r̲t̲ ̲S̲F̲C̲O̲ ̲P̲r̲o̲c̲e̲s̲s̲i̲n̲g̲ ̲(̲3̲.̲1̲)̲

             SFCO Software is activated in the normal operationmode.
             This includes display of the Supervisor Menu, opening
             for f/c key input from the VDU Header Area and
             positioning of the Cursor in the command line of
             the VDU Header Area.


             Only Normal Mode Supervisor commands are executed.
             

         b) R̲e̲s̲t̲a̲r̲t̲ ̲S̲F̲C̲O̲ ̲P̲r̲o̲c̲e̲s̲s̲i̲n̲g̲ ̲(̲3̲.̲2̲)̲

             SFCO Software is activated in the restart operation
             mode. This includes display of the SNF Menu applicable
             in restart mode, opening for f/c key input from
             the VDU Header Area and positioning of the cursor
             in the command line of the VDU Header Area. Only
             Restart Mode Supervisor commands are excuted. 

         c) S̲t̲o̲p̲ ̲S̲F̲C̲O̲ ̲P̲r̲o̲c̲e̲s̲s̲i̲n̲g̲.̲ ̲(̲3̲.̲3̲)̲

         The SFCO Software is deactivated. This includes clearing
         of the VDU screen (if possible) and work space. After
         deactivation the SFCO Software will await a start or
         restart command. 

         d)  C̲l̲o̲s̲e̲ ̲S̲F̲C̲O̲ ̲P̲r̲o̲c̲e̲s̲s̲i̲n̲g̲.̲

             The SFCO Software is deactivated. Tis includes
             clearing of the VDU screen (if possible) and of
             work space. After deactivation SFCO cannot be activated
             again, (i.e. SFCO activation requires initialization
             or restart of the entire SVUP process.)



4.2.2.1.4    S̲u̲p̲e̲r̲v̲i̲s̲o̲r̲ ̲C̲o̲m̲m̲a̲n̲d̲ ̲E̲x̲e̲c̲u̲t̲i̲n̲ ̲F̲u̲n̲c̲t̲i̲o̲n̲s̲ ̲2̲.̲3̲)̲

         a)  S̲u̲p̲e̲r̲v̲i̲s̲o̲r̲ ̲C̲o̲m̲m̲a̲n̲d̲ ̲V̲a̲l̲i̲d̲a̲t̲i̲o̲n̲ ̲(̲2̲.̲3̲.̲l̲)̲

             Reads the Command (Command Code, parameters and
             possible PEC) entered in the commandline of the
             VDU Header Area. Validates the command - this includes:

             1)  Command Code Validation

         2)  Parameter Syntax check, if applicable and 1) above
             was successfull

             3)  PEC validation, if applicable and if 1) above
                 was successfull

             4)  Semantic check af parameters, if applicable
                 and 1), 2) and 3) above was successfull. 


             If validation is unsuccessfull an appropriate error
             message is displayed, identifying the error or
             in case more than one error was detected the numbers
             of the applicable errormesages are displayed in
             the responseline of the VDU Header Area. 

             On fig. 4.2.2.l-3 the commands for which parameter
             syntax check functions apply are depicted together
             with the relevant parameters. 

             Fig. 4.2.2.l-4 together with fig. 4.2.2.l-5 ientifies
             the syntax check functions required. 

         b)  T̲r̲a̲n̲s̲a̲c̲t̲i̲o̲n̲ ̲E̲x̲e̲c̲u̲t̲i̲o̲n̲ ̲F̲u̲n̲c̲t̲i̲o̲n̲s̲ ̲(̲2̲.̲3̲.̲2̲)̲

             These are the functions for execution of transactions.
             The transaction type to be executed is indentified
             through entry of a supervisor command (refer 4..2.l.4
             a) above). Display of Menus on command are included
             in these functions as well. 
             Refer 4.2.2.1.5

         c)  S̲e̲n̲d̲ ̲R̲e̲q̲u̲e̲s̲t̲ ̲t̲o̲ ̲C̲A̲M̲P̲S̲ ̲(̲2̲.̲3̲.̲3̲)̲

             These are the functions issuing retrieval requests
             to SAR, preparation and status requests to UMAM,
             distibution requests to MDP and rerun requests
             to THP.

         d)  S̲e̲n̲d̲ ̲C̲o̲m̲m̲a̲n̲d̲ ̲t̲o̲ ̲C̲A̲M̲P̲S̲ ̲(̲2̲.̲3̲.̲4̲)̲

             These are the functions sending commands to SSC,
             THP, SAR, LOG, SPIP and SCREP.

         e)  E̲x̲e̲c̲u̲t̲e̲ ̲C̲o̲m̲m̲a̲n̲d̲

             These are the functions for updating of System
             tables ad System parameters.…86…1         …02…   …02…   …02…  
             …02…                                           
             Fig.4.2.2.1.-3 to fig. 4.2.2.1-5


4.2.2.1.5    T̲r̲a̲n̲s̲a̲c̲t̲i̲o̲n̲ ̲E̲x̲e̲c̲u̲t̲i̲o̲n̲ ̲F̲u̲n̲c̲t̲i̲o̲n̲s̲ ̲(̲2̲.̲3̲.̲2̲)̲

         a)  T̲r̲a̲n̲s̲a̲c̲t̲i̲o̲n̲ ̲A̲c̲c̲o̲u̲n̲t̲i̲n̲g̲ ̲(̲2̲.̲3̲.̲2̲.̲1̲)̲

             These are the functions for transaction accounting
             and logging.
             Refer 4.2.2.1.6

         b)  T̲r̲n̲s̲a̲c̲t̲i̲o̲n̲ ̲S̲e̲q̲u̲e̲n̲c̲e̲ ̲C̲o̲n̲t̲r̲o̲l̲ ̲(̲2̲.̲3̲.̲2̲.̲2̲)̲

             These are the functions for controlling the transaction
             in progress with respect to display of correct
             formats in right sequence possibly directed through
             the supervisors use af f/c keys. 
             Refer 4.2.2.1.7

         )   T̲r̲a̲n̲s̲a̲c̲t̲i̲o̲n̲ ̲i̲n̲t̲e̲r̲u̲p̲t̲i̲o̲n̲s̲ ̲(̲2̲.̲3̲.̲2̲.̲3̲)̲

             These are the functions for interruption of a transaction
             in progress, i.e.  interruption of the transaction
             sequence control. (refer 4.2.2.l.5 b) above)
             Refer 4.2.2.l.8.



4.2.2.l.6    T̲r̲a̲n̲s̲a̲c̲t̲i̲o̲n̲ ̲A̲c̲c̲o̲u̲n̲t̲i̲n̲ ̲(̲2̲.̲3̲.̲2̲.̲1̲)̲

         a)  I̲n̲i̲t̲i̲a̲l̲ ̲L̲O̲G̲ ̲d̲a̲t̲a̲ ̲c̲o̲l̲l̲e̲c̲t̲i̲o̲n̲ ̲(̲2̲.̲3̲.̲2̲.̲l̲.̲l̲)̲

             Assigns a transaction serial number and fetches
             the current time.

         b)  F̲i̲n̲a̲l̲ ̲l̲o̲g̲ ̲d̲a̲t̲a̲ ̲c̲o̲l̲l̲e̲c̲t̲i̲o̲n̲ ̲(̲2̲.̲3̲.̲2̲.̲l̲.̲2̲)̲

             Collection of log format indentification, exit
             cause, termination time and itm reference (if applicable)

         c)   F̲o̲r̲m̲a̲t̲ ̲I̲/̲O̲ ̲C̲o̲n̲t̲r̲o̲l̲ ̲(̲2̲.̲3̲.̲2̲.̲2̲.̲3̲)̲

             These are the functions for input/output of formats
             and data to the VDU Format Area, i.e. SVDIA communication
             functions. 


         d)  M̲e̲s̲s̲a̲g̲e̲ ̲H̲a̲n̲d̲l̲i̲n̲g̲ ̲T̲r̲a̲n̲s̲a̲c̲t̲i̲o̲n̲ ̲S̲e̲q̲u̲e̲n̲c̲e̲ ̲C̲o̲n̲t̲r̲o̲l̲ ̲(̲2̲.̲3̲.̲2̲.̲2̲.̲4̲)̲

             These are the functions for message related transactions
             and includes: CIF creation, deletion and manipulation,
             idetification of valid guidance- and control f/c
             keys at each stage of the transaction sequence,
             identification of requests to be issued to the
             CAMPS System. 

         e)  S̲y̲s̲t̲e̲m̲ ̲C̲o̲n̲t̲r̲o̲l̲ ̲T̲r̲a̲n̲s̲a̲c̲t̲i̲o̲n̲ ̲s̲e̲q̲u̲e̲n̲c̲e̲ ̲c̲o̲n̲t̲r̲o̲l̲ ̲(̲2̲.̲3̲.̲2̲.̲2̲.̲5̲)̲

             These are the functions for upervisor system control
             and includes: fetching of system information through
             TMP, identification of valid guidance- and control
             f/c keys at each stage of the transaction, identification
             of commands to be sent to the CAMPS System and
             of commands tobe executed by SFCO.



4.2.2.2  S̲o̲f̲t̲w̲a̲r̲e̲ ̲S̲t̲r̲u̲c̲t̲u̲r̲e̲

         The Software Structure of SFCO is depicted on fig.
         4.2.2.2-1

         Common subpackage procedures are shown on fig. 4.2.2.2-2
         through 4.2.2.2-5



4.2.2.2.1    S̲F̲C̲O̲ ̲M̲a̲i̲n̲ ̲M̲o̲d̲u̲l̲e̲ ̲(̲1̲.̲0̲)̲

         This module inplemets the functions described in 4.2.2.l.3
         SVCO Control Function (3.o)



4.2.2.2.2    F̲/̲c̲ ̲K̲e̲y̲ ̲C̲M̲D̲ ̲E̲x̲e̲c̲u̲t̲i̲o̲n̲ ̲(̲2̲.̲0̲)̲
         
         This module implements the functions described in section
         4.2.2.l.2 F/C Key Command Functions (2.0)




4.2.2.2.3    C̲M̲D̲ ̲ ̲V̲a̲l̲i̲d̲a̲t̲i̲o̲n̲ ̲M̲o̲d̲u̲l̲e̲ ̲(̲3̲.̲0̲)̲

         This module implements the functions described in section
         4.2.2.l.4 a) Supervisor command Validation (2.3.l)
         except for the semantic check f  parameters to table
         related commands, which are implemented in the Table
         Command Validation module.



4.2.2.2.4    T̲a̲b̲l̲e̲ ̲C̲o̲m̲m̲a̲n̲d̲s̲ ̲V̲a̲l̲i̲d̲a̲t̲i̲o̲n̲ ̲m̲o̲d̲u̲l̲e̲ ̲(̲4̲.̲0̲)̲

         Refer 4.2.2.2.3 above. 



4.2.2.2.5 E̲x̲e̲c̲u̲t̲e̲ ̲t̲a̲b̲l̲e̲ ̲C̲M̲D̲ ̲t̲r̲a̲n̲s̲a̲c̲t̲i̲o̲n̲ ̲(̲5̲.̲0̲)̲

         Implements the fnctions for simple Syntax check for
         table related commands entered via the VDU Format Area.
         If next table entry by design is specified semantic
         validation is performed by the module itself otherwise
         table CMD validation (4.0) is called. Then execut Transaction
         (5.0) is called. 



4.2.2.2.6    E̲x̲e̲c̲u̲t̲e̲ ̲T̲r̲a̲n̲s̲a̲c̲t̲i̲o̲n̲ ̲(̲6̲.̲0̲)̲

         Implements the functions for  Initial log data collection
         (2.3.2.l.l) 4.2.2.l.6 and determines whether System
         Sequence Control (7.0) er CIF Sequence Control (8.0)
         shall be calld. 



4.2.2.7      S̲y̲s̲t̲e̲m̲ ̲S̲e̲q̲u̲e̲n̲c̲e̲ ̲C̲o̲n̲t̲r̲o̲l̲ ̲(̲7̲.̲0̲)̲

         Implements the control functions described in section
          4.2.2.l.5.  b)



4.2.2.2.8    C̲I̲F̲ ̲S̲e̲q̲u̲e̲n̲c̲e̲ ̲C̲o̲n̲t̲r̲o̲l̲ ̲(̲8̲.̲0̲)̲

         Implements the control functions described in section
         4.2.2.l.5 b)




4.2.2.2.9    E̲x̲e̲c̲u̲t̲e̲ ̲S̲y̲s̲t̲e̲m̲ ̲S̲e̲q̲u̲e̲n̲c̲e̲ ̲(̲9̲.̲0̲)̲

         Implements the functions described in section 4.2.2.l.7
         c) and e) apart from f/c key identification.



4.2.2.2.l0    E̲x̲e̲c̲u̲t̲e̲ ̲S̲y̲s̲t̲e̲m̲ ̲F̲u̲n̲c̲t̲i̲o̲ ̲(̲1̲0̲.̲0̲)̲

         Implements the functions described in section 4.2.2.l.7
         e) apart from f/c key identification. 



4.2.2.2.1l   E̲x̲e̲c̲u̲t̲e̲ ̲C̲I̲F̲ ̲S̲e̲q̲u̲e̲n̲c̲e̲ ̲(̲l̲l̲.̲0̲)̲

         Implements the functions described in section 4.2.2.l.7
         c) and d) f/c key identification, as well a those in
         4.2.2.l.6 b) and c). 



4.2.2.2.12   E̲x̲e̲c̲u̲t̲e̲ ̲C̲I̲F̲ ̲F̲u̲n̲c̲t̲i̲o̲n̲ ̲(̲l̲2̲.̲0̲)̲

         Implements the functions described in section 4.2.2.l.7
         d) apart from f/c key identification, as well as those
         in 4.2.2.l.6 b) and c).



4.2.2.2.l3    T̲r̲a̲n̲s̲a̲c̲t̲i̲o̲n̲ ̲C̲o̲n̲t̲r̲o̲l̲ ̲(̲l̲.̲0̲)̲

          Implements the functions described in section 4.2.2.l.7
         a) and b) …86…1         …02…   …02…   …02…   …02…                     
                              
Fig. 4.2.2.2.-1 to 5 …86…1         …02…   …02…   …02…   …02…                                  
         
4.2.2.3  D̲a̲t̲a̲ ̲F̲l̲o̲w̲ ̲a̲n̲d̲ ̲C̲o̲n̲t̲r̲o̲l̲ ̲l̲o̲g̲i̲c̲ ̲w̲i̲t̲h̲i̲n̲ ̲S̲F̲C̲O̲.̲

         An overview of the dataflow through SFCO is given in
         Diagrams 4.2.2.3-l to 4.2.2.3 -5

         The call structure for all modules is shon in fig.
         4.2.2.3-6 through 4.2.2.3-13




4.2.2.4  M̲O̲D̲U̲L̲E̲ ̲D̲E̲S̲C̲R̲I̲P̲T̲I̲O̲N̲


4.2.2.4.l    S̲F̲C̲O̲ ̲M̲a̲i̲n̲ ̲M̲o̲d̲u̲l̲e̲



4.2.2.4.l.l F̲u̲n̲c̲t̲i̲o̲n̲a̲l̲ ̲S̲p̲e̲c̲i̲f̲i̲c̲a̲t̲i̲o̲n̲

         The SFCO Main Module is the superior controlling module
         of the SFCO subpackage. I is responsible for initiating
         stopping and closing the execution of the entire SFCO
         software on command from SVCO. When initiating of execution
         is commanded it is responsible for determining the
         mode of execution, Normal Mode or Restart Mode, for
         he output of the  proper menu and for opening of f/c
         key input.



4.2.2.4.l.2  M̲o̲d̲u̲l̲e̲ ̲I̲n̲t̲e̲r̲f̲a̲c̲e̲

         C̲a̲l̲l̲ ̲S̲p̲e̲c̲i̲f̲i̲c̲a̲t̲i̲o̲n̲ 

         a) SFCO-MAIN 
         b) SFCO-MAIN (R6)

         R̲e̲g̲i̲s̲t̲e̲r̲ ̲C̲o̲n̲v̲e̲n̲t̲i̲o̲n̲

         Call Registers 
         R6 LINK

         R̲e̲t̲u̲r̲n̲ ̲R̲e̲g̲i̲s̲t̲e̲r̲s̲

         RO- R7           (DEST)…86…1         …02…   …02…   …02…   …02…        
                …02…                          
4.2.2.4.1.3 M̲o̲d̲u̲l̲e̲ ̲C̲o̲m̲p̲o̲n̲e̲n̲t̲s̲

         None



4.2.2.4.1.4 D̲a̲t̲a̲ ̲D̲e̲s̲c̲r̲i̲p̲t̲i̲o̲n̲

         a)  D̲a̲t̲a̲ ̲R̲e̲f̲e̲r̲e̲n̲c̲e̲

             SFCO ̲STATE ̲TYPE                                     refer
                                                                 4.1.4

             SVUP ̲OP                                             refer
                                                                 4.2.2.5

             SVCO ̲CMD ̲TYPE                                       refer
                                                                 4.1.4

             SFO ̲MODE                                            refer
                                                                 4.2.2.5

             CO ̲CMD ̲CC                                           refer
                                                                 4.1.4

             SVCO ̲SEM                                            refer
                                                                 4.1.4

             SPLIT ̲DIGIT                                         refer
                                                                 4.2.2.5

             HEADER ̲IFCB                                         refer
                                                                 4.2.2.5

             SEQ ̲TABLE ̲ID                                        refer
                                                                 4.2.2.5

             FCK ̲SET                                             refer
                                                                 4.2.2.5

             SEQ ̲REC                                             refer
                                                                 4.2.2.5

             SFCO ̲OP                                             refer
                                                                 4.2.2.5

             SVDIA ̲CMDANS ̲TYPE                                   refer
                                                                 4.1.4

         b)  E̲x̲t̲e̲r̲n̲a̲l̲ ̲D̲a̲t̲a̲

             SVUP ̲OP                                             (m)…86…1
                                                                 
                                                                 
                                                                 
                                                                 
                                                                 
                                                                 
                                                                 
                                                                 
                                                                 …02…
                                                                 
                                                                 
                                                                 …02…
                                                                 
                                                                 
                                                                 …02…
                                                                 
                                                                 
                                                                 …02…
                                                                 
                                                                 
                                                                 
                                                                 
                                                                 
                                                                 
                                                                 
                                                                 
                                                                 
                                                                 
                                                                 
                                                                 
                                                                 
                                                                 
                                                                 
                                                                 
                                                                 
                                                                 …02…
                                                                 
                                                                 
                                                                 
                                                                 
                                                                 
                                                                 
                                                                 
                                                                 
                                                                 
                                                                 
                                                                 
                                                                 
                                                                 
                                                                 
                                                                 
                                                                 
                                                                 
                                                                 
                                                                 
                                                                 
                                                                 
                                                                 
                                                                 
                                                                 
             SFCO ̲MODE                                           (m)

             SPLIT ̲DIGIT                                         (m)

             SEQ ̲TABLE ̲ID                                        (m)

             FCK ̲SET                                             (m)

             SEQ ̲REC                                             (m)

             SFCO ̲OP

         c)  L̲o̲c̲a̲l̲ ̲D̲a̲t̲a̲

             VAR MENU ̲KEY : SEQ ̲KEY



4.2.2.4.1.5 M̲o̲d̲u̲l̲e̲ ̲D̲e̲s̲i̲g̲n̲

         The modul consist of two loops an outer loop "SFCO
         ̲START", and an inner loop "SFCO ̲WORK". In the outer
         loop only commands from SVCO are awaited. If a CLOSE
         ̲SFCO commands is received an exit of the SFCO ̲START
         loop takes place and the procedure WAIT ̲SFCO ̲EVEN is
         called with CLOSED ̲STATE as parameter, when called
         with this parameter WAIT ̲SFCO ̲EVENT will never return
         control to the caller but keep waiting on events in
         its waiting point.

         The inner loop is entered where a START ̲SFCO or RESTART
         ̲SFCO has ben received from SVCO. Exit from the inner
         loops to the outer loop occurs when the SVCO command
         STOP ̲SFCO is received.

         Refer figure 4.2.2.4.1-1…86…1         …02…   …02…   …02…   …02…       
            …02…      …02…                        
         LOOP SFCO ̲START

         W̲A̲I̲T̲ ̲S̲F̲C̲O̲ ̲E̲V̲E̲N̲T̲ ̲(̲R̲E̲A̲D̲Y̲ ̲S̲T̲A̲T̲E̲)̲ ̲(̲S̲V̲U̲P̲ ̲O̲P̲)̲:̲ ̲O̲K̲ ̲(̲4̲.̲2̲.̲2̲.̲6̲.̲1̲0̲)̲

         CASE SVUP ̲OP. CMD OF SVCO ̲CMD ̲TYPE

             START ̲SFCO?                                         SFCO
                                                                 ̲MODE
                                                                 =
                                                                 NORMAL
                                                                 ̲MODE

                                                                 MENU
                                                                 ̲KEY
                                                                 =
                                                                 NORMAL
                                                                 ̲SEQ
                                                                 ̲EY

             RESTART ̲SFCO?                                       SFCO
                                                                 ̲MODE
                                                                 =
                                                                 RESTART
                                                                 ̲MODE

                                                                 MENU
                                                                 ̲KEY
                                                                 =
                                                                 RESTART
                                                                 ̲SEQ
                                                                 ̲KEY

             CLOSE ̲SFCO?                                         S̲E̲N̲D̲
                                                                 ̲S̲V̲C̲O̲
                                                                 ̲A̲N̲S̲W̲E̲R̲
                                                                 ̲(̲S̲V̲U̲P̲
                                                                 ̲O̲P̲,̲
                                                                 ̲O̲K̲
                                                                 C̲C̲)̲
                                                                 ̲(̲4̲.̲2̲.̲2̲.̲6̲.̲1̲

                                                                 
                                                                 
                                                                 
                                                                 EXIT
                                                                 LOOP
                                                                 SFCO
                                                                 ̲START

             OTHERWISE?                                          S̲V̲U̲P̲
                                                                 ̲I̲N̲T̲E̲R̲N̲A̲L̲
                                                                 ̲E̲R̲R̲O̲R̲
                                                                 ̲(̲G̲I̲V̲E̲
                                                                 ̲U̲P̲)̲
                                                                 (̲4̲.̲1̲.̲5̲.̲2̲)̲

         END CASE

         S̲F̲C̲ ̲W̲O̲R̲K̲ ̲S̲T̲A̲T̲E̲ ̲E̲N̲T̲R̲Y̲ ̲(̲4̲.̲2̲.̲2̲.̲4̲.̲1̲-̲2̲)̲

         S̲E̲N̲D̲ ̲S̲V̲C̲O̲ ̲A̲N̲S̲W̲E̲R̲ ̲(̲ ̲S̲V̲U̲P̲ ̲O̲P̲,̲ ̲C̲O̲N̲D̲I̲T̲I̲O̲N̲)̲

         CONDITION EQ OK ̲CC?    S̲F̲C̲O̲ ̲W̲O̲R̲K̲ ̲L̲O̲O̲P̲ ̲(̲4̲.̲2̲.̲2̲.̲4̲.̲1̲-̲3̲)̲

         END LOOP SFCO ̲START

         W̲A̲I̲T̲ ̲S̲F̲C̲O̲ ̲E̲V̲E̲N̲T̲(̲C̲L̲O̲S̲E̲D̲ ̲S̲T̲A̲T̲E̲)̲(̲S̲V̲U̲P̲ ̲O̲P̲)̲:̲O̲K̲(̲4̲.̲2̲.̲2̲.̲6̲.̲1̲0̲)̲











Figure 4.2.2.4.1-1…86…1         …02…   …02…   …02…   …02…           …02…      …02…                   
     
         SFCO WORK STATE ENTRY

         SEQ ̲TABLE ̲ID = SVUP ̲SYS ̲SEQ ̲TABLE

         F̲E̲T̲C̲H̲ ̲S̲E̲Q̲ ̲R̲E̲C̲(̲S̲E̲Q̲ ̲T̲A̲B̲L̲E̲ ̲I̲D̲,̲M̲E̲N̲U̲ ̲K̲E̲Y̲.̲F̲O̲R̲M̲A̲T̲,̲M̲E̲N̲U̲ ̲K̲E̲Y̲.̲C̲O̲D̲E̲
                                                                  (4.2.2.6-23)

         "DISPLAY MENU

         S̲E̲N̲D̲ ̲S̲V̲D̲I̲A̲ ̲C̲M̲D̲(̲O̲U̲T̲P̲U̲T̲ ̲M̲E̲N̲,̲S̲E̲Q̲ ̲R̲E̲C̲.̲S̲V̲D̲I̲A̲ ̲F̲O̲R̲M̲A̲T̲,̲0̲,̲0̲)̲
                                                                  (4.2.2.6.2)

         W̲A̲I̲T̲ ̲S̲F̲C̲O̲ ̲E̲V̲E̲N̲T̲(̲W̲O̲R̲K̲ ̲E̲N̲T̲R̲Y̲ ̲S̲T̲A̲T̲E̲)̲(̲S̲F̲C̲O̲ ̲O̲P̲)̲:̲O̲K̲
                                                                  (̲4̲.̲2̲.̲2̲.̲6̲.̲1̲0̲)̲

         SFCO ̲OP.CMD NOT EQ OUTPUT ̲MENU? SVUP ̲INTERNAL ̲ERROR
                                                                  
                                                                  (GIVE
                                                                  ̲UP)(4.1.5.2)

         CASE F̲R̲E̲E̲ ̲S̲F̲C̲O̲ ̲O̲P̲(̲S̲F̲C̲O̲ ̲O̲P̲)̲:̲E̲R̲R̲O̲R̲ ̲O̲K̲(̲4̲.̲2̲.̲2̲.̲6̲.̲4̲)̲

             ERRO?   S̲V̲U̲P̲ ̲I̲N̲T̲E̲R̲N̲A̲L̲ ̲E̲R̲R̲O̲R̲(̲G̲I̲V̲E̲ ̲U̲P̲)̲(̲4̲.̲1̲.̲5̲.̲2̲)̲

             OK?

         END CASE

         CONDITION = SFCO ̲OP.PARA1

         "END DISPLAY MENU

         CASE CONDITION OF CO ̲CMD ̲CC

             OK ̲CC?  SPLIT ̲DIGIT = HEADER ̲IFCB

                     FCK ̲SET = (DERM,CMD,MENU)

                     R̲E̲Q̲U̲E̲S̲T̲ ̲F̲C̲ ̲K̲E̲Y̲ ̲I̲N̲P̲U̲T̲(̲4̲.̲2̲.̲2̲.̲6̲.̲6̲)̲

             SPLT ̲FAILED ̲CC?

             OTHERWISE? S̲V̲U̲P̲ ̲I̲N̲T̲E̲R̲N̲A̲L̲ ̲E̲R̲R̲O̲R̲(̲G̲I̲V̲E̲ ̲U̲P̲)̲(̲4̲.̲1̲.̲5̲.̲2̲)̲

         END CASE

Figure 4.2.2.4.1-…86…1         …02…   …02…   …02…   …02…                …02…                    
      
         SFCO WORK LOOP

         LOOP SFCO ̲WORK

         W̲A̲I̲T̲ ̲S̲F̲C̲O̲ ̲E̲V̲E̲N̲T̲(̲W̲O̲R̲K̲ ̲S̲T̲A̲T̲E̲)̲(̲S̲V̲U̲P̲ ̲O̲P̲)̲(̲4̲.̲2̲.̲2̲.̲6̲.̲1̲0̲)̲

         CASE SVUP ̲OP.OP ̲ID(2) OF SENDER ̲ID ̲TYPE

             SVCO ̲ID?  CASE SVUP ̲OP.CMD OF SVCO ̲CMD ̲TYPE

                       STOP ̲SFCO

                        CLOSE ̲SFCO?                              P̲R̲E̲P̲A̲R̲E̲
                                                                 ̲W̲O̲R̲K̲
                                                                 ̲S̲T̲A̲T̲E̲
                                                                 ̲E̲X̲I̲T̲
                                                                 (̲4̲.̲2̲.̲2̲.̲4̲.̲1̲-̲4̲)

                                                                 S̲E̲N̲D̲
                                                                 ̲S̲V̲C̲O̲
                                                                 ̲A̲N̲S̲W̲E̲R̲(̲S̲V̲U̲P̲
                                                                 ̲O̲P̲,
                                                                 C̲O̲N̲D̲I̲T̲I̲O̲N̲)̲(̲4̲.̲2̲.̲2̲.̲6̲.̲1̲)̲

                                                                 SVUP
                                                                 ̲OP.CMD
                                                                 EQ
                                                                 STOP
                                                                 ̲SFCO?

                                                                 
                                                                 
                                                                 
                                                                 EXIT
                                                                 LOOP
                                                                 SFCO
                                                                 ̲START

                                                                 
                                                                 
                                                                 
                                                                 EXIT
                                                                 LOOP
                                                                 SFCO
                                                                 ̲WORK

             OTHERWISE? S̲V̲U̲P̲ ̲I̲N̲T̲R̲N̲A̲L̲ ̲E̲R̲R̲O̲R̲(̲G̲I̲V̲E̲ ̲U̲P̲)̲
                                                                 (4.1.5.2)

                       END CASE

         FC ̲KEY ̲ID? C̲A̲S̲E̲ ̲F̲C̲ ̲K̲E̲Y̲ ̲C̲M̲D̲ ̲E̲X̲E̲C̲(̲)̲:̲W̲O̲R̲K̲ ̲S̲T̲O̲P̲ ̲C̲L̲O̲S̲E̲
                                                                 (4.2.2.4.2)

                     WORK? SPLIT ̲DIGIT=HEADER ̲IFCB

                           R̲E̲Q̲U̲E̲S̲T̲ ̲F̲C̲ ̲K̲E̲Y̲ ̲I̲N̲P̲U̲T̲(̲4̲.̲2̲.̲2̲.̲6̲.̲6̲)̲

                     STOP?     EXIT LOOP SFCO ̲WORK

                     CLOS?    EXIT LOOP SFCO ̲START

             END CASE

         END CASE

         END LOOP SFCO ̲WORK

Figure 4.2.2.4.1-3…86…1         …02…   …02…   …02…   …02…                …02…                    
      
         PREPARE WORK STATE EXIT

             D̲E̲L̲E̲T̲E̲ ̲F̲C̲ ̲K̲E̲Y̲ ̲I̲N̲P̲U̲T̲ ̲R̲E̲Q̲U̲E̲S̲T̲ ̲(̲4̲.̲2̲.̲2̲.̲6̲.̲7̲)̲

             "INFORM SVDIA to clean up

             S̲E̲N̲D̲ ̲S̲V̲D̲I̲A̲ ̲C̲M̲D̲ ̲(̲C̲L̲E̲A̲R̲ ̲V̲D̲U̲,̲0̲,̲0̲,̲0̲)̲(̲4̲.̲2̲.̲2̲.̲6̲.̲2̲)̲

             W̲A̲I̲T̲ ̲S̲F̲C̲O̲ ̲E̲V̲E̲N̲T̲ ̲(̲W̲O̲R̲K̲ ̲E̲N̲T̲R̲Y̲ ̲S̲T̲A̲T̲E̲(̲S̲F̲C̲O̲ ̲O̲P̲)̲
                                                                 (̲4̲.̲2̲.̲2̲.̲6̲.̲1̲0̲)̲

             CASE F̲R̲E̲E̲ ̲S̲F̲C̲O̲ ̲O̲P̲(̲S̲F̲C̲O̲ ̲O̲P̲)̲:̲E̲R̲R̲O̲R̲ ̲O̲K̲(̲4̲.̲2̲.̲2̲.̲6̲.̲4̲)̲

                 ERROR? S̲V̲U̲P̲ ̲I̲N̲T̲E̲R̲N̲A̲L̲ ̲E̲R̲R̲O̲R̲(̲G̲I̲V̲E̲ ̲U̲P̲)̲(̲4̲.̲1̲.̲5̲.̲2̲)̲

                 OK?

             END CASE

             CASE SFCO ̲OP.PARA1 OF CO ̲CMD ̲CC

                 OK ̲CC,SPLIT ̲FAILED ̲CC? CONDITION=SFCO ̲OP.PARA1

                 OTHERWISE? V̲U̲P̲ ̲I̲N̲T̲E̲R̲N̲A̲L̲ ̲E̲R̲R̲O̲R̲(̲G̲I̲V̲E̲ ̲U̲P̲)̲(̲4̲.̲1̲.̲5̲.̲2̲)̲

         END CASE


















Figure 4.2.2.4.1-4…86…1         …02…   …02…   …02…   …02…                …02…                    
      
4.2.2.4.2    E̲x̲e̲c̲u̲t̲i̲o̲n̲ ̲o̲f̲ ̲F̲/̲C̲ ̲k̲e̲y̲ ̲e̲n̲t̲e̲r̲e̲d̲ ̲c̲o̲m̲m̲a̲n̲d̲s̲



4.2.2.4.2.1 F̲u̲n̲c̲t̲i̲o̲n̲a̲l̲ ̲S̲p̲e̲c̲i̲f̲i̲c̲a̲t̲i̲o̲n̲

         Fetches and validates f/c keys. Commands entered by
         function keys are:

         1)  Move cursor tocommand line for entry of command
             (logical f/c key: CMD)

         2)  Move cursor to command line for entry of Error
             Message No (logical f/c key:DERM)

         3)  Display parent Menu (logical f/c key:MENU)

         4)  Display Error Message (logical f/c key:ERR ̲MSG,
             Physcal f/c key: ENTER)

         5)  Execute entered supervisor CMD (logical f/c key
              CMD ̲ENTER, physical f/c key:ENTER)

         The module is responsible for the proper execution
         of f/c key commands as listed above.



4.2.2.4.2.2 M̲o̲d̲u̲l̲e̲ ̲I̲n̲t̲e̲r̲f̲a̲c̲e̲

         C̲a̲l̲l̲ ̲S̲p̲e̲c̲i̲f̲i̲c̲a̲t̲o̲n̲

         a)  FC ̲KEY ̲CMD ̲EXEC():WORK ̲STOP ̲CLOSE

         b)  FC ̲KEY ̲CMD ̲EXEC(R6):WORK ̲STOP ̲CLOSE

         R̲e̲g̲i̲s̲t̲e̲r̲ ̲C̲o̲n̲v̲e̲n̲t̲i̲o̲n̲s̲

         C̲a̲l̲l̲ ̲R̲e̲g̲i̲s̲t̲e̲r̲

         R6      LINK

         R̲e̲t̲u̲r̲n̲ ̲R̲e̲g̲i̲s̲t̲e̲r̲s̲

         R0 - R7                                                 (DEST)…86…1
                                                                 
                                                                 
                                                                 
                                                                 
                                                                 
                                                                 
                                                                 
                                                                 
                                                                 …02…
                                                                 
                                                                 
                                                                 …02…
                                                                 
                                                                 
                                                                 …02…
                                                                 
                                                                 
                                                                 …02…
                                                                 
                                                                 
                                                                 
                                                                 
                                                                 
                                                                 
                                                                 
                                                                 
                                                                 
                                                                 
                                                                 
                                                                 
                                                                 
                                                                 
                                                                 
                                                                 …02…
                                                                 
                                                                 
                                                                 
                                                                 
                                                                 
                                                                 
                                                                 
                                                                 
                                                                 
                                                                 
                                                                 
                                                                 
                                                                 
                                                                 
                                                                 
                                                                 
                                                                 
                                                                 
                                                                 
                                                                 
                                                                 
                                                                 
                                                                 
                                                                 
                                                                 
                                                                 
4.2.2.4.2.3 M̲o̲d̲u̲l̲e̲ ̲C̲o̲m̲p̲o̲n̲e̲n̲t̲s̲

         None



4.2.2.4.2.4 D̲a̲t̲a̲ ̲D̲e̲s̲c̲r̲i̲p̲t̲i̲o̲n̲

         a)  D̲a̲t̲a̲ ̲R̲e̲f̲e̲r̲e̲n̲c̲e̲

             FC ̲KEY                                              refer
                                                                 4.2.2.5

             EXC ̲DONE                                            refer
                                                                 4.2.2.5

             STOP ̲CLOSE                                          refer
                                                                 4.2.2.5

             WORK ̲STOPCLOSE                                      refer
                                                                 4.2.2.5

             ILL ̲LEG ̲TYPE                                        refer
                                                                 4.2.2.5

             CONV ̲ENTER                                          refer
                                                                 4.2.2.5

             SUPV ̲FC ̲KEY                                         refer
                                                                 4.2.2.5

             FCK ̲SET                                             refer
                                                                 4.2.2.5

             SEQ ̲TABLE ̲ID                                        refer
                                                                 4.2.2.5

             SEQ ̲REC                                             refer
                                                                 4.2.2.5

             SVUP ̲OP                                             refer
                                                                 4.2.2.5

             CURSOR ̲SPLIT ̲TYPE                                   refer
                                                                 4.2.2.

             FORMAT ̲CMD                                          refer
                                                                 4.1.4

         b)  E̲x̲t̲e̲r̲n̲a̲l̲ ̲D̲a̲t̲a̲

             FC ̲KEY…86…1         …02…   …02…   …02…   …02…                …02…     
                                 
             CONV ̲ENTER                                          (m)

             FCK ̲SET                                             (m)

             SEQ ̲TABLE ̲ID

             SEQ ̲REC

             SVUP ̲OP

             FORMAT ̲CMD

         c)  L̲o̲c̲a̲l̲ ̲D̲a̲t̲a̲

             None



4.2.2.4.2.5 M̲o̲d̲u̲l̲e̲ ̲D̲e̲s̲i̲g̲n̲

         Refer fig. 4.2.2.4.2-…86…1   …02…  …02…  …02…   …02…   …02…   …02…            
            …02…                          
         FC ̲KEY ̲CMD ̲EXEC

         C̲A̲S̲E̲ ̲F̲E̲T̲C̲H̲ ̲A̲N̲D̲ ̲V̲A̲L̲ ̲K̲E̲Y̲(̲)̲(̲F̲C̲ ̲K̲E̲Y̲,̲C̲C̲)̲:̲E̲X̲C̲ ̲D̲O̲N̲E̲ ̲(̲4̲.̲2̲.̲2̲.̲6̲1̲2̲)̲

             EXC?    C̲A̲S̲E̲ ̲E̲X̲C̲E̲P̲T̲I̲O̲N̲ ̲V̲D̲U̲ ̲(̲1̲)̲ ̲(̲S̲V̲U̲P̲ ̲O̲P̲)̲:̲ ̲S̲T̲O̲P̲
                     ̲C̲L̲O̲S̲E̲
                                                                 (̲4̲.̲2̲.̲2̲.̲6̲.̲1̲1̲)̲

                                                                 STOP?
                                                                 RETURN
                                                                 (STOP)

                                                                 COSE?
                                                                 RETURN
                                                                 (CLOSE)

                     END CASE

             DONE?   CASE ANALYSE ̲ERROR(CC,2,ILL,LEG):(FVK1,FVK2)

                                                                 FVK1?
                                                                 RETURN
                                                                 (WORK)

                                                                 FVK2?

                     END CASE

         END CASE

         CASE FC ̲KEY OF

             DERM,CMD?                                           FC
                                                                 ̲KEY
                                                                 EQ
                                                                 CMD?
                                                                 CONV
                                                                 ̲ENTER
                                                                 =
                                                                 CMD
                                                                 ̲ENTER

                                                                 CONV
                                                                 ̲ENTER
                                                                 =
                                                                 ERR
                                                                 ̲MSG

                     FCK ̲SET = (ENTER)

                                                                 RETURN
                                                                 (WORK)

             MENU?                                               F̲E̲T̲C̲H̲
                                                                 ̲S̲E̲Q̲
                                                                 ̲R̲E̲C̲
                                                                 ̲
                                                                 ̲(̲S̲E̲Q̲
                                                                 ̲T̲A̲B̲L̲E̲
                                                                 ̲I̲D̲,̲
                                                                 ̲N̲U̲L̲L̲,̲
                                                                 ̲S̲E̲Q̲
                                                                 ̲R̲E̲C̲.̲N̲E̲W̲
                                                                 ̲
                                                                  
                                                                  
                                                                  
                                                                  
                                                                  
                                                                  
                                                                  
                                                                  F̲O̲R̲M̲A̲T̲)̲
                                                                  ̲(̲4̲.̲2̲.̲2̲.̲6̲.̲2̲3̲)̲

                                                                 C̲A̲S̲E̲
                                                                 ̲S̲Y̲S̲
                                                                 ̲S̲E̲Q̲
                                                                 ̲(̲
                                                                 ̲
                                                                 ̲
                                                                 ̲)̲:̲W̲O̲R̲K̲
                                                                 ̲S̲T̲O̲P̲
                                                                 ̲C̲L̲O̲S̲E̲
                                                                 ̲(̲4̲.̲2̲.̲2̲.̲4̲.̲6̲)̲
                                                                 ̲

                                                                  WORK?
                                                                  RETURN
                                                                  (WORK)

                                                                  STOP?
                                                                  RETURN
                                                                  (STOP)

                                                                 CLOSE?
                                                                 RETURN
                                                                 (CLOSE)

                                                                 END
                                                                 CASE

             ERR ̲MSG?                                             D̲I̲S̲P̲L̲A̲Y̲
                                                                  ̲E̲R̲R̲O̲R̲
                                                                  ̲M̲E̲S̲S̲A̲G̲E̲
                                                                  ̲(̲4̲.̲2̲.̲2̲.̲4̲.̲2̲-̲2̲)̲

             CMD ̲ENTER?                                          S̲U̲P̲V̲
                                                                 ̲C̲O̲M̲M̲A̲N̲D̲
                                                                 ̲A̲N̲A̲L̲Y̲S̲I̲S̲
                                                                 ̲(̲4̲.̲2̲.̲2̲.̲4̲.̲2̲-̲3̲)̲

         END CASE
Figure 4.2.2.4.2-1…86…1   …02…  …02…  …02…   …02…   …02…   …02…                …02…                      
    
         DISPLAY ERROR MESSAGE

         CASE E̲X̲E̲C̲U̲T̲E̲ ̲D̲E̲R̲M̲ ̲C̲M̲D̲ ̲(̲C̲C̲)̲ ̲:̲ ̲E̲X̲C̲ ̲D̲O̲N̲E̲ ̲(̲4̲.̲2̲.̲2̲.̲6̲.̲1̲3̲)̲

             EXC?    CASE E̲X̲C̲E̲P̲T̲I̲O̲N̲ ̲V̲D̲U̲ ̲(̲1̲)̲(̲S̲V̲U̲P̲ ̲O̲P̲)̲ ̲:̲ ̲S̲T̲O̲P̲
                     ̲C̲L̲O̲S̲E̲
                                                                   (̲4̲.̲2̲.̲2̲.̲6̲.̲1̲1̲)̲

                                                                 STOP?
                                                                 RETURN
                                                                 (STOP)

                     CLOSE? RETURN (CLOSE)

                     END CASE

             DONE? CC = LEG? FCK ̲SET = (CMD,DERM,MENU)

                     CASE S̲E̲T̲ ̲C̲U̲R̲S̲O̲R̲ ̲(̲C̲M̲D̲ ̲P̲O̲S̲)̲ ̲:̲ ̲E̲X̲C̲ ̲D̲O̲N̲E̲ ̲(̲4̲.̲2̲.̲2̲.̲6̲.̲1̲4̲)̲

                                                                 EXC?
                                                                 CASE
                                                                 E̲X̲C̲E̲P̲T̲I̲O̲N̲
                                                                 ̲V̲D̲U̲
                                                                 ̲(̲1̲)̲
                                                                 ̲S̲V̲U̲P̲
                                                                 ̲O̲P̲)̲
                                                                   S̲T̲O̲P̲
                                                                   ̲C̲L̲O̲S̲E̲
                                                                   ̲(̲4̲.̲2̲.̲2̲.̲6̲.̲1̲1̲)̲

                                                                  
                                                                  
                                                                  
                                                                  
                                                                  STOP?
                                                                  RETURN
                                                                  (STOP)

                                                                 
                                                                 
                                                                 
                                                                 
                                                                 
                                                                 
                                                                 
                                                                 CLOSE?
                                                                 RETURN
                                                                 (CLOSE)

                                                                  END
                                                                  CASE

                                                                 DONE?

                     END CASE

         END CASE

         RETURN (DONE)










Figure 4.2.2.4.2-2…86…1  …02…   …02…   …02…   …02…   …02…   …02…   …02…           …02…                       
   
         SUPV COMMAND ANALYSIS

             CASE V̲A̲L̲I̲D̲A̲T̲E̲ ̲C̲M̲D̲ ̲(̲)̲ ̲(̲C̲C̲)̲:̲ ̲E̲X̲C̲ ̲D̲O̲N̲E̲ ̲(̲4̲.̲2̲.̲2̲.̲4̲.̲3̲)̲

                 EXC?                                            CASE
                                                                 EXCEPTION
                                                                 ̲VDU(1)(SVUP
                                                                 ̲OP):STOP
                                                                 ̲CLOSE
                                                                 
                                                                    
                                                                    
                                                                    
                                                                    
                                                                    
                                                                    
                                                                    
                                                                    
                                                                    
                                                                    
                                                                    (4.2.2.6.11)

                                                                  STOP?
                                                                  RETURN
                                                                  (STP)

                                                                  CLOSE?
                                                                  ̲RETURN
                                                                  (CLOSE)

                                                                 END
                                                                 CASE

                 DONE?                                           CASE
                                                                 CC
                                                                 OF

                                                                  REGRET?
                                                                  CASE
                                                                  S̲E̲T̲
                                                                  ̲C̲U̲R̲S̲O̲R̲
                                                                  ̲(̲C̲M̲D̲
                                                                  ̲P̲O̲S̲)̲:̲E̲X̲C̲
                                                                  ̲D̲O̲N̲E̲
                                                     (̲4̲.̲2̲.̲2̲.̲6̲.̲1̲4̲)̲)̲

                                                                 
                                                                 
                                                                 
                                                                 
                                                                 
                                                                 
                                                                 
                                                                 
                                                                 
                                                                 
                                                                 
                                                                 
                                                                 
                                                                 
                                                                 
                                                                 EXC?
                                                                 
                                                                 C̲A̲S̲E̲
                                                                 ̲E̲X̲C̲E̲P̲T̲I̲O̲N̲
                                                                 ̲V̲D̲U̲
                                                                 ̲(̲1̲)̲
                                                                   
                                                                   
                                                                   
                                                                   
                                                                   
                                                                   
                                                                   
                                                                   
                                                                   
                                                                   
                                                                   
                                                                   
                                                                   
                                                                   
                                                                   
                                                                   
                                                                   
                                                                   (̲S̲V̲U̲P̲
                                                                   ̲O̲P̲)̲:̲S̲T̲O̲P̲
                                                                   ̲C̲L̲O̲S̲E̲
                                                       (̲4̲.̲2̲.̲2̲.̲6̲.̲1̲1̲)

                                                                  
                                                                  
                                                                  
                                                                  
                                                                  
                                                                  
                                                                  
                                                                  
                                                                  
                                                                  
                                                                  
                                                                  
                                                                  
                                                                  
                                                                  
                                                                  
                                                                  
                                                                  
                                                                  
                                                                  
                                                                  
                                                                  
                                                                  STOP?
                                                                  RETURN
                                                                  (STOP)

                                                                  
                                                                  
                                                                  
                                                                  
                                                                  
                                                                  
                                                                  
                                                                  
                                                                  
                                                                  
                                                                  
                                                                  
                                                                  
                                                                  
                                                                  
                                                                  
                                                                  
                                                                  
                                                                  
                                                                  
                                                                  
                                                                  
                                                                  CLOSE?
                                                                  RETURN
                                                                  (CLOSE)

                                                                 
                                                                 
                                                                 
                                                                 
                                                                 
                                                                 
                                                                 
                                                                 
                                                                 
                                                                 
                                                                 
                                                                 
                                                                 
                                                                 
                                                                 
                                                                 
                                                                 
                                                                 
                                                                 
                                                                 
                                                                 
                                                                 END
                                                                 CASE

                                       DONE? FCK ̲SET = (DERM,CMD,MENU)

                                                                 
                                                                 
                                                                 
                                                                 
                                                                 
                                                                 
                                                                 
                                                                 
                                                                 
                                                                 
                                                                 
                                                                 
                                                                 
                                                                 
                                                                 
                                                                 
                                                                 
                                                                 
                                                                 
                                                                 
                                                                 
                                                                 RETURN
                                                                 (WORK)

                                     END CASE

                                                                  ILL?
                                                                  C̲O̲M̲P̲U̲T̲E̲
                                                                  ̲E̲R̲R̲
                                                                  ̲N̲O̲(̲)̲(̲E̲R̲R̲.̲N̲O̲)̲
                                                                  ̲(̲4̲.̲2̲.̲2̲.̲6̲.̲2̲1̲)̲

                                  D̲I̲S̲P̲L̲A̲Y̲ ̲I̲L̲L̲E̲G̲A̲L̲ ̲C̲O̲N̲D̲I̲T̲I̲O̲N̲
                 ̲M̲S̲G̲ ̲
                                                      (̲4̲.̲2̲.̲2̲.̲4̲.̲2̲-̲4̲

                                                                  LEG?

                                                                 END
                                                                 CASE

             END CASE

             CASE E̲X̲E̲C̲ ̲T̲R̲A̲N̲S̲ ̲(̲ ̲ ̲)̲:̲W̲O̲R̲K̲ ̲S̲T̲O̲P̲ ̲C̲L̲O̲S̲E̲(̲4̲.̲2̲.̲2̲.̲4̲.̲5̲)̲

                 W̲O̲R̲K̲?̲ ̲C̲H̲E̲C̲K̲ ̲I̲F̲ ̲F̲O̲R̲M̲A̲T̲ ̲C̲M̲D̲ ̲E̲N̲T̲E̲R̲E̲D̲ ̲(̲4̲.̲2̲.̲2̲.̲4̲.̲2̲-̲5̲)̲

                 STOP? RETURN (STOP)

                 CLOSE? RETURN (CLOSE)

             END CASE
Figur 4.2.2.4.2-…86…1  …02…   …02…   …02…   …02…   …02…   …02…   …02…           …02…                        
  
         DISPLAY ILLEGAL CONDITION MSG

         CASE D̲I̲S̲P̲L̲A̲Y̲ ̲R̲E̲S̲P̲ ̲M̲S̲G̲ ̲(̲E̲R̲R̲ ̲N̲O̲)̲:̲E̲X̲C̲ ̲D̲O̲N̲E̲ ̲(̲4̲.̲2̲.̲2̲.̲6̲.̲1̲5̲)̲

             EXC? CASE E̲X̲C̲E̲P̲T̲I̲O̲N̲ ̲V̲D̲U̲ ̲(̲1̲)̲ ̲(̲S̲V̲U̲P̲ ̲O̲P̲)̲:̲S̲T̲O̲P̲ ̲C̲L̲O̲S̲E̲
                                                                    
                                                                    
                                                                    
                                                                    
                                                                    
                                                                    
                                                                    
                                                                    
                                                                    
                                                                    
                                                                    
                                                                    (̲4̲.̲2̲.̲2̲.̲6̲.̲1̲1̲)̲

                     STOP?RETURN (STOP)

                     CLOSE? RETURN (CLOSE)

                  END CASE

             DONE?CASE S̲E̲T̲ ̲C̲U̲R̲S̲O̲R̲(̲C̲M̲D̲ ̲P̲O̲S̲)̲:̲E̲X̲C̲ ̲D̲O̲N̲E̲(̲4̲.̲2̲.̲2̲.̲6̲.̲4̲)̲

                     EXC?                                        CASE
                                                                 E̲X̲C̲E̲P̲T̲I̲O̲N̲
                                                                 ̲V̲D̲U̲
                                                                 ̲(̲1̲)̲
                                                                 ̲(̲S̲V̲U̲P̲
                                                                 ̲O̲P̲)̲:̲S̲T̲O̲P̲
                                                                   
                                                                   
                                                                   
                                                                   
                                                                   
                                                                   
                                                                   C̲L̲O̲S̲E̲
                                                                   ̲(̲4̲.̲2̲.̲2̲.̲6̲.̲1̲1̲)̲

                                                                   STOP?
                                                                   RETURN
                                                                   (STOP)

                                                                   CLOSE?
                                                                   RETURN
                                                                   (CLOSE)

                                                                 END
                                                                 CASE

                     DONE? RETURN (WORK)

                 END CASE

         END CASE















Figure 4.2.2.4.2-4…86…1  …02…   …02…   …02…   …02…   …02…   …02…   …02…           …02…                       
   
         CHECK IF FORMAT CMD ENTERED

         EXIT ̲LAB = WORK

         LOOP TABLE ̲FORMAT ̲CMD

         FORMAT ̲CMD EQ FALSE?    EXIT LOOP TABLE ̲FORMAT ̲CMD

         CASE E̲X̲E̲C̲ ̲T̲A̲B̲L̲E̲ ̲C̲M̲D̲ ̲T̲R̲A̲N̲S̲ ̲(̲ ̲)̲ ̲(̲F̲O̲R̲M̲A̲T̲ ̲C̲M̲D̲)̲:̲ ̲W̲O̲R̲K̲ ̲S̲T̲O̲P̲
         ̲L̲O̲S̲E̲
                                                                    
                                                                    
                                                                    
                                                                    
                                                                    
                                                                    
                                                                    
                                                                    
                                                                    
                                                                    
                                                                    
                                                                    
                                                                    (̲4̲.̲2̲.̲2̲.̲4̲.̲9̲)̲

             WORK?

             STOP? EXIT ̲LAB = STOP

                      EXIT LOOP TABLE ̲FORMAT ̲CMD

             CLOSE? EXIT ̲LAB = CLOSE

                      EXIT LOOP TABLE ̲FORMAT ̲CMD

         END CASE

         END LOOP TABLE ̲FORMAT ̲CMD

         RETURN (EXIT ̲LAB)


















Figre 4.2.2.4.2-5…86…1  …02…   …02…   …02…   …02…   …02…   …02…   …02…           …02…                       
   
4.2.2.4.3    S̲u̲p̲e̲r̲v̲i̲s̲o̲r̲ ̲C̲o̲m̲m̲a̲n̲d̲ ̲V̲a̲l̲i̲d̲a̲t̲i̲o̲n̲ ̲M̲o̲d̲u̲l̲e̲



4.2.2.4.3.1 F̲u̲n̲c̲t̲i̲o̲n̲a̲l̲ ̲S̲p̲e̲c̲i̲f̲i̲c̲a̲t̲i̲o̲n̲

                 Validates a supervisor command entered in the
                 command line of the VDU Header Area. Validaion
                 includes command code validation, Parameter
                 Validation and PEC validation

                 Parameter Validation and PEC validation is
                 only carried out if the command code validation
                 is succesfull. Parameter Validation consist
                 of two parts: a simple syntax ceck and a full
                 semantic check. The full semantic check is
                 only carried out if both the simple syntax
                 check for all parameters and the PEC validation
                 are successful.



4.2.2.4.3.2 M̲o̲d̲u̲l̲e̲ ̲I̲n̲t̲e̲r̲f̲a̲c̲e̲

                 C̲a̲l̲l̲ ̲S̲p̲e̲c̲i̲f̲i̲c̲a̲t̲i̲o̲n̲

                 a)  VALIDATE ̲CMD ( )

                     (CC:EXT ̲ILL ̲LEG ̲TYPE):EXC ̲DONE

                 b)  VALIDATE ̲CMD ̲(R6,R7), EXC-DONE

                 R̲e̲g̲i̲s̲t̲e̲r̲ ̲C̲o̲n̲v̲e̲n̲t̲i̲o̲n̲s̲

                 C̲a̲l̲l̲ ̲R̲e̲g̲i̲s̲t̲e̲r̲s̲

                 R6                                              LINK

                 R̲e̲t̲u̲r̲n̲ ̲R̲e̲g̲i̲s̲t̲e̲r̲s̲

                 R0 - R6                                           (DEST)

                 R7  CC




4.2.2.4.3.3  M̲o̲d̲u̲l̲e̲ ̲C̲o̲m̲p̲o̲n̲e̲n̲t̲s̲

          None



4.2.2.4.3.4 D̲a̲t̲a̲ ̲D̲e̲s̲c̲r̲i̲p̲t̲i̲o̲n̲

          a)  D̲a̲t̲a̲ ̲R̲e̲f̲e̲r̲e̲n̲c̲e̲s̲

              EXT ̲ILL ̲LEG ̲TYPE        refer 4.2.2.5

              PARAM ̲ATTR              refer 4.2.2.5

              SUPV ̲CMD ̲REC            efer 4.2.2.5

              CMD ̲PARAM ̲TABLE         refer 4.2.2.5
              
              PARAMETER   TYPE        refer 4.2.2.5
  
              CMD ̲PARAM               refer  4.2.2.5

              SUPERVISOR ̲CMD ̲TABLE    refer CPS/DBD/001

              ALL ̲ONES                refer 4.2.2.5

              SFCO ̲TMP ̲KEY1           refer 4.2.2.5

              SFCO ̲MODE               refer 42.2.5

              ERR                     refer 4.2.2.5

              ERR-NO                  refer 4.2.2.5

              HEADER ̲LINE             refer 4.2.2.5

              TABLE ̲CMD ̲TYPE          refer 4.1.4

              SUPV ̲CMD ̲TYPE           refer 4.1.4

              SFCO ̲TMP ̲RECORD1        refer 4.2.2.5

              TERMINAL ̲TABLE          refer CPS/DBD/001

              DEVICE ̲TABLE            efer CPS/DBD/001

              DISTRIBUTION ̲PARAMETER  refer CPS/DBD/001…86…1
                                       …02…   …02…   …02…   …02…   …02… 
                                       …02…   …02…          
                                          …02…          
                                                 
              DEDICATED ̲PUNCH ̲PARAMETER                          Refer
                                                                 CPS/DBD/001

              DEDICATED ̲READER ̲PARAMETER                         Refer
                                                                 CPS/DBD/001

              CHANNEL ̲TABLE           Refer CPS/DBD/001

                  CIRCUIT TABLE       Refer CPS/DBD/001

              USR ̲TABLE               Refer CPS/DBD/001

              TIME ̲TYPE               Refer CPS/DBD/001



         b)   E̲x̲t̲e̲r̲n̲a̲l̲ ̲D̲a̲t̲a̲

              SUPV ̲CMD ̲REC          (m)

              PARAM ̲ATTR            (m)

              SFCO ̲TMP ̲ ̲KEY1        (m)

              SFCO ̲TMP ̲RECORD1      (m)

              ERR                   (m)

              ER ̲NO                (M)

              HEADER ̲LINE

              TERMINAL ̲TABLE

              DEVICE ̲TABLE

              CHANNEL ̲TABLE

              CIRCUIT ̲TABLE

              USER ̲TABLE

              DISTRIBUTION ̲PARAMETER

              DEDICATED ̲PUNCH ̲PARAMETER

              DEDICATED ̲READER ̲PARAMETER

          c)  L̲o̲c̲a̲l̲ ̲D̲a̲t̲a̲




4.2.2.4.3.5  ̲M̲o̲d̲u̲l̲e̲ ̲D̲e̲s̲i̲g̲n̲.̲

          The Module has two exits: EXC and DONE. An
          EXC exit is performed when a VDU interface
          procedure called returns with this result,
          otherwise a DONE Ext is performed. In case
          of a DONE exit the completion code (CC)indicates
          the result of the command validation: Regret
          (REGRET) means that the command line was empty,
          i.e. the supervisor cancels his request for
          a supervisor command execution. Illega (ill)
          means that the command was erroneous and legal
          (LEG) means that the entered command was valid.

          If the command was illegal ERR-NO contains
          the number of errors found and the array ERR
          the numbers of the Response Messages corresponding
          to he errors.

          Refer Fig. 4.2.2.4.3-1



  CASE R̲E̲A̲D̲ ̲C̲O̲M̲M̲A̲N̲D̲ ̲L̲I̲N̲E̲ ̲(̲ ̲ ̲)̲ ̲(̲N̲O̲ ̲O̲F̲ ̲B̲Y̲T̲E̲S̲)̲ ̲ ̲:̲ ̲E̲X̲C̲ ̲D̲O̲N̲E̲
                                               (̲4̲.̲2̲.̲2̲.̲6̲.̲1̲6̲)̲

      EXC? - RETURN (EXC) 

      DONE? - NO OF BYTES GT   O?
              CC = REGRET 
              RETURN (DONE)

  END CAE 

    L̲O̲O̲K̲U̲P̲ ̲ ̲ ̲P̲A̲R̲A̲M̲S̲ ̲(̲N̲O̲ ̲O̲F̲ ̲C̲H̲A̲R̲)̲ ̲(̲N̲O̲ ̲O̲F̲ ̲P̲A̲R̲A̲M̲S̲)̲ ̲ ̲:̲ ̲ ̲O̲K̲
 ̲
                                               (̲4̲.̲2̲.̲2̲.̲6̲.̲1̲8̲)̲

  ERR NO  =  O

  CC = LEG

  C̲O̲M̲M̲A̲N̲D̲ ̲C̲O̲D̲E̲ ̲V̲A̲L̲I̲D̲A̲T̲I̲O̲N̲ ̲(̲4̲.̲2̲.̲2̲.̲4̲.̲3̲.̲-̲2̲

  "COMMAND CODE VALIDATION OK 

  NO ̲OF ̲PARAMS = NO ̲OF ̲PARAMS-1

  PARAM ̲ATTR=  SUPV ̲CMD ̲REC.PARAMDESCRIPTOR 

  EXP ̲NO ̲PARAMS = PARAM ̲ATTR.NO ̲OF ̲PARAMS

  SUPV ̲CMD ̲REC.PEC EQ SIX ̲SPACES? - PEC ̲NO = 0

  PEC ̲NO = 1 

  NO ̲OF ̲PARAMS LT EXP ̲NO ̲PARAMS + PEC ̲NO? -     PEC ̲NO
                                                EQ 0
                                                ?
                            ERR(ERR ̲NO)=S14

                                                ERR(ERR
                                                ̲NO)=S12

  NO ̲OF ̲PARAMS GT  EXP ̲ ̲NO ̲PARAMS +PEC ̲N0?-     ERR(ERR
                                                ̲NO)=S13

  EXP ̲NO ̲PARAMS EQ 0 ?                          ERR ̲NO=ERR
                                                ̲NO +
                                                1

  S̲I̲M̲P̲L̲E̲ ̲P̲A̲R̲A̲M̲ ̲C̲H̲E̲C̲K̲ ̲(̲E̲X̲P̲ 

      N̲O̲ ̲O̲F̲ ̲ ̲P̲A̲R̲A̲M̲S̲)̲ ̲(̲C̲C̲)̲ ̲(̲4̲.̲2̲.̲2̲.̲6̲.̲2̲0̲)̲

  PEC ̲NO EQ O  ? 

  P̲E̲C̲ ̲ ̲ ̲V̲A̲L̲I̲D̲A̲T̲I̲O̲N̲ ̲(̲4̲.̲.̲2̲.̲4̲.̲3̲.̲-̲3̲)̲

  CC EQ ILL OR EXP ̲NO ̲PARAMS EQ O ?

  P̲A̲R̲A̲M̲E̲T̲E̲R̲ ̲V̲A̲L̲I̲D̲A̲T̲I̲O̲N̲ ̲ ̲(̲4̲.̲2̲.̲2̲.̲4̲.̲3̲.̲-̲4̲)̲

  RETURN (DONE)
Fig. 4.2.2.4.3-1…86…1  …02…   …02…   …02…   …02…   …02…   …02…   …02…                     …02…          
      
  C̲O̲M̲M̲A̲N̲D̲ ̲C̲O̲D̲E̲ ̲V̲A̲L̲I̲D̲A̲T̲I̲O̲N̲ 

  CUR ̲CMD ̲PARAM   = CMD ̲PARAM ̲TABLE (O)

  CUR ̲CMD ̲PARAM.TYPE IN ALPHA ̲TYPE AND 

  CUR ̲CMD ̲PARAM.NO ̲OF ̲CHAR  EQ 4

  ERR  (ERR ̲NO)=S10

    ERR ̲NO=ERR ̲NO+1
  CC = ILL

  RETURN (DONE)

  START=CUR ̲CMD ̲PARAM. START ̲POS

  DEFINE TMP PARAMS (1)

  CASE SEARCH ̲ONE ̲SECONDARY ̲KEY(SUPERVISOR ̲CMD ̲TABLE,2,
       SFCO ̲TMP ̲KEY1,1,SIZE(SUPV ̲CMD ̲REC),ALL ̲ONES)(SUPV
      ̲CMD ̲REC,
                                                  CC):
                          ERROR ̲OK

  ERROR?- ANALYZE ̲ERROR(CC,0)

      OK?     SFCO ̲TMP ̲KEY1. INFO  EQ  1?

              ERR(ERR ̲NO)=S11

              ERR ̲NO=ERR ̲NO + 1

              CC=ILL

              RETURN (DONE)

  END CASE 

  SFCO ̲MODE IN SUPV ̲CMD ̲REC.MODE?

  ERR(ERR ̲NO)=S32

  ERR ̲NO=ERR ̲NO+1

  CC=ILL

  RETURN (DONE)
Fig. 4.2.2.4.3-2…86…1  …02…   …02…   …02…   …02…   …02…   …02…   …02…                     …02…          
      
  P̲E̲C̲ ̲V̲A̲L̲I̲D̲A̲T̲I̲O̲N̲

  CUR ̲PARAM=CMD ̲PARAM ̲TABLE(EXP ̲NO ̲PARAMS+1)

  NO=CUR ̲PARAM.NO ̲OF ̲CHAR

  CUR ̲PARAM.TYPE IN ALPHA ̲NUM ̲TYPE AND

  NO GT O AND NO LE 6

  ERR(ERR ̲NO)=S15     REC ̲PEC=SX ̲SPACES

  ERR ̲NO=ERR ̲NO?1     REC ̲PEC(1..NO)=HEADER ̲LINE(CUR
  ̲PARAM.

                          START ̲POS..CUR ̲PARAM. START
                          ̲POS+NO-1)

                      SUPV ̲CMD ̲REC.PEC  EQ REC ̲PEC?

                      ERR(ERR ̲NO)=S16

                      ERR-NO=ERR ̲NO+1

  CC = ILL




















                 Fig. 4.2.2.4.3-3


  P̲A̲R̲A̲M̲E̲T̲E̲R̲ ̲V̲A̲L̲I̲D̲A̲T̲I̲O̲N̲

  SUPV ̲CMD=SUPV ̲CMD ̲REC.CMD ̲NO

  SUPV ̲CMD  IN TABLE ̲CMD ̲TYPE? 

                             CASE  T̲A̲B̲L̲E̲ ̲C̲M̲D̲ ̲V̲A̲L̲(̲S̲U̲P̲V̲
                      ̲C̲M̲D̲)̲

                                      E̲R̲R̲O̲R̲ ̲O̲K̲ ̲(̲4̲.̲2̲.̲2̲.̲4̲.̲4̲)̲

                              ERROR?CC=ILL

                               OK?

                          END CASE 

  CASE SUPV-CMD OF

      BLTQ,UBTQ,CATQ,SQHT,TPPT? - T̲E̲R̲M̲I̲N̲A̲L̲ ̲D̲E̲S̲I̲G̲N̲A̲T̲O̲R̲
      ̲V̲A̲L̲I̲D̲A̲T̲I̲O̲N̲
                                                (4.2.2.4.3-5)

      UBDQ,CADQ,DPPT?-D̲E̲V̲I̲C̲E̲ ̲D̲E̲S̲I̲G̲N̲A̲T̲O̲R̲ ̲V̲A̲L̲I̲D̲A̲T̲I̲O̲N̲(̲4̲.̲2̲.̲2̲.̲4̲.̲3̲-̲6̲)̲

      NOTR? - N̲O̲T̲R̲ ̲ ̲V̲A̲L̲I̲D̲A̲T̲I̲O̲N̲ ̲(̲4̲.̲2̲.̲2̲4̲.̲3̲-̲7̲)̲

      BLDQ? - B̲L̲D̲Q̲ ̲V̲A̲L̲I̲D̲A̲T̲I̲O̲N̲ ̲ ̲(̲4̲.̲2̲.̲2̲.̲4̲.̲3̲.̲-̲8̲)̲

      NOCC? - O̲U̲T̲G̲O̲I̲N̲G̲ ̲C̲H̲A̲N̲N̲E̲L̲ ̲D̲E̲S̲I̲G̲N̲A̲T̲O̲R̲ ̲V̲A̲L̲I̲D̲A̲T̲I̲O̲N̲
                                                    
 (̲4̲.̲2̲.̲2̲.̲4̲.̲3̲-̲1̲0̲)̲

      CPPT? - I̲N̲C̲O̲M̲I̲N̲G̲ ̲C̲H̲A̲N̲N̲E̲L̲ ̲D̲E̲S̲I̲G̲N̲A̲T̲O̲R̲ ̲V̲A̲L̲I̲D̲A̲T̲I̲O̲N̲
                                                    (̲4̲.̲2̲.̲2̲.̲4̲.̲3̲-̲1̲1̲)̲

      BLCQ,UBCQ, CACQ?-C̲I̲R̲C̲U̲I̲T̲ ̲N̲O̲ ̲V̲A̲L̲I̲D̲A̲T̲I̲O̲N̲ ̲(̲4̲.̲2̲.̲3̲.̲4̲.̲3̲.̲-̲1̲2̲)

      UPPT? - U̲S̲E̲R̲ ̲I̲D̲ ̲V̲A̲L̲I̲D̲A̲T̲I̲O̲N̲ ̲8̲4̲.̲2̲.̲2̲.̲4̲.̲3̲.̲-̲1̲3̲)̲

      OFLD? - O̲F̲L̲D̲ ̲V̲A̲L̲I̲D̲A̲T̲I̲O̲N̲ ̲(̲4̲.̲2̲.̲2̲.̲4̲.̲3̲-̲1̲4̲

      REMO,VOMO,VSMO,VODM,VONM, VODL?-V̲O̲L̲ ̲I̲D̲ ̲V̲A̲L̲I̲D̲A̲T̲I̲O̲N̲               
                                                                      
                                                                      
                                                                      
                                                                      
                                                                      
                                                                      
                                                                      
                                                                      
                                                                      
                                                                      
                                                                      
                                                                      
                                                                      
                                                                      
                                                                      
                                                                      
                                                                      
                                                                      
                                                                      
                                                                      
                                                                      
                                                                      (̲4̲.̲2̲.̲2̲.̲4̲.̲3̲-̲1̲5̲)̲

      FLQT? - F̲L̲Q̲T̲ ̲V̲A̲L̲I̲D̲A̲T̲I̲O̲N̲ ̲(̲4̲.̲2̲.̲2̲.̲4̲.̲3̲-̲1̲6̲)̲

  END CASE

Fig. 4.2.2.4.3-4…86…1  …02…   …02…   …02…   …02…   …02…   …02…   …02…                     …02…          
      
  T̲E̲R̲M̲I̲N̲A̲L̲ ̲D̲E̲S̲I̲G̲N̲A̲T̲O̲R̲ ̲V̲A̲L̲I̲D̲A̲T̲I̲O̲N̲ 

  DEFINE TMP PARAMS (3)

  CASE SEARCH ̲ONE ̲SECONDARY ̲KEY(TERMINAL ̲TABLE,2,SFCO
  ̲TMP ̲KEY1,

       1, SIZE (SFCO ̲TMP ̲RECORD1),1 )(SFCO ̲TMP ̲RECORD1,CC):ERRR
      ̲OK

      ERROR?-ANALYZE ̲ERROR (CC,0)

      OK? -   SFCO ̲TMP ̲KEY1.INF EQ  1?

              ERR(ERR ̲NO)=S18 

              ERR ̲NO=ERR ̲NO+1

              CC=ILL

  END CASE

























Fig. 4.2.2.4.3-5…86…1  …02…   …02…   …02…   …02…   …02…   …02…   …02…                     …02…          
      
  D̲E̲V̲I̲C̲E̲ ̲ ̲D̲E̲S̲I̲G̲N̲A̲T̲O̲R̲ ̲V̲A̲L̲I̲D̲A̲T̲I̲O̲N̲

  DEFINE TMP PARAMS (6)

  CASE SEARCH ̲ONE ̲SECONDARY ̲KEY (DEVICE ̲TABLE,2,SFCO
  ̲TMP ̲KEY1,1

        SIZE(SFCO ̲TMP ̲RECORD1),1)(SFCO ̲TMP ̲RECORD1,CC):ERROR
      ̲OK
      ERROR?-ANALYZE ̲ERROR(CC,0)

      OK?- SFCO ̲TMP ̲KEY1.INF  EQ 1?

           ERR(ERR ̲NO)=S19

           ERR ̲NO=ERR ̲NO+1

           CC=ILL

  END CASE 


























Fig. 4.2.2.4.3-6…86…1  …02…   …02…   …02…   …02…   …02…   …02…   …02…                     …02…          
      
  N̲O̲T̲R̲ ̲V̲A̲L̲I̲D̲A̲T̲I̲O̲N̲ 

  DEFINE TMP PARAMS (3)

  CASE SEARCH ̲ONE ̲SECONDARY ̲KEY (TERMINAL ̲TABLE,2,SFCO
  ̲TMP ̲KEY1,
          1, SIZE (SFCO ̲TMP ̲RECORD1),l)(SFCO ̲TMP ̲RECORD1,
                                                CC):ERROR
 ̲OK

      ERROR? -    ANALYZE ̲ERROR (CC,0)

      OK? -       SFCO ̲TMP ̲KEY1.INF EQ 1?

                  DEFINE  TMP PARAMS (6)

                  CASE    SEARCH ̲ONE ̲SECONDARY ̲KEY(DEVICE
                          ̲TABLE,2,SFCO ̲TMP ̲KEY1,1, SIZE
                          (SFCO ̲TMP ̲RECORD1), 1)(SFCO
                          ̲TMP ̲RECORD1,C):  ERROR ̲OK

                      ERROR? - ANALYZE ̲ERROR (CC,0

                      OK? -    SFCO ̲TMP ̲KEY1.INF EQ 1?
             
                               ERR(ERR ̲NO)=S23

                               ERR ̲NO=ERR ̲NO+1

                               CC=ILL

                      END CASE 

  END CASE












Fig. 4.2.2.4.3-7…86…1  …02…   …02…   …02…   …02…   …02…   …02…   …02…                     …02…          
      
  B̲L̲D̲Q̲ ̲V̲A̲L̲I̲D̲A̲T̲I̲O̲N̲

  DEFINE TMP PARAMS (6)

  CASE    SEARCH ̲ONE ̲SECONDARY ̲KEY (DEVICE ̲TABLE,2, SFCO
          ̲TMP-KEY1,1 SIZE (SFCO ̲TMP ̲RECORD1),l)(SFCO
          ̲TMP ̲RECORD1,CC):ERROR ̲OK

      ERROR? - ANALYE ̲ERROR (CC,0)

      OK? -    SFCO ̲TMP ̲KEY1.INF EQ O?-   ERR(ERR ̲NO)=S19

               EQUIVALENCE SFCO ̲TMP ̲RECORD1
               WITH DEVICE ̲PROFILE

               C̲H̲E̲C̲K̲ ̲I̲F̲ ̲D̲E̲D̲I̲C̲A̲T̲E̲D̲ ̲D̲E̲V̲I̲C̲E̲  ERR ̲NO=ERR
              ̲NO+1

                          (4.2.2.4.3.-9)  CC=ILL

  END CASE 




























Fig. 4.2.2.4.3.-8…86…1  …02…   …02…   …02…   …02…   …02…   …02…   …02…                     …02…            
        
C̲H̲E̲C̲K̲ ̲I̲F̲ ̲D̲E̲D̲I̲C̲A̲T̲E̲D̲ ̲D̲E̲V̲I̲C̲E̲

CASE GET ̲SYSTEM ̲PARAMETER(DISTRIBUTION ̲PARAMETER)(SFCO
 ̲TMP ̲RECORD2,
                                                CC):ERROR
                                                ̲OK

  ERROR?  ̲ ANALYZE ̲ERROR  (CC;O)

  OK? - EQUIVALENCE SFCO ̲TM ̲RECORD2 WITH DISTRIBUTION
  ̲PARAMETER
         
        DISTRIBUTION ̲PARAMETER. ATOMAL ̲PRINTER ̲LOG ̲DES
      EQ

          DEVICE ̲PROFILE.LD ̲NO? - ERR(ERR ̲NO)=S20 

                                  ERR ̲NO=ERR ̲NO+1

                                  CC=ILL

END CASE

CASE  GET ̲SYSTEM ̲PARAMETER (DEDIATED ̲PUNCH ̲PARAMETER)(SFCO
      ̲TMP ̲RE-
                                                CORD2,CC):ERROR
                                                ̲OK

  ERROR? - ANALYZE ̲ERROR (CC,0)

  OK?      EQUIVALENCE SFCO ̲TMP ̲RECORD 2 WITH PUNCH ̲PARAMETER

           PUNCH-PARAMETER.DEC ̲PUNCH ̲DD EQ 

             DEVICE ̲PROFILE. LD ̲NO? -  ERR(ERR ̲NO)=21

                                       ERR ̲DO=ERR ̲DO+1

                                       CC=ILL

END CASE 

CASE  GET-SYSTEM-PARAMETER (DEDICATED ̲READER ̲PARAMETER)(SFCO
      ̲TMP ̲RECORD2,CC):ERROR ̲OK

  ERROR? - ANALYZE-ERROR(CC,0)

  OK? -    SFCO ̲TMP ̲RECORD2 EQ DEVICE ̲PROFILE.D ̲NO?

                                    ERR(ERR ̲NO)=S22

                                    ERR ̲NO=ERR ̲NO+1

                                    CC=ILL

END CASE 
Fig. 4.2.2.4.3-9…86…1  …02…   …02…   …02…   …02…   …02…   …02…   …02…                     …02…            
        
  O̲U̲T̲G̲O̲I̲N̲G̲ ̲C̲H̲A̲N̲N̲E̲L̲ ̲D̲E̲S̲I̲G̲N̲A̲T̲O̲R̲ ̲V̲A̲L̲I̲D̲A̲T̲I̲O̲N̲

  DEFINE TMP PARAMS (10)

  CASE    SEARCH ̲ONE ̲SECONDARY ̲KEY(CHANNEL ̲TABLE,3,SFCO
          ̲TMP ̲KEY1,
          1,SIZE(SFCO ̲TMP ̲RECORD1), 1)(SFCO ̲TMP ̲RECORD1CC):ERROR
          ̲OK

      ERROR? - ANALYZE ̲ERROR(CC,0)

      OK? -    SFCO ̲TMP ̲KEY1.INF  EQ 1?

               ERR(ERR ̲NO)=S25

               ERR ̲NO=ERR ̲NO+1

               CC=ILL

  END CASE



























Fig. 4.2.2.4.3-10…86…1  …02…   …02…   …02…   …02…   …02…   …02…   …02…                     …02…          
      
  I̲N̲C̲O̲M̲I̲N̲G̲ ̲C̲H̲A̲N̲N̲E̲L̲ ̲D̲E̲S̲I̲G̲N̲A̲T̲O̲R̲ ̲V̲A̲L̲I̲D̲A̲T̲I̲O̲N̲

  DEFINE TMP PARAMS (9)

  CASE SEARCH ̲ONE ̲SECONDARY ̲KEY(CHANNEL ̲TABEL,2,SFCO
  ̲TMP ̲KEY1,

       1,SIZE (SFCO ̲TMP ̲RECORD1),1)(SFCO ̲TMP ̲RECORD1,CC)ERROR
      ̲OK

      ERROR? - ANALYZE ̲ERROR(CC,

      OK?      SFCO ̲TMP ̲KEY1.INF EQ 1?

               ERR(ERR ̲NO)=S24

               ERR ̲NO=ERR ̲NO+1

               CC=ILL

  END CASE 


























Fig. 4.2.2.3.4-11…86…1  …02…   …02…   …02…   …02…   …02…   …02…   …02…                     …02…          
      
  C̲I̲R̲C̲U̲I̲T̲ ̲N̲O̲ ̲V̲A̲L̲I̲D̲A̲T̲I̲O̲N̲ 












































Fig. 4.2.2.3.4-12…86…1  …02…   …02…   …02…   …02…   …02…   …02…   …02…                     …02…            
        
  U̲S̲E̲R̲ ̲I̲D̲ ̲V̲A̲L̲I̲D̲A̲T̲I̲O̲N̲ 

  DEFINE TMP PARAMETERS (14)

  CASE    SEARCH ̲PRIMARY ̲KEY   (USER ̲TABLE; SFCO ̲TMP
          ̲KEY1, 1,SIZE(SFCO ̲TMP ̲RECORD1),0)(SFCO ̲TMP
          ̲RECORD1,CC):ERROR ̲OK

      ERROR? - NALYZE ̲ERROR(CC,0)

      OK?      SFCO ̲TMP ̲KEY1.INF EQ 1 ?

               ERR(ERR ̲NO)=S26

               ERR ̲NO=ERR ̲NO+1

               CC=ILL

  END CASE 



























Fig. 4.2.2.4.3-13 …86…1  …02…   …02…   …02…   …02…   …02…   …02…   …02…                     …02…         
       
  O̲F̲L̲D̲ ̲V̲A̲L̲I̲D̲A̲T̲I̲O̲N̲












































Fig. 4.2.2.4.3-14…86…1  …02…   …02…   …02…   …02…   …02…   …02…   …02…                     …02…          
      
  V̲O̲L̲ ̲I̲D̲ ̲V̲A̲L̲I̲D̲A̲T̲I̲O̲N̲ 












































Fig. 4.2.2.4.3-15…86…1  …02…   …02…   …02…   …02…   …02…   …02…   …02…                     …02…          
      
  F̲L̲Q̲T̲ ̲V̲A̲L̲I̲D̲A̲T̲I̲O̲N̲












































Fig. 4.2.2.4.3-16…86…1         …02…   …02…   …02…   …02…               …02…                  
         
4.2.2.4.4 T̲a̲b̲l̲e̲ ̲c̲o̲m̲m̲a̲n̲d̲ ̲V̲a̲l̲i̲d̲a̲t̲i̲o̲n̲ ̲M̲o̲d̲u̲l̲e̲



4.2.2.4.4.1 F̲u̲n̲c̲t̲i̲o̲n̲a̲l̲ ̲S̲p̲e̲c̲i̲f̲i̲c̲a̲t̲i̲o̲n̲

  Checks for table related commands whether the table-
  entry specified by the parameter exists andif not,
  if a new entry may be created.



4.2.2.4.4.2 M̲o̲d̲u̲l̲e̲ ̲I̲n̲t̲e̲r̲f̲a̲c̲e̲

   C̲a̲l̲l̲ ̲S̲p̲e̲c̲i̲f̲i̲c̲a̲t̲i̲o̲n̲

   a)TABLE ̲CMD ̲VAL

      (SUPV ̲CMD:TABLE ̲CMD ̲TYPE):ERROR ̲OK

   b)TABLE ̲CMD ̲VAL(RO,R6):ERROR ̲OK

   R̲e̲g̲i̲s̲t̲e̲r̲ ̲C̲o̲n̲c̲e̲n̲t̲i̲o̲n̲s̲

   C̲a̲l̲l̲ ̲R̲e̲g̲i̲s̲t̲e̲r̲s̲

   RO   SUPV ̲CMD

   R   LINK

   R̲e̲t̲u̲r̲n̲ ̲ ̲R̲e̲g̲i̲s̲t̲e̲r̲s̲

   RO - R7            (DEST)



4.2.2.4.4.3 M̲o̲d̲u̲l̲e̲ ̲C̲o̲m̲p̲o̲n̲e̲n̲t̲s̲

   a)LOOKUP ̲EMPTY ̲ENTRY(TABLE : TABLE ID)

  LOOKUP ̲EMPTY ̲ENTRY checks via the table attributes
  for the table specified whether a new entry in the
  table may b created or not. Refer fig. 4.2.2.4.4-…86…1
          …02…   …02…   …02…   …02…               …02…                  
          
4.2.2.4.4.4 D̲a̲t̲a̲ ̲D̲e̲s̲c̲r̲i̲p̲t̲i̲o̲n̲

  a)  D̲a̲t̲a̲ ̲R̲e̲f̲e̲r̲e̲n̲c̲e̲s̲

      TABLE ̲CMD ̲TYPE  Refer 4.1.4.

      TABLE ̲ID    Refer CPS/PBD/001

      SFCO ̲TMP ̲RECORD1    Refer 4.1.4

      SFCO ̲TMP ̲KEY1   Refer 4.2.2.5

      EMPY ̲ENTRY  Refer 4.1.4.

      TABLE ̲ATTRIBUTES    Refer CPS/DBD/001

      ERR         Refer 4.2.2.5

      ERR ̲NO      Refer 4.2.2.5

      TERMINAL ̲TABLE  Refer CPS/DBD/001

      MAX ̲VDUS    Refer CPS/DBD/001

      CMD ̲PARAM ̲TABLE Refer 4.2.2.5

      DEVICE ̲TABLE    Refer CPS/DBD/001

      ALL ̲OES Refer 4.2.2.5

      MSP ̲START   Refer 4.2.2.5

      LSP ̲START   Refer 4.2.2.5

      PTR ̲START   Refer 4.2.2.5

      PTP ̲START   Refer 4.2.2.5

      OCR ̲START   Refer 4.2.2.5.

      NO ̲OF ̲MSPS  Refer CPS/DBD/001

      NO ̲OF ̲LSPS  Refer CPS/DBD/001

      NO ̲OF ̲PTRS  Refer CPS/DBD/001…86…1         …02…   …02…   …02… 
                   …02…               …02…                  
                          

      NO ̲OF ̲PTPS  Refer CPS/DBD/001

      NO ̲OF ̲OCRS  Refer CPS/DBD/001

      CIRCUIT ̲TABLE   Refer CPS/DBD/001

      CHANNEL ̲TABLE   Refer CPS/DBD/001

      USER ̲TABLE  Refer CPS/DBD/001

      TOTAL ̲SIC ̲TBLE  Refer CPS/DBD/001

      AIG ̲TABLE   Refer CPS/DBD/001

      SCD ̲TABLE   Refer CPS/DBD/001

      PLA ̲REF ̲TABLE   Refer CPS/DBD/001

      LOCAL ̲PLA ̲TABLE Refer CPS/DBD/001

      RI ̲TABLE    Refer CPS/DBD/001

      SCARS ̲CCIS ̲TABLE    Refer CPS/DBD/001

      OPERATING ̲SIGNAL ̲TABL                     Refer
                                                CPS/DBD/001

      SUPERVISOR ̲CMD ̲TABLE                      Refer
                                                CPS/DBD/001

  b) E̲x̲t̲e̲r̲n̲a̲l̲ ̲D̲a̲t̲a̲

      SFCO ̲TMP ̲RECORD1    (M)

      SFCO ̲TMP ̲KEY1   (M)

      EMPTY ̲ENTRY (M)

      ERR         (M)

      ERR ̲NO      (M)


         c)  L̲o̲c̲a̲l̲ ̲D̲a̲t̲a̲



4.2.2.4.4.5 M̲o̲d̲u̲l̲e̲ ̲D̲e̲s̲i̲g̲n̲

         Refer fig. 4.2.2.4.4-2…86…1 …02…  …02…  …02…  …02…  …02…  …02…    …02…            
         …02…         …02…                   
         L̲O̲O̲K̲U̲P̲ ̲E̲M̲P̲T̲Y̲ ̲E̲N̲T̲R̲Y̲

         CASE GET ̲TABLE ̲ATTRIBUTES(TABLE)                        (SFCO
                                                                 ̲TMP
                                                                 ̲RECORD1,CC):
                                                                  
                                                                  
                                                                  
                                                                  
                                                                  
                                                                  
                                                                  
                                                                  
                                                                  
                                                                  
                                                                  
                                                                  
                                                                  
                                                                  
                                                                  
                                                                  
                                                                  
                                                                  
                                                                  
                                                                  
                                                                  
                                                                  
                                                                  
                                                                  
                                                                  
                                                                  
                                                                  
                                                                  
                                                                  
                                                                  
                                                                  ERROR
                                                                  ̲OK

             ERROR?  ANALYSE ̲ERROR(CC,O)

             OK?     EQUIVALENCE SFCO ̲TP ̲RECORD1 WITH TABLE
                     ̲ATTRIBUTES

                                     TABLE ̲ATTRIBUTES.LOAD EQ
                                     0 AND
                                                                    ?-
                                                                    ERR(ERR
                                                                    ̲NO)=S28
                                     TABLE ̲ATTRIBUTES.OVERLOAD
                                     EQ 0

                                     TABLE ̲ATTRIBUTES.LOAD EQ
                                     0?-                         ERR(ERR
                                                                 ̲NO)=S17

                                     TABLE ̲ATTRIBUTES.OVERLOAD
                                     EQ 0?                       ERR(ERR
                                                                 ̲NO)=S27

                                     CONDTION=OK                  ERR
                                                                  ̲NO=ERR.NO-1

                                     EMPTY ̲ENTRY=TRUE             CONDITION=ERROR

         END CASE























Fig. 4.2.2.4.4-1…86…1 …02…  …02…  …02…  …02…  …02…  …02…    …02…             …02…         …02…                  
 

         CASE SUPV ̲CMD OF TABLE ̲CMD ̲TYPE

             TEPC?-  T̲E̲P̲C̲ ̲V̲A̲L̲I̲D̲A̲T̲I̲O̲N̲ ̲(̲4̲.̲2̲.̲2̲.̲4̲.̲4̲-̲3̲)̲

             POSC?-  P̲O̲S̲C̲ ̲V̲A̲L̲I̲D̲A̲T̲I̲O̲N̲ ̲(̲4̲.̲2̲.̲2̲.̲4̲.̲4̲-̲5̲)̲

             CHAC?-  C̲H̲A̲C̲ ̲V̲A̲L̲I̲D̲A̲T̲I̲O̲N̲ ̲(̲4̲.̲2̲.̲2̲.̲4̲.̲4̲-̲7̲)̲

             CIRT?-  C̲I̲R̲T̲ ̲V̲A̲L̲I̲D̲A̲T̲I̲O̲N̲ ̲4̲.̲2̲.̲2̲.̲4̲.̲4̲-̲9̲)̲

             UPUP?-  U̲P̲U̲P̲ ̲V̲A̲L̲I̲D̲A̲T̲I̲O̲N̲ ̲(̲4̲.̲2̲.̲2̲.̲4̲.̲4̲-̲1̲0̲)̲

             SICT?-  S̲I̲C̲T̲ ̲V̲A̲L̲I̲D̲A̲T̲I̲O̲N̲ ̲(̲4̲.̲2̲.̲2̲.̲4̲.̲4̲-̲1̲2̲)̲

             SDLT?-  S̲D̲L̲T̲ ̲V̲A̲L̲I̲D̲A̲T̲I̲O̲N̲ ̲(̲4̲.̲2̲.̲2̲.̲4̲.̲4̲-̲1̲3̲)̲

             SCDT?-  S̲C̲D̲T̲ ̲V̲A̲L̲I̲D̲A̲T̲I̲O̲N̲ ̲(̲4̲.̲2̲.̲2̲.̲4̲.̲4̲-̲1̲4̲)̲

             AIGT?-  A̲I̲G̲T̲ ̲V̲A̲L̲I̲D̲A̲T̲I̲O̲N̲ ̲(̲4̲.̲2̲.̲2̲.̲4̲.̲4̲-̲1̲5̲)̲

             GPLT?-  G̲P̲L̲T̲ ̲V̲A̲L̲I̲D̲A̲T̲I̲O̲N̲ ̲(̲4̲.̲.̲2̲.̲4̲.̲4̲-̲1̲6̲)̲

             LPLT?-  L̲P̲L̲T̲ ̲V̲A̲L̲I̲D̲A̲T̲I̲O̲N̲ ̲(̲4̲.̲2̲.̲2̲.̲4̲.̲4̲-̲1̲8̲)̲

             RITA?-  R̲I̲T̲A̲ ̲V̲A̲L̲I̲D̲A̲T̲I̲O̲N̲ ̲(̲4̲.̲2̲.̲2̲.̲4̲.̲4̲-̲2̲0̲)̲

             SCCT?-  S̲C̲C̲T̲ ̲V̲A̲L̲I̲D̲A̲T̲I̲O̲N̲ ̲(̲4̲.̲2̲.̲2̲.̲4̲.̲4̲-̲2̲1̲)̲

             OPST?-  O̲P̲S̲T̲ ̲V̲A̲L̲I̲D̲A̲T̲I̲O̲N̲ ̲(̲4̲.̲2̲.̲2̲.̲4̲.̲4̲-̲2̲2̲)̲

             CMDC?-  C̲M̲D̲C̲ ̲V̲A̲L̲I̲D̲A̲T̲I̲O̲N̲ ̲(̲4̲.̲2̲.̲2̲.̲4̲.̲4̲-̲2̲3̲)̲

         END CASE

RETURN (EXIT LAB)









Fig. 4.2.2.4.4-2…86…1 …02…  …02…  …02…  …02…  …02…  …02…    …02…             …02…         …02…                    
   
         T̲E̲P̲C̲ ̲V̲A̲L̲I̲D̲A̲T̲I̲O̲N̲

         DEFINE TMP PARAMS (2)

         CASE    SEARCH ̲ONE ̲SECONDARY ̲KEY(TERMINAL ̲TABLE,2,SFCO
                 ̲TMP ̲KEY1,
                 1,SIZE(SECQ ̲TMP ̲RECORD1),ALL ̲ONES)(SFCO ̲TMP
                 ̲RECORD1,CC):
                                                                    
                                                                    
                                                                    
                                                                    
                                                                    
                                                                    
                                                                    
                                                                    
                                                                    
                                                                    ERROR
                                                                    ̲OK

             ERROR?- ANALYSE ̲ERROR(CC,0)

             OK?-                    SFCO ̲TMP ̲KEY1.INF EQ 1?-EMPTY
                                     ̲ENTRY=FALSE

                                                                   EXIT
                                                                   ̲LAB
                                                                   =
                                                                   OK

                                     SFCO ̲TMP ̲KEY1.KEY=FOUR
                                     SPACES

                                     SFCO ̲TMP ̲PARAMS.MASK2=1

                                     CASE                        SEARCH
                                                                 ̲ONE
                                                                 ̲SECONDARY
                                                                 ̲KEY(TERMINAL
                                                                 ̲TABLE,2,
                                                                  FCO
                                                                  ̲TMP
                                                                  ̲KEY1,1SIZE(SFCO
                                                                  ̲TMP
                                                                  ̲RECORD1),1)
                                                                  (SFCO
                                                                  ̲TMP
                                                                  ̲RECORD1,CC):ERROR
                                                                  ̲OK

                                                                 ERROR?- ANALYSE
                                                                         ̲ERROR(CC,O)

                                                                 OK?-  C̲H̲E̲C̲K̲
                                                                       ̲I̲F̲
                                                                       ̲T̲E̲R̲M̲I̲N̲A̲L̲
                                                                       ̲T̲A̲B̲L̲E̲
                                                                       ̲W̲A̲S̲
                                                                       F̲U̲L̲L̲(̲4̲.̲2̲.̲2̲.̲4̲.̲4̲.̲-̲4̲)̲

                                     END CASE

         END CASE


Fig 4.2.2.4.4-3…86…1 …02…  …02…  …02…  …02…  …02…  …02…    …02…      …02…      …02…         …02…                   
         C̲H̲E̲C̲K̲ ̲I̲F̲ ̲T̲E̲R̲M̲I̲N̲A̲L̲ ̲T̲A̲B̲L̲E̲ ̲W̲A̲S̲ ̲F̲U̲L̲L̲


         SFCO ̲TMP ̲KEY1.INF EQ1?-     EQUIVALENCE SFCO ̲TMP ̲RECORD1
                                     WITH
                                                                     TERMINAL
                                                                     ̲PROFILE
                                                                   TERMINAL
                                                                   ̲PROFILE.LT
                                                                   ̲NO
                                                                   LE
                                                                   MAX
                                                                   ̲VDUS?-

                                                                     EMTY
                                                                     ̲ENTRY=TRUE

                                                                     EXIT
                                                                     ̲LAB=
                                                                     OK

         ERR(ERR ̲NO)=S17

         ERR ̲NO=ERRNO+1

         EXIT ̲LAB=ERROR






























Fig. 4.2.2.4.4-4…86…1 …02…  …02…  …02…  …02…  …02…  …02…    …02…      …02…      …02…         …02…                   
P̲O̲S̲C̲ ̲V̲A̲L̲I̲D̲A̲T̲I̲O̲N̲

EQUIVALENCE(CUR ̲CMD ̲REC,CMD ̲PARAM ̲TABLE(2):CMD ̲PARAM)

HL ̲INDEX1=CUR ̲CMD ̲REC.START ̲POS

HL ̲INDEX2=CUR ̲CMD ̲REC.NO ̲OF ̲CHAR+HL ̲INDEX1-1

ASCII ̲STRING(1..3)=HEADER ̲LIN(HL ̲INDEXl..HL ̲INDEX2)

CASE ASCII ̲STRING

         :MSP: ?     DEVICE ̲TYPE=MSP

         :LSP: ?     DEVICE ̲TYPE=LSP

         :PTR: ?     DEVICE ̲TYPE=PTR

         :PTP: ?     DEVICE ̲TYPE=PTP

         :OCR: ?     DEVICE ̲TYPE=OCR

         OTHERWISE?  ERR(ERR ̲NO)=S4+1

                                     ERR ̲NO=ERR ̲NO+1
                                     EXIT ̲LAB=ERROR
END CASE

EXIT ̲LAB EQ ERROR?

DEFINE TMP PARAMS (5)

CASE     SEARCH ̲ONE ̲SECONDARY ̲KEY(DEVICE ̲TABLE,2,SFCO ̲TMP ̲KEY1,
             1,SIZE(SFCO ̲TMP ̲RECORD1),ALL ̲ONES)(SFCO ̲TMP ̲RECORD1,CC):
                                                                     ERROR
                                                                     ̲OK

         ERROR?-ANALYSE ̲ERROR (CC,0)

         OK?-   SFCO ̲TMP ̲KEY1.INFEQ 1?-EMPTY ̲ENTRY=FALSE

                  C̲H̲E̲C̲K̲ ̲I̲F̲ ̲E̲M̲P̲T̲Y̲ ̲D̲E̲V̲I̲C̲E̲   EXIT ̲LAB= OK

                  T̲A̲B̲L̲E̲ ̲E̲N̲T̲R̲Y̲ ̲E̲X̲I̲S̲T̲(̲4̲.̲2̲.̲2̲.̲4̲.̲4̲-̲6̲)̲

END CASE

                     Fig 4.2.2.4.4-5