ACBrNFSeX - Erro Aliquota, provedores: Recife e Fortaleza

[gilspider]

Bom dia,

Ao emitir RPS nos provedores Recife e Fortaleza retorna o erro:

<MensagemRetorno>
    <Codigo>E547</Codigo>
    <Mensagem>Alíquota incorreta</Mensagem>
    <Correcao>Informar a alíquota correta ou verificar Regime Especial de Tributação.</Correcao>
</MensagemRetorno>

  Ambos os provedores exigem que a Alíquota seja enviada na forma decimal (dividida por 100)

O componente atualiza o valor da alíquota com função AjustarAliquota(const Aliquota: Double; DivPor100: Boolean = False): Double;, onde o parâmetro booleano DivAliq100 informa se será dividido ou não por 100 (padrão FALSE)

Esta função é chamada nas unidades ACBrNFSeXGravarXml_ABRASFv1 e ACBrNFSeXGravarXml_ABRASFv2, variando o valor de DivPor100 de acordo com o provedor utilizado. 

Com isso faz-se necessário incluir "DivAliq100 := true", no procedimento "Configurar", das unidades ISSFortaleza.GravarXml.pas  e  Recife.GravarXml.pas

Após a inclusão da linha no procedimento Configurar, a emissão foi aprovada sem erros em ambos os provedores.

Segue anexo unidades modificadas.

 

Recife.GravarXml.pas

ISSFortaleza.GravarXml.pas

[Italo Giurizzato Junior]

Boa tarde Gil,

Muito obrigado pela colaboração, já inclui na minha lista de tarefas.

[gilspider]

obrigado

[Italo Giurizzato Junior]

Bom dia Gil,

Já esta no SVN.