1. 程式人生 > >通過程式碼呼叫併發請求

通過程式碼呼叫併發請求

1、呼叫請求,成功並跳轉到請求介面
l_reqid := fnd_request.submit_request(‘CUX’
,’CUX70INVITF’
,:wms_manage.description
,NULL
,FALSE
,:wms_manage.subinventory_code
,rec.organization_id
,:wms_manage.description
,to_char(:wms_manage.disabled_date
,’yyyy-mm-dd’)
,:wms_manage.attribute_code
,chr(0));

IF l_reqid > 0 THEN lb_commit := app_form.quietcommit;
fnd_function.execute(function_name => ‘FND_FNDRSRUN’
,open_flag => ‘Y’
,session_flag => ‘Y’
,other_params => ‘CONCURRENT_PROGRAM_NAME=”CUXDISIBP”
PROGRAM_APPL_SHORT_NAME=”CUX” DODT_REQ_ID=”’ ||
to_char(l_reqid) || ‘”’);
ELSE
fnd_message.set_string(‘提交併發失敗!’);
fnd_message.error;
RAISE form_trigger_failure;
END IF;

2、提交請求後跳轉到請求介面
fnd_function.execute(function_name => ‘FND_FNDRSRUN’,
open_flag => ‘Y’,
session_flag => ‘Y’,
other_params => ‘DODT_REQ_ID=’ || l_reqid || ’ ’ || ‘PROGRAM_APPL_SHORT_NAME=”CUX”’ || ’ ’ ||
‘CONCURRENT_PROGRAM_NAME=”CUXCFG007”’);