??? REPLICATE("-",36) + CHR(13) + chr(13) + chr(10)
??? "Total                   " + cSubTotal + CHR(13) + chr(13) + chr(10)   
??? SUBSTR(TSCOMP4.DESCRICAO,1,25) + " " + TRANSFORM(TSCOMP4.VALOR,"999,999.99") + CHR(13) + chr(13) + chr(10)

SET PRINTER TO
