Valdemir Jacon Sanches

Juliomar, eu fiz de seguinte maneira, cliquei para executar o ACBr, depois abri o Delphi 2010 e nao apareceu nenhuma mensagem para dar nao. Fiz de outras formas também alternando abrindo o delphi e executando a instalador ACBr, e de nenhuma maneira apareceu mensagens para dar NAO.

Régys, atualizei o ACBr e realmente tinha as *.dcu, *.bpl do ACBr antigo, pois mesmo excluindo as mesma nao resolveu o problema, e o erro apareceu novamente. Segue o log para analise. Obrigado. log_Delphi_2010.txt

Bom dia, Hoje foi atualizado meu ACBr e quando fui fazer instalação através do ACBrInstall.exe deu erro no pacote ACBr_NFe2. Foi Anexado o arquivo de Log. Ao compilador pelo Delphi 2010 esse pacote o erro acontece na class ACBrNFeWebServices na linha 1177. [DCC Error] ACBrNFeWebServices.pas(1177): E2003 Undeclared identifier: 'teEPECNFe' Alguém pode me ajuda? Obrigado... ArquivoLog.txt

Juliana, dei update no ACBr, e deu tudo certo. Obrigado....

Bom Dia! Consegui descobrir o problema... A Insc. Municipal estava indo em branco no xml de consulta, com isso a tag era gerada da seguinte forma: <ns4:InscricaoMunicipal/> Obrigado a todos e pode fechar o tópico.

Bom Dia! Utilizo já a algum tempo o ACBr NFe com sucesso e estou desenvolvendo agora uma aplicação para envio de Nota Fiscal de Serviço para o Município de Ribeirão Preto usando o componente ACBr NFSe. Estou utilizando como base o exemplo contido na pasta do ACBr. Estou fazendo os seguintes passos: 1 - Alimento as propriedades do componente com os dados do RPS. 2 - Utilizo o comando GerarLote para gerar o lote com o RPS. 3 - Faço o envio do lote. Quando utilizo a função para Consultar a situação do Lote tenho o seguinte retorno: "Arquivo enviado fora da estrutura do arquivo XML de entrada." Pesquisando no Fórum por esta mensagem encontrei um tópico de outro usuário com esse problema, não sei exatamente em que etapa ocorria o erro, no caso dele eram caracteres especiais contidos no XML e no XML que estou mandando já estou retirando esses caracteres previamente. Alguém já passou por esta situação? Caso necessário posso enviar os arquivos para analisar.

Alteração Feita Class ACBrBancoHSBC 217 Parte2 := CalcularFatorVencimento(Vencimento) + 218 IntToStrZero(Round(ValorDocumento * 100), 10) + 219 RightStr(padR(ANossoNumero, 13, '0'),11) + // precisa passar nosso numero + digito 220 padR(OnlyNumber(ACBrBoleto.Cedente.Agencia), 4, '0') + 221 padR(OnlyNumber(ACBrBoleto.Cedente.Conta) + 222 OnlyNumber(ACBrBoleto.Cedente.ContaDigito) , 7, '0')+ 223 '00' So que nesse caso na linha 221 e 222, esta tirando um numero que seria o numero do digito, pois no Create dessa Class o Tamanho da Conta esta com 7 Fiz um teste deixando o tamanho da Conta com 6 e assim deu certo, pois na linha 221 padR(OnlyNumber(ACBrBoleto.Cedente.Conta) ele ja traz o numero da conta com zero a esquerda dando 7 digitos, e e assim ignora a linha 222 que seria do digito, logo a linha digitável fica diferente Create da Class: fpDigito := 9; fpNome := 'HSBC'; fpNumero := 399; fpTamanhoMaximoNossoNum := 16; fpTamanhoAgencia := 4; fpTamanhoConta := 7; aqui eu fiz um teste e deixei 6 fpTamanhoCarteira := 3;

