FORM级触发器:WHEN-NEW-FORM-INSTANCE
1.定义:
V_LIST_NAME11 VARCHAR2(100) := 'QUERY_FIND.UPDATE_TYPE';
CURSOR CSR_1 IS
SELECT HRL.LOOKUP_CODE, HRL.MEANING
FROM FND_LOOKUP_VALUES_VL HRL
WHERE HRL.LOOKUP_TYPE = 'CUX_SHIP_MOD_TYPE'
ORDER BY HRL.MEANING;
2.赋值:
--清除
CLEAR_LIST(V_LIST_NAME11);
赋值:
I:=1;
FOR CSR_REC IN CSR_1 LOOP
ADD_LIST_ELEMENT(V_LIST_NAME11,
I,
CSR_REC.MEANING,
CSR_REC.LOOKUP_CODE);
I := I + 1;
END LOOP;