DBA Data[Home] [Help]

APPS.PA_STAFFED_ASSIGNMENT_PVT dependencies on FND_API

Line 10: ,p_unfilled_assignment_status IN pa_project_assignments.status_code%TYPE := FND_API.G_MISS_CHAR

6:
7: PROCEDURE Create_Staffed_Assignment
8: ( p_assignment_rec IN PA_ASSIGNMENTS_PUB.Assignment_Rec_Type
9: ,p_asgn_creation_mode IN VARCHAR2 := 'FULL'
10: ,p_unfilled_assignment_status IN pa_project_assignments.status_code%TYPE := FND_API.G_MISS_CHAR
11: ,p_resource_source_id IN NUMBER := FND_API.G_MISS_NUM
12: ,p_location_city IN pa_locations.city%TYPE := FND_API.G_MISS_CHAR
13: ,p_location_region IN pa_locations.region%TYPE := FND_API.G_MISS_CHAR
14: ,p_location_country_code IN pa_locations.country_code%TYPE := FND_API.G_MISS_CHAR

Line 11: ,p_resource_source_id IN NUMBER := FND_API.G_MISS_NUM

7: PROCEDURE Create_Staffed_Assignment
8: ( p_assignment_rec IN PA_ASSIGNMENTS_PUB.Assignment_Rec_Type
9: ,p_asgn_creation_mode IN VARCHAR2 := 'FULL'
10: ,p_unfilled_assignment_status IN pa_project_assignments.status_code%TYPE := FND_API.G_MISS_CHAR
11: ,p_resource_source_id IN NUMBER := FND_API.G_MISS_NUM
12: ,p_location_city IN pa_locations.city%TYPE := FND_API.G_MISS_CHAR
13: ,p_location_region IN pa_locations.region%TYPE := FND_API.G_MISS_CHAR
14: ,p_location_country_code IN pa_locations.country_code%TYPE := FND_API.G_MISS_CHAR
15: ,p_sum_tasks_flag IN VARCHAR2 := FND_API.G_FALSE -- FP.M Development

Line 12: ,p_location_city IN pa_locations.city%TYPE := FND_API.G_MISS_CHAR

8: ( p_assignment_rec IN PA_ASSIGNMENTS_PUB.Assignment_Rec_Type
9: ,p_asgn_creation_mode IN VARCHAR2 := 'FULL'
10: ,p_unfilled_assignment_status IN pa_project_assignments.status_code%TYPE := FND_API.G_MISS_CHAR
11: ,p_resource_source_id IN NUMBER := FND_API.G_MISS_NUM
12: ,p_location_city IN pa_locations.city%TYPE := FND_API.G_MISS_CHAR
13: ,p_location_region IN pa_locations.region%TYPE := FND_API.G_MISS_CHAR
14: ,p_location_country_code IN pa_locations.country_code%TYPE := FND_API.G_MISS_CHAR
15: ,p_sum_tasks_flag IN VARCHAR2 := FND_API.G_FALSE -- FP.M Development
16: ,p_budget_version_id IN pa_resource_assignments.budget_version_id%TYPE := FND_API.G_MISS_NUM

Line 13: ,p_location_region IN pa_locations.region%TYPE := FND_API.G_MISS_CHAR

9: ,p_asgn_creation_mode IN VARCHAR2 := 'FULL'
10: ,p_unfilled_assignment_status IN pa_project_assignments.status_code%TYPE := FND_API.G_MISS_CHAR
11: ,p_resource_source_id IN NUMBER := FND_API.G_MISS_NUM
12: ,p_location_city IN pa_locations.city%TYPE := FND_API.G_MISS_CHAR
13: ,p_location_region IN pa_locations.region%TYPE := FND_API.G_MISS_CHAR
14: ,p_location_country_code IN pa_locations.country_code%TYPE := FND_API.G_MISS_CHAR
15: ,p_sum_tasks_flag IN VARCHAR2 := FND_API.G_FALSE -- FP.M Development
16: ,p_budget_version_id IN pa_resource_assignments.budget_version_id%TYPE := FND_API.G_MISS_NUM
17: ,p_commit IN VARCHAR2 := FND_API.G_FALSE

Line 14: ,p_location_country_code IN pa_locations.country_code%TYPE := FND_API.G_MISS_CHAR

10: ,p_unfilled_assignment_status IN pa_project_assignments.status_code%TYPE := FND_API.G_MISS_CHAR
11: ,p_resource_source_id IN NUMBER := FND_API.G_MISS_NUM
12: ,p_location_city IN pa_locations.city%TYPE := FND_API.G_MISS_CHAR
13: ,p_location_region IN pa_locations.region%TYPE := FND_API.G_MISS_CHAR
14: ,p_location_country_code IN pa_locations.country_code%TYPE := FND_API.G_MISS_CHAR
15: ,p_sum_tasks_flag IN VARCHAR2 := FND_API.G_FALSE -- FP.M Development
16: ,p_budget_version_id IN pa_resource_assignments.budget_version_id%TYPE := FND_API.G_MISS_NUM
17: ,p_commit IN VARCHAR2 := FND_API.G_FALSE
18: ,p_validate_only IN VARCHAR2 := FND_API.G_TRUE

Line 15: ,p_sum_tasks_flag IN VARCHAR2 := FND_API.G_FALSE -- FP.M Development

11: ,p_resource_source_id IN NUMBER := FND_API.G_MISS_NUM
12: ,p_location_city IN pa_locations.city%TYPE := FND_API.G_MISS_CHAR
13: ,p_location_region IN pa_locations.region%TYPE := FND_API.G_MISS_CHAR
14: ,p_location_country_code IN pa_locations.country_code%TYPE := FND_API.G_MISS_CHAR
15: ,p_sum_tasks_flag IN VARCHAR2 := FND_API.G_FALSE -- FP.M Development
16: ,p_budget_version_id IN pa_resource_assignments.budget_version_id%TYPE := FND_API.G_MISS_NUM
17: ,p_commit IN VARCHAR2 := FND_API.G_FALSE
18: ,p_validate_only IN VARCHAR2 := FND_API.G_TRUE
19: ,x_new_assignment_id OUT NOCOPY pa_project_assignments.assignment_id%TYPE --File.Sql.39 bug 4440895

Line 16: ,p_budget_version_id IN pa_resource_assignments.budget_version_id%TYPE := FND_API.G_MISS_NUM

12: ,p_location_city IN pa_locations.city%TYPE := FND_API.G_MISS_CHAR
13: ,p_location_region IN pa_locations.region%TYPE := FND_API.G_MISS_CHAR
14: ,p_location_country_code IN pa_locations.country_code%TYPE := FND_API.G_MISS_CHAR
15: ,p_sum_tasks_flag IN VARCHAR2 := FND_API.G_FALSE -- FP.M Development
16: ,p_budget_version_id IN pa_resource_assignments.budget_version_id%TYPE := FND_API.G_MISS_NUM
17: ,p_commit IN VARCHAR2 := FND_API.G_FALSE
18: ,p_validate_only IN VARCHAR2 := FND_API.G_TRUE
19: ,x_new_assignment_id OUT NOCOPY pa_project_assignments.assignment_id%TYPE --File.Sql.39 bug 4440895
20: ,x_assignment_row_id OUT NOCOPY ROWID --File.Sql.39 bug 4440895

Line 17: ,p_commit IN VARCHAR2 := FND_API.G_FALSE

13: ,p_location_region IN pa_locations.region%TYPE := FND_API.G_MISS_CHAR
14: ,p_location_country_code IN pa_locations.country_code%TYPE := FND_API.G_MISS_CHAR
15: ,p_sum_tasks_flag IN VARCHAR2 := FND_API.G_FALSE -- FP.M Development
16: ,p_budget_version_id IN pa_resource_assignments.budget_version_id%TYPE := FND_API.G_MISS_NUM
17: ,p_commit IN VARCHAR2 := FND_API.G_FALSE
18: ,p_validate_only IN VARCHAR2 := FND_API.G_TRUE
19: ,x_new_assignment_id OUT NOCOPY pa_project_assignments.assignment_id%TYPE --File.Sql.39 bug 4440895
20: ,x_assignment_row_id OUT NOCOPY ROWID --File.Sql.39 bug 4440895
21: ,x_resource_id OUT NOCOPY pa_resources.resource_id%TYPE --File.Sql.39 bug 4440895

Line 18: ,p_validate_only IN VARCHAR2 := FND_API.G_TRUE

14: ,p_location_country_code IN pa_locations.country_code%TYPE := FND_API.G_MISS_CHAR
15: ,p_sum_tasks_flag IN VARCHAR2 := FND_API.G_FALSE -- FP.M Development
16: ,p_budget_version_id IN pa_resource_assignments.budget_version_id%TYPE := FND_API.G_MISS_NUM
17: ,p_commit IN VARCHAR2 := FND_API.G_FALSE
18: ,p_validate_only IN VARCHAR2 := FND_API.G_TRUE
19: ,x_new_assignment_id OUT NOCOPY pa_project_assignments.assignment_id%TYPE --File.Sql.39 bug 4440895
20: ,x_assignment_row_id OUT NOCOPY ROWID --File.Sql.39 bug 4440895
21: ,x_resource_id OUT NOCOPY pa_resources.resource_id%TYPE --File.Sql.39 bug 4440895
22: ,x_return_status OUT NOCOPY VARCHAR2 --File.Sql.39 bug 4440895

Line 57: l_project_parties_error_exists VARCHAR2(1) := FND_API.G_FALSE;

53: l_asgn_text VARCHAR2(30);
54: l_allow_asgmt VARCHAR2(1);
55: l_work_type_id NUMBER;
56: l_raw_revenue NUMBER;
57: l_project_parties_error_exists VARCHAR2(1) := FND_API.G_FALSE;
58: l_check_resource VARCHAR2(1);
59: l_proj_asgmt_res_format_id NUMBER;
60: l_person_id NUMBER;
61: l_task_assignment_id_tbl system.pa_num_tbl_type := system.pa_num_tbl_type();

Line 176: x_return_status := FND_API.G_RET_STS_SUCCESS ;

172:
173: BEGIN
174:
175: -- 4537865 : Initialize the return_status
176: x_return_status := FND_API.G_RET_STS_SUCCESS ;
177:
178: -- Initialize the Error Stack
179: PA_DEBUG.set_err_stack('PA_STAFFED_ASSIGNMENT_PVT.Create_Staffed_Assignment');
180: --dbms_output.put_line('create staffed assignment');

Line 206: IF (l_assignment_rec.project_id IS NULL OR l_assignment_rec.project_id = FND_API.G_MISS_NUM) THEN

202: --
203: --
204: -- Check that mandatory project id exists
205: --
206: IF (l_assignment_rec.project_id IS NULL OR l_assignment_rec.project_id = FND_API.G_MISS_NUM) THEN
207: PA_UTILS.Add_Message( p_app_short_name => 'PA'
208: ,p_msg_name => 'PA_PROJ_ID_REQUIRED_FOR_ASGN'
209: ,p_token1 => 'ASGNTYPE'
210: ,p_value1 => l_asgn_text);

Line 211: PA_ASSIGNMENTS_PUB.g_error_exists := FND_API.G_TRUE;

207: PA_UTILS.Add_Message( p_app_short_name => 'PA'
208: ,p_msg_name => 'PA_PROJ_ID_REQUIRED_FOR_ASGN'
209: ,p_token1 => 'ASGNTYPE'
210: ,p_value1 => l_asgn_text);
211: PA_ASSIGNMENTS_PUB.g_error_exists := FND_API.G_TRUE;
212: RETURN;
213: END IF;
214:
215: --

Line 219: l_assignment_rec.assignment_name = FND_API.G_MISS_CHAR THEN

215: --
216: -- Check that mandatory assignment name exists
217: --
218: IF l_assignment_rec.assignment_name IS NULL OR
219: l_assignment_rec.assignment_name = FND_API.G_MISS_CHAR THEN
220: PA_UTILS.Add_Message( p_app_short_name => 'PA'
221: ,p_msg_name => 'PA_NAME_REQUIRED_FOR_ASGN');
222: PA_ASSIGNMENTS_PUB.g_error_exists := FND_API.G_TRUE;
223: END IF;

Line 222: PA_ASSIGNMENTS_PUB.g_error_exists := FND_API.G_TRUE;

218: IF l_assignment_rec.assignment_name IS NULL OR
219: l_assignment_rec.assignment_name = FND_API.G_MISS_CHAR THEN
220: PA_UTILS.Add_Message( p_app_short_name => 'PA'
221: ,p_msg_name => 'PA_NAME_REQUIRED_FOR_ASGN');
222: PA_ASSIGNMENTS_PUB.g_error_exists := FND_API.G_TRUE;
223: END IF;
224:
225: --
226: -- Check that mandatory project role exists

Line 229: OR l_assignment_rec.project_role_id = FND_API.G_MISS_NUM THEN

225: --
226: -- Check that mandatory project role exists
227: --
228: IF l_assignment_rec.project_role_id IS NULL
229: OR l_assignment_rec.project_role_id = FND_API.G_MISS_NUM THEN
230: PA_UTILS.Add_Message( p_app_short_name => 'PA'
231: ,p_msg_name => 'PA_PROJ_ROLE_REQUIRED_FOR_ASGN'
232: ,p_token1 => 'ASGNTYPE'
233: ,p_value1 => l_asgn_text);

Line 234: PA_ASSIGNMENTS_PUB.g_error_exists := FND_API.G_TRUE;

230: PA_UTILS.Add_Message( p_app_short_name => 'PA'
231: ,p_msg_name => 'PA_PROJ_ROLE_REQUIRED_FOR_ASGN'
232: ,p_token1 => 'ASGNTYPE'
233: ,p_value1 => l_asgn_text);
234: PA_ASSIGNMENTS_PUB.g_error_exists := FND_API.G_TRUE;
235: END IF;
236:
237: --
238: --Check p_work_type_id IS NOT NULL

Line 241: OR l_assignment_rec.work_type_id = FND_API.G_MISS_NUM

237: --
238: --Check p_work_type_id IS NOT NULL
239: --
240: IF l_assignment_rec.work_type_id IS NULL
241: OR l_assignment_rec.work_type_id = FND_API.G_MISS_NUM
242: OR l_assignment_rec.work_type_id = 0 THEN
243:
244: PA_UTILS.Add_Message( p_app_short_name => 'PA'
245: ,p_msg_name => 'PA_WORK_TYPE_REQUIRED_FOR_ASGN' );

Line 246: PA_ASSIGNMENTS_PUB.g_error_exists := FND_API.G_TRUE;

242: OR l_assignment_rec.work_type_id = 0 THEN
243:
244: PA_UTILS.Add_Message( p_app_short_name => 'PA'
245: ,p_msg_name => 'PA_WORK_TYPE_REQUIRED_FOR_ASGN' );
246: PA_ASSIGNMENTS_PUB.g_error_exists := FND_API.G_TRUE;
247:
248: ELSE
249: --
250: --check for indirect project, only non-billable work types

Line 258: IF l_return_status = FND_API.G_RET_STS_ERROR THEN

254: ,P_PROJECT_ID => l_assignment_rec.project_id
255: ,P_TASK_ID => NULL
256: ,X_RETURN_STATUS => l_return_status
257: ,X_ERROR_MESSAGE_CODE => l_error_message_code);
258: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
259: PA_UTILS.Add_Message( p_app_short_name => 'PA'
260: ,p_msg_name => l_error_message_code );
261: PA_ASSIGNMENTS_PUB.g_error_exists := FND_API.G_TRUE;
262: END IF;

Line 261: PA_ASSIGNMENTS_PUB.g_error_exists := FND_API.G_TRUE;

257: ,X_ERROR_MESSAGE_CODE => l_error_message_code);
258: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
259: PA_UTILS.Add_Message( p_app_short_name => 'PA'
260: ,p_msg_name => l_error_message_code );
261: PA_ASSIGNMENTS_PUB.g_error_exists := FND_API.G_TRUE;
262: END IF;
263:
264: END IF;
265:

Line 274: PA_ASSIGNMENTS_PUB.g_error_exists := FND_API.G_TRUE;

270: PA_UTILS.Add_Message( p_app_short_name => 'PA'
271: ,p_msg_name => 'PA_INVALID_ASGN_STARTING_STUS'
272: ,p_token1 => 'ASGNTYPE'
273: ,p_value1 => l_asgn_text);
274: PA_ASSIGNMENTS_PUB.g_error_exists := FND_API.G_TRUE;
275: END IF;
276:
277: -- Check Action allowed status (check that it is allowed to have a staffed assignment for a project or open assignment)
278:

Line 288: PA_ASSIGNMENTS_PUB.g_error_exists := FND_API.G_TRUE;

284: p_project_id => l_assignment_rec.project_id,
285: p_add_message => 'Y');
286:
287: IF l_allow_asgmt = 'N' THEN
288: PA_ASSIGNMENTS_PUB.g_error_exists := FND_API.G_TRUE;
289: END IF; --l_allow_asgmt := 'N'
290:
291: END IF; --p_assignment_rec.project_id is NOT NULL
292:

