У меня есть две таблицы (MetreR) и (Billing):
MReading
date
amount
Billgen
Billing
date
amout
Customer No
Я хочу вставить запись из таблицы MetreR в Billing в любое время, когда данные или запись попадут в таблицу MetreR. Он должен работать всегда. Я не хочу использовать очередь заданий.
MetreR.RESET;
MetreR.SETFILTER(MetreR.Billgen,'%1',FALSE);
IF MetreR.FIND('-') THEN BEGIN
REPEAT
Billing.INIT;
Billing.ID:=MetreR."No.";
Billing."Customer No.":=Customers."No.";
Billing.Amount:=Billing.Consumption;
MetreR.Billgen:=TRUE;
MetreR.MODIFY;
END;
ПОКА MetreR.NEXT=0; КОНЕЦ;