Ir para conteúdo
  • Cadastre-se

hintz

Membros
  • Total de ítens

    250
  • Registro em

  • Última visita

Posts postados por hintz

  1. Tentei conectar o meu sistema (utilizando o acbrecf) numa bematech MP 2100 até se comunicou, mas quando fui abrir o Cupom não abriu, mas o principal, quando fui ler os dados da impressora para a Nota Fiscal Gaucha, simplesmente disse que  a impressora não era MFD.

      O que eu fiz errado?

  2. Não. Mas o que estou achando estranho é que no ECFTeste funciona corretamente. Mas no meu programa NÃO. já revisei a rotina varias vezes e não consigo achar nada diferente.

    no EcfTeste :

    ACBrECF1.AbreCupom( CPF, NOME, ENDERECO );

    no meu sistema:

    frmEcf.ACBrECF1.AbreCupom(Cnpj, Nome, Ende);

     

    no EcfTeste :

                                 ACBrECF1.VendeItem( edCodigo.Text, edDescricao.Text,

                                   edICMS.Text, StrToFloatDef( edQtd.Text, 0 ),
                                   StrToFloatDef( edPrecoUnita.Text,0 ),
                                   StrToFloatDef( edDesconto.Text,0 ), edUN.Text,
                                   Desc );

     

    no meu sistema:

             frmEcf.ACBrECF1.VendeItem(Codigo, Descricao,

             Aliquota, StF(Quantidade),
             StF(ValorUnitario),
             StF(Desconto), UnidadeMedida,
             Str_Tipo_de_Desconto);
     
    no EcfTeste :  
         ACBrECF1.IdentificaConsumidor( CPF, NOME, ENDERECO );

    no meu Sistema:

        frmEcf.ACBrECF1.IdentificaConsumidor(Cpf, Nome, Endereco);

     

    no EcfTeste:

        ACBrECF1.SubtotalizaCupom( StrToFloat(Desc), Obs );

    no meu Sistema :

        frmEcf.ACBrECF1.SubtotalizaCupom(cVdes * -1, '');

     

    no EcfTeste :

                                         ACBrECF1.EfetuaPagamento( edCod.Text, StrToFloat( edValor.Text),

                                         edObs.Text ,cbVinc.Checked );

    no meu Sistema :

                                         frmEcf.ACBrECF1.EfetuaPagamento(Fpg.Indice, StrToFloat(Valor1), Msg, Vinc );

     

    no EcfTeste :  

         ACBrECF1.InfoRodapeCupom.MD5 := '12345678901234567890123456789012';

         ACBrECF1.InfoRodapeCupom.Dav := '0000000001';
         ACBrECF1.InfoRodapeCupom.DavOs := '0000000002';
         ACBrECF1.InfoRodapeCupom.PreVenda := '0000000003';
         ACBrECF1.InfoRodapeCupom.CupomMania := cbxUF.Text = 'RJ';
         ACBrECF1.InfoRodapeCupom.MinasLegal := cbxUF.Text = 'MG';
         ACBrECF1.InfoRodapeCupom.ParaibaLegal := cbxUF.Text = 'PB';
         ACBrECF1.InfoRodapeCupom.NotaLegalDF.Imprimir := cbxUF.Text = 'DF';
     
         if ACBrECF1.InfoRodapeCupom.NotaLegalDF.Imprimir then
         begin
           ACBrECF1.InfoRodapeCupom.NotaLegalDF.ProgramaDeCredito := True;
           ACBrECF1.InfoRodapeCupom.NotaLegalDF.ValorICMS := 123456.99;
           ACBrECF1.InfoRodapeCupom.NotaLegalDF.ValorISS  := 123456.88;
         end;
     
         Obs := StringReplace(Obs,'|',#10,[rfReplaceAll,rfIgnoreCase]) ;
         ACBrECF1.FechaCupom( Obs, StrToIntDef(IndiceBMP, 0) );

    no meu sistema :    

       frmEcf.ACBrECF1.InfoRodapeCupom.CupomMania := false;

       frmEcf.ACBrECF1.InfoRodapeCupom.MinasLegal := false;
       frmEcf.ACBrECF1.InfoRodapeCupom.ParaibaLegal := false;
       frmEcf.ACBrECF1.InfoRodapeCupom.NotaLegalDF.Imprimir := false;
     
       Msg := StringReplace(Msg, '|', #10, [rfReplaceAll, rfIgnoreCase]);
     
       frmEcf.ACBrECF1.FechaCupom(Msg);
  3. Desculpe pela falha...

     

    Estou desenvolvendo a rotina de nota fiscal gaucha no meu sistema.

    Estou utilizando uma impressora Sweda St120

    fiz o seguinte teste no programa EcfTeste

    Abre_Cupom

    Vende_Item

    Identifica_Consumidor

    Sub-Total

    Efetua_Pgto

    Fecha_Cupom.

    Blz. identificou o consumidor no rodape do ECF.

    Coloquei a mesma rotina no meu sistema.

    ..... simplesmente não imprimiu a identificação do cliente....

    o que eu poderia estar fazendo errado, porque a principio segui todos os passos do programa EcfTeste.

  4. Estou desenvolvendo a rotina de nota fiscal gaucha no meu sistema.

    Estou utilizando uma impressora Sweda St120

    fiz o seguinte teste no programa EcfTeste

    Abre_Cupom

    Vende_Item

    Identifica_Consumidor

    Sub-Total

    Efetua_Pgto

    Fecha_Cupom.

    Blz. identificou o consumidor no rodape do ECF.

    Coloquei a mesma rotina no meu sistema.

    ..... simplesmente não imprimiu a identificação do cliente....

    o que eu poderia estar fazendo errado, porque a principio segui todos os passos do programa EcfTeste.

  5. Falei de novo com o suporte da sweda e me passaram o seguinte link:

     

    http://www.sweda.com.br/v2011/br/suporte_downloads.asp

     

    Na categoria do equipamento selecione: Impressoras Termicas Ficais

    no modelo do equipamento selecione: IF ST120

    no tipo de arquivos selecione: Manuais

    tem dois link's que podem ser utilizados:

    1. Manual de Programação - ESC (Completo)
    2. Manual de Programação - STX

    nestes dois link's tem os comandos diretos...

    t+

  6. Acesse o link abaixo:

     

    http://www.sweda.com.br/v2011/br/suporte_connect.asp

     

    clique no botão:

    Connect/C - Windows
    Biblioteca compatível com as DLLs de Alto Nível do Mercado. Sua utilização economiza tempo e

    linhas de programação.

     

    vai baixar um arquivo zipado.

    descompacte.

    vai criar uma pasta e dentro dela tem uma pasta chamada: Manual

    de acordo com o suporte la dentro tem tudo o que precisa.

     

    fiz o teste com a DLL deles e funcionou OK.

     

    fico agora na dependencia desta alteração, pois mudei o meu sistema para utilizar o componente ACBR e esta parte, a pesar de ter a função, não funciona.

    fico no aguardo...

  7. estou implementando a nota fiscal gaucha numa impressora sweda st120 e estou tentando utilizar o comando ACBrECF1.IdentificaConsumidor, mas não estou obtendo resultado. 

    tenho a seguinte rotina:

     

    Abre_cupom;

    Vende_Item

     

    Identifica_Consumidor(Cpf, Nome, Endereco);

     

    Inicia_FechamentoCupom();

    Efetua_FormasPagamento...

    Termina_FechamentoCupom..

     

    O QUE Pode estar errado?

     

  8. Quando clico no botão CAT52 do EcfTeste da a seguinte mensagem:

    Erro ao executar ECF_DownloadMF.

    Cod: -8

    Para a data de: "01/01/2013"

    Uso uma impressora Sweda St120.

    como resolver este problema?

  9. ja não sei mais o que faço.

    no ambiente de homologação, qualquer coisa, que eu informar no campo IE Destinatario ele gera em branco

    e na validação da o erro: 1824 - Element '{http://www.portalfiscal.inf.br/nfe}IE': '' is not a valid value of the atomic type

    - li a mensagem do Kiko e pelo o que eu vi o layout que estou informando esta correto.

    o que pode estar acontecendo????

    atenciosamente,

    hintz

    43120293089563000189550010000000011051348009-NFe.xml

  10. pelo que eu pude perceber, na depuração que eu fiz, é na hora de gerar o XML utilizando o componente ACBrNFe1 eu gero as seguintes linhas:

    Dest.CNPJCPF := TiraMascara(FieldByName('Nom_Cgc').asString); // '05481336000137';

    Dest.xNome := FieldByName('Nom_Cli').asString; //'D.J. COM. E LOCAÇÃO DE SOFTWARES LTDA - ME';

    Dest.IE := TiraMascara(FieldByName('Nom_Icm').asString); //'687138770110';

    e quando gravo o XML ta gravando o campo Dest.Ie em branco, não importando o que eu escrevo.

    Atenciosamente,

    j.hintz

×
×
  • 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.