Line 300: IF (l_assignment_rec.location_id IS NULL OR l_assignment_rec.location_id = FND_API.G_MISS_NUM)

296: -- If all the location input parameters are null then default location from project
297: -- If location details are passed then get the location id for the for the given location parameters
298: -- If the location does not already exist then create it
299: --
300: IF (l_assignment_rec.location_id IS NULL OR l_assignment_rec.location_id = FND_API.G_MISS_NUM)
301: AND (p_location_city IS NULL OR p_location_city = FND_API.G_MISS_CHAR)
302: AND (p_location_region IS NULL OR p_location_region = FND_API.G_MISS_CHAR)
303: AND (p_location_country_code IS NULL OR p_location_country_code = FND_API.G_MISS_CHAR)
304: THEN

Line 301: AND (p_location_city IS NULL OR p_location_city = FND_API.G_MISS_CHAR)

297: -- If location details are passed then get the location id for the for the given location parameters
298: -- If the location does not already exist then create it
299: --
300: IF (l_assignment_rec.location_id IS NULL OR l_assignment_rec.location_id = FND_API.G_MISS_NUM)
301: AND (p_location_city IS NULL OR p_location_city = FND_API.G_MISS_CHAR)
302: AND (p_location_region IS NULL OR p_location_region = FND_API.G_MISS_CHAR)
303: AND (p_location_country_code IS NULL OR p_location_country_code = FND_API.G_MISS_CHAR)
304: THEN
305:

Line 302: AND (p_location_region IS NULL OR p_location_region = FND_API.G_MISS_CHAR)

298: -- If the location does not already exist then create it
299: --
300: IF (l_assignment_rec.location_id IS NULL OR l_assignment_rec.location_id = FND_API.G_MISS_NUM)
301: AND (p_location_city IS NULL OR p_location_city = FND_API.G_MISS_CHAR)
302: AND (p_location_region IS NULL OR p_location_region = FND_API.G_MISS_CHAR)
303: AND (p_location_country_code IS NULL OR p_location_country_code = FND_API.G_MISS_CHAR)
304: THEN
305:
306: --bug 1795160: no need to get location from project, location not required.

Line 303: AND (p_location_country_code IS NULL OR p_location_country_code = FND_API.G_MISS_CHAR)

