Einzelnen Beitrag anzeigen

rambothekid

Registriert seit: 24. Apr 2003
7 Beiträge
 
#4

Re: Programm Portierung von dbOvernet zu Ibobjects

  Alt 8. Mai 2008, 16:03
Autoupdate heißt:

das ich die Daten in meinem Dataset habe und die Felder ändern kann und diese Änderungen automatisch in die DB gepostet werden
es gibt für IBO einen workaround der aber sehr ätzend ist von daher die Frage nach einer Eleganteren Lösung

{$IFDEF USE_IBO}
FSET_TICKETS := TIBOQuery.Create(Self);
FSET_TICKETS.IB_Connection := TisDM.DM.IB_Connection1;
FSET_TICKETS.EditSQL.Text :=
' UPDATE TIS_TICKET SET ' +
' I_USER_ID = :I_USER_ID,' +
' I_KUNDE_KST_ID = :I_KUNDE_KST_ID,' +
' I_BEARB_KST_ID = :I_BEARB_KST_ID,' +
' I_PRIORITY = :I_PRIORITY, ' +
' V_TITEL = :V_TITEL, ' +
' V_DETAIL = :V_DETAIL, ' +
' V_SOLUTION = :V_SOLUTION, ' +
' V_LAST_EDITOR = :V_LAST_EDITOR ' +
' WHERE I_TIS_TICKET_ID = :I_TIS_TICKET_ID ';
{$ELSE}
FSET_TICKETS := TdbOClientDataset.Create(self);
FSET_TICKETS.ClientConnection := TisDM.DM.SET_SUCHE.ClientConnection;
FSET_TICKETS.ServerTableName := 'TIS_TICKET';
FSET_TICKETS.KeyFieldNames := 'I_TIS_TICKET_ID;ftInteger';
FSET_TICKETS.AutoUpdate := True;
FSET_TICKETS.BlobsAsParams := True;
FSET_TICKETS.Active := True;
  Mit Zitat antworten Zitat