[Home] [Help]
17: ,p_config_rec IN OUT NOCOPY OE_BULK_CONFIG_UTIL.CONFIG_REC_TYPE
18: )
19: IS
20: --
21: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
22: --
23: BEGIN
24:
25: IF l_debug_level > 0 THEN
22: --
23: BEGIN
24:
25: IF l_debug_level > 0 THEN
26: oe_debug_pub.add( 'ENTERING OE_BULK_CONFIG_UTIL.Extend_Line_Rec ') ;
27: END IF;
28:
29: p_line_rec.ATO_LINE_ID.extend(p_count - p_line_rec.ATO_LINE_ID.count);
30: p_line_rec.BOOKED_FLAG.extend(p_count - p_line_rec.BOOKED_FLAG.count);
71: p_config_rec.bom_item_type.extend(p_count - p_config_rec.bom_item_type.count );
72: p_config_rec.replenish_to_order_flag.extend(p_count - p_config_rec.replenish_to_order_flag.count );
73:
74: IF l_debug_level > 0 THEN
75: oe_debug_pub.add( 'EXITING OE_BULK_CONFIG_UTIL.Extend_Line_Rec ') ;
76: END IF;
77:
78:
79: EXCEPTION
78:
79: EXCEPTION
80: WHEN OTHERS THEN
81: IF l_debug_level > 0 THEN
82: oe_debug_pub.add( 'OTHERS ERROR , EXTEND_LINE_REC' ) ;
83: oe_debug_pub.add( SUBSTR ( SQLERRM , 1 , 240 ) ) ;
84: END IF;
85: OE_BULK_MSG_PUB.Add_Exc_Msg
86: ( G_PKG_NAME
79: EXCEPTION
80: WHEN OTHERS THEN
81: IF l_debug_level > 0 THEN
82: oe_debug_pub.add( 'OTHERS ERROR , EXTEND_LINE_REC' ) ;
83: oe_debug_pub.add( SUBSTR ( SQLERRM , 1 , 240 ) ) ;
84: END IF;
85: OE_BULK_MSG_PUB.Add_Exc_Msg
86: ( G_PKG_NAME
87: , 'Extend_Line_Rec'
95: ,p_config_rec IN OE_BULK_CONFIG_UTIL.CONFIG_REC_TYPE
96: )
97: IS
98: --
99: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
100: --
101: BEGIN
102:
103: IF l_debug_level > 0 THEN
100: --
101: BEGIN
102:
103: IF l_debug_level > 0 THEN
104: oe_debug_pub.add( 'ENTERING OE_BULK_CONFIG_UTIL.Print_Line_Rec ') ;
105: END IF;
106:
107:
108: IF l_debug_level > 0 THEN
107:
108: IF l_debug_level > 0 THEN
109: FOR I IN 1..p_line_rec.line_id.count LOOP
110:
111: oe_debug_pub.add( ' ===== PRINT LINE_REC LOOP INDEX : I = '|| I ) ;
112: oe_debug_pub.add( ' ATO_LINE_ID = ' || p_line_rec.ATO_LINE_ID(I));
113: oe_debug_pub.add( ' BOOKED_FLAG = ' || p_line_rec.BOOKED_FLAG(I));
114: oe_debug_pub.add( ' COMPONENT_CODE = ' || p_line_rec.COMPONENT_CODE(I) );
115: oe_debug_pub.add( ' COMPONENT_NUMBER = ' || p_line_rec.COMPONENT_NUMBER(I) );
108: IF l_debug_level > 0 THEN
109: FOR I IN 1..p_line_rec.line_id.count LOOP
110:
111: oe_debug_pub.add( ' ===== PRINT LINE_REC LOOP INDEX : I = '|| I ) ;
112: oe_debug_pub.add( ' ATO_LINE_ID = ' || p_line_rec.ATO_LINE_ID(I));
113: oe_debug_pub.add( ' BOOKED_FLAG = ' || p_line_rec.BOOKED_FLAG(I));
114: oe_debug_pub.add( ' COMPONENT_CODE = ' || p_line_rec.COMPONENT_CODE(I) );
115: oe_debug_pub.add( ' COMPONENT_NUMBER = ' || p_line_rec.COMPONENT_NUMBER(I) );
116: oe_debug_pub.add( ' COMPONENT_SEQUENCE_ID = ' || p_line_rec.COMPONENT_SEQUENCE_ID(I) );
109: FOR I IN 1..p_line_rec.line_id.count LOOP
110:
111: oe_debug_pub.add( ' ===== PRINT LINE_REC LOOP INDEX : I = '|| I ) ;
112: oe_debug_pub.add( ' ATO_LINE_ID = ' || p_line_rec.ATO_LINE_ID(I));
113: oe_debug_pub.add( ' BOOKED_FLAG = ' || p_line_rec.BOOKED_FLAG(I));
114: oe_debug_pub.add( ' COMPONENT_CODE = ' || p_line_rec.COMPONENT_CODE(I) );
115: oe_debug_pub.add( ' COMPONENT_NUMBER = ' || p_line_rec.COMPONENT_NUMBER(I) );
116: oe_debug_pub.add( ' COMPONENT_SEQUENCE_ID = ' || p_line_rec.COMPONENT_SEQUENCE_ID(I) );
117: oe_debug_pub.add( ' CONFIG_HEADER_ID = ' || p_line_rec.CONFIG_HEADER_ID(I) );
110:
111: oe_debug_pub.add( ' ===== PRINT LINE_REC LOOP INDEX : I = '|| I ) ;
112: oe_debug_pub.add( ' ATO_LINE_ID = ' || p_line_rec.ATO_LINE_ID(I));
113: oe_debug_pub.add( ' BOOKED_FLAG = ' || p_line_rec.BOOKED_FLAG(I));
114: oe_debug_pub.add( ' COMPONENT_CODE = ' || p_line_rec.COMPONENT_CODE(I) );
115: oe_debug_pub.add( ' COMPONENT_NUMBER = ' || p_line_rec.COMPONENT_NUMBER(I) );
116: oe_debug_pub.add( ' COMPONENT_SEQUENCE_ID = ' || p_line_rec.COMPONENT_SEQUENCE_ID(I) );
117: oe_debug_pub.add( ' CONFIG_HEADER_ID = ' || p_line_rec.CONFIG_HEADER_ID(I) );
118: oe_debug_pub.add( ' CONFIG_REV_NBR = ' || p_line_rec.CONFIG_REV_NBR(I) );
111: oe_debug_pub.add( ' ===== PRINT LINE_REC LOOP INDEX : I = '|| I ) ;
112: oe_debug_pub.add( ' ATO_LINE_ID = ' || p_line_rec.ATO_LINE_ID(I));
113: oe_debug_pub.add( ' BOOKED_FLAG = ' || p_line_rec.BOOKED_FLAG(I));
114: oe_debug_pub.add( ' COMPONENT_CODE = ' || p_line_rec.COMPONENT_CODE(I) );
115: oe_debug_pub.add( ' COMPONENT_NUMBER = ' || p_line_rec.COMPONENT_NUMBER(I) );
116: oe_debug_pub.add( ' COMPONENT_SEQUENCE_ID = ' || p_line_rec.COMPONENT_SEQUENCE_ID(I) );
117: oe_debug_pub.add( ' CONFIG_HEADER_ID = ' || p_line_rec.CONFIG_HEADER_ID(I) );
118: oe_debug_pub.add( ' CONFIG_REV_NBR = ' || p_line_rec.CONFIG_REV_NBR(I) );
119: oe_debug_pub.add( ' CONFIG_DISPLAY_SEQUENCE = ' || p_line_rec.CONFIG_DISPLAY_SEQUENCE(I) );
112: oe_debug_pub.add( ' ATO_LINE_ID = ' || p_line_rec.ATO_LINE_ID(I));
113: oe_debug_pub.add( ' BOOKED_FLAG = ' || p_line_rec.BOOKED_FLAG(I));
114: oe_debug_pub.add( ' COMPONENT_CODE = ' || p_line_rec.COMPONENT_CODE(I) );
115: oe_debug_pub.add( ' COMPONENT_NUMBER = ' || p_line_rec.COMPONENT_NUMBER(I) );
116: oe_debug_pub.add( ' COMPONENT_SEQUENCE_ID = ' || p_line_rec.COMPONENT_SEQUENCE_ID(I) );
117: oe_debug_pub.add( ' CONFIG_HEADER_ID = ' || p_line_rec.CONFIG_HEADER_ID(I) );
118: oe_debug_pub.add( ' CONFIG_REV_NBR = ' || p_line_rec.CONFIG_REV_NBR(I) );
119: oe_debug_pub.add( ' CONFIG_DISPLAY_SEQUENCE = ' || p_line_rec.CONFIG_DISPLAY_SEQUENCE(I) );
120: oe_debug_pub.add( ' CONFIGURATION_ID = ' || p_line_rec.CONFIGURATION_ID(I) );
113: oe_debug_pub.add( ' BOOKED_FLAG = ' || p_line_rec.BOOKED_FLAG(I));
114: oe_debug_pub.add( ' COMPONENT_CODE = ' || p_line_rec.COMPONENT_CODE(I) );
115: oe_debug_pub.add( ' COMPONENT_NUMBER = ' || p_line_rec.COMPONENT_NUMBER(I) );
116: oe_debug_pub.add( ' COMPONENT_SEQUENCE_ID = ' || p_line_rec.COMPONENT_SEQUENCE_ID(I) );
117: oe_debug_pub.add( ' CONFIG_HEADER_ID = ' || p_line_rec.CONFIG_HEADER_ID(I) );
118: oe_debug_pub.add( ' CONFIG_REV_NBR = ' || p_line_rec.CONFIG_REV_NBR(I) );
119: oe_debug_pub.add( ' CONFIG_DISPLAY_SEQUENCE = ' || p_line_rec.CONFIG_DISPLAY_SEQUENCE(I) );
120: oe_debug_pub.add( ' CONFIGURATION_ID = ' || p_line_rec.CONFIGURATION_ID(I) );
121: oe_debug_pub.add( ' EXPLOSION_DATE = ' || p_line_rec.EXPLOSION_DATE(I) );
114: oe_debug_pub.add( ' COMPONENT_CODE = ' || p_line_rec.COMPONENT_CODE(I) );
115: oe_debug_pub.add( ' COMPONENT_NUMBER = ' || p_line_rec.COMPONENT_NUMBER(I) );
116: oe_debug_pub.add( ' COMPONENT_SEQUENCE_ID = ' || p_line_rec.COMPONENT_SEQUENCE_ID(I) );
117: oe_debug_pub.add( ' CONFIG_HEADER_ID = ' || p_line_rec.CONFIG_HEADER_ID(I) );
118: oe_debug_pub.add( ' CONFIG_REV_NBR = ' || p_line_rec.CONFIG_REV_NBR(I) );
119: oe_debug_pub.add( ' CONFIG_DISPLAY_SEQUENCE = ' || p_line_rec.CONFIG_DISPLAY_SEQUENCE(I) );
120: oe_debug_pub.add( ' CONFIGURATION_ID = ' || p_line_rec.CONFIGURATION_ID(I) );
121: oe_debug_pub.add( ' EXPLOSION_DATE = ' || p_line_rec.EXPLOSION_DATE(I) );
122: oe_debug_pub.add( ' HEADER_ID = ' || p_line_rec.HEADER_ID(I) );
115: oe_debug_pub.add( ' COMPONENT_NUMBER = ' || p_line_rec.COMPONENT_NUMBER(I) );
116: oe_debug_pub.add( ' COMPONENT_SEQUENCE_ID = ' || p_line_rec.COMPONENT_SEQUENCE_ID(I) );
117: oe_debug_pub.add( ' CONFIG_HEADER_ID = ' || p_line_rec.CONFIG_HEADER_ID(I) );
118: oe_debug_pub.add( ' CONFIG_REV_NBR = ' || p_line_rec.CONFIG_REV_NBR(I) );
119: oe_debug_pub.add( ' CONFIG_DISPLAY_SEQUENCE = ' || p_line_rec.CONFIG_DISPLAY_SEQUENCE(I) );
120: oe_debug_pub.add( ' CONFIGURATION_ID = ' || p_line_rec.CONFIGURATION_ID(I) );
121: oe_debug_pub.add( ' EXPLOSION_DATE = ' || p_line_rec.EXPLOSION_DATE(I) );
122: oe_debug_pub.add( ' HEADER_ID = ' || p_line_rec.HEADER_ID(I) );
123: oe_debug_pub.add( ' INVENTORY_ITEM_ID = ' || p_line_rec.INVENTORY_ITEM_ID(I) );
116: oe_debug_pub.add( ' COMPONENT_SEQUENCE_ID = ' || p_line_rec.COMPONENT_SEQUENCE_ID(I) );
117: oe_debug_pub.add( ' CONFIG_HEADER_ID = ' || p_line_rec.CONFIG_HEADER_ID(I) );
118: oe_debug_pub.add( ' CONFIG_REV_NBR = ' || p_line_rec.CONFIG_REV_NBR(I) );
119: oe_debug_pub.add( ' CONFIG_DISPLAY_SEQUENCE = ' || p_line_rec.CONFIG_DISPLAY_SEQUENCE(I) );
120: oe_debug_pub.add( ' CONFIGURATION_ID = ' || p_line_rec.CONFIGURATION_ID(I) );
121: oe_debug_pub.add( ' EXPLOSION_DATE = ' || p_line_rec.EXPLOSION_DATE(I) );
122: oe_debug_pub.add( ' HEADER_ID = ' || p_line_rec.HEADER_ID(I) );
123: oe_debug_pub.add( ' INVENTORY_ITEM_ID = ' || p_line_rec.INVENTORY_ITEM_ID(I) );
124: oe_debug_pub.add( ' ORDERED_ITEM_ID = ' || p_line_rec.ORDERED_ITEM_ID(I) );
117: oe_debug_pub.add( ' CONFIG_HEADER_ID = ' || p_line_rec.CONFIG_HEADER_ID(I) );
118: oe_debug_pub.add( ' CONFIG_REV_NBR = ' || p_line_rec.CONFIG_REV_NBR(I) );
119: oe_debug_pub.add( ' CONFIG_DISPLAY_SEQUENCE = ' || p_line_rec.CONFIG_DISPLAY_SEQUENCE(I) );
120: oe_debug_pub.add( ' CONFIGURATION_ID = ' || p_line_rec.CONFIGURATION_ID(I) );
121: oe_debug_pub.add( ' EXPLOSION_DATE = ' || p_line_rec.EXPLOSION_DATE(I) );
122: oe_debug_pub.add( ' HEADER_ID = ' || p_line_rec.HEADER_ID(I) );
123: oe_debug_pub.add( ' INVENTORY_ITEM_ID = ' || p_line_rec.INVENTORY_ITEM_ID(I) );
124: oe_debug_pub.add( ' ORDERED_ITEM_ID = ' || p_line_rec.ORDERED_ITEM_ID(I) );
125: oe_debug_pub.add( ' ITEM_IDENTIFIER_TYPE = ' || p_line_rec.ITEM_IDENTIFIER_TYPE(I) );
118: oe_debug_pub.add( ' CONFIG_REV_NBR = ' || p_line_rec.CONFIG_REV_NBR(I) );
119: oe_debug_pub.add( ' CONFIG_DISPLAY_SEQUENCE = ' || p_line_rec.CONFIG_DISPLAY_SEQUENCE(I) );
120: oe_debug_pub.add( ' CONFIGURATION_ID = ' || p_line_rec.CONFIGURATION_ID(I) );
121: oe_debug_pub.add( ' EXPLOSION_DATE = ' || p_line_rec.EXPLOSION_DATE(I) );
122: oe_debug_pub.add( ' HEADER_ID = ' || p_line_rec.HEADER_ID(I) );
123: oe_debug_pub.add( ' INVENTORY_ITEM_ID = ' || p_line_rec.INVENTORY_ITEM_ID(I) );
124: oe_debug_pub.add( ' ORDERED_ITEM_ID = ' || p_line_rec.ORDERED_ITEM_ID(I) );
125: oe_debug_pub.add( ' ITEM_IDENTIFIER_TYPE = ' || p_line_rec.ITEM_IDENTIFIER_TYPE(I) );
126: oe_debug_pub.add( ' ORDERED_ITEM = ' || p_line_rec.ORDERED_ITEM(I) );
119: oe_debug_pub.add( ' CONFIG_DISPLAY_SEQUENCE = ' || p_line_rec.CONFIG_DISPLAY_SEQUENCE(I) );
120: oe_debug_pub.add( ' CONFIGURATION_ID = ' || p_line_rec.CONFIGURATION_ID(I) );
121: oe_debug_pub.add( ' EXPLOSION_DATE = ' || p_line_rec.EXPLOSION_DATE(I) );
122: oe_debug_pub.add( ' HEADER_ID = ' || p_line_rec.HEADER_ID(I) );
123: oe_debug_pub.add( ' INVENTORY_ITEM_ID = ' || p_line_rec.INVENTORY_ITEM_ID(I) );
124: oe_debug_pub.add( ' ORDERED_ITEM_ID = ' || p_line_rec.ORDERED_ITEM_ID(I) );
125: oe_debug_pub.add( ' ITEM_IDENTIFIER_TYPE = ' || p_line_rec.ITEM_IDENTIFIER_TYPE(I) );
126: oe_debug_pub.add( ' ORDERED_ITEM = ' || p_line_rec.ORDERED_ITEM(I) );
127: oe_debug_pub.add( ' ITEM_REVISION = ' || p_line_rec.ITEM_REVISION(I) );
120: oe_debug_pub.add( ' CONFIGURATION_ID = ' || p_line_rec.CONFIGURATION_ID(I) );
121: oe_debug_pub.add( ' EXPLOSION_DATE = ' || p_line_rec.EXPLOSION_DATE(I) );
122: oe_debug_pub.add( ' HEADER_ID = ' || p_line_rec.HEADER_ID(I) );
123: oe_debug_pub.add( ' INVENTORY_ITEM_ID = ' || p_line_rec.INVENTORY_ITEM_ID(I) );
124: oe_debug_pub.add( ' ORDERED_ITEM_ID = ' || p_line_rec.ORDERED_ITEM_ID(I) );
125: oe_debug_pub.add( ' ITEM_IDENTIFIER_TYPE = ' || p_line_rec.ITEM_IDENTIFIER_TYPE(I) );
126: oe_debug_pub.add( ' ORDERED_ITEM = ' || p_line_rec.ORDERED_ITEM(I) );
127: oe_debug_pub.add( ' ITEM_REVISION = ' || p_line_rec.ITEM_REVISION(I) );
128: oe_debug_pub.add( ' ITEM_TYPE_CODE = ' || p_line_rec.ITEM_TYPE_CODE(I));
121: oe_debug_pub.add( ' EXPLOSION_DATE = ' || p_line_rec.EXPLOSION_DATE(I) );
122: oe_debug_pub.add( ' HEADER_ID = ' || p_line_rec.HEADER_ID(I) );
123: oe_debug_pub.add( ' INVENTORY_ITEM_ID = ' || p_line_rec.INVENTORY_ITEM_ID(I) );
124: oe_debug_pub.add( ' ORDERED_ITEM_ID = ' || p_line_rec.ORDERED_ITEM_ID(I) );
125: oe_debug_pub.add( ' ITEM_IDENTIFIER_TYPE = ' || p_line_rec.ITEM_IDENTIFIER_TYPE(I) );
126: oe_debug_pub.add( ' ORDERED_ITEM = ' || p_line_rec.ORDERED_ITEM(I) );
127: oe_debug_pub.add( ' ITEM_REVISION = ' || p_line_rec.ITEM_REVISION(I) );
128: oe_debug_pub.add( ' ITEM_TYPE_CODE = ' || p_line_rec.ITEM_TYPE_CODE(I));
129: oe_debug_pub.add( ' LINE_CATEGORY_CODE = ' || p_line_rec.LINE_CATEGORY_CODE(I) );
122: oe_debug_pub.add( ' HEADER_ID = ' || p_line_rec.HEADER_ID(I) );
123: oe_debug_pub.add( ' INVENTORY_ITEM_ID = ' || p_line_rec.INVENTORY_ITEM_ID(I) );
124: oe_debug_pub.add( ' ORDERED_ITEM_ID = ' || p_line_rec.ORDERED_ITEM_ID(I) );
125: oe_debug_pub.add( ' ITEM_IDENTIFIER_TYPE = ' || p_line_rec.ITEM_IDENTIFIER_TYPE(I) );
126: oe_debug_pub.add( ' ORDERED_ITEM = ' || p_line_rec.ORDERED_ITEM(I) );
127: oe_debug_pub.add( ' ITEM_REVISION = ' || p_line_rec.ITEM_REVISION(I) );
128: oe_debug_pub.add( ' ITEM_TYPE_CODE = ' || p_line_rec.ITEM_TYPE_CODE(I));
129: oe_debug_pub.add( ' LINE_CATEGORY_CODE = ' || p_line_rec.LINE_CATEGORY_CODE(I) );
130: oe_debug_pub.add( ' LINE_ID = ' || p_line_rec.LINE_ID(I) );
123: oe_debug_pub.add( ' INVENTORY_ITEM_ID = ' || p_line_rec.INVENTORY_ITEM_ID(I) );
124: oe_debug_pub.add( ' ORDERED_ITEM_ID = ' || p_line_rec.ORDERED_ITEM_ID(I) );
125: oe_debug_pub.add( ' ITEM_IDENTIFIER_TYPE = ' || p_line_rec.ITEM_IDENTIFIER_TYPE(I) );
126: oe_debug_pub.add( ' ORDERED_ITEM = ' || p_line_rec.ORDERED_ITEM(I) );
127: oe_debug_pub.add( ' ITEM_REVISION = ' || p_line_rec.ITEM_REVISION(I) );
128: oe_debug_pub.add( ' ITEM_TYPE_CODE = ' || p_line_rec.ITEM_TYPE_CODE(I));
129: oe_debug_pub.add( ' LINE_CATEGORY_CODE = ' || p_line_rec.LINE_CATEGORY_CODE(I) );
130: oe_debug_pub.add( ' LINE_ID = ' || p_line_rec.LINE_ID(I) );
131: oe_debug_pub.add( ' LINE_NUMBER = ' || p_line_rec.LINE_NUMBER(I) );
124: oe_debug_pub.add( ' ORDERED_ITEM_ID = ' || p_line_rec.ORDERED_ITEM_ID(I) );
125: oe_debug_pub.add( ' ITEM_IDENTIFIER_TYPE = ' || p_line_rec.ITEM_IDENTIFIER_TYPE(I) );
126: oe_debug_pub.add( ' ORDERED_ITEM = ' || p_line_rec.ORDERED_ITEM(I) );
127: oe_debug_pub.add( ' ITEM_REVISION = ' || p_line_rec.ITEM_REVISION(I) );
128: oe_debug_pub.add( ' ITEM_TYPE_CODE = ' || p_line_rec.ITEM_TYPE_CODE(I));
129: oe_debug_pub.add( ' LINE_CATEGORY_CODE = ' || p_line_rec.LINE_CATEGORY_CODE(I) );
130: oe_debug_pub.add( ' LINE_ID = ' || p_line_rec.LINE_ID(I) );
131: oe_debug_pub.add( ' LINE_NUMBER = ' || p_line_rec.LINE_NUMBER(I) );
132: oe_debug_pub.add( ' LINE_TYPE_ID = ' || p_line_rec.LINE_TYPE_ID(I) );
125: oe_debug_pub.add( ' ITEM_IDENTIFIER_TYPE = ' || p_line_rec.ITEM_IDENTIFIER_TYPE(I) );
126: oe_debug_pub.add( ' ORDERED_ITEM = ' || p_line_rec.ORDERED_ITEM(I) );
127: oe_debug_pub.add( ' ITEM_REVISION = ' || p_line_rec.ITEM_REVISION(I) );
128: oe_debug_pub.add( ' ITEM_TYPE_CODE = ' || p_line_rec.ITEM_TYPE_CODE(I));
129: oe_debug_pub.add( ' LINE_CATEGORY_CODE = ' || p_line_rec.LINE_CATEGORY_CODE(I) );
130: oe_debug_pub.add( ' LINE_ID = ' || p_line_rec.LINE_ID(I) );
131: oe_debug_pub.add( ' LINE_NUMBER = ' || p_line_rec.LINE_NUMBER(I) );
132: oe_debug_pub.add( ' LINE_TYPE_ID = ' || p_line_rec.LINE_TYPE_ID(I) );
133: oe_debug_pub.add( ' LINK_TO_LINE_ID = ' || p_line_rec.LINK_TO_LINE_ID(I) );
126: oe_debug_pub.add( ' ORDERED_ITEM = ' || p_line_rec.ORDERED_ITEM(I) );
127: oe_debug_pub.add( ' ITEM_REVISION = ' || p_line_rec.ITEM_REVISION(I) );
128: oe_debug_pub.add( ' ITEM_TYPE_CODE = ' || p_line_rec.ITEM_TYPE_CODE(I));
129: oe_debug_pub.add( ' LINE_CATEGORY_CODE = ' || p_line_rec.LINE_CATEGORY_CODE(I) );
130: oe_debug_pub.add( ' LINE_ID = ' || p_line_rec.LINE_ID(I) );
131: oe_debug_pub.add( ' LINE_NUMBER = ' || p_line_rec.LINE_NUMBER(I) );
132: oe_debug_pub.add( ' LINE_TYPE_ID = ' || p_line_rec.LINE_TYPE_ID(I) );
133: oe_debug_pub.add( ' LINK_TO_LINE_ID = ' || p_line_rec.LINK_TO_LINE_ID(I) );
134: oe_debug_pub.add( ' OPTION_FLAG = ' || p_line_rec.OPTION_FLAG(I) );
127: oe_debug_pub.add( ' ITEM_REVISION = ' || p_line_rec.ITEM_REVISION(I) );
128: oe_debug_pub.add( ' ITEM_TYPE_CODE = ' || p_line_rec.ITEM_TYPE_CODE(I));
129: oe_debug_pub.add( ' LINE_CATEGORY_CODE = ' || p_line_rec.LINE_CATEGORY_CODE(I) );
130: oe_debug_pub.add( ' LINE_ID = ' || p_line_rec.LINE_ID(I) );
131: oe_debug_pub.add( ' LINE_NUMBER = ' || p_line_rec.LINE_NUMBER(I) );
132: oe_debug_pub.add( ' LINE_TYPE_ID = ' || p_line_rec.LINE_TYPE_ID(I) );
133: oe_debug_pub.add( ' LINK_TO_LINE_ID = ' || p_line_rec.LINK_TO_LINE_ID(I) );
134: oe_debug_pub.add( ' OPTION_FLAG = ' || p_line_rec.OPTION_FLAG(I) );
135: oe_debug_pub.add( ' OPTION_NUMBER = ' || p_line_rec.OPTION_NUMBER(I) );
128: oe_debug_pub.add( ' ITEM_TYPE_CODE = ' || p_line_rec.ITEM_TYPE_CODE(I));
129: oe_debug_pub.add( ' LINE_CATEGORY_CODE = ' || p_line_rec.LINE_CATEGORY_CODE(I) );
130: oe_debug_pub.add( ' LINE_ID = ' || p_line_rec.LINE_ID(I) );
131: oe_debug_pub.add( ' LINE_NUMBER = ' || p_line_rec.LINE_NUMBER(I) );
132: oe_debug_pub.add( ' LINE_TYPE_ID = ' || p_line_rec.LINE_TYPE_ID(I) );
133: oe_debug_pub.add( ' LINK_TO_LINE_ID = ' || p_line_rec.LINK_TO_LINE_ID(I) );
134: oe_debug_pub.add( ' OPTION_FLAG = ' || p_line_rec.OPTION_FLAG(I) );
135: oe_debug_pub.add( ' OPTION_NUMBER = ' || p_line_rec.OPTION_NUMBER(I) );
136: oe_debug_pub.add( ' ORDERED_QUANTITY = ' || p_line_rec.ORDERED_QUANTITY(I) );
129: oe_debug_pub.add( ' LINE_CATEGORY_CODE = ' || p_line_rec.LINE_CATEGORY_CODE(I) );
130: oe_debug_pub.add( ' LINE_ID = ' || p_line_rec.LINE_ID(I) );
131: oe_debug_pub.add( ' LINE_NUMBER = ' || p_line_rec.LINE_NUMBER(I) );
132: oe_debug_pub.add( ' LINE_TYPE_ID = ' || p_line_rec.LINE_TYPE_ID(I) );
133: oe_debug_pub.add( ' LINK_TO_LINE_ID = ' || p_line_rec.LINK_TO_LINE_ID(I) );
134: oe_debug_pub.add( ' OPTION_FLAG = ' || p_line_rec.OPTION_FLAG(I) );
135: oe_debug_pub.add( ' OPTION_NUMBER = ' || p_line_rec.OPTION_NUMBER(I) );
136: oe_debug_pub.add( ' ORDERED_QUANTITY = ' || p_line_rec.ORDERED_QUANTITY(I) );
137: oe_debug_pub.add( ' ORDER_QUANTITY_UOM = ' || p_line_rec.ORDER_QUANTITY_UOM(I) );
130: oe_debug_pub.add( ' LINE_ID = ' || p_line_rec.LINE_ID(I) );
131: oe_debug_pub.add( ' LINE_NUMBER = ' || p_line_rec.LINE_NUMBER(I) );
132: oe_debug_pub.add( ' LINE_TYPE_ID = ' || p_line_rec.LINE_TYPE_ID(I) );
133: oe_debug_pub.add( ' LINK_TO_LINE_ID = ' || p_line_rec.LINK_TO_LINE_ID(I) );
134: oe_debug_pub.add( ' OPTION_FLAG = ' || p_line_rec.OPTION_FLAG(I) );
135: oe_debug_pub.add( ' OPTION_NUMBER = ' || p_line_rec.OPTION_NUMBER(I) );
136: oe_debug_pub.add( ' ORDERED_QUANTITY = ' || p_line_rec.ORDERED_QUANTITY(I) );
137: oe_debug_pub.add( ' ORDER_QUANTITY_UOM = ' || p_line_rec.ORDER_QUANTITY_UOM(I) );
138: oe_debug_pub.add( ' ORIG_SYS_DOCUMENT_REF = ' || p_line_rec.ORIG_SYS_DOCUMENT_REF(I) );
131: oe_debug_pub.add( ' LINE_NUMBER = ' || p_line_rec.LINE_NUMBER(I) );
132: oe_debug_pub.add( ' LINE_TYPE_ID = ' || p_line_rec.LINE_TYPE_ID(I) );
133: oe_debug_pub.add( ' LINK_TO_LINE_ID = ' || p_line_rec.LINK_TO_LINE_ID(I) );
134: oe_debug_pub.add( ' OPTION_FLAG = ' || p_line_rec.OPTION_FLAG(I) );
135: oe_debug_pub.add( ' OPTION_NUMBER = ' || p_line_rec.OPTION_NUMBER(I) );
136: oe_debug_pub.add( ' ORDERED_QUANTITY = ' || p_line_rec.ORDERED_QUANTITY(I) );
137: oe_debug_pub.add( ' ORDER_QUANTITY_UOM = ' || p_line_rec.ORDER_QUANTITY_UOM(I) );
138: oe_debug_pub.add( ' ORIG_SYS_DOCUMENT_REF = ' || p_line_rec.ORIG_SYS_DOCUMENT_REF(I) );
139: oe_debug_pub.add( ' ORIG_SYS_LINE_REF = ' || p_line_rec.ORIG_SYS_LINE_REF(I) );
132: oe_debug_pub.add( ' LINE_TYPE_ID = ' || p_line_rec.LINE_TYPE_ID(I) );
133: oe_debug_pub.add( ' LINK_TO_LINE_ID = ' || p_line_rec.LINK_TO_LINE_ID(I) );
134: oe_debug_pub.add( ' OPTION_FLAG = ' || p_line_rec.OPTION_FLAG(I) );
135: oe_debug_pub.add( ' OPTION_NUMBER = ' || p_line_rec.OPTION_NUMBER(I) );
136: oe_debug_pub.add( ' ORDERED_QUANTITY = ' || p_line_rec.ORDERED_QUANTITY(I) );
137: oe_debug_pub.add( ' ORDER_QUANTITY_UOM = ' || p_line_rec.ORDER_QUANTITY_UOM(I) );
138: oe_debug_pub.add( ' ORIG_SYS_DOCUMENT_REF = ' || p_line_rec.ORIG_SYS_DOCUMENT_REF(I) );
139: oe_debug_pub.add( ' ORIG_SYS_LINE_REF = ' || p_line_rec.ORIG_SYS_LINE_REF(I) );
140: oe_debug_pub.add( ' ORIG_SYS_SHIPMENT_REF = ' || p_line_rec.ORIG_SYS_SHIPMENT_REF(I) );
133: oe_debug_pub.add( ' LINK_TO_LINE_ID = ' || p_line_rec.LINK_TO_LINE_ID(I) );
134: oe_debug_pub.add( ' OPTION_FLAG = ' || p_line_rec.OPTION_FLAG(I) );
135: oe_debug_pub.add( ' OPTION_NUMBER = ' || p_line_rec.OPTION_NUMBER(I) );
136: oe_debug_pub.add( ' ORDERED_QUANTITY = ' || p_line_rec.ORDERED_QUANTITY(I) );
137: oe_debug_pub.add( ' ORDER_QUANTITY_UOM = ' || p_line_rec.ORDER_QUANTITY_UOM(I) );
138: oe_debug_pub.add( ' ORIG_SYS_DOCUMENT_REF = ' || p_line_rec.ORIG_SYS_DOCUMENT_REF(I) );
139: oe_debug_pub.add( ' ORIG_SYS_LINE_REF = ' || p_line_rec.ORIG_SYS_LINE_REF(I) );
140: oe_debug_pub.add( ' ORIG_SYS_SHIPMENT_REF = ' || p_line_rec.ORIG_SYS_SHIPMENT_REF(I) );
141: oe_debug_pub.add( ' SORT_ORDER = ' || p_line_rec.SORT_ORDER(I) );
134: oe_debug_pub.add( ' OPTION_FLAG = ' || p_line_rec.OPTION_FLAG(I) );
135: oe_debug_pub.add( ' OPTION_NUMBER = ' || p_line_rec.OPTION_NUMBER(I) );
136: oe_debug_pub.add( ' ORDERED_QUANTITY = ' || p_line_rec.ORDERED_QUANTITY(I) );
137: oe_debug_pub.add( ' ORDER_QUANTITY_UOM = ' || p_line_rec.ORDER_QUANTITY_UOM(I) );
138: oe_debug_pub.add( ' ORIG_SYS_DOCUMENT_REF = ' || p_line_rec.ORIG_SYS_DOCUMENT_REF(I) );
139: oe_debug_pub.add( ' ORIG_SYS_LINE_REF = ' || p_line_rec.ORIG_SYS_LINE_REF(I) );
140: oe_debug_pub.add( ' ORIG_SYS_SHIPMENT_REF = ' || p_line_rec.ORIG_SYS_SHIPMENT_REF(I) );
141: oe_debug_pub.add( ' SORT_ORDER = ' || p_line_rec.SORT_ORDER(I) );
142: oe_debug_pub.add( ' TOP_MODEL_LINE_ID = ' || p_line_rec.TOP_MODEL_LINE_ID(I) );
135: oe_debug_pub.add( ' OPTION_NUMBER = ' || p_line_rec.OPTION_NUMBER(I) );
136: oe_debug_pub.add( ' ORDERED_QUANTITY = ' || p_line_rec.ORDERED_QUANTITY(I) );
137: oe_debug_pub.add( ' ORDER_QUANTITY_UOM = ' || p_line_rec.ORDER_QUANTITY_UOM(I) );
138: oe_debug_pub.add( ' ORIG_SYS_DOCUMENT_REF = ' || p_line_rec.ORIG_SYS_DOCUMENT_REF(I) );
139: oe_debug_pub.add( ' ORIG_SYS_LINE_REF = ' || p_line_rec.ORIG_SYS_LINE_REF(I) );
140: oe_debug_pub.add( ' ORIG_SYS_SHIPMENT_REF = ' || p_line_rec.ORIG_SYS_SHIPMENT_REF(I) );
141: oe_debug_pub.add( ' SORT_ORDER = ' || p_line_rec.SORT_ORDER(I) );
142: oe_debug_pub.add( ' TOP_MODEL_LINE_ID = ' || p_line_rec.TOP_MODEL_LINE_ID(I) );
143: oe_debug_pub.add( ' TOP_MODEL_LINE_REF = ' || p_line_rec.TOP_MODEL_LINE_REF(I) );
136: oe_debug_pub.add( ' ORDERED_QUANTITY = ' || p_line_rec.ORDERED_QUANTITY(I) );
137: oe_debug_pub.add( ' ORDER_QUANTITY_UOM = ' || p_line_rec.ORDER_QUANTITY_UOM(I) );
138: oe_debug_pub.add( ' ORIG_SYS_DOCUMENT_REF = ' || p_line_rec.ORIG_SYS_DOCUMENT_REF(I) );
139: oe_debug_pub.add( ' ORIG_SYS_LINE_REF = ' || p_line_rec.ORIG_SYS_LINE_REF(I) );
140: oe_debug_pub.add( ' ORIG_SYS_SHIPMENT_REF = ' || p_line_rec.ORIG_SYS_SHIPMENT_REF(I) );
141: oe_debug_pub.add( ' SORT_ORDER = ' || p_line_rec.SORT_ORDER(I) );
142: oe_debug_pub.add( ' TOP_MODEL_LINE_ID = ' || p_line_rec.TOP_MODEL_LINE_ID(I) );
143: oe_debug_pub.add( ' TOP_MODEL_LINE_REF = ' || p_line_rec.TOP_MODEL_LINE_REF(I) );
144: oe_debug_pub.add( ' ORDER_SOURCE_ID = ' || p_line_rec.ORDER_SOURCE_ID(I) );
137: oe_debug_pub.add( ' ORDER_QUANTITY_UOM = ' || p_line_rec.ORDER_QUANTITY_UOM(I) );
138: oe_debug_pub.add( ' ORIG_SYS_DOCUMENT_REF = ' || p_line_rec.ORIG_SYS_DOCUMENT_REF(I) );
139: oe_debug_pub.add( ' ORIG_SYS_LINE_REF = ' || p_line_rec.ORIG_SYS_LINE_REF(I) );
140: oe_debug_pub.add( ' ORIG_SYS_SHIPMENT_REF = ' || p_line_rec.ORIG_SYS_SHIPMENT_REF(I) );
141: oe_debug_pub.add( ' SORT_ORDER = ' || p_line_rec.SORT_ORDER(I) );
142: oe_debug_pub.add( ' TOP_MODEL_LINE_ID = ' || p_line_rec.TOP_MODEL_LINE_ID(I) );
143: oe_debug_pub.add( ' TOP_MODEL_LINE_REF = ' || p_line_rec.TOP_MODEL_LINE_REF(I) );
144: oe_debug_pub.add( ' ORDER_SOURCE_ID = ' || p_line_rec.ORDER_SOURCE_ID(I) );
145: oe_debug_pub.add( ' LOCK_CONTROL = ' || p_line_rec.LOCK_CONTROL(I) );
138: oe_debug_pub.add( ' ORIG_SYS_DOCUMENT_REF = ' || p_line_rec.ORIG_SYS_DOCUMENT_REF(I) );
139: oe_debug_pub.add( ' ORIG_SYS_LINE_REF = ' || p_line_rec.ORIG_SYS_LINE_REF(I) );
140: oe_debug_pub.add( ' ORIG_SYS_SHIPMENT_REF = ' || p_line_rec.ORIG_SYS_SHIPMENT_REF(I) );
141: oe_debug_pub.add( ' SORT_ORDER = ' || p_line_rec.SORT_ORDER(I) );
142: oe_debug_pub.add( ' TOP_MODEL_LINE_ID = ' || p_line_rec.TOP_MODEL_LINE_ID(I) );
143: oe_debug_pub.add( ' TOP_MODEL_LINE_REF = ' || p_line_rec.TOP_MODEL_LINE_REF(I) );
144: oe_debug_pub.add( ' ORDER_SOURCE_ID = ' || p_line_rec.ORDER_SOURCE_ID(I) );
145: oe_debug_pub.add( ' LOCK_CONTROL = ' || p_line_rec.LOCK_CONTROL(I) );
146: oe_debug_pub.add( ' line_index = ' || p_line_rec.line_index(I) );
139: oe_debug_pub.add( ' ORIG_SYS_LINE_REF = ' || p_line_rec.ORIG_SYS_LINE_REF(I) );
140: oe_debug_pub.add( ' ORIG_SYS_SHIPMENT_REF = ' || p_line_rec.ORIG_SYS_SHIPMENT_REF(I) );
141: oe_debug_pub.add( ' SORT_ORDER = ' || p_line_rec.SORT_ORDER(I) );
142: oe_debug_pub.add( ' TOP_MODEL_LINE_ID = ' || p_line_rec.TOP_MODEL_LINE_ID(I) );
143: oe_debug_pub.add( ' TOP_MODEL_LINE_REF = ' || p_line_rec.TOP_MODEL_LINE_REF(I) );
144: oe_debug_pub.add( ' ORDER_SOURCE_ID = ' || p_line_rec.ORDER_SOURCE_ID(I) );
145: oe_debug_pub.add( ' LOCK_CONTROL = ' || p_line_rec.LOCK_CONTROL(I) );
146: oe_debug_pub.add( ' line_index = ' || p_line_rec.line_index(I) );
147: oe_debug_pub.add( ' header_index = ' || p_line_rec.header_index(I) );
140: oe_debug_pub.add( ' ORIG_SYS_SHIPMENT_REF = ' || p_line_rec.ORIG_SYS_SHIPMENT_REF(I) );
141: oe_debug_pub.add( ' SORT_ORDER = ' || p_line_rec.SORT_ORDER(I) );
142: oe_debug_pub.add( ' TOP_MODEL_LINE_ID = ' || p_line_rec.TOP_MODEL_LINE_ID(I) );
143: oe_debug_pub.add( ' TOP_MODEL_LINE_REF = ' || p_line_rec.TOP_MODEL_LINE_REF(I) );
144: oe_debug_pub.add( ' ORDER_SOURCE_ID = ' || p_line_rec.ORDER_SOURCE_ID(I) );
145: oe_debug_pub.add( ' LOCK_CONTROL = ' || p_line_rec.LOCK_CONTROL(I) );
146: oe_debug_pub.add( ' line_index = ' || p_line_rec.line_index(I) );
147: oe_debug_pub.add( ' header_index = ' || p_line_rec.header_index(I) );
148: oe_debug_pub.add( ' Top_Bill_Sequence_Id = ' || p_line_rec.Top_Bill_Sequence_Id(I) );
141: oe_debug_pub.add( ' SORT_ORDER = ' || p_line_rec.SORT_ORDER(I) );
142: oe_debug_pub.add( ' TOP_MODEL_LINE_ID = ' || p_line_rec.TOP_MODEL_LINE_ID(I) );
143: oe_debug_pub.add( ' TOP_MODEL_LINE_REF = ' || p_line_rec.TOP_MODEL_LINE_REF(I) );
144: oe_debug_pub.add( ' ORDER_SOURCE_ID = ' || p_line_rec.ORDER_SOURCE_ID(I) );
145: oe_debug_pub.add( ' LOCK_CONTROL = ' || p_line_rec.LOCK_CONTROL(I) );
146: oe_debug_pub.add( ' line_index = ' || p_line_rec.line_index(I) );
147: oe_debug_pub.add( ' header_index = ' || p_line_rec.header_index(I) );
148: oe_debug_pub.add( ' Top_Bill_Sequence_Id = ' || p_line_rec.Top_Bill_Sequence_Id(I) );
149: oe_debug_pub.add( ' cz_qty_match_flag = ' || p_line_rec.cz_qty_match_flag(I) );
142: oe_debug_pub.add( ' TOP_MODEL_LINE_ID = ' || p_line_rec.TOP_MODEL_LINE_ID(I) );
143: oe_debug_pub.add( ' TOP_MODEL_LINE_REF = ' || p_line_rec.TOP_MODEL_LINE_REF(I) );
144: oe_debug_pub.add( ' ORDER_SOURCE_ID = ' || p_line_rec.ORDER_SOURCE_ID(I) );
145: oe_debug_pub.add( ' LOCK_CONTROL = ' || p_line_rec.LOCK_CONTROL(I) );
146: oe_debug_pub.add( ' line_index = ' || p_line_rec.line_index(I) );
147: oe_debug_pub.add( ' header_index = ' || p_line_rec.header_index(I) );
148: oe_debug_pub.add( ' Top_Bill_Sequence_Id = ' || p_line_rec.Top_Bill_Sequence_Id(I) );
149: oe_debug_pub.add( ' cz_qty_match_flag = ' || p_line_rec.cz_qty_match_flag(I) );
150:
143: oe_debug_pub.add( ' TOP_MODEL_LINE_REF = ' || p_line_rec.TOP_MODEL_LINE_REF(I) );
144: oe_debug_pub.add( ' ORDER_SOURCE_ID = ' || p_line_rec.ORDER_SOURCE_ID(I) );
145: oe_debug_pub.add( ' LOCK_CONTROL = ' || p_line_rec.LOCK_CONTROL(I) );
146: oe_debug_pub.add( ' line_index = ' || p_line_rec.line_index(I) );
147: oe_debug_pub.add( ' header_index = ' || p_line_rec.header_index(I) );
148: oe_debug_pub.add( ' Top_Bill_Sequence_Id = ' || p_line_rec.Top_Bill_Sequence_Id(I) );
149: oe_debug_pub.add( ' cz_qty_match_flag = ' || p_line_rec.cz_qty_match_flag(I) );
150:
151: IF (I <= p_config_rec.high_quantity.count) THEN
144: oe_debug_pub.add( ' ORDER_SOURCE_ID = ' || p_line_rec.ORDER_SOURCE_ID(I) );
145: oe_debug_pub.add( ' LOCK_CONTROL = ' || p_line_rec.LOCK_CONTROL(I) );
146: oe_debug_pub.add( ' line_index = ' || p_line_rec.line_index(I) );
147: oe_debug_pub.add( ' header_index = ' || p_line_rec.header_index(I) );
148: oe_debug_pub.add( ' Top_Bill_Sequence_Id = ' || p_line_rec.Top_Bill_Sequence_Id(I) );
149: oe_debug_pub.add( ' cz_qty_match_flag = ' || p_line_rec.cz_qty_match_flag(I) );
150:
151: IF (I <= p_config_rec.high_quantity.count) THEN
152: oe_debug_pub.add( ' high_quantity = ' || p_config_rec.high_quantity(I));
145: oe_debug_pub.add( ' LOCK_CONTROL = ' || p_line_rec.LOCK_CONTROL(I) );
146: oe_debug_pub.add( ' line_index = ' || p_line_rec.line_index(I) );
147: oe_debug_pub.add( ' header_index = ' || p_line_rec.header_index(I) );
148: oe_debug_pub.add( ' Top_Bill_Sequence_Id = ' || p_line_rec.Top_Bill_Sequence_Id(I) );
149: oe_debug_pub.add( ' cz_qty_match_flag = ' || p_line_rec.cz_qty_match_flag(I) );
150:
151: IF (I <= p_config_rec.high_quantity.count) THEN
152: oe_debug_pub.add( ' high_quantity = ' || p_config_rec.high_quantity(I));
153: oe_debug_pub.add( ' low_quantity = ' || p_config_rec.low_quantity(I) );
148: oe_debug_pub.add( ' Top_Bill_Sequence_Id = ' || p_line_rec.Top_Bill_Sequence_Id(I) );
149: oe_debug_pub.add( ' cz_qty_match_flag = ' || p_line_rec.cz_qty_match_flag(I) );
150:
151: IF (I <= p_config_rec.high_quantity.count) THEN
152: oe_debug_pub.add( ' high_quantity = ' || p_config_rec.high_quantity(I));
153: oe_debug_pub.add( ' low_quantity = ' || p_config_rec.low_quantity(I) );
154: oe_debug_pub.add( ' mutually_exclusive_options = ' || p_config_rec.mutually_exclusive_options(I) );
155: oe_debug_pub.add( ' bom_item_type = ' || p_config_rec.bom_item_type(I) );
156: oe_debug_pub.add( ' replenish_to_order_flag = ' || p_config_rec.replenish_to_order_flag(I) );
149: oe_debug_pub.add( ' cz_qty_match_flag = ' || p_line_rec.cz_qty_match_flag(I) );
150:
151: IF (I <= p_config_rec.high_quantity.count) THEN
152: oe_debug_pub.add( ' high_quantity = ' || p_config_rec.high_quantity(I));
153: oe_debug_pub.add( ' low_quantity = ' || p_config_rec.low_quantity(I) );
154: oe_debug_pub.add( ' mutually_exclusive_options = ' || p_config_rec.mutually_exclusive_options(I) );
155: oe_debug_pub.add( ' bom_item_type = ' || p_config_rec.bom_item_type(I) );
156: oe_debug_pub.add( ' replenish_to_order_flag = ' || p_config_rec.replenish_to_order_flag(I) );
157: END IF;
150:
151: IF (I <= p_config_rec.high_quantity.count) THEN
152: oe_debug_pub.add( ' high_quantity = ' || p_config_rec.high_quantity(I));
153: oe_debug_pub.add( ' low_quantity = ' || p_config_rec.low_quantity(I) );
154: oe_debug_pub.add( ' mutually_exclusive_options = ' || p_config_rec.mutually_exclusive_options(I) );
155: oe_debug_pub.add( ' bom_item_type = ' || p_config_rec.bom_item_type(I) );
156: oe_debug_pub.add( ' replenish_to_order_flag = ' || p_config_rec.replenish_to_order_flag(I) );
157: END IF;
158:
151: IF (I <= p_config_rec.high_quantity.count) THEN
152: oe_debug_pub.add( ' high_quantity = ' || p_config_rec.high_quantity(I));
153: oe_debug_pub.add( ' low_quantity = ' || p_config_rec.low_quantity(I) );
154: oe_debug_pub.add( ' mutually_exclusive_options = ' || p_config_rec.mutually_exclusive_options(I) );
155: oe_debug_pub.add( ' bom_item_type = ' || p_config_rec.bom_item_type(I) );
156: oe_debug_pub.add( ' replenish_to_order_flag = ' || p_config_rec.replenish_to_order_flag(I) );
157: END IF;
158:
159: END LOOP;
152: oe_debug_pub.add( ' high_quantity = ' || p_config_rec.high_quantity(I));
153: oe_debug_pub.add( ' low_quantity = ' || p_config_rec.low_quantity(I) );
154: oe_debug_pub.add( ' mutually_exclusive_options = ' || p_config_rec.mutually_exclusive_options(I) );
155: oe_debug_pub.add( ' bom_item_type = ' || p_config_rec.bom_item_type(I) );
156: oe_debug_pub.add( ' replenish_to_order_flag = ' || p_config_rec.replenish_to_order_flag(I) );
157: END IF;
158:
159: END LOOP;
160: END IF;
159: END LOOP;
160: END IF;
161:
162: IF l_debug_level > 0 THEN
163: oe_debug_pub.add( 'EXITING OE_BULK_CONFIG_UTIL.Print_Line_Rec ') ;
164: END IF;
165:
166:
167: EXCEPTION
166:
167: EXCEPTION
168: WHEN OTHERS THEN
169: IF l_debug_level > 0 THEN
170: oe_debug_pub.add( 'OTHERS ERROR , PRINT_LINE_REC' ) ;
171: oe_debug_pub.add( SUBSTR ( SQLERRM , 1 , 240 ) ) ;
172: END IF;
173: OE_BULK_MSG_PUB.Add_Exc_Msg
174: ( G_PKG_NAME
167: EXCEPTION
168: WHEN OTHERS THEN
169: IF l_debug_level > 0 THEN
170: oe_debug_pub.add( 'OTHERS ERROR , PRINT_LINE_REC' ) ;
171: oe_debug_pub.add( SUBSTR ( SQLERRM , 1 , 240 ) ) ;
172: END IF;
173: OE_BULK_MSG_PUB.Add_Exc_Msg
174: ( G_PKG_NAME
175: , 'Print_Line_Rec'
218: FROM cz_config_messages
219: WHERE config_hdr_id = p_config_hdr_id
220: AND config_rev_nbr = p_config_rev_nbr;
221:
222: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
223:
224: BEGIN
225:
226: IF l_debug_level > 0 THEN
223:
224: BEGIN
225:
226: IF l_debug_level > 0 THEN
227: oe_debug_pub.add( 'ENTERING OE_BULK_CONFIG_UTIL.Message_From_Cz ') ;
228: END IF;
229: x_return_status := FND_API.G_RET_STS_SUCCESS;
230:
231: OPEN messages(l_config_header_id, l_config_rev_nbr);
234: FETCH messages into l_constraint,l_msg;
235: EXIT when messages%notfound;
236:
237: OE_BULK_Msg_Pub.Add_Text(l_msg);
238: oe_debug_pub.add('msg from spc: '||messages%rowcount , 2);
239: oe_debug_pub.add('msg from spc: '|| substr(l_msg, 1, 250) , 3);
240:
241: END LOOP;
242:
235: EXIT when messages%notfound;
236:
237: OE_BULK_Msg_Pub.Add_Text(l_msg);
238: oe_debug_pub.add('msg from spc: '||messages%rowcount , 2);
239: oe_debug_pub.add('msg from spc: '|| substr(l_msg, 1, 250) , 3);
240:
241: END LOOP;
242:
243: CLOSE messages;
259:
260: END IF;
261:
262: IF l_debug_level > 0 THEN
263: oe_debug_pub.add( 'EXITING OE_BULK_CONFIG_UTIL.Message_From_Cz ') ;
264: END IF;
265:
266:
267: EXCEPTION
275: END IF;
276: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
277:
278: IF l_debug_level > 0 THEN
279: OE_Debug_Pub.Add('UNEXPECTED_ERROR IN Message_From_Cz: '|| sqlerrm, 1);
280: END IF;
281:
282: WHEN OTHERS THEN
283: IF messages%ISOPEN THEN
303: ,x_return_status OUT NOCOPY VARCHAR2 )
304: IS
305:
306: l_profile VARCHAR2(10);
307: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
308: BEGIN
309:
310: IF l_debug_level > 0 THEN
311: OE_Debug_Pub.Add ('entering Get_Config_Effective_Date ', 3);
307: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
308: BEGIN
309:
310: IF l_debug_level > 0 THEN
311: OE_Debug_Pub.Add ('entering Get_Config_Effective_Date ', 3);
312: END IF;
313:
314: x_return_status := FND_API.G_RET_STS_SUCCESS;
315:
329: x_config_effective_date := null;
330: end if;
331: ELSE
332: IF l_debug_level > 0 THEN
333: OE_Debug_Pub.Add('System parameter ONT_CONFIG_EFFECTIVITY_DATE has wrong value', 3);
334: END IF;
335: END IF;
336:
337: IF l_debug_level > 0 THEN
334: END IF;
335: END IF;
336:
337: IF l_debug_level > 0 THEN
338: OE_Debug_Pub.Add
339: ('exiting Get_Config_Effective_Date '||
340: to_char(x_config_effective_date, 'DD-MON-YY HH24:MI:SS'), 3);
341: OE_Debug_Pub.Add('sysdate '||to_char(sysdate, 'DD-MON-YY HH24:MI:SS'),3);
342: END IF;
337: IF l_debug_level > 0 THEN
338: OE_Debug_Pub.Add
339: ('exiting Get_Config_Effective_Date '||
340: to_char(x_config_effective_date, 'DD-MON-YY HH24:MI:SS'), 3);
341: OE_Debug_Pub.Add('sysdate '||to_char(sysdate, 'DD-MON-YY HH24:MI:SS'),3);
342: END IF;
343:
344:
345: EXCEPTION
349:
350: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
351: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
352: IF l_debug_level > 0 THEN
353: OE_Debug_Pub.Add('UNEXPECTED_ERROR IN Get_Config_Effective_Date: '|| sqlerrm, 1);
354: END IF;
355:
356: WHEN OTHERS THEN
357: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
416: l_old_behavior VARCHAR2(1);
417: l_frozen_model_bill VARCHAR2(1);
418:
419: --
420: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
421: --
422: BEGIN
423:
424: IF l_debug_level > 0 THEN
421: --
422: BEGIN
423:
424: IF l_debug_level > 0 THEN
425: oe_debug_pub.add('ENTERING OE_BULK_CONFIG_UTIL.CREATE_HDR_XML' , 1);
426: END IF;
427:
428: -- now set the values from model_rec and org_id
429: l_context_org_id := OE_BULK_ORDER_PVT.G_ITEM_ORG;
434:
435: l_model_quantity := to_char(p_line_rec.ordered_quantity(p_line_index));
436:
437: IF l_debug_level > 0 THEN
438: oe_debug_pub.add( ' QTY: ' || L_MODEL_QUANTITY ||
439: ' CONFIG-HDR: ' || L_CONFIG_HEADER_ID ||
440: ' CONFIG-REV: ' || L_CONFIG_REV_NBR ||
441: ' ORG-ID: ' || L_CONTEXT_ORG_ID ||
442: ' ITEM-ID: ' || L_INVENTORY_ITEM_ID , 2 );
444:
445: -- profiles and env. variables.
446: l_database_id := fnd_web_config.database_id;
447: IF l_debug_level > 0 THEN
448: oe_debug_pub.add('DATABASE_ID: '|| L_DATABASE_ID , 2 );
449: END IF;
450:
451: -- set param_names
452:
494:
495:
496: IF OE_CODE_CONTROL.Get_Code_Release_Level >= '110508' THEN
497: IF l_debug_level > 0 THEN
498: oe_debug_pub.add('UCFGB MI , PACK H NEW LOGIC' , 1);
499: END IF;
500: param_value(18) := 'TRUE';
501: ELSE
502: param_value(18) := 'FALSE';
522: param_value(19) := null;
523: param_value(20) := null;
524:
525: IF l_debug_level > 0 THEN
526: oe_debug_pub.add('old behavior no dates', 2 );
527: END IF;
528: END IF;
529:
530: IF l_debug_level > 0 THEN
527: END IF;
528: END IF;
529:
530: IF l_debug_level > 0 THEN
531: oe_debug_pub.add('INSIDE CREATE_HDR_XML , PARAMETERS ARE SET' , 2 );
532: END IF;
533:
534:
535: l_rec_index := 1;
561: l_xml_hdr := l_xml_hdr || '';
562: l_xml_hdr := REPLACE(l_xml_hdr, ' ' , '+');
563:
564: IF l_debug_level > 0 THEN
565: oe_debug_pub.add('1ST PART OF CREATE_HDR_XML IS : '
566: ||SUBSTR ( L_XML_HDR , 1 , 200 ) , 3 );
567: oe_debug_pub.add('2ND PART OF CREATE_HDR_XML IS : '
568: ||SUBSTR ( L_XML_HDR , 201 , 200 ) , 3 );
569: oe_debug_pub.add('3RD PART OF CREATE_HDR_XML IS : '
563:
564: IF l_debug_level > 0 THEN
565: oe_debug_pub.add('1ST PART OF CREATE_HDR_XML IS : '
566: ||SUBSTR ( L_XML_HDR , 1 , 200 ) , 3 );
567: oe_debug_pub.add('2ND PART OF CREATE_HDR_XML IS : '
568: ||SUBSTR ( L_XML_HDR , 201 , 200 ) , 3 );
569: oe_debug_pub.add('3RD PART OF CREATE_HDR_XML IS : '
570: ||SUBSTR ( L_XML_HDR , 401 , 200 ) , 3 );
571: oe_debug_pub.add('4TH PART OF CREATE_HDR_XML IS : '
565: oe_debug_pub.add('1ST PART OF CREATE_HDR_XML IS : '
566: ||SUBSTR ( L_XML_HDR , 1 , 200 ) , 3 );
567: oe_debug_pub.add('2ND PART OF CREATE_HDR_XML IS : '
568: ||SUBSTR ( L_XML_HDR , 201 , 200 ) , 3 );
569: oe_debug_pub.add('3RD PART OF CREATE_HDR_XML IS : '
570: ||SUBSTR ( L_XML_HDR , 401 , 200 ) , 3 );
571: oe_debug_pub.add('4TH PART OF CREATE_HDR_XML IS : '
572: ||SUBSTR ( L_XML_HDR , 601 , 200 ) , 3 );
573: END IF;
567: oe_debug_pub.add('2ND PART OF CREATE_HDR_XML IS : '
568: ||SUBSTR ( L_XML_HDR , 201 , 200 ) , 3 );
569: oe_debug_pub.add('3RD PART OF CREATE_HDR_XML IS : '
570: ||SUBSTR ( L_XML_HDR , 401 , 200 ) , 3 );
571: oe_debug_pub.add('4TH PART OF CREATE_HDR_XML IS : '
572: ||SUBSTR ( L_XML_HDR , 601 , 200 ) , 3 );
573: END IF;
574:
575: x_xml_hdr := l_xml_hdr;
575: x_xml_hdr := l_xml_hdr;
576:
577: x_return_status := l_return_status;
578: IF l_debug_level > 0 THEN
579: oe_debug_pub.add('LENGTH OF INI MSG:' || LENGTH ( L_XML_HDR ) , 3 );
580: oe_debug_pub.add('EXITING CREATE_HDR_XML' , 3 );
581: END IF;
582: EXCEPTION
583: WHEN FND_API.G_EXC_ERROR THEN
576:
577: x_return_status := l_return_status;
578: IF l_debug_level > 0 THEN
579: oe_debug_pub.add('LENGTH OF INI MSG:' || LENGTH ( L_XML_HDR ) , 3 );
580: oe_debug_pub.add('EXITING CREATE_HDR_XML' , 3 );
581: END IF;
582: EXCEPTION
583: WHEN FND_API.G_EXC_ERROR THEN
584: x_return_status := FND_API.G_RET_STS_ERROR;
585:
586: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
587: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
588: IF l_debug_level > 0 THEN
589: oe_debug_pub.add('UNEXPECTED EXCEPTION IN CREATE_HDR_XML '|| SQLERRM , 1 );
590: END IF;
591:
592: WHEN OTHERS THEN
593: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
633: I NUMBER;
634: l_top_model_line_ref VARCHAR2(50);
635: l_top_model_line_id NUMBER;
636: --
637: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
638:
639: l_start_time NUMBER;
640: l_end_time NUMBER;
641:
643: --
644: BEGIN
645:
646: IF l_debug_level > 0 THEN
647: oe_debug_pub.add('ENTERING OE_BULK_CONFIG_UTIL.SEND_INPUT_XML' , 1);
648: oe_debug_pub.add('UIMANAGER URL: ' || L_URL , 2 );
649: END IF;
650: x_return_status := FND_API.G_RET_STS_SUCCESS;
651:
644: BEGIN
645:
646: IF l_debug_level > 0 THEN
647: oe_debug_pub.add('ENTERING OE_BULK_CONFIG_UTIL.SEND_INPUT_XML' , 1);
648: oe_debug_pub.add('UIMANAGER URL: ' || L_URL , 2 );
649: END IF;
650: x_return_status := FND_API.G_RET_STS_SUCCESS;
651:
652: l_xml_hdr := p_xml_hdr;
650: x_return_status := FND_API.G_RET_STS_SUCCESS;
651:
652: l_xml_hdr := p_xml_hdr;
653: IF l_debug_level > 0 THEN
654: oe_debug_pub.add('LENGTH OF INI MSG: ' || LENGTH ( L_XML_HDR ) , 2 );
655: END IF;
656:
657: -- If Model line cz_qty_match_flag is Y Then No need to send model
658: -- record on l_batch_val_tbl Else Send Model record on l_batch_val_tbl.
681: p_line_rec.top_model_line_ref(p_line_index + I) =
682: p_line_rec.top_model_line_ref(p_line_index) AND
683: p_line_rec.header_id(p_line_index + I) = p_line_rec.header_id(p_line_index) LOOP
684: IF l_debug_level > 0 THEN
685: oe_debug_pub.add('GET_OPTION : '
686: || p_line_rec.component_code(p_line_index + I) , 2 );
687: END IF;
688:
689: l_sequence := l_sequence + 1;
695: I := I + 1;
696: END LOOP;
697:
698: IF l_debug_level > 0 THEN
699: oe_debug_pub.add('OUT OF NEWLY INSERTED OPTIONS LOOP' , 2 );
700: END IF;
701: END IF;
702:
703: -- delete previous data.
707:
708: -- Call CZ batch validate API
709:
710: IF l_debug_level > 0 THEN
711: oe_debug_pub.add('BEFORE CALL CZ_BATCH_VALIDATE.Validate', 1);
712: END IF;
713:
714: SELECT hsecs INTO l_start_time from v$timer;
715:
723: SELECT hsecs INTO l_end_time from v$timer;
724: p_batch_validate_time := p_batch_validate_time + (l_end_time-l_start_time)/100;
725:
726: IF l_debug_level > 0 THEN
727: oe_debug_pub.add('AFTER CALL CZ_BATCH_VALIDATE.Validate , STATUS : '
728: ||L_VALIDATION_STATUS , 1);
729: END IF;
730:
731: IF (l_html_pieces.COUNT <= 0) THEN
729: END IF;
730:
731: IF (l_html_pieces.COUNT <= 0) THEN
732: IF l_debug_level > 0 THEN
733: oe_debug_pub.add('HTML_PIECES COUNT IS <= 0' , 2 );
734: END IF;
735: RAISE FND_API.G_EXC_ERROR;
736: END IF;
737:
738:
739: l_rec_index := l_html_pieces.FIRST;
740: LOOP
741: IF l_debug_level > 0 THEN
742: oe_debug_pub.add(L_REC_INDEX ||': PART OF OUTPUT_MESSAGE: '
743: || SUBSTR ( L_HTML_PIECES ( L_REC_INDEX ) , 1 , 100 ) , 2 );
744: END IF;
745:
746: l_long_xml := l_long_xml || l_html_pieces(l_rec_index);
753: -- if everything ok, set out values
754: x_out_xml_msg := l_long_xml;
755:
756: IF l_debug_level > 0 THEN
757: oe_debug_pub.add('EXITING OE_BULK_CONFIG_UTIL.SEND_INPUT_XML' , 1);
758: END IF;
759:
760: EXCEPTION
761: WHEN FND_API.G_EXC_ERROR THEN
764: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
765: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
766:
767: IF l_debug_level > 0 THEN
768: oe_debug_pub.add('AN UNEXP ERROR RAISED IN SEND_INPUT_XML: '
769: || SUBSTR ( SQLERRM , 1 , 100 ) , 1);
770: END IF;
771:
772: WHEN OTHERS THEN
846: l_constraint VARCHAR2(16);
847: l_flag VARCHAR2(1) := 'N';
848:
849: --
850: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
851: --
852: BEGIN
853:
854: IF l_debug_level > 0 THEN
851: --
852: BEGIN
853:
854: IF l_debug_level > 0 THEN
855: oe_debug_pub.add('ENTERING OE_CONGIG_UTIL.PARSE_OUTPUT_XML' , 1);
856: END IF;
857:
858:
859: l_exit_start_pos := INSTR(p_xml, l_exit_start_tag,1, 1) +
864: l_exit := SUBSTR (p_xml, l_exit_start_pos,
865: l_exit_end_pos - l_exit_start_pos + 1);
866:
867: IF l_debug_level > 0 THEN
868: oe_debug_pub.add('L_EXIT: ' || L_EXIT , 3 );
869: END IF;
870:
871: -- if error go to msg etc.
872: IF nvl(l_exit,'ERROR') <> 'ERROR' THEN
882: l_valid_config_end_pos -
883: l_valid_config_start_pos + 1);
884:
885: IF l_debug_level > 0 THEN
886: oe_debug_pub.add('GG1: '|| L_VALID_CONFIG , 3 );
887: END IF;
888:
889: -- ex :-
890: -- 1st instr : posin of a(22), 2nd instr gives posn of c(24)
901: l_complete_config_end_pos -
902: l_complete_config_start_pos + 1);
903:
904: IF l_debug_level > 0 THEN
905: oe_debug_pub.add('GG2: '|| L_COMPLETE_CONFIG , 3 );
906: END IF;
907:
908:
909: IF (nvl(l_valid_config, 'N') <> 'TRUE') THEN
907:
908:
909: IF (nvl(l_valid_config, 'N') <> 'TRUE') THEN
910: IF l_debug_level > 0 THEN
911: oe_debug_pub.add('SPC RETURNED VALID_FLAG AS NULL/FALSE' , 2 );
912: END IF;
913: l_flag := 'Y';
914: END IF ;
915:
915:
916:
917: IF (nvl(l_complete_config, 'N') <> 'TRUE' ) THEN
918: IF l_debug_level > 0 THEN
919: oe_debug_pub.add('COMPLETE_FLAG AS NULL/FALSE' , 2 );
920: END IF;
921: l_flag := 'Y';
922: END IF;
923:
921: l_flag := 'Y';
922: END IF;
923:
924: IF l_debug_level > 0 THEN
925: oe_debug_pub.add('SPC VALID_CONFIG FLAG: ' || L_VALID_CONFIG , 2 );
926: oe_debug_pub.add('COMPLETE_CONFIG FLAG: ' || L_COMPLETE_CONFIG , 2 );
927: END IF;
928:
929: END IF;
922: END IF;
923:
924: IF l_debug_level > 0 THEN
925: oe_debug_pub.add('SPC VALID_CONFIG FLAG: ' || L_VALID_CONFIG , 2 );
926: oe_debug_pub.add('COMPLETE_CONFIG FLAG: ' || L_COMPLETE_CONFIG , 2 );
927: END IF;
928:
929: END IF;
930:
941: l_message_text_end_pos -
942: l_message_text_start_pos + 1);
943:
944: IF l_debug_level > 0 THEN
945: oe_debug_pub.add('GG3: '|| L_MESSAGE_TEXT , 3 );
946: END IF;
947:
948: l_message_type_start_pos :=
949: INSTR(p_xml, l_message_type_start_tag,1, 1) +
959: -- get the latest config_header_id, and rev_nbr to get
960: -- messages if any.
961:
962: IF l_debug_level > 0 THEN
963: oe_debug_pub.add('SPC RETURNED MESSAGE_TEXT: '|| L_MESSAGE_TEXT , 2 );
964: oe_debug_pub.add('SPC RETURNED MESSAGE_TYPE: '|| L_MESSAGE_TYPE , 2 );
965: END IF;
966:
967:
960: -- messages if any.
961:
962: IF l_debug_level > 0 THEN
963: oe_debug_pub.add('SPC RETURNED MESSAGE_TEXT: '|| L_MESSAGE_TEXT , 2 );
964: oe_debug_pub.add('SPC RETURNED MESSAGE_TYPE: '|| L_MESSAGE_TYPE , 2 );
965: END IF;
966:
967:
968: l_config_header_id_start_pos :=
990: l_config_rev_nbr_end_pos -
991: l_config_rev_nbr_start_pos + 1));
992:
993: IF l_debug_level > 0 THEN
994: oe_debug_pub.add('CONFIG_HEADER_ID AS:' || L_CONFIG_HEADER_ID , 2 );
995: oe_debug_pub.add('CONFIG_REV_NBR AS:' || L_CONFIG_REV_NBR , 2 );
996: END IF;
997:
998:
991: l_config_rev_nbr_start_pos + 1));
992:
993: IF l_debug_level > 0 THEN
994: oe_debug_pub.add('CONFIG_HEADER_ID AS:' || L_CONFIG_HEADER_ID , 2 );
995: oe_debug_pub.add('CONFIG_REV_NBR AS:' || L_CONFIG_REV_NBR , 2 );
996: END IF;
997:
998:
999: IF (l_flag = 'Y' ) OR
1000: l_exit is NULL OR
1001: l_exit = 'ERROR' THEN
1002:
1003: IF l_debug_level > 0 THEN
1004: oe_debug_pub.add('GETTING MESSAGES FROM CZ_CONFIG_MESSAGES' , 2 );
1005: END IF;
1006:
1007: Message_From_Cz
1008: ( p_line_index => p_line_index,
1024: IF l_exit is NULL OR
1025: l_exit = 'ERROR' THEN
1026:
1027: IF l_debug_level > 0 THEN
1028: oe_debug_pub.add('SPC RETURNED ERROR , FAIL TRANSACTION' , 2 );
1029: END IF;
1030:
1031: -- delete the SPC configuration in error
1032: OE_Config_Pvt.Delete_Config
1051: x_valid_config := nvl(l_valid_config, 'FALSE');
1052:
1053:
1054: IF l_debug_level > 0 THEN
1055: oe_debug_pub.add('EXITING OE_BULK_CONFIG_UTIL.PARSE_OUTPUT_XML' , 1);
1056: END IF;
1057:
1058: EXCEPTION
1059: WHEN FND_API.G_EXC_ERROR THEN
1058: EXCEPTION
1059: WHEN FND_API.G_EXC_ERROR THEN
1060: x_return_status := FND_API.G_RET_STS_ERROR;
1061: IF l_debug_level > 0 THEN
1062: oe_debug_pub.add('SPC EXIT TAG IS ERROR' , 1);
1063: END IF;
1064: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1065: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1066:
1064: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1065: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1066:
1067: IF l_debug_level > 0 THEN
1068: oe_debug_pub.add('AN UNEXP ERROR RAISED IN Parse_output_xml: '
1069: || SUBSTR ( SQLERRM , 1 , 100 ) , 1);
1070: END IF;
1071:
1072: WHEN OTHERS THEN
1096: p_line_index IN NUMBER
1097: )
1098: IS
1099: l_msg_text VARCHAR2(2000);
1100: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
1101:
1102: l_attribute VARCHAR2(30);
1103:
1104: BEGIN
1102: l_attribute VARCHAR2(30);
1103:
1104: BEGIN
1105: IF l_debug_level > 0 THEN
1106: oe_debug_pub.add( 'ENTERING OE_BULK_CONFIG_UTIL.Validate_Config_Attributes ') ;
1107: END IF;
1108:
1109: -- Validate Required Attributes
1110: IF nvl(p_use_configurator, 'N') = 'Y' THEN
1108:
1109: -- Validate Required Attributes
1110: IF nvl(p_use_configurator, 'N') = 'Y' THEN
1111: IF l_debug_level > 0 THEN
1112: oe_debug_pub.add( 'Using configurator ') ;
1113: END IF;
1114:
1115: IF p_line_rec.config_header_id(p_line_index) IS NULL AND
1116: p_line_rec.config_rev_nbr(p_line_index) IS NOT NULL
1160:
1161: ELSE -- Configurator is not used
1162:
1163: IF l_debug_level > 0 THEN
1164: oe_debug_pub.add( 'Not using configurator ') ;
1165: END IF;
1166:
1167: IF p_line_rec.config_header_id(p_line_index) IS NOT NULL
1168: THEN
1196:
1197: END IF; -- Use configurator
1198:
1199: IF l_debug_level > 0 THEN
1200: oe_debug_pub.add( 'EXITING OE_BULK_CONFIG_UTIL.Validate_Config_Attributes ') ;
1201: END IF;
1202:
1203: EXCEPTION
1204: WHEN FND_API.G_EXC_ERROR THEN
1203: EXCEPTION
1204: WHEN FND_API.G_EXC_ERROR THEN
1205: p_line_rec.lock_control(p_line_index) := -99;
1206: IF l_debug_level > 0 THEN
1207: oe_debug_pub.add('AN EXC ERROR RAISED IN OE_BULK_CONFIG_UTIL.Validate_Config_Attributes', 1);
1208: END IF;
1209:
1210: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1211: IF l_debug_level > 0 THEN
1208: END IF;
1209:
1210: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1211: IF l_debug_level > 0 THEN
1212: oe_debug_pub.add('AN UNEXP ERROR RAISED IN Validate_Config_Attributes: '
1213: || SUBSTR ( SQLERRM , 1 , 100 ) , 1);
1214: END IF;
1215:
1216: WHEN OTHERS THEN
1241: l_item_index NUMBER;
1242: l_bom_item_type NUMBER;
1243: l_replenish_to_order_flag VARCHAR2(1);
1244:
1245: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
1246:
1247: BEGIN
1248: IF l_debug_level > 0 THEN
1249: oe_debug_pub.add( 'ENTERING OE_BULK_CONFIG_UTIL.Load_Item_Attributes ') ;
1245: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
1246:
1247: BEGIN
1248: IF l_debug_level > 0 THEN
1249: oe_debug_pub.add( 'ENTERING OE_BULK_CONFIG_UTIL.Load_Item_Attributes ') ;
1250: END IF;
1251:
1252: -- Load item cache and Get the index
1253: -- l_index := OE_Bulk_Cache.Load_Item(l_line_rec.inventory_item_id(p_index),
1298: END IF;
1299:
1300:
1301: IF l_debug_level > 0 THEN
1302: oe_debug_pub.add( 'EXITING OE_BULK_CONFIG_UTIL.Load_Item_Attributes ') ;
1303: END IF;
1304:
1305: EXCEPTION
1306:
1306:
1307: WHEN FND_API.G_EXC_ERROR THEN
1308: p_line_rec.lock_control(p_index) := -99;
1309: IF l_debug_level > 0 THEN
1310: oe_debug_pub.add('AN EXC ERROR RAISED IN Load_Item_Attributes', 1);
1311: END IF;
1312: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1313: IF l_debug_level > 0 THEN
1314: oe_debug_pub.add('AN UNEXP ERROR RAISED IN Load_Item_Attributes: '
1310: oe_debug_pub.add('AN EXC ERROR RAISED IN Load_Item_Attributes', 1);
1311: END IF;
1312: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1313: IF l_debug_level > 0 THEN
1314: oe_debug_pub.add('AN UNEXP ERROR RAISED IN Load_Item_Attributes: '
1315: || SUBSTR ( SQLERRM , 1 , 100 ) , 1);
1316: END IF;
1317:
1318: WHEN OTHERS THEN
1362: I NUMBER;
1363: l_top_model_line_ref VARCHAR2(50);
1364: l_top_model_line_id NUMBER;
1365:
1366: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
1367:
1368:
1369: BEGIN
1370:
1368:
1369: BEGIN
1370:
1371: IF l_debug_level > 0 THEN
1372: oe_debug_pub.add( 'ENTERING OE_BULK_CONFIG_UTIL.Validate_Configuration ') ;
1373: END IF;
1374:
1375: l_book_flag := p_line_rec.booked_flag(p_line_index);
1376: l_qty_match_flag := p_line_rec.cz_qty_match_flag(p_line_index);
1375: l_book_flag := p_line_rec.booked_flag(p_line_index);
1376: l_qty_match_flag := p_line_rec.cz_qty_match_flag(p_line_index);
1377:
1378: IF l_debug_level > 0 THEN
1379: oe_debug_pub.add( 'p_new_config = ' || p_new_config ) ;
1380: END IF;
1381:
1382:
1383: -- Set the message context to the top model line.
1401: -- We do not need to call Batch Validation API.
1402: -- Instead call CZ_CONFIG_API_PUB.verify_configuration
1403:
1404: IF l_debug_level > 0 THEN
1405: OE_Debug_Pub.Add('Calling CZ_CONFIG_API_PUB.verify_configuration');
1406: END IF;
1407:
1408: CZ_CONFIG_API_PUB.verify_configuration
1409: ( p_api_version => 1.0,
1417: x_msg_data => l_msg_data );
1418:
1419:
1420: IF l_debug_level > 0 THEN
1421: oe_debug_pub.add (' Exists Flag :' ||l_exists_flag,2);
1422: oe_debug_pub.add (' Valid Flag :'|| l_valid_flag,2);
1423: oe_debug_pub.add (' Complete Flag :'|| l_complete_flag,2);
1424: oe_debug_pub.add (' Return Status :'|| l_return_status,2);
1425: oe_debug_pub.add (' Message Count :'|| l_msg_count,2);
1418:
1419:
1420: IF l_debug_level > 0 THEN
1421: oe_debug_pub.add (' Exists Flag :' ||l_exists_flag,2);
1422: oe_debug_pub.add (' Valid Flag :'|| l_valid_flag,2);
1423: oe_debug_pub.add (' Complete Flag :'|| l_complete_flag,2);
1424: oe_debug_pub.add (' Return Status :'|| l_return_status,2);
1425: oe_debug_pub.add (' Message Count :'|| l_msg_count,2);
1426: oe_debug_pub.add (' Message Data :'|| l_msg_data,2);
1419:
1420: IF l_debug_level > 0 THEN
1421: oe_debug_pub.add (' Exists Flag :' ||l_exists_flag,2);
1422: oe_debug_pub.add (' Valid Flag :'|| l_valid_flag,2);
1423: oe_debug_pub.add (' Complete Flag :'|| l_complete_flag,2);
1424: oe_debug_pub.add (' Return Status :'|| l_return_status,2);
1425: oe_debug_pub.add (' Message Count :'|| l_msg_count,2);
1426: oe_debug_pub.add (' Message Data :'|| l_msg_data,2);
1427: END IF;
1420: IF l_debug_level > 0 THEN
1421: oe_debug_pub.add (' Exists Flag :' ||l_exists_flag,2);
1422: oe_debug_pub.add (' Valid Flag :'|| l_valid_flag,2);
1423: oe_debug_pub.add (' Complete Flag :'|| l_complete_flag,2);
1424: oe_debug_pub.add (' Return Status :'|| l_return_status,2);
1425: oe_debug_pub.add (' Message Count :'|| l_msg_count,2);
1426: oe_debug_pub.add (' Message Data :'|| l_msg_data,2);
1427: END IF;
1428:
1421: oe_debug_pub.add (' Exists Flag :' ||l_exists_flag,2);
1422: oe_debug_pub.add (' Valid Flag :'|| l_valid_flag,2);
1423: oe_debug_pub.add (' Complete Flag :'|| l_complete_flag,2);
1424: oe_debug_pub.add (' Return Status :'|| l_return_status,2);
1425: oe_debug_pub.add (' Message Count :'|| l_msg_count,2);
1426: oe_debug_pub.add (' Message Data :'|| l_msg_data,2);
1427: END IF;
1428:
1429: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1422: oe_debug_pub.add (' Valid Flag :'|| l_valid_flag,2);
1423: oe_debug_pub.add (' Complete Flag :'|| l_complete_flag,2);
1424: oe_debug_pub.add (' Return Status :'|| l_return_status,2);
1425: oe_debug_pub.add (' Message Count :'|| l_msg_count,2);
1426: oe_debug_pub.add (' Message Data :'|| l_msg_data,2);
1427: END IF;
1428:
1429: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1430: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1432: RAISE FND_API.G_EXC_ERROR;
1433: ELSIF l_return_status = FND_API.G_RET_STS_SUCCESS THEN
1434: IF l_exists_flag = FND_API.G_FALSE THEN
1435: IF l_debug_level > 0 THEN
1436: oe_debug_pub.add('Configuration Does not Exist '|| l_msg_data,2);
1437: END IF;
1438: RAISE FND_API.G_EXC_ERROR;
1439: ELSE
1440: IF l_debug_level > 0 THEN
1437: END IF;
1438: RAISE FND_API.G_EXC_ERROR;
1439: ELSE
1440: IF l_debug_level > 0 THEN
1441: oe_debug_pub.add (' Configuration Exists ',2);
1442: END IF;
1443:
1444: IF l_valid_flag = FND_API.G_FALSE THEN
1445: l_valid_config := 'FALSE';
1450: IF l_complete_flag = FND_API.G_FALSE THEN
1451: l_complete_config := 'FALSE';
1452: ELSE
1453: IF l_debug_level > 0 THEN
1454: oe_debug_pub.add('Configuration Exists, valid and Complete ',2);
1455: END IF;
1456: l_complete_config := 'TRUE';
1457: END IF;
1458: END IF; -- if exist flag = false
1458: END IF; -- if exist flag = false
1459: END IF; -- if success
1460:
1461: IF l_debug_level > 0 THEN
1462: oe_debug_pub.add('CALLING Message_From_CZ' , 2 );
1463: END IF;
1464: Message_From_CZ(
1465: p_line_rec => p_line_rec,
1466: p_line_index => p_line_index,
1479:
1480: ELSE -- call batch val
1481:
1482: IF l_debug_level > 0 THEN
1483: oe_debug_pub.add('CALLING CREATE_HDR_XML' , 2 );
1484: END IF;
1485: Create_hdr_xml( p_line_rec => p_line_rec,
1486: p_line_index => p_line_index,
1487: x_xml_hdr => l_xml_hdr,
1493: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1494: END IF;
1495:
1496: IF l_debug_level > 0 THEN
1497: oe_debug_pub.add('CALLING SEND_INPUT_XML' , 2 );
1498: END IF;
1499:
1500: Send_input_xml
1501: ( p_line_rec => p_line_rec,
1506: x_return_status => l_return_status,
1507: p_batch_validate_time => p_batch_validate_time);
1508:
1509: IF l_debug_level > 0 THEN
1510: oe_debug_pub.add
1511: ('AFTER CALLING SEND_INPUT_XML: '||L_RETURN_STATUS , 2 );
1512: END IF;
1513:
1514: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1520: l_xml_message := UPPER(l_xml_message);
1521:
1522: -- extract data from xml message.
1523: IF l_debug_level > 0 THEN
1524: oe_debug_pub.add('CALLING PARSE_OUTPUT_XML' , 2 );
1525: END IF;
1526:
1527: Parse_Output_xml
1528: ( p_xml => l_xml_message,
1534: x_config_rev_nbr => l_config_rev_nbr,
1535: x_return_status => l_return_status );
1536:
1537: IF l_debug_level > 0 THEN
1538: oe_debug_pub.add('AFTER CALLING PARSE_OUTPUT_XML: '||L_RETURN_STATUS , 2 );
1539: END IF;
1540:
1541: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1542: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1545: END IF;
1546:
1547: IF (l_valid_config = 'FALSE' OR l_complete_config = 'FALSE') THEN
1548: IF l_debug_level > 0 THEN
1549: oe_debug_pub.add('ERROR CONFIG' , 2 );
1550: END IF;
1551: RAISE FND_API.G_EXC_ERROR;
1552:
1553: END IF;
1571: END IF; -- if skip batch val
1572:
1573:
1574: IF l_debug_level > 0 THEN
1575: oe_debug_pub.add('EXITING OE_BULK_CONFIG_UTIL.CONFIGURATOR_VALIDATION' , 1);
1576: END IF;
1577:
1578:
1579: EXCEPTION
1579: EXCEPTION
1580:
1581: WHEN FND_API.G_EXC_ERROR THEN
1582: IF l_debug_level > 0 THEN
1583: oe_debug_pub.add('AN EXC ERROR RAISED IN Validate_Configuration', 1);
1584: END IF;
1585: FND_MESSAGE.Set_Name('ONT', 'OE_CONFIG_VALIDATION_FAILURE');
1586: OE_Bulk_Msg_Pub.Add;
1587: p_line_rec.lock_control(p_line_index) := -99;
1587: p_line_rec.lock_control(p_line_index) := -99;
1588:
1589: WHEN OTHERS THEN
1590: IF l_debug_level > 0 THEN
1591: oe_debug_pub.add('Others Error, OE_BULK_CONFIG_UTIL.Validate_Configuration');
1592: oe_debug_pub.add(substr(sqlerrm,1,240));
1593: END IF;
1594:
1595: OE_BULK_MSG_PUB.Add_Exc_Msg
1588:
1589: WHEN OTHERS THEN
1590: IF l_debug_level > 0 THEN
1591: oe_debug_pub.add('Others Error, OE_BULK_CONFIG_UTIL.Validate_Configuration');
1592: oe_debug_pub.add(substr(sqlerrm,1,240));
1593: END IF;
1594:
1595: OE_BULK_MSG_PUB.Add_Exc_Msg
1596: ( G_PKG_NAME,
1694:
1695: l_order_source_id NUMBER := -99;
1696: l_orig_sys_document_ref VARCHAR2(50) := '-99';
1697:
1698: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
1699:
1700: l_start_time NUMBER;
1701: l_end_time NUMBER;
1702: l_config_validate_time NUMBER := 0;
1704:
1705:
1706: BEGIN
1707: IF l_debug_level > 0 THEN
1708: oe_debug_pub.add( 'ENTERING OE_BULK_CONFIG_UTIL.Pre_Process_Configurator ') ;
1709: END IF;
1710:
1711: -- Load the cursor into l_line_rec
1712: IF nvl(p_validate_configurations, 'N') = 'Y' THEN
1710:
1711: -- Load the cursor into l_line_rec
1712: IF nvl(p_validate_configurations, 'N') = 'Y' THEN
1713: IF l_debug_level > 0 THEN
1714: oe_debug_pub.add( 'before OPEN c_line_config1 ') ;
1715: END IF;
1716:
1717: OPEN c_line_config1;
1718:
1716:
1717: OPEN c_line_config1;
1718:
1719: IF l_debug_level > 0 THEN
1720: oe_debug_pub.add( 'after OPEN c_line_config1 ') ;
1721: END IF;
1722:
1723: FETCH c_line_config1 BULK COLLECT INTO
1724: l_line_rec.line_id,
1739:
1740: CLOSE c_line_config1;
1741: ELSE
1742: IF l_debug_level > 0 THEN
1743: oe_debug_pub.add( 'before OPEN c_line_config2 ') ;
1744: END IF;
1745:
1746: OPEN c_line_config2;
1747:
1745:
1746: OPEN c_line_config2;
1747:
1748: IF l_debug_level > 0 THEN
1749: oe_debug_pub.add( 'after OPEN c_line_config2 ') ;
1750: END IF;
1751:
1752: FETCH c_line_config2 BULK COLLECT INTO
1753: l_line_rec.line_id,
1768:
1769: -- Exit procedure if no model line fetched
1770: IF l_line_rec.config_header_id.count < 1 THEN
1771: IF l_debug_level > 0 THEN
1772: oe_debug_pub.add( 'no model line exists in batch: '|| p_batch_id) ;
1773: END IF;
1774: RETURN;
1775: END IF;
1776:
1790: -- Looping over the model lines
1791: FOR I IN 1..l_line_rec.line_id.count LOOP
1792:
1793: IF l_debug_level > 0 THEN
1794: oe_debug_pub.add( 'IN PRE_PROCESS_CONFIGURATOR LOOP INDEX : I = '|| I ) ;
1795: END IF;
1796:
1797:
1798: -- skip line if order has config error
1800: l_order_source_id = l_line_rec.order_source_id(I) AND
1801: l_orig_sys_document_ref = l_line_rec.orig_sys_document_ref(I) THEN
1802:
1803: IF l_debug_level > 0 Then
1804: oe_debug_pub.add('Skip line in Pre_Process_Configurator(): '||l_line_rec.line_id(I));
1805: END IF;
1806:
1807: GOTO SKIP_THE_LINE;
1808:
1835: ( l_line_rec.configuration_id(I) IS NOT NULL OR
1836: l_line_rec.component_code(I) IS NOT NULL)
1837: THEN
1838: IF l_debug_level > 0 THEN
1839: oe_debug_pub.add( 'Pre-created configuration' ) ;
1840: END IF;
1841:
1842: IF nvl(p_validate_configurations, 'N') = 'Y' THEN
1843:
1937: AND l.order_source_id = l_line_rec.ORDER_SOURCE_ID(I));
1938:
1939:
1940: IF l_debug_level > 0 THEN
1941: oe_debug_pub.add( 'INSERTED '||SQL%ROWCOUNT||' MISSING CHILD TO TMP'||I , 3 ) ;
1942: END IF;
1943:
1944: -- insert lines from interface table
1945: INSERT INTO oe_config_details_tmp
2015: AND l.order_source_id = l_line_rec.ORDER_SOURCE_ID(I)
2016: AND l.top_model_line_ref = l_line_rec.ORIG_SYS_LINE_REF(I) ;
2017:
2018: IF l_debug_level > 0 THEN
2019: oe_debug_pub.add( 'INSERTED '||SQL%ROWCOUNT||' LINES TO TMP FROM IFACE '||I , 3 ) ;
2020: END IF;
2021:
2022:
2023: ELSE -- new configuration
2037: l_order_source_id := l_line_rec.order_source_id(I);
2038: l_orig_sys_document_ref := l_line_rec.orig_sys_document_ref(I);
2039:
2040: IF l_debug_level > 0 THEN
2041: oe_debug_pub.add( 'SKIP order_source_id: '||l_order_source_id, 3 ) ;
2042: oe_debug_pub.add( 'SKIP orig_sys_document_ref: '||l_orig_sys_document_ref, 3 ) ;
2043: END IF;
2044:
2045: END IF;
2038: l_orig_sys_document_ref := l_line_rec.orig_sys_document_ref(I);
2039:
2040: IF l_debug_level > 0 THEN
2041: oe_debug_pub.add( 'SKIP order_source_id: '||l_order_source_id, 3 ) ;
2042: oe_debug_pub.add( 'SKIP orig_sys_document_ref: '||l_orig_sys_document_ref, 3 ) ;
2043: END IF;
2044:
2045: END IF;
2046:
2056:
2057: -- Need to call Pre_Process_Bom for new configuration
2058: IF l_Need_Bom_Explosion = 'Y' THEN
2059: IF l_debug_level > 0 THEN
2060: oe_debug_pub.add( 'Need to call Pre_Process_Bom for new configuration ') ;
2061: END IF;
2062:
2063: Pre_Process_Bom (
2064: p_batch_id => p_batch_id,
2069:
2070: END IF;
2071:
2072: IF l_debug_level > 0 THEN
2073: oe_debug_pub.add( 'EXITING OE_BULK_CONFIG_UTIL.Pre_Process_Configurator ') ;
2074: END IF;
2075:
2076: EXCEPTION
2077: WHEN NO_DATA_FOUND THEN
2075:
2076: EXCEPTION
2077: WHEN NO_DATA_FOUND THEN
2078: IF l_debug_level > 0 THEN
2079: oe_debug_pub.add('NO DATA FOUND in OE_BULK_CONFIG_UTIL.Pre_Process_Configurator ' , 1);
2080: END IF;
2081:
2082: WHEN OTHERS THEN
2083:
2087: CLOSE c_line_config2;
2088: END IF;
2089:
2090: IF l_debug_level > 0 THEN
2091: oe_debug_pub.add('Others Error, OE_BULK_CONFIG_UTIL.Pre_Process_Configurator');
2092: oe_debug_pub.add(substr(sqlerrm,1,240));
2093: END IF;
2094:
2095: OE_BULK_MSG_PUB.Add_Exc_Msg
2088: END IF;
2089:
2090: IF l_debug_level > 0 THEN
2091: oe_debug_pub.add('Others Error, OE_BULK_CONFIG_UTIL.Pre_Process_Configurator');
2092: oe_debug_pub.add(substr(sqlerrm,1,240));
2093: END IF;
2094:
2095: OE_BULK_MSG_PUB.Add_Exc_Msg
2096: ( G_PKG_NAME,
2213: I NUMBER;
2214: l_curr_model_index NUMBER;
2215: l_curr_ato_index NUMBER;
2216:
2217: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
2218:
2219: l_msg_data VARCHAR2(2000);
2220: l_error_code VARCHAR2(2000);
2221: l_return_status VARCHAR2(30);
2230:
2231:
2232: BEGIN
2233: IF l_debug_level > 0 THEN
2234: oe_debug_pub.add( 'ENTERING OE_BULK_CONFIG_UTIL.Pre_Process_Bom ', 1) ;
2235: END IF;
2236:
2237: -----------------------------------------------------------------
2238: -- Load this cursor into Line Rec (OE_WSH_BULK_GRP.line_rec_type)
2240:
2241:
2242: IF nvl(p_use_configurator, 'N') = 'Y' THEN
2243: IF l_debug_level > 0 THEN
2244: oe_debug_pub.add( 'before OPEN c_line_bom1 ') ;
2245: END IF;
2246:
2247: OPEN c_line_bom1;
2248:
2246:
2247: OPEN c_line_bom1;
2248:
2249: IF l_debug_level > 0 THEN
2250: oe_debug_pub.add( 'after OPEN c_line_bom1 ') ;
2251: END IF;
2252:
2253: FETCH c_line_bom1 BULK COLLECT INTO
2254: l_line_rec.line_id,
2278:
2279: CLOSE c_line_bom1;
2280: ELSE
2281: IF l_debug_level > 0 THEN
2282: oe_debug_pub.add( 'before OPEN c_line_bom2 ', 3) ;
2283: END IF;
2284:
2285: OPEN c_line_bom2;
2286:
2284:
2285: OPEN c_line_bom2;
2286:
2287: IF l_debug_level > 0 THEN
2288: oe_debug_pub.add( 'after OPEN c_line_bom2 ') ;
2289: END IF;
2290:
2291: FETCH c_line_bom2 BULK COLLECT INTO
2292: l_line_rec.line_id,
2327: ------------------------------------------
2328: FOR I IN 1..l_line_rec.line_id.count LOOP
2329:
2330: IF l_debug_level > 0 THEN
2331: oe_debug_pub.add( ' IN PRE_PROCESS_BOM LOOP INDEX : I = '|| I ) ;
2332: END IF;
2333:
2334:
2335: IF l_debug_level > 0 THEN
2332: END IF;
2333:
2334:
2335: IF l_debug_level > 0 THEN
2336: oe_debug_pub.add( 'order_source_id = '|| l_line_rec.order_source_id(I) ) ;
2337: oe_debug_pub.add( 'orig_sys_document_ref = '||l_line_rec.orig_sys_document_ref(I) ) ;
2338:
2339: END IF;
2340:
2333:
2334:
2335: IF l_debug_level > 0 THEN
2336: oe_debug_pub.add( 'order_source_id = '|| l_line_rec.order_source_id(I) ) ;
2337: oe_debug_pub.add( 'orig_sys_document_ref = '||l_line_rec.orig_sys_document_ref(I) ) ;
2338:
2339: END IF;
2340:
2341:
2343: l_order_source_id = l_line_rec.order_source_id(I) AND
2344: l_orig_sys_document_ref = l_line_rec.orig_sys_document_ref(I) THEN
2345:
2346: IF l_debug_level > 0 Then
2347: oe_debug_pub.add('Skip line in Pre_Process_Bom(): '||l_line_rec.line_id(I));
2348: END IF;
2349:
2350: GOTO SKIP_THE_LINE;
2351:
2384: IF l_line_rec.item_type_code(I) = 'MODEL' AND
2385: l_line_rec.top_model_line_ref(I) = l_line_rec.orig_sys_line_ref(I) THEN
2386:
2387: IF l_debug_level > 0 THEN
2388: oe_debug_pub.add( 'MODEL LINE ID = ' || l_line_rec.line_id(I) ) ;
2389: END IF;
2390:
2391: l_line_rec.top_model_line_id(I) := l_line_rec.line_id(I);
2392:
2408:
2409:
2410: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
2411: IF l_debug_level > 0 THEN
2412: oe_debug_pub.add( 'ERROR in OE_Config_UTIL.Explode' ) ;
2413: END IF;
2414: l_line_rec.lock_control(I) := -99;
2415: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2416: IF l_debug_level > 0 THEN
2413: END IF;
2414: l_line_rec.lock_control(I) := -99;
2415: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2416: IF l_debug_level > 0 THEN
2417: oe_debug_pub.add( 'UNEXPECTED ERROR in OE_Config_UTIL.Explode' ) ;
2418: END IF;
2419: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2420: END IF;
2421:
2471: -- Use curr_ato_line_index to
2472: -- Set l_line_rec.ato_line_id(I) on child lines
2473:
2474: IF l_debug_level > 0 THEN
2475: oe_debug_pub.add( 'CHILD LINE ID = ' || l_line_rec.line_id(I) ) ;
2476: END IF;
2477:
2478:
2479: l_line_rec.top_bill_sequence_id(I) :=
2520:
2521: EXCEPTION
2522: WHEN NO_DATA_FOUND THEN
2523: IF l_debug_level > 0 THEN
2524: oe_debug_pub.add('SELECT COMP_CODE FAILED , NO DATA FOUND ' , 1);
2525: oe_debug_pub.add('ITEM: '|| L_LINE_REC.INVENTORY_ITEM_ID(I) , 1);
2526: END IF;
2527: l_line_rec.lock_control(I) := -99;
2528: FND_MESSAGE.Set_Name('ONT', 'OE_CONFIG_ITEM_NOT_IN_BILL');
2521: EXCEPTION
2522: WHEN NO_DATA_FOUND THEN
2523: IF l_debug_level > 0 THEN
2524: oe_debug_pub.add('SELECT COMP_CODE FAILED , NO DATA FOUND ' , 1);
2525: oe_debug_pub.add('ITEM: '|| L_LINE_REC.INVENTORY_ITEM_ID(I) , 1);
2526: END IF;
2527: l_line_rec.lock_control(I) := -99;
2528: FND_MESSAGE.Set_Name('ONT', 'OE_CONFIG_ITEM_NOT_IN_BILL');
2529: FND_MESSAGE.Set_Token('COMPONENT', l_line_rec.inventory_item_id(I));
2531: oe_bulk_msg_pub.add;
2532:
2533: WHEN TOO_MANY_ROWS THEN
2534: IF l_debug_level > 0 THEN
2535: oe_debug_pub.add('SELECT COMP_CODE FAILED , TOO_MANY ROWS ' , 1);
2536: oe_debug_pub.add('ITEM: '|| L_LINE_REC.INVENTORY_ITEM_ID(I) , 1);
2537: END IF;
2538: l_line_rec.lock_control(I) := -99;
2539: FND_MESSAGE.Set_Name('ONT', 'OE_CONFIG_AMBIGUITY');
2532:
2533: WHEN TOO_MANY_ROWS THEN
2534: IF l_debug_level > 0 THEN
2535: oe_debug_pub.add('SELECT COMP_CODE FAILED , TOO_MANY ROWS ' , 1);
2536: oe_debug_pub.add('ITEM: '|| L_LINE_REC.INVENTORY_ITEM_ID(I) , 1);
2537: END IF;
2538: l_line_rec.lock_control(I) := -99;
2539: FND_MESSAGE.Set_Name('ONT', 'OE_CONFIG_AMBIGUITY');
2540: FND_MESSAGE.Set_Token('COMPONENT', l_line_rec.inventory_item_id(I));
2542: oe_bulk_msg_pub.add;
2543:
2544: WHEN OTHERS THEN
2545: IF l_debug_level > 0 THEN
2546: oe_debug_pub.add('SELECT COMP_CODE FAILED , OTHERS ' , 1);
2547: oe_debug_pub.add('ITEM: '|| L_LINE_REC.INVENTORY_ITEM_ID(I) , 1);
2548: END IF;
2549: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2550: END;
2543:
2544: WHEN OTHERS THEN
2545: IF l_debug_level > 0 THEN
2546: oe_debug_pub.add('SELECT COMP_CODE FAILED , OTHERS ' , 1);
2547: oe_debug_pub.add('ITEM: '|| L_LINE_REC.INVENTORY_ITEM_ID(I) , 1);
2548: END IF;
2549: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2550: END;
2551:
2589: l_order_source_id := l_line_rec.order_source_id(I);
2590: l_orig_sys_document_ref := l_line_rec.orig_sys_document_ref(I);
2591:
2592: IF l_debug_level > 0 THEN
2593: oe_debug_pub.add( 'SKIP order_source_id: '||l_order_source_id, 3 ) ;
2594: oe_debug_pub.add( 'SKIP orig_sys_document_ref: '||l_orig_sys_document_ref, 3 ) ;
2595: END IF;
2596:
2597: END IF;
2590: l_orig_sys_document_ref := l_line_rec.orig_sys_document_ref(I);
2591:
2592: IF l_debug_level > 0 THEN
2593: oe_debug_pub.add( 'SKIP order_source_id: '||l_order_source_id, 3 ) ;
2594: oe_debug_pub.add( 'SKIP orig_sys_document_ref: '||l_orig_sys_document_ref, 3 ) ;
2595: END IF;
2596:
2597: END IF;
2598:
2679: l_config_rec.replenish_to_order_flag(I)
2680: );
2681:
2682: IF l_debug_level > 0 THEN
2683: oe_debug_pub.add( 'INSERTED '||SQL%ROWCOUNT||' TO TMP FROM LINE_REC' , 3 ) ;
2684: END IF;
2685:
2686:
2687: -- Insert Missing Classes
2765: AND l3.item_type_code <> 'MODEL'
2766: AND l3.bom_item_type = 4);
2767:
2768: IF l_debug_level > 0 THEN
2769: oe_debug_pub.add( 'INSERTED '||SQL%ROWCOUNT||' MISSING CLASSES TO TMP' , 3 ) ;
2770: END IF;
2771:
2772: ELSE -- Else If configurator is used Then
2773:
2841: AND z.config_rev_nbr = l_line_rec.config_rev_nbr(I)
2842: AND z.component_code = l_line_rec.component_code(I);
2843:
2844: IF l_debug_level > 0 THEN
2845: oe_debug_pub.add( 'INSERTED '||SQL%ROWCOUNT||' TO TMP FROM LINE_REC' , 3 ) ;
2846: END IF;
2847:
2848:
2849: -- Insert any new components that are present in CZ but
2914: FROM oe_config_details_tmp L2
2915: WHERE L2.top_model_line_id = L.line_id);
2916:
2917: IF l_debug_level > 0 THEN
2918: oe_debug_pub.add( 'INSERTED '||SQL%ROWCOUNT||' TO TMP FROM CZ' , 3 ) ;
2919: END IF;
2920:
2921: END IF; -- Use Configutor
2922:
2921: END IF; -- Use Configutor
2922:
2923:
2924: IF l_debug_level > 0 THEN
2925: oe_debug_pub.add( 'EXITING OE_BULK_CONFIG_UTIL.Pre_Process_Bom ', 1) ;
2926: END IF;
2927:
2928: EXCEPTION
2929:
2928: EXCEPTION
2929:
2930: WHEN NO_DATA_FOUND THEN
2931: IF l_debug_level > 0 THEN
2932: oe_debug_pub.add('NO DATA FOUND in OE_BULK_CONFIG_UTIL.Pre_Process_Bom ' , 1);
2933: END IF;
2934:
2935: WHEN OTHERS THEN
2936:
2940: CLOSE c_line_bom2;
2941: END IF;
2942:
2943: IF l_debug_level > 0 THEN
2944: oe_debug_pub.add('Others Error, OE_BULK_CONFIG_UTIL.Pre_Process_Bom');
2945: oe_debug_pub.add(substr(sqlerrm,1,240));
2946: END IF;
2947:
2948: OE_BULK_MSG_PUB.Add_Exc_Msg
2941: END IF;
2942:
2943: IF l_debug_level > 0 THEN
2944: oe_debug_pub.add('Others Error, OE_BULK_CONFIG_UTIL.Pre_Process_Bom');
2945: oe_debug_pub.add(substr(sqlerrm,1,240));
2946: END IF;
2947:
2948: OE_BULK_MSG_PUB.Add_Exc_Msg
2949: ( G_PKG_NAME,
2971:
2972: l_start_time NUMBER;
2973: l_end_time NUMBER;
2974:
2975: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
2976:
2977: BEGIN
2978: IF l_debug_level > 0 THEN
2979: oe_debug_pub.add( 'ENTERING OE_BULK_CONFIG_UTIL.Pre_Process ') ;
2975: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
2976:
2977: BEGIN
2978: IF l_debug_level > 0 THEN
2979: oe_debug_pub.add( 'ENTERING OE_BULK_CONFIG_UTIL.Pre_Process ') ;
2980: oe_debug_pub.add( ' Use Configurator :'|| p_use_configurator );
2981: END IF;
2982:
2983: IF nvl(p_use_configurator, 'N') = 'Y' THEN
2976:
2977: BEGIN
2978: IF l_debug_level > 0 THEN
2979: oe_debug_pub.add( 'ENTERING OE_BULK_CONFIG_UTIL.Pre_Process ') ;
2980: oe_debug_pub.add( ' Use Configurator :'|| p_use_configurator );
2981: END IF;
2982:
2983: IF nvl(p_use_configurator, 'N') = 'Y' THEN
2984:
2993: -- ato_line_id are already populated on ATO Models or ATOs under PTO cases.
2994: -- This happens in preprocessing. It will not set ATO_LINE_ID on ATO items under
2995: -- PTO models. That will be taken care of in Process_Lines.
2996: IF l_debug_level > 0 THEN
2997: oe_debug_pub.add( 'BEFORE update TMP for Config ') ;
2998: END IF;
2999:
3000: update oe_config_details_tmp L
3001: set ato_line_id =
3011: Where line_id <> top_model_line_id
3012: And ato_line_id is NULL;
3013:
3014: IF l_debug_level > 0 THEN
3015: oe_debug_pub.add( 'AFTER update TMP for Config ') ;
3016: END IF;
3017:
3018: ELSE
3019:
3030: -- on all child lines of an ATO_MODEL. We need to take care of the case of
3031: -- ATO under PTO. We can assume that bom_item_type and replenish_to_order_flag
3032: -- are available for all of these lines
3033: IF l_debug_level > 0 THEN
3034: oe_debug_pub.add( 'BEFORE update TMP for Bom ') ;
3035: END IF;
3036:
3037: UPDATE oe_config_details_tmp L
3038: SET ato_line_id=
3059: ato_line_id is not null)
3060: AND L.ato_line_id IS NULL;
3061:
3062: IF l_debug_level > 0 THEN
3063: oe_debug_pub.add( 'AFTER update TMP for Bom ') ;
3064: END IF;
3065:
3066: END IF;
3067:
3067:
3068: -- Update link_to_line_id on all lines except top model.
3069:
3070: IF l_debug_level > 0 THEN
3071: oe_debug_pub.add( 'BEFORE update link_to_line_id ') ;
3072: END IF;
3073:
3074: update oe_config_details_tmp L
3075: SET link_to_line_id = (select line_id
3080: where line_id <> top_model_line_id
3081: and link_to_line_id is NULL;
3082:
3083: IF l_debug_level > 0 THEN
3084: oe_debug_pub.add( 'AFTER update link_to_line_id ') ;
3085: END IF;
3086:
3087: -- Need to do BOM Validations upfront on TEMP table
3088:
3089: If nvl(p_use_configurator, 'N') = 'N' AND
3090: nvl(p_validate_configurations, 'N') = 'Y' THEN
3091:
3092: IF l_debug_level > 0 THEN
3093: oe_debug_pub.add( 'Calling OE_BULK_VALIDATE.Validate_BOM ') ;
3094: END IF;
3095:
3096: SELECT hsecs INTO l_start_time from v$timer;
3097:
3103:
3104: END IF;
3105:
3106: IF l_debug_level > 0 THEN
3107: oe_debug_pub.add( 'EXITING OE_BULK_CONFIG_UTIL.Pre_Process ') ;
3108: END IF;
3109:
3110:
3111:
3111:
3112: EXCEPTION
3113: WHEN NO_DATA_FOUND THEN
3114: IF l_debug_level > 0 THEN
3115: oe_debug_pub.add('NO DATA FOUND in OE_BULK_CONFIG_UTIL.Pre_Process ' , 1);
3116: END IF;
3117:
3118: WHEN OTHERS THEN
3119: IF l_debug_level > 0 THEN
3116: END IF;
3117:
3118: WHEN OTHERS THEN
3119: IF l_debug_level > 0 THEN
3120: oe_debug_pub.add('Others Error, OE_BULK_CONFIG_UTIL.Pre_Process');
3121: oe_debug_pub.add(substr(sqlerrm,1,240));
3122: END IF;
3123:
3124: OE_BULK_MSG_PUB.Add_Exc_Msg
3117:
3118: WHEN OTHERS THEN
3119: IF l_debug_level > 0 THEN
3120: oe_debug_pub.add('Others Error, OE_BULK_CONFIG_UTIL.Pre_Process');
3121: oe_debug_pub.add(substr(sqlerrm,1,240));
3122: END IF;
3123:
3124: OE_BULK_MSG_PUB.Add_Exc_Msg
3125: ( G_PKG_NAME,
3147: where orig_sys_document_ref = p_orig_sys_document_ref
3148: and order_source_id = p_order_source_id
3149: and item_type_code = 'MODEL';
3150:
3151: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
3152:
3153: l_usage_exists number;
3154: l_return_value number := 1;
3155: l_error_message varchar2(100);
3156:
3157:
3158: BEGIN
3159: IF l_debug_level > 0 THEN
3160: oe_debug_pub.add( 'ENTERING OE_BULK_CONFIG_UTIL.Delete_Configurations ') ;
3161: END IF;
3162:
3163: -- initialize return status to success
3164: x_return_status := fnd_api.g_ret_sts_success;
3168: FOR l_delete_rec IN c_configs(P_ERROR_REC.orig_sys_document_ref(I),
3169: P_ERROR_REC.order_source_id(I)) LOOP
3170:
3171: IF l_debug_level > 0 THEN
3172: oe_debug_pub.add( 'DOC_REF: ' || l_delete_rec.orig_sys_document_ref ) ;
3173: oe_debug_pub.add( 'SOURCE: ' || l_delete_rec.order_source_id ) ;
3174: oe_debug_pub.add( 'CHI: ' || l_delete_rec.config_header_id ) ;
3175: oe_debug_pub.add( 'CRN: ' || l_delete_rec.config_rev_nbr ) ;
3176: END IF;
3169: P_ERROR_REC.order_source_id(I)) LOOP
3170:
3171: IF l_debug_level > 0 THEN
3172: oe_debug_pub.add( 'DOC_REF: ' || l_delete_rec.orig_sys_document_ref ) ;
3173: oe_debug_pub.add( 'SOURCE: ' || l_delete_rec.order_source_id ) ;
3174: oe_debug_pub.add( 'CHI: ' || l_delete_rec.config_header_id ) ;
3175: oe_debug_pub.add( 'CRN: ' || l_delete_rec.config_rev_nbr ) ;
3176: END IF;
3177:
3170:
3171: IF l_debug_level > 0 THEN
3172: oe_debug_pub.add( 'DOC_REF: ' || l_delete_rec.orig_sys_document_ref ) ;
3173: oe_debug_pub.add( 'SOURCE: ' || l_delete_rec.order_source_id ) ;
3174: oe_debug_pub.add( 'CHI: ' || l_delete_rec.config_header_id ) ;
3175: oe_debug_pub.add( 'CRN: ' || l_delete_rec.config_rev_nbr ) ;
3176: END IF;
3177:
3178: /*
3171: IF l_debug_level > 0 THEN
3172: oe_debug_pub.add( 'DOC_REF: ' || l_delete_rec.orig_sys_document_ref ) ;
3173: oe_debug_pub.add( 'SOURCE: ' || l_delete_rec.order_source_id ) ;
3174: oe_debug_pub.add( 'CHI: ' || l_delete_rec.config_header_id ) ;
3175: oe_debug_pub.add( 'CRN: ' || l_delete_rec.config_rev_nbr ) ;
3176: END IF;
3177:
3178: /*
3179: OE_Config_Pvt.Delete_Config
3187: RAISE FND_API.G_EXC_ERROR;
3188: END IF;
3189:
3190: IF l_debug_level > 0 THEN
3191: oe_debug_pub.add( 'CONFIG DELETED WITH SUCCESS' ) ;
3192: END IF;
3193: */
3194:
3195: IF l_delete_rec.config_header_id is not null AND
3204:
3205: IF l_return_value <> 1 THEN
3206: OE_BULK_Msg_Pub.Add_text(l_error_message);
3207: IF l_debug_level > 0 THEN
3208: oe_debug_pub.add('Error from CZ delete: ' ||l_error_message ) ;
3209: END IF;
3210: x_return_status := FND_API.G_RET_STS_ERROR;
3211: ELSE
3212: x_return_status := FND_API.G_RET_STS_SUCCESS;
3210: x_return_status := FND_API.G_RET_STS_ERROR;
3211: ELSE
3212: x_return_status := FND_API.G_RET_STS_SUCCESS;
3213: IF l_debug_level > 0 THEN
3214: oe_debug_pub.add( 'CONFIG DELETED WITH SUCCESS' ) ;
3215: END IF;
3216:
3217: END IF;
3218: ELSE
3216:
3217: END IF;
3218: ELSE
3219: IF l_debug_level > 0 THEN
3220: oe_debug_pub.add('NOTE : NULL CONFIG_HEADER_ID/CONFIG_REV_NBR PASSED');
3221: END IF;
3222: END IF;
3223:
3224: END LOOP;
3224: END LOOP;
3225: END LOOP;
3226:
3227: IF l_debug_level > 0 THEN
3228: oe_debug_pub.add( 'EXITING OE_BULK_CONFIG_UTIL.Delete_Configurations ') ;
3229: END IF;
3230:
3231:
3232: EXCEPTION
3232: EXCEPTION
3233:
3234: WHEN OTHERS THEN
3235: IF l_debug_level > 0 THEN
3236: oe_debug_pub.add('Others Error, OE_BULK_CONFIG_UTIL.Delete_Configurations');
3237: oe_debug_pub.add(substr(sqlerrm,1,240));
3238: END IF;
3239:
3240: OE_BULK_MSG_PUB.Add_Exc_Msg
3233:
3234: WHEN OTHERS THEN
3235: IF l_debug_level > 0 THEN
3236: oe_debug_pub.add('Others Error, OE_BULK_CONFIG_UTIL.Delete_Configurations');
3237: oe_debug_pub.add(substr(sqlerrm,1,240));
3238: END IF;
3239:
3240: OE_BULK_MSG_PUB.Add_Exc_Msg
3241: ( G_PKG_NAME,