1: PACKAGE BODY INVPULI4 AS
2: /* $Header: INVPUL4B.pls 120.6.12010000.2 2008/09/23 21:04:35 atjen ship $ */
3:
4: /*NP 31AUG94 Note for future release: Have removed reference to all expense accounts
5: **in assign_master_defaults and assign_item_defaults.
104:
105: BEGIN
106:
107: IF l_inv_debug_level IN(101, 102) THEN
108: INVPUTLI.info('Inside INVPULI4.assign_status_attributes');
109: END IF;
110:
111: SELECT * INTO AttRec
112: FROM MTL_SYSTEM_ITEMS_INTERFACE
418: return(0);
419:
420: EXCEPTION
421: WHEN OTHERS THEN
422: err_text := substr('INVPULI4.assign_status_attributes ' || SQLERRM, 1, 240);
423: return(SQLCODE);
424: END assign_status_attributes;
425:
426:
423: return(SQLCODE);
424: END assign_status_attributes;
425:
426:
427: END INVPULI4;