299: --
300: IF (l_assignment_rec.location_id IS NULL OR l_assignment_rec.location_id = FND_API.G_MISS_NUM)
301: AND (p_location_city IS NULL OR p_location_city = FND_API.G_MISS_CHAR)
302: AND (p_location_region IS NULL OR p_location_region = FND_API.G_MISS_CHAR)
303: AND (p_location_country_code IS NULL OR p_location_country_code = FND_API.G_MISS_CHAR)
304: THEN
305:
306: --bug 1795160: no need to get location from project, location not required.
307: /*

Line 322: ELSIF l_assignment_rec.location_id IS NULL OR l_assignment_rec.location_id = FND_API.G_MISS_NUM THEN

318: END IF;
319:
320:
321: --only call get_location if location_id IS NULL
322: ELSIF l_assignment_rec.location_id IS NULL OR l_assignment_rec.location_id = FND_API.G_MISS_NUM THEN
323:
324: PA_LOCATION_UTILS.Get_Location( p_city => p_location_city
325: ,p_region => p_location_region
326: ,p_country_code => p_location_country_code

Line 331: IF l_return_status = FND_API.G_RET_STS_ERROR THEN

327: ,x_location_id => l_assignment_rec.location_id
328: ,x_error_message_code => l_error_message_code
329: ,x_return_status => l_return_status );
330:
331: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
332: PA_UTILS.Add_Message ( p_app_short_name => 'PA'
333: ,p_msg_name => l_error_message_code );
334: PA_ASSIGNMENTS_PUB.g_error_exists := FND_API.G_TRUE;
335: END IF;

Line 334: PA_ASSIGNMENTS_PUB.g_error_exists := FND_API.G_TRUE;

330:
331: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
332: PA_UTILS.Add_Message ( p_app_short_name => 'PA'
333: ,p_msg_name => l_error_message_code );
334: PA_ASSIGNMENTS_PUB.g_error_exists := FND_API.G_TRUE;
335: END IF;
336:
337: END IF;
338:

Line 362: l_assignment_rec.project_id <> FND_API.G_MISS_NUM THEN

358: l_resource_source_id := p_resource_source_id;
359:
360: --Additional Check: If Project Id is not present, no need to run the following program that depends on it.
361: IF l_assignment_rec.project_id IS NOT NULL AND
362: l_assignment_rec.project_id <> FND_API.G_MISS_NUM THEN
363:
364: --If resource id exist, get the resource_source_id, and use it to create project party
365: IF (l_assignment_rec.resource_id IS NOT NULL AND l_assignment_rec.resource_id <> FND_API.G_MISS_NUM) AND
366: (l_resource_source_id IS NULL OR l_resource_source_id =FND_API.G_MISS_NUM) THEN

Line 365: IF (l_assignment_rec.resource_id IS NOT NULL AND l_assignment_rec.resource_id <> FND_API.G_MISS_NUM) AND

361: IF l_assignment_rec.project_id IS NOT NULL AND
362: l_assignment_rec.project_id <> FND_API.G_MISS_NUM THEN
363:
364: --If resource id exist, get the resource_source_id, and use it to create project party
365: IF (l_assignment_rec.resource_id IS NOT NULL AND l_assignment_rec.resource_id <> FND_API.G_MISS_NUM) AND
366: (l_resource_source_id IS NULL OR l_resource_source_id =FND_API.G_MISS_NUM) THEN
367:
368: --Log Message
369: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */

Line 366: (l_resource_source_id IS NULL OR l_resource_source_id =FND_API.G_MISS_NUM) THEN

362: l_assignment_rec.project_id <> FND_API.G_MISS_NUM THEN
363:
364: --If resource id exist, get the resource_source_id, and use it to create project party
365: IF (l_assignment_rec.resource_id IS NOT NULL AND l_assignment_rec.resource_id <> FND_API.G_MISS_NUM) AND
366: (l_resource_source_id IS NULL OR l_resource_source_id =FND_API.G_MISS_NUM) THEN
367:
368: --Log Message
369: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
370: PA_DEBUG.write_log (x_module => 'pa.plsql.PA_STAFFED_ASSIGNMENT_PVT.Create_Staffed_Assignment.res_source_id'

Line 380: IF (l_assignment_rec.project_party_id = FND_API.G_MISS_NUM OR l_assignment_rec.project_party_id IS NULL) AND

376: CLOSE get_resource_source_id;
377: END IF;
378:
379:
380: IF (l_assignment_rec.project_party_id = FND_API.G_MISS_NUM OR l_assignment_rec.project_party_id IS NULL) AND
381: (l_assignment_rec.project_role_id IS NOT NULL AND l_assignment_rec.project_role_id <> FND_API.G_MISS_NUM) AND
382: (l_resource_source_id IS NOT NULL AND l_resource_source_id <>FND_API.G_MISS_NUM) THEN
383:
384: --dbms_output.put_line('*****calling create_project_party');

Line 381: (l_assignment_rec.project_role_id IS NOT NULL AND l_assignment_rec.project_role_id <> FND_API.G_MISS_NUM) AND

377: END IF;
378:
379:
380: IF (l_assignment_rec.project_party_id = FND_API.G_MISS_NUM OR l_assignment_rec.project_party_id IS NULL) AND
381: (l_assignment_rec.project_role_id IS NOT NULL AND l_assignment_rec.project_role_id <> FND_API.G_MISS_NUM) AND
382: (l_resource_source_id IS NOT NULL AND l_resource_source_id <>FND_API.G_MISS_NUM) THEN
383:
384: --dbms_output.put_line('*****calling create_project_party');
385: --dbms_output.put_line('*****resource_source_id:'||l_resource_source_id);

Line 382: (l_resource_source_id IS NOT NULL AND l_resource_source_id <>FND_API.G_MISS_NUM) THEN

378:
379:
380: IF (l_assignment_rec.project_party_id = FND_API.G_MISS_NUM OR l_assignment_rec.project_party_id IS NULL) AND
381: (l_assignment_rec.project_role_id IS NOT NULL AND l_assignment_rec.project_role_id <> FND_API.G_MISS_NUM) AND
382: (l_resource_source_id IS NOT NULL AND l_resource_source_id <>FND_API.G_MISS_NUM) THEN
383:
384: --dbms_output.put_line('*****calling create_project_party');
385: --dbms_output.put_line('*****resource_source_id:'||l_resource_source_id);
386: --dbms_output.put_line('*****resource_id:'||l_assignment_rec.resource_id);

Line 408: ,p_commit => FND_API.G_FALSE

404: ,p_calling_module => 'ASSIGNMENT'
405: ,p_project_end_date => NULL
406: ,p_end_date_active => l_assignment_rec.end_date
407: ,p_validate_only => p_validate_only
408: ,p_commit => FND_API.G_FALSE
409: ,x_project_party_id => l_assignment_rec.project_party_id
410: ,x_resource_id => l_assignment_rec.resource_id
411: ,x_assignment_id => l_pp_assignment_id
412: ,x_wf_type => l_wf_type

Line 432: IF (x_return_status <>FND_API.G_RET_STS_SUCCESS) THEN

428: --dbms_output.put_line('proj party resource id is '||l_assignment_rec.resource_id);
429: --dbms_output.put_line('proj party id is '||l_assignment_rec.project_party_id);
430: --dbms_output.put_line('number of error '||l_msg_count);
431:
432: IF (x_return_status <>FND_API.G_RET_STS_SUCCESS) THEN
433: PA_ASSIGNMENTS_PUB.g_error_exists := FND_API.G_TRUE;
434: l_project_parties_error_exists := FND_API.G_TRUE;
435: END IF;
436:

Line 433: PA_ASSIGNMENTS_PUB.g_error_exists := FND_API.G_TRUE;

429: --dbms_output.put_line('proj party id is '||l_assignment_rec.project_party_id);
430: --dbms_output.put_line('number of error '||l_msg_count);
431:
432: IF (x_return_status <>FND_API.G_RET_STS_SUCCESS) THEN
433: PA_ASSIGNMENTS_PUB.g_error_exists := FND_API.G_TRUE;
434: l_project_parties_error_exists := FND_API.G_TRUE;
435: END IF;
436:
437: END IF; --end of create project party check

Line 434: l_project_parties_error_exists := FND_API.G_TRUE;

430: --dbms_output.put_line('number of error '||l_msg_count);
431:
432: IF (x_return_status <>FND_API.G_RET_STS_SUCCESS) THEN
433: PA_ASSIGNMENTS_PUB.g_error_exists := FND_API.G_TRUE;
434: l_project_parties_error_exists := FND_API.G_TRUE;
435: END IF;
436:
437: END IF; --end of create project party check
438:

Line 440: IF (l_assignment_rec.resource_id <> FND_API.G_MISS_NUM) THEN

436:
437: END IF; --end of create project party check
438:
439: --Assign out parameter: resource id
440: IF (l_assignment_rec.resource_id <> FND_API.G_MISS_NUM) THEN
441: x_resource_id := l_assignment_rec.resource_id;
442: END IF;
443:
444: --Bug 2229861: Check if the resource records are pulled into

Line 446: l_check_resource := FND_API.G_RET_STS_SUCCESS;

442: END IF;
443:
444: --Bug 2229861: Check if the resource records are pulled into
445: -- pa_resources_denorm table on the assignment start date
446: l_check_resource := FND_API.G_RET_STS_SUCCESS;
447:
448: PA_RESOURCE_UTILS.Validate_Person (
449: p_person_id => l_resource_source_id
450: ,p_start_date => l_assignment_rec.start_date

Line 459: IF l_check_resource <> FND_API.G_RET_STS_SUCCESS THEN

455: ,x_msg => 'validate person, status='||l_check_resource
456: ,x_log_level => li_message_level);
457: END IF;
458:
459: IF l_check_resource <> FND_API.G_RET_STS_SUCCESS THEN
460: PA_ASSIGNMENTS_PUB.g_error_exists := FND_API.G_TRUE;
461: -- bug 4091194 : This person is invalid for the assignment.
462: -- Set it to null to avoid further process.
463: l_assignment_rec.resource_id := NULL;

Line 460: PA_ASSIGNMENTS_PUB.g_error_exists := FND_API.G_TRUE;

456: ,x_log_level => li_message_level);
457: END IF;
458:
459: IF l_check_resource <> FND_API.G_RET_STS_SUCCESS THEN
460: PA_ASSIGNMENTS_PUB.g_error_exists := FND_API.G_TRUE;
461: -- bug 4091194 : This person is invalid for the assignment.
462: -- Set it to null to avoid further process.
463: l_assignment_rec.resource_id := NULL;
464: END IF;

Line 471: (l_assignment_rec.fcst_tp_amount_type = FND_API.G_MISS_CHAR) OR

