Pathway/iTS SCREEN COBOL Reference Manual (G06.24+, H06.03+, Pathway/iTS 1.0+)
Data Division
Compaq NonStop™ Pathway/iTS SCREEN COBOL Reference Manual—426750-001
5-85
Clauses in Message Description Entry
The following input record would result in the value F2 being stored in field WS-F2:
•
0 is stored in WS-PIF-1
•
1 is stored in WS-PIF-2
•
F2 is stored in WS-F2
However, suppose that the 0 and 1 were unintentionally reversed in the input record.
•
1 is stored in WS-PIF-1
•
0 is stored in WS-PIF-2
•
F2 is stored in WS-F1
In this case, F2 would be stored in field WS-F1, and no indication of the switched data
would be given by the TCP. Furthermore, there is no way that such an indication could
be given because no TCP rules are broken in either case.
Example of PRESENT IF Clause
You might use the PRESENT IF clause to process the data that is sent by an automated
teller machine (ATM). Assume that the data from this ATM is being sent in a bit map
message format.
Consider the data that must get transferred based on the ATM buttons that are pushed.
A customer wants to make a deposit into a savings account. The customer also wants to
transfer money from a checking account to a credit card account.
The data could be represented by a bit map followed by a stream of data. On the
communication line this data would look like a stream of ones and zeros with each bit or
group of bits representing a piece of data. The following example shows how a bit map
might represent the credit card, savings account, and checking account numbers.
011CDT .CDD
01 F2
012CDT .CDD
10F2