DBA Data[Home] [Help]

APPS.OE_PRICE_ORDER_PVT dependencies on OE_ORDER_PUB

Line 118: px_Header_Rec IN OUT NOCOPY OE_ORDER_PUB.Header_Rec_Type

114: G_LDET_BREAK_UOM_ATTRIBUTE QP_PREQ_GRP.VARCHAR_TYPE;
115: G_LDET_ADJUSTMENT_AMOUNT QP_PREQ_GRP.NUMBER_TYPE;
116:
117: Procedure Preprocessing(
118: px_Header_Rec IN OUT NOCOPY OE_ORDER_PUB.Header_Rec_Type
119: ,px_Line_Rec IN OUT NOCOPY OE_ORDER_PUB.Line_Rec_Type
120: ) AS
121: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
122: BEGIN

Line 119: ,px_Line_Rec IN OUT NOCOPY OE_ORDER_PUB.Line_Rec_Type

115: G_LDET_ADJUSTMENT_AMOUNT QP_PREQ_GRP.NUMBER_TYPE;
116:
117: Procedure Preprocessing(
118: px_Header_Rec IN OUT NOCOPY OE_ORDER_PUB.Header_Rec_Type
119: ,px_Line_Rec IN OUT NOCOPY OE_ORDER_PUB.Line_Rec_Type
120: ) AS
121: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
122: BEGIN
123: -- Need both header rec and line rec to price the order

Line 153: OE_ORDER_PUB.g_hdr := px_header_rec;

