me ajudem sou iniciante!!!!!!!!!!

[douglas_villa]

me ajudem

como faço para usar o dosprint?

este codigo do meu sistema esta certo?

quero imprimir em windows xp a impressora é a lexmark z600 usb....

nao estou conseguindo....

SET CURSOR OFF
SET DEVICE TO PRINTER
FOR Z = 1 TO CONF
SET PRINT ON
?? CHR(18)
SELECT 1
SET ORDER TO 1
SEEK XEMPRESAC
@ PROW()+14,01 SAY PADC("Nro. Orcamento: " + STRZERO(XNUMERO)+" " + " - " + "Data Orcamento: " + DTOC(DATE()),79)
@ PROW()+2,17 SAY REPLICATE("=",47)
@ PROW()+1,01 SAY PADC("*** O R C A M E N T O ***",79)
@ PROW()+1,17 SAY REPLICATE("=",47)
@ PROW()+3,01 SAY REPLICATE("-",76)
@ PROW()+1,01 SAY "CLIENTE..: " + EMPRESA
@ PROW()+1,01 SAY "ENDERECO.: " + ENDERECO
@ PROW()+1,01 SAY "A/C......: " + RESP
@ PROW()+1,01 SAY "FONE.....: " + TELEFON1
@ PROW()+1,01 SAY "FAX......: " + FAX
SELECT 2
SET ORDER TO 1
@ PROW()+1,01 SAY REPLICATE("-",76)
@ PROW()+1,01 SAY PADC("APARELHO: "+APAREL+ " -" + " MODELO: "+MODELO+ " -" + " SERIE: "+SERIE,76)
@ PROW()+1,01 SAY REPLICATE("-",76)
@ PROW()+3,01 SAY PADC("S E R V I C O S",79)
@ PROW()+2,01 SAY XD1
@ PROW()+1,01 SAY XD2
@ PROW()+1,01 SAY XD3
@ PROW()+1,01 SAY XD4
@ PROW()+1,01 SAY XD5
@ PROW()+1,01 SAY XD6
@ PROW()+1,01 SAY XD7
@ PROW()+1,01 SAY XD8
@ PROW()+1,01 SAY XD9
@ PROW()+1,01 SAY XD10
@ PROW()+1,01 SAY XD11
@ PROW()+1,01 SAY XD12
@ PROW()+1,01 SAY XD13
@ PROW()+1,01 SAY XD14
@ PROW()+1,01 SAY XD15
@ PROW()+2,01 SAY "VALOR TOTAL...: R$ " + TRANSFORM(XVALOR,"@BE 9,999,999.99")
@ PROW()+2,01 SAY XEXTEN1
@ PROW()+1,01 SAY XEXTEN2
@ PROW()+2,01 SAY "COND. PGTO....:" + XCONPGTO
@ PROW()+1,01 SAY "GARANTIA......:" + XGARAN
@ PROW()+1,01 SAY "VALIDADE ORC..:" + XVALIDADE
@ PROW()+2,01 SAY "** PARA CONFIRMAR, ASSINAR E DEVOLVER VIA FAX **"
@ PROW()+4,01 SAY "______________________________ _________________________"
@ PROW()+1,01 SAY " A JATO AR CONDICIONADO LTDA. C L I E N T E "
EJECT
NEXT
SET DEVICE TO SCREEN
RETURN


esta certo?

me ajudem sou iniciante!!!!!!!!!! :)Pos

[Jarbas]

Amigo, dá uma olhada na topico "Tutorial do dosprint" está logo abaixo .

Lembre-se q o dosprint deverá estar carregado . e vc devera gerar um arquivo print.prn no c:\ , para isto inclua set printer to c:\print.prn uma linha acima do set devi to print .

Até