DBA Data[Home] [Help]

APPS.OE_PRICE_ORDER_PVT_OBSOLETE dependencies on OE_DEBUG_PUB

Line 79: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;

75: Procedure Preprocessing(
76: px_Header_Rec IN OUT NOCOPY OE_ORDER_PUB.Header_Rec_Type
77: ,px_Line_Rec IN OUT NOCOPY OE_ORDER_PUB.Line_Rec_Type
78: ) AS
79: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
80: BEGIN
81: -- Need both header rec and line rec to price the order
82:
83: IF (px_header_rec.header_id IS NULL OR

Line 89: oe_debug_pub.add( 'PRICE_ORDER: SETTING REQUEST ID' , 1 ) ;

85: RAISE FND_API.G_EXC_ERROR;
86: END IF;
87:
88: IF l_debug_level > 0 THEN
89: oe_debug_pub.add( 'PRICE_ORDER: SETTING REQUEST ID' , 1 ) ;
90: END IF;
91:
92: G_PASS_LINE_TBL.delete;
93: qp_price_request_context.set_request_id;

Line 96: oe_debug_pub.add( ' REQUEST ID IS : ' || QP_PREQ_GRP.G_REQUEST_ID , 1 ) ;

92: G_PASS_LINE_TBL.delete;
93: qp_price_request_context.set_request_id;
94:
95: IF l_debug_level > 0 THEN
96: oe_debug_pub.add( ' REQUEST ID IS : ' || QP_PREQ_GRP.G_REQUEST_ID , 1 ) ;
97: END IF;
98:
99: -- Use the given header to price
100: OE_ORDER_PUB.g_hdr := px_header_rec;

Line 215: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;

211: is
212: l_req_line_rec QP_PREQ_GRP.LINE_REC_TYPE;
213: --l_line_index pls_integer := px_req_line_tbl.count;
214: --
215: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
216: --
217: begin
218: G_STMT_NO := 'copy_Header_to_request#10';
219: IF l_debug_level > 0 THEN

Line 220: oe_debug_pub.add( 'ENTERING OE_ORDER_PRICE_PVT.COPY_HEADER_TO_REQUEST' , 1 ) ;

216: --
217: begin
218: G_STMT_NO := 'copy_Header_to_request#10';
219: IF l_debug_level > 0 THEN
220: oe_debug_pub.add( 'ENTERING OE_ORDER_PRICE_PVT.COPY_HEADER_TO_REQUEST' , 1 ) ;
221: END IF;
222:
223: --l_line_index := l_line_index+1;
224: px_line_index := px_line_index+1;

Line 291: oe_debug_pub.add( 'EXISTING OE_ORDER_PRICE_PVT.COPY_HEADER_TO_REQUEST' , 1 ) ;

287: G_CATCHWEIGHT_QTY_TBL(px_line_index) := NULL;
288: G_ACTUAL_ORDER_QTY_TBL(px_line_index):=NULL;
289:
290: IF l_debug_level > 0 THEN
291: oe_debug_pub.add( 'EXISTING OE_ORDER_PRICE_PVT.COPY_HEADER_TO_REQUEST' , 1 ) ;
292: END IF;
293:
294: end copy_Header_to_request;
295:

Line 321: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;

317: x_item_rec OE_Order_Cache.Item_Rec_Type;
318: l_UOM_QUANTITY NUMBER;
319: l_Calculate_Price_Flag varchar2(1);
320: --
321: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
322: --
323: begin
324:
325: px_line_index := px_line_index + 1;

Line 341: oe_debug_pub.add( 'QUANTITY'||L_REQ_LINE_REC.LINE_QUANTITY||' '||L_REQ_LINE_REC.PRICED_QUANTITY , 3 ) ;

337: G_ACTIVE_DATE_SECOND_TYPE_TBL(px_line_index):= NULL;
338: END IF;
339: /*
340: IF l_debug_level > 0 THEN
341: oe_debug_pub.add( 'QUANTITY'||L_REQ_LINE_REC.LINE_QUANTITY||' '||L_REQ_LINE_REC.PRICED_QUANTITY , 3 ) ;
342: END IF;
343: IF l_debug_level > 0 THEN
344: oe_debug_pub.add( 'PRICE FLAG'||L_REQ_LINE_REC.PRICE_FLAG ) ;
345: END IF;

Line 344: oe_debug_pub.add( 'PRICE FLAG'||L_REQ_LINE_REC.PRICE_FLAG ) ;

340: IF l_debug_level > 0 THEN
341: oe_debug_pub.add( 'QUANTITY'||L_REQ_LINE_REC.LINE_QUANTITY||' '||L_REQ_LINE_REC.PRICED_QUANTITY , 3 ) ;
342: END IF;
343: IF l_debug_level > 0 THEN
344: oe_debug_pub.add( 'PRICE FLAG'||L_REQ_LINE_REC.PRICE_FLAG ) ;
345: END IF;
346: */
347: G_LINE_QUANTITY_TBL(px_line_index) := p_line_rec.ordered_quantity;
348: G_LINE_UOM_CODE_TBL(px_line_index) := p_line_rec.order_quantity_uom;

Line 372: oe_debug_pub.add( 'LINE ID IN G_LINE_ID_TBL:'|| G_LINE_ID_TBL ( PX_LINE_INDEX ) ) ;

368: G_PROCESSED_FLAG_TBL(px_line_index) := QP_PREQ_GRP.G_NOT_PROCESSED;
369: G_PRICE_FLAG_TBL(px_line_index) := nvl(p_line_rec.CALCULATE_PRICE_FLAG,'Y');
370: G_LINE_ID_TBL(px_line_index) := p_line_rec.LINE_ID;
371: IF l_debug_level > 0 THEN
372: oe_debug_pub.add( 'LINE ID IN G_LINE_ID_TBL:'|| G_LINE_ID_TBL ( PX_LINE_INDEX ) ) ;
373: END IF;
374: G_ROUNDING_FLAG_TBL(px_line_index) := 'Q';
375: G_ROUNDING_FACTOR_TBL(px_line_index) := NULL;
376: G_PROCESSING_ORDER_TBL(px_line_index) := NULL;

Line 390: oe_debug_pub.add( 'EXISTING OE_ORDER_PRICE_PVT.COPY_LINE_TO_REQUEST' , 1 ) ;

386: G_LINE_CATEGORY_TBL(px_line_index) := p_line_rec.line_category_code;
387: G_catchweight_qty_tbl(px_line_index) := NULL;
388: g_actual_order_qty_tbl(px_line_index):= NULL;
389: IF l_debug_level > 0 THEN
390: oe_debug_pub.add( 'EXISTING OE_ORDER_PRICE_PVT.COPY_LINE_TO_REQUEST' , 1 ) ;
391: END IF;
392:
393: end copy_Line_to_request;
394:

Line 401: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;

397: , px_Line_Tbl IN OUT NOCOPY OE_ORDER_PUB.Line_Tbl_Type
398: , p_order_status_rec QP_UTIL_PUB.ORDER_LINES_STATUS_REC_TYPE
399: , p_pricing_events IN VARCHAR2
400: ) IS
401: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
402: l_pass_line_flag VARCHAR2(1);
403: l_check_line_flag VARCHAR2(1);
404: l_source_line_flag VARCHAR2(1);
405: l_line_rec OE_ORDER_PUB.Line_Rec_Type;

