Ir para conteúdo
  • Cadastre-se

Fabio Lino

Membros
  • Total de ítens

    16
  • Registro em

  • Última visita

Posts postados por Fabio Lino

  1. Boa noite  amigos!

     

     

     

     

     

     

    A minha dúvida é a seguinte consigo configurar e fazer a ECF se comunicar com meu sistema no acbr

    emito cupons e tudo mais, no entanto quando fecho o programa e abro ele novamente a configuração da impressora some!

     

     

     

    Quando abro o arquivo ini lá está tudo certinho porque será?

     

    A impressora é uma bematech MP-2100 THFI

     

    O AQUIVO INI:

     
    [Config]
    Modelo=2
    Porta=COM7
    Baud=115200
    TimeOut=3
    Intervalo=100
     
    

    ou seja consigo gravar as configurações e ler também mais na hora que abro o sistema a impressora não responde

     

     

    segue o log:

  2. Olá amigos, boa noite!

     

     

     

    Consegui fazer o sistema dar desconto em % e também em $ fiz assim:

     
    Var
    Desc:String;
    begin
    Form1.ACBrECF1.ArqLOG:=Log.Text;
    Desc :='$';
    form1.ACBrECF1.VendeItem(datamodule1.QVendacodigo_barras.Text, datamodule1.QVendadescricao.Text,
                                   datamodule1.QVendaaliq.Text, StrToFloatDef( datamodule1.QVendaquant.AsString,0),
                                   StrToFloatDef( datamodule1.QVendavalorUnit.AsString,0),
                                   StrToFloatDef(pesprod.Eddescva.Text,0 ),
                                   Desc,pesprod.Edit3.Text); <===================== aqui coloquei um edit aonde coloco $ ou % conforme a escolhido em um dbcombobox   dinheiro ou porcentagem
     
    end;
    
  3. -- 10:53:43:125 VendeItem( 000105 , ABRAC NYLON BRASF. 3,6MM X 200 , F , 1 , 0,2 , 0 , $ , % , D , -1 )
                    TX -> [sTX][ENQ][NUL][FS]#[FS][[NUL]
       10:53:43:406 RX <- [NUL][NUL][NUL][NUL][NUL]
    -- 10:53:43:406 
                    TX -> [sTX]h[NUL][FS]?FF0000002000001000000000000000000000000100000000000000000000$ 000105[NUL]ABRAC NYLON BRASF. 3,6MM X 200[NUL]s[20]
       10:53:43:703 RX <- [NUL][NUL][NUL][NUL]
    -- 10:53:44:765 SubtotalizaCupom( 0 ,  )
                    TX -> [sTX][19][NUL][FS] a00000000000000=[ETX]
       10:53:45:015 RX <- [NUL][NUL][NUL][NUL]
    -- 10:53:45:015 CarregaFormasPagamento
                    TX -> [sTX][ENQ][NUL][FS]#1p[NUL]
       10:53:45:312 RX <- Dinheiro        [NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][sOH][NUL]e[NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][170][170][170][170][170][170][170][170][170][170][170][170][170][170][170][170][170][170][170][170][NUL][NUL][NUL][NUL]
    -- 10:53:45:312 FormasPagamento
                    TX -> [sTX][20][NUL][FS]H0100000000000020g[ETX]
       10:53:45:625 RX <- [NUL][NUL][NUL][NUL]
    -- 10:53:45:687 NumECF
                    TX -> [sTX][ENQ][NUL][FS]#[14]M[NUL]
       10:53:45:921 RX <- [NUL][sOH][NUL][NUL][NUL][NUL]
    -- 10:53:45:921 NumCupom
                    TX -> [sTX][4][NUL][FS][30]:[NUL]
       10:53:46:218 RX <- [NUL][NUL]S[NUL][NUL][NUL][NUL]
    -- 10:53:46:218 Subtotal
                    TX -> [sTX][ENQ][NUL][FS]#A[128][NUL]
       10:53:46:531 RX <- [NUL][NUL][NUL][NUL][NUL]
    -- 10:53:46:531 
                    TX -> [sTX][4][NUL][FS][GS]9[NUL]
       10:53:46:828 RX <- [NUL][NUL][NUL][NUL][NUL][NUL] [NUL][NUL][NUL][NUL]
    -- 10:53:46:828 FechaCupom( Val.Aprox.Impostos R$0,34(168,30%) Fonte:IBPT[LF] )
                    TX -> [sTX]2[NUL][FS]"Val.Aprox.Impostos R$0,34(168,30%) Fonte:IBPT[LF][177][CR]
       10:53:47:328 RX <- [NUL][NUL][NUL][NUL]
    -- 10:53:47:328 AbreGaveta
                    TX -> [sTX][ENQ][NUL][FS][22]d[150][NUL]
       10:53:47:687 RX <- [NUL][NUL][NUL][NUL]
  4. Olá amigos!

     

     

    Consegui gerar o log:

     

     

     

     

    -- 10:23:14:437 SubtotalizaCupom( 0 ,  )
                    TX -> [sTX][19][NUL][FS] a00000000000000=[ETX]
       10:23:14:640 RX <- [NUL][NUL][NUL][NUL]
    -- 10:23:14:640 CarregaFormasPagamento
                    TX -> [sTX][ENQ][NUL][FS]#1p[NUL]
       10:23:14:953 RX <- Dinheiro        [NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][152]5[NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][170][170][170][170][170][170][170][170][170][170][170][170][170][170][170][170][170][170][170][170][NUL][NUL][NUL][NUL]
    -- 10:23:14:953 FormasPagamento
                    TX -> [sTX][20][NUL][FS]H0100000000000070l[ETX]
       10:23:15:250 RX <- [NUL][NUL][NUL][NUL]
    -- 10:23:15:546 NumECF
                    TX -> [sTX][ENQ][NUL][FS]#[14]M[NUL]
       10:23:15:750 RX <- [NUL][sOH][NUL][NUL][NUL][NUL]
    -- 10:23:15:750 NumCupom
                    TX -> [sTX][4][NUL][FS][30]:[NUL]
       10:23:16:062 RX <- [NUL][NUL]G[NUL][NUL][NUL][NUL]
    -- 10:23:16:062 Subtotal
                    TX -> [sTX][ENQ][NUL][FS]#A[128][NUL]
       10:23:16:359 RX <- [NUL][NUL][NUL][NUL][NUL]
    -- 10:23:16:359 
                    TX -> [sTX][4][NUL][FS][GS]9[NUL]
       10:23:16:656 RX <- [NUL][NUL][NUL][NUL][NUL][NUL]p[NUL][NUL][NUL][NUL]
    -- 10:23:16:656 FechaCupom( Val.Aprox.Impostos R$0,34(48,09%) Fonte:IBPT[LF] )
                    TX -> [sTX]1[NUL][FS]"Val.Aprox.Impostos R$0,34(48,09%) Fonte:IBPT[LF][132][CR]
       10:23:17:171 RX <- [NUL][NUL][NUL][NUL]
    -- 10:23:17:171 AbreGaveta
                    TX -> [sTX][ENQ][NUL][FS][22]d[150][NUL]
       10:23:17:468 RX <- [NUL][NUL][NUL][NUL]
    -- 10:29:20:062 SubtotalizaCupom( 0 ,  )
                    TX -> [sTX][19][NUL][FS] a00000000000000=[ETX]
       10:29:20:281 RX <- [NUL][NUL][NUL][NUL]
    -- 10:29:20:281 CarregaFormasPagamento
                    TX -> [sTX][ENQ][NUL][FS]#1p[NUL]
       10:29:20:578 RX <- Dinheiro        [NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][153][ENQ][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][NUL][170][170][170][170][170][170][170][170][170][170][170][170][170][170][170][170][170][170][170][170][NUL][NUL][NUL][NUL]
    -- 10:29:20:578 FormasPagamento
                    TX -> [sTX][20][NUL][FS]H0100000000000050j[ETX]
       10:29:20:875 RX <- [NUL][NUL][NUL][NUL]
    -- 10:29:20:953 NumECF
                    TX -> [sTX][ENQ][NUL][FS]#[14]M[NUL]
       10:29:21:187 RX <- [NUL][sOH][NUL][NUL][NUL][NUL]
    -- 10:29:21:187 NumCupom
                    TX -> [sTX][4][NUL][FS][30]:[NUL]
       10:29:21:484 RX <- [NUL][NUL]H[NUL][NUL][NUL][NUL]
    -- 10:29:21:484 Subtotal
                    TX -> [sTX][ENQ][NUL][FS]#A[128][NUL]
       10:29:21:781 RX <- [NUL][NUL][NUL][NUL][NUL]
    -- 10:29:21:781 
                    TX -> [sTX][4][NUL][FS][GS]9[NUL]
       10:29:22:093 RX <- [NUL][NUL][NUL][NUL][NUL][NUL]P[NUL][NUL][NUL][NUL]
    -- 10:29:22:093 FechaCupom( Val.Aprox.Impostos R$0,34(67,32%) Fonte:IBPT[LF] )
                    TX -> [sTX]1[NUL][FS]"Val.Aprox.Impostos R$0,34(67,32%) Fonte:IBPT[LF][129][CR]
       10:29:22:593 RX <- [NUL][NUL][NUL][NUL]
    -- 10:29:22:593 AbreGaveta
                    TX -> [sTX][ENQ][NUL][FS][22]d[150][NUL]
       10:29:22:890 RX <- [NUL][NUL][NUL][NUL]
  5. Então Regis até consegui reproduzir no demo e da forma como fiz em meu sistema não conseguido imaginar aonde possa haver um erro, uma vez que, consigo dar sim o desconto por PRCENTAGEM no entanto quando seto a variável DESC para '$'  não dá desconto algum, você imagina o que pode ser?

  6. Olá amigos, bom dia

     

     

     

    troquei a palavra chave mas ainda assim não consegui fazer com que o acbr dê desconto por porcentagem

     

     

     

     
    procedure TForm29.Button6Click(Sender: TObject);
    Var Desc : Char ;
    begin
    Desc := '$';
    form1.ACBrECF1.VendeItem(datamodule1.QVendacodigo_barras.Text, datamodule1.QVendadescricao.Text,
                                   datamodule1.QVendaaliq.Text, StrToFloatDef( datamodule1.QVendaquant.AsString,0),
                                   StrToFloatDef( datamodule1.QVendavalorUnit.AsString,0),
                                   StrToFloatDef( pesprod.Eddescva.Text,0 ),
                                   Desc);
     
    end;
    
  7. Sim, eu coloquei sim a variável só esqueci de colocar ai no poste mas mesmo assim não dá o desconto por valor só por porcentagem.

     

     

     

     

     
    Var Desc : Char ;
    begin
    //  if Form1.ACBrECF1.AguardandoResposta then
    //     raise Exception.Create('Aguarde imprimindo Item anterior...') ;
     
      Button1.Enabled := False ;
      Desc := '%' ;
      if rbValor.Checked then
         Desc := '$' ;
     
      try
         if ckInmetro.Checked then
            Form1.ACBrECF1.LegendaInmetroProximoItem;
     
         Form1.ACBrECF1.VendeItem( edCodigo.Text, edDescricao.Text,
                                   edICMS.Text, StrToFloatDef( edQtd.Text, 0 ),
                                   StrToFloatDef( edPrecoUnita.Text,0 ),
                                   StrToFloatDef( edDesconto.Text,0 ), edUN.Text,
                                   Desc );
    
  8. Boa tarde, amigos

     

     

     

     

    Gostaria de saber como faço para dar o desconto por VALOR e não por porcentagem 

    pois mesmo eu declarando na variável desconto

     

     

    DESC:='$';

     

     

    mesmo assim não sai o desconto 

     

     

    se coloco DESC:='%'; AI SIM FUNCIONA

    Desc := '$';
    form1.ACBrECF1.VendeItem(datamodule1.QVendacodigo_barras.Text, datamodule1.QVendadescricao.Text,
                                   datamodule1.QVendaaliq.Text, StrToFloatDef( datamodule1.QVendaquant.AsString,0),
                                   StrToFloatDef( datamodule1.QVendavalorUnit.AsString,0),
                                   StrToFloatDef( pesprod.Eddescva.Text,0 ),
    
  9. Boa tarde, amigos

     

     

    Estou usando o acbretq para imprimir etiquetas em uma argox esta imprimindo direitnho tudo ok, exceto por um problema que não conseguindo resolver:

     

     

    Preciso alinhar o texto e alinhar o código de barras ao meio da etiqueta, configurei o tamanho da etiqueta no windows no genreciador da impressora argox mas mesmo assim nada:

     

     

    O texto está saindo alinhado à esquerda e preciso coloca-lo centralizado ou pelo menos recuar um pouco para a direita.

     

     

     

     

     

     

    procedure TPrint1.Button1Click(Sender: TObject);
    begin
    if etiqueta.ComboBox1.Text = 'Etiqueta Simples' then
    etiqueta.AtivarACBrETQ ;
    with etiqueta.ACBrETQ do
      begin
         if Modelo = etqPpla then
          begin                       //TF
            ImprimirTexto(orNormal, 2, 1, 1, 190, 5, form5.DBEdit3.Text);
            ImprimirBarras(orNormal, 'F', '2', '2', 35, 1,form5.DBEdit2.Text, 90, becSIM);
            ImprimirTexto(orNormal, 3, 1, 1, 15, 300,form5.DBEdit5.Text);
          end
         else
          begin
            ImprimirTexto(orNormal, 2, 1, 1, 190, 55, form5.DBEdit3.Text);
            ImprimirBarras(orNormal, 'E30', '2', '2', 95, 55,form5.DBEdit2.Text, 90, becSIM);
            ImprimirTexto(orNormal, 3, 1, 1, 110, 355, 'R$');
            ImprimirTexto(orNormal, 3, 4, 5, 85, 515, form5.DBEdit5.Text);
          end ;
     
     
×
×
  • Criar Novo...

Informação Importante

Colocamos cookies em seu dispositivo para ajudar a tornar este site melhor. Você pode ajustar suas configurações de cookies, caso contrário, assumiremos que você está bem para continuar.