none
Passar Desconto ou Acréscimo no item após a impressão - Daruma RRS feed

  • Discussão Geral

  • Pessoal,

    Bom dia!

     

    Hoje vou deixar uma dica para quem usa as impressoras térmicas da Daruma, e deseja enviar um desconto ou acréscimo no item, após o mesmo já ter sido vendido. Através do método: Daruma_FIMFD_DescontoAcrescimoItem [Índice: 6031] e passando como parâmetros: (4 parâmetros) 

     1. Número do Item: Indica se haverá acréscimo ou desconto no Item selecionado no cupom;

     2. Desconto ou Ascrecimo: O Tipo A para Acréscimo ou D para Desconto;

     3. Tipo do Desconto ou Acrescimo: Para Percentagem (%) ou Valor ($) no valor do item selecionado;

     4. Valor do Desconto ou Acrescimo: String com no máximo 14 dígitos para acréscimo ou desconto por valor e 4 dígitos para acréscimo ou desconto por percentual (2 casas decimais). 

     

    É preciso informar o número do item que irá sofrer o desconto ou acréscimo com o cupom fiscal aberto, ou seja, antes de iniciar o fechamento do cupom, e pode ser informado qualquer item que já tenha sido vendido!

     

    Este método é um diferencial para o seu aplicativo, pois permite uma maior flexibilidade para o seu cliente que usar uma impressora térmica da Daruma, pois poderá a qualquer momento, informar um desconto ou acréscimo em itens específicos que já tenham sido impressos na ECF. Fantástico!

     

    Agora vejamos os exemplos:

     

    · Exemplo em Visual Basic 6.0: 

     Declarando:

     Public Declare Function Daruma_FIMFD_DescontoAcrescimoItem Lib "Daruma32.dll" (ByVal NumeroDoItem As String, ByVal DescontoOuAcrescimoItem As String, ByVal TipoDoDescontoOuAcrescimoItem As String, ByVal ValorDoDescontoOuAcrescimo As String) As Integer

     Chamando o método:

     Dim Str_Numero_do_Item as String 

     Dim Str_Desconto_ou_Acrescimo_Item as String 

     Dim Str_Tipo_do_Desconto_ou_Acrescimo_Item as String 

     Dim Str_Valor_do_Desconto_ou_Acrescimo_Item as String 

     Str_Numero_do_Item = "001" 

     Str_Desconto_ou_Acrescimo_Item = "A" 

     Str_Tipo_do_Desconto_ou_Acrescimo_Item = "$" 

     Str_Valor_do_Desconto_ou_Acrescimo_Item = "0,01" 

     Int_Retorno = Daruma_FIMFD_DescontoAcrescimoItem(Str_Numero_do_Item, Str_Desconto_ou_Acrescimo_Item, Str_Tipo_do_Desconto_ou_Acrescimo_Item, Str_Valor_do_Desconto_ou_Acrescimo_Item)

     Daruma_MostrarRetorno

     

     · Exemplo em Delphi 7.0:

     Declarando:

     function Daruma_FIMFD_DescontoAcrescimoItem(NumItemDescontoAcrescimo: String; DescAcres: String; TipoDescAcres: String; ValorDescAcres: String): Integer; StdCall; External 'Daruma32.dll';

     Chamando o método:

     var

     Str_Numero_do_Item: String; 

     Str_Desconto_ou_Acrescimo_Item: String; 

     Str_Tipo_do_Desconto_ou_Acrescimo_Item: String; 

     Str_Valor_do_Desconto_ou_Acrescimo_Item: String; 

     begin 

     Str_Numero_do_Item := '001'; 

     Str_Desconto_ou_Acrescimo_Item := 'A'; 

     Str_Tipo_do_Desconto_ou_Acrescimo_Item := '$'; 

     Str_Valor_do_Desconto_ou_Acrescimo_Item := '0,01'; 

     Int_Retorno := Daruma_FIMFD_DescontoAcrescimoItem(pchar(Str_Numero_do_Item), pchar( Str_Desconto_ou_Acrescimo_Item ), pchar( Str_Tipo_do_Desconto_ou_Acrescimo_Item ), pchar( Str_Valor_do_Desconto_ou_Acrescimo_Item ) ); 

     Framework_Impressoras_Fiscais.Daruma_Analisa_Retorno();

     end;

     

    · Exemplo em Visual FoxPro 6.0:

     Declarando:

     Declare Integer Daruma_FIMFD_DescontoAcrescimoItem IN "Daruma32.dll" String NumeroDoItem, String DescontoOuAcrescimoItem, String TipoDoDescontoOuAcrescimoItem, String ValorDoDescontoOuAcrescimo

    Chamando o método:

     Str_Numero_do_Item = "001" 

     Str_Desconto_ou_Acrescimo_Item = "A" 

     Str_Tipo_do_Desconto_ou_Acrescimo_Item = "$" 

     Str_Valor_do_Desconto_ou_Acrescimo_Item = "0,01" 

     Int_Retorno = Daruma_FIMFD_DescontoAcrescimoItem(Str_Numero_do_Item, Str_Desconto_ou_Acrescimo_Item, Str_Tipo_do_Desconto_ou_Acrescimo_Item, Str_Valor_do_Desconto_ou_Acrescimo_Item)

     

    Bom, é isso aí pessoal. Veja mais sobre este método e outros disponíveis no nosso help: http://www.desenvolvedoresdaruma.com.br/home/downloads/Daruma32_Help_Chm.exe

     

    Em caso de dúvidas entrem em contato conosco!

     

    Atenciosamente,

    Guilherme Silveira de Moraes

    Daruma Automação

    Suporte ao Desenvolvedor

    Fone: 0800 770 33 20

    Skype: ddc_suporte_daruma

    E-mail: ddc.suporte@daruma.com.br

    quinta-feira, 27 de novembro de 2008 11:31