DBA Data[Home] [Help]

APPS.OE_PRICE_ORDER_PVT dependencies on FND_API

Line 127: OR px_line_rec.line_id = FND_API.G_MISS_NUM

123: -- Need both header rec and line rec to price the order
124:
125: IF (px_line_rec.line_id IS NULL
126: OR px_line_rec.header_id IS NULL
127: OR px_line_rec.line_id = FND_API.G_MISS_NUM
128: OR px_line_rec.header_id = FND_API.G_MISS_NUM) THEN
129: RAISE FND_API.G_EXC_ERROR;
130: END IF;
131:

Line 128: OR px_line_rec.header_id = FND_API.G_MISS_NUM) THEN

124:
125: IF (px_line_rec.line_id IS NULL
126: OR px_line_rec.header_id IS NULL
127: OR px_line_rec.line_id = FND_API.G_MISS_NUM
128: OR px_line_rec.header_id = FND_API.G_MISS_NUM) THEN
129: RAISE FND_API.G_EXC_ERROR;
130: END IF;
131:
132: IF (px_header_rec.header_id IS NULL

Line 129: RAISE FND_API.G_EXC_ERROR;

125: IF (px_line_rec.line_id IS NULL
126: OR px_line_rec.header_id IS NULL
127: OR px_line_rec.line_id = FND_API.G_MISS_NUM
128: OR px_line_rec.header_id = FND_API.G_MISS_NUM) THEN
129: RAISE FND_API.G_EXC_ERROR;
130: END IF;
131:
132: IF (px_header_rec.header_id IS NULL
133: OR px_header_rec.header_id = FND_API.G_MISS_NUM

Line 133: OR px_header_rec.header_id = FND_API.G_MISS_NUM

129: RAISE FND_API.G_EXC_ERROR;
130: END IF;
131:
132: IF (px_header_rec.header_id IS NULL
133: OR px_header_rec.header_id = FND_API.G_MISS_NUM
134: OR px_header_rec.order_type_id IS NULL
135: OR px_header_rec.order_type_id = FND_API.G_MISS_NUM
136: OR px_header_rec.transactional_curr_code IS NULL
137: OR px_header_rec.transactional_curr_code = FND_API.G_MISS_CHAR) THEN

Line 135: OR px_header_rec.order_type_id = FND_API.G_MISS_NUM

131:
132: IF (px_header_rec.header_id IS NULL
133: OR px_header_rec.header_id = FND_API.G_MISS_NUM
134: OR px_header_rec.order_type_id IS NULL
135: OR px_header_rec.order_type_id = FND_API.G_MISS_NUM
136: OR px_header_rec.transactional_curr_code IS NULL
137: OR px_header_rec.transactional_curr_code = FND_API.G_MISS_CHAR) THEN
138: px_header_rec := oe_header_util.query_row(px_line_rec.header_id);
139: END IF;

Line 137: OR px_header_rec.transactional_curr_code = FND_API.G_MISS_CHAR) THEN

133: OR px_header_rec.header_id = FND_API.G_MISS_NUM
134: OR px_header_rec.order_type_id IS NULL
135: OR px_header_rec.order_type_id = FND_API.G_MISS_NUM
136: OR px_header_rec.transactional_curr_code IS NULL
137: OR px_header_rec.transactional_curr_code = FND_API.G_MISS_CHAR) THEN
138: px_header_rec := oe_header_util.query_row(px_line_rec.header_id);
139: END IF;
140:
141: IF l_debug_level > 0 THEN

Line 211: RAISE FND_API.G_EXC_ERROR;

207: Where ql.list_line_id = px_line_adj_tbl(i).list_line_id
208: and lhdr.list_header_id = px_line_adj_tbl(i).list_header_id;
209: EXCEPTION
210: WHEN OTHERS THEN
211: RAISE FND_API.G_EXC_ERROR;
212: END;
213:
214: G_LDET_LINE_DETAIL_INDEX(j) := QP_PREQ_GRP.GET_LINE_DETAIL_INDEX;
215: G_LDET_LINE_DETAIL_TYPE_CODE(j) := NULL;

Line 261: RAISE FND_API.G_EXC_ERROR;

