Object: | frmbehindsc.cmdPrint |
LOCAL lnAnswer *-lnAnswer = MESSAGEBOX(VIEWCSDTYPRINT_LOC, ; *- MB_ICONQUESTION + MB_YESNO, ; *- TASTRADE_LOC) *-IF lnAnswer = IDYES thisform.WaitMode(.T.) IF PRINTSTATUS() WAIT WINDOW NOWAIT PRINTING_LOC REPORT FORM behindsc NEXT 1 TO PRINTER NOCONSOLE ELSE =MESSAGEBOX(PRINTERNOTREADY_LOC, MB_ICONEXCLAMATION) ENDIF WAIT CLEAR thisform.WaitMode(.F.) *-ENDIF