1、APEX调用代码
DECLARE
v_Argument_Array Apps.Xxsrm_Util_Request_Pkg.Argumentarray;
v_Req_Id
NUMBER
;
BEGIN
IF
:P5_Date
IS
NOT
NULL
THEN
Apps.Xxsrm_Util_Request_Pkg.Proc_Init_Parameters(v_Argument_Array);
v_Argument_Array(
1
) := :P5_Date;
-- Import cost option
v_Argument_Array(
2
) :=
Chr
(
0
);
v_Req_Id := Apps.Xxsrm_Util_Request_Pkg.Func_Submit_Request(Pi_User_Id => :g_User_Id
,Pi_Resp_Id => :g_Resp_Id
,Pi_Resp_App_Id => :g_Resp_App_Id
,Pi_Appl_Short_Name =>
'XXCUS'
,Pi_Program_Short_Name =>
'XXAPEX_105_MATERIAL_TRX'
,Pi_Description =>
''
,Pi_Start_Date => To_Char(
SYSDATE
)
,Pi_Sub_Request =>
FALSE
,Pi_Argument_Array => v_Argument_Array);
IF
v_Req_Id <=
0
THEN
Apex_Error.Add_Error(p_Message =>
'刷新请求失败!'
,p_Display_Location => Apex_Error.c_Inline_In_Notification);
RETURN
;
END
IF
;
ELSE
Apex_Error.Add_Error(p_Message =>
'刷新天数不能为空!'
,p_Display_Location => Apex_Error.c_Inline_In_Notification);
END
IF
;
END
;
2、提交请求公用包
*
3、挂载请求注意事项
- 被请求的程序包
1、两个参数要在程序包最前面,顺序不能变
Errbuf
OUT
VARCHAR2 , Retcode OUT NUMBER
![](https://img-blog.csdnimg.cn/2022010700331917380.png)
参数说明:
Errbuf
: It return the error message.
For you program if you get any error in exception block you can assign the error message to this parameter.
This error message you can see after concurrent program run go to details button it will open details in that Completion Text filed
will show your errbuf.
Retcode : This parameter returns the status of the concurrent program.
0- Success --Completed
1- Warning -- Yellow color
2- Error -- Red
2、日期类型为 varchar2,传入之后使用函数转换为DATE类型
Ld_Start := Apps.Fnd_Conc_Date.String_To_Date(Pi_Inv_Start_Date);
- 挂载的程序
1、参数类型
数字类型:10/Number
日期类型:FND_STANDARD_DATE