467: --IF it has not been defaulted already OR
468: --IF it is copying from an assignment into a requirement AND
469: --IF IT IS NOT a template requirement.
470: IF (((l_assignment_rec.fcst_tp_amount_type IS NULL) OR
471: (l_assignment_rec.fcst_tp_amount_type = FND_API.G_MISS_CHAR) OR
472: (p_asgn_creation_mode = 'COPY' AND l_assignment_rec.source_assignment_type <> 'OPEN_ASSIGNMENT')) AND
473: (l_assignment_rec.project_id IS NOT NULL AND l_assignment_rec.project_id <> FND_API.G_MISS_NUM)) THEN
474:
475: --dbms_output.put_line('calling assignment default');

Line 473: (l_assignment_rec.project_id IS NOT NULL AND l_assignment_rec.project_id <> FND_API.G_MISS_NUM)) THEN

469: --IF IT IS NOT a template requirement.
470: IF (((l_assignment_rec.fcst_tp_amount_type IS NULL) OR
471: (l_assignment_rec.fcst_tp_amount_type = FND_API.G_MISS_CHAR) OR
472: (p_asgn_creation_mode = 'COPY' AND l_assignment_rec.source_assignment_type <> 'OPEN_ASSIGNMENT')) AND
473: (l_assignment_rec.project_id IS NOT NULL AND l_assignment_rec.project_id <> FND_API.G_MISS_NUM)) THEN
474:
475: --dbms_output.put_line('calling assignment default');
476: --Log Message
477: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */

Line 502: IF PA_STARTUP.G_Calling_Application = 'PLSQL' AND l_assignment_rec.expenditure_type IS NOT NULL AND l_assignment_rec.expenditure_type <> FND_API.G_MISS_CHAR

498: x_msg_data => l_msg_data
499: );
500:
501: -- Bug 5130421 : Expenditure type and class can be passed in, so don't default if passed from PLSQL
502: IF PA_STARTUP.G_Calling_Application = 'PLSQL' AND l_assignment_rec.expenditure_type IS NOT NULL AND l_assignment_rec.expenditure_type <> FND_API.G_MISS_CHAR
503: AND l_assignment_rec.expenditure_type_class IS NOT NULL AND l_assignment_rec.expenditure_type_class IS NOT NULL
504: THEN
505: null;
506: ELSE

Line 513: IF l_assignment_rec.work_type_id IS NOT NULL AND l_assignment_rec.work_type_id <> FND_API.G_MISS_NUM THEN

509: END IF;
510:
511: -- fcst tp amount type shd get default from work type
512: -- it was getting default from the default work type
513: IF l_assignment_rec.work_type_id IS NOT NULL AND l_assignment_rec.work_type_id <> FND_API.G_MISS_NUM THEN
514: Pa_Fp_Org_Fcst_Utils.Get_Tp_Amount_Type(
515: p_project_id => l_assignment_rec.project_id,
516: p_work_type_id => l_assignment_rec.work_type_id,
517: x_tp_amount_type => l_fcst_tp_amount_type_tmp,

Line 553: IF (l_assignment_rec.project_id IS NOT NULL AND l_assignment_rec.project_id <> FND_API.G_MISS_NUM) AND

549: --
550: -- Get bill rate and bill rate currency code, and markup percent
551: -- if this is not an admin assignment
552: --
553: IF (l_assignment_rec.project_id IS NOT NULL AND l_assignment_rec.project_id <> FND_API.G_MISS_NUM) AND
554: l_project_parties_error_exists <> FND_API.G_TRUE AND
555: l_check_resource = FND_API.G_RET_STS_SUCCESS AND
556: l_assignment_rec.assignment_type <> 'STAFFED_ADMIN_ASSIGNMENT' AND
557: l_resource_source_id IS NOT NULL THEN

Line 554: l_project_parties_error_exists <> FND_API.G_TRUE AND

550: -- Get bill rate and bill rate currency code, and markup percent
551: -- if this is not an admin assignment
552: --
553: IF (l_assignment_rec.project_id IS NOT NULL AND l_assignment_rec.project_id <> FND_API.G_MISS_NUM) AND
554: l_project_parties_error_exists <> FND_API.G_TRUE AND
555: l_check_resource = FND_API.G_RET_STS_SUCCESS AND
556: l_assignment_rec.assignment_type <> 'STAFFED_ADMIN_ASSIGNMENT' AND
557: l_resource_source_id IS NOT NULL THEN
558:

Line 555: l_check_resource = FND_API.G_RET_STS_SUCCESS AND

551: -- if this is not an admin assignment
552: --
553: IF (l_assignment_rec.project_id IS NOT NULL AND l_assignment_rec.project_id <> FND_API.G_MISS_NUM) AND
554: l_project_parties_error_exists <> FND_API.G_TRUE AND
555: l_check_resource = FND_API.G_RET_STS_SUCCESS AND
556: l_assignment_rec.assignment_type <> 'STAFFED_ADMIN_ASSIGNMENT' AND
557: l_resource_source_id IS NOT NULL THEN
558:
559: --Log Message

Line 594: IF (p_assignment_rec.resource_list_member_id = FND_API.G_MISS_NUM OR

590: ,x_log_level => li_message_level);
591: END IF;
592:
593: -- FP.M Development
594: IF (p_assignment_rec.resource_list_member_id = FND_API.G_MISS_NUM OR
595: p_assignment_rec.resource_list_member_id IS NULL) AND
596: p_assignment_rec.project_id <> FND_API.G_MISS_NUM AND
597: l_assignment_rec.resource_id IS NOT NULL THEN
598: begin

Line 596: p_assignment_rec.project_id <> FND_API.G_MISS_NUM AND

592:
593: -- FP.M Development
594: IF (p_assignment_rec.resource_list_member_id = FND_API.G_MISS_NUM OR
595: p_assignment_rec.resource_list_member_id IS NULL) AND
596: p_assignment_rec.project_id <> FND_API.G_MISS_NUM AND
597: l_assignment_rec.resource_id IS NOT NULL THEN
598: begin
599:
600: SELECT proj_asgmt_res_format_id

Line 622: IF l_proj_asgmt_res_format_id = FND_API.G_MISS_NUM THEN

618: when others then
619: null;
620: end;
621:
622: IF l_proj_asgmt_res_format_id = FND_API.G_MISS_NUM THEN
623: l_proj_asgmt_res_format_id := NULL;
624: END IF;
625:
626: l_person_id_tmp := l_person_id;

Line 627: IF l_person_id_tmp = FND_API.G_MISS_NUM THEN

623: l_proj_asgmt_res_format_id := NULL;
624: END IF;
625:
626: l_person_id_tmp := l_person_id;
627: IF l_person_id_tmp = FND_API.G_MISS_NUM THEN
628: l_person_id_tmp := NULL;
629: END IF;
630:
631: l_fcst_job_id_tmp := l_assignment_rec.fcst_job_id;

Line 632: IF l_fcst_job_id_tmp = FND_API.G_MISS_NUM THEN

628: l_person_id_tmp := NULL;
629: END IF;
630:
631: l_fcst_job_id_tmp := l_assignment_rec.fcst_job_id;
632: IF l_fcst_job_id_tmp = FND_API.G_MISS_NUM THEN
633: l_fcst_job_id_tmp := NULL;
634: END IF;
635:
636: l_expenditure_type_tmp := l_assignment_rec.expenditure_type;

Line 637: IF l_expenditure_type_tmp = FND_API.G_MISS_CHAR THEN

633: l_fcst_job_id_tmp := NULL;
634: END IF;
635:
636: l_expenditure_type_tmp := l_assignment_rec.expenditure_type;
637: IF l_expenditure_type_tmp = FND_API.G_MISS_CHAR THEN
638: l_expenditure_type_tmp := NULL;
639: END IF;
640:
641: l_project_role_id_tmp := l_assignment_rec.project_role_id;

Line 642: IF l_project_role_id_tmp = FND_API.G_MISS_NUM THEN

638: l_expenditure_type_tmp := NULL;
639: END IF;
640:
641: l_project_role_id_tmp := l_assignment_rec.project_role_id;
642: IF l_project_role_id_tmp = FND_API.G_MISS_NUM THEN
643: l_project_role_id_tmp := NULL;
644: END IF;
645:
646: l_assignment_name_tmp := l_assignment_rec.assignment_name;

Line 647: IF l_assignment_name_tmp = FND_API.G_MISS_CHAR THEN

643: l_project_role_id_tmp := NULL;
644: END IF;
645:
646: l_assignment_name_tmp := l_assignment_rec.assignment_name;
647: IF l_assignment_name_tmp = FND_API.G_MISS_CHAR THEN
648: l_assignment_name_tmp := NULL;
649: END IF;
650:
651: -- For Staffed Assignment only, get organization from resource before

Line 783: IF l_ret_code = FND_API.G_FALSE THEN

779: x_return_status => l_return_status,
780: x_msg_count => l_msg_count,
781: x_msg_data => l_msg_data);
782:
783: IF l_ret_code = FND_API.G_FALSE THEN
784: PA_UTILS.Add_Message ( p_app_short_name => 'PA'
785: ,p_msg_name => 'PA_ADD_ADMIN_ASMT_SECURITY' );
786: PA_ASSIGNMENTS_PUB.g_error_exists := FND_API.G_TRUE;
787: END IF;

Line 786: PA_ASSIGNMENTS_PUB.g_error_exists := FND_API.G_TRUE;

782:
783: IF l_ret_code = FND_API.G_FALSE THEN
784: PA_UTILS.Add_Message ( p_app_short_name => 'PA'
785: ,p_msg_name => 'PA_ADD_ADMIN_ASMT_SECURITY' );
786: PA_ASSIGNMENTS_PUB.g_error_exists := FND_API.G_TRUE;
787: END IF;
788:
789: END IF;
790: END IF;

Line 829: IF l_ret_code = FND_API.G_FALSE THEN

825: x_msg_count => l_msg_count,
826: x_msg_data => l_msg_data);
827: END IF;
828:
829: IF l_ret_code = FND_API.G_FALSE THEN
830: PA_UTILS.Add_Message ( p_app_short_name => 'PA'
831: ,p_msg_name => 'PA_ASGN_CONFIRM_NOT_ALLOWED' );
832: PA_ASSIGNMENTS_PUB.g_error_exists := FND_API.G_TRUE;
833: END IF;

Line 832: PA_ASSIGNMENTS_PUB.g_error_exists := FND_API.G_TRUE;

