30: THEN
31:
32: l_return_status := FND_API.G_RET_STS_ERROR;
33:
34: IF oe_msg_pub.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
35: THEN
36:
37: FND_MESSAGE.SET_NAME('ONT','OE_ATTRIBUTE_REQUIRED');
38: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','payment');
35: THEN
36:
37: FND_MESSAGE.SET_NAME('ONT','OE_ATTRIBUTE_REQUIRED');
38: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','payment');
39: oe_msg_pub.Add;
40:
41: END IF;
42:
43: END IF;
46: THEN
47:
48: l_return_status := FND_API.G_RET_STS_ERROR;
49:
50: IF oe_msg_pub.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
51: THEN
52:
53: FND_MESSAGE.SET_NAME('ONT','OE_ATTRIBUTE_REQUIRED');
54: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','payment type code');
51: THEN
52:
53: FND_MESSAGE.SET_NAME('ONT','OE_ATTRIBUTE_REQUIRED');
54: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','payment type code');
55: oe_msg_pub.Add;
56:
57: END IF;
58:
59: END IF;
64: IF p_Header_Payment_rec.receipt_method_id is null THEN
65:
66: l_return_status := FND_API.G_RET_STS_ERROR;
67:
68: IF oe_msg_pub.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
69: THEN
70:
71: FND_MESSAGE.SET_NAME('ONT','OE_ATTRIBUTE_REQUIRED');
72: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','Receipt Method');
69: THEN
70:
71: FND_MESSAGE.SET_NAME('ONT','OE_ATTRIBUTE_REQUIRED');
72: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','Receipt Method');
73: oe_msg_pub.Add;
74:
75: END IF;
76:
77: END IF;
81: IF p_Header_Payment_rec.payment_amount is null THEN
82:
83: l_return_status := FND_API.G_RET_STS_ERROR;
84:
85: IF oe_msg_pub.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
86: THEN
87:
88: FND_MESSAGE.SET_NAME('ONT','OE_ATTRIBUTE_REQUIRED');
89: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','payment amount');
86: THEN
87:
88: FND_MESSAGE.SET_NAME('ONT','OE_ATTRIBUTE_REQUIRED');
89: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','payment amount');
90: oe_msg_pub.Add;
91:
92: END IF;
93:
94: END IF;
96: IF p_Header_Payment_rec.payment_amount < 0 THEN
97:
98: l_return_status := FND_API.G_RET_STS_ERROR;
99:
100: IF oe_msg_pub.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
101: THEN
102:
103: FND_MESSAGE.SET_NAME('ONT','ONT_NO_NEGTIVE_PAYMENT_AMOUNT');
104: oe_msg_pub.Add;
100: IF oe_msg_pub.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
101: THEN
102:
103: FND_MESSAGE.SET_NAME('ONT','ONT_NO_NEGTIVE_PAYMENT_AMOUNT');
104: oe_msg_pub.Add;
105:
106: END IF;
107:
108: END IF;
140: > OE_OE_TOTALS_SUMMARY.Outbound_Order_Total(p_Header_Payment_rec.header_id) THEN
141:
142: l_return_status := FND_API.G_RET_STS_ERROR;
143:
144: IF oe_msg_pub.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
145: THEN
146:
147: FND_MESSAGE.SET_NAME('ONT','ONT_PREPAYMENT_PERCENT');
148: oe_msg_pub.Add;
144: IF oe_msg_pub.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
145: THEN
146:
147: FND_MESSAGE.SET_NAME('ONT','ONT_PREPAYMENT_PERCENT');
148: oe_msg_pub.Add;
149:
150: END IF;
151:
152: END IF;
162: and payment_type_code <> 'COMMITMENT';
163:
164: if l_line_payment_count > 0 then
165:
166: IF oe_msg_pub.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
167: THEN
168: fnd_message.set_name('ONT', 'ONT_LINE_PAYMENTS_EXIST');
169: oe_msg_pub.add;
170: END IF;
165:
166: IF oe_msg_pub.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
167: THEN
168: fnd_message.set_name('ONT', 'ONT_LINE_PAYMENTS_EXIST');
169: oe_msg_pub.add;
170: END IF;
171:
172: l_return_status := FND_API.G_RET_STS_ERROR;
173:
182: THEN
183:
184: l_return_status := FND_API.G_RET_STS_ERROR;
185:
186: IF oe_msg_pub.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
187: THEN
188:
189: FND_MESSAGE.SET_NAME('ONT','OE_ATTRIBUTE_REQUIRED');
190: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','HEADER');
187: THEN
188:
189: FND_MESSAGE.SET_NAME('ONT','OE_ATTRIBUTE_REQUIRED');
190: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','HEADER');
191: oe_msg_pub.Add;
192:
193: END IF;
194:
195: END IF;
200: --bug 5176015
201: /*IF p_Header_Payment_rec.credit_card_number IS NULL THEN
202: l_return_status := FND_API.G_RET_STS_ERROR;
203:
204: IF oe_msg_pub.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
205: THEN
206:
207: FND_MESSAGE.SET_NAME('ONT','OE_ATTRIBUTE_REQUIRED');
208: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','CREDIT_CARD_NUMBER');
205: THEN
206:
207: FND_MESSAGE.SET_NAME('ONT','OE_ATTRIBUTE_REQUIRED');
208: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','CREDIT_CARD_NUMBER');
209: oe_msg_pub.Add;
210:
211: END IF;
212: ELSIF p_Header_Payment_rec.credit_card_holder_name IS NULL THEN
213: l_return_status := FND_API.G_RET_STS_ERROR;
211: END IF;
212: ELSIF p_Header_Payment_rec.credit_card_holder_name IS NULL THEN
213: l_return_status := FND_API.G_RET_STS_ERROR;
214:
215: IF oe_msg_pub.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
216: THEN
217:
218: FND_MESSAGE.SET_NAME('ONT','OE_ATTRIBUTE_REQUIRED');
219: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','CREDIT_CARD_HOLDER_NAME');
216: THEN
217:
218: FND_MESSAGE.SET_NAME('ONT','OE_ATTRIBUTE_REQUIRED');
219: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','CREDIT_CARD_HOLDER_NAME');
220: oe_msg_pub.Add;
221:
222: END IF;
223: ELSIF p_Header_Payment_rec.credit_card_expiration_date IS NULL THEN
224: l_return_status := FND_API.G_RET_STS_ERROR;
222: END IF;
223: ELSIF p_Header_Payment_rec.credit_card_expiration_date IS NULL THEN
224: l_return_status := FND_API.G_RET_STS_ERROR;
225:
226: IF oe_msg_pub.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
227: THEN
228:
229: FND_MESSAGE.SET_NAME('ONT','OE_ATTRIBUTE_REQUIRED');
230: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','CREDIT_CARD_EXPIRATION_DATE');
227: THEN
228:
229: FND_MESSAGE.SET_NAME('ONT','OE_ATTRIBUTE_REQUIRED');
230: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','CREDIT_CARD_EXPIRATION_DATE');
231: oe_msg_pub.Add;
232:
233: END IF;
234:
235: END IF;*/
246: End;
247: oe_debug_pub.add('Invoice to org id'||l_invoice_to_org_id);
248: IF l_invoice_to_org_id IS NULL THEN
249: l_return_status := FND_API.G_RET_STS_ERROR;
250: IF oe_msg_pub.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
251: THEN
252: FND_MESSAGE.SET_NAME('ONT', 'OE_VPM_INV_TO_REQUIRED');
253: oe_msg_pub.Add;
254: END IF;
249: l_return_status := FND_API.G_RET_STS_ERROR;
250: IF oe_msg_pub.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
251: THEN
252: FND_MESSAGE.SET_NAME('ONT', 'OE_VPM_INV_TO_REQUIRED');
253: oe_msg_pub.Add;
254: END IF;
255: END IF;
256: --R12 CC Encryption
257: END IF;
261:
262: IF p_Header_Payment_rec.check_number IS NULL THEN
263: l_return_status := FND_API.G_RET_STS_ERROR;
264:
265: IF oe_msg_pub.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
266: THEN
267:
268: FND_MESSAGE.SET_NAME('ONT','OE_ATTRIBUTE_REQUIRED');
269: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','CHECK_NUMBER');
266: THEN
267:
268: FND_MESSAGE.SET_NAME('ONT','OE_ATTRIBUTE_REQUIRED');
269: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','CHECK_NUMBER');
270: oe_msg_pub.Add;
271:
272: END IF;
273: END IF;
274: /* comment out for R12
277:
278: IF p_Header_Payment_rec.payment_trx_id IS NULL THEN
279: l_return_status := FND_API.G_RET_STS_ERROR;
280:
281: IF oe_msg_pub.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
282: THEN
283:
284: FND_MESSAGE.SET_NAME('ONT','OE_ATTRIBUTE_REQUIRED');
285: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','Bank Account ID');
282: THEN
283:
284: FND_MESSAGE.SET_NAME('ONT','OE_ATTRIBUTE_REQUIRED');
285: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','Bank Account ID');
286: oe_msg_pub.Add;
287:
288: END IF;
289: END IF;
290: */
295:
296: IF p_Header_Payment_rec.receipt_method_id IS NULL THEN
297: l_return_status := FND_API.G_RET_STS_ERROR;
298:
299: IF oe_msg_pub.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
300: THEN
301:
302: FND_MESSAGE.SET_NAME('ONT','OE_ATTRIBUTE_REQUIRED');
303: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','Receipt Method');
300: THEN
301:
302: FND_MESSAGE.SET_NAME('ONT','OE_ATTRIBUTE_REQUIRED');
303: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','Receipt Method');
304: oe_msg_pub.Add;
305:
306: END IF;
307: END IF;
308:
324:
325: IF l_count > 0 THEN
326: l_return_status := FND_API.G_RET_STS_ERROR;
327:
328: IF oe_msg_pub.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
329: THEN
330:
331: FND_MESSAGE.SET_NAME('ONT','ONT_INVOICE_PAYMENT_INSTRUMENT');
332: oe_msg_pub.Add;
328: IF oe_msg_pub.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
329: THEN
330:
331: FND_MESSAGE.SET_NAME('ONT','ONT_INVOICE_PAYMENT_INSTRUMENT');
332: oe_msg_pub.Add;
333:
334: END IF;
335: END IF;
336: ELSIF p_Header_Payment_rec.payment_type_code = 'WIRE_TRANSFER' AND
339: -- wire transfer is not supported for prepayment
340:
341: l_return_status := FND_API.G_RET_STS_ERROR;
342:
343: IF oe_msg_pub.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
344: THEN
345: -- Wire Transfer is not supported for prepayments.
346: FND_MESSAGE.SET_NAME('ONT','ONT_NO_WIRE_FOR_PREPAY');
347: oe_msg_pub.Add;
343: IF oe_msg_pub.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
344: THEN
345: -- Wire Transfer is not supported for prepayments.
346: FND_MESSAGE.SET_NAME('ONT','ONT_NO_WIRE_FOR_PREPAY');
347: oe_msg_pub.Add;
348:
349: END IF;
350:
351: END IF;
385: WHEN OTHERS THEN
386:
387: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
388:
389: IF oe_msg_pub.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
390: THEN
391: oe_msg_pub.Add_Exc_Msg
392: ( G_PKG_NAME
393: , 'Entity'
387: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
388:
389: IF oe_msg_pub.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
390: THEN
391: oe_msg_pub.Add_Exc_Msg
392: ( G_PKG_NAME
393: , 'Entity'
394: );
395: END IF;
544: IF l_cc_security_code_use = 'REQUIRED' THEN
545: IF p_Header_Payment_rec.instrument_security_code IS NULL OR
546: p_Header_Payment_rec.instrument_security_code = FND_API.G_MISS_CHAR THEN --bug 4613168, issue 22
547: FND_MESSAGE.SET_NAME('ONT','OE_CC_SECURITY_CODE_REQD');
548: OE_MSG_PUB.ADD;
549: x_return_status := FND_API.G_RET_STS_ERROR;
550: END IF;
551: END IF;
552: END IF;
657: and line_id is not null;
658:
659: if l_line_payment_count > 0 then
660: fnd_message.set_name('ONT', 'ONT_LINE_PAYMENTS_EXIST');
661: oe_msg_pub.add;
662: x_return_status := FND_API.G_RET_STS_ERROR;
663: end if;
664:
665: END IF;
884: WHEN OTHERS THEN
885:
886: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
887:
888: IF oe_msg_pub.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
889: THEN
890: oe_msg_pub.Add_Exc_Msg
891: ( G_PKG_NAME
892: , 'Attributes'
886: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
887:
888: IF oe_msg_pub.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
889: THEN
890: oe_msg_pub.Add_Exc_Msg
891: ( G_PKG_NAME
892: , 'Attributes'
893: );
894: END IF;
926: WHEN OTHERS THEN
927:
928: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
929:
930: IF oe_msg_pub.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
931: THEN
932: oe_msg_pub.Add_Exc_Msg
933: ( G_PKG_NAME
934: , 'Entity_Delete'
928: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
929:
930: IF oe_msg_pub.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
931: THEN
932: oe_msg_pub.Add_Exc_Msg
933: ( G_PKG_NAME
934: , 'Entity_Delete'
935: );
936: END IF;