DBA Data[Home] [Help]

APPS.CE_BANK_STATEMENT_LOADER dependencies on CE_BANK_STATEMENT_LOADER

Line 1: PACKAGE BODY CE_BANK_STATEMENT_LOADER AS

1: PACKAGE BODY CE_BANK_STATEMENT_LOADER AS
2: /* $Header: cebsldrb.pls 120.54.12020000.4 2012/10/11 06:38:41 rtumati ship $ */
3:
4: l_DEBUG varchar2(1) := NVL(FND_PROFILE.value('CE_DEBUG'), 'N');
5: --l_DEBUG varchar2(1) := 'Y';

Line 546: cep_standard.debug('>>CE_BANK_STATEMENT_LOADER.Insert_Hdr');

542: FROM CE_SQLLDR_ERRORS
543: WHERE statement_number = G_statement_number
544: AND bank_account_num = G_bank_account_num;
545: BEGIN
546: cep_standard.debug('>>CE_BANK_STATEMENT_LOADER.Insert_Hdr');
547: cep_standard.debug('Statement Number -'||G_statement_number||'.');
548: cep_standard.debug('Bank Account Num -'||G_bank_account_num||'.');
549: cep_standard.debug('Statement_date -'||G_statement_date||'.');
550: cep_standard.debug('Bank Name -'||G_bank_name||'.');

