141:
142: l_len_sqlerrm := Length(x_msg_data) ;
143: WHILE l_len_sqlerrm >= i
144: LOOP
145: FND_MESSAGE.Set_Name('IBE', 'IBE_OM_ERROR');
146: FND_MESSAGE.Set_token('MSG_TXT' , substr(x_msg_data,i,240));
147: i := i + 240;
148: FND_MSG_PUB.ADD;
149: END LOOP;
142: l_len_sqlerrm := Length(x_msg_data) ;
143: WHILE l_len_sqlerrm >= i
144: LOOP
145: FND_MESSAGE.Set_Name('IBE', 'IBE_OM_ERROR');
146: FND_MESSAGE.Set_token('MSG_TXT' , substr(x_msg_data,i,240));
147: i := i + 240;
148: FND_MSG_PUB.ADD;
149: END LOOP;
150:
539: IF (IBE_UTIL.G_DEBUGON = l_true) then
540: ibe_util.debug('line type id..'||l_order_line_tbl(i).line_type_id);
541: end if;
542: ELSE
543: FND_Message.Set_Name('IBE', 'IBE_ERR_OT_LINE_TYPE_ID_MISS');
544: FND_Msg_Pub.Add;
545: RAISE FND_API.G_EXC_ERROR;
546: END IF;
547: END IF;
582: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
583: ibe_util.debug('line type id..'||l_order_line_tbl(i).line_type_id);
584: end if;
585: ELSE
586: FND_Message.Set_Name('IBE', 'IBE_ERR_OT_LINE_TYPE_ID_MISS');
587: FND_Msg_Pub.Add;
588: RAISE FND_API.G_EXC_ERROR;
589: END IF;
590: END IF;
690: IF (p_save_type = SAVE_ADDITEMS) THEN
691: IF (x_order_header_rec.ORDER_CATEGORY_CODE is null
692: OR x_order_header_rec.ORDER_CATEGORY_CODE = FND_API.G_MISS_CHAR)
693: THEN
694: FND_Message.Set_Name('IBE', 'IBE_ERR_OT_ORDER_CATG_MISS');
695: FND_Msg_Pub.Add;
696: RAISE FND_API.G_EXC_ERROR;
697: END IF;
698: END IF;
728: IF ((l_flow_status_code = 'BOOKED' OR l_flow_status_code='CLOSED' OR
729: l_flow_status_code = 'CANCELLED')
730: OR l_last_update_date > x_order_header_rec.last_update_date)
731: THEN
732: FND_Message.Set_Name('IBE', 'IBE_ERR_OT_REFRESH_RETURN');
733: FND_Msg_Pub.Add;
734: RAISE FND_API.G_EXC_ERROR;
735: ELSE
736: x_order_header_rec.operation := OE_Globals.G_OPR_UPDATE;
764: then
765: x_order_header_rec.order_type_id := FND_PROFILE.VALUE('IBE_RETURN_TRANSACTION_TYPE');
766: IF (x_order_header_rec.order_type_id IS NULL OR x_order_header_rec.order_type_id = FND_API.G_MISS_NUM)
767: THEN
768: FND_Message.Set_Name('IBE', 'IBE_ERR_OT_ORDER_TYPE_ID_MISS');
769: FND_Msg_Pub.Add;
770: RAISE FND_API.G_EXC_ERROR;
771: END IF;
772: end if; -- if order type id
787: Ibe_util.Debug('Sales Rep Number for Current Org : ' ||l_salesrep_number);
788: END IF;
789: -- Bug 5255625, Proper error message when default salesrep is not set
790: IF (l_salesrep_number is null) THEN
791: FND_Message.Set_Name('IBE', 'IBE_ERR_OT_SALESREPID_MISS');
792: FND_Msg_Pub.Add;
793: RAISE FND_API.G_EXC_ERROR;
794: ELSE
795: -- Get the sales rep id from the sales rep number using the JTF table
801: END IF;
802: --l_salesrep_id := FND_PROFILE.VALUE('ASO_DEFAULT_PERSON_ID');
803:
804: IF (l_salesrep_id is null) THEN
805: FND_Message.Set_Name('IBE', 'IBE_ERR_OT_SALESREPID_MISS');
806: FND_Msg_Pub.Add;
807: RAISE FND_API.G_EXC_ERROR;
808: ELSE
809: x_order_header_rec.salesrep_id := l_salesrep_id;
825: x_order_header_rec.flow_status_code := 'WORKING';
826: END IF;
827:
828: ELSIF(p_save_type = SAVE_NORMAL OR p_save_type = SAVE_REMOVEITEMS) THEN
829: FND_Message.Set_Name('IBE', 'IBE_ERR_OT_REFRESH_RETURN');
830: FND_Msg_Pub.Add;
831: RAISE FND_API.G_EXC_ERROR;
832: END If; --save type= normal
833: ELSE
1024:
1025:
1026: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1027: -- raise FND_API.G_EXC_ERROR;
1028: FND_Message.Set_Name('IBE', 'IBE_ERR_OT_INVALID_SHIPTO_ADDR');
1029: FND_Msg_Pub.Add;
1030: RAISE FND_API.G_EXC_ERROR;
1031: END IF;
1032:
1058: Ibe_util.Debug('DefaultHdrLineAddress: Final Attempt- Ship To');
1059: END IF;
1060:
1061: -- If final attempt also fails, no other go, Raise An Exception
1062: FND_Message.Set_Name('IBE', 'IBE_ERR_OT_INVALID_SHIPTO_ADDR');
1063: FND_Msg_Pub.Add;
1064: RAISE FND_API.G_EXC_ERROR; -- Error Message should indicate the
1065: -- user to select/ create a valid Shipping address
1066: -- in the profiles tab.
1066: -- in the profiles tab.
1067: END IF;
1068: ELSE
1069: -- FOR B2C raise an exception.
1070: FND_Message.Set_Name('IBE', 'IBE_ERR_OT_INVALID_SHIPTO_ADDR');
1071: FND_Msg_Pub.Add;
1072: RAISE FND_API.G_EXC_ERROR;
1073: END IF;
1074:
1092: Ibe_util.Debug('DefaultHdrLineAddress: After call to Get_Cust_Acct_Site_Use-BillTO '||x_return_status);
1093: END IF;
1094:
1095: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1096: FND_Message.Set_Name('IBE', 'IBE_ERR_OT_INVALID_BILLTO_ADDR');
1097: FND_Msg_Pub.Add;
1098: RAISE FND_API.G_EXC_ERROR;
1099: END IF;
1100:
1120: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1121: Ibe_util.Debug('DefaultHdrLineAddress: Final Attempt- Bill To');
1122: END IF;
1123:
1124: FND_Message.Set_Name('IBE', 'IBE_ERR_OT_INVALID_BILLTO_ADDR');
1125: FND_Msg_Pub.Add;
1126: RAISE FND_API.G_EXC_ERROR; -- Error Message should indicate the
1127: -- user to select/ create a valid Shipping address
1128: -- in the profiles tab.
1128: -- in the profiles tab.
1129: END IF;
1130: ELSE
1131: -- FOR B2C raise an exception.
1132: FND_Message.Set_Name('IBE', 'IBE_ERR_OT_INVALID_BILLTO_ADDR');
1133: FND_Msg_Pub.Add;
1134: RAISE FND_API.G_EXC_ERROR;
1135: END IF;
1136:
1660: THEN
1661: IF (IBE_UTIL.G_DEBUGON = l_true) then
1662: IBE_UTIL.DEBUG('Inside If');
1663: END IF;
1664: FND_Message.Set_Name('IBE', 'IBE_OT_ERR_USERACCESS');
1665: FND_Msg_Pub.Add;
1666: RAISE FND_API.G_EXC_ERROR;
1667: END IF;
1668:
1958: IBE_Util.debug('STD-Item: Fails for Qty: Order#='||l_tmp_order_line_tbl(l_index2).order_number
1959: ||' : '||trim(l_tmp_order_line_tbl(l_index2).description)||' : '
1960: ||'allowed Qty = '||tempQty);
1961: end if;
1962: FND_MESSAGE.Set_Name('IBE','IBE_ERR_OT_LINE_OVER_QTY');
1963: FND_MESSAGE.Set_Token('ORD', l_tmp_order_line_tbl(l_index2).order_number);
1964: FND_MESSAGE.Set_Token('DESC', trim(l_tmp_order_line_tbl(l_index2).description));
1965:
1966: FND_MESSAGE.Set_Token('QTY', tempQty);
1959: ||' : '||trim(l_tmp_order_line_tbl(l_index2).description)||' : '
1960: ||'allowed Qty = '||tempQty);
1961: end if;
1962: FND_MESSAGE.Set_Name('IBE','IBE_ERR_OT_LINE_OVER_QTY');
1963: FND_MESSAGE.Set_Token('ORD', l_tmp_order_line_tbl(l_index2).order_number);
1964: FND_MESSAGE.Set_Token('DESC', trim(l_tmp_order_line_tbl(l_index2).description));
1965:
1966: FND_MESSAGE.Set_Token('QTY', tempQty);
1967: FND_Msg_Pub.Add;
1960: ||'allowed Qty = '||tempQty);
1961: end if;
1962: FND_MESSAGE.Set_Name('IBE','IBE_ERR_OT_LINE_OVER_QTY');
1963: FND_MESSAGE.Set_Token('ORD', l_tmp_order_line_tbl(l_index2).order_number);
1964: FND_MESSAGE.Set_Token('DESC', trim(l_tmp_order_line_tbl(l_index2).description));
1965:
1966: FND_MESSAGE.Set_Token('QTY', tempQty);
1967: FND_Msg_Pub.Add;
1968:
1962: FND_MESSAGE.Set_Name('IBE','IBE_ERR_OT_LINE_OVER_QTY');
1963: FND_MESSAGE.Set_Token('ORD', l_tmp_order_line_tbl(l_index2).order_number);
1964: FND_MESSAGE.Set_Token('DESC', trim(l_tmp_order_line_tbl(l_index2).description));
1965:
1966: FND_MESSAGE.Set_Token('QTY', tempQty);
1967: FND_Msg_Pub.Add;
1968:
1969: ELSIF(l_tmp_order_line_tbl(l_index2).item_type_code IN ('MODEL','KIT')) then
1970: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1970: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
1971: IBE_Util.debug('MDL-Item: Fails for Qty: Order#='||l_tmp_order_line_tbl(l_index2).order_number||
1972: ' : '||trim(l_tmp_order_line_tbl(l_index2).description));
1973: end if;
1974: FND_MESSAGE.Set_Name('IBE','IBE_ERR_OT_MDL_LINE_OVER_QTY');
1975: FND_MESSAGE.Set_Token('ORD', l_tmp_order_line_tbl(l_index2).order_number);
1976: FND_MESSAGE.Set_Token('DESC', trim(l_tmp_order_line_tbl(l_index2).description));
1977: FND_Msg_Pub.Add;
1978: END IF;
1971: IBE_Util.debug('MDL-Item: Fails for Qty: Order#='||l_tmp_order_line_tbl(l_index2).order_number||
1972: ' : '||trim(l_tmp_order_line_tbl(l_index2).description));
1973: end if;
1974: FND_MESSAGE.Set_Name('IBE','IBE_ERR_OT_MDL_LINE_OVER_QTY');
1975: FND_MESSAGE.Set_Token('ORD', l_tmp_order_line_tbl(l_index2).order_number);
1976: FND_MESSAGE.Set_Token('DESC', trim(l_tmp_order_line_tbl(l_index2).description));
1977: FND_Msg_Pub.Add;
1978: END IF;
1979: END IF;
1972: ' : '||trim(l_tmp_order_line_tbl(l_index2).description));
1973: end if;
1974: FND_MESSAGE.Set_Name('IBE','IBE_ERR_OT_MDL_LINE_OVER_QTY');
1975: FND_MESSAGE.Set_Token('ORD', l_tmp_order_line_tbl(l_index2).order_number);
1976: FND_MESSAGE.Set_Token('DESC', trim(l_tmp_order_line_tbl(l_index2).description));
1977: FND_Msg_Pub.Add;
1978: END IF;
1979: END IF;
1980: l_index2 := l_tmp_order_line_tbl.NEXT(l_index2);
2490: OR ll_return_status =FND_API.G_RET_STS_ERROR) then
2491: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
2492: IBE_Util.Debug('Invalid Billing Details- Settig the Error to FND stack');
2493: END IF;
2494: FND_MESSAGE.Set_Name('IBE','IBE_ERR_OT_INVALID_BILLDET');
2495: FND_Msg_Pub.Add;
2496: end if;
2497:
2498: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
2582: OR ll_return_status =FND_API.G_RET_STS_ERROR) then
2583: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
2584: IBE_Util.Debug('Invalid Billing Details- Settig the Error to FND stack');
2585: END IF;
2586: FND_MESSAGE.Set_Name('IBE','IBE_ERR_OT_INVALID_SHIPDET');
2587: FND_Msg_Pub.Add;
2588: end if;
2589:
2590:
2898: end if;
2899:
2900: IF(lx_order_header_rec.invoice_to_org_id is null OR lx_order_header_rec.invoice_to_org_id = FND_API.G_MISS_NUM)
2901: THEN
2902: FND_Message.Set_Name('IBE', 'IBE_ERR_OT_SHIPTO_BILLTO_MISS');
2903: FND_Msg_Pub.Add;
2904: RAISE FND_API.G_EXC_ERROR;
2905: END IF;
2906:
3589: --l_order_header_rec.ORDER_CATEGORY_CODE := 'RETURN';
3590: l_order_type_id := FND_PROFILE.VALUE('IBE_RETURN_TRANSACTION_TYPE');
3591:
3592: IF (l_order_type_id is null) THEN
3593: FND_Message.Set_Name('IBE', 'IBE_ERR_OT_ORDER_TYPE_ID_MISS');
3594: FND_Msg_Pub.Add;
3595: RAISE FND_API.G_EXC_ERROR;
3596: ELSE
3597: l_order_header_rec.order_type_id := l_order_type_id;
3610: END IF;
3611:
3612: -- Bug 5359687, Proper error message when default salesrep is not set
3613: IF (l_salesrep_number is null) THEN
3614: FND_Message.Set_Name('IBE', 'IBE_ERR_OT_SALESREPID_MISS');
3615: FND_Msg_Pub.Add;
3616: RAISE FND_API.G_EXC_ERROR;
3617: ELSE
3618: -- Get the sales rep id from the sales rep number using the JTF table
3625:
3626: --l_salesrep_id := FND_PROFILE.VALUE('ASO_DEFAULT_PERSON_ID');
3627:
3628: IF (l_salesrep_id is null) THEN
3629: FND_Message.Set_Name('IBE', 'IBE_ERR_OT_SALESREPID_MISS');
3630: FND_Msg_Pub.Add;
3631: RAISE FND_API.G_EXC_ERROR;
3632: ELSE
3633: l_order_header_rec.salesrep_id := l_salesrep_id;
4043: IF ((l_flow_status_code = 'BOOKED' OR l_flow_status_code='CLOSED' OR
4044: l_flow_status_code = 'CANCELLED')
4045: OR l_last_update_date > p_last_update_date)
4046: THEN
4047: FND_Message.Set_Name('IBE', 'IBE_ERR_OT_REFRESH_RETURN');
4048: FND_Msg_Pub.Add;
4049: RAISE FND_API.G_EXC_ERROR;
4050: END IF;
4051:
4087: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
4088: IBE_Util.Debug('UpdateLinebilling- Get_Cust_Account_Site_Use() fails raise exception');
4089: END IF;
4090:
4091: FND_Message.Set_Name('IBE', 'IBE_ERR_OT_INVALID_BILLTO_ADDR');
4092: FND_Msg_Pub.Add;
4093: RAISE FND_API.G_EXC_ERROR;
4094: END IF;
4095:
4115: IF (IBE_UTIL.G_DEBUGON = l_true) THEN
4116: IBE_Util.Debug('UpdateLinebilling- Get_Cust_Account_Site_Use() fails raise exception');
4117: END IF;
4118:
4119: FND_Message.Set_Name('IBE', 'IBE_ERR_OT_INVALID_SHIPTO_ADDR');
4120: FND_Msg_Pub.Add;
4121: RAISE FND_API.G_EXC_ERROR;
4122: END IF;
4123: IF (IBE_UTIL.G_DEBUGON = l_true) THEN