Sugestão de melhoria na geração do campo "Código Serviço" no DANFSe (RLRetrato)

[João Vitor Bogo]

Olá, equipe ACBr!

Gostaria de sugerir uma melhoria na procedure TfrlXDANFSeRLRetrato.rbCodServicoBeforePrint, responsável por preencher o campo "Código Serviço" no DANFSe.

Contexto:

Atualmente, o preenchimento do campo "Código Serviço" é feito com base na lista Servico.ItemServico. No entanto, há casos em que a prefeitura retorna um ou mais itens dentro de ItemServico, mas sem preencher os campos ItemListaServico e xItemListaServico. Nestes casos, o relatório não exibe nenhuma informação, pois o código atual apenas considera a exibição dos campos “pais” (Servico.ItemListaServico e Servico.xItemListaServico) quando ItemServico.Count = 0.

Problema:

• Servico.ItemServico.Count > 0, mas os itens estão sem dados nos campos necessários.

• A lógica atual impede que os campos alternativos sejam utilizados, resultando na ausência do "Código Serviço" no relatório.

Proposta de solução:

Ajustar a lógica para que o bloco alternativo (que utiliza Servico.ItemListaServico e Servico.xItemListaServico) também seja executado quando não há nenhum ItemServico com dados válidos.

Com essa modificação, evitamos situações em que o relatório fica com o campo em branco, mesmo havendo informações disponíveis nos campos principais.

Unit com a alteração: ACBrNFSeXDANFSeRLRetrato.pas

Fico à disposição para enviar a modificação completa, caso necessário.

Editado 28 Julho, 2025 por João Vitor Bogo

[Italo Giurizzato Junior]

Boa tarde @João Vitor Bogo,

Muito obrigado pela colaboração, já foi criado a TK-7423 para analise.

[Italo Giurizzato Junior]

@João Vitor Bogo,

Já esta no SVN.