Proposta alteração tipo tpSimNao

[Rodrigo - Digibyte]

Na unit eSocial_Conversao linha tpSimNao                = (tpSim, tpNao) proponho alteração para tpNaoSim                = (tpNao, tpSim) de forma a facilitar quando estiver em produção a leitura direta dos dados de forma que zero seria não e um seria sim

[EMBarbosa]

Eu concordo. Faz muito sentido.

Mas é preciso duas coisas:

1. que outros usuários também concordem;
2. que se faça uma análise do código em todos lugares onde é utilizado esse tipo para ver se não vai "quebrar" o componente;

 

[BigWings]

Não vejo problema com o nome do tipo, mas vejo com este tipo de uso no exemplo, acessando o índice do enumerado diretamente.

evtInfoEmpregador.InfoEmpregador.InfoCadastro.IndEtt := tpSimNao(1);

Fazendo isso, em uma manutenção posterior, se for necessário incluir um novo item no enumerado, por exemplo:

type
  tpSimNao = (snNulo, snSim, snNao);

Isso não poderia ser feito, obrigando a inserir o novo item no final, para não ter que alterar todas as referências ao índice do tipo.

Em vez disso, usar as funções de conversão já presentes no eSocial_Conversao.pas:

evtInfoEmpregador.InfoEmpregador.InfoCadastro.IndEtt := eSStrToSimNao(ok, 'N');

 

[EMBarbosa]

22 horas atrás, BigWings disse:

Não vejo problema com o nome do tipo, mas vejo com este tipo de uso no exemplo, acessando o índice do enumerado diretamente.

evtInfoEmpregador.InfoEmpregador.InfoCadastro.IndEtt := tpSimNao(1);

Fazendo isso, em uma manutenção posterior, se for necessário incluir um novo item no enumerado, por exemplo:

type
  tpSimNao = (snNulo, snSim, snNao);

Isso não poderia ser feito, obrigando a inserir o novo item no final, para não ter que alterar todas as referências ao índice do tipo.

Em vez disso, usar as funções de conversão já presentes no eSocial_Conversao.pas:

evtInfoEmpregador.InfoEmpregador.InfoCadastro.IndEtt := eSStrToSimNao(ok, 'N');

 

É verdade. Isso é um problema recorrente no uso de tipos enumerados.