Estou com um problema que ao imprimir o boleto, a linha digitável do boleto HSBC está vindo com uma divergência. Na posição 22 a 28 do Campo 3 da Composicao da Linha Digitável Pag em anexo N° 19 De Ate Posição Conteúdo 22 a 28 7 Conta da Agência - Final da Conta Cobrança Nessa informação esta vindo o numero da conta sem o digito Na posição 29 a 30 do Campo 3 da Composicao da Linha Digitável Pag em anexo N° 19 De Ate Posição Conteúdo 29 a 30 2 Código da carteira = '00' Na rotina não tem esse '00' igual ao layout. Na rotina atual esta assim na Class: ACBrBancoHSBC, na linha 214 a 223 {'CSB' Cobranca Registrada} if aCarteira = '1' then begin Parte2 := CalcularFatorVencimento(Vencimento) + IntToStrZero(Round(ValorDocumento * 100), 10) + RightStr(padR(ANossoNumero, 13, '0'),11) + // precisa passar nosso numero + digito padR(OnlyNumber(ACBrBoleto.Cedente.Agencia), 4, '0') + padR(OnlyNumber(ACBrBoleto.Cedente.Conta), 7, '0')+ padR(ACBrBoleto.Cedente.ContaDigito,2,'0'); end Observei que no layout do banco que esta em anexo, essa rotina deveria fazer o seguinte Parte2 := CalcularFatorVencimento(Vencimento) + IntToStrZero(Round(ValorDocumento * 100), 10) + RightStr(padR(ANossoNumero, 13, '0'),11) + // precisa passar nosso numero + digito padR(OnlyNumber(ACBrBoleto.Cedente.Agencia), 4, '0') + // as linha acima da rotina estão corretas //a linha abaixo esta vindo somente o numero da conta sem o digito, por padrao esta indo isso ocorrre divergencia padR(OnlyNumber(ACBrBoleto.Cedente.Conta), 7, '0')+ //Nessa linha abaixo deveria vir '00', que esta padrão no layout do banco padR(ACBrBoleto.Cedente.ContaDigito,2,'0'); ou seja nessas divergencia acima deveria vir Numero da conta do banco + // Digito da Conta + '00' que é o padrão do Layout Boleto HSBC.PDF

Bom dia! Estou com dificuldade ao implementar a rotina para preenchimento das TAGs: imp > ICMS > ICMS... Reparei que o Type TpcnCSTIcms está declarado assim: (cst00, cst10, cst20, cst30, cst40, cst41, cst45, cst50, cst51, cst60, cst70, cst80, cst81, cst90, cstPart10, cstPart90, cstRep41, cstVazio, cstICMSOutraUF, cstICMSSN); //80 e 81 apenas para CTe Meu problema é justamente sobre o CST 80 e 81, pois seguindo a estrutura ACBrCTe1.Conhecimentos.Add.CTe.imp.ICMS. só tem as opções: ICMS00, ICMS20, ICMS45, ICMS60, ICMS90, ICMSOutraUF, ICMSSN não tem as opções por exemplo: ICMS80 ou ICMS81. Para gerar CTe com esses CST (80 ou 81), como devo proceder?

Olá! Estou com o mesmo caso do jbaneto. Tenho uma gaveta conectada a uma impressora NÃO Fiscal Daruma DR700 L (Não tenho ECF) Fui fazer um teste no ACBRGavTeste. Coloquei no campo: Modelo Gaveta = gavImpressoraComum Na propriedade: StrComando do componente = #254 | Daruma E quando mando abrir a gaveta aparece uma mensagem: "Para usar Gaveta "gavImpressoraComum", deve ser definido uma String de comando em StrComando " Alguém pode me ajudar?

Boa tarde! Gostaria de saber se o ACBrBoleto está apto para gerar boletos para o banco Safra. Obrigado!

Me desculpem, eu fiz a pesquisa no forum sobre este problema, e não encontrei, e no dia seguinte quando fui olhar se eu tinha resposta, vi que já tinham postado a mesma duvida no dia 04/10.

