toni.arsilva

Era isso mesmo, muito obrigado! Problema resolvido...

Pessoal, Boa noite! Estou recebendo esse retorno apos enviar uma NF de um determinado cliente: "Tomador e um Substituto Tributário no Cadastro do Município. Por este motivo, o prestador não poderá emitir RPS como A recolher. Favor cancelar e emitir um novo RPS com imposto Retido na Fonte." Após pesquisar vi que está relacionado com a TAG <TipoRecolhimento>A</TipoRecolhimento> No manual de integração de campinas diz: Tipo de Recolhimento “A” - A recolher “R” – Retido na fonte Gostaria de enviar R, porém não encontro qual propriedade tenho que alterar. Alguém pode me ajudar por favor.

Bom dia, Sim, abri e vi a informação, inclusive comentei no meu post que a informação que me retorna é justamente essa de "lote não processado ainda", Minha duvida é que mesmo aguardando bastante tempo entre um envio e outro só obtenho essa informação. Outra questão é também , porque não consigo obter o código da situação, "ACBrNFSe.NotasFiscais.Items[0].NFSe.Situacao" para que consiga fazer um tratamento no sistema, minha intenção, é implementar esse tratamento abaixo, mas como não estou conseguindo pegar o codigo da situação de retorno, não está dando certo. case AnsiIndexStr(ACBrNFSe.NotasFiscais.Items[0].NFSe.Situacao,['1','2','3','4']) of 0:begin __SuperClass.GetInstance.GenericsF.DisplayMessage('NFs-E Campinas.', '', 'Arquivo RPS não Recebido.', 'Informação', MB_ICONEXCLAMATION); end; 1:begin __SuperClass.GetInstance.GenericsF.DisplayMessage('NFs-E Campinas.', '', 'Arquivo RPS não processado.', 'Informação', MB_ICONEXCLAMATION); end; 2:begin __SuperClass.GetInstance.GenericsF.DisplayMessage('NFs-E Campinas.', '', 'Arquivo RPS Processado com erro.', 'Informação', MB_ICONEXCLAMATION); end; 3:begin DadoEmissor.RazaoSocialEmissor := ACBrNFSe.NotasFiscais.Items[0].NFSe.PrestadorServico.RazaoSocial; DadoEmissor.IMEmissor := ACBrNFSe.NotasFiscais.Items[0].NFSe.Prestador.InscricaoMunicipal; DadoTomador.InscricaoMunicipal := ACBrNFSe.NotasFiscais[0].NFSe.Tomador.IdentificacaoTomador.InscricaoMunicipal; DadoTomador.Prefixo := cdsPerguntasPREFIXO.AsString; DadoTomador.Numero := ACBrNFSe.NotasFiscais[0].NFSe.Numero; DadoTomador.CNPJTomador := ACBrNFSe.NotasFiscais.Items[0].NFSe.Tomador.IdentificacaoTomador.CpfCnpj; DadoTomador.RazaoSocialTomador := ACBrNFSe.NotasFiscais.Items[0].NFSe.Tomador.RazaoSocial; DadoTomador.CodigoVerificao := ACBrNFSe.NotasFiscais.Items[0].NFSe.CodigoVerificacao; DadoTomador.Email := cdsNotas.FieldByName('EMAILNFE').AsString; DadoTomador.Endereco := ACBrNFSe.NotasFiscais[0].NFSe.Tomador.Endereco.Endereco; DadoTomador.Protocolo := ACBrNFSe.NotasFiscais.Items[0].NFSe.Protocolo; ImprimeGeraPDFEnviaEmail(vPathOrigem, ACBrNFSe.DANFSe.PathPDF, DadoEmissor, DadoTomador); __SuperClass.GetInstance.GenericsF.DisplayMessage('NFs-E Campinas.', '', 'Arquivo RPS processado com sucesso, e-mail enviado com sucesso!!!.', 'Informação', MB_ICONEXCLAMATION); end;

Bom dia, Por favor será que alguém poderia me dar uma luz? Estamos desenvolvendo a nota de serviço NFSe para Campinas/SP, que utiliza o Provedor ISSDSF Tenho dois problemas, O primeiro é que ao enviar um lote rps pelo metodo de envio, só recebo a mensagem "Lote ainda não processado", isso deixando ConsultaLoteAposEnvio como true, mesmo aguardando mais de 24horas a nota ainda não costa lá no ambiente da prefeitura. (vi no manual do webservice de campinas que essa mensagem, não é propriamente um erro, mas sim um aviso, mesmo assim não estou consiguindo enviar, só aparece essa mensagem). Quando deixo a propriedade ConsultaLoteAposEnvio como false, não tenho a mensagem citada acima, porem não obtenho retorno da mesma forma. Outra dificuldade que estou tendo é em receber o código da Situação do Retorno. Estou fazendo assim: NF := ACBrNFSe.NotasFiscais.Items[0].NFSe.Numero; //esse funciona codVerificacao := ACBrNFSe.NotasFiscais.Items[0].NFSe.CodigoVerificacao; //esse não Protocolo := ACBrNFSe.NotasFiscais.Items[0].NFSe.Protocolo; //esse funciona ArqXML := ACBrNFSe.NotasFiscais.Items[0].NomeArqRps; //esse funciona SituacaoRetorno := ACBrNFSe.NotasFiscais.Items[0].NFSe.Situacao; //esse não por favor alguém poderia me ajudar, em anexo os arquivos gerados no envio de um lote 01-env-lot.xml 01-env-lot-soap.xml 243260854-con-lot.xml 243260854-con-lot-soap.xml 243260854-lista-nfse.xml 243260854-lista-nfse-soap.xml 243260854-rec.xml 243260854-rec-soap.xml