cachedupdates og Mysql
Hejsa.Jeg er løbet sur i cachedupdates.
Jeg vil gerne lave en rutine der først opretter en ny kunde, dernæst sætter ham på venteliste. Jeg vil gerne have det således at hvis man ikke acceptere ventelisten, så afbrydes begge oprettelser. Skal lige fortælle at jeg jo har brug for at få kundeid overført til ventelisten.
Jeg bruger Mysql 5 og MySql Access fra Corelab, nærmere bestemt
en databaseconnection, sqlquery og sqlupdate.
Her er forkortet kode.
DataM.MyConnection1.StartTransaction;
//udfyld felter !
DataM.Clientupdate.Apply(ukInsert);
DataM.Check.SQL.Text :='SELECT LAST_INSERT_ID()';
DataM.Check.Execute;
LastClientId := DataM.Check.FieldByName('LAST_INSERT_ID)').AsInteger;
//create og åben ventelisteform !
NewTypeFrm := TNewTypeFrm.Create(self);
// kald Commit, hvis alt er ok ellers afbryd oprettelse
If NewTypeFrm.showmodal = mrOk then begin
DataM.MyConnection1.Commit;
//showmessage('Ok');
end
else begin
DataM.MyConnection1.Rollback;
//showmessage('Cancel');
end;
end;
