High-Level Screen Management Intrinsic Library Reference Manual (32424-90002)

C- 24
FORMPAK_REC = RECORD
FORMNAME : PACKED ARRAY [1..32] OF CHAR;
FORMPOSITION : INTEGER;
LISTTYPE : INTEGER;
LISTCOUNT : INTEGER;
CHNGENTRY : ARRAY [1..3] OF CHNGENTRY_REC;
END;
MSG_REC = RECORD
MSGLEN : INTEGER;
MSGAREA : PACKED ARRAY [1..79] OF CHAR;
END;
DATADESCRPT_REC = RECORD
DESCRPTTYPE : INTEGER;
BUFLEN : INTEGER;
RTNBUFLEN : INTEGER;
END;
DATABUF_REC = RECORD
DATAAREA : PACKED ARRAY [1..200] OF CHAR;
END;
READPAK_REC = RECORD
READTIME : INTEGER;
ENABLEREFORMAT : INTEGER;
DOREREAD : INTEGER;
END;
PROMPTPAK_REC = RECORD
REPAINTDATA : INTEGER;
WINDOWENH : PACKED ARRAY [1..8] OF CHAR;
RESETHILITED : INTEGER;
END;
VAR
ARRAY_INDEX : INTEGER;
DATABUF : DATABUF_REC;
DATADESCRPT : DATADESCRPT_REC;
DATA_ENTRY_ERRS : BOOLEAN;
DONE_WITH_TXNS : BOOLEAN;
ERROR_LOCATION : PACKED ARRAY [1..70] OF CHAR;
FORMPAK : FORMPAK_REC;
FORMSFILE : FORMSFILE_REC;
GLOBALPAK : GLOBALPAK_REC;
MSGFORWINDOW : MSG_REC;
NBR_TXNS_COLLECTED : INTEGER;
PAYTXN_FILE : TEXT;
PROMPTPAK : PROMPTPAK_REC;
READPAK : READPAK_REC;
RETURNPAK : RETURNPAK_REC;
SENDPAK : SENDPAK_REC;
STOP_NOW : BOOLEAN;
TERMPAK : TERMPAK_REC;
UNUSED_PARM : INTEGER;
PROCEDURE HPDOPENFORMS ; INTRINSIC;
PROCEDURE HPDENABLETERM ; INTRINSIC;
PROCEDURE HPDSEND ; INTRINSIC;
PROCEDURE HPDREAD ; INTRINSIC;
PROCEDURE HPDPROMPT ; INTRINSIC;
PROCEDURE HPDCLOSEFORMS ; INTRINSIC;