none
Imprimindo Data/Hora na Impressora não fiscal - Daruma RRS feed

  • Discussão Geral

  • Bom dia,

     

    Nas impressoras Não-fiscais Daruma temos como imprimir data/hora do sistema operacional para sair no cupom não fiscal da impressora, que pode ser muito util por exemplo para Estacionamento que usando o metodo Daruma_Dual_ImpirmirTexto podemos passar as Tags de impressão e usando as tags <dt></dt> pode ser impresso a data e para imprimir hora passamos a tag <hr></hr> no qual temos até uma String completa para imprimir um cupom de exemplo para estacionamento:

     

    Int_Retorno = Daruma_DUAL_ImprimirTexto("<e><ce><s>ESTACIONAMENTO LAC_PARK<s></ce></e>", 0)  
    'IMPRIMINDO A PRIMEIRA LINHA  
    Int_Retorno = Daruma_DUAL_ImprimirTexto("<n>Endereço:</n><c> A Dr. Teobaldo Freitas Silva Ribas - Nº1912</c>", 0)  
    'IMPRIMINDO A SEGUNDA LINHA  
    Int_Retorno = Daruma_DUAL_ImprimirTexto("<c>Santo André - São Paulo - SP - Brasil</c><l></l>", 0)  
    'IMPRIMINDO A TERCEIRA LINHA  
    Int_Retorno = Daruma_DUAL_ImprimirTexto("<n>TICKET NÚMERO:<tb> 0005423</n><l></l>", 0)  
    'IMPRIMINDO A QUARTA LINHA  
    Int_Retorno = Daruma_DUAL_ImprimirTexto("<tb><b>Entrada:<tb><dt></dt><tb><hr></hr></b>", 0)  
    'IMPRIMINDO A QUINTA LINHA  
    Int_Retorno = Daruma_DUAL_ImprimirTexto("<tc>_</tc><l></l>", 0)  
    'IMPRIMINDO A SEXTA LINHA  
    Int_Retorno = Daruma_DUAL_ImprimirTexto("<tb><i>MARCA: Fiat<tb><tb>MODELO: Stilo</i><l></l>", 0)  
    'IMPRIMINDO A SETIMA LINHA  
    Int_Retorno = Daruma_DUAL_ImprimirTexto("<tb><i>PLACA: ANA-1069<tb>COR: Vermelho</i><l></l>", 0)  
    'IMPRIMINDO A OITAVA LINHA  
    Int_Retorno = Daruma_DUAL_ImprimirTexto("<tc>_</tc><l></l>", 0)  
    'IMPRIMINDO A DECIMA LINHA  
    Int_Retorno = Daruma_DUAL_ImprimirTexto("<ad><n>R$ 2,00 à Hora</n></ad>", 0)  
    'IMPRIMINDO A DECIMA PRIMEIRA LINHA  
    Int_Retorno = Daruma_DUAL_ImprimirTexto("<ad><n>R$ 0,50 à Cada 15 Minutos</n></ad>", 0)  
    'IMPRIMINDO A DECIMA SEGUNDA LINHA  
    Int_Retorno = Daruma_DUAL_ImprimirTexto("<tb><c><s><b>Não nos Responsabilizamos Por Objetos de Valor</b></s></c>", 0)  
    'IMPRIMINDO A DECIMA TERCEIRA LINHA  
    Int_Retorno = Daruma_DUAL_ImprimirTexto("<tb><c><s><b>Deixados no Interior do Veículo</b></s></c><l></l>", 0)  
    'IMPRIMINDO A DECIMA QUARTA LINHA  
    Int_Retorno = Daruma_DUAL_ImprimirTexto("<ce><e><b>OBRIGADO</b></e></ce>", 0)  
    'IMPRIMINDO A DECIMA QUINTA LINHA  
    Int_Retorno = Daruma_DUAL_ImprimirTexto("<sl></sl><sl></sl><sl></sl><sl></sl><sl></sl><sl></sl>", 0)  
    If Int_Retorno = 1 Then  
    MsgBox "Impressao Concluida!", vbInformation, "Daruma Framework"  
    Else  
    MsgBox "Erro!", vbCritical, "Daruma Framework"  
    End If  

    que esta disponivel no exemplo  do nosso help.

     

    Qualquer duvida segue os canais de contato:

     

    SUPORTE AO DESENVOLVEDOR DARUMA

    LUIZ CARLOS CANGUINI

    LIGAÇÃO GRATUITA : 0800 770 332 0

    e-mail's:desenvolvedores.daruma@daruma.com.br

    desenvolvedores_daruma

    Site:www.desenvolvedoresdaruma.com.br

    terça-feira, 12 de agosto de 2008 12:06