68: MODIFY_BANK_BRANCH(p_xtr_party_info_rec,p_update_type,x_return_status);
69: END IF;
70: ELSE
71: x_return_status := FND_API.G_RET_STS_ERROR;
72: XTR_REPLICATE_BANK_ACCOUNTS_P.LOG_ERR_MSG('XTR_INV_PARAM','XTR_PARTY_INFO.ce_bank_branch_id');
73: END IF;
74: ELSE
75: CLOSE c_check_branch;
76: END IF;
82: --
83: EXCEPTION
84: WHEN others THEN
85: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
86: XTR_REPLICATE_BANK_ACCOUNTS_P.LOG_ERR_MSG('XTR_UNEXP_ERROR',SQLERRM(SQLCODE));
87: FND_MSG_PUB.Count_And_Get -- Returns the error message if there is only 1 error
88: ( p_count => x_msg_count ,
89: p_data => x_msg_data
90: );
119:
120: EXCEPTION
121: WHEN others THEN
122: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
123: XTR_REPLICATE_BANK_ACCOUNTS_P.LOG_ERR_MSG('XTR_UNEXP_ERROR',SQLERRM(SQLCODE));
124: FND_MSG_PUB.Count_And_Get -- Returns the error message if there is only 1 error
125: ( p_count => x_msg_count ,
126: p_data => x_msg_data
127: );
159:
160: EXCEPTION
161: WHEN others THEN
162: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
163: XTR_REPLICATE_BANK_ACCOUNTS_P.LOG_ERR_MSG('XTR_UNEXP_ERROR',SQLERRM(SQLCODE));
164: FND_MSG_PUB.Count_And_Get -- Returns the error message if there is only 1 error
165: ( p_count => x_msg_count ,
166: p_data => x_msg_data
167: );
195:
196: EXCEPTION
197: WHEN others THEN
198: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
199: XTR_REPLICATE_BANK_ACCOUNTS_P.LOG_ERR_MSG('XTR_UNEXP_ERROR',SQLERRM(SQLCODE));
200: FND_MSG_PUB.Count_And_Get -- Returns the error message if there is only 1 error
201: ( p_count => x_msg_count ,
202: p_data => x_msg_data
203: );
242:
243: EXCEPTION
244: WHEN others THEN
245: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
246: XTR_REPLICATE_BANK_ACCOUNTS_P.LOG_ERR_MSG('XTR_UNEXP_ERROR',SQLERRM(SQLCODE));
247: FND_MSG_PUB.Count_And_Get -- Returns the error message if there is only 1 error
248: ( p_count => x_msg_count ,
249: p_data => x_msg_data
250: );
295: BEGIN
296: -- Verifies if the ce_bank_branch_id in XTR_PARTY_INFO is passed as null
297: IF(p_xtr_party_info_rec.ce_bank_branch_id is null) THEN
298: x_return_status := FND_API.G_RET_STS_ERROR;
299: XTR_REPLICATE_BANK_ACCOUNTS_P.LOG_ERR_MSG('XTR_INV_PARAM','XTR_PARTY_INFO.ce_bank_branch_id');
300: END IF;
301:
302: -- Verifies if the short_name in XTR_PARTY_INFO is passed as null
303: IF(p_xtr_party_info_rec.short_name is null and p_update_type = 1) THEN
301:
302: -- Verifies if the short_name in XTR_PARTY_INFO is passed as null
303: IF(p_xtr_party_info_rec.short_name is null and p_update_type = 1) THEN
304: x_return_status := FND_API.G_RET_STS_ERROR;
305: XTR_REPLICATE_BANK_ACCOUNTS_P.LOG_ERR_MSG('XTR_INV_PARAM','XTR_PARTY_INFO.SHORT_NAME');
306: END IF;
307: -- Verifies if full_name in XTR_PARTY_INFO is passed as null
308: IF(p_xtr_party_info_rec.full_name is null and p_update_type = 1) THEN
309: x_return_status := FND_API.G_RET_STS_ERROR;
306: END IF;
307: -- Verifies if full_name in XTR_PARTY_INFO is passed as null
308: IF(p_xtr_party_info_rec.full_name is null and p_update_type = 1) THEN
309: x_return_status := FND_API.G_RET_STS_ERROR;
310: XTR_REPLICATE_BANK_ACCOUNTS_P.LOG_ERR_MSG('XTR_INV_PARAM','XTR_PARTY_INFO.FULL_NAME');
311: END IF;
312: -- Verifies if country_code in XTR_PARTY_INFO is passed as null
313: IF(p_xtr_party_info_rec.country_code is null and p_update_type = 4) THEN
314: x_return_status := FND_API.G_RET_STS_ERROR;
311: END IF;
312: -- Verifies if country_code in XTR_PARTY_INFO is passed as null
313: IF(p_xtr_party_info_rec.country_code is null and p_update_type = 4) THEN
314: x_return_status := FND_API.G_RET_STS_ERROR;
315: XTR_REPLICATE_BANK_ACCOUNTS_P.LOG_ERR_MSG('XTR_INV_PARAM','XTR_PARTY_INFO.COUNTRY');
316: END IF;
317: EXCEPTION
318: WHEN others THEN
319: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
316: END IF;
317: EXCEPTION
318: WHEN others THEN
319: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
320: XTR_REPLICATE_BANK_ACCOUNTS_P.LOG_ERR_MSG('XTR_UNEXP_ERROR',SQLERRM(SQLCODE));
321: END VALIDATE_BANK_BRANCH;
322: /**
323: * PROCEDURE modify_bank_branch
324: *
423:
424:
425: CLOSE c_chk_lock;
426: x_return_status := FND_API.G_RET_STS_ERROR;
427: XTR_REPLICATE_BANK_ACCOUNTS_P.LOG_ERR_MSG('XTR_INV_PARAM','XTR_PARTY_INFO.ce_bank_branch_id');
428:
429: END IF;
430:
431: EXCEPTION
432: When app_exceptions.RECORD_LOCK_EXCEPTION then -- If the record is locked
433: if C_CHK_LOCK%ISOPEN then
434: close c_CHK_LOCK;
435: end if;
436: XTR_REPLICATE_BANK_ACCOUNTS_P.LOG_ERR_MSG('CHK_LOCK');
437: x_return_status := FND_API.G_RET_STS_ERROR;
438: WHEN others THEN
439: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
440: XTR_REPLICATE_BANK_ACCOUNTS_P.LOG_ERR_MSG('XTR_UNEXP_ERROR',SQLERRM(SQLCODE));
436: XTR_REPLICATE_BANK_ACCOUNTS_P.LOG_ERR_MSG('CHK_LOCK');
437: x_return_status := FND_API.G_RET_STS_ERROR;
438: WHEN others THEN
439: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
440: XTR_REPLICATE_BANK_ACCOUNTS_P.LOG_ERR_MSG('XTR_UNEXP_ERROR',SQLERRM(SQLCODE));
441:
442: END MODIFY_BANK_BRANCH;
443: /**
444: * FUNCTION chk_bank_branch
448: * XTR_PARTY_INFO table with the Bank Branch ID passed form CE. This returns
449: * a BOOLEAN
450: *
451: * EXTERNAL PROCEDURES/FUNCTIONS ACCESSED
452: * XTR_REPLICATE_BANK_ACCOUNTS_P.LOG_ERR_MSG()
453: * ARGUMENTS
454: * IN:
455: * p_ce_bank_branch_id This is type of CE_BANK_BRANCH_ID present in
456: * XTR_PARTY_INFO. CE will pass the Bank Branch