1.如何启动自定义的触发器
execute_trigger('MEMU_CHECK_TRR');
2.提交
COMMIT_FORM;
3.参数列表
DECLARE
W_PL PARAMLIST; //定义一个参数列表
BEGIN
W_PL := CREATE_PARAMETER_LIST('FORM');
ADD_PARAMETER(W_PL, 'ORDSEQ', TEXT_PARAMETER, W_ORDSEQ); //增加参数
CALL_FORM('PC', NO_HIDE, DO_REPLACE, NO_QUERY_ONLY, NO_SHARE_LIBRARY_DATA, W_PL);
//调用一个FORM
DESTROY_PARAMETER_LIST(W_PL); //销毁
END;
4.LOV调用不同的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的查询语句
populate_group_with_query(recordgroup_name,query)
在第二个参数里输入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
谭明 阅读(340)
评论(0) 编辑 收藏 所属分类:
Developer Forms