1: PACKAGE BODY INVPAGI3 AS
2: /* $Header: INVPAG3B.pls 120.10.12020000.5 2013/01/23 08:22:50 lmai ship $ */
3:
4: l_process_flag_1 CONSTANT NUMBER := 1;
5: l_process_flag_2 CONSTANT NUMBER := 2;
97: --End: Jewen
98: begin
99:
100: IF l_inv_debug_level IN(101, 102) THEN
101: INVPUTLI.info('INVPAGI3.assign_item_revs : begin');
102: END IF;
103:
104: /*
105: ** assign all the missing organization_id from organization_code
339:
340: exception
341:
342: when ASSIGN_ERROR then
343: err_text := 'assign error raised in INVPAGI3.assign_item_revs with message:' || err_text; --added by bug 11894684
344: return(status);
345: when LOGGING_ERROR then
346: err_text := 'logging error raised in INVPAGI3.assign_item_revs with message:' || err_text; --added by bug 11894684
347: return(dumm_status);
342: when ASSIGN_ERROR then
343: err_text := 'assign error raised in INVPAGI3.assign_item_revs with message:' || err_text; --added by bug 11894684
344: return(status);
345: when LOGGING_ERROR then
346: err_text := 'logging error raised in INVPAGI3.assign_item_revs with message:' || err_text; --added by bug 11894684
347: return(dumm_status);
348: when OTHERS then
349: --Bug 13813134
350: error_msg := substr('INVPAGI3.assign_item_revs:' || SQLERRM , 1, 240);
346: err_text := 'logging error raised in INVPAGI3.assign_item_revs with message:' || err_text; --added by bug 11894684
347: return(dumm_status);
348: when OTHERS then
349: --Bug 13813134
350: error_msg := substr('INVPAGI3.assign_item_revs:' || SQLERRM , 1, 240);
351: err_text := error_msg;
352: dumm_status := INVPUOPI.mtl_log_interface_err(
353: org_id,
354: user_id,
367:
368: end assign_item_revs;
369:
370:
371: end INVPAGI3;