danielpohren

Resolvido, funcionando 100% em produção os métodos acima citados tbm. Mais um provedor morto

Oi, tiveste que mexer nos inis? Pois pra mim ACBrNFSe.ConsultarLoteRps(IntToStr( mNumLote[i] ),mProtocolo[i]) then retornou erro: URL não definida para: TNFSeConsultarLoteRPS. Obrigado

Boa tarde! A boa notícia, o envio da nota voltou a funcionar, enviei e consultei depois no site da prefeitura e a nota estava lá. A má notícia é que voltou o problema original, aquele lá do começo do trunk2 de não conseguir pegar o retorno... Após enviar a nota --> ACBRNfSe.Enviar( StrToInt(ACBrNFSe.NotasFiscais.NumeroLote), False); Ao tentar pegar código de verificação, tanto com --> ACBrNFSe.WebServices.ConsNFSeRps.RetornoNFSe.ListaNFSe.CompNFSe.Items[0].NFSe.CodigoVerificacao quanto com --> ACBrNFSe.WebServices.ConsLote.RetornoNFSe.ListaNFSe.CompNFSe.Items[0].NFSe.CodigoVerificacao tenho violação de acesso, pois nos dois casos o RetornoNFSe está nil....

Obrigado! Na verdade vi que eu nunca tinha alimentado as propriedades de configuração abaixo, pois aparentemente até alguns dias atrás não era obrigatório? que passei a alimentar como segue, e o erro anterior passou...: AcbrNfse.Configuracoes.Geral.Emitente.CNPJ := dmnfe.tNotasEmitente_CNPJ.Value; AcbrNfse.Configuracoes.Geral.Emitente.InscMun := dmnfe.tNotasEMITENTE_INSCRICAO_MUNICIPAL.Value; AcbrNfse.Configuracoes.Geral.Emitente.RazSocial := dmnfe.tNotasEMITENTE_Nome.value; Mas daí o que ocorrem os erros: Se alimento acbrnfse.NotasFiscais[0].nfse.Prestador := dmnfe.tNotasEmitente_CNPJ.Value O elemento '{http://www.issnetonline.com.br/webserviceabrasf/vsd/tipos_complexos.xsd}Cnpj' é inesperado, de acordo com o modelo de conteúdo do elemento pai '{http://www.issnetonline.com.br/webserviceabrasf/vsd/tipos_complexos.xsd}Prestador'. Se não alimento Erro ao Assinar. O XML informado possui CNPJ diferente do Certificado Digital

Bom dia! A partir da última atualização não consigo mais enviar notas para Novo Hamburgo... Está me dando o erro: '' viola a restrição length de '11'. Falha da análise do elemento '{http://www.issnetonline.com.br/webserviceabrasf/vsd/tipos_complexos.xsd}Cpf' com valor ''. Sendo que no caso tanto prestador quanto tomador são pessoas JURIDICAS, e estou alimentando normalmente o CNPJ deles: Prestador.Cnpj := dmnfe.tNotasEmitente_CNPJ.Value; PrestadorServico.IdentificacaoPrestador.Cnpj := dmnfe.tNotasEmitente_CNPJ.Value; Tomador.IdentificacaoTomador.CpfCnpj := dmnfe.tNotasDESTINATARIO_CNPJ.Value; Att,

Bom dia. Infelizmente ainda não consigo fazer minha rotina de NFS-e funcionar a contento com os fontes do trunk2..... AS notas estão sendo enviadas, mas ainda não vem nada no retorno... Tanto que a seguinte linha dá violação de acesso, uma vez que CompNFSE vem como nil: dmNFe.tNotasNRO_PROTOCOLO.Value := ACBrNFSe.WebServices.ConsNFSeRps.RetornoNFSe.ListaNFSe.CompNFSe.Items[0].NFSe.CodigoVerificacao;

Bom dia! Alguma evolução na questão do retorno dos dados no envio das nfs? Obrigado!

