DBA Data[Home] [Help]

APPS.PA_ASSIGNMENTS_PVT dependencies on PA_ASSIGNMENTS_PUB

Line 8: ( p_assignment_rec IN PA_ASSIGNMENTS_PUB.Assignment_Rec_Type

4: P_DEBUG_MODE varchar2(1) := NVL(FND_PROFILE.value('PA_DEBUG_MODE'), 'N'); /* Added Debug Profile Option variable initialization for bug#2674619 */
5: li_message_level NUMBER := 1;
6:
7: PROCEDURE Create_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_project_subteam_id IN pa_project_subteams.project_subteam_id%TYPE := FND_API.G_MISS_NUM

Line 31: l_assignment_rec PA_ASSIGNMENTS_PUB.Assignment_Rec_Type;

27: ,x_return_status OUT NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
28: )
29: IS
30:
31: l_assignment_rec PA_ASSIGNMENTS_PUB.Assignment_Rec_Type;
32: l_project_subteam_party_id pa_project_subteam_parties.project_subteam_party_id%TYPE;
33: l_return_status VARCHAR2(10);
34: l_row_id ROWID;
35: l_msg_count NUMBER;

Line 220: IF PA_ASSIGNMENTS_PUB.g_assignment_id_tbl.COUNT >0 THEN

216: END IF;
217:
218: --dbms_output.put_line('after create assignment:'||x_return_status);
219:
220: IF PA_ASSIGNMENTS_PUB.g_assignment_id_tbl.COUNT >0 THEN
221:
222: FOR i IN PA_ASSIGNMENTS_PUB.g_assignment_id_tbl.FIRST .. PA_ASSIGNMENTS_PUB.g_assignment_id_tbl.LAST LOOP
223:
224: --If no source assignment id, then call create subteam party once

Line 222: FOR i IN PA_ASSIGNMENTS_PUB.g_assignment_id_tbl.FIRST .. PA_ASSIGNMENTS_PUB.g_assignment_id_tbl.LAST LOOP

218: --dbms_output.put_line('after create assignment:'||x_return_status);
219:
220: IF PA_ASSIGNMENTS_PUB.g_assignment_id_tbl.COUNT >0 THEN
221:
222: FOR i IN PA_ASSIGNMENTS_PUB.g_assignment_id_tbl.FIRST .. PA_ASSIGNMENTS_PUB.g_assignment_id_tbl.LAST LOOP
223:
224: --If no source assignment id, then call create subteam party once
225: --else loop through the source assignment's subteam party table and
226: --call create subteam party on each one of the source subteam ids

Line 245: ,p_object_id => PA_ASSIGNMENTS_PUB.g_assignment_id_tbl(i).assignment_id

