HP 3000 Manuals

Getting Started With TRANSACT V

VPLUS 

For forms access without a dictionary, the form and its fields must be
spelled out in the SYSTEM statement, then the fields must be defined.
The following program is a modification of the program listed in Figure
3-3.
___________________________________________________________________________
|                                                                         |
|     1     system ex64,base=orders,vpls=formfile(vcustomer(cust-no,name, |
|     1.1                                street-addr,city-state,zipcode));|
|     1.2   define(item) cust-no 9(4):                                    |
|     1.3                name x(20):                                      |
|     1.4                street-addr x(20):                               |
|     1.5                city-state x(20):                                |
|     1.6                zipcode x(6);                                    |
|     2     $$add:                                                        |
|     4     list cust-no:                                                 |
|     4.1        name:                                                    |
|     4.2        street-addr:                                             |
|     4.3        city-state:                                              |
|     4.4        zipcode;                                                 |
|     5     get(form) vcustomer,init;                                     |
|     6     put customer;                                                 |
___________________________________________________________________________

          Figure 7-4.  VPLUS access without the dictionary 

Lines 1 and 1.1 replace the form and data item information that is
normally obtained from the dictionary.

MPE/iX 5.0 Documentation