Sintegra Erro 75 Sem Registro Vinculado (Socorro)

[Rafael jorge]

Por favor me ajudem ja procurei em todo canto uma solução e nao encontrei.
estou usando o ACBR para gerar o sintegra, pequei o codigo fonte do propio exemplo do ACBR e so fiz alimentar com os dados da minha base de dados. só que nao para de dar erro. é sempre o erro "registro tipo 75 sem registro correspondente..." ai ele da erro de "código do produto", so que eu tenho certeza que to gerando um registro 75 para cada registro 54. ja procurei em foruns e tudo o mais onde diziam que para cada registro 54, tinha que ter um 75, que ele era vinculado um a outro pelo campo codigo do produto e descrição. ja fiz tudo e sempre da erro. estou usando a versao 5.2.4 do validados no componente. e estou usando o validador na versao 5.2.18 pois é a ultima versão. estou usando a rotina abaixo:

procedure TFormSintegra.GerarRegistro54;
var
  wregistro54: TRegistro54;
  wregistro75: TRegistro75;
  i          : integer;
  cdc        : tclientdataset;
  ii         : integer;
  iii        : integer;
begin
application.ProcessMessages; lb.caption := 'Gerando registro 54...';
ii  := 1;
iii := 0;
for i := 0 to acbrsintegra.registros50.Count -1 do
 begin
  cdc := criaclientdataset('select i.* '+#13+
                           'from   notafiscal_saida nf, notafiscal_itens i '+#13+
                           'where  i.notafiscal = nf.numero '+#13+
                           'and    nf.numero    = '+#39+tregistro50(acbrsintegra.registros50.Items[i]).Numero+#39+#13+
                           //'and    nf.data between '+#39+formatdatetime('mm/dd/yyyy',d1.date)+#39+' and '+#39+formatdatetime('mm/dd/yyyy',d2.date)+#39+#13+
                           'and    nf.empresa   = '+empresa_codigo,
                           self.fsqlconnection,
                           self.ultimo_erro);

  while not cdc.eof do
   begin
    iii                              := iii + 1;
    wregistro54                      := TRegistro54.Create;
    wregistro54.CPFCNPJ              := tregistro50(acbrsintegra.registros50.Items[i]).CPFCNPJ;
    wregistro54.Modelo               := tregistro50(acbrsintegra.registros50.Items[i]).modelo;
    wregistro54.Serie                := tregistro50(acbrsintegra.registros50.Items[i]).serie;
    wregistro54.Numero               := tregistro50(acbrsintegra.registros50.Items[i]).numero;
    wregistro54.Cfop                 := tregistro50(acbrsintegra.registros50.Items[i]).cfop;
    wregistro54.CST                  := '0'{nacional}+'00'{Tributada integralmente };
    wregistro54.NumeroItem           := ii;
    wregistro54.Codigo               := cdc.fieldbyname('codigo_produto').asstring;
    wregistro54.Descricao            := cdc.fieldbyname('descricao').asstring;
    wregistro54.Quantidade           := cdc.fieldbyname('quantidade').ascurrency;
    wregistro54.Valor                := cdc.fieldbyname('PRECO_UNITARIO').ascurrency;
    wregistro54.ValorDescontoDespesa := cdc.fieldbyname('desconto').ascurrency;
    wregistro54.BasedeCalculo        := cdc.fieldbyname('preco_total').ascurrency;
    wregistro54.BaseST               := cdc.fieldbyname('BASEICMSST').ascurrency;
    wregistro54.ValorIpi             := cdc.fieldbyname('ipi').ascurrency;
    wregistro54.Aliquota             := cdc.fieldbyname('ALICOTA_ICMS').ascurrency;
    ACBrSintegra.Registros54.Add(wregistro54);

      wregistro75                      := TRegistro75.Create;
      wregistro75.Codigo               := wregistro54.Codigo; //cdc.fieldbyname('codigo_produto').asstring;
      wregistro75.AliquotaICMS         := wregistro54.Aliquota;
      wregistro75.NCM                  := cdc.fieldbyname('CODIGO_NCM').asstring;
      wregistro75.DataInicial          := ACBrSintegra.Registro10.DataInicial;
      wregistro75.DataFinal            := ACBrSintegra.Registro10.DataFinal;
      wregistro75.Descricao            := cdc.fieldbyname('descricao').asstring;
      wregistro75.Unidade              := cdc.fieldbyname('unidade').asstring;
      wregistro75.

      ACBrSintegra.Registros75.Add(wregistro75);
      lb54.caption := 'Total de '+inttostr(iii)+' Registros54';
      application.ProcessMessages;
    cdc.next;
    ii := ii + 1;
   end;
  cdc.free;
 end;