241: PA_PROJECT_SUBTEAM_PARTIES_PVT.Create_Subteam_Party
242: ( p_validate_only => p_validate_only
243: ,p_project_subteam_id => p_project_subteam_id
244: ,p_object_type => 'PA_PROJECT_ASSIGNMENTS'
245: ,p_object_id => PA_ASSIGNMENTS_PUB.g_assignment_id_tbl(i).assignment_id
246: ,x_project_subteam_party_row_id => l_row_id
247: ,x_project_subteam_party_id => l_project_subteam_party_id
248: ,x_return_status => l_return_status
249: ,x_msg_count => l_msg_count

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

252:
253: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
254: -- PA_ASSIGNMENT_UTILS.Add_Message( p_app_short_name => 'PA'
255: -- ,p_msg_name => l_error_message_code);
256: PA_ASSIGNMENTS_PUB.g_error_exists := FND_API.G_TRUE;
257: END IF;
258: END IF;
259:
260: -- else source assignment id exist, then loop through subteam party table

Line 277: ,p_object_id => PA_ASSIGNMENTS_PUB.g_assignment_id_tbl(i).assignment_id

273: PA_PROJECT_SUBTEAM_PARTIES_PVT.Create_Subteam_Party
274: ( p_validate_only => p_validate_only
275: ,p_project_subteam_id => get_subteam_id_rec.project_subteam_id
276: ,p_object_type => 'PA_PROJECT_ASSIGNMENTS'
277: ,p_object_id => PA_ASSIGNMENTS_PUB.g_assignment_id_tbl(i).assignment_id
278: ,p_primary_subteam_flag => get_subteam_id_rec.primary_subteam_flag
279: ,x_project_subteam_party_row_id=> l_row_id
280: ,x_project_subteam_party_id => l_project_subteam_party_id
281: ,x_return_status => l_return_status

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

285:
286: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
287: -- PA_ASSIGNMENT_UTILS.Add_Message( p_app_short_name => 'PA'
288: -- ,p_msg_name => l_error_message_code);
289: PA_ASSIGNMENTS_PUB.g_error_exists := FND_API.G_TRUE;
290:
291: END IF; --error
292:
293: END IF; --project subteam id is not null

Line 308: l_assignment_effort := PA_SCHEDULE_UTILS.get_num_hours(p_assignment_rec.project_id, PA_ASSIGNMENTS_PUB.g_assignment_id_tbl(1).assignment_id);

304: --Do not calculate assignment effort if this is a template requirement.
305: --No timeline/schedule is created for template requirements.
306: IF (l_assignment_rec.project_id IS NOT NULL AND l_assignment_rec.project_id <> FND_API.G_MISS_NUM) THEN
307:
308: l_assignment_effort := PA_SCHEDULE_UTILS.get_num_hours(p_assignment_rec.project_id, PA_ASSIGNMENTS_PUB.g_assignment_id_tbl(1).assignment_id);
309:
310: END IF;
311:
312: --Log Message

Line 323: WHERE assignment_id = PA_ASSIGNMENTS_PUB.g_assignment_id_tbl(1).assignment_id;

319: IF l_assignment_effort IS NOT NULL THEN
320:
321: SELECT record_version_number INTO l_rec_version_number
322: FROM pa_project_assignments
323: WHERE assignment_id = PA_ASSIGNMENTS_PUB.g_assignment_id_tbl(1).assignment_id;
324:
325: --This is an bulk update for assignment effort using the global assignment_id array
326: PA_PROJECT_ASSIGNMENTS_PKG.Update_Row
327: ( p_assignment_id => NULL

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

330: ,x_return_status => l_return_status
331: );
332:
333: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
334: PA_ASSIGNMENTS_PUB.g_error_exists := FND_API.G_TRUE;
335: END IF;
336: END IF;
337:
338: END IF; --checking there are any new assignments ids

Line 345: IF PA_ASSIGNMENTS_PUB.g_error_exists = FND_API.G_TRUE THEN

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_ASSIGNMENTS_PUB.g_error_exists = FND_API.G_TRUE THEN
346:
347: x_return_status := FND_API.G_RET_STS_ERROR;
348:
349: END IF;

Line 372: ( p_assignment_rec IN PA_ASSIGNMENTS_PUB.Assignment_Rec_Type

368:
369:
370:
371: PROCEDURE Update_Assignment
372: ( p_assignment_rec IN PA_ASSIGNMENTS_PUB.Assignment_Rec_Type
373: ,p_project_subteam_id IN pa_project_subteams.project_subteam_id%TYPE := FND_API.G_MISS_NUM
374: ,p_project_subteam_party_id IN pa_project_subteam_parties.project_subteam_party_id%TYPE := FND_API.G_MISS_NUM
375: ,p_location_city IN pa_locations.city%TYPE := FND_API.G_MISS_CHAR
376: ,p_location_region IN pa_locations.region%TYPE := FND_API.G_MISS_CHAR

Line 391: l_assignment_rec PA_ASSIGNMENTS_PUB.Assignment_Rec_Type;

387: l_msg_count NUMBER;
388: l_msg_data VARCHAR2(4000);
389: l_object_id NUMBER;
390: l_work_type_id NUMBER;
391: l_assignment_rec PA_ASSIGNMENTS_PUB.Assignment_Rec_Type;
392:
393: -- cursor to get the utilization information
394: CURSOR get_work_type IS
395: SELECT work_type_id

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

444:
445: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
446: -- PA_UTILS.Add_Message( p_app_short_name => 'PA'
447: -- ,p_msg_name => l_error_message_code);
448: PA_ASSIGNMENTS_PUB.g_error_exists := FND_API.G_TRUE;
449: END IF;
450: END IF;
451:
452: --If this is a template requirement then it is possible to update the

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

457: IF p_assignment_rec.start_date<> FND_API.G_MISS_DATE OR p_assignment_rec.end_date<>FND_API.G_MISS_DATE THEN
458: IF p_assignment_rec.start_date > p_assignment_rec.end_date THEN
459: PA_UTILS.Add_Message( p_app_short_name => 'PA'
460: ,p_msg_name => 'PA_INVALID_START_DATE');
461: PA_ASSIGNMENTS_PUB.g_error_exists := FND_API.G_TRUE;
462: END IF;
463: END IF;
464:
465: -- Get the old values of Work Type

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

485: ,x_msg_data => l_msg_data
486: );
487:
488: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
489: PA_ASSIGNMENTS_PUB.g_error_exists := FND_API.G_TRUE;
490: END IF;
491:
492:
493: END IF;

Line 538: IF PA_ASSIGNMENTS_PUB.g_error_exists = FND_API.G_TRUE THEN

534: PA_DEBUG.Reset_Err_Stack;
535:
536: -- If g_error_exists is TRUE then set the x_return_status to 'E'
537:
538: IF PA_ASSIGNMENTS_PUB.g_error_exists = FND_API.G_TRUE THEN
539:
540: x_return_status := FND_API.G_RET_STS_ERROR;
541:
542: END IF;

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

668: --dbms_output.put_line('message count is '||l_msg_count);
669: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
670: -- PA_UTILS.Add_Message( p_app_short_name => 'PA'
671: -- ,p_msg_name => l_error_message_code);
672: PA_ASSIGNMENTS_PUB.g_error_exists := FND_API.G_TRUE;
673: END IF;
674:
675: --Bug 6330317
676: IF P_DEBUG_MODE = 'Y' THEN

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

694:
695: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
696: -- PA_UTILS.Add_Message( p_app_short_name => 'PA'
697: -- ,p_msg_name => l_error_message_code);
698: PA_ASSIGNMENTS_PUB.g_error_exists := FND_API.G_TRUE;
699: END IF;
700: END IF;
701:
702: -- FP.M Development

Line 825: IF PA_ASSIGNMENTS_PUB.g_error_exists = FND_API.G_TRUE THEN

821: PA_DEBUG.Reset_Err_Stack;
822:
823: -- If g_error_exists is TRUE then set the x_return_status to 'E'
824:
825: IF PA_ASSIGNMENTS_PUB.g_error_exists = FND_API.G_TRUE THEN
826:
827: x_return_status := FND_API.G_RET_STS_ERROR;
828:
829: END IF;

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

1413: END LOOP;
1414:
1415: PA_UTILS.Add_Message( p_app_short_name => 'PA'
1416: ,p_msg_name => 'PA_NO_UPDATE_ASGN_WITH_ACTUALS' );
1417: PA_ASSIGNMENTS_PUB.g_error_exists := FND_API.G_TRUE;
1418:
1419: END IF;
1420:
1421: ELSE -- If nvl(l_edit_task_ok,'X') <> 'O'