bochnia

Olá! Estou com uma dificuldade no processo de cancelamento quanto ao retorno do XML com o cancelamento. Mesmo definido "Configurações.Geral.AtualizarXMLCancelado:=True" o componente não está executando a alteração do XML, estou verificando o resultado do cancelamento em "WebServices.EnvEvento.EventoRetorno.retEvento.Items[0].RetInfEvento.XML" e o componente só está mostrando a operação de cancelamento não o XML da NFe com o cancelamento. Falta eu definir algum outro pareamento? Obrigado Ricardo

Sim tenho! Ao tentar acessar o FTP ele retorna tamanho do arquivo ZERO. Fiz o teste no programa exemplo eu utilizei o FTP da Locaweb, o arquivo gravado no disco cocal fica com tamanho ZERO e com extensão ".part" e o componente informa que o download foi concluído com sucesso. o arquivo de teste que eu tentei efetuar o download tem 2mega.

Bom Dia! Inicie os testes do componente ACBrDownload e me deparei com o mesmo problema descrição na mensagem do colega brsamn. Verifiquei e detectei que no momento que o componente tenta carregar o tamanho do a ser efetuado o download via FTP ele não encontra a informação e a rotina retorna -1 e não executa o download e trava o programa. Alguém tem uma solução para o problema? Obrigado. Ricardo

Olá Andre A modificação apresentada por você funciona, pois eu fiz a geração da Nota Fiscal com uma modificação muito próxima a que você apresentou e funcionou perfeitamente. Tem como colocar isso em produção? Ricardo

O endereço de entrega não pode ficar atrelado ao destinatário, pois no caso de importação o destinatário e a empresa estrangeira e o endereço de entrega é no Brasil. Ricardo

Olá Ítalo, No caso de nota fiscal de importação o destinatário e empresa estrangeira e o endereço de entrega e no Brasil, por isso estou tendo o problema. Emitente: Minha empresa Destinatário: Empresa estrangeira Endereço: endereço da empresa estrangeira Endereço de Entrega: Endereço no Brasil. Com isso a rotina não pode verificar essas propriedades com base no destinatário e sim co m base no endereço de entrega. Ricardo

Olá a todos! Estou tendo uma dificuldade para o correto preenchimento do endereço de entrega. Estou emitindo NFe de Importação para entrega em um deposito terceirizado, o problema que na rotina TNFeW.GerarEntrega "pcnNFeW.pas" os parâmetros que a rotina utiliza são do destinatário, não os parâmetros do endereço de entrega. Com isso eu defino o município, pais, CNPJ do endereço de entrega mais a rotina altera para : <entrega> <CNPJ/> <xLgr>Rua Nome</xLgr> <nro>1109</nro> <xCpl>Complemento</xCpl> <xBairro>Nome do Bairro</xBairro> <cMun>9999999</cMun> <xMun>EXTERIOR</xMun> <UF>EX</UF> </entrega> Segue o código da rotina: procedure TNFeW.GerarEntrega; var cMun: integer; xMun: string; xUF: string; begin if trim(nfe.Entrega.xLgr) <> '' then begin AjustarMunicipioUF(xUF, xMun, cMun, nfe.Dest.enderDest.cPais, nfe.Entrega.UF, nfe.Entrega.xMun, nfe.Entrega.cMun); Gerador.wGrupo('entrega', 'G01'); Gerador.wCampoCNPJCPF('G02', 'G02a', nfe.Entrega.CNPJCPF, nfe.Dest.enderDest.cPais); Gerador.wCampo(tcStr, 'G03', 'xLgr ', 02, 60, 1, nfe.Entrega.xLgr, DSC_XLGR); Gerador.wCampo(tcStr, 'G04', 'nro ', 01, 60, 1, ExecutarAjusteTagNro(FOpcoes.FAjustarTagNro, nfe.Entrega.nro), DSC_NRO); Gerador.wCampo(tcStr, 'G05', 'xCpl ', 01, 60, 0, nfe.Entrega.xCpl, DSC_XCPL); Gerador.wCampo(tcStr, 'G06', 'xBairro', 01, 60, 1, nfe.Entrega.xBairro, DSC_XBAIRRO); Gerador.wCampo(tcInt, 'G07', 'cMun ', 01, 07, 1, cMun, DSC_CMUN); if not ValidarMunicipio(cMun) then Gerador.wAlerta('F07', 'cMun', DSC_CMUN, ERR_MSG_INVALIDO); Gerador.wCampo(tcStr, 'G08', 'xMun ', 02, 60, 1, xMun, DSC_XMUN); Gerador.wCampo(tcStr, 'G09', 'UF ', 02, 02, 1, xUF, DSC_UF); if not ValidarUF(xUF) then Gerador.wAlerta('G09', 'UF', DSC_UF, ERR_MSG_INVALIDO); Gerador.wGrupo('/entrega'); end; end; Alguém poderia explicar porque a rotina verificar o endereço do destinatário e não o endereço de entrega? Obrigado. Ricardo

