66: where branch_party_id = p_bank_branch_id;
67:
68: exception
69: when NO_DATA_FOUND then
70: FND_MESSAGE.set_NAME('SQLAP','AP_DEBUG');
71: FND_MESSAGE.set_TOKEN('ERROR',SQLERRM);
72: FND_MESSAGE.set_TOKEN('DEBUG_INFO', 'Bank Branch Info can not be derived');
73: APP_EXCEPTION.RAISE_EXCEPTION;
74: when OTHERS then
67:
68: exception
69: when NO_DATA_FOUND then
70: FND_MESSAGE.set_NAME('SQLAP','AP_DEBUG');
71: FND_MESSAGE.set_TOKEN('ERROR',SQLERRM);
72: FND_MESSAGE.set_TOKEN('DEBUG_INFO', 'Bank Branch Info can not be derived');
73: APP_EXCEPTION.RAISE_EXCEPTION;
74: when OTHERS then
75: IF (SQLCODE <> -20001) THEN
68: exception
69: when NO_DATA_FOUND then
70: FND_MESSAGE.set_NAME('SQLAP','AP_DEBUG');
71: FND_MESSAGE.set_TOKEN('ERROR',SQLERRM);
72: FND_MESSAGE.set_TOKEN('DEBUG_INFO', 'Bank Branch Info can not be derived');
73: APP_EXCEPTION.RAISE_EXCEPTION;
74: when OTHERS then
75: IF (SQLCODE <> -20001) THEN
76: FND_MESSAGE.set_NAME('SQLAP','AP_DEBUG');
72: FND_MESSAGE.set_TOKEN('DEBUG_INFO', 'Bank Branch Info can not be derived');
73: APP_EXCEPTION.RAISE_EXCEPTION;
74: when OTHERS then
75: IF (SQLCODE <> -20001) THEN
76: FND_MESSAGE.set_NAME('SQLAP','AP_DEBUG');
77: FND_MESSAGE.set_TOKEN('ERROR',SQLERRM);
78: FND_MESSAGE.set_TOKEN('DEBUG_INFO',l_debug_info);
79: END IF;
80:
73: APP_EXCEPTION.RAISE_EXCEPTION;
74: when OTHERS then
75: IF (SQLCODE <> -20001) THEN
76: FND_MESSAGE.set_NAME('SQLAP','AP_DEBUG');
77: FND_MESSAGE.set_TOKEN('ERROR',SQLERRM);
78: FND_MESSAGE.set_TOKEN('DEBUG_INFO',l_debug_info);
79: END IF;
80:
81: APP_EXCEPTION.RAISE_EXCEPTION;
74: when OTHERS then
75: IF (SQLCODE <> -20001) THEN
76: FND_MESSAGE.set_NAME('SQLAP','AP_DEBUG');
77: FND_MESSAGE.set_TOKEN('ERROR',SQLERRM);
78: FND_MESSAGE.set_TOKEN('DEBUG_INFO',l_debug_info);
79: END IF;
80:
81: APP_EXCEPTION.RAISE_EXCEPTION;
82:
257: RAISE RECORD_EXIST;
258: end if;
259: EXCEPTION
260: WHEN RECORD_EXIST THEN
261: FND_MESSAGE.SET_NAME('SQLAP', 'AP_CHARGE_EXIST');
262: APP_EXCEPTION.RAISE_EXCEPTION;
263: WHEN NO_DATA_FOUND THEN
264: FND_MESSAGE.set_NAME('SQLAP','AP_DEBUG');
265: FND_MESSAGE.set_TOKEN('ERROR',SQLERRM);
260: WHEN RECORD_EXIST THEN
261: FND_MESSAGE.SET_NAME('SQLAP', 'AP_CHARGE_EXIST');
262: APP_EXCEPTION.RAISE_EXCEPTION;
263: WHEN NO_DATA_FOUND THEN
264: FND_MESSAGE.set_NAME('SQLAP','AP_DEBUG');
265: FND_MESSAGE.set_TOKEN('ERROR',SQLERRM);
266: FND_MESSAGE.set_TOKEN('DEBUG_INFO', 'Transferring and Receiving Bank Combination'||
267: ' is Invalid');
268: APP_EXCEPTION.RAISE_EXCEPTION;
261: FND_MESSAGE.SET_NAME('SQLAP', 'AP_CHARGE_EXIST');
262: APP_EXCEPTION.RAISE_EXCEPTION;
263: WHEN NO_DATA_FOUND THEN
264: FND_MESSAGE.set_NAME('SQLAP','AP_DEBUG');
265: FND_MESSAGE.set_TOKEN('ERROR',SQLERRM);
266: FND_MESSAGE.set_TOKEN('DEBUG_INFO', 'Transferring and Receiving Bank Combination'||
267: ' is Invalid');
268: APP_EXCEPTION.RAISE_EXCEPTION;
269: WHEN OTHERS then
262: APP_EXCEPTION.RAISE_EXCEPTION;
263: WHEN NO_DATA_FOUND THEN
264: FND_MESSAGE.set_NAME('SQLAP','AP_DEBUG');
265: FND_MESSAGE.set_TOKEN('ERROR',SQLERRM);
266: FND_MESSAGE.set_TOKEN('DEBUG_INFO', 'Transferring and Receiving Bank Combination'||
267: ' is Invalid');
268: APP_EXCEPTION.RAISE_EXCEPTION;
269: WHEN OTHERS then
270: IF (SQLCODE <> -20001) THEN
267: ' is Invalid');
268: APP_EXCEPTION.RAISE_EXCEPTION;
269: WHEN OTHERS then
270: IF (SQLCODE <> -20001) THEN
271: FND_MESSAGE.set_NAME('SQLAP','AP_DEBUG');
272: FND_MESSAGE.set_TOKEN('ERROR',SQLERRM);
273: FND_MESSAGE.set_TOKEN('DEBUG_INFO',l_debug_info);
274: END IF;
275:
268: APP_EXCEPTION.RAISE_EXCEPTION;
269: WHEN OTHERS then
270: IF (SQLCODE <> -20001) THEN
271: FND_MESSAGE.set_NAME('SQLAP','AP_DEBUG');
272: FND_MESSAGE.set_TOKEN('ERROR',SQLERRM);
273: FND_MESSAGE.set_TOKEN('DEBUG_INFO',l_debug_info);
274: END IF;
275:
276: end CHECK_BANK_COMBINATION;
269: WHEN OTHERS then
270: IF (SQLCODE <> -20001) THEN
271: FND_MESSAGE.set_NAME('SQLAP','AP_DEBUG');
272: FND_MESSAGE.set_TOKEN('ERROR',SQLERRM);
273: FND_MESSAGE.set_TOKEN('DEBUG_INFO',l_debug_info);
274: END IF;
275:
276: end CHECK_BANK_COMBINATION;
277:
341: CLOSE C_lines;
342:
343: EXCEPTION
344: WHEN AMOUNT_OVERLAP THEN
345: FND_MESSAGE.SET_NAME('SQLAP', 'AP_GAPS');
346: APP_EXCEPTION.RAISE_EXCEPTION;
347: WHEN OTHERS THEN
348: IF (SQLCODE <> -20001) THEN
349: FND_MESSAGE.set_NAME('SQLAP','AP_DEBUG');
345: FND_MESSAGE.SET_NAME('SQLAP', 'AP_GAPS');
346: APP_EXCEPTION.RAISE_EXCEPTION;
347: WHEN OTHERS THEN
348: IF (SQLCODE <> -20001) THEN
349: FND_MESSAGE.set_NAME('SQLAP','AP_DEBUG');
350: FND_MESSAGE.set_TOKEN('ERROR',SQLERRM);
351: FND_MESSAGE.set_TOKEN('DEBUG_INFO',l_debug_info);
352: END IF;
353: APP_EXCEPTION.RAISE_EXCEPTION;
346: APP_EXCEPTION.RAISE_EXCEPTION;
347: WHEN OTHERS THEN
348: IF (SQLCODE <> -20001) THEN
349: FND_MESSAGE.set_NAME('SQLAP','AP_DEBUG');
350: FND_MESSAGE.set_TOKEN('ERROR',SQLERRM);
351: FND_MESSAGE.set_TOKEN('DEBUG_INFO',l_debug_info);
352: END IF;
353: APP_EXCEPTION.RAISE_EXCEPTION;
354: END CHECK_RANGE_OVERLAP;
347: WHEN OTHERS THEN
348: IF (SQLCODE <> -20001) THEN
349: FND_MESSAGE.set_NAME('SQLAP','AP_DEBUG');
350: FND_MESSAGE.set_TOKEN('ERROR',SQLERRM);
351: FND_MESSAGE.set_TOKEN('DEBUG_INFO',l_debug_info);
352: END IF;
353: APP_EXCEPTION.RAISE_EXCEPTION;
354: END CHECK_RANGE_OVERLAP;
355:
420: RAISE START_ZERO;
421: end if;
422: EXCEPTION
423: WHEN AMOUNT_GAP THEN
424: FND_MESSAGE.SET_NAME('SQLAP', 'AP_GAPS');
425: APP_EXCEPTION.RAISE_EXCEPTION;
426: WHEN START_ZERO THEN
427: FND_MESSAGE.SET_NAME('SQLAP', 'AP_NEED_ZERO');
428: APP_EXCEPTION.RAISE_EXCEPTION;
423: WHEN AMOUNT_GAP THEN
424: FND_MESSAGE.SET_NAME('SQLAP', 'AP_GAPS');
425: APP_EXCEPTION.RAISE_EXCEPTION;
426: WHEN START_ZERO THEN
427: FND_MESSAGE.SET_NAME('SQLAP', 'AP_NEED_ZERO');
428: APP_EXCEPTION.RAISE_EXCEPTION;
429: WHEN OTHERS THEN
430: IF (SQLCODE <> -20001) THEN
431: FND_MESSAGE.set_NAME('SQLAP','AP_DEBUG');
427: FND_MESSAGE.SET_NAME('SQLAP', 'AP_NEED_ZERO');
428: APP_EXCEPTION.RAISE_EXCEPTION;
429: WHEN OTHERS THEN
430: IF (SQLCODE <> -20001) THEN
431: FND_MESSAGE.set_NAME('SQLAP','AP_DEBUG');
432: FND_MESSAGE.set_TOKEN('ERROR',SQLERRM);
433: FND_MESSAGE.set_TOKEN('DEBUG_INFO',l_debug_info);
434: END IF;
435: APP_EXCEPTION.RAISE_EXCEPTION;
428: APP_EXCEPTION.RAISE_EXCEPTION;
429: WHEN OTHERS THEN
430: IF (SQLCODE <> -20001) THEN
431: FND_MESSAGE.set_NAME('SQLAP','AP_DEBUG');
432: FND_MESSAGE.set_TOKEN('ERROR',SQLERRM);
433: FND_MESSAGE.set_TOKEN('DEBUG_INFO',l_debug_info);
434: END IF;
435: APP_EXCEPTION.RAISE_EXCEPTION;
436: END CHECK_RANGE_GAP;
429: WHEN OTHERS THEN
430: IF (SQLCODE <> -20001) THEN
431: FND_MESSAGE.set_NAME('SQLAP','AP_DEBUG');
432: FND_MESSAGE.set_TOKEN('ERROR',SQLERRM);
433: FND_MESSAGE.set_TOKEN('DEBUG_INFO',l_debug_info);
434: END IF;
435: APP_EXCEPTION.RAISE_EXCEPTION;
436: END CHECK_RANGE_GAP;
437:
515: RAISE TOO_MANY_ROWS;
516: end if;
517: EXCEPTION
518: WHEN AMOUNT_GAP THEN
519: FND_MESSAGE.SET_NAME('SQLAP', 'AP_GAPS');
520: APP_EXCEPTION.RAISE_EXCEPTION;
521: WHEN AMOUNT_OVERLAP THEN
522: FND_MESSAGE.SET_NAME('SQLAP', 'AP_OVERLAP1');
523: APP_EXCEPTION.RAISE_EXCEPTION;
518: WHEN AMOUNT_GAP THEN
519: FND_MESSAGE.SET_NAME('SQLAP', 'AP_GAPS');
520: APP_EXCEPTION.RAISE_EXCEPTION;
521: WHEN AMOUNT_OVERLAP THEN
522: FND_MESSAGE.SET_NAME('SQLAP', 'AP_OVERLAP1');
523: APP_EXCEPTION.RAISE_EXCEPTION;
524: WHEN NO_DATA_FOUND THEN
525: FND_MESSAGE.SET_NAME('SQLAP', 'AP_LAST4');
526: APP_EXCEPTION.RAISE_EXCEPTION;
521: WHEN AMOUNT_OVERLAP THEN
522: FND_MESSAGE.SET_NAME('SQLAP', 'AP_OVERLAP1');
523: APP_EXCEPTION.RAISE_EXCEPTION;
524: WHEN NO_DATA_FOUND THEN
525: FND_MESSAGE.SET_NAME('SQLAP', 'AP_LAST4');
526: APP_EXCEPTION.RAISE_EXCEPTION;
527: WHEN TOO_MANY_ROWS THEN
528: FND_MESSAGE.SET_NAME('SQLAP', 'AP_LAST5');
529: APP_EXCEPTION.RAISE_EXCEPTION;
524: WHEN NO_DATA_FOUND THEN
525: FND_MESSAGE.SET_NAME('SQLAP', 'AP_LAST4');
526: APP_EXCEPTION.RAISE_EXCEPTION;
527: WHEN TOO_MANY_ROWS THEN
528: FND_MESSAGE.SET_NAME('SQLAP', 'AP_LAST5');
529: APP_EXCEPTION.RAISE_EXCEPTION;
530: WHEN OTHERS THEN
531: IF (SQLCODE <> -20001) THEN
532: FND_MESSAGE.set_NAME('SQLAP','AP_DEBUG');
528: FND_MESSAGE.SET_NAME('SQLAP', 'AP_LAST5');
529: APP_EXCEPTION.RAISE_EXCEPTION;
530: WHEN OTHERS THEN
531: IF (SQLCODE <> -20001) THEN
532: FND_MESSAGE.set_NAME('SQLAP','AP_DEBUG');
533: FND_MESSAGE.set_TOKEN('ERROR',SQLERRM);
534: FND_MESSAGE.set_TOKEN('DEBUG_INFO',l_debug_info);
535: END IF;
536: APP_EXCEPTION.RAISE_EXCEPTION;
529: APP_EXCEPTION.RAISE_EXCEPTION;
530: WHEN OTHERS THEN
531: IF (SQLCODE <> -20001) THEN
532: FND_MESSAGE.set_NAME('SQLAP','AP_DEBUG');
533: FND_MESSAGE.set_TOKEN('ERROR',SQLERRM);
534: FND_MESSAGE.set_TOKEN('DEBUG_INFO',l_debug_info);
535: END IF;
536: APP_EXCEPTION.RAISE_EXCEPTION;
537:
530: WHEN OTHERS THEN
531: IF (SQLCODE <> -20001) THEN
532: FND_MESSAGE.set_NAME('SQLAP','AP_DEBUG');
533: FND_MESSAGE.set_TOKEN('ERROR',SQLERRM);
534: FND_MESSAGE.set_TOKEN('DEBUG_INFO',l_debug_info);
535: END IF;
536: APP_EXCEPTION.RAISE_EXCEPTION;
537:
538: END CHECK_LAST_RANGE;
959:
960: EXCEPTION
961: WHEN NO_BANK_CHARGES THEN
962: p_tolerance_limit := NULL;
963: FND_MESSAGE.SET_NAME('SQLAP', 'AP_NO_CHARGE_FOUND');
964: FND_MSG_PUB.ADD;
965: --APP_EXCEPTION.RAISE_EXCEPTION;
966: WHEN NO_DATA_FOUND THEN
967: FND_MESSAGE.SET_NAME('SQLAP', 'AP_NO_CHARGE_FOUND');
963: FND_MESSAGE.SET_NAME('SQLAP', 'AP_NO_CHARGE_FOUND');
964: FND_MSG_PUB.ADD;
965: --APP_EXCEPTION.RAISE_EXCEPTION;
966: WHEN NO_DATA_FOUND THEN
967: FND_MESSAGE.SET_NAME('SQLAP', 'AP_NO_CHARGE_FOUND');
968: FND_MSG_PUB.ADD;
969: p_tolerance_limit := NULL;
970: --APP_EXCEPTION.RAISE_EXCEPTION;
971: WHEN OTHERS THEN
969: p_tolerance_limit := NULL;
970: --APP_EXCEPTION.RAISE_EXCEPTION;
971: WHEN OTHERS THEN
972: IF (SQLCODE <> -20001) THEN
973: FND_MESSAGE.set_NAME('SQLAP','AP_DEBUG');
974: FND_MESSAGE.set_TOKEN('ERROR',SQLERRM);
975: FND_MESSAGE.set_TOKEN('DEBUG_INFO',l_debug_info);
976: END IF;
977: p_tolerance_limit := NULL;
970: --APP_EXCEPTION.RAISE_EXCEPTION;
971: WHEN OTHERS THEN
972: IF (SQLCODE <> -20001) THEN
973: FND_MESSAGE.set_NAME('SQLAP','AP_DEBUG');
974: FND_MESSAGE.set_TOKEN('ERROR',SQLERRM);
975: FND_MESSAGE.set_TOKEN('DEBUG_INFO',l_debug_info);
976: END IF;
977: p_tolerance_limit := NULL;
978: FND_MSG_PUB.ADD;
971: WHEN OTHERS THEN
972: IF (SQLCODE <> -20001) THEN
973: FND_MESSAGE.set_NAME('SQLAP','AP_DEBUG');
974: FND_MESSAGE.set_TOKEN('ERROR',SQLERRM);
975: FND_MESSAGE.set_TOKEN('DEBUG_INFO',l_debug_info);
976: END IF;
977: p_tolerance_limit := NULL;
978: FND_MSG_PUB.ADD;
979: --APP_EXCEPTION.RAISE_EXCEPTION;
1375: P_check_bc_flag := 'N';
1376: P_do_not_pay_reason := 'NO BANK CHARGE';
1377: WHEN OTHERS THEN
1378: IF (SQLCODE <> -20001) THEN
1379: FND_MESSAGE.set_NAME('SQLAP','AP_DEBUG');
1380: FND_MESSAGE.set_TOKEN('ERROR',SQLERRM);
1381: FND_MESSAGE.set_TOKEN('DEBUG_INFO',l_debug_info);
1382: END IF;
1383: FND_MSG_PUB.ADD;
1376: P_do_not_pay_reason := 'NO BANK CHARGE';
1377: WHEN OTHERS THEN
1378: IF (SQLCODE <> -20001) THEN
1379: FND_MESSAGE.set_NAME('SQLAP','AP_DEBUG');
1380: FND_MESSAGE.set_TOKEN('ERROR',SQLERRM);
1381: FND_MESSAGE.set_TOKEN('DEBUG_INFO',l_debug_info);
1382: END IF;
1383: FND_MSG_PUB.ADD;
1384:
1377: WHEN OTHERS THEN
1378: IF (SQLCODE <> -20001) THEN
1379: FND_MESSAGE.set_NAME('SQLAP','AP_DEBUG');
1380: FND_MESSAGE.set_TOKEN('ERROR',SQLERRM);
1381: FND_MESSAGE.set_TOKEN('DEBUG_INFO',l_debug_info);
1382: END IF;
1383: FND_MSG_PUB.ADD;
1384:
1385: END CHECK_BANK_CHARGE;
1539: EXCEPTION
1540:
1541: WHEN OTHERS THEN
1542:
1543: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
1544: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
1545: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE', current_calling_sequence);
1546: FND_MESSAGE.SET_TOKEN('PARAMETERS',
1547: ' p_selected_check_id = '||to_char(p_selected_check_id));
1540:
1541: WHEN OTHERS THEN
1542:
1543: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
1544: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
1545: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE', current_calling_sequence);
1546: FND_MESSAGE.SET_TOKEN('PARAMETERS',
1547: ' p_selected_check_id = '||to_char(p_selected_check_id));
1548: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',debug_info);
1541: WHEN OTHERS THEN
1542:
1543: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
1544: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
1545: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE', current_calling_sequence);
1546: FND_MESSAGE.SET_TOKEN('PARAMETERS',
1547: ' p_selected_check_id = '||to_char(p_selected_check_id));
1548: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',debug_info);
1549: --APP_EXCEPTION.RAISE_EXCEPTION;
1542:
1543: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
1544: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
1545: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE', current_calling_sequence);
1546: FND_MESSAGE.SET_TOKEN('PARAMETERS',
1547: ' p_selected_check_id = '||to_char(p_selected_check_id));
1548: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',debug_info);
1549: --APP_EXCEPTION.RAISE_EXCEPTION;
1550:
1544: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
1545: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE', current_calling_sequence);
1546: FND_MESSAGE.SET_TOKEN('PARAMETERS',
1547: ' p_selected_check_id = '||to_char(p_selected_check_id));
1548: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',debug_info);
1549: --APP_EXCEPTION.RAISE_EXCEPTION;
1550:
1551: RETURN (FALSE);
1552:
1811:
1812: EXCEPTION
1813: WHEN OTHERS THEN
1814:
1815: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
1816: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
1817: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE', current_calling_sequence);
1818: FND_MESSAGE.SET_TOKEN('PARAMETERS',
1819: ' l_bank_charge_bearer = ' ||l_bank_charge_bearer
1812: EXCEPTION
1813: WHEN OTHERS THEN
1814:
1815: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
1816: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
1817: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE', current_calling_sequence);
1818: FND_MESSAGE.SET_TOKEN('PARAMETERS',
1819: ' l_bank_charge_bearer = ' ||l_bank_charge_bearer
1820: ||' l_transferring_bank_branch_id = '||to_char(l_transferring_bank_branch_id)
1813: WHEN OTHERS THEN
1814:
1815: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
1816: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
1817: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE', current_calling_sequence);
1818: FND_MESSAGE.SET_TOKEN('PARAMETERS',
1819: ' l_bank_charge_bearer = ' ||l_bank_charge_bearer
1820: ||' l_transferring_bank_branch_id = '||to_char(l_transferring_bank_branch_id)
1821: ||' l_receiving_bank_branch_id = '||to_char(l_receiving_bank_branch_id)
1814:
1815: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
1816: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
1817: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE', current_calling_sequence);
1818: FND_MESSAGE.SET_TOKEN('PARAMETERS',
1819: ' l_bank_charge_bearer = ' ||l_bank_charge_bearer
1820: ||' l_transferring_bank_branch_id = '||to_char(l_transferring_bank_branch_id)
1821: ||' l_receiving_bank_branch_id = '||to_char(l_receiving_bank_branch_id)
1822: ||' l_transfer_priority = '||l_transfer_priority
1822: ||' l_transfer_priority = '||l_transfer_priority
1823: ||' l_currency_code = '||l_currency_code
1824: ||' l_amt_due = '||to_char(l_amt_due)
1825: ||' l_payment_date = '||to_char(l_payment_date) );
1826: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
1827: FND_MSG_PUB.ADD;
1828: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1829: --APP_EXCEPTION.RAISE_EXCEPTION;
1830:
1913:
1914: EXCEPTION
1915: WHEN OTHERS THEN
1916: CLOSE selected_checks;
1917: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
1918: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
1919: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE', current_calling_sequence);
1920: FND_MESSAGE.SET_TOKEN('PARAMETERS',
1921: ' l_bank_charge_bearer = ' ||l_bank_charge_bearer
1914: EXCEPTION
1915: WHEN OTHERS THEN
1916: CLOSE selected_checks;
1917: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
1918: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
1919: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE', current_calling_sequence);
1920: FND_MESSAGE.SET_TOKEN('PARAMETERS',
1921: ' l_bank_charge_bearer = ' ||l_bank_charge_bearer
1922: ||' l_transferring_bank_branch_id = '||to_char(l_transferring_bank_branch_id)
1915: WHEN OTHERS THEN
1916: CLOSE selected_checks;
1917: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
1918: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
1919: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE', current_calling_sequence);
1920: FND_MESSAGE.SET_TOKEN('PARAMETERS',
1921: ' l_bank_charge_bearer = ' ||l_bank_charge_bearer
1922: ||' l_transferring_bank_branch_id = '||to_char(l_transferring_bank_branch_id)
1923: ||' l_receiving_bank_branch_id = '||to_char(l_receiving_bank_branch_id)
1916: CLOSE selected_checks;
1917: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
1918: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
1919: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE', current_calling_sequence);
1920: FND_MESSAGE.SET_TOKEN('PARAMETERS',
1921: ' l_bank_charge_bearer = ' ||l_bank_charge_bearer
1922: ||' l_transferring_bank_branch_id = '||to_char(l_transferring_bank_branch_id)
1923: ||' l_receiving_bank_branch_id = '||to_char(l_receiving_bank_branch_id)
1924: ||' l_transfer_priority = '||l_transfer_priority
1924: ||' l_transfer_priority = '||l_transfer_priority
1925: ||' l_currency_code = '||l_currency_code
1926: ||' l_amt_due = '||to_char(l_amt_due)
1927: ||' l_payment_date = '||to_char(l_payment_date) );
1928: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
1929: FND_MSG_PUB.ADD;
1930: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1931: --APP_EXCEPTION.RAISE_EXCEPTION;
1932:
2184: CLOSE selected_checks;
2185:
2186: ROLLBACK TO AP_JAPANBANKCHARGEHOOK;
2187: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2188: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
2189: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
2190: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE', current_calling_sequence);
2191: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
2192:
2185:
2186: ROLLBACK TO AP_JAPANBANKCHARGEHOOK;
2187: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2188: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
2189: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
2190: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE', current_calling_sequence);
2191: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
2192:
2193: IF FND_MSG_PUB.Check_Msg_Level
2186: ROLLBACK TO AP_JAPANBANKCHARGEHOOK;
2187: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2188: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
2189: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
2190: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE', current_calling_sequence);
2191: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
2192:
2193: IF FND_MSG_PUB.Check_Msg_Level
2194: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
2187: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2188: FND_MESSAGE.SET_NAME('SQLAP','AP_DEBUG');
2189: FND_MESSAGE.SET_TOKEN('ERROR',SQLERRM);
2190: FND_MESSAGE.SET_TOKEN('CALLING_SEQUENCE', current_calling_sequence);
2191: FND_MESSAGE.SET_TOKEN('DEBUG_INFO',l_debug_info);
2192:
2193: IF FND_MSG_PUB.Check_Msg_Level
2194: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
2195: FND_MSG_PUB.Add_Exc_Msg