User guide

Interface Procedures

Host Language Interface

058058 Tandem Computers Incorporated 6–17

The TAL host application program that interfaces with ENFORM and processes the

desired records is shown in Figure 6-7.

Figure 6-7. A TAL-Host Application Program Interfacing with ENFORM (Page 1 of 2)

LITERAL true = -1, false = 0;

!filenames

INT .query^filename [0:11] := "$MKT SAMPLE QRYOBJ ";

!global variables

INT .cntl^block [0:17], !ENFORM control block, 18 words

.param^list [0:80]; !param list buffer

!flag

INT rec^processed;

!variables

INT error,

count;

! SCHEMA produced date - time : 4/21/82 12:15:59

! RECORD order-process created on 04/21/82 at 12:15

STRUCT order^process^def (*); !DDL TAL output

BEGIN

STRUCT odetail^key;

BEGIN

STRUCT ordernum;|

BEGIN STRING BYTE [1:3]; END;

STRUCT partnum;

BEGIN STRING BYTE [1:4]; END;

END;