Boa noite a todos Faz uns 40 dias que eu atualizei os fontes do ACBr fazendo o update pelo tortoise, e ai não cheguei a liberar versão do sistema para os clientes, apenas fiz alguns testes, somente liberei a versão para alguns clientes "cobaias". No dia 30/10 liberei uma versão para todos os clientes, e começou a aparecer alguns erros no momento de validar os shemas com o erro abaixo << Lista de erros da NF-e: >> << Geração do XML da NFe - 01/11/2013 17:51:21 >> 'TAG:<det nItem="1"><prod><DI> ID:I19/nDI(Numero do Documento de Importação DI/DSI/DA) - Conteúdo inválido. TAG:<det nItem="2"><prod><DI> ID:I19/nDI(Numero do Documento de Importação DI/DSI/DA) - Conteúdo inválido. TAG:<det nItem="3"><prod><DI> ID:I19/nDI(Numero do Documento de Importação DI/DSI/DA) - Conteúdo inválido. TAG:<det nItem="4"><prod><DI> ID:I19/nDI(Numero do Documento de Importação DI/DSI/DA) - Conteúdo inválido. TAG:<det nItem="5"><prod><DI> ID:I19/nDI(Numero do Documento de Importação DI/DSI/DA) - Conteúdo inválido. TAG:<det nItem="6"><prod><DI> ID:I19/nDI(Numero do Documento de Importação DI/DSI/DA) - Conteúdo inválido. Verificando no xml, não consegui encontrar problemas abaixo a tag da DI dentro do produto <DI> <nDI>1321630869</nDI> <dDI>2013-11-01</dDI> <xLocDesemb>SAO BORJA</xLocDesemb> <UFDesemb>RS</UFDesemb> <dDesemb>2013-11-01</dDesemb> <cExportador>MCCAIN ARGENTINA S.A.</cExportador> <adi> <nAdicao>41</nAdicao> <nSeqAdic>1</nSeqAdic> <cFabricante>MCCAIN ARGENTINA S.A.</cFabricante> </adi> </DI> Verifiquei no link https://www.sefaz.rs.gov.br/NFE/NFE-VAL.aspx o xml completo mas não deu erro. Tentei fazer o donwload direto do site da receita dos shemas para ver se era problema com os shemas mas o erro persistiu Então o que eu fiz, voltei a versão anterior do sistema, e mandei gerar a mesma nf e a mesma foi enviada sem dar nenhum problema. Sinceamente não faço ideia do que pode ser, desconfio de 2 coisas 1) com a versão nova do acbr existe alguma coisa que mudou e eu estou fazendo de maneira errada 2) existe algum bug na versão atual do acbr ... eu acabei de fazer um novo update para ver se tinha alguma correção mas os erros persistiram

Obrigado pela ajuda!

Boa tarde! Estou desenvolvendo um programa de envio de SMS, vou ter que comprar um modem GSM, gostaria da ajuda de vocês se tem algum modelo/marca para me indicar. Obrigado!

Pensei em fazer uma media, pelos produtos acima, Ex produto 1 % 38 produto 2 % 39 produto 3 % não encontrado .. media (38+39)/2 ... assume o produto 3 38,5 se for algum ramo tipo calcados e roupas, até talvez daria certo porque teoricamente as roupas o percentual é tudo semelhante com raras exceções dependendo do material Mas em um mercado isso já talvez não seria o correto. Estou inclinado a usar a media. ============================= Ainda sobre este assunto, alguns clientes tem muitos produtos usando a tabela do ncm de 2007, e a nota fiscal eletrônica ainda aceita estes códigos, Vou ter que pedir para o cliente atualizar para os novos códigos do ncm de 2012? ou será que eles irão soltar alguma coisa para estes códigos antigos da tabela de 2007 ? (seria muito mais facil se a nfe conferisse se o ncm é valido, pois ai as notas de entrada já viriam certas)

Boa tarde! Estou com a seguinte duvida: Tenho dois produtos que vão ser incluídos em uma nota, um eu tenho o NCM com o percentual aproximado do imposto e o outro não. Exemplo: Descrição Valor Produto % Imp. Aprox. R$ Imp. Aprox. Produto 1 R$ 10,00 40,00% R$ 4,00 Produto 2 R$ 10,00 0 0 Neste caso o Vlr_Total_NF vai ser R$ 20,00 e o Vlr_Imposto_Aproximado vai ser R$ 4,00. O que devo fazer neste caso, pois se eu for fazer o calculo para encontrar o Percentual Final dos impostos (Vlr_Imposto_Aproximado / Valor_Total_NF) vai dar 20%. Será que posso colocar na msg que o percentual aproximado dos impostos é de 20%? Isto estaria em desacordo com a tabela IBPT, já que o "Produto 1" na tabela está como 40%?

