博客园  :: 首页  :: 新随笔  :: 联系 :: 订阅 订阅  :: 管理

导入物料时,可分别写三个接口表

Posted on 2012-09-22 16:23  奥客  阅读(830)  评论(0编辑  收藏  举报

mtl_system_items_interface ,mtl_item_categories_interface,mtl_desc_elem_val_interface
然后跑请求集就可以了

        --call request set
        success := fnd_submit.set_request_set('CUX',
                                              'CUX_IMP_ITEM_PROD_NO');
        IF (success) THEN
            success := fnd_submit.submit_program('INV',
                                                 'INCOIN',
                                                 'IMPORT_ITEM',
                                                 ln_org_id,
                                                 1, --ALL ORG
                                                 1, --VALIDATE ITEM
                                                 1, --PROCESS ITEM
                                                 1, --DELETE ITEM
                                                 p_no_id, --set process
                                                 1 --'CREATE'
                                                 );
            IF (NOT success) THEN
                x_return_status := 'E';
                x_err_msg       := '提交请求 导入物料 异常';
                RETURN;
            END IF;
        
            success := fnd_submit.submit_program('INV',
                                                 'INV_ITEM_CAT_ASSIGN_OI',
                                                 'IMP_ITEM_CATEGORY',
                                                 p_no_id,
                                                 1,
                                                 1);
            IF (NOT success) THEN
                x_return_status := 'E';
                x_err_msg       := '提交请求 物料类别分配开放接口 异常';
                RETURN;
            END IF;
        
            success := fnd_submit.submit_program('INV',
                                                 'INV_ITEM_CAT_GRP_ELE_OI',
                                                 'IMP_ITEM_CATALOG',
                                                 p_no_id,
                                                 1,
                                                 1);
            IF (NOT success) THEN
                x_return_status := 'E';
                x_err_msg       := '提交请求 物料目录组要素开放接口 异常';
                RETURN;
            END IF;