Gr@c@

Executei a opção de remover os arquivos antigos, mas mesmo assim não consigo fazer a alteração. Abri pelo editor de texto, mas não existe essa propriedade AlignWithMargins em nenhum dfm ou pas ref ao danfe do fortes. De onde está vindo essa propriedade? Consigo compilar meu projeto sem nenhum erro, mas ao executar a visualização ou impressão do Danfe fortes em paisagem dá o erro. O erro ocorre exatamente nessa procedure: procedure TACBrNFeDANFeRL.ImprimirDANFEPDF(NFE : TNFe = nil); var sFile: String; var i : Integer; begin try case TipoDANFE of tiRetrato : frlDANFeRL := TfrlDANFeRLRetrato.Create(Self); tiPaisagem : frlDANFeRL := TfrlDANFeRLPaisagem.Create(Self); --------> nesta linha ocorre o erro tiSimplificado : frlDANFeRL := TfrlDANFeRLSimplificado.Create(Self); else frlDANFeRL := TfrlDANFeRLRetrato.Create(Self); end; if NFE = nil then begin for i:= 0 to TACBrNFe(ACBrNFe).NotasFiscais.Count-1 do begin // sFile := TACBrNFe(ACBrNFe).DANFE.PathPDF + // Copy(TACBrNFe(ACBrNFe).NotasFiscais.Items[i].NFe.infNFe.ID, // 4, 44) + '-nfe.pdf'; sFile := TACBrNFe(ACBrNFe).DANFE.PathPDF + StringReplace(TACBrNFe(ACBrNFe).NotasFiscais.Items[i].NFe.infNFe.ID,'NFe', '', [rfIgnoreCase]) + '-nfe.pdf'; frlDANFeRL.SavePDF(Self, TACBrNFe(ACBrNFe).NotasFiscais.Items[i].NFe, FLogo, FMarcaDagua, FLarguraCodProd, FEmail, FExibeResumoCanhoto, FFax, FNumCopias, FSistema, FSite, FUsuario, sFile, FPosCanhoto, FFormularioContinuo, FExpandirLogoMarca, FMostrarStatus, FFonte.FNome, FFonte.FNegrito, FMargemSuperior, FMargemInferior, FMargemEsquerda, FMargemDireita, FCasasDecimais._qCom, FCasasDecimais._vUnCom, FProdutosPorPagina, FImpressora, FFonte.FTamanhoFonte_RazaoSocial, FExibirEAN, FProtocoloNFe, FExibeResumoCanhoto_Texto, FNFeCancelada, FImprimirDetalhamentoEspecifico, FImprimeDescPorc,FImprimeNomeFantasia,fImprimirTotalLiquido, FDetVeiculos, FDetMedicamentos, FDetArmamentos, FDetCombustiveis, fQuebraLinhaEmDetalhamentoEspecifico, Integer ( fCasasDecimais.Formato ), fCasasDecimais._Mask_qCom, fCasasDecimais._Mask_vUnCom, fExibeCampoFatura, fMostraDadosISSQN, fAltLinhaComun, fEspacoEntreProdutos, fAlternaCoresProdutos, fCorDestaqueProdutos ); end; end else begin // sFile := Self.PathPDF + Copy(NFe.infNFe.ID, 4, 44) + '-nfe.pdf'; sFile := Self.PathPDF + StringReplace(NFe.infNFe.ID,'NFe', '', [rfIgnoreCase]) + '-nfe.pdf'; frlDANFeRL.SavePDF(Self, NFe, FLogo, FMarcaDagua, FLarguraCodProd, FEmail, FExibeResumoCanhoto, FFax, FNumCopias, FSistema, FSite, FUsuario, sFile, FPosCanhoto, FFormularioContinuo, FExpandirLogoMarca, FMostrarStatus, FFonte.FNome, FFonte.FNegrito, FMargemSuperior, FMargemInferior, FMargemEsquerda, FMargemDireita, FCasasDecimais._qCom, FCasasDecimais._vUnCom, FProdutosPorPagina, FImpressora, FFonte.FTamanhoFonte_RazaoSocial, FExibirEAN, FProtocoloNFe, FExibeResumoCanhoto_Texto, FNFeCancelada, FImprimirDetalhamentoEspecifico, FImprimeDescPorc,FImprimeNomeFantasia,fImprimirTotalLiquido, FDetVeiculos, FDetMedicamentos, FDetArmamentos, FDetCombustiveis, fQuebraLinhaEmDetalhamentoEspecifico, Integer ( fCasasDecimais.Formato ), fCasasDecimais._Mask_qCom, fCasasDecimais._Mask_vUnCom, fExibeCampoFatura, fMostraDadosISSQN, fAltLinhaComun, fEspacoEntreProdutos, fAlternaCoresProdutos, fCorDestaqueProdutos ); end; finally FreeAndNil(frlDANFeRL); end; end;

Precisei atualizar o meu ACBr do zero e voltei a ter esse erro. Porém, não consigo mais fazer o mesmo procedimento acima, abrindo o ACBrNFeDANFERL para mandar ignorar a propriedade AlignWithMargins. Como proceder?

Pessoal, preciso adquirir um aplicativo de acesso remoto para manutenção/atualização remota de aplicativos (e banco de dados) nos meus clientes. Alguém sabe qual é o melhor em termos de custo e que não necessite que o cliente tenha que adquirir uma licença também?

Estou com esse problema ao imprimir danfe Fortes em formato paisagem. Na NFe abaixo, não há desconto. o valor 15,00 deveria sair na coluna Valor Total. O Danfe Fortes em retrato está correto.

Sempre ao enviar um comando ACBrECF a tela (tanto a tela atual(MDIChild) como a tela do form principal (MDIForm)) ficam piscando até que o comando seja enviado. Isso não ocorre no mesmo aplicativo desenvolvido com Bemafi32.dll. Alguma sugestão?

Aumentar o timeout piorou o problema. Diminuir o intervalo entre comandos a princípio, parece que resolveu. Obg.

Tenho 4 clientes enviando remessa banco 756, porem uso o CNAB 400 porque o 240 realmente está incompativel. Não tenho tido problemas.

Mas isso ocorre depois de já estar em funcionamento, como se perdesse a conexão do nada. Por exemplo, estou com um cupom aberto e dá o ACK=0.

ECF = Bematech MP 3000 TH FI usb componentes = ACBrECF Cabo conversor serial tem ocorrido muito o erro. Após confirmar uma nova tentativa (isso varia de 3 a 5 tentativas) consigo retorno da impressora. Isso não ocorre com a bemafi32.dll usando a mesma porta.

Ainda continuo com o erro acima. Passando no validador do RS, dá o seguinte erro: PARSER XML: OK TIPO DE MENSAGEM: Distribuição da CT-e processada SCHEMA: OK ASSINATURA XML: Assinatura ***INVÁLIDA*** o DisgestValue da assinatura do XML é igual a que foi retornada junto ao protocolo de autorização. O emitente do CT-e não consegue fazer o download do xml diretamente do SEFAZ. Já foi presencialmente ao plantão fiscal e disseram a ele que não há o que fazer, uma vez que o CT-e consta como autorizado. Pediram a ele para cancelar o CT-e com erro e fazer outro. Porém o outro CT-e também consta como assinatura inválida. Alguém tem alguma idéia do que pode estar provocando isso? Certificado digital? Internet?

Estou seguindo a lógica do meu aplicativo no ato da homologação no Inatel. Quando homologuei, o homologador exigiu a Redução Z sem movimento. Lembro-me que a Bematech adequou a dll para atender a esse requisito. Como aqui em MG não há mais a exigencia de homologação, não sei como está a exigência quanto a isso. Só que pela dll eu obtinha o retorno correto. No ACBr estou tendo alguma dificuldade quanto a datas, CooInicial, valores dos meios de pagamento. Pelo que entendi, os valores dos meios de pagamento preciso capturar antes da Z porque após esses dados são inicializados. E não estou falando de domingo, feriado. Estou falando de uma dia em que o ECF foi ativado e não houve movimentação de venda, mas pode ter havido emissão de relatório gerencial, suprimento, sangria.

Quando usava a Bemafi32, ao salvar os dados da redução Z, essa informação era retornada (com certeza, a bematech forçava essa data jogando a data atual na função). Preciso da data para salvar os dados da z na tabela, para depois gerar sped. Mas vou tratar no meu aplicativo quando a data retornada for 0.

ACBrECF1.DadosReducaoZ está retornando a Data do Movimento = 0. Isso é porque não houve movimento? Mas a Redução Z não tem que ser emitida mesmo quando não há movimento? Impressora Bematech MP3000 TH FI

Qual é a variavel da Dados da Ultima Redução Z que retorna "Comprovante Não Emitido" que é impresso na Z logo após a relação de Meios de Pagamento?

Sim tenho a informação no ato do cupom. Estou adaptando o meu aplicativo PAF (que já está homologado), substituindo as funções da Bemafi32.dll pelo ACBrECF. Gravo uma tabela no BD exatamente com os retornos da função Bematech_FI_VerificaFormasPagamentoMFD para algumas consultas, relatórios e emissão posterior de uma 2a via de cupom. Tudo o que não estou encontrando no ACBrECF para adaptar, pergunto aqui no forum, porque pode ser que exista algum comando pronto. A adaptação está bem tranquila.

a função CarregaFormasPagamento também traz o valor acumulado como a LerTotaisFormasPagamento. Eu precisava obter o valor recebido (por forma) no ultimo cupom. // Exemplo em Delphi for iConta := 1 to 919 do sFgto := sFgto + ' '; iRetorno := Bematech_FI_VerificaFormasPagamentoMFD( sFgto ); Descricao da forma de pagamento............................................: 16 bytes Valor acumulado da forma (duas casas decimais).............................: 14 bytes Valor recebido no último cupom (duas casas decimais).......................: 14 bytes -----> este valor Valor indicando se a forma permite operação TEF (1 permite, 0 não permite ): 1 byte

Na Bemafi32.dll existe a função 'Bematech_FI_VerificaFormasPagamentoMFD' que me traz forma de pagamento + valor acumulado + valor recebido no ultimo cupom. No ACBr existe recurso para obter o valores pagos no ultimo cupom por forma de pagamento?

Qual a função do ACBrECF que retorna data/hora do ultimo relatorio gerencial emitido no ECF? Tanto CBrECF1.DataHora e ACBrECF1.DataMovimento retornam data = 0.

Tá aí uma coisa que não entendo por parte dos interventores: por que não desabilitam a z automática na minha impressora. E isso já foi solicitado por 2 vezes. Minha impressora passou por intervenção esse mês. Nesse caso, saber o modo z é realmente desnecessário, será sempre por comando. Obrigada pela resposta.

No ACBr, qual o comando utilizar para saber o modo da redução Z: se foi emitido automatico ou por comando? (sei que a maioria das impressoras informam reduçãoZ pendente, mas a minha MP3000 THFI, por exemplo, emite a Z automaticamente caso não tenha sido emitida no dia anterior) Na Bemafi32.dll é retornado ao obter os dados da ultima redução Z, mas no ACBr não encontrei no ACBrECF1.DadosReducaoZClass

Estou tentando compilar mas está ocorrendo o erro abaixo. Devo remover a referencia ou falta passar algum parametro no componente?

No meu aplicativo (sem ACBrECF) salvo o GT a cada operação em que o mesmo possa sofrer alteração. Percebi que o ACBrAAC faz esse processo. Estou tentando entender melhor como é feita a integração dos componentes ACBrECF e ACBrAAC. O componente ACBrAAC captura automaticamente o valor do GT a cada operação em que ocorrerá alteração desse valor? para verificar GT e Numero de Série (exigencia do fisco) devo usar o comando ACBrECF1.DoVerificaValorGT somente ou tambem o ACBrECF1.doAtualizarValorGT ? Como salvar o ultimo valor GT em uma tabela do banco de dados? Como capturo esse valor dos componentes? Seria do ACBrECF1.DadosReducaoZ ?

Obrigada pelo retorno.

Não encontrei erro. O CTe foi emitido na versão 2.00. Poderia ser incompatilibidade com o programa de monitoramento do tomador de serviço, que talvez possa estar usando a versão 3.00? O pior é que o emissor do CT-e não consegue fazer o download do xml diretamente do portal do CT-e. Dá falha ao realizar o download.

Como gerar o codigo MD5 usando os componentes ACBr? Atualmente estou usando a função da Bematech function md5FromFile( NomeArq: String; MD5: String ): integer; stdcall; external 'sign_bema.dll';