PL SQL呼叫系統標準的請求例項

原文：

需求：實現**商的介面匯入：

匯入**商、**商位址和**商聯絡人的資訊。

定義變數：

--提交標準併發請求時的引數

l_request_id1 number;

l_request_id2 number;

l_request_id3 number;

l_request_id4 number;

l_bl_result1 boolean;

l_bl_result2 boolean;

l_bl_result3 boolean;

呼叫標準的請求，將三個介面表中的資料匯入到系統中。

實現sql如下：

if v_supplier_error_flag = 'n' and v_supplier_site_error_flag = 'n' and  

v_supplier_contact_error_flag = 'n' then 
--分ou的匯入,並且初始化ou 
for l_cur_submit in cur_submit loop 
v_org_id := null; --初始化ou 
v_org_id := get_org_id(l_cur_submit.org_name); 
--初始化環境變數 
set_policy_context(v_org_id); 
--呼叫標準的併發請求 
--呼叫**商的併發請求 
l_request_id1 := fnd_request.submit_request('sqlap', --應用簡稱 
'apxsuimp', --併發程式 
'', 
'', 
false, 
'new', 
1000, 
'n', 
'n', 
'n', 
chr(0)); 
commit; 
if l_request_id1 is null or l_request_id1 = 0 then 
retcode := 2; 
errbuf := '**商介面匯入標準表出錯!'; 
return; 
end if; 
l_bl_result1 := fnd_concurrent.wait_for_request(l_request_id1, --等待的請求 
1, --間隔時間 
0, --等待時間 
v_phase, 
v_status, 
v_dev_phase, 
v_dev_status, 
v_message); 
if v_dev_phase = 'complete' and v_dev_status = 'normal' then 
--呼叫**商地點的併發請求 
l_request_id2 := fnd_request.submit_request('sqlap', --應用簡稱 
'apxssimp', --併發程式 
'', 
'', 
false, 
'new', 
1000, 
'n', 
'n', 
'n', 
chr(0)); 
commit; 
if l_request_id2 is null or l_request_id2 = 0 then 
retcode := 2; 
errbuf := '**商地點介面匯入標準表出錯!'; 
return; 
end if; 
l_bl_result2 := fnd_concurrent.wait_for_request(l_request_id2, --等待的請求 
1, --間隔時間 
0, --等待時間 
v_phase, 
v_status, 
v_dev_phase, 
v_dev_status, 
v_message); 
if v_dev_phase = 'complete' and v_dev_status = 'normal' then 
--呼叫**商地點聯絡人的併發請求 
l_request_id3 := fnd_request.submit_request('sqlap', --應用簡稱 
'apxscimp', --併發程式 
'', 
'', 
false, 
'new', 
1000, 
'n', 
'n', 
'n', 
chr(0)); 
commit; 
if l_request_id3 is null or l_request_id3 = 0 then 
retcode := 2; 
errbuf := '**商地點聯絡人介面匯入標準表出錯!'; 
return; 
end if; 
l_bl_result3 := fnd_concurrent.wait_for_request(l_request_id3, --等待的請求 
1, --間隔時間 
0, --等待時間 
v_phase, 
v_status, 
v_dev_phase, 
v_dev_status, 
v_message); 
if v_dev_phase <> 'complete' and v_dev_status <> 'normal' then 
retcode := 2; 
errbuf := '**商地點聯絡人介面匯入標準表出錯!'; 
return; 
end if; 
end if; 
end if; 
commit; 
end loop; --結束loop迴圈 
end if;

呼叫標準請求報錯

呼叫標準的請求 fnd request.submit request 匯入採購申請報錯 在當前職責下需要進行模擬登陸以及初始化請求的ou 如下 begin 在當前職責下初始化 poresp id 20707,mo global.set policy context p access mode s p...

JAVA http的post請求 例項

例項一 string uriapi 這是我測試的本地,大家可以隨意改 建立httpost物件 namevaluepair實現請求引數的封裝 list params new arraylist params.add new basicnamevaluepair u 沈大海 params.add new...

PL SQL的遞迴呼叫

已知表route,欄位和內容如下 起始節點 終止節點 距離 a b 100 a c 150 a d 200 b e 300 b f 800 e g 100 e h 300 要求找出從節點a開始能到達的所有路徑 1.建立表route,插入資料 create table route begin node...