Page 1 of 1

TZUpdateSQL Operation can not be perform on inactive dataset

Posted: 25.05.2024, 15:51
by kikep
Hi running this code on Zeosdbo 8.0.0 beta some examples show properties of connection but on this version not has access to this property
what i doing wrong to run this code
this on modifysql on ZUpdate

UPDATE PO1_PurchaseOrderEntryHeader SET
PurchaseOrderDate = :PurchaseOrderDate ,
OrderType = :OrderType ,
MasterRepeatingPOOrSO= :MasterRepeatingPOOrSO,
Division=:Division
WHERE PurchaseOrderNumber = :PurchaseOrderNumber
AND DIVISION =:DIVISION

Here to run code to run zupdate

procedure TFormPo.BtnEditClick(Sender: TObject);
Var Tsql:TZQuery;
begin
if not ZUpdatePo.Connection.Active then ShowMessage('Connection not active!'); //for test
ZUpdatePo.Active:=false;
with ZUpdatePo.Params do begin
ZUpdatePo.Params.ParamByName('PurchaseOrderDate').AsString:='{d''2024-03-07''}';
ZUpdatePo.Params.ParamByName('OrderType').AsString:='S';
ZUpdatePo.Params.ParamByName('MasterRepeatingPOOrSO').AsString:='OS';
ZUpdatePo.Params.ParamByName('PurchaseOrderNumber').AsString:='A39173';
ZUpdatePo.Params.ParamByName('DIVISION').AsString:='02';
end;
// ZQBrwPo.Edit;
// ZQBrwPo.Post;
Try
ZQBrwPo.ExecSQL;
ZQBrwPo.CommitUpdates;
except on e: Exception do begin
ZQBrwPo.CancelUpdates;
Showmessage('Exceptionclass = ' + E.ClassName + ' / ' + E.Message);
end;
end;
ZQBrwPo.Open;
end;