Oracle EBS API:fnd_request.submit_request
--submit the request l_req_id_fee := fnd_request.submit_request('PO', 'REQIMPORT', '', '', FALSE, 'POP_REQUEST', to_char(SYSDATE, 'YYYYMMDD'), 'ALL', '', 'N', 'N'); if (l_req_id_fee is null) or (l_req_id_fee = 0) then raise l_submit_req; else --提交请求 COMMIT; --更新状态(只有请求成功,状态才更改) UPDATE hek_om_pop_headers_all SET flow_status = 'reg_purchase' --select * from hek_om_pop_headers_all WHERE header_id IN (SELECT h.header_id FROM hek_om_pop_headers_v h WHERE h.flow_status = 'wait'); COMMIT; end if;
1 、关于 fnd_request.submit_request 的用法
fnd_request.submit_request的用法:
FND_REQUEST.SUBMIT_REQUEST函数是用来提交一个请求的,它返回一个NUMBER值.具体调用如下
:result:=fnd_request.submit_request(applicationCHAR,--AP模快
programCHAR,--应用程序
descriptionCHAR,--请求说明(可选)
start_timeCHAR,--RUN时间(可选)
sub_requestBOOLEAN,--是否作为子请求提交
argument1CHAR,--参数1
argument2CHAR,--参数2
argument3CHAR,--参数3
argument4CHAR,--参数4
argument5CHAR,--参数5.......
argument100CHAR);
英文说明(ztoracle):
Parameters are as follows:application - Short name of the application associated with the concurrent request to be submitted.
program - Short name of the concurrent program (not the executable) for which the request should be submitted.
description - Description of the request that is displayed in the Concurrent Requests form (Optional.)
start_time - Time at which the request should start running, formatted as HH24: MI or HH24:MI:SS (Optional.)
sub_request - Set to TRUE if the request is submitted from another request and should be treated as a sub-request.
argument1...100 - Arguments for the concurrent request; up to 100
argumentsarepermitted.IfsubmittedfromOracleForms,youmustspecifyall
100 arguments.补充说明:
在用fnd_request.submit_request的时候,第五个参数用false,不要被参数名称误导;
这个函数有105个参数,前面五个定义请求本身,后面100个是传递给请求的具体参数,都是Char类型,
我们需要转换,默认值是chr(0),代表这个参数不用传递给调用的请求;
在Package里面调用只需要传递需要的参数个数,因为它有默认值指示结束;
在 form 里面则不行,要写满 105 个,而且我们参数结束之后要用一个 chr(0) 来表示结束例
fnd_request.submit_request('AR',
'SVAINEX_P',
'',
'',
FALSE,
:parameter.invoice_store,
chr(0),
'','','',
'','','','','','','','','','','','','','','','','','','','',
'','','','','','','','','','','','','','','','','','','','',
'','','','','','','','','','','','','','','','','','','','',
'','','','','','','','','','','','','','','','','','','','',
'','','','','','','','','','','','','','','');2 、 Oracle Erp 等待报表运行机制
主要是用到了 Fnd_concurrent.wait_for_ruqest 这个 function.
Fnd_concurrent.wait_for_request 返回 Boolean 值,主要参数如下:
function FND_CONCURRENT.WAIT_FOR_REQUEST
(request_id IN number default NULL, -- 请求 ID
interval IN number default 60, -- 检查时间间隔
max_wait IN number default 0, -- 最大等待时间
phase OUT varchar2,
status OUT varchar2,
dev_phase OUT varchar2, -- 请求运行阶段
dev_status OUT varchar2, -- 各个阶段状态
message OUT varchar2 -- 运行完成后输出信息 )
return boolean;
dev_phase 有 Pending,Running,Complete,Inactive 等几种,每种对应不同的 Dev-Status ,比如 Complete 阶段后就有 Normal,Error,Warning,Cancelled,Terminated 等几种状态。
l_request_status := Fnd_Concurrent.Wait_For_Request(l_request_id, 5, 0, l_phase, l_status, l_dev_phase, l_dev_status, l_message); IF l_request_status THEN IF l_dev_status = 'NORMAL' THEN NULL; ELSE Fnd_Message.Debug('请求运行不成功:'||l_dev_status); RETURN; END IF; ELSE Fnd_Message.Debug('请求未完成,无法查看报表内容!'); RETURN; END IF; Editor_Pkg.Report(l_request_id,'Y');
总结: FND_REQUEST.SUBMIT_REQUEST 是一种通过后台方式提交请教的方法,可以在 pkg 和 form 中使用,在 form 中使用要将参数写全。 FND_CONCURRENT.WAIT_FOR_REQUEST 是一个等待当前请求运行完毕的程序,可以利用这个等待当前的请求程序运行完毕再运行下面的程序。
我的总结,在pl/sql 执行一个request ,也就是 将界面方式提交的请求变成 代码的方法不能写全100 个参数,同时,request 的执行是需要一个时间的,必须判断他们的状态才能够进行下一步的操作。有的情况则需要并发来执行。