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