end;

Editado 19 Março, 2014 por EMBarbosa
Adicionada tag [CODE]

[Rafael jorge]

baixei a versao 5.2.4 do validador e ele continua dando o mesmo erro.
:'(

[Juliomar Marchetti]

Bom dia

ao postar algum código favor anexar o mesmo, pois assim o tópico fica légivel!

 

Primeiro acho que está com erro seu código pois veja:

      wregistro75.Descricao            := cdc.fieldbyname('descricao').asstring;
      wregistro75.Unidade              := cdc.fieldbyname('unidade').asstring;
      wregistro75.

      ACBrSintegra.Registros75.Add(wregistro75);
      lb54.caption := 'Total de '+inttostr(iii)+' Registros54';

tente depois de verificar o que mostrei acima 

colocar essa linha

ACBrSintegra.Registros54.Add(wregistro54);

abaixo da

  ACBrSintegra.Registros75.Add(wregistro75);

[EMBarbosa]

Modifiquei seu post para adicionar a tag CODE. Além disso, faltou postar a mensagem de erro completa.

[Rafael jorge]

desculpem pelas falhas, realmente o trecho do codigo que tem "wregistro75." foi um erro mesmo na hora de copiar o codigo que eu tava vendo se tentava resolver, nao era pra ele estar ai mesmo nao. essa linha nao existe. o erro correto é este "Registro tipo 75 sem registro correspondente em pelo menos um dos tipos : 54,57,60D,74,77,86"
erro no registro 75.
campo : código do produto

[EMBarbosa]

Pois então, veja a linha apontada pelo erro. Qual o código do produto nesta linha?

Agora procure no restante do arquivo se este produto existe em algum registro 54, 57, 60D, 74, 77, 86...

 

Você provavelmente não vai encontrar, então precisa saber: Por que foi gerado o registro 75 para ele?

[Rafael jorge]

bem, apos mexer desesperadamente no codigo fonte e colocando os campos de data e tudo corretamente agora esta dando erro no propio componente, o erro agora que esta dando e na propia geração do arquivo e nao ao validar, o erro é "Registro 60D sem registro 60M correspondente! 02/01/2014 - 000000987456", abaixo toda a unit que eu to tentando criar o sintegra.

 

Editado 19 Março, 2014 por Juliomar Marchetti

[EMBarbosa]

Isso significa que você está gerando registros 60D mas não criou antes o registro 60M para este dia.

[Juliomar Marchetti]

Editei seu  post e gerei um arquivo com o mesmo e anexei!

por favor tente seguir as dicas fornecidas para manter a boa organização do fórum!

 

Bom seu último erro é a nível de dados! Veja você não tem um registro detalhe sem ter o mestre correspondente!

 

ps: o Elton respondeu antes 

[Rafael jorge]

debugando eu descobri pq tava causando esse erro...
os campos que eu tava passando datetime passei so date. pois ele dava diferenças por causa da hora.
resolvi trocando tudo por "strtodate(cdc.fieldbyname('data').asstring)" em vez de usar campo datetime.
esse erro era referente tambem as reduções Z que nao estavam sendo colocadas no arquivo.
agora verifiquei que nao tava passando as alicotas da redução tambem nao.

com isso esta dando o erro agora "receita bruta de ECF diverge da soma dos analiticos".

[MARCELO ESTRUTELAS]

boa tarde

esta dando erro na geraçao do sintegra mes de fevereiro junto com inventario

no produto serviço de telecomunicaçao

natureza da operaçao aquisiçao de serviço de telecomunicaçao est. ind

seguinte erro -registro tipo 75 semregistro correspondente em pelo menos um dos tipos 54,57,60,60r

campo codigo produto,ate mudei numero de modelo nota de 1 para 22 e nada

uso clippstore 

alguem me ajuda ai por favor

 

 

[Juliomar Marchetti]

18 horas atrás, MARCELO ESTRUTELAS disse:

boa tarde

esta dando erro na geraçao do sintegra mes de fevereiro junto com inventario

no produto serviço de telecomunicaçao

natureza da operaçao aquisiçao de serviço de telecomunicaçao est. ind

seguinte erro -registro tipo 75 semregistro correspondente em pelo menos um dos tipos 54,57,60,60r

campo codigo produto,ate mudei numero de modelo nota de 1 para 22 e nada

uso clippstore 

alguem me ajuda ai por favor

 

 

Você é programador? o fórum é para programador pelo que estou notando tu está usando sistema da compufour então julgo que tu seja usuário, para esse caso entre em contato com a empresa que forneceu seu software.

não poderemos lhe ajudar.