Line 508: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;

504: IS
505: l_return_status varchar2(1) := FND_API.G_RET_STS_SUCCESS;
506: l_return_status_Text varchar2(240) ;
507: --
508: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
509: --
510: BEGIN
511: IF l_debug_level > 0 THEN
512: oe_debug_pub.add( 'BEFORE DIRECT INSERT INTO TEMP TABLE: BULK INSERT'||G_LINE_INDEX_TBL.COUNT , 1 ) ;

Line 512: oe_debug_pub.add( 'BEFORE DIRECT INSERT INTO TEMP TABLE: BULK INSERT'||G_LINE_INDEX_TBL.COUNT , 1 ) ;

508: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
509: --
510: BEGIN
511: IF l_debug_level > 0 THEN
512: oe_debug_pub.add( 'BEFORE DIRECT INSERT INTO TEMP TABLE: BULK INSERT'||G_LINE_INDEX_TBL.COUNT , 1 ) ;
513: END IF;
514: QP_PREQ_GRP.INSERT_LINES2
515: (p_LINE_INDEX => G_LINE_INDEX_TBL,
516: p_LINE_TYPE_CODE => G_LINE_TYPE_CODE_TBL,

Line 555: oe_debug_pub.add( 'WRONG IN INSERT_LINES2'||L_RETURN_STATUS_TEXT , 1 ) ;

551: x_status_text =>l_return_status_text);
552:
553: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
554: IF l_debug_level > 0 THEN
555: oe_debug_pub.add( 'WRONG IN INSERT_LINES2'||L_RETURN_STATUS_TEXT , 1 ) ;
556: END IF;
557: FND_MESSAGE.SET_NAME('ONT','ONT_PRICING_ERROR');
558: FND_MESSAGE.SET_TOKEN('ERR_TEXT',l_return_status_text);
559: OE_MSG_PUB.Add;

Line 600: oe_debug_pub.add( 'ERROR INSERTING INTO LINE ATTRS'||SQLERRM ) ;

