HP Data Entry and Forms Management System (VPLUS) Reference Manual (32209-90024)

410 AppendixA
SAMPLE PROGRAMS
SPL
,HEADKEY = 1
,DELETEKEY = 2
,PRINTKEY = 3
,REFRESHKEY = 4
,PREVKEY = 5
,NEXTKEY = 6
,BROWSEKEY = 7
,EXITKEY = 8
;
EQUATE << ENTRY ERROR EQUATES >>
PREV’NOT’ALLOWED = 1
,NO’PREV’RECS = 2
,NOT’REPEATING = 3
,DELETE’NOT’DEFINED = 4
,NO’BATCH’RECS = 5
,NO’BATCH = 6
,NO’NEXT’RECS = 7
;
EQUATE << NATIVE LANGUAGE SUPPORT EQUATES >>
INTERNATIONAL = -1
;
INTEGER ARRAY
COMAREA (O:COMAREALEN-1) := COMAREALEN (0)
;
BYTE ARRAY
COMAREA’B (*) = COMAREA
;
DOUBLE ARRAY
COMAREA’D (*) = COMAREA
;
LOGICAL
ERRORS := FALSE
,BATCH
;
ARRAY
MESSAGE’WBUF (0:MAXWINDOWLEN/2)
;
BYTE ARRAY
MESSAGE’BUF (*) = MESSAGE’WBUF
;
INTEGER
PARMVAL := 20
,UNDERLINE := 1
,MESSAGE’BUF’LEN := MAXWINDOWLEN
,MSGLEN
,PAGE’EJECT := %61
;
DOUBLE
LAST’REC’NUM
;