eTRM uses javascript that opens and focuses a separate window to display reports. Your browser does not appear to support javascript. This should not prevent you from using eTRM but it does mean the window focus feature will not work. Please check the contents of other windows on your desktop if you click on a link that does not appear to do anything.

APPS.AP_ACCTG_DATA_FIX_PKG dependencies on FND_LOG

Line 4: G_CURRENT_RUNTIME_LEVEL NUMBER := FND_LOG.G_CURRENT_RUNTIME_LEVEL;

1: PACKAGE BODY AP_Acctg_Data_Fix_PKG AS
2: /* $Header: apgdfalb.pls 120.45.12020000.5 2012/10/16 11:45:48 vinerao ship $ */
3:
4: G_CURRENT_RUNTIME_LEVEL NUMBER := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
5: G_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
6: G_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
7: G_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
8: G_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;

Line 5: G_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;

1: PACKAGE BODY AP_Acctg_Data_Fix_PKG AS
2: /* $Header: apgdfalb.pls 120.45.12020000.5 2012/10/16 11:45:48 vinerao ship $ */
3:
4: G_CURRENT_RUNTIME_LEVEL NUMBER := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
5: G_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
6: G_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
7: G_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
8: G_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
9: G_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;

Line 6: G_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;

2: /* $Header: apgdfalb.pls 120.45.12020000.5 2012/10/16 11:45:48 vinerao ship $ */
3:
4: G_CURRENT_RUNTIME_LEVEL NUMBER := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
5: G_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
6: G_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
7: G_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
8: G_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
9: G_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
10: G_LEVEL_STATEMENT CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;

Line 7: G_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;

3:
4: G_CURRENT_RUNTIME_LEVEL NUMBER := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
5: G_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
6: G_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
7: G_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
8: G_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
9: G_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
10: G_LEVEL_STATEMENT CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;
11: G_MODULE_NAME CONSTANT VARCHAR2(50) :='AP.PLSQL.AP_ACCTG_DATA_FIX_PKG.';

Line 8: G_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;

4: G_CURRENT_RUNTIME_LEVEL NUMBER := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
5: G_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
6: G_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
7: G_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
8: G_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
9: G_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
10: G_LEVEL_STATEMENT CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;
11: G_MODULE_NAME CONSTANT VARCHAR2(50) :='AP.PLSQL.AP_ACCTG_DATA_FIX_PKG.';
12:

Line 9: G_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;

5: G_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
6: G_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
7: G_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
8: G_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
9: G_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
10: G_LEVEL_STATEMENT CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;
11: G_MODULE_NAME CONSTANT VARCHAR2(50) :='AP.PLSQL.AP_ACCTG_DATA_FIX_PKG.';
12:
13:

Line 10: G_LEVEL_STATEMENT CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;

6: G_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
7: G_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
8: G_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
9: G_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
10: G_LEVEL_STATEMENT CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;
11: G_MODULE_NAME CONSTANT VARCHAR2(50) :='AP.PLSQL.AP_ACCTG_DATA_FIX_PKG.';
12:
13:
14:

Line 744: l_log_msg FND_LOG_MESSAGES.MESSAGE_TEXT%TYPE;

740: l_orgid NUMBER(10);
741: l_dummy NUMBER;
742:
743: l_procedure_name CONSTANT VARCHAR2(30) := 'del_nonfinal_xla_entries';
744: l_log_msg FND_LOG_MESSAGES.MESSAGE_TEXT%TYPE;
745:
746:
747: BEGIN
748: l_calling_sequence := 'AP_ACCTG_DATA_FIX_PKG.Del_Nonfinal_xla_entries <- '||p_calling_sequence;

Line 750: G_CURRENT_RUNTIME_LEVEL := FND_LOG.G_CURRENT_RUNTIME_LEVEL;