596: l_return_status_text );
597:
598: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
599: IF l_debug_level > 0 THEN
600: oe_debug_pub.add( 'ERROR INSERTING INTO LINE ATTRS'||SQLERRM ) ;
601: END IF;
602: FND_MESSAGE.SET_NAME('ONT','ONT_PRICING_ERROR');
603: FND_MESSAGE.SET_TOKEN('ERR_TEXT',l_return_status_text);
604: OE_MSG_PUB.Add;

Line 610: oe_debug_pub.add( 'AFTER DIRECT INSERT INTO TEMP TABLE: BULK INSERT' , 1 ) ;

606: END IF;
607:
608: END IF;
609: IF l_debug_level > 0 THEN
610: oe_debug_pub.add( 'AFTER DIRECT INSERT INTO TEMP TABLE: BULK INSERT' , 1 ) ;
611: END IF;
612:
613: EXCEPTION
614: WHEN OTHERS THEN

Line 628: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;

624: PROCEDURE Reset_All_Tbls
625: AS
626: l_routine VARCHAR2(240):='QP_PREQ_GRP.Reset_All_Tbls';
627: --
628: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
629: --
630: BEGIN
631: G_LINE_INDEX_tbl.delete;
632: G_LINE_TYPE_CODE_TBL.delete ;

Line 693: oe_debug_pub.add( L_ROUTINE||': '||SQLERRM , 1 ) ;

689: G_ATTR_PRIMARY_UOM_FLAG_TBL.delete;
690: EXCEPTION
691: WHEN OTHERS THEN
692: IF l_debug_level > 0 THEN
693: oe_debug_pub.add( L_ROUTINE||': '||SQLERRM , 1 ) ;
694: END IF;
695: END reset_all_tbls;
696:
697: procedure Report_Engine_Errors(

Line 759: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;

755: --and lines.pricing_status_code in (QP_PREQ_GRP.G_STATUS_UPDATED
756: -- , QP_PREQ_GRP.G_STATUS_GSA_VIOLATION
757: -- );
758: --
759: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
760: --
761: begin
762: -- Update Order Lines
763: IF l_debug_level > 0 THEN

Line 764: oe_debug_pub.add( 'ENTERING OE_ORDER_PRICE_PVT.REPORT_ENGINE_ERROR' , 1 ) ;

760: --
761: begin
762: -- Update Order Lines
763: IF l_debug_level > 0 THEN
764: oe_debug_pub.add( 'ENTERING OE_ORDER_PRICE_PVT.REPORT_ENGINE_ERROR' , 1 ) ;
765: END IF;
766: G_STMT_NO := 'Report_Engine_Error#10';
767:
768: For wrong_line in wrong_lines loop --i:= p_req_line_tbl.first;

Line 773: oe_debug_pub.add( 'ERROR '||J||' LINE'||PX_LINE_TBL ( J ) .LINE_ID||' '||WRONG_LINE.LINE_ID ) ;

769:
770: J:= px_Line_Tbl.First;
771: While J is not null loop
772: IF l_debug_level > 0 THEN
773: oe_debug_pub.add( 'ERROR '||J||' LINE'||PX_LINE_TBL ( J ) .LINE_ID||' '||WRONG_LINE.LINE_ID ) ;
774: END IF;
775: If px_Line_Tbl(j).line_id = wrong_line.line_id
776: --or
777: -- J = wrong_line.line_index

Line 781: oe_debug_pub.add( 'PRICE'||L_LINE_REC.UNIT_LIST_PRICE||'+'||L_LINE_REC.UNIT_LIST_PRICE_PER_PQTY ) ;

777: -- J = wrong_line.line_index
778: then
779: l_line_rec := px_Line_Tbl(J);
780: IF l_debug_level > 0 THEN
781: oe_debug_pub.add( 'PRICE'||L_LINE_REC.UNIT_LIST_PRICE||'+'||L_LINE_REC.UNIT_LIST_PRICE_PER_PQTY ) ;
782: END IF;
783: exit;
784: End if;
785: J:= px_Line_Tbl.next(j);

Line 804: oe_debug_pub.add( 'THE STATUS'||WRONG_LINE.PRICING_STATUS_CODE||':'||WRONG_LINE.PROCESSED_CODE||':'||WRONG_LINE.STATUS_TEXT ) ;

800: ,p_source_document_line_id => l_line_rec.source_document_line_id
801: );
802:
803: IF l_debug_level > 0 THEN
804: oe_debug_pub.add( 'THE STATUS'||WRONG_LINE.PRICING_STATUS_CODE||':'||WRONG_LINE.PROCESSED_CODE||':'||WRONG_LINE.STATUS_TEXT ) ;
805: END IF;
806: l_invalid_line := 'N';
807: -- add message when the price list is found to be inactive
808: IF wrong_line.line_Type_code ='LINE' and