Line 755: cep_standard.debug('<

751: CE_SQLLDR_ERRORS_PKG.insert_row(G_statement_number, G_bank_account_num, 0, fnd_message.get, 'W');
752: END IF;
753: END IF;
754: END IF;
755: cep_standard.debug('< 756: EXCEPTION
757: WHEN ldr_exception THEN
758: RAISE;
759: WHEN OTHERS THEN

Line 761: cep_standard.debug('EXCEPTION: CE_BANK_STATEMENT_LOADER.Insert_Hdr - '|| to_char(l_err));

757: WHEN ldr_exception THEN
758: RAISE;
759: WHEN OTHERS THEN
760: l_err := SQLCODE;
761: cep_standard.debug('EXCEPTION: CE_BANK_STATEMENT_LOADER.Insert_Hdr - '|| to_char(l_err));
762: RAISE;
763: END Insert_Hdr;
764:
765: /* ---------------------------------------------------------------------

Line 1038: cep_standard.debug('>>CE_BANK_STATEMENT_LOADER.Insert_Line');

1034: l_row_id ROWID;
1035: l_statement_number VARCHAR2(50);
1036: BEGIN
1037: IF l_DEBUG in ('Y', 'C') THEN
1038: cep_standard.debug('>>CE_BANK_STATEMENT_LOADER.Insert_Line');
1039:
1040: cep_standard.debug('Line_number -'||to_char(G_line_number)||'.');
1041: cep_standard.debug('Statement Number -'||G_statement_number||'.');
1042: cep_standard.debug('bank Account Num -'||G_bank_account_num||'.');

Line 1124: cep_standard.debug('<

1120: NULL, NULL, NULL, NULL, NULL,
1121: NULL, NULL, NULL, NULL, NULL);
1122: END IF;
1123: IF l_DEBUG in ('Y', 'C') THEN
1124: cep_standard.debug('< 1125: END IF;
1126: EXCEPTION
1127: WHEN OTHERS THEN
1128: l_err := SQLCODE;

Line 1130: cep_standard.debug('EXCEPTION: CE_BANK_STATEMENT_LOADER.Insert_Line - '|| to_char(l_err));

1126: EXCEPTION
1127: WHEN OTHERS THEN
1128: l_err := SQLCODE;
1129: IF l_DEBUG in ('Y', 'C') THEN
1130: cep_standard.debug('EXCEPTION: CE_BANK_STATEMENT_LOADER.Insert_Line - '|| to_char(l_err));
1131: END IF;
1132: RAISE;
1133: END Insert_Line;
1134:

Line 1543: cep_standard.debug('<

1539:
1540: l_cnt NUMBER;
1541:
1542: BEGIN
1543: cep_standard.debug('< 1544: IF G_bank_account_num IS NULL THEN
1545: cep_standard.debug('G_bank_account_num is null');
1546: FND_MESSAGE.set_name('CE', 'CE_SQLLDR_MISS_REQ_FIELD');
1547: FND_MESSAGE.set_token('FIELD', 'BANK_ACCOUNT_NUM');

Line 1606: cep_standard.debug('<

1602: --END IF;
1603:
1604: END IF;
1605:
1606: cep_standard.debug('< 1607: RETURN TRUE;
1608:
1609: END Valid_Bank_Account;
1610:

Line 1640: cep_standard.debug('>>CE_BANK_STATEMENT_LOADER.Decode_Line_BAI');

1636:
1637: l_str VARCHAR2(2000);
1638: BEGIN
1639: IF l_DEBUG in ('Y', 'C') THEN
1640: cep_standard.debug('>>CE_BANK_STATEMENT_LOADER.Decode_Line_BAI');
1641: END IF;
1642:
1643: OPEN C_rec;
1644: FETCH C_rec

Line 1675: cep_standard.debug('<

1671: G_original_amount := to_number(Lookup_Val('L', X_rec_no, 'ORIGINAL_AMOUNT', l_rec_len)) / G_line_precision;
1672: G_charges_amount := to_number(Lookup_Val('L', X_rec_no, 'CHARGES_AMOUNT', l_rec_len)) / G_line_precision;
1673:
1674: IF l_DEBUG in ('Y', 'C') THEN
1675: cep_standard.debug('< 1676: END IF;
1677: EXCEPTION
1678: WHEN OTHERS THEN
1679: l_err := SQLCODE;

Line 1684: cep_standard.debug('EXCEPTION: CE_BANK_STATEMENT_LOADER.Decode_Line_BAI - '|| to_char(l_err));

1680: FND_MESSAGE.set_name('CE', 'CE_RECORD_FAIL');
1681: FND_MESSAGE.set_token('ERR', to_char(l_err));
1682: CE_SQLLDR_ERRORS_PKG.insert_row(G_statement_number, G_bank_account_num, nvl(X_rec_no, 0), fnd_message.get);
1683: IF l_DEBUG in ('Y', 'C') THEN
1684: cep_standard.debug('EXCEPTION: CE_BANK_STATEMENT_LOADER.Decode_Line_BAI - '|| to_char(l_err));
1685: END IF;
1686: END Decode_Line_BAI;
1687:
1688: /* ---------------------------------------------------------------------

Line 1976: cep_standard.debug('>>CE_BANK_STATEMENT_LOADER.Decode_Hdr_BAI');

1972: l_str VARCHAR2(2000):= null;
1973:
1974: BEGIN
1975: IF l_DEBUG in ('Y', 'C') THEN
1976: cep_standard.debug('>>CE_BANK_STATEMENT_LOADER.Decode_Hdr_BAI');
1977: END IF;
1978:
1979: IF X_rec_id in ('3','03') THEN
1980: l_cnt := 3;

Line 2168: cep_standard.debug('<

2164:
2165: END LOOP;
2166:
2167: IF l_DEBUG in ('Y', 'C') THEN
2168: cep_standard.debug('< 2169: END IF;
2170: EXCEPTION -- Bug 3608257 added this EXCEPTION section
2171: WHEN OTHERS THEN
2172: l_err := SQLCODE;

Line 2176: cep_standard.debug('EXCEPTION: CE_BANK_STATEMENT_LOADER.Decode_Hdr_BAI - '|| to_char(l_err));

2172: l_err := SQLCODE;
2173: FND_MESSAGE.set_name('CE', 'CE_RECORD_FAIL');
2174: FND_MESSAGE.set_token('ERR', to_char(l_err));
2175: CE_SQLLDR_ERRORS_PKG.insert_row(G_statement_number, G_bank_account_num, nvl(X_rec_no, 0), fnd_message.get);
2176: cep_standard.debug('EXCEPTION: CE_BANK_STATEMENT_LOADER.Decode_Hdr_BAI - '|| to_char(l_err));
2177: END Decode_Hdr_BAI;
2178:
2179: /* ---------------------------------------------------------------------
2180: | PRIVATE FUNCTION |

Line 2228: cep_standard.debug('>>CE_BANK_STATEMENT_LOADER.Load_BAI');

2224: l_line_precision NUMBER; -- OXY ER
2225: l_exchange_rate VARCHAR2(250):=null; /* 13947921 */
2226: BEGIN
2227: IF l_DEBUG in ('Y', 'C') THEN
2228: cep_standard.debug('>>CE_BANK_STATEMENT_LOADER.Load_BAI');
2229: END IF;
2230:
2231: FOR C_rec IN C_tmp_tbl LOOP
2232: G_rec_no := C_rec.rec_no;

Line 2235: cep_standard.debug('CE_BANK_STATEMENT_LOADER.Load_BAI - G_rec_no = '||G_rec_no );

2231: FOR C_rec IN C_tmp_tbl LOOP
2232: G_rec_no := C_rec.rec_no;
2233:
2234: IF l_DEBUG in ('Y', 'C') THEN
2235: cep_standard.debug('CE_BANK_STATEMENT_LOADER.Load_BAI - G_rec_no = '||G_rec_no );
2236: END IF;
2237:
2238: IF ( G_rec_no = 1 AND
2239: C_rec.rec_id_no <> '01' ) THEN

Line 2548: cep_standard.debug('EXCEPTION: CE_BANK_STATEMENT_LOADER.Load_BAI - '|| to_char(l_err) || ' Rec no - '||nvl(G_rec_no, 0)||'No description for the line');

2544: EXCEPTION
2545: WHEN OTHERS THEN --no_data_found
2546: l_err := SQLCODE;
2547: IF l_DEBUG in ('Y', 'C') THEN
2548: cep_standard.debug('EXCEPTION: CE_BANK_STATEMENT_LOADER.Load_BAI - '|| to_char(l_err) || ' Rec no - '||nvl(G_rec_no, 0)||'No description for the line');
2549: END IF;
2550: RAISE;
2551: END;
2552: END IF;--end of 8273630

Line 2657: cep_standard.debug('<

2653: END IF;
2654:
2655: END LOOP;
2656: IF l_DEBUG in ('Y', 'C') THEN
2657: cep_standard.debug('< 2658: END IF;
2659: EXCEPTION
2660: WHEN OTHERS THEN
2661: l_err := SQLCODE;

Line 2663: cep_standard.debug('EXCEPTION: CE_BANK_STATEMENT_LOADER.Load_BAI - '|| to_char(l_err) ||

2659: EXCEPTION
2660: WHEN OTHERS THEN
2661: l_err := SQLCODE;
2662: IF l_DEBUG in ('Y', 'C') THEN
2663: cep_standard.debug('EXCEPTION: CE_BANK_STATEMENT_LOADER.Load_BAI - '|| to_char(l_err) ||
2664: ' Rec no - '|| nvl(G_rec_no, 0));
2665: END IF;
2666: RAISE;
2667: END Load_BAI2;

Line 2690: cep_standard.debug('>>CE_BANK_STATEMENT_LOADER.Decode_Hdr_Other --- '

2686: X_column_name VARCHAR2)
2687: IS
2688: l_err NUMBER;
2689: BEGIN
2690: cep_standard.debug('>>CE_BANK_STATEMENT_LOADER.Decode_Hdr_Other --- '
2691: ||'X_rec_no='||X_rec_no||',X_column_name='||X_column_name);
2692:
2693: IF X_column_name = 'STATEMENT_NUMBER'
2694: THEN

Line 2788: cep_standard.debug('<

2784: cep_standard.debug('G_gl_date ==> G_statement_date='||G_statement_date);
2785: G_gl_date := G_statement_date;
2786: END IF;
2787:
2788: cep_standard.debug('< 2789: EXCEPTION
2790: WHEN OTHERS THEN
2791: l_err := SQLCODE;
2792: FND_MESSAGE.set_name('CE', 'CE_RECORD_FAIL');

Line 2795: cep_standard.debug('EXCEPTION: CE_BANK_STATEMENT_LOADER.Decode_Hdr_Other - '|| to_char(l_err));

2791: l_err := SQLCODE;
2792: FND_MESSAGE.set_name('CE', 'CE_RECORD_FAIL');
2793: FND_MESSAGE.set_token('ERR', to_char(l_err));
2794: CE_SQLLDR_ERRORS_PKG.insert_row(G_statement_number, G_bank_account_num, nvl(X_rec_no, 0), fnd_message.get);
2795: cep_standard.debug('EXCEPTION: CE_BANK_STATEMENT_LOADER.Decode_Hdr_Other - '|| to_char(l_err));
2796: END Decode_Hdr_Other;
2797:
2798: /* ---------------------------------------------------------------------
2799: | PRIVATE FUNCTION |

Line 2818: cep_standard.debug('>>CE_BANK_STATEMENT_LOADER.Decode_Line_Other');

2814: l_err NUMBER;
2815: REQ_FIELD_MISSING EXCEPTION;
2816: BEGIN
2817: IF l_DEBUG in ('Y', 'C') THEN
2818: cep_standard.debug('>>CE_BANK_STATEMENT_LOADER.Decode_Line_Other');
2819: END IF;
2820:
2821: IF X_column_name = 'LINE_NUMBER' THEN
2822: G_line_number := NVL(to_number(Lookup_Val('L', X_rec_no, X_column_name)), G_line_number);

Line 2872: cep_standard.debug('<

2868: ELSIF X_column_name = 'BANK_ACCOUNT_TEXT' THEN
2869: G_bank_account_text := Lookup_Val('L', X_rec_no, X_column_name);
2870: END IF;
2871: IF l_DEBUG in ('Y', 'C') THEN
2872: cep_standard.debug('< 2873: END IF;
2874: EXCEPTION
2875: WHEN OTHERS THEN
2876: l_err := SQLCODE;

Line 2881: cep_standard.debug('EXCEPTION: CE_BANK_STATEMENT_LOADER.Decode_Line_Other - '||to_char(l_err));

2877: FND_MESSAGE.set_name('CE', 'CE_RECORD_FAIL');
2878: FND_MESSAGE.set_token('ERR', to_char(l_err));
2879: CE_SQLLDR_ERRORS_PKG.insert_row(G_statement_number, G_bank_account_num, nvl(X_rec_no, 0), fnd_message.get);
2880: IF l_DEBUG in ('Y', 'C') THEN
2881: cep_standard.debug('EXCEPTION: CE_BANK_STATEMENT_LOADER.Decode_Line_Other - '||to_char(l_err));
2882: END IF;
2883: END Decode_Line_Other;
2884:
2885: FUNCTION Get_Main_Rec_ID (X_hdr_or_line VARCHAR2) RETURN VARCHAR2 IS

Line 2992: cep_standard.debug('>>CE_BANK_STATEMENT_LOADER.Load_Others');

2988: l_crncy_cd_read BOOLEAN := FALSE; -- 13688013: Added
2989:
2990: INVALID_ACCOUNT EXCEPTION;
2991: BEGIN
2992: cep_standard.debug('>>CE_BANK_STATEMENT_LOADER.Load_Others');
2993:
2994: l_line_rec_id := Get_Main_Rec_ID('L');
2995: l_hdr_rec_id := Get_Main_Rec_ID('H');
2996:

Line 3157: cep_standard.debug('<

3153: IF (l_process_this_record) THEN
3154: Insert_Hdr;
3155: END IF;
3156: END IF;
3157: cep_standard.debug('< 3158: EXCEPTION
3159: WHEN INVALID_ACCOUNT THEN
3160: cep_standard.debug('EXCEPTION: CE_BANK_STATEMENT_LOADER.INVALID_ACCOUNT');
3161:

Line 3160: cep_standard.debug('EXCEPTION: CE_BANK_STATEMENT_LOADER.INVALID_ACCOUNT');

3156: END IF;
3157: cep_standard.debug('< 3158: EXCEPTION
3159: WHEN INVALID_ACCOUNT THEN
3160: cep_standard.debug('EXCEPTION: CE_BANK_STATEMENT_LOADER.INVALID_ACCOUNT');
3161:
3162: WHEN OTHERS THEN
3163: l_err := SQLCODE;
3164: cep_standard.debug('EXCEPTION: CE_BANK_STATEMENT_LOADER.Load_Others - '

Line 3164: cep_standard.debug('EXCEPTION: CE_BANK_STATEMENT_LOADER.Load_Others - '

3160: cep_standard.debug('EXCEPTION: CE_BANK_STATEMENT_LOADER.INVALID_ACCOUNT');
3161:
3162: WHEN OTHERS THEN
3163: l_err := SQLCODE;
3164: cep_standard.debug('EXCEPTION: CE_BANK_STATEMENT_LOADER.Load_Others - '
3165: ||to_char(l_err)||
3166: 'Rec no - '|| nvl(G_rec_no, 0));
3167: RAISE;
3168: END Load_Others;

Line 3206: cep_standard.debug('>>CE_BANK_STATEMENT_LOADER.Decode_Line_SWIFT');

3202: l_pos1 NUMBER;
3203: l_pos2 NUMBER;
3204: l_pos3 NUMBER;
3205: BEGIN
3206: cep_standard.debug('>>CE_BANK_STATEMENT_LOADER.Decode_Line_SWIFT');
3207: FOR C_rec IN C_tmp_tbl
3208: LOOP
3209: l_str := C_rec.column35;
3210:

Line 3327: cep_standard.debug('>>CE_BANK_STATEMENT_LOADER.Decode_Description');

3323: l_rec_id VARCHAR2(30);
3324: l_rec_id_no NUMBER; --14578532
3325:
3326: BEGIN
3327: cep_standard.debug('>>CE_BANK_STATEMENT_LOADER.Decode_Description');
3328: cep_standard.debug('Looping C_tmp_tbl...');
3329:
3330: FOR C_rec IN C_tmp_tbl
3331: LOOP

Line 3403: cep_standard.debug('<

3399: WHERE rec_no = C_rec.rec_no;
3400: END IF;
3401: END LOOP;
3402:
3403: cep_standard.debug('< 3404: END Decode_Description;
3405:
3406: /* ---------------------------------------------------------------------
3407: | PROCEDURE |

Line 3418: cep_standard.debug('>>CE_BANK_STATEMENT_LOADER.Load_SWIFT940');

3414: | 21-Feb-2012 vnetan Bug 13688013: Added debug statements |
3415: --------------------------------------------------------------------- */
3416: PROCEDURE Load_SWIFT940 IS
3417: BEGIN
3418: cep_standard.debug('>>CE_BANK_STATEMENT_LOADER.Load_SWIFT940');
3419: Decode_Line_SWIFT;
3420: Decode_Description;
3421: Load_Others;
3422: cep_standard.debug('<

Line 3422: cep_standard.debug('<

3418: cep_standard.debug('>>CE_BANK_STATEMENT_LOADER.Load_SWIFT940');
3419: Decode_Line_SWIFT;
3420: Decode_Description;
3421: Load_Others;
3422: cep_standard.debug('< 3423: END Load_SWIFT940;
3424:
3425: PROCEDURE Load_Bank_Statement(errbuf OUT NOCOPY VARCHAR2,
3426: retcode OUT NOCOPY NUMBER,

Line 3489: cep_standard.debug('>>CE_BANK_STATEMENT_LOADER.Load_Bank_Statement');

3485:
3486: IF l_DEBUG in ('Y', 'C') THEN
3487: cep_standard.enable_debug(G_debug_path,
3488: G_debug_file || '-LBS');
3489: cep_standard.debug('>>CE_BANK_STATEMENT_LOADER.Load_Bank_Statement');
3490: END IF;
3491: --
3492: -- Wait until SQL*Loader program is completed.
3493: --

Line 3592: cep_standard.debug('<

3588:
3589: CE_BANK_STMT_SQL_LDR.Print_Report(G_map_id, G_data_file_name);
3590:
3591: IF l_DEBUG in ('Y', 'C') THEN
3592: cep_standard.debug('< 3593: END IF;
3594: IF G_display_debug = 'Y' THEN
3595: cep_standard.disable_debug(G_display_debug);
3596: END IF;

Line 3618: END CE_BANK_STATEMENT_LOADER;

3614: END IF;
3615: RAISE;
3616: END Load_Bank_Statement;
3617:
3618: END CE_BANK_STATEMENT_LOADER;