[Home] [Help]
21: , p_old_line_rec IN OE_Order_PUB.Line_Rec_Type
22: , x_return_status IN OUT NOCOPY VARCHAR2
23: )
24: IS
25: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
26: BEGIN
27:
28: if l_debug_level > 0 then
29: oe_debug_pub.add('Enter OE_VALIDATE_LINE.Check_Negotiation_Attributes',1);
25: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
26: BEGIN
27:
28: if l_debug_level > 0 then
29: oe_debug_pub.add('Enter OE_VALIDATE_LINE.Check_Negotiation_Attributes',1);
30: oe_debug_pub.add('Phase: '||p_line_rec.transaction_phase_code,1);
31: end if;
32:
33: x_return_status := FND_API.G_RET_STS_SUCCESS;
26: BEGIN
27:
28: if l_debug_level > 0 then
29: oe_debug_pub.add('Enter OE_VALIDATE_LINE.Check_Negotiation_Attributes',1);
30: oe_debug_pub.add('Phase: '||p_line_rec.transaction_phase_code,1);
31: end if;
32:
33: x_return_status := FND_API.G_RET_STS_SUCCESS;
34:
59: OR NOT OE_GLOBALS.EQUAL(p_line_rec.arrival_set_id
60: ,p_old_line_rec.arrival_set_id)
61: THEN
62: if l_debug_level > 0 then
63: oe_debug_pub.add('arrival set :'||p_line_rec.arrival_set);
64: oe_debug_pub.add('arrival set id :'||p_line_rec.arrival_set_id);
65: oe_debug_pub.add('old arrival set id :'||p_old_line_rec.arrival_set_id);
66: end if;
67: FND_MESSAGE.SET_NAME('ONT','OE_CANT_UPDATE_ORDER_ATTR');
60: ,p_old_line_rec.arrival_set_id)
61: THEN
62: if l_debug_level > 0 then
63: oe_debug_pub.add('arrival set :'||p_line_rec.arrival_set);
64: oe_debug_pub.add('arrival set id :'||p_line_rec.arrival_set_id);
65: oe_debug_pub.add('old arrival set id :'||p_old_line_rec.arrival_set_id);
66: end if;
67: FND_MESSAGE.SET_NAME('ONT','OE_CANT_UPDATE_ORDER_ATTR');
68: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',
61: THEN
62: if l_debug_level > 0 then
63: oe_debug_pub.add('arrival set :'||p_line_rec.arrival_set);
64: oe_debug_pub.add('arrival set id :'||p_line_rec.arrival_set_id);
65: oe_debug_pub.add('old arrival set id :'||p_old_line_rec.arrival_set_id);
66: end if;
67: FND_MESSAGE.SET_NAME('ONT','OE_CANT_UPDATE_ORDER_ATTR');
68: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',
69: OE_Order_UTIL.Get_Attribute_Name('ARRIVAL_SET_ID'));
76: OR NOT OE_GLOBALS.EQUAL(p_line_rec.ship_set_id
77: ,p_old_line_rec.ship_set_id)
78: THEN
79: if l_debug_level > 0 then
80: oe_debug_pub.add('ship set :'||p_line_rec.ship_set);
81: oe_debug_pub.add('ship set id :'||p_line_rec.ship_set_id);
82: oe_debug_pub.add('old ship set id :'||p_old_line_rec.ship_set_id);
83: end if;
84: FND_MESSAGE.SET_NAME('ONT','OE_CANT_UPDATE_ORDER_ATTR');
77: ,p_old_line_rec.ship_set_id)
78: THEN
79: if l_debug_level > 0 then
80: oe_debug_pub.add('ship set :'||p_line_rec.ship_set);
81: oe_debug_pub.add('ship set id :'||p_line_rec.ship_set_id);
82: oe_debug_pub.add('old ship set id :'||p_old_line_rec.ship_set_id);
83: end if;
84: FND_MESSAGE.SET_NAME('ONT','OE_CANT_UPDATE_ORDER_ATTR');
85: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',
78: THEN
79: if l_debug_level > 0 then
80: oe_debug_pub.add('ship set :'||p_line_rec.ship_set);
81: oe_debug_pub.add('ship set id :'||p_line_rec.ship_set_id);
82: oe_debug_pub.add('old ship set id :'||p_old_line_rec.ship_set_id);
83: end if;
84: FND_MESSAGE.SET_NAME('ONT','OE_CANT_UPDATE_ORDER_ATTR');
85: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',
86: OE_Order_UTIL.Get_Attribute_Name('SHIP_SET_ID'));
208:
209: END IF; -- End of check if phase = F/N
210:
211: if l_debug_level > 0 then
212: oe_debug_pub.add('Exit OE_VALIDATE_LINE.Check_Negotiation_Attributes',1);
213: end if;
214:
215: EXCEPTION
216: WHEN FND_API.G_EXC_ERROR THEN
263: --key Transaction Dates
264: l_hdr_booked_date DATE ;
265: l_cust_trx_type_id NUMBER := 0;
266: l_cust_trx_rec_type OE_ORDER_CACHE.cust_trx_rec_type;
267: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
268: BEGIN
269:
270: IF l_debug_level > 0 then
271: OE_DEBUG_PUB.Add('Entering OE_VALIDATE_LINE.Check_Book_Reqd_Attributes',1);
267: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
268: BEGIN
269:
270: IF l_debug_level > 0 then
271: OE_DEBUG_PUB.Add('Entering OE_VALIDATE_LINE.Check_Book_Reqd_Attributes',1);
272: END IF;
273: -- Check for fields required on a booked order line
274:
275: IF p_line_rec.sold_to_org_id IS NULL THEN
427: IF p_line_rec.item_type_code <> 'SERVICE' THEN
428: IF p_line_rec.accounting_rule_id IS NOT NULL AND
429: p_line_rec.accounting_rule_id <> FND_API.G_MISS_NUM THEN
430: IF l_debug_level > 0 then
431: oe_debug_pub.add('Getting accounting rule type');
432: END IF;
433: SELECT type
434: INTO l_rule_type
435: FROM ra_rules
434: INTO l_rule_type
435: FROM ra_rules
436: WHERE rule_id = p_line_rec.accounting_rule_id;
437: IF l_debug_level > 0 then
438: oe_debug_pub.add('Rule_Type is :'||l_rule_type||': accounting rule duration is: '||p_line_rec.accounting_rule_duration);
439: END IF;
440: IF l_rule_type = 'ACC_DUR' THEN
441: IF p_line_rec.accounting_rule_duration IS NULL THEN
442: x_return_status := FND_API.G_RET_STS_ERROR;
447: END IF; -- end of accounting_rule_duration null
448: END IF; -- end of variable accounting rule type
449:
450: -- WEBROOT ER bug 6826344 start
451: oe_debug_pub.add(' before new rule validations');
452:
453: IF l_rule_type = 'PP_DR_PP' OR l_rule_type = 'PP_DR_ALL' THEN
454: oe_debug_pub.add('inside new rule validation conditions');
455:
450: -- WEBROOT ER bug 6826344 start
451: oe_debug_pub.add(' before new rule validations');
452:
453: IF l_rule_type = 'PP_DR_PP' OR l_rule_type = 'PP_DR_ALL' THEN
454: oe_debug_pub.add('inside new rule validation conditions');
455:
456: IF p_line_rec.service_start_date IS NULL THEN
457: oe_debug_pub.add(' inside new rule validation conditions service start date');
458: x_return_status := FND_API.G_RET_STS_ERROR;
453: IF l_rule_type = 'PP_DR_PP' OR l_rule_type = 'PP_DR_ALL' THEN
454: oe_debug_pub.add('inside new rule validation conditions');
455:
456: IF p_line_rec.service_start_date IS NULL THEN
457: oe_debug_pub.add(' inside new rule validation conditions service start date');
458: x_return_status := FND_API.G_RET_STS_ERROR;
459: FND_MESSAGE.SET_NAME('ONT','OE_BOOK_REQD_LINE_ATTRIBUTE');
460: FND_MESSAGE.SET_TOKEN('ATTRIBUTE', 'Accounting Rule Start Date' );
461: OE_MSG_PUB.ADD;
535: WHERE cust_type.cust_trx_type_id = cust_trx.cust_trx_type_id
536: AND cust_trx.customer_trx_id = p_line_rec.commitment_id;
537:
538: IF l_debug_level > 0 THEN
539: oe_debug_pub.add( 'value of commitment customer trx type id '||l_cust_trx_type_id,1);
540: END IF;
541:
542: EXCEPTION
543: WHEN NO_DATA_FOUND THEN
548: ELSE
549: l_cust_trx_type_id := OE_Invoice_PUB.Get_Customer_Transaction_Type(p_line_rec);
550: END IF;
551: IF l_debug_level > 0 THEN
552: oe_debug_pub.add( 'value of customer trx type id '||l_cust_trx_type_id,1);
553: END IF;
554:
555: IF l_cust_trx_type_id IS NOT NULL AND l_cust_trx_type_id <> 0 THEN
556: l_cust_trx_rec_type := OE_ORDER_CACHE.Load_Cust_Trx_Type(l_cust_Trx_type_id);
557: l_calculate_tax_flag := l_cust_trx_rec_type.tax_calculation_flag;
558: END IF;
559:
560: IF l_debug_level > 0 THEN
561: oe_debug_pub.add( 'value of tax_calculation_flag '||l_calculate_tax_flag,1);
562: END IF;
563:
564: -- end bug#5462464
565:
705: END IF;
706: END IF;
707: */
708: IF l_debug_level > 0 then
709: OE_DEBUG_PUB.Add('Exiting OE_VALIDATE_LINE.Check_Book_Reqd_Attributes',1);
710: END IF;
711:
712: EXCEPTION
713: WHEN OTHERS THEN
736: ,p_old_line_rec IN OE_Order_PUB.Line_Rec_Type
737: ,x_return_status OUT NOCOPY VARCHAR2
738: )
739: IS
740: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
741: l_shipset_enforce VARCHAR2(1);
742: l_set_name VARCHAR2(30);
743: l_model_name VARCHAR2(30);
744: l_model_item_id NUMBER;
748:
749: x_return_status := FND_API.G_RET_STS_SUCCESS;
750:
751: IF l_debug_level > 0 then
752: OE_DEBUG_PUB.Add('Entering OE_VALIDATE_LINE.Validate_Shipset_SMC',1);
753: END IF;
754:
755: -- Select statement to check the Ship Set Enforce Parameter.
756: BEGIN
849: END IF;
850:
851:
852: IF l_debug_level > 0 then
853: OE_DEBUG_PUB.Add('Exiting OE_VALIDATE_LINE.Validate_Shipset_SMC:'
854: ||x_return_status,1);
855: END IF;
856:
857: EXCEPTION
856:
857: EXCEPTION
858: WHEN FND_API.G_EXC_ERROR THEN
859: if l_debug_level > 0 then
860: OE_DEBUG_PUB.Add('Expected Error in Validate_Shipset_SMC ',2);
861: End if;
862:
863: x_return_status := FND_API.G_RET_STS_ERROR;
864:
863: x_return_status := FND_API.G_RET_STS_ERROR;
864:
865: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
866: if l_debug_level > 0 then
867: OE_DEBUG_PUB.Add('Unexpected Error in Validate_Shipset_SMC:'||SqlErrm, 1);
868: End if;
869:
870: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
871:
917: ) IS
918: l_validated_quantity NUMBER;
919: l_primary_quantity NUMBER;
920: l_qty_return_status VARCHAR2(1);
921: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
922: BEGIN
923: IF l_debug_level > 0 then
924: OE_DEBUG_PUB.Add('Entering OE_VALIDATE_LINE.Validate_Decimal_Quantity',1);
925: END IF;
920: l_qty_return_status VARCHAR2(1);
921: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
922: BEGIN
923: IF l_debug_level > 0 then
924: OE_DEBUG_PUB.Add('Entering OE_VALIDATE_LINE.Validate_Decimal_Quantity',1);
925: END IF;
926: -- validate input quantity
927: -- Changes for Decimal ATO's
928:
930: p_input_quantity <> FND_API.G_MISS_NUM) THEN
931:
932: IF trunc(p_input_quantity) <> p_input_quantity THEN
933: IF l_debug_level > 0 then
934: oe_debug_pub.add('input quantity is decimal',2);
935: END IF;
936:
937: IF p_item_type_code is not NULL THEN
938:
942: (p_item_type_code = 'OPTION' AND
943: (p_ato_line_id is NULL OR
944: p_ato_line_id = p_line_id)) THEN
945: IF l_debug_level > 0 then
946: OE_DEBUG_PUB.Add('item is config related with decimal qty',2);
947: END IF;
948: FND_MESSAGE.SET_NAME('ONT', 'OE_CONFIG_NO_DECIMALS');
949: FND_MESSAGE.SET_TOKEN('ITEM', nvl(OE_Id_To_Value.Inventory_Item(p_item_id),p_item_id));
950: FND_Message.Set_Token('LINE_NUM', p_line_num);
955: ELSE
956:
957: IF p_item_type_code IN ('MODEL', 'KIT','CLASS','INCLUDED','OPTION', 'CONFIG') THEN
958: IF l_debug_level > 0 then
959: OE_DEBUG_PUB.Add('item is config related with decimal qty',2);
960: END IF;
961: FND_MESSAGE.SET_NAME('ONT', 'OE_CONFIG_NO_DECIMALS');
962: FND_MESSAGE.SET_TOKEN('ITEM', nvl(OE_Id_To_Value.Inventory_Item(p_item_id),p_item_id));
963: FND_Message.Set_Token('LINE_NUM', p_line_num);
971: END IF; -- if not decimal qty
972:
973: /* Moved this code out nocopy of the input_quantity IF statement for bug 2253207 */
974: IF l_debug_level > 0 then
975: oe_debug_pub.add('before calling inv decimals api',2);
976: END IF;
977: inv_decimals_pub.validate_quantity(
978: p_item_id => p_item_id,
979: p_organization_id =>
985: x_return_status => l_qty_return_status);
986:
987: IF l_qty_return_status = 'W' OR l_qty_return_status = 'E' THEN
988: IF l_debug_level > 0 then
989: oe_debug_pub.add('inv decimal api return ' || l_qty_return_status,2);
990: oe_debug_pub.add('input_qty ' || p_input_quantity,2);
991: oe_debug_pub.add('l_pri_qty ' || l_primary_quantity,2);
992: oe_debug_pub.add('l_val_qty ' || l_validated_quantity,2);
993: END IF;
986:
987: IF l_qty_return_status = 'W' OR l_qty_return_status = 'E' THEN
988: IF l_debug_level > 0 then
989: oe_debug_pub.add('inv decimal api return ' || l_qty_return_status,2);
990: oe_debug_pub.add('input_qty ' || p_input_quantity,2);
991: oe_debug_pub.add('l_pri_qty ' || l_primary_quantity,2);
992: oe_debug_pub.add('l_val_qty ' || l_validated_quantity,2);
993: END IF;
994: x_output_quantity := l_validated_quantity;
987: IF l_qty_return_status = 'W' OR l_qty_return_status = 'E' THEN
988: IF l_debug_level > 0 then
989: oe_debug_pub.add('inv decimal api return ' || l_qty_return_status,2);
990: oe_debug_pub.add('input_qty ' || p_input_quantity,2);
991: oe_debug_pub.add('l_pri_qty ' || l_primary_quantity,2);
992: oe_debug_pub.add('l_val_qty ' || l_validated_quantity,2);
993: END IF;
994: x_output_quantity := l_validated_quantity;
995:
988: IF l_debug_level > 0 then
989: oe_debug_pub.add('inv decimal api return ' || l_qty_return_status,2);
990: oe_debug_pub.add('input_qty ' || p_input_quantity,2);
991: oe_debug_pub.add('l_pri_qty ' || l_primary_quantity,2);
992: oe_debug_pub.add('l_val_qty ' || l_validated_quantity,2);
993: END IF;
994: x_output_quantity := l_validated_quantity;
995:
996: /* bug 2926436 */
999: IF OE_CONFIG_UTIL.CASCADE_CHANGES_FLAG = 'Y' OR
1000: OE_CONFIG_PVT.OECFG_VALIDATE_CONFIG = 'N' OR
1001: p_action_split = 'Y' THEN
1002: IF l_debug_level > 0 then
1003: OE_DEBUG_PUB.Add('do not error out,cascading',1);
1004: END IF;
1005: x_return_status := FND_API.G_RET_STS_SUCCESS;
1006: ELSE
1007: fnd_message.set_name('ONT', 'OE_DECIMAL_MAX_PRECISION');
1019: END IF;
1020:
1021: END IF; -- quantity is null
1022: IF l_debug_level > 0 then
1023: OE_DEBUG_PUB.Add('Exiting OE_VALIDATE_LINE.Validate_Decimal_Quantity',1);
1024: END IF;
1025: END Validate_Decimal_Quantity;
1026:
1027: /*---------------------------------------------------------------------
1042: l_inv_item_id NUMBER;
1043: l_ordered_quantity NUMBER;
1044: l_indivisible_flag VARCHAR2(1);
1045: --
1046: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
1047: --
1048: BEGIN
1049:
1050: x_return_status := FND_API.G_RET_STS_SUCCESS;
1049:
1050: x_return_status := FND_API.G_RET_STS_SUCCESS;
1051:
1052: IF l_debug_level > 0 THEN
1053: OE_DEBUG_PUB.ADD('Entering Decimal_ratio_check '||p_line_rec.line_id, 1);
1054: OE_DEBUG_PUB.ADD('Item Type:'||p_line_rec.item_type_code, 1);
1055: END IF;
1056:
1057: SELECT ordered_item, item_type_code,inventory_item_id,ordered_quantity
1050: x_return_status := FND_API.G_RET_STS_SUCCESS;
1051:
1052: IF l_debug_level > 0 THEN
1053: OE_DEBUG_PUB.ADD('Entering Decimal_ratio_check '||p_line_rec.line_id, 1);
1054: OE_DEBUG_PUB.ADD('Item Type:'||p_line_rec.item_type_code, 1);
1055: END IF;
1056:
1057: SELECT ordered_item, item_type_code,inventory_item_id,ordered_quantity
1058: INTO l_ordered_item, l_item_type_code,l_inv_item_id,l_ordered_quantity
1068: IF p_line_rec.ato_line_id is not null AND
1069: p_line_rec.item_type_code = 'OPTION' AND
1070: p_line_rec.ato_line_id <> p_line_rec.line_id THEN
1071: IF l_debug_level > 0 THEN
1072: OE_DEBUG_PUB.ADD('ATO Option:'||p_line_rec.line_id, 1);
1073: END IF;
1074:
1075: SELECT INDIVISIBLE_FLAG
1076: INTO l_indivisible_flag
1080: OE_Sys_Parameters.VALUE('MASTER_ORGANIZATION_ID');
1081:
1082: IF nvl(l_indivisible_flag, 'N') = 'N' THEN
1083: IF l_debug_level > 0 THEN
1084: OE_DEBUG_PUB.ADD('this Option can have decimal ratio', 1);
1085: END IF;
1086: RETURN;
1087: ELSE
1088: IF FLOOR(p_line_rec.ordered_quantity) <>
1087: ELSE
1088: IF FLOOR(p_line_rec.ordered_quantity) <>
1089: p_line_rec.ordered_quantity THEN
1090: IF l_debug_level > 0 THEN
1091: OE_DEBUG_PUB.ADD
1092: ('this Option has decimal qty no need to check ratio', 1);
1093: END IF;
1094: RETURN;
1095: END IF;
1114:
1115: END IF;
1116:
1117: IF l_debug_level > 0 THEN
1118: oe_debug_pub.add('Leaving decimal_ratio_check' , 3 );
1119: END IF;
1120:
1121: EXCEPTION
1122: WHEN OTHERS THEN
1120:
1121: EXCEPTION
1122: WHEN OTHERS THEN
1123: IF l_debug_level > 0 THEN
1124: oe_debug_pub.add('Decimal_ratio_check '|| sqlerrm , 1);
1125: END IF;
1126:
1127: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1128:
1165: AND a.order_type_id = lorder_type_id
1166: AND sysdate between A.START_DATE_ACTIVE
1167: AND nvl( A.END_DATE_ACTIVE, sysdate + 1 );
1168:
1169: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
1170: BEGIN
1171: IF l_debug_level > 0 then
1172: OE_DEBUG_PUB.Add('Entering OE_VALIDATE_LINE.Validate_Line_Type',1);
1173: END IF;
1168:
1169: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
1170: BEGIN
1171: IF l_debug_level > 0 then
1172: OE_DEBUG_PUB.Add('Entering OE_VALIDATE_LINE.Validate_Line_Type',1);
1173: END IF;
1174:
1175: /* Added for the bug #3257965.
1176: Validation for Line Type and Line Category.
1178: IF (NOT OE_GLOBALS.EQUAL(p_line_rec.line_category_code,p_old_line_rec.line_category_code))
1179: OR (NOT OE_GLOBALS.EQUAL(p_line_rec.line_type_id,p_old_line_rec.line_type_id))
1180: THEN
1181: IF l_debug_level > 0 then
1182: OE_DEBUG_PUB.Add('IN OE_VALIDATE_LINE.Validate_Line_Type old line cate: '||p_old_line_rec.line_category_code);
1183: OE_DEBUG_PUB.Add('IN OE_VALIDATE_LINE.Validate_Line_Type new line cate: '||p_line_rec.line_category_code);
1184: OE_DEBUG_PUB.Add('IN OE_VALIDATE_LINE.Validate_Line_Type old line type Id: '||p_old_line_rec.line_type_id);
1185: OE_DEBUG_PUB.Add('IN OE_VALIDATE_LINE.Validate_Line_Type new line type Id: '||p_line_rec.line_type_id);
1186: END IF;
1179: OR (NOT OE_GLOBALS.EQUAL(p_line_rec.line_type_id,p_old_line_rec.line_type_id))
1180: THEN
1181: IF l_debug_level > 0 then
1182: OE_DEBUG_PUB.Add('IN OE_VALIDATE_LINE.Validate_Line_Type old line cate: '||p_old_line_rec.line_category_code);
1183: OE_DEBUG_PUB.Add('IN OE_VALIDATE_LINE.Validate_Line_Type new line cate: '||p_line_rec.line_category_code);
1184: OE_DEBUG_PUB.Add('IN OE_VALIDATE_LINE.Validate_Line_Type old line type Id: '||p_old_line_rec.line_type_id);
1185: OE_DEBUG_PUB.Add('IN OE_VALIDATE_LINE.Validate_Line_Type new line type Id: '||p_line_rec.line_type_id);
1186: END IF;
1187: select ORDER_CATEGORY_CODE
1180: THEN
1181: IF l_debug_level > 0 then
1182: OE_DEBUG_PUB.Add('IN OE_VALIDATE_LINE.Validate_Line_Type old line cate: '||p_old_line_rec.line_category_code);
1183: OE_DEBUG_PUB.Add('IN OE_VALIDATE_LINE.Validate_Line_Type new line cate: '||p_line_rec.line_category_code);
1184: OE_DEBUG_PUB.Add('IN OE_VALIDATE_LINE.Validate_Line_Type old line type Id: '||p_old_line_rec.line_type_id);
1185: OE_DEBUG_PUB.Add('IN OE_VALIDATE_LINE.Validate_Line_Type new line type Id: '||p_line_rec.line_type_id);
1186: END IF;
1187: select ORDER_CATEGORY_CODE
1188: into lline_category_code from oe_transaction_types_all
1181: IF l_debug_level > 0 then
1182: OE_DEBUG_PUB.Add('IN OE_VALIDATE_LINE.Validate_Line_Type old line cate: '||p_old_line_rec.line_category_code);
1183: OE_DEBUG_PUB.Add('IN OE_VALIDATE_LINE.Validate_Line_Type new line cate: '||p_line_rec.line_category_code);
1184: OE_DEBUG_PUB.Add('IN OE_VALIDATE_LINE.Validate_Line_Type old line type Id: '||p_old_line_rec.line_type_id);
1185: OE_DEBUG_PUB.Add('IN OE_VALIDATE_LINE.Validate_Line_Type new line type Id: '||p_line_rec.line_type_id);
1186: END IF;
1187: select ORDER_CATEGORY_CODE
1188: into lline_category_code from oe_transaction_types_all
1189: where transaction_type_id = p_line_rec.line_type_id;
1189: where transaction_type_id = p_line_rec.line_type_id;
1190:
1191: if p_line_rec.line_category_code <> lline_category_code then
1192: IF l_debug_level > 0 then
1193: oe_debug_pub.add(' Validate Line Type Line Cat Code from the OE_TRXT_ALL table: '||lline_category_code);
1194: oe_debug_pub.add(' Validate Line Type Line Cat Code from the UI: '||p_line_rec.line_category_code);
1195: END IF;
1196: fnd_message.set_name('ONT','OE_INVALID_ATTRIBUTE');
1197: fnd_message.set_token('ATTRIBUTE', OE_Order_Util.Get_Attribute_Name('Line_type_id'));
1190:
1191: if p_line_rec.line_category_code <> lline_category_code then
1192: IF l_debug_level > 0 then
1193: oe_debug_pub.add(' Validate Line Type Line Cat Code from the OE_TRXT_ALL table: '||lline_category_code);
1194: oe_debug_pub.add(' Validate Line Type Line Cat Code from the UI: '||p_line_rec.line_category_code);
1195: END IF;
1196: fnd_message.set_name('ONT','OE_INVALID_ATTRIBUTE');
1197: fnd_message.set_token('ATTRIBUTE', OE_Order_Util.Get_Attribute_Name('Line_type_id'));
1198: OE_MSG_PUB.Add;
1207: l_old_wf_item_type := OE_Order_WF_Util.get_wf_item_type(p_old_line_rec);
1208:
1209: IF NOT OE_Globals.Equal(l_new_wf_item_type, l_old_wf_item_type)
1210: THEN
1211: oe_debug_pub.add('workflow item type changed', 1);
1212:
1213: -- FND_Message.Set_Name('ONT', 'OE_WF_ITEM_TYPE_CHANGED');
1214: FND_Message.Set_Name('ONT', 'OE_ITEM_TYPE_CONST');
1215: oe_msg_pub.add;
1242: CLOSE find_LineProcessname;
1243:
1244: IF lexists IS NULL THEN
1245: IF l_debug_level > 0 then
1246: oe_debug_pub.add('Flow is different',1);
1247: END IF;
1248: RAISE NO_DATA_FOUND;
1249: END IF;
1250:
1265: CLOSE find_config_assign;
1266:
1267: IF lexists IS NULL THEN
1268: IF l_debug_level > 0 then
1269: oe_debug_pub.add('No explicit assignment exists',2);
1270: END IF;
1271: FND_MESSAGE.SET_NAME('ONT','OE_EXP_ASSIGN_REQ');
1272: OE_MSG_PUB.ADD;
1273: RAISE FND_API.G_EXC_ERROR;
1276: END IF;
1277:
1278: END IF; -- Operation
1279: IF l_debug_level > 0 then
1280: OE_DEBUG_PUB.Add('Exiting OE_VALIDATE_LINE.Validate_Line_Type',1);
1281: END IF;
1282: EXCEPTION
1283: WHEN NO_DATA_FOUND THEN
1284: FND_MESSAGE.SET_NAME('ONT','OE_FLOW_CNT_CHANGE');
1305: RETURN BOOLEAN
1306: IS
1307: l_validate VARCHAR2(1) := 'Y';
1308: l_dummy VARCHAR2(10);
1309: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
1310: BEGIN
1311: IF l_debug_level > 0 then
1312: OE_DEBUG_PUB.Add('Entering OE_VALIDATE_LINE.Validate_Receiving_Org',1);
1313: END IF;
1308: l_dummy VARCHAR2(10);
1309: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
1310: BEGIN
1311: IF l_debug_level > 0 then
1312: OE_DEBUG_PUB.Add('Entering OE_VALIDATE_LINE.Validate_Receiving_Org',1);
1313: END IF;
1314:
1315: IF OE_CODE_CONTROL.Get_Code_Release_Level >= '110510'
1316: -- AND INVCONV
1344: FROM financials_system_parameters fsp);
1345:
1346: END IF;
1347: IF l_debug_level > 0 then
1348: OE_DEBUG_PUB.Add('Exiting OE_VALIDATE_LINE.Validate_Receiving_Org',1);
1349: END IF;
1350:
1351: RETURN TRUE;
1352: EXCEPTION
1379: AND b.inventory_item_id = a.inventory_item_id
1380: AND a.organization_id = p_old_line_rec.ship_from_org_id
1381: AND b.organization_id = p_line_rec.ship_from_org_id;
1382:
1383: oe_debug_pub.add('Old Shipable flag, New shipable flag : '||l_shipable_flag_old||l_shipable_flag_new);
1384: IF (l_shipable_flag_old <> l_shipable_flag_new AND l_shipable_flag_new = 'N') THEN
1385: l_result := FALSE;
1386: FND_MESSAGE.SET_NAME('ONT','OE_INVLD_CHG_SHP_FROM_ORG');
1387: oe_msg_pub.add;
1410: RETURN BOOLEAN
1411: IS
1412: --l_validate VARCHAR2(1) := 'Y'; /*chhung comment out :bug 1741158*/
1413: l_dummy VARCHAR2(10);
1414: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
1415: BEGIN
1416: IF l_debug_level > 0 then
1417: oe_debug_pub.add('Entering Validate_Item_Warehouse',1);
1418: oe_debug_pub.add('p_inventory_item_id: '||p_inventory_item_id);
1413: l_dummy VARCHAR2(10);
1414: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
1415: BEGIN
1416: IF l_debug_level > 0 then
1417: oe_debug_pub.add('Entering Validate_Item_Warehouse',1);
1418: oe_debug_pub.add('p_inventory_item_id: '||p_inventory_item_id);
1419: oe_debug_pub.add('p_ship_from_org_id: '||p_ship_from_org_id);
1420: oe_debug_pub.add('p_item_type_code: '||p_item_type_code);
1421: oe_debug_pub.add('p_line_id: '||p_line_id);
1414: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
1415: BEGIN
1416: IF l_debug_level > 0 then
1417: oe_debug_pub.add('Entering Validate_Item_Warehouse',1);
1418: oe_debug_pub.add('p_inventory_item_id: '||p_inventory_item_id);
1419: oe_debug_pub.add('p_ship_from_org_id: '||p_ship_from_org_id);
1420: oe_debug_pub.add('p_item_type_code: '||p_item_type_code);
1421: oe_debug_pub.add('p_line_id: '||p_line_id);
1422: oe_debug_pub.add('p_top_model_line_id: '||p_top_model_line_id);
1415: BEGIN
1416: IF l_debug_level > 0 then
1417: oe_debug_pub.add('Entering Validate_Item_Warehouse',1);
1418: oe_debug_pub.add('p_inventory_item_id: '||p_inventory_item_id);
1419: oe_debug_pub.add('p_ship_from_org_id: '||p_ship_from_org_id);
1420: oe_debug_pub.add('p_item_type_code: '||p_item_type_code);
1421: oe_debug_pub.add('p_line_id: '||p_line_id);
1422: oe_debug_pub.add('p_top_model_line_id: '||p_top_model_line_id);
1423: oe_debug_pub.add('p_source_document_type_id: '||p_source_document_type_id);
1416: IF l_debug_level > 0 then
1417: oe_debug_pub.add('Entering Validate_Item_Warehouse',1);
1418: oe_debug_pub.add('p_inventory_item_id: '||p_inventory_item_id);
1419: oe_debug_pub.add('p_ship_from_org_id: '||p_ship_from_org_id);
1420: oe_debug_pub.add('p_item_type_code: '||p_item_type_code);
1421: oe_debug_pub.add('p_line_id: '||p_line_id);
1422: oe_debug_pub.add('p_top_model_line_id: '||p_top_model_line_id);
1423: oe_debug_pub.add('p_source_document_type_id: '||p_source_document_type_id);
1424: oe_debug_pub.add('p_line_category_code: '||p_line_category_code);
1417: oe_debug_pub.add('Entering Validate_Item_Warehouse',1);
1418: oe_debug_pub.add('p_inventory_item_id: '||p_inventory_item_id);
1419: oe_debug_pub.add('p_ship_from_org_id: '||p_ship_from_org_id);
1420: oe_debug_pub.add('p_item_type_code: '||p_item_type_code);
1421: oe_debug_pub.add('p_line_id: '||p_line_id);
1422: oe_debug_pub.add('p_top_model_line_id: '||p_top_model_line_id);
1423: oe_debug_pub.add('p_source_document_type_id: '||p_source_document_type_id);
1424: oe_debug_pub.add('p_line_category_code: '||p_line_category_code);
1425: END IF;
1418: oe_debug_pub.add('p_inventory_item_id: '||p_inventory_item_id);
1419: oe_debug_pub.add('p_ship_from_org_id: '||p_ship_from_org_id);
1420: oe_debug_pub.add('p_item_type_code: '||p_item_type_code);
1421: oe_debug_pub.add('p_line_id: '||p_line_id);
1422: oe_debug_pub.add('p_top_model_line_id: '||p_top_model_line_id);
1423: oe_debug_pub.add('p_source_document_type_id: '||p_source_document_type_id);
1424: oe_debug_pub.add('p_line_category_code: '||p_line_category_code);
1425: END IF;
1426: -- The customer_order_enabled_flag for config item
1419: oe_debug_pub.add('p_ship_from_org_id: '||p_ship_from_org_id);
1420: oe_debug_pub.add('p_item_type_code: '||p_item_type_code);
1421: oe_debug_pub.add('p_line_id: '||p_line_id);
1422: oe_debug_pub.add('p_top_model_line_id: '||p_top_model_line_id);
1423: oe_debug_pub.add('p_source_document_type_id: '||p_source_document_type_id);
1424: oe_debug_pub.add('p_line_category_code: '||p_line_category_code);
1425: END IF;
1426: -- The customer_order_enabled_flag for config item
1427: -- is set to 'N'
1420: oe_debug_pub.add('p_item_type_code: '||p_item_type_code);
1421: oe_debug_pub.add('p_line_id: '||p_line_id);
1422: oe_debug_pub.add('p_top_model_line_id: '||p_top_model_line_id);
1423: oe_debug_pub.add('p_source_document_type_id: '||p_source_document_type_id);
1424: oe_debug_pub.add('p_line_category_code: '||p_line_category_code);
1425: END IF;
1426: -- The customer_order_enabled_flag for config item
1427: -- is set to 'N'
1428:
1517: -- It's for Return group!!
1518: null;
1519: END IF;
1520: IF l_debug_level > 0 then
1521: oe_debug_pub.add('Exiting Validate_Item_Warehouse',1);
1522: END IF;
1523: RETURN TRUE;
1524:
1525: EXCEPTION
1524:
1525: EXCEPTION
1526: WHEN NO_DATA_FOUND THEN
1527: IF l_debug_level > 0 then
1528: oe_debug_pub.add('RR: No data found',1);
1529: END IF;
1530:
1531: FND_MESSAGE.SET_NAME('ONT', 'OE_INVALID_ITEM_WHSE');
1532: OE_MSG_PUB.add;
1533: RETURN FALSE;
1534:
1535: WHEN OTHERS THEN
1536: IF l_debug_level > 0 then
1537: oe_debug_pub.add('RR: OTHERS',1);
1538: END IF;
1539: FND_MESSAGE.SET_NAME('ONT', 'OE_INVALID_ITEM_WHSE');
1540: OE_MSG_PUB.add;
1541: RETURN FALSE;
1547: , p_task_id IN NUMBER)
1548: RETURN BOOLEAN
1549: IS
1550: l_dummy VARCHAR2(10);
1551: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
1552: BEGIN
1553: IF l_debug_level > 0 then
1554: oe_debug_pub.add('Entering Validate_Task',1);
1555: END IF;
1550: l_dummy VARCHAR2(10);
1551: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
1552: BEGIN
1553: IF l_debug_level > 0 then
1554: oe_debug_pub.add('Entering Validate_Task',1);
1555: END IF;
1556: SELECT 'VALID'
1557: INTO l_dummy
1558: FROM mtl_task_v
1559: WHERE project_id = p_project_id
1560: AND task_id = p_task_id;
1561:
1562: IF l_debug_level > 0 then
1563: oe_debug_pub.add('Exiting Validate_Task',1);
1564: END IF;
1565: RETURN TRUE;
1566:
1567: EXCEPTION
1576: ,p_ship_from_org_id IN NUMBER)
1577: RETURN BOOLEAN
1578: IS
1579: l_project_control_level NUMBER;
1580: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
1581: BEGIN
1582: IF l_debug_level > 0 then
1583: oe_debug_pub.add('Entering Validate_task_reqd',1);
1584: END IF;
1579: l_project_control_level NUMBER;
1580: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
1581: BEGIN
1582: IF l_debug_level > 0 then
1583: oe_debug_pub.add('Entering Validate_task_reqd',1);
1584: END IF;
1585:
1586: -- If project control level in MTL_PARAMETERS for the warehouse
1587: -- is set to 'Task', then project references on the order must
1594:
1595: IF l_project_control_level = 2 -- control level is 'Task'
1596: THEN
1597: IF l_debug_level > 0 then
1598: oe_debug_pub.add('Exiting Validate_task_reqd',1);
1599: END IF;
1600: RETURN TRUE;
1601: ELSE
1602: IF l_debug_level > 0 then
1599: END IF;
1600: RETURN TRUE;
1601: ELSE
1602: IF l_debug_level > 0 then
1603: oe_debug_pub.add('Exiting Validate_task_reqd',1);
1604: END IF;
1605: RETURN FALSE;
1606: END IF;
1607:
1662: AND items.cross_reference_type = p_item_identifier_type
1663: AND items.cross_reference = p_ordered_item
1664: ORDER BY 1;
1665: /* end of code added for 2219230 */
1666: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
1667: BEGIN
1668: IF l_debug_level > 0 then
1669: oe_debug_pub.add('Entering Validate_Item_Fields',1);
1670: oe_debug_pub.add('p_inventory_item_id: '||p_inventory_item_id);
1665: /* end of code added for 2219230 */
1666: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
1667: BEGIN
1668: IF l_debug_level > 0 then
1669: oe_debug_pub.add('Entering Validate_Item_Fields',1);
1670: oe_debug_pub.add('p_inventory_item_id: '||p_inventory_item_id);
1671: oe_debug_pub.add('p_ordered_item_id: '||p_ordered_item_id);
1672: oe_debug_pub.add('p_item_identifier_type: '||p_item_identifier_type);
1673: oe_debug_pub.add('p_ordered_item: '||p_ordered_item);
1666: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
1667: BEGIN
1668: IF l_debug_level > 0 then
1669: oe_debug_pub.add('Entering Validate_Item_Fields',1);
1670: oe_debug_pub.add('p_inventory_item_id: '||p_inventory_item_id);
1671: oe_debug_pub.add('p_ordered_item_id: '||p_ordered_item_id);
1672: oe_debug_pub.add('p_item_identifier_type: '||p_item_identifier_type);
1673: oe_debug_pub.add('p_ordered_item: '||p_ordered_item);
1674: oe_debug_pub.add('p_sold_to_org_id: '||p_sold_to_org_id);
1667: BEGIN
1668: IF l_debug_level > 0 then
1669: oe_debug_pub.add('Entering Validate_Item_Fields',1);
1670: oe_debug_pub.add('p_inventory_item_id: '||p_inventory_item_id);
1671: oe_debug_pub.add('p_ordered_item_id: '||p_ordered_item_id);
1672: oe_debug_pub.add('p_item_identifier_type: '||p_item_identifier_type);
1673: oe_debug_pub.add('p_ordered_item: '||p_ordered_item);
1674: oe_debug_pub.add('p_sold_to_org_id: '||p_sold_to_org_id);
1675: oe_debug_pub.add('p_line_category_code: '||p_line_category_code);
1668: IF l_debug_level > 0 then
1669: oe_debug_pub.add('Entering Validate_Item_Fields',1);
1670: oe_debug_pub.add('p_inventory_item_id: '||p_inventory_item_id);
1671: oe_debug_pub.add('p_ordered_item_id: '||p_ordered_item_id);
1672: oe_debug_pub.add('p_item_identifier_type: '||p_item_identifier_type);
1673: oe_debug_pub.add('p_ordered_item: '||p_ordered_item);
1674: oe_debug_pub.add('p_sold_to_org_id: '||p_sold_to_org_id);
1675: oe_debug_pub.add('p_line_category_code: '||p_line_category_code);
1676: oe_debug_pub.add('p_item_type_code: '||p_item_type_code);
1669: oe_debug_pub.add('Entering Validate_Item_Fields',1);
1670: oe_debug_pub.add('p_inventory_item_id: '||p_inventory_item_id);
1671: oe_debug_pub.add('p_ordered_item_id: '||p_ordered_item_id);
1672: oe_debug_pub.add('p_item_identifier_type: '||p_item_identifier_type);
1673: oe_debug_pub.add('p_ordered_item: '||p_ordered_item);
1674: oe_debug_pub.add('p_sold_to_org_id: '||p_sold_to_org_id);
1675: oe_debug_pub.add('p_line_category_code: '||p_line_category_code);
1676: oe_debug_pub.add('p_item_type_code: '||p_item_type_code);
1677: oe_debug_pub.add('p_line_id: '||p_line_id);
1670: oe_debug_pub.add('p_inventory_item_id: '||p_inventory_item_id);
1671: oe_debug_pub.add('p_ordered_item_id: '||p_ordered_item_id);
1672: oe_debug_pub.add('p_item_identifier_type: '||p_item_identifier_type);
1673: oe_debug_pub.add('p_ordered_item: '||p_ordered_item);
1674: oe_debug_pub.add('p_sold_to_org_id: '||p_sold_to_org_id);
1675: oe_debug_pub.add('p_line_category_code: '||p_line_category_code);
1676: oe_debug_pub.add('p_item_type_code: '||p_item_type_code);
1677: oe_debug_pub.add('p_line_id: '||p_line_id);
1678: oe_debug_pub.add('p_top_model_line_id: '||p_top_model_line_id);
1671: oe_debug_pub.add('p_ordered_item_id: '||p_ordered_item_id);
1672: oe_debug_pub.add('p_item_identifier_type: '||p_item_identifier_type);
1673: oe_debug_pub.add('p_ordered_item: '||p_ordered_item);
1674: oe_debug_pub.add('p_sold_to_org_id: '||p_sold_to_org_id);
1675: oe_debug_pub.add('p_line_category_code: '||p_line_category_code);
1676: oe_debug_pub.add('p_item_type_code: '||p_item_type_code);
1677: oe_debug_pub.add('p_line_id: '||p_line_id);
1678: oe_debug_pub.add('p_top_model_line_id: '||p_top_model_line_id);
1679: oe_debug_pub.add('p_source_document_type_id: '||p_source_document_type_id);
1672: oe_debug_pub.add('p_item_identifier_type: '||p_item_identifier_type);
1673: oe_debug_pub.add('p_ordered_item: '||p_ordered_item);
1674: oe_debug_pub.add('p_sold_to_org_id: '||p_sold_to_org_id);
1675: oe_debug_pub.add('p_line_category_code: '||p_line_category_code);
1676: oe_debug_pub.add('p_item_type_code: '||p_item_type_code);
1677: oe_debug_pub.add('p_line_id: '||p_line_id);
1678: oe_debug_pub.add('p_top_model_line_id: '||p_top_model_line_id);
1679: oe_debug_pub.add('p_source_document_type_id: '||p_source_document_type_id);
1680: oe_debug_pub.add('p_operation: '||p_operation);
1673: oe_debug_pub.add('p_ordered_item: '||p_ordered_item);
1674: oe_debug_pub.add('p_sold_to_org_id: '||p_sold_to_org_id);
1675: oe_debug_pub.add('p_line_category_code: '||p_line_category_code);
1676: oe_debug_pub.add('p_item_type_code: '||p_item_type_code);
1677: oe_debug_pub.add('p_line_id: '||p_line_id);
1678: oe_debug_pub.add('p_top_model_line_id: '||p_top_model_line_id);
1679: oe_debug_pub.add('p_source_document_type_id: '||p_source_document_type_id);
1680: oe_debug_pub.add('p_operation: '||p_operation);
1681: oe_debug_pub.add('pricing_recursion : '||OE_GLOBALS.g_pricing_recursion);
1674: oe_debug_pub.add('p_sold_to_org_id: '||p_sold_to_org_id);
1675: oe_debug_pub.add('p_line_category_code: '||p_line_category_code);
1676: oe_debug_pub.add('p_item_type_code: '||p_item_type_code);
1677: oe_debug_pub.add('p_line_id: '||p_line_id);
1678: oe_debug_pub.add('p_top_model_line_id: '||p_top_model_line_id);
1679: oe_debug_pub.add('p_source_document_type_id: '||p_source_document_type_id);
1680: oe_debug_pub.add('p_operation: '||p_operation);
1681: oe_debug_pub.add('pricing_recursion : '||OE_GLOBALS.g_pricing_recursion);
1682:
1675: oe_debug_pub.add('p_line_category_code: '||p_line_category_code);
1676: oe_debug_pub.add('p_item_type_code: '||p_item_type_code);
1677: oe_debug_pub.add('p_line_id: '||p_line_id);
1678: oe_debug_pub.add('p_top_model_line_id: '||p_top_model_line_id);
1679: oe_debug_pub.add('p_source_document_type_id: '||p_source_document_type_id);
1680: oe_debug_pub.add('p_operation: '||p_operation);
1681: oe_debug_pub.add('pricing_recursion : '||OE_GLOBALS.g_pricing_recursion);
1682:
1683: -- Bug 1805985 start
1676: oe_debug_pub.add('p_item_type_code: '||p_item_type_code);
1677: oe_debug_pub.add('p_line_id: '||p_line_id);
1678: oe_debug_pub.add('p_top_model_line_id: '||p_top_model_line_id);
1679: oe_debug_pub.add('p_source_document_type_id: '||p_source_document_type_id);
1680: oe_debug_pub.add('p_operation: '||p_operation);
1681: oe_debug_pub.add('pricing_recursion : '||OE_GLOBALS.g_pricing_recursion);
1682:
1683: -- Bug 1805985 start
1684: IF(OE_GLOBALS.G_UI_FLAG) THEN
1677: oe_debug_pub.add('p_line_id: '||p_line_id);
1678: oe_debug_pub.add('p_top_model_line_id: '||p_top_model_line_id);
1679: oe_debug_pub.add('p_source_document_type_id: '||p_source_document_type_id);
1680: oe_debug_pub.add('p_operation: '||p_operation);
1681: oe_debug_pub.add('pricing_recursion : '||OE_GLOBALS.g_pricing_recursion);
1682:
1683: -- Bug 1805985 start
1684: IF(OE_GLOBALS.G_UI_FLAG) THEN
1685: oe_debug_pub.add('G_UI_FLAG = TRUE');
1681: oe_debug_pub.add('pricing_recursion : '||OE_GLOBALS.g_pricing_recursion);
1682:
1683: -- Bug 1805985 start
1684: IF(OE_GLOBALS.G_UI_FLAG) THEN
1685: oe_debug_pub.add('G_UI_FLAG = TRUE');
1686: ELSE
1687: oe_debug_pub.add('G_UI_FLAG = FALSE');
1688: END IF;
1689: -- Bug 1805985 end
1683: -- Bug 1805985 start
1684: IF(OE_GLOBALS.G_UI_FLAG) THEN
1685: oe_debug_pub.add('G_UI_FLAG = TRUE');
1686: ELSE
1687: oe_debug_pub.add('G_UI_FLAG = FALSE');
1688: END IF;
1689: -- Bug 1805985 end
1690: END IF;
1691:
1842: IF p_ordered_item_id IS NOT NULL THEN
1843: RETURN FALSE;
1844: ELSIF p_line_category_code ='ORDER' THEN /* SELECT replaced for with the following for 2219230 */
1845: IF l_debug_level > 0 then
1846: oe_debug_pub.add('Validating generic item when category code is ORDER , item_val_org:'||to_char(item_val_org),5);
1847: END IF;
1848: OPEN xref;
1849: FETCH xref INTO l_org_flag;
1850: IF xref%NOTFOUND OR l_org_flag <> 1 THEN
1848: OPEN xref;
1849: FETCH xref INTO l_org_flag;
1850: IF xref%NOTFOUND OR l_org_flag <> 1 THEN
1851: IF l_debug_level > 0 then
1852: oe_debug_pub.add('Invalid Generic Item', 1);
1853: END IF;
1854: CLOSE xref;
1855: RETURN FALSE;
1856: END IF;
1856: END IF;
1857: CLOSE xref;
1858: ELSIF p_line_category_code = 'RETURN' then /* elsif condition added for bug 3844345 */
1859: IF l_debug_level > 0 then
1860: oe_debug_pub.add('Validating generic item when category code is RETURN , item_val_org:'||to_char(item_val_org),5);
1861: END IF;
1862: OPEN xref_return;
1863: FETCH xref_return INTO l_org_flag;
1864: IF xref_return%NOTFOUND OR l_org_flag <> 1 THEN
1862: OPEN xref_return;
1863: FETCH xref_return INTO l_org_flag;
1864: IF xref_return%NOTFOUND OR l_org_flag <> 1 THEN
1865: IF l_debug_level > 0 then
1866: oe_debug_pub.add('Invalid Generic Item', 1);
1867: END IF;
1868: CLOSE xref_return;
1869: RETURN FALSE;
1870: END IF;
1871: CLOSE xref_return;
1872: END IF;
1873: END IF;
1874: IF l_debug_level > 0 then
1875: oe_debug_pub.add('Exiting Validate_Item_Fields',1);
1876: END IF;
1877: RETURN TRUE;
1878:
1879: EXCEPTION
1878:
1879: EXCEPTION
1880: WHEN NO_DATA_FOUND THEN
1881: IF l_debug_level > 0 then
1882: oe_debug_pub.add('Validate_Item_Fields: No data found',1);
1883: IF nvl(p_item_identifier_type, 'INT') = 'INT' THEN
1884: oe_debug_pub.add('Invalid internal item');
1885: ELSIF nvl(p_item_identifier_type, 'INT') = 'CUST' THEN
1886: oe_debug_pub.add('Invalid Customer Item');
1880: WHEN NO_DATA_FOUND THEN
1881: IF l_debug_level > 0 then
1882: oe_debug_pub.add('Validate_Item_Fields: No data found',1);
1883: IF nvl(p_item_identifier_type, 'INT') = 'INT' THEN
1884: oe_debug_pub.add('Invalid internal item');
1885: ELSIF nvl(p_item_identifier_type, 'INT') = 'CUST' THEN
1886: oe_debug_pub.add('Invalid Customer Item');
1887: ELSE
1888: oe_debug_pub.add('Invalid Generic Item');
1882: oe_debug_pub.add('Validate_Item_Fields: No data found',1);
1883: IF nvl(p_item_identifier_type, 'INT') = 'INT' THEN
1884: oe_debug_pub.add('Invalid internal item');
1885: ELSIF nvl(p_item_identifier_type, 'INT') = 'CUST' THEN
1886: oe_debug_pub.add('Invalid Customer Item');
1887: ELSE
1888: oe_debug_pub.add('Invalid Generic Item');
1889: END IF;
1890: END IF;
1884: oe_debug_pub.add('Invalid internal item');
1885: ELSIF nvl(p_item_identifier_type, 'INT') = 'CUST' THEN
1886: oe_debug_pub.add('Invalid Customer Item');
1887: ELSE
1888: oe_debug_pub.add('Invalid Generic Item');
1889: END IF;
1890: END IF;
1891: RETURN FALSE;
1892: WHEN OTHERS THEN
1890: END IF;
1891: RETURN FALSE;
1892: WHEN OTHERS THEN
1893: IF l_debug_level > 0 then
1894: oe_debug_pub.add('Validate_Item_Fields: When Others',1);
1895: END IF;
1896: RETURN FALSE;
1897: END Validate_Item_Fields;
1898:
1902: RETURN BOOLEAN
1903: IS
1904: l_ref_inventory_item_id NUMBER;
1905: l_profile VARCHAR2(1);
1906: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
1907: BEGIN
1908: IF l_debug_level > 0 then
1909: oe_debug_pub.add('Entering Validate_Return_Item_Mismatch',1);
1910: END IF;
1905: l_profile VARCHAR2(1);
1906: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
1907: BEGIN
1908: IF l_debug_level > 0 then
1909: oe_debug_pub.add('Entering Validate_Return_Item_Mismatch',1);
1910: END IF;
1911:
1912: IF (p_reference_line_id IS NULL) THEN
1913: RETURN TRUE;
1935: END IF;
1936:
1937: END IF;
1938: IF l_debug_level > 0 then
1939: oe_debug_pub.add('Exiting Validate_Return_Item_Mismatch',1);
1940: END IF;
1941: RETURN TRUE;
1942:
1943: EXCEPTION
1942:
1943: EXCEPTION
1944: WHEN NO_DATA_FOUND THEN
1945: IF l_debug_level > 0 then
1946: oe_debug_pub.add('Validate_Return_Item_Mismatch: No data found',1);
1947: END IF;
1948: RETURN FALSE;
1949: WHEN OTHERS THEN
1950: IF l_debug_level > 0 then
1947: END IF;
1948: RETURN FALSE;
1949: WHEN OTHERS THEN
1950: IF l_debug_level > 0 then
1951: oe_debug_pub.add('Validate_Return_Item_Mismatch: When Others',1);
1952: END IF;
1953: RETURN FALSE;
1954: END Validate_Return_Item_Mismatch;
1955:
1961: l_ref_shippable_flag VARCHAR2(1);
1962: l_ref_shipped_quantity NUMBER;
1963: l_ref_inv_iface_status VARCHAR2(30);
1964: l_profile VARCHAR2(1);
1965: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
1966: BEGIN
1967: IF l_debug_level > 0 then
1968: oe_debug_pub.add('Entering Validate return fulfilled line',1);
1969: END IF;
1964: l_profile VARCHAR2(1);
1965: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
1966: BEGIN
1967: IF l_debug_level > 0 then
1968: oe_debug_pub.add('Entering Validate return fulfilled line',1);
1969: END IF;
1970:
1971: IF (p_reference_line_id IS NULL) THEN
1972: RETURN TRUE;
2013: END IF;
2014:
2015: END IF;
2016: IF l_debug_level > 0 then
2017: oe_debug_pub.add('Exiting Validate return fulfilled line',1);
2018: END IF;
2019: RETURN TRUE;
2020:
2021: EXCEPTION
2020:
2021: EXCEPTION
2022: WHEN NO_DATA_FOUND THEN
2023: IF l_debug_level > 0 then
2024: oe_debug_pub.add('Validate_Return_Fulfilled_Line: No data found',1);
2025: END IF;
2026: RETURN FALSE;
2027: WHEN OTHERS THEN
2028: IF l_debug_level > 0 then
2025: END IF;
2026: RETURN FALSE;
2027: WHEN OTHERS THEN
2028: IF l_debug_level > 0 then
2029: oe_debug_pub.add('Validate_Return_Fulfilled_Line: When Others',1);
2030: END IF;
2031: RETURN FALSE;
2032: END Validate_Return_Fulfilled_Line;
2033:
2036: p_ship_from_org_id IN NUMBER,
2037: x_return_status IN OUT NOCOPY VARCHAR2)
2038: IS
2039: l_returnable_flag Varchar2(1);
2040: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
2041: BEGIN
2042: IF l_debug_level > 0 then
2043: oe_debug_pub.add('Entering Validate_Return_Item',1);
2044: END IF;
2039: l_returnable_flag Varchar2(1);
2040: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
2041: BEGIN
2042: IF l_debug_level > 0 then
2043: oe_debug_pub.add('Entering Validate_Return_Item',1);
2044: END IF;
2045: -- bug 4171642
2046: IF ( OE_ORDER_CACHE.g_item_rec.master_org_id <> FND_API.G_MISS_NUM ) AND
2047: (g_master_org_id = OE_ORDER_CACHE.g_item_rec.master_org_id) AND
2073:
2074: EXCEPTION
2075: WHEN NO_DATA_FOUND THEN
2076: IF l_debug_level > 0 then
2077: oe_debug_pub.add('Validate_Return_Item: No data found',1);
2078: END IF;
2079: x_return_status := FND_API.G_RET_STS_ERROR;
2080: FND_MESSAGE.SET_NAME('ONT', 'OE_INVALID_ITEM_WHSE');
2081: OE_MSG_PUB.add;
2081: OE_MSG_PUB.add;
2082: WHEN OTHERS THEN
2083: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2084: IF l_debug_level > 0 then
2085: oe_debug_pub.add('Validate_Return_Item: When Others',1);
2086: END IF;
2087: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2088: END Validate_Return_Item;
2089:
2094: RETURN BOOLEAN
2095: IS
2096:
2097: l_tax_code Varchar2(50);
2098: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
2099: BEGIN
2100: if l_debug_level > 0 then
2101: oe_debug_pub.add('Enter Validate_Return_Reference_tax',1);
2102: oe_debug_pub.add('The TAX '||p_tax_code,1);
2097: l_tax_code Varchar2(50);
2098: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
2099: BEGIN
2100: if l_debug_level > 0 then
2101: oe_debug_pub.add('Enter Validate_Return_Reference_tax',1);
2102: oe_debug_pub.add('The TAX '||p_tax_code,1);
2103: end if;
2104:
2105: SELECT tax_code
2098: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
2099: BEGIN
2100: if l_debug_level > 0 then
2101: oe_debug_pub.add('Enter Validate_Return_Reference_tax',1);
2102: oe_debug_pub.add('The TAX '||p_tax_code,1);
2103: end if;
2104:
2105: SELECT tax_code
2106: INTO l_tax_code
2115: RETURN FALSE;
2116: END IF;
2117:
2118: if l_debug_level > 0 then
2119: oe_debug_pub.add('Exit Validate_Return_Reference_tax',1);
2120: end if;
2121: RETURN TRUE;
2122:
2123: EXCEPTION
2122:
2123: EXCEPTION
2124: WHEN NO_DATA_FOUND THEN
2125: if l_debug_level > 0 then
2126: oe_debug_pub.add('Validate_Return_Reference: No data found',1);
2127: end if;
2128: fnd_message.set_name('ONT', 'OE_RETURN_INVALID_SO_LINE');
2129: OE_MSG_PUB.Add;
2130: RETURN FALSE;
2129: OE_MSG_PUB.Add;
2130: RETURN FALSE;
2131: WHEN OTHERS THEN
2132: if l_debug_level > 0 then
2133: oe_debug_pub.add('Validate_Return_Reference: When Others',1);
2134: end if;
2135: fnd_message.set_name('ONT', 'OE_RETURN_INVALID_SO_LINE');
2136: OE_MSG_PUB.Add;
2137: RETURN FALSE;
2144: IS
2145: l_booked_flag Varchar2(1);
2146: l_uom_code Varchar2(3);
2147: l_source_document_type_id NUMBER;
2148: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
2149: BEGIN
2150: IF l_debug_level > 0 then
2151: oe_debug_pub.add('Enter Validate_Return_Reference',1);
2152: oe_debug_pub.add('The UOM '||p_uom_code,1);
2147: l_source_document_type_id NUMBER;
2148: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
2149: BEGIN
2150: IF l_debug_level > 0 then
2151: oe_debug_pub.add('Enter Validate_Return_Reference',1);
2152: oe_debug_pub.add('The UOM '||p_uom_code,1);
2153: END IF;
2154:
2155: SELECT nvl(booked_flag,'N'),
2148: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
2149: BEGIN
2150: IF l_debug_level > 0 then
2151: oe_debug_pub.add('Enter Validate_Return_Reference',1);
2152: oe_debug_pub.add('The UOM '||p_uom_code,1);
2153: END IF;
2154:
2155: SELECT nvl(booked_flag,'N'),
2156: nvl(ORDER_QUANTITY_UOM,' '),
2181: fnd_message.set_name('ONT', 'OE_RETURN_UNBOOKED_ORDER');
2182: OE_MSG_PUB.Add;
2183: END IF;
2184: IF l_debug_level > 0 then
2185: oe_debug_pub.add('Exit Validate_Return_Reference',1);
2186: END IF;
2187: RETURN FALSE;
2188:
2189: EXCEPTION
2188:
2189: EXCEPTION
2190: WHEN NO_DATA_FOUND THEN
2191: IF l_debug_level > 0 then
2192: oe_debug_pub.add('Validate_Return_Reference: No data found',1);
2193: END IF;
2194: fnd_message.set_name('ONT', 'OE_RETURN_INVALID_SO_LINE');
2195: OE_MSG_PUB.Add;
2196: RETURN FALSE;
2195: OE_MSG_PUB.Add;
2196: RETURN FALSE;
2197: WHEN OTHERS THEN
2198: IF l_debug_level > 0 then
2199: oe_debug_pub.add('Validate_Return_Reference: When Others',1);
2200: END IF;
2201: fnd_message.set_name('ONT', 'OE_RETURN_INVALID_SO_LINE');
2202: OE_MSG_PUB.Add;
2203: RETURN FALSE;
2214: RETURN BOOLEAN
2215: IS
2216: l_ord_qty number;
2217: --
2218: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
2219: --
2220: BEGIN
2221: IF l_debug_level > 0 THEN
2222: oe_debug_pub.add('Enter Validate_Return_Existence',1);
2218: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
2219: --
2220: BEGIN
2221: IF l_debug_level > 0 THEN
2222: oe_debug_pub.add('Enter Validate_Return_Existence',1);
2223: END IF;
2224:
2225: SELECT NVL(SUM(ordered_quantity),0)
2226: INTO l_ord_qty
2228: WHERE line_category_code= 'RETURN'
2229: and reference_line_id = p_line_id;
2230:
2231: IF l_debug_level > 0 THEN
2232: oe_debug_pub.add('Quantity Referenced on RMAs: '||l_ord_qty);
2233: END IF;
2234:
2235: IF l_ord_qty > 0 THEN
2236: IF p_ord_qty <= 0 THEN
2246: END IF;
2247: END IF;
2248:
2249: IF l_debug_level > 0 THEN
2250: oe_debug_pub.add('Exit Validate_Return_Existence',1);
2251: END IF;
2252:
2253: RETURN TRUE;
2254:
2254:
2255: EXCEPTION
2256: WHEN OTHERS THEN
2257: IF l_debug_level > 0 THEN
2258: oe_debug_pub.add('Validate_Return_Existence: When Others',1);
2259: END IF;
2260:
2261: RETURN FALSE;
2262: END Validate_Return_Existence;
2270: l_dummy VARCHAR2(10);
2271: lcustomer_relations varchar2(1);
2272: --added for bug 3739650
2273: l_site_use_code VARCHAR2(30);
2274: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
2275: BEGIN
2276: IF l_debug_level > 0 then
2277: oe_debug_pub.add('Entering Validate_ship_to_org',1);
2278: oe_debug_pub.add('ship_to_org_id :'||to_char(p_ship_to_org_id),2);
2273: l_site_use_code VARCHAR2(30);
2274: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
2275: BEGIN
2276: IF l_debug_level > 0 then
2277: oe_debug_pub.add('Entering Validate_ship_to_org',1);
2278: oe_debug_pub.add('ship_to_org_id :'||to_char(p_ship_to_org_id),2);
2279: END IF;
2280:
2281: lcustomer_relations := OE_Sys_Parameters.VALUE('CUSTOMER_RELATIONSHIPS_FLAG');
2274: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
2275: BEGIN
2276: IF l_debug_level > 0 then
2277: oe_debug_pub.add('Entering Validate_ship_to_org',1);
2278: oe_debug_pub.add('ship_to_org_id :'||to_char(p_ship_to_org_id),2);
2279: END IF;
2280:
2281: lcustomer_relations := OE_Sys_Parameters.VALUE('CUSTOMER_RELATIONSHIPS_FLAG');
2282:
2289: AND site_use_id = p_ship_to_org_id
2290: AND status = 'A'
2291: AND address_status ='A'; --bug 2752321
2292: IF l_debug_level > 0 then
2293: oe_debug_pub.add('Exiting Validate_ship_to_org',1);
2294: END IF;
2295: RETURN TRUE;
2296: ELSIF lcustomer_relations = 'Y' THEN
2297: IF l_debug_level > 0 then
2294: END IF;
2295: RETURN TRUE;
2296: ELSIF lcustomer_relations = 'Y' THEN
2297: IF l_debug_level > 0 then
2298: oe_debug_pub.add ('Cr: Yes Line Ship',2);
2299: END IF;
2300:
2301: --variable added for bug 3739650
2302: l_site_use_code := 'SHIP_TO' ;
2353: l_dummy VARCHAR2(10);
2354: lcustomer_relations varchar2(1);
2355: --added for bug 3739650
2356: l_site_use_code VARCHAR2(30);
2357: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
2358: BEGIN
2359: IF l_debug_level > 0 then
2360: oe_debug_pub.add('Entering OE_VALIDATE_LINE.Validate_Deliver_To_Org',1);
2361: oe_debug_pub.add('deliver_to_org_id :'||to_char(p_deliver_to_org_id),2);
2356: l_site_use_code VARCHAR2(30);
2357: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
2358: BEGIN
2359: IF l_debug_level > 0 then
2360: oe_debug_pub.add('Entering OE_VALIDATE_LINE.Validate_Deliver_To_Org',1);
2361: oe_debug_pub.add('deliver_to_org_id :'||to_char(p_deliver_to_org_id),2);
2362: END IF;
2363:
2364: lcustomer_relations := OE_Sys_Parameters.VALUE('CUSTOMER_RELATIONSHIPS_FLAG');
2357: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
2358: BEGIN
2359: IF l_debug_level > 0 then
2360: oe_debug_pub.add('Entering OE_VALIDATE_LINE.Validate_Deliver_To_Org',1);
2361: oe_debug_pub.add('deliver_to_org_id :'||to_char(p_deliver_to_org_id),2);
2362: END IF;
2363:
2364: lcustomer_relations := OE_Sys_Parameters.VALUE('CUSTOMER_RELATIONSHIPS_FLAG');
2365:
2371: AND site_use_id = p_deliver_to_org_id
2372: AND status = 'A'
2373: AND address_status ='A';--bug 2752321
2374: IF l_debug_level > 0 then
2375: oe_debug_pub.add('Exiting OE_VALIDATE_LINE.Validate_Deliver_To_Org',1);
2376: END IF;
2377: RETURN TRUE;
2378:
2379: ELSIF lcustomer_relations = 'Y' THEN
2377: RETURN TRUE;
2378:
2379: ELSIF lcustomer_relations = 'Y' THEN
2380: IF l_debug_level > 0 then
2381: oe_debug_pub.add('Cr: Yes Line Deliver',2);
2382: END IF;
2383: --variable added for bug 3739650
2384: l_site_use_code := 'DELIVER_TO' ;
2385: SELECT /* MOAC_SQL_CHANGE */ 'VALID'
2402: -- bug 4205113
2403: AND EXISTS(SELECT 1 FROM HZ_CUST_ACCOUNTS WHERE CUST_ACCOUNT_ID = ACCT_SITE.CUST_ACCOUNT_ID AND STATUS='A')
2404: AND ROWNUM = 1;
2405: IF l_debug_level > 0 then
2406: oe_debug_pub.add('Exiting OE_VALIDATE_LINE.Validate_Deliver_To_Org',1);
2407: END IF;
2408: RETURN TRUE;
2409:
2410: ELSIF lcustomer_relations = 'A' THEN
2417: AND DEL.ADDRESS_STATUS ='A' --bug 2752321
2418: AND SYSDATE BETWEEN NVL(DEL.START_DATE_ACTIVE, SYSDATE)
2419: AND NVL(DEL.END_DATE_ACTIVE, SYSDATE);
2420: IF l_debug_level > 0 then
2421: oe_debug_pub.add('Exiting OE_VALIDATE_LINE.Validate_Deliver_To_Org',1);
2422: END IF;
2423: RETURN TRUE;
2424:
2425:
2424:
2425:
2426: END IF;
2427: IF l_debug_level > 0 then
2428: oe_debug_pub.add('Exiting OE_VALIDATE_LINE.Validate_Deliver_To_Org',1);
2429: END IF;
2430: RETURN TRUE;
2431:
2432: EXCEPTION
2461: l_oe_source_code VARCHAR2(30);
2462: l_oe_installed_flag VARCHAR2(30);
2463:
2464: l_exists VARCHAR2(1) := 'N';
2465: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
2466:
2467: BEGIN
2468:
2469: x_return_status := FND_API.G_RET_STS_SUCCESS;
2468:
2469: x_return_status := FND_API.G_RET_STS_SUCCESS;
2470:
2471: if l_debug_level > 0 then
2472: OE_DEBUG_PUB.Add('Entering OE_VALIDATE_LINE.Validate_Commitment',1);
2473: OE_DEBUG_PUB.Add('Commitment ID: '||p_line_rec.commitment_id||' Sold To Cust: '||p_line_rec.sold_to_org_id||
2474: ' Invoice To Cust: '||p_line_rec.invoice_to_customer_id||' Curr Code: '||p_hdr_currency_code);
2475: end if;
2476:
2469: x_return_status := FND_API.G_RET_STS_SUCCESS;
2470:
2471: if l_debug_level > 0 then
2472: OE_DEBUG_PUB.Add('Entering OE_VALIDATE_LINE.Validate_Commitment',1);
2473: OE_DEBUG_PUB.Add('Commitment ID: '||p_line_rec.commitment_id||' Sold To Cust: '||p_line_rec.sold_to_org_id||
2474: ' Invoice To Cust: '||p_line_rec.invoice_to_customer_id||' Curr Code: '||p_hdr_currency_code);
2475: end if;
2476:
2477: -- commented out the following SQL to replace it with new SQL.
2545: end;
2546:
2547: if l_exists = 'N' then
2548: if l_debug_level > 0 then
2549: oe_debug_pub.add('Error: Commitment NOT related to Sold To/Invoice To at the line level');
2550: end if;
2551:
2552: x_return_status := FND_API.G_RET_STS_ERROR;
2553: FND_MESSAGE.SET_NAME('ONT','ONT_COM_CUSTOMER_MISMATCH');
2591: FND_MESSAGE.SET_TOKEN('ITEM', OE_Id_To_Value.Inventory_Item(p_line_rec.inventory_item_id));
2592: OE_MSG_PUB.Add;
2593: END IF;
2594: IF l_debug_level > 0 then
2595: oe_debug_pub.add('OEXLLINB: commitment end date is: '||l_comm_end_date, 3);
2596: END IF;
2597:
2598: -- validating commitment against event end date for OTA line.
2599: IF p_ota_line THEN
2601: l_event_end_date := OE_OTA_UTIL.Get_OTA_Event_End_Date(
2602: p_line_id => p_line_rec.line_id,
2603: p_UOM => p_line_rec.order_quantity_uom);
2604: IF l_debug_level > 0 then
2605: oe_debug_pub.add('Ota line- l_event_end_date: '||l_event_end_date||' l_comm_end_date: '||l_comm_end_date);
2606: END IF;
2607:
2608: IF l_event_end_date is NOT NULL AND
2609: l_comm_end_date is NOT NULL THEN
2625: l_class := NULL;
2626: l_oe_source_code := FND_PROFILE.VALUE('ONT_SOURCE_CODE');
2627: l_oe_installed_flag := 'I';
2628: IF l_debug_level > 0 then
2629: OE_DEBUG_PUB.Add('Before calling ARP_BAL_UTIL.GET_COMMITMENT_BALANCE');
2630: END IF;
2631:
2632: l_commitment_bal := ARP_BAL_UTIL.GET_COMMITMENT_BALANCE(
2633: p_line_rec.commitment_id
2634: , l_class
2635: , l_oe_source_code
2636: , l_oe_installed_flag );
2637: IF l_debug_level > 0 then
2638: OE_DEBUG_PUB.Add('After calling ARP_BAL_UTIL.GET_COMMITMENT_BALANCE');
2639: OE_DEBUG_PUB.Add('Commitment Balance is '||l_commitment_bal);
2640: END IF;
2641:
2642: IF l_commitment_bal <= 0 THEN
2635: , l_oe_source_code
2636: , l_oe_installed_flag );
2637: IF l_debug_level > 0 then
2638: OE_DEBUG_PUB.Add('After calling ARP_BAL_UTIL.GET_COMMITMENT_BALANCE');
2639: OE_DEBUG_PUB.Add('Commitment Balance is '||l_commitment_bal);
2640: END IF;
2641:
2642: IF l_commitment_bal <= 0 THEN
2643: x_return_status := FND_API.G_RET_STS_ERROR;
2649: END IF;
2650:
2651: /* End: Fix Bug # 2507479 */
2652: IF l_debug_level > 0 then
2653: OE_DEBUG_PUB.Add('Exiting OE_VALIDATE_LINE.Validate_Commitment',1);
2654: END IF;
2655: EXCEPTION
2656: WHEN NO_DATA_FOUND THEN
2657:
2656: WHEN NO_DATA_FOUND THEN
2657:
2658: x_return_status := FND_API.G_RET_STS_ERROR;
2659: IF l_debug_level > 0 then
2660: OE_DEBUG_PUB.Add('Validate_Commitment: When no data found');
2661: END IF;
2662: fnd_message.set_name('ONT','OE_INVALID_ATTRIBUTE');
2663: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','Commitment Number');
2664: OE_MSG_PUB.Add;
2666: WHEN OTHERS THEN
2667:
2668: x_return_status := FND_API.G_RET_STS_ERROR;
2669: IF l_debug_level > 0 then
2670: OE_DEBUG_PUB.Add('Validate_Commitment: When others');
2671: END IF;
2672: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2673: THEN
2674: FND_MSG_PUB.Add_Exc_Msg
2692: ,x_return_status OUT NOCOPY VARCHAR2)
2693:
2694: IS
2695: l_purchasing_enabled_flag VARCHAR2(1) := 'Y';
2696: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
2697: BEGIN
2698: IF l_debug_level > 0 then
2699: OE_DEBUG_PUB.Add('Entering Validate_source_type', 3);
2700: END IF;
2695: l_purchasing_enabled_flag VARCHAR2(1) := 'Y';
2696: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
2697: BEGIN
2698: IF l_debug_level > 0 then
2699: OE_DEBUG_PUB.Add('Entering Validate_source_type', 3);
2700: END IF;
2701:
2702: IF (NOT OE_GLOBALS.Equal(p_line_rec.source_type_code,
2703: p_old_line_rec.source_type_code) OR
2711: IF p_line_rec.item_type_code = OE_GLOBALS.G_ITEM_SERVICE OR
2712: p_line_rec.ship_model_complete_flag = 'Y'
2713: THEN
2714: IF l_debug_level > 0 then
2715: oe_debug_pub.add('service / part of smc model', 4);
2716: END IF;
2717: FND_MESSAGE.SET_NAME('ONT', 'OE_DS_NOT_VALID_ITEM');
2718: FND_MESSAGE.SET_TOKEN('ITEM', nvl(p_line_rec.ordered_item,p_line_rec.inventory_item_id));
2719: OE_MSG_PUB.Add;
2720: x_return_status := FND_API.G_RET_STS_ERROR;
2721: RETURN;
2722: ELSE
2723: IF l_debug_level > 0 then
2724: oe_debug_pub.add('validate line: pack H new logic DS', 1);
2725: END IF;
2726: END IF;
2727: ELSE
2728: IF (p_line_rec.item_type_code <> OE_GLOBALS.G_ITEM_STANDARD) THEN
2726: END IF;
2727: ELSE
2728: IF (p_line_rec.item_type_code <> OE_GLOBALS.G_ITEM_STANDARD) THEN
2729: IF l_debug_level > 0 then
2730: oe_debug_pub.add('Cannot dropship non-standard item',2);
2731: END IF;
2732: FND_MESSAGE.SET_NAME('ONT', 'OE_DS_NOT_ALLOWED');
2733: OE_MSG_PUB.Add;
2734: x_return_status := FND_API.G_RET_STS_ERROR;
2752: AND sysdate <= nvl( org.disable_date, sysdate)
2753: AND org.organization_id = nvl(p_line_rec.ship_from_org_id,
2754: OE_Sys_Parameters.VALUE('MASTER_ORGANIZATION_ID'));
2755: IF l_debug_level > 0 then
2756: OE_DEBUG_PUB.Add('Pack-J Across SOB',2);
2757: END IF;
2758: ELSE
2759: SELECT purchasing_enabled_flag
2760: INTO l_purchasing_enabled_flag
2767: OE_Sys_Parameters.VALUE('MASTER_ORGANIZATION_ID'))
2768: AND org.set_of_books_id= ( SELECT fsp.set_of_books_id
2769: FROM financials_system_parameters fsp);
2770: IF l_debug_level > 0 then
2771: OE_DEBUG_PUB.Add('Pre Pack-J Logic',2);
2772: END IF;
2773: END IF;
2774:
2775: IF l_purchasing_enabled_flag = 'N' THEN
2790: OE_Config_Util.CASCADE_CHANGES_FLAG = 'N' AND
2791: OE_CODE_CONTROL.Get_Code_Release_Level >= '110508'
2792: THEN
2793: IF l_debug_level > 0 then
2794: oe_debug_pub.add('item under ato model', 4);
2795: END IF;
2796: FND_MESSAGE.SET_NAME('ONT', 'OE_DS_CHANGE_NOT_ALLOWED');
2797: OE_MSG_PUB.Add;
2798: x_return_status := FND_API.G_RET_STS_ERROR;
2797: OE_MSG_PUB.Add;
2798: x_return_status := FND_API.G_RET_STS_ERROR;
2799: END IF;
2800: IF l_debug_level > 0 then
2801: oe_debug_pub.add('leaving validate_source_type', 3);
2802: END IF;
2803:
2804: EXCEPTION
2805: WHEN OTHERS THEN
2802: END IF;
2803:
2804: EXCEPTION
2805: WHEN OTHERS THEN
2806: oe_debug_pub.add('error in Validate_Source_Type');
2807: RAISE;
2808: END Validate_Source_Type;
2809:
2810:
2814: RETURN BOOLEAN
2815: IS
2816: l_arrival_set_id Number;
2817: l_ship_set_id Number;
2818: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
2819: BEGIN
2820:
2821:
2822: IF (p_line_rec.top_model_line_id IS NOT NULL AND
2843: l_ship_set_id := p_line_rec.ship_set_id;
2844: END;
2845:
2846: IF l_debug_level > 0 then
2847: oe_debug_pub.add('ship_set_id : '|| p_line_rec.ship_set_id,2);
2848: oe_debug_pub.add('old ship_set_id : '|| p_old_line_rec.ship_set_id,2);
2849: oe_debug_pub.add('arrival_set_id : '|| p_line_rec.arrival_set_id,2);
2850: oe_debug_pub.add('old arrival_set_id : '|| p_old_line_rec.arrival_set_id,2);
2851: oe_debug_pub.add('l_arrival_set_id : '|| l_arrival_set_id,2);
2844: END;
2845:
2846: IF l_debug_level > 0 then
2847: oe_debug_pub.add('ship_set_id : '|| p_line_rec.ship_set_id,2);
2848: oe_debug_pub.add('old ship_set_id : '|| p_old_line_rec.ship_set_id,2);
2849: oe_debug_pub.add('arrival_set_id : '|| p_line_rec.arrival_set_id,2);
2850: oe_debug_pub.add('old arrival_set_id : '|| p_old_line_rec.arrival_set_id,2);
2851: oe_debug_pub.add('l_arrival_set_id : '|| l_arrival_set_id,2);
2852: oe_debug_pub.add('l_ship_set_id : '|| l_ship_set_id,2);
2845:
2846: IF l_debug_level > 0 then
2847: oe_debug_pub.add('ship_set_id : '|| p_line_rec.ship_set_id,2);
2848: oe_debug_pub.add('old ship_set_id : '|| p_old_line_rec.ship_set_id,2);
2849: oe_debug_pub.add('arrival_set_id : '|| p_line_rec.arrival_set_id,2);
2850: oe_debug_pub.add('old arrival_set_id : '|| p_old_line_rec.arrival_set_id,2);
2851: oe_debug_pub.add('l_arrival_set_id : '|| l_arrival_set_id,2);
2852: oe_debug_pub.add('l_ship_set_id : '|| l_ship_set_id,2);
2853: oe_debug_pub.add('3039131: OESCH_PERFORM_SCHEDULING:' ||
2846: IF l_debug_level > 0 then
2847: oe_debug_pub.add('ship_set_id : '|| p_line_rec.ship_set_id,2);
2848: oe_debug_pub.add('old ship_set_id : '|| p_old_line_rec.ship_set_id,2);
2849: oe_debug_pub.add('arrival_set_id : '|| p_line_rec.arrival_set_id,2);
2850: oe_debug_pub.add('old arrival_set_id : '|| p_old_line_rec.arrival_set_id,2);
2851: oe_debug_pub.add('l_arrival_set_id : '|| l_arrival_set_id,2);
2852: oe_debug_pub.add('l_ship_set_id : '|| l_ship_set_id,2);
2853: oe_debug_pub.add('3039131: OESCH_PERFORM_SCHEDULING:' ||
2854: OE_ORDER_SCH_UTIL.OESCH_PERFORM_SCHEDULING,1);
2847: oe_debug_pub.add('ship_set_id : '|| p_line_rec.ship_set_id,2);
2848: oe_debug_pub.add('old ship_set_id : '|| p_old_line_rec.ship_set_id,2);
2849: oe_debug_pub.add('arrival_set_id : '|| p_line_rec.arrival_set_id,2);
2850: oe_debug_pub.add('old arrival_set_id : '|| p_old_line_rec.arrival_set_id,2);
2851: oe_debug_pub.add('l_arrival_set_id : '|| l_arrival_set_id,2);
2852: oe_debug_pub.add('l_ship_set_id : '|| l_ship_set_id,2);
2853: oe_debug_pub.add('3039131: OESCH_PERFORM_SCHEDULING:' ||
2854: OE_ORDER_SCH_UTIL.OESCH_PERFORM_SCHEDULING,1);
2855: END IF;
2848: oe_debug_pub.add('old ship_set_id : '|| p_old_line_rec.ship_set_id,2);
2849: oe_debug_pub.add('arrival_set_id : '|| p_line_rec.arrival_set_id,2);
2850: oe_debug_pub.add('old arrival_set_id : '|| p_old_line_rec.arrival_set_id,2);
2851: oe_debug_pub.add('l_arrival_set_id : '|| l_arrival_set_id,2);
2852: oe_debug_pub.add('l_ship_set_id : '|| l_ship_set_id,2);
2853: oe_debug_pub.add('3039131: OESCH_PERFORM_SCHEDULING:' ||
2854: OE_ORDER_SCH_UTIL.OESCH_PERFORM_SCHEDULING,1);
2855: END IF;
2856:
2849: oe_debug_pub.add('arrival_set_id : '|| p_line_rec.arrival_set_id,2);
2850: oe_debug_pub.add('old arrival_set_id : '|| p_old_line_rec.arrival_set_id,2);
2851: oe_debug_pub.add('l_arrival_set_id : '|| l_arrival_set_id,2);
2852: oe_debug_pub.add('l_ship_set_id : '|| l_ship_set_id,2);
2853: oe_debug_pub.add('3039131: OESCH_PERFORM_SCHEDULING:' ||
2854: OE_ORDER_SCH_UTIL.OESCH_PERFORM_SCHEDULING,1);
2855: END IF;
2856:
2857: /* added the AND condition in the following if to fix the bug 3039131 */
2865: FND_MESSAGE.SET_NAME('ONT','OE_INVALID_SET_OPR');
2866: FND_MESSAGE.SET_TOKEN('ITEMTYPE', p_line_rec.item_type_code);
2867: OE_MSG_PUB.ADD;
2868: IF l_debug_level > 0 then
2869: oe_debug_pub.add('Set- not allowed for this itemtype');
2870: END IF;
2871: RETURN FALSE;
2872: END IF;
2873: END IF; -- id
2871: RETURN FALSE;
2872: END IF;
2873: END IF; -- id
2874: IF l_debug_level > 0 then
2875: oe_debug_pub.add('OESCH_PERFORM_SCHEDULING:' ||
2876: OE_ORDER_SCH_UTIL.OESCH_PERFORM_SCHEDULING,1);
2877: END IF;
2878: IF ((p_line_rec.ship_set IS NOT NULL AND
2879: p_line_rec.ship_set <> FND_API.G_MISS_CHAR AND
2882: p_line_rec.arrival_set <> FND_API.G_MISS_CHAR AND
2883: p_line_rec.arrival_set_id IS NULL)) AND
2884: OE_ORDER_SCH_UTIL.OESCH_PERFORM_SCHEDULING = 'Y' THEN
2885: IF l_debug_level > 0 then
2886: oe_debug_pub.add('ship_set_id : '|| p_line_rec.ship_set_id,2);
2887: oe_debug_pub.add('ship_set : '|| p_line_rec.ship_set,2);
2888: oe_debug_pub.add('arrival_set_id : '|| p_line_rec.arrival_set_id,2);
2889: oe_debug_pub.add('arrival_set : '|| p_line_rec.arrival_set,2);
2890: oe_debug_pub.add('Set name - not allowed for this itemtype');
2883: p_line_rec.arrival_set_id IS NULL)) AND
2884: OE_ORDER_SCH_UTIL.OESCH_PERFORM_SCHEDULING = 'Y' THEN
2885: IF l_debug_level > 0 then
2886: oe_debug_pub.add('ship_set_id : '|| p_line_rec.ship_set_id,2);
2887: oe_debug_pub.add('ship_set : '|| p_line_rec.ship_set,2);
2888: oe_debug_pub.add('arrival_set_id : '|| p_line_rec.arrival_set_id,2);
2889: oe_debug_pub.add('arrival_set : '|| p_line_rec.arrival_set,2);
2890: oe_debug_pub.add('Set name - not allowed for this itemtype');
2891: END IF;
2884: OE_ORDER_SCH_UTIL.OESCH_PERFORM_SCHEDULING = 'Y' THEN
2885: IF l_debug_level > 0 then
2886: oe_debug_pub.add('ship_set_id : '|| p_line_rec.ship_set_id,2);
2887: oe_debug_pub.add('ship_set : '|| p_line_rec.ship_set,2);
2888: oe_debug_pub.add('arrival_set_id : '|| p_line_rec.arrival_set_id,2);
2889: oe_debug_pub.add('arrival_set : '|| p_line_rec.arrival_set,2);
2890: oe_debug_pub.add('Set name - not allowed for this itemtype');
2891: END IF;
2892: FND_MESSAGE.SET_NAME('ONT','OE_INVALID_SET_OPR');
2885: IF l_debug_level > 0 then
2886: oe_debug_pub.add('ship_set_id : '|| p_line_rec.ship_set_id,2);
2887: oe_debug_pub.add('ship_set : '|| p_line_rec.ship_set,2);
2888: oe_debug_pub.add('arrival_set_id : '|| p_line_rec.arrival_set_id,2);
2889: oe_debug_pub.add('arrival_set : '|| p_line_rec.arrival_set,2);
2890: oe_debug_pub.add('Set name - not allowed for this itemtype');
2891: END IF;
2892: FND_MESSAGE.SET_NAME('ONT','OE_INVALID_SET_OPR');
2893: FND_MESSAGE.SET_TOKEN('ITEMTYPE', p_line_rec.item_type_code);
2886: oe_debug_pub.add('ship_set_id : '|| p_line_rec.ship_set_id,2);
2887: oe_debug_pub.add('ship_set : '|| p_line_rec.ship_set,2);
2888: oe_debug_pub.add('arrival_set_id : '|| p_line_rec.arrival_set_id,2);
2889: oe_debug_pub.add('arrival_set : '|| p_line_rec.arrival_set,2);
2890: oe_debug_pub.add('Set name - not allowed for this itemtype');
2891: END IF;
2892: FND_MESSAGE.SET_NAME('ONT','OE_INVALID_SET_OPR');
2893: FND_MESSAGE.SET_TOKEN('ITEMTYPE', p_line_rec.item_type_code);
2894: OE_MSG_PUB.ADD;
2899: RETURN TRUE;
2900: EXCEPTION
2901: WHEN OTHERS THEN
2902: IF l_debug_level > 0 then
2903: oe_debug_pub.add('error in Validate_Set_id');
2904: END IF;
2905: RETURN FALSE;
2906: END Validate_Set_id;
2907:
2910: , x_return_status OUT NOCOPY VARCHAR2
2911:
2912: )
2913: IS
2914: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
2915: BEGIN
2916: IF l_debug_level > 0 then
2917: oe_debug_pub.add('Enter Validate_User_Item_Description',1);
2918: END IF;
2913: IS
2914: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
2915: BEGIN
2916: IF l_debug_level > 0 then
2917: oe_debug_pub.add('Enter Validate_User_Item_Description',1);
2918: END IF;
2919: x_return_status := FND_API.G_RET_STS_SUCCESS;
2920:
2921: IF LENGTHB(p_line_rec.user_item_description) > 240 THEN
2921: IF LENGTHB(p_line_rec.user_item_description) > 240 THEN
2922: fnd_message.set_name('ONT','ONT_USER_ITEM_DESC_TOO_LONG');
2923: OE_MSG_PUB.Add;
2924: IF l_debug_level > 0 then
2925: Oe_debug_pub.add('The length of user_item_description should not exceed 240 characters for drop ship lines.',3);
2926: END IF;
2927: x_return_status := FND_API.G_RET_STS_ERROR;
2928: END IF;
2929: IF l_debug_level > 0 then
2926: END IF;
2927: x_return_status := FND_API.G_RET_STS_ERROR;
2928: END IF;
2929: IF l_debug_level > 0 then
2930: oe_debug_pub.add('Exit Validate_User_Item_Description',1);
2931: END IF;
2932:
2933: EXCEPTION
2934: WHEN OTHERS THEN
2933: EXCEPTION
2934: WHEN OTHERS THEN
2935:
2936: x_return_status := FND_API.G_RET_STS_ERROR;
2937: OE_DEBUG_PUB.Add('Validate_User_Item_Description: When others');
2938: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2939: THEN
2940: FND_MSG_PUB.Add_Exc_Msg
2941: ( G_PKG_NAME
2980: L_SHIPPING_METHOD_CODE VARCHAR2(30);
2981: L_PAYMENT_TERM_ID NUMBER;
2982: L_ACCOUNTING_RULE_ID NUMBER;
2983: L_INVOICING_RULE_ID NUMBER;
2984: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
2985: l_item_val_org NUMBER;
2986: --FOR BUG 3192386
2987: l_flow_status_code VARCHAR2(30);
2988: -- Bug 3232544
3009:
3010: x_return_status := fnd_api.g_ret_sts_success;
3011:
3012: if l_debug_level > 0 then
3013: OE_DEBUG_PUB.Add('Entering OE_VALIDATE_LINE.Validate_Blanket_Values',1);
3014: end if;
3015:
3016: IF p_line_rec.blanket_line_number IS NULL OR
3017: p_line_rec.blanket_version_number IS NULL THEN
3015:
3016: IF p_line_rec.blanket_line_number IS NULL OR
3017: p_line_rec.blanket_version_number IS NULL THEN
3018: if l_debug_level > 0 then
3019: oe_debug_pub.add('Blanket Line Number is not supplied: Blanket #:'||
3020: p_line_rec.blanket_number || ', Inventory Item #:'||p_line_rec.inventory_item_id, 2);
3021: end if;
3022: FND_MESSAGE.SET_NAME('ONT', 'OE_BLKT_NO_BLANKET_LINE_NUM');
3023: OE_MSG_PUB.Add;
3038: WHERE LOOKUP_TYPE = 'ITEM_TYPE'
3039: AND LOOKUP_CODE = p_line_rec.item_type_code;
3040:
3041: if l_debug_level > 0 then
3042: oe_debug_pub.add('Blankets only support standard items', 1);
3043: end if;
3044:
3045: FND_MESSAGE.SET_NAME('ONT', 'OE_BLKT_NON_STANDARD_ITEM');
3046: OE_MSG_PUB.Add;
3050: ELSE --for bug 3372805
3051: IF(p_line_rec.item_type_code ='INCLUDED')
3052: THEN
3053: if l_debug_level > 0 then
3054: oe_debug_pub.add('Blankets does not support Included items', 1);
3055: end if;
3056:
3057: FND_MESSAGE.SET_NAME('ONT', 'OE_BLKT_INCLUDED_ITEM');
3058: OE_MSG_PUB.Add;
3164: IF l_item_context = 'INT' THEN -- = '1' THEN
3165:
3166: IF (l_item_id <> p_line_rec.inventory_item_id) THEN
3167: if l_debug_level > 0 then
3168: oe_debug_pub.add('Release does not match blanket line inventory item', 1);
3169: end if;
3170: FND_MESSAGE.SET_NAME('ONT', 'OE_BLKT_INVALID_ATTRIBUTE');
3171: fnd_message.set_token('ATTRIBUTE', OE_Order_Util.Get_Attribute_Name('INVENTORY_ITEM_ID'));
3172: --for bug 3257240
3178:
3179: IF (l_ordered_item_id <> p_line_rec.ordered_item_id
3180: OR l_item_id <> p_line_rec.inventory_item_id ) THEN
3181: if l_debug_level > 0 then
3182: oe_debug_pub.add('Release does not match blanket line customer item', 1);
3183: end if;
3184: FND_MESSAGE.SET_NAME('ONT', 'OE_BLKT_INVALID_ATTRIBUTE');
3185: fnd_message.set_token('ATTRIBUTE', OE_Order_Util.Get_Attribute_Name('CUSTOMER_ITEM_ID'));
3186: --for bug 3257240
3191:
3192: ELSIF l_item_context = 'ALL' THEN
3193: NULL; --Item is valid
3194: ELSIF l_item_context = 'CAT' THEN
3195: oe_debug_pub.add('SHIP FROM ORG ID: '||p_line_rec.ship_from_org_id);
3196: oe_debug_pub.add('INV ORG: '||l_item_val_org);
3197: oe_debug_pub.add('Cat ID: '||l_item_id);
3198:
3199: BEGIN
3192: ELSIF l_item_context = 'ALL' THEN
3193: NULL; --Item is valid
3194: ELSIF l_item_context = 'CAT' THEN
3195: oe_debug_pub.add('SHIP FROM ORG ID: '||p_line_rec.ship_from_org_id);
3196: oe_debug_pub.add('INV ORG: '||l_item_val_org);
3197: oe_debug_pub.add('Cat ID: '||l_item_id);
3198:
3199: BEGIN
3200: SELECT 'VALID'
3193: NULL; --Item is valid
3194: ELSIF l_item_context = 'CAT' THEN
3195: oe_debug_pub.add('SHIP FROM ORG ID: '||p_line_rec.ship_from_org_id);
3196: oe_debug_pub.add('INV ORG: '||l_item_val_org);
3197: oe_debug_pub.add('Cat ID: '||l_item_id);
3198:
3199: BEGIN
3200: SELECT 'VALID'
3201: INTO l_temp
3214: INTO l_temp
3215: FROM MTL_CATEGORIES_VL
3216: WHERE CATEGORY_ID = l_item_id;
3217: if l_debug_level > 0 then
3218: oe_debug_pub.add('Release does not match blanket line item category', 1);
3219: end if;
3220: FND_MESSAGE.SET_NAME('ONT', 'OE_BLKT_INVALID_ATTRIBUTE');
3221: fnd_message.set_token('ATTRIBUTE', OE_Order_Util.Get_Attribute_Name('INVENTORY_ITEM_ID'));
3222: --for bug 3257240
3229: IF (l_ordered_item <> p_line_rec.ordered_item
3230: OR l_item_id <> p_line_rec.inventory_item_id ) THEN
3231:
3232: if l_debug_level > 0 then
3233: oe_debug_pub.add('Release does not match blanket line xref item item', 1);
3234: end if;
3235: FND_MESSAGE.SET_NAME('ONT', 'OE_BLKT_INVALID_ATTRIBUTE');
3236: fnd_message.set_token('ATTRIBUTE', OE_Order_Util.Get_Attribute_Name('ORDERED_ITEM'));
3237: --for bug 3257240
3254: ,p_old_line_rec.sold_to_org_id) )
3255: AND l_sold_to_org_id <> p_line_rec.sold_to_org_id
3256: THEN
3257: if l_debug_level > 0 then
3258: oe_debug_pub.add('Customer on release does not match blanket customer', 1);
3259: oe_debug_pub.add('blkt customer :'||l_sold_to_org_id);
3260: oe_debug_pub.add('line customer :'||p_line_rec.sold_to_org_id);
3261: end if;
3262: if lcustomer_relations = 'Y' then
3255: AND l_sold_to_org_id <> p_line_rec.sold_to_org_id
3256: THEN
3257: if l_debug_level > 0 then
3258: oe_debug_pub.add('Customer on release does not match blanket customer', 1);
3259: oe_debug_pub.add('blkt customer :'||l_sold_to_org_id);
3260: oe_debug_pub.add('line customer :'||p_line_rec.sold_to_org_id);
3261: end if;
3262: if lcustomer_relations = 'Y' then
3263: begin
3256: THEN
3257: if l_debug_level > 0 then
3258: oe_debug_pub.add('Customer on release does not match blanket customer', 1);
3259: oe_debug_pub.add('blkt customer :'||l_sold_to_org_id);
3260: oe_debug_pub.add('line customer :'||p_line_rec.sold_to_org_id);
3261: end if;
3262: if lcustomer_relations = 'Y' then
3263: begin
3264: SELECT 'Y'
3310: OR NOT OE_GLOBALS.EQUAL(p_line_rec.blanket_line_number
3311: ,p_old_line_rec.blanket_line_number))
3312: THEN
3313: if l_debug_level > 0 then
3314: oe_debug_pub.add('Blanket order is currently on hold', 1);
3315: end if;
3316: FND_MESSAGE.SET_NAME('ONT', 'OE_BLKT_ON_HOLD');
3317: OE_MSG_PUB.Add;
3318: x_return_status := FND_API.G_RET_STS_ERROR;
3325: OR NOT OE_GLOBALS.EQUAL(p_line_rec.blanket_line_number
3326: ,p_old_line_rec.blanket_line_number))
3327: THEN
3328: if l_debug_level > 0 then
3329: oe_debug_pub.add('Blanket is not in Active Status', 1);
3330: end if;
3331: FND_MESSAGE.SET_NAME('ONT', 'OE_BLKT_INVALID_BLANKET');
3332: OE_MSG_PUB.Add;
3333: x_return_status := FND_API.G_RET_STS_ERROR;
3352: AND trunc(nvl(l_end_date_active
3353: ,p_line_rec.request_date) )
3354: THEN
3355: if l_debug_level > 0 then
3356: oe_debug_pub.add('Request date is not within active blanket line dates', 1);
3357: end if;
3358: FND_MESSAGE.SET_NAME('ONT', 'OE_BLKT_INVALID_LINE_REQ_DATE');
3359: OE_MSG_PUB.Add;
3360: x_return_status := FND_API.G_RET_STS_ERROR;
3548:
3549: EXCEPTION
3550: WHEN NO_DATA_FOUND THEN
3551: if l_debug_level > 0 then
3552: oe_debug_pub.add('Blanket Values combination is not valid: Blanket #:'||
3553: p_line_rec.blanket_number || ', Blanket Line #:'||p_line_rec.blanket_line_number, 2);
3554: end if;
3555: FND_MESSAGE.SET_NAME('ONT', 'OE_BLKT_INVALID_BLANKET');
3556: OE_MSG_PUB.Add;
3557: x_return_status := FND_API.G_RET_STS_ERROR;
3558:
3559: WHEN FND_API.G_EXC_ERROR THEN
3560: if l_debug_level > 0 then
3561: OE_DEBUG_PUB.Add('Expected Error in Validate Blanket Values',2);
3562: End if;
3563:
3564: x_return_status := FND_API.G_RET_STS_ERROR;
3565:
3564: x_return_status := FND_API.G_RET_STS_ERROR;
3565:
3566: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3567: if l_debug_level > 0 then
3568: OE_DEBUG_PUB.Add('Unexpected Error in Validate Blanket Values:'||SqlErrm, 1);
3569: End if;
3570: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3571:
3572:
3596: , x_ato_line_id OUT NOCOPY NUMBER
3597: , x_return_status OUT NOCOPY VARCHAR2
3598: )
3599: IS
3600: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
3601: BEGIN
3602:
3603: x_item_type_code := p_line_rec.item_type_code;
3604: x_return_status := FND_API.G_RET_STS_SUCCESS;
3624: x_item_type_code := p_line_rec.item_type_code;
3625: x_line_id := p_line_rec.reference_line_id;
3626:
3627: IF l_debug_level > 0 THEN
3628: oe_debug_pub.add('Unexpected error in OE_Validate_Line.Get_Return_Line_Attributes');
3629: END IF;
3630:
3631: END Get_Return_Line_Attributes;
3632:
3721: l_order_date_type_code VARCHAR2(10);
3722: p_date DATE;
3723:
3724: l_scheduling_Level_code VARCHAR2(30); -- 2691825
3725: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
3726:
3727: --l_po_status VARCHAR2(4100);
3728: l_req_status VARCHAR2(4100);
3729: l_ds_req VARCHAR2(240) := '';
3806: l_rule_type VARCHAR2(10);
3807:
3808: BEGIN
3809: IF l_debug_level > 0 then
3810: oe_debug_pub.add('Enter OE_VALIDATE_LINE.ENTITY',1);
3811: END IF;
3812:
3813: IF OE_GLOBALS.G_HEADER_CREATED
3814: THEN
3812:
3813: IF OE_GLOBALS.G_HEADER_CREATED
3814: THEN
3815: IF l_debug_level > 0 then
3816: oe_debug_pub.add('Header has got created in the same call',1);
3817: END IF;
3818: OE_Order_Cache.Load_Order_Header(p_line_rec.header_id);
3819: l_header_created := TRUE;
3820: END IF;
3823: -- Check required attributes.
3824: -----------------------------------------------------------
3825:
3826: IF l_debug_level > 0 then
3827: oe_debug_pub.add('1 '||l_return_status, 1);
3828: END IF;
3829: IF p_line_rec.line_id IS NULL
3830: THEN
3831:
3837: OE_MSG_PUB.Add;
3838:
3839: END IF;
3840: IF l_debug_level > 0 then
3841: oe_debug_pub.add('2 '||l_return_status, 1);
3842: END IF;
3843: IF p_line_rec.inventory_item_id IS NULL
3844: THEN
3845:
3851: OE_MSG_PUB.Add;
3852:
3853: END IF;
3854: IF l_debug_level > 0 then
3855: oe_debug_pub.add('3 '||l_return_status, 1);
3856: END IF;
3857: IF p_line_rec.line_type_id IS NULL
3858: THEN
3859:
3907: l_item_type_code := p_line_rec.item_type_code;
3908:
3909: -- For return lines, Return_Reason_Code is required
3910: IF l_debug_level > 0 then
3911: oe_debug_pub.add('5 '||l_return_status, 1);
3912: END IF;
3913: IF p_line_rec.line_category_code = OE_GLOBALS.G_RETURN_CATEGORY_CODE
3914: THEN
3915: -- For return lines, Return_Reason_Code is required
3926: -- Set the G_REF_RMA if the RMA is getting created or the reference is
3927: -- changing.
3928:
3929: if l_debug_level > 0 then
3930: oe_debug_pub.add('The return attr 2 is '||p_line_rec.return_attribute2);
3931: oe_debug_pub.add('The old return attr 2 is '||p_old_line_rec.return_attribute2);
3932: oe_debug_pub.add('The ship_to_org_id is '||p_line_rec.ship_to_org_id);
3933: end if;
3934: IF l_return_status = FND_API.G_RET_STS_SUCCESS AND
3927: -- changing.
3928:
3929: if l_debug_level > 0 then
3930: oe_debug_pub.add('The return attr 2 is '||p_line_rec.return_attribute2);
3931: oe_debug_pub.add('The old return attr 2 is '||p_old_line_rec.return_attribute2);
3932: oe_debug_pub.add('The ship_to_org_id is '||p_line_rec.ship_to_org_id);
3933: end if;
3934: IF l_return_status = FND_API.G_RET_STS_SUCCESS AND
3935: NOT OE_GLOBALS.EQUAL(p_line_rec.return_attribute2,
3928:
3929: if l_debug_level > 0 then
3930: oe_debug_pub.add('The return attr 2 is '||p_line_rec.return_attribute2);
3931: oe_debug_pub.add('The old return attr 2 is '||p_old_line_rec.return_attribute2);
3932: oe_debug_pub.add('The ship_to_org_id is '||p_line_rec.ship_to_org_id);
3933: end if;
3934: IF l_return_status = FND_API.G_RET_STS_SUCCESS AND
3935: NOT OE_GLOBALS.EQUAL(p_line_rec.return_attribute2,
3936: p_old_line_rec.return_attribute2)
3936: p_old_line_rec.return_attribute2)
3937: THEN
3938: G_REF_RMA := 'Y';
3939: if l_debug_level > 0 then
3940: OE_DEBUG_PUB.Add('Setting G_REF_RMA',1);
3941: end if;
3942: END IF;
3943:
3944: --3718547
3953:
3954: END IF;
3955:
3956: IF l_debug_level > 0 then
3957: oe_debug_pub.add('6 '||l_return_status, 1);
3958: END IF;
3959:
3960: ---- Start 2691825 ---
3961: IF OE_CODE_CONTROL.Get_Code_Release_Level >= '110509' THEN
3959:
3960: ---- Start 2691825 ---
3961: IF OE_CODE_CONTROL.Get_Code_Release_Level >= '110509' THEN
3962: IF l_debug_level > 0 then
3963: oe_debug_pub.add('Checking that it is a standard item...',1);
3964: END IF;
3965:
3966: IF (p_line_rec.item_type_code IN( 'MODEL','CLASS','KIT','OPTION')
3967: AND p_line_rec.line_category_code = 'ORDER'
3968: AND p_line_rec.source_type_code = 'INTERNAL')
3969: OR (p_line_rec.ship_set_id is not null
3970: OR P_line_rec.arrival_set_id is not null) THEN -- 2527722
3971: IF l_debug_level > 0 then
3972: oe_debug_pub.add('Checking the level...',1);
3973: END IF;
3974: l_scheduling_level_code := Oe_Schedule_Util.Get_Scheduling_Level(p_line_rec.header_id,
3975: p_line_rec.line_type_id);
3976: -- Any item other than Standard can not have level - four or five
3990: IF p_line_rec.item_type_code = OE_GLOBALS.G_ITEM_SERVICE
3991: AND p_line_rec.reserved_quantity is not null
3992: AND p_line_rec.reserved_quantity <> FND_API.G_MISS_NUM THEN
3993: IF l_debug_level > 0 then
3994: oe_debug_pub.add( 'A SERVICE LINE ', 1 ) ;
3995: END IF;
3996:
3997: FND_MESSAGE.SET_NAME('ONT','OE_SCH_NO_ACTION_DONE_NO_EXP');
3998: OE_MSG_PUB.Add;
4001: ---- End 2720165 --
4002:
4003: -- subinventory
4004: IF l_debug_level > 0 then
4005: oe_debug_pub.add('Entity: subinventory - ' || p_line_rec.subinventory);
4006: END IF;
4007: -- first validate warehouse/subinv combination is valid
4008:
4009: IF p_line_rec.ship_from_org_id is not null AND
4041: IF p_line_rec.subinventory is not null THEN
4042: IF p_line_rec.source_type_code = 'INTERNAL' OR
4043: p_line_rec.source_type_code is null THEN
4044: IF l_debug_level > 0 then
4045: oe_debug_pub.add('Entity Validateion: subinventory', 1);
4046: END IF;
4047: IF p_line_rec.ship_from_org_id is null THEN
4048: l_return_status := FND_API.G_RET_STS_ERROR;
4049: fnd_message.set_name('ONT', 'OE_ATTRIBUTE_REQUIRED');
4053: -- validate the subinv is allowed (expense/asset)
4054: -- because defaulting can be defaulting an expense sub
4055: -- and the INV profile is set to No.
4056: IF l_debug_level > 0 then
4057: oe_debug_pub.add('Entity: p_line_rec.order_source_id:' || p_line_rec.order_source_id, 5);
4058: oe_debug_pub.add('Entity: profile expense_asset:' || fnd_profile.value('INV:EXPENSE_TO_ASSET_TRANSFER'), 5);
4059: END IF;
4060: /* fix bug 2570174, check for restricted subinv */
4061: BEGIN
4054: -- because defaulting can be defaulting an expense sub
4055: -- and the INV profile is set to No.
4056: IF l_debug_level > 0 then
4057: oe_debug_pub.add('Entity: p_line_rec.order_source_id:' || p_line_rec.order_source_id, 5);
4058: oe_debug_pub.add('Entity: profile expense_asset:' || fnd_profile.value('INV:EXPENSE_TO_ASSET_TRANSFER'), 5);
4059: END IF;
4060: /* fix bug 2570174, check for restricted subinv */
4061: BEGIN
4062: -- bug 4171642
4148: END IF;
4149:
4150: -- end subinventory
4151: IF l_debug_level > 0 then
4152: oe_debug_pub.add('Entity: done subinv validation', 1);
4153: END IF;
4154:
4155: -- If line is booked, then check for the attributes required on booked lines
4156: -- Fix bug 1277092: this check not required for fully cancelled lines
4270: WHEN NO_DATA_FOUND THEN
4271: NULL;
4272: END;
4273: If l_debug_level > 0 THEN
4274: oe_debug_pub.add('The quantity entered is '||l_quantity_entered);
4275: oe_debug_pub.add('l_tot_transaction_quantity '||l_tot_transaction_quantity);
4276: END IF;
4277: IF (l_tot_transaction_quantity - NVL(l_quantity_entered,0))
4278: < p_line_rec.ordered_quantity
4271: NULL;
4272: END;
4273: If l_debug_level > 0 THEN
4274: oe_debug_pub.add('The quantity entered is '||l_quantity_entered);
4275: oe_debug_pub.add('l_tot_transaction_quantity '||l_tot_transaction_quantity);
4276: END IF;
4277: IF (l_tot_transaction_quantity - NVL(l_quantity_entered,0))
4278: < p_line_rec.ordered_quantity
4279: THEN
4291: -- OPM 02/JUN/00 START
4292: -- For a dual control process item, check qty1/2 both present and sync'd
4293: -- =====================================================================
4294: IF l_debug_level > 0 THEN
4295: oe_debug_pub.add('Entity DUAL X-VAL start', 1);
4296: END IF;
4297: IF OE_Line_Util.dual_uom_control
4298: (p_line_rec.inventory_item_id
4299: ,p_line_rec.ship_from_org_id
4300: ,l_item_rec)
4301: THEN
4302: --IF l_item_rec.dualum_ind in (1,2,3) THEN INVCONV
4303: IF l_debug_level > 0 THEN
4304: oe_debug_pub.add('DUAL X-VAL dualum is true', 2);
4305: END IF;
4306:
4307: IF (p_line_rec.ordered_quantity <> FND_API.G_MISS_NUM OR
4308: p_line_rec.ordered_quantity IS NOT NULL) AND
4308: p_line_rec.ordered_quantity IS NOT NULL) AND
4309: (p_line_rec.ordered_quantity2 = FND_API.G_MISS_NUM OR
4310: p_line_rec.ordered_quantity2 IS NULL) THEN
4311: IF l_debug_level > 0 THEN
4312: oe_debug_pub.add('dual X-VAL qty 1 not empty', 2);
4313: END IF;
4314: l_return_status := FND_API.G_RET_STS_ERROR;
4315: fnd_message.set_name('ONT','OE_ATTRIBUTE_REQUIRED');
4316: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','Ordered_Quantity2');
4330:
4331: /* If qty1/qty2 both populated, check tolerances
4332: ================================================*/
4333: IF l_debug_level > 0 THEN
4334: oe_debug_pub.add('dual - start tolerance check', 2);
4335: END IF;
4336:
4337: IF l_item_rec.secondary_default_ind in ('D','N') THEN -- INVCONV
4338: --IF l_item_rec.dualum_ind in (2,3) THEN
4345:
4346: THEN
4347:
4348: IF l_debug_level > 0 THEN
4349: oe_debug_pub.add('Entity - DUAL X-Val. ordered_quantity = ' || p_line_rec.ordered_quantity ,1);
4350: oe_debug_pub.add('Entity - DUAL X-Val. ordered_quantity2 = ' || p_line_rec.ordered_quantity2 ,1);
4351: END IF;
4352: -- OPM BEGIN 06/22
4353: /* Get the OPM equivalent code for order_quantity_uom
4346: THEN
4347:
4348: IF l_debug_level > 0 THEN
4349: oe_debug_pub.add('Entity - DUAL X-Val. ordered_quantity = ' || p_line_rec.ordered_quantity ,1);
4350: oe_debug_pub.add('Entity - DUAL X-Val. ordered_quantity2 = ' || p_line_rec.ordered_quantity2 ,1);
4351: END IF;
4352: -- OPM BEGIN 06/22
4353: /* Get the OPM equivalent code for order_quantity_uom
4354: ===================================================== -- INVCONV
4378:
4379: IF l_return = 0 -- (false)
4380: then
4381: IF l_debug_level > 0 THEN
4382: oe_debug_pub.add('Entity - dual UM with tolerance error 1. return = '|| l_return ,1);
4383: END IF;
4384:
4385: l_msg_data := FND_MSG_PUB.GET(p_msg_index => FND_MSG_PUB.G_LAST, -- INVCONV
4386: p_encoded => 'F');
4385: l_msg_data := FND_MSG_PUB.GET(p_msg_index => FND_MSG_PUB.G_LAST, -- INVCONV
4386: p_encoded => 'F');
4387: oe_msg_pub.add_text(p_message_text => l_msg_data);
4388: IF l_debug_level > 0 THEN
4389: oe_debug_pub.add(l_msg_data,1);
4390: END IF;
4391: RAISE fnd_api.g_exc_error;
4392:
4393: else
4392:
4393: else
4394:
4395: IF l_debug_level > 0 THEN
4396: oe_debug_pub.add('Entity - dual UM with no tolerance error ',1);
4397: END IF; -- INVCONV
4398:
4399: --Begin Bug 2639667
4400: -- Code added till End Bug 2639667 comment.
4441:
4442: IF l_return = 0 -- (false) -- INVCONV
4443: then
4444: IF l_debug_level > 0 THEN
4445: oe_debug_pub.add('Entity - dual UM with tolerance error 2. return = '|| l_return ,1);
4446: END IF;
4447:
4448: l_msg_data := FND_MSG_PUB.GET(p_msg_index => FND_MSG_PUB.G_LAST, -- INVCONV
4449: p_encoded => 'F');
4448: l_msg_data := FND_MSG_PUB.GET(p_msg_index => FND_MSG_PUB.G_LAST, -- INVCONV
4449: p_encoded => 'F');
4450: oe_msg_pub.add_text(p_message_text => l_msg_data);
4451: IF l_debug_level > 0 THEN
4452: oe_debug_pub.add(l_msg_data,1);
4453: END IF;
4454: l_return_status := FND_API.G_RET_STS_ERROR;
4455: RAISE fnd_api.g_exc_error;
4456: END IF; -- IF l_return = 0 -- (false)
4533:
4534: END IF;
4535:
4536: END IF;
4537: oe_debug_pub.add('l_valid_line_number end ***'||l_valid_line_number);
4538: -- END : line number validation
4539:
4540:
4541: -- Validate if the warehouse, item combination is valid
4551: IF p_line_rec.source_type_code = OE_GLOBALS.G_SOURCE_INTERNAL
4552: or p_line_rec.source_type_code is null
4553: THEN
4554: IF l_debug_level > 0 then
4555: oe_debug_pub.add('Source Type is Internal',1);
4556: END IF;
4557:
4558: -- FOR RMAs we don't validate Item Warehouse combination
4559:
4572: (p_line_rec.top_model_line_id = p_line_rec.ato_line_id OR
4573: (p_line_rec.ship_model_complete_flag = 'Y' AND
4574: p_line_rec.top_model_line_id IS NOT NULL))THEN
4575: IF l_debug_level > 0 THEN
4576: oe_debug_pub.add('ROLLBACK THE CHANGES ' ,2);
4577: END IF;
4578:
4579: UPDATE OE_ORDER_LINES_ALL
4580: SET SCHEDULE_SHIP_DATE = p_old_line_rec.schedule_ship_date,
4591: IF NOT Validate_Warehouse_Change
4592: ( p_line_rec => p_line_rec
4593: ,p_old_line_rec => p_old_line_rec )
4594: THEN
4595: oe_debug_pub.add('The warehouse change is invalid as the item is not shippable in new warehoues');
4596: l_return_status := FND_API.G_RET_STS_ERROR;
4597: END IF;
4598: END IF;
4599: --bug 6647169 end
4599: --bug 6647169 end
4600:
4601: ELSE
4602: IF l_debug_level > 0 then
4603: oe_debug_pub.add('Source Type is External',1);
4604: END IF;
4605: -- In release 12, discrete and process warehouses can also belong to any SOB.
4606: -- Bug 4190927, Validate_Item_Warehouse would be used instead of Validate_Receiving_Org
4607: -- IF NOT Validate_Receiving_Org
4625:
4626: -- start decimal qty validation
4627: IF p_line_rec.inventory_item_id is not null THEN
4628: IF l_debug_level > 0 then
4629: oe_debug_pub.add('decimal1',2);
4630: END IF;
4631: IF p_line_rec.order_quantity_uom is not null THEN
4632:
4633: l_line_num := RTRIM(p_line_rec.line_number || '.' ||
4668: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4669: END IF;
4670:
4671: IF l_debug_level > 0 then
4672: oe_debug_pub.add('Ordered Qty '||p_line_rec.ordered_quantity,2);
4673: END IF;
4674:
4675: END IF;
4676:
4699: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4700: END IF;
4701:
4702: IF l_debug_level > 0 then
4703: oe_debug_pub.add('Invoiced Qty '||p_line_rec.invoiced_quantity,2);
4704: END IF;
4705: END IF;
4706:
4707: -- cancelled quantity
4737: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4738: END IF;
4739:
4740: IF l_debug_level > 0 then
4741: oe_debug_pub.add('Cancel Qty '||p_line_rec.cancelled_quantity,2);
4742: END IF;
4743: END IF;
4744: -- auto_selected quantity
4745: IF NOT OE_GLOBALS.EQUAL(p_line_rec.auto_selected_quantity
4766: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4767: END IF;
4768:
4769: IF l_debug_level > 0 then
4770: oe_debug_pub.add('Auto Selected Qty '||p_line_rec.auto_selected_quantity,2);
4771: END IF;
4772: END IF;
4773:
4774: -- reserved quantity
4796: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4797: END IF;
4798:
4799: IF l_debug_level > 0 then
4800: oe_debug_pub.add('Reserved Qty '||p_line_rec.reserved_quantity,2);
4801: END IF;
4802: END IF;
4803:
4804:
4826: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4827: END IF;
4828:
4829: IF l_debug_level > 0 then
4830: oe_debug_pub.add('Fulfilled Qty '||p_line_rec.fulfilled_quantity,2);
4831: END IF;
4832: END IF;
4833:
4834: END IF; -- order quantity uom not null
4930: p_date := NVL(p_line_rec.schedule_arrival_date,
4931: p_line_rec.request_date);
4932: END IF;
4933: IF l_debug_level > 0 then
4934: OE_DEBUG_PUB.Add('Before calling Validate Proj References',1);
4935: END IF;
4936:
4937: result := PJM_PROJECT.VALIDATE_PROJ_REFERENCES
4938: ( X_inventory_org_id => p_line_rec.ship_from_org_id
4944: , X_calling_function =>'OEXOEORD'
4945: , X_error_code => errcode
4946: );
4947: IF l_debug_level > 0 then
4948: OE_DEBUG_PUB.Add('Validate Proj References Error:'||
4949: errcode,1);
4950: OE_DEBUG_PUB.Add('Validate Proj References Result:'||
4951: result,1);
4952: END IF;
4946: );
4947: IF l_debug_level > 0 then
4948: OE_DEBUG_PUB.Add('Validate Proj References Error:'||
4949: errcode,1);
4950: OE_DEBUG_PUB.Add('Validate Proj References Result:'||
4951: result,1);
4952: END IF;
4953: IF result <> PJM_PROJECT.G_VALIDATE_SUCCESS THEN
4954: OE_MSG_PUB.Transfer_Msg_Stack;
4955: l_msg_count:=OE_MSG_PUB.COUNT_MSG;
4956: FOR I in 1..l_msg_count loop
4957: l_msg_data := OE_MSG_PUB.Get(I,'F');
4958: IF l_debug_level > 0 then
4959: OE_DEBUG_PUB.add(l_msg_data,1);
4960: END IF;
4961: END LOOP;
4962: END IF;
4963:
4963:
4964: IF result = PJM_PROJECT.G_VALIDATE_FAILURE THEN
4965: l_return_status := FND_API.G_RET_STS_ERROR;
4966: IF l_debug_level > 0 then
4967: OE_DEBUG_PUB.Add('PJM Validation API returned with Errors',1);
4968: END IF;
4969: ELSIF result = PJM_PROJECT.G_VALIDATE_WARNING THEN
4970: IF l_debug_level > 0 then
4971: OE_DEBUG_PUB.Add('PJM Validation API returned with Warnings',1);
4967: OE_DEBUG_PUB.Add('PJM Validation API returned with Errors',1);
4968: END IF;
4969: ELSIF result = PJM_PROJECT.G_VALIDATE_WARNING THEN
4970: IF l_debug_level > 0 then
4971: OE_DEBUG_PUB.Add('PJM Validation API returned with Warnings',1);
4972: END IF;
4973: END IF;
4974:
4975:
5036: */
5037:
5038: -- End Item Unit number logic.
5039: IF l_debug_level > 0 then
5040: oe_debug_pub.add('10 '||l_return_status, 1);
5041: END IF;
5042: IF (p_line_rec.inventory_item_id IS NOT NULL) AND
5043: (p_line_rec.ship_from_org_id IS NOT NULL) AND
5044: (p_line_rec.end_item_unit_number IS NULL) THEN
5075:
5076: -- Donot allow to update project and task when a option/class is under ATO
5077: -- Model.
5078: IF l_debug_level > 0 then
5079: oe_debug_pub.add('11 '||l_return_status, 1);
5080: END IF;
5081: IF p_line_rec.operation = OE_GLOBALS.G_OPR_UPDATE THEN
5082:
5083: IF (p_line_rec.item_type_code = OE_GLOBALS.G_ITEM_OPTION OR
5105:
5106:
5107: -- Validate if item, item_identifier_type, inventory_item combination is valid
5108: IF l_debug_level > 0 then
5109: oe_debug_pub.add('12-1 '||l_return_status, 1);
5110: END IF;
5111: IF p_line_rec.inventory_item_id IS NOT NULL AND
5112: p_line_rec.inventory_item_id <> nvl(p_old_line_rec.inventory_item_id,0) OR
5113: NVL(p_line_rec.item_identifier_type, 'INT') <> NVL(p_old_line_rec.item_identifier_type, 'INT') OR
5135: END IF;
5136:
5137: END IF;
5138: IF l_debug_level > 0 then
5139: oe_debug_pub.add('12 '||l_return_status, 1);
5140: END IF;
5141:
5142:
5143: --Added for Item Orderability feature
5155: END IF;
5156: END IF;
5157:
5158: IF l_debug_level > 0 then
5159: oe_debug_pub.add('Item Orderability Validation Result : '||l_return_status, 1);
5160: END IF;
5161:
5162:
5163: -- Validate if return item and item on referenced sales order line mismatch
5177: OE_MSG_PUB.add;
5178: END IF;
5179: END IF;
5180: IF l_debug_level > 0 then
5181: oe_debug_pub.add('13 '||l_return_status, 1);
5182: END IF;
5183:
5184: -- Validate if returning a fulfilled sales order line
5185: IF (p_line_rec.line_category_code = OE_GLOBALS.G_RETURN_CATEGORY_CODE and
5197: END IF;
5198:
5199: END IF;
5200: IF l_debug_level > 0 then
5201: oe_debug_pub.add('14 '||l_return_status, 1);
5202: END IF;
5203:
5204: -- Validate if item on the Return is Returnable
5205: IF (p_line_rec.line_category_code = OE_GLOBALS.G_RETURN_CATEGORY_CODE and
5211: p_line_rec.ship_from_org_id,
5212: l_status);
5213: IF l_status <> FND_API.G_RET_STS_SUCCESS THEN
5214: IF l_debug_level > 0 then
5215: oe_debug_pub.add('Validate_Return_Item error '||l_status, 3);
5216: END IF;
5217: l_return_status := l_status;
5218: END IF;
5219:
5219:
5220: END IF;
5221:
5222: IF l_debug_level > 0 then
5223: oe_debug_pub.add('14_1 '||l_return_status, 1);
5224: END IF;
5225:
5226: --bug 5898152
5227: IF p_line_rec.line_category_code = OE_GLOBALS.G_RETURN_CATEGORY_CODE and
5248: l_return_status := FND_API.G_RET_STS_ERROR;
5249: END IF;
5250: END IF;
5251: IF l_debug_level > 0 then
5252: oe_debug_pub.add('14_2 '||l_return_status, 1);
5253: END IF;
5254:
5255: -- Fix Bug # 2791253: Check if SO Line is being referenced by RMA(s)
5256: IF p_line_rec.line_category_code = 'ORDER' AND
5263: l_return_status := FND_API.G_RET_STS_ERROR;
5264: END IF;
5265: END IF;
5266: IF l_debug_level > 0 then
5267: oe_debug_pub.add('14_2_1'||l_return_status, 1);
5268: END IF;
5269:
5270: -- Validate the quantity = 1 on RMA for Serial Number reference
5271: IF (p_line_rec.line_category_code = OE_GLOBALS.G_RETURN_CATEGORY_CODE and
5279: OE_MSG_PUB.Add;
5280: END IF;
5281:
5282: IF l_debug_level > 0 then
5283: oe_debug_pub.add('14_3 '||l_return_status, 1);
5284: END IF;
5285:
5286: -- Validation of Ship To Org Id.
5287: IF p_line_rec.ship_to_org_id IS NOT NULL
5300: IF G_REF_RMA = 'Y' THEN
5301: p_line_rec.ship_to_org_id := NULL;
5302: l_old_line_rec.ship_to_org_id := NULL;
5303: if l_debug_level > 0 then
5304: OE_DEBUG_PUB.Add('Setting ship_to_org_id to NULL',1);
5305: end if;
5306: ELSE
5307:
5308: l_return_status := FND_API.G_RET_STS_ERROR;
5327: THEN
5328:
5329: BEGIN
5330: IF l_debug_level > 0 then
5331: oe_debug_pub.add('ship_to_contact_id :'||to_char(p_line_rec.ship_to_contact_id),2);
5332: END IF;
5333:
5334: SELECT /* MOAC_SQL_CHANGE */ 'VALID'
5335: INTO l_dummy
5353: IF G_REF_RMA = 'Y' THEN
5354: p_line_rec.ship_to_contact_id := NULL;
5355: l_old_line_rec.ship_to_contact_id := NULL;
5356: if l_debug_level > 0 then
5357: OE_DEBUG_PUB.Add('Setting ship_to_contact_id to NULL',1);
5358: end if;
5359: ELSE
5360: l_return_status := FND_API.G_RET_STS_ERROR;
5361: FND_MESSAGE.SET_NAME('ONT','OE_INVALID_ATTRIBUTE');
5393: IF G_REF_RMA = 'Y' THEN
5394: p_line_rec.deliver_to_org_id := NULL;
5395: l_old_line_rec.deliver_to_org_id := NULL;
5396: if l_debug_level > 0 then
5397: OE_DEBUG_PUB.Add('Setting deliver_to_org_id to NULL',1);
5398: end if;
5399: ELSE
5400: l_return_status := FND_API.G_RET_STS_ERROR;
5401: fnd_message.set_name('ONT','OE_INVALID_ATTRIBUTE');
5421: THEN
5422:
5423: BEGIN
5424: IF l_debug_level > 0 then
5425: oe_debug_pub.add('deliver_to_contact_id :'||to_char(p_line_rec.deliver_to_contact_id),2);
5426: END IF;
5427:
5428: SELECT /* MOAC_SQL_CHANGE */ 'VALID'
5429: INTO l_dummy
5447: IF G_REF_RMA = 'Y' THEN
5448: p_line_rec.deliver_to_contact_id := NULL;
5449: l_old_line_rec.deliver_to_contact_id := NULL;
5450: if l_debug_level > 0 then
5451: OE_DEBUG_PUB.Add('Setting deliver_to_contact_id to NULL',1);
5452: end if;
5453: ELSE
5454: l_return_status := FND_API.G_RET_STS_ERROR;
5455: FND_MESSAGE.SET_NAME('ONT','OE_INVALID_ATTRIBUTE');
5481: THEN
5482:
5483: BEGIN
5484: IF l_debug_level > 0 then
5485: oe_debug_pub.add('invoice_to_org_id :'||to_char(p_line_rec.invoice_to_org_id),2);
5486: END IF;
5487: --lcustomer_relations := FND_PROFILE.VALUE('ONT_CUSTOMER_RELATIONSHIPS');
5488:
5489: IF nvl(lcustomer_relations,'N') = 'N' THEN
5497: and address_status ='A';--bug 2752321
5498:
5499: ELSIF lcustomer_relations = 'Y' THEN
5500: IF l_debug_level > 0 then
5501: oe_debug_pub.add('Cr: Yes Line Inv',2);
5502: END IF;
5503: --variable added for bug 3739650
5504: l_site_use_code := 'BILL_TO' ;
5505: SELECT /* MOAC_SQL_CHANGE */ 'VALID'
5531: -- Check if l_old_line_rec has already got populated
5532: IF l_old_line_rec.invoice_to_org_id IS NULL THEN
5533: l_old_line_rec := p_line_rec;
5534: if l_debug_level > 0 then
5535: OE_DEBUG_PUB.Add('Setting l_old_line_rec',1);
5536: end if;
5537: END IF;
5538: -- set invoice_to_org_id to G_MISS_NUM so that it gets
5539: -- re-defaulted.
5539: -- re-defaulted.
5540: p_line_rec.invoice_to_org_id := FND_API.G_MISS_NUM;
5541: p_line_rec.invoice_to_contact_id := FND_API.G_MISS_NUM;
5542: if l_debug_level > 0 then
5543: OE_DEBUG_PUB.Add('Setting invoice_to_org_id to MISSING',1);
5544: end if;
5545: ELSE
5546: l_return_status := FND_API.G_RET_STS_ERROR;
5547: FND_MESSAGE.SET_NAME('ONT','OE_INVALID_ATTRIBUTE');
5574: THEN
5575:
5576: BEGIN
5577: IF l_debug_level > 0 then
5578: oe_debug_pub.add('invoice_to_contact_id :'||to_char(p_line_rec.invoice_to_contact_id),2);
5579: END IF;
5580:
5581: SELECT 'VALID'
5582: INTO l_dummy
5600: IF G_REF_RMA = 'Y' THEN
5601: p_line_rec.invoice_to_contact_id := NULL;
5602: l_old_line_rec.invoice_to_contact_id := NULL;
5603: if l_debug_level > 0 then
5604: OE_DEBUG_PUB.Add('Setting invoice_to_contact_id to NULL',1);
5605: end if;
5606: ELSE
5607: l_return_status := FND_API.G_RET_STS_ERROR;
5608: FND_MESSAGE.SET_NAME('ONT','OE_INVALID_ATTRIBUTE');
5785: THEN
5786:
5787: BEGIN
5788:
5789: oe_debug_pub.Add('Tax Exempt Flag is :'|| p_line_rec.tax_exempt_flag, 1);
5790: --bug 6118092
5791: IF ( p_line_rec.tax_exempt_flag = 'S' OR p_line_rec.tax_exempt_flag = 'E' ) and
5792: p_line_rec.tax_exempt_number IS NOT NULL and
5793: p_line_rec.tax_exempt_reason_code IS NOT NULL and
5863: END IF;
5864: -- end eBTax changes
5865: END IF;
5866:
5867: oe_debug_pub.Add(' Valid Tax Exempt Number',1);
5868:
5869: EXCEPTION
5870:
5871: WHEN NO_DATA_FOUND THEN
5878: p_line_rec.tax_exempt_reason_code := FND_API.G_MISS_CHAR;
5879: p_line_rec.tax_exempt_flag :=FND_API.G_MISS_CHAR;
5880: G_REDEFAULT_MISSING := 'Y';
5881:
5882: oe_debug_pub.Add('Redefault the tax_exempt_number',1);
5883:
5884: ELSE
5885:
5886: l_return_status := FND_API.G_RET_STS_ERROR;
5947: OE_Sys_Parameters.VALUE_WNPS('MASTER_ORGANIZATION_ID'));
5948: */
5949: -- end bug 4171642
5950: IF l_debug_level > 0 then
5951: oe_debug_pub.add('primary uom: '|| l_uom, 1);
5952: oe_debug_pub.add('uom entered: '||p_line_rec.order_quantity_uom , 1);
5953: END IF;
5954:
5955: IF l_uom <> p_line_rec.order_quantity_uom
5948: */
5949: -- end bug 4171642
5950: IF l_debug_level > 0 then
5951: oe_debug_pub.add('primary uom: '|| l_uom, 1);
5952: oe_debug_pub.add('uom entered: '||p_line_rec.order_quantity_uom , 1);
5953: END IF;
5954:
5955: IF l_uom <> p_line_rec.order_quantity_uom
5956: THEN
5954:
5955: IF l_uom <> p_line_rec.order_quantity_uom
5956: THEN
5957: IF l_debug_level > 0 then
5958: oe_debug_pub.add('uom other than primary uom is entered', 1);
5959: END IF;
5960:
5961: fnd_message.set_name('ONT','OE_INVALID_ORDER_QUANTITY_UOM');
5962: fnd_message.set_token('ITEM',nvl(p_line_rec.ordered_item,p_line_rec.inventory_item_id));
5966: END IF;
5967: EXCEPTION
5968: when no_data_found then
5969: IF l_debug_level > 0 then
5970: oe_debug_pub.add('OEXLLINB, no_data_found in uom validation', 1);
5971: END IF;
5972: RAISE FND_API.G_EXC_ERROR;
5973: END;
5974:
5984:
5985:
5986: IF l_uom_count = 0 THEN
5987: IF l_debug_level > 0 then
5988: oe_debug_pub.add('uom/item combination invalid',2);
5989: END IF;
5990: fnd_message.set_name('ONT', 'OE_INVALID_ITEM_UOM');
5991: OE_MSG_PUB.Add;
5992: RAISE FND_API.G_EXC_ERROR;
5995: */
5996: l_ret_status := inv_convert.validate_item_uom(p_line_rec.order_quantity_uom,p_line_rec.inventory_item_id,nvl(p_line_rec.ship_from_org_id,OE_Sys_Parameters.VALUE_WNPS('MASTER_ORGANIZATION_ID')));
5997: IF NOT l_ret_status THEN
5998: IF l_debug_level > 0 then
5999: oe_debug_pub.add('uom/item combination invalid',2);
6000: END IF;
6001: fnd_message.set_name('ONT', 'OE_INVALID_ITEM_UOM');
6002: OE_MSG_PUB.Add;
6003: RAISE FND_API.G_EXC_ERROR;
6075: END;
6076: fnd_message.set_Token('PRICE_LIST2', l_price_list_name);
6077: OE_MSG_PUB.Add;
6078: IF l_debug_level > 0 then
6079: oe_debug_pub.add('Invalid Agreement +price_list_id combination',2);
6080: END IF;
6081: raise FND_API.G_EXC_ERROR;
6082: END IF;
6083: END IF; -- end of if l_list_type_code <> 'PRL'
6092: fnd_message.set_Token('AGREEMENT_NAME', l_agreement_name);
6093: fnd_message.set_Token('CUSTOMER_ID', p_line_rec.sold_to_org_id);
6094: OE_MSG_PUB.Add;
6095: IF l_debug_level > 0 then
6096: oe_debug_pub.add('Invalid Agreement +sold_org_id combination',2);
6097: END IF;
6098: RAISE FND_API.G_EXC_ERROR;
6099: ELSIF lcustomer_relations = 'Y' THEN
6100:
6117: fnd_message.set_Token('AGREEMENT_NAME', l_agreement_name);
6118: fnd_message.set_Token('CUSTOMER_ID', p_line_rec.sold_to_org_id);
6119: OE_MSG_PUB.Add;
6120: IF l_debug_level > 0 then
6121: oe_debug_pub.add('Invalid Agreement +sold_org_id combination',2);
6122: END IF;
6123: RAISE FND_API.G_EXC_ERROR;
6124: END;
6125: END IF;
6133: fnd_message.set_Token('AGREEMENT_NAME', l_agreement_name);
6134: fnd_message.set_Token('CUSTOMER_ID', l_sold_to_org);
6135: OE_MSG_PUB.Add;
6136: IF l_debug_level > 0 then
6137: oe_debug_pub.add('Invalid Agreement +sold_org_id combination',2);
6138: END IF;
6139: RAISE FND_API.G_EXC_ERROR;
6140: END;
6141: END IF; -- Agreement has changed
6186: END;
6187: --
6188: end if;
6189: IF l_debug_level > 0 then
6190: OE_DEBUG_PUB.ADD('l_hdr_currency_code:' || l_hdr_currency_code,2);
6191: OE_DEBUG_PUB.ADD('l_validate_result:'||l_VALIDATE_RESULT);
6192: OE_DEBUG_PUB.ADD('operation:'||p_line_rec.operation);
6193: OE_DEBUG_PUB.ADD('validate level'||p_validation_level);
6194: END IF;
6187: --
6188: end if;
6189: IF l_debug_level > 0 then
6190: OE_DEBUG_PUB.ADD('l_hdr_currency_code:' || l_hdr_currency_code,2);
6191: OE_DEBUG_PUB.ADD('l_validate_result:'||l_VALIDATE_RESULT);
6192: OE_DEBUG_PUB.ADD('operation:'||p_line_rec.operation);
6193: OE_DEBUG_PUB.ADD('validate level'||p_validation_level);
6194: END IF;
6195: --
6188: end if;
6189: IF l_debug_level > 0 then
6190: OE_DEBUG_PUB.ADD('l_hdr_currency_code:' || l_hdr_currency_code,2);
6191: OE_DEBUG_PUB.ADD('l_validate_result:'||l_VALIDATE_RESULT);
6192: OE_DEBUG_PUB.ADD('operation:'||p_line_rec.operation);
6193: OE_DEBUG_PUB.ADD('validate level'||p_validation_level);
6194: END IF;
6195: --
6196: IF l_VALIDATE_RESULT = 'N' THEN
6189: IF l_debug_level > 0 then
6190: OE_DEBUG_PUB.ADD('l_hdr_currency_code:' || l_hdr_currency_code,2);
6191: OE_DEBUG_PUB.ADD('l_validate_result:'||l_VALIDATE_RESULT);
6192: OE_DEBUG_PUB.ADD('operation:'||p_line_rec.operation);
6193: OE_DEBUG_PUB.ADD('validate level'||p_validation_level);
6194: END IF;
6195: --
6196: IF l_VALIDATE_RESULT = 'N' THEN
6197: --bug 3572931 depending on the validation level set the Price List to NULL or G_MISS_NUM
6230: THEN
6231:
6232: BEGIN
6233: IF l_debug_level > 0 then
6234: oe_debug_pub.add('Pricing date is '||p_line_rec.pricing_date,2);
6235: END IF;
6236:
6237: -- Modified 09-DEC-2001
6238: -- Blankets: modified select to select list_type_code instead
6316: fnd_message.set_Token('PRICE_LIST1', p_line_rec.price_list_id);
6317: fnd_message.set_Token('PRICING_DATE', p_line_rec.pricing_date);
6318: OE_MSG_PUB.Add;
6319: IF l_debug_level > 0 then
6320: oe_debug_pub.add('Invalid non agreement price list ',2);
6321: END IF;
6322: RAISE FND_API.G_EXC_ERROR;
6323: END;
6324:
6325: END IF; --calculate_price_flag
6326: END IF; -- Price list or pricing date has changed
6327: END IF;
6328: IF l_debug_level > 0 then
6329: oe_debug_pub.add('15 '||l_return_status ,1);
6330: END IF;
6331:
6332: -- Line number validation.
6333: -- Allow line number updates only on Model, Standard, Kit,
6360:
6361: END IF;
6362:
6363: IF l_debug_level > 0 then
6364: oe_debug_pub.add('16 '||l_return_status ,1);
6365: END IF;
6366: IF l_debug_level > 0 then
6367: IF p_line_rec.top_model_line_id is not null AND
6368: p_line_rec.operation = OE_GLOBALS.G_OPR_UPDATE AND
6368: p_line_rec.operation = OE_GLOBALS.G_OPR_UPDATE AND
6369: p_line_rec.ordered_quantity = 0
6370: THEN
6371: IF l_debug_level > 0 then
6372: oe_debug_pub.add('qty of a configuration related line 0'|| p_line_rec.item_type_code, 1);
6373: END IF;
6374: END IF;
6375: END IF;
6376: /*
6391: p_line_rec.operation = OE_GLOBALS.G_OPR_UPDATE AND
6392: p_line_rec.ordered_quantity = 0
6393: THEN
6394: IF l_debug_level > 0 then
6395: oe_debug_pub.add('class/option qty changed to 0', 1);
6396: END IF;
6397: l_return_status := FND_API.G_RET_STS_ERROR;
6398: FND_MESSAGE.SET_NAME('ONT', 'OE_CONFIG_NO_ZERO_QTY');
6399: oe_msg_pub.add;
6416: AND line_id <> p_line_rec.line_id;
6417:
6418: IF l_option_count > 0 THEN
6419: IF l_debug_level > 0 then
6420: oe_debug_pub.add('models qty changed to 0, no cancellation', 1);
6421: END IF;
6422: l_return_status := FND_API.G_RET_STS_ERROR;
6423: FND_Message.Set_Name('ONT', 'OE_CONFIG_NO_ZERO_QTY');
6424: oe_msg_pub.add;
6425: END IF;
6426: END IF;
6427: */
6428: IF l_debug_level > 0 then
6429: oe_debug_pub.add('OEXLLINB, RR:T2',1);
6430: oe_debug_pub.add('17 '||l_return_status ,1);
6431: END IF;
6432:
6433: -- Validate ordered quantity for OTA lines. OTA Lines are
6426: END IF;
6427: */
6428: IF l_debug_level > 0 then
6429: oe_debug_pub.add('OEXLLINB, RR:T2',1);
6430: oe_debug_pub.add('17 '||l_return_status ,1);
6431: END IF;
6432:
6433: -- Validate ordered quantity for OTA lines. OTA Lines are
6434: -- identified by item_type_code of training. The ordered
6439:
6440: IF (l_is_ota_line) AND
6441: p_line_rec.ordered_quantity > 1 then
6442: IF l_debug_level > 0 then
6443: oe_debug_pub.add('Ordered Qty cannot be greater than 1 for OTA lines', 1);
6444: END IF;
6445: l_return_status := FND_API.G_RET_STS_ERROR;
6446: FND_Message.Set_Name('ONT', 'OE_OTA_INVALID_QTY');
6447: oe_msg_pub.add;
6491: -- Allow only the Active agreement Revision
6492:
6493: BEGIN
6494: IF l_debug_level > 0 then
6495: oe_debug_pub.add('Pricing date is '||p_line_rec.pricing_date,2);
6496: END IF;
6497:
6498: SELECT name
6499: INTO l_agreement_name
6508: fnd_message.set_name('ONT', 'ONT_INVALID_AGR');
6509: fnd_message.set_Token('PRICING_DATE', p_line_rec.pricing_date);
6510: OE_MSG_PUB.Add;
6511: IF l_debug_level > 0 then
6512: oe_debug_pub.add('Invalid Agreement',2);
6513: END IF;
6514: RAISE FND_API.G_EXC_ERROR;
6515: END;
6516: End If;
6551: OR (NOT OE_GLOBALS.EQUAL(p_old_line_rec.agreement_id, p_line_rec.agreement_id)
6552: AND p_line_rec.agreement_id IS NOT NULL)) THEN
6553:
6554: IF l_debug_level > 0 then
6555: OE_DEBUG_PUB.ADD('l_hdr_currency_code1:' || l_hdr_currency_code,2);
6556: END IF;
6557: l_hdr_currency_code := OE_ORDER_CACHE.g_header_rec.transactional_curr_code;
6558: Validate_Commitment(
6559: p_line_rec => p_line_rec
6567: END IF;
6568:
6569: END IF;
6570: IF l_debug_level > 0 then
6571: oe_debug_pub.add('18 '||l_return_status ,1);
6572: END IF;
6573:
6574: IF (nvl(p_line_rec.top_model_line_id,-1) <> nvl(p_line_rec.ato_line_id,-1) AND
6575: p_line_rec.top_model_line_id IS NOT NULL) AND
6575: p_line_rec.top_model_line_id IS NOT NULL) AND
6576: (nvl(p_line_rec.ship_tolerance_below,0) <> 0 OR
6577: nvl(p_line_rec.ship_tolerance_above,0) <> 0 )THEN
6578: IF l_debug_level > 0 then
6579: oe_debug_pub.add('Ship tolerances can not be specified on PTOs',3);
6580: END IF;
6581: l_return_status := FND_API.G_RET_STS_ERROR;
6582: fnd_message.set_name('ONT','OE_NO_TOL_FOR_PTO');
6583: OE_MSG_PUB.Add;
6583: OE_MSG_PUB.Add;
6584:
6585: END IF;
6586: IF l_debug_level > 0 then
6587: oe_debug_pub.add('19 '||l_return_status ,1);
6588: END IF;
6589:
6590:
6591: IF p_line_rec.top_model_line_id is NOT NULL AND
6593: p_line_rec.operation = OE_GLOBALS.G_OPR_CREATE AND
6594: p_line_rec.ordered_quantity is NULL THEN
6595:
6596: IF l_debug_level > 0 then
6597: oe_debug_pub.add('child line of model with null qty', 3);
6598: END IF;
6599: l_return_status := FND_API.G_RET_STS_ERROR;
6600: fnd_message.set_name('ONT','OE_CONFIG_NULL_QUANTITY');
6601: fnd_message.set_Token('ITEM', nvl(p_line_rec.ordered_item,p_line_rec.inventory_item_id));
6603:
6604: END IF;
6605:
6606: IF l_debug_level > 0 then
6607: oe_debug_pub.add('20 '||l_return_status ,1);
6608: END IF;
6609:
6610: -- Added the logic to fix bug 2116353.
6611: IF NOT Validate_set_id
6631: -- ATP Flag
6632: FND_MESSAGE.SET_NAME('ONT','OE_SCH_OVER_ATP_NO_SCH_ACT');
6633: OE_MSG_PUB.Add;
6634: IF l_debug_level > 0 then
6635: Oe_debug_pub.add('Missing Schedule Action',1);
6636: END IF;
6637: l_return_status := FND_API.G_RET_STS_ERROR;
6638: END IF;
6639:
6645: -- and Drop Ship Lines.
6646: FND_MESSAGE.SET_NAME('ONT', 'OE_SCH_OVER_ATP_INVLD_LINE');
6647: OE_MSG_PUB.Add;
6648: IF l_debug_level > 0 then
6649: Oe_debug_pub.add('Override ATP cannot be set for Service, Return and
6650: Drop Ship lines',1);
6651: END IF;
6652: l_return_status := FND_API.G_RET_STS_ERROR;
6653: END IF;
6662: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','Override Atp');
6663: OE_MSG_PUB.Add;
6664: l_return_status := FND_API.G_RET_STS_ERROR;
6665: IF l_debug_level > 0 then
6666: Oe_debug_pub.add('Override ATP cannot be set prior to pack-I' ||
6667: p_line_rec.override_atp_date_code,2);
6668: END IF;
6669:
6670: END IF;
6675: AND NOT OE_GLOBALS.EQUAL(p_line_rec.firm_demand_flag,
6676: p_old_line_rec.firm_demand_flag)
6677: THEN
6678: IF l_debug_level > 0 then
6679: oe_debug_pub.add('Old firm flag : ' || p_old_line_rec.firm_demand_flag,3);
6680: oe_debug_pub.add('New firm flag : ' || p_line_rec.firm_demand_flag,3);
6681: END IF;
6682: IF nvl(p_line_rec.cancelled_flag,'N') = 'Y'
6683: OR p_line_rec.shipped_quantity is NOT NULL
6676: p_old_line_rec.firm_demand_flag)
6677: THEN
6678: IF l_debug_level > 0 then
6679: oe_debug_pub.add('Old firm flag : ' || p_old_line_rec.firm_demand_flag,3);
6680: oe_debug_pub.add('New firm flag : ' || p_line_rec.firm_demand_flag,3);
6681: END IF;
6682: IF nvl(p_line_rec.cancelled_flag,'N') = 'Y'
6683: OR p_line_rec.shipped_quantity is NOT NULL
6684: OR p_line_rec.source_type_code = OE_GLOBALS.G_SOURCE_EXTERNAL
6722: IF (p_line_rec.blanket_number IS NOT NULL OR
6723: p_line_rec.blanket_line_number IS NOT NULL OR
6724: p_line_rec.blanket_version_number IS NOT NULL) THEN
6725: if l_debug_level > 0 then
6726: OE_DEBUG_PUB.Add('Blankets are only available in Pack I or greater',1);
6727: end if;
6728: l_return_status := FND_API.G_RET_STS_ERROR;
6729: FND_MESSAGE.Set_Name('ONT','OE_BLANKET_INVALID_VERSION');
6730: OE_MSG_PUB.Add;
6773: NOT OE_GLOBALS.EQUAL(p_line_rec.ordered_quantity,
6774: p_old_line_rec.ordered_quantity) THEN
6775:
6776: IF l_debug_level > 0 THEN
6777: oe_debug_pub.add('dropship line - check if message reqd', 1);
6778: END IF;
6779:
6780: BEGIN
6781: SELECT requisition_header_id, po_header_id
6784: FROM oe_drop_ship_sources
6785: WHERE line_id = p_line_rec.line_id;
6786:
6787: IF l_debug_level > 0 THEN
6788: oe_debug_pub.add(l_req_header_id || ' - '|| l_po_header_id, 1);
6789: END IF;
6790:
6791: IF l_req_header_id is not null THEN
6792: l_req_status := po_releases_sv2.get_release_status(l_req_header_id);
6790:
6791: IF l_req_header_id is not null THEN
6792: l_req_status := po_releases_sv2.get_release_status(l_req_header_id);
6793: IF l_debug_level > 0 THEN
6794: oe_debug_pub.add('l_req_status- '|| l_req_status, 3);
6795: END IF;
6796:
6797: IF l_req_status is null THEN
6798: po_reqs_sv2.get_reqs_auth_status
6811:
6812: -- comment out for bug 4411054
6813: /*l_po_status := UPPER(po_headers_sv3.get_po_status(l_po_header_id));
6814: IF l_debug_level > 0 THEN
6815: oe_debug_pub.add('l_po_status- '|| l_po_status, 2);
6816: END IF;*/
6817: PO_DOCUMENT_CHECKS_GRP.po_status_check
6818: (p_api_version => 1.0
6819: , p_header_id => l_po_header_id
6823: IF(l_return_status = FND_API.G_RET_STS_SUCCESS) THEN
6824: l_cancel_flag := l_po_status_rec.cancel_flag(1);
6825: l_closed_code := l_po_status_rec.closed_code(1);
6826: IF l_debug_level > 0 THEN
6827: OE_DEBUG_PUB.Add('Sucess call from PO_DOCUMENT_CHECKS_GRP.po_status_check',2);
6828: OE_DEBUG_PUB.Add('Cancel_flag : '|| l_cancel_flag, 2);
6829: OE_DEBUG_PUB.Add('Closed_code : '|| l_closed_code,2);
6830: END IF;
6831: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
6824: l_cancel_flag := l_po_status_rec.cancel_flag(1);
6825: l_closed_code := l_po_status_rec.closed_code(1);
6826: IF l_debug_level > 0 THEN
6827: OE_DEBUG_PUB.Add('Sucess call from PO_DOCUMENT_CHECKS_GRP.po_status_check',2);
6828: OE_DEBUG_PUB.Add('Cancel_flag : '|| l_cancel_flag, 2);
6829: OE_DEBUG_PUB.Add('Closed_code : '|| l_closed_code,2);
6830: END IF;
6831: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
6832: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
6825: l_closed_code := l_po_status_rec.closed_code(1);
6826: IF l_debug_level > 0 THEN
6827: OE_DEBUG_PUB.Add('Sucess call from PO_DOCUMENT_CHECKS_GRP.po_status_check',2);
6828: OE_DEBUG_PUB.Add('Cancel_flag : '|| l_cancel_flag, 2);
6829: OE_DEBUG_PUB.Add('Closed_code : '|| l_closed_code,2);
6830: END IF;
6831: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
6832: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
6833: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
6858:
6859: FND_Message.Set_Token('LINE_NUM', l_ds_req);
6860:
6861: IF l_debug_level > 0 THEN
6862: oe_debug_pub.add('dropship line - message reqd', 1);
6863: END IF;
6864:
6865: BEGIN
6866: SELECT segment1
6892:
6893: FND_Message.Set_Token('PO_NUM', '-');
6894: FND_Message.Set_Token('PO_STS', 'NOT CREATED');
6895: IF l_debug_level > 0 THEN
6896: oe_debug_pub.add('no po', 4);
6897: END IF;
6898: END IF;
6899:
6900: OE_MSG_PUB.Add;
6902:
6903: EXCEPTION
6904: WHEN NO_DATA_FOUND THEN
6905: IF l_debug_level > 0 THEN
6906: oe_debug_pub.add('dropship line - message not reqd', 4);
6907: END IF;
6908: WHEN OTHERS THEN
6909: IF l_debug_level > 0 THEN
6910: oe_debug_pub.add('dropship line - others '|| sqlerrm, 3);
6906: oe_debug_pub.add('dropship line - message not reqd', 4);
6907: END IF;
6908: WHEN OTHERS THEN
6909: IF l_debug_level > 0 THEN
6910: oe_debug_pub.add('dropship line - others '|| sqlerrm, 3);
6911: END IF;
6912: END;
6913: END IF; --qty change on dropship line
6914:
6916: -- Decimal Ratio Check.
6917: --------------------------------------------------
6918:
6919: IF l_debug_level > 0 THEN
6920: OE_DEBUG_PUB.ADD('Before Decimal Ratio Check.. ');
6921: OE_DEBUG_PUB.add('No Decimal Check for Included Remnant Lines - 3132424',5);
6922: END IF;
6923:
6924: IF (p_line_rec.operation = OE_GLOBALS.G_OPR_CREATE OR
6917: --------------------------------------------------
6918:
6919: IF l_debug_level > 0 THEN
6920: OE_DEBUG_PUB.ADD('Before Decimal Ratio Check.. ');
6921: OE_DEBUG_PUB.add('No Decimal Check for Included Remnant Lines - 3132424',5);
6922: END IF;
6923:
6924: IF (p_line_rec.operation = OE_GLOBALS.G_OPR_CREATE OR
6925: (p_line_rec.operation = OE_GLOBALS.G_OPR_UPDATE AND
6941:
6942: --Macd
6943: -- This is to make sure If Old value is INSTALL_BASE it should not change
6944: IF l_debug_level > 0 THEN
6945: OE_DEBUG_PUB.ADD('old rec ib_owner'||p_old_line_rec.ib_owner);
6946: OE_DEBUG_PUB.ADD('new rec ib_owner'||p_line_rec.ib_owner);
6947: OE_DEBUG_PUB.ADD('old rec ib_current_location'||p_old_line_rec.ib_current_location);
6948: OE_DEBUG_PUB.ADD('new rec ib_current_location'||p_line_rec.ib_current_location);
6949: OE_DEBUG_PUB.ADD('old rec ib_installed_at_location'||p_old_line_rec.ib_installed_at_location);
6942: --Macd
6943: -- This is to make sure If Old value is INSTALL_BASE it should not change
6944: IF l_debug_level > 0 THEN
6945: OE_DEBUG_PUB.ADD('old rec ib_owner'||p_old_line_rec.ib_owner);
6946: OE_DEBUG_PUB.ADD('new rec ib_owner'||p_line_rec.ib_owner);
6947: OE_DEBUG_PUB.ADD('old rec ib_current_location'||p_old_line_rec.ib_current_location);
6948: OE_DEBUG_PUB.ADD('new rec ib_current_location'||p_line_rec.ib_current_location);
6949: OE_DEBUG_PUB.ADD('old rec ib_installed_at_location'||p_old_line_rec.ib_installed_at_location);
6950: OE_DEBUG_PUB.ADD('new rec ib_installed_at_location'||p_line_rec.ib_installed_at_location);
6943: -- This is to make sure If Old value is INSTALL_BASE it should not change
6944: IF l_debug_level > 0 THEN
6945: OE_DEBUG_PUB.ADD('old rec ib_owner'||p_old_line_rec.ib_owner);
6946: OE_DEBUG_PUB.ADD('new rec ib_owner'||p_line_rec.ib_owner);
6947: OE_DEBUG_PUB.ADD('old rec ib_current_location'||p_old_line_rec.ib_current_location);
6948: OE_DEBUG_PUB.ADD('new rec ib_current_location'||p_line_rec.ib_current_location);
6949: OE_DEBUG_PUB.ADD('old rec ib_installed_at_location'||p_old_line_rec.ib_installed_at_location);
6950: OE_DEBUG_PUB.ADD('new rec ib_installed_at_location'||p_line_rec.ib_installed_at_location);
6951: END IF;
6944: IF l_debug_level > 0 THEN
6945: OE_DEBUG_PUB.ADD('old rec ib_owner'||p_old_line_rec.ib_owner);
6946: OE_DEBUG_PUB.ADD('new rec ib_owner'||p_line_rec.ib_owner);
6947: OE_DEBUG_PUB.ADD('old rec ib_current_location'||p_old_line_rec.ib_current_location);
6948: OE_DEBUG_PUB.ADD('new rec ib_current_location'||p_line_rec.ib_current_location);
6949: OE_DEBUG_PUB.ADD('old rec ib_installed_at_location'||p_old_line_rec.ib_installed_at_location);
6950: OE_DEBUG_PUB.ADD('new rec ib_installed_at_location'||p_line_rec.ib_installed_at_location);
6951: END IF;
6952:
6945: OE_DEBUG_PUB.ADD('old rec ib_owner'||p_old_line_rec.ib_owner);
6946: OE_DEBUG_PUB.ADD('new rec ib_owner'||p_line_rec.ib_owner);
6947: OE_DEBUG_PUB.ADD('old rec ib_current_location'||p_old_line_rec.ib_current_location);
6948: OE_DEBUG_PUB.ADD('new rec ib_current_location'||p_line_rec.ib_current_location);
6949: OE_DEBUG_PUB.ADD('old rec ib_installed_at_location'||p_old_line_rec.ib_installed_at_location);
6950: OE_DEBUG_PUB.ADD('new rec ib_installed_at_location'||p_line_rec.ib_installed_at_location);
6951: END IF;
6952:
6953: IF p_old_line_rec.ib_owner='INSTALL_BASE' AND
6946: OE_DEBUG_PUB.ADD('new rec ib_owner'||p_line_rec.ib_owner);
6947: OE_DEBUG_PUB.ADD('old rec ib_current_location'||p_old_line_rec.ib_current_location);
6948: OE_DEBUG_PUB.ADD('new rec ib_current_location'||p_line_rec.ib_current_location);
6949: OE_DEBUG_PUB.ADD('old rec ib_installed_at_location'||p_old_line_rec.ib_installed_at_location);
6950: OE_DEBUG_PUB.ADD('new rec ib_installed_at_location'||p_line_rec.ib_installed_at_location);
6951: END IF;
6952:
6953: IF p_old_line_rec.ib_owner='INSTALL_BASE' AND
6954: NOT OE_GLOBALS.EQUAL(p_line_rec.ib_owner,p_old_line_rec.ib_owner)
6953: IF p_old_line_rec.ib_owner='INSTALL_BASE' AND
6954: NOT OE_GLOBALS.EQUAL(p_line_rec.ib_owner,p_old_line_rec.ib_owner)
6955: THEN
6956: IF l_debug_level > 0 THEN
6957: OE_DEBUG_PUB.ADD('VALIDATION FOR IB_OWNER FAILED IN OEXLLINB.pls');
6958: OE_DEBUG_PUB.ADD('OLD LINE HAS INSTALL_BASE CAN NOT CHANGE IT');
6959: END IF;
6960: l_return_status := FND_API.G_RET_STS_ERROR;
6961: fnd_message.set_name('ONT','OE_INVALID_ATTRIBUTE');
6954: NOT OE_GLOBALS.EQUAL(p_line_rec.ib_owner,p_old_line_rec.ib_owner)
6955: THEN
6956: IF l_debug_level > 0 THEN
6957: OE_DEBUG_PUB.ADD('VALIDATION FOR IB_OWNER FAILED IN OEXLLINB.pls');
6958: OE_DEBUG_PUB.ADD('OLD LINE HAS INSTALL_BASE CAN NOT CHANGE IT');
6959: END IF;
6960: l_return_status := FND_API.G_RET_STS_ERROR;
6961: fnd_message.set_name('ONT','OE_INVALID_ATTRIBUTE');
6962: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',OE_Order_UTIL.Get_attribute_name('IB_OWNER'));
6967: IF p_old_line_rec.ib_installed_at_location='INSTALL_BASE' AND
6968: NOT OE_GLOBALS.EQUAL(p_line_rec.ib_installed_at_location,p_old_line_rec.ib_installed_at_location)
6969: THEN
6970: IF l_debug_level > 0 THEN
6971: OE_DEBUG_PUB.ADD('VALIDATION FOR IB_INSTALLED_AT_LOCATION FAILED IN OEXLLINB.pls');
6972: OE_DEBUG_PUB.ADD('OLD LINE HAS INSTALL_BASE CAN NOT CHANGE IT');
6973: END IF;
6974: l_return_status := FND_API.G_RET_STS_ERROR;
6975: fnd_message.set_name('ONT','OE_INVALID_ATTRIBUTE');
6968: NOT OE_GLOBALS.EQUAL(p_line_rec.ib_installed_at_location,p_old_line_rec.ib_installed_at_location)
6969: THEN
6970: IF l_debug_level > 0 THEN
6971: OE_DEBUG_PUB.ADD('VALIDATION FOR IB_INSTALLED_AT_LOCATION FAILED IN OEXLLINB.pls');
6972: OE_DEBUG_PUB.ADD('OLD LINE HAS INSTALL_BASE CAN NOT CHANGE IT');
6973: END IF;
6974: l_return_status := FND_API.G_RET_STS_ERROR;
6975: fnd_message.set_name('ONT','OE_INVALID_ATTRIBUTE');
6976: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',OE_Order_UTIL.Get_attribute_name('IB_INSTALLED_AT_LOCATION'));
6981: IF p_old_line_rec.ib_current_location='INSTALL_BASE' AND
6982: NOT OE_GLOBALS.EQUAL(p_line_rec.ib_current_location,p_old_line_rec.ib_current_location)
6983: THEN
6984: IF l_debug_level > 0 THEN
6985: OE_DEBUG_PUB.ADD('VALIDATION FOR IB_CURRENT_LOCATION FAILED IN OEXLLINB.pls');
6986: OE_DEBUG_PUB.ADD('OLD LINE HAS INSTALL_BASE CAN NOT CHANGE IT');
6987: END IF;
6988: l_return_status := FND_API.G_RET_STS_ERROR;
6989: fnd_message.set_name('ONT','OE_INVALID_ATTRIBUTE');
6982: NOT OE_GLOBALS.EQUAL(p_line_rec.ib_current_location,p_old_line_rec.ib_current_location)
6983: THEN
6984: IF l_debug_level > 0 THEN
6985: OE_DEBUG_PUB.ADD('VALIDATION FOR IB_CURRENT_LOCATION FAILED IN OEXLLINB.pls');
6986: OE_DEBUG_PUB.ADD('OLD LINE HAS INSTALL_BASE CAN NOT CHANGE IT');
6987: END IF;
6988: l_return_status := FND_API.G_RET_STS_ERROR;
6989: fnd_message.set_name('ONT','OE_INVALID_ATTRIBUTE');
6990: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',OE_Order_UTIL.Get_attribute_name('IB_CURRENT_LOCATION'));
6996: -- This will prevent updating the three Ib fields with the value INSTALL_BASE
6997: -- where the current value is not null
6998:
6999: IF l_debug_level > 0 THEN
7000: OE_DEBUG_PUB.ADD('1 old rec ib_owner'||p_old_line_rec.ib_owner);
7001: END IF;
7002: IF p_line_rec.ib_owner='INSTALL_BASE' and p_old_line_rec.ib_owner in ('END_CUSTOMER','SOLD_TO') THEN
7003: IF l_debug_level > 0 THEN
7004: OE_DEBUG_PUB.ADD('VALIDATION FOR IB_OWNER FAILED IN OEXLLINB.pls');
7000: OE_DEBUG_PUB.ADD('1 old rec ib_owner'||p_old_line_rec.ib_owner);
7001: END IF;
7002: IF p_line_rec.ib_owner='INSTALL_BASE' and p_old_line_rec.ib_owner in ('END_CUSTOMER','SOLD_TO') THEN
7003: IF l_debug_level > 0 THEN
7004: OE_DEBUG_PUB.ADD('VALIDATION FOR IB_OWNER FAILED IN OEXLLINB.pls');
7005: OE_DEBUG_PUB.ADD('TRYING TO UPDATE WITH INSTALL_BASE OLD LINE HAS SOME VALUE');
7006: END IF;
7007: l_return_status := FND_API.G_RET_STS_ERROR;
7008: fnd_message.set_name('ONT','OE_INVALID_ATTRIBUTE');
7001: END IF;
7002: IF p_line_rec.ib_owner='INSTALL_BASE' and p_old_line_rec.ib_owner in ('END_CUSTOMER','SOLD_TO') THEN
7003: IF l_debug_level > 0 THEN
7004: OE_DEBUG_PUB.ADD('VALIDATION FOR IB_OWNER FAILED IN OEXLLINB.pls');
7005: OE_DEBUG_PUB.ADD('TRYING TO UPDATE WITH INSTALL_BASE OLD LINE HAS SOME VALUE');
7006: END IF;
7007: l_return_status := FND_API.G_RET_STS_ERROR;
7008: fnd_message.set_name('ONT','OE_INVALID_ATTRIBUTE');
7009: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',OE_Order_UTIL.Get_attribute_name('IB_OWNER'));
7011: END IF;
7012:
7013: IF p_line_rec.ib_installed_at_location='INSTALL_BASE' and p_old_line_rec.ib_installed_at_location in ('BILL_TO','DELIVER_TO','END_CUSTOMER','SHIP_TO','SOLD_TO') THEN
7014: IF l_debug_level > 0 THEN
7015: OE_DEBUG_PUB.ADD('VALIDATION FOR IB_INSTALLED_AT_LOCATION FAILED IN OEXLLINB.pls');
7016: OE_DEBUG_PUB.ADD('TRYING TO UPDATE WITH INSTALL_BASE OLD LINE HAS SOME VALUE');
7017: END IF;
7018: l_return_status := FND_API.G_RET_STS_ERROR;
7019: fnd_message.set_name('ONT','OE_INVALID_ATTRIBUTE');
7012:
7013: IF p_line_rec.ib_installed_at_location='INSTALL_BASE' and p_old_line_rec.ib_installed_at_location in ('BILL_TO','DELIVER_TO','END_CUSTOMER','SHIP_TO','SOLD_TO') THEN
7014: IF l_debug_level > 0 THEN
7015: OE_DEBUG_PUB.ADD('VALIDATION FOR IB_INSTALLED_AT_LOCATION FAILED IN OEXLLINB.pls');
7016: OE_DEBUG_PUB.ADD('TRYING TO UPDATE WITH INSTALL_BASE OLD LINE HAS SOME VALUE');
7017: END IF;
7018: l_return_status := FND_API.G_RET_STS_ERROR;
7019: fnd_message.set_name('ONT','OE_INVALID_ATTRIBUTE');
7020: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',OE_Order_UTIL.Get_attribute_name('IB_INSTALLED_AT_LOCATION'));
7022: END IF;
7023:
7024: IF p_line_rec.ib_current_location='INSTALL_BASE' and p_old_line_rec.ib_current_location in ('BILL_TO','DELIVER_TO','END_CUSTOMER','SHIP_TO','SOLD_TO') THEN
7025: IF l_debug_level > 0 THEN
7026: OE_DEBUG_PUB.ADD('VALIDATION FOR IB_CURRENT_LOCATION FAILED IN OEXLLINB.pls');
7027: OE_DEBUG_PUB.ADD('TRYING TO UPDATE WITH INSTALL_BASE OLD LINE HAS SOME VALUE');
7028: END IF;
7029: l_return_status := FND_API.G_RET_STS_ERROR;
7030: fnd_message.set_name('ONT','OE_INVALID_ATTRIBUTE');
7023:
7024: IF p_line_rec.ib_current_location='INSTALL_BASE' and p_old_line_rec.ib_current_location in ('BILL_TO','DELIVER_TO','END_CUSTOMER','SHIP_TO','SOLD_TO') THEN
7025: IF l_debug_level > 0 THEN
7026: OE_DEBUG_PUB.ADD('VALIDATION FOR IB_CURRENT_LOCATION FAILED IN OEXLLINB.pls');
7027: OE_DEBUG_PUB.ADD('TRYING TO UPDATE WITH INSTALL_BASE OLD LINE HAS SOME VALUE');
7028: END IF;
7029: l_return_status := FND_API.G_RET_STS_ERROR;
7030: fnd_message.set_name('ONT','OE_INVALID_ATTRIBUTE');
7031: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',OE_Order_UTIL.Get_attribute_name('IB_CURRENT_LOCATION'));
7038:
7039: IF p_line_rec.top_model_line_id is NULL THEN -- This is not a model line
7040:
7041: IF l_debug_level >0 THEN
7042: OE_DEBUG_PUB.ADD('Validation for IB_OWNER failed from OEXLLINB.pls');
7043: OE_DEBUG_PUB.ADD('THIS IS NOT A MODEL , CAN NOT HAVE INSTALL_BASE ');
7044: END IF;
7045: l_return_status := FND_API.G_RET_STS_ERROR;
7046: fnd_message.set_name('ONT','OE_INVALID_ATTRIBUTE');
7039: IF p_line_rec.top_model_line_id is NULL THEN -- This is not a model line
7040:
7041: IF l_debug_level >0 THEN
7042: OE_DEBUG_PUB.ADD('Validation for IB_OWNER failed from OEXLLINB.pls');
7043: OE_DEBUG_PUB.ADD('THIS IS NOT A MODEL , CAN NOT HAVE INSTALL_BASE ');
7044: END IF;
7045: l_return_status := FND_API.G_RET_STS_ERROR;
7046: fnd_message.set_name('ONT','OE_INVALID_ATTRIBUTE');
7047: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',OE_Order_UTIL.Get_attribute_name('IB_OWNER'));
7055:
7056: IF p_line_rec.top_model_line_id is NULL THEN -- This is not a model line
7057:
7058: IF l_debug_level >0 THEN
7059: OE_DEBUG_PUB.ADD('Validation for IB_INSTALLED_AT_LOCATION failed from OEXLLINB.pls');
7060: OE_DEBUG_PUB.ADD('This is not a model , can not have INSTALL_BASE ');
7061: END IF;
7062: l_return_status := FND_API.G_RET_STS_ERROR;
7063: fnd_message.set_name('ONT','OE_INVALID_ATTRIBUTE');
7056: IF p_line_rec.top_model_line_id is NULL THEN -- This is not a model line
7057:
7058: IF l_debug_level >0 THEN
7059: OE_DEBUG_PUB.ADD('Validation for IB_INSTALLED_AT_LOCATION failed from OEXLLINB.pls');
7060: OE_DEBUG_PUB.ADD('This is not a model , can not have INSTALL_BASE ');
7061: END IF;
7062: l_return_status := FND_API.G_RET_STS_ERROR;
7063: fnd_message.set_name('ONT','OE_INVALID_ATTRIBUTE');
7064: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',OE_Order_UTIL.Get_attribute_name('IB_INSTALLED_AT_LOCATION'));
7073:
7074: IF p_line_rec.top_model_line_id is NULL THEN -- This is not a model line
7075:
7076: IF l_debug_level >0 THEN
7077: OE_DEBUG_PUB.ADD('Validation for IB_CURRENT_LOCATION failed from OEXLLINB.pls');
7078: OE_DEBUG_PUB.ADD('THIS IS NOT A MODEL , CAN NOT HAVE INSTALL_BASE ');
7079: END IF;
7080: l_return_status := FND_API.G_RET_STS_ERROR;
7081: fnd_message.set_name('ONT','OE_INVALID_ATTRIBUTE');
7074: IF p_line_rec.top_model_line_id is NULL THEN -- This is not a model line
7075:
7076: IF l_debug_level >0 THEN
7077: OE_DEBUG_PUB.ADD('Validation for IB_CURRENT_LOCATION failed from OEXLLINB.pls');
7078: OE_DEBUG_PUB.ADD('THIS IS NOT A MODEL , CAN NOT HAVE INSTALL_BASE ');
7079: END IF;
7080: l_return_status := FND_API.G_RET_STS_ERROR;
7081: fnd_message.set_name('ONT','OE_INVALID_ATTRIBUTE');
7082: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',OE_Order_UTIL.Get_attribute_name('IB_CURRENT_LOCATION'));
7090:
7091: ----Macd
7092: -- distributed orders @
7093: IF l_debug_level > 0 THEN
7094: OE_DEBUG_PUB.ADD('old rec ib_owner:'||p_old_line_rec.ib_owner);
7095: END IF;
7096: IF p_line_rec.ib_owner IS NOT NULL AND
7097: (NOT OE_GLOBALS.EQUAL(p_line_rec.ib_owner,p_old_line_rec.ib_owner)
7098: OR NOT OE_GLOBALS.EQUAL(p_line_rec.sold_to_org_id, p_old_line_rec.sold_to_org_id)
7102: IF p_line_rec.ib_owner = 'END_CUSTOMER' AND
7103: p_line_rec.end_customer_id is null
7104: THEN
7105: IF l_debug_level >0 THEN
7106: OE_DEBUG_PUB.ADD('end customer id is null but value is end_customer!');
7107: END IF;
7108: l_return_status := FND_API.G_RET_STS_ERROR;
7109: fnd_message.set_name('ONT','OE_INVALID_ATTRIBUTE');
7110: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',OE_Order_UTIL.Get_attribute_name('IB_OWNER'));
7113: ELSIF p_line_rec.ib_owner = 'SOLD_TO' AND
7114: p_line_rec.sold_to_org_id is null
7115: THEN
7116: IF l_debug_level >0 THEN
7117: OE_DEBUG_PUB.ADD(' sold_to_org_id is null but value is sold_to!');
7118: END IF;
7119: l_return_status := FND_API.G_RET_STS_ERROR;
7120: fnd_message.set_name('ONT','OE_INVALID_ATTRIBUTE');
7121: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',OE_Order_UTIL.Get_attribute_name('IB_OWNER'));
7122: OE_MSG_PUB.Add;
7123: END IF;
7124: END IF;
7125: IF l_debug_level > 0 then
7126: oe_debug_pub.ADD('ib_installed_at_location: '||p_line_rec.ib_installed_at_location);
7127: END IF;
7128:
7129: IF p_line_rec.ib_installed_at_location IS NOT NULL AND
7130: (NOT OE_GLOBALS.EQUAL(p_line_rec.ib_installed_at_location,p_old_line_rec.ib_installed_at_location)
7137: IF p_line_rec.ib_installed_at_location = 'BILL_TO' AND
7138: p_line_rec.invoice_to_org_id is null
7139: THEN
7140: IF l_debug_level >0 THEN
7141: OE_DEBUG_PUB.ADD(' bill_to_org_id is null but value is bill_to!');
7142: END IF;
7143: l_return_status := FND_API.G_RET_STS_ERROR;
7144: fnd_message.set_name('ONT','OE_INVALID_ATTRIBUTE');
7145: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',OE_Order_UTIL.Get_attribute_name('IB_INSTALLED_AT_LOCATION'));
7148: ELSIF p_line_rec.ib_installed_at_location = 'SHIP_TO' AND
7149: p_line_rec.ship_to_org_id is null
7150: THEN
7151: IF l_debug_level >0 THEN
7152: OE_DEBUG_PUB.ADD(' ship_to_org_id is null but value is ship_to!');
7153: END IF;
7154: l_return_status := FND_API.G_RET_STS_ERROR;
7155: fnd_message.set_name('ONT','OE_INVALID_ATTRIBUTE');
7156: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',OE_Order_UTIL.Get_attribute_name('IB_INSTALLED_AT_LOCATION'));
7159: ELSIF p_line_rec.ib_installed_at_location = 'DELIVER_TO' AND
7160: p_line_rec.deliver_to_org_id is null
7161: THEN
7162: IF l_debug_level >0 THEN
7163: OE_DEBUG_PUB.ADD(' deliver_to_org_id is null but value is deliver_to!');
7164: END IF;
7165: l_return_status := FND_API.G_RET_STS_ERROR;
7166: fnd_message.set_name('ONT','OE_INVALID_ATTRIBUTE');
7167: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',OE_Order_UTIL.Get_attribute_name('IB_INSTALLED_AT_LOCATION'));
7169: ELSIF p_line_rec.ib_installed_at_location = 'END_CUSTOMER' AND
7170: p_line_rec.end_customer_site_use_id is null
7171: THEN
7172: IF l_debug_level >0 THEN
7173: OE_DEBUG_PUB.ADD('end customer id is null but value is end_customer!');
7174: END IF;
7175: l_return_status := FND_API.G_RET_STS_ERROR;
7176: fnd_message.set_name('ONT','OE_INVALID_ATTRIBUTE');
7177: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',OE_Order_UTIL.Get_attribute_name('IB_INSTALLED_AT_LOCATION'));
7190:
7191: END IF;
7192: END IF;
7193: IF l_debug_level > 0 then
7194: oe_debug_pub.ADD('ib_current_location: '||p_line_rec.ib_current_location);
7195: END IF;
7196:
7197: IF p_line_rec.ib_current_location IS NOT NULL AND
7198: (NOT OE_GLOBALS.EQUAL(p_line_rec.ib_current_location, p_old_line_rec.ib_current_location)
7205: IF p_line_rec.ib_current_location = 'BILL_TO' AND
7206: p_line_rec.invoice_to_org_id is null
7207: THEN
7208: IF l_debug_level >0 THEN
7209: OE_DEBUG_PUB.ADD(' bill_to_org_id is null but value is bill_to!');
7210: END IF;
7211: l_return_status := FND_API.G_RET_STS_ERROR;
7212: fnd_message.set_name('ONT','OE_INVALID_ATTRIBUTE');
7213: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',OE_Order_UTIL.Get_attribute_name('IB_CURRENT_LOCATION'));
7216: ELSIF p_line_rec.ib_current_location = 'SHIP_TO' AND
7217: p_line_rec.ship_to_org_id is null
7218: THEN
7219: IF l_debug_level >0 THEN
7220: OE_DEBUG_PUB.ADD(' ship_to_org_id is null but value is ship_to!');
7221: END IF;
7222: l_return_status := FND_API.G_RET_STS_ERROR;
7223: fnd_message.set_name('ONT','OE_INVALID_ATTRIBUTE');
7224: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',OE_Order_UTIL.Get_attribute_name('IB_CURRENT_LOCATION'));
7349: END; -- BEGIN
7350:
7351: END IF; -- End Customer site needed validation.
7352: IF l_debug_level > 0 then
7353: oe_debug_pub.add('Top Model line:'||p_line_rec.top_model_line_id, 4);
7354: oe_debug_pub.add('Validate cfg? :'||OE_CONFIG_PVT.OECFG_VALIDATE_CONFIG, 4);
7355: oe_debug_pub.add('Return status before MACD Logic:'||l_return_status,4);
7356: END IF;
7357:
7350:
7351: END IF; -- End Customer site needed validation.
7352: IF l_debug_level > 0 then
7353: oe_debug_pub.add('Top Model line:'||p_line_rec.top_model_line_id, 4);
7354: oe_debug_pub.add('Validate cfg? :'||OE_CONFIG_PVT.OECFG_VALIDATE_CONFIG, 4);
7355: oe_debug_pub.add('Return status before MACD Logic:'||l_return_status,4);
7356: END IF;
7357:
7358: IF OE_CODE_CONTROL.GET_CODE_RELEASE_LEVEL >= '110510' AND
7351: END IF; -- End Customer site needed validation.
7352: IF l_debug_level > 0 then
7353: oe_debug_pub.add('Top Model line:'||p_line_rec.top_model_line_id, 4);
7354: oe_debug_pub.add('Validate cfg? :'||OE_CONFIG_PVT.OECFG_VALIDATE_CONFIG, 4);
7355: oe_debug_pub.add('Return status before MACD Logic:'||l_return_status,4);
7356: END IF;
7357:
7358: IF OE_CODE_CONTROL.GET_CODE_RELEASE_LEVEL >= '110510' AND
7359: p_line_rec.top_model_line_id is NOT NULL THEN
7358: IF OE_CODE_CONTROL.GET_CODE_RELEASE_LEVEL >= '110510' AND
7359: p_line_rec.top_model_line_id is NOT NULL THEN
7360:
7361: IF l_debug_level > 0 THEN
7362: OE_DEBUG_PUB.Add('MACD Logic, calling Validate_Container_model',3);
7363: END IF;
7364:
7365: --bug3314488
7366: --must use l_status as return variable so that value in
7373: ,x_return_status => l_status );
7374:
7375: IF l_status = FND_API.G_RET_STS_ERROR THEN
7376: IF l_debug_level > 0 THEN
7377: OE_DEBUG_PUB.Add('Error in Validate_Container_Model',2);
7378: END IF;
7379: l_return_status := l_status;
7380: ELSIF l_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
7381: IF l_debug_level > 0 THEN
7378: END IF;
7379: l_return_status := l_status;
7380: ELSIF l_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
7381: IF l_debug_level > 0 THEN
7382: OE_DEBUG_PUB.Add('Unexpected error in Validate_Container_Model',1); END IF;
7383: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
7384: END IF;
7385: --end of bug3314488 fix
7386: ELSE
7384: END IF;
7385: --end of bug3314488 fix
7386: ELSE
7387: IF l_debug_level > 0 then
7388: OE_DEBUG_PUB.Add('Not part of model||Not in 110510 - no MACD logic',3);
7389: END IF;
7390: END IF;
7391:
7392: IF l_debug_level > 0 THEN
7389: END IF;
7390: END IF;
7391:
7392: IF l_debug_level > 0 THEN
7393: oe_debug_pub.add('Return status after MACD Logic:'||l_return_status,4);
7394: END IF;
7395:
7396: --{ Recurring Charges operation create or update of periodicity
7397: IF p_line_rec.charge_periodicity_code <> FND_API.G_MISS_CHAR AND
7398: NOT OE_GLOBALS.Equal(p_line_rec.charge_periodicity_code,
7399: p_old_line_rec.charge_periodicity_code) THEN
7400:
7401: IF l_debug_level > 0 THEN
7402: OE_DEBUG_PUB.Add ('Line has changed recurring charges:'
7403: ||p_line_rec.charge_periodicity_code,3);
7404: END IF;
7405:
7406: IF OE_Validate.Charge_Periodicity (p_line_rec.charge_periodicity_code) THEN
7424:
7425: IF l_part_of_container = 'N' OR
7426: l_top_container_model = 'Y' THEN
7427: IF l_debug_level > 0 THEN
7428: OE_DEBUG_PUB.Add('ERR: Line not child of container model',2);
7429: OE_DEBUG_PUB.Add('Line should not have charge periodicity',1);
7430: OE_DEBUG_PUB.Add('Line ID:'||p_line_rec.line_id,1);
7431: END IF;
7432:
7425: IF l_part_of_container = 'N' OR
7426: l_top_container_model = 'Y' THEN
7427: IF l_debug_level > 0 THEN
7428: OE_DEBUG_PUB.Add('ERR: Line not child of container model',2);
7429: OE_DEBUG_PUB.Add('Line should not have charge periodicity',1);
7430: OE_DEBUG_PUB.Add('Line ID:'||p_line_rec.line_id,1);
7431: END IF;
7432:
7433: --SELECT description
7426: l_top_container_model = 'Y' THEN
7427: IF l_debug_level > 0 THEN
7428: OE_DEBUG_PUB.Add('ERR: Line not child of container model',2);
7429: OE_DEBUG_PUB.Add('Line should not have charge periodicity',1);
7430: OE_DEBUG_PUB.Add('Line ID:'||p_line_rec.line_id,1);
7431: END IF;
7432:
7433: --SELECT description
7434: --INTO l_item_description
7448: OE_GLOBALS.Equal (p_line_rec.inventory_item_id,
7449: p_old_line_rec.inventory_item_id) THEN
7450:
7451: IF l_debug_level > 0 THEN
7452: OE_DEBUG_PUB.Add('Line ID:'||p_line_rec.line_id,2);
7453: OE_DEBUG_PUB.Add('Line Num:'||p_line_rec.line_number,2);
7454: OE_DEBUG_PUB.Add('ERR: Update of charge periodicity',3);
7455: END IF;
7456:
7449: p_old_line_rec.inventory_item_id) THEN
7450:
7451: IF l_debug_level > 0 THEN
7452: OE_DEBUG_PUB.Add('Line ID:'||p_line_rec.line_id,2);
7453: OE_DEBUG_PUB.Add('Line Num:'||p_line_rec.line_number,2);
7454: OE_DEBUG_PUB.Add('ERR: Update of charge periodicity',3);
7455: END IF;
7456:
7457: FND_MESSAGE.SET_NAME('ONT','ONT_NO_UPDATE_ON_PERIODICITY');
7450:
7451: IF l_debug_level > 0 THEN
7452: OE_DEBUG_PUB.Add('Line ID:'||p_line_rec.line_id,2);
7453: OE_DEBUG_PUB.Add('Line Num:'||p_line_rec.line_number,2);
7454: OE_DEBUG_PUB.Add('ERR: Update of charge periodicity',3);
7455: END IF;
7456:
7457: FND_MESSAGE.SET_NAME('ONT','ONT_NO_UPDATE_ON_PERIODICITY');
7458: FND_MESSAGE.SET_TOKEN('LINE_NUM',p_line_rec.line_number);
7461:
7462: END IF;
7463: ELSE --recurring charges system paramter is N
7464: IF l_debug_level > 0 THEN
7465: OE_DEBUG_PUB.Add('ERR: Recurring Charges SYS Param is disabled');
7466: END IF;
7467: FND_MESSAGE.SET_NAME('ONT','ONT_RECUR_CHARGES_NOT_ENABLED');
7468: OE_MSG_PUB.Add;
7469: RAISE FND_API.G_EXC_ERROR;
7552: IF p_line_rec.item_type_code NOT IN ('SERVICE', 'STANDARD') THEN
7553: IF p_line_rec.accounting_rule_id <> FND_API.G_MISS_NUM AND
7554: p_line_rec.accounting_rule_id IS NOT NULL THEN
7555: IF l_debug_level > 0 THEN
7556: oe_debug_pub.add('Getting accounting rule type');
7557: END IF;
7558: SELECT type
7559: INTO l_rule_type
7560: FROM ra_rules
7559: INTO l_rule_type
7560: FROM ra_rules
7561: WHERE rule_id = p_line_rec.accounting_rule_id;
7562: IF l_debug_level > 0 THEN
7563: oe_debug_pub.add('Rule Type is :'||l_rule_type);
7564: END IF;
7565: IF l_rule_type = 'PP_DR_ALL' or l_rule_type = 'PP_DR_PP' THEN
7566: l_return_status := FND_API.G_RET_STS_ERROR;
7567: FND_MESSAGE.Set_Name('ONT','OE_INVALID_ATTRIBUTE');
7628: OE_MSG_PUB.ADD;
7629: exception
7630: when no_data_found then
7631: IF l_debug_level > 0 then
7632: oe_debug_pub.add('OEXLLINB, no_data_found in service period validation', 1);
7633: END IF;
7634: RAISE FND_API.G_EXC_ERROR;
7635: end;
7636: end ;
7643: IF G_REDEFAULT_MISSING = 'Y' AND
7644: l_return_status = FND_API.G_RET_STS_SUCCESS
7645: THEN
7646: IF l_debug_level > 0 then
7647: oe_debug_pub.add('Inside G_REDEFAULT_MISSING',4);
7648: END IF;
7649:
7650: -- Need to Call Oe_Order_Pvt.Lines to re-default missing attributes
7651:
7682: x_return_status := l_return_status;
7683:
7684: -- Done validating entity
7685: IF l_debug_level > 0 then
7686: oe_debug_pub.add('Exit OE_VALIDATE_LINE.ENTITY ' || x_return_status,1);
7687: END IF;
7688: EXCEPTION
7689:
7690: WHEN FND_API.G_EXC_ERROR THEN
7723: l_return_status VARCHAR2(1);
7724: l_header_rec OE_Order_PUB.Header_Rec_Type;
7725: l_type_code VARCHAR2(30);
7726: l_header_created BOOLEAN := FALSE;
7727: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
7728:
7729: BEGIN
7730: IF l_debug_level > 0 then
7731: oe_debug_pub.add('Enter procedure OE_validate_line.Attributes',1);
7727: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
7728:
7729: BEGIN
7730: IF l_debug_level > 0 then
7731: oe_debug_pub.add('Enter procedure OE_validate_line.Attributes',1);
7732: END IF;
7733: x_return_status := FND_API.G_RET_STS_SUCCESS;
7734: l_return_status := FND_API.G_RET_STS_SUCCESS;
7735:
7739:
7740: IF OE_GLOBALS.G_HEADER_CREATED
7741: THEN
7742: IF l_debug_level > 0 then
7743: oe_debug_pub.add('Header has got created in the same call',1);
7744: END IF;
7745: OE_Order_Cache.Load_Order_Header(p_x_line_rec.header_id);
7746: l_header_created := TRUE;
7747: END IF;
7758: NOT OE_GLOBALS.EQUAL(p_x_line_rec.accounting_rule_id,
7759: OE_Order_Cache.g_header_rec.accounting_rule_id ))
7760: THEN
7761: IF l_debug_level > 0 then
7762: oe_debug_pub.add('Calling OE_VALIDATE for accounting_rule',1);
7763: END IF;
7764: IF NOT OE_Validate.Accounting_Rule(p_x_line_rec.accounting_rule_id) THEN
7765: IF p_validation_level = OE_GLOBALS.G_VALID_LEVEL_PARTIAL AND
7766: p_x_line_rec.operation =OE_GLOBALS.G_OPR_CREATE THEN
7786: NOT OE_GLOBALS.EQUAL(p_x_line_rec.accounting_rule_duration,
7787: OE_Order_Cache.g_header_rec.accounting_rule_duration ))
7788: THEN
7789: IF l_debug_level > 0 then
7790: oe_debug_pub.add('Calling OE_VALIDATE for accounting_rule_duration',1);
7791: END IF;
7792: IF NOT OE_Validate.Accounting_Rule_Duration(p_x_line_rec.accounting_rule_duration) THEN
7793: IF p_validation_level = OE_GLOBALS.G_VALID_LEVEL_PARTIAL AND
7794: p_x_line_rec.operation =OE_GLOBALS.G_OPR_CREATE THEN
8161: END IF;
8162:
8163: -- Changes for Late Demand Penalty Factor
8164: IF l_debug_level > 0 then
8165: OE_DEBUG_PUB.Add('Checking late_demand penalty factor');
8166: END IF;
8167:
8168: IF p_x_line_rec.late_demand_penalty_factor IS NOT NULL AND
8169: ( p_x_line_rec.late_demand_penalty_factor <>
8238: END IF;
8239: END IF;
8240: END IF;
8241: IF l_debug_level > 0 then
8242: oe_debug_pub.add('Checking for Ship Dates....',1);
8243: END IF;
8244: -- If the order date type is does not match the change, error out.
8245: IF Nvl(p_x_line_rec.source_type_code,OE_GLOBALS.G_SOURCE_INTERNAL) =
8246: OE_GLOBALS.G_SOURCE_INTERNAL THEN
8261:
8262: END IF;
8263: END IF;
8264: IF l_debug_level > 0 then
8265: oe_debug_pub.add('Checking for Arival Dates....',1);
8266: END IF;
8267:
8268: -- If the order date type is does not match the change, error out.
8269: IF NOT OE_GLOBALS.Equal(p_x_line_rec.schedule_arrival_date,
8689: END IF;
8690: END IF;
8691: END IF;
8692: IF l_debug_level > 0 then
8693: oe_debug_pub.ADD('item_relationship_type :'||p_x_line_rec.item_relationship_type,1);
8694: END IF;
8695: IF p_x_line_rec.item_relationship_type IS NOT NULL AND
8696: ( p_x_line_rec.item_relationship_type <>
8697: p_old_line_rec.item_relationship_type OR
8911:
8912: -- OPM bug 3457463
8913:
8914: if l_debug_level > 0 then
8915: oe_debug_pub.ADD('preferred_grade:'||p_x_line_rec.preferred_grade,1);
8916: end if;
8917:
8918:
8919: IF p_x_line_rec.preferred_grade IS NOT NULL AND
8962: END IF;
8963: --
8964:
8965: IF l_debug_level > 0 then
8966: oe_debug_pub.add('Exiting procedure OE_validate_line.Attributes',1);
8967: END IF;
8968:
8969: EXCEPTION
8970:
9124: p_validation_level IN NUMBER,
9125: x_return_status OUT NOCOPY VARCHAR2
9126: )
9127: IS
9128: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
9129: --Start of bug#7380336
9130: l_context_required_flag fnd_descriptive_flexs_vl.context_required_flag%TYPE;
9131: l_default_context_field_name fnd_descriptive_flexs_vl.default_context_field_name%TYPE;
9132: l_validate_line VARCHAR2(1) := 'Y';
9138:
9139: BEGIN
9140: if OE_GLOBALS.g_validate_desc_flex ='Y' then --4230230
9141: IF l_debug_level > 0 then
9142: oe_debug_pub.add('Entering Oe_Validate_Line.Validate_Flex with status: '||x_return_status,2);
9143: END IF;
9144:
9145: -- Bug 2333071 : Excluding Flexfield validation for CONFIG line
9146: -- Fixing 2375476 to skip the Flex field validation in case of
9164: -- Skip the Validation if not changes are made in the DFF from the UI.
9165: IF l_context_required_flag = 'Y' AND ( p_x_line_rec.context IS NULL OR p_x_line_rec.context = FND_API.G_MISS_CHAR ) AND (OE_GLOBALS.G_UI_FLAG) THEN
9166: l_validate_line := 'N';
9167: IF l_debug_level > 0 then
9168: oe_debug_pub.add('Skipping Validation');
9169: END IF;
9170:
9171: ELSIF l_context_required_flag = 'Y' AND ( p_x_line_rec.context IS NULL OR p_x_line_rec.context = FND_API.G_MISS_CHAR ) AND NOT (OE_GLOBALS.G_UI_FLAG) THEN
9172: -- Show Error message if appropriate context value is not passed
9171: ELSIF l_context_required_flag = 'Y' AND ( p_x_line_rec.context IS NULL OR p_x_line_rec.context = FND_API.G_MISS_CHAR ) AND NOT (OE_GLOBALS.G_UI_FLAG) THEN
9172: -- Show Error message if appropriate context value is not passed
9173: -- from the Process Order Call and if the Context field is required.
9174: IF l_debug_level > 0 THEN
9175: oe_debug_pub.add( 'before call to desc_flex Context not set for OE_LINE_ATTRIBUTES DFF ' ) ;
9176: END IF;
9177:
9178: ELSE
9179: -- Validate the DFF in all other cases.
9178: ELSE
9179: -- Validate the DFF in all other cases.
9180: l_validate_line := 'Y';
9181: IF l_debug_level > 0 then
9182: oe_debug_pub.add('Validating the Flex Field');
9183: END IF;
9184: END IF; --End of bug#7380336
9185:
9186: IF(l_validate_line = 'Y') THEN --Bug#7380336
9272: p_old_line_rec.context OR
9273: p_old_line_rec.context IS NULL )))
9274: THEN
9275: IF l_debug_level > 0 then
9276: oe_debug_pub.add('Before calling line_desc_flex',2);
9277: END IF;
9278: IF Oe_Order_Cache.IS_FLEX_ENABLED('OE_LINE_ATTRIBUTES') = 'Y' THEN
9279:
9280: IF NOT OE_VALIDATE.Line_Desc_Flex
9466: -- end of assignments, bug 2511313
9467: END IF; -- Flex Validation successfull
9468: END IF; -- Is flex enabled
9469: IF l_debug_level > 0 then
9470: oe_debug_pub.add('After line_desc_flex ' || x_return_status,2);
9471: END IF;
9472:
9473: END IF; -- For Additional Line Information
9474:
9486: IF OE_OE_PRICING_AVAILABILITY.IS_PRICING_AVAILIBILITY = 'N' THEN
9487: FND_MESSAGE.SET_NAME('FND', 'ONT_CONTEXT_NOT_FOUND');
9488: OE_MSG_PUB.ADD;
9489: IF l_debug_level > 0 THEN
9490: oe_debug_pub.add('desc_flex Context Not set for OE_LINE_ATTRIBUTES DFF ') ;
9491: END IF;
9492: RAISE FND_API.G_EXC_ERROR;
9493: END IF;
9494: END IF; --End of bug#7380336
9588: THEN
9589:
9590:
9591: IF l_debug_level > 0 then
9592: OE_DEBUG_PUB.ADD('Before G_line_desc_flex',2);
9593: END IF;
9594: IF Oe_Order_Cache.IS_FLEX_ENABLED('OE_LINE_GLOBAL_ATTRIBUTE') = 'Y' THEN
9595: IF NOT OE_VALIDATE.G_Line_Desc_Flex
9596: (p_context => p_x_line_rec.global_attribute_category
9778: END IF;
9779:
9780: END IF; -- Is flex enabled
9781: IF l_debug_level > 0 then
9782: OE_DEBUG_PUB.ADD('After G_Line_desc_flex ' || x_return_status,2);
9783: END IF;
9784:
9785: END IF;
9786: -- END IF;
10183: -- end of bug 2511313
10184: END IF;
10185: END IF; -- Is flex enabled
10186: IF l_debug_level > 0 then
10187: oe_debug_pub.add('After I_line_desc_flex ' || x_return_status,2);
10188: END IF;
10189:
10190: END IF;
10191:
10407:
10408: END IF;
10409: END IF; -- Is flex enabled
10410:
10411: --oe_debug_pub.add('After TP_line_desc_flex ' || x_return_status);
10412:
10413: END IF;
10414: /* Trading Partner */
10415:
10432: p_old_line_rec.return_context IS NULL ))))
10433: THEN
10434:
10435: IF l_debug_level > 0 then
10436: oe_debug_pub.add('Before calling Return line_desc_flex',2);
10437: END IF;
10438: IF Oe_Order_Cache.IS_FLEX_ENABLED('OE_LINE_RETURN_ATTRIBUTE') = 'Y' THEN
10439: IF NOT OE_VALIDATE.R_Line_Desc_Flex
10440: (p_context => p_x_line_rec.Return_context
10584: -- end of bug 2511313
10585: END IF;
10586: END IF; -- Is flex enabled
10587: IF l_debug_level > 0 then
10588: oe_debug_pub.add('After Return line_desc_flex ' || x_return_status,2);
10589: END IF;
10590: END IF;
10591: end if; --end if OE_GLOBALS.g_validate_desc_flex ='Y' then --4343612
10592: -- Done validating attributes
10592: -- Done validating attributes
10593:
10594: EXCEPTION
10595: WHEN OTHERS THEN
10596: oe_debug_pub.add('error in Validate_Flex '|| sqlerrm, 1);
10597: RAISE;
10598: END Validate_Flex;
10599:
10600: -- Procedure Entity_Delete