Line 811: oe_debug_pub.add( 'PRICE LIST NOT FOUND' ) ;

807: -- add message when the price list is found to be inactive
808: IF wrong_line.line_Type_code ='LINE' and
809: wrong_line.processed_code = QP_PREQ_GRP.G_STS_LHS_NOT_FOUND Then
810: IF l_debug_level > 0 THEN
811: oe_debug_pub.add( 'PRICE LIST NOT FOUND' ) ;
812: END IF;
813: IF l_debug_level > 0 THEN
814: oe_debug_pub.add( 'LINDA , INVALID PRICE LIST ' , 1 ) ;
815: END IF;

Line 814: oe_debug_pub.add( 'LINDA , INVALID PRICE LIST ' , 1 ) ;

810: IF l_debug_level > 0 THEN
811: oe_debug_pub.add( 'PRICE LIST NOT FOUND' ) ;
812: END IF;
813: IF l_debug_level > 0 THEN
814: oe_debug_pub.add( 'LINDA , INVALID PRICE LIST ' , 1 ) ;
815: END IF;
816: FND_MESSAGE.SET_NAME('ONT','ONT_NO_PRICE_LIST_FOUND');
817: FND_MESSAGE.SET_TOKEN('ITEM',nvl(l_line_rec.Ordered_Item,l_line_rec.inventory_item_id));
818: FND_MESSAGE.SET_TOKEN('UOM',l_line_rec.Order_Quantity_uom);

Line 859: oe_debug_pub.add( 'INVALID ITEM/PRICE LIST COMBINATION'||L_LINE_REC.ORDERED_ITEM||L_LINE_REC.ORDER_QUANTITY_UOM||L_PRICE_LIST ) ;

855: End;
856:
857: If wrong_line.pricing_status_code = QP_PREQ_GRP.G_STATUS_INVALID_PRICE_LIST then
858: IF l_debug_level > 0 THEN
859: oe_debug_pub.add( 'INVALID ITEM/PRICE LIST COMBINATION'||L_LINE_REC.ORDERED_ITEM||L_LINE_REC.ORDER_QUANTITY_UOM||L_PRICE_LIST ) ;
860: END IF;
861: FND_MESSAGE.SET_NAME('ONT','OE_PRC_NO_LIST_PRICE');
862: FND_MESSAGE.SET_TOKEN('ITEM',nvl(l_line_rec.Ordered_Item,l_line_rec.inventory_item_id));
863: FND_MESSAGE.SET_TOKEN('UNIT',l_line_rec.Order_Quantity_uom);

Line 875: oe_debug_pub.add( 'BEFORE CHECKING BOOK FLAG' ) ;

871: else
872: OE_MSG_PUB.Add;
873: end if;
874: IF l_debug_level > 0 THEN
875: oe_debug_pub.add( 'BEFORE CHECKING BOOK FLAG' ) ;
876: END IF;
877:
878: If nvl(l_line_rec.booked_flag,'X') = 'Y' Then
879: IF l_debug_level > 0 THEN

Line 880: oe_debug_pub.add( ' EXCEPTION: PRICE LIST MISSING FOR BOOKED ORDER' ) ;

876: END IF;
877:
878: If nvl(l_line_rec.booked_flag,'X') = 'Y' Then
879: IF l_debug_level > 0 THEN
880: oe_debug_pub.add( ' EXCEPTION: PRICE LIST MISSING FOR BOOKED ORDER' ) ;
881: END IF;
882: FND_MESSAGE.SET_NAME('ONT','OE_BOOK_REQD_LINE_ATTRIBUTE');
883: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',OE_ORDER_UTIL.GET_ATTRIBUTE_NAME('UNIT_LIST_PRICE'));
884: OE_MSG_PUB.ADD;

Line 888: oe_debug_pub.add( 'PRICE'||L_LINE_REC.UNIT_SELLING_PRICE||':'||L_LINE_REC.UNIT_LIST_PRICE ) ;