Italo, não sei de mais nada.... Agora enviei uma nota e gravou no banco de dados da prefeitura... Terça enviei perto de 100 notas e não registrou nenhuma, daí que me bateu o pavor hoje de manhã..... Então, voltamos ao tópico original, o retorno PODE SER que a prefeitura aqui estivesse fora, ou algo do genero terça de manhã, e como eu não estou conseguindo tratar o retorno por causa da violação de acesso aquela não percebi isto.... Att,

... Complementando com informações que podem ser uteis... Segue um trecho maior do meu fonte vbEnviou := False; try vbEnviou := ACBRNfSe.Enviar( StrToInt(ACBrNFSe.NotasFiscais.NumeroLote), False); except on e:exception do begin vsErroValidacao := e.message; mStatus.Lines.Add(vsErroValidacao); vbEnviou := False; end; end; end; if vbEnviou then begin mXML.Lines.Add(ACBrNFSe.NotasFiscais.items[0].XMLNFSe); mRetorno.Lines.Text := UTF8Encode(ACBRNFSe.WebServices.EnviarLoteRPS.RetWS); mStatus.Lines.Add('Protocolo: ' + ACBRNFSe.WebServices.EnviarLoteRPS.Protocolo); dmNFe.tNotas.Edit; dmNFe.tNotasSTATUS_NOTA.Value := 'EMITIDA'; DMNFE.tnotaschave_nfe.value := 'NFE PROT: ' + ACBRNFSe.WebServices.EnviarLoteRPS.Protocolo; <--- Aqui me dá o numero correto..... ou seja aparentemente o RPS vai, mas não é transformado em nota? Tem como eu testar se deu certo esta transformação? Pois eu sempre mandei desta maneira apenas... Não sei se ajuda, mas... Enviei a nota para a prefeitura na versão do ACBR do trunk e a nota foi. Comparei os 2 XMLs, e notei que o gerado pelo trunk2 tem uma linha a mais na assinatura, na parte do "transforms" trecho do trunk -<SignedInfo> <CanonicalizationMethod Algorithm="http://www.w3.org/TR/2001/REC-xml-c14n-20010315"/> <SignatureMethod Algorithm="http://www.w3.org/2000/09/xmldsig#rsa-sha1"/> -<Reference URI=""> -<Transforms> <Transform Algorithm="http://www.w3.org/2000/09/xmldsig#enveloped-signature"/> </Transforms> <DigestMethod Algorithm="http://www.w3.org/2000/09/xmldsig#sha1"/> <DigestValue>fnihrNfdu13lu70nlPrIPsH1D8k=</DigestValue> </Reference> </SignedInfo> no trunk2 -<SignedInfo> <CanonicalizationMethod Algorithm="http://www.w3.org/TR/2001/REC-xml-c14n-20010315"/> <SignatureMethod Algorithm="http://www.w3.org/2000/09/xmldsig#rsa-sha1"/> -<Reference URI=""> -<Transforms> <Transform Algorithm="http://www.w3.org/2000/09/xmldsig#enveloped-signature"/> <Transform Algorithm="http://www.w3.org/TR/2001/REC-xml-c14n-20010315"/> </Transforms> <DigestMethod Algorithm="http://www.w3.org/2000/09/xmldsig#sha1"/> <DigestValue>MBSHR7o1lfGTwD0P3LuKS1TCfps=</DigestValue> </Reference> </SignedInfo> ... ...

Agora a coisa ficou feia mesmo.... O problema na verdade não é no retorno... O furo é bem mais embaixo..... Depois da ultima mexida, onde aparentemente a nota foi processada mas estava com erro no retorno Enviei as notas: vbEnviou := ACBRNfSe.Enviar( StrToInt(ACBrNFSe.NotasFiscais.NumeroLote), False); vbEnviou retornou "true"... mas não tinha nota nenhuma no retorno lembra? Só que hoje entrei no site da prefeitura e vi que nenhuma destas notas estão registradas lá....... Ou seja, me retornou true mas não enviou nada

