407: print_debuginfo(l_module_name, 'Loop thru external payee ' || counter);
408:
409: IF p_ext_payee_tab(counter).Payee_Party_Id IS NULL THEN
410: print_debuginfo(l_module_name,'Payee party Id is null.');
411: FND_MESSAGE.set_name('IBY', 'IBY_MISSING_MANDATORY_PARAM');
412: FND_MESSAGE.SET_TOKEN('PARAM', 'Payee party Id');
413: l_message := fnd_message.get;
414: FND_MSG_PUB.Add;
415:
408:
409: IF p_ext_payee_tab(counter).Payee_Party_Id IS NULL THEN
410: print_debuginfo(l_module_name,'Payee party Id is null.');
411: FND_MESSAGE.set_name('IBY', 'IBY_MISSING_MANDATORY_PARAM');
412: FND_MESSAGE.SET_TOKEN('PARAM', 'Payee party Id');
413: l_message := fnd_message.get;
414: FND_MSG_PUB.Add;
415:
416: l_ext_payee_id_rec.Ext_Payee_ID := -1;
409: IF p_ext_payee_tab(counter).Payee_Party_Id IS NULL THEN
410: print_debuginfo(l_module_name,'Payee party Id is null.');
411: FND_MESSAGE.set_name('IBY', 'IBY_MISSING_MANDATORY_PARAM');
412: FND_MESSAGE.SET_TOKEN('PARAM', 'Payee party Id');
413: l_message := fnd_message.get;
414: FND_MSG_PUB.Add;
415:
416: l_ext_payee_id_rec.Ext_Payee_ID := -1;
417: l_ext_payee_crt_rec.Payee_Creation_Status := 'E';
420: x_return_status := FND_API.G_RET_STS_ERROR;
421: -- RAISE FND_API.G_EXC_ERROR;
422: ELSIF (p_ext_payee_tab(counter).Payment_Function IS NULL) THEN
423: print_debuginfo(l_module_name,'Payment function is null.');
424: FND_MESSAGE.set_name('IBY', 'IBY_MISSING_MANDATORY_PARAM');
425: FND_MESSAGE.SET_TOKEN('PARAM', 'Payment function');
426: l_message := fnd_message.get;
427: FND_MSG_PUB.Add;
428:
421: -- RAISE FND_API.G_EXC_ERROR;
422: ELSIF (p_ext_payee_tab(counter).Payment_Function IS NULL) THEN
423: print_debuginfo(l_module_name,'Payment function is null.');
424: FND_MESSAGE.set_name('IBY', 'IBY_MISSING_MANDATORY_PARAM');
425: FND_MESSAGE.SET_TOKEN('PARAM', 'Payment function');
426: l_message := fnd_message.get;
427: FND_MSG_PUB.Add;
428:
429: l_ext_payee_id_rec.Ext_Payee_ID := -1;
422: ELSIF (p_ext_payee_tab(counter).Payment_Function IS NULL) THEN
423: print_debuginfo(l_module_name,'Payment function is null.');
424: FND_MESSAGE.set_name('IBY', 'IBY_MISSING_MANDATORY_PARAM');
425: FND_MESSAGE.SET_TOKEN('PARAM', 'Payment function');
426: l_message := fnd_message.get;
427: FND_MSG_PUB.Add;
428:
429: l_ext_payee_id_rec.Ext_Payee_ID := -1;
430: l_ext_payee_crt_rec.Payee_Creation_Status := 'E';
435: -- orgid is required if supplier site id passed
436: ELSIF ((p_ext_payee_tab(counter).Payer_ORG_ID IS NULL) and
437: (p_ext_payee_tab(counter).Supplier_Site_Id IS NOT NULL)) THEN
438: print_debuginfo(l_module_name,'Payer Org Id is null.');
439: FND_MESSAGE.set_name('IBY', 'IBY_MISSING_MANDATORY_PARAM');
440: FND_MESSAGE.SET_TOKEN('PARAM', 'Payer Org Id');
441: l_message := fnd_message.get;
442: FND_MSG_PUB.Add;
443:
436: ELSIF ((p_ext_payee_tab(counter).Payer_ORG_ID IS NULL) and
437: (p_ext_payee_tab(counter).Supplier_Site_Id IS NOT NULL)) THEN
438: print_debuginfo(l_module_name,'Payer Org Id is null.');
439: FND_MESSAGE.set_name('IBY', 'IBY_MISSING_MANDATORY_PARAM');
440: FND_MESSAGE.SET_TOKEN('PARAM', 'Payer Org Id');
441: l_message := fnd_message.get;
442: FND_MSG_PUB.Add;
443:
444: l_ext_payee_id_rec.Ext_Payee_ID := -1;
437: (p_ext_payee_tab(counter).Supplier_Site_Id IS NOT NULL)) THEN
438: print_debuginfo(l_module_name,'Payer Org Id is null.');
439: FND_MESSAGE.set_name('IBY', 'IBY_MISSING_MANDATORY_PARAM');
440: FND_MESSAGE.SET_TOKEN('PARAM', 'Payer Org Id');
441: l_message := fnd_message.get;
442: FND_MSG_PUB.Add;
443:
444: l_ext_payee_id_rec.Ext_Payee_ID := -1;
445: l_ext_payee_crt_rec.Payee_Creation_Status := 'E';
447:
448: ELSIF ((p_ext_payee_tab(counter).Payer_ORG_ID IS NOT NULL) and
449: (p_ext_payee_tab(counter).Payer_Org_Type IS NULL)) THEN
450: print_debuginfo(l_module_name,'Payer Org Id is null.');
451: FND_MESSAGE.set_name('IBY', 'IBY_MISSING_MANDATORY_PARAM');
452: FND_MESSAGE.SET_TOKEN('PARAM', 'Payer Org Type');
453: l_message := fnd_message.get;
454: FND_MSG_PUB.Add;
455:
448: ELSIF ((p_ext_payee_tab(counter).Payer_ORG_ID IS NOT NULL) and
449: (p_ext_payee_tab(counter).Payer_Org_Type IS NULL)) THEN
450: print_debuginfo(l_module_name,'Payer Org Id is null.');
451: FND_MESSAGE.set_name('IBY', 'IBY_MISSING_MANDATORY_PARAM');
452: FND_MESSAGE.SET_TOKEN('PARAM', 'Payer Org Type');
453: l_message := fnd_message.get;
454: FND_MSG_PUB.Add;
455:
456: l_ext_payee_id_rec.Ext_Payee_ID := -1;
449: (p_ext_payee_tab(counter).Payer_Org_Type IS NULL)) THEN
450: print_debuginfo(l_module_name,'Payer Org Id is null.');
451: FND_MESSAGE.set_name('IBY', 'IBY_MISSING_MANDATORY_PARAM');
452: FND_MESSAGE.SET_TOKEN('PARAM', 'Payer Org Type');
453: l_message := fnd_message.get;
454: FND_MSG_PUB.Add;
455:
456: l_ext_payee_id_rec.Ext_Payee_ID := -1;
457: l_ext_payee_crt_rec.Payee_Creation_Status := 'E';
460:
461: ELSIF ((p_ext_payee_tab(counter).Payer_Org_Type IS NOT NULL) and
462: (p_ext_payee_tab(counter).Payer_ORG_ID IS NULL)) THEN
463: print_debuginfo(l_module_name,'Payer Org Id is null but Org_type is not null.');
464: FND_MESSAGE.set_name('IBY', 'IBY_MISSING_MANDATORY_PARAM');
465: FND_MESSAGE.SET_TOKEN('PARAM', 'Payer Org Id');
466: l_message := fnd_message.get;
467: FND_MSG_PUB.Add;
468:
461: ELSIF ((p_ext_payee_tab(counter).Payer_Org_Type IS NOT NULL) and
462: (p_ext_payee_tab(counter).Payer_ORG_ID IS NULL)) THEN
463: print_debuginfo(l_module_name,'Payer Org Id is null but Org_type is not null.');
464: FND_MESSAGE.set_name('IBY', 'IBY_MISSING_MANDATORY_PARAM');
465: FND_MESSAGE.SET_TOKEN('PARAM', 'Payer Org Id');
466: l_message := fnd_message.get;
467: FND_MSG_PUB.Add;
468:
469: l_ext_payee_id_rec.Ext_Payee_ID := -1;
462: (p_ext_payee_tab(counter).Payer_ORG_ID IS NULL)) THEN
463: print_debuginfo(l_module_name,'Payer Org Id is null but Org_type is not null.');
464: FND_MESSAGE.set_name('IBY', 'IBY_MISSING_MANDATORY_PARAM');
465: FND_MESSAGE.SET_TOKEN('PARAM', 'Payer Org Id');
466: l_message := fnd_message.get;
467: FND_MSG_PUB.Add;
468:
469: l_ext_payee_id_rec.Ext_Payee_ID := -1;
470: l_ext_payee_crt_rec.Payee_Creation_Status := 'E';
471: l_ext_payee_crt_rec.Payee_Creation_Msg := l_message;
472:
473: ELSIF p_ext_payee_tab(counter).Exclusive_Pay_Flag IS NULL THEN
474: print_debuginfo(l_module_name,'Exclusive payment flag is null.');
475: FND_MESSAGE.set_name('IBY', 'IBY_MISSING_MANDATORY_PARAM');
476: FND_MESSAGE.SET_TOKEN('PARAM', 'Exclusive payment flag');
477: l_message := fnd_message.get;
478: FND_MSG_PUB.Add;
479:
472:
473: ELSIF p_ext_payee_tab(counter).Exclusive_Pay_Flag IS NULL THEN
474: print_debuginfo(l_module_name,'Exclusive payment flag is null.');
475: FND_MESSAGE.set_name('IBY', 'IBY_MISSING_MANDATORY_PARAM');
476: FND_MESSAGE.SET_TOKEN('PARAM', 'Exclusive payment flag');
477: l_message := fnd_message.get;
478: FND_MSG_PUB.Add;
479:
480: l_ext_payee_id_rec.Ext_Payee_ID := -1;
473: ELSIF p_ext_payee_tab(counter).Exclusive_Pay_Flag IS NULL THEN
474: print_debuginfo(l_module_name,'Exclusive payment flag is null.');
475: FND_MESSAGE.set_name('IBY', 'IBY_MISSING_MANDATORY_PARAM');
476: FND_MESSAGE.SET_TOKEN('PARAM', 'Exclusive payment flag');
477: l_message := fnd_message.get;
478: FND_MSG_PUB.Add;
479:
480: l_ext_payee_id_rec.Ext_Payee_ID := -1;
481: l_ext_payee_crt_rec.Payee_Creation_Status := 'E';
557: ELSIF l_payee_cnt > 0 THEN
558: l_ext_payee_id_rec.Ext_Payee_ID := -1;
559: l_ext_payee_crt_rec.Payee_Creation_Status := 'W';
560:
561: FND_MESSAGE.set_name('IBY', 'IBY_DUPLICATE_EXT_PAYEE');
562: l_message := fnd_message.get;
563: l_ext_payee_crt_rec.Payee_Creation_Msg := l_message;
564:
565: -- x_return_status := FND_API.G_RET_STS_SUCCESS;
558: l_ext_payee_id_rec.Ext_Payee_ID := -1;
559: l_ext_payee_crt_rec.Payee_Creation_Status := 'W';
560:
561: FND_MESSAGE.set_name('IBY', 'IBY_DUPLICATE_EXT_PAYEE');
562: l_message := fnd_message.get;
563: l_ext_payee_crt_rec.Payee_Creation_Msg := l_message;
564:
565: -- x_return_status := FND_API.G_RET_STS_SUCCESS;
566: END IF;
690: THEN
691: iby_debug_pub.add(debug_msg => 'Incorrect API Version:=' || p_api_version,
692: debug_level => FND_LOG.LEVEL_ERROR,
693: module => G_DEBUG_MODULE || l_module);
694: FND_MESSAGE.SET_NAME('IBY', 'IBY_204400_API_VER_MISMATCH');
695: FND_MSG_PUB.Add;
696: RAISE FND_API.G_EXC_ERROR;
697: END IF;
698:
964: THEN
965: iby_debug_pub.add(debug_msg => 'Incorrect API Version:=' || p_api_version,
966: debug_level => FND_LOG.LEVEL_ERROR,
967: module => G_DEBUG_MODULE || l_module);
968: FND_MESSAGE.SET_NAME('IBY', 'IBY_204400_API_VER_MISMATCH');
969: FND_MSG_PUB.Add;
970: RAISE FND_API.G_EXC_ERROR;
971: END IF;
972:
1097: THEN
1098: iby_debug_pub.add(debug_msg => 'Incorrect API Version:=' || p_api_version,
1099: debug_level => FND_LOG.LEVEL_ERROR,
1100: module => G_DEBUG_MODULE || l_module);
1101: FND_MESSAGE.SET_NAME('IBY', 'IBY_204400_API_VER_MISMATCH');
1102: FND_MSG_PUB.Add;
1103: RAISE FND_API.G_EXC_ERROR;
1104: END IF;
1105:
1186: FETCH lookup_csr INTO l_count;
1187: CLOSE lookup_csr;
1188:
1189: IF (l_count = 0) THEN
1190: FND_MESSAGE.set_name('IBY', 'IBY_LOOKUP_VAL_ERROR');
1191: FND_MESSAGE.SET_TOKEN('LOOKUPTYPE', p_loopkup_type);
1192: FND_MESSAGE.SET_TOKEN('VALUE', p_value);
1193: FND_MSG_PUB.Add;
1194: RETURN FALSE;
1187: CLOSE lookup_csr;
1188:
1189: IF (l_count = 0) THEN
1190: FND_MESSAGE.set_name('IBY', 'IBY_LOOKUP_VAL_ERROR');
1191: FND_MESSAGE.SET_TOKEN('LOOKUPTYPE', p_loopkup_type);
1192: FND_MESSAGE.SET_TOKEN('VALUE', p_value);
1193: FND_MSG_PUB.Add;
1194: RETURN FALSE;
1195: ELSE
1188:
1189: IF (l_count = 0) THEN
1190: FND_MESSAGE.set_name('IBY', 'IBY_LOOKUP_VAL_ERROR');
1191: FND_MESSAGE.SET_TOKEN('LOOKUPTYPE', p_loopkup_type);
1192: FND_MESSAGE.SET_TOKEN('VALUE', p_value);
1193: FND_MSG_PUB.Add;
1194: RETURN FALSE;
1195: ELSE
1196: RETURN TRUE;
1331: FETCH pmt_mthds_csr INTO l_count;
1332: CLOSE pmt_mthds_csr;
1333:
1334: IF (l_count = 0) THEN
1335: FND_MESSAGE.set_name('IBY', 'IBY_TABLE_VAL_ERROR');
1336: FND_MESSAGE.SET_TOKEN('TABLE', 'IBY_PAYMENT_METHODS_V');
1337: FND_MESSAGE.SET_TOKEN('VALUE', p_ext_payee_rec.Default_Pmt_method);
1338: FND_MSG_PUB.Add;
1339: l_valid := FALSE;
1332: CLOSE pmt_mthds_csr;
1333:
1334: IF (l_count = 0) THEN
1335: FND_MESSAGE.set_name('IBY', 'IBY_TABLE_VAL_ERROR');
1336: FND_MESSAGE.SET_TOKEN('TABLE', 'IBY_PAYMENT_METHODS_V');
1337: FND_MESSAGE.SET_TOKEN('VALUE', p_ext_payee_rec.Default_Pmt_method);
1338: FND_MSG_PUB.Add;
1339: l_valid := FALSE;
1340: END IF;
1333:
1334: IF (l_count = 0) THEN
1335: FND_MESSAGE.set_name('IBY', 'IBY_TABLE_VAL_ERROR');
1336: FND_MESSAGE.SET_TOKEN('TABLE', 'IBY_PAYMENT_METHODS_V');
1337: FND_MESSAGE.SET_TOKEN('VALUE', p_ext_payee_rec.Default_Pmt_method);
1338: FND_MSG_PUB.Add;
1339: l_valid := FALSE;
1340: END IF;
1341: END IF;
1357: FETCH pmt_reasons_csr INTO l_count;
1358: CLOSE pmt_reasons_csr;
1359:
1360: IF (l_count = 0) THEN
1361: FND_MESSAGE.set_name('IBY', 'IBY_TABLE_VAL_ERROR');
1362: FND_MESSAGE.SET_TOKEN('TABLE', 'IBY_PAYMENT_REASONS_VL');
1363: FND_MESSAGE.SET_TOKEN('VALUE', p_ext_payee_rec.Pay_Reason_Code);
1364: FND_MSG_PUB.Add;
1365: l_valid := FALSE;
1358: CLOSE pmt_reasons_csr;
1359:
1360: IF (l_count = 0) THEN
1361: FND_MESSAGE.set_name('IBY', 'IBY_TABLE_VAL_ERROR');
1362: FND_MESSAGE.SET_TOKEN('TABLE', 'IBY_PAYMENT_REASONS_VL');
1363: FND_MESSAGE.SET_TOKEN('VALUE', p_ext_payee_rec.Pay_Reason_Code);
1364: FND_MSG_PUB.Add;
1365: l_valid := FALSE;
1366: END IF;
1359:
1360: IF (l_count = 0) THEN
1361: FND_MESSAGE.set_name('IBY', 'IBY_TABLE_VAL_ERROR');
1362: FND_MESSAGE.SET_TOKEN('TABLE', 'IBY_PAYMENT_REASONS_VL');
1363: FND_MESSAGE.SET_TOKEN('VALUE', p_ext_payee_rec.Pay_Reason_Code);
1364: FND_MSG_PUB.Add;
1365: l_valid := FALSE;
1366: END IF;
1367: END IF;
1373: FETCH dlv_channels_csr INTO l_count;
1374: CLOSE dlv_channels_csr;
1375:
1376: IF (l_count = 0) THEN
1377: FND_MESSAGE.set_name('IBY', 'IBY_TABLE_VAL_ERROR');
1378: FND_MESSAGE.SET_TOKEN('TABLE', 'IBY_DELIVERY_CHANNELS_VL');
1379: FND_MESSAGE.SET_TOKEN('VALUE', p_ext_payee_rec.Delivery_Channel);
1380: FND_MSG_PUB.Add;
1381: l_valid := FALSE;
1374: CLOSE dlv_channels_csr;
1375:
1376: IF (l_count = 0) THEN
1377: FND_MESSAGE.set_name('IBY', 'IBY_TABLE_VAL_ERROR');
1378: FND_MESSAGE.SET_TOKEN('TABLE', 'IBY_DELIVERY_CHANNELS_VL');
1379: FND_MESSAGE.SET_TOKEN('VALUE', p_ext_payee_rec.Delivery_Channel);
1380: FND_MSG_PUB.Add;
1381: l_valid := FALSE;
1382: END IF;
1375:
1376: IF (l_count = 0) THEN
1377: FND_MESSAGE.set_name('IBY', 'IBY_TABLE_VAL_ERROR');
1378: FND_MESSAGE.SET_TOKEN('TABLE', 'IBY_DELIVERY_CHANNELS_VL');
1379: FND_MESSAGE.SET_TOKEN('VALUE', p_ext_payee_rec.Delivery_Channel);
1380: FND_MSG_PUB.Add;
1381: l_valid := FALSE;
1382: END IF;
1383: END IF;
1389: FETCH payment_formats_csr INTO l_count;
1390: CLOSE payment_formats_csr;
1391:
1392: IF (l_count = 0) THEN
1393: FND_MESSAGE.set_name('IBY', 'IBY_TABLE_VAL_ERROR');
1394: FND_MESSAGE.SET_TOKEN('TABLE', 'IBY_FORMATS_VL');
1395: FND_MESSAGE.SET_TOKEN('VALUE', p_ext_payee_rec.Pmt_Format);
1396: FND_MSG_PUB.Add;
1397: l_valid := FALSE;
1390: CLOSE payment_formats_csr;
1391:
1392: IF (l_count = 0) THEN
1393: FND_MESSAGE.set_name('IBY', 'IBY_TABLE_VAL_ERROR');
1394: FND_MESSAGE.SET_TOKEN('TABLE', 'IBY_FORMATS_VL');
1395: FND_MESSAGE.SET_TOKEN('VALUE', p_ext_payee_rec.Pmt_Format);
1396: FND_MSG_PUB.Add;
1397: l_valid := FALSE;
1398: END IF;
1391:
1392: IF (l_count = 0) THEN
1393: FND_MESSAGE.set_name('IBY', 'IBY_TABLE_VAL_ERROR');
1394: FND_MESSAGE.SET_TOKEN('TABLE', 'IBY_FORMATS_VL');
1395: FND_MESSAGE.SET_TOKEN('VALUE', p_ext_payee_rec.Pmt_Format);
1396: FND_MSG_PUB.Add;
1397: l_valid := FALSE;
1398: END IF;
1399: END IF;
1438:
1439: WHEN OTHERS THEN
1440: ROLLBACK TO Validate_External_Payee_pub;
1441: x_return_status := fnd_api.g_ret_sts_unexp_error;
1442: fnd_message.set_name('IBY', 'IBY_API_OTHERS_EXCEP');
1443: fnd_message.set_token('ERROR',SQLERRM);
1444: fnd_msg_pub.add;
1445: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
1446: p_count => x_msg_count,
1439: WHEN OTHERS THEN
1440: ROLLBACK TO Validate_External_Payee_pub;
1441: x_return_status := fnd_api.g_ret_sts_unexp_error;
1442: fnd_message.set_name('IBY', 'IBY_API_OTHERS_EXCEP');
1443: fnd_message.set_token('ERROR',SQLERRM);
1444: fnd_msg_pub.add;
1445: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
1446: p_count => x_msg_count,
1447: p_data => x_msg_data);
1657:
1658: WHEN OTHERS THEN
1659: ROLLBACK TO Create_Temp_Ext_Bank_Acct_pub;
1660: x_return_status := fnd_api.g_ret_sts_unexp_error;
1661: fnd_message.set_name('IBY', 'IBY_API_OTHERS_EXCEP');
1662: fnd_message.set_token('ERROR',SQLERRM);
1663: fnd_msg_pub.add;
1664: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
1665: p_count => x_msg_count,
1658: WHEN OTHERS THEN
1659: ROLLBACK TO Create_Temp_Ext_Bank_Acct_pub;
1660: x_return_status := fnd_api.g_ret_sts_unexp_error;
1661: fnd_message.set_name('IBY', 'IBY_API_OTHERS_EXCEP');
1662: fnd_message.set_token('ERROR',SQLERRM);
1663: fnd_msg_pub.add;
1664: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
1665: p_count => x_msg_count,
1666: p_data => x_msg_data);
1886:
1887: WHEN OTHERS THEN
1888: ROLLBACK TO Create_Temp_Ext_Bank_Acct_pub;
1889: x_return_status := fnd_api.g_ret_sts_unexp_error;
1890: fnd_message.set_name('IBY', 'IBY_API_OTHERS_EXCEP');
1891: fnd_message.set_token('ERROR',SQLERRM);
1892: fnd_msg_pub.add;
1893: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
1894: p_count => x_msg_count,
1887: WHEN OTHERS THEN
1888: ROLLBACK TO Create_Temp_Ext_Bank_Acct_pub;
1889: x_return_status := fnd_api.g_ret_sts_unexp_error;
1890: fnd_message.set_name('IBY', 'IBY_API_OTHERS_EXCEP');
1891: fnd_message.set_token('ERROR',SQLERRM);
1892: fnd_msg_pub.add;
1893: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
1894: p_count => x_msg_count,
1895: p_data => x_msg_data);
2171:
2172: WHEN OTHERS THEN
2173: ROLLBACK TO Val_Temp_Ext_Bank_Acct_pub;
2174: x_return_status := fnd_api.g_ret_sts_unexp_error;
2175: fnd_message.set_name('IBY', 'IBY_API_OTHERS_EXCEP');
2176: fnd_message.set_token('ERROR',SQLERRM);
2177: fnd_msg_pub.add;
2178: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
2179: p_count => x_msg_count,
2172: WHEN OTHERS THEN
2173: ROLLBACK TO Val_Temp_Ext_Bank_Acct_pub;
2174: x_return_status := fnd_api.g_ret_sts_unexp_error;
2175: fnd_message.set_name('IBY', 'IBY_API_OTHERS_EXCEP');
2176: fnd_message.set_token('ERROR',SQLERRM);
2177: fnd_msg_pub.add;
2178: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false,
2179: p_count => x_msg_count,
2180: p_data => x_msg_data);
2271: print_debuginfo(l_module_name, 'Loop thru external payee ' || counter);
2272:
2273: IF p_ext_payee_id_tab(counter).Ext_Payee_ID IS NULL THEN
2274: print_debuginfo(l_module_name,'Payee to update does not exist.');
2275: FND_MESSAGE.set_name('IBY', 'IBY_MISSING_MANDATORY_PARAM');
2276: FND_MESSAGE.SET_TOKEN('PARAM', 'External Payee Id');
2277: l_message := fnd_message.get;
2278: FND_MSG_PUB.Add;
2279:
2272:
2273: IF p_ext_payee_id_tab(counter).Ext_Payee_ID IS NULL THEN
2274: print_debuginfo(l_module_name,'Payee to update does not exist.');
2275: FND_MESSAGE.set_name('IBY', 'IBY_MISSING_MANDATORY_PARAM');
2276: FND_MESSAGE.SET_TOKEN('PARAM', 'External Payee Id');
2277: l_message := fnd_message.get;
2278: FND_MSG_PUB.Add;
2279:
2280: l_ext_payee_upd_rec.Payee_Update_Status := 'E';
2273: IF p_ext_payee_id_tab(counter).Ext_Payee_ID IS NULL THEN
2274: print_debuginfo(l_module_name,'Payee to update does not exist.');
2275: FND_MESSAGE.set_name('IBY', 'IBY_MISSING_MANDATORY_PARAM');
2276: FND_MESSAGE.SET_TOKEN('PARAM', 'External Payee Id');
2277: l_message := fnd_message.get;
2278: FND_MSG_PUB.Add;
2279:
2280: l_ext_payee_upd_rec.Payee_Update_Status := 'E';
2281: l_ext_payee_upd_rec.Payee_Update_Msg := l_message;
2283: x_return_status := FND_API.G_RET_STS_ERROR;
2284:
2285: ELSIF p_ext_payee_tab(counter).Payee_Party_Id IS NULL THEN
2286: print_debuginfo(l_module_name,'Payee party Id is null.');
2287: FND_MESSAGE.set_name('IBY', 'IBY_MISSING_MANDATORY_PARAM');
2288: FND_MESSAGE.SET_TOKEN('PARAM', 'Payee party Id');
2289: l_message := fnd_message.get;
2290: FND_MSG_PUB.Add;
2291:
2284:
2285: ELSIF p_ext_payee_tab(counter).Payee_Party_Id IS NULL THEN
2286: print_debuginfo(l_module_name,'Payee party Id is null.');
2287: FND_MESSAGE.set_name('IBY', 'IBY_MISSING_MANDATORY_PARAM');
2288: FND_MESSAGE.SET_TOKEN('PARAM', 'Payee party Id');
2289: l_message := fnd_message.get;
2290: FND_MSG_PUB.Add;
2291:
2292: l_ext_payee_upd_rec.Payee_Update_Status := 'E';
2285: ELSIF p_ext_payee_tab(counter).Payee_Party_Id IS NULL THEN
2286: print_debuginfo(l_module_name,'Payee party Id is null.');
2287: FND_MESSAGE.set_name('IBY', 'IBY_MISSING_MANDATORY_PARAM');
2288: FND_MESSAGE.SET_TOKEN('PARAM', 'Payee party Id');
2289: l_message := fnd_message.get;
2290: FND_MSG_PUB.Add;
2291:
2292: l_ext_payee_upd_rec.Payee_Update_Status := 'E';
2293: l_ext_payee_upd_rec.Payee_Update_Msg := l_message;
2295: x_return_status := FND_API.G_RET_STS_ERROR;
2296:
2297: ELSIF (p_ext_payee_tab(counter).Payment_Function IS NULL) THEN
2298: print_debuginfo(l_module_name,'Payment function is null.');
2299: FND_MESSAGE.set_name('IBY', 'IBY_MISSING_MANDATORY_PARAM');
2300: FND_MESSAGE.SET_TOKEN('PARAM', 'Payment function');
2301: l_message := fnd_message.get;
2302: FND_MSG_PUB.Add;
2303:
2296:
2297: ELSIF (p_ext_payee_tab(counter).Payment_Function IS NULL) THEN
2298: print_debuginfo(l_module_name,'Payment function is null.');
2299: FND_MESSAGE.set_name('IBY', 'IBY_MISSING_MANDATORY_PARAM');
2300: FND_MESSAGE.SET_TOKEN('PARAM', 'Payment function');
2301: l_message := fnd_message.get;
2302: FND_MSG_PUB.Add;
2303:
2304: l_ext_payee_upd_rec.Payee_Update_Status := 'E';
2297: ELSIF (p_ext_payee_tab(counter).Payment_Function IS NULL) THEN
2298: print_debuginfo(l_module_name,'Payment function is null.');
2299: FND_MESSAGE.set_name('IBY', 'IBY_MISSING_MANDATORY_PARAM');
2300: FND_MESSAGE.SET_TOKEN('PARAM', 'Payment function');
2301: l_message := fnd_message.get;
2302: FND_MSG_PUB.Add;
2303:
2304: l_ext_payee_upd_rec.Payee_Update_Status := 'E';
2305: l_ext_payee_upd_rec.Payee_Update_Msg := l_message;
2309: -- orgid is required if supplier site id passed
2310: ELSIF ((p_ext_payee_tab(counter).Payer_ORG_ID IS NULL) and
2311: (p_ext_payee_tab(counter).Supplier_Site_Id IS NOT NULL)) THEN
2312: print_debuginfo(l_module_name,'Payer Org Id is null.');
2313: FND_MESSAGE.set_name('IBY', 'IBY_MISSING_MANDATORY_PARAM');
2314: FND_MESSAGE.SET_TOKEN('PARAM', 'Payer Org Id');
2315: l_message := fnd_message.get;
2316: FND_MSG_PUB.Add;
2317:
2310: ELSIF ((p_ext_payee_tab(counter).Payer_ORG_ID IS NULL) and
2311: (p_ext_payee_tab(counter).Supplier_Site_Id IS NOT NULL)) THEN
2312: print_debuginfo(l_module_name,'Payer Org Id is null.');
2313: FND_MESSAGE.set_name('IBY', 'IBY_MISSING_MANDATORY_PARAM');
2314: FND_MESSAGE.SET_TOKEN('PARAM', 'Payer Org Id');
2315: l_message := fnd_message.get;
2316: FND_MSG_PUB.Add;
2317:
2318: l_ext_payee_upd_rec.Payee_Update_Status := 'E';
2311: (p_ext_payee_tab(counter).Supplier_Site_Id IS NOT NULL)) THEN
2312: print_debuginfo(l_module_name,'Payer Org Id is null.');
2313: FND_MESSAGE.set_name('IBY', 'IBY_MISSING_MANDATORY_PARAM');
2314: FND_MESSAGE.SET_TOKEN('PARAM', 'Payer Org Id');
2315: l_message := fnd_message.get;
2316: FND_MSG_PUB.Add;
2317:
2318: l_ext_payee_upd_rec.Payee_Update_Status := 'E';
2319: l_ext_payee_upd_rec.Payee_Update_Msg := l_message;
2320:
2321: ELSIF ((p_ext_payee_tab(counter).Payer_ORG_ID IS NOT NULL) and
2322: (p_ext_payee_tab(counter).Payer_Org_Type IS NULL)) THEN
2323: print_debuginfo(l_module_name,'Payer Org Id is null.');
2324: FND_MESSAGE.set_name('IBY', 'IBY_MISSING_MANDATORY_PARAM');
2325: FND_MESSAGE.SET_TOKEN('PARAM', 'Payer Org Type');
2326: l_message := fnd_message.get;
2327: FND_MSG_PUB.Add;
2328:
2321: ELSIF ((p_ext_payee_tab(counter).Payer_ORG_ID IS NOT NULL) and
2322: (p_ext_payee_tab(counter).Payer_Org_Type IS NULL)) THEN
2323: print_debuginfo(l_module_name,'Payer Org Id is null.');
2324: FND_MESSAGE.set_name('IBY', 'IBY_MISSING_MANDATORY_PARAM');
2325: FND_MESSAGE.SET_TOKEN('PARAM', 'Payer Org Type');
2326: l_message := fnd_message.get;
2327: FND_MSG_PUB.Add;
2328:
2329: l_ext_payee_upd_rec.Payee_Update_Status := 'E';
2322: (p_ext_payee_tab(counter).Payer_Org_Type IS NULL)) THEN
2323: print_debuginfo(l_module_name,'Payer Org Id is null.');
2324: FND_MESSAGE.set_name('IBY', 'IBY_MISSING_MANDATORY_PARAM');
2325: FND_MESSAGE.SET_TOKEN('PARAM', 'Payer Org Type');
2326: l_message := fnd_message.get;
2327: FND_MSG_PUB.Add;
2328:
2329: l_ext_payee_upd_rec.Payee_Update_Status := 'E';
2330: l_ext_payee_upd_rec.Payee_Update_Msg := l_message;
2330: l_ext_payee_upd_rec.Payee_Update_Msg := l_message;
2331:
2332: ELSIF p_ext_payee_tab(counter).Exclusive_Pay_Flag IS NULL THEN
2333: print_debuginfo(l_module_name,'Exclusive payment flag is null.');
2334: FND_MESSAGE.set_name('IBY', 'IBY_MISSING_MANDATORY_PARAM');
2335: FND_MESSAGE.SET_TOKEN('PARAM', 'Exclusive payment flag');
2336: l_message := fnd_message.get;
2337: FND_MSG_PUB.Add;
2338:
2331:
2332: ELSIF p_ext_payee_tab(counter).Exclusive_Pay_Flag IS NULL THEN
2333: print_debuginfo(l_module_name,'Exclusive payment flag is null.');
2334: FND_MESSAGE.set_name('IBY', 'IBY_MISSING_MANDATORY_PARAM');
2335: FND_MESSAGE.SET_TOKEN('PARAM', 'Exclusive payment flag');
2336: l_message := fnd_message.get;
2337: FND_MSG_PUB.Add;
2338:
2339: l_ext_payee_upd_rec.Payee_Update_Status := 'E';
2332: ELSIF p_ext_payee_tab(counter).Exclusive_Pay_Flag IS NULL THEN
2333: print_debuginfo(l_module_name,'Exclusive payment flag is null.');
2334: FND_MESSAGE.set_name('IBY', 'IBY_MISSING_MANDATORY_PARAM');
2335: FND_MESSAGE.SET_TOKEN('PARAM', 'Exclusive payment flag');
2336: l_message := fnd_message.get;
2337: FND_MSG_PUB.Add;
2338:
2339: l_ext_payee_upd_rec.Payee_Update_Status := 'E';
2340: l_ext_payee_upd_rec.Payee_Update_Msg := l_message;
2357: IF (l_payee_cnt = 0 OR l_payee_id <> p_ext_payee_id_tab(counter).ext_payee_id) THEN
2358:
2359: print_debuginfo(l_module_name,'Payee id does not exist based on parameters or is different from'||
2360: 'parameter ext_payee_id');
2361: FND_MESSAGE.set_name('IBY', 'IBY_EXT_PAYEE_NOT_EXIST');
2362: FND_MESSAGE.SET_TOKEN('EXT_PAYEE_ID', p_ext_payee_id_tab(counter).ext_payee_id);
2363: l_message := fnd_message.get;
2364: FND_MSG_PUB.Add;
2365:
2358:
2359: print_debuginfo(l_module_name,'Payee id does not exist based on parameters or is different from'||
2360: 'parameter ext_payee_id');
2361: FND_MESSAGE.set_name('IBY', 'IBY_EXT_PAYEE_NOT_EXIST');
2362: FND_MESSAGE.SET_TOKEN('EXT_PAYEE_ID', p_ext_payee_id_tab(counter).ext_payee_id);
2363: l_message := fnd_message.get;
2364: FND_MSG_PUB.Add;
2365:
2366: l_ext_payee_upd_rec.Payee_Update_Status := 'E';
2359: print_debuginfo(l_module_name,'Payee id does not exist based on parameters or is different from'||
2360: 'parameter ext_payee_id');
2361: FND_MESSAGE.set_name('IBY', 'IBY_EXT_PAYEE_NOT_EXIST');
2362: FND_MESSAGE.SET_TOKEN('EXT_PAYEE_ID', p_ext_payee_id_tab(counter).ext_payee_id);
2363: l_message := fnd_message.get;
2364: FND_MSG_PUB.Add;
2365:
2366: l_ext_payee_upd_rec.Payee_Update_Status := 'E';
2367: l_ext_payee_upd_rec.Payee_Update_Msg := l_message;