1 2 3 4 5 6 7 8 9 10 11 12 13 14 15
| while not query1.eof do
begin
query3.Close;
query3.SQL.clear;
query3.SQL.add('insert into pr_eff (fk_prestations,fk_prestataire,fk_dossier,explication,temps,date_pr) values (:prestation,:prestataire,:dossier,:explication,:temps,:date);');
query3.ParamCheck:=true;
query3.ParamByName('temps').value:=formatdatetime('hh:mm:ss',query1.fieldbyname('temps').asdatetime);
query3.ParamByName('prestation').asinteger:=query1.fieldbyname('fk_prestations').asinteger;
query3.ParamByName('prestataire').asinteger:=query1.fieldbyname('fk_prestataire').asinteger;
query3.ParamByName('dossier').AsInteger:=query1.FieldByName('fk_dossier').asinteger;
query3.ParamByName('date').value:=formatdatetime('yyyy/mm/dd',query1.FieldByName('date_pr').asdatetime);
query3.ParamByName('explication').asstring:=query1.FieldByName('explication').asstring;
query3.execsql;
query1.next;
end; |
Partager