828:
829: IF l_ret_code = FND_API.G_FALSE THEN
830: PA_UTILS.Add_Message ( p_app_short_name => 'PA'
831: ,p_msg_name => 'PA_ASGN_CONFIRM_NOT_ALLOWED' );
832: PA_ASSIGNMENTS_PUB.g_error_exists := FND_API.G_TRUE;
833: END IF;
834:
835: END IF;
836:

Line 843: IF l_assignment_rec.resource_id IS NOT NULL AND l_assignment_rec.resource_id <> FND_API.G_MISS_NUM THEN

839: --DBMS_OUTPUT.Put_Line('Debug stage 1');
840:
841: --cross charge validation.
842:
843: IF l_assignment_rec.resource_id IS NOT NULL AND l_assignment_rec.resource_id <> FND_API.G_MISS_NUM THEN
844:
845: --dbms_output.put_line('cc resource id: '||l_assignment_rec.resource_id);
846: --dbms_output.put_line('cc start date: '||l_assignment_rec.start_date);
847: --dbms_output.put_line('cc end date: '||l_assignment_rec.end_date);

Line 863: IF l_return_status = FND_API.G_RET_STS_ERROR THEN

859: x_cc_ok => l_cc_ok,
860: x_return_status => l_return_status,
861: x_error_message_code => l_error_message_code);
862:
863: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
864: PA_UTILS.Add_Message( p_app_short_name => 'PA'
865: ,p_msg_name => l_error_message_code);
866: PA_ASSIGNMENTS_PUB.g_error_exists := FND_API.G_TRUE;
867: END IF;

Line 866: PA_ASSIGNMENTS_PUB.g_error_exists := FND_API.G_TRUE;

862:
863: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
864: PA_UTILS.Add_Message( p_app_short_name => 'PA'
865: ,p_msg_name => l_error_message_code);
866: PA_ASSIGNMENTS_PUB.g_error_exists := FND_API.G_TRUE;
867: END IF;
868: --dbms_output.put_line('l_cc_ok: '||l_cc_ok);
869: IF l_cc_ok <> 'Y' THEN
870: PA_UTILS.Add_Message( p_app_short_name => 'PA'

Line 872: PA_ASSIGNMENTS_PUB.g_error_exists := FND_API.G_TRUE;

868: --dbms_output.put_line('l_cc_ok: '||l_cc_ok);
869: IF l_cc_ok <> 'Y' THEN
870: PA_UTILS.Add_Message( p_app_short_name => 'PA'
871: ,p_msg_name => 'CROSS_CHARGE_VALIDATION_FAILED');
872: PA_ASSIGNMENTS_PUB.g_error_exists := FND_API.G_TRUE;
873: END IF;
874:
875: END IF;
876:

Line 895: AND l_project_parties_error_exists <> FND_API.G_TRUE -- 6210780

891: --dbms_output.put_line('before calling insert row');
892:
893: /*Adding changes for Bug 5918412 to get calendar id when the calendar_type = 'RESOURCE'*/
894: IF (l_assignment_rec.calendar_type = 'RESOURCE')
895: AND l_project_parties_error_exists <> FND_API.G_TRUE -- 6210780
896: AND l_assignment_rec.resource_id IS NOT NULL -- 6210780
897: THEN
898:
899: l_assignment_rec.calendar_id := pa_schedule_utils.get_res_calendar(p_resource_id => l_assignment_rec.resource_id ,

Line 905: IF (p_validate_only <> FND_API.G_TRUE AND FND_MSG_PUB.Count_Msg = 0) THEN

901: p_end_date => l_assignment_rec.end_date);
902: END IF ;
903: /*Changes end for Bug 5918412 */
904:
905: IF (p_validate_only <> FND_API.G_TRUE AND FND_MSG_PUB.Count_Msg = 0) THEN
906:
907:
908: --Log Message
909: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */

Line 1018: FND_API.G_MISS_NUM THEN

1014: -- ( 'R' -> based on resource , 'A' -> based on open assignment, 'P' -> project , 'O' -> others
1015:
1016:
1017: IF l_assignment_rec.source_assignment_id IS NOT NULL AND l_assignment_rec.source_assignment_id <>
1018: FND_API.G_MISS_NUM THEN
1019:
1020: l_schedule_basis_flag := 'A';
1021:
1022: ELSIF l_assignment_rec.calendar_type = 'PROJECT' THEN

Line 1069: IF p_budget_version_id IS NOT NULL AND p_budget_version_id <> FND_API.G_MISS_NUM AND

1065: ,x_msg => 'budget_version_id'||p_budget_version_id
1066: ,x_log_level => li_message_level);
1067: END IF;
1068:
1069: IF p_budget_version_id IS NOT NULL AND p_budget_version_id <> FND_API.G_MISS_NUM AND
1070: l_assignment_rec.resource_list_member_id IS NOT NULL AND
1071: l_assignment_rec.resource_list_member_id <> FND_API.G_MISS_NUM THEN
1072:
1073: OPEN get_bu_resource_assignments;

Line 1071: l_assignment_rec.resource_list_member_id <> FND_API.G_MISS_NUM THEN

1067: END IF;
1068:
1069: IF p_budget_version_id IS NOT NULL AND p_budget_version_id <> FND_API.G_MISS_NUM AND
1070: l_assignment_rec.resource_list_member_id IS NOT NULL AND
1071: l_assignment_rec.resource_list_member_id <> FND_API.G_MISS_NUM THEN
1072:
1073: OPEN get_bu_resource_assignments;
1074: FETCH get_bu_resource_assignments
1075: BULK COLLECT INTO l_task_assignment_id_tbl,

Line 1085: l_assignment_rec.resource_list_member_id <> FND_API.G_MISS_NUM THEN

1081: ELSE
1082:
1083: /*Added this IF for bug 7492618*/
1084: IF l_assignment_rec.resource_list_member_id IS NOT NULL AND
1085: l_assignment_rec.resource_list_member_id <> FND_API.G_MISS_NUM THEN
1086:
1087: OPEN get_td_resource_assignments;
1088: FETCH get_td_resource_assignments
1089: BULK COLLECT INTO l_task_assignment_id_tbl,

Line 1183: IF x_return_status = FND_API.G_RET_STS_SUCCESS THEN

1179: );
1180:
1181: /* Added calc_init_transfer_price for bug 3051110 */
1182:
1183: IF x_return_status = FND_API.G_RET_STS_SUCCESS THEN
1184: PA_ASSIGNMENTS_PVT.Calc_Init_Transfer_Price
1185: (p_assignment_id =>l_assignment_rec.assignment_id,
1186: p_start_date => l_assignment_rec.start_date,
1187: p_debug_mode => P_DEBUG_MODE,

Line 1195: END IF; -- IF (p_validate_only <> FND_API.G_TRUE AND FND_MSG_PUB.Count_Msg = 0)

1191:
1192: x_return_status := l_return_status;
1193: END IF;
1194:
1195: END IF; -- IF (p_validate_only <> FND_API.G_TRUE AND FND_MSG_PUB.Count_Msg = 0)
1196:
1197: -- Reset the error stack when returning to the calling program
1198: PA_DEBUG.Reset_err_stack;
1199:

Line 1215: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

1211: -- Set the excetption Message and the stack
1212: FND_MSG_PUB.add_exc_msg ( p_pkg_name => 'PA_STAFFED_ASSIGNMENT_PVT.Create_Staffed_Assignment'
1213: ,p_procedure_name => PA_DEBUG.G_Err_Stack );
1214: --
1215: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1216: RAISE; -- This is optional depending on the needs
1217:
1218: END Create_Staffed_Assignment;
1219:

Line 1224: ,p_location_city IN pa_locations.city%TYPE := FND_API.G_MISS_CHAR

1220:
1221:
1222: PROCEDURE Update_Staffed_Assignment
1223: ( p_assignment_rec IN PA_ASSIGNMENTS_PUB.Assignment_Rec_Type
1224: ,p_location_city IN pa_locations.city%TYPE := FND_API.G_MISS_CHAR
1225: ,p_location_region IN pa_locations.region%TYPE := FND_API.G_MISS_CHAR
1226: ,p_location_country_code IN pa_locations.country_code%TYPE := FND_API.G_MISS_CHAR
1227: ,p_commit IN VARCHAR2 := FND_API.G_FALSE
1228: ,p_validate_only IN VARCHAR2 := FND_API.G_TRUE

Line 1225: ,p_location_region IN pa_locations.region%TYPE := FND_API.G_MISS_CHAR

1221:
1222: PROCEDURE Update_Staffed_Assignment
1223: ( p_assignment_rec IN PA_ASSIGNMENTS_PUB.Assignment_Rec_Type
1224: ,p_location_city IN pa_locations.city%TYPE := FND_API.G_MISS_CHAR
1225: ,p_location_region IN pa_locations.region%TYPE := FND_API.G_MISS_CHAR
1226: ,p_location_country_code IN pa_locations.country_code%TYPE := FND_API.G_MISS_CHAR
1227: ,p_commit IN VARCHAR2 := FND_API.G_FALSE
1228: ,p_validate_only IN VARCHAR2 := FND_API.G_TRUE
1229: ,x_return_status OUT NOCOPY VARCHAR2 --File.Sql.39 bug 4440895

Line 1226: ,p_location_country_code IN pa_locations.country_code%TYPE := FND_API.G_MISS_CHAR

1222: PROCEDURE Update_Staffed_Assignment
1223: ( p_assignment_rec IN PA_ASSIGNMENTS_PUB.Assignment_Rec_Type
1224: ,p_location_city IN pa_locations.city%TYPE := FND_API.G_MISS_CHAR
1225: ,p_location_region IN pa_locations.region%TYPE := FND_API.G_MISS_CHAR
1226: ,p_location_country_code IN pa_locations.country_code%TYPE := FND_API.G_MISS_CHAR
1227: ,p_commit IN VARCHAR2 := FND_API.G_FALSE
1228: ,p_validate_only IN VARCHAR2 := FND_API.G_TRUE
1229: ,x_return_status OUT NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
1230: ) IS

Line 1227: ,p_commit IN VARCHAR2 := FND_API.G_FALSE

1223: ( p_assignment_rec IN PA_ASSIGNMENTS_PUB.Assignment_Rec_Type
1224: ,p_location_city IN pa_locations.city%TYPE := FND_API.G_MISS_CHAR
1225: ,p_location_region IN pa_locations.region%TYPE := FND_API.G_MISS_CHAR
1226: ,p_location_country_code IN pa_locations.country_code%TYPE := FND_API.G_MISS_CHAR
1227: ,p_commit IN VARCHAR2 := FND_API.G_FALSE
1228: ,p_validate_only IN VARCHAR2 := FND_API.G_TRUE
1229: ,x_return_status OUT NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
1230: ) IS
1231:

Line 1228: ,p_validate_only IN VARCHAR2 := FND_API.G_TRUE

1224: ,p_location_city IN pa_locations.city%TYPE := FND_API.G_MISS_CHAR
1225: ,p_location_region IN pa_locations.region%TYPE := FND_API.G_MISS_CHAR
1226: ,p_location_country_code IN pa_locations.country_code%TYPE := FND_API.G_MISS_CHAR
1227: ,p_commit IN VARCHAR2 := FND_API.G_FALSE
1228: ,p_validate_only IN VARCHAR2 := FND_API.G_TRUE
1229: ,x_return_status OUT NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
1230: ) IS
1231:
1232: l_assignment_rec PA_ASSIGNMENTS_PUB.Assignment_Rec_Type;

Line 1427: x_return_status := FND_API.G_RET_STS_SUCCESS ;

1423:
1424: BEGIN
1425:
1426: -- 4537865 : Initialize the return_status
1427: x_return_status := FND_API.G_RET_STS_SUCCESS ;
1428:
1429: -- Initialize the Error Stack
1430: PA_DEBUG.set_err_stack('PA_STAFFED_ASSIGNMENT_PVT.Update_Staffed_Assignment');
1431:

Line 1456: IF p_assignment_rec.resource_id = FND_API.G_MISS_NUM THEN

1452: l_cur_resource_list_member_id,
1453: l_cur_project_role_id;
1454: CLOSE get_cur_asgmt_attributes;
1455:
1456: IF p_assignment_rec.resource_id = FND_API.G_MISS_NUM THEN
1457: l_assignment_rec.resource_id := l_cur_resource_id;
1458: END IF;
1459:
1460: IF P_DEBUG_MODE = 'Y' THEN

Line 1466: IF p_assignment_rec.project_role_id = FND_API.G_MISS_NUM THEN

1462: ,x_msg => 'l_asgmt_rec.resource_id='||l_assignment_rec.resource_id
1463: ,x_log_level => li_message_level);
1464: END IF;
1465:
1466: IF p_assignment_rec.project_role_id = FND_API.G_MISS_NUM THEN
1467: l_assignment_rec.project_role_id := l_cur_project_role_id;
1468: END IF;
1469:
1470: --Log Message

Line 1478: p_assignment_rec.project_id <> FND_API.G_MISS_NUM THEN

1474: ,x_log_level => 5);
1475: END IF;
1476:
1477: IF l_cur_resource_list_member_id IS NOT NULL AND
1478: p_assignment_rec.project_id <> FND_API.G_MISS_NUM THEN
1479:
1480: -- get the mandatory attributes of planning resource
1481: OPEN get_res_mand_attributes;
1482: FETCH get_res_mand_attributes INTO

