In 6.5 plus a dialog box did not have options such as ok and cancel. Now that the do I am not sure how to control their input results in the code. IE: using mouse to select the "cancel" option Please offer any suggestions Steve -- get_inv_number.rmd LABEL loop CLEAR VAR vinv# DIALOG 'Enter A Invoice Number or ESC to exit (CDIINV):' vinv#=10 vkey 1 IF (LASTKEY(0)) = '[esc]' THEN GOTO finish ENDIF IF (LASTKEY(0)) = '[cancel]' THEN GOTO finish ENDIF CLEAR VAR vpon SET VAR vpon = pon FROM master WHERE cdiinv = .vinv# IF vpon IS NULL THEN RUN errmsg.rmd USING 'Invoice Number Not found' GOTO loop ENDIF PRINT final_billing WHERE cdiinv = .vinv# LABEL finish RETURN Stephen Breen CDI Services, Inc. Road Support Division
