EBSForm内打开请求界面-创新互联

某情况下，会用到在EBS Form界面内打开请求提交界面，实现方式如下:

专注于为中小企业提供成都网站制作、做网站服务,电脑端+手机端+微信端的三站合一,更高效的管理,为中小企业下陆免费做网站提供优质的服务。我们立足成都，凝聚了一批互联网行业人才，有力地推动了上千余家企业的稳健成长，帮助中小企业通过网站建设实现规模扩充和转变。

fnd_function.execute(

  function_name => 'FND_FNDRSRUN',

  other_params => 'PROGRAM_APPL_SHORT_NAME="CUX" CONCURRENT_PROGRAM_NAME="XXXXX" CHAR1="' || XXXX || '" SUBMIT_ONCE="Y"'

);

上述操作可以直接带参数打开某个并发请求的提交界面。

如果当前职责的菜单没有挂载“FND_FNDRSRUN”这个功能，那就只能通过 open_form 或者 call_form 的方式来打开了。

这两个都是form内置函数，可以查询帮助手册查看详细介绍。

如下代码适用于根据请求ID打开请求查询界面:

PROCEDURE View_Request_Id(Vn_Request_Id IN NUMBER) IS     Param             Paramlist;     Vv_Conc_Prog_Name VARCHAR2(30) := 'CUXXXXXX'; BEGIN     IF Vn_Request_Id IS NULL THEN         RETURN;     END IF;     Param := Get_Parameter_List(Vv_Conc_Prog_Name);     IF NOT Id_Null(Param) THEN         Destroy_Parameter_List(Param);     END IF;     Param := Create_Parameter_List(Vv_Conc_Prog_Name);     Add_Parameter(Param, 'mode', Text_Parameter, 'VIEW');     Add_Parameter(Param, 'use_org', Text_Parameter, 'N');     Add_Parameter(Param,                   'DODT_REQ_ID',                   Text_Parameter,                   To_Char(Vn_Request_Id));     Open_Form(Fnd_Navigate.Formpath('FND', 'FNDRSRUN'),               Activate,               Session,               Param); END View_Request;

另外有需要云服务器可以了解下创新互联cdcxhl.cn，海内外云服务器15元起步，三天无理由+7*72小时售后在线，公司持有idc许可证，提供“云服务器、裸金属服务器、高防服务器、香港服务器、美国服务器、虚拟主机、免备案服务器”等云主机租用服务以及企业上云的综合解决方案，具有“安全稳定、简单易用、服务可用性高、性价比高”等特点与优势，专为企业上云打造定制，能够满足用户丰富、多元化的应用场景需求。

标题名称：EBSForm内打开请求界面-创新互联
标题来源：http://dzwzjz.com/article/dipjoh.html