廢話:
有一段時間沒搞過開發了,做項目又要重新找回點開發的記憶。重新拾回一點點零碎。
跑多了產線,配置的一些參數也忘記得差不多了,長時間沒動就是易遺忘,找點資料做個筆記就是時間保鏢。
正題:
FND_REQUEST.SUBMIT_REQUEST 函數是用來提交一個請求的,它返回一個NUMBER值.具體調用如下
:result := fnd_request.submit_request(application CHAR, --模快
program CHAR, --應用程式
description CHAR, --請求說明(可選)
start_time CHAR, --RUN 時間(可選)
sub_request BOOLEAN, --立刻提交請求
argument1 CHAR, --參數1
argument2 CHAR, --參數2
argument3 CHAR, --參數3
argument4 CHAR, --參數4
argument5 CHAR, --參數5.......
argument100 CHAR);
英文說明 :
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 arguments are permitted. If submitted from Oracle Forms, you must specify all 100 arguments.
補充說明:
在用fnd_request.submit_request的時候,第五個參數用false,不要被參數名稱誤導;
這個函數有105個參數,前面五個定義請求本身,后面100個是傳遞給請求的具體參數,都是Char類型,
我們需要轉換,默認值是chr(0),代表這個參數不用傳遞給調用的請求;
注意:
1. 在Package里面調用只需要傳遞需要的參數個數,因為它有默認值指示結束;
2. 在form里面則不行,要寫滿105個,而且我們參數結束之后要用一個chr(0)來表示結束 。
如何查Application(模塊), program(程序)
有兩種方法:一種是從界面上去查,第二種通過SQL去查。
方法一:
首先你需得先知道要執行哪支程序(名稱)。查到后你可以看到有:簡稱,應用產品。簡稱就是Request中的Program項的值。
然后依據對應的“應用產品”名稱,到“注冊”中去查找,會發現有個簡稱,而這個“簡稱”就是Request對應的Application的值。
方法二:
SELECT DISTINCT
fa.APPLICATION_SHORT_NAME,
fa.BASEPATH,
fat.APPLICATION_NAME,
fe.EXECUTABLE_NAME,
fe.EXECUTION_FILE_NAME,
fcp.CONCURRENT_PROGRAM_NAME,
fcp.OUTPUT_FILE_TYPE,
fcp.OUTPUT_PRINT_STYLE,
fcpT.USER_CONCURRENT_PROGRAM_NAME,
fcpT.LANGUAGE,
fcpT.DESCRIPTION
FROM fnd_application_tl fat,
fnd_application fa,
fnd_concurrent_programs_tl fcpt,
fnd_concurrent_programs fcp,
fnd_executables fe
WHERE 1 = 1
AND fat.APPLICATION_ID = fa.APPLICATION_ID
AND fat.LANGUAGE = fcpt.LANGUAGE
AND fa.APPLICATION_ID = fcp.APPLICATION_ID
AND fcpt.LANGUAGE = 'ZHS'
AND fcpt.CONCURRENT_PROGRAM_ID = fcp.CONCURRENT_PROGRAM_ID
AND fcp.executable_id = fe.executable_id
--AND fcp.enabled_flag = 'Y'
AND fe.EXECUTABLE_NAME = 'RVCTP' -- 要查詢的報表簡稱
在FORM里提交REQUEST(模板)
在Form里面,可以用APPS.FND_REQUEST.SUBMIT_REQUEST
提交一個Request到Oracle Request Manager。
如果提交成功,該函數返回Request ID,否則,返回0。
初始化
在提交一個Request之前,我們會調用Oracle Standard的Procedure對這個Request做一些基本的參數的初始化。
APPS.FND_GLOBAL.apps_initialize
user_id =>APPS.FND_GLOBAL.user_id,
resp_id =>APPS.FND_GLOBAL.resp_id,
resp_appl_id =>APPS.FND_GLOBAL.resp_appl_id
);
FND_REQUEST.SUBMIT_REQUEST
函數APPS.FND_REQUEST.SUBMIT_REQUEST有105個參數:
APPS.FND_REQUEST.SUBMIT_REQUEST
(
APPLICATION IN VARCHAR2 DEFAULT NULL,
PROGRAM IN VARCHAR2 DEFAULT NULL,
DESCRIPTION IN VARCHAR2 DEFAULT NULL,
START_TIME IN VARCHAR2 DEFAULT NULL,
SUB_REQUEST IN BOOLEAN DEFAULT FALSE,
chr(0),'','','','','','','','','','','','','','','','','','','',
'','','','','','','','','','', '','','','','','','','','','',
'','','','','','','','','','', '','','','','','','','','','',
'','','','','','','','','','', '','','','','','','','','','',
'','','','','','','','','','', '','','','','','','','','',''
)
RETURN NUMBER;
例子
PROCEDURE SUBMIT_REQUEST(p_group_id number) IS
v_request_id number;
v_org_id number;
BEGIN
FND_GLOBAL.APPS_INITIALIZE(FND_GLOBAL.USER_ID,
FND_GLOBAL.RESP_ID,
FND_GLOBAL.RESP_APPL_ID);
select OPERATING_UNIT
into v_org_id
from ORG_ORGANIZATION_DEFINITIONS
where 1=1
and organization_id = :parameter.org_id;
v_request_id := FND_request.SUBMIT_request( 'PO', 'RVCTP', '', '', false,
'BATCH', p_group_id, v_org_id, CHR(0), '', '', '', '', '', '',
'', '', '', '', '', '', '', '', '', '',
'', '', '', '', '', '', '', '', '', '',
'', '', '', '', '', '', '', '', '', '',
'', '', '', '', '', '', '', '', '', '',
'', '', '', '', '', '', '', '', '', '',
'', '', '', '', '', '', '', '', '', '',
'', '', '', '', '', '', '', '', '', '',
'', '', '', '', '', '', '', '', '', '',
'', '', '', '', '', '', '', '', '', '' );
Commit;
FND_MESSAGE.DEBUG('已提交后台程序'||':'||'Request_Id='||v_request_id);
END;
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等幾種狀態。
例如:
BEGIN
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');
END;
總結:FND_REQUEST.SUBMIT_REQUEST是一種通過后台方式提交請教的方法,可以在pkg和 form中使用,在form中使用要將參數寫全。 FND_CONCURRENT.WAIT_FOR_REQUEST是一個等待當前請求運行完畢的程序,可以利用這個等待當前的請求程序運行完畢再運行下面的程序。
有時候提交請求一直會返回0的情況:
檢查是否有初始化環境:
-- 在PLSQL中設定初始的方法
SELECT user_id
INTO l_num_user_id
FROM applsys.fnd_user
WHERE user_name ='user_name';
SELECT responsibility_id
INTO l_num_resp_id
FROM apps.fnd_responsibility_vl
WHERE responsibility_name ='responsibility_name';
SELECT application_id
INTO l_num_resp_appl_id
FROM applsys.fnd_application
WHERE application_short_name = 'app_short_name';
fnd_global.apps_initialize (user_id => l_num_user_id,
resp_id => l_num_resp_id,
resp_appl_id => l_num_resp_appl_id
);
-- 在Form設定初始的方法
-- 可直接引用全局變量
FND_GLOBAL.APPS_INITIALIZE(FND_GLOBAL.USER_ID,
FND_GLOBAL.RESP_ID,
FND_GLOBAL.RESP_APPL_ID);