Line 1491: IF l_assignment_rec.resource_id <> FND_API.G_MISS_NUM THEN

1487: l_cur_role_flag;
1488: CLOSE get_res_mand_attributes;
1489:
1490: -- check if mandatory attributes are changed
1491: IF l_assignment_rec.resource_id <> FND_API.G_MISS_NUM THEN
1492: select person_id
1493: into l_person_id
1494: from pa_resource_txn_attributes
1495: WHERE resource_id = l_assignment_rec.resource_id;

Line 1504: l_assignment_rec.resource_id <> FND_API.G_MISS_NUM AND

1500: ,x_log_level => li_message_level);
1501: END IF;
1502:
1503: IF (l_cur_res_type_flag = 'Y' AND
1504: l_assignment_rec.resource_id <> FND_API.G_MISS_NUM AND
1505: l_assignment_rec.resource_id <> l_cur_resource_id) OR
1506: (l_cur_res_type_flag = 'Y' AND
1507: p_assignment_rec.fcst_job_id <> FND_API.G_MISS_NUM AND
1508: p_assignment_rec.fcst_job_id <> l_cur_fcst_job_id) OR

Line 1507: p_assignment_rec.fcst_job_id <> FND_API.G_MISS_NUM AND

1503: IF (l_cur_res_type_flag = 'Y' AND
1504: l_assignment_rec.resource_id <> FND_API.G_MISS_NUM AND
1505: l_assignment_rec.resource_id <> l_cur_resource_id) OR
1506: (l_cur_res_type_flag = 'Y' AND
1507: p_assignment_rec.fcst_job_id <> FND_API.G_MISS_NUM AND
1508: p_assignment_rec.fcst_job_id <> l_cur_fcst_job_id) OR
1509: (l_cur_orgn_flag = 'Y' AND
1510: p_assignment_rec.expenditure_organization_id <> FND_API.G_MISS_NUM AND
1511: p_assignment_rec.expenditure_organization_id <> l_cur_exp_org_id) OR

Line 1510: p_assignment_rec.expenditure_organization_id <> FND_API.G_MISS_NUM AND

1506: (l_cur_res_type_flag = 'Y' AND
1507: p_assignment_rec.fcst_job_id <> FND_API.G_MISS_NUM AND
1508: p_assignment_rec.fcst_job_id <> l_cur_fcst_job_id) OR
1509: (l_cur_orgn_flag = 'Y' AND
1510: p_assignment_rec.expenditure_organization_id <> FND_API.G_MISS_NUM AND
1511: p_assignment_rec.expenditure_organization_id <> l_cur_exp_org_id) OR
1512: (l_cur_fin_cat_flag = 'Y' AND
1513: p_assignment_rec.expenditure_type <> FND_API.G_MISS_CHAR AND
1514: p_assignment_rec.expenditure_type <> l_cur_expenditure_type) OR

Line 1513: p_assignment_rec.expenditure_type <> FND_API.G_MISS_CHAR AND

1509: (l_cur_orgn_flag = 'Y' AND
1510: p_assignment_rec.expenditure_organization_id <> FND_API.G_MISS_NUM AND
1511: p_assignment_rec.expenditure_organization_id <> l_cur_exp_org_id) OR
1512: (l_cur_fin_cat_flag = 'Y' AND
1513: p_assignment_rec.expenditure_type <> FND_API.G_MISS_CHAR AND
1514: p_assignment_rec.expenditure_type <> l_cur_expenditure_type) OR
1515: (l_cur_role_flag = 'Y' AND
1516: p_assignment_rec.project_role_id <> FND_API.G_MISS_NUM AND
1517: p_assignment_rec.project_role_id <> l_cur_project_role_id) OR

Line 1516: p_assignment_rec.project_role_id <> FND_API.G_MISS_NUM AND

1512: (l_cur_fin_cat_flag = 'Y' AND
1513: p_assignment_rec.expenditure_type <> FND_API.G_MISS_CHAR AND
1514: p_assignment_rec.expenditure_type <> l_cur_expenditure_type) OR
1515: (l_cur_role_flag = 'Y' AND
1516: p_assignment_rec.project_role_id <> FND_API.G_MISS_NUM AND
1517: p_assignment_rec.project_role_id <> l_cur_project_role_id) OR
1518: (l_cur_role_flag = 'Y' AND
1519: p_assignment_rec.assignment_name <> FND_API.G_MISS_CHAR AND
1520: p_assignment_rec.assignment_name <> l_cur_assignment_name) THEN

Line 1519: p_assignment_rec.assignment_name <> FND_API.G_MISS_CHAR AND

1515: (l_cur_role_flag = 'Y' AND
1516: p_assignment_rec.project_role_id <> FND_API.G_MISS_NUM AND
1517: p_assignment_rec.project_role_id <> l_cur_project_role_id) OR
1518: (l_cur_role_flag = 'Y' AND
1519: p_assignment_rec.assignment_name <> FND_API.G_MISS_CHAR AND
1520: p_assignment_rec.assignment_name <> l_cur_assignment_name) THEN
1521: --Log Message
1522: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
1523: PA_DEBUG.write_log (x_module => 'pa.plsql.PA_STAFFED_ASSIGNMENT_PVT.Update_Staffed_Assignment.begin'

Line 1550: IF l_proj_asgmt_res_format_id = FND_API.G_MISS_NUM THEN

1546: when others then
1547: null;
1548: end;
1549:
1550: IF l_proj_asgmt_res_format_id = FND_API.G_MISS_NUM THEN
1551: l_proj_asgmt_res_format_id := NULL;
1552: END IF;
1553: */
1554: l_person_id_tmp := l_person_id;

Line 1555: IF l_person_id_tmp = FND_API.G_MISS_NUM THEN

1551: l_proj_asgmt_res_format_id := NULL;
1552: END IF;
1553: */
1554: l_person_id_tmp := l_person_id;
1555: IF l_person_id_tmp = FND_API.G_MISS_NUM THEN
1556: l_person_id_tmp := NULL;
1557: END IF;
1558:
1559: l_fcst_job_id_tmp := l_assignment_rec.fcst_job_id;

Line 1560: IF l_fcst_job_id_tmp = FND_API.G_MISS_NUM THEN

1556: l_person_id_tmp := NULL;
1557: END IF;
1558:
1559: l_fcst_job_id_tmp := l_assignment_rec.fcst_job_id;
1560: IF l_fcst_job_id_tmp = FND_API.G_MISS_NUM THEN
1561: l_fcst_job_id_tmp := NULL;
1562: END IF;
1563:
1564: l_expenditure_type_tmp := l_assignment_rec.expenditure_type;

Line 1565: IF l_expenditure_type_tmp = FND_API.G_MISS_CHAR THEN

1561: l_fcst_job_id_tmp := NULL;
1562: END IF;
1563:
1564: l_expenditure_type_tmp := l_assignment_rec.expenditure_type;
1565: IF l_expenditure_type_tmp = FND_API.G_MISS_CHAR THEN
1566: l_expenditure_type_tmp := NULL;
1567: END IF;
1568:
1569: l_project_role_id_tmp := l_assignment_rec.project_role_id;

Line 1570: IF l_project_role_id_tmp = FND_API.G_MISS_NUM THEN

1566: l_expenditure_type_tmp := NULL;
1567: END IF;
1568:
1569: l_project_role_id_tmp := l_assignment_rec.project_role_id;
1570: IF l_project_role_id_tmp = FND_API.G_MISS_NUM THEN
1571: l_project_role_id_tmp := NULL;
1572: END IF;
1573:
1574: l_assignment_name_tmp := l_assignment_rec.assignment_name;

Line 1575: IF l_assignment_name_tmp = FND_API.G_MISS_CHAR THEN

1571: l_project_role_id_tmp := NULL;
1572: END IF;
1573:
1574: l_assignment_name_tmp := l_assignment_rec.assignment_name;
1575: IF l_assignment_name_tmp = FND_API.G_MISS_CHAR THEN
1576: l_assignment_name_tmp := NULL;
1577: END IF;
1578:
1579: -- For Staffed Assignment only, get organization from resource before

Line 1824: ,p_named_role => FND_API.G_MISS_CHAR

1820: ,p_task_version_id_tbl => l_task_version_id_tbl
1821: ,p_budget_version_id_tbl => l_budget_version_id_tbl
1822: ,p_struct_version_id_tbl => l_struct_version_id_tbl
1823: ,p_project_assignment_id => -1
1824: ,p_named_role => FND_API.G_MISS_CHAR
1825: ,x_return_status => l_return_status
1826: );
1827: END IF;
1828:

