Dear All,
I encounter problem with EJECT. If the condition is tru the eject works and condition is false EJECT doesn't work. What's wrong with it.
SET DEVICE TO PRINTER
Some code goes here
here is the condition
IF LEN(foRhd)>0
IF cuStmr.paYmod='Q'
@ mrOw, 0 SAY ;
'Payment by Cross Cheque(s) only, drawn in favour of '+ ;
foRhd+''
mrOw = mrOw+1
ENDIF
foRntn = RTRIM(coMpntn(msTat))
IF miNcm .AND. LEN(foRntn)>0
@ mrOw, 0 SAY ;
'In case of I.T. deduction under U/S 50(4) quote NTN : '+ ;
foRntn+''
ENDIF
mrOw = mrOw+6
@ mrOw, 25 SAY 'For : '+foRhd+''
ENDIF
EJECT &&if the condition is true then eject works otherwise no
SET DEVICE TO SCREEN
Next
Reply
View the map of this thread
View the map of this thread starting from this message only
View all messages of this thread
View all messages of this thread starting from this message only