Erro ao Enviar S-1210 tag tppgto valor inválido

[Rafael Fourinfo]

Boa Tarde, estou com problemas para enviar o Evento S-1210 do esocial, quando tento enviar ele me retorna este erro

, porém avaliando meu projeto ele está preenchendo com o valor correto

, então analisando os método do ACBr para preencher a Tag ele utiliza a função eSTpTpPgtoToStr, porém nela não é encontrada o item 4-pagamento do S-1202

encontrei aqui no fórum um tópico com um ajuste nesta mesma tag, porém o layout não tinha o item 4-pagamento do S-1202, ele havia trocado o código 4 pelo 5

, mas tanto no layout 1.1 quanto na versão mais recente que baixei do site do ESocial o item voltou a ser 4-pagamento do S-1202.

Agradeço a atenção.

[Marcelo Pontes Melim]

Anexo arquivo fonte corrigido para avaliação.

pcesConversaoeSocial.pas

[Rafael Fourinfo]

@Marcelo Pontes Melim é isso mesmo, foi transmitido.

Obrigado.

Obs.: A Property TPPgto do pcesS1210.pas possui 2 itens que não existem no layout (tpPgtoFerias, tpPgtoCompAnt).

 

[Juliana Tamizou]

Obrigado pela contribuição, em breve será validada para possível inclusão ao svn

TK-3138

[EMBarbosa]

Muito obrigado pela contribuição.
Fiz a implementação baseada nela.
Já subi as alterações para o SVN.
Pelo que vi está tudo certo.
Queira por favor atualizar, testar e reportar qualquer problema.