Lógica Dos Dados Da Redução Z

[netsolutions]

Pessoal, estou em dúvida quanto a melhor maneira de  graver os dados da Redução Z

 

Bom a dúvida é a seguinte...

 

tenho uma tabela, que cadastro(Manualmente) os dados dos ecfs que estão registrados para o estabelecimento onde guardo as seguintes informações

 

Numero_serie, Valor_gt, CRO, CNI, esses dados eu uso para gerar o arquivo criptografado

 

 with ACBrAAC1.IdentPAF.ECFsAutorizados.New do
      begin
        NumeroSerie := generica2.FieldByName('numero_serie').AsString;
        ValorGT     := generica2.FieldByName('valor_gt').AsFloat;
        CRO         := generica2.FieldByName('cro').AsInteger;
        CNI         := generica2.FieldByName('cni').AsInteger;
      end;

 

Bom agora para a geração do Sintegra, eu preciso no Registro 60M dos dados

 

wregistro60M.NumSerie:='000000987456';
  wregistro60M.NumOrdem:=1;
  wregistro60M.ModeloDoc:='2D';
  wregistro60M.CooInicial:=1000;
  wregistro60M.CooFinal:=1050;
  wregistro60M.CRZ:=1;
  wregistro60M.CRO:=1;
  wregistro60M.VendaBruta:=2050.35;
  wregistro60M.ValorGT:=10000;

 

onde utilize o Valor_GT, e o numero de serie, que estão gravados na tabela citada acima,

o que seria mais sensato de se fazer, atualizar as informações do GT, verificando o numero de serie do equipamento cadastrado, e manter tudo em uma tabela só, adicionando os novos campos necessaries, coo_final, coo_inicial... etc...

 

ou criar uma tabela nova para armazenar todos os referente ao registro 60M separadamente,

 

qual a Lógica utilizada pelos colegas??

 

Grato