在运行时将初始值设置为数据块列
Set initial value to datablock column in runtime
如何在按下 F6 键(新行)时为数据库中的数据块中的列设置初始值,并在取消新行输入时清除该值?
组合框有 WHEN-LIST-CHANGED 个触发器:
declare
where_param varchar2(250);
begin
:LOCAL.CUR_CUSNUM := :LOCAL.ORG_LIST;
if :LOCAL.CUR_CUSNUM is not null then
:LOCAL.WHERE_STRING := 'CUSNUM = ' || :LOCAL.CUR_CUSNUM;
else
:LOCAL.WHERE_STRING := '1=1';
end if;
Set_Block_Property('MC_ZVP_PL_TRUSTED_PEOPLE_CORP', DEFAULT_WHERE, :LOCAL.WHERE_STRING);
Go_Block('MC_ZVP_PL_TRUSTED_PEOPLE_CORP');
--Clear_Block('MC_ZVP_PL_TRUSTED_PEOPLE_CORP');
Execute_Query;
end;
我需要根据组合框中的选定元素设置初始值或某种东西来插入行,组合框中的值对用户隐藏。
在 MC_ZVP_PL_TRUSTED_PEOPLE_CORP 块上使用 WHEN-CREATE-RECORD 触发器
如何在按下 F6 键(新行)时为数据库中的数据块中的列设置初始值,并在取消新行输入时清除该值?
组合框有 WHEN-LIST-CHANGED 个触发器:
declare
where_param varchar2(250);
begin
:LOCAL.CUR_CUSNUM := :LOCAL.ORG_LIST;
if :LOCAL.CUR_CUSNUM is not null then
:LOCAL.WHERE_STRING := 'CUSNUM = ' || :LOCAL.CUR_CUSNUM;
else
:LOCAL.WHERE_STRING := '1=1';
end if;
Set_Block_Property('MC_ZVP_PL_TRUSTED_PEOPLE_CORP', DEFAULT_WHERE, :LOCAL.WHERE_STRING);
Go_Block('MC_ZVP_PL_TRUSTED_PEOPLE_CORP');
--Clear_Block('MC_ZVP_PL_TRUSTED_PEOPLE_CORP');
Execute_Query;
end;
我需要根据组合框中的选定元素设置初始值或某种东西来插入行,组合框中的值对用户隐藏。
在 MC_ZVP_PL_TRUSTED_PEOPLE_CORP 块上使用 WHEN-CREATE-RECORD 触发器