Conforme solicitado. Segue arquivo com as modificações. Ricardo ACBrNFeNotasFiscais.pas

Fiz as modificações conforme você descreveu e fiz dezenas de testes, em todas as notas foi confirmada a validade, fiz modificação no arquivo modifiquei, troquei algum caractere no arquivo XML e a rotina detectou a violação do arquivo XML. Funcionou perfeitamente. Se possível implementar no SVN

Vou atualizar os fontes aqui e testar. Te informo se funcionou ou não.

Olá André, Você conseguiu efetuar os testes com o XML? Ricardo

Olá André, Será que o problema não está sendo justivamente na conversão de caracter do Delphi. Ricardo

Não, eu tenho esse texto a muito tempo!

O Dígito final antes dos dígitos verificadores determina o grupo de estados “000.000.00X-00” 0 - RS 1 – DF; GO; MT; TO; MS 2 – AM; AC; RR; RO; AP; PA 3 – CE; MA; PI 4 – PE; AL; PB; RN 5 – BA; SE 6 - MG 7 – RJ; ES 8 - SP 9 – SC; PR Ricardo dos Anjos

Olá! Também estou recebendo XML acentuados e tendo o mesmo problema. Alguma solução? Obrigado.

Olá! Como ficou esse problema da acentuação, pois estou tendo esse tipo de problema quando recebo XML de fornecedores que utilizam acentuação e o componente não faz a leitura correta do XML. Como proceder? Obrigado.

<?xml version="1.0" encoding="UTF-8"?>3531401596Ret merc remetida deposito fechado ou armazem1551323092011-09-062011-09-0600:00:00135225051161101.002426290000599BIOMEDICAL DISTRIBUTION MERCOSUR LTDABIOMEDICAL DISTRIBUTION MERCOSUR LTDAAV PORTUGAL1100PARTE C-1ITAQUI3522505ITAPEVISP066960601058BRASIL1147748033373112957119ISENTO5211701300142916000186CNPH COMERCIAL NACIONAL PROD.HOSP. LTDARUA GAMA CERQUEIRA,331CAMBUCI3550308Sao PauloSP015390101058Brasil1133899339114089310112lidiane.silva@bomibrasil.com.br;[email protected] STAT CARTUCHO CHEM8+ 25 CART999999995906un17.0000343.18005834.06un17.0000343.1800104000000000000000999530.000.000.000.00080801.020.01000000000000000100968 - STAT CARTUCHO CG8+382200905906un5.0000244.18001220.90un5.0000244.1800104000000000000000999530.000.000.000.00080801.020.01000000000000000100968 - STAT CARTUCHO CG8+382200905906un40.0000244.18009767.20un40.0000244.1800104000000000000000999530.000.000.000.00080801.020.03000000000000000100819-STAT CARTUC CG4 7G02-02382200905906un41.0000224.15009190.15un41.0000224.1500104000000000000000999530.000.000.000.00080801.020.03000000000000000100819-STAT CARTUC CG4 7G02-02382200905906un14.0000224.15003138.10un14.0000224.1500104000000000000000999530.000.000.000.0008080.000.000.000.0029150.410.000.000.000.000.000.000.000.0029150.4100.800100000.170IPI - Nao Inc. Conf Art. 42, Inc III do RIPI ICMS - Isento Conf. Art. 7, I do RICMS/SP IPI - Nao Inc. Conf Art. 42, Inc III do RIPI Ref. NF venda C032309; Devolucao de notas (s): P = 01.020.030, NF 16644;4FHuMLMuUo4gIKuSfv2Xn9vZ1OI=dLOCfh136cByOGz4igEK3DxdztkKHBocU+XDWGKz0e0g0kGfM1q7Sp6f6wbQIRsO1poKJeVww/L5YzfBPXSS2R9r63DcEoTeAfRIKyEeD7c2mtYIAhFm5sgrrRQyXrJZAOvTjIm08mdOHBRSwT9nC3pEeul5RtnUDo1yatMW2H4=MIIGLDCCBRSgAwIBAgIIfD5VxOdt7LgwDQYJKoZIhvcNAQEFBQAwTDELMAkGA1UEBhMCQlIxEzARBgNVBAoTCklDUC1CcmFzaWwxKDAmBgNVBAMTH1NFUkFTQSBDZXJ0aWZpY2Fkb3JhIERpZ2l0YWwgdjEwHhcNMTAxMTE5MTE1MDM5WhcNMTExMTE5MTE1MDM5WjCB8DELMAkGA1UEBhMCQlIxEzARBgNVBAoTCklDUC1CcmFzaWwxFDASBgNVBAsTCyhFTSBCUkFOQ08pMRgwFgYDVQQLEw8wMDAwMDEwMDE0NTgwMTMxFDASBgNVBAsTCyhFTSBCUkFOQ08pMRQwEgYDVQQLEwsoRU0gQlJBTkNPKTEUMBIGA1UECxMLKEVNIEJSQU5DTykxFDASBgNVBAsTCyhFTSBCUkFOQ08pMRQwEgYDVQQLEwsoRU0gQlJBTkNPKTEuMCwGA1UEAxMlQklPTUVESUNBTCBESVNUUklCVVRJT04gTUVSQ09TVVIgTFREQTCBnzANBgkqhkiG9w0BAQEFAAOBjQAwgYkCgYEA5m7/SVJya8GnvIxwIOw7f6z5c9uor6ndmamOIEQeOoR8HtjF/VDvZrCMQha8EWXyXGZZFIuXZr8/t9ZWy0eEvrXcj13kmWNkl34ONLVl58coAoaY/bheODr4YoXAc/GcxhVOrPbTUKCGgw4Vam1jHxbXE1gDngcklxApmdYHQXkCAwEAAaOCAu8wggLrMA4GA1UdDwEB/wQEAwIF4DAdBgNVHSUEFjAUBggrBgEFBQcDAgYIKwYBBQUHAwQwHwYDVR0jBBgwFoAUt2CoW/mypq4A7XTr1UrJlmhm9VwwgbIGA1UdEQSBqjCBp4EcRkFCSU8uTEVBT0BCT01JQlJBU0lMLkNPTS5CUqA4BgVgTAEDBKAvEy0zMDAxMTk2ODAxMDcxMjg1OTQ3MDAwMDAwMDAwMDAwMDAwMDAwMDAwMDAwMDCgGQYFYEwBAwKgEBMOR0lBTkxVQ0EgTUFHTkmgGQYFYEwBAwOgEBMOMDI0MjYyOTAwMDAxNjWgFwYFYEwBAwegDhMMMDAwMDAwMDAwMDAwMFcGA1UdIARQME4wTAYGYEwBAgEGMEIwQAYIKwYBBQUHAgEWNGh0dHA6Ly93d3cuY2VydGlmaWNhZG9kaWdpdGFsLmNvbS5ici9yZXBvc2l0b3Jpby9kcGMwgfAGA1UdHwSB6DCB5TBJoEegRYZDaHR0cDovL3d3dy5jZXJ0aWZpY2Fkb2RpZ2l0YWwuY29tLmJyL3JlcG9zaXRvcmlvL2xjci9zZXJhc2FjZHYxLmNybDBDoEGgP4Y9aHR0cDovL2xjci5jZXJ0aWZpY2Fkb3MuY29tLmJyL3JlcG9zaXRvcmlvL2xjci9zZXJhc2FjZHYxLmNybDBToFGgT4ZNaHR0cDovL3JlcG9zaXRvcmlvLmljcGJyYXNpbC5nb3YuYnIvbGNyL1NlcmFzYS9yZXBvc2l0b3Jpby9sY3Ivc2VyYXNhY2R2MS5jcmwwgZcGCCsGAQUFBwEBBIGKMIGHMEcGCCsGAQUFBzAChjtodHRwOi8vd3d3LmNlcnRpZmljYWRvZGlnaXRhbC5jb20uYnIvY2FkZWlhcy9zZXJhc2FjZHYxLnA3YjA8BggrBgEFBQcwAYYwaHR0cDovL29jc3AuY2VydGlmaWNhZG9kaWdpdGFsLmNvbS5ici9zZXJhc2FjZHYxMA0GCSqGSIb3DQEBBQUAA4IBAQCjyqPgVZuSRotKpdm5EQ7hvYQ1b4twYanpLKCgRSOmWqhqOdKu7LXgLFgLvlFx87vZPz3KkWfDG9xdlxSx/mWXH84W6IQMKnCBm+I+hxHyHFnmnm1I2l3GPU6/uc+GiWBRyZJc8MzDpHFQKj9gFHDpoLUtoo2oLHF8RKakgy+0+nyOtU2mFz68IEaN1DErJjP9LLMl+flOkdXA3mu1+edhJV6YllaJE0RXzJIy79BP295LbP9LgV3LZtkgfyJRiX4BHsEA/x7P5oRStQ0NQcMctwOmZSKOFu4CBNbGx/6I6MggHsUPOdhP36m57WeWzcTFRm5w1FO5byHQI+YPUhb61SP_NFE_PL_006j351109024262900005995500100003230913140159662011-09-06T08:40:461351104658736674FHuMLMuUo4gIKuSfv2Xn9vZ1OI=100Autorizado o uso da NF-e

