這篇文章的內(nèi)容主要圍繞在PL/SQL中調(diào)用Oracle ERP提交請(qǐng)求集的示例分析進(jìn)行講述，文章內(nèi)容清晰易懂，條理清晰，非常適合新手學(xué)習(xí)，值得大家去閱讀。感興趣的朋友可以跟隨小編一起閱讀吧。希望大家通過這篇文章有所收獲！

創(chuàng)新互聯(lián)專注于企業(yè)成都全網(wǎng)營銷推廣、網(wǎng)站重做改版、武強(qiáng)網(wǎng)站定制設(shè)計(jì)、自適應(yīng)品牌網(wǎng)站建設(shè)、H5開發(fā)、成都商城網(wǎng)站開發(fā)、集團(tuán)公司官網(wǎng)建設(shè)、外貿(mào)營銷網(wǎng)站建設(shè)、高端網(wǎng)站制作、響應(yīng)式網(wǎng)頁設(shè)計(jì)等建站業(yè)務(wù)，價(jià)格優(yōu)惠性價(jià)比高，為武強(qiáng)等各大城市提供網(wǎng)站開發(fā)制作服務(wù)。

PROCEDURE prc_do_import_set(prm_org     IN NUMBER,
                              prm_appcode OUT NUMBER,
                              prm_appmsg  OUT VARCHAR2) IS
    custom_exception EXCEPTION;
    success        BOOLEAN;
    v_request_id   NUMBER;
    v_phase        VARCHAR2(30);
    v_status       VARCHAR2(30);
    v_dev_phase    VARCHAR2(30);
    v_dev_status   VARCHAR2(30);
    v_message      VARCHAR2(1000);
    v_request_flag BOOLEAN;
    v_start_time   VARCHAR2(30);
  BEGIN
    prm_appcode := 0;
    --初始化設(shè)置
    fnd_global.apps_initialize(user_id      => global_user_id,
                               resp_id      => global_resp_id,
                               resp_appl_id => global_resp_appl_id);
    --設(shè)置請(qǐng)求集
    success := fnd_submit.set_request_set('INV', 'PLM_ERP_IMPORT');
    IF NOT success THEN
      RAISE custom_exception;
    END IF;
    --設(shè)置單請(qǐng)求參數(shù)
    success := fnd_submit.submit_program('INV',
                                         'INCOIN',
                                         'STAGE10',
                                         prm_org,
                                         '1',
                                         '1',
                                         '1',
                                         '1',
                                         '1',
                                         '1',
                                         chr(0));
    IF NOT success THEN
      RAISE custom_exception;
    END IF;
    v_start_time := to_char(SYSDATE, 'DD-MON-YYYY HH24:MI:SS');
    v_request_id := fnd_submit.submit_set(v_start_time, FALSE);
    IF v_request_id = 0 THEN
      RAISE custom_exception;
    ELSE
      COMMIT;
    END IF;
    --等待
    v_request_flag := fnd_concurrent.wait_for_request(request_id => v_request_id,
                                                      INTERVAL   => 5,
                                                      max_wait   => 0,
                                                      phase      => v_phase,
                                                      status     => v_status,
                                                      dev_phase  => v_dev_phase,
                                                      dev_status => v_dev_status,
                                                      message    => v_message);
    IF v_request_flag THEN
      IF v_dev_status = 'NORMAL' THEN
        NULL;
      ELSE
        RAISE custom_exception;
      END IF;
    ELSE
      RAISE custom_exception;
    END IF;
  EXCEPTION
    WHEN custom_exception THEN
      prm_appcode := -1;
      prm_appmsg  := '錯(cuò)誤提示：導(dǎo)入ERP正式表出錯(cuò)！' || SQLERRM;
    WHEN OTHERS THEN
      prm_appcode := -1;
      prm_appmsg  := '錯(cuò)誤提示：導(dǎo)入ERP正式表出錯(cuò)！' || SQLERRM;
  END prc_do_import_set;

感謝你的閱讀，相信你對(duì)“在PL/SQL中調(diào)用Oracle ERP提交請(qǐng)求集的示例分析”這一問題有一定的了解，快去動(dòng)手實(shí)踐吧，如果想了解更多相關(guān)知識(shí)點(diǎn)，可以關(guān)注創(chuàng)新互聯(lián)網(wǎng)站！小編會(huì)繼續(xù)為大家?guī)砀玫奈恼拢?/p>
標(biāo)題名稱：在PL/SQL中調(diào)用OracleERP提交請(qǐng)求集的示例分析
文章地址：http://weahome.cn/article/jeeiis.html