Italo Giurizzato Junior

Boa tarde, Pela mensagem de erro, acredito que o problema seja configuração do componente. Quais são os valores de: SSLLib, CryptLib, HttpLib, XmlSignLib e SSLType ?

Bom dia, O CSC e idCSC só é necessário para emissão de NFC-e. Para emissão de NF-e não precisa do CSC - Código de Segurança do Contribuinte.

@xim.logan, Com isso podemos concluir que o componente esta gerando o XML do DPS da forma correta. Podemos descartar do problema o componente. Fica agora saber se o problema é a API de produção ou alguma parametrização errada da prefeitura na API de produção. É por isso que temos que fazer com que os contribuintes que não estão conseguindo emitir suas notas protocolarem uma reclamação na prefeitura. Se for eles, vão ter que dar um jeito, se não for eles vão pressionar o SERPRO.

Bruno, Essa unit já se encontra no SVN. Vou fechar esse tópico, uma vez que o problema inicial foi sanado.

Bruno, Esse provedor é tão amador que os caras não capazes de gerar um XML de retorno acusando o erro. Veja o retorno deles: <?xml version="1.0" encoding="UTF-8"?>XML com ERRO, excedeu o número de tentativas de envio com erro, aguarde 120 min. Arquivo em desacordo com o XML Schema. Consulte o Manual da NFS-e para saber quais são as versões de XML Schema suportadas pelo sistema. Substitua a uni pela que esta em anexo, reinstale o ACBr e faça novos testes assim que for possível. iiBrasil.Provider.pas

Boa tarde Maico, Vai ser necessário debugar para saber exatamente em qual linha ocorre o erro. O XML de retorno tanto o de soap quanto o não soap estão sendo salvos.

Boa tarde Pessoal, Quanto mais prestadores de serviço protocolarem uma reclamação que a API não esta funcionando para o caso do Simples Nacional ME/EPP a prefeitura vai pressionar a Receita Federal e ou SERPRO. Ai o SERPRO vai ter que dar plantão esse feriado e final de semana para consertar a cagada que eles fizeram (isso se a kaka é deles). Como eu já disse que o problema pode ser alguma parametrização errada na API de produção por parte da prefeitura, ai quem vai fazer plantão é o pessoal da prefeitura.

Gabriel, Desculpa me enganei, no caso do Ginfes somente o lote é assinado. Mas veja isso: <ns4:ValorLiquidoNfse>-1.00</ns4:ValorLiquidoNfse> Esta correto o valor liquido da nota ser um valor negativo?

Bruno, Para uma melhor analise eu preciso do soap de retorno e não de envio, uma vez que o erro ocorre ao tentar tratar o retorno.

Douglas, Substitua a unit pela que esta em anexo. Reinstale o ACBr e faça um novo teste. IPM.Provider.pas

Boa tarde Bruno, Configure o componente para salvar os arquivos "soap". Faça um novo teste e anexe os arquivos "soap" para que possamos analisar o problema.

Não seria mais fácil informar os dados dessa fatura na discriminação do serviço? Usar o caracter ";" para gerar a quebra de linha.

Boa tarde Douglas, No campo Discriminacao do RPS notei que você não usou a quebra de linha que é recomendado. Por favor gere um novo RPS inserindo o caracter ";" onde você deseja que ocorra a quebra de linha. Depois você anexa o XML desse novo RPS e o XML da NFS-e referente a esse RPS. Só assim vamos poder analisar melhor o problema.

Boa tarde, No layout do DPS contempla esse tipo de informação?

Boa tarde Fabiano, Não sei se a sua solução não vai gerar efeito colateral com outras versões do Delphi (não sei qual você usa) ou com o Lazarus ou até mesmo com outros provedores. Talvez o melhor lugar por enquanto é colocar na unit IPM.Provider. Na função: function TACBrNFSeXWebserviceIPM.TratarXmlRetornado(const aXML: string): string; Trocar a linha: Result := String(NativeStringToUTF8(Result)); por : Result := AnsiToUTF8(Result); Faça essa alteração e faça novos testes.

Boa tarde Gabriel, Você tem fontes com alterações locais? Verifica se não tem nenhuma unit do ACBr com uma bolinha vermelha em seu ícone, caso afirmativo delete a unit. Atualize todos os fontes de todas as pastas. Reinstale o ACBr com a opção de apagar arquivos antigos marcada. Compile a aplicação com a opção Build. O XML de envio somente o lote esta assinado e o Ginfes requer que tanto o RPS quanto o Lote sejam assinados.

Obrigado por reportar. Fechando. Para novas dúvidas, criar um novo tópico.

Boa tarde @Net Shopping, Até onde sei o MEI pode emitir NF-e, só não sei se pode emitir NFC-e. Se tratando de NFC-e se faz necessário o CSC e idCSC, caso contrario a nota não é autorizada. O CSC e o idCSC foi gerado com base no CNPJ do MEI?

Boa tarde @Mcq Desenvolvimentos, Se tratando do ICMS 61 temos: cst61 : begin Gerador.wCampo(tcDe4, 'N15', 'qBCMonoRet', 01, 15, 0, NFe.Det[i].Imposto.ICMS.qBCMonoRet, DSC_QBCMONORET); Gerador.wCampo(tcDe4, 'N15', 'adRemICMSRet', 01, 5, 1, NFe.Det[i].Imposto.ICMS.adRemICMSRet, DSC_ADREMICMSRET); Gerador.wCampo(tcDe2, 'N17', 'vICMSMonoRet', 01, 15, 1, NFe.Det[i].Imposto.ICMS.vICMSMonoRet, DSC_VICMSMONORET); end; Note que não é Reten e sim Ret no final do nome do campo.

Boa tarde, Favor atualizar todos os fontes de todas as pastas, reinstale o ACBr e faça novos testes.

Bom dia Dercide, Já esta no SVN.

Bruno, Já esta no SVN.

Bom dia Eliandro, Peça para todos os seus clientes protocolarem na prefeitura uma reclamação sobre o problema que estão enfrentando. Como existem informações que a prefeitura parametriza na API e não sei se é algum erro de parametrização ou se é um erro mesmo na API.

Bom dia Bruno, Muito obrigado pela colaboração, já inclui na minha lista de tarefas. TK-4686

Bom dia Marcelo, Na unit pcnGerador temos a procedure wAlerta responsável por gerar os alertas, veja: procedure TGerador.wAlerta(const ID, TAG, Descricao, Alerta: string); var s: string; begin // O Formato da mensagem de erro pode ser alterado pelo usuario alterando-se a property FFormatoAlerta: onde; // %TAGNIVEL% : Representa o Nivel da TAG; ex: <transp><vol><lacres> // %TAG% : Representa a TAG; ex: <nLacre> // %ID% : Representa a ID da TAG; ex X34 // %MSG% : Representa a mensagem de alerta // %DESCRICAO% : Representa a Descrição da TAG s := FOpcoes.FFormatoAlerta; s := StringReplace(s, '%TAGNIVEL%', FTagNivel, [rfReplaceAll]); s := StringReplace(s, '%TAG%', TAG, [rfReplaceAll]); s := StringReplace(s, '%ID%', ID, [rfReplaceAll]); s := StringReplace(s, '%MSG%', Alerta, [rfReplaceAll]); s := StringReplace(s, '%DESCRICAO%', Trim(Descricao), [rfReplaceAll]); if Trim(Alerta) <> '' then FListaDeAlertas.Add(s); end;