Erro de " Item not found "

[Geule]

Olá amigos!

Estou iniciando agora no Framework. 
Procurei mas não encontrei solução para a seguinte
situção:

Ao executar um update, em uma tabela que possui FK, 
ocorre erro de "Item not Found" exatamente no campo
da chave estrangeira. 

Código:

var
 objSubgrupo: TSUBGRUPO;
begin
  objSubgrupo := TSUBGRUPO.Create;
  try
    try
      objSubgrupo.ID := FIDRegistro;
      objSubgrupo.IDGRUPO := FIDGrupo; {erro aqui de Item Not Found}
      objSubgrupo.SUBBRUPO_DESC := edtSubgrupo.Text;
      //
      oContainerClient.Update(objSubgrupo);
      oMaster.Save(objSubgrupo);
      oMaster.ApplyUpdates(0);
      //
      Result := True;
    except
      Result := False;
      raise Exception.Create(ErrorEdit);
    end;
  finally
    objSubgrupo.Free;
  end;

Segue parte do código da classe:

Código:

//....
Restrictions([NotNull])]
[Column('FK_GRUPO', ftInteger)]
[ForeignKey('FK_SUBGRUPO_1', 'FK_GRUPO', 'GRUPO', 'ID_GRUPO', SetNull, Cascade)]
[Dictionary('FK_GRUPO', 'Mensagem de validação', '', '', '', taCenter)]
property IDGRUPO: Integer read FIDGRUPO write FIDGRUPO;
//....

Muito Obrigado!

[Isaque Pinheiro]

Olá amigos!

Estou iniciando agora no Framework. 
Procurei mas não encontrei solução para a seguinte
situção:

Ao executar um update, em uma tabela que possui FK, 
ocorre erro de "Item not Found" exatamente no campo
da chave estrangeira. 

Código:

var
 objSubgrupo: TSUBGRUPO;
begin
  objSubgrupo := TSUBGRUPO.Create;
  try
    try
      objSubgrupo.ID := FIDRegistro;
      objSubgrupo.IDGRUPO := FIDGrupo; {erro aqui de Item Not Found}
      objSubgrupo.SUBBRUPO_DESC := edtSubgrupo.Text;
      //
      oContainerClient.Update(objSubgrupo);
      oMaster.Save(objSubgrupo);
      oMaster.ApplyUpdates(0);
      //
      Result := True;
    except
      Result := False;
      raise Exception.Create(ErrorEdit);
    end;
  finally
    objSubgrupo.Free;
  end;

Segue parte do código da classe:

Código:

//....
Restrictions([NotNull])]
[Column('FK_GRUPO', ftInteger)]
[ForeignKey('FK_SUBGRUPO_1', 'FK_GRUPO', 'GRUPO', 'ID_GRUPO', SetNull, Cascade)]
[Dictionary('FK_GRUPO', 'Mensagem de validação', '', '', '', taCenter)]
property IDGRUPO: Integer read FIDGRUPO write FIDGRUPO;
//....

Muito Obrigado!

vc está tentando pegar o valor de uma VAR interna da classe como ??? Como assim, olhe nos exemplos, la mostra como fazer.

[Geule]

Olá amigos!

Estou iniciando agora no Framework. 
Procurei mas não encontrei solução para a seguinte
situção:

Ao executar um update, em uma tabela que possui FK, 
ocorre erro de "Item not Found" exatamente no campo
da chave estrangeira. 

Código:

var
 objSubgrupo: TSUBGRUPO;
begin
  objSubgrupo := TSUBGRUPO.Create;
  try
    try
      objSubgrupo.ID := FIDRegistro;
      objSubgrupo.IDGRUPO := FIDGrupo; {erro aqui de Item Not Found}
      objSubgrupo.SUBBRUPO_DESC := edtSubgrupo.Text;
      //
      oContainerClient.Update(objSubgrupo);
      oMaster.Save(objSubgrupo);
      oMaster.ApplyUpdates(0);
      //
      Result := True;
    except
      Result := False;
      raise Exception.Create(ErrorEdit);
    end;
  finally
    objSubgrupo.Free;
  end;

Segue parte do código da classe:

Código:

//....
Restrictions([NotNull])]
[Column('FK_GRUPO', ftInteger)]
[ForeignKey('FK_SUBGRUPO_1', 'FK_GRUPO', 'GRUPO', 'ID_GRUPO', SetNull, Cascade)]
[Dictionary('FK_GRUPO', 'Mensagem de validação', '', '', '', taCenter)]
property IDGRUPO: Integer read FIDGRUPO write FIDGRUPO;
//....

Muito Obrigado!

vc está tentando pegar o valor de uma VAR interna da classe como ??? Como assim, olhe nos exemplos, la mostra como fazer.

Olá  parceiro. Obrigado por responder.

Não estou pegando nenhuma variável interna não. 

Única coisa que fiz foi: Por meio da ferramenta geradora de classe, gerei duas classes (grupo e subgrupo), onde subgrupo tem FK de grupo. 
Os comandos para atualizar (acima citado) na classe de grupo funcionada OK; mas na classe de subgrupo que tem a FK não funcionada.

As estruturas das tabelas são:

Grupo [ID, DESC_GRUPO]
Subgrupo [ID, IDGRUPO, DESC_SUBGRUPO]

Os olhei os exemplos sim.

Vou voltar lá nos exemplos e analisar mais. 

Vlw brother.

[Osiel Gomes]

Boa noite!!!!

É firebird?