APPS.PA_YEAR_END_ROLLOVER_PKG dependencies on PA_DEBUG

Line 7: P_DEBUG_MODE varchar2(1) := NVL(FND_PROFILE.value('PA_DEBUG_MODE'), 'N');

3:
4: -------------------------------------------------------------------------------------
5: -- Execute the Year End Budget Rollover process
6: -------------------------------------------------------------------------------------
7: P_DEBUG_MODE varchar2(1) := NVL(FND_PROFILE.value('PA_DEBUG_MODE'), 'N');
8:
9: -- # Forward Declaration
10: PROCEDURE Create_bc_balances(p_budget_version_id IN NUMBER,
11: p_last_baselined_version_id IN NUMBER,

Line 15: -- Procedure used to call pa_debug.write for FND logging

11: p_last_baselined_version_id IN NUMBER,
12: p_Set_of_books_id IN NUMBER,
13: p_return_status OUT NOCOPY VARCHAR2);
14:
15: -- Procedure used to call pa_debug.write for FND logging
16: PROCEDURE LOG_MESSAGE(p_message in VARCHAR2);
17:
18: g_procedure_name VARCHAR2(30);
19:

Line 1313: l_Rel_Lock := PA_Debug.Release_User_Lock(l_Lock_Name);

1309: log_message('Year_End_Rollover: ' || 'Releasing the lock '|| l_Lock_Name );
1310: log_message('Year_End_Rollover: ' || '--');
1311: END IF;
1312:
1313: l_Rel_Lock := PA_Debug.Release_User_Lock(l_Lock_Name);
1314:
1315: IF P_DEBUG_MODE = 'Y' THEN
1316: log_message('Year_End_Rollover: ' || 'Value of Release Lock '|| l_Rel_Lock );
1317: END IF;

Line 1410: l_Rel_Lock := PA_Debug.Release_User_Lock(l_Lock_Name);

1406: IF P_DEBUG_MODE = 'Y' THEN
1407: log_message('Year_End_Rollover: ' || 'In When Others. End');
1408: END IF;
1409: /* Commenting for Bug 5726535
1410: l_Rel_Lock := PA_Debug.Release_User_Lock(l_Lock_Name);
1411: */
1412: /* Bug 5726535 - The Year End Rollover Flag is updated to 'E' here in an autonomous transaction if an
1413: unhandled exception occurs */
1414: Upd_Yr_End_Rollover_Flag_To_E (

Line 1905: IF PA_Debug.Acquire_User_Lock(l_Lock_Name) <> 0

1901: /* Commenting for Bug 5726535
1902: -------------------------------------------------------------------------------+
1903: -- Create (acquire) a lock for the Budget version record
1904: -------------------------------------------------------------------------------+
1905: IF PA_Debug.Acquire_User_Lock(l_Lock_Name) <> 0
1906: THEN
1907: l_Work_Budget_Version_Id := P_Budget_Version_ID;
1908: RAISE l_Lock_Bdgt_ERR;
1909: END IF;

Line 2319: l_Lock_Result := PA_Debug.Release_User_Lock(P_Lock_Name);

2315: -- Release the lock
2316: IF P_DEBUG_MODE = 'Y' THEN
2317: log_message('In Year_End_Rollover_Log API. Releasing Lock Name = '|| P_Lock_Name );
2318: END IF;
2319: l_Lock_Result := PA_Debug.Release_User_Lock(P_Lock_Name);
2320: IF P_DEBUG_MODE = 'Y' THEN
2321: log_message('Year_End_Rollover: ' || 'Lock Result : '|| l_Lock_Result );
2322: END IF;
2323: */

Line 2367: -- Procedure used to call pa_debug.write for FND logging

2363: AND Budget_Type_Code = l_Budget_Type_Code;
2364:
2365: END Year_End_Rollover_Log;
2366:
2367: -- Procedure used to call pa_debug.write for FND logging
2368: PROCEDURE LOG_MESSAGE(p_message in VARCHAR2)
2369: IS
2370: BEGIN
2371: -- IF g_debug_mode = 'Y' then

Line 2374: pa_debug.g_err_stage := 'Debug Msg :'||substr(p_message,1,250);

2370: BEGIN
2371: -- IF g_debug_mode = 'Y' then
2372:
2373: IF p_message is NOT NULL then
2374: pa_debug.g_err_stage := 'Debug Msg :'||substr(p_message,1,250);
2375:
2376: -- Following to write to request log
2377: pa_debug.write_file(pa_debug.g_err_stage);
2378: -- for fnd log

Line 2377: pa_debug.write_file(pa_debug.g_err_stage);

2373: IF p_message is NOT NULL then
2374: pa_debug.g_err_stage := 'Debug Msg :'||substr(p_message,1,250);
2375:
2376: -- Following to write to request log
2377: pa_debug.write_file(pa_debug.g_err_stage);
2378: -- for fnd log
2379: PA_DEBUG.write
2380: (x_Module => 'pa.plsql.PA_YEAR_END_ROLLOVER_PKG.'||g_procedure_name
2381: ,x_Msg => substr(p_message,1,240)

Line 2379: PA_DEBUG.write

2375:
2376: -- Following to write to request log
2377: pa_debug.write_file(pa_debug.g_err_stage);
2378: -- for fnd log
2379: PA_DEBUG.write
2380: (x_Module => 'pa.plsql.PA_YEAR_END_ROLLOVER_PKG.'||g_procedure_name
2381: ,x_Msg => substr(p_message,1,240)
2382: ,x_Log_Level => 3);
2383: END IF;