Intermec 6100 Guida Di Riferimento

;Displays the invoice total in a text window.

INIFILE( 1, INIFD, ‘Text window 0’, ‘Text’, &

‘“INVOICE TOTAL: ’ & STR(INVOICE_TOTAL) & ’”’)

; Specifies a file name that includes the invoice number to tie 
; the signature file to the appropriate invoice.

INIFILE( 1, INIFD, ‘Capture window’, ‘File’, &

STR(INVOICE_NUMBER) & ‘.PCX’)

CLOSE (INIFD)

; Executes the signature capture utility.

RESULT = SPAWNDOS( ‘PSIGM0C.EXE’ )
IF RESULT = 0 THEN
   ; THE SIGNATURE WAS ACCEPTED.
   . . .
ELSEIF RESULT =1 THEN
   ; SIGNATURE CAPTURE WAS CANCELED BY USER
   . . .
ELSE
   ; AN ERROR OCCURRED
   OUT (KBD) (KB_HOME)
   &  ‘SIGNATURE’, CRLF, 
   &  ‘CAPTURE ERROR!’, CRLF,
   &  ‘ERROR #’, RESULT, BEL, CRLF
   &  ‘PRESS ENTER’
   RESPONSE = INPUT(S+F)
ENDIF