Getting Started with TRANSACT (32247-90007)
150 Chapter8
Special Topics
Test Facility
13 | OFFSET: LIST: DATA:
14 | 0 CUST-NO 1
15 |
16 +--------------------------------------+
17 1 00022 198:000
18 1 00023 064:139
19 1 00025 161:002
20 +-V-P-L-U-S---B-U-F-F-E-R---D-U-M-P----+
21 |
22 | PUT(FORM) CODE: 0 FKEY: 0
23 | FORM: ..VCUSTOMER FILE: ..FORMFILE
24 |
25 | OFFSET: LIST: DATA:
26 | 0 CUST-NO 1
27 | 4 NAME updated name
28 | 24 STREET-ADDR street
29 | 44 CITY-STATE city
30 | 64 ZIPCODE zip
31 |
32 +--------------------------------------+
33 1 00026 160:002
34 +-V-P-L-U-S---B-U-F-F-E-R---D-U-M-P----+
35 |
36 | GET(FORM) CODE: 0 FKEY: 0
37 | FORM: ..VCUSTOMER FILE: ..FORMFILE
38 |
39 | OFFSET: LIST: DATA:
40 | 0 CUST-NO 1
41 | 4 NAME new name
42 | 24 STREET-ADDR street
43 | 44 CITY-STATE city
44 | 64 ZIPCODE zip
45 |
46 +--------------------------------------+
47 1 00027 049:011
48 1 00028 000:000
49 +-V-P-L-U-S---B-U-F-F-E-R---D-U-M-P----+
50 |
51 | GET(FORM) CODE: 0 FKEY: 8
52 | FORM: ..MAINMENU FILE: ..FORMFILE
53 |
54 +--------------------------------------+