I get a catastrophic failure from the line of code identified by ==> in the method below. The method is in Delphi's provider unit.
the SQL is in a package and shown below:
begin
cwb_recipe.level_info(serieskey => :serieskey,
leveldetails => :leveldetails );
end;
The SQL returns 8 fields where the first 5 are from the target table and the last three are from joins on other tables. I have changed provider flag options in the "non-target fields". I also have changed the updatemode in the provider. No luck.
procedure TCustomResolver.InitKeyFields(Tree: TUpdateTree; ADelta: TPacketDataSet);
var
Pos, i: Integer;
KeyFields, FieldName: string;
begin
==> KeyFields := IProviderSupport(Tree.Source).PSGetKeyFields;
Pos := 1;
while Pos
the SQL is in a package and shown below:
begin
cwb_recipe.level_info(serieskey => :serieskey,
leveldetails => :leveldetails );
end;
The SQL returns 8 fields where the first 5 are from the target table and the last three are from joins on other tables. I have changed provider flag options in the "non-target fields". I also have changed the updatemode in the provider. No luck.
procedure TCustomResolver.InitKeyFields(Tree: TUpdateTree; ADelta: TPacketDataSet);
var
Pos, i: Integer;
KeyFields, FieldName: string;
begin
==> KeyFields := IProviderSupport(Tree.Source).PSGetKeyFields;
Pos := 1;
while Pos