[Home] [Help]
39: NOT OE_GLOBALS.EQUAL(p_header_rec.transaction_phase_code
40: ,p_old_header_rec.transaction_phase_code)
41: THEN
42: FND_MESSAGE.SET_NAME('ONT','OE_PHASE_UPDATE_NOT_ALLOWED');
43: OE_MSG_PUB.ADD;
44: RAISE FND_API.G_EXC_ERROR;
45: END IF;
46:
47: -- New version number cannot be lower than previous version
48:
49: IF nvl(p_header_rec.version_number,-1) < p_old_header_rec.version_number
50: THEN
51: FND_MESSAGE.SET_NAME('ONT','OE_VERSION_NUM_ERROR');
52: OE_MSG_PUB.ADD;
53: x_return_status := FND_API.G_RET_STS_ERROR;
54: END IF;
55:
56: END IF; -- End of check for UPDATE operation
70: THEN
71: FND_MESSAGE.SET_NAME('ONT','OE_CANT_UPDATE_QUOTE_ATTR');
72: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',
73: OE_Order_UTIL.Get_Attribute_Name('QUOTE_NUMBER'));
74: OE_MSG_PUB.ADD;
75: x_return_status := FND_API.G_RET_STS_ERROR;
76: END IF;
77:
78: IF (NOT OE_GLOBALS.EQUAL(p_header_rec.quote_date
83: THEN
84: FND_MESSAGE.SET_NAME('ONT','OE_CANT_UPDATE_QUOTE_ATTR');
85: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',
86: OE_Order_UTIL.Get_Attribute_Name('QUOTE_DATE'));
87: OE_MSG_PUB.ADD;
88: x_return_status := FND_API.G_RET_STS_ERROR;
89: END IF;
90:
91: IF (NOT OE_GLOBALS.EQUAL(p_header_rec.expiration_date
96: THEN
97: FND_MESSAGE.SET_NAME('ONT','OE_CANT_UPDATE_QUOTE_ATTR');
98: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',
99: OE_Order_UTIL.Get_Attribute_Name('EXPIRATION_DATE'));
100: OE_MSG_PUB.ADD;
101: x_return_status := FND_API.G_RET_STS_ERROR;
102: END IF;
103:
104: -- Bug 3189579
119: THEN
120: FND_MESSAGE.SET_NAME('ONT','OE_CANT_UPDATE_ORDER_ATTR');
121: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',
122: OE_Order_UTIL.Get_Attribute_Name('ORDER_NUMBER'));
123: OE_MSG_PUB.ADD;
124: x_return_status := FND_API.G_RET_STS_ERROR;
125: END IF;
126:
127: IF (NOT OE_GLOBALS.EQUAL(p_header_rec.ordered_date
132: THEN
133: FND_MESSAGE.SET_NAME('ONT','OE_CANT_UPDATE_ORDER_ATTR');
134: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',
135: OE_Order_UTIL.Get_Attribute_Name('ORDERED_DATE'));
136: OE_MSG_PUB.ADD;
137: x_return_status := FND_API.G_RET_STS_ERROR;
138: END IF;
139:
140: -- Return orders not supported
139:
140: -- Return orders not supported
141: IF p_header_rec.order_category_code = 'RETURN' THEN
142: FND_MESSAGE.SET_NAME('ONT','OE_QUOTE_RETURN_NOT_SUPP');
143: OE_MSG_PUB.ADD;
144: x_return_status := FND_API.G_RET_STS_ERROR;
145: END IF;
146:
147: -- Internal sales orders not allowed
146:
147: -- Internal sales orders not allowed
148: IF p_header_rec.order_source_id = 10 THEN
149: FND_MESSAGE.SET_NAME('ONT','OE_QUOTE_INT_ORD_NOT_SUPP');
150: OE_MSG_PUB.ADD;
151: x_return_status := FND_API.G_RET_STS_ERROR;
152: END IF;
153:
154: -- Cancellation operation not supported for quotes
153:
154: -- Cancellation operation not supported for quotes
155: IF p_header_rec.cancelled_flag = 'Y' THEN
156: FND_MESSAGE.SET_NAME('ONT','OE_QUOTE_CANCEL_NOT_SUPP');
157: OE_MSG_PUB.ADD;
158: x_return_status := FND_API.G_RET_STS_ERROR;
159: END IF;
160:
161: END IF; -- End of check if phase = F/N
167: x_return_status := FND_API.G_RET_STS_ERROR;
168: WHEN OTHERS THEN
169: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
170:
171: IF OE_MSG_PUB.Check_Msg_Level (OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
172: THEN
173: OE_MSG_PUB.Add_Exc_Msg
174: ( G_PKG_NAME ,
175: 'Check_Negotiation_Attributes'
169: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
170:
171: IF OE_MSG_PUB.Check_Msg_Level (OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
172: THEN
173: OE_MSG_PUB.Add_Exc_Msg
174: ( G_PKG_NAME ,
175: 'Check_Negotiation_Attributes'
176: );
177: END IF;
204: x_return_status := FND_API.G_RET_STS_ERROR;
205: FND_MESSAGE.SET_NAME('ONT','OE_BOOK_REQUIRED_ATTRIBUTE');
206: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',
207: OE_Order_UTIL.Get_Attribute_Name('SOLD_TO_ORG_ID'));
208: OE_MSG_PUB.ADD;
209: END IF;
210:
211: IF p_header_rec.salesrep_id IS NULL
212: THEN
213: x_return_status := FND_API.G_RET_STS_ERROR;
214: FND_MESSAGE.SET_NAME('ONT','OE_BOOK_REQUIRED_ATTRIBUTE');
215: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',
216: OE_Order_UTIL.Get_Attribute_Name('SALESREP_ID'));
217: OE_MSG_PUB.ADD;
218: END IF;
219:
220: IF p_header_rec.ordered_date IS NULL
221: THEN
222: x_return_status := FND_API.G_RET_STS_ERROR;
223: FND_MESSAGE.SET_NAME('ONT','OE_BOOK_REQUIRED_ATTRIBUTE');
224: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',
225: OE_Order_UTIL.Get_Attribute_Name('ORDERED_DATE'));
226: OE_MSG_PUB.ADD;
227: END IF;
228:
229: IF p_header_rec.invoice_to_org_id IS NULL
230: THEN
231: x_return_status := FND_API.G_RET_STS_ERROR;
232: FND_MESSAGE.SET_NAME('ONT','OE_BOOK_REQUIRED_ATTRIBUTE');
233: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',
234: OE_Order_UTIL.Get_Attribute_Name('INVOICE_TO_ORG_ID'));
235: OE_MSG_PUB.ADD;
236: END IF;
237:
238: IF p_header_rec.tax_exempt_flag IS NULL
239: THEN
240: x_return_status := FND_API.G_RET_STS_ERROR;
241: FND_MESSAGE.SET_NAME('ONT','OE_BOOK_REQUIRED_ATTRIBUTE');
242: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',
243: OE_Order_UTIL.Get_Attribute_Name('TAX_EXEMPT_FLAG'));
244: OE_MSG_PUB.ADD;
245: END IF;
246:
247:
248: -- Fix bug 1262790
257: x_return_status := FND_API.G_RET_STS_ERROR;
258: FND_MESSAGE.SET_NAME('ONT','OE_BOOK_REQUIRED_ATTRIBUTE');
259: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',
260: OE_Order_UTIL.Get_Attribute_Name('SHIP_TO_ORG_ID'));
261: OE_MSG_PUB.ADD;
262: END IF;
263:
264: IF p_header_rec.payment_term_id IS NULL
265: THEN
266: x_return_status := FND_API.G_RET_STS_ERROR;
267: FND_MESSAGE.SET_NAME('ONT','OE_BOOK_REQUIRED_ATTRIBUTE');
268: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',
269: OE_Order_UTIL.Get_Attribute_Name('PAYMENT_TERM_ID'));
270: OE_MSG_PUB.ADD;
271: END IF;
272:
273: END IF;
274:
275: --key transaction dates
276: IF (OE_CODE_CONTROL.CODE_RELEASE_LEVEL >= '110509' and p_header_rec.order_firmed_date > p_header_rec.booked_date) THEN
277: x_return_status := FND_API.G_RET_STS_ERROR;
278: FND_MESSAGE.SET_NAME('ONT','ONT_ORDER_FIRMED_DATE_INVALID');
279: OE_MSG_PUB.ADD;
280: END IF;
281: --end
282:
283: -- Check for additional required fields based on flags set
292: x_return_status := FND_API.G_RET_STS_ERROR;
293: FND_MESSAGE.SET_NAME('ONT','OE_BOOK_REQUIRED_ATTRIBUTE');
294: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',
295: OE_Order_UTIL.Get_Attribute_Name('AGREEMENT_ID'));
296: OE_MSG_PUB.ADD;
297: END IF;
298:
299: IF ( l_order_type_rec.require_po_flag = 'Y' AND
300: p_header_rec.cust_po_number IS NULL)
302: x_return_status := FND_API.G_RET_STS_ERROR;
303: FND_MESSAGE.SET_NAME('ONT','OE_BOOK_REQUIRED_ATTRIBUTE');
304: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',
305: OE_Order_UTIL.Get_Attribute_Name('CUST_PO_NUMBER'));
306: OE_MSG_PUB.ADD;
307: END IF;
308:
309:
310: -- Conversion Type Related Checks
322: FND_MESSAGE.SET_NAME('ONT','OE_VAL_REQ_NON_BASE_CURRENCY');
323: FND_MESSAGE.SET_TOKEN
324: ('ORDER_CURRENCY',p_header_rec.transactional_curr_code);
325: FND_MESSAGE.SET_TOKEN('SOB_CURRENCY',l_set_of_books_rec.currency_code);
326: OE_MSG_PUB.ADD;
327: END IF;
328:
329: -- IF conversion type is 'User', conversion rate AND conversion rate date
330: -- required.
336: p_header_rec.conversion_rate_date IS NULL
337: THEN
338: x_return_status := FND_API.G_RET_STS_ERROR;
339: FND_MESSAGE.SET_NAME('ONT','OE_VAL_USER_CONVERSION_TYPE');
340: OE_MSG_PUB.ADD;
341: END IF;
342: END IF; -- END of checks based on conversion type
343:
344:
355: x_return_status := FND_API.G_RET_STS_ERROR;
356: FND_MESSAGE.SET_NAME('ONT','OE_BOOK_REQUIRED_ATTRIBUTE');
357: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',
358: OE_Order_UTIL.Get_Attribute_Name('PAYMENT_AMOUNT'));
359: OE_MSG_PUB.ADD;
360: END IF;
361:
362: -- check number required IF payment type is Check
363:
365: p_header_rec.check_number IS NULL )
366: THEN
367: x_return_status := FND_API.G_RET_STS_ERROR;
368: FND_MESSAGE.SET_NAME('ONT','OE_VAL_CHECK_NUM_REQD');
369: OE_MSG_PUB.ADD;
370: END IF;
371:
372: -- credit card holder name, number AND expiration date
373: -- required for payment type of Credit Card
381: OR p_header_rec.credit_card_expiration_date IS NULL
382: THEN
383: x_return_status := FND_API.G_RET_STS_ERROR;
384: FND_MESSAGE.SET_NAME('ONT','OE_VAL_CREDIT_CARD_REQD');
385: OE_MSG_PUB.ADD;
386: END IF;
387: END IF;
388: */
389:
393: EXCEPTION
394: WHEN OTHERS THEN
395: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
396:
397: IF OE_MSG_PUB.Check_Msg_Level (OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
398: THEN
399: OE_MSG_PUB.Add_Exc_Msg
400: ( G_PKG_NAME ,
401: 'Check_Book_Reqd_Attributes'
395: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
396:
397: IF OE_MSG_PUB.Check_Msg_Level (OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
398: THEN
399: OE_MSG_PUB.Add_Exc_Msg
400: ( G_PKG_NAME ,
401: 'Check_Book_Reqd_Attributes'
402: );
403: END IF;
448: oe_debug_pub.add('Exiting OE_VALIDATE_HEADER.Validate_Order_Type',1);
449: EXCEPTION
450: WHEN NO_DATA_FOUND THEN
451: FND_MESSAGE.SET_NAME('ONT','OE_FLOW_CNT_CHANGE');
452: OE_MSG_PUB.ADD;
453: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
454:
455: WHEN OTHERS THEN
456: IF OE_MSG_PUB.Check_Msg_Level (OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
452: OE_MSG_PUB.ADD;
453: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
454:
455: WHEN OTHERS THEN
456: IF OE_MSG_PUB.Check_Msg_Level (OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
457: THEN
458: OE_MSG_PUB.Add_Exc_Msg
459: ( G_PKG_NAME ,
460: 'Validate_Order_Type'
454:
455: WHEN OTHERS THEN
456: IF OE_MSG_PUB.Check_Msg_Level (OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
457: THEN
458: OE_MSG_PUB.Add_Exc_Msg
459: ( G_PKG_NAME ,
460: 'Validate_Order_Type'
461: );
462: END IF;
516:
517: EXCEPTION
518: WHEN NO_DATA_FOUND THEN
519: FND_MESSAGE.SET_NAME('ONT','OE_FLOW_CNT_CHANGE');
520: OE_MSG_PUB.ADD;
521: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
522:
523: WHEN OTHERS THEN
524: IF OE_MSG_PUB.Check_Msg_Level (OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
520: OE_MSG_PUB.ADD;
521: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
522:
523: WHEN OTHERS THEN
524: IF OE_MSG_PUB.Check_Msg_Level (OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
525: THEN
526: OE_MSG_PUB.Add_Exc_Msg
527: ( G_PKG_NAME ,
528: 'Validate_Commitment_Currency'
522:
523: WHEN OTHERS THEN
524: IF OE_MSG_PUB.Check_Msg_Level (OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
525: THEN
526: OE_MSG_PUB.Add_Exc_Msg
527: ( G_PKG_NAME ,
528: 'Validate_Commitment_Currency'
529: );
530: END IF;
620:
621: EXCEPTION
622: WHEN NO_DATA_FOUND THEN
623: FND_MESSAGE.SET_NAME('ONT','OE_FLOW_CNT_CHANGE');
624: OE_MSG_PUB.ADD;
625: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
626:
627: WHEN OTHERS THEN
628: IF OE_MSG_PUB.Check_Msg_Level (OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
624: OE_MSG_PUB.ADD;
625: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
626:
627: WHEN OTHERS THEN
628: IF OE_MSG_PUB.Check_Msg_Level (OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
629: THEN
630: OE_MSG_PUB.Add_Exc_Msg
631: ( G_PKG_NAME ,
632: 'Validate_Commitment_Customer'
626:
627: WHEN OTHERS THEN
628: IF OE_MSG_PUB.Check_Msg_Level (OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
629: THEN
630: OE_MSG_PUB.Add_Exc_Msg
631: ( G_PKG_NAME ,
632: 'Validate_Commitment_Customer'
633: );
634: END IF;
743: end if;
744:
745: IF p_header_rec.blanket_number IS NULL THEN
746: FND_MESSAGE.SET_NAME('ONT', 'OE_BLKT_NO_BLANKET_LINE_NUM');
747: OE_MSG_PUB.Add;
748: x_return_status := FND_API.G_RET_STS_ERROR;
749: RETURN;
750: END IF;
751:
775: WHEN NO_DATA_FOUND THEN
776: FND_MESSAGE.SET_NAME('ONT', 'OE_INVALID_ATTRIBUTE');
777: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',
778: OE_Order_Util.Get_Attribute_Name('BLANKET_NUMBER'));
779: OE_MSG_PUB.Add;
780: if l_debug_level > 0 then
781: OE_DEBUG_PUB.Add('No Data Found when Validating Blanket',3);
782: end if;
783: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
816: , x_org => l_customer_name
817: , x_customer_number => l_customer_number
818: );
819: FND_MESSAGE.SET_TOKEN('BLANKET_VALUE',l_customer_name);
820: OE_MSG_PUB.Add;
821: x_return_status := FND_API.G_RET_STS_ERROR;
822: end;
823: else
824: FND_MESSAGE.SET_NAME('ONT','OE_BLKT_INVALID_ATTRIBUTE');
830: , x_org => l_customer_name
831: , x_customer_number => l_customer_number
832: );
833: FND_MESSAGE.SET_TOKEN('BLANKET_VALUE',l_customer_name);
834: OE_MSG_PUB.Add;
835: x_return_status := FND_API.G_RET_STS_ERROR;
836: end if;
837: END IF;
838:
842: if l_debug_level > 0 then
843: OE_DEBUG_PUB.Add('Blanket order is currently on hold', 1);
844: end if;
845: FND_MESSAGE.SET_NAME('ONT', 'OE_BLKT_ON_HOLD');
846: OE_MSG_PUB.Add;
847: x_return_status := FND_API.G_RET_STS_ERROR;
848: END IF;
849:
850: IF p_header_rec.order_category_code = 'ORDER' AND
860: end if;
861: FND_MESSAGE.SET_NAME('ONT', 'OE_INVALID_ATTRIBUTE');
862: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',
863: OE_Order_Util.Get_Attribute_Name('BLANKET_NUMBER'));
864: OE_MSG_PUB.Add;
865: x_return_status := FND_API.G_RET_STS_ERROR;
866: END IF;
867:
868: --For Bug 3192386
874: end if;
875: FND_MESSAGE.SET_NAME('ONT', 'OE_INVALID_ATTRIBUTE');
876: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',
877: OE_Order_Util.Get_Attribute_Name('BLANKET_NUMBER'));
878: OE_MSG_PUB.Add;
879: x_return_status := FND_API.G_RET_STS_ERROR;
880: END IF;
881:
882: IF p_header_rec.agreement_id IS NOT NULL THEN
880: END IF;
881:
882: IF p_header_rec.agreement_id IS NOT NULL THEN
883: FND_MESSAGE.SET_NAME('ONT', 'OE_BLKT_AGREEMENT_EXISTS');
884: OE_MSG_PUB.Add;
885: x_return_status := FND_API.G_RET_STS_ERROR;
886: END IF;
887: if l_debug_level > 0 then
888: OE_DEBUG_PUB.Add('Exiting OE_VALIDATE_HEADER.Validate_Blanket_Values',1);
906: WHEN OTHERS THEN
907:
908: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
909:
910: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
911: THEN
912: OE_MSG_PUB.Add_Exc_Msg
913: ( 'OE_VALIDATE_LINE',
914: 'Validate_Blanket_Values');
908: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
909:
910: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
911: THEN
912: OE_MSG_PUB.Add_Exc_Msg
913: ( 'OE_VALIDATE_LINE',
914: 'Validate_Blanket_Values');
915: END IF;
916:
1006: IF p_header_rec.header_id IS NULL
1007: THEN
1008: l_return_status := FND_API.G_RET_STS_ERROR;
1009:
1010: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_ERROR)
1011: THEN
1012: fnd_message.set_name('ONT','OE_ATTRIBUTE_REQUIRED');
1013: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',
1014: OE_Order_UTIL.Get_Attribute_Name('HEADER_ID'));
1011: THEN
1012: fnd_message.set_name('ONT','OE_ATTRIBUTE_REQUIRED');
1013: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',
1014: OE_Order_UTIL.Get_Attribute_Name('HEADER_ID'));
1015: OE_MSG_PUB.Add;
1016: END IF;
1017:
1018: END IF;
1019:
1023: AND p_header_rec.transaction_phase_code IS NULL
1024: THEN
1025: l_return_status := FND_API.G_RET_STS_ERROR;
1026:
1027: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_ERROR)
1028: THEN
1029: fnd_message.set_name('ONT','OE_ATTRIBUTE_REQUIRED');
1030: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',
1031: OE_Order_UTIL.Get_Attribute_Name('TRANSACTION_PHASE_CODE'));
1028: THEN
1029: fnd_message.set_name('ONT','OE_ATTRIBUTE_REQUIRED');
1030: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',
1031: OE_Order_UTIL.Get_Attribute_Name('TRANSACTION_PHASE_CODE'));
1032: OE_MSG_PUB.Add;
1033: END IF;
1034:
1035: END IF;
1036:
1042: IF p_header_rec.order_type_id IS NULL
1043: THEN
1044: l_return_status := FND_API.G_RET_STS_ERROR;
1045:
1046: IF OE_MSG_PUB.Check_Msg_Level (OE_MSG_PUB.G_MSG_LVL_ERROR)
1047: THEN
1048: fnd_message.set_name('ONT','OE_ATTRIBUTE_REQUIRED');
1049: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',
1050: OE_Order_UTIL.Get_Attribute_Name('ORDER_TYPE_ID'));
1047: THEN
1048: fnd_message.set_name('ONT','OE_ATTRIBUTE_REQUIRED');
1049: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',
1050: OE_Order_UTIL.Get_Attribute_Name('ORDER_TYPE_ID'));
1051: OE_MSG_PUB.Add;
1052: END IF;
1053: ELSE
1054: Validate_Order_Type
1055: (p_order_type_id => p_header_rec.order_type_id,
1062: IF p_header_rec.transactional_curr_code IS NULL
1063: THEN
1064: l_return_status := FND_API.G_RET_STS_ERROR;
1065:
1066: IF OE_MSG_PUB.Check_Msg_Level (OE_MSG_PUB.G_MSG_LVL_ERROR)
1067: THEN
1068: fnd_message.set_name('ONT','OE_ATTRIBUTE_REQUIRED');
1069: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',
1070: OE_Order_UTIL.Get_Attribute_Name('TRANSACTIONAL_CURR_CODE'));
1067: THEN
1068: fnd_message.set_name('ONT','OE_ATTRIBUTE_REQUIRED');
1069: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',
1070: OE_Order_UTIL.Get_Attribute_Name('TRANSACTIONAL_CURR_CODE'));
1071: OE_MSG_PUB.Add;
1072: END IF;
1073:
1074: END IF;
1075:
1099:
1100: -- Feature not supported prior to 11i10, raise error
1101: IF p_header_rec.transaction_phase_code = 'N' THEN
1102: FND_MESSAGE.SET_NAME('ONT','OE_QUOTE_INVALID_RELEASE');
1103: OE_MSG_PUB.ADD;
1104: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1105: END IF;
1106:
1107: END IF;
1132: (p_header_rec.tax_exempt_reason_code IS NOT NULL AND
1133: p_header_rec.tax_exempt_reason_code <> FND_API.G_MISS_CHAR) THEN
1134: l_return_status := FND_API.G_RET_STS_ERROR;
1135:
1136: IF OE_MSG_PUB.Check_Msg_Level (OE_MSG_PUB.G_MSG_LVL_ERROR)
1137: THEN
1138: fnd_message.set_name('ONT','OE_NO_TAX_EXEMPTION');
1139: OE_MSG_PUB.Add;
1140: END IF;
1135:
1136: IF OE_MSG_PUB.Check_Msg_Level (OE_MSG_PUB.G_MSG_LVL_ERROR)
1137: THEN
1138: fnd_message.set_name('ONT','OE_NO_TAX_EXEMPTION');
1139: OE_MSG_PUB.Add;
1140: END IF;
1141: END IF;
1142:
1143: END IF;
1152: THEN
1153:
1154: l_return_status := FND_API.G_RET_STS_ERROR;
1155:
1156: IF OE_MSG_PUB.Check_Msg_Level (OE_MSG_PUB.G_MSG_LVL_ERROR)
1157: THEN
1158: fnd_message.set_name('ONT','OE_TAX_EXEMPTION_REQUIRED');
1159: OE_MSG_PUB.Add;
1160: END IF;
1155:
1156: IF OE_MSG_PUB.Check_Msg_Level (OE_MSG_PUB.G_MSG_LVL_ERROR)
1157: THEN
1158: fnd_message.set_name('ONT','OE_TAX_EXEMPTION_REQUIRED');
1159: OE_MSG_PUB.Add;
1160: END IF;
1161:
1162: END IF; */
1163:
1167: p_header_rec.tax_exempt_reason_code = FND_API.G_MISS_CHAR
1168: THEN
1169: l_return_status := FND_API.G_RET_STS_ERROR;
1170:
1171: IF OE_MSG_PUB.Check_Msg_Level (OE_MSG_PUB.G_MSG_LVL_ERROR)
1172: THEN
1173: fnd_message.set_name('ONT','OE_ATTRIBUTE_REQUIRED');
1174: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',
1175: OE_Order_UTIL.Get_Attribute_Name('TAX_EXEMPT_REASON_CODE'));
1172: THEN
1173: fnd_message.set_name('ONT','OE_ATTRIBUTE_REQUIRED');
1174: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',
1175: OE_Order_UTIL.Get_Attribute_Name('TAX_EXEMPT_REASON_CODE'));
1176: OE_MSG_PUB.Add;
1177: END IF;
1178:
1179: END IF;
1180:
1191: p_header_rec.tax_exempt_reason_code <> FND_API.G_MISS_CHAR)
1192: THEN
1193: l_return_status := FND_API.G_RET_STS_ERROR;
1194:
1195: IF OE_MSG_PUB.Check_Msg_Level (OE_MSG_PUB.G_MSG_LVL_ERROR)
1196: THEN
1197: fnd_message.set_name('ONT','OE_TAX_EXEMPTION_NOT_ALLOWED');
1198: OE_MSG_PUB.Add;
1199: END IF;
1194:
1195: IF OE_MSG_PUB.Check_Msg_Level (OE_MSG_PUB.G_MSG_LVL_ERROR)
1196: THEN
1197: fnd_message.set_name('ONT','OE_TAX_EXEMPTION_NOT_ALLOWED');
1198: OE_MSG_PUB.Add;
1199: END IF;
1200: END IF;
1201:
1202: END IF;
1221: IF p_header_rec.CHECK_NUMBER IS NULL
1222: THEN
1223: l_return_status := FND_API.G_RET_STS_ERROR;
1224:
1225: IF OE_MSG_PUB.Check_Msg_Level (OE_MSG_PUB.G_MSG_LVL_ERROR)
1226: THEN
1227: fnd_message.set_name('ONT','OE_ATTRIBUTE_REQUIRED');
1228: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',OE_Order_UTIL.Get_Attribute_Name('CHECK_NUMBER'));
1229: OE_MSG_PUB.Add;
1225: IF OE_MSG_PUB.Check_Msg_Level (OE_MSG_PUB.G_MSG_LVL_ERROR)
1226: THEN
1227: fnd_message.set_name('ONT','OE_ATTRIBUTE_REQUIRED');
1228: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',OE_Order_UTIL.Get_Attribute_Name('CHECK_NUMBER'));
1229: OE_MSG_PUB.Add;
1230: END IF;
1231: END IF;
1232: END IF;
1233:
1235: IF (p_header_rec.CREDIT_CARD_NUMBER IS NULL) or (p_header_rec.CREDIT_CARD_HOLDER_NAME IS NULL)
1236: --or (p_header_rec.CREDIT_CARD_EXPIRATION_DATE IS NULL) --commented for BUG#9436914
1237: THEN
1238: l_return_status := FND_API.G_RET_STS_ERROR;
1239: IF OE_MSG_PUB.Check_Msg_Level (OE_MSG_PUB.G_MSG_LVL_ERROR)
1240: THEN
1241: fnd_message.set_name('ONT','OE_VAL_CREDIT_CARD_REQD');
1242: --FND_MESSAGE.SET_TOKEN('ATTRIBUTE',OE_Order_UTIL.Get_Attribute_Name('CREDIT_CARD_CODE'));
1243: OE_MSG_PUB.Add;
1239: IF OE_MSG_PUB.Check_Msg_Level (OE_MSG_PUB.G_MSG_LVL_ERROR)
1240: THEN
1241: fnd_message.set_name('ONT','OE_VAL_CREDIT_CARD_REQD');
1242: --FND_MESSAGE.SET_TOKEN('ATTRIBUTE',OE_Order_UTIL.Get_Attribute_Name('CREDIT_CARD_CODE'));
1243: OE_MSG_PUB.Add;
1244: END IF;
1245: END IF;
1246: END IF;
1247: --BUG#9366518
1272: p_header_rec.transactional_curr_code,
1273: p_header_rec.pricing_date,
1274: l_validate_result);
1275: Exception when others then
1276: IF OE_MSG_PUB.Check_Msg_Level (OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1277: THEN
1278:
1279: OE_MSG_PUB.Add_Exc_Msg
1280: ( G_PKG_NAME ,
1275: Exception when others then
1276: IF OE_MSG_PUB.Check_Msg_Level (OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1277: THEN
1278:
1279: OE_MSG_PUB.Add_Exc_Msg
1280: ( G_PKG_NAME ,
1281: 'OE_VALIDATE_HEADER-QP_UTIL_PUB'
1282: );
1283: END IF;
1342: l_return_status := FND_API.G_RET_STS_ERROR;
1343: fnd_message.set_name('ONT','OE_VAL_ORD_CURRENCY_MISMATCH');
1344: FND_MESSAGE.SET_TOKEN('ORDER_CURRENCY',p_header_rec.transactional_curr_code);
1345: FND_MESSAGE.SET_TOKEN('PRICE_LIST_CURRENCY',l_price_list_rec.currency_code);
1346: OE_MSG_PUB.Add;
1347: END IF;
1348: End;
1349: END IF;
1350: END IF; -- Price list or currency changed.
1363: IF l_comt_curr_status = FND_API.G_RET_STS_ERROR THEN
1364: l_return_status := FND_API.G_RET_STS_ERROR;
1365: Fnd_Message.Set_Name('ONT','ONT_INVALID_CURR_CHANGE');
1366: Fnd_message.set_token('REASON','ONT_COMMITMENT_ON_LINE',TRUE);
1367: OE_MSG_PUB.Add;
1368: oe_debug_pub.add('Error: currency code does not match the currency for the commitment.', 3);
1369: RAISE FND_API.G_EXC_ERROR;
1370: END IF;
1371: END IF;
1380: <> FND_API.G_MISS_DATE
1381: THEN
1382: l_return_status := FND_API.G_RET_STS_ERROR;
1383: fnd_message.set_name('ONT','OE_VAL_CONVERSION_TYPE');
1384: OE_MSG_PUB.Add;
1385: END IF;
1386:
1387: END IF;
1388:
1391: p_header_rec.conversion_rate IS NOT NULL
1392: THEN
1393: l_return_status := FND_API.G_RET_STS_ERROR;
1394: FND_MESSAGE.SET_NAME('ONT','OE_VALIDATION_CONV_TYPE');
1395: OE_MSG_PUB.ADD;
1396:
1397: END IF; -- END of checks based on conversion type
1398:
1399:
1422: l_return_status := FND_API.G_RET_STS_ERROR;
1423: fnd_message.set_name('ONT','OE_INVALID_ATTRIBUTE');
1424: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',
1425: OE_Order_Util.Get_Attribute_Name('ORDER_TYPE_ID'));
1426: OE_MSG_PUB.Add;
1427:
1428: WHEN OTHERS THEN
1429:
1430: IF OE_MSG_PUB.Check_Msg_Level
1426: OE_MSG_PUB.Add;
1427:
1428: WHEN OTHERS THEN
1429:
1430: IF OE_MSG_PUB.Check_Msg_Level
1431: (OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1432: THEN
1433:
1434: OE_MSG_PUB.Add_Exc_Msg
1427:
1428: WHEN OTHERS THEN
1429:
1430: IF OE_MSG_PUB.Check_Msg_Level
1431: (OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1432: THEN
1433:
1434: OE_MSG_PUB.Add_Exc_Msg
1435: ( G_PKG_NAME ,
1430: IF OE_MSG_PUB.Check_Msg_Level
1431: (OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1432: THEN
1433:
1434: OE_MSG_PUB.Add_Exc_Msg
1435: ( G_PKG_NAME ,
1436: 'Record - Order Type'
1437: );
1438: END IF;
1523: ELSE
1524: fnd_message.set_name('ONT', 'ONT_INVALID_AGREEMENT');
1525: fnd_message.set_Token('AGREEMENT_NAME',l_agreement_name);
1526: fnd_message.set_Token('REVISION',l_agreement_revision);
1527: OE_MSG_PUB.Add;
1528: oe_debug_pub.add('Invalid Agreement ',1);
1529: raise FND_API.G_EXC_ERROR;
1530: END IF;
1531: END;
1551: fnd_message.set_Token
1552: ('AGREEMENT_NAME', l_agreement_name || sqlerrm);
1553: fnd_message.set_Token('PRICE_LIST1', p_Header_rec.price_list_id);
1554: fnd_message.set_Token('PRICE_LIST2', l_price_list_id);
1555: OE_MSG_PUB.Add;
1556: oe_debug_pub.add('Invalid Agreement +price_list_id combination',2);
1557: raise FND_API.G_EXC_ERROR;
1558: END IF;
1559: END IF;
1565: fnd_message.set_name('ONT', 'OE_INVALID_AGREEMENT');
1566: fnd_message.set_Token('AGREEMENT_ID', p_header_rec.agreement_id);
1567: fnd_message.set_Token('AGREEMENT_NAME', l_agreement_name);
1568: fnd_message.set_Token('CUSTOMER_ID', p_header_rec.sold_to_org_id);
1569: OE_MSG_PUB.Add;
1570: IF l_debug_level > 0 then
1571: oe_debug_pub.add('Invalid Agreement +sold_org_id combination',2);
1572: END IF;
1573: RAISE FND_API.G_EXC_ERROR;
1590: fnd_message.set_name('ONT', 'OE_INVALID_AGREEMENT');
1591: fnd_message.set_Token('AGREEMENT_ID', p_header_rec.agreement_id);
1592: fnd_message.set_Token('AGREEMENT_NAME', l_agreement_name);
1593: fnd_message.set_Token('CUSTOMER_ID', p_header_rec.sold_to_org_id);
1594: OE_MSG_PUB.Add;
1595: IF l_debug_level > 0 then
1596: oe_debug_pub.add('Invalid Agreement +sold_org_id combination',2);
1597: END IF;
1598: RAISE FND_API.G_EXC_ERROR;
1608: fnd_message.set_name('ONT', 'OE_INVALID_AGREEMENT_PLIST');
1609: fnd_message.set_Token('AGREEMENT_NAME', l_agreement_name);
1610: fnd_message.set_Token('PRICE_LIST1', p_Header_rec.price_list_id);
1611: fnd_message.set_Token('PRICE_LIST2', l_price_list_id || sqlerrm);
1612: OE_MSG_PUB.Add;
1613: oe_debug_pub.add
1614: ('No Data Found Agreement+price_list_id combination',2);
1615: raise FND_API.G_EXC_ERROR;
1616: END;
1625: (l_order_type_rec.agreement_type_code IS NOT NULL AND
1626: l_agreement_rec.agreement_type_code <>
1627: l_order_type_rec.agreement_type_code ) THEN
1628: l_return_status := FND_API.G_RET_STS_ERROR;
1629: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_ERROR)
1630: THEN
1631: fnd_message.set_name('ONT','OE_INVALID_AGREEMENT');
1632: OE_MSG_PUB.Add;
1633: END IF;
1628: l_return_status := FND_API.G_RET_STS_ERROR;
1629: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_ERROR)
1630: THEN
1631: fnd_message.set_name('ONT','OE_INVALID_AGREEMENT');
1632: OE_MSG_PUB.Add;
1633: END IF;
1634: END IF;
1635: ***/
1636:
1721: l_return_status := FND_API.G_RET_STS_ERROR;
1722: fnd_message.set_name('ONT','OE_INVALID_ATTRIBUTE');
1723: FND_MESSAGE.SET_TOKEN('ATTRIBUTE', OE_Order_Util.Get_Attribute_Name
1724: ('ship_to_org_id'));
1725: OE_MSG_PUB.Add;
1726:
1727: WHEN OTHERS THEN
1728:
1729: IF OE_MSG_PUB.Check_Msg_Level
1725: OE_MSG_PUB.Add;
1726:
1727: WHEN OTHERS THEN
1728:
1729: IF OE_MSG_PUB.Check_Msg_Level
1730: (OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1731: THEN
1732: OE_MSG_PUB.Add_Exc_Msg
1733: ( G_PKG_NAME ,
1726:
1727: WHEN OTHERS THEN
1728:
1729: IF OE_MSG_PUB.Check_Msg_Level
1730: (OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1731: THEN
1732: OE_MSG_PUB.Add_Exc_Msg
1733: ( G_PKG_NAME ,
1734: 'Record - Ship To'
1728:
1729: IF OE_MSG_PUB.Check_Msg_Level
1730: (OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1731: THEN
1732: OE_MSG_PUB.Add_Exc_Msg
1733: ( G_PKG_NAME ,
1734: 'Record - Ship To'
1735: );
1736: END IF;
1814: l_return_status := FND_API.G_RET_STS_ERROR;
1815: fnd_message.set_name('ONT','OE_INVALID_ATTRIBUTE');
1816: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',
1817: OE_Order_Util.Get_Attribute_Name('deliver_to_org_id'));
1818: OE_MSG_PUB.Add;
1819:
1820: WHEN OTHERS THEN
1821:
1822: IF OE_MSG_PUB.Check_Msg_Level
1818: OE_MSG_PUB.Add;
1819:
1820: WHEN OTHERS THEN
1821:
1822: IF OE_MSG_PUB.Check_Msg_Level
1823: (OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1824: THEN
1825:
1826: OE_MSG_PUB.Add_Exc_Msg
1819:
1820: WHEN OTHERS THEN
1821:
1822: IF OE_MSG_PUB.Check_Msg_Level
1823: (OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1824: THEN
1825:
1826: OE_MSG_PUB.Add_Exc_Msg
1827: ( G_PKG_NAME ,
1822: IF OE_MSG_PUB.Check_Msg_Level
1823: (OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1824: THEN
1825:
1826: OE_MSG_PUB.Add_Exc_Msg
1827: ( G_PKG_NAME ,
1828: 'Record - Deliver To'
1829: );
1830: END IF;
1898: l_return_status := FND_API.G_RET_STS_ERROR;
1899: fnd_message.set_name('ONT','OE_INVALID_ATTRIBUTE');
1900: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',
1901: OE_Order_Util.Get_Attribute_Name('invoice_to_org_id'));
1902: OE_MSG_PUB.Add;
1903:
1904: WHEN OTHERS THEN
1905:
1906: IF OE_MSG_PUB.Check_Msg_Level (OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1902: OE_MSG_PUB.Add;
1903:
1904: WHEN OTHERS THEN
1905:
1906: IF OE_MSG_PUB.Check_Msg_Level (OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1907: THEN
1908: OE_MSG_PUB.Add_Exc_Msg
1909: ( G_PKG_NAME ,
1910: 'Record - Invoice To'
1904: WHEN OTHERS THEN
1905:
1906: IF OE_MSG_PUB.Check_Msg_Level (OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1907: THEN
1908: OE_MSG_PUB.Add_Exc_Msg
1909: ( G_PKG_NAME ,
1910: 'Record - Invoice To'
1911: );
1912: END IF;
1953: l_return_status := FND_API.G_RET_STS_ERROR;
1954: fnd_message.set_name('ONT','OE_INVALID_ATTRIBUTE');
1955: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',
1956: OE_Order_Util.Get_Attribute_Name('SOLD_TO_SITE_USE_ID'));
1957: OE_MSG_PUB.Add;
1958:
1959: WHEN OTHERS THEN
1960:
1961: IF OE_MSG_PUB.Check_Msg_Level
1957: OE_MSG_PUB.Add;
1958:
1959: WHEN OTHERS THEN
1960:
1961: IF OE_MSG_PUB.Check_Msg_Level
1962: (OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1963: THEN
1964:
1965: OE_MSG_PUB.Add_Exc_Msg
1958:
1959: WHEN OTHERS THEN
1960:
1961: IF OE_MSG_PUB.Check_Msg_Level
1962: (OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1963: THEN
1964:
1965: OE_MSG_PUB.Add_Exc_Msg
1966: ( G_PKG_NAME ,
1961: IF OE_MSG_PUB.Check_Msg_Level
1962: (OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1963: THEN
1964:
1965: OE_MSG_PUB.Add_Exc_Msg
1966: ( G_PKG_NAME ,
1967: 'Record - Customer Location'
1968: );
1969: END IF;
2005: l_return_status := FND_API.G_RET_STS_ERROR;
2006: fnd_message.set_name('ONT','OE_INVALID_ATTRIBUTE');
2007: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',
2008: OE_Order_Util.Get_Attribute_Name('END_CUSTOMER_CONTACT_ID'));
2009: OE_MSG_PUB.Add;
2010:
2011: WHEN OTHERS THEN
2012: IF OE_MSG_PUB.Check_Msg_Level
2013: ( OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2008: OE_Order_Util.Get_Attribute_Name('END_CUSTOMER_CONTACT_ID'));
2009: OE_MSG_PUB.Add;
2010:
2011: WHEN OTHERS THEN
2012: IF OE_MSG_PUB.Check_Msg_Level
2013: ( OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2014: THEN
2015: OE_MSG_PUB.Add_Exc_Msg
2016: ( G_PKG_NAME ,
2009: OE_MSG_PUB.Add;
2010:
2011: WHEN OTHERS THEN
2012: IF OE_MSG_PUB.Check_Msg_Level
2013: ( OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2014: THEN
2015: OE_MSG_PUB.Add_Exc_Msg
2016: ( G_PKG_NAME ,
2017: 'Record - End Customer Contact'
2011: WHEN OTHERS THEN
2012: IF OE_MSG_PUB.Check_Msg_Level
2013: ( OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2014: THEN
2015: OE_MSG_PUB.Add_Exc_Msg
2016: ( G_PKG_NAME ,
2017: 'Record - End Customer Contact'
2018: );
2019: END IF;
2053: l_return_status := FND_API.G_RET_STS_ERROR;
2054: fnd_message.set_name('ONT','OE_INVALID_ATTRIBUTE');
2055: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',
2056: OE_Order_Util.Get_Attribute_Name('END_CUSTOMER_SITE_USE_ID'));
2057: OE_MSG_PUB.Add;
2058:
2059: WHEN OTHERS THEN
2060: IF OE_MSG_PUB.Check_Msg_Level
2061: ( OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2056: OE_Order_Util.Get_Attribute_Name('END_CUSTOMER_SITE_USE_ID'));
2057: OE_MSG_PUB.Add;
2058:
2059: WHEN OTHERS THEN
2060: IF OE_MSG_PUB.Check_Msg_Level
2061: ( OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2062: THEN
2063: OE_MSG_PUB.Add_Exc_Msg
2064: ( G_PKG_NAME ,
2057: OE_MSG_PUB.Add;
2058:
2059: WHEN OTHERS THEN
2060: IF OE_MSG_PUB.Check_Msg_Level
2061: ( OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2062: THEN
2063: OE_MSG_PUB.Add_Exc_Msg
2064: ( G_PKG_NAME ,
2065: 'Record - End Customer Site'
2059: WHEN OTHERS THEN
2060: IF OE_MSG_PUB.Check_Msg_Level
2061: ( OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2062: THEN
2063: OE_MSG_PUB.Add_Exc_Msg
2064: ( G_PKG_NAME ,
2065: 'Record - End Customer Site'
2066: );
2067: END IF;
2103: l_return_status := FND_API.G_RET_STS_ERROR;
2104: fnd_message.set_name('ONT','OE_INVALID_ATTRIBUTE');
2105: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',
2106: OE_Order_Util.Get_Attribute_Name('SOLD_TO_CONTACT_ID'));
2107: OE_MSG_PUB.Add;
2108:
2109: WHEN OTHERS THEN
2110: IF OE_MSG_PUB.Check_Msg_Level
2111: ( OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2106: OE_Order_Util.Get_Attribute_Name('SOLD_TO_CONTACT_ID'));
2107: OE_MSG_PUB.Add;
2108:
2109: WHEN OTHERS THEN
2110: IF OE_MSG_PUB.Check_Msg_Level
2111: ( OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2112: THEN
2113: OE_MSG_PUB.Add_Exc_Msg
2114: ( G_PKG_NAME ,
2107: OE_MSG_PUB.Add;
2108:
2109: WHEN OTHERS THEN
2110: IF OE_MSG_PUB.Check_Msg_Level
2111: ( OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2112: THEN
2113: OE_MSG_PUB.Add_Exc_Msg
2114: ( G_PKG_NAME ,
2115: 'Record - Sold To Contact'
2109: WHEN OTHERS THEN
2110: IF OE_MSG_PUB.Check_Msg_Level
2111: ( OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2112: THEN
2113: OE_MSG_PUB.Add_Exc_Msg
2114: ( G_PKG_NAME ,
2115: 'Record - Sold To Contact'
2116: );
2117: END IF;
2160: l_return_status := FND_API.G_RET_STS_ERROR;
2161: fnd_message.set_name('ONT','OE_INVALID_ATTRIBUTE');
2162: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',
2163: OE_Order_Util.Get_Attribute_Name('INVOICE_TO_CONTACT_ID'));
2164: OE_MSG_PUB.Add;
2165:
2166:
2167: WHEN OTHERS THEN
2168:
2165:
2166:
2167: WHEN OTHERS THEN
2168:
2169: IF OE_MSG_PUB.Check_Msg_Level
2170: (OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2171: THEN
2172:
2173: OE_MSG_PUB.Add_Exc_Msg
2166:
2167: WHEN OTHERS THEN
2168:
2169: IF OE_MSG_PUB.Check_Msg_Level
2170: (OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2171: THEN
2172:
2173: OE_MSG_PUB.Add_Exc_Msg
2174: ( G_PKG_NAME ,
2169: IF OE_MSG_PUB.Check_Msg_Level
2170: (OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2171: THEN
2172:
2173: OE_MSG_PUB.Add_Exc_Msg
2174: ( G_PKG_NAME ,
2175: 'Record - Invoice To Contact'
2176: );
2177: END IF;
2220: l_return_status := FND_API.G_RET_STS_ERROR;
2221: fnd_message.set_name('ONT','OE_INVALID_ATTRIBUTE');
2222: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',
2223: OE_Order_Util.Get_Attribute_Name('SHIP_TO_CONTACT_ID'));
2224: OE_MSG_PUB.Add;
2225:
2226:
2227: WHEN OTHERS THEN
2228:
2225:
2226:
2227: WHEN OTHERS THEN
2228:
2229: IF OE_MSG_PUB.Check_Msg_Level
2230: (OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2231: THEN
2232:
2233: OE_MSG_PUB.Add_Exc_Msg
2226:
2227: WHEN OTHERS THEN
2228:
2229: IF OE_MSG_PUB.Check_Msg_Level
2230: (OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2231: THEN
2232:
2233: OE_MSG_PUB.Add_Exc_Msg
2234: ( G_PKG_NAME ,
2229: IF OE_MSG_PUB.Check_Msg_Level
2230: (OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2231: THEN
2232:
2233: OE_MSG_PUB.Add_Exc_Msg
2234: ( G_PKG_NAME ,
2235: 'Record - Ship To Contact'
2236: );
2237: END IF;
2280: l_return_status := FND_API.G_RET_STS_ERROR;
2281: fnd_message.set_name('ONT','OE_INVALID_ATTRIBUTE');
2282: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',
2283: OE_Order_Util.Get_Attribute_Name('DELIVER_TO_CONTACT_ID'));
2284: OE_MSG_PUB.Add;
2285:
2286: WHEN OTHERS THEN
2287:
2288: IF OE_MSG_PUB.Check_Msg_Level (
2284: OE_MSG_PUB.Add;
2285:
2286: WHEN OTHERS THEN
2287:
2288: IF OE_MSG_PUB.Check_Msg_Level (
2289: OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2290: THEN
2291: OE_MSG_PUB.Add_Exc_Msg
2292: ( G_PKG_NAME ,
2285:
2286: WHEN OTHERS THEN
2287:
2288: IF OE_MSG_PUB.Check_Msg_Level (
2289: OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2290: THEN
2291: OE_MSG_PUB.Add_Exc_Msg
2292: ( G_PKG_NAME ,
2293: 'Record - Deliver To Contact'
2287:
2288: IF OE_MSG_PUB.Check_Msg_Level (
2289: OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2290: THEN
2291: OE_MSG_PUB.Add_Exc_Msg
2292: ( G_PKG_NAME ,
2293: 'Record - Deliver To Contact'
2294: );
2295: END IF;
2412: l_return_status := FND_API.G_RET_STS_ERROR;
2413: fnd_message.set_name('ONT','OE_INVALID_ATTRIBUTE');
2414: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',
2415: OE_Order_Util.Get_Attribute_Name('TAX_EXEMPT_NUMBER'));
2416: OE_MSG_PUB.Add;
2417: END IF;
2418:
2419: WHEN OTHERS THEN
2420:
2417: END IF;
2418:
2419: WHEN OTHERS THEN
2420:
2421: IF OE_MSG_PUB.Check_Msg_Level (OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2422: THEN
2423:
2424: OE_MSG_PUB.Add_Exc_Msg
2425: ( G_PKG_NAME ,
2420:
2421: IF OE_MSG_PUB.Check_Msg_Level (OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2422: THEN
2423:
2424: OE_MSG_PUB.Add_Exc_Msg
2425: ( G_PKG_NAME ,
2426: 'Record - Tax Exempt Number'
2427: );
2428: END IF;
2454: ,p_header_rec.sold_to_org_id
2455: ,p_header_rec.header_id )
2456: THEN
2457: FND_MESSAGE.SET_NAME('ONT','OE_VAL_DUP_PO_NUMBER');
2458: OE_MSG_PUB.ADD;
2459: END IF;
2460:
2461: END IF;
2462: -- End of check for duplicate PO number
2497: END;
2498:
2499: Fnd_Message.Set_Name('ONT','ONT_COM_CUSTOMER_MISMATCH');
2500: Fnd_message.set_token('CUSTOMER',l_customer_name);
2501: OE_MSG_PUB.Add;
2502: oe_debug_pub.add('Error: customer of the order does not match the customer for the commitment.', 3);
2503: RAISE FND_API.G_EXC_ERROR;
2504: END IF;
2505: END IF;
2515: OE_DEBUG_PUB.Add('Blankets are only available in Pack I or greater',1);
2516: End if;
2517: l_return_status := FND_API.G_RET_STS_ERROR;
2518: FND_MESSAGE.Set_Name('ONT','OE_BLANKET_INVALID_VERSION');
2519: OE_MSG_PUB.Add;
2520: ELSE
2521: IF p_header_rec.blanket_number IS NOT NULL THEN
2522: Validate_Blanket_Values
2523: (p_header_rec => p_header_rec,
2566: if l_payment_count > 1 then
2567: l_return_status := FND_API.G_RET_STS_ERROR;
2568:
2569: fnd_message.Set_Name('ONT','ONT_MULTIPLE_PAYMENTS_EXIST');
2570: OE_MSG_PUB.Add;
2571: oe_debug_pub.add('Error: multiple payments exist. cannot update order header',3);
2572:
2573: end if;
2574:
2590: THEN
2591: l_return_status := FND_API.G_RET_STS_ERROR;
2592: fnd_message.set_name('ONT','OE_INVALID_ATTRIBUTE');
2593: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',OE_Order_UTIL.Get_attribute_name('IB_OWNER'));
2594: OE_MSG_PUB.Add;
2595: ELSIF p_header_rec.ib_owner = 'END_CUSTOMER' AND
2596: p_header_rec.end_customer_id is null
2597: THEN
2598: l_return_status := FND_API.G_RET_STS_ERROR;
2597: THEN
2598: l_return_status := FND_API.G_RET_STS_ERROR;
2599: fnd_message.set_name('ONT','OE_INVALID_ATTRIBUTE');
2600: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',OE_Order_UTIL.Get_attribute_name('IB_OWNER'));
2601: OE_MSG_PUB.Add;
2602: END IF;
2603: END IF;
2604: oe_debug_pub.ADD('ib_installed_at_location: '||p_header_rec.ib_installed_at_location);
2605:
2618: THEN
2619: l_return_status := FND_API.G_RET_STS_ERROR;
2620: fnd_message.set_name('ONT','OE_INVALID_ATTRIBUTE');
2621: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',OE_Order_UTIL.Get_attribute_name('IB_INSTALLED_AT_LOCATION'));
2622: OE_MSG_PUB.Add;
2623: ELSIF p_header_rec.ib_installed_at_location = 'SHIP_TO' AND
2624: p_header_rec.ship_to_org_id is null
2625: THEN
2626: l_return_status := FND_API.G_RET_STS_ERROR;
2625: THEN
2626: l_return_status := FND_API.G_RET_STS_ERROR;
2627: fnd_message.set_name('ONT','OE_INVALID_ATTRIBUTE');
2628: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',OE_Order_UTIL.Get_attribute_name('IB_INSTALLED_AT_LOCATION'));
2629: OE_MSG_PUB.Add;
2630: ELSIF p_header_rec.ib_installed_at_location = 'DELIVER_TO' AND
2631: p_header_rec.deliver_to_org_id is null
2632: THEN
2633: l_return_status := FND_API.G_RET_STS_ERROR;
2632: THEN
2633: l_return_status := FND_API.G_RET_STS_ERROR;
2634: fnd_message.set_name('ONT','OE_INVALID_ATTRIBUTE');
2635: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',OE_Order_UTIL.Get_attribute_name('IB_INSTALLED_AT_LOCATION'));
2636: OE_MSG_PUB.Add;
2637: ELSIF p_header_rec.ib_installed_at_location = 'END_CUSTOMER' AND
2638: p_header_rec.end_customer_site_use_id is null
2639: THEN
2640: l_return_status := FND_API.G_RET_STS_ERROR;
2639: THEN
2640: l_return_status := FND_API.G_RET_STS_ERROR;
2641: fnd_message.set_name('ONT','OE_INVALID_ATTRIBUTE');
2642: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',OE_Order_UTIL.Get_attribute_name('IB_INSTALLED_AT_LOCATION'));
2643: OE_MSG_PUB.Add;
2644: ELSIF p_header_rec.ib_installed_at_location = 'SOLD_TO' AND
2645: p_header_rec.sold_to_site_use_id is null
2646: THEN
2647: l_return_status := FND_API.G_RET_STS_ERROR;
2646: THEN
2647: l_return_status := FND_API.G_RET_STS_ERROR;
2648: fnd_message.set_name('ONT','OE_INVALID_ATTRIBUTE');
2649: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',OE_Order_UTIL.Get_attribute_name('IB_INSTALLED_AT_LOCATION'));
2650: OE_MSG_PUB.Add;
2651: END IF;
2652: END IF;
2653: oe_debug_pub.ADD('ib_current_location: '||p_header_rec.ib_current_location);
2654:
2667: THEN
2668: l_return_status := FND_API.G_RET_STS_ERROR;
2669: fnd_message.set_name('ONT','OE_INVALID_ATTRIBUTE');
2670: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',OE_Order_UTIL.Get_attribute_name('IB_CURRENT_LOCATION'));
2671: OE_MSG_PUB.Add;
2672: ELSIF p_header_rec.ib_current_location = 'SHIP_TO' AND
2673: p_header_rec.ship_to_org_id is null
2674: THEN
2675: l_return_status := FND_API.G_RET_STS_ERROR;
2674: THEN
2675: l_return_status := FND_API.G_RET_STS_ERROR;
2676: fnd_message.set_name('ONT','OE_INVALID_ATTRIBUTE');
2677: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',OE_Order_UTIL.Get_attribute_name('IB_CURRENT_LOCATION'));
2678: OE_MSG_PUB.Add;
2679: ELSIF p_header_rec.ib_current_location = 'DELIVER_TO' AND
2680: p_header_rec.deliver_to_org_id is null
2681: THEN
2682: l_return_status := FND_API.G_RET_STS_ERROR;
2681: THEN
2682: l_return_status := FND_API.G_RET_STS_ERROR;
2683: fnd_message.set_name('ONT','OE_INVALID_ATTRIBUTE');
2684: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',OE_Order_UTIL.Get_attribute_name('IB_CURRENT_LOCATION'));
2685: OE_MSG_PUB.Add;
2686: ELSIF p_header_rec.ib_current_location = 'END_CUSTOMER' AND
2687: p_header_rec.end_customer_site_use_id is null
2688: THEN
2689: l_return_status := FND_API.G_RET_STS_ERROR;
2688: THEN
2689: l_return_status := FND_API.G_RET_STS_ERROR;
2690: fnd_message.set_name('ONT','OE_INVALID_ATTRIBUTE');
2691: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',OE_Order_UTIL.Get_attribute_name('IB_CURRENT_LOCATION'));
2692: OE_MSG_PUB.Add;
2693: ELSIF p_header_rec.ib_current_location = 'SOLD_TO' AND
2694: p_header_rec.sold_to_site_use_id is null
2695: THEN
2696: l_return_status := FND_API.G_RET_STS_ERROR;
2695: THEN
2696: l_return_status := FND_API.G_RET_STS_ERROR;
2697: fnd_message.set_name('ONT','OE_INVALID_ATTRIBUTE');
2698: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',OE_Order_UTIL.Get_attribute_name('IB_CURRENT_LOCATION'));
2699: OE_MSG_PUB.Add;
2700: END IF;
2701: END IF;
2702:
2703: -- IB Validation START
2722: end if;
2723: l_return_status := FND_API.G_RET_STS_ERROR;
2724: fnd_message.set_name('ONT','OE_INVALID_ATTRIBUTE');
2725: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',OE_Order_UTIL.Get_attribute_name('IB_CURRENT_LOCATION'));
2726: OE_MSG_PUB.Add;
2727: elsif l.ib_installed_at_location='SOLD_TO'
2728: then
2729: If l_debug_level > 0 THEN
2730: oe_debug_pub.add('>line_id:'||l.line_id||' has ib_installed_at_location as SOLD_TO');
2731: end if;
2732: l_return_status := FND_API.G_RET_STS_ERROR;
2733: fnd_message.set_name('ONT','OE_INVALID_ATTRIBUTE');
2734: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',OE_Order_UTIL.Get_attribute_name('IB_INSTALLED_AT_LOCATION'));
2735: OE_MSG_PUB.Add;
2736: end if;
2737: end loop;
2738: end if;
2739: If l_debug_level > 0 THEN
2745: IF p_header_rec.payment_type_code = 'CREDIT_CARD' THEN
2746: IF p_header_rec.invoice_to_org_id is NULL THEN
2747: l_return_status := FND_API.G_RET_STS_ERROR;
2748: FND_MESSAGE.SET_NAME('ONT','OE_VPM_INV_TO_REQUIRED');
2749: OE_MSG_PUB.ADD;
2750: END IF;
2751: END IF;
2752: --R12 CC Encryption
2753: /*
2750: END IF;
2751: END IF;
2752: --R12 CC Encryption
2753: /*
2754: OE_MSG_PUB.ADD;
2755: ELSIF p_header_rec.credit_card_number is NULL THEN
2756: l_return_status := FND_API.G_RET_STS_ERROR;
2757: FND_MESSAGE.SET_NAME('ONT','OE_VPM_CC_NUM_REQUIRED');
2758: OE_MSG_PUB.ADD;
2754: OE_MSG_PUB.ADD;
2755: ELSIF p_header_rec.credit_card_number is NULL THEN
2756: l_return_status := FND_API.G_RET_STS_ERROR;
2757: FND_MESSAGE.SET_NAME('ONT','OE_VPM_CC_NUM_REQUIRED');
2758: OE_MSG_PUB.ADD;
2759: ELSIF p_header_rec.credit_card_expiration_date is NULL THEN
2760: l_return_status := FND_API.G_RET_STS_ERROR;
2761: FND_MESSAGE.SET_NAME('ONT','OE_VPM_CC_EXP_DT_REQUIRED');
2762: OE_MSG_PUB.ADD;
2758: OE_MSG_PUB.ADD;
2759: ELSIF p_header_rec.credit_card_expiration_date is NULL THEN
2760: l_return_status := FND_API.G_RET_STS_ERROR;
2761: FND_MESSAGE.SET_NAME('ONT','OE_VPM_CC_EXP_DT_REQUIRED');
2762: OE_MSG_PUB.ADD;
2763: ELSIF p_header_rec.credit_card_holder_name is NULL THEN
2764: l_return_status := FND_API.G_RET_STS_ERROR;
2765: FND_MESSAGE.SET_NAME('ONT','OE_VPM_CC_HOLDER_REQUIRED');
2766: OE_MSG_PUB.ADD;
2762: OE_MSG_PUB.ADD;
2763: ELSIF p_header_rec.credit_card_holder_name is NULL THEN
2764: l_return_status := FND_API.G_RET_STS_ERROR;
2765: FND_MESSAGE.SET_NAME('ONT','OE_VPM_CC_HOLDER_REQUIRED');
2766: OE_MSG_PUB.ADD;
2767: END IF;
2768: END IF;*/
2769:
2770: -- Done validating entity
2782:
2783: WHEN OTHERS THEN
2784: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2785:
2786: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2787: THEN
2788: OE_MSG_PUB.Add_Exc_Msg
2789: ( G_PKG_NAME
2790: , 'Entity'
2784: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2785:
2786: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2787: THEN
2788: OE_MSG_PUB.Add_Exc_Msg
2789: ( G_PKG_NAME
2790: , 'Entity'
2791: );
2792: END IF;
3730: END;
3731: IF nvl(l_auth_exist,'N') = 'N' THEN
3732: --Bug# 16099743 End
3733: FND_MESSAGE.SET_NAME('ONT','OE_CC_SECURITY_CODE_REQD');
3734: OE_MSG_PUB.ADD;
3735: x_return_status := FND_API.G_RET_STS_ERROR;
3736: END IF; --Bug# 16099743
3737: END IF;
3738: END IF;
5149:
5150: WHEN OTHERS THEN
5151: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5152:
5153: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
5154: THEN
5155: OE_MSG_PUB.Add_Exc_Msg
5156: ( G_PKG_NAME
5157: ,'Attributes'
5151: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5152:
5153: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
5154: THEN
5155: OE_MSG_PUB.Add_Exc_Msg
5156: ( G_PKG_NAME
5157: ,'Attributes'
5158: );
5159: END IF;
5191:
5192: WHEN OTHERS THEN
5193: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5194:
5195: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
5196: THEN
5197: OE_MSG_PUB.Add_Exc_Msg
5198: ( G_PKG_NAME
5199: ,'Entity_Delete'
5193: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5194:
5195: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
5196: THEN
5197: OE_MSG_PUB.Add_Exc_Msg
5198: ( G_PKG_NAME
5199: ,'Entity_Delete'
5200: );
5201: END IF;