🚀 go-pugleaf

Hi,

i have a Problem using the locate function

PROCEDURE TRecursiveDetailTable.HandleAfterPost (Dataset : TDataset);
VAR KeyFields : Variant;
BEGIN
  IF RefreshRequired THEN
    Refresh_Pos(MasterSource.Dataset);
  IF NewRecord THEN
  BEGIN
    KeyFields := FieldValues [IndexFieldNames];
    WITH MasterSource DO
    try
      DisableControls;
      Close;
      open;
      Locate (MasterFields, KeyFields, []);
    finally
      EnableControls;
    END;
  END;
  RefreshRequired := False;
  IF Assigned (AfterPost) THEN
    AfterPost (Dataset);
END;   {*** PROCEDURE TRecursiveDetailTable.HandleBeforeInsert; ***}

With this part of Source i allways get an eVariantError-Exception at the
locate function.

Can anyone tell me something about an error.

Thanks
Jens