884: OE_MSG_PUB.ADD;
885: RAISE FND_API.G_EXC_ERROR;
886: End If;
887: IF l_debug_level > 0 THEN
888: oe_debug_pub.add( 'PRICE'||L_LINE_REC.UNIT_SELLING_PRICE||':'||L_LINE_REC.UNIT_LIST_PRICE ) ;
889: END IF;
890:
891: --Fix bug 1650637
892: If (l_line_rec.unit_selling_price Is Not Null or

Line 905: oe_debug_pub.add( 'PRICE LIST NOT FOUND' ) ;

901:
902:
903: Elsif wrong_line.pricing_status_code = QP_PREQ_GRP.G_STS_LHS_NOT_FOUND Then
904: IF l_debug_level > 0 THEN
905: oe_debug_pub.add( 'PRICE LIST NOT FOUND' ) ;
906: END IF;
907: FND_MESSAGE.SET_NAME('ONT','ONT_NO_PRICE_LIST_FOUND');
908: FND_MESSAGE.SET_TOKEN('ITEM',nvl(l_line_rec.Ordered_Item,l_line_rec.inventory_item_id));
909: FND_MESSAGE.SET_TOKEN('UOM',l_line_rec.Order_Quantity_uom);

Line 921: oe_debug_pub.add( 'ERROR IN FORMULA PROCESSING' ) ;

917: OE_MSG_PUB.Add;
918: end if;
919: Elsif wrong_line.pricing_status_code = QP_PREQ_GRP.G_STATUS_FORMULA_ERROR then
920: IF l_debug_level > 0 THEN
921: oe_debug_pub.add( 'ERROR IN FORMULA PROCESSING' ) ;
922: END IF;
923: FND_MESSAGE.SET_NAME('ONT','ONT_PRC_ERROR_IN_FORMULA');
924: FND_MESSAGE.SET_TOKEN('ERR_TEXT',wrong_line.status_text);
925: IF OE_CODE_CONTROL.Get_Code_Release_Level >= '110509' THEN

Line 939: oe_debug_pub.add( 'OTHER ERRORS PROCESSING' ) ;

935: ( QP_PREQ_GRP.G_STATUS_OTHER_ERRORS , FND_API.G_RET_STS_UNEXP_ERROR,
936: FND_API.G_RET_STS_ERROR)
937: then
938: IF l_debug_level > 0 THEN
939: oe_debug_pub.add( 'OTHER ERRORS PROCESSING' ) ;
940: END IF;
941: FND_MESSAGE.SET_NAME('ONT','ONT_PRICING_ERROR');
942: FND_MESSAGE.SET_TOKEN('ERR_TEXT',wrong_line.status_text);
943: IF OE_CODE_CONTROL.Get_Code_Release_Level >= '110509' THEN

Line 954: oe_debug_pub.add( 'INVALID UOM' ) ;

950: OE_MSG_PUB.Add;
951: end if;
952: Elsif wrong_line.pricing_status_code = QP_PREQ_GRP.G_STATUS_INVALID_UOM then
953: IF l_debug_level > 0 THEN
954: oe_debug_pub.add( 'INVALID UOM' ) ;
955: END IF;
956: FND_MESSAGE.SET_NAME('ONT','ONT_PRC_INVALID_UOM');
957: FND_MESSAGE.SET_TOKEN('ITEM',nvl(l_line_rec.Ordered_Item,l_line_rec.inventory_item_id));
958: FND_MESSAGE.SET_TOKEN('UOM',l_line_rec.Order_Quantity_uom);

Line 970: oe_debug_pub.add( 'DUPLICATE PRICE LIST' ) ;

966: OE_MSG_PUB.Add;
967: end if;
968: Elsif wrong_line.pricing_status_code = QP_PREQ_GRP.G_STATUS_DUP_PRICE_LIST then
969: IF l_debug_level > 0 THEN
970: oe_debug_pub.add( 'DUPLICATE PRICE LIST' ) ;
971: END IF;
972: FND_MESSAGE.SET_NAME('ONT','ONT_PRC_DUPLICATE_PRICE_LIST');
973:
974: Begin

Line 1018: oe_debug_pub.add( 'INVALID UOM CONVERSION' ) ;

1014: OE_MSG_PUB.Add;
1015: end if;
1016: Elsif wrong_line.pricing_status_code = QP_PREQ_GRP.G_STATUS_INVALID_UOM_CONV then
1017: IF l_debug_level > 0 THEN
1018: oe_debug_pub.add( 'INVALID UOM CONVERSION' ) ;
1019: END IF;
1020: FND_MESSAGE.SET_NAME('ONT','ONT_PRC_INVALID_UOM_CONVERSION');
1021: FND_MESSAGE.SET_TOKEN('UOM_TEXT','( '||l_line_rec.Ordered_Item||' ) '||
1022: wrong_line.status_text);

Line 1034: oe_debug_pub.add( 'UNABLE TO RESOLVE INCOMPATIBILITY' ) ;

1030: OE_MSG_PUB.Add;
1031: end if;
1032: Elsif wrong_line.pricing_status_code = QP_PREQ_GRP.G_STATUS_INVALID_INCOMP then
1033: IF l_debug_level > 0 THEN
1034: oe_debug_pub.add( 'UNABLE TO RESOLVE INCOMPATIBILITY' ) ;
1035: END IF;
1036: FND_MESSAGE.SET_NAME('ONT','ONT_PRC_INVALID_INCOMP');
1037: FND_MESSAGE.SET_TOKEN('ERR_TEXT','( '||
1038: l_line_rec.Ordered_Item||' ) '||wrong_line.status_text);

Line 1050: oe_debug_pub.add( 'ERROR WHILE EVALUATING THE BEST PRICE' ) ;

1046: OE_MSG_PUB.Add;
1047: end if;
1048: Elsif wrong_line.pricing_status_code = QP_PREQ_GRP.G_STATUS_BEST_PRICE_EVAL_ERROR then
1049: IF l_debug_level > 0 THEN
1050: oe_debug_pub.add( 'ERROR WHILE EVALUATING THE BEST PRICE' ) ;
1051: END IF;
1052: FND_MESSAGE.SET_NAME('ONT','ONT_PRC_BEST_PRICE_ERROR');
1053: FND_MESSAGE.SET_TOKEN('ITEM',nvl(l_line_rec.Ordered_Item,l_line_rec.inventory_item_id));
1054: FND_MESSAGE.SET_TOKEN('ERR_TEXT',wrong_line.status_text);

Line 1085: oe_debug_pub.add( 'J IS '||J ) ;

1081: --since the line_rec doesn't have the place holder to hold error status
1082: l_line_rec.industry_attribute30
1083: := wrong_line.pricing_status_code;
1084: IF l_debug_level > 0 THEN
1085: oe_debug_pub.add( 'J IS '||J ) ;
1086: END IF;
1087: if (j<>0) THEN
1088: px_line_tbl(j) := l_line_rec;
1089: END IF;

Line 1092: oe_debug_pub.add( 'PASSING BACK PRICE'||L_LINE_REC.UNIT_LIST_PRICE||' '||L_LINE_REC.UNIT_SELLING_PRICE ) ;

1088: px_line_tbl(j) := l_line_rec;
1089: END IF;
1090:
1091: IF l_debug_level > 0 THEN
1092: oe_debug_pub.add( 'PASSING BACK PRICE'||L_LINE_REC.UNIT_LIST_PRICE||' '||L_LINE_REC.UNIT_SELLING_PRICE ) ;
1093: END IF;
1094: IF l_debug_level > 0 THEN
1095: oe_debug_pub.add( 'LINE'||L_LINE_REC.HEADER_ID||'+'||L_LINE_REC.LINE_ID ) ;
1096: END IF;

Line 1095: oe_debug_pub.add( 'LINE'||L_LINE_REC.HEADER_ID||'+'||L_LINE_REC.LINE_ID ) ;

1091: IF l_debug_level > 0 THEN
1092: oe_debug_pub.add( 'PASSING BACK PRICE'||L_LINE_REC.UNIT_LIST_PRICE||' '||L_LINE_REC.UNIT_SELLING_PRICE ) ;
1093: END IF;
1094: IF l_debug_level > 0 THEN
1095: oe_debug_pub.add( 'LINE'||L_LINE_REC.HEADER_ID||'+'||L_LINE_REC.LINE_ID ) ;
1096: END IF;
1097: -- End If;
1098: --btea end
1099:

Line 1114: oe_debug_pub.add( 'NEGATIVE LIST PRICE '||WRONG_LINE.UNIT_PRICE ||'OR SELLING PRICE '||WRONG_LINE.ADJUSTED_UNIT_PRICE ) ;

1110: (wrong_line.unit_price <0 or wrong_line.adjusted_unit_price<0)
1111: Then
1112:
1113: IF l_debug_level > 0 THEN
1114: oe_debug_pub.add( 'NEGATIVE LIST PRICE '||WRONG_LINE.UNIT_PRICE ||'OR SELLING PRICE '||WRONG_LINE.ADJUSTED_UNIT_PRICE ) ;
1115: END IF;
1116: FND_MESSAGE.SET_NAME('ONT','ONT_NEGATIVE_PRICE');
1117: FND_MESSAGE.SET_TOKEN('ITEM',nvl(l_line_rec.Ordered_Item,l_line_rec.inventory_item_id));
1118: FND_MESSAGE.SET_TOKEN('LIST_PRICE',wrong_line.unit_price);

Line 1122: oe_debug_pub.add( 'BEFORE SHOWING NEGATIVE MODIFIERS MESSAGE' ) ;

1118: FND_MESSAGE.SET_TOKEN('LIST_PRICE',wrong_line.unit_price);
1119: FND_MESSAGE.SET_TOKEN('SELLING_PRICE',wrong_line.Adjusted_unit_price);
1120: OE_MSG_PUB.Add;
1121: IF l_debug_level > 0 THEN
1122: oe_debug_pub.add( 'BEFORE SHOWING NEGATIVE MODIFIERS MESSAGE' ) ;
1123: END IF;
1124: FND_MESSAGE.SET_NAME('ONT','ONT_NEGATIVE_MODIFIERS');
1125: --FND_MESSAGE.SET_TOKEN('LIST_LINE_NO',get_list_lines(wrong_line.line_id));
1126: OE_MSG_PUB.Add;

Line 1128: -- oe_debug_pub.add( 'MODIFIERS:'||GET_LIST_LINES ( WRONG_LINE.LINE_ID ) ) ;

1124: FND_MESSAGE.SET_NAME('ONT','ONT_NEGATIVE_MODIFIERS');
1125: --FND_MESSAGE.SET_TOKEN('LIST_LINE_NO',get_list_lines(wrong_line.line_id));
1126: OE_MSG_PUB.Add;
1127: IF l_debug_level > 0 THEN
1128: -- oe_debug_pub.add( 'MODIFIERS:'||GET_LIST_LINES ( WRONG_LINE.LINE_ID ) ) ;
1129: NULL;
1130: END IF;
1131: RAISE FND_API.G_EXC_ERROR;
1132:

Line 1152: oe_debug_pub.add( ' ERROR: UNIT LIST PRICE CAN NOT BE NULL' ) ;

1148: FND_MESSAGE.SET_NAME('ONT','OE_BOOK_REQD_LINE_ATTRIBUTE');
1149: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',
1150: OE_Order_UTIL.Get_Attribute_Name('UNIT_LIST_PRICE'));
1151: IF l_debug_level > 0 THEN
1152: oe_debug_pub.add( ' ERROR: UNIT LIST PRICE CAN NOT BE NULL' ) ;
1153: END IF;
1154: IF OE_CODE_CONTROL.Get_Code_Release_Level >= '110509' THEN
1155: if book_line.shipped_quantity is not null or book_line.shipped_quantity <> FND_API.G_MISS_NUM then
1156: vmsg := FND_MESSAGE.GET;

