DBA Data[Home] [Help]

APPS.PA_FP_FCST_GEN_CLIENT_EXT dependencies on PA_DEBUG

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

1: PACKAGE body PA_FP_FCST_GEN_CLIENT_EXT as
2: /* $Header: PAFPFGCB.pls 120.2 2007/02/06 09:52:44 dthakker ship $ */
3: P_PA_DEBUG_MODE varchar2(1) := NVL(FND_PROFILE.value('PA_DEBUG_MODE'), 'N');
4:
5: PROCEDURE FCST_GEN_CLIENT_EXTN
6: (P_PROJECT_ID IN NUMBER
7: ,P_BUDGET_VERSION_ID IN NUMBER

Line 63: IF p_pa_debug_mode = 'Y' THEN

59: --Setting initial values
60: X_MSG_COUNT := 0;
61: X_RETURN_STATUS := FND_API.G_RET_STS_SUCCESS;
62:
63: IF p_pa_debug_mode = 'Y' THEN
64: pa_debug.set_curr_function( p_function => 'FCST_GEN_CLIENT_EXTN'
65: ,p_debug_mode => p_pa_debug_mode);
66: END IF;
67:

Line 64: pa_debug.set_curr_function( p_function => 'FCST_GEN_CLIENT_EXTN'

60: X_MSG_COUNT := 0;
61: X_RETURN_STATUS := FND_API.G_RET_STS_SUCCESS;
62:
63: IF p_pa_debug_mode = 'Y' THEN
64: pa_debug.set_curr_function( p_function => 'FCST_GEN_CLIENT_EXTN'
65: ,p_debug_mode => p_pa_debug_mode);
66: END IF;
67:
68: -- This would the default value for px_period_data modified.

Line 65: ,p_debug_mode => p_pa_debug_mode);

61: X_RETURN_STATUS := FND_API.G_RET_STS_SUCCESS;
62:
63: IF p_pa_debug_mode = 'Y' THEN
64: pa_debug.set_curr_function( p_function => 'FCST_GEN_CLIENT_EXTN'
65: ,p_debug_mode => p_pa_debug_mode);
66: END IF;
67:
68: -- This would the default value for px_period_data modified.
69: px_period_data_modified := 'N';

Line 101: IF p_pa_debug_mode = 'Y' THEN

97: px_period_amts_tbl(j).init_revenue := px_period_amts_tbl(j).init_revenue;
98: px_period_amts_tbl(j).init_revenue := px_period_amts_tbl(j).init_revenue;
99: END LOOP;
100:
101: IF p_pa_debug_mode = 'Y' THEN
102: pa_debug.Reset_Curr_Function;
103: END IF;
104:
105: EXCEPTION

Line 102: pa_debug.Reset_Curr_Function;

98: px_period_amts_tbl(j).init_revenue := px_period_amts_tbl(j).init_revenue;
99: END LOOP;
100:
101: IF p_pa_debug_mode = 'Y' THEN
102: pa_debug.Reset_Curr_Function;
103: END IF;
104:
105: EXCEPTION
106: WHEN PA_FP_CONSTANTS_PKG.Invalid_Arg_Exc THEN

Line 126: IF p_pa_debug_mode = 'Y' THEN

122: END IF;
123: ROLLBACK;
124: x_return_status := FND_API.G_RET_STS_ERROR;
125:
126: IF p_pa_debug_mode = 'Y' THEN
127: pa_debug.Reset_Curr_Function;
128: END IF;
129:
130: WHEN OTHERS THEN

Line 127: pa_debug.Reset_Curr_Function;

123: ROLLBACK;
124: x_return_status := FND_API.G_RET_STS_ERROR;
125:
126: IF p_pa_debug_mode = 'Y' THEN
127: pa_debug.Reset_Curr_Function;
128: END IF;
129:
130: WHEN OTHERS THEN
131: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 138: IF p_pa_debug_mode = 'Y' THEN

134: -- dbms_output.put_line(SUBSTR(SQLERRM,1,240));
135: FND_MSG_PUB.add_exc_msg
136: ( p_pkg_name => 'PA_FP_FCST_GEN_CLIENT_EXT'
137: ,p_procedure_name => 'FCST_GEN_CLIENT_EXTN');
138: IF p_pa_debug_mode = 'Y' THEN
139: pa_debug.Reset_Curr_Function;
140: END IF;
141: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
142:

Line 139: pa_debug.Reset_Curr_Function;

135: FND_MSG_PUB.add_exc_msg
136: ( p_pkg_name => 'PA_FP_FCST_GEN_CLIENT_EXT'
137: ,p_procedure_name => 'FCST_GEN_CLIENT_EXTN');
138: IF p_pa_debug_mode = 'Y' THEN
139: pa_debug.Reset_Curr_Function;
140: END IF;
141: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
142:
143: END FCST_GEN_CLIENT_EXTN;