Line 1840: ELSIF p_assignment_rec.assignment_name <> FND_API.G_MISS_CHAR AND

1836:
1837: END IF; --IF l_assignment_rec.resource_list_member_id IS NOT NULL THEN
1838:
1839: -- IF mandatory attributes are NOT changed
1840: ELSIF p_assignment_rec.assignment_name <> FND_API.G_MISS_CHAR AND
1841: p_assignment_rec.assignment_name <> l_cur_assignment_name THEN
1842:
1843: --Log Message
1844: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */

Line 1890: PA_ASSIGNMENTS_PUB.g_error_exists := FND_API.G_TRUE;

1886: PA_UTILS.Add_Message( p_app_short_name => 'PA'
1887: ,p_msg_name => 'PA_ASGN_ID_REQUIRED_FOR_ASG'
1888: ,p_token1 => 'ASGNTYPE'
1889: ,p_value1 => l_asgn_text);
1890: PA_ASSIGNMENTS_PUB.g_error_exists := FND_API.G_TRUE;
1891: END IF;
1892:
1893: --
1894: --Get assignment text from message to be used as values for token

Line 1906: PA_ASSIGNMENTS_PUB.g_error_exists := FND_API.G_TRUE;

1902: PA_UTILS.Add_Message( p_app_short_name => 'PA'
1903: ,p_msg_name => 'PA_PROJ_ID_REQUIRED_FOR_ASGN'
1904: ,p_token1 => 'ASGNTYPE'
1905: ,p_value1 => l_asgn_text);
1906: PA_ASSIGNMENTS_PUB.g_error_exists := FND_API.G_TRUE;
1907: END IF;
1908:
1909:
1910: --

Line 1918: PA_ASSIGNMENTS_PUB.g_error_exists := FND_API.G_TRUE;

1914: PA_UTILS.Add_Message( p_app_short_name => 'PA'
1915: ,p_msg_name => 'PA_ASGN_NAME_REQUIRED_FOR_ASG'
1916: ,p_token1 => 'ASGNTYPE'
1917: ,p_value1 => l_asgn_text);
1918: PA_ASSIGNMENTS_PUB.g_error_exists := FND_API.G_TRUE;
1919: END IF;
1920:
1921:
1922: --

Line 1930: PA_ASSIGNMENTS_PUB.g_error_exists := FND_API.G_TRUE;

1926: PA_UTILS.Add_Message( p_app_short_name => 'PA'
1927: ,p_msg_name => 'PA_PROJ_ROLE_REQUIRED_FOR_ASGN'
1928: ,p_token1 => 'ASGNTYPE'
1929: ,p_value1 => l_asgn_text);
1930: PA_ASSIGNMENTS_PUB.g_error_exists := FND_API.G_TRUE;
1931: END IF;
1932:
1933: --
1934: --Check p_work_type_id IS NOT NULL

Line 1940: PA_ASSIGNMENTS_PUB.g_error_exists := FND_API.G_TRUE;

1936: IF l_assignment_rec.work_type_id IS NULL THEN
1937: --dbms_output.put_line('WORK TYPE INVALID');
1938: PA_UTILS.Add_Message( p_app_short_name => 'PA'
1939: ,p_msg_name => 'PA_WORK_TYPE_REQUIRED_FOR_ASGN' );
1940: PA_ASSIGNMENTS_PUB.g_error_exists := FND_API.G_TRUE;
1941:
1942: END IF;
1943:
1944: -- Get the location id for the p_location_id for the given location parameters

Line 1946: IF (p_location_country_code IS NOT NULL AND p_location_country_code <> FND_API.G_MISS_CHAR) THEN

1942: END IF;
1943:
1944: -- Get the location id for the p_location_id for the given location parameters
1945: -- If the location does not already exsists, then create it
1946: IF (p_location_country_code IS NOT NULL AND p_location_country_code <> FND_API.G_MISS_CHAR) THEN
1947: PA_LOCATION_UTILS.Get_Location( p_city => p_location_city
1948: ,p_region => p_location_region
1949: ,p_country_code => p_location_country_code
1950: ,x_location_id => l_assignment_rec.location_id

Line 1954: IF l_return_status = FND_API.G_RET_STS_ERROR THEN

1950: ,x_location_id => l_assignment_rec.location_id
1951: ,x_error_message_code => l_msg_data
1952: ,x_return_status => l_return_status );
1953:
1954: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
1955: PA_UTILS.Add_Message ( p_app_short_name => 'PA'
1956: ,p_msg_name => l_msg_data );
1957: PA_ASSIGNMENTS_PUB.g_error_exists := FND_API.G_TRUE;
1958: END IF;

Line 1957: PA_ASSIGNMENTS_PUB.g_error_exists := FND_API.G_TRUE;

1953:
1954: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
1955: PA_UTILS.Add_Message ( p_app_short_name => 'PA'
1956: ,p_msg_name => l_msg_data );
1957: PA_ASSIGNMENTS_PUB.g_error_exists := FND_API.G_TRUE;
1958: END IF;
1959: END IF;
1960:
1961: /*

Line 1964: -- l_assignment_rec.location_id = FND_API.G_MISS_NUM

1960:
1961: /*
1962: -- commenting this out for mass update
1963: -- should not null out location id if
1964: -- l_assignment_rec.location_id = FND_API.G_MISS_NUM
1965:
1966: -- for single update, if location_country_name is passed in as null
1967: -- then null out location id (in pa_assignment_pub)
1968:

Line 1971: IF l_assignment_rec.location_id = FND_API.G_MISS_NUM AND PA_STARTUP.G_Calling_Application = 'SELF_SERVICE' THEN

1967: -- then null out location id (in pa_assignment_pub)
1968:
1969: --Bug 1795160: when user empty the location fields, the location id need to be nulled out.
1970: --If in self-service mode, and still no location id by now, then set it to NULL
1971: IF l_assignment_rec.location_id = FND_API.G_MISS_NUM AND PA_STARTUP.G_Calling_Application = 'SELF_SERVICE' THEN
1972: l_assignment_rec.location_id := NULL;
1973: END IF;
1974: */
1975:

Line 1989: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

1985:
1986: PA_ASSIGNMENT_APPROVAL_PVT.Insert_Into_Assignment_History ( p_assignment_id => l_assignment_rec.assignment_id
1987: ,x_change_id => l_change_id
1988: ,x_return_status => l_return_status);
1989: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1990: PA_ASSIGNMENTS_PUB.g_error_exists := FND_API.G_TRUE;
1991: END IF;
1992: l_return_status := FND_API.G_MISS_CHAR;
1993: END IF;

Line 1990: PA_ASSIGNMENTS_PUB.g_error_exists := FND_API.G_TRUE;

1986: PA_ASSIGNMENT_APPROVAL_PVT.Insert_Into_Assignment_History ( p_assignment_id => l_assignment_rec.assignment_id
1987: ,x_change_id => l_change_id
1988: ,x_return_status => l_return_status);
1989: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1990: PA_ASSIGNMENTS_PUB.g_error_exists := FND_API.G_TRUE;
1991: END IF;
1992: l_return_status := FND_API.G_MISS_CHAR;
1993: END IF;
1994:

Line 1992: l_return_status := FND_API.G_MISS_CHAR;

1988: ,x_return_status => l_return_status);
1989: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1990: PA_ASSIGNMENTS_PUB.g_error_exists := FND_API.G_TRUE;
1991: END IF;
1992: l_return_status := FND_API.G_MISS_CHAR;
1993: END IF;
1994:
1995:
1996: --Log Message

Line 2011: IF l_return_status = FND_API.G_RET_STS_SUCCESS THEN

2007: ,x_status_code => l_new_status_code -- added for Bug: 4537865
2008: ,x_return_status => l_return_status);
2009: -- added for bug: 4537865
2010:
2011: IF l_return_status = FND_API.G_RET_STS_SUCCESS THEN
2012: l_assignment_rec.apprvl_status_code := l_new_status_code;
2013: END IF;
2014:
2015: -- added for Bug: 4537865

Line 2017: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

2013: END IF;
2014:
2015: -- added for Bug: 4537865
2016:
2017: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2018: PA_ASSIGNMENTS_PUB.g_error_exists := FND_API.G_TRUE;
2019: END IF;
2020: l_return_status := FND_API.G_MISS_CHAR;
2021:

Line 2018: PA_ASSIGNMENTS_PUB.g_error_exists := FND_API.G_TRUE;

