@ ROW,0 SAY QTY PICTURE '9999'
 @ ROW,4 SAY '|'
 @ ROW,5 SAY PART PICTURE '!!!!!'
 @ ROW,10 SAY '|'
 @ ROW,11 SAY EMP PICTURE '!'
 @ ROW,12 SAY '|'
 IF ORDSTAT = ' ' 
  @ ROW,13 SAY DESC PICTURE '!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!'
  @ ROW,59 SAY '|'
  @ ROW,60 SAY SPACE(20)
  IF NONCOST = 'N'
   @ ROW,60 SAY COST PICTURE '99999.99'
  ENDIF
  @ ROW,68 SAY '|'
  @ ROW,70 SAY SELL PICTURE '999999.99'
*  @ ROW,78 SAY '|'
  @ ROW,79 SAY TAX
 ENDIF
 IF ORDSTAT = '1'
  @ ROW,13 SAY DESC PICTURE '!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!'
  @ ROW,39 SAY '|'
  @ ROW,40 SAY SPACE(40)
  IF NONCOST = 'N'
   @ ROW,40 SAY COST PICTURE '99999.99'
  ENDIF
  @ ROW,48 SAY '|'
  @ ROW,50 SAY SELL PICTURE '999999.99'
*  @ ROW,78 SAY '|'
*  @ ROW,65 SAY PAYCOMMISI
  @ ROW,59 SAY PAYINVNUM
 ENDIF
* @ ROW+1,0 SAY 'SN - ' + SN