Bom dia. Pergunta "2 em 1"... Alguma novidade quanto à violação de acesso ao pegar o código de verificação na nota de Novo Hamburgo? Pergunta 2... O provedor Thema, utilizado em São Leopoldo, está já portado para o Trunk2? Estamos tendo erro nas notas de serviço de São Leopoldo... Se já foi portado vou atrás dos XMLS dos erros. Obrigado

Bom dia! O comando ACBrNFSe.WebServices.ConsNFSeRps.RetornoNFSe.ListaNFSe.CompNFSe.Items[0].NFSe.CodigoVerificacao deu violação de acesso, debugando vi que ACBrNFSe.WebServices.ConsNFSeRps.RetornoNFSe.ListaNFSe.CompNFSe.Items[0].NFSe está com o valor nil... Parece que não retornou nada da prefeitura? Complementando, não sei se a informação é relevante... Dando um "ctrl+F7" debugando dentro do delphi em ACBrNFSe.WebServices.ConsNFSeRps Me mostrou: ('soap12', 'xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:soap12="http://www.w3.org/2003/05/soap-envelope"', 'nfeCabecMsg', 'nfeDadosMsg', '', '', '', '', '', '', '', '', $F6F684, $F6F708, 'con-nfse-rps', 'comp-nfse', '', '', '', $F6F684, $F9576C, proNenhum, stNFSeConsulta, LayNfseConsultaNfseRps, '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', '', ve100, '', '', '', 0, nil, '', '', '', '', '', '', '', '') e em ACBrNFSe.WebServices.ConsNFSeRps.RetornoNFSe mostrou nil Att,

Foi! Obrigado! Agora tive uma violação de acesso no retorno mas eu me viro por aqui deve ser coisa minha. Muito obrigado, você é o cara! Apenas para finalizar... estou enviando a nota, e dando tudo certo, com: ACBRNfSe.Enviar( StrToInt(ACBrNFSe.NotasFiscais.NumeroLote), False); o codigo de verificaçao pegava na linha abaixo, que agora está me dando violação de acesso... ACBrNFSe.WebServices.ConsLote.RetornoNFSe.ListaNFSe.CompNFSe.Items[0].NFSe.CodigoVerificacao mudou a maneira de eu pegar este codigo? Obrigado!

Foi! Obrigado! Agora tive uma violação de acesso no retorno mas eu me viro por aqui deve ser coisa minha. Muito obrigado, você é o cara!

Bom, acabei de excluir todos arquivos da pasta GER e mandar novamente a nota, para ter certeza que só tem arquivos não manipulados por ninguem aqui. O erro: O servidor não pôde processar a solicitação. ---> Referência de objeto não definida para uma instância de um objeto. Estes 4 arquivos foram gerados... Na pasta "ger" não gerou nada agora.... É isto? Obg! 2451-env-lot.xml 2451-env-lot-soap.xml 2451-rec.xml 2451-rec-soap.xml

Não....

Oi, estes são todos arquivos gerados no momento do envio da nota ee397d35-1062-4329-9885-62a2589c52b2-con-sit.xml ee397d35-1062-4329-9885-62a2589c52b2-con-sit-soap.xml 2450-rec.xml 2450-rec-soap.xml 2450-env-lot.xml 2450-env-lot-soap.xml ee397d35-1062-4329-9885-62a2589c52b2-lista-nfse.xml ee397d35-1062-4329-9885-62a2589c52b2-lista-nfse-soap.xml ee397d35-1062-4329-9885-62a2589c52b2-con-lot.xml ee397d35-1062-4329-9885-62a2589c52b2-con-lot-soap.xml ee397d35-1062-4329-9885-62a2589c52b2-sit.xml ee397d35-1062-4329-9885-62a2589c52b2-sit-soap.xml