746:
747: BEGIN
748: l_calling_sequence := 'AP_ACCTG_DATA_FIX_PKG.Del_Nonfinal_xla_entries <- '||p_calling_sequence;
749:
750: G_CURRENT_RUNTIME_LEVEL := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
751:
752: l_log_msg := 'Begin of procedure '|| l_procedure_name;
753: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
754: FND_LOG.STRING(G_LEVEL_PROCEDURE,

Line 754: FND_LOG.STRING(G_LEVEL_PROCEDURE,

750: G_CURRENT_RUNTIME_LEVEL := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
751:
752: l_log_msg := 'Begin of procedure '|| l_procedure_name;
753: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
754: FND_LOG.STRING(G_LEVEL_PROCEDURE,
755: G_MODULE_NAME||l_procedure_name||'.begin',
756: l_log_msg);
757: END IF;
758:

Line 761: FND_LOG.STRING(G_LEVEL_PROCEDURE,

757: END IF;
758:
759: l_log_msg := 'p_event_id: '||p_event_id ;
760: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
761: FND_LOG.STRING(G_LEVEL_PROCEDURE,
762: G_MODULE_NAME||l_procedure_name,
763: l_log_msg);
764: END IF;
765:

Line 768: FND_LOG.STRING(G_LEVEL_PROCEDURE,

764: END IF;
765:
766: l_log_msg := 'p_delete_event '||p_delete_event ;
767: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
768: FND_LOG.STRING(G_LEVEL_PROCEDURE,
769: G_MODULE_NAME||l_procedure_name,
770: l_log_msg);
771: END IF;
772:

Line 797: FND_LOG.STRING(G_LEVEL_PROCEDURE,

793: IF l_dummy = 0 THEN
794:
795: l_log_msg := 'Event_ID '||p_event_ID||' does not exist, returning';
796: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
797: FND_LOG.STRING(G_LEVEL_PROCEDURE,
798: G_MODULE_NAME||l_procedure_name,
799: l_log_msg);
800: END IF;
801:

Line 844: FND_LOG.STRING(G_LEVEL_PROCEDURE,

840:
841: l_log_msg := 'The event is processed or has a header which has been '||
842: 'transferred to GL, returning ';
843: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
844: FND_LOG.STRING(G_LEVEL_PROCEDURE,
845: G_MODULE_NAME||l_procedure_name,
846: l_log_msg);
847: END IF;
848:

Line 889: FND_LOG.STRING(G_LEVEL_PROCEDURE,

885: ' Exception in fetching security context';
886: Print(l_error_log);
887:
888: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
889: FND_LOG.STRING(G_LEVEL_PROCEDURE,
890: G_MODULE_NAME||l_procedure_name,
891: l_error_log);
892: END IF;
893:

Line 908: FND_LOG.STRING(G_LEVEL_PROCEDURE,

904: Print(l_error_log);
905:
906:
907: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
908: FND_LOG.STRING(G_LEVEL_PROCEDURE,
909: G_MODULE_NAME||l_procedure_name,
910: l_error_log);
911: END IF;
912:

Line 941: FND_LOG.STRING(G_LEVEL_PROCEDURE,

937: END;
938:
939: l_log_msg := 'l_journals_exist: '||l_journals_exist;
940: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
941: FND_LOG.STRING(G_LEVEL_PROCEDURE,
942: G_MODULE_NAME||l_procedure_name,
943: l_log_msg);
944: END IF;
945:

Line 965: FND_LOG.STRING(G_LEVEL_PROCEDURE,

961: l_error_log := 'Error in xla_DataFixes_Pub.delete_journal_entries:'|| x_msg_Data;
962: Print(l_error_log);
963:
964: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
965: FND_LOG.STRING(G_LEVEL_PROCEDURE,
966: G_MODULE_NAME||l_procedure_name,
967: l_error_log);
968: END IF;
969:

Line 995: FND_LOG.STRING(G_LEVEL_PROCEDURE,

991: Print(l_error_log);
992:
993:
994: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
995: FND_LOG.STRING(G_LEVEL_PROCEDURE,
996: G_MODULE_NAME||l_procedure_name,
997: l_error_log);
998: END IF;
999: RAISE;

Line 1046: FND_LOG.STRING(G_LEVEL_PROCEDURE,

1042: END IF;
1043:
1044: l_log_msg := 'End of procedure '|| l_procedure_name;
1045: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
1046: FND_LOG.STRING(G_LEVEL_PROCEDURE,
1047: G_MODULE_NAME||l_procedure_name||'.end',
1048: l_log_msg);
1049: END IF;
1050:

Line 1059: FND_LOG.STRING(G_LEVEL_PROCEDURE,

1055: ' in '||l_calling_sequence||' while performing '||l_debug_info;
1056: Print(l_error_log);
1057:
1058: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
1059: FND_LOG.STRING(G_LEVEL_PROCEDURE,
1060: G_MODULE_NAME||l_procedure_name,
1061: l_error_log);
1062: END IF;
1063:

Line 2089: l_log_msg FND_LOG_MESSAGES.MESSAGE_TEXT%TYPE;

2085: ' where table_name = ''AP_UNDO_EVENT_LOG'' ';
2086: log_table_exists NUMBER ;
2087: -- Logging:
2088: l_procedure_name CONSTANT VARCHAR2(30) := 'Undo_Accounting';
2089: l_log_msg FND_LOG_MESSAGES.MESSAGE_TEXT%TYPE;
2090:
2091: BEGIN
2092:
2093: l_calling_sequence := 'AP_ACCTG_DATA_FIX_PKG <- '||p_calling_sequence;

Line 2095: G_CURRENT_RUNTIME_LEVEL := FND_LOG.G_CURRENT_RUNTIME_LEVEL;

2091: BEGIN
2092:
2093: l_calling_sequence := 'AP_ACCTG_DATA_FIX_PKG <- '||p_calling_sequence;
2094:
2095: G_CURRENT_RUNTIME_LEVEL := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
2096:
2097: l_log_msg := 'Begin of procedure '|| l_procedure_name;
2098: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
2099: FND_LOG.STRING(G_LEVEL_PROCEDURE,

Line 2099: FND_LOG.STRING(G_LEVEL_PROCEDURE,

2095: G_CURRENT_RUNTIME_LEVEL := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
2096:
2097: l_log_msg := 'Begin of procedure '|| l_procedure_name;
2098: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
2099: FND_LOG.STRING(G_LEVEL_PROCEDURE,
2100: G_MODULE_NAME||l_procedure_name,
2101: l_log_msg);
2102: END IF;
2103:

Line 2117: FND_LOG.STRING(G_LEVEL_PROCEDURE,

2113: IF ( log_table_exists = 0) THEN
2114:
2115: l_log_msg := 'Before creating Table AP_undo_event_log';
2116: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
2117: FND_LOG.STRING(G_LEVEL_PROCEDURE,
2118: G_MODULE_NAME||l_procedure_name,
2119: l_log_msg);
2120: END IF;
2121:

Line 2131: FND_LOG.STRING(G_LEVEL_PROCEDURE,

2127: INVOICE_ID NUMBER ,CHECK_ID NUMBER, BUG_ID NUMBER)';
2128:
2129: l_log_msg := 'Created table AP_undo_event_log';
2130: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
2131: FND_LOG.STRING(G_LEVEL_PROCEDURE,
2132: G_MODULE_NAME||l_procedure_name,
2133: l_log_msg);
2134: END IF;
2135:

Line 2141: FND_LOG.STRING(G_LEVEL_PROCEDURE,

2137: WHEN OTHERS THEN
2138:
2139: l_log_msg := 'Could not create table AP_undo_event_log';
2140: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
2141: FND_LOG.STRING(G_LEVEL_PROCEDURE,
2142: G_MODULE_NAME||l_procedure_name,
2143: l_log_msg);
2144: END IF;
2145:

Line 2157: FND_LOG.STRING(G_LEVEL_PROCEDURE,

2153: IF(Events_to_Process_tab.COUNT =0) THEN
2154: l_log_msg := 'No events exist for the parameters passed : '||p_Source_Table
2155: || ' , '||p_Source_Id;
2156: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
2157: FND_LOG.STRING(G_LEVEL_PROCEDURE,
2158: G_MODULE_NAME||l_procedure_name,
2159: l_log_msg);
2160: END IF;
2161: END IF;

Line 2190: FND_LOG.STRING(G_LEVEL_PROCEDURE,

2186: IF(Check_Entered_Gl_date%NOTFOUND ) THEN
2187: l_log_msg := 'The entered date did not have any period, please recheck '||
2188: ' exiting.....';
2189: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
2190: FND_LOG.STRING(G_LEVEL_PROCEDURE,
2191: G_MODULE_NAME||l_procedure_name,
2192: l_log_msg);
2193: END IF;
2194: RETURN; -- exit undo accounting program

Line 2216: FND_LOG.STRING(G_LEVEL_PROCEDURE,

2212: mo_Global.Set_Policy_Context('S',Events_to_Process_tab(i).Cur_Org_Id);
2213:
2214: l_log_msg := 'Set Org context to '||Events_to_Process_tab(i).Cur_Org_Id;
2215: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
2216: FND_LOG.STRING(G_LEVEL_PROCEDURE,
2217: G_MODULE_NAME||l_procedure_name,
2218: l_log_msg);
2219: END IF;
2220:

Line 2229: FND_LOG.STRING(G_LEVEL_PROCEDURE,

2225: Debug_Info := 'xla_DataFixes_Pub.Reverse_Journal_entries';
2226:
2227: l_log_msg := 'Calling xla_DataFixes_Pub.Reverse_Journal_entries';
2228: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
2229: FND_LOG.STRING(G_LEVEL_PROCEDURE,
2230: G_MODULE_NAME||l_procedure_name,
2231: l_log_msg);
2232: END IF;
2233:

Line 2258: FND_LOG.STRING(G_LEVEL_PROCEDURE,

2254: p_new_event_id := x_New_Event_Id;
2255:
2256: l_log_msg := 'l_Return_Status='||l_Return_Status;
2257: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
2258: FND_LOG.STRING(G_LEVEL_PROCEDURE,
2259: G_MODULE_NAME||l_procedure_name,
2260: l_log_msg);
2261: END IF;
2262:

Line 2268: FND_LOG.STRING(G_LEVEL_PROCEDURE,

2264:
2265: l_log_msg := 'Undo_Accounting : Error in xla_DataFixes_Pub.Reverse_Journal_entries
2266: :'|| x_msg_Data;
2267: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
2268: FND_LOG.STRING(G_LEVEL_PROCEDURE,
2269: G_MODULE_NAME||l_procedure_name,
2270: l_log_msg);
2271: END IF;
2272: p_return_code := 'XLA_ERROR';

Line 2281: FND_LOG.STRING(G_LEVEL_PROCEDURE,

2277: Debug_Info := 'xla_DataFixes_Pub.delete_journal_entries';
2278:
2279: l_log_msg := 'Calling xla_datafixes_pub.delete_journal_entries';
2280: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
2281: FND_LOG.STRING(G_LEVEL_PROCEDURE,
2282: G_MODULE_NAME||l_procedure_name,
2283: l_log_msg);
2284: END IF;
2285:

Line 2297: FND_LOG.STRING(G_LEVEL_PROCEDURE,

2293: x_msg_data => x_msg_Data);
2294:
2295: l_log_msg := 'l_Return_Status='||l_Return_Status;
2296: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
2297: FND_LOG.STRING(G_LEVEL_PROCEDURE,
2298: G_MODULE_NAME||l_procedure_name,
2299: l_log_msg);
2300: END IF;
2301:

Line 2307: FND_LOG.STRING(G_LEVEL_PROCEDURE,

2303:
2304: l_log_msg := 'Undo_Accounting : Error in xla_DataFixes_Pub.delete_journal_entries
2305: :'|| x_msg_Data;
2306: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
2307: FND_LOG.STRING(G_LEVEL_PROCEDURE,
2308: G_MODULE_NAME||l_procedure_name,
2309: l_log_msg);
2310: END IF;
2311:

Line 2396: FND_LOG.STRING(G_LEVEL_PROCEDURE,

2392: p_return_code := 'SUCCESS';
2393:
2394: l_log_msg :='Updated Transaction tables for Payments';
2395: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
2396: FND_LOG.STRING(G_LEVEL_PROCEDURE,
2397: G_MODULE_NAME||l_procedure_name,
2398: l_log_msg);
2399: END IF;
2400:

Line 2461: FND_LOG.STRING(G_LEVEL_PROCEDURE,

2457: p_return_code := 'SUCCESS';
2458:
2459: l_log_msg :='Updated Transaction tables for Invoice';
2460: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
2461: FND_LOG.STRING(G_LEVEL_PROCEDURE,
2462: G_MODULE_NAME||l_procedure_name,
2463: l_log_msg);
2464: END IF;
2465:

Line 2484: FND_LOG.STRING(G_LEVEL_PROCEDURE,

2480:
2481: l_log_msg :='Undo Accounting Unsuccessful for Invoice id ' ||l_Source_Id
2482: ||' event id ' ||Events_to_Process_tab(i).Event_Id;
2483: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
2484: FND_LOG.STRING(G_LEVEL_PROCEDURE,
2485: G_MODULE_NAME||l_procedure_name,
2486: l_log_msg);
2487: END IF;
2488:

Line 2496: FND_LOG.STRING(G_LEVEL_PROCEDURE,

2492:
2493: l_log_msg :='Undo Accounting Unsuccessful for Check id ' ||l_Source_Id
2494: ||' event id ' ||Events_to_Process_tab(i).Event_Id;
2495: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
2496: FND_LOG.STRING(G_LEVEL_PROCEDURE,
2497: G_MODULE_NAME||l_procedure_name,
2498: l_log_msg);
2499: END IF;
2500:

Line 2508: FND_LOG.STRING(G_LEVEL_PROCEDURE,

2504: EXCEPTION
2505: WHEN OTHERS THEN
2506: l_log_msg :='Exception in Undo_accounting ';
2507: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
2508: FND_LOG.STRING(G_LEVEL_PROCEDURE,
2509: G_MODULE_NAME||l_procedure_name,
2510: l_log_msg);
2511: END IF;
2512: IF (SQLCODE <> - 20001) THEN

Line 2579: FND_LOG.STRING(G_LEVEL_PROCEDURE,

2575: EXCEPTION
2576: WHEN OTHERS THEN
2577: l_log_msg :='Exception in Undo_accounting ';
2578: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
2579: FND_LOG.STRING(G_LEVEL_PROCEDURE,
2580: G_MODULE_NAME||l_procedure_name,
2581: l_log_msg);
2582: END IF;
2583: IF (SQLCODE <> - 20001) THEN

Line 3182: l_log_msg FND_LOG_MESSAGES.MESSAGE_TEXT%TYPE;

3178:
3179: PROCEDURE push_error(p_error_code IN VARCHAR2,
3180: p_error_stack IN OUT NOCOPY Rejection_List_Tab_Typ) IS
3181:
3182: l_log_msg FND_LOG_MESSAGES.MESSAGE_TEXT%TYPE;
3183: l_procedure_name CONSTANT VARCHAR2(30) := 'Push_error';
3184: l_index NUMBER;
3185:
3186: BEGIN

Line 3195: FND_LOG.STRING(G_LEVEL_PROCEDURE,

3191: ' Pushing the error :'||p_error_code||
3192: ' in the stack';
3193:
3194: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
3195: FND_LOG.STRING(G_LEVEL_PROCEDURE,
3196: G_MODULE_NAME||l_procedure_name,
3197: l_log_msg);
3198: END IF;
3199:

Line 3257: l_log_msg FND_LOG_MESSAGES.MESSAGE_TEXT%TYPE;

3253: l_prepay_dist_tab Prepay_Dist_Tab_Typ;
3254: l_rejection_tab Rejection_List_Tab_Typ;
3255:
3256: l_procedure_name CONSTANT VARCHAR2(30) := 'Final_Pay_Round_Dfix';
3257: l_log_msg FND_LOG_MESSAGES.MESSAGE_TEXT%TYPE;
3258:
3259: -- bug9716573, added budgetary control flag to the cursor
3260: -- bug11772495, removed budgetary control flag from the cursor
3261: --

Line 3454: G_CURRENT_RUNTIME_LEVEL := FND_LOG.G_CURRENT_RUNTIME_LEVEL;

3450: BEGIN
3451:
3452:
3453: l_calling_sequence := 'Final_Pay_Round_Dfix <- '||P_Calling_Sequence;
3454: G_CURRENT_RUNTIME_LEVEL := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
3455:
3456: l_log_msg := 'Procedure Begins';
3457:
3458: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN

Line 3459: FND_LOG.STRING(G_LEVEL_PROCEDURE,

3455:
3456: l_log_msg := 'Procedure Begins';
3457:
3458: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
3459: FND_LOG.STRING(G_LEVEL_PROCEDURE,
3460: G_MODULE_NAME||l_procedure_name,
3461: l_log_msg);
3462: END IF;
3463:

Line 3467: FND_LOG.STRING(G_LEVEL_STATEMENT,

3463:
3464: l_debug_info := 'Before Verifying if the Invoice is Valid';
3465: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL ) THEN
3466:
3467: FND_LOG.STRING(G_LEVEL_STATEMENT,
3468: G_MODULE_NAME||l_procedure_name,
3469: l_debug_info);
3470: END IF;
3471:

Line 3496: FND_LOG.STRING(G_LEVEL_STATEMENT,

3492:
3493:
3494: l_debug_info := 'Before getting the operating unit for the Invoice';
3495: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL ) THEN
3496: FND_LOG.STRING(G_LEVEL_STATEMENT,
3497: G_MODULE_NAME||l_procedure_name,
3498: l_debug_info);
3499: END IF;
3500:

Line 3508: FND_LOG.STRING(G_LEVEL_STATEMENT,

3504: WHERE invoice_id = l_invoice_id;
3505:
3506: l_debug_info := 'Before setting the org context for the Invoice';
3507: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL ) THEN
3508: FND_LOG.STRING(G_LEVEL_STATEMENT,
3509: G_MODULE_NAME||l_procedure_name,
3510: l_debug_info);
3511: END IF;
3512:

Line 3523: FND_LOG.STRING(G_LEVEL_STATEMENT,

3519: --
3520:
3521: l_debug_info := 'Before checking for the Validation status of the Invoice';
3522: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL ) THEN
3523: FND_LOG.STRING(G_LEVEL_STATEMENT,
3524: G_MODULE_NAME||l_procedure_name,
3525: l_debug_info);
3526: END IF;
3527:

Line 3546: FND_LOG.STRING(G_LEVEL_STATEMENT,

3542:
3543: l_debug_info := 'Check if there is any of the events accruing liability '||
3544: 'have been Accounted in 11i';
3545: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL ) THEN
3546: FND_LOG.STRING(G_LEVEL_STATEMENT,
3547: G_MODULE_NAME||l_procedure_name,
3548: l_debug_info);
3549: END IF;
3550:

Line 3580: FND_LOG.STRING(G_LEVEL_STATEMENT,

3576: l_debug_info := 'Check if any of the Invoice events (Including '||
3577: 'Prepayment Applications) have not been '||
3578: 'Accounted ';
3579: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL ) THEN
3580: FND_LOG.STRING(G_LEVEL_STATEMENT,
3581: G_MODULE_NAME||l_procedure_name,
3582: l_debug_info);
3583: END IF;
3584:

Line 3610: FND_LOG.STRING(G_LEVEL_STATEMENT,

3606:
3607: l_debug_info := 'Check if any of the Payment events pertaining '||
3608: 'to the Invoice have been accounted in 11i ';
3609: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL ) THEN
3610: FND_LOG.STRING(G_LEVEL_STATEMENT,
3611: G_MODULE_NAME||l_procedure_name,
3612: l_debug_info);
3613: END IF;
3614:

Line 3643: FND_LOG.STRING(G_LEVEL_STATEMENT,

3639:
3640: l_debug_info := 'Checking if any of the Invoice events is not transferred '||
3641: 'to GL';
3642: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL ) THEN
3643: FND_LOG.STRING(G_LEVEL_STATEMENT,
3644: G_MODULE_NAME||l_procedure_name,
3645: l_debug_info);
3646: END IF;
3647:

Line 3676: FND_LOG.STRING(G_LEVEL_STATEMENT,

3672:
3673: l_debug_info := 'Checking if any of the Payment Events is not transferred '||
3674: 'to GL';
3675: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL ) THEN
3676: FND_LOG.STRING(G_LEVEL_STATEMENT,
3677: G_MODULE_NAME||l_procedure_name,
3678: l_debug_info);
3679: END IF;
3680:

Line 3712: FND_LOG.STRING(G_LEVEL_STATEMENT,

3708: -- Payment Rounding
3709:
3710: l_debug_info := 'fetch the event for which we need to round';
3711: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL ) THEN
3712: FND_LOG.STRING(G_LEVEL_STATEMENT,
3713: G_MODULE_NAME||l_procedure_name,
3714: l_debug_info);
3715: END IF;
3716:

Line 3764: FND_LOG.STRING(G_LEVEL_STATEMENT,

3760: p_op_event_id := l_max_event_id;
3761: l_debug_info := 'Check if ane event has been suitably determined for '||
3762: 'rounding';
3763: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL ) THEN
3764: FND_LOG.STRING(G_LEVEL_STATEMENT,
3765: G_MODULE_NAME||l_procedure_name,
3766: l_debug_info);
3767: END IF;
3768:

Line 3778: FND_LOG.STRING(G_LEVEL_STATEMENT,

3774:
3775: l_debug_info := 'Cannot proceed without an available event,'||
3776: 'bailing out';
3777: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL ) THEN
3778: FND_LOG.STRING(G_LEVEL_STATEMENT,
3779: G_MODULE_NAME||l_procedure_name,
3780: l_debug_info);
3781: END IF;
3782:

Line 3790: FND_LOG.STRING(G_LEVEL_STATEMENT,

3786:
3787: l_debug_info := 'For the event type determined set the event '||
3788: 'type O/P flag appropriately ';
3789: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL ) THEN
3790: FND_LOG.STRING(G_LEVEL_STATEMENT,
3791: G_MODULE_NAME||l_procedure_name,
3792: l_debug_info);
3793: END IF;
3794:

Line 3804: FND_LOG.STRING(G_LEVEL_STATEMENT,

3800:
3801:
3802: l_debug_info := ' Check if the Invoice is fully paid ';
3803: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL ) THEN
3804: FND_LOG.STRING(G_LEVEL_STATEMENT,
3805: G_MODULE_NAME||l_procedure_name,
3806: l_debug_info);
3807: END IF;
3808:

Line 3816: FND_LOG.STRING(G_LEVEL_STATEMENT,

3812: CLOSE Ap_Acctg_Pay_Dist_Pkg.Invoice_Header;
3813:
3814: l_debug_info := 'Before the is_final_payment api call';
3815: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL ) THEN
3816: FND_LOG.STRING(G_LEVEL_STATEMENT,
3817: G_MODULE_NAME||l_procedure_name,
3818: l_debug_info);
3819: END IF;
3820:

Line 3843: FND_LOG.STRING(G_LEVEL_STATEMENT,

3839:
3840: l_debug_info := 'The final rejection count after evaluating all the '||
3841: 'factors for final_pay rounding is '||p_rej_count;
3842: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL ) THEN
3843: FND_LOG.STRING(G_LEVEL_STATEMENT,
3844: G_MODULE_NAME||l_procedure_name,
3845: l_debug_info);
3846: END IF;
3847:

Line 3853: FND_LOG.STRING(G_LEVEL_STATEMENT,

3849: IF p_rej_count > 0 THEN
3850: l_debug_info := 'Since there are rejections, setting the return status '||
3851: 'to false, and returning';
3852: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL ) THEN
3853: FND_LOG.STRING(G_LEVEL_STATEMENT,
3854: G_MODULE_NAME||l_procedure_name,
3855: l_debug_info);
3856: END IF;
3857:

Line 3865: FND_LOG.STRING(G_LEVEL_STATEMENT,

3861:
3862: l_debug_info := 'Determine the max id for the distribution '||
3863: 'pertaining to the Payment/Prepayment distribution ';
3864: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL ) THEN
3865: FND_LOG.STRING(G_LEVEL_STATEMENT,
3866: G_MODULE_NAME||l_procedure_name,
3867: l_debug_info);
3868: END IF;
3869:

Line 3892: FND_LOG.STRING(G_LEVEL_STATEMENT,

3888: -- specific event
3889:
3890: l_debug_info := 'Fetching the event record';
3891: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL ) THEN
3892: FND_LOG.STRING(G_LEVEL_STATEMENT,
3893: G_MODULE_NAME||l_procedure_name,
3894: l_debug_info);
3895: END IF;
3896:

Line 3906: FND_LOG.STRING(G_LEVEL_STATEMENT,

3902: IF p_op_event_type NOT LIKE 'PREPAY%' THEN
3903:
3904: l_debug_info := 'fetching the Payment History Record';
3905: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL ) THEN
3906: FND_LOG.STRING(G_LEVEL_STATEMENT,
3907: G_MODULE_NAME||l_procedure_name,
3908: l_debug_info);
3909: END IF;
3910:

Line 3917: FND_LOG.STRING(G_LEVEL_STATEMENT,

3913: CLOSE Ap_Acctg_Pay_Dist_Pkg.Payment_History;
3914:
3915: l_debug_info := 'Fetching the Invoice Payment Record';
3916: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL ) THEN
3917: FND_LOG.STRING(G_LEVEL_STATEMENT,
3918: G_MODULE_NAME||l_procedure_name,
3919: l_debug_info);
3920: END IF;
3921:

Line 3945: FND_LOG.STRING(G_LEVEL_STATEMENT,

3941: AND xe.event_id = l_max_event_id;
3942:
3943: l_debug_info := 'Check_id :'||l_check_id||' fetched for the event ';
3944: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL ) THEN
3945: FND_LOG.STRING(G_LEVEL_STATEMENT,
3946: G_MODULE_NAME||l_procedure_name,
3947: l_debug_info);
3948: END IF;
3949:

Line 3957: FND_LOG.STRING(G_LEVEL_STATEMENT,

3953: ' Cursor Invoice_Payments opened with :'||
3954: ' Invoice_id:'||l_invoice_id||' Check_id:'||l_check_id||
3955: ' Event_id:'||l_max_event_id;
3956: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL ) THEN
3957: FND_LOG.STRING(G_LEVEL_STATEMENT,
3958: G_MODULE_NAME||l_procedure_name,
3959: l_debug_info);
3960: END IF;
3961:

Line 3973: FND_LOG.STRING(G_LEVEL_STATEMENT,

3969: ' Cursor Invoice_Payments opened with :'||
3970: ' Invoice_id:'||l_invoice_id||' Check_id:'||l_check_id||
3971: ' Event_id: null';
3972: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL ) THEN
3973: FND_LOG.STRING(G_LEVEL_STATEMENT,
3974: G_MODULE_NAME||l_procedure_name,
3975: l_debug_info);
3976: END IF;
3977:

Line 3989: FND_LOG.STRING(G_LEVEL_STATEMENT,

3985: ELSE
3986:
3987: l_debug_info := 'Fetching the Prepay History Record';
3988: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL ) THEN
3989: FND_LOG.STRING(G_LEVEL_STATEMENT,
3990: G_MODULE_NAME||l_procedure_name,
3991: l_debug_info);
3992: END IF;
3993:

Line 4000: FND_LOG.STRING(G_LEVEL_STATEMENT,

3996: CLOSE Prepay_History;
3997:
3998: l_debug_info := 'Fetching the Prepay Distribution record';
3999: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL ) THEN
4000: FND_LOG.STRING(G_LEVEL_STATEMENT,
4001: G_MODULE_NAME||l_procedure_name,
4002: l_debug_info);
4003: END IF;
4004:

Line 4013: FND_LOG.STRING(G_LEVEL_STATEMENT,

4009: END IF;
4010:
4011: l_debug_info := 'Before the call to the Final Pay api';
4012: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL ) THEN
4013: FND_LOG.STRING(G_LEVEL_STATEMENT,
4014: G_MODULE_NAME||l_procedure_name,
4015: l_debug_info);
4016: END IF;
4017:

Line 4039: FND_LOG.STRING(G_LEVEL_STATEMENT,

4035: IF p_op_event_type NOT LIKE 'PREPAY%' THEN
4036:
4037: l_debug_info := 'Fetching the details of the Payment Hist dists created';
4038: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL ) THEN
4039: FND_LOG.STRING(G_LEVEL_STATEMENT,
4040: G_MODULE_NAME||l_procedure_name,
4041: l_debug_info);
4042: END IF;
4043:

Line 4064: FND_LOG.STRING(G_LEVEL_STATEMENT,

4060: ELSE
4061:
4062: l_debug_info := 'Fetching the details of the Prepay Hist Dists Created';
4063: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL ) THEN
4064: FND_LOG.STRING(G_LEVEL_STATEMENT,
4065: G_MODULE_NAME||l_procedure_name,
4066: l_debug_info);
4067: END IF;
4068:

Line 4095: FND_LOG.STRING(G_LEVEL_PROCEDURE,

4091: END IF;
4092:
4093: l_log_msg := 'Procedure Ends';
4094: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
4095: FND_LOG.STRING(G_LEVEL_PROCEDURE,
4096: G_MODULE_NAME||l_procedure_name,
4097: l_log_msg);
4098: END IF;
4099:

Line 4283: FND_LOG.STRING(G_LEVEL_STATEMENT,

4279: BEGIN
4280:
4281: l_debug_info := 'Begin : function '||l_procedure_name;
4282: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL ) THEN
4283: FND_LOG.STRING(G_LEVEL_STATEMENT,
4284: G_MODULE_NAME||l_procedure_name,
4285: l_debug_info);
4286: END IF;
4287:

Line 4291: FND_LOG.STRING(G_LEVEL_STATEMENT,

4287:
4288: l_debug_info := 'input : p_source_type = '||p_source_type
4289: ||', p_source_id = '||p_source_id;
4290: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL ) THEN
4291: FND_LOG.STRING(G_LEVEL_STATEMENT,
4292: G_MODULE_NAME||l_procedure_name,
4293: l_debug_info);
4294: END IF;
4295:

Line 4322: FND_LOG.STRING(G_LEVEL_STATEMENT,

4318: EXCEPTION
4319: WHEN NO_DATA_FOUND THEN
4320: l_debug_info := 'source information is INVALID';
4321: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL ) THEN
4322: FND_LOG.STRING(G_LEVEL_STATEMENT,
4323: G_MODULE_NAME||l_procedure_name,
4324: l_debug_info);
4325: END IF;
4326: RETURN FALSE;

Line 4413: FND_LOG.STRING(G_LEVEL_STATEMENT,

4409:
4410: EXCEPTION
4411: WHEN OTHERS THEN
4412: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL ) THEN
4413: FND_LOG.STRING(G_LEVEL_STATEMENT,
4414: G_MODULE_NAME||l_procedure_name,
4415: SQLERRM);
4416: END IF;
4417:

Line 4611: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_procedure_name,

4607: ELSE
4608: l_debug_info := 'Either the invoice_id or the event_id column needs to be present in driver table '
4609: ||l_driver_table;
4610: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL ) THEN
4611: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_procedure_name,
4612: l_debug_info);
4613: END IF;
4614: print(l_debug_info);
4615: APP_EXCEPTION.RAISE_EXCEPTION();

Line 4730: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_procedure_name,

4726: l_debug_info := 'Before the call to the prepay_dist_appl routine for Invoice_id: ' ||
4727: repop_invoices_list.source_id_l(i);
4728:
4729: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL ) THEN
4730: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_procedure_name,
4731: l_debug_info);
4732: END IF;
4733:
4734: AP_ACCTG_PREPAY_DIST_PKG.prepay_dist_appl

Line 4741: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_procedure_name,

4737: l_debug_info := 'API call successful for Invoice_Id :'||
4738: repop_invoices_list.source_id_l(i);
4739:
4740: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL ) THEN
4741: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_procedure_name,
4742: l_debug_info);
4743: END IF;
4744:
4745: l_debug_info := 'Updating ap_invoice_distributions';

Line 4797: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_procedure_name, l_error_log);

4793: -- bug10056653, printing exception in the LOG
4794: Print(l_error_log);
4795:
4796: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL ) THEN
4797: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_procedure_name, l_error_log);
4798: END IF;
4799:
4800:
4801:

Line 5010: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_procedure_name,

5006: print(l_message);
5007:
5008:
5009: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL ) THEN
5010: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_procedure_name,
5011: l_error_log);
5012: END IF;
5013:
5014:

Line 5172: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_procedure_name,

5168: --
5169: Print(l_debug_info);
5170:
5171: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL ) THEN
5172: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_procedure_name,
5173: l_debug_info);
5174: END IF;
5175:
5176: APP_EXCEPTION.RAISE_EXCEPTION();

Line 5361: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_procedure_name,

5357: l_message := '';
5358: print(l_message);
5359:
5360: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL ) THEN
5361: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_procedure_name,
5362: l_error_log);
5363: END IF;
5364:
5365: APP_EXCEPTION.RAISE_EXCEPTION();

Line 5548: l_log_msg FND_LOG_MESSAGES.MESSAGE_TEXT%TYPE;

5544: log_table_exists_stmt VARCHAR2(200) := 'select count(*) from '||l_table_name
5545: ||' where table_name = ''AP_UNDO_EVENT_LOG'' ';
5546: log_table_exists NUMBER ;
5547: l_procedure_name CONSTANT VARCHAR2(30) := 'Undo_Accounting';
5548: l_log_msg FND_LOG_MESSAGES.MESSAGE_TEXT%TYPE;
5549:
5550: BEGIN
5551:
5552: l_calling_sequence := 'AP_ACCTG_DATA_FIX_PKG.undo_Inv_accounting <- '||p_calling_sequence;

Line 5554: G_CURRENT_RUNTIME_LEVEL := FND_LOG.G_CURRENT_RUNTIME_LEVEL;

5550: BEGIN
5551:
5552: l_calling_sequence := 'AP_ACCTG_DATA_FIX_PKG.undo_Inv_accounting <- '||p_calling_sequence;
5553:
5554: G_CURRENT_RUNTIME_LEVEL := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
5555:
5556: l_log_msg := 'Begin of procedure '|| l_procedure_name;
5557:
5558: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN

Line 5559: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||l_procedure_name||'.begin',l_log_msg);

5555:
5556: l_log_msg := 'Begin of procedure '|| l_procedure_name;
5557:
5558: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
5559: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||l_procedure_name||'.begin',l_log_msg);
5560: END IF;
5561:
5562: l_api_version := 1.0;
5563: l_init_msg_list := fnd_api.g_true;

Line 5575: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||l_procedure_name,l_log_msg);

5571: IF ( log_table_exists = 0) THEN
5572:
5573: l_log_msg := 'Before creating Table AP_undo_event_log';
5574: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
5575: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||l_procedure_name,l_log_msg);
5576: END IF;
5577:
5578: BEGIN
5579: EXECUTE IMMEDIATE 'CREATE TABLE AP_undo_event_log

Line 5591: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_procedure_name,l_log_msg);

5587:
5588: l_log_msg := 'Created table AP_undo_event_log';
5589:
5590: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
5591: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_procedure_name,l_log_msg);
5592: END IF;
5593:
5594: EXCEPTION
5595: WHEN OTHERS THEN

Line 5599: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_procedure_name,l_log_msg);

5595: WHEN OTHERS THEN
5596:
5597: l_log_msg := 'Could not create table AP_undo_event_log';
5598: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
5599: FND_LOG.STRING(G_LEVEL_PROCEDURE,G_MODULE_NAME||l_procedure_name,l_log_msg);
5600: END IF;
5601:
5602: END;
5603: END IF;

Line 5612: FND_LOG.STRING( G_LEVEL_PROCEDURE, G_MODULE_NAME||l_procedure_name, l_log_msg );

5608:
5609: IF( Events_to_Process_tab.COUNT = 0 ) THEN
5610: l_log_msg := 'No events exist for the parameters passed : '||p_Source_Table || ' , '||p_Source_Id;
5611: IF( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
5612: FND_LOG.STRING( G_LEVEL_PROCEDURE, G_MODULE_NAME||l_procedure_name, l_log_msg );
5613: END IF;
5614: END IF;
5615:
5616: FOR i IN 1..Events_to_Process_tab.COUNT

Line 5638: FND_LOG.STRING( G_LEVEL_PROCEDURE, G_MODULE_NAME||l_procedure_name, l_log_msg );

5634: FETCH Check_Entered_Gl_date INTO l_entered_period;
5635: IF( Check_Entered_Gl_date%NOTFOUND ) THEN
5636: l_log_msg := 'The entered date did not have any period, please recheck '||' exiting.....';
5637: IF( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
5638: FND_LOG.STRING( G_LEVEL_PROCEDURE, G_MODULE_NAME||l_procedure_name, l_log_msg );
5639: END IF;
5640: RETURN;
5641: END IF;
5642: CLOSE Check_Entered_Gl_date;

Line 5659: FND_LOG.STRING( G_LEVEL_PROCEDURE, G_MODULE_NAME||l_procedure_name, l_log_msg );

5655: mo_Global.Set_Policy_Context( 'S', Events_to_Process_tab( i ).Cur_Org_Id );
5656: l_log_msg := 'Set Org context to '||Events_to_Process_tab( i ).Cur_Org_Id;
5657:
5658: IF( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
5659: FND_LOG.STRING( G_LEVEL_PROCEDURE, G_MODULE_NAME||l_procedure_name, l_log_msg );
5660: END IF;
5661:
5662: l_return_status := NULL;
5663: BEGIN

Line 5682: FND_LOG.STRING( G_LEVEL_PROCEDURE, G_MODULE_NAME||l_procedure_name, l_log_msg );

5678: IF( Events_to_Process_tab( i ).gl_Transfer_Status_Code = 'Y' AND l_rel_act_acct_event_cnt = 0 ) THEN
5679: Debug_Info := 'xla_DataFixes_Pub.Reverse_Journal_entries';
5680: l_log_msg := 'Calling xla_DataFixes_Pub.Reverse_Journal_entries';
5681: IF( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
5682: FND_LOG.STRING( G_LEVEL_PROCEDURE, G_MODULE_NAME||l_procedure_name, l_log_msg );
5683: END IF;
5684:
5685: xla_datafixes_pub.reverse_journal_entries(
5686: p_api_version => l_api_version

Line 5708: FND_LOG.STRING( G_LEVEL_PROCEDURE, G_MODULE_NAME||l_procedure_name, l_log_msg );

5704: p_new_event_id := x_New_Event_Id;
5705: l_log_msg := 'l_Return_Status='||l_Return_Status;
5706:
5707: IF( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
5708: FND_LOG.STRING( G_LEVEL_PROCEDURE, G_MODULE_NAME||l_procedure_name, l_log_msg );
5709: END IF;
5710:
5711: IF( x_msg_Count > 0 OR l_Return_Status = 'U' ) THEN
5712: l_log_msg := 'Undo_Accounting : Error in xla_DataFixes_Pub.Reverse_Journal_entries:'|| x_msg_Data;

Line 5715: FND_LOG.STRING( G_LEVEL_PROCEDURE, G_MODULE_NAME||l_procedure_name, l_log_msg );

5711: IF( x_msg_Count > 0 OR l_Return_Status = 'U' ) THEN
5712: l_log_msg := 'Undo_Accounting : Error in xla_DataFixes_Pub.Reverse_Journal_entries:'|| x_msg_Data;
5713:
5714: IF( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
5715: FND_LOG.STRING( G_LEVEL_PROCEDURE, G_MODULE_NAME||l_procedure_name, l_log_msg );
5716: END IF;
5717: p_return_code := 'XLA_ERROR';
5718: END IF;
5719: ELSIF( Events_to_Process_tab( i ).gl_Transfer_Status_Code = 'N' ) THEN

Line 5723: FND_LOG.STRING( G_LEVEL_PROCEDURE, G_MODULE_NAME||l_procedure_name, l_log_msg );

5719: ELSIF( Events_to_Process_tab( i ).gl_Transfer_Status_Code = 'N' ) THEN
5720: Debug_Info := 'xla_DataFixes_Pub.delete_journal_entries';
5721: l_log_msg := 'Calling xla_datafixes_pub.delete_journal_entries';
5722: IF( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
5723: FND_LOG.STRING( G_LEVEL_PROCEDURE, G_MODULE_NAME||l_procedure_name, l_log_msg );
5724: END IF;
5725:
5726: xla_datafixes_pub.delete_journal_entries
5727: ( p_api_version => l_aPi_Version

Line 5737: FND_LOG.STRING( G_LEVEL_PROCEDURE, G_MODULE_NAME||l_procedure_name, l_log_msg );

5733: , x_msg_data => x_msg_Data );
5734:
5735: l_log_msg := 'l_Return_Status='||l_Return_Status;
5736: IF( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
5737: FND_LOG.STRING( G_LEVEL_PROCEDURE, G_MODULE_NAME||l_procedure_name, l_log_msg );
5738: END IF;
5739:
5740: IF( x_msg_Count > 0 OR l_Return_Status = 'U' ) THEN
5741: l_log_msg := 'Undo_Accounting : Error in xla_DataFixes_Pub.delete_journal_entries:'|| x_msg_Data;

Line 5743: FND_LOG.STRING( G_LEVEL_PROCEDURE, G_MODULE_NAME||l_procedure_name, l_log_msg );

5739:
5740: IF( x_msg_Count > 0 OR l_Return_Status = 'U' ) THEN
5741: l_log_msg := 'Undo_Accounting : Error in xla_DataFixes_Pub.delete_journal_entries:'|| x_msg_Data;
5742: IF( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
5743: FND_LOG.STRING( G_LEVEL_PROCEDURE, G_MODULE_NAME||l_procedure_name, l_log_msg );
5744: END IF;
5745: p_return_code := 'XLA_ERROR';
5746: END IF;
5747: ELSIF (l_rel_act_acct_event_cnt <> 0 ) THEN

Line 5825: FND_LOG.STRING( G_LEVEL_PROCEDURE, G_MODULE_NAME||l_procedure_name, l_log_msg );

5821: p_return_code := 'SUCCESS';
5822: l_log_msg := 'Updated Transaction tables for Invoice';
5823:
5824: IF( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
5825: FND_LOG.STRING( G_LEVEL_PROCEDURE, G_MODULE_NAME||l_procedure_name, l_log_msg );
5826: END IF;
5827: EXCEPTION WHEN OTHERS THEN
5828: p_return_code := 'AP_INVOICE_ERROR';
5829: END;

Line 5903: FND_LOG.STRING( G_LEVEL_PROCEDURE, G_MODULE_NAME||l_procedure_name, l_log_msg );

5899: p_return_code := 'SUCCESS';
5900: l_log_msg := 'Updated Transaction tables for Invoice';
5901:
5902: IF( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
5903: FND_LOG.STRING( G_LEVEL_PROCEDURE, G_MODULE_NAME||l_procedure_name, l_log_msg );
5904: END IF;
5905:
5906: EXCEPTION WHEN OTHERS THEN
5907: p_return_code := 'AP_INVOICE_ERROR';

Line 5919: FND_LOG.STRING( G_LEVEL_PROCEDURE, G_MODULE_NAME||l_procedure_name, l_log_msg );

5915: PRINT( 'Undo Accounting Unsuccessful for Invoice id ' ||l_Source_Id ||' event id ' ||Events_to_Process_tab( i ).Event_Id );
5916: l_log_msg := 'Undo Accounting Unsuccessful for Invoice id ' ||l_Source_Id ||' event id ' ||Events_to_Process_tab( i ).Event_Id;
5917:
5918: IF( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
5919: FND_LOG.STRING( G_LEVEL_PROCEDURE, G_MODULE_NAME||l_procedure_name, l_log_msg );
5920: END IF;
5921: END IF;
5922: END LOOP;
5923:

Line 5929: FND_LOG.STRING( G_LEVEL_PROCEDURE, G_MODULE_NAME||l_procedure_name, l_log_msg );

5925: WHEN OTHERS THEN
5926: l_log_msg := 'Exception in undo_Inv_accounting with higher number of Arguments';
5927:
5928: IF( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
5929: FND_LOG.STRING( G_LEVEL_PROCEDURE, G_MODULE_NAME||l_procedure_name, l_log_msg );
5930: END IF;
5931:
5932: IF( SQLCODE <> - 20001 ) THEN
5933: fnd_Message.Set_Name ( 'SQLAP', 'AP_DEBUG' );

Line 6012: FND_LOG.STRING( G_LEVEL_PROCEDURE, G_MODULE_NAME||l_procedure_name, l_log_msg );

6008: l_procedure_name := 'AP_ACCTG_DATA_FIX_PKG.undo_inv_accounting';
6009:
6010: l_debug_info := 'Calling the undo_inv_accounting with higher number of arguments';
6011: IF( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
6012: FND_LOG.STRING( G_LEVEL_PROCEDURE, G_MODULE_NAME||l_procedure_name, l_log_msg );
6013: END IF;
6014:
6015: undo_inv_accounting
6016: (p_source_table => l_source_table,

Line 6031: FND_LOG.STRING( G_LEVEL_PROCEDURE, G_MODULE_NAME||l_procedure_name, l_debug_info);

6027: p_calling_sequence => l_calling_sequence);
6028:
6029: l_debug_info := 'After undo_inv_accounting, l_return_code = '||l_return_code;
6030: IF( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
6031: FND_LOG.STRING( G_LEVEL_PROCEDURE, G_MODULE_NAME||l_procedure_name, l_debug_info);
6032: END IF;
6033:
6034: EXCEPTION
6035: WHEN OTHERS THEN

Line 6039: FND_LOG.STRING( G_LEVEL_PROCEDURE, G_MODULE_NAME||l_procedure_name, l_log_msg );

6035: WHEN OTHERS THEN
6036: l_log_msg := 'Exception in undo_inv_accounting';
6037:
6038: IF( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
6039: FND_LOG.STRING( G_LEVEL_PROCEDURE, G_MODULE_NAME||l_procedure_name, l_log_msg );
6040: END IF;
6041:
6042: IF( SQLCODE <> - 20001 ) THEN
6043: fnd_message.set_name ( 'SQLAP', 'AP_DEBUG' );

Line 6164: FND_LOG.STRING( G_LEVEL_PROCEDURE, G_MODULE_NAME||l_calling_sequence, l_log_msg );

6160:
6161: l_log_msg := l_debug_info;
6162:
6163: IF( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
6164: FND_LOG.STRING( G_LEVEL_PROCEDURE, G_MODULE_NAME||l_calling_sequence, l_log_msg );
6165: END IF;
6166:
6167: l_debug_info := 'Updating po_headers_all';
6168: UPDATE po_headers_all

Line 6207: FND_LOG.STRING( G_LEVEL_PROCEDURE, G_MODULE_NAME||l_calling_sequence, l_error_msg );

6203: ||',old_vendor_contact_id='||old_vendor_contact_id ;
6204: dbms_output.put_line(l_error_msg);
6205: PRINT(l_error_msg);
6206: IF( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
6207: FND_LOG.STRING( G_LEVEL_PROCEDURE, G_MODULE_NAME||l_calling_sequence, l_error_msg );
6208: END IF;
6209: RETURN 0;
6210: END;
6211: -- Bug 10635312 end

Line 6246: FND_LOG.STRING( G_LEVEL_PROCEDURE, G_MODULE_NAME||l_calling_sequence, l_log_msg );

6242:
6243: l_log_msg := l_debug_info;
6244:
6245: IF( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
6246: FND_LOG.STRING( G_LEVEL_PROCEDURE, G_MODULE_NAME||l_calling_sequence, l_log_msg );
6247: END IF;
6248:
6249: l_debug_info := 'Updating po_headers_all';
6250:

Line 6360: FND_LOG.STRING( G_LEVEL_PROCEDURE, G_MODULE_NAME||l_calling_sequence, l_error_msg );

6356: ||l_debug_info ;
6357: dbms_output.put_line(l_error_msg);
6358: PRINT(l_error_msg);
6359: IF( G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
6360: FND_LOG.STRING( G_LEVEL_PROCEDURE, G_MODULE_NAME||l_calling_sequence, l_error_msg );
6361: END IF;
6362: RETURN 0;
6363: END;
6364: -- Bug 13405297 end