149: oe_debug_pub.add( ' REQUEST ID IS : ' || QP_PREQ_GRP.G_REQUEST_ID , 1 ) ;
150: END IF;
151:
152: -- Use the given header to price
153: OE_ORDER_PUB.g_hdr := px_header_rec;
154:
155: END Preprocessing;
156:
157: Procedure Insert_Manual_Adj(px_Line_Adj_Tbl IN OUT NOCOPY OE_ORDER_PUB.Line_Adj_Tbl_Type

Line 157: Procedure Insert_Manual_Adj(px_Line_Adj_Tbl IN OUT NOCOPY OE_ORDER_PUB.Line_Adj_Tbl_Type

153: OE_ORDER_PUB.g_hdr := px_header_rec;
154:
155: END Preprocessing;
156:
157: Procedure Insert_Manual_Adj(px_Line_Adj_Tbl IN OUT NOCOPY OE_ORDER_PUB.Line_Adj_Tbl_Type
158: )
159: IS
160: i pls_integer;
161: j pls_integer;

Line 266: p_header_rec OE_Order_PUB.Header_Rec_Type

262: END Insert_Manual_Adj;
263:
264: -- AG change --
265: procedure copy_Header_to_request(
266: p_header_rec OE_Order_PUB.Header_Rec_Type
267: ,p_Request_Type_Code varchar2
268: ,p_calculate_price_flag varchar2
269: ,px_line_index in out NOCOPY NUMBER
270: )

Line 357: p_Line_rec OE_Order_PUB.Line_Rec_Type

353:
354: end copy_Header_to_request;
355:
356: procedure copy_Line_to_request(
357: p_Line_rec OE_Order_PUB.Line_Rec_Type
358: --,px_req_line_tbl in out nocopy QP_PREQ_GRP.LINE_TBL_TYPE
359: ,p_pricing_events varchar2
360: ,p_request_type_code varchar2
361: ,p_honor_price_flag varchar2

Line 390: G_ACTIVE_DATE_FIRST_TBL(px_line_index) := OE_Order_Pub.G_HDR.Ordered_date;

386: G_LINE_INDEX_TBL(px_line_index) := p_line_rec.header_id + p_line_rec.line_id;
387: G_LINE_TYPE_CODE_TBL(px_line_index) := 'LINE';
388:
389: G_PRICING_EFFECTIVE_DATE_TBL(px_line_index):= TRUNC(nvl(p_line_rec.PRICING_DATE,sysdate));
390: G_ACTIVE_DATE_FIRST_TBL(px_line_index) := OE_Order_Pub.G_HDR.Ordered_date;
391: G_ACTIVE_DATE_FIRST_TYPE_TBL(px_line_index):= 'ORD';
392: IF (p_line_rec.schedule_ship_date is not null) THEN
393: G_ACTIVE_DATE_SECOND_TBL(px_line_index) := TRUNC(p_line_rec.schedule_ship_date);
394: G_ACTIVE_DATE_SECOND_TYPE_TBL(px_line_index):= 'SHIP';

Line 424: G_CURRENCY_CODE_TBL(px_line_index) := oe_order_pub.g_hdr.TRANSACTIONAL_CURR_CODE;

420: l_UOM_QUANTITY := p_Line_rec.service_duration * l_uom_rate;
421: End If;
422: G_UOM_QUANTITY_TBL(px_line_index) := l_UOM_QUANTITY;
423: G_PRICED_UOM_CODE_TBL(px_line_index) := p_line_rec.PRICING_QUANTITY_UOM;
424: G_CURRENCY_CODE_TBL(px_line_index) := oe_order_pub.g_hdr.TRANSACTIONAL_CURR_CODE;
425: G_UNIT_PRICE_TBL(px_line_index) := p_line_Rec.UNIT_LIST_PRICE_PER_PQTY;
426: G_PERCENT_PRICE_TBL(px_line_index) := NULL;
427: G_ADJUSTED_UNIT_PRICE_TBL(px_line_index) := p_line_rec.UNIT_SELLING_PRICE_PER_PQTY;
428: G_PROCESSED_FLAG_TBL(px_line_index) := QP_PREQ_GRP.G_NOT_PROCESSED;

Line 456: p_Header_Rec IN OE_ORDER_PUB.Header_Rec_Type

452:
453: end copy_Line_to_request;
454:
455: Procedure Insert_lines(
456: p_Header_Rec IN OE_ORDER_PUB.Header_Rec_Type
457: , px_Line_Tbl IN OUT NOCOPY OE_ORDER_PUB.Line_Tbl_Type
458: , p_order_status_rec QP_UTIL_PUB.ORDER_LINES_STATUS_REC_TYPE
459: , p_pricing_events IN VARCHAR2
460: ) IS

Line 457: , px_Line_Tbl IN OUT NOCOPY OE_ORDER_PUB.Line_Tbl_Type

453: end copy_Line_to_request;
454:
455: Procedure Insert_lines(
456: p_Header_Rec IN OE_ORDER_PUB.Header_Rec_Type
457: , px_Line_Tbl IN OUT NOCOPY OE_ORDER_PUB.Line_Tbl_Type
458: , p_order_status_rec QP_UTIL_PUB.ORDER_LINES_STATUS_REC_TYPE
459: , p_pricing_events IN VARCHAR2
460: ) IS
461: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;

Line 465: l_line_rec OE_ORDER_PUB.Line_Rec_Type;

461: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
462: l_pass_line_flag VARCHAR2(1);
463: l_check_line_flag VARCHAR2(1);
464: l_source_line_flag VARCHAR2(1);
465: l_line_rec OE_ORDER_PUB.Line_Rec_Type;
466: i pls_integer;
467: l_line_index PLS_INTEGER := 0;
468:
469: BEGIN

Line 517: OE_ORDER_PUB.g_line := l_line_rec;

513:
514: IF (l_source_line_flag = 'Y')
515: THEN
516:
517: OE_ORDER_PUB.g_line := l_line_rec;
518: QP_Attr_Mapping_PUB.Build_Contexts(
519: p_request_type_code => 'ONT',
520: --p_line_index => l_line_index,
521: p_line_index => l_line_rec.header_id

Line 549: p_line_index=>oe_order_pub.g_hdr.header_id,

545:
546:
547: QP_Attr_Mapping_PUB.Build_Contexts(
548: p_request_type_code => 'ONT',
549: p_line_index=>oe_order_pub.g_hdr.header_id,
550: p_pricing_type_code => 'H'
551: );
552:
553:

Line 903: , px_line_Tbl in out NOCOPY oe_Order_Pub.Line_Tbl_Type

899: END reset_all_tbls;
900:
901: procedure Report_Engine_Errors(
902: x_return_status out nocopy Varchar2
903: , px_line_Tbl in out NOCOPY oe_Order_Pub.Line_Tbl_Type
904: , p_header_rec IN oe_Order_Pub.header_rec_type
905: )
906: is
907: l_line_rec oe_order_pub.line_rec_type;

Line 904: , p_header_rec IN oe_Order_Pub.header_rec_type

900:
901: procedure Report_Engine_Errors(
902: x_return_status out nocopy Varchar2
903: , px_line_Tbl in out NOCOPY oe_Order_Pub.Line_Tbl_Type
904: , p_header_rec IN oe_Order_Pub.header_rec_type
905: )
906: is
907: l_line_rec oe_order_pub.line_rec_type;
908: l_line_tbl OE_Order_PUB.Line_Tbl_Type;

Line 907: l_line_rec oe_order_pub.line_rec_type;

903: , px_line_Tbl in out NOCOPY oe_Order_Pub.Line_Tbl_Type
904: , p_header_rec IN oe_Order_Pub.header_rec_type
905: )
906: is
907: l_line_rec oe_order_pub.line_rec_type;
908: l_line_tbl OE_Order_PUB.Line_Tbl_Type;
909: i pls_Integer;
910: j pls_Integer:=0;
911: l_price_list Varchar2(240);

Line 908: l_line_tbl OE_Order_PUB.Line_Tbl_Type;

904: , p_header_rec IN oe_Order_Pub.header_rec_type
905: )
906: is
907: l_line_rec oe_order_pub.line_rec_type;
908: l_line_tbl OE_Order_PUB.Line_Tbl_Type;
909: i pls_Integer;
910: j pls_Integer:=0;
911: l_price_list Varchar2(240);
912: l_allow_negative_price Varchar2(30);

Line 914: l_temp_line_rec oe_order_pub.line_rec_type;

910: j pls_Integer:=0;
911: l_price_list Varchar2(240);
912: l_allow_negative_price Varchar2(30);
913: l_invalid_line Varchar2(1);
914: l_temp_line_rec oe_order_pub.line_rec_type;
915: l_request_id NUMBER;
916: vmsg Varchar2(2000);
917:
918: cursor wrong_lines is

Line 1394: px_Header_Rec IN OUT NOCOPY OE_ORDER_PUB.Header_Rec_Type

1390: END IF;
1391: End Report_Engine_Errors;
1392:
1393: Procedure Calculate_Adjustments(
1394: px_Header_Rec IN OUT NOCOPY OE_ORDER_PUB.Header_Rec_Type
1395: ,px_Line_Tbl IN OUT NOCOPY OE_ORDER_PUB.Line_Tbl_Type
1396: ,px_Line_Adj_Tbl IN OUT NOCOPY OE_ORDER_PUB.Line_Adj_Tbl_Type
1397: ,p_Line_Price_Att_Tbl IN Price_Att_Tbl_Type
1398: ,p_Action_Code IN VARCHAR2

Line 1395: ,px_Line_Tbl IN OUT NOCOPY OE_ORDER_PUB.Line_Tbl_Type

1391: End Report_Engine_Errors;
1392:
1393: Procedure Calculate_Adjustments(
1394: px_Header_Rec IN OUT NOCOPY OE_ORDER_PUB.Header_Rec_Type
1395: ,px_Line_Tbl IN OUT NOCOPY OE_ORDER_PUB.Line_Tbl_Type
1396: ,px_Line_Adj_Tbl IN OUT NOCOPY OE_ORDER_PUB.Line_Adj_Tbl_Type
1397: ,p_Line_Price_Att_Tbl IN Price_Att_Tbl_Type
1398: ,p_Action_Code IN VARCHAR2
1399: ,p_Pricing_Events IN VARCHAR2

Line 1396: ,px_Line_Adj_Tbl IN OUT NOCOPY OE_ORDER_PUB.Line_Adj_Tbl_Type

1392:
1393: Procedure Calculate_Adjustments(
1394: px_Header_Rec IN OUT NOCOPY OE_ORDER_PUB.Header_Rec_Type
1395: ,px_Line_Tbl IN OUT NOCOPY OE_ORDER_PUB.Line_Tbl_Type
1396: ,px_Line_Adj_Tbl IN OUT NOCOPY OE_ORDER_PUB.Line_Adj_Tbl_Type
1397: ,p_Line_Price_Att_Tbl IN Price_Att_Tbl_Type
1398: ,p_Action_Code IN VARCHAR2
1399: ,p_Pricing_Events IN VARCHAR2
1400: ,p_Simulation_Flag IN VARCHAR2

Line 1431: Procedure Process_Adjustments(px_line_adj_tbl IN OUT NOCOPY oe_order_pub.line_adj_tbl_type

1427: End if;
1428:
1429: END Calculate_Adjustments;
1430:
1431: Procedure Process_Adjustments(px_line_adj_tbl IN OUT NOCOPY oe_order_pub.line_adj_tbl_type
1432: ,p_Action_Code IN VARCHAR2
1433: ,x_Return_Status OUT NOCOPY VARCHAR2 )
1434: Is
1435: i PLS_INTEGER;

Line 1440: , oe_order_pub.g_hdr.header_id header_id

1436: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
1437: Cursor adj_cur IS
1438: SELECT /*+ ORDERED USE_NL(ldets lines qh) */
1439: oe_price_adjustments_s.nextval price_adjustment_id
1440: , oe_order_pub.g_hdr.header_id header_id
1441: , ldets.automatic_flag automatic_flag
1442: , decode(ldets.modifier_level_code,'ORDER',NULL,lines.line_id) line_id
1443: , ldets.LIST_HEADER_ID list_header_id
1444: , ldets.LIST_LINE_ID list_line_id

Line 1496: l_adj_tbl OE_ORDER_PUB.LINE_ADJ_TBL_TYPE;

1492: AND ldets.created_from_list_type_code not in ('PRL','AGR')
1493: AND ldets.list_line_type_code<>'PLL'
1494: -- AND (l_booked_flag = 'N' or ldets.list_line_type_code<>'IUE')
1495: ;
1496: l_adj_tbl OE_ORDER_PUB.LINE_ADJ_TBL_TYPE;
1497: BEGIN
1498:
1499: x_return_status := FND_API.G_RET_STS_SUCCESS;
1500: -- Populating QP line details table

Line 1616: OE_Order_PUB.G_LINE := NULL;

1612: EXCEPTION
1613: WHEN FND_API.G_EXC_ERROR THEN
1614:
1615: --reseting global structure after engine call
1616: OE_Order_PUB.G_LINE := NULL;
1617: OE_Order_PUB.G_HDR := NULL;
1618: x_return_status := FND_API.G_RET_STS_ERROR;
1619:
1620: IF l_debug_level > 0 THEN

Line 1617: OE_Order_PUB.G_HDR := NULL;

1613: WHEN FND_API.G_EXC_ERROR THEN
1614:
1615: --reseting global structure after engine call
1616: OE_Order_PUB.G_LINE := NULL;
1617: OE_Order_PUB.G_HDR := NULL;
1618: x_return_status := FND_API.G_RET_STS_ERROR;
1619:
1620: IF l_debug_level > 0 THEN
1621: oe_debug_pub.add( 'EXITING PROCESS_ADJUSTMENTS WITH EXC ERROR' , 1 ) ;

Line 1627: OE_Order_PUB.G_LINE := NULL;

1623: RAISE FND_API.G_EXC_ERROR;
1624: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1625:
1626: --reseting global structure after engine call
1627: OE_Order_PUB.G_LINE := NULL;
1628: OE_Order_PUB.G_HDR := NULL;
1629: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1630: IF l_debug_level > 0 THEN
1631: oe_debug_pub.add( 'EXITING PROCESS_ADJUSTMENTS WITH UNEXPECTED ERROR' , 1 ) ;

Line 1628: OE_Order_PUB.G_HDR := NULL;

1624: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1625:
1626: --reseting global structure after engine call
1627: OE_Order_PUB.G_LINE := NULL;
1628: OE_Order_PUB.G_HDR := NULL;
1629: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1630: IF l_debug_level > 0 THEN
1631: oe_debug_pub.add( 'EXITING PROCESS_ADJUSTMENTS WITH UNEXPECTED ERROR' , 1 ) ;
1632: END IF;

Line 1638: OE_Order_PUB.G_LINE := NULL;

1634: WHEN OTHERS THEN
1635:
1636: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1637: --reseting global structure after engine call
1638: OE_Order_PUB.G_LINE := NULL;
1639: OE_Order_PUB.G_HDR := NULL;
1640: IF l_debug_level > 0 THEN
1641: oe_debug_pub.add( 'ERROR IN OE_PRICE_ORDER_PVT.Process_Adjustments' , 1 ) ;
1642: END IF;

Line 1639: OE_Order_PUB.G_HDR := NULL;

1635:
1636: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1637: --reseting global structure after engine call
1638: OE_Order_PUB.G_LINE := NULL;
1639: OE_Order_PUB.G_HDR := NULL;
1640: IF l_debug_level > 0 THEN
1641: oe_debug_pub.add( 'ERROR IN OE_PRICE_ORDER_PVT.Process_Adjustments' , 1 ) ;
1642: END IF;
1643: IF l_debug_level > 0 THEN

Line 1689: l_control_rec.USER_CONVERSION_RATE:= OE_ORDER_PUB.G_HDR.CONVERSION_RATE;

1685: --now pricing take care of all the roundings.
1686: l_control_rec.rounding_flag := 'Q';
1687: --For multi_currency price list
1688: l_control_rec.use_multi_currency:='Y';
1689: l_control_rec.USER_CONVERSION_RATE:= OE_ORDER_PUB.G_HDR.CONVERSION_RATE;
1690: l_control_rec.USER_CONVERSION_TYPE:= OE_ORDER_PUB.G_HDR.CONVERSION_TYPE_CODE;
1691: l_set_of_books := Oe_Order_Cache.Load_Set_Of_Books;
1692: l_control_rec.FUNCTION_CURRENCY := l_set_of_books.currency_code;
1693:

Line 1690: l_control_rec.USER_CONVERSION_TYPE:= OE_ORDER_PUB.G_HDR.CONVERSION_TYPE_CODE;

1686: l_control_rec.rounding_flag := 'Q';
1687: --For multi_currency price list
1688: l_control_rec.use_multi_currency:='Y';
1689: l_control_rec.USER_CONVERSION_RATE:= OE_ORDER_PUB.G_HDR.CONVERSION_RATE;
1690: l_control_rec.USER_CONVERSION_TYPE:= OE_ORDER_PUB.G_HDR.CONVERSION_TYPE_CODE;
1691: l_set_of_books := Oe_Order_Cache.Load_Set_Of_Books;
1692: l_control_rec.FUNCTION_CURRENCY := l_set_of_books.currency_code;
1693:
1694: -- added for freight rating.

Line 1747: Procedure Update_Lines(px_Line_Tbl IN OUT NOCOPY OE_ORDER_PUB.Line_Tbl_Type)

1743: WHEN OTHERS THEN
1744: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1745: END Call_Pricing_Engine;
1746:
1747: Procedure Update_Lines(px_Line_Tbl IN OUT NOCOPY OE_ORDER_PUB.Line_Tbl_Type)
1748: IS
1749: l_line_index pls_integer;
1750: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
1751: l_line_rec OE_ORDER_PUB.LINE_REC_TYPE;

Line 1751: l_line_rec OE_ORDER_PUB.LINE_REC_TYPE;

1747: Procedure Update_Lines(px_Line_Tbl IN OUT NOCOPY OE_ORDER_PUB.Line_Tbl_Type)
1748: IS
1749: l_line_index pls_integer;
1750: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
1751: l_line_rec OE_ORDER_PUB.LINE_REC_TYPE;
1752: BEGIN
1753: l_line_index := px_line_tbl.first;
1754: while l_line_index is not null loop
1755: l_line_rec := px_line_tbl(l_line_index);

Line 1821: px_Header_Rec IN OUT NOCOPY OE_ORDER_PUB.Header_Rec_Type

1817: -- Calculate_flag: TRUE
1818: -- Simulation_Flag: TRUE
1819: -- Get_Freight_FLag: FALSE
1820: Procedure Price_Order(
1821: px_Header_Rec IN OUT NOCOPY OE_ORDER_PUB.Header_Rec_Type
1822: ,px_Line_Rec IN OUT NOCOPY OE_ORDER_PUB.Line_Rec_Type
1823: -- ,px_Line_Tbl IN OUT NOCOPY OE_ORDER_PUB.Line_Tbl_Type
1824: ,px_Line_Adj_Tbl IN OUT NOCOPY OE_ORDER_PUB.Line_Adj_Tbl_Type
1825: ,p_Line_Price_Att_Tbl IN Price_Att_Tbl_Type

Line 1822: ,px_Line_Rec IN OUT NOCOPY OE_ORDER_PUB.Line_Rec_Type

1818: -- Simulation_Flag: TRUE
1819: -- Get_Freight_FLag: FALSE
1820: Procedure Price_Order(
1821: px_Header_Rec IN OUT NOCOPY OE_ORDER_PUB.Header_Rec_Type
1822: ,px_Line_Rec IN OUT NOCOPY OE_ORDER_PUB.Line_Rec_Type
1823: -- ,px_Line_Tbl IN OUT NOCOPY OE_ORDER_PUB.Line_Tbl_Type
1824: ,px_Line_Adj_Tbl IN OUT NOCOPY OE_ORDER_PUB.Line_Adj_Tbl_Type
1825: ,p_Line_Price_Att_Tbl IN Price_Att_Tbl_Type
1826: ,p_Action_Code IN VARCHAR2

Line 1823: -- ,px_Line_Tbl IN OUT NOCOPY OE_ORDER_PUB.Line_Tbl_Type

1819: -- Get_Freight_FLag: FALSE
1820: Procedure Price_Order(
1821: px_Header_Rec IN OUT NOCOPY OE_ORDER_PUB.Header_Rec_Type
1822: ,px_Line_Rec IN OUT NOCOPY OE_ORDER_PUB.Line_Rec_Type
1823: -- ,px_Line_Tbl IN OUT NOCOPY OE_ORDER_PUB.Line_Tbl_Type
1824: ,px_Line_Adj_Tbl IN OUT NOCOPY OE_ORDER_PUB.Line_Adj_Tbl_Type
1825: ,p_Line_Price_Att_Tbl IN Price_Att_Tbl_Type
1826: ,p_Action_Code IN VARCHAR2
1827: ,p_Pricing_Events IN VARCHAR2

Line 1824: ,px_Line_Adj_Tbl IN OUT NOCOPY OE_ORDER_PUB.Line_Adj_Tbl_Type

1820: Procedure Price_Order(
1821: px_Header_Rec IN OUT NOCOPY OE_ORDER_PUB.Header_Rec_Type
1822: ,px_Line_Rec IN OUT NOCOPY OE_ORDER_PUB.Line_Rec_Type
1823: -- ,px_Line_Tbl IN OUT NOCOPY OE_ORDER_PUB.Line_Tbl_Type
1824: ,px_Line_Adj_Tbl IN OUT NOCOPY OE_ORDER_PUB.Line_Adj_Tbl_Type
1825: ,p_Line_Price_Att_Tbl IN Price_Att_Tbl_Type
1826: ,p_Action_Code IN VARCHAR2
1827: ,p_Pricing_Events IN VARCHAR2
1828: ,p_Simulation_Flag IN VARCHAR2

Line 1834: l_header_adj_tbl OE_ORDER_PUB.Header_ADJ_Tbl_Type;

1830: ,x_Return_Status OUT NOCOPY VARCHAR2
1831: ) AS
1832: l_any_frozen_line BOOLEAN;
1833: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
1834: l_header_adj_tbl OE_ORDER_PUB.Header_ADJ_Tbl_Type;
1835: l_header_price_att_tbl OE_PRICE_ORDER_PVT.price_att_tbl_type;
1836: l_Line_Tbl OE_ORDER_PUB.Line_Tbl_Type;
1837: i PLS_INTEGER;
1838: l_control_rec OE_ORDER_PRICE_PVT.Control_Rec_Type;

Line 1836: l_Line_Tbl OE_ORDER_PUB.Line_Tbl_Type;

1832: l_any_frozen_line BOOLEAN;
1833: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
1834: l_header_adj_tbl OE_ORDER_PUB.Header_ADJ_Tbl_Type;
1835: l_header_price_att_tbl OE_PRICE_ORDER_PVT.price_att_tbl_type;
1836: l_Line_Tbl OE_ORDER_PUB.Line_Tbl_Type;
1837: i PLS_INTEGER;
1838: l_control_rec OE_ORDER_PRICE_PVT.Control_Rec_Type;
1839: l_hdr_chg_count NUMBER; --TaxER
1840: l_org_id NUMBER(15):=MO_GLOBAL.Get_Current_Org_Id; --TaxER

Line 1843: l_header_rec OE_Order_PUB.Header_Rec_Type; --TaxER

1839: l_hdr_chg_count NUMBER; --TaxER
1840: l_org_id NUMBER(15):=MO_GLOBAL.Get_Current_Org_Id; --TaxER
1841: l_current_event number := 0; --TaxER
1842: l_tax_calculation_event_code number := 0; --TaxER
1843: l_header_rec OE_Order_PUB.Header_Rec_Type; --TaxER
1844: BEGIN
1845:
1846: x_return_status := FND_API.G_RET_STS_SUCCESS;
1847:

Line 2005: OE_Order_PUB.G_LINE := NULL;

2001: EXCEPTION
2002: WHEN FND_API.G_EXC_ERROR THEN
2003:
2004: --reseting global structure after engine call
2005: OE_Order_PUB.G_LINE := NULL;
2006: OE_Order_PUB.G_HDR := NULL;
2007: x_return_status := FND_API.G_RET_STS_ERROR;
2008:
2009: IF l_debug_level > 0 THEN

Line 2006: OE_Order_PUB.G_HDR := NULL;

2002: WHEN FND_API.G_EXC_ERROR THEN
2003:
2004: --reseting global structure after engine call
2005: OE_Order_PUB.G_LINE := NULL;
2006: OE_Order_PUB.G_HDR := NULL;
2007: x_return_status := FND_API.G_RET_STS_ERROR;
2008:
2009: IF l_debug_level > 0 THEN
2010: oe_debug_pub.add( 'EXITING PRICE_ORDER WITH EXC ERROR' , 1 ) ;

Line 2016: OE_Order_PUB.G_LINE := NULL;

2012: RAISE FND_API.G_EXC_ERROR;
2013: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2014:
2015: --reseting global structure after engine call
2016: OE_Order_PUB.G_LINE := NULL;
2017: OE_Order_PUB.G_HDR := NULL;
2018: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2019: IF l_debug_level > 0 THEN
2020: oe_debug_pub.add( 'EXITING PRICE_ORDER WITH UNEXPECTED ERROR' , 1 ) ;

Line 2017: OE_Order_PUB.G_HDR := NULL;

2013: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2014:
2015: --reseting global structure after engine call
2016: OE_Order_PUB.G_LINE := NULL;
2017: OE_Order_PUB.G_HDR := NULL;
2018: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2019: IF l_debug_level > 0 THEN
2020: oe_debug_pub.add( 'EXITING PRICE_ORDER WITH UNEXPECTED ERROR' , 1 ) ;
2021: END IF;

Line 2027: OE_Order_PUB.G_LINE := NULL;

2023: WHEN OTHERS THEN
2024:
2025: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2026: --reseting global structure after engine call
2027: OE_Order_PUB.G_LINE := NULL;
2028: OE_Order_PUB.G_HDR := NULL;
2029: IF l_debug_level > 0 THEN
2030: oe_debug_pub.add( 'ERROR IN OE_PRICE_ORDER_PVT.PRICE_ORDER' , 1 ) ;
2031: END IF;

Line 2028: OE_Order_PUB.G_HDR := NULL;

2024:
2025: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2026: --reseting global structure after engine call
2027: OE_Order_PUB.G_LINE := NULL;
2028: OE_Order_PUB.G_HDR := NULL;
2029: IF l_debug_level > 0 THEN
2030: oe_debug_pub.add( 'ERROR IN OE_PRICE_ORDER_PVT.PRICE_ORDER' , 1 ) ;
2031: END IF;
2032: IF l_debug_level > 0 THEN