Line 1176: oe_debug_pub.add( ' ERROR: PRICE LIST ID CAN NOT BE NULL' ) ;

1172: FND_MESSAGE.SET_NAME('ONT','OE_BOOK_REQD_LINE_ATTRUIBUTE');
1173: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',OE_ORDER_UTIL.Get_Attribute_Name('PRICE_LIST_ID'));
1174: OE_MSG_PUB.ADD;
1175: IF l_debug_level > 0 THEN
1176: oe_debug_pub.add( ' ERROR: PRICE LIST ID CAN NOT BE NULL' ) ;
1177: END IF;
1178: RAISE FND_API.G_EXC_ERROR;
1179: END IF;
1180:

Line 1183: oe_debug_pub.add( 'EXITING REPORT_ENGINE_ERRORS' ) ;

1179: END IF;
1180:
1181: End loop; /* wrong booked lines */
1182: IF l_debug_level > 0 THEN
1183: oe_debug_pub.add( 'EXITING REPORT_ENGINE_ERRORS' ) ;
1184: END IF;
1185: End Report_Engine_Errors;
1186:
1187: Procedure Calculate_Adjustments(

Line 1198: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;

1194: ,p_Simulation_Flag IN VARCHAR2
1195: ,p_Get_Freight_Flag IN VARCHAR2
1196: ,x_Return_Status OUT NOCOPY VARCHAR2 )
1197: IS
1198: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
1199: l_order_status_rec QP_UTIL_PUB.ORDER_LINES_STATUS_REC_TYPE;
1200: BEGIN
1201:
1202:

Line 1394: oe_debug_pub.add( 'EXITING PRICE_LINE WITH EXC ERROR' , 1 ) ;

1390: OE_Order_PUB.G_HDR := NULL;
1391: x_return_status := FND_API.G_RET_STS_ERROR;
1392:
1393: IF l_debug_level > 0 THEN
1394: oe_debug_pub.add( 'EXITING PRICE_LINE WITH EXC ERROR' , 1 ) ;
1395: END IF;
1396: RAISE FND_API.G_EXC_ERROR;
1397: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1398:

Line 1404: oe_debug_pub.add( 'EXITING PRICE_LINE WITH UNEXPECTED ERROR' , 1 ) ;

1400: OE_Order_PUB.G_LINE := NULL;
1401: OE_Order_PUB.G_HDR := NULL;
1402: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1403: IF l_debug_level > 0 THEN
1404: oe_debug_pub.add( 'EXITING PRICE_LINE WITH UNEXPECTED ERROR' , 1 ) ;
1405: END IF;
1406: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1407: WHEN OTHERS THEN
1408:

Line 1414: oe_debug_pub.add( 'ERROR IN OE_ORDER_PRICE_PVT.PRICE_LINE' , 1 ) ;

1410: --reseting global structure after engine call
1411: OE_Order_PUB.G_LINE := NULL;
1412: OE_Order_PUB.G_HDR := NULL;
1413: IF l_debug_level > 0 THEN
1414: oe_debug_pub.add( 'ERROR IN OE_ORDER_PRICE_PVT.PRICE_LINE' , 1 ) ;
1415: END IF;
1416: IF l_debug_level > 0 THEN
1417: oe_debug_pub.add( SQLERRM , 1 ) ;
1418: END IF;