257: when others then
258: IF l_debug_level > 0 THEN
259: oe_debug_pub.add('wrong in insert manual adj'||SQLERRM);
260: END IF;
261: RAISE FND_API.G_EXC_ERROR;
262: END Insert_Manual_Adj;
263:
264: -- AG change --
265: procedure copy_Header_to_request(

Line 295: IF (p_header_rec.pricing_date is not null and p_header_rec.pricing_date <> FND_API.G_MISS_DATE) THEN

291: l_req_line_rec.Active_date_first := p_Header_rec.Ordered_date;
292:
293: G_LINE_INDEX_TBL(px_line_index) := p_header_rec.header_id;
294: G_LINE_TYPE_CODE_TBL(px_line_index) := 'ORDER';
295: IF (p_header_rec.pricing_date is not null and p_header_rec.pricing_date <> FND_API.G_MISS_DATE) THEN
296: G_PRICING_EFFECTIVE_DATE_TBL(px_line_index)
297: := TRUNC(nvl(p_header_rec.pricing_date,sysdate));
298: ELSE
299: G_PRICING_EFFECTIVE_DATE_TBL(px_line_index)

Line 302: IF (p_header_rec.ordered_date is not null and p_header_rec.ordered_date <> FND_API.G_MISS_DATE) THEN

298: ELSE
299: G_PRICING_EFFECTIVE_DATE_TBL(px_line_index)
300: := TRUNC(sysdate);
301: END IF;
302: IF (p_header_rec.ordered_date is not null and p_header_rec.ordered_date <> FND_API.G_MISS_DATE) THEN
303: G_ACTIVE_DATE_FIRST_TBL(px_line_index)
304: := TRUNC(p_header_rec.Ordered_date);
305: ELSE
306: G_ACTIVE_DATE_FIRST_TBL(px_line_index)

Line 339: IF (p_header_rec.price_request_code is not null and p_header_rec.price_request_code <> FND_API.G_MISS_CHAR) THEN

335: G_QUALIFIERS_EXIST_FLAG_TBL(px_line_index) :='N';
336: G_PRICING_ATTRS_EXIST_FLAG_TBL(px_line_index) :='N';
337: G_PRICE_LIST_ID_TBL(px_line_index) :=NULL;
338: G_PL_VALIDATED_FLAG_TBL(px_line_index) := 'N';
339: IF (p_header_rec.price_request_code is not null and p_header_rec.price_request_code <> FND_API.G_MISS_CHAR) THEN
340: G_PRICE_REQUEST_CODE_TBL(px_line_index) := p_header_rec.price_request_code;
341: ELSE
342: G_PRICE_REQUEST_CODE_TBL(px_line_index) := NULL;
343: END IF;

Line 415: Elsif (p_line_rec.service_period IS NOT NULL and p_line_rec.service_period <> FND_API.G_MISS_CHAR) THEN

411: IF (p_line_rec.item_type_code = 'SERVICE' AND p_line_rec.service_period IS NULL) THEN
412: l_UOM_QUANTITY := 0;
413: Elsif (p_Line_rec.service_period = p_Line_rec.Order_quantity_uom) Then
414: l_UOM_QUANTITY := p_Line_rec.service_duration;
415: Elsif (p_line_rec.service_period IS NOT NULL and p_line_rec.service_period <> FND_API.G_MISS_CHAR) THEN
416: INV_CONVERT.INV_UM_CONVERSION(From_Unit => p_Line_rec.service_period
417: ,To_Unit => p_Line_rec.Order_quantity_uom
418: ,Item_ID => p_Line_rec.Inventory_item_id
419: ,Uom_Rate => l_Uom_rate);

Line 473: IF (l_line_rec.PRICING_DATE = FND_API.G_MISS_DATE) THEN

469: BEGIN
470: i := px_Line_Tbl.FIRST;
471: While i is Not Null Loop
472: l_line_rec := px_Line_Tbl(i);
473: IF (l_line_rec.PRICING_DATE = FND_API.G_MISS_DATE) THEN
474: l_line_Rec.PRICING_DATE := sysdate;
475: END IF;
476:
477: IF (l_line_rec.UNIT_LIST_PRICE_PER_PQTY = FND_API.G_MISS_NUM) THEN

Line 477: IF (l_line_rec.UNIT_LIST_PRICE_PER_PQTY = FND_API.G_MISS_NUM) THEN

473: IF (l_line_rec.PRICING_DATE = FND_API.G_MISS_DATE) THEN
474: l_line_Rec.PRICING_DATE := sysdate;
475: END IF;
476:
477: IF (l_line_rec.UNIT_LIST_PRICE_PER_PQTY = FND_API.G_MISS_NUM) THEN
478: IF (l_line_rec.UNIT_LIST_PRICE = FND_API.G_MISS_NUM) THEN
479: l_line_Rec.UNIT_LIST_PRICE := NULL;
480: END IF;
481: l_line_Rec.UNIT_LIST_PRICE_PER_PQTY := l_line_rec.UNIT_LIST_PRICE;

Line 478: IF (l_line_rec.UNIT_LIST_PRICE = FND_API.G_MISS_NUM) THEN

474: l_line_Rec.PRICING_DATE := sysdate;
475: END IF;
476:
477: IF (l_line_rec.UNIT_LIST_PRICE_PER_PQTY = FND_API.G_MISS_NUM) THEN
478: IF (l_line_rec.UNIT_LIST_PRICE = FND_API.G_MISS_NUM) THEN
479: l_line_Rec.UNIT_LIST_PRICE := NULL;
480: END IF;
481: l_line_Rec.UNIT_LIST_PRICE_PER_PQTY := l_line_rec.UNIT_LIST_PRICE;
482: END IF;

Line 483: If (l_line_rec.calculate_price_Flag is null or l_line_rec.calculate_price_flag = FND_API.G_MISS_CHAR) THEN

479: l_line_Rec.UNIT_LIST_PRICE := NULL;
480: END IF;
481: l_line_Rec.UNIT_LIST_PRICE_PER_PQTY := l_line_rec.UNIT_LIST_PRICE;
482: END IF;
483: If (l_line_rec.calculate_price_Flag is null or l_line_rec.calculate_price_flag = FND_API.G_MISS_CHAR) THEN
484: l_line_rec.calculate_price_flag := 'Y';
485: End IF;
486:
487: If (l_line_rec.operation is null or l_line_rec.operation = FND_API.G_MISS_CHAR) THEN

Line 487: If (l_line_rec.operation is null or l_line_rec.operation = FND_API.G_MISS_CHAR) THEN

483: If (l_line_rec.calculate_price_Flag is null or l_line_rec.calculate_price_flag = FND_API.G_MISS_CHAR) THEN
484: l_line_rec.calculate_price_flag := 'Y';
485: End IF;
486:
487: If (l_line_rec.operation is null or l_line_rec.operation = FND_API.G_MISS_CHAR) THEN
488: l_line_rec.operation := oe_globals.g_opr_create;
489: End IF;
490:
491: l_pass_line_flag := 'N';

Line 572: l_return_status := FND_API.G_RET_STS_SUCCESS;

568: --
569: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
570: --
571: BEGIN
572: l_return_status := FND_API.G_RET_STS_SUCCESS;
573: IF l_debug_level > 0 THEN
574: oe_debug_pub.add( 'BEFORE DIRECT INSERT INTO TEMP TABLE: BULK INSERT'||G_LINE_INDEX_TBL.COUNT , 1 ) ;
575: END IF;
576: QP_PREQ_GRP.INSERT_LINES2

Line 615: IF l_return_status = FND_API.G_RET_STS_ERROR THEN

611: p_actual_order_qty => G_ACTUAL_ORDER_QTY_TBL,
612: x_status_code =>l_return_status,
613: x_status_text =>l_return_status_text);
614:
615: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
616: IF l_debug_level > 0 THEN
617: oe_debug_pub.add( 'WRONG IN INSERT_LINES2'||L_RETURN_STATUS_TEXT , 1 ) ;
618: END IF;
619: FND_MESSAGE.SET_NAME('ONT','ONT_PRICING_ERRORS'); --bug#7149497

