fixed tab order. stopped report generation when printer selection is canceled. cleaned up printer select code
This commit is contained in:
@ -34,6 +34,7 @@ END
|
||||
|
||||
|
||||
Params = Dialog_Box( 'REACTOR_LOG_SRPT1', @WINDOW, '*CENTER' )
|
||||
|
||||
IF Params = 'CANCEL' OR Params = '' THEN
|
||||
RETURN
|
||||
END
|
||||
@ -129,6 +130,8 @@ PageSetup = '1' ;* Landscape = 1
|
||||
PrintSetup = '2' ;* Preview Normal
|
||||
PrintPath = Printer_Select()
|
||||
|
||||
If PrintPath EQ '' then return
|
||||
|
||||
stat = Set_Printer('INIT',FileName,Title,PageInfo,PageSetup,PrintSetup,PrintPath)
|
||||
IF stat < 0 THEN GOTO OIPrintErr
|
||||
|
||||
|
Reference in New Issue
Block a user