ENFORM User's 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;