1.如何啟動(dòng)自定義的觸發(fā)器
execute_trigger('MEMU_CHECK_TRR');
2.提交
COMMIT_FORM;
3.參數(shù)列表
DECLARE
W_PL PARAMLIST; //定義一個(gè)參數(shù)列表
BEGIN
W_PL := CREATE_PARAMETER_LIST('FORM');
ADD_PARAMETER(W_PL, 'ORDSEQ', TEXT_PARAMETER, W_ORDSEQ); //增加參數(shù)
CALL_FORM('PC', NO_HIDE, DO_REPLACE, NO_QUERY_ONLY, NO_SHARE_LIBRARY_DATA, W_PL);
//調(diào)用一個(gè)FORM
DESTROY_PARAMETER_LIST(W_PL); //銷(xiāo)毀
END;
4.LOV調(diào)用不同的RECORD_GROUP
if SUBSTR(:pdc_1,1,1)='A' then
SET_LOV_PROPERTY('LOV',GROUP_NAME,RECORD1);
else
SET_LOV_PROPERTY('LOV',GROUP_NAME,RECORD2);
end if;
5.更改record_group的查詢語(yǔ)句
populate_group_with_query(recordgroup_name,query)
在第二個(gè)參數(shù)里輸入select查詢,修改記錄組,從而修改lov
POPULATE_GROUP_WITH_QUERY('NAME','SELECT ORDNO FROM ORD')
6.record_group記錄組
RG_ID := FIND_GROUP('NAME1');
IF NOT ID_NULL(RG_ID) THEN
DELETE_GROUP(RG_ID);
END IF;
RG_ID := CREATE_GROUP('NAME');
RG_ID := CREATE_GROUP_FROM_QUERY('NAME1',W_QUERY);
IF GET_LOV_PROPERTY('NAME',GROUP_NAME) = 'NAME' THEN
SET_LOV_PROPERTY('NAME',GROUP_NAME,RG_ID);
END IF;
W_LOV := SHOW_LOV('NAME');
posted on 2008-05-23 14:34
譚明 閱讀(347)
評(píng)論(0) 編輯 收藏 所屬分類(lèi):
Developer Forms