1: PACKAGE BODY pa_project_subteams_pub AS
2: --$Header: PARTSTPB.pls 120.1 2005/09/28 04:53:18 sunkalya noship $
3:
4: PROCEDURE Create_Subteam
5: (
10: p_validation_level IN NUMBER := FND_API.g_valid_level_full,
11: p_calling_module IN VARCHAR2 := 'SELF_SERVICE',
12: p_debug_mode IN VARCHAR2 := 'N',
13: p_max_msg_count IN NUMBER := FND_API.g_miss_num,
14: p_subteam_name IN pa_project_subteams.name%TYPE := FND_API.g_miss_char,
15: p_object_type IN pa_project_subteams.object_type%TYPE := FND_API.g_miss_char,
16: p_object_id IN pa_project_subteams.object_id%TYPE := FND_API.g_miss_num,
17: --p_project_number IN VARCHAR2 := FND_API.g_miss_char,
18: p_object_name IN VARCHAR2 := FND_API.g_miss_char,
11: p_calling_module IN VARCHAR2 := 'SELF_SERVICE',
12: p_debug_mode IN VARCHAR2 := 'N',
13: p_max_msg_count IN NUMBER := FND_API.g_miss_num,
14: p_subteam_name IN pa_project_subteams.name%TYPE := FND_API.g_miss_char,
15: p_object_type IN pa_project_subteams.object_type%TYPE := FND_API.g_miss_char,
16: p_object_id IN pa_project_subteams.object_id%TYPE := FND_API.g_miss_num,
17: --p_project_number IN VARCHAR2 := FND_API.g_miss_char,
18: p_object_name IN VARCHAR2 := FND_API.g_miss_char,
19: p_description IN pa_project_subteams.description%TYPE := FND_API.g_miss_char,
12: p_debug_mode IN VARCHAR2 := 'N',
13: p_max_msg_count IN NUMBER := FND_API.g_miss_num,
14: p_subteam_name IN pa_project_subteams.name%TYPE := FND_API.g_miss_char,
15: p_object_type IN pa_project_subteams.object_type%TYPE := FND_API.g_miss_char,
16: p_object_id IN pa_project_subteams.object_id%TYPE := FND_API.g_miss_num,
17: --p_project_number IN VARCHAR2 := FND_API.g_miss_char,
18: p_object_name IN VARCHAR2 := FND_API.g_miss_char,
19: p_description IN pa_project_subteams.description%TYPE := FND_API.g_miss_char,
20: p_record_version_number IN pa_project_subteams.record_version_number%TYPE := FND_API.g_miss_num,
15: p_object_type IN pa_project_subteams.object_type%TYPE := FND_API.g_miss_char,
16: p_object_id IN pa_project_subteams.object_id%TYPE := FND_API.g_miss_num,
17: --p_project_number IN VARCHAR2 := FND_API.g_miss_char,
18: p_object_name IN VARCHAR2 := FND_API.g_miss_char,
19: p_description IN pa_project_subteams.description%TYPE := FND_API.g_miss_char,
20: p_record_version_number IN pa_project_subteams.record_version_number%TYPE := FND_API.g_miss_num,
21: p_attribute_category IN pa_project_subteams.attribute_category%TYPE := FND_API.g_miss_char,
22: p_attribute1 IN pa_project_subteams.attribute1%TYPE := FND_API.G_MISS_CHAR,
23: p_attribute2 IN pa_project_subteams.attribute2%TYPE := FND_API.G_MISS_CHAR,
16: p_object_id IN pa_project_subteams.object_id%TYPE := FND_API.g_miss_num,
17: --p_project_number IN VARCHAR2 := FND_API.g_miss_char,
18: p_object_name IN VARCHAR2 := FND_API.g_miss_char,
19: p_description IN pa_project_subteams.description%TYPE := FND_API.g_miss_char,
20: p_record_version_number IN pa_project_subteams.record_version_number%TYPE := FND_API.g_miss_num,
21: p_attribute_category IN pa_project_subteams.attribute_category%TYPE := FND_API.g_miss_char,
22: p_attribute1 IN pa_project_subteams.attribute1%TYPE := FND_API.G_MISS_CHAR,
23: p_attribute2 IN pa_project_subteams.attribute2%TYPE := FND_API.G_MISS_CHAR,
24: p_attribute3 IN pa_project_subteams.attribute3%TYPE := FND_API.G_MISS_CHAR,
17: --p_project_number IN VARCHAR2 := FND_API.g_miss_char,
18: p_object_name IN VARCHAR2 := FND_API.g_miss_char,
19: p_description IN pa_project_subteams.description%TYPE := FND_API.g_miss_char,
20: p_record_version_number IN pa_project_subteams.record_version_number%TYPE := FND_API.g_miss_num,
21: p_attribute_category IN pa_project_subteams.attribute_category%TYPE := FND_API.g_miss_char,
22: p_attribute1 IN pa_project_subteams.attribute1%TYPE := FND_API.G_MISS_CHAR,
23: p_attribute2 IN pa_project_subteams.attribute2%TYPE := FND_API.G_MISS_CHAR,
24: p_attribute3 IN pa_project_subteams.attribute3%TYPE := FND_API.G_MISS_CHAR,
25: p_attribute4 IN pa_project_subteams.attribute4%TYPE := FND_API.G_MISS_CHAR,
18: p_object_name IN VARCHAR2 := FND_API.g_miss_char,
19: p_description IN pa_project_subteams.description%TYPE := FND_API.g_miss_char,
20: p_record_version_number IN pa_project_subteams.record_version_number%TYPE := FND_API.g_miss_num,
21: p_attribute_category IN pa_project_subteams.attribute_category%TYPE := FND_API.g_miss_char,
22: p_attribute1 IN pa_project_subteams.attribute1%TYPE := FND_API.G_MISS_CHAR,
23: p_attribute2 IN pa_project_subteams.attribute2%TYPE := FND_API.G_MISS_CHAR,
24: p_attribute3 IN pa_project_subteams.attribute3%TYPE := FND_API.G_MISS_CHAR,
25: p_attribute4 IN pa_project_subteams.attribute4%TYPE := FND_API.G_MISS_CHAR,
26: p_attribute5 IN pa_project_subteams.attribute5%TYPE := FND_API.G_MISS_CHAR,
19: p_description IN pa_project_subteams.description%TYPE := FND_API.g_miss_char,
20: p_record_version_number IN pa_project_subteams.record_version_number%TYPE := FND_API.g_miss_num,
21: p_attribute_category IN pa_project_subteams.attribute_category%TYPE := FND_API.g_miss_char,
22: p_attribute1 IN pa_project_subteams.attribute1%TYPE := FND_API.G_MISS_CHAR,
23: p_attribute2 IN pa_project_subteams.attribute2%TYPE := FND_API.G_MISS_CHAR,
24: p_attribute3 IN pa_project_subteams.attribute3%TYPE := FND_API.G_MISS_CHAR,
25: p_attribute4 IN pa_project_subteams.attribute4%TYPE := FND_API.G_MISS_CHAR,
26: p_attribute5 IN pa_project_subteams.attribute5%TYPE := FND_API.G_MISS_CHAR,
27: p_attribute6 IN pa_project_subteams.attribute6%TYPE := FND_API.G_MISS_CHAR,
20: p_record_version_number IN pa_project_subteams.record_version_number%TYPE := FND_API.g_miss_num,
21: p_attribute_category IN pa_project_subteams.attribute_category%TYPE := FND_API.g_miss_char,
22: p_attribute1 IN pa_project_subteams.attribute1%TYPE := FND_API.G_MISS_CHAR,
23: p_attribute2 IN pa_project_subteams.attribute2%TYPE := FND_API.G_MISS_CHAR,
24: p_attribute3 IN pa_project_subteams.attribute3%TYPE := FND_API.G_MISS_CHAR,
25: p_attribute4 IN pa_project_subteams.attribute4%TYPE := FND_API.G_MISS_CHAR,
26: p_attribute5 IN pa_project_subteams.attribute5%TYPE := FND_API.G_MISS_CHAR,
27: p_attribute6 IN pa_project_subteams.attribute6%TYPE := FND_API.G_MISS_CHAR,
28: p_attribute7 IN pa_project_subteams.attribute7%TYPE := FND_API.G_MISS_CHAR,
21: p_attribute_category IN pa_project_subteams.attribute_category%TYPE := FND_API.g_miss_char,
22: p_attribute1 IN pa_project_subteams.attribute1%TYPE := FND_API.G_MISS_CHAR,
23: p_attribute2 IN pa_project_subteams.attribute2%TYPE := FND_API.G_MISS_CHAR,
24: p_attribute3 IN pa_project_subteams.attribute3%TYPE := FND_API.G_MISS_CHAR,
25: p_attribute4 IN pa_project_subteams.attribute4%TYPE := FND_API.G_MISS_CHAR,
26: p_attribute5 IN pa_project_subteams.attribute5%TYPE := FND_API.G_MISS_CHAR,
27: p_attribute6 IN pa_project_subteams.attribute6%TYPE := FND_API.G_MISS_CHAR,
28: p_attribute7 IN pa_project_subteams.attribute7%TYPE := FND_API.G_MISS_CHAR,
29: p_attribute8 IN pa_project_subteams.attribute8%TYPE := FND_API.G_MISS_CHAR,
22: p_attribute1 IN pa_project_subteams.attribute1%TYPE := FND_API.G_MISS_CHAR,
23: p_attribute2 IN pa_project_subteams.attribute2%TYPE := FND_API.G_MISS_CHAR,
24: p_attribute3 IN pa_project_subteams.attribute3%TYPE := FND_API.G_MISS_CHAR,
25: p_attribute4 IN pa_project_subteams.attribute4%TYPE := FND_API.G_MISS_CHAR,
26: p_attribute5 IN pa_project_subteams.attribute5%TYPE := FND_API.G_MISS_CHAR,
27: p_attribute6 IN pa_project_subteams.attribute6%TYPE := FND_API.G_MISS_CHAR,
28: p_attribute7 IN pa_project_subteams.attribute7%TYPE := FND_API.G_MISS_CHAR,
29: p_attribute8 IN pa_project_subteams.attribute8%TYPE := FND_API.G_MISS_CHAR,
30: p_attribute9 IN pa_project_subteams.attribute9%TYPE := FND_API.G_MISS_CHAR,
23: p_attribute2 IN pa_project_subteams.attribute2%TYPE := FND_API.G_MISS_CHAR,
24: p_attribute3 IN pa_project_subteams.attribute3%TYPE := FND_API.G_MISS_CHAR,
25: p_attribute4 IN pa_project_subteams.attribute4%TYPE := FND_API.G_MISS_CHAR,
26: p_attribute5 IN pa_project_subteams.attribute5%TYPE := FND_API.G_MISS_CHAR,
27: p_attribute6 IN pa_project_subteams.attribute6%TYPE := FND_API.G_MISS_CHAR,
28: p_attribute7 IN pa_project_subteams.attribute7%TYPE := FND_API.G_MISS_CHAR,
29: p_attribute8 IN pa_project_subteams.attribute8%TYPE := FND_API.G_MISS_CHAR,
30: p_attribute9 IN pa_project_subteams.attribute9%TYPE := FND_API.G_MISS_CHAR,
31: p_attribute10 IN pa_project_subteams.attribute10%TYPE := FND_API.G_MISS_CHAR,
24: p_attribute3 IN pa_project_subteams.attribute3%TYPE := FND_API.G_MISS_CHAR,
25: p_attribute4 IN pa_project_subteams.attribute4%TYPE := FND_API.G_MISS_CHAR,
26: p_attribute5 IN pa_project_subteams.attribute5%TYPE := FND_API.G_MISS_CHAR,
27: p_attribute6 IN pa_project_subteams.attribute6%TYPE := FND_API.G_MISS_CHAR,
28: p_attribute7 IN pa_project_subteams.attribute7%TYPE := FND_API.G_MISS_CHAR,
29: p_attribute8 IN pa_project_subteams.attribute8%TYPE := FND_API.G_MISS_CHAR,
30: p_attribute9 IN pa_project_subteams.attribute9%TYPE := FND_API.G_MISS_CHAR,
31: p_attribute10 IN pa_project_subteams.attribute10%TYPE := FND_API.G_MISS_CHAR,
32: p_attribute11 IN pa_project_subteams.attribute11%TYPE := FND_API.G_MISS_CHAR,
25: p_attribute4 IN pa_project_subteams.attribute4%TYPE := FND_API.G_MISS_CHAR,
26: p_attribute5 IN pa_project_subteams.attribute5%TYPE := FND_API.G_MISS_CHAR,
27: p_attribute6 IN pa_project_subteams.attribute6%TYPE := FND_API.G_MISS_CHAR,
28: p_attribute7 IN pa_project_subteams.attribute7%TYPE := FND_API.G_MISS_CHAR,
29: p_attribute8 IN pa_project_subteams.attribute8%TYPE := FND_API.G_MISS_CHAR,
30: p_attribute9 IN pa_project_subteams.attribute9%TYPE := FND_API.G_MISS_CHAR,
31: p_attribute10 IN pa_project_subteams.attribute10%TYPE := FND_API.G_MISS_CHAR,
32: p_attribute11 IN pa_project_subteams.attribute11%TYPE := FND_API.G_MISS_CHAR,
33: p_attribute12 IN pa_project_subteams.attribute12%TYPE := FND_API.G_MISS_CHAR,
26: p_attribute5 IN pa_project_subteams.attribute5%TYPE := FND_API.G_MISS_CHAR,
27: p_attribute6 IN pa_project_subteams.attribute6%TYPE := FND_API.G_MISS_CHAR,
28: p_attribute7 IN pa_project_subteams.attribute7%TYPE := FND_API.G_MISS_CHAR,
29: p_attribute8 IN pa_project_subteams.attribute8%TYPE := FND_API.G_MISS_CHAR,
30: p_attribute9 IN pa_project_subteams.attribute9%TYPE := FND_API.G_MISS_CHAR,
31: p_attribute10 IN pa_project_subteams.attribute10%TYPE := FND_API.G_MISS_CHAR,
32: p_attribute11 IN pa_project_subteams.attribute11%TYPE := FND_API.G_MISS_CHAR,
33: p_attribute12 IN pa_project_subteams.attribute12%TYPE := FND_API.G_MISS_CHAR,
34: p_attribute13 IN pa_project_subteams.attribute13%TYPE := FND_API.G_MISS_CHAR,
27: p_attribute6 IN pa_project_subteams.attribute6%TYPE := FND_API.G_MISS_CHAR,
28: p_attribute7 IN pa_project_subteams.attribute7%TYPE := FND_API.G_MISS_CHAR,
29: p_attribute8 IN pa_project_subteams.attribute8%TYPE := FND_API.G_MISS_CHAR,
30: p_attribute9 IN pa_project_subteams.attribute9%TYPE := FND_API.G_MISS_CHAR,
31: p_attribute10 IN pa_project_subteams.attribute10%TYPE := FND_API.G_MISS_CHAR,
32: p_attribute11 IN pa_project_subteams.attribute11%TYPE := FND_API.G_MISS_CHAR,
33: p_attribute12 IN pa_project_subteams.attribute12%TYPE := FND_API.G_MISS_CHAR,
34: p_attribute13 IN pa_project_subteams.attribute13%TYPE := FND_API.G_MISS_CHAR,
35: p_attribute14 IN pa_project_subteams.attribute14%TYPE := FND_API.G_MISS_CHAR,
28: p_attribute7 IN pa_project_subteams.attribute7%TYPE := FND_API.G_MISS_CHAR,
29: p_attribute8 IN pa_project_subteams.attribute8%TYPE := FND_API.G_MISS_CHAR,
30: p_attribute9 IN pa_project_subteams.attribute9%TYPE := FND_API.G_MISS_CHAR,
31: p_attribute10 IN pa_project_subteams.attribute10%TYPE := FND_API.G_MISS_CHAR,
32: p_attribute11 IN pa_project_subteams.attribute11%TYPE := FND_API.G_MISS_CHAR,
33: p_attribute12 IN pa_project_subteams.attribute12%TYPE := FND_API.G_MISS_CHAR,
34: p_attribute13 IN pa_project_subteams.attribute13%TYPE := FND_API.G_MISS_CHAR,
35: p_attribute14 IN pa_project_subteams.attribute14%TYPE := FND_API.G_MISS_CHAR,
36: p_attribute15 IN pa_project_subteams.attribute15%TYPE := FND_API.G_MISS_CHAR,
29: p_attribute8 IN pa_project_subteams.attribute8%TYPE := FND_API.G_MISS_CHAR,
30: p_attribute9 IN pa_project_subteams.attribute9%TYPE := FND_API.G_MISS_CHAR,
31: p_attribute10 IN pa_project_subteams.attribute10%TYPE := FND_API.G_MISS_CHAR,
32: p_attribute11 IN pa_project_subteams.attribute11%TYPE := FND_API.G_MISS_CHAR,
33: p_attribute12 IN pa_project_subteams.attribute12%TYPE := FND_API.G_MISS_CHAR,
34: p_attribute13 IN pa_project_subteams.attribute13%TYPE := FND_API.G_MISS_CHAR,
35: p_attribute14 IN pa_project_subteams.attribute14%TYPE := FND_API.G_MISS_CHAR,
36: p_attribute15 IN pa_project_subteams.attribute15%TYPE := FND_API.G_MISS_CHAR,
37: --Bug: 4537865
30: p_attribute9 IN pa_project_subteams.attribute9%TYPE := FND_API.G_MISS_CHAR,
31: p_attribute10 IN pa_project_subteams.attribute10%TYPE := FND_API.G_MISS_CHAR,
32: p_attribute11 IN pa_project_subteams.attribute11%TYPE := FND_API.G_MISS_CHAR,
33: p_attribute12 IN pa_project_subteams.attribute12%TYPE := FND_API.G_MISS_CHAR,
34: p_attribute13 IN pa_project_subteams.attribute13%TYPE := FND_API.G_MISS_CHAR,
35: p_attribute14 IN pa_project_subteams.attribute14%TYPE := FND_API.G_MISS_CHAR,
36: p_attribute15 IN pa_project_subteams.attribute15%TYPE := FND_API.G_MISS_CHAR,
37: --Bug: 4537865
38: x_new_subteam_id OUT NOCOPY pa_project_subteams.project_subteam_id%TYPE,
31: p_attribute10 IN pa_project_subteams.attribute10%TYPE := FND_API.G_MISS_CHAR,
32: p_attribute11 IN pa_project_subteams.attribute11%TYPE := FND_API.G_MISS_CHAR,
33: p_attribute12 IN pa_project_subteams.attribute12%TYPE := FND_API.G_MISS_CHAR,
34: p_attribute13 IN pa_project_subteams.attribute13%TYPE := FND_API.G_MISS_CHAR,
35: p_attribute14 IN pa_project_subteams.attribute14%TYPE := FND_API.G_MISS_CHAR,
36: p_attribute15 IN pa_project_subteams.attribute15%TYPE := FND_API.G_MISS_CHAR,
37: --Bug: 4537865
38: x_new_subteam_id OUT NOCOPY pa_project_subteams.project_subteam_id%TYPE,
39: x_subteam_row_id OUT NOCOPY ROWID,
32: p_attribute11 IN pa_project_subteams.attribute11%TYPE := FND_API.G_MISS_CHAR,
33: p_attribute12 IN pa_project_subteams.attribute12%TYPE := FND_API.G_MISS_CHAR,
34: p_attribute13 IN pa_project_subteams.attribute13%TYPE := FND_API.G_MISS_CHAR,
35: p_attribute14 IN pa_project_subteams.attribute14%TYPE := FND_API.G_MISS_CHAR,
36: p_attribute15 IN pa_project_subteams.attribute15%TYPE := FND_API.G_MISS_CHAR,
37: --Bug: 4537865
38: x_new_subteam_id OUT NOCOPY pa_project_subteams.project_subteam_id%TYPE,
39: x_subteam_row_id OUT NOCOPY ROWID,
40: x_return_status OUT NOCOPY VARCHAR2,
34: p_attribute13 IN pa_project_subteams.attribute13%TYPE := FND_API.G_MISS_CHAR,
35: p_attribute14 IN pa_project_subteams.attribute14%TYPE := FND_API.G_MISS_CHAR,
36: p_attribute15 IN pa_project_subteams.attribute15%TYPE := FND_API.G_MISS_CHAR,
37: --Bug: 4537865
38: x_new_subteam_id OUT NOCOPY pa_project_subteams.project_subteam_id%TYPE,
39: x_subteam_row_id OUT NOCOPY ROWID,
40: x_return_status OUT NOCOPY VARCHAR2,
41: x_msg_count OUT NOCOPY NUMBER,
42: x_msg_data OUT NOCOPY VARCHAR2
49: l_error_message_code varchar2(30);
50: BEGIN
51:
52: -- Initialize the Error Stack
53: PA_DEBUG.init_err_stack('PA_PROJECT_SUBTEAMS_PUB.Create_Subteam');
54:
55: -- Initialize the error flag
56: PA_PROJECT_SUBTEAMS_PUB.g_error_exists := FND_API.G_FALSE;
57:
52: -- Initialize the Error Stack
53: PA_DEBUG.init_err_stack('PA_PROJECT_SUBTEAMS_PUB.Create_Subteam');
54:
55: -- Initialize the error flag
56: PA_PROJECT_SUBTEAMS_PUB.g_error_exists := FND_API.G_FALSE;
57:
58: -- Initialize the return status to success
59: x_return_status := FND_API.G_RET_STS_SUCCESS;
60:
79: ,x_error_message_code => l_error_message_code);
80: if(x_return_status = FND_API.G_RET_STS_ERROR) then
81: PA_UTILS.Add_Message( p_app_short_name => 'PA'
82: ,p_msg_name => l_error_message_code);
83: PA_PROJECT_SUBTEAMS_PUB.g_error_exists := FND_API.G_TRUE;
84: return;
85: end if;
86: /****
87: l_project_id := PA_UTILS.GetProjId (x_project_num => p_project_number);
98: END IF;
99:
100:
101: -- Call the private package
102: PA_PROJECT_SUBTEAMS_PVT.Create_Subteam
103: (
104: p_api_version => p_api_version
105: ,p_init_msg_list => p_init_msg_list
106: ,p_commit => p_commit
155: PA_DEBUG.Reset_Err_Stack;
156:
157: -- If g_error_exists is TRUE then set the x_return_status to 'E'
158:
159: IF PA_PROJECT_SUBTEAMS_PUB.g_error_exists = FND_API.G_TRUE THEN
160: x_return_status := FND_API.G_RET_STS_ERROR;
161: END IF;
162:
163:
168: ROLLBACK TO SBT_PUB_CREATE_SUBTEAM;
169: END IF;
170:
171: -- Set the excetption Message and the stack
172: FND_MSG_PUB.add_exc_msg ( p_pkg_name => 'PA_PROJECT_SUBTEAMS_PUB.Create_Subteam'
173: ,p_procedure_name => PA_DEBUG.G_Err_Stack );
174: --
175: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
176: RAISE; -- This is optional depending on the needs
188: p_calling_module IN VARCHAR2 := 'SELF_SERVICE',
189: p_debug_mode IN VARCHAR2 := 'N',
190: p_max_msg_count IN NUMBER := FND_API.g_miss_num,
191: p_subteam_row_id IN ROWID := NULL,
192: p_subteam_id IN pa_project_subteams.project_subteam_id%TYPE := fnd_api.g_miss_num,
193: p_subteam_name IN pa_project_subteams.name%TYPE := FND_API.g_miss_char,
194: p_object_type IN pa_project_subteams.object_type%TYPE := FND_API.g_miss_char,
195: p_object_id IN pa_project_subteams.object_id%TYPE := FND_API.g_miss_num,
196: p_object_name IN VARCHAR2 := FND_API.g_miss_char,
189: p_debug_mode IN VARCHAR2 := 'N',
190: p_max_msg_count IN NUMBER := FND_API.g_miss_num,
191: p_subteam_row_id IN ROWID := NULL,
192: p_subteam_id IN pa_project_subteams.project_subteam_id%TYPE := fnd_api.g_miss_num,
193: p_subteam_name IN pa_project_subteams.name%TYPE := FND_API.g_miss_char,
194: p_object_type IN pa_project_subteams.object_type%TYPE := FND_API.g_miss_char,
195: p_object_id IN pa_project_subteams.object_id%TYPE := FND_API.g_miss_num,
196: p_object_name IN VARCHAR2 := FND_API.g_miss_char,
197: p_description IN pa_project_subteams.description%TYPE := FND_API.g_miss_char,
190: p_max_msg_count IN NUMBER := FND_API.g_miss_num,
191: p_subteam_row_id IN ROWID := NULL,
192: p_subteam_id IN pa_project_subteams.project_subteam_id%TYPE := fnd_api.g_miss_num,
193: p_subteam_name IN pa_project_subteams.name%TYPE := FND_API.g_miss_char,
194: p_object_type IN pa_project_subteams.object_type%TYPE := FND_API.g_miss_char,
195: p_object_id IN pa_project_subteams.object_id%TYPE := FND_API.g_miss_num,
196: p_object_name IN VARCHAR2 := FND_API.g_miss_char,
197: p_description IN pa_project_subteams.description%TYPE := FND_API.g_miss_char,
198: p_record_version_number IN pa_project_subteams.record_version_number%TYPE := FND_API.g_miss_num,
191: p_subteam_row_id IN ROWID := NULL,
192: p_subteam_id IN pa_project_subteams.project_subteam_id%TYPE := fnd_api.g_miss_num,
193: p_subteam_name IN pa_project_subteams.name%TYPE := FND_API.g_miss_char,
194: p_object_type IN pa_project_subteams.object_type%TYPE := FND_API.g_miss_char,
195: p_object_id IN pa_project_subteams.object_id%TYPE := FND_API.g_miss_num,
196: p_object_name IN VARCHAR2 := FND_API.g_miss_char,
197: p_description IN pa_project_subteams.description%TYPE := FND_API.g_miss_char,
198: p_record_version_number IN pa_project_subteams.record_version_number%TYPE := FND_API.g_miss_num,
199: p_attribute_category IN pa_project_subteams.attribute_category%TYPE := FND_API.g_miss_char,
193: p_subteam_name IN pa_project_subteams.name%TYPE := FND_API.g_miss_char,
194: p_object_type IN pa_project_subteams.object_type%TYPE := FND_API.g_miss_char,
195: p_object_id IN pa_project_subteams.object_id%TYPE := FND_API.g_miss_num,
196: p_object_name IN VARCHAR2 := FND_API.g_miss_char,
197: p_description IN pa_project_subteams.description%TYPE := FND_API.g_miss_char,
198: p_record_version_number IN pa_project_subteams.record_version_number%TYPE := FND_API.g_miss_num,
199: p_attribute_category IN pa_project_subteams.attribute_category%TYPE := FND_API.g_miss_char,
200: p_attribute1 IN pa_project_subteams.attribute1%TYPE := FND_API.G_MISS_CHAR,
201: p_attribute2 IN pa_project_subteams.attribute2%TYPE := FND_API.G_MISS_CHAR,
194: p_object_type IN pa_project_subteams.object_type%TYPE := FND_API.g_miss_char,
195: p_object_id IN pa_project_subteams.object_id%TYPE := FND_API.g_miss_num,
196: p_object_name IN VARCHAR2 := FND_API.g_miss_char,
197: p_description IN pa_project_subteams.description%TYPE := FND_API.g_miss_char,
198: p_record_version_number IN pa_project_subteams.record_version_number%TYPE := FND_API.g_miss_num,
199: p_attribute_category IN pa_project_subteams.attribute_category%TYPE := FND_API.g_miss_char,
200: p_attribute1 IN pa_project_subteams.attribute1%TYPE := FND_API.G_MISS_CHAR,
201: p_attribute2 IN pa_project_subteams.attribute2%TYPE := FND_API.G_MISS_CHAR,
202: p_attribute3 IN pa_project_subteams.attribute3%TYPE := FND_API.G_MISS_CHAR,
195: p_object_id IN pa_project_subteams.object_id%TYPE := FND_API.g_miss_num,
196: p_object_name IN VARCHAR2 := FND_API.g_miss_char,
197: p_description IN pa_project_subteams.description%TYPE := FND_API.g_miss_char,
198: p_record_version_number IN pa_project_subteams.record_version_number%TYPE := FND_API.g_miss_num,
199: p_attribute_category IN pa_project_subteams.attribute_category%TYPE := FND_API.g_miss_char,
200: p_attribute1 IN pa_project_subteams.attribute1%TYPE := FND_API.G_MISS_CHAR,
201: p_attribute2 IN pa_project_subteams.attribute2%TYPE := FND_API.G_MISS_CHAR,
202: p_attribute3 IN pa_project_subteams.attribute3%TYPE := FND_API.G_MISS_CHAR,
203: p_attribute4 IN pa_project_subteams.attribute4%TYPE := FND_API.G_MISS_CHAR,
196: p_object_name IN VARCHAR2 := FND_API.g_miss_char,
197: p_description IN pa_project_subteams.description%TYPE := FND_API.g_miss_char,
198: p_record_version_number IN pa_project_subteams.record_version_number%TYPE := FND_API.g_miss_num,
199: p_attribute_category IN pa_project_subteams.attribute_category%TYPE := FND_API.g_miss_char,
200: p_attribute1 IN pa_project_subteams.attribute1%TYPE := FND_API.G_MISS_CHAR,
201: p_attribute2 IN pa_project_subteams.attribute2%TYPE := FND_API.G_MISS_CHAR,
202: p_attribute3 IN pa_project_subteams.attribute3%TYPE := FND_API.G_MISS_CHAR,
203: p_attribute4 IN pa_project_subteams.attribute4%TYPE := FND_API.G_MISS_CHAR,
204: p_attribute5 IN pa_project_subteams.attribute5%TYPE := FND_API.G_MISS_CHAR,
197: p_description IN pa_project_subteams.description%TYPE := FND_API.g_miss_char,
198: p_record_version_number IN pa_project_subteams.record_version_number%TYPE := FND_API.g_miss_num,
199: p_attribute_category IN pa_project_subteams.attribute_category%TYPE := FND_API.g_miss_char,
200: p_attribute1 IN pa_project_subteams.attribute1%TYPE := FND_API.G_MISS_CHAR,
201: p_attribute2 IN pa_project_subteams.attribute2%TYPE := FND_API.G_MISS_CHAR,
202: p_attribute3 IN pa_project_subteams.attribute3%TYPE := FND_API.G_MISS_CHAR,
203: p_attribute4 IN pa_project_subteams.attribute4%TYPE := FND_API.G_MISS_CHAR,
204: p_attribute5 IN pa_project_subteams.attribute5%TYPE := FND_API.G_MISS_CHAR,
205: p_attribute6 IN pa_project_subteams.attribute6%TYPE := FND_API.G_MISS_CHAR,
198: p_record_version_number IN pa_project_subteams.record_version_number%TYPE := FND_API.g_miss_num,
199: p_attribute_category IN pa_project_subteams.attribute_category%TYPE := FND_API.g_miss_char,
200: p_attribute1 IN pa_project_subteams.attribute1%TYPE := FND_API.G_MISS_CHAR,
201: p_attribute2 IN pa_project_subteams.attribute2%TYPE := FND_API.G_MISS_CHAR,
202: p_attribute3 IN pa_project_subteams.attribute3%TYPE := FND_API.G_MISS_CHAR,
203: p_attribute4 IN pa_project_subteams.attribute4%TYPE := FND_API.G_MISS_CHAR,
204: p_attribute5 IN pa_project_subteams.attribute5%TYPE := FND_API.G_MISS_CHAR,
205: p_attribute6 IN pa_project_subteams.attribute6%TYPE := FND_API.G_MISS_CHAR,
206: p_attribute7 IN pa_project_subteams.attribute7%TYPE := FND_API.G_MISS_CHAR,
199: p_attribute_category IN pa_project_subteams.attribute_category%TYPE := FND_API.g_miss_char,
200: p_attribute1 IN pa_project_subteams.attribute1%TYPE := FND_API.G_MISS_CHAR,
201: p_attribute2 IN pa_project_subteams.attribute2%TYPE := FND_API.G_MISS_CHAR,
202: p_attribute3 IN pa_project_subteams.attribute3%TYPE := FND_API.G_MISS_CHAR,
203: p_attribute4 IN pa_project_subteams.attribute4%TYPE := FND_API.G_MISS_CHAR,
204: p_attribute5 IN pa_project_subteams.attribute5%TYPE := FND_API.G_MISS_CHAR,
205: p_attribute6 IN pa_project_subteams.attribute6%TYPE := FND_API.G_MISS_CHAR,
206: p_attribute7 IN pa_project_subteams.attribute7%TYPE := FND_API.G_MISS_CHAR,
207: p_attribute8 IN pa_project_subteams.attribute8%TYPE := FND_API.G_MISS_CHAR,
200: p_attribute1 IN pa_project_subteams.attribute1%TYPE := FND_API.G_MISS_CHAR,
201: p_attribute2 IN pa_project_subteams.attribute2%TYPE := FND_API.G_MISS_CHAR,
202: p_attribute3 IN pa_project_subteams.attribute3%TYPE := FND_API.G_MISS_CHAR,
203: p_attribute4 IN pa_project_subteams.attribute4%TYPE := FND_API.G_MISS_CHAR,
204: p_attribute5 IN pa_project_subteams.attribute5%TYPE := FND_API.G_MISS_CHAR,
205: p_attribute6 IN pa_project_subteams.attribute6%TYPE := FND_API.G_MISS_CHAR,
206: p_attribute7 IN pa_project_subteams.attribute7%TYPE := FND_API.G_MISS_CHAR,
207: p_attribute8 IN pa_project_subteams.attribute8%TYPE := FND_API.G_MISS_CHAR,
208: p_attribute9 IN pa_project_subteams.attribute9%TYPE := FND_API.G_MISS_CHAR,
201: p_attribute2 IN pa_project_subteams.attribute2%TYPE := FND_API.G_MISS_CHAR,
202: p_attribute3 IN pa_project_subteams.attribute3%TYPE := FND_API.G_MISS_CHAR,
203: p_attribute4 IN pa_project_subteams.attribute4%TYPE := FND_API.G_MISS_CHAR,
204: p_attribute5 IN pa_project_subteams.attribute5%TYPE := FND_API.G_MISS_CHAR,
205: p_attribute6 IN pa_project_subteams.attribute6%TYPE := FND_API.G_MISS_CHAR,
206: p_attribute7 IN pa_project_subteams.attribute7%TYPE := FND_API.G_MISS_CHAR,
207: p_attribute8 IN pa_project_subteams.attribute8%TYPE := FND_API.G_MISS_CHAR,
208: p_attribute9 IN pa_project_subteams.attribute9%TYPE := FND_API.G_MISS_CHAR,
209: p_attribute10 IN pa_project_subteams.attribute10%TYPE := FND_API.G_MISS_CHAR,
202: p_attribute3 IN pa_project_subteams.attribute3%TYPE := FND_API.G_MISS_CHAR,
203: p_attribute4 IN pa_project_subteams.attribute4%TYPE := FND_API.G_MISS_CHAR,
204: p_attribute5 IN pa_project_subteams.attribute5%TYPE := FND_API.G_MISS_CHAR,
205: p_attribute6 IN pa_project_subteams.attribute6%TYPE := FND_API.G_MISS_CHAR,
206: p_attribute7 IN pa_project_subteams.attribute7%TYPE := FND_API.G_MISS_CHAR,
207: p_attribute8 IN pa_project_subteams.attribute8%TYPE := FND_API.G_MISS_CHAR,
208: p_attribute9 IN pa_project_subteams.attribute9%TYPE := FND_API.G_MISS_CHAR,
209: p_attribute10 IN pa_project_subteams.attribute10%TYPE := FND_API.G_MISS_CHAR,
210: p_attribute11 IN pa_project_subteams.attribute11%TYPE := FND_API.G_MISS_CHAR,
203: p_attribute4 IN pa_project_subteams.attribute4%TYPE := FND_API.G_MISS_CHAR,
204: p_attribute5 IN pa_project_subteams.attribute5%TYPE := FND_API.G_MISS_CHAR,
205: p_attribute6 IN pa_project_subteams.attribute6%TYPE := FND_API.G_MISS_CHAR,
206: p_attribute7 IN pa_project_subteams.attribute7%TYPE := FND_API.G_MISS_CHAR,
207: p_attribute8 IN pa_project_subteams.attribute8%TYPE := FND_API.G_MISS_CHAR,
208: p_attribute9 IN pa_project_subteams.attribute9%TYPE := FND_API.G_MISS_CHAR,
209: p_attribute10 IN pa_project_subteams.attribute10%TYPE := FND_API.G_MISS_CHAR,
210: p_attribute11 IN pa_project_subteams.attribute11%TYPE := FND_API.G_MISS_CHAR,
211: p_attribute12 IN pa_project_subteams.attribute12%TYPE := FND_API.G_MISS_CHAR,
204: p_attribute5 IN pa_project_subteams.attribute5%TYPE := FND_API.G_MISS_CHAR,
205: p_attribute6 IN pa_project_subteams.attribute6%TYPE := FND_API.G_MISS_CHAR,
206: p_attribute7 IN pa_project_subteams.attribute7%TYPE := FND_API.G_MISS_CHAR,
207: p_attribute8 IN pa_project_subteams.attribute8%TYPE := FND_API.G_MISS_CHAR,
208: p_attribute9 IN pa_project_subteams.attribute9%TYPE := FND_API.G_MISS_CHAR,
209: p_attribute10 IN pa_project_subteams.attribute10%TYPE := FND_API.G_MISS_CHAR,
210: p_attribute11 IN pa_project_subteams.attribute11%TYPE := FND_API.G_MISS_CHAR,
211: p_attribute12 IN pa_project_subteams.attribute12%TYPE := FND_API.G_MISS_CHAR,
212: p_attribute13 IN pa_project_subteams.attribute13%TYPE := FND_API.G_MISS_CHAR,
205: p_attribute6 IN pa_project_subteams.attribute6%TYPE := FND_API.G_MISS_CHAR,
206: p_attribute7 IN pa_project_subteams.attribute7%TYPE := FND_API.G_MISS_CHAR,
207: p_attribute8 IN pa_project_subteams.attribute8%TYPE := FND_API.G_MISS_CHAR,
208: p_attribute9 IN pa_project_subteams.attribute9%TYPE := FND_API.G_MISS_CHAR,
209: p_attribute10 IN pa_project_subteams.attribute10%TYPE := FND_API.G_MISS_CHAR,
210: p_attribute11 IN pa_project_subteams.attribute11%TYPE := FND_API.G_MISS_CHAR,
211: p_attribute12 IN pa_project_subteams.attribute12%TYPE := FND_API.G_MISS_CHAR,
212: p_attribute13 IN pa_project_subteams.attribute13%TYPE := FND_API.G_MISS_CHAR,
213: p_attribute14 IN pa_project_subteams.attribute14%TYPE := FND_API.G_MISS_CHAR,
206: p_attribute7 IN pa_project_subteams.attribute7%TYPE := FND_API.G_MISS_CHAR,
207: p_attribute8 IN pa_project_subteams.attribute8%TYPE := FND_API.G_MISS_CHAR,
208: p_attribute9 IN pa_project_subteams.attribute9%TYPE := FND_API.G_MISS_CHAR,
209: p_attribute10 IN pa_project_subteams.attribute10%TYPE := FND_API.G_MISS_CHAR,
210: p_attribute11 IN pa_project_subteams.attribute11%TYPE := FND_API.G_MISS_CHAR,
211: p_attribute12 IN pa_project_subteams.attribute12%TYPE := FND_API.G_MISS_CHAR,
212: p_attribute13 IN pa_project_subteams.attribute13%TYPE := FND_API.G_MISS_CHAR,
213: p_attribute14 IN pa_project_subteams.attribute14%TYPE := FND_API.G_MISS_CHAR,
214: p_attribute15 IN pa_project_subteams.attribute15%TYPE := FND_API.G_MISS_CHAR,
207: p_attribute8 IN pa_project_subteams.attribute8%TYPE := FND_API.G_MISS_CHAR,
208: p_attribute9 IN pa_project_subteams.attribute9%TYPE := FND_API.G_MISS_CHAR,
209: p_attribute10 IN pa_project_subteams.attribute10%TYPE := FND_API.G_MISS_CHAR,
210: p_attribute11 IN pa_project_subteams.attribute11%TYPE := FND_API.G_MISS_CHAR,
211: p_attribute12 IN pa_project_subteams.attribute12%TYPE := FND_API.G_MISS_CHAR,
212: p_attribute13 IN pa_project_subteams.attribute13%TYPE := FND_API.G_MISS_CHAR,
213: p_attribute14 IN pa_project_subteams.attribute14%TYPE := FND_API.G_MISS_CHAR,
214: p_attribute15 IN pa_project_subteams.attribute15%TYPE := FND_API.G_MISS_CHAR,
215: --Bug: 4537865
208: p_attribute9 IN pa_project_subteams.attribute9%TYPE := FND_API.G_MISS_CHAR,
209: p_attribute10 IN pa_project_subteams.attribute10%TYPE := FND_API.G_MISS_CHAR,
210: p_attribute11 IN pa_project_subteams.attribute11%TYPE := FND_API.G_MISS_CHAR,
211: p_attribute12 IN pa_project_subteams.attribute12%TYPE := FND_API.G_MISS_CHAR,
212: p_attribute13 IN pa_project_subteams.attribute13%TYPE := FND_API.G_MISS_CHAR,
213: p_attribute14 IN pa_project_subteams.attribute14%TYPE := FND_API.G_MISS_CHAR,
214: p_attribute15 IN pa_project_subteams.attribute15%TYPE := FND_API.G_MISS_CHAR,
215: --Bug: 4537865
216: x_return_status OUT NOCOPY VARCHAR2,
209: p_attribute10 IN pa_project_subteams.attribute10%TYPE := FND_API.G_MISS_CHAR,
210: p_attribute11 IN pa_project_subteams.attribute11%TYPE := FND_API.G_MISS_CHAR,
211: p_attribute12 IN pa_project_subteams.attribute12%TYPE := FND_API.G_MISS_CHAR,
212: p_attribute13 IN pa_project_subteams.attribute13%TYPE := FND_API.G_MISS_CHAR,
213: p_attribute14 IN pa_project_subteams.attribute14%TYPE := FND_API.G_MISS_CHAR,
214: p_attribute15 IN pa_project_subteams.attribute15%TYPE := FND_API.G_MISS_CHAR,
215: --Bug: 4537865
216: x_return_status OUT NOCOPY VARCHAR2,
217: x_msg_count OUT NOCOPY NUMBER,
210: p_attribute11 IN pa_project_subteams.attribute11%TYPE := FND_API.G_MISS_CHAR,
211: p_attribute12 IN pa_project_subteams.attribute12%TYPE := FND_API.G_MISS_CHAR,
212: p_attribute13 IN pa_project_subteams.attribute13%TYPE := FND_API.G_MISS_CHAR,
213: p_attribute14 IN pa_project_subteams.attribute14%TYPE := FND_API.G_MISS_CHAR,
214: p_attribute15 IN pa_project_subteams.attribute15%TYPE := FND_API.G_MISS_CHAR,
215: --Bug: 4537865
216: x_return_status OUT NOCOPY VARCHAR2,
217: x_msg_count OUT NOCOPY NUMBER,
218: --x_record_version_number OUT NOCOPY NUMBER,
222: IS
223:
224: CURSOR check_record_version IS
225: SELECT ROWID
226: FROM pa_project_subteams
227: WHERE (project_subteam_id = p_subteam_id
228: OR ROWID = p_subteam_row_id)
229: AND record_version_number = p_record_version_number;
230:
234: l_error_message_code varchar2(30);
235: BEGIN
236:
237: -- Initialize the Error Stack
238: PA_DEBUG.init_err_stack('PA_PROJECT_SUBTEAMS_PUB.Update_Subteam');
239:
240: -- Initialize the error flag
241: PA_PROJECT_SUBTEAMS_PUB.g_error_exists := FND_API.G_FALSE;
242:
237: -- Initialize the Error Stack
238: PA_DEBUG.init_err_stack('PA_PROJECT_SUBTEAMS_PUB.Update_Subteam');
239:
240: -- Initialize the error flag
241: PA_PROJECT_SUBTEAMS_PUB.g_error_exists := FND_API.G_FALSE;
242:
243: -- Issue API savepoint if the transaction is to be committed
244: IF p_commit = FND_API.G_TRUE THEN
245: SAVEPOINT SBT_PUB_UPDATE_SUBTEAM;
256:
257: IF check_record_version%NOTFOUND THEN
258: PA_UTILS.Add_Message( p_app_short_name => 'PA'
259: ,p_msg_name => 'PA_XC_RECORD_CHANGED');
260: PA_PROJECT_SUBTEAMS_PUB.g_error_exists := FND_API.G_TRUE;
261: ELSE
262: -- Do all Value to ID conversions and validations
263: IF (p_object_id IS NULL OR p_object_id = FND_API.G_MISS_NUM)
264: AND (p_object_name IS NOT NULL AND p_object_name <> FND_API.G_MISS_CHAR) THEN
269: ,x_error_message_code => l_error_message_code);
270: if(x_return_status = FND_API.G_RET_STS_ERROR) then
271: PA_UTILS.Add_Message( p_app_short_name => 'PA'
272: ,p_msg_name =>l_error_message_code );
273: PA_PROJECT_SUBTEAMS_PUB.g_error_exists := FND_API.G_TRUE;
274: return;
275: end if;
276: --l_project_id := PA_UTILS.GetProjId (x_project_num => p_project_number);
277: ELSE
279: END IF;
280:
281:
282: -- Call the private package
283: PA_PROJECT_SUBTEAMS_PVT.Update_Subteam
284: (
285: p_api_version => p_api_version
286: ,p_init_msg_list => p_init_msg_list
287: ,p_commit => p_commit
341: PA_DEBUG.Reset_Err_Stack;
342:
343: -- If g_error_exists is TRUE then set the x_return_status to 'E'
344:
345: IF PA_PROJECT_SUBTEAMS_PUB.g_error_exists = FND_API.G_TRUE THEN
346: x_return_status := FND_API.G_RET_STS_ERROR;
347: /***
348: SELECT record_version_number
349: into x_record_version_number
346: x_return_status := FND_API.G_RET_STS_ERROR;
347: /***
348: SELECT record_version_number
349: into x_record_version_number
350: FROM pa_project_subteams
351: WHERE project_subteam_id = p_subteam_id;
352:
353: ELSE
354: x_record_version_number := p_record_version_number + 1;
362: ROLLBACK TO SBT_PUB_UPDATE_SUBTEAM;
363: END IF;
364:
365: -- Set the exception Message and the stack
366: FND_MSG_PUB.add_exc_msg ( p_pkg_name => 'PA_PROJECT_SUBTEAMS_PUB.Update_Subteam'
367: ,p_procedure_name => PA_DEBUG.G_Err_Stack );
368: --
369: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
370: RAISE; -- This is optional depending on the needs
391: p_max_msg_count IN NUMBER := FND_API.g_miss_num,
392:
393: p_subteam_row_id IN ROWID := NULL,
394:
395: p_subteam_id IN pa_project_subteams.project_subteam_id%TYPE := FND_API.G_MISS_NUM,
396:
397: p_object_type IN pa_project_subteams.object_type%TYPE := fnd_api.g_miss_char,
398: p_object_id IN pa_project_subteams.object_id%TYPE := FND_API.g_miss_num,
399:
393: p_subteam_row_id IN ROWID := NULL,
394:
395: p_subteam_id IN pa_project_subteams.project_subteam_id%TYPE := FND_API.G_MISS_NUM,
396:
397: p_object_type IN pa_project_subteams.object_type%TYPE := fnd_api.g_miss_char,
398: p_object_id IN pa_project_subteams.object_id%TYPE := FND_API.g_miss_num,
399:
400: p_subteam_name IN pa_project_subteams.name%TYPE := fnd_api.g_miss_char,
401:
394:
395: p_subteam_id IN pa_project_subteams.project_subteam_id%TYPE := FND_API.G_MISS_NUM,
396:
397: p_object_type IN pa_project_subteams.object_type%TYPE := fnd_api.g_miss_char,
398: p_object_id IN pa_project_subteams.object_id%TYPE := FND_API.g_miss_num,
399:
400: p_subteam_name IN pa_project_subteams.name%TYPE := fnd_api.g_miss_char,
401:
402: p_record_version_number IN NUMBER := FND_API.G_MISS_NUM ,
396:
397: p_object_type IN pa_project_subteams.object_type%TYPE := fnd_api.g_miss_char,
398: p_object_id IN pa_project_subteams.object_id%TYPE := FND_API.g_miss_num,
399:
400: p_subteam_name IN pa_project_subteams.name%TYPE := fnd_api.g_miss_char,
401:
402: p_record_version_number IN NUMBER := FND_API.G_MISS_NUM ,
403:
404: --Bug: 4537865
414: l_msg_index_out NUMBER;
415:
416: CURSOR check_subteam IS
417: SELECT ROWID
418: FROM pa_project_subteams
419: WHERE (project_subteam_id = p_subteam_id AND p_subteam_id IS NOT NULL)
420: OR (name = p_subteam_name
421: AND p_subteam_name IS NOT NULL
422: AND object_type = p_object_type
427:
428: BEGIN
429:
430: -- Initialize the Error Stack
431: PA_DEBUG.init_err_stack('PA_PROJECT_SUBTEAMS_PUB.Delete_Subteam');
432:
433: -- Initialize the error flag
434: PA_PROJECT_SUBTEAMS_PUB.g_error_exists := FND_API.G_FALSE;
435:
430: -- Initialize the Error Stack
431: PA_DEBUG.init_err_stack('PA_PROJECT_SUBTEAMS_PUB.Delete_Subteam');
432:
433: -- Initialize the error flag
434: PA_PROJECT_SUBTEAMS_PUB.g_error_exists := FND_API.G_FALSE;
435:
436: -- Issue API savepoint if the transaction is to be committed
437: IF p_commit = FND_API.G_TRUE THEN
438: SAVEPOINT SBT_PUB_DELETE_SUBTEAM;
450: IF check_subteam%NOTFOUND THEN
451:
452: PA_UTILS.Add_Message( p_app_short_name => 'PA'
453: ,p_msg_name => 'PA_XC_RECORD_CHANGED');
454: PA_PROJECT_SUBTEAMS_PUB.g_error_exists := FND_API.G_TRUE;
455:
456: ELSE
457:
458: -- Call the private API
455:
456: ELSE
457:
458: -- Call the private API
459: PA_PROJECT_SUBTEAMS_PVT.Delete_Subteam
460: (
461: p_api_version => p_api_version
462: ,p_init_msg_list => p_init_msg_list
463: ,p_commit => p_commit
494: PA_DEBUG.Reset_Err_Stack;
495:
496: -- If g_error_exists is TRUE then set the x_return_status to 'E'
497:
498: IF PA_PROJECT_SUBTEAMS_PUB.g_error_exists = FND_API.G_TRUE THEN
499:
500: x_return_status := FND_API.G_RET_STS_ERROR;
501:
502: END IF;
509: IF p_commit = FND_API.G_TRUE THEN
510: ROLLBACK TO SBT_PUB_DELETE_SUBTEAM;
511: END IF;
512: -- Set the excetption Message and the stack
513: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'PA_PROJECT_SUBTEAMS_PUB.Delete_Subteam'
514: ,p_procedure_name => PA_DEBUG.G_Err_Stack );
515: --
516: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
517: RAISE; -- This is optional depending on the needs
534: p_debug_mode IN VARCHAR2 := 'N',
535:
536: p_max_msg_count IN NUMBER := FND_API.g_miss_num,
537:
538: p_object_type IN pa_project_subteams.object_type%TYPE := fnd_api.g_miss_char,
539: p_object_id IN pa_project_subteams.object_id%TYPE := FND_API.g_miss_num,
540:
541: --Bug: 4537865
542: x_return_status OUT NOCOPY VARCHAR2,
535:
536: p_max_msg_count IN NUMBER := FND_API.g_miss_num,
537:
538: p_object_type IN pa_project_subteams.object_type%TYPE := fnd_api.g_miss_char,
539: p_object_id IN pa_project_subteams.object_id%TYPE := FND_API.g_miss_num,
540:
541: --Bug: 4537865
542: x_return_status OUT NOCOPY VARCHAR2,
543:
551: l_msg_index_out NUMBER;
552:
553: CURSOR check_subteam IS
554: SELECT ROWID
555: FROM pa_project_subteams
556: WHERE
557: object_type = p_object_type
558: AND object_id = p_object_id ;
559:
560:
561: BEGIN
562:
563: -- Initialize the Error Stack
564: PA_DEBUG.init_err_stack('PA_PROJECT_SUBTEAMS_PUB.Delete_Subteam_By_Obj');
565:
566: -- Initialize the error flag
567: PA_PROJECT_SUBTEAMS_PUB.g_error_exists := FND_API.G_FALSE;
568:
563: -- Initialize the Error Stack
564: PA_DEBUG.init_err_stack('PA_PROJECT_SUBTEAMS_PUB.Delete_Subteam_By_Obj');
565:
566: -- Initialize the error flag
567: PA_PROJECT_SUBTEAMS_PUB.g_error_exists := FND_API.G_FALSE;
568:
569: -- Issue API savepoint if the transaction is to be committed
570: IF p_commit = FND_API.G_TRUE THEN
571: SAVEPOINT SBT_PUB_DELETE_SUBTEAM_BY_OBJ;
585: --IF check_subteam%NOTFOUND THEN
586:
587: --PA_UTILS.Add_Message( p_app_short_name => 'PA'
588: -- ,p_msg_name => 'PA_XC_RECORD_CHANGED');
589: --PA_PROJECT_SUBTEAMS_PUB.g_error_exists := FND_API.G_TRUE;
590:
591: --ELSE
592:
593: -- Call the private API
590:
591: --ELSE
592:
593: -- Call the private API
594: PA_PROJECT_SUBTEAMS_PVT.Delete_Subteam
595: (
596: p_api_version => p_api_version
597: ,p_init_msg_list => p_init_msg_list
598: ,p_commit => p_commit
628: PA_DEBUG.Reset_Err_Stack;
629:
630: -- If g_error_exists is TRUE then set the x_return_status to 'E'
631:
632: IF PA_PROJECT_SUBTEAMS_PUB.g_error_exists = FND_API.G_TRUE THEN
633:
634: x_return_status := FND_API.G_RET_STS_ERROR;
635:
636: END IF;
643: IF p_commit = FND_API.G_TRUE THEN
644: ROLLBACK TO SBT_PUB_DELETE_SUBTEAM_BY_OBJ;
645: END IF;
646: -- Set the excetption Message and the stack
647: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'PA_PROJECT_SUBTEAMS_PUB.Delete_Subteam_By_Obj'
648: ,p_procedure_name => PA_DEBUG.G_Err_Stack );
649: --
650: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
651: RAISE; -- This is optional depending on the needs
653: END Delete_Subteam_By_Obj;
654:
655: --
656: --
657: END pa_project_subteams_pub;
658: --