Impressora Fiscal Daruma

[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

[Dércio_Luiz_Zanatta]

Execute uma vez o inicia forma de pgto e uma efetua forma de pagamento para cada parcela...

[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