2014:
2015: -- added for Bug: 4537865
2016:
2017: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2018: PA_ASSIGNMENTS_PUB.g_error_exists := FND_API.G_TRUE;
2019: END IF;
2020: l_return_status := FND_API.G_MISS_CHAR;
2021:
2022:

Line 2020: l_return_status := FND_API.G_MISS_CHAR;

2016:
2017: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2018: PA_ASSIGNMENTS_PUB.g_error_exists := FND_API.G_TRUE;
2019: END IF;
2020: l_return_status := FND_API.G_MISS_CHAR;
2021:
2022:
2023: IF (p_validate_only = FND_API.G_FALSE AND PA_ASSIGNMENTS_PUB.g_error_exists <> FND_API.G_TRUE) THEN
2024:

Line 2023: IF (p_validate_only = FND_API.G_FALSE AND PA_ASSIGNMENTS_PUB.g_error_exists <> FND_API.G_TRUE) THEN

2019: END IF;
2020: l_return_status := FND_API.G_MISS_CHAR;
2021:
2022:
2023: IF (p_validate_only = FND_API.G_FALSE AND PA_ASSIGNMENTS_PUB.g_error_exists <> FND_API.G_TRUE) THEN
2024:
2025: --Log Message
2026: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
2027: PA_DEBUG.write_log (x_module => 'pa.plsql.PA_STAFFED_ASSIGNMENT_PVT.Update_Staffed_Assignment.update_row'

Line 2115: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

2111: -- Set the excetption Message and the stack
2112: FND_MSG_PUB.add_exc_msg ( p_pkg_name => 'PA_STAFFED_ASSIGNMENT_PVT.Update_Staffed_Assignment'
2113: ,p_procedure_name => PA_DEBUG.G_Err_Stack );
2114: --
2115: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2116: RAISE; -- This is optional depending on the needs
2117:
2118: END Update_Staffed_Assignment;
2119:

Line 2123: ,p_assignment_id IN pa_project_assignments.assignment_id%TYPE := FND_API.G_MISS_NUM

2119:
2120:
2121: PROCEDURE Delete_Staffed_Assignment
2122: ( p_assignment_row_id IN ROWID --(Bug-1851096)
2123: ,p_assignment_id IN pa_project_assignments.assignment_id%TYPE := FND_API.G_MISS_NUM
2124: ,p_record_version_number IN NUMBER := FND_API.G_MISS_NUM
2125: ,p_project_party_id IN pa_project_parties.project_party_id%TYPE := FND_API.G_MISS_NUM
2126: ,p_calling_module IN VARCHAR2 := FND_API.G_MISS_CHAR
2127: ,p_commit IN VARCHAR2 := FND_API.G_FALSE

Line 2124: ,p_record_version_number IN NUMBER := FND_API.G_MISS_NUM

2120:
2121: PROCEDURE Delete_Staffed_Assignment
2122: ( p_assignment_row_id IN ROWID --(Bug-1851096)
2123: ,p_assignment_id IN pa_project_assignments.assignment_id%TYPE := FND_API.G_MISS_NUM
2124: ,p_record_version_number IN NUMBER := FND_API.G_MISS_NUM
2125: ,p_project_party_id IN pa_project_parties.project_party_id%TYPE := FND_API.G_MISS_NUM
2126: ,p_calling_module IN VARCHAR2 := FND_API.G_MISS_CHAR
2127: ,p_commit IN VARCHAR2 := FND_API.G_FALSE
2128: ,p_validate_only IN VARCHAR2 := FND_API.G_TRUE

Line 2125: ,p_project_party_id IN pa_project_parties.project_party_id%TYPE := FND_API.G_MISS_NUM

2121: PROCEDURE Delete_Staffed_Assignment
2122: ( p_assignment_row_id IN ROWID --(Bug-1851096)
2123: ,p_assignment_id IN pa_project_assignments.assignment_id%TYPE := FND_API.G_MISS_NUM
2124: ,p_record_version_number IN NUMBER := FND_API.G_MISS_NUM
2125: ,p_project_party_id IN pa_project_parties.project_party_id%TYPE := FND_API.G_MISS_NUM
2126: ,p_calling_module IN VARCHAR2 := FND_API.G_MISS_CHAR
2127: ,p_commit IN VARCHAR2 := FND_API.G_FALSE
2128: ,p_validate_only IN VARCHAR2 := FND_API.G_TRUE
2129: ,x_return_status OUT NOCOPY VARCHAR2 --File.Sql.39 bug 4440895

Line 2126: ,p_calling_module IN VARCHAR2 := FND_API.G_MISS_CHAR

2122: ( p_assignment_row_id IN ROWID --(Bug-1851096)
2123: ,p_assignment_id IN pa_project_assignments.assignment_id%TYPE := FND_API.G_MISS_NUM
2124: ,p_record_version_number IN NUMBER := FND_API.G_MISS_NUM
2125: ,p_project_party_id IN pa_project_parties.project_party_id%TYPE := FND_API.G_MISS_NUM
2126: ,p_calling_module IN VARCHAR2 := FND_API.G_MISS_CHAR
2127: ,p_commit IN VARCHAR2 := FND_API.G_FALSE
2128: ,p_validate_only IN VARCHAR2 := FND_API.G_TRUE
2129: ,x_return_status OUT NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
2130: ) IS

Line 2127: ,p_commit IN VARCHAR2 := FND_API.G_FALSE

2123: ,p_assignment_id IN pa_project_assignments.assignment_id%TYPE := FND_API.G_MISS_NUM
2124: ,p_record_version_number IN NUMBER := FND_API.G_MISS_NUM
2125: ,p_project_party_id IN pa_project_parties.project_party_id%TYPE := FND_API.G_MISS_NUM
2126: ,p_calling_module IN VARCHAR2 := FND_API.G_MISS_CHAR
2127: ,p_commit IN VARCHAR2 := FND_API.G_FALSE
2128: ,p_validate_only IN VARCHAR2 := FND_API.G_TRUE
2129: ,x_return_status OUT NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
2130: ) IS
2131:

Line 2128: ,p_validate_only IN VARCHAR2 := FND_API.G_TRUE

2124: ,p_record_version_number IN NUMBER := FND_API.G_MISS_NUM
2125: ,p_project_party_id IN pa_project_parties.project_party_id%TYPE := FND_API.G_MISS_NUM
2126: ,p_calling_module IN VARCHAR2 := FND_API.G_MISS_CHAR
2127: ,p_commit IN VARCHAR2 := FND_API.G_FALSE
2128: ,p_validate_only IN VARCHAR2 := FND_API.G_TRUE
2129: ,x_return_status OUT NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
2130: ) IS
2131:
2132: l_return_status VARCHAR2(1);

Line 2152: x_return_status := FND_API.G_RET_STS_SUCCESS;

2148:
2149: BEGIN
2150:
2151: -- 4537865 : Initialize the return_status
2152: x_return_status := FND_API.G_RET_STS_SUCCESS;
2153: -- Initialize the Error Stack
2154: PA_DEBUG.set_err_stack('PA_STAFFED_ASSIGNMENT_PVT.Delete_Staffed_Assignment');
2155:
2156: --Log Message

Line 2179: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

2175: ,p_new_end_date => l_end_date
2176: ,x_error_message_code => l_error_message_code
2177: ,x_return_status => l_return_status);
2178:
2179: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2180: PA_UTILS.Add_Message( p_app_short_name => 'PA'
2181: ,p_msg_name => l_error_message_code);
2182: PA_ASSIGNMENTS_PUB.g_error_exists := FND_API.G_TRUE;
2183:

Line 2182: PA_ASSIGNMENTS_PUB.g_error_exists := FND_API.G_TRUE;

2178:
2179: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2180: PA_UTILS.Add_Message( p_app_short_name => 'PA'
2181: ,p_msg_name => l_error_message_code);
2182: PA_ASSIGNMENTS_PUB.g_error_exists := FND_API.G_TRUE;
2183:
2184: END IF;
2185: l_return_status := NULL;
2186:

Line 2187: IF (p_validate_only = FND_API.G_FALSE AND PA_ASSIGNMENTS_PUB.g_error_exists <> FND_API.G_TRUE) THEN

2183:
2184: END IF;
2185: l_return_status := NULL;
2186:
2187: IF (p_validate_only = FND_API.G_FALSE AND PA_ASSIGNMENTS_PUB.g_error_exists <> FND_API.G_TRUE) THEN
2188:
2189: --Log Message
2190: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
2191: PA_DEBUG.write_log (x_module => 'pa.plsql.PA_STAFFED_ASSIGNMENT_PVT.Delete_Staffed_Assignment.del_schedules'

Line 2202: ,p_perm_delete => FND_API.G_TRUE --Added for bug 4389372

2198: --
2199:
2200: PA_SCHEDULE_PVT.Delete_Asgn_Schedules
2201: ( p_assignment_id => p_assignment_id
2202: ,p_perm_delete => FND_API.G_TRUE --Added for bug 4389372
2203: ,x_return_status => l_return_status
2204: ,x_msg_count => l_msg_count
2205: ,x_msg_data => l_msg_data
2206: );

Line 2255: IF x_return_status = FND_API.G_RET_STS_SUCCESS THEN

2251:
2252: --
2253: --Delete any related record in history table and any related record in wf table
2254: --
2255: IF x_return_status = FND_API.G_RET_STS_SUCCESS THEN
2256: PA_ASSIGNMENTS_HISTORY_PKG.Delete_By_Assignment ( p_assignment_id =>p_assignment_id
2257: ,x_return_status => x_return_status);
2258:
2259: PA_ASGMT_WFSTD.Delete_Assignment_WF_Records (p_assignment_id => p_assignment_id,

Line 2276: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

2272: -- Set the excetption Message and the stack
2273: FND_MSG_PUB.add_exc_msg ( p_pkg_name => 'PA_STAFFED_ASSIGNMENT_PVT.Delete_Staffed_Assignment'
2274: ,p_procedure_name => PA_DEBUG.G_Err_Stack );
2275: --
2276: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2277: RAISE; -- This is optional depending on the needs
2278:
2279: END Delete_Staffed_Assignment;
2280: