Ao gerar o registro C500, com documento do tipo Entrada Modelo 66 estão aparecendo as seguintes mensagens de validação:
Registro C500 : O código do modelo "66" não está na lista de valores válidos "[06, 28, 29]" !
Registro C500 : Se o modelo for 06 (energia elétrica) ou 28 (gás canalizado), os valores válidos são "[01, 02, 03, 04, 05, 06, 07, 08]". Se o modelo for 29 (água canalizada), o valor deve constar da Tabela 4.4.2 do Ato COTEPE/ICMS nº 09, de 18 de abril de 2008. !
Adicionei o teste abaixo no arquivo ACBrEFDBloco_C_Class.pas, no procedimento WriteRegistroC500:
if UmRegC500.COD_MOD <> '66' then
Begin
// COD_MOD
Check(MatchText(UmRegC500.COD_MOD, ['06', '28', '29']), 'Registro C500 : O código do modelo "%s" não está na lista de valores válidos "%s" !',
[UmRegC500.COD_MOD, '[06, 28, 29]']);
// COD_CONS
Check(funChecaCOD_CONS(UmRegC500.COD_MOD, UmRegC500.COD_CONS), 'Registro C500 : Se o modelo for 06 (energia elétrica) ou 28 (gás canalizado), ' +
'os valores válidos são "%s". Se o modelo for 29 (água canalizada), o valor deve ' +
'constar da Tabela 4.4.2 do Ato COTEPE/ICMS nº 09, de 18 de abril de 2008. !',
['[01, 02, 03, 04, 05, 06, 07, 08]']);
End;
Se alguém puder, verificar a possibilidade de incluir nos fontes..
ACBrEFDBloco_C_Class.pas