19: ) IS
20:
21: BEGIN
22:
23: IF FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
24: FND_LOG.String(
25: FND_LOG.LEVEL_PROCEDURE,
26: 'fpa.sql.PA_PJP_PVT.Submit_Project_Aw',
27: 'Entering');
20:
21: BEGIN
22:
23: IF FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
24: FND_LOG.String(
25: FND_LOG.LEVEL_PROCEDURE,
26: 'fpa.sql.PA_PJP_PVT.Submit_Project_Aw',
27: 'Entering');
28: END IF;
21: BEGIN
22:
23: IF FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
24: FND_LOG.String(
25: FND_LOG.LEVEL_PROCEDURE,
26: 'fpa.sql.PA_PJP_PVT.Submit_Project_Aw',
27: 'Entering');
28: END IF;
29:
38: OUT X_RETURN_STATUS,
39: OUT X_MSG_COUNT,
40: OUT X_MSG_DATA;
41:
42: IF FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
43: FND_LOG.String(
44: FND_LOG.LEVEL_PROCEDURE,
45: 'fpa.sql.PA_PJP_PVT.Submit_Project_Aw',
46: 'Returning');
39: OUT X_MSG_COUNT,
40: OUT X_MSG_DATA;
41:
42: IF FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
43: FND_LOG.String(
44: FND_LOG.LEVEL_PROCEDURE,
45: 'fpa.sql.PA_PJP_PVT.Submit_Project_Aw',
46: 'Returning');
47: END IF;
40: OUT X_MSG_DATA;
41:
42: IF FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
43: FND_LOG.String(
44: FND_LOG.LEVEL_PROCEDURE,
45: 'fpa.sql.PA_PJP_PVT.Submit_Project_Aw',
46: 'Returning');
47: END IF;
48:
49:
50: EXCEPTION
51:
52: WHEN OTHERS then
53: IF FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
54: FND_LOG.String
55: ( FND_LOG.LEVEL_ERROR,
56: 'fpa.sql.FPA_PJP_PVT.Submit_Project_Aw',
57: 'WHEN OTHERS '||SQLERRM);
50: EXCEPTION
51:
52: WHEN OTHERS then
53: IF FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
54: FND_LOG.String
55: ( FND_LOG.LEVEL_ERROR,
56: 'fpa.sql.FPA_PJP_PVT.Submit_Project_Aw',
57: 'WHEN OTHERS '||SQLERRM);
58: END IF;
51:
52: WHEN OTHERS then
53: IF FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
54: FND_LOG.String
55: ( FND_LOG.LEVEL_ERROR,
56: 'fpa.sql.FPA_PJP_PVT.Submit_Project_Aw',
57: 'WHEN OTHERS '||SQLERRM);
58: END IF;
59:
70: l_return_flag VARCHAR2(1) := 'F';
71:
72: BEGIN
73:
74: IF FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
75: FND_LOG.String(
76: FND_LOG.LEVEL_PROCEDURE,
77: 'fpa.sql.PA_PJP_PVT.proj_scorecard_link_enabled.Begin',
78: 'Entering');
71:
72: BEGIN
73:
74: IF FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
75: FND_LOG.String(
76: FND_LOG.LEVEL_PROCEDURE,
77: 'fpa.sql.PA_PJP_PVT.proj_scorecard_link_enabled.Begin',
78: 'Entering');
79: END IF;
72: BEGIN
73:
74: IF FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
75: FND_LOG.String(
76: FND_LOG.LEVEL_PROCEDURE,
77: 'fpa.sql.PA_PJP_PVT.proj_scorecard_link_enabled.Begin',
78: 'Entering');
79: END IF;
80:
82: EXECUTE IMMEDIATE
83: l_sql_stat
84: USING OUT L_RETURN_FLAG, IN P_FUNCTION_NAME, IN P_PROJECT_ID;
85:
86: IF FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
87: FND_LOG.String(
88: FND_LOG.LEVEL_PROCEDURE,
89: 'fpa.sql.PA_PJP_PVT.proj_scorecard_link_enabled.Begin',
90: 'Returning l_return_flag '||l_return_flag);
83: l_sql_stat
84: USING OUT L_RETURN_FLAG, IN P_FUNCTION_NAME, IN P_PROJECT_ID;
85:
86: IF FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
87: FND_LOG.String(
88: FND_LOG.LEVEL_PROCEDURE,
89: 'fpa.sql.PA_PJP_PVT.proj_scorecard_link_enabled.Begin',
90: 'Returning l_return_flag '||l_return_flag);
91: END IF;
84: USING OUT L_RETURN_FLAG, IN P_FUNCTION_NAME, IN P_PROJECT_ID;
85:
86: IF FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
87: FND_LOG.String(
88: FND_LOG.LEVEL_PROCEDURE,
89: 'fpa.sql.PA_PJP_PVT.proj_scorecard_link_enabled.Begin',
90: 'Returning l_return_flag '||l_return_flag);
91: END IF;
92:
94:
95: EXCEPTION
96:
97: WHEN OTHERS then
98: IF FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
99: FND_LOG.String
100: ( FND_LOG.LEVEL_ERROR,
101: 'fpa.sql.FPA_PJP_PVT.proj_scorecard_link_enabled',
102: 'WHEN OTHERS '||SQLERRM);
95: EXCEPTION
96:
97: WHEN OTHERS then
98: IF FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
99: FND_LOG.String
100: ( FND_LOG.LEVEL_ERROR,
101: 'fpa.sql.FPA_PJP_PVT.proj_scorecard_link_enabled',
102: 'WHEN OTHERS '||SQLERRM);
103: END IF;
96:
97: WHEN OTHERS then
98: IF FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
99: FND_LOG.String
100: ( FND_LOG.LEVEL_ERROR,
101: 'fpa.sql.FPA_PJP_PVT.proj_scorecard_link_enabled',
102: 'WHEN OTHERS '||SQLERRM);
103: END IF;
104: