EBS Form內打開請求界面
阿新 • • 發佈:2018-07-20
情況下 情況 func false ber mode activate pen call 某情況下,會用到在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;
EBS Form內打開請求界面