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;
  
05-04 07:35