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...