Getting Started with TRANSACT (32247-90007)

116 Chapter7

Using Transact Without a Dictionary

VPLUS

For forms access without a dictionary, the form and its ﬁelds must be spelled out in the

SYSTEM statement, then the ﬁelds must be deﬁned. The following program is a

modiﬁcation of the program listed in Figure 3-3.

Figure 7-5. VPLUS Access Without the Dictionary

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

the dictionary.

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;