top - download
⟦fbdaa4fc8⟧ Wang Wps File
Length: 37108 (0x90f4)
Types: Wang Wps File
Notes: Spelunked
Names: »~ORPHAN59.08«
Derivation
└─⟦11096526c⟧ Bits:30006108 8" Wang WCS floppy, CR 0171A
└─ ⟦this⟧ »~ORPHAN59.08«
WangText
…05……00……00……00……00…;…0a……00……00…;…0b…;
;…07…:…0a…:…0c…:…00…:…05…:…07…9…09…9…0b…9…0d…9…0f…9…01…9 9…06…8…08…8…0a…8…0f…8
8…07…7…0a…7…0c…7…0f…7…86…1 …02… …02… …02…
…02…CPS/SDS/039
…02…820505…02……02…
USER VDU
DETAILED DESIGN SPECIFICATION…02……02…CAMPS
4.2.2.6.7. Calculte Format ................
4.2.2.6.8 TEP GET FIRST CIF ..............
4.2.2.6.9 TEP GET NEXT CIF ...............
4.2.2.6.10 TEP CREATE CIF .............
4.2.2.6.11 TEP CREATE NEW CIF .........
4.22.6.12 TEP NEW VIEW ...............
4.2.2.6.13 TEP TRSERNO ................
4.2.2.6.14 CALCULATE MENU ...............
4.2.2.6.15 TEP RETURN VIEW ............
4.2.2.6.16 TEP SAVE VIEW ..............
4.2.2.6.17 TEP READ BUFFER ............
4.2.2.6.18 TEP WRITE BUFFER ...........
4.2.2.6.19 TEP RESERVE BUFFER .........
4.2.2.6.20 COPY TEXT FIELDS ...........
4.2.2.6.21 UPDATE VDU HEADER ..........
4.2.2.6.22 SEND TO MDP ................
4.2.2.6.23 SEND FOR RELEASE ...........
4.2.2.6.24 SEND RELEASE NOTIFICATION ..
4.2.2.6.25 SEND TO THP ................
4.2.2.6.26 SEND REQUEST TO UMAM ......
4.2.2.6.27 SEND REQUEST TO SSC ........
4.2.2.6.28 SEND REQUEST TO SAR ........
4.2.2.6.29 SEND TO ASS PRINTER ........
4.2.2.6.30 CALCULATE PRPM FORMAT ......
4.2.2.6.31 Fetch UFCO Operaton .......
4.2.2.6.32 Free UFCO Operation ........
4.2.2.6.3.3 ENABLE FC KEYS..............
4.2.2.7 Subpackage Interfaces ......
4.2.2.7.2 VDIA UFCO Interfaces........
4.2.2.7.4 UFCO VCO Iterfaces.........
…86…1 …02… …02… …02… …02…
4.2.2.6.7 C̲a̲l̲c̲u̲l̲a̲t̲e̲ ̲F̲o̲r̲m̲a̲t̲
4.2.2.6.7.1 F̲u̲n̲c̲t̲i̲o̲n̲a̲l̲ ̲D̲e̲s̲c̲r̲i̲p̲t̲i̲o̲n̲
The purpose of the procedure is to calculate the format
into which items received from the RECEIVE ̲QUEUE, RELEASEQUEUE
and the RELEASE ̲QUEUE shall be displayed.
4.2.2.6.7.1 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̲
a) CALCULATE FORMAT (VUS ̲RECV ̲ATTR: QEL ̲ATTRIBUTES;
QEL: QEL ̲REFERENCE)
(CC: NOK ̲OK)
b) CALCULATE FORMAT (R0R1,R2,R6)
R̲e̲g̲i̲s̲t̲e̲r̲ ̲C̲o̲n̲v̲e̲n̲t̲i̲o̲n̲
C̲a̲l̲l̲ ̲R̲e̲g̲i̲s̲t̲e̲r̲s̲
R1 Pointer to VUS ̲RECV ̲ATTR (DEST)
R2 QEL (DEST)
R6 LINK (DEST)
R̲e̲t̲u̲r̲n̲ ̲R̲e̲g̲i̲s̲t̲e̲r̲s̲
R0 CC
R1 - R7 (DEST)
4.2.2.6.7.3 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̲
QEL ̲ATTRIBUTES refer CPS/DBD/001
QEL ̲REFERENCE refer CPS/BD/001
VUS ̲RECV QUEUES refer 4.2.2.5
b) External Data
VUS ̲RELV ̲ATTR refer 4.1.4.
CURRENT ̲MAIN ̲QUEUE refer 4.2.2.5
SEQ ̲REC refer 4.1.4.
c) L̲o̲c̲a̲l̲ ̲D̲a̲t̲a̲
None
4.2.2.6.7.4 P̲r̲o̲c̲e̲d̲u̲r̲e̲ ̲D̲e̲s̲i̲g̲n̲
The main type,sub-type and flag value of th received
CIF are investigated and a format is calculated. The
sequence record is up-dated.
CALCULATE ̲FORMAT
CC = OK
CASE CURRENT ̲MAIN ̲QUEUE OF VUS ̲RECV ̲QUEUES
RELSQ? R̲E̲L̲S̲Q̲ ̲I̲N̲V̲E̲S̲T̲I̲G̲A̲T̲I̲O̲N̲ ̲(̲4̲.̲2̲.̲2̲.̲6̲.̲7̲-̲2̲)̲
RECVQ? R̲E̲C̲V̲Q̲ ̲I̲N̲V̲E̲S̲T̲I̲G̲A̲T̲I̲O̲N̲ ̲(̲4̲.̲2̲.̲2̲.̲6̲.̲7̲-̲3̲)
RESPQ? R̲E̲C̲V̲Q̲ ̲I̲N̲V̲E̲S̲T̲G̲A̲T̲I̲O̲N̲ ̲(̲4̲.̲2̲.̲2̲.̲6̲.̲7̲-̲1̲4̲)
OTHERWISE? V̲U̲S̲ ̲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
Fig. 4.2.2.6.7-1…86…1 …02… …02… …02… …02… …02… …02…
RELSQ ̲INVESTIGATION
CASE VUS ̲RECV ̲ATTR.SUBTYPE OF MESSAGE ̲SUBTYPE
FOR ̲RELEASE?
CAMPS ̲ORIG? CASE VUS ̲RECVL ̲ATTR.MAINTYPE OF QELEMENT
̲MAIN ̲TYPE
PLAINDRESS ̲DATA,
PLAINDRES? SEQ ̲REC.NEW ̲FORMAT
= E2 ̲REL
SEQ ̲REC.VDIA ̲FORMAT =E2 ̲REL
FIRST ̲REL? HEADER ̲TEXT=VUS ̲REL
HEADER ̲TEXT = VUS ̲REL ̲REP
OTHERWISE? V̲U̲S̲ ̲Q̲U̲E̲U̲E̲ ̲E̲R̲R̲O̲R̲ ̲(̲C̲O̲N̲T̲I̲N̲U̲E̲)
(̲4̲.̲1̲.̲5̲.̲1̲)̲
CC = NOK
END CASE
CASE VUS ̲RECV ̲ATTR.MAINTYPE OF QELEMENT ̲MAIN ̲TYPE
SC ̲PLAINDRESS ̲DATA,
SC ̲PLAINDRESS? SEQ ̲REC.NEW ̲FORMAT = E1 ̲REL
SEQ ̲REC.VDIA ̲FORMAT = E1 ̲REL
HEADER ̲TEXT = VUS ̲SC ̲REL
OTHERWISE? V̲U̲S̲ ̲Q̲U̲E̲U̲E̲ ̲R̲R̲O̲R̲ ̲(̲C̲O̲N̲T̲I̲N̲U̲E̲)̲(̲4̲.̲1̲.̲5̲.̲1̲)
CC = NOK
END CASE
OTHERWISE? V̲U̲S̲ ̲Q̲U̲E̲U̲E̲ ̲E̲R̲R̲O̲R̲ ̲(̲C̲O̲N̲T̲I̲N̲U̲E̲)̲ ̲(̲4̲.̲1̲.̲5̲.̲1̲)̲
CC = NOK
END CASE
Fig. 4.2.2.6.7-2…86…1 …02… …02… …02… …02… …02… …02… …02… …02… …02…
RECVQ ̲INVESTIGATION
CASE VUS ̲RELV ̲ATTAR.SECOND ̲WORD OF
DUTY? CASE VUS ̲RECV ̲ATTR.SUBTYPE OF MESSAGE ̲SUBTYPE
FOR ̲DISPLAY? CASE VUS ̲RELV ̲ATTR.FLAG ̲VALUE OF
CAMPS ̲ORI? D̲U̲T̲Y̲ ̲C̲A̲M̲P̲S̲
̲D̲I̲S̲P̲(̲ ̲ ̲-̲4̲)
CAMPS ̲READ? D̲U̲T̲Y̲
̲C̲A̲M̲P̲S̲ ̲R̲E̲A̲D̲ ̲D̲I̲S̲P̲(̲
̲-̲5̲)̲
NON ̲CAMPS? D̲U̲T̲Y̲ ̲N̲O̲N̲
̲C̲A̲M̲P̲S̲ ̲D̲I̲S̲P̲(̲ ̲ ̲-̲6̲)̲
NON ̲CAMPS ̲READ?D̲U̲T̲Y̲
̲O̲N̲ ̲C̲A̲M̲P̲S̲ ̲R̲E̲( -7)
END CASE
OTHERWISE? V̲U̲S̲ ̲Q̲U̲E̲U̲E̲ ̲E̲R̲R̲O̲R̲(̲C̲O̲N̲T̲I̲N̲U̲E̲)̲(̲4̲.̲1̲.̲5̲.̲1̲)̲
CC = NOK
END CAS
NON ̲DUTY? CASE VUS ̲RECV ̲ATTR.SUBTYPE OF MESSAGE ̲SUBTYPE
FOR ̲DISPLAY? CASE VUS ̲RECV ̲ATTR.FLAG ̲VALUE
OF
CAMPS ̲ORIG?
C̲A̲M̲P̲S̲ ̲D̲I̲S̲P̲(̲-̲8̲)̲
CAMPS ̲READ?
C̲A̲M̲P̲S̲ ̲R̲E̲A̲D̲ ̲D̲I̲S̲P̲(̲-̲9̲)
NON ̲CAMPS? N̲O̲N̲
̲C̲A̲M̲P̲S̲ ̲D̲I̲S̲P̲(̲ ̲-̲1̲0̲)̲
NN ̲CAMPS ̲READ?
N̲O̲N̲ ̲C̲A̲M̲P̲S̲
R̲E̲D̲I̲S̲P̲(̲-̲1̲1̲)̲
END CASE
FOR ̲COORDINATION? CASE VUS ̲RELV ̲ATTR.FLAG
̲VALUE OF
CAMPS? C̲A̲M̲P̲S̲
̲C̲O̲O̲R̲(̲
̲-̲1̲2̲)
NON
̲CAMPS?
N̲O̲N̲
̲C̲A̲M̲P̲S̲
̲C̲O̲O̲R̲(̲
̲-̲1̲3̲)̲
OTHERWISE?
V̲U̲S̲
̲Q̲U̲E̲U̲E̲
̲E̲R̲R̲O̲R̲(̲C̲O̲N̲)
(̲4̲.̲1̲.̲5̲.̲1̲)̲
CC
=
NOK
END
CASE
OTHERWISE? V̲U̲S̲ ̲Q̲U̲E̲U̲E̲ ̲E̲R̲R̲O̲R̲ ̲(̲C̲O̲N̲T̲I̲N̲U̲E̲)̲(̲4̲.̲1̲.̲5̲.̲1̲)̲
CC = NOK
END CASE
END CASE Fig. 4.2.2.6.7-3…86…1 …02… …02… …02… …02… …02…
…02… …02… …02… …02…
DUTY ̲CAMPS ̲DISP
CASE VUS ̲RECV ̲ATTR. MAINTYPE OFQELEMENT ̲MAIN ̲TYPE
PLAINDRESS ̲DATA,
PLAINDRESS? SEQ ̲REC.NEW ̲FORMAT = E2
SEQ ̲REC.VDIA ̲FORMAT = E2
HEADER ̲TEXT = DUTY ̲OUG
COMMENT? SEQ ̲REC.NEW ̲FORMAT = G2
SEQ ̲REC.VDIA ̲FORMAT =G2
HEADER ̲TEXT = DUTY ̲COMM
OTHERWISE? V̲U̲S̲ ̲Q̲U̲E̲U̲E̲ ̲E̲R̲R̲O̲R̲ ̲(̲C̲O̲N̲T̲I̲N̲U̲E̲)̲(̲4̲.̲1̲.̲5̲.̲1̲)
END CASE
Fig. 4.2.2.6.7-4…86…1 …02… …02… …02… …02… …02… …02… …02… …02… …02…
DUTY CAMPS READ DISP
CASE VUS ̲RECV ̲ATTR.MAINTYPE OF QELEMENT ̲MAIN ̲TYPE
PLAINDRESS ̲DATA,
PLAINDRESS? SEQ ̲REC.NEW ̲FORMAT = E2 ̲RE
SEQ ̲REC.VDIA ̲FORMAT = E2 ̲RE
HEADER ̲TEX = DUTY ̲OUTG ̲READ
OTHERWISE? V̲V̲S̲ ̲Q̲U̲E̲U̲E̲ ̲E̲R̲R̲O̲R̲ ̲(̲C̲O̲N̲T̲I̲N̲U̲E̲)̲(̲4̲.̲1̲.̲5̲.̲1̲)
CC = NOK
END CASE
Fig. 4.2.2.6.7-5…86…1 …02… …02… …02… …02… …02… …02… …02… …02… …02…
DUTY ̲NON ̲CAMPS ̲DISP
CASE VUS ̲RECV ̲ATTR.MAINTYPE OF QELEMENT ̲MAIN ̲TYPE
PLAINDRESS ̲DATA,
PLAINDRESS,
ABB ̲PLAINDRESS,
ABB ̲PLAINDRESS ̲DATA
SC ̲PLAINDRESS? SEQ ̲REC.NEW ̲FORMAT=
E1
SEQ ̲REC.VDIA ̲FORMAT =E1
HEADER ̲TEXT = DUTY ̲INCO
OTHERWISE? V̲U̲S̲ ̲Q̲U̲E̲U̲E̲ ̲E̲R̲R̲O̲R̲(̲C̲O̲N̲T̲I̲N̲U̲E̲)̲(̲4̲.̲1̲.̲5̲.̲1̲)̲
CC = NOK
END CASE
Fig. 4.2.2.6.7-6…86…1 …02… …02… …02… …02… …02… …02… …02… …02… …02…
NON CAMPS READ
CASE VUS ̲RECV ̲ATTR. MAINTYPE OF QELEMENT ̲MAIN ̲TYPE
PLAINDRESS ̲DATA,
ABB ̲PLAINDRESS ̲DATA,
ABB ̲PLAINDRESS,
PLAINDRESS? SEQ ̲REC.NEW ̲FORMAT = E1 ̲RE
SEQ ̲RE.VDIA ̲FORMAT = E1 ̲RE
HEADER ̲TEXT = DUTY ̲INCO ̲READ
OTHERWISE? V̲U̲S̲ ̲Q̲U̲E̲U̲E̲ ̲E̲R̲R̲O̲R̲ ̲(̲C̲O̲N̲T̲I̲N̲U̲E̲)̲(̲4̲.̲1̲.̲5̲.̲1̲)
END CASE
Fig. 4.2.2.6.7-7…86…1 …02… …02… …02… …02… …02… …02… …02… …02… …02…
CAMPS ̲DISP
CASE VUS ̲RECV ̲ATTR.MAINTYPE OF QELEMENT ̲MAIN ̲TYPE
PLAINDRESS ̲DATA,
PLAINDRESS? SEQ ̲REC.NEW ̲FORMAT = E2
SEQ ̲REC.VDIA ̲FORMAT = E2
HEADER ̲TEXT = VUS ̲OUTG
CMMENT? SEQ ̲REC.NEW ̲FORMAT = G2
SEQ ̲REC.VDIA ̲FORMAT = G2
HEADER ̲TEXT = VUS ̲COMM
OTHERWISE? V̲U̲S̲ ̲Q̲U̲E̲U̲E̲ ̲E̲R̲R̲O̲R̲ ̲(̲C̲O̲N̲T̲I̲N̲U̲E̲)̲(̲4̲.̲1̲.̲5̲.̲1̲)
CC = NOK
END CASE
Fig. 4.2.2.6.7-8…86…1 …02… …02… …02… …02… …02… …02… …02… …02… …02…
CAMPS ̲READ ̲DISP
CASE VUS ̲RECV ̲ATTR.MAINTYPE OF QELEMENT ̲MAIN ̲TYPE
PLAINDRESS ̲DATA,
PLAINDRESS? SEQ ̲REC.NEW ̲FORMAT = E2 ̲RE
SEQ ̲REC.VDIA ̲FORMAT =E2 ̲RE
HEADER ̲TEXT =VUS ̲OUTG ̲READ
OTHERWISE? V̲U̲S̲ ̲Q̲U̲E̲U̲E̲ ̲E̲R̲R̲O̲R̲ ̲(̲C̲O̲N̲T̲I̲N̲U̲E̲)̲ ̲(̲4̲.̲1̲.̲5̲.̲1̲)̲
CC = NOK
END CASE
Fig. 4.2.2.6.7-9…86…1 …02… …02… …02… …02… …02… …02… …02… …02… …02…
NON ̲CAMPS ̲DISP
CASE VUS ̲RECV ̲ATTR.MAINTYPE OF QELEMENT ̲MAIN ̲TYPE
PLAINDRESS,
PLAINDRESS ̲DATA,
ABB ̲PLAINDRESS,
ABB ̲PLAINDRESS ̲DATA,
SC ̲PLAINDRESS,
SC ̲PLAINDRESS ̲DATA? SQ.REC.NEW ̲FORMAT
= E1
SEQ ̲REC.VDIA FORMAT
= E1
HEADER ̲TEXT = VUS
̲INCO
SC ̲COMMENT? SEQ ̲REC.NEW:FORMAT
= SC ̲G2
SEQ ̲REC. VDIA FORMAT
= SC ̲G2
HEADER ̲TEXT = VUS
̲SC ̲COMM
SC ̲VDU ̲PAGE? SEQ ̲REC.NEW ̲FORMAT
= SC ̲VDU
EQ ̲REC.VDIA ̲FORMAT
= SC ̲VDU
HEADER ̲TEXT = VUS
̲SC ̲VDU
OTHERWISE? V̲U̲S̲ ̲Q̲U̲E̲U̲E̲ ̲E̲R̲R̲O̲R̲(̲C̲O̲N̲T̲I̲N̲U̲E̲)̲(̲4̲.̲1̲.̲5̲.̲1̲)
CC = NOK
END CASE
Fig. 4.2.6.7-10…86…1 …02… …02… …02… …02… …02… …02…
NON ̲CAMPS ̲RE ̲DISP
CASE VUS ̲RECV ̲ATTR.MAINTYPE OF QELEMENT ̲MAIN ̲TYPE
PLAINDRESS,
PLAINDRESS ̲DATA,
ABB ̲PLAINDRESS,
ABB ̲PLAINDRESS ̲DATA? SEQ ̲REC.NEW ̲FORMAT
= E1 ̲RE
SEQ ̲EC.VDIA ̲FORMAT = E1 ̲RE
HEADER ̲TEXT = VUS ̲INCO ̲READ
OTHERWISE? V̲U̲S̲ ̲Q̲U̲E̲U̲E̲ ̲E̲R̲R̲O̲R̲ ̲(̲C̲O̲N̲T̲I̲N̲U̲E̲)̲ ̲(̲4̲.̲1̲.̲5̲.̲1̲)
CC = NOK
END CASE
Fig. 4.2.2.6.7-11…86…1 …02… …02… …02… …02… …02… …02… …02…
CAMPS ̲COOR
CASE VUS ̲RECV ̲ATTR.MAINTYPE OF QELEMENT ̲MAIN ̲TYPE
PLAINDRESS,
PLAINDRESS ̲DATA? SEQ ̲REC.NEW ̲FORMAT = B
SEQ ̲REC.VDIA ̲FORMAT = B
FIRST ̲COOR? HEADER ̲TEXT =VUS ̲COOR
HEADER ̲TEXT = VUS ̲COOR ̲REP
OTHERWISE? V̲U̲S̲ ̲Q̲U̲E̲U̲E̲ ̲E̲R̲R̲O̲R̲ ̲(̲C̲O̲N̲T̲I̲N̲U̲E̲)̲(̲4̲.̲1̲.̲5̲.̲1̲)
CC = NOK
END CASE
Fig. 4.2.2.6.7-12…86…1 …02… …02… …02… …02… …02… …02… …02…
NON ̲CAMPS ̲COOR
CASE VUS ̲RECV ̲ATTR.MAINTYPE OF QELEMENT ̲MAIN ̲TYPE
SC ̲PLAINDRESS,
SC ̲PLAINDRESS ̲DATA? SEQ ̲REC.NEW.FORMAT
= E1 ̲COOR
SEQ ̲REC.VIDA ̲FORMAT = E1 ̲COOR
HEADR ̲TEXT = VUS ̲SC ̲COOR
OTHERWISE? V̲U̲S̲ ̲Q̲U̲E̲U̲E̲ ̲E̲R̲R̲O̲R̲(̲C̲O̲N̲T̲I̲N̲U̲E̲)̲(̲4̲.̲1̲.̲5̲.̲1̲)
CC = NOK
END CASE
Fig. 4.2.2.6.7-13…86…1…02… …02… …02… …02… …02… …02… …02… …02… …02…
RESPQ ̲INVESTIGATION
CASE VUS ̲RECV ̲ATTR.MAINTYPE OF QELEMENT ̲MAIN ̲TYPE
PLAINDRESS? R̲E̲S̲P̲
̲P̲L̲A̲I̲N̲
̲I̲N̲V̲E̲S̲T̲
̲(̲1̲5̲)̲
ABB ̲PLAINDRESS? R̲E̲S̲P̲
̲A̲B̲B̲
̲I̲N̲V̲E̲S̲T̲
̲(̲-̲1̲6̲)̲
SC ̲PLAINDRESS? R̲S̲P̲
̲S̲C̲
̲P̲L̲A̲I̲N̲
̲I̲N̲V̲E̲S̲T̲
̲(̲-̲1̲7̲)̲
SC ̲COMMENT? R̲E̲S̲P̲
̲S̲C̲
̲C̲O̲M̲
̲I̲N̲V̲E̲S̲T̲(̲-̲1̲8̲)̲
COMMENT? R̲E̲S̲P̲
̲C̲O̲M̲
̲I̲N̲V̲E̲S̲T̲
̲(̲-̲1̲9̲)̲
RELEASE ̲NOTIFICATION?
CASE VUS ̲RECV ̲ATTR.SUBTYPE OF REL
̲NOT ̲SUB
REL ̲NOT ̲DISPLAY?
SEQ ̲REC.NEW ̲FORMAT
= F
SEQ
̲EC.VDIA
̲FORMAT
=
F
HEADER
̲TEXT=RETR
̲REL
̲NO
REL ̲NOT ̲LOCAL ̲DIST?-SEQ
̲REC.NEW ̲FORMAT =
F
SEQ
̲REC.VDIA
̲FORMAT=
F
HEADER
̲TEXT
=
VUS
̲REC
̲NO
OTHERWISE? - V̲U̲S̲
̲Q̲U̲E̲U̲E̲ ̲E̲R̲R̲O̲R̲(̲C̲O̲N̲T̲N̲U̲E̲)̲
̲(̲4̲.̲1̲.̲5̲.̲1̲)̲
CC
=
NOK
END CASE
TEP ̲INTERNAL? R̲E̲S̲P̲
̲T̲E̲P̲
̲I̲N̲T̲
̲I̲N̲V̲E̲S̲T̲
̲(̲
̲
̲-̲2̲0̲)̲
DELETE ̲NOTIFICATION? R̲E̲S̲P̲ ̲D̲E̲L̲E̲T̲E̲ ̲I̲N̲V̲E̲S̲T̲ ̲(̲ ̲ ̲-̲2̲1̲)̲
ACKNOWLEDGE?
R̲E̲S̲P̲
̲A̲C̲K̲
̲I̲N̲V̲E̲S̲T̲
̲(̲
̲
̲-̲2̲2̲)̲
SYSTEM ̲CATALOGUE ̲DISPLAY? - R̲E̲S̲P̲ ̲C̲A̲T̲A̲L̲O̲G̲U̲E̲ ̲I̲N̲V̲E̲S̲T̲(̲
̲2̲3̲)̲
OTHERWISE? ̲ V̲U̲S̲ ̲Q̲U̲E̲U̲E̲ ̲E̲R̲R̲O̲R̲(̲C̲O̲N̲T̲I̲N̲U̲E̲)̲(̲4̲.̲1̲.̲5̲.̲1̲)̲
CC = NOK
END CASE
FIG. 4.2.2.6.7-14…86…1…02… …02… …02… …02… …02… …02… …02… …02… …02…
RESP ̲PLAIN ̲INVEST
CASE VUS ̲RECV ̲ATTR.SUBTYPE OF MESSAGE ̲SUBTYPE
FOR ̲CONTINUED ̲PREP? - SEQ ̲REC.VDIA ̲FORMAT
= APP ̲NOT
SEQ
̲REC.VDIA
̲FORMAT
=
APP
̲NOT
HEADE
̲TEXT
=
VUS
̲APP
̲NO
FOR DISPLAY? - CASE VUS ̲RECV ̲ATTR.FLAG ̲VALUE
OF
CAMPS ̲ORIG? - SEQ
̲REC.NEW ̲FORMAT =
E2
SEQ
̲REC.VDIA
̲FORMAT
=
E2
HEADER
̲TEXT
=
RETR
̲OUTG
CAMPS ̲READ? SEQ
̲REC.NEW FORMAT =
E2 ̲RE
EQ
̲REC.VDIA
̲FORMAT
=
E2
̲RE
HEADER
̲TEXT
=
RETR
̲OUTG
̲READ
NON ̲CAMPS? - SEQ
̲REC.NEW ̲FORMAT =
E1
SEQ
̲REC.VDIA
̲FORMAT
=
E1
HEADER
̲TEXT
=
RETR
̲INCO
NON ̲CAMPS ̲READ?
̲ SEQ ̲REC.NEW ̲FORMAT
= E1 ̲RE
SEQ
̲REC.VDIA
̲FORMAT
=
E1-RE
HEADER
̲TEXT
=
RETR
̲INCO
̲READ
END CASE
OTHERWISE? - V̲U̲S̲
̲Q̲U̲E̲U̲E̲
̲E̲R̲R̲O̲R̲(̲C̲O̲N̲T̲I̲N̲U̲E̲)̲(̲4̲.̲1̲.̲5̲.̲1̲)̲
CC = NOK
END CASE
FIG. 4.2.2.6.7-15…86…1…02… …02… …02… …02… …02… …02… …02… …02… …02…
RESP ̲ABB ̲INVEST
CASE VUS ̲RECV ̲ATTR.SUBTYPE OF MESSAGE SUBTYPE
FOR ̲CONTINUED ̲PREP? SEQ
̲REC.NEW
̲FORMAT
=
APP
̲NOT
SEQ
̲REC.VDIA
̲FORMAT
=
APP
̲NOT
HEADER
̲TET
=
VUS
̲APP
̲NO
FOR ̲DISPLAY? - CASE VUS ̲RECV ̲ATTR.FLAG
̲VALUE OF
NON
̲CAMPS?
-
SEQ
̲REC.NEW
̲FORMAT
=
E1
SEQ
̲REC.VDIA
̲FORMAT
=
E1
HEADER
̲TEXT
=
RETR
̲OUTG
NON
̲CAMPS
̲READ?
-
SEQ
̲REC.NEW
̲FORMAT
=
E1
̲RE
SEQ
̲REC.VDIA
̲FORMAT
=
E1
̲RE
HEADER
̲TEXT
=RETR
̲OUTG
̲READ
OTHERWISE?
-
V̲U̲S̲
̲Q̲U̲E̲U̲E̲
̲E̲R̲R̲O̲R̲(̲C̲O̲N̲T̲I̲N̲U̲E̲D̲)̲
̲
(̲4̲.̲1̲.̲5̲.̲1̲
CC
=
NOK
END CASE
OTHERWISE? - V̲U̲
̲Q̲U̲E̲U̲E̲
̲E̲R̲R̲O̲R̲(̲C̲O̲N̲T̲I̲N̲U̲E̲)̲(̲4̲.̲1̲.̲5̲.̲1̲)̲
CC = NOK
END CASE
FIG. 4.2.2.6.7-16…86…1…02… …02… …02… …02… …02… …02… …02… …02… …02…
RESP ̲SC PLAIN ̲INVEST
CASE VUS ̲RECV ̲ATTR.SUBTYPE OF MESSAGE ̲SUBTYPE
FOR ̲CONTINUED ̲PREP? - SEQ ̲REC.NEW ̲FORMAT
= APP ̲NOT
SEQ
̲REC.VDIA
FORMAT
=
APP
̲NOT
HEAER
̲TEST
=
VUS
̲APP
̲NO
FOR ̲DISPLAY? - CASE
VUS
̲RECV
̲ATTR.FLAG
̲VALUE
OF
NON
̲CAMPS?
-
SEQ
̲REC.NEW
̲FORMAT
=
E1
SEQ
̲REC.VDIA
̲FORMAT
=
E1
HEADER
̲TEXT
=
RETR
̲INCO
OTHERWISE?
-
V̲U̲S̲
̲Q̲U̲E̲U̲E̲
̲E̲R̲R̲O̲R̲(̲C̲O̲N̲T̲N̲U̲E̲D̲)̲
(̲4̲.̲1̲.̲5̲.̲1̲)̲
CC
=
NOK
END
CASE
OTHERWISE? - V̲U̲S̲
̲Q̲U̲E̲U̲E̲
̲E̲R̲R̲O̲R̲(̲C̲O̲N̲T̲I̲N̲U̲E̲)̲(̲4̲.̲1̲.̲5̲.̲1̲)̲
CC
=
NOK
END CASE
FIG. 4.2.2.6.7-17…86…1…02… …02… …02… …02… …02… …02… …02… …02… …02…
RESP ̲SC ̲COM ̲INVEST
CASE VUS ̲RECV ̲ATTR.SUBTYPE OF MESSAGE ̲SUBTYPE
FOR DISPLAY? SEQ ̲REC.NEW FORMAT
= SC ̲G2
SEQ ̲REC.VDIA ̲FORMAT = SC ̲G2
HEADER ̲TEXT = RETR ̲SC ̲COM
OTHERWISE? V̲U̲S̲ ̲Q̲U̲E̲U̲E̲ ̲E̲R̲R̲O̲R̲(̲C̲O̲N̲T̲I̲N̲U̲E̲)̲(̲4̲.̲1̲.̲5̲.̲1̲)̲
CC = NOK
END CASE
FIG. 4.2.2.6.7-18…86…1…02… …02… …02… …02… …02… …02… …02… …02… …02…
RESP ̲COM ̲INVEST
CASE VUS ̲RECV ̲ATTR.SUBTYPE OF MESSAGE ̲SUBTYPE
FOR ̲DISPLAY? CASE VUS ̲RECV ̲ATTR.FLAG ̲VALUE OF
CAMPS ̲ORIG? - SEQ ̲REC.NEW ̲FORMAT
= G2
SEQ
̲RE.VDIA
̲FORMAT
=
G2
HEADER
̲TEST
=
RETR
̲COMM
OTHERWISE? - V̲U̲S̲ ̲Q̲U̲E̲U̲E̲ ̲E̲R̲R̲O̲R̲(̲C̲O̲N̲T̲I̲N̲U̲E̲)̲(̲4̲.̲1̲.̲5̲.̲1̲)̲
CC
=
NOK
END CASE
OTHERWISE? - V̲U̲S̲
̲Q̲U̲E̲U̲E̲
̲E̲R̲R̲O̲R̲(̲C̲O̲N̲T̲I̲N̲U̲E̲)̲(̲4̲.̲1̲.̲5̲.̲1̲)̲
CC = NOK
END CASE
FIG. 42.2.6.7-19…86…1…02… …02… …02… …02… …02… …02… …02… …02… …02…
RESP ̲TEP ̲INT ̲INVEST
CASE VUS ̲RECV ̲ATTR.SUBTYPE OF TEP ̲INTERNAL ̲SUBTYPE
APPEND ̲NOTIFICATION? - SEQ ̲REC.NEW ̲FORMAT
= APP ̲NOT
SEQ
̲REC.VDIA
̲FORMAT
=
APP
̲NOT
HEADER
̲TEST
=
VUS
̲APP
̲NO
OTHERWISE? V̲U̲S̲
̲Q̲U̲E̲U̲E̲
̲E̲R̲R̲O̲R̲(̲C̲O̲N̲T̲I̲N̲U̲E̲)̲(̲4̲.̲1̲.̲5̲.̲1̲)̲
CC
=
NOK
END CASE
FIG. 4.2.2.6.7-20…86…1…02… …02… …02… …02… …02… …02… …02… …02… …02…
RESP DELETE ̲INVEST
CASE VUS ̲RECV ̲ATTR.SUBTYPE OF DETETE ̲NOT ̲SUBTYPE
DEL ̲NOT ̲DISP? - SEQ
̲REC.NEW
̲FORMAT
=
DEL
̲NOT
SEQ
̲REC.VDIA
FORMAT
=
DEL
̲NOT
HEADER
̲TET
=
VUS
̲DEL
̲NO
OTHERWISE? - V̲U̲S̲
̲Q̲U̲E̲U̲E̲
̲E̲R̲R̲O̲R̲(̲C̲O̲N̲T̲I̲N̲U̲E̲)̲(̲4̲.̲1̲.̲5̲.̲1̲)̲
CC = NOK
END CASE
FIG. 4.2.2.6.7-21…86…1…02… …02… …02… …02… …02… …02… …02… …02… …02…
RESP ACK INVEST
CASE VUS ̲RECV ̲ATTR.SUBTYPE OF ACK ̲SUBTYPE
SAR ̲ERROR ̲ACK? - T̲E̲P̲ ̲R̲E̲A̲D̲ ̲B̲U̲F̲F̲E̲R̲(̲I̲N̲P̲U̲T̲
̲C̲I̲F̲,̲U̲F̲C̲O̲ ̲V̲A̲L̲)̲(̲4̲.̲2̲.̲2̲.̲6̲.̲1̲7̲)
CASE UFCO ̲VAL.IDENT
OF SUPV ̲RETR ̲ID
H1? SEQ
REC.NEW
FORMAT
=
H1
SEQ
REC.VDIA
̲FORMAT
=
H1
HEADER
TEXT
=
VUS
̲RETR
̲ERROR
OTHERWISE?
-
V̲U̲S̲
̲Q̲U̲E̲U̲E̲
̲E̲R̲R̲O̲R̲(̲C̲O̲N̲T̲I̲N̲U̲E̲)̲
(̲4̲.̲1̲.̲5̲.̲1̲)̲
CC
=
NOK
END CASE
OTHEWISE? - V̲U̲S̲ ̲Q̲U̲E̲U̲E̲ ̲E̲R̲R̲O̲R̲(̲C̲O̲N̲T̲I̲N̲U̲E̲)̲(̲4̲.̲1̲.̲5̲.̲1̲)̲
CC = NOK
END CASE
FIG. 4.2.2.6.7-22…86…1 …02… …02… …02… …02… …02…
4.2.2.6.8 T̲E̲P̲ ̲G̲E̲T̲ ̲F̲I̲R̲S̲T̲ ̲C̲I̲F̲
4.2.2.6.8.1 F̲u̲n̲c̲t̲i̲o̲n̲a̲l̲ ̲D̲e̲s̲c̲r̲i̲p̲t̲i̲o̲n̲
The purpose of this procedure is to receive the first
CIF to which a user has access in a queue.
4.2.2.6.8.2 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̲
a) TEP ̲GET ̲FIRST ̲CIF(NEW ̲CIF: QEL ̲REFERENCE
CC: OK ̲NOK)
b) TEP ̲GET ̲FIRST ̲CIF (R2, R3, R6)
R̲e̲g̲i̲s̲t̲e̲r̲ ̲C̲o̲n̲v̲e̲n̲t̲i̲o̲n̲
C̲a̲l̲l̲ ̲R̲e̲g̲i̲s̲t̲e̲r̲s̲
R6 LINK (DEST)
R̲e̲t̲u̲r̲n̲ ̲R̲e̲g̲i̲s̲t̲e̲r̲s̲
R2 NEW ̲CIF
R CC (NOK, OK)
R0 - R1, R4 - R7 (DEST)…86…1 …02… …02… …02… …02…
…02…
4.2.2.6.8.3 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̲
QEL ̲REFERENCE ̲TYPE refer CPS/DBD/001
NOK ̲OK refer CPS/DBD/001
UFCO ̲ ̲CMD ̲ refer 4.2.2.5
SEQ ̲FORMAT refer 4.2.2.5
b) E̲x̲e̲r̲n̲a̲l̲ ̲D̲a̲t̲a̲
SEQ ̲REC (m) refer 4.2.2.5
INPUT ̲CIF (m) refer 4.1.4
c) L̲o̲c̲a̲l̲ ̲D̲a̲t̲a̲
None
4.2.2.6.8.4 P̲r̲o̲c̲e̲d̲u̲r̲e̲ ̲D̲e̲s̲i̲g̲n̲
Refer fig. 4.2.2.6.8-1.…86…1 …02… …02… …02… …02…
…02…
TEP ̲GET ̲FIRST ̲CIF
OUTPUT ̲CC = OK
T̲E̲P̲ ̲R̲E̲C̲V̲ ̲F̲I̲R̲S̲T̲ ̲(̲C̲C̲,̲ ̲N̲E̲W̲ ̲C̲I̲F̲)̲(̲4̲.̲2̲.̲2̲.̲6̲.̲5̲)̲
CASE CC OF
NOT ̲OPENED? - EQ ̲REC.VDIA ̲CMD = NULL
Q ̲EMPTY? D̲I̲S̲P̲L̲A̲Y̲ ̲E̲R̲R̲O̲R̲ ̲M̲S̲G̲(̲Q̲
̲E̲M̲P̲T̲Y̲)̲(̲4̲.̲2̲.̲2̲.̲6̲.̲4̲)̲
C̲A̲L̲C̲U̲L̲A̲T̲E̲ ̲M̲E̲N̲U̲ ̲(̲4̲.̲2̲.̲2̲.̲6̲.̲1̲4̲)̲)̲
U̲P̲D̲A̲T̲E̲ ̲H̲E̲A̲D̲E̲R̲ ̲(̲C̲L̲E̲A̲R̲ ̲H̲E̲A̲D̲E̲R̲,̲
̲M̲A̲X̲ ̲C̲L̲A̲S̲S̲)̲(̲ ̲ ̲)̲
C̲H̲E̲C̲K̲ ̲P̲R̲E̲C̲E̲D̲E̲N̲C̲E̲ ̲(̲ ̲ ̲)̲
RECV ̲OK? T̲E̲P̲ ̲T̲R̲S̲E̲R̲N̲O̲ ̲(̲4̲.̲2̲.̲2̲.̲6̲.̲1̲3̲)̲
U̲P̲D̲A̲T̲E̲ ̲V̲D̲U̲H̲E̲A̲D̲E̲R̲ ̲(̲U̲P̲D̲A̲T̲E̲
̲H̲E̲A̲D̲E̲R̲,̲ ̲C̲U̲R̲R̲E̲N̲T̲
C̲L̲A̲S̲S̲)̲
̲(̲4̲.̲2̲.̲2̲.̲6̲.̲2̲1̲)̲
C̲H̲E̲C̲K̲ ̲P̲R̲E̲C̲E̲D̲E̲N̲C̲E̲ ̲(̲ ̲ ̲)̲
INPUT ̲CIF = NEW ̲CIF
RECV ̲NEXT? OUTPUT ̲CC = NOK
OTHERWISE? V̲U̲S̲ ̲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
FIG. 4.2.2.6.8-1…86…1 …02… …02… …02… …02… …02…
4.2.2.6.9 T̲E̲P̲ ̲G̲E̲T̲ ̲N̲E̲X̲T̲ ̲C̲I̲F̲
4.2.2.6.9.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 purpose of this procedure is to receive the
next CIF, to which a user has access.
4.2.2.6.9.2 I̲n̲t̲e̲r̲f̲a̲c̲e̲ ̲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̲
a) TEP ̲GET ̲NEXT ̲CIF (RECV ̲QEL: QEL ̲REFERENCE)
(OUT ̲QEL: QEL ̲REFERENCE;
CC: NOK ̲OK)
b) TEP ̲GET ̲NEXT ̲CIF (R2, R3, R6)
R̲e̲g̲i̲s̲t̲e̲r̲ ̲C̲o̲n̲v̲e̲n̲t̲i̲o̲n̲
C̲a̲l̲l̲ ̲R̲e̲g̲i̲s̲t̲e̲r̲s̲
R2 RECV ̲QEL (DEST)
R6 LNK (DEST)
R̲e̲t̲u̲r̲n̲ ̲R̲e̲g̲i̲s̲t̲e̲r̲s̲
R2 OUT ̲QEL
R3 CC (NOK ̲OK)
R0-R1, R4 - R7 (DEST)…86…1 …02… …02… …02…
…02…
…02…
4.2.2.6.9.3 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̲
NOK ̲OK refer CPS/DBD/001
QEL ̲REFERENCE refer CPS/DBD/001
UFCO ̲CMD ̲ refer 4.2.2.5
SEQ FORMAT refer 4.2.2.5
b) E̲x̲t̲e̲r̲n̲a̲l̲D̲a̲t̲a̲
SEQ ̲REC (m) refer 4.2.2.5
INPUT ̲CIF (m) refer 4.1.4
c) L̲o̲c̲a̲l̲ ̲D̲a̲t̲a̲
None
4.2.2.6.9.4 P̲r̲o̲c̲e̲d̲u̲r̲e̲ ̲D̲e̲s̲i̲g̲n̲
Refer fig. 4.2.2.6.9-1…86…1 …02… …02… …02… …02…
…02…
TEP ̲GET ̲NEXT ̲CIF
T̲E̲P̲ ̲R̲E̲C̲V̲ ̲N̲E̲X̲T̲ ̲(̲R̲E̲C̲V̲ ̲Q̲E̲L̲)̲(̲O̲U̲T̲Q̲E̲L̲,̲ ̲C̲C̲)̲(̲4̲.̲2̲.̲2̲.̲6̲.̲6̲)̲
CASE CC OF
NOT ̲OPENED? SEQ ̲REC.VIA ̲CMD = NULL
Q ̲EMPTY? - D̲I̲S̲P̲L̲A̲Y̲ ̲E̲R̲R̲O̲R̲ ̲M̲S̲G̲(̲Q̲E̲M̲P̲T̲Y̲)̲(̲4̲.̲2̲.̲2̲.̲6̲.̲4̲)̲
C̲A̲L̲C̲U̲L̲A̲T̲E̲ ̲M̲E̲N̲U̲ ̲(̲4.2.2.6.14)
U̲P̲D̲A̲T̲E̲ ̲H̲E̲A̲D̲E̲R̲ ̲(̲C̲L̲E̲A̲R̲ ̲H̲E̲A̲D̲E̲R̲,̲ ̲M̲A̲X̲
̲C̲L̲A̲S̲S̲)̲(̲4̲.̲2̲.̲2̲.̲6̲.̲2̲1̲)̲
C̲H̲E̲C̲K̲ ̲P̲R̲E̲C̲E̲D̲E̲N̲C̲E̲ ̲(̲ ̲ ̲ ̲ ̲)̲
RECV ̲OK? T̲E̲P̲ ̲T̲R̲S̲E̲R̲N̲O̲ ̲(̲4.2.2.6.13)
U̲P̲D̲A̲T̲E̲ ̲H̲E̲A̲D̲E̲R̲(̲U̲P̲D̲T̲E̲ ̲H̲E̲A̲D̲E̲R̲,̲C̲U̲R̲R̲E̲N̲T̲
̲ C̲L̲A̲S̲S̲)̲(̲4̲.̲2̲.̲2̲.̲6̲.̲2̲1̲)̲
C̲H̲E̲C̲K̲ ̲P̲R̲E̲C̲E̲D̲E̲N̲C̲E̲ ̲(̲ ̲ ̲)̲
INPUT ̲CIF = OUT ̲QEL
OTHERWISE? V̲U̲S̲ ̲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
FIG. 4.2.2.6.9-1…86…1…02… …02… …02… …02… …02… …02… …02… …02… …02…
4.2.2.6.10 T̲E̲P̲ ̲C̲R̲E̲A̲T̲E̲ ̲C̲I̲F̲
4.2.2.6.10.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 procedure creates a CIF and opens
it by a call to Message Monitor.
4.2.2.6.10.2 I̲n̲t̲e̲r̲f̲a̲c̲e̲ ̲S̲p̲e̲c̲i̲f̲i̲c̲a̲i̲o̲n̲
C̲a̲l̲l̲ ̲S̲p̲e̲c̲i̲f̲i̲c̲a̲t̲i̲o̲n̲
a) TEP ̲CREATE ̲CIF (NEW ̲CIF: VIEW ̲REFERENCE)
b) TEP ̲CREATE ̲CIF (R2, R6)
R̲e̲g̲i̲s̲t̲e̲r̲ ̲C̲o̲n̲v̲e̲n̲t̲i̲o̲n̲
C̲a̲l̲l̲ ̲R̲e̲g̲i̲s̲t̲e̲r̲s̲
R6 LINK (DEST)
R̲e̲t̲u̲r̲n̲ ̲R̲e̲g̲i̲s̲t̲e̲r̲s̲
R2 NEW ̲CIF
R0 - R1, R3 - R7 (DEST)…86…1
…02…
…02…
…02…
…02…
…02…
4.2.2.6.11 T̲E̲P̲ ̲C̲R̲E̲A̲T̲E̲ ̲N̲E̲W̲ ̲C̲I̲F̲
4.2.2.6.11.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 procedure creates a new version of an existing
CIF.
4.2.2.6.11.2 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̲c̲i̲f̲i̲c̲a̲t̲i̲o̲n̲
a) TEP ̲CREATE ̲NEW ̲CIF(OLD ̲CIF: VIEW REFERENCE)
NEW ̲CIF: VIEW REFERENCE
b) TEP ̲CREATE ̲NEW ̲CIF (R2, R6)
R̲e̲g̲i̲s̲t̲e̲r̲ ̲C̲o̲n̲v̲e̲n̲t̲i̲o̲n̲
C̲a̲l̲l̲ ̲R̲e̲g̲i̲s̲t̲e̲r̲s̲
R2 OLD ̲CIF (DEST)
R6 LINK (DEST)
R̲e̲t̲u̲r̲n̲ ̲R̲e̲g̲i̲s̲t̲e̲r̲s̲
R2 NEW ̲CIF
R0 R1, R3 - R7 (DEST)…86…1 …02… …02… …02… …02…
…02…
4.2.2.6.12 T̲E̲P̲ ̲N̲E̲W̲ ̲V̲I̲E̲W̲
4.2.2.6.12.1 F̲u̲n̲c̲t̲i̲o̲n̲a̲l̲ ̲S̲p̲e̲c̲i̲f̲i̲c̲a̲t̲i̲o̲n̲
A new view of an existing CIF is generated. Either
a new version of field 1 - 3 or field 4 - 5 will
be generated
4.2.2.6.12.2 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̲
a) TEP ̲NEW ̲VIEW(OLD CIF: VIEW ̲REFERENCE
TEXT ̲HEADER: BOOLEAN)
(NEW ̲CIF: VIEW ̲REFERENCE)
b) TEP ̲NEW ̲VIEW (R2, R3, R6)
R̲e̲g̲i̲s̲t̲e̲r̲ ̲C̲o̲n̲v̲e̲n̲t̲i̲o̲n̲
C̲a̲l̲l̲ ̲R̲e̲g̲i̲s̲t̲e̲r̲s̲
R2 OL ̲CIF (DEST)
R3 TEXT ̲HEADER (DEST)
R6 LINK (DEST)
R̲e̲t̲u̲r̲n̲ ̲R̲e̲g̲i̲s̲t̲e̲r̲s̲
R2 NEW ̲CIF
R0-R1, R3-R7 (DEST)…86…1 …02… …02… …02… …02…
…02…
4.2.2.6.13 T̲E̲P̲ ̲T̲R̲S̲E̲R̲N̲O̲
4.2.2.6.13.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 next Transaction Serial number is read via TMP.
Current time is fetched from the CUR ̲TIME.
4.2.2.6.13.2 I̲n̲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̲
a) TEP ̲TRSERNO
b) TEP ̲TRSERNO (R6)
R̲e̲g̲i̲s̲t̲e̲r̲ ̲C̲o̲n̲v̲e̲n̲t̲i̲o̲n̲
C̲a̲l̲l̲ ̲R̲e̲g̲i̲s̲t̲e̲r̲
R6 LINK (DEST)
R̲e̲t̲u̲r̲n̲ ̲R̲e̲g̲i̲s̲t̲e̲r̲s̲
None
R0 - R7 (DEST)2̲1̲5̲1̲A̲…00…CPS/SDS/039
…00…ja/rt …00…JBS
…00…4.2.2.4.19
…00…1̲1̲…00…0̲5̲…00…8̲2̲…00…1̲4̲…00…2̲9̲…00… ̲ ̲ ̲6̲…00…1̲4̲…00… ̲3̲0̲1̲2̲2̲…00…18…00…04…00…84…00…12…00…57…00…
…00…00…00… 5…00…1̲8̲…00…0̲4̲…00…8̲4̲…00…1̲1̲…00…3̲3̲…00…18…00…04…00…84…00…13…00…35…00…0171A…00…
76…00… ̲ ̲1̲9̲…00…18…00… 652…00… ̲5̲4̲5̲0̲7…00……12……00……00……00……11……02……00……10……00……01……10……05…'…10……11…
…80…*̲…8a…7 …00……00……00……00……00……00……01…B
W̲…00……1f……00……00……00……00…5…02…5
5 4…0c…4…00…4…02…4 4…05…3…0a…3…0d…3…00…3…01…3
3…06…2…0a…2…0c…2…0d…2…00…2
2…06…1…0a…1…0c…1…0f…1…01…1…05…1…07…0…0a…0…0d…0…0f…0…02…0…05…0…07……86…1
…02… …02… …02…
…02…CPS/SDS/039
…02…840601…02……02…
USER VDU
DETAILED DESIGN SPECIFICATION…02…ISSUE 1…02…CAMPS
4.2.2.6.7. Calculte Format ................
4.2.2.6.8 TEP GET FIRST CIF ..............
4.2.2.6.9 TEP GET NEXT CIF ...............
4.2.2.6.10 TEP CREATE CIF .............
4.2.2.6.11 TEP CREATE NEW CIF .........
4.22.6.12 TEP NEW VIEW ...............
4.2.2.6.13 TEP TRSERNO ................
4.2.2.6.14 CALCULATE MENU ...............
4.2.2.6.15 TEP RETURN VIEW ............
4.2.2.6.16 TEP SAVE VIEW ..............
4.2.2.6.17 TEP READ BUFFER ............
4.2.2.6.18 TEP WRITE BUFFER ...........
4.2.2.6.19 TEP RESERVE BUFFER .........
4.2.2.6.20 COPY TEXT FIELDS ...........
4.2.2.6.21 UPDATE VDU HEADER ..........
4.2.2.6.22 SEND TO MDP ................
4.2.2.6.23 SEND FOR RELEASE ...........
4.2.2.6.24 SEND RELEASE NOTIFICATION ..
4.2.2.6.25 SEND TO THP ................
4.2.2.6.26 SEND REQUEST TO UMAM ......
4.2.2.6.27 SEND REQUEST TO SSC ........
4.2.2.6.28 SEND REQUEST TO SAR ........
4.2.2.6.29 SEND TO ASS PRINTER ........
4.2.2.6.30 CALCULATE PRPM FORMAT ......
4.2.2.6.31 Fetch UFCO Operaton .......
4.2.2.6.32 Free UFCO Operation ........
4.2.2.6.3.3 ENABLE FC KEYS..............
4.2.2.7 Subpackage Interfaces ......
4.2.2.7.2 VDIA UFCO Interfaces........
4.2.2.7.4 UFCO VCO Iterfaces.........
…86…1 …02… …02… …02… …02…
4.2.2.4.19 C̲a̲l̲c̲u̲l̲a̲t̲e̲ ̲F̲o̲r̲m̲a̲t̲
4.2.2.4.19.1 F̲u̲n̲c̲t̲i̲o̲n̲a̲l̲ ̲D̲e̲s̲c̲r̲i̲p̲t̲i̲o̲n̲
The purpose of the procedure is to calculate the format
into which items received from the RECEIVE ̲QUEUE, RELEAE
QUEUE and the RESPONSE ̲QUEUE shall be displayed.
4.2.2.4.19.2 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̲
a) CALCULATE FORMAT (QEL: QEL ̲REFERENCE)
(CC: ERROR ̲OK)
b) CALCULATE FORMAT (R0,R2,R6)
R̲e̲g̲i̲s̲t̲e̲r̲ ̲C̲o̲n̲v̲e̲n̲t̲i̲o̲n̲
C̲a̲l̲l̲ ̲R̲e̲i̲s̲t̲e̲r̲s̲
R2 POINTER TO QEL (DEST)
R6 LINK (DEST)
R̲e̲t̲u̲r̲n̲ ̲R̲e̲g̲i̲s̲t̲e̲r̲s̲
R0 CC
R1 - R7 (DEST)
4.2.2.4.19.3 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̲
Refer source list.
b) E̲t̲e̲r̲n̲a̲l̲ ̲D̲a̲t̲a̲
All external data defined in 4.1.4/4.2.2.5.
VUS ̲RECV ̲ATTR
CURRENT ̲MAIN ̲QUEUE
SEQ ̲REC HEADER ̲TEXT (m)
UFCO ̲VAL (m)…86…1 …02… …02… …02… …02…
c) L̲o̲c̲a̲l̲ ̲D̲a̲t̲a̲
Refer source list
4.2.2.4.19.4 P̲r̲o̲c̲e̲d̲u̲r̲e̲ ̲D̲e̲s̲i̲g̲n̲
The main type,sub-type and flag value of the received
CIF are investigated and a format is calculated. The
squence record is up-dated.
Refer figure 4.2.2.4.19-1.
CALCULATE ̲FORMAT
CASE MAIN ̲QUEUE
RELEASE ̲QUEUE ? CHECK QEL MAINTYPE,
SUBTYPE,
CAMPS ORIGIN ETC.
AND SET
SEQ ̲REC.VDIA ̲FORMAT
AND SEQ ̲REC.
RECEIVE ̲QUEUE ? NEW FRMAT ACCORDINGLY
AND TER-
MINAL ̲TXT. IF CHECK
IS NOT OK
RETURN (CC=ERROR)
ELSE RETURN (CC=OKAY)
RESPONSE ̲QUEUE ?
OTHERWISE INTERNAL ̲ERROR (GIVE ̲UP)
Fig. 4.2.2.4.19-1…86…1 …02… …02… …02… …02…
U̲F̲C̲O̲ ̲C̲O̲M̲M̲O̲N̲ ̲P̲R̲O̲C̲E̲D̲U̲R̲E̲S̲
4.2.2.5 C̲o̲m̲m̲o̲n̲ ̲S̲u̲b̲p̲a̲c̲k̲a̲g̲e̲ ̲D̲a̲t̲a̲
a) D̲a̲t̲a̲ ̲R̲e̲f̲e̲r̲e̲n̲c̲e̲s̲
Refer 4.1.4 and CPS/DBD/001
b) E̲x̲t̲e̲r̲n̲a̲l̲ ̲D̲a̲t̲a̲
None
c) L̲o̲c̲a̲l̲ ̲D̲a̲t̲a̲
c1) T̲y̲p̲e̲s̲
Refer source list.
c2) C̲o̲n̲s̲t̲a̲n̲t̲s̲
Rfer source list.
c3) V̲a̲r̲i̲a̲b̲l̲e̲s̲
Refer source list.
4.2.2.6 C̲o̲m̲m̲o̲n̲ ̲S̲u̲b̲p̲a̲c̲k̲a̲g̲e̲ ̲P̲r̲o̲c̲e̲d̲u̲r̲e̲s̲
4.2.2.6.1 L̲o̲o̲k̲u̲p̲ ̲P̲a̲r̲a̲m̲e̲t̲e̲r̲s̲
4.2.2.6.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̲
Scans HEADER ̲LINE for start of each parameter, determine
its length and type (i.e.alpha, numeric, or alpha-numeric).
In accordance UFCO ̲PARAM ̲TABLE is updated.
The character set is divided into type as:
SPACE and COMMA delimiter between parameters
A, B,....2̲1̲5̲1̲A̲…00…CPS/SDS/039 …00…ja/rt
…00…JBS …00…4.2.2.4.19 …00…1̲1̲…00…0̲5̲…00…8̲2̲…00…1̲4̲…00…2̲9̲…00…
̲ ̲ ̲6̲…00…1̲4̲…00… ̲3̲0̲1̲2̲2̲…00…1̲8̲…00…0̲4̲…00…8̲4̲…00…1̲2̲…00…5̲7̲…00… ̲ ̲ ̲ ̲…00…11…00… ̲ ̲ ̲2̲0̲8…00…1̲8̲…00…0̲4̲…00…8̲4̲…00…1̲1̲…00…3̲3̲…00…10…00…10…00…84…00…11…00…38…00…0171A…00…
76…00… ̲ ̲1̲9̲…00…29…00… 552…00… ̲5̲4̲7̲10…00……05……00……00……00……11……02……00……10……00……01……10……05…'…10……11…
…80…*̲…8a…7 …00……00……00……00……00……00……01…B
W̲…00……1f……00……00……00……00…3…0a…3…0b…3…0c…3 2…08…2…0a…2…0c…2…0d…2…02…2…05…1…08…1…09…1…0b…1…0e…1…02…1 1…05…0…08…0…0b…0…0e…0…02…0 0…07…/…09…/…0d…/…0f….…0a….…0d….…0f….…02….…05….…07……86…1
…02…
…02…
…02…
…02…CPS/SDS/039
…02…840601…02……02…
USER VDU
DETAILED DESIGN SPECIFICATION…02…ISSUE 1…02…CAMPS
4.2.2.6.7 Calcuate Format ...............
4.2.2.6.8 TEP GET FIRST CIF ..............
4.2.2.6.9 TEP GET NEXT CIF ...............
4.2.2.6.10 TEP CREATE CIF .................
4.2.2.6.11 TEP CREATE NEW CIF .............
4.2.2.6.12 TEP NEW VIEW ...................
4.2.2.6.13 TEP TRSERNO ....................
4.2.2.6.14 CALCULATE MENU .................
4.2.2.6.15 TEP RETURN VIEW ................
4.2.2.6.16 TEP SAVE VIEW .................
4.2.2.6.17 TEP READ BUFFER ................
4.2.2.6.18 TEP WRITE BUFFER ...............
4.2.2.6.19 TEP RESERVE BUFFER .............
4.2.2.6.20 COPY TEXT FIELDS ...............
4.2.2.621 UPDATE VDU HEADER ..............
4.2.2.6.22 SEND TO MDP ....................
4.2.2.6.23 SEND FOR RELEASE ...............
4.2.2.6.24 SEND RELEASE NOTIFICATION ......
4.2.2.6.25 SEND TO THP ...................
4.2.2.6.26 SEND REQUEST TO UMAM ...........
4.2.2.6.27 SEND REQUEST TO SSC ............
4.2.2.6.28 SEND REQUEST TO SAR ............
4.2.2.6.29 SEND TO ASS PRINTER ............
4.2.2.6.30 CALCULAT PRPM FORMAT ..........
4.2.2.6.31 FETCH UFCO OPERATION ...........
4.2.2.6.32 FREE UFCO OPERATION ............
4.2.2.6.33 ENABLE FC KEYS..................
4.2.2.7 Subpackage Interfaces ................
4.2.2.7.2 VDIA UFCO Interfaces..............
4.2.2.7.4 UFCO VCO Interfaces...............
…86…1 …02… …02… …02… …02…
4.2.2.4.19 C̲a̲l̲c̲u̲l̲a̲t̲e̲ ̲F̲o̲r̲m̲a̲t̲
4.2.2.4.19.1 F̲u̲n̲c̲t̲i̲o̲n̲a̲l̲ ̲D̲e̲s̲c̲r̲i̲p̲t̲i̲o̲n̲
The purpose of the procedure is to calculate the format
into which items received from the RECEIVE ̲QUEUE, RELEAE
QUEUE and the RESPONSE ̲QUEUE shall be displayed.
4.2.2.4.19.2 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̲
a) CALCULATE FORMAT (QEL: QEL ̲REFERENCE)
(CC: ERROR ̲OK)
b) CALCULATE FORMAT (R0,R2,R6)
R̲e̲g̲i̲s̲t̲e̲r̲ ̲C̲o̲n̲v̲e̲n̲t̲i̲o̲n̲
C̲a̲l̲l̲ ̲R̲e̲i̲s̲t̲e̲r̲s̲
R2 POINTER TO QEL (DEST)
R6 LINK (DEST)
R̲e̲t̲u̲r̲n̲ ̲R̲e̲g̲i̲s̲t̲e̲r̲s̲
R0 CC
R1 - R7 (DEST)
4.2.2.4.19.3 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̲
Refer source list.
b) E̲t̲e̲r̲n̲a̲l̲ ̲D̲a̲t̲a̲
All external data defined in 4.1.4/4.2.2.5.
VUS ̲RECV ̲ATTR
CURRENT ̲MAIN ̲QUEUE
SEQ ̲REC HEADER ̲TEXT (m)
UFCO ̲VAL (m)…86…1 …02… …02… …02… …02…
c) L̲o̲c̲a̲l̲ ̲D̲a̲t̲a̲
Refer source list
4.2.2.4.19.4 P̲r̲o̲c̲e̲d̲u̲r̲e̲ ̲D̲e̲s̲i̲g̲n̲
The main type,sub-type and flag value of the received
CIF are investigated and a format is calculated. The
squence record is up-dated.
Refer figure 4.2.2.4.19-1.
CALCULATE ̲FORMAT
CASE MAIN ̲QUEUE
RELEASE ̲QUEUE ? CHECK QEL MAINTYPE,
SUBTYPE,
CAMPS ORIGIN ETC.
AND SET
SEQ ̲REC.VDIA ̲FORMAT
AND SEQ ̲REC.
RECEIVE ̲QUEUE ? NEW FRMAT ACCORDINGLY
AND TER-
MINAL ̲TXT. IF CHECK
IS NOT OK
RETURN (CC=ERROR)
ELSE RETURN (CC=OKAY)
RESPONSE ̲QUEUE ?
OTHERWISE INTERNAL ̲ERROR (GIVE ̲UP)
Fig. 4.2.2.4.19-1…86…1 …02… …02… …02… …02…
U̲F̲C̲O̲ ̲C̲O̲M̲M̲O̲N̲ ̲P̲R̲O̲C̲E̲D̲U̲R̲E̲S̲
4.2.2.5 C̲o̲m̲m̲o̲n̲ ̲S̲u̲b̲p̲a̲c̲k̲a̲g̲e̲ ̲D̲a̲t̲a̲
a) D̲a̲t̲a̲ ̲R̲e̲f̲e̲r̲e̲n̲c̲e̲s̲
Refer 4.1.4 and CPS/DBD/001
b) E̲x̲t̲e̲r̲n̲a̲l̲ ̲D̲a̲t̲a̲
None
c) L̲o̲c̲a̲l̲ ̲D̲a̲t̲a̲
c1) T̲y̲p̲e̲s̲
Refer source list.
c2) C̲o̲n̲s̲t̲a̲n̲t̲s̲
Rfer source list.
c3) V̲a̲r̲i̲a̲b̲l̲e̲s̲
Refer source list.
4.2.2.6 C̲o̲m̲m̲o̲n̲ ̲S̲u̲b̲p̲a̲c̲k̲a̲g̲e̲ ̲P̲r̲o̲c̲e̲d̲u̲r̲e̲s̲
4.2.2.6.1 L̲o̲o̲k̲u̲p̲ ̲P̲a̲r̲a̲m̲e̲t̲e̲r̲s̲
4.2.2.6.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̲
Scans HEADER ̲LINE for start of each parameter, determine
its length and type (i.e.alpha, numeric, or alpha-numeric).
In accordance UFCO ̲PARAM ̲TABLE is updated.
The character set is divided into type as:
SPACE and COMMA delimiter between parameters
A, B,..... Z char is alpha
0,1,....... 9 char is numeric
otherwise char is alpha-numeric.
The type of parameter is defined as follows:
If a parameter contains chars of only one type, then
the parameter is of that type. If a parameter contains
chars o more than one type then the parameter is of
type alpha-numeric.…86…1 …02… …02… …02… …02…
…02…
4.2.2.6.1.2 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̲
a) LOOKUP ̲PARAMS(COMMAND ̲LINE ̲LENGTH#: INTEGER)
NO ̲OF ̲PARAMS: INTEGER)
b) LOOKUP ̲PARAMS (R0, R6)
R̲e̲g̲i̲s̲t̲e̲r̲ ̲C̲o̲n̲v̲e̲n̲i̲o̲n̲
C̲a̲l̲l̲ ̲R̲e̲g̲i̲s̲t̲e̲r̲s̲
R0 COMMAND ̲LINE ̲LENGTH (DEST)
R6 LINK (DEST)
R̲e̲t̲u̲r̲n̲ ̲R̲e̲g̲i̲s̲t̲e̲r̲s̲
R0 NO ̲OF ̲PARAMS
R1 - R7 (DEST)
4.2.2.6.1.3 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̲
Refer source list.
b) E̲x̲t̲e̲r̲n̲a̲l̲ ̲D̲a̲t̲a̲
All external data define in 4.1.4/4.2.2.5
HEADER ̲LINE
UFCO ̲PARAM ̲TABLE (m)
c) L̲o̲c̲a̲l̲ ̲D̲a̲t̲a̲
Refer source list.
4.2.2.6.1.4 P̲r̲o̲c̲e̲d̲u̲r̲e̲ ̲D̲e̲s̲i̲g̲n̲
The procedure works on two data structures HEADER ̲LINE
and UFCO ̲PARAM ̲TABLE. At procedure exit UFCO ̲PARAM
̲TABLE contains a full description of the HEDER ̲LINE
content, Refer table 4.2.2.6.1.1. Procedure Algorithm.
Refer fig. 4.2.2.6.1.1
HL ̲INDEX is a reference relative to HEADER ̲LINE start,
identifying the character currently analysed.
NOTE the following restriction at call:
IOC ̲HD ̲LENGTH+1= COMMAND ̲LINE ̲LENGTH = COMMAND ̲LINE
̲
LENGTH + IOC ̲HD ̲LENGTH
Procedure design summarized in figure 4.2.2.6.1-1.…86…1
…02… …02… …02… …02…
Table 4.2.2.6.1-1…86…1 …02… …02… …02… …02…
S̲C̲A̲N̲ ̲L̲O̲O̲P̲: Scan until last char or max parameter met.
SEARCH ̲START ̲LOOP: search for start of a parameter.
SEARCH ̲END ̲LOOP: search for end of a parameter.
E̲N̲D̲ ̲S̲C̲A̲N̲ ̲L̲O̲O̲P̲
Figure 4.2.2.6.1-1…86…1 …02… …02… …02… …02… …02…
4.2.2.6.2 S̲E̲T̲ ̲C̲U̲R̲S̲O̲R̲
4.2.2.6.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̲
Sets CURSOR ̲POSITION either in COMMAND ̲LINE or in position
specified by CURSOR ̲RECORD.
4.2.2.6.2.2 I̲n̲t̲e̲r̲f̲a̲c̲e̲ ̲D̲e̲f̲i̲n̲t̲i̲o̲n̲
a) C̲a̲l̲l̲ ̲S̲p̲e̲c̲i̲f̲i̲c̲a̲t̲i̲o̲n̲
SET ̲CURSOR (SPLIT; TEP ̲CURSOR ̲SPLIT ̲TYPE
b) SET ̲CURSOR (R5, R6)
R̲e̲g̲i̲s̲t̲e̲r̲ ̲C̲o̲n̲v̲e̲n̲t̲i̲o̲n̲
C̲a̲l̲l̲ ̲R̲e̲g̲i̲s̲t̲e̲r̲
R5 SPLIT (DEST)
R6 LINK (DEST)
R̲e̲t̲u̲r̲n̲ ̲R̲e̲g̲i̲s̲t̲e̲r̲
R0 - R7 (DEST)
4.2.2.6.3 D̲I̲S̲P̲L̲A̲Y̲ ̲V̲D̲U̲ ̲F̲I̲E̲L̲D̲
4.22.6.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̲
Output a specified text string in the Command line
or Response line of the VDU Header Area as specified
by the caller.
4.2.2.6.3.2 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̲
a) DISPLAY ̲VDU ̲FIELD (LINE ̲NO: HEADER ̲LINE ̲NO;
IELD ̲NO: HEADER ̲FIELD ̲NO;
DATA: OUTPUT ̲DATA;
SIZE: NO ̲OF ̲(CHARACTERS),
():ERROR ̲OK
b) DISPLAY ̲VDU ̲FIELD(R0, R1, R2, R3, R6)
R̲e̲g̲i̲s̲t̲e̲r̲ ̲C̲o̲n̲v̲e̲n̲t̲i̲o̲n̲
C̲a̲l̲l̲ ̲R̲e̲g̲i̲s̲t̲e̲r̲s̲
R0 LINE ̲NO (DEST)
R1 FIELD ̲NO (DEST)
R2 pointer to DATA (DET)
R3 SIZE (DEST)
in characters(excl.IOC)
R6 LINK (DEST)
R̲e̲t̲u̲r̲n̲ ̲R̲e̲g̲i̲s̲t̲e̲r̲s̲
None
R0 - R7 (DEST)
4.2.2.6.4 D̲I̲S̲P̲L̲A̲Y̲ ̲E̲R̲R̲O̲R̲ ̲M̲S̲G̲
4.2.2.6.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̲
Specified error message is fetched via TMP and displayed.
In cas of VDU ̲SPLIT ̲FAILURE the error exit is used.
4.2.1.6.4.2 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̲
a) DISPLAY ̲ERROR ̲MSG (ERROR ̲NO:VUS ̲RESP ̲MSG ̲TYPE):
ERROR ̲OK
b) DISPLAY ̲ERROR ̲MSG (R5, R6)
R̲e̲g̲i̲s̲t̲e̲r̲ ̲C̲o̲n̲v̲e̲n̲t̲i̲o̲n̲
C̲a̲l̲l̲ ̲R̲e̲g̲i̲s̲t̲e̲r̲s̲
R5 ERROR ̲NO (DEST)
R6 LINK (DEST)
R̲e̲t̲u̲r̲n̲ ̲R̲e̲g̲i̲s̲t̲e̲r̲s̲
R0 - R7 (DEST)
b) E̲x̲t̲e̲r̲n̲a̲l̲ ̲D̲a̲t̲a̲
TMP ̲RECORD (m)
OUTPUT ̲FLAG (m)
HEADERLINE (m)
c) L̲o̲c̲a̲l̲ ̲D̲a̲t̲a̲
Refer source list.
kan de f]lgende sider indtil TEP CREATE CIF annulleres,
og er du sikker p>, at de er flyttet …86…1…02… …02… …02… …02… …02… …02…
…02… …02… …02… …02…
DISPLAY ̲ERROR ̲MSG
ERROR ̲PARAM.LINK = ERROR ̲PARAM.INFO = NULL
ERROR ̲PARAM.KEY = ERROR ̲NO
KEY ̲COUNT = 1
CASE SEARCH ̲PRIMARY ̲KEY (RESPONSE ̲TEXT ̲TABLE,ERROR
̲PARAM,KEY ̲COUT
SIZE
(HEADER
̲LINE),ERROR
̲MASK
(HEADER
̲LINE,CC):ERROR
̲OK
ERROR? - ANALYZE ERROR (CC,0)
OK?
END CASE
D̲I̲S̲P̲L̲A̲Y̲ ̲V̲D̲U̲ ̲F̲I̲E̲L̲D̲ ̲(̲R̲E̲S̲P̲ ̲L̲I̲N̲E̲,̲R̲E̲S̲P̲ ̲F̲I̲E̲L̲D̲,̲H̲E̲A̲D̲E̲R̲ ̲L̲I̲N̲E̲)̲(̲4̲.̲2̲.̲2̲.̲6̲.̲3̲)̲
E̲X̲C̲
̲
̲
̲
̲
̲
̲
̲
̲
̲
̲D̲O̲N̲E̲
EXC? RETURN (XC)
DONE? OUTPUT ̲FLAG = TRUE
RETURN (DONE)
END CASE
Figure 4.2.2.6.4-12̲1̲5̲1̲A̲…00…CPS/SDS/039 …00…ja/rt …00…JBS …00…4.2.2.4.19 …00…1̲1̲…00…0̲5̲…00…8̲2̲…00…1̲4̲…00…2̲9̲…00… ̲ ̲ ̲6̲…00…1̲4̲…00… ̲3̲0̲1̲2̲2̲…00…1̲8̲…00…0̲4̲…00…8̲4̲…00…1̲2̲…00…5̲7̲…00… ̲ ̲ ̲ ̲…00…36…00… ̲ ̲ ̲849…00…0̲1̲…00…1̲1̲…00…8̲4̲…00…1̲3̲…00…3̲8̲…00…07…00…10…00…84…00…09…00…47…00…0171A…00…
57…00… ̲ ̲1̲9̲…00…54…00… 464…00… ̲5̲5351…00……1f……00……19…@…14……02……00…D…00……01……10……05…'…10……11……01……80…*̲J̲…15……05……00……00……00……00……00……00……01…B
&̲…00……1f……00……00……00……00…0…0a…0…0b…0…0c…0 /…08…/…0a…/…0c….…09….…0c….…0f….…00….…02….…05…-…08…-…0b…-…0d…-…00…- -…07……11……02……11……05……11……07……10……86…1
…02…
…02… …02…
#
…02…CPS/SDS/039
…02…841101…02……02…
USER VDU
DETAILED DESIGN SPECIFICATION…02…ISSUE 1…02…CAMPS
4.2.2.6.7 Calcuate Format ...............
4.2.2.6.8 TEP GET FIRST CIF ..............
4.2.2.6.9 TEP GET NEXT CIF ...............
4.2.2.6.10 TEP CREATE CIF .................
4.2.2.6.11 TEP CREATE NEW CIF .............
4.2.2.6.12 TEP NEW VIEW ...................
4.2.2.6.13 TEP TRSERNO ....................
4.2.2.6.14 CALCULATE MENU .................
4.2.2.6.15 TEP RETURN VIEW ................
4.2.2.6.16 TEP SAVE VIEW .................
4.2.2.6.17 TEP READ BUFFER ................
4.2.2.6.18 TEP WRITE BUFFER ...............
4.2.2.6.19 TEP RESERVE BUFFER .............
4.2.2.6.20 COPY TEXT FIELDS ...............
4.2.2.6
