Определение процессов главной книги

trl_acd = acd_code AND NVL(trl_gltransferflag, '-' ) = '-' AND tra_code = trl_trans AND tra_rstatus = 'A' and tra_type = 'I' and trl_type = 'I' and trl_event is not null and trl_QTY >0

Столбцы XXX_GLTRANSFER и XXX_GRTRANSFERFLAG обновляются с использованием выражения обновления источника. Следовательно, нужно ограничить использование выражения обновления источника в выражении условия Where. Например, для простого выражения Where, используемого в процессе отпуска, которому нужны R5TRANSLINES и R5ACCOUNTDETAIL, нужно ввести trl_acd = acd_code и nvl(trl_gltransferflag,'+') != '+' and trl_rtype = 'I'.

Это выражение помечает запись транзакции как обработанную, чтобы она не обрабатывалась повторно. В выражение нужно включить токен :ROWID или :rowid.

Далее приводится пример выражения обновления источника, которое помечает запись транзакции как обработанную, чтобы она не обрабатывалась повторно.

UPDATE r5translines SET trl_gltransferflag = '+', trl_gltransfer = sysdate WHERE rowid = :rowid

Declare

Cursor C1 is

SELECT substr(v.PRV_VALUE,1,3) company, substr(v.PRV_VALUE,5,4) GLS,
substr(v.PRV_VALUE,10,5) DEP,
substr(v.PRV_VALUE,16,6) EXP, substr(v.PRV_VALUE,23,4) PL , substr(v.PRV_VALUE,28,3) IC, 
substr(v.PRV_VALUE,32,6) FU
from
R5TRANSLINES L, R5PROPERTYVALUES V
where l.rowid = :rowid
and v.prv_property (+) = 'INVOFF' and v.PRV_RENTITY (+) = 'STOR'
and v.PRV_CODE (+) = l.trl_store;
BEGIN


FOR r IN C1 LOOP
UPDATE r5glinterface
SET gli_segment1 = r.company, gli_segment2 = r.GLS,
gli_segment3 = r.DEP, gli_segment4 = r.EXP
WHERE gli_transid = :transid
and gli_segment2 = '****' ; END LOOP;
end;