Line 622: RAISE FND_API.G_EXC_ERROR;

618: END IF;
619: FND_MESSAGE.SET_NAME('ONT','ONT_PRICING_ERRORS'); --bug#7149497
620: FND_MESSAGE.SET_TOKEN('ERR_TEXT',l_return_status_text);
621: OE_MSG_PUB.Add;
622: RAISE FND_API.G_EXC_ERROR;
623: END IF;
624:
625: IF G_LDET_LINE_DETAIL_INDEX.count > 0 THEN
626: IF l_debug_level > 0 THEN

Line 718: IF l_return_status = FND_API.G_RET_STS_ERROR THEN

714: p_BREAK_UOM_CONTEXT => G_LDET_BREAK_UOM_CONTEXT,
715: p_BREAK_UOM_ATTRIBUTE => G_LDET_BREAK_UOM_ATTRIBUTE,
716: x_status_code => l_return_status,
717: x_status_text => l_return_status_text);
718: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
719: IF l_debug_level > 0 THEN
720: oe_debug_pub.add( 'ERROR INSERTING INTO LINE DETAILS'||SQLERRM ) ;
721: END IF;
722: FND_MESSAGE.SET_NAME('ONT','ONT_PRICING_ERRORS');--bug#7149497

Line 725: raise fnd_api.g_exc_unexpected_error;

721: END IF;
722: FND_MESSAGE.SET_NAME('ONT','ONT_PRICING_ERRORS');--bug#7149497
723: FND_MESSAGE.SET_TOKEN('ERR_TEXT',l_return_status_text);
724: OE_MSG_PUB.Add;
725: raise fnd_api.g_exc_unexpected_error;
726: END IF;
727: END IF;
728:
729: IF G_ATTR_LINE_INDEX_tbl.count > 0 THEN

Line 764: IF l_return_status = FND_API.G_RET_STS_ERROR THEN

760: G_ATTR_PRIMARY_UOM_FLAG_TBL,
761: l_return_status ,
762: l_return_status_text );
763:
764: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
765: IF l_debug_level > 0 THEN
766: oe_debug_pub.add( 'ERROR INSERTING INTO LINE ATTRS'||SQLERRM ) ;
767: END IF;
768: FND_MESSAGE.SET_NAME('ONT','ONT_PRICING_ERRORS');--bug#7149497

Line 771: raise fnd_api.g_exc_unexpected_error;

