Impressora Fiscal Daruma
Enviado: 10 Mai 2007 09:16
por negrao
Ao mandar o comando pra impressora para imprimir a Forma de pagamento eu uso o seguinte comando:
indice 1007 => inicia fechamento cupom.
indice 1008 => efetua forma pagamento.
E aqui a minha duvida, Supondo que minha venda tenha 2 parcelas (1º parcela 09/05/2007 no valor de 10,00) e (2º parcela 27/05/2007 no valor de 10,00) como faco para imprimir essas informacoes ?
indice 1010 => termina fechamento de cupom
Obrigado
Enviado: 10 Mai 2007 11:56
por Dércio_Luiz_Zanatta
Execute uma vez o inicia forma de pgto e uma efetua forma de pagamento para cada parcela...
Enviado: 12 Mai 2007 18:06
por DIRAMI
Amigo, eu tambem estou começando a usar o Observer, e estou fazendo assim, uso os comandos 1007, 1008, 1013 (como é venda a prazo esse comando identificara o consumidor), depois uso o 1014 para puxar o numero do cupom da impressora que sera gravado no DBF, e finalmente fecho com o comando 1010, e deixo as parcelas como mensagem assim:
/*MQPARC é a quantidade de parcelas
Note que se for muitas parcelas não havera espaço para mensagem, ai eu coloquei uma observação quando for superior a 6 parcelas, imprime 4 e informa que ha mais parcelas, tambem deixei lugar para o cliente assinar e uma linha de mensagem da loja que é: */
MMENS:="Obrigado pela visita a nossa loja, volte sempre!"
DO CASE
CASE MQPARC=1
MMENSAGEM:= PADL(MPARVENC[1],10)+PADL(MPARVALO[1],10,"_")+Chr(13)+Chr(10);
+PADL("",1)+Chr(13)+Chr(10);
+PADL("",1)+Chr(13)+Chr(10);
+PADL("Ass:",4)+PADL("",44,"_");
+PADL("",1)+Chr(13)+Chr(10);
+PADL(MMENS,48)+Chr(13)+Chr(10)
CASE MQPARC=2
MMENSAGEM:= PADL(MPARVENC[1],10)+PADL(MPARVALO[1],10,"_")+SPACE(8);
+PADL(MPARVENC[2],10)+PADL(MPARVALO[2],10,"_");
+PADL("",1)+Chr(13)+Chr(10);
+PADL("",1)+Chr(13)+Chr(10);
+PADL("Ass:",4)+PADL("",44,"_");
+PADL("",1)+Chr(13)+Chr(10);
+PADL(MMENS,48)+Chr(13)+Chr(10)
CASE MQPARC=3
MMENSAGEM:= PADL(MPARVENC[1],10)+PADL(MPARVALO[1],10,"_")+SPACE(8);
+PADL(MPARVENC[2],10)+PADL(MPARVALO[2],10,"_");
+PADL(MPARVENC[3],10)+PADL(MPARVALO[3],10,"_")+Chr(13)+Chr(10);
+PADL("",1)+Chr(13)+Chr(10);
+PADL("",1)+Chr(13)+Chr(10);
+PADL("Ass:",4)+PADL("",44,"_");
+PADL("",1)+Chr(13)+Chr(10);
+PADL(MMENS,48)+Chr(13)+Chr(10)
CASE MQPARC=4
MMENSAGEM:= PADL(MPARVENC[1],10)+PADL(MPARVALO[1],10,"_")+SPACE(8);
+PADL(MPARVENC[2],10)+PADL(MPARVALO[2],10,"_");
+PADL(MPARVENC[3],10)+PADL(MPARVALO[3],10,"_")+SPACE(8);
+PADL(MPARVENC[4],10)+PADL(MPARVALO[4],10,"_");
+PADL("",1)+Chr(13)+Chr(10);
+PADL("",1)+Chr(13)+Chr(10);
+PADL("Ass:",4)+PADL("",44,"_");
+PADL("",1)+Chr(13)+Chr(10);
+PADL(MMENS,48)+Chr(13)+Chr(10)
CASE MQPARC=5
MMENSAGEM:= PADL(MPARVENC[1],10)+PADL(MPARVALO[1],10,"_")+SPACE(8);
+PADL(MPARVENC[2],10)+PADL(MPARVALO[2],10,"_");
+PADL(MPARVENC[3],10)+PADL(MPARVALO[3],10,"_")+SPACE(8);
+PADL(MPARVENC[4],10)+PADL(MPARVALO[4],10,"_");
+PADL(MPARVENC[5],10)+PADL(MPARVALO[5],10,"_")+Chr(13)+Chr(10);
+PADL("",1)+Chr(13)+Chr(10);
+PADL("Ass:",4)+PADL("",44,"_");
+PADL("",1)+Chr(13)+Chr(10);
+PADL(MMENS,48)+Chr(13)+Chr(10)
CASE MQPARC=6
MMENSAGEM:= PADL(MPARVENC[1],10)+PADL(MPARVALO[1],10,"_")+SPACE(8);
+PADL(MPARVENC[2],10)+PADL(MPARVALO[2],10,"_");
+PADL(MPARVENC[3],10)+PADL(MPARVALO[3],10,"_")+SPACE(8);
+PADL(MPARVENC[4],10)+PADL(MPARVALO[4],10,"_");
+PADL(MPARVENC[5],10)+PADL(MPARVALO[5],10,"_")+SPACE(8);
+PADL(MPARVENC[6],10)+PADL(MPARVALO[6],10,"_");
+PADL("",1)+Chr(13)+Chr(10);
+PADL("Ass:",4)+PADL("",44,"_");
+PADL("",1)+Chr(13)+Chr(10);
+PADL(MMENS,48)+Chr(13)+Chr(10)
CASE MQPARC>6
MQPARC2=MQPARC-4
MQPARC3=STRZERO(MQPARC2,2)
MMENSAGEM:= PADL(MPARVENC[1],10)+PADL(MPARVALO[1],10,"_")+SPACE(8);
+PADL(MPARVENC[2],10)+PADL(MPARVALO[2],10,"_");
+PADL(MPARVENC[3],10)+PADL(MPARVALO[3],10,"_")+SPACE(8);
+PADL(MPARVENC[4],10)+PADL(MPARVALO[4],10,"_");
+"MAIS"+PADL(MQPARC3+" PARCELAS NAO RELACIONADAS ACIMA.",36)+Chr(13)+Chr(10);
+PADL("",1)+Chr(13)+Chr(10);
+PADL("Ass:",4)+PADL("",44,"_");
+PADL("",1)+Chr(13)+Chr(10);
+PADL(MMENS,48)+Chr(13)+Chr(10)
ENDCASE
VAR_BUFFER_COMANDO := "1010;&mMensagem;"
COMUNICA_COM_ECF(VAR_BUFFER_COMANDO)
Espero que isso o ajude.....valeu