Olá André, é exatamente isso que eu estava falando. Fiz dezenas de testes em notas fiscais que eu emiti 100% correto, efetuei teste modificando qualquer valor no XML é a rotina retorna informando que o XML não é mais valido. Mas ocorrem problemas em XML de terceiros, em cerca de 90% dos testes a rotina falha, teve casos que funcionou corretamente, efetuei os testes também utilizando a pagina da secretar ia-RS e retorna OK, mas a rotina retorna como XML inválido. Abraços Ricardo

Não se pode utilizar essa modificação, pois no manual não permite veja: 7.4 Verso do DANFE Até 50% do verso de qualquer folha do DANFE poderá ser utilizado para continuação dos dados do quadro “Dados dos Produtos/Serviços”, do campo “Informações Complementares” ou para uma combinação de ambos. O restante do verso deverá ser deixado sem nenhum tipo de impressão. Sempre que o verso do DANFE for utilizado, a informação “CONTINUA NO VERSO” deverá constar no anverso, ao final dos quadros “Dados dos Produtos/Serviços” e “Informações Complementares”, conforme a utilização.

Olá Kiko Fernandes, obrigado por você se esforçar em responder esse fórum. O problema que é facilmente editado um XML e alterado qualquer campo da NFe, e essa modificação não reflete no DigVal. Ex.: Você me envia um XML eu altero a quantidade de um item na NFe e lhe devolvo o XML e você vera que todos os dados na NFe estão corretos, DigVal, Assinatura, Certificado, mais esse XML não é mais valido, pois foi modificado, e fazendo somente esse tipo de comparação do DigVal do XML e o que está na secretaria não vai identificar a mudança no XML. Então quero saber como validar o XML para detectar se foi modificado. Obrigado.

Então eu te pergunto! Seu pegar o XML que foi enviado para a secretaria com uma quantidade de 10 peças no item e no XML que eu estou recebendo está com uma quantidade de 1000 peças. Olhando só o DigVal não vou saber que esse XML está alterado não é?

Olá Adislonpazzini, Como eu vou assinar o XML que estou recebendo "recebido de terceiros"? Eu quero saber como é feito o calculo do DigVal para comparar. Ex.: Se eu recebo um XML de terceiro está assinado tudo certinho, mais como eu vou saber se terceiro não modificou o XML e alterou algum valor ou quantidade de produtos etc.. Se eu calcular o DigestValue do XML recebido vou identificar que o XML foi modificado ou não. Minha pergunta é como se faz esse cálculo do DigestValue e se o cálculo é somente entre os tags e ou o XML inteiro.

Olá Igor, Você poderia explicar isso melhor, como se calcula o DigestValue de um XML recebido e devidamente autorizado. Ex.: Recebi um XML do fornecedor e carrego o Tag DigVal, mais como calcular o DigestValue para poder fazer essa comparação? Obrigado.

Olá! Mais é possível fazer a consulta pela Chave de acesso para verificar a situação da NFe. Existe um servidor para que o componente possa fazer essa verificação? Abraços.

Inclusão da funcionalidade de impressão frente e verso. Segue linhas adicionadas nos respectivos arquivos. Com essa funcionalidade é possível configurar o DANFE para imprimir frente e verso em impressora com DUPLEX e manter a impressora configurada com impressão simples. Isso é interessante se o usuário utiliza a impressora para outros tipos de impressão e não utiliza essa funcionalidade, então essa funcionalidade estaria disponível no DANFE não afetando outras impressões. Abaixo segue as linhas que eu adicionei ao componente. --------------------------------- pcnConversao.pas Linha:84 TpcnDuplex = (DuplexSimplex,DuplexVertical,DuplexHorizontal); // Inclusão funcionalidade de impressão de DUPLEX --------------------- ACBrNFeDANFEClass.pas Linha:126 property Duplex : TpcnDuplex read FDuplex write FDuplex; Linha:200 FDuplex:=DuplexSimplex; --------------------- ACBrNFeDANFERave.pas Linha:840 dmDanfe.RvSystem1.SystemPrinter.Duplex:=TDuplex(Ord(Duplex)); ---------------------- ACBrNFeDANFERaveCB.pas Linha:128 Duplex, Linha:199 Duplex; ----------------------- ACBrDANFeCBRave.pas Linha:166 aDuplex:TpcnDuplex=DuplexSimplex; Linha:210 aDuplex:TpcnDuplex=DuplexSimplex; Linha:323 DANFeRave.SystemPrinter.Duplex:=TDuplex(Ord(aDuplex)); ------------------ Fim.