top - download
⟦817b9dc3f⟧ Wang Wps File
Length: 29165 (0x71ed)
Types: Wang Wps File
Notes: CPS/SDS/030
Names: »1502A «
Derivation
└─⟦7955290a6⟧ Bits:30005803 8" Wang WCS floppy, CR 0106A
└─ ⟦this⟧ »1502A «
WangText
…00……00……00……00…5…02……00……00…5
5…06…5…07…4…0e…4…02…4
4…07…3…0d…3…01…3…06…2…0b…2…00…2…05……86…1 …02… …02… …02…
…02…CPS/SDS/030
…02…841012…02……02…
STORAGE AND RETRIEVAL
DETAILED DESIGN SPECIFICATION…02…ISSUE 1…02…CAMPS
4.2.1 O̲n̲-̲L̲i̲n̲e̲ ̲S̲t̲o̲r̲a̲g̲e̲ ̲S̲p̲e̲c̲i̲f̲i̲c̲a̲t̲i̲o̲n̲s̲
The storage sub-package performs the updating of the
on-line catalogue during on-line storage of messages
and transactions.
4.2.1.1 F̲u̲n̲c̲t̲i̲o̲n̲a̲l̲ ̲S̲p̲e̲c̲i̲f̲i̲c̲a̲t̲i̲o̲n̲
The following points are included in the functional
specification:
- reception of storage requests
- retrieval key pick-up
- emptying temporary area
- update on-line catalogue
- complete storage.
Fig. 4.2.1.1-1 overleaf depicts these five functions.
FIG. 4.2.1.1-1
4.2.1.1.1 R̲e̲c̲e̲p̲t̲i̲o̲n̲ ̲o̲f̲ ̲S̲t̲o̲r̲a̲g̲e̲ ̲R̲e̲q̲u̲e̲s̲t̲s̲
Applications requesting storage of messages and transaction
activate the storage procedure by sending a QEL to
ISQ. Contents of QEL are an identification of requestor,
reference to the CIF and type of CIF to be stored.
QEL is checkpointed upon their arrival in the ISQ
4.2.1.1.2 \R̲e̲t̲r̲i̲e̲v̲a̲l̲ ̲K̲e̲y̲ ̲P̲i̲c̲k̲-̲u̲p̲
The CIF reference in QEL is used to identify the CIF
from which the storage keys are fetched. Type of CIF
informs the storage sub-package about the kind of retrieval
keys. According to this information, the retrieval
keys are fetched from the CIF information areas. Keys
are transferred to main memory temporary areas, PRI
BUFFER and DTG BUFFER. The description area contains
pointer information regarding those areas where the
storage keys are stored.
4.2.1.1.3 E̲m̲p̲t̲y̲i̲n̲g̲ ̲T̲e̲m̲p̲o̲r̲a̲r̲y̲ ̲A̲r̲e̲a̲
One of two conditions shall be fulfilled to invoke
emptying of the temporary area. One minute elapsed
since last emptying or PRI ̲DTG ̲TEMP.PHYS ̲ENTRY ̲NO exceeding
the value of NO ̲OF ̲PRI ̲BUF ̲ENTRIES. PRI ̲DTG ̲
TEMP.PHYS ̲ENTRY ̲NO holds the number of entries to be
moved.
4.2.1.1.4 U̲p̲d̲a̲t̲e̲ ̲O̲n̲l̲i̲n̲e̲ ̲C̲a̲t̲a̲l̲o̲g̲u̲e̲
Storage address is calculated on basis of LAST ̲LOADED
̲DTG ̲PRI.PHYS ̲ENTRY ̲NO and size of each entry. This
is valid for both the DTG ̲FILE ̲ON and the PRI ̲FILE
̲ON. A new TOC ̲FILE ̲ON entry is supplied at regular
intervals. At present this interval is 1 minute.
Completion of transfer causes the storage pointers
to be updated according to number of entries moved
to each file.
4.2.1.1.5 C̲o̲m̲p̲l̲e̲t̲e̲ ̲S̲t̲o̲r̲a̲g̲e̲
After update on-line catalogue, a new one minute CSF
time-out is set. The three main memory control area
locations are all preset to the value 0. QELs corresponding
to the stored on-line catalogues are dismantled.
4.2.1.2 S̲u̲b̲-̲P̲a̲c̲k̲a̲g̲e̲ ̲S̲o̲f̲t̲w̲a̲r̲e̲ ̲S̲t̲r̲u̲c̲t̲u̲r̲e̲
Figure 4.2.1.2.-1 shows the software structure of the
storage function. This consists of one coroutine performing
the functions listed in section 4.2.1.1. The coroutine
consists of four modules. The main storage module receives
the storage requests and calls the handle retrieval
keys module for collection of retrieval keys from CIF.
The PRI ̲DTG handling module is called when online catalogues
are updated upon emptying of the temporary storage
area. COMM ̲PROC contains the common procedures shared
between the modules in the sub-package.
FIGURE 4.2.1.2-1
SOFTWARE STRUCTURE
4.2.1.3 D̲a̲t̲a̲ ̲F̲l̲o̲w̲ ̲a̲n̲d̲ ̲C̲o̲n̲t̲r̲o̲l̲ ̲L̲o̲g̲i̲c̲
Refer figure 4.2.1.2.-1. The three boxes corresponds
each to one module. The storage main module receives
QELs in ISQ which are either storage requests or a
timeout request. If storage request, the HANDLE RETRIEVAL
KEY MODULE is activated.
If timeout request the PRI ̲DTG HANDLING MODULE is activated
Refer section 4.2.1.4.1 for details for the STORAGE
Main module.
Refer section 4.2.1.4.2 for details for the HANDLE
RETRIEVAL KEY MODULE.
Refer section 4.2.1.4.3 for details for the PRI ̲DTG
HANDLING MODULE
4.2.1.4 M̲o̲d̲u̲l̲e̲ ̲S̲p̲e̲c̲i̲f̲i̲c̲a̲t̲i̲o̲n̲
Following modules are identified for the storage coroutine
- STORAGE MAIN MODULE
- HANDLE RETRIEVAL KEY MODULE
- PRI ̲DTG HANDLING MODULE
4.2.1.4.1 S̲t̲o̲r̲a̲g̲e̲ ̲M̲a̲i̲n̲ ̲M̲o̲d̲u̲l̲e̲
4.2.1.4.1.1 F̲u̲n̲c̲t̲i̲o̲n̲a̲l̲ ̲S̲p̲e̲c̲i̲f̲i̲c̲a̲t̲i̲o̲n̲
This module receives QELs in ISQ and detects type of
QEL. If a store request QEL is detected, CIF is opened
and administration field read. This main module then
calls the handling retrieval module for collection
of retrieval keys. QEL reference is kept in the storage
list until CIF is dismantled and saved. If temporary
storage area is full or the previously mentioned QEL
is of type timeout, the PRI ̲DTG handling module is
called for updating of the online catalogue. Further
close down command is received and corresponding action
performed.
4.2.1.4.1.2 M̲o̲d̲u̲l̲e̲ ̲I̲n̲t̲e̲r̲f̲a̲c̲e̲
The module interfaces to the queue monitor i.e. the
module receives the first QEL from the incoming storage
queue (ISQ). Refer figure 4.2.1.4.1.5-4 . Close down
command from supervisor command coroutine is received
in ISQ as well.
Interfaces downwards are as follows:
a) F̲u̲n̲c̲t̲i̲o̲n̲a̲l̲ ̲D̲e̲s̲c̲r̲i̲p̲t̲i̲o̲n̲
The procedure extracts the retrieval keys from
the CIF and store them in a temporary buffer.
C̲a̲l̲l̲ ̲S̲p̲e̲c̲i̲f̲i̲c̲a̲t̲i̲o̲n̲
HANDLE ̲RETRIEVAL ̲KEYS ( )( )
b) F̲u̲n̲c̲t̲i̲o̲n̲a̲l̲ ̲D̲e̲s̲c̲r̲i̲p̲t̲i̲o̲n̲
The procedure reports catalogue threshold exceeding
during online storage.
C̲a̲l̲l̲ ̲S̲p̲e̲c̲i̲f̲i̲c̲a̲t̲i̲o̲n̲
REPORT ̲STORAGE ̲ERR
(ERROR: SAR ̲ERROR)( )
c) F̲u̲n̲c̲t̲i̲o̲n̲a̲l̲ ̲D̲e̲s̲c̲r̲i̲p̲t̲i̲o̲n̲
The procedure transfer the temporary catalogue
buffers to disk.
C̲a̲l̲l̲ ̲S̲p̲e̲c̲i̲f̲i̲c̲a̲t̲i̲o̲n̲
OUTPUT ̲PRI ̲DTG
(DISK ̲REF: DTG ̲PRI ̲ENTRY ̲REF
NO ̲OF ̲ENT: INTEGER)( )
d) F̲u̲n̲c̲t̲i̲o̲n̲a̲l̲ ̲D̲e̲s̲c̲r̲i̲p̲t̲i̲o̲n̲
The procedure calculates the free space in both
PRI and DTG file.
C̲a̲l̲l̲ ̲S̲p̲e̲c̲i̲f̲i̲c̲a̲t̲i̲o̲n̲
GET ̲ONE ̲DTG ̲PRI-space
(REF: DTC ̲PRI ̲ENTRY ̲REF)
(ROOM: LONG)
e) F̲u̲n̲c̲t̲i̲o̲n̲a̲l̲ ̲S̲p̲e̲c̲i̲f̲i̲c̲a̲t̲i̲o̲n̲
The procedure dismantles the QEL of type single,
buffer or view.
C̲a̲l̲l̲ ̲S̲p̲e̲c̲i̲f̲i̲c̲a̲t̲i̲o̲n̲
DISCONNECT ̲QEL
(QEL: QEL ̲REFERENCE,
OBJ: OBJECT ̲TYPE)( )
4.2.1.4.1.3. M̲o̲d̲u̲l̲e̲ ̲C̲o̲m̲p̲o̲n̲e̲n̲t̲s̲
a) M̲a̲i̲n̲ ̲M̲o̲d̲u̲l̲e̲
D̲e̲s̲c̲r̲i̲p̲t̲i̲o̲n̲
Figure 4.2.1.4.1.5 -1
The main activities are shown in the flowgram.
Initialization of main loop with all important
activities during on-line storage.
Reception of ISQ for being able to read administration
field.
Extract of retrieval keys and storage of CIF.
Registration of QEL in list of non dismantled QELs.
Saving of retrieval keys in case of list full or
time-out QEL.
Complete the storage procedure.
b) I̲n̲i̲t̲i̲a̲l̲i̲z̲a̲t̲i̲o̲n̲
D̲e̲s̲c̲r̲i̲p̲t̲i̲o̲n̲
Refer figure 4.2.1.4.1.5-2.
Initialization in form of a request of a periodic
time-out for emptying of temporary storage area.
The TOC ̲FILE ̲ON is updated with missing entries
after a recovery, and report generation in case
of exceeding the catalogue thresholds.
The PRI ̲DTG ̲TEMP is initialized to point out the
first new entry to be stored.
The PRI ̲DTG ̲DISK ̲REF is initialized to point out
the last entry loaded to disk.
c) R̲e̲c̲e̲i̲v̲e̲ ̲Q̲u̲e̲u̲e̲ ̲E̲l̲e̲m̲e̲n̲t̲
D̲e̲s̲c̲r̲i̲p̲t̲i̲o̲n̲
Refer figure 4.2.1.4.1.5-7
The next QEL is received from the incoming storage
queue (ISQ). RECEIVE ̲FIRST ̲QEL queue monitor call,
performs this function.
d) T̲i̲m̲e̲ ̲o̲u̲t̲?̲
D̲e̲s̲c̲r̲i̲p̲t̲i̲o̲n̲
Refer figure 4.2.1.4.1.5-8
The received QEL is checked for either being a
storage request or a time-out request.
e) O̲p̲e̲n̲ ̲C̲I̲F̲ ̲A̲n̲d̲ ̲R̲e̲a̲d̲ ̲A̲d̲m̲i̲n̲i̲s̲t̲r̲a̲t̲i̲o̲n̲ ̲F̲i̲e̲l̲d̲.̲
D̲e̲s̲c̲r̲i̲p̲t̲i̲o̲n̲
Refer figure 4.2.1.4.1.5-9
The QEL referenced CIF is opened and the administration
field is moved from disk to the area named FIELD
̲LIST ̲WITH ̲FIELD ̲1.
f) E̲x̲t̲r̲a̲c̲t̲ ̲R̲e̲t̲r̲i̲e̲v̲a̲l̲ ̲K̲e̲y̲s̲ ̲A̲n̲d̲ ̲S̲t̲o̲r̲e̲ ̲C̲I̲F̲
D̲e̲s̲c̲r̲i̲p̲t̲i̲o̲n̲
Refer figure 4.2.1.4.1.5-10 and 11.
The QEL referenced CIF is stored by use of MMS
and the HANDLE RETRIEVAL KEYS module is activated
for pick up of retrieval keys corresponding to
QEL maintype.
g) P̲u̲t̲ ̲Q̲u̲e̲u̲e̲ ̲E̲l̲e̲m̲e̲n̲t̲ ̲I̲n̲ ̲L̲i̲s̲t̲ ̲O̲f̲ ̲N̲o̲n̲ ̲D̲i̲s̲m̲a̲n̲t̲l̲e̲d̲
D̲e̲s̲c̲r̲i̲p̲t̲i̲o̲n̲
Refer figure 4.2.1.4.1.5-12
The storage list is updated.
The parameter NO ̲OF ̲ELEMENTS is incremented and
the QEL reference and object type is supplied the
list.
h) L̲i̲s̲t̲ ̲F̲u̲l̲l̲
D̲e̲s̲c̲r̲i̲p̲t̲i̲o̲n̲
Refer figure 4.2.1.4.1.5-13
The number of storage list elements is checked
for maximum value. If full the QELs are saved and
buffer emptied.
The QELs stored in the storage list are dismantled
and the list is cleared, ready for receiveing new
elements.
i) S̲a̲v̲e̲ ̲R̲e̲t̲r̲i̲e̲v̲a̲l̲ ̲k̲e̲y̲s̲
D̲e̲s̲c̲r̲i̲p̲t̲i̲o̲n̲
Refer figure 4.2.1.4.1.5-14
The collected retrieval key storage QEL are saved
and if catalogue free space can hold the collected
keys they are outputted to the online catalogue.
The procedure OUTPUT ̲PRI ̲DTG transfers the catalogue
to disk.
j) U̲p̲d̲a̲t̲e̲ ̲T̲i̲m̲e̲ ̲A̲n̲d̲ ̲T̲O̲C̲-̲F̲I̲L̲E̲-̲O̲N̲
D̲e̲s̲c̲r̲i̲p̲t̲i̲o̲n̲
Refer figure 4.2.1.4.1.5-15
The memory TEMP ̲TOC ̲REF IS UPDATED i.e. assigned
new physical number and TOC time, and copied to
disk to the TOC ̲FILE ̲ON data area.
k) C̲o̲m̲p̲l̲e̲t̲e̲ ̲S̲t̲o̲r̲a̲g̲e̲
D̲e̲s̲c̲r̲i̲p̲t̲i̲o̲n̲
Refer figures 4.2.1.4.1.5-16 to 19.
The online catalogue header is copied to disk i.e.
the online volume information and the catalogue
descriptor information.
The catalogue thresholds are checked, determine
if catalogue can accommodate the catalogue entries
to be filed. When space is available the storage
list is emptied.
l) E̲m̲p̲t̲y̲ ̲L̲i̲s̲t̲
D̲e̲s̲c̲r̲i̲p̲t̲i̲o̲n̲
Refer figure 4.2.1.4.1.5-20
The QELs stored in the storage list are dismantled
and the list is cleared, ready for receiving new
elements.
m) U̲p̲d̲a̲t̲e̲ ̲T̲O̲C̲ ̲F̲I̲L̲E̲ ̲O̲N̲
F̲u̲n̲c̲t̲i̲o̲n̲a̲l̲ ̲D̲e̲s̲c̲r̲i̲p̲t̲i̲o̲n̲
Refer figure 4.2.1.4.1.5-21
This procedure updates the TOC ̲FILE ̲ON data part.
TEMP ̲TOC ̲REF contains the address information necessary
to locate the position where the new entry shall
be supplied.
A new entry is supplied in data area consisting
of FREE ̲ENTRY. FREE ̲ENTRY contains physical and
absolute entry number for the next free entry in
both DTG ̲FILE ̲ON and PRI ̲FILE ̲ON.
I̲n̲t̲e̲r̲f̲a̲c̲e̲ ̲S̲p̲e̲c̲i̲f̲i̲c̲a̲t̲i̲o̲n̲
C̲a̲l̲l̲ ̲S̲p̲e̲c̲i̲f̲i̲c̲a̲t̲i̲o̲n̲
PUT ̲TOC (TEMP ̲TOC ̲REF: TEMP ̲TOC ̲REF,
FREE ̲ENTRY: DTG ̲PRI ̲ENTRY ̲REF)
( )
D̲a̲t̲a̲ ̲D̲e̲s̲c̲r̲i̲p̲t̲i̲o̲n̲
E̲x̲t̲e̲r̲n̲a̲l̲ ̲D̲a̲t̲a̲
TEMP ̲TOC ̲REF refer 4.2.1.5.3
DTG ̲PRI ̲ENTRY ̲REF refer 4.2.1.5.3
L̲o̲c̲a̲l̲ ̲D̲a̲t̲a̲
None
P̲r̲o̲c̲e̲d̲u̲r̲e̲ ̲D̲e̲s̲i̲g̲n̲
Refer flowgram figure 4.2.1.4.1.5-21
4.2.1.4.1.4 D̲a̲t̲a̲ ̲D̲e̲s̲c̲r̲i̲p̲t̲i̲o̲n̲s
a) D̲a̲t̲a̲ ̲R̲e̲f̲e̲r̲e̲n̲c̲e̲s̲
Refer source listing.
- SAR ̲D*ONL ̲STO.D*MAINMOD ̲PREFIX.S
b) E̲x̲t̲e̲r̲n̲a̲l̲ ̲D̲a̲t̲a̲
Refer source listing.
- SAR.D*ONL ̲STO.D*ONL ̲STO ̲IMPORT.D*MAIN ̲MOD.I
4.2.1.4.1.5 M̲o̲d̲u̲l̲e̲ ̲D̲e̲s̲i̲g̲n̲
Refer flowgrams figure 4.2.1.4.1.5-1-22.
MAIN ̲MODULE
STORAGE
I̲N̲I̲T̲I̲A̲L̲I̲Z̲E̲
MAIN LOOP
R̲E̲C̲E̲I̲V̲E̲ ̲Q̲U̲E̲U̲E̲
E̲L̲E̲M̲E̲N̲T̲
CLOSE ̲DOWN? SAVE ̲RETRIEVAL
̲KEYS( )( )
COMPLETE ̲STORAGE(
) ( )
T̲I̲M̲E̲O̲U̲T̲?̲
O̲P̲E̲N̲ ̲C̲I̲F̲ ̲A̲N̲D̲ ̲R̲E̲A̲D̲
A̲D̲M̲I̲N̲I̲S̲T̲R̲A̲T̲I̲O̲N̲ ̲F̲I̲E̲L̲D̲ SAVE RETRIEVAL
KEYS( )( )
CIF ̲CONDITION EQ FALSE?
E̲X̲T̲R̲A̲C̲T̲ DISCONNECT ̲QEL
R̲E̲T̲R̲I̲E̲V̲A̲L̲ ̲K̲E̲Y̲S̲ (ISQ ̲QEL,ISQ ̲
A̲N̲D̲ ̲S̲T̲O̲R̲E̲ ̲C̲I̲F̲ ATTR.OBJECT)
P̲U̲T̲ ̲Q̲U̲E̲U̲E̲ ̲E̲L̲E̲M̲E̲N̲T̲
P̲A̲R̲A̲M̲E̲T̲E̲R̲S̲ ̲I̲N̲ ̲L̲I̲S̲T̲ ̲O̲F̲ UPDATE ̲
N̲O̲N̲D̲I̲S̲M̲A̲N̲T̲L̲E̲D̲ TIME ̲AND ̲
TOC ̲FILE ̲ON
( )( )
L̲I̲S̲T̲ ̲F̲U̲L̲L̲?̲
SAVE ̲RETRIEVAL ̲
KEYS ( )( )
COMPLETE ̲STORAGE
( ) ( )
COMPLETE ̲STORAGE(
) ( )
END MAINLOOP
Figure 4.2.1.4.1.5-1
I̲N̲I̲T̲I̲A̲L̲I̲Z̲E̲
Request periodical timeout
CASE REQUEST ̲TIME ̲OUT (TIMEOUT ̲REQUEST)
(CC):
ERROR? ANALYZE ̲ERROR (CC,o)
OK?
END CASE
INITIALIZE ̲PRI ̲DTG ̲TEMP()()
INITIALIZE ̲PRI ̲DTG ̲DISK ̲REF()()
FIRST ̲FREE ̲BUFFER = 1 "pointer in pri and dtg buffer
"used by PUT ̲RETRIEVAL ̲KEYS
G̲E̲T̲ ̲T̲O̲C̲
U̲P̲D̲A̲T̲E̲ ̲T̲O̲C̲ ̲F̲I̲L̲E̲ ̲O̲N̲
Figure 4.2.1.4.1.5-2
G̲E̲T̲ ̲T̲O̲C̲
CASE READ ̲TIME (F ̲TIME ̲TYPE) (READ ̲TOC, CC):
ERROR? - ANALYZE ̲ERROR (CC,o)
OK?
END CASE
Test if time superior to last time
WAIT ̲SEM (ONL ̲CAT ̲HEADER ̲SEM)
LAST ̲TOC = ONLINE ̲VOL ̲HEAD.CAT ̲DESCR.
LAST ̲LOADED ̲TOC. TOC
SIGNAL ̲SEM (ONL ̲CAT ̲HEADER ̲SEM)
Time shall never go backwards
READ ̲TOC LT LAST ̲TOC?
READ ̲TOC=
LAST ̲TOC
Figure 4.2.1.4.1.5-3
U̲P̲D̲A̲T̲E̲ ̲T̲O̲C̲ ̲F̲I̲L̲E̲ ̲O̲N̲
INITIALIZE READ BYTES PARAMETERS
CASE READ ̲BYTES (ONL ̲TOC ̲FD, ONL ̲CAT ̲HEAD ̲FIL ̲ADD,
ONL ̲CAT ̲HEAD ̲BLE)
(ONL ̲CAT ̲HEAD ̲FIL ̲ADD,CC):
ERROR? ANALYZE ̲ERROR (CC,0)
OK?
END CASE
TEMP ̲TOC ̲REF.PHYS ̲ENTRY ̲NO =
ONLINE ̲VOL ̲HEAD.CAT ̲DESCR.LAST ̲LOADED ̲TOC.PHYS
̲ENTRY ̲NO
TEMP ̲TOC ̲REF.TOC =
ONLINE ̲VOL ̲HEAD.CAT ̲DESCR.LAST ̲LOADED ̲TOC.TOC
CALCULATE ̲TOC ̲ENTRIES ̲TO ̲BE ̲SUPPLIED (READ ̲TOC)
(MISSING ̲TOC ̲ENTRIES)
LOOP
MISSING ̲TOC ̲ENTRIES EQ 0?
UPDATE TIME AND TOC FILE ON
UPDATE ONL HEADER
MISSING ̲TOC ̲ENTRIES = MISSING ̲TOC ̲ENTRIES-1
GET ̲ONL ̲TOC ̲SPACE (TEMP ̲TOC ̲REF) (SPACE ̲TOC)
SPACE ̲TOC GT STORE ̲CAT ̲THRESHOLD.VALUE?
STORE ̲CAT ̲THRESHOLD.ISSUED = FALSE STORE ̲CAT
̲THRESHOLD.
ISSUED EQ
TRUE?
REPORT ̲STORAGE
̲ERR
(THRESHOLD
̲WARNING)
END LOOP
Figure 4.2.1.4.1.5-4
INITIALIZE ̲PRI ̲DTG ̲TEMP()()
initializes the physical and absolute values
according to LAST ̲LOADED ̲DTG ̲PRI
PRI ̲DTG ̲TEMP.PHYS ̲ENTRY ̲NO =
ONLINE ̲VOL ̲HEAD.CAT ̲DESCR.LAST ̲LOADED ̲DTG ̲PRI.
PHYS ̲ENTRY ̲NO
PRI ̲DTG ̲TEMP.ABS ̲ENTRY ̲NO =
ONLINE ̲VOL ̲HEAD.CAT ̲DESCR.LAST ̲LOADED ̲DTG ̲PRI.
ABS ̲ENTRY ̲NO.
Figure 4.2.1.4.1.5-5
INITIALIZE ̲PRI ̲DTG ̲DISK ̲REF()()
This procedure reads the catalogue descriptor
and loads PRI ̲DTG ̲DISK ̲REF with LAST ̲LOADED ̲DTG
̲PRI
PRI ̲DTG ̲DISK ̲REF.PHYS ̲ENTRY ̲NO =
ONLINE ̲VOL ̲HEAD.CAT ̲DESCR.LAST ̲LOADED ̲DTG ̲PRI.
PHYS ̲ENTRY ̲NO
PRI ̲DTG ̲DISK ̲REF.ABS ̲ENTRY ̲NO =
ONLINE ̲VOL ̲HEAD.CAT ̲DESCR.LAST ̲LOADED ̲DTG ̲PRI.
ABS ̲ENTRY ̲NO
Figure 4.2.1.4.1.5-6
R̲E̲C̲E̲I̲V̲E̲ ̲Q̲U̲E̲U̲E̲ ̲E̲L̲E̲M̲E̲N̲T̲
CASE RECEIVE ̲FIRST ̲QEL (TRUE,ISQ,)
(ISQ ̲ATTR, ISQ ̲QEL,
ISQ ̲SUBQUEUE, CC):
ERROR? ANALYZE ̲ERROR (CC,0)
OK?
END CASE
Figure 4.2.1.4.1.5-7
T̲I̲M̲E̲O̲U̲T̲?̲
ISQ ̲ATTR. MAINTYPE
EQ TIMEOUT?
FALSE TRUE
Figure 4.2.1.4.1.5-8
OPEN ̲CIF ̲AND
R̲E̲A̲D̲ ̲A̲D̲M̲I̲N̲I̲S̲T̲R̲A̲T̲I̲O̲N̲ ̲F̲I̲E̲L̲D̲
For LOG ̲CIFs field one is loaded with LOG administration
data
CASE OPEN ̲VIEW (ISQ ̲QEL)
(CC)
ERROR? CASE ANALYSE ̲ERROR (CC, 1, STOPPED):
(E1)
E1?
OK?
END CASE
CASE READ ̲VIEW (SIZE (FIELD 1)
FIELD ̲LIST ̲WITH ̲FIELD ̲1,
ISQ ̲QEL,
FIELD ̲1)
(CC)
ERROR? ANALYZE ̲ERROR (CC, O)
OK
END ̲CASE CIF
̲CONDITION=FALSE
CIF ̲CONDITION=TRUE
Figure 4.2.1.4.1.5-9
E̲X̲T̲R̲A̲C̲T̲ ̲R̲E̲T̲R̲I̲E̲V̲A̲L̲ ̲K̲E̲Y̲S̲
A̲N̲D̲ ̲S̲T̲O̲R̲E̲ ̲C̲I̲F̲
S̲T̲O̲R̲E̲ ̲C̲I̲F̲
HANDLE ̲RETRIEVAL ̲KEYS (4.2.1.4.2.5-1)
Figure 4.2.1.4.1.5-10
S̲T̲O̲R̲E̲ ̲C̲I̲F̲
CASE STORE (ISQ ̲QEL)
(STORE ̲VIEW ̲NAME, CC):
ERROR? ANALYZE ̲ERROR (CC, O)
OK?
END CASE
Figure 4.2.1.4.1.5-11
P̲U̲T̲ ̲Q̲U̲E̲U̲E̲ ̲E̲L̲E̲M̲E̲N̲T̲
I̲N̲ ̲L̲I̲S̲T̲ ̲O̲F̲ ̲N̲O̲N̲D̲I̲S̲M̲A̲N̲T̲L̲E̲D̲
STORAGE ̲LIST.NO ̲OF ̲ELEMENTS=
STORAGE ̲LIST.NO ̲OF ̲ELEMENTS+1
STORAGE ̲LIST.QELS (STORAGE ̲LIST.NO ̲OF ̲ELEMENTS). REF
=ISQ ̲QEL
STORAGE ̲LIST.QELs (STORAGE ̲LIST.NO ̲OF ̲ELEMENTS).
TYP=ISQ ̲ATTR.OBJECT
Figure 4.2.1.4.1.5-12
L̲I̲S̲T̲ ̲F̲U̲L̲L̲
The storage list field NO ̲OF ̲ELEMENTS
is checked for max value
STORAGE ̲LIST.NO ̲OF ̲ELEMENTS GE
MAX ̲NO ̲OF ̲STORAGE ̲LIST ̲ELEMENTS
Figure 4.2.1.4.1.5-13
SAVE ̲RETRIEVAL ̲KEYS ( )( )
LOOP
GET ̲ONL ̲DTG ̲PRI ̲SPACE (PRI ̲DTG ̲DISK ̲REF)
(SPACE)
SPACE GE NO ̲OF ̲PRI ̲BUF ̲ENTRIES? EXIT
REPORT ̲STORAGE ̲ERR (PRI ̲DTG ̲ERR)
END LOOP
OUTPUT ̲PRI ̲DTG (PRI ̲DTG ̲DISK ̲REF,
NO ̲OF ̲PRI ̲BUF ̲ENTRIES)
FREE ̲ENTRY = PRI ̲DTG ̲TEMP+1
LAST ̲LOAD = PRI ̲DTC ̲TEMP
"FREE ̲ENTRY contains the absolute and
"physical address on the next free entry
in both
"PRI ̲FILE ̲ON and DTG ̲FILE ̲ON
Figure 4.2.1.4.1.5-14
UPDATE ̲TIME ̲AND ̲TOC ̲FILE ̲ON ( )( )
TEMP ̲TOC ̲REF.PHYS ̲ENTRY ̲NO
=TEMP ̲TOC ̲REF.PHYS ̲ENTRY ̲NO+1
TEMP ̲TOC ̲REF.TOC
=TEMP ̲TOC ̲REF.TOC + 1 minute
TEMP ̲TOC ̲REF.PHYS ̲ENTRY ̲NO LE
MAX ̲NO ̲IN ̲TOC ̲TOC ̲FILE ̲ON?
TEMP ̲TOC ̲REF.PHYS ̲ENTRY ̲NO=1
PUT ̲TOC (TEMP ̲TOC ̲REF, PRI ̲DTC ̲TEMP)
Figure 4.2.1.4.1.5-15
COMPLETE ̲STORAGE ( ) ( )
UPDATE ONL HEADER ( ) ( )
T̲E̲S̲T̲ ̲T̲H̲R̲E̲S̲H̲O̲L̲D̲
E̲M̲P̲T̲Y̲ ̲L̲I̲S̲T̲
RETURN
Figure 4.2.1.4.1.5-16
UPDATE ̲ONL ̲HEADER ( )( )
WAIT ̲SEM (ONL ̲CAT ̲HEADER ̲SEM)
ONLINE ̲VOL ̲HEAD.CAT ̲DESCR.
LAST ̲LOADED ̲TOC=TEMP ̲TOC ̲REF
ONLINE ̲VOL ̲HEAD.CAT ̲DESCR.
LAST ̲LOADED ̲DTG ̲PRI=LAST ̲LOAD
"test for DTG update of volume control
"header
VOLUME ̲DTG LE ONLINE ̲VOL ̲HEAD.VOLUME ̲ENTRY.YOUNGEST
̲DTG?
ONLINE ̲VOL ̲HEAD.VOLUME ̲ENTRY.YOUNGEST ̲DTG = VOLUME
̲DTG
output
CASE MODIFY ̲BYTES (ONL ̲TOC ̲FD, ONL ̲CAT ̲HEAD ̲FIL ̲ADD,
ONL ̲CAT ̲HEAD ̲BLE)
(ONL ̲CAT ̲HEAD ̲FIL ̲ADD, CC):
ERROR? -ANALYZE ̲ERROR (CC,O)
OK?
END CASE
SIGNAL ̲SEM (ONL ̲CAT ̲HEADER ̲SEM)
Figure 4.2.1.4.1.5-17
T̲E̲S̲T̲ ̲T̲H̲R̲E̲S̲H̲O̲L̲D̲
GET ̲ONL ̲TOC ̲SPACE (TEMP ̲TOC ̲REF)(SPACE) (4.2.1.4.1.5-19)
CALCULATE SPACE IN PERCENT TOC ̲PERC
GET ̲ONL ̲DTG ̲PRI ̲SPACE (FREE ̲ENTRY)(SPACE)
CALCULATE SPACE IN PERCENT PRI ̲DTG ̲PERC
PUT MAXIMUM IN MAX ̲SPACE ̲PERC
MAX ̲SPACE ̲PERC GT
STORE ̲CAT ̲THRESHOLD.VALUE?
STORE ̲CAT ̲THRESHOLD. STORE ̲CAT ̲THRESHOLD.
ISSUED=FALSE ISSUED EQ TRUE?
REPORT ̲STORAGE ̲ERR
(THRESHOLD ̲WARNING)
Figure 4.2.1.4.1.5-18
GET ̲ONL ̲TOC ̲SPACE (REF:TOC ̲ENTRY ̲REF)
(ROOM:LONG)
WAIT ̲SEM (ONL ̲CAT ̲HEADER ̲SEM)
PHYS ̲TOC ̲ENTR ̲OLDEST=
ONLINE ̲VOL ̲HEAD.CAT ̲DESCR.
OLDEST ̲NON ̲CLEARED ̲TOC.PHYS ̲ENTRY
̲NO
TOC ̲SIZE= ONLINE ̲VOL ̲HEAD.CAT ̲DESCR.
MAX ̲NO ̲IN ̲TOC
SIGNAL ̲SEM (ONL ̲CAT ̲HEADER ̲SEM)
REF.PHYS ̲ENTRY ̲NO GE
PHYS ̲TOC ̲ENTR ̲OLDEST?
ROOM= ROOM=TOC ̲SIZE
PHYS ̲TOC ̲ENTR ̲OLDEST -(REF.PHYS
̲ENTRY ̲NO
-REF. PHYS-ENTRY ̲NO -PHYS ̲TOC
̲ENTR ̲OLDEST)
Figure 4.2.1.4.1.5-19
E̲M̲P̲T̲Y̲ ̲L̲I̲S̲T̲
STORAGE ̲LIST.NO ̲OF ̲STORAGE ̲LIST ̲ELEMENTS EQ 0 ?
ELEMENT=1
LOOP
DISCONNECT ̲QEL (STORAGE ̲LIST.QELS (ELEMENT).REF,
STORAGE ̲LIST.QELS (ELEMENT). TYP)
ELEMENT EQ
STORAGE ̲LIST.NO ̲OF ̲STORAGE ̲
LIST ̲ELEMENTS? EXIT
ELEMENT=ELEMENT+1
END LOOP
FIGURE 4.2.1.4.1.5-20
PUT ̲TOC (TEMP ̲TOC ̲REF: TEMP ̲TOC ̲REF,
PRI ̲DTG ̲TEMP: DTG ̲PRI ̲ENTRY ̲REF)
( )
TOC ̲ENTR.PHYS ̲ENTRY ̲NO = PRI ̲DTG ̲TEMP.PHYS ̲ENTRY ̲NO
TOC ̲ENTR.TOC = TEMP ̲TOC ̲REF.TOC
TOC ̲FILE ̲ON ̲FILADD.FIRST ̲BYTE
TEMP ̲TOC ̲REF.
PHYS ̲ENTRY ̲NO * SIZE ̲TOC ̲ENTRY +
SIZE (ONLINE ̲VOL ̲HEAD)
TOC ̲FILE ̲ON ̲FILE ̲ADD.BYTE ̲COUNT = SIZE ̲TOC ̲ENTRY
TOC ̲FILE ̲ON ̲BLE.KIND = LOW ̲BYTE
TOC ̲FILE ̲ON ̲BLE.LINK = 0 "no link
TOC ̲FILE ̲ON ̲BLE.ADDRESS = ADDRESS (TOC ̲ENTR)
TOC ̲FILE ̲ON ̲BLE.BYTE ̲SIZE = SIZE ̲TOC ̲ENTRY
CASE MODIFYBYTES (SARTOCFILEONFD,
TOC ̲FILE ̲ON ̲FILADD,
TOC ̲FILE ̲ON ̲BLE)
(TOC ̲FILE ̲ON ̲FILADD,
CC)
ERROR? ANALYZE ̲ERROR (CC,0)
OK?
END CASE
Figure 4.2.1.4.1.5-21
4.2.1.4.2 H̲a̲n̲d̲l̲e̲ ̲R̲e̲t̲r̲i̲e̲v̲a̲l̲ ̲K̲e̲y̲s̲ ̲M̲o̲d̲u̲l̲e̲
4.2.1.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̲
This module extracts the actual retrieval keys from
the CIF according to the kind of message or transaction
to be stored. QEL information field contains this identification.
The SAR types are as follows:
- SAR incoming message
- SAR incoming distributed message
- SAR first draft
- SAR release notification
- SAR comment
- SAR released message
- SAR transmitted message
- SAR LOG CIF
The retrieval keys are stored in the temporary storage
area.
4.2.1.4.2.2 M̲o̲d̲u̲l̲e̲ ̲I̲n̲t̲e̲r̲f̲a̲c̲e̲
The module interfaces to the main module which calls
this module when storage keys are fetched from CIF.
Refer figure 4.2.1.4.1.5-7 and figure 4.2.1.4.2.5-1.
This module calls the PRI DTG HANDLING MODULE for update
of online catalogue. Refer figure 4.2.1.2 and section
4.2.1.4.3 PUT ̲RETRIEVAL ̲KEYS.
C̲a̲l̲l̲ ̲S̲p̲e̲c̲i̲f̲i̲c̲a̲t̲i̲o̲n̲
PUT ̲RETRIEVAL ̲KEYS
(PRI ̲ENTRY: PRI ̲ENTRY ̲TYPE,
DTG
̲ENTRY:
INC
̲MSG
̲DTG
̲RECORD
̲TYPE)
(
)
Further this module reports internal errors by the
procedure call REPORT ̲SAR ̲INT ̲ERR
C̲a̲l̲l̲ ̲S̲p̲e̲c̲i̲f̲i̲c̲a̲t̲i̲o̲n̲
REPORT ̲SAR ̲INT ̲ERR
(LOCATION, SUBPACKAGE ̲NO,
MODULE ̲NO, PROCEDURE ̲NO,
EROR ̲CODE) ( )
4.2.1.4.2.3 M̲o̲d̲u̲l̲e̲ ̲C̲o̲m̲p̲o̲n̲e̲n̲t̲
a) H̲a̲n̲d̲l̲e̲ ̲R̲e̲t̲r̲i̲e̲v̲a̲l̲ ̲K̲e̲y̲s̲
D̲e̲s̲c̲r̲i̲p̲t̲i̲o̲n̲
Refer figure 4.2.1.4.2.5-1. This flowgram identifies
the type of message to be stored according
to the first information field in the QEL attributes.
The corresponding routine is activated. Routines
in question are:
- STORE ̲INC ̲MSG
- STORE ̲INC ̲DIST ̲MSG
- STORE ̲FIRST ̲DRAFT
- STORE ̲RELEASE ̲NOT
- STORE ̲COMMENT
- STORE ̲RELEASED ̲MSG
- STORE ̲TRANS ̲MSG
- STORE ̲LOG ̲CIF
b) S̲t̲o̲r̲e̲ ̲R̲o̲u̲t̲i̲n̲e̲s̲
D̲e̲s̲c̲r̲i̲p̲t̲i̲o̲n̲
Refer figure 4.2.1.4.2.5-2-20. The eight store
routines work the same way.
The main type is selected from the QEL attributes
and corresponding case function is performed. Each
case function sets the key mask flags.
-ORIG ̲KEY ̲PACK ̲FLAG and/or
-CHN ̲STA ̲KEY ̲PACK ̲FLAG
so that these flags can identify the keys to be
fetched in the later GET ̲AND ̲PUT ̲ORIG ̲KEYS ̲INC,
GET ̲AND ̲PUT ̲CHN ̲STN ̲KEYS ̲INC and GET ̲AND ̲PUT ̲ORIG
̲KEYS ̲
INC ̲DIST routines.
c) G̲e̲t̲ ̲A̲n̲d̲ ̲P̲u̲t̲ ̲O̲r̲i̲g̲ ̲K̲e̲y̲s̲ ̲I̲n̲c̲
D̲e̲s̲c̲r̲i̲p̲t̲i̲o̲n̲
Refer fig. 4.2.1.4.2.5-21.
This routine initializes the catal and DTG-entry
where storage keys shall be loaded. Originator
and header keys are fetched by use of the component
procedures GET ̲ORIG ̲KEYS ̲FROM ̲ADMIN ̲FIELD and GET
̲
HEADER ̲PARAMS. A later call of PUT RETRIEVAL KEYS
module, loads the temporary storage area with header
parameters and corresponding originator keys.
d) G̲e̲t̲ ̲A̲n̲d̲ ̲P̲u̲t̲ ̲C̲h̲n̲ ̲S̲t̲a̲ ̲K̲e̲y̲s̲ ̲I̲n̲c̲
D̲e̲s̲c̲r̲i̲p̲t̲i̲o̲n̲
Refer fig. 4.2.1.4.2.3-22.
This routine initializes the catal entry and the
dtg entry. Where storage keys shall be loaded.
Channel station keys and header keys are fetched
by use of GET ̲CHN ̲STA ̲KEYS ̲FROM ̲ADMIN ̲FIELD and
GET ̲
HEADER ̲PARAMS.
The module call PUT ̲RETRIEVAL ̲KEYS loads the temporary
storage area with the entry in question.
e) G̲e̲t̲ ̲A̲n̲d̲ ̲P̲u̲t̲ ̲O̲r̲i̲g̲ ̲K̲e̲y̲s̲ ̲I̲n̲c̲ ̲D̲i̲s̲t̲
D̲e̲s̲c̲r̲i̲p̲t̲i̲o̲n̲
Refer fig. 4.2.1.4.2.5-23.
This routine handles the originator keys for an
incoming distributed message.
The continue parameter CONT ̲PAR is set to CONTINUED
in case of at least 1 distribution SCD and an extension
entry is made. Initialization is performed on both
catal and dtg entries. Originator keys and header
parameters are fetched and loaded into the temporary
storage area.
The following shared procedures have been identified
for this module:
- INITIALIZE ̲CATAL ̲ENTRY
- INITIALIZE ̲DTG ̲ENTRY
- GET CHN ̲STA ̲KEYS FROM ADM FIELD
- GET HEADER PARAMS
- GET LOG HEADER PARAMS
- GET ORIG ̲KEYS FROM ADMINISTRATION FIELD
- GET NO ̲OF ̲SCDS
- PACK ̲SCDS
- READ ̲STATION ̲ID IN ACP FIELD
- GET CHN ̲STN ̲OUTGOING TRANSMISSION KEYS
f) I̲N̲I̲T̲I̲A̲L̲I̲Z̲E̲ ̲C̲A̲T̲A̲L̲ ̲E̲N̲T̲R̲Y̲
This module component initializes the catal entry
as follows:
Catal entry. Kind (1) as specified in input parameter.
Catal entry. Kind (2) as specified in input parameter.
Zeroes are put into the last 31 words.
Refer figure 4.2.1.4.2.5-24.
C̲a̲l̲l̲ ̲S̲p̲e̲c̲i̲f̲i̲c̲a̲t̲i̲o̲n̲
INITIALIZE ̲CATAL ̲ENTRY
(CATAL ̲ENTRY: PRI ̲ENTRY ̲TYPE,
ENTRY ̲KIND: ENTRY ̲KIND ̲TYPE,
ENTRY ̲NEXT: ENTRY ̲NEXT ̲TYPE)
g) I̲N̲I̲T̲I̲A̲L̲I̲Z̲E̲ ̲D̲T̲G̲ ̲E̲N̲T̲R̲Y̲
This module component initializes the DTG entry
as follows:
DTG ̲ENTRY.DTG equal to 0
DTG ̲ENTRY.PLA ̲REF ̲NO = 0
Refer figure 4.2.1.4.2.5-25
C̲a̲l̲l̲ ̲S̲p̲e̲c̲i̲f̲i̲c̲a̲t̲i̲o̲n̲
INITIALIZE ̲DTG ̲ENTRY
(DTG
̲ENTRY:
INC
̲MSG
̲DTG
̲RECORD)
h) G̲E̲T̲ ̲C̲H̲N̲ ̲S̲T̲A̲ ̲K̲E̲Y̲S̲ ̲F̲R̲O̲M̲ ̲A̲D̲M̲I̲N̲I̲S̲T̲R̲A̲T̲I̲O̲N̲ ̲F̲I̲E̲L̲D̲
This module component gets the channel
station keys i.e. channel designator, channel
serial no, station id, station serial no
and file time, from the administration
field if keys are present. MASK identifies
if keys are present or not.
Refer figure 4.2.1.4.2.5-26.
C̲a̲l̲l̲ ̲S̲p̲e̲c̲i̲f̲i̲c̲a̲t̲i̲o̲n̲
GET ̲CHN ̲STA ̲KEYS ̲FROM ̲ADM ̲FIELD
(STORE ̲CATAL:PRI ̲ENTRY
̲TYPE,
MASK: BIT ̲MASK,
FIELD ̲ONE: FIELD ̲1
̲TYPE)
i) G̲E̲T̲ ̲H̲E̲A̲D̲E̲R̲ ̲P̲A̲R̲A̲M̲S̲
This module component gets the header parameters
i.e. entry kind, CAMPS type, classification,
special handling, exercise indicator, item
ref., view ref., TOC and number of SCDS
and loads the main entry header with this
information.
Refer figure 4.2.1.4.2.5-27
C̲a̲l̲l̲ ̲S̲p̲e̲c̲i̲f̲i̲c̲a̲t̲i̲o̲n̲
GET ̲HEADER ̲PARAMS
(CATAL ̲ENTRY: PRI ̲ENTRY ̲TYPE,
FIELD ̲ONE: FIELD ̲1-TYPE,
QEL ̲ATTR: QEL ̲ATTRIBUTES,
VIEW ̲NAM: VIEW ̲NAME,
TIME: TIME ̲TYPE,
SCDS: INTEGER)
j) G̲E̲T̲ ̲L̲O̲G̲ ̲H̲E̲A̲D̲E̲R̲ ̲P̲A̲R̲A̲M̲S̲
These module components get the header
parameter from the Log CIF administration
field and put them into the main entry
header. The parameters in question are
as specified for d).
Refer figure 4.2.1.4.2.5-28
C̲a̲l̲l̲ ̲S̲p̲e̲c̲i̲f̲i̲c̲a̲t̲i̲o̲n̲
GET ̲LOG ̲HEADER ̲PARAMS
(STORE ̲CATAL ̲ENT: PRI ̲ENTRY ̲TYPE,
LOG ̲HEADER:LOG ̲CIF ̲ADMINISTRATION,
ISQ ̲ATTRIB: QEL ̲ATTRIBUTES,
STORE ̲VIEW ̲NAME: VIEW ̲NAME,
ST ̲TIME: TIME ̲TYPE)
k) G̲E̲T̲ ̲O̲R̲I̲G̲ ̲K̲E̲Y̲S̲ ̲F̲R̲O̲M̲ ̲A̲D̲M̲I̲N̲I̲S̲T̲R̲A̲T̲I̲O̲N̲ ̲F̲I̲E̲L̲D̲
This module component gets the originator
keys from the administration fields if
the corresponding bit in mask is set and
loads the main entry originator keys. The
parameters in question are DTG, PLA ref
no, SICS and originator SCD.
Refer figure 4.2.1.4.2.5-29
C̲a̲l̲l̲ ̲S̲p̲e̲c̲i̲f̲i̲c̲a̲t̲i̲o̲n̲
GET ̲ORIG ̲KEYS ̲FROM ̲ADMINISTRATION ̲FIELD
(STORE ̲CATAL ̲ENT: PRI ̲ENTRY ̲TYPE,
MASK: BIT ̲MASK,
FIELD ̲ONE: FIELD ̲1-TYPE)
l) G̲E̲T̲ ̲N̲O̲ ̲O̲F̲ ̲S̲C̲D̲S̲
This module component gets the number of
SCD which includes distribution SCDS, ACTION
SCDs and INFO SCDs. The parameters are
fetched from field 1 and accumulated into
the parameter NO ̲OF ̲SCDS.
Refer figure 4.2.1.4.2.5-30
C̲a̲l̲l̲ ̲S̲p̲e̲c̲i̲f̲i̲c̲a̲t̲i̲o̲n̲
GET ̲NO ̲OF ̲SCDS (NO ̲OF ̲SCDS: INTEGER)
m) P̲A̲C̲K̲ ̲S̲C̲D̲S̲
This module gets the SCDS from the CIF
and loads them into a number of SCD entries.
Each SCD entry contains max. 20 SCDS.
Refer figure 4.2.1.4.2.5-31-34.
C̲a̲l̲l̲ ̲S̲p̲e̲c̲i̲f̲i̲c̲a̲t̲i̲o̲n̲
PACK ̲SCDS()
n) R̲E̲A̲D̲ ̲S̲T̲A̲T̲I̲O̲N̲ ̲I̲D̲ ̲I̲N̲ ̲A̲C̲P̲ ̲F̲I̲E̲L̲D̲
This module component reads the station
id from the ACP 127 field in the CIF and
loads it into the field one.
Refer figure 4.2.1.4.2.5-35.
C̲a̲l̲l̲ ̲S̲p̲e̲c̲i̲f̲i̲c̲a̲t̲i̲o̲n̲
READ ̲STATION ̲ID ̲IN ̲ACP ̲FIELD
(FIELD ̲ONE: FIELD ̲1 ̲TYPE,
QEL ̲REF: QEL ̲REFERENCE,
STATION: STATION ̲ID ̲TYPE)
o) G̲E̲T̲ ̲C̲H̲N̲ ̲S̲T̲N̲ ̲O̲U̲T̲G̲O̲I̲N̲G̲ ̲T̲R̲A̲N̲S̲M̲I̲S̲S̲I̲O̲N̲ ̲K̲E̲Y̲S̲
This component module gets the transmission
keys from the store catal record and loads
them into the main entry channel station
keys. Mask indicates whether parameter
is present or not.
Refer figure 4.2.1.4.2.3-36 - 37
C̲a̲l̲l̲ ̲S̲p̲e̲c̲i̲f̲i̲c̲a̲t̲i̲o̲n̲
GET ̲CHN ̲STA ̲OUTGOING ̲TRANSMISSION ̲KEYS
(STORE ̲CATAL: PRI ̲ENTRY ̲TYPE,
MASK: BIT ̲MASK,
FIELD ̲ONE: FIELD ̲1 ̲TYPE,
QEL ̲ATTR: QEL ̲ATTRIBUTES,
STATION: STATION ̲ID ̲TYPE)