Problema resolvido! Aumentei o TimeOut no momento da Redução Z para 480 conforme exemplo de Daniel Simoes. Emitiu a Z e não deu nenhum erro. Obrigado!

Este erro acontece somente em duas impressoras Daruma, tenho várias outras impressoras da mesma marca e modelo que não acontece o problema. Eu tinha aumentado as propriedades conforme o Isaque postou: ACBrECF.TimeOut := 10; ACBrECF.IntervaloAposComando := 100; Vou aumentar para 480 conforme seu código acima para fazer o teste.

No meu primeiro post, tem anexado o log que coloquei na classe ACBrECF, no momento que gera a RZ. Neste post estou anexando o log que foi gerado quando fui gerar a RZ pelo ECFTeste. acbrlog.txt

Foi gerado a versão sem a passagem dos parâmetros de data, mas mesmo assim o erro continua. Fiz um outro teste, compilei e coloquei o "ECFTeste.exe" no cliente, no final do dia ao invés de gerar a RZ pelo meu sistema, gerei pelo ECFTeste, porém mesmo assim aconteceu o erro: - + - + - + - + - + - + - + - + - + - + - + - Impressora Daruma não está respondendo - + - + - + - + - + - + - + - + - + - + - + - Será que esse erro é resultante de algum defeito no hardware (ECF) ?

Não, todas as vezes o comando é disparado com a data, vou gerar uma versão com o comando sem passar o parâmetro data para fazer o teste.

Bom dia! Os valores das variaveis do ECF, pegamos antes de chamar a rotina para impressão da RZ. No componente ACBrECF já estava definida as propriedades IntervaloAposComando e TimeOut conforme vc tinha passado. Mesmo assim, na minha rotinha antes de tirar a RZ, eu atribui novamente os valores para o componente. Eu estou colocando em anexo a minha rotina que gera a redução Z, já tentei fazer algumas modificações. Ex: Antes e depois de chamar o comando para a impressão, colocamos um loop com sleep para aguardar se o ECF estiver processando alguma coisa. while ECFProcessando do Sleep(2000); Basicamente na rotina 1 - das linhas 12 a 33, verificações antes de emitir a Z. 2 - das linhas 35 a 85, pego os totais do ECF para gravar no banco de dados. 3 - das linhas 87 a 88, espera se o ecf estiver processando alguma coisa. 4 - das linhas 91 a 101 tira a Z. (Já da o erro na linha 96 ou 98 e não chega na linha 103 para baixo) 5 - das linhas 106 para baixo, gravo as variaveis no banco de dados, e chamo uma janela para o usuario visualizar a redução Z que foi emitida no ECF e comparar com o banco de dados e atualizo na tela o status do ECF. O erro da sempre no passo numero 4, e nunca chega no 5. Este problema esta acontecendo apenas em 2 clientes que usa o ECF daruma Um dos clientes, usa o ECF na porta USB usando o driver da DARUMA que emula uma porta serial. Já no outro cliente, usa maquina da DELL com serial, e o ECF esta ligado direto na placa serial. Rotina para Gerar RZ.txt

Estou com um problema ao enviar o comando " ACBrECF.ReducaoZ()", para ECFs Daruma. Alguns segundos após o comando é retornado o seguinte erro "Impressora Daruma não está respondendo". Coloquei alguns logs nessa procedure, para saber exatamente em qual linha está acontecendo o erro, e reparei que acontece na seguinte linha "fsECF.ReducaoZ( DataHora ); " A redução Z é emitida assim que passa pelo código acima, porém as linhas que vem abaixo não são executadas. Estou anexando uma imagem com as posições onde foram colocados os códigos para salvar os logs, e o arquivo que foi gerado. Estou na versão de update do dia: 04/02/2013 Obrigado! Log.rar