[Home] [Help]
1: PACKAGE BODY OE_Invoice_PUB AS
2: /* $Header: OEXPINVB.pls 120.53.12010000.7 2009/02/03 12:34:31 aambasth ship $ */
3:
4: -- Global constant holding the package name
5:
2: /* $Header: OEXPINVB.pls 120.53.12010000.7 2009/02/03 12:34:31 aambasth ship $ */
3:
4: -- Global constant holding the package name
5:
6: G_PKG_NAME CONSTANT VARCHAR2(30) := 'OE_Invoice_PUB';
7: G_ITEMTYPE VARCHAR2(8);
8:
9: --bug5336639 start
10: G_CURRENT_LINE_ID NUMBER := null;
187: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
188: BEGIN
189:
190: IF l_debug_level > 0 THEN
191: oe_debug_pub.add('entering oe_invoice_pub . update_service_dates() '
192: ||' p_line_rec.line_id = ' || P_LINE_REC.LINE_ID
193: ||' p_line_rec.service_start_date = '||TO_CHAR(P_LINE_REC.SERVICE_START_DATE, 'YYYY/MM/DD' )
194: ||' p_line_rec.service_end_date = '|| TO_CHAR ( P_LINE_REC.SERVICE_END_DATE , 'YYYY/MM/DD' )
195: ) ;
227: oe_debug_pub.add(' l_return_status == > '||l_return_status);
228: END IF;
229:
230: IF l_debug_level > 0 THEN
231: oe_debug_pub.add('exiting oe_invoice_pub . update_service_dates() '
232: ||' p_line_rec.line_id = ' || P_LINE_REC.LINE_ID
233: ||' p_line_rec.service_start_date = '||TO_CHAR(P_LINE_REC.SERVICE_START_DATE, 'YYYY/MM/DD' )
234: ||' p_line_rec.service_end_date = '|| TO_CHAR ( P_LINE_REC.SERVICE_END_DATE , 'YYYY/MM/DD' )
235: ) ;
7526: UPDATE OE_ORDER_LINES_ALL
7527: SET INVOICE_INTERFACE_STATUS_CODE = p_invoice_interface_status,
7528: INVOICED_QUANTITY = l_invoiced_quantity,
7529: FLOW_STATUS_CODE = l_flow_status_code,
7530: SERVICE_START_DATE = p_line_rec.SERVICE_START_DATE, --bug# 7231974 :- as srvc_dates are derived in OE_INVOICE_PUB, they should be updated in OM tables as well
7531: SERVICE_END_DATE = p_line_rec.SERVICE_END_DATE, --bug # 7231974
7532: CALCULATE_PRICE_FLAG = 'N',
7533: LOCK_CONTROL = LOCK_CONTROL + 1
7534: WHERE LINE_ID = p_line_rec.line_id;
9938: END;
9939: -- BUG# 7431368 : Performance fix : End
9940:
9941:
9942: END OE_Invoice_PUB;