121: OPEN csr_cust_name(l_cust_account_id);
122: FETCH csr_cust_name INTO l_cust_name_num;
123: CLOSE csr_cust_name;
124:
125: FND_MESSAGE.Set_Name('OZF', 'OZF_CLAIM_ATPY_CURRENCY_MISS');
126: FND_MESSAGE.Set_Token('ID',l_cust_name_num);
127: FND_MSG_PUB.ADD;
128: END IF;
129: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
122: FETCH csr_cust_name INTO l_cust_name_num;
123: CLOSE csr_cust_name;
124:
125: FND_MESSAGE.Set_Name('OZF', 'OZF_CLAIM_ATPY_CURRENCY_MISS');
126: FND_MESSAGE.Set_Token('ID',l_cust_name_num);
127: FND_MSG_PUB.ADD;
128: END IF;
129: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
130: END IF;
134: OPEN csr_cust_name(l_cust_account_id);
135: FETCH csr_cust_name INTO l_cust_name_num;
136: CLOSE csr_cust_name;
137:
138: FND_MESSAGE.Set_Name('OZF', 'OZF_CLAIM_ATPY_PYMTHD_MISS');
139: FND_MESSAGE.Set_Token('ID',l_cust_name_num);
140: FND_MSG_PUB.ADD;
141: END IF;
142: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
135: FETCH csr_cust_name INTO l_cust_name_num;
136: CLOSE csr_cust_name;
137:
138: FND_MESSAGE.Set_Name('OZF', 'OZF_CLAIM_ATPY_PYMTHD_MISS');
139: FND_MESSAGE.Set_Token('ID',l_cust_name_num);
140: FND_MSG_PUB.ADD;
141: END IF;
142: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
143: END IF;
149: OPEN csr_cust_name(l_cust_account_id);
150: FETCH csr_cust_name INTO l_cust_name_num;
151: CLOSE csr_cust_name;
152:
153: FND_MESSAGE.Set_Name('OZF', 'OZF_CLAIM_ATPY_VENDOR_MISS');
154: FND_MESSAGE.Set_Token('ID',l_cust_name_num);
155: FND_MSG_PUB.ADD;
156: END IF;
157: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
150: FETCH csr_cust_name INTO l_cust_name_num;
151: CLOSE csr_cust_name;
152:
153: FND_MESSAGE.Set_Name('OZF', 'OZF_CLAIM_ATPY_VENDOR_MISS');
154: FND_MESSAGE.Set_Token('ID',l_cust_name_num);
155: FND_MSG_PUB.ADD;
156: END IF;
157: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
158: END IF;
162: OPEN csr_cust_name(l_cust_account_id);
163: FETCH csr_cust_name INTO l_cust_name_num;
164: CLOSE csr_cust_name;
165:
166: FND_MESSAGE.Set_Name('OZF', 'OZF_CLAIM_ATPY_SITEID_MISS');
167: FND_MESSAGE.Set_Token('ID',l_cust_name_num);
168: FND_MSG_PUB.ADD;
169: END IF;
170: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
163: FETCH csr_cust_name INTO l_cust_name_num;
164: CLOSE csr_cust_name;
165:
166: FND_MESSAGE.Set_Name('OZF', 'OZF_CLAIM_ATPY_SITEID_MISS');
167: FND_MESSAGE.Set_Token('ID',l_cust_name_num);
168: FND_MSG_PUB.ADD;
169: END IF;
170: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
171: END IF;
177: OPEN csr_cust_name(l_cust_account_id);
178: FETCH csr_cust_name INTO l_cust_name_num;
179: CLOSE csr_cust_name;
180:
181: FND_MESSAGE.Set_Name('OZF', 'OZF_CLAIM_ATPY_ORG_ID_MISS');
182: FND_MESSAGE.Set_Token('ID',l_cust_name_num);
183: FND_MSG_PUB.add;
184: END IF;FND_MSG_PUB.ADD;
185: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
178: FETCH csr_cust_name INTO l_cust_name_num;
179: CLOSE csr_cust_name;
180:
181: FND_MESSAGE.Set_Name('OZF', 'OZF_CLAIM_ATPY_ORG_ID_MISS');
182: FND_MESSAGE.Set_Token('ID',l_cust_name_num);
183: FND_MSG_PUB.add;
184: END IF;FND_MSG_PUB.ADD;
185: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
186: END IF;
189: EXCEPTION
190: WHEN OTHERS THEN
191: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
192: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
193: FND_MESSAGE.set_name('OZF', 'OZF_CLAIM_ATPY_CUSTOMER_ERR');
194: FND_MSG_PUB.add;
195: END IF;
196: END validate_customer_info;
197:
238: ELSIF p_type = G_ANNUAL THEN
239: l_return_date := add_months(p_last_date, p_period*12);
240: ELSE
241: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
242: FND_MESSAGE.set_name('OZF', 'OZF_CLAIM_ATPY_AUPD_MISS');
243: FND_MSG_PUB.add;
244: END IF;
245: RAISE FND_API.G_EXC_ERROR;
246: END IF;
367: OPEN csr_cust_name(p_customer_info.cust_account_id);
368: FETCH csr_cust_name INTO l_cust_name_num;
369: CLOSE csr_cust_name;
370:
371: FND_MESSAGE.Set_Name('OZF', 'OZF_CLAIM_ATPY_PERIOD_MISS');
372: FND_MESSAGE.Set_Token('ID', l_cust_name_num);
373: FND_MSG_PUB.ADD;
374: END IF;
375: RAISE FND_API.g_exc_unexpected_error;
368: FETCH csr_cust_name INTO l_cust_name_num;
369: CLOSE csr_cust_name;
370:
371: FND_MESSAGE.Set_Name('OZF', 'OZF_CLAIM_ATPY_PERIOD_MISS');
372: FND_MESSAGE.Set_Token('ID', l_cust_name_num);
373: FND_MSG_PUB.ADD;
374: END IF;
375: RAISE FND_API.g_exc_unexpected_error;
376: --goto end_loop;
397: OPEN csr_cust_name(p_customer_info.cust_account_id);
398: FETCH csr_cust_name INTO l_cust_name_num;
399: CLOSE csr_cust_name;
400:
401: FND_MESSAGE.Set_Name('OZF', 'OZF_CLAIM_ATPY_PAY_DATE_MISS');
402: FND_MESSAGE.Set_Token('ID', l_cust_name_num);
403: FND_MSG_PUB.ADD;
404: END IF;
405: RAISE FND_API.g_exc_unexpected_error;
398: FETCH csr_cust_name INTO l_cust_name_num;
399: CLOSE csr_cust_name;
400:
401: FND_MESSAGE.Set_Name('OZF', 'OZF_CLAIM_ATPY_PAY_DATE_MISS');
402: FND_MESSAGE.Set_Token('ID', l_cust_name_num);
403: FND_MSG_PUB.ADD;
404: END IF;
405: RAISE FND_API.g_exc_unexpected_error;
406: END IF;
515: OPEN csr_cust_name(p_customer_info.cust_account_id);
516: FETCH csr_cust_name INTO l_cust_name_num;
517: CLOSE csr_cust_name;
518:
519: FND_MESSAGE.Set_Name('OZF', 'OZF_CLAIM_ATPY_CUST_INELIG');
520: FND_MESSAGE.Set_Token('ID', l_cust_name_num);
521: FND_MSG_PUB.ADD;
522: END IF;
523: RAISE FND_API.g_exc_unexpected_error;
516: FETCH csr_cust_name INTO l_cust_name_num;
517: CLOSE csr_cust_name;
518:
519: FND_MESSAGE.Set_Name('OZF', 'OZF_CLAIM_ATPY_CUST_INELIG');
520: FND_MESSAGE.Set_Token('ID', l_cust_name_num);
521: FND_MSG_PUB.ADD;
522: END IF;
523: RAISE FND_API.g_exc_unexpected_error;
524: END IF;
527: OPEN csr_cust_name(p_customer_info.cust_account_id);
528: FETCH csr_cust_name INTO l_cust_name_num;
529: CLOSE csr_cust_name;
530:
531: FND_MESSAGE.Set_Name('OZF', 'OZF_CLAIM_ATPY_AMT_SMALL');
532: FND_MESSAGE.Set_Token('ID', l_cust_name_num);
533: FND_MSG_PUB.ADD;
534: END IF;
535: RAISE FND_API.g_exc_unexpected_error;
528: FETCH csr_cust_name INTO l_cust_name_num;
529: CLOSE csr_cust_name;
530:
531: FND_MESSAGE.Set_Name('OZF', 'OZF_CLAIM_ATPY_AMT_SMALL');
532: FND_MESSAGE.Set_Token('ID', l_cust_name_num);
533: FND_MSG_PUB.ADD;
534: END IF;
535: RAISE FND_API.g_exc_unexpected_error;
536: END IF;
619: SAVEPOINT BDOffer;
620:
621: -- Debug Message
622: IF OZF_DEBUG_LOW_ON THEN
623: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
624: FND_MESSAGE.Set_Token('TEXT',l_full_name||': Start');
625: FND_MSG_PUB.Add;
626: END IF;
627:
620:
621: -- Debug Message
622: IF OZF_DEBUG_LOW_ON THEN
623: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
624: FND_MESSAGE.Set_Token('TEXT',l_full_name||': Start');
625: FND_MSG_PUB.Add;
626: END IF;
627:
628: -- get autopay_flag, reason_code_id
636:
637: -- check reason_code and claim_type from sys_parameters.
638: IF l_auto_reason_code_id is NULL THEN
639: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
640: FND_MESSAGE.set_name('OZF', 'OZF_CLAIM_REASON_CD_MISSING');
641: FND_MSG_PUB.add;
642: END IF;
643: RAISE FND_API.g_exc_unexpected_error;
644: END IF;
644: END IF;
645:
646: IF l_auto_claim_type_id is NULL THEN
647: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
648: FND_MESSAGE.set_name('OZF', 'OZF_CLAIM_CLAIM_TYPE_MISSING');
649: FND_MSG_PUB.add;
650: END IF;
651: RAISE FND_API.g_exc_unexpected_error;
652: END IF;
700: END LOOP;
701:
702: -- Debug Message
703: IF OZF_DEBUG_LOW_ON THEN
704: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
705: FND_MESSAGE.Set_Token('TEXT',l_full_name||': End');
706: FND_MSG_PUB.Add;
707: END IF;
708:
701:
702: -- Debug Message
703: IF OZF_DEBUG_LOW_ON THEN
704: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
705: FND_MESSAGE.Set_Token('TEXT',l_full_name||': End');
706: FND_MSG_PUB.Add;
707: END IF;
708:
709: EXCEPTION
928: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, '*---------------------------------------------------------------------------------------------*');
929:
930: -- Debug Message
931: IF OZF_DEBUG_LOW_ON THEN
932: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
933: FND_MESSAGE.Set_Token('TEXT',l_full_name||': Start');
934: FND_MSG_PUB.Add;
935: END IF;
936:
929:
930: -- Debug Message
931: IF OZF_DEBUG_LOW_ON THEN
932: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
933: FND_MESSAGE.Set_Token('TEXT',l_full_name||': Start');
934: FND_MSG_PUB.Add;
935: END IF;
936:
937: --Multiorg Changes
1073:
1074: -- check reason_code and claim_type from sys_parameters.
1075: IF l_auto_reason_code_id is NULL THEN
1076: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
1077: FND_MESSAGE.set_name('OZF', 'OZF_CLAIM_REASON_CD_MISSING');
1078: FND_MSG_PUB.add;
1079: END IF;
1080: RAISE FND_API.g_exc_unexpected_error;
1081: END IF;
1081: END IF;
1082:
1083: IF l_auto_claim_type_id is NULL THEN
1084: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
1085: FND_MESSAGE.set_name('OZF', 'OZF_CLAIM_CLAIM_TYPE_MISSING');
1086: FND_MSG_PUB.add;
1087: END IF;
1088: RAISE FND_API.g_exc_unexpected_error;
1089: END IF;
1394: WHEN OTHERS THEN
1395: ROLLBACK TO AUTOPAY_CUST;
1396: FND_FILE.PUT_LINE(FND_FILE.LOG, '===> Failed.');
1397: IF OZF_DEBUG_LOW_ON THEN
1398: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
1399: FND_MESSAGE.Set_Token('TEXT',sqlerrm);
1400: FND_MSG_PUB.Add;
1401: END IF;
1402: OZF_UTILITY_PVT.write_conc_log;
1395: ROLLBACK TO AUTOPAY_CUST;
1396: FND_FILE.PUT_LINE(FND_FILE.LOG, '===> Failed.');
1397: IF OZF_DEBUG_LOW_ON THEN
1398: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
1399: FND_MESSAGE.Set_Token('TEXT',sqlerrm);
1400: FND_MSG_PUB.Add;
1401: END IF;
1402: OZF_UTILITY_PVT.write_conc_log;
1403: FND_FILE.PUT_LINE(FND_FILE.LOG, '/*--- End ---*/');
1422:
1423:
1424: -- Debug Message
1425: IF OZF_DEBUG_LOW_ON THEN
1426: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
1427: FND_MESSAGE.Set_Token('TEXT',l_full_name||': End');
1428: FND_MSG_PUB.Add;
1429: END IF;
1430:
1423:
1424: -- Debug Message
1425: IF OZF_DEBUG_LOW_ON THEN
1426: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
1427: FND_MESSAGE.Set_Token('TEXT',l_full_name||': End');
1428: FND_MSG_PUB.Add;
1429: END IF;
1430:
1431: -- Write all messages to a log