Line 1417: oe_debug_pub.add( SQLERRM , 1 ) ;

1413: IF l_debug_level > 0 THEN
1414: oe_debug_pub.add( 'ERROR IN OE_ORDER_PRICE_PVT.PRICE_LINE' , 1 ) ;
1415: END IF;
1416: IF l_debug_level > 0 THEN
1417: oe_debug_pub.add( SQLERRM , 1 ) ;
1418: END IF;
1419:
1420: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1421: THEN

Line 1429: oe_debug_pub.add( 'EXITING OE_ORDER_PRICE_PVT.PRICE_LINE' , 1 ) ;

1425: );
1426: END IF;
1427:
1428: IF l_debug_level > 0 THEN
1429: oe_debug_pub.add( 'EXITING OE_ORDER_PRICE_PVT.PRICE_LINE' , 1 ) ;
1430: END IF;
1431: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1432:
1433: IF l_debug_level > 0 THEN

Line 1434: oe_debug_pub.add( 'EXITING OE_PRICE_ORDER_PVT.PRICE_ORDER' , 1 ) ;

1430: END IF;
1431: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1432:
1433: IF l_debug_level > 0 THEN
1434: oe_debug_pub.add( 'EXITING OE_PRICE_ORDER_PVT.PRICE_ORDER' , 1 ) ;
1435: END IF;
1436: */
1437: END Process_Adjustments;
1438:

Line 1449: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;

1445: l_return_status_text varchar(2000);
1446: l_control_rec QP_PREQ_GRP.control_record_type;
1447: l_set_of_books Oe_Order_Cache.Set_Of_Books_Rec_Type;
1448: --
1449: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
1450: --
1451: BEGIN
1452: IF l_debug_level > 0 THEN
1453: oe_debug_pub.add( 'BEFORE QP_PREQ_PUB.PRICE_REQUEST' , 1 ) ;

Line 1453: oe_debug_pub.add( 'BEFORE QP_PREQ_PUB.PRICE_REQUEST' , 1 ) ;

1449: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
1450: --
1451: BEGIN
1452: IF l_debug_level > 0 THEN
1453: oe_debug_pub.add( 'BEFORE QP_PREQ_PUB.PRICE_REQUEST' , 1 ) ;
1454: END IF;
1455:
1456: l_control_rec.calculate_flag := 'Y';
1457: l_control_rec.simulation_flag := 'Y';

Line 1474: oe_debug_pub.add('get_freight_flag before calling pricing engine is: '||l_control_rec.get_freight_flag, 3 ) ;

1470:
1471: -- added for freight rating.
1472: l_control_rec.get_freight_flag := 'N';
1473: IF l_debug_level > 0 THEN
1474: oe_debug_pub.add('get_freight_flag before calling pricing engine is: '||l_control_rec.get_freight_flag, 3 ) ;
1475: END IF;
1476:
1477: -- IF (G_PASS_ALL_LINES in ('N', 'R')) THEN
1478: -- l_control_rec.full_pricing_call := 'N';

Line 1524: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;

1520:
1521: Procedure Update_Lines(px_Line_Tbl IN OUT NOCOPY OE_ORDER_PUB.Line_Tbl_Type)
1522: IS
1523: l_line_index pls_integer;
1524: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
1525: l_line_rec OE_ORDER_PUB.LINE_REC_TYPE;
1526: BEGIN
1527: l_line_index := px_line_tbl.first;
1528: while l_line_index is not null loop

Line 1531: oe_debug_pub.add( 'LINE ID'||L_LINE_REC.LINE_ID ) ;

1527: l_line_index := px_line_tbl.first;
1528: while l_line_index is not null loop
1529: l_line_rec := px_line_tbl(l_line_index);
1530: IF l_debug_level > 0 THEN
1531: oe_debug_pub.add( 'LINE ID'||L_LINE_REC.LINE_ID ) ;
1532: END IF;
1533:
1534: BEGIN
1535:

Line 1607: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;

1603: ,p_Get_Freight_Flag IN VARCHAR2
1604: ,x_Return_Status OUT NOCOPY VARCHAR2
1605: ) AS
1606: l_any_frozen_line BOOLEAN;
1607: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
1608: l_header_adj_tbl OE_ORDER_PUB.Header_ADJ_Tbl_Type;
1609: l_header_price_att_tbl OE_PRICE_ORDER_PVT.price_att_tbl_type;
1610: l_Line_Tbl OE_ORDER_PUB.Line_Tbl_Type;
1611: i PLS_INTEGER;