Bom dia. Agora aparentemente enviou, mas me retornou O servidor não pôde processar a solicitação. ---> Referência de objeto não definida para uma instância de um objeto. Obg

Boa tarde! Estou apelando porque realmente preciso de uma orientação quanto ao que fazer.... Precisei atualizar para Trunk2 por causa das NTS 2015.002 e 2015.003 Mas não posso mandar a atualização para meus clientes, pois eles utilizam serviço (issnet prioritariamente - Novo Hamburgo/RS) e no trunk2 tenho sempre este erro no retorno... É o mesmo aplicativo, não tenho como ter o trunk baixado em uma máquina e o trunk2 em outra, como chegou a ser sugerido... Alterei já no meu fonte as chamadas e as propridades da nota de serviço para as do trunk2 para poder compilar, mas estou nesta cilada.... Vi lá no forum que alguem postou os fontes com a solução (não cheguei a testar aqui para não ficar com fontes diferentes do projeto original).... Enfim, minha pergunta é se os fontes postador no forum da NFSE estão em avaliação para serem integrados ao trunk2, ou caso não, como devo proceder? Obrigado,

Bom dia! Alguém encontrou a luz sobre este problema? A situação está complicando, pois assim como eu, acredito que muitos aqui tem NF-E e NFS-E no mesmo programa então estamos travados de mandar as últimas atualizações da NF-E pois vai parar a NFS-E nos clientes.....

Boa tarde! Este assunto evoluiu? Aqui em Novo Hamburgo é ISSNet também... Abraço

Muito, muito, muito obrigado! Funcionou 100%

Boa tarde! Estou emitindo as notas fiscais agora utilizando o modo SINCRONO de envio, mas estou me deparando com uma situação que não estou conseguindo tratar... Quando ocorre uma falha ao pegar os dados do retorno da nota fiscal, por qualquer motivo, como queda da internet, banco de dados, enfim... Nesta situação a nota fiscal é enviada mas não tenho no retorno o protocolo nem o XML... No modo assincrono era fácil, eu tinha o recibo gerado para "re-consultar" a nota fiscal... Agora não sei como proceder, pois o reenvio da nota gera, obviamente, um erro de duplicidade... Como recupero o protocolo e principalmente o XML desta nota, uma vez que ela não foi ainda manifestada, pois estou com este erro na geração dela... Esta situação é bastante rara, mas quando ocorre incomoda bastante... Obrigado!

Oi Cristiano, comigo está acontecendo EXATAMENTE a mesma coisa... Vai trazendo NORMALMENTE alguns NSUS, processo as notas deles, e tal, e de repente um 656.... E, assim como você, passo sempre u numero do ultimo NSU.....

Boa tarde. Estou conseguindo agora tratar o retorno do ACBrNFe.DownloadNFe Está gerando pra mim o XML compactado, mas copiei a função do Italo e consigo tratar os pedaços dele individualmente. Compartilho aqui a solução, para ajudar um pouco também, aqui onde sempre sou ajudado. Como é um fonte pequeno, colo aqui. Colocar no USES: ZLibExGZ, synacode Function DescompactaStr(vsInput: String): String; var vsAux: String; StrStream: TStringStream; begin vsAux := DecodeBase64(vsInput); StrStream := TStringStream.Create(''); StrStream.WriteString(vsAux); Result := GZDecompressStr(StrStream.DataString); FreeAndNil(StrStream); end; Na rotina onde baixo o xml: ... ACBRNfe.Download; vsXMLRetorno := ACBrNFe.WebServices.DownloadNFe.retDownloadNFe.retNFe.Items[0].procNFe; vsXmlCliente := DescompactaStr(GetPedacoXml(vsXMLRetorno, 'NFeZip')); vsXmlProtocolo := DescompactaStr(GetPedacoXml(vsXMLRetorno, 'protNFeZip')); ....