767: END IF;
768: FND_MESSAGE.SET_NAME('ONT','ONT_PRICING_ERRORS');--bug#7149497
769: FND_MESSAGE.SET_TOKEN('ERR_TEXT',l_return_status_text);
770: OE_MSG_PUB.Add;
771: raise fnd_api.g_exc_unexpected_error;
772: END IF;
773:
774: END IF;
775: IF l_debug_level > 0 THEN

Line 781: RAISE FND_API.G_EXC_ERROR;

777: END IF;
778:
779: EXCEPTION
780: WHEN OTHERS THEN
781: RAISE FND_API.G_EXC_ERROR;
782: END POPULATE_TEMP_TABLE;
783:
784:
785: /*+--------------------------------------------------------------------

Line 1026: if l_line_rec.shipped_quantity is not null and l_line_rec.shipped_quantity <> FND_API.G_MISS_NUM then

1022: FND_MESSAGE.SET_NAME('ONT','ONT_NO_PRICE_LIST_FOUND');
1023: FND_MESSAGE.SET_TOKEN('ITEM',nvl(l_line_rec.Ordered_Item,l_line_rec.inventory_item_id));
1024: FND_MESSAGE.SET_TOKEN('UOM',l_line_rec.Order_Quantity_uom);
1025: IF OE_CODE_CONTROL.Get_Code_Release_Level >= '110509' THEN
1026: if l_line_rec.shipped_quantity is not null and l_line_rec.shipped_quantity <> FND_API.G_MISS_NUM then
1027: vmsg := FND_MESSAGE.GET;
1028: else
1029: OE_MSG_PUB.Add;
1030: end if;

Line 1043: FND_API.G_RET_STS_UNEXP_ERROR,

1039: wrong_line.pricing_status_code in ( QP_PREQ_GRP.G_STATUS_INVALID_PRICE_LIST,
1040: QP_PREQ_GRP.G_STS_LHS_NOT_FOUND,
1041: QP_PREQ_GRP.G_STATUS_FORMULA_ERROR,
1042: QP_PREQ_GRP.G_STATUS_OTHER_ERRORS,
1043: FND_API.G_RET_STS_UNEXP_ERROR,
1044: FND_API.G_RET_STS_ERROR,
1045: QP_PREQ_GRP.G_STATUS_CALC_ERROR,
1046: QP_PREQ_GRP.G_STATUS_UOM_FAILURE,
1047: QP_PREQ_GRP.G_STATUS_INVALID_UOM,

Line 1044: FND_API.G_RET_STS_ERROR,

1040: QP_PREQ_GRP.G_STS_LHS_NOT_FOUND,
1041: QP_PREQ_GRP.G_STATUS_FORMULA_ERROR,
1042: QP_PREQ_GRP.G_STATUS_OTHER_ERRORS,
1043: FND_API.G_RET_STS_UNEXP_ERROR,
1044: FND_API.G_RET_STS_ERROR,
1045: QP_PREQ_GRP.G_STATUS_CALC_ERROR,
1046: QP_PREQ_GRP.G_STATUS_UOM_FAILURE,
1047: QP_PREQ_GRP.G_STATUS_INVALID_UOM,
1048: QP_PREQ_GRP.G_STATUS_DUP_PRICE_LIST,

Line 1072: if l_line_rec.shipped_quantity is not null and l_line_rec.shipped_quantity <> FND_API.G_MISS_NUM then

1068: FND_MESSAGE.SET_TOKEN('ITEM',nvl(l_line_rec.Ordered_Item,l_line_rec.inventory_item_id));
1069: FND_MESSAGE.SET_TOKEN('UNIT',l_line_rec.Order_Quantity_uom);
1070: FND_MESSAGE.SET_TOKEN('PRICE_LIST',l_Price_List);
1071: IF OE_CODE_CONTROL.Get_Code_Release_Level >= '110509' THEN
1072: if l_line_rec.shipped_quantity is not null and l_line_rec.shipped_quantity <> FND_API.G_MISS_NUM then
1073: vmsg := FND_MESSAGE.GET;
1074: else
1075: OE_MSG_PUB.Add;
1076: end if;

Line 1091: RAISE FND_API.G_EXC_ERROR;

1087: END IF;
1088: FND_MESSAGE.SET_NAME('ONT','OE_BOOK_REQD_LINE_ATTRIBUTE');
1089: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',OE_ORDER_UTIL.GET_ATTRIBUTE_NAME('UNIT_LIST_PRICE'));
1090: OE_MSG_PUB.ADD;
1091: RAISE FND_API.G_EXC_ERROR;
1092: End If;
1093: IF l_debug_level > 0 THEN
1094: oe_debug_pub.add( 'PRICE'||L_LINE_REC.UNIT_SELLING_PRICE||':'||L_LINE_REC.UNIT_LIST_PRICE ) ;
1095: END IF;

Line 1117: if l_line_rec.shipped_quantity is not null and l_line_rec.shipped_quantity <> FND_API.G_MISS_NUM then

1113: FND_MESSAGE.SET_NAME('ONT','ONT_NO_PRICE_LIST_FOUND');
1114: FND_MESSAGE.SET_TOKEN('ITEM',nvl(l_line_rec.Ordered_Item,l_line_rec.inventory_item_id));
1115: FND_MESSAGE.SET_TOKEN('UOM',l_line_rec.Order_Quantity_uom);
1116: IF OE_CODE_CONTROL.Get_Code_Release_Level >= '110509' THEN
1117: if l_line_rec.shipped_quantity is not null and l_line_rec.shipped_quantity <> FND_API.G_MISS_NUM then
1118: vmsg := FND_MESSAGE.GET;
1119: else
1120: OE_MSG_PUB.Add;
1121: end if;

Line 1132: if l_line_rec.shipped_quantity is not null and l_line_rec.shipped_quantity <> FND_API.G_MISS_NUM then

1128: END IF;
1129: FND_MESSAGE.SET_NAME('ONT','ONT_PRC_ERROR_IN_FORMULA');
1130: FND_MESSAGE.SET_TOKEN('ERR_TEXT',wrong_line.status_text);
1131: IF OE_CODE_CONTROL.Get_Code_Release_Level >= '110509' THEN
1132: if l_line_rec.shipped_quantity is not null and l_line_rec.shipped_quantity <> FND_API.G_MISS_NUM then
1133: vmsg := FND_MESSAGE.GET;
1134: else
1135: OE_MSG_PUB.Add;
1136: end if;

Line 1141: ( QP_PREQ_GRP.G_STATUS_OTHER_ERRORS , FND_API.G_RET_STS_UNEXP_ERROR,

1137: else
1138: OE_MSG_PUB.Add;
1139: end if;
1140: Elsif wrong_line.pricing_status_code in
1141: ( QP_PREQ_GRP.G_STATUS_OTHER_ERRORS , FND_API.G_RET_STS_UNEXP_ERROR,
1142: FND_API.G_RET_STS_ERROR)
1143: then
1144: IF l_debug_level > 0 THEN
1145: oe_debug_pub.add( 'OTHER ERRORS PROCESSING' ) ;

Line 1142: FND_API.G_RET_STS_ERROR)

1138: OE_MSG_PUB.Add;
1139: end if;
1140: Elsif wrong_line.pricing_status_code in
1141: ( QP_PREQ_GRP.G_STATUS_OTHER_ERRORS , FND_API.G_RET_STS_UNEXP_ERROR,
1142: FND_API.G_RET_STS_ERROR)
1143: then
1144: IF l_debug_level > 0 THEN
1145: oe_debug_pub.add( 'OTHER ERRORS PROCESSING' ) ;
1146: END IF;

Line 1150: if l_line_rec.shipped_quantity is not null and l_line_rec.shipped_quantity <> FND_API.G_MISS_NUM then

1146: END IF;
1147: FND_MESSAGE.SET_NAME('ONT','ONT_PRICING_ERRORS');--bug#7149497
1148: FND_MESSAGE.SET_TOKEN('ERR_TEXT',wrong_line.status_text);
1149: IF OE_CODE_CONTROL.Get_Code_Release_Level >= '110509' THEN
1150: if l_line_rec.shipped_quantity is not null and l_line_rec.shipped_quantity <> FND_API.G_MISS_NUM then
1151: vmsg := FND_MESSAGE.GET;
1152: else
1153: OE_MSG_PUB.Add;
1154: end if;

Line 1166: if l_line_rec.shipped_quantity is not null and l_line_rec.shipped_quantity <> FND_API.G_MISS_NUM then

1162: FND_MESSAGE.SET_NAME('ONT','ONT_PRC_INVALID_UOM');
1163: FND_MESSAGE.SET_TOKEN('ITEM',nvl(l_line_rec.Ordered_Item,l_line_rec.inventory_item_id));
1164: FND_MESSAGE.SET_TOKEN('UOM',l_line_rec.Order_Quantity_uom);
1165: IF OE_CODE_CONTROL.Get_Code_Release_Level >= '110509' THEN
1166: if l_line_rec.shipped_quantity is not null and l_line_rec.shipped_quantity <> FND_API.G_MISS_NUM then
1167: vmsg := FND_MESSAGE.GET;
1168: else
1169: OE_MSG_PUB.Add;
1170: end if;

Line 1214: if l_line_rec.shipped_quantity is not null and l_line_rec.shipped_quantity <> FND_API.G_MISS_NUM then

1210: instr(wrong_line.status_text,',')+1);
1211: End;
1212: FND_MESSAGE.SET_TOKEN('PRICE_LIST2',l_price_list);
1213: IF OE_CODE_CONTROL.Get_Code_Release_Level >= '110509' THEN
1214: if l_line_rec.shipped_quantity is not null and l_line_rec.shipped_quantity <> FND_API.G_MISS_NUM then
1215: vmsg := FND_MESSAGE.GET;
1216: else
1217: OE_MSG_PUB.Add;
1218: end if;

Line 1230: if l_line_rec.shipped_quantity is not null and l_line_rec.shipped_quantity <> FND_API.G_MISS_NUM then

1226: FND_MESSAGE.SET_NAME('ONT','ONT_PRC_INVALID_UOM_CONVERSION');
1227: FND_MESSAGE.SET_TOKEN('UOM_TEXT','( '||l_line_rec.Ordered_Item||' ) '||
1228: wrong_line.status_text);
1229: IF OE_CODE_CONTROL.Get_Code_Release_Level >= '110509' THEN
1230: if l_line_rec.shipped_quantity is not null and l_line_rec.shipped_quantity <> FND_API.G_MISS_NUM then
1231: vmsg := FND_MESSAGE.GET;
1232: else
1233: OE_MSG_PUB.Add;
1234: end if;

Line 1246: if l_line_rec.shipped_quantity is not null and l_line_rec.shipped_quantity <> FND_API.G_MISS_NUM then

1242: FND_MESSAGE.SET_NAME('ONT','ONT_PRC_INVALID_INCOMP');
1243: FND_MESSAGE.SET_TOKEN('ERR_TEXT','( '||
1244: l_line_rec.Ordered_Item||' ) '||wrong_line.status_text);
1245: IF OE_CODE_CONTROL.Get_Code_Release_Level >= '110509' THEN
1246: if l_line_rec.shipped_quantity is not null and l_line_rec.shipped_quantity <> FND_API.G_MISS_NUM then
1247: vmsg := FND_MESSAGE.GET;
1248: else
1249: OE_MSG_PUB.Add;
1250: end if;

Line 1262: if l_line_rec.shipped_quantity is not null and l_line_rec.shipped_quantity <> FND_API.G_MISS_NUM then

1258: FND_MESSAGE.SET_NAME('ONT','ONT_PRC_BEST_PRICE_ERROR');
1259: FND_MESSAGE.SET_TOKEN('ITEM',nvl(l_line_rec.Ordered_Item,l_line_rec.inventory_item_id));
1260: FND_MESSAGE.SET_TOKEN('ERR_TEXT',wrong_line.status_text);
1261: IF OE_CODE_CONTROL.Get_Code_Release_Level >= '110509' THEN
1262: if l_line_rec.shipped_quantity is not null and l_line_rec.shipped_quantity <> FND_API.G_MISS_NUM then
1263: vmsg := FND_MESSAGE.GET;
1264: else
1265: OE_MSG_PUB.Add;
1266: end if;

Line 1272: --RAISE FND_API.G_EXC_ERROR;

1268: OE_MSG_PUB.Add;
1269: end if;
1270: End if; /* wrong pricing status code */
1271:
1272: --RAISE FND_API.G_EXC_ERROR;
1273: --btea begin if do not write to db, we still need to
1274: --return line and status code to the caller
1275: -- If Not p_control_rec.p_write_to_db Then
1276: l_line_rec.Header_id := p_header_rec.Header_id;

Line 1337: RAISE FND_API.G_EXC_ERROR;

1333: IF l_debug_level > 0 THEN
1334: -- oe_debug_pub.add( 'MODIFIERS:'||GET_LIST_LINES ( WRONG_LINE.LINE_ID ) ) ;
1335: NULL;
1336: END IF;
1337: RAISE FND_API.G_EXC_ERROR;
1338:
1339: end if;
1340:
1341: end loop; /* wrong_lines cursor */

Line 1361: if book_line.shipped_quantity is not null or book_line.shipped_quantity <> FND_API.G_MISS_NUM then

1357: IF l_debug_level > 0 THEN
1358: oe_debug_pub.add( ' ERROR: UNIT LIST PRICE CAN NOT BE NULL' ) ;
1359: END IF;
1360: IF OE_CODE_CONTROL.Get_Code_Release_Level >= '110509' THEN
1361: if book_line.shipped_quantity is not null or book_line.shipped_quantity <> FND_API.G_MISS_NUM then
1362: vmsg := FND_MESSAGE.GET;
1363: -- pricing_errors_hold(book_line.header_id,book_line.line_id,vmsg);
1364: else
1365: OE_MSG_PUB.ADD;

Line 1370: RAISE FND_API.G_EXC_ERROR;

1366: l_temp_line_rec.line_id := book_line.line_id;
1367: l_temp_line_rec.ordered_quantity := book_line.line_quantity;
1368: l_temp_line_rec.pricing_quantity := book_line.priced_quantity;
1369: --Oe_Order_Adj_Pvt.Reset_Fields(l_temp_line_rec);
1370: RAISE FND_API.G_EXC_ERROR;
1371: end if;
1372: else
1373: OE_MSG_PUB.ADD;
1374: end if;

Line 1384: RAISE FND_API.G_EXC_ERROR;

1380: OE_MSG_PUB.ADD;
1381: IF l_debug_level > 0 THEN
1382: oe_debug_pub.add( ' ERROR: PRICE LIST ID CAN NOT BE NULL' ) ;
1383: END IF;
1384: RAISE FND_API.G_EXC_ERROR;
1385: END IF;
1386:
1387: End loop; /* wrong booked lines */
1388: IF l_debug_level > 0 THEN

Line 1499: x_return_status := FND_API.G_RET_STS_SUCCESS;

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
1501:
1502: i := 0;
1503: For adj in adj_cur loop

Line 1613: WHEN FND_API.G_EXC_ERROR THEN

1609: END IF;
1610:
1611:
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;

Line 1618: x_return_status := FND_API.G_RET_STS_ERROR;

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 ) ;
1622: END IF;

Line 1623: RAISE FND_API.G_EXC_ERROR;

1619:
1620: IF l_debug_level > 0 THEN
1621: oe_debug_pub.add( 'EXITING PROCESS_ADJUSTMENTS WITH EXC ERROR' , 1 ) ;
1622: END IF;
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;

Line 1624: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1620: IF l_debug_level > 0 THEN
1621: oe_debug_pub.add( 'EXITING PROCESS_ADJUSTMENTS WITH EXC ERROR' , 1 ) ;
1622: END IF;
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;

Line 1629: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

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;
1633: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

Line 1633: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

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;
1633: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1634: WHEN OTHERS THEN
1635:
1636: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1637: --reseting global structure after engine call

Line 1636: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1632: END IF;
1633: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
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

Line 1658: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1654:
1655: IF l_debug_level > 0 THEN
1656: oe_debug_pub.add( 'EXITING OE_PRICE_ORDER_PVT.PRICE_ORDER' , 1 ) ;
1657: END IF;
1658: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1659:
1660: END Process_Adjustments;
1661:
1662: Procedure Call_Pricing_Engine(

Line 1730: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN

1726: ,x_return_status =>x_return_status
1727: ,x_return_status_Text =>l_return_status_Text
1728: );
1729:
1730: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1731: FND_MESSAGE.SET_NAME('ONT','ONT_PRICING_ERRORS');--bug#7149497
1732: FND_MESSAGE.SET_TOKEN('ERR_TEXT',l_return_status_text);
1733: OE_MSG_PUB.Add;
1734: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

Line 1734: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1730: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1731: FND_MESSAGE.SET_NAME('ONT','ONT_PRICING_ERRORS');--bug#7149497
1732: FND_MESSAGE.SET_TOKEN('ERR_TEXT',l_return_status_text);
1733: OE_MSG_PUB.Add;
1734: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1735: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
1736: FND_MESSAGE.SET_NAME('ONT','ONT_PRICING_ERRORS');--bug#7149497
1737: FND_MESSAGE.SET_TOKEN('ERR_TEXT',l_return_status_text);
1738: OE_MSG_PUB.Add;

Line 1735: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN

1731: FND_MESSAGE.SET_NAME('ONT','ONT_PRICING_ERRORS');--bug#7149497
1732: FND_MESSAGE.SET_TOKEN('ERR_TEXT',l_return_status_text);
1733: OE_MSG_PUB.Add;
1734: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1735: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
1736: FND_MESSAGE.SET_NAME('ONT','ONT_PRICING_ERRORS');--bug#7149497
1737: FND_MESSAGE.SET_TOKEN('ERR_TEXT',l_return_status_text);
1738: OE_MSG_PUB.Add;
1739: RAISE FND_API.G_EXC_ERROR;

Line 1739: RAISE FND_API.G_EXC_ERROR;

1735: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
1736: FND_MESSAGE.SET_NAME('ONT','ONT_PRICING_ERRORS');--bug#7149497
1737: FND_MESSAGE.SET_TOKEN('ERR_TEXT',l_return_status_text);
1738: OE_MSG_PUB.Add;
1739: RAISE FND_API.G_EXC_ERROR;
1740: END IF;
1741:
1742: EXCEPTION
1743: WHEN OTHERS THEN

Line 1744: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1740: END IF;
1741:
1742: EXCEPTION
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

Line 1846: x_return_status := FND_API.G_RET_STS_SUCCESS;

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:
1848:
1849: Preprocessing(px_Header_Rec
1850: , px_Line_Rec);

Line 1862: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN

1858: , p_Pricing_Events
1859: , p_Simulation_Flag
1860: , p_Get_Freight_Flag
1861: , x_Return_Status);
1862: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
1863: IF l_debug_level > 0 THEN
1864: oe_debug_pub.add( 'CALCULATE ADJUSTMENTS ERROR' ) ;
1865: END IF;
1866: raise fnd_api.g_exc_error;

Line 1866: raise fnd_api.g_exc_error;

1862: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
1863: IF l_debug_level > 0 THEN
1864: oe_debug_pub.add( 'CALCULATE ADJUSTMENTS ERROR' ) ;
1865: END IF;
1866: raise fnd_api.g_exc_error;
1867: END IF;
1868:
1869: IF (G_PASS_LINE_TBL.count > 0) THEN
1870: Call_Pricing_Engine(p_Pricing_Events, x_Return_Status);

Line 1871: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN

1867: END IF;
1868:
1869: IF (G_PASS_LINE_TBL.count > 0) THEN
1870: Call_Pricing_Engine(p_Pricing_Events, x_Return_Status);
1871: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
1872: IF l_debug_level > 0 THEN
1873: oe_debug_pub.add( 'CALCULATE ADJUSTMENTS ERROR' ) ;
1874: END IF;
1875: raise fnd_api.g_exc_error;

Line 1875: raise fnd_api.g_exc_error;

1871: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
1872: IF l_debug_level > 0 THEN
1873: oe_debug_pub.add( 'CALCULATE ADJUSTMENTS ERROR' ) ;
1874: END IF;
1875: raise fnd_api.g_exc_error;
1876: END IF;
1877:
1878: l_control_rec.p_write_to_db := FALSE;
1879: Report_Engine_Errors(x_return_status => x_Return_Status

Line 1882: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN

1878: l_control_rec.p_write_to_db := FALSE;
1879: Report_Engine_Errors(x_return_status => x_Return_Status
1880: , px_line_tbl => l_line_tbl
1881: , p_header_rec => px_header_rec);
1882: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
1883: IF l_debug_level > 0 THEN
1884: oe_debug_pub.add( 'CALCULATE ADJUSTMENTS ERROR' ) ;
1885: END IF;
1886: raise fnd_api.g_exc_error;

Line 1886: raise fnd_api.g_exc_error;

1882: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
1883: IF l_debug_level > 0 THEN
1884: oe_debug_pub.add( 'CALCULATE ADJUSTMENTS ERROR' ) ;
1885: END IF;
1886: raise fnd_api.g_exc_error;
1887: END IF;
1888:
1889: Update_Lines(l_Line_Tbl);
1890: Process_Adjustments(px_line_adj_tbl

Line 1893: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN

1889: Update_Lines(l_Line_Tbl);
1890: Process_Adjustments(px_line_adj_tbl
1891: , nvl(p_Action_Code, 'NONE')
1892: , x_Return_Status);
1893: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
1894: IF l_debug_level > 0 THEN
1895: oe_debug_pub.add( 'CALCULATE ADJUSTMENTS ERROR' ) ;
1896: END IF;
1897: raise fnd_api.g_exc_error;

Line 1897: raise fnd_api.g_exc_error;

1893: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
1894: IF l_debug_level > 0 THEN
1895: oe_debug_pub.add( 'CALCULATE ADJUSTMENTS ERROR' ) ;
1896: END IF;
1897: raise fnd_api.g_exc_error;
1898: END IF;
1899:
1900:
1901: --TaxER start

Line 1907: IF (OE_Order_Cache.g_order_type_rec.order_type_id = FND_API.G_MISS_NUM)

1903: BEGIN
1904:
1905: IF OE_Order_Cache.g_header_rec.order_type_id is not null THEN
1906:
1907: IF (OE_Order_Cache.g_order_type_rec.order_type_id = FND_API.G_MISS_NUM)
1908: OR (OE_Order_Cache.g_order_type_rec.order_type_id is null)
1909: OR (OE_Order_Cache.g_order_type_rec.order_type_id <> OE_Order_Cache.g_header_rec.Order_Type_id)
1910: THEN
1911: OE_Order_Cache.Load_Order_type(OE_Order_CACHE.g_header_rec.Order_Type_id) ;

Line 1997: x_return_status := FND_API.G_RET_STS_ERROR;

1993:
1994: px_line_rec := l_Line_Tbl(1);
1995:
1996: if (px_line_rec.unit_list_price is null) THEN
1997: x_return_status := FND_API.G_RET_STS_ERROR;
1998: END IF;
1999: END IF;
2000:
2001: EXCEPTION

Line 2002: WHEN FND_API.G_EXC_ERROR THEN

1998: END IF;
1999: END IF;
2000:
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;

Line 2007: x_return_status := FND_API.G_RET_STS_ERROR;

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 ) ;
2011: END IF;

Line 2012: RAISE FND_API.G_EXC_ERROR;

2008:
2009: IF l_debug_level > 0 THEN
2010: oe_debug_pub.add( 'EXITING PRICE_ORDER WITH EXC ERROR' , 1 ) ;
2011: END IF;
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;

Line 2013: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

2009: IF l_debug_level > 0 THEN
2010: oe_debug_pub.add( 'EXITING PRICE_ORDER WITH EXC ERROR' , 1 ) ;
2011: END IF;
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;

Line 2018: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

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;
2022: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

Line 2022: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

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;
2022: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2023: WHEN OTHERS THEN
2024:
2025: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2026: --reseting global structure after engine call

Line 2025: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2021: END IF;
2022: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
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

Line 2047: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

2043:
2044: IF l_debug_level > 0 THEN
2045: oe_debug_pub.add( 'EXITING OE_PRICE_ORDER_PVT.PRICE_ORDER' , 1 ) ;
2046: END IF;
2047: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2048: END Price_Order;
2049:
2050: end OE_PRICE_ORDER_PVT;