DBA Data[Home] [Help]

APPS.PA_STAFFED_ASSIGNMENT_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_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

Line 26: l_assignment_rec PA_ASSIGNMENTS_PUB.Assignment_Rec_Type;

22: ,x_return_status OUT NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
23: )
24: IS
25:
26: l_assignment_rec PA_ASSIGNMENTS_PUB.Assignment_Rec_Type;
27: l_source_assignment_rec PA_ASSIGNMENTS_PUB.Assignment_Rec_Type;
28: l_schedule_basis_flag VARCHAR2(1);
29: l_msg_count NUMBER;
30: l_msg_data VARCHAR2(2000);

Line 27: l_source_assignment_rec PA_ASSIGNMENTS_PUB.Assignment_Rec_Type;

23: )
24: IS
25:
26: l_assignment_rec PA_ASSIGNMENTS_PUB.Assignment_Rec_Type;
27: l_source_assignment_rec PA_ASSIGNMENTS_PUB.Assignment_Rec_Type;
28: l_schedule_basis_flag VARCHAR2(1);
29: l_msg_count NUMBER;
30: l_msg_data VARCHAR2(2000);
31: l_new_open_asgn_count NUMBER := 0;

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 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 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 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 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: RETURN; -- Fix for bug#9033815
290: END IF; --l_allow_asgmt := 'N'
291:
292: END IF; --p_assignment_rec.project_id is NOT NULL

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

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

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

460: --dbms_output.put_line('proj party id is '||l_assignment_rec.project_party_id);
461: --dbms_output.put_line('number of error '||l_msg_count);
462:
463: IF (x_return_status <>FND_API.G_RET_STS_SUCCESS) THEN
464: PA_ASSIGNMENTS_PUB.g_error_exists := FND_API.G_TRUE;
465: l_project_parties_error_exists := FND_API.G_TRUE;
466: END IF;
467:
468: END IF; --end of create project party check

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

487: ,x_log_level => li_message_level);
488: END IF;
489:
490: IF l_check_resource <> FND_API.G_RET_STS_SUCCESS THEN
491: PA_ASSIGNMENTS_PUB.g_error_exists := FND_API.G_TRUE;
492: -- bug 4091194 : This person is invalid for the assignment.
493: -- Set it to null to avoid further process.
494: l_assignment_rec.resource_id := NULL;
495: END IF;

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

813:
814: IF l_ret_code = FND_API.G_FALSE THEN
815: PA_UTILS.Add_Message ( p_app_short_name => 'PA'
816: ,p_msg_name => 'PA_ADD_ADMIN_ASMT_SECURITY' );
817: PA_ASSIGNMENTS_PUB.g_error_exists := FND_API.G_TRUE;
818: END IF;
819:
820: END IF;
821: END IF;

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

859:
860: IF l_ret_code = FND_API.G_FALSE THEN
861: PA_UTILS.Add_Message ( p_app_short_name => 'PA'
862: ,p_msg_name => 'PA_ASGN_CONFIRM_NOT_ALLOWED' );
863: PA_ASSIGNMENTS_PUB.g_error_exists := FND_API.G_TRUE;
864: END IF;
865:
866: END IF;
867:

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

893:
894: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
895: PA_UTILS.Add_Message( p_app_short_name => 'PA'
896: ,p_msg_name => l_error_message_code);
897: PA_ASSIGNMENTS_PUB.g_error_exists := FND_API.G_TRUE;
898: END IF;
899: --dbms_output.put_line('l_cc_ok: '||l_cc_ok);
900: IF l_cc_ok <> 'Y' THEN
901: PA_UTILS.Add_Message( p_app_short_name => 'PA'

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

899: --dbms_output.put_line('l_cc_ok: '||l_cc_ok);
900: IF l_cc_ok <> 'Y' THEN
901: PA_UTILS.Add_Message( p_app_short_name => 'PA'
902: ,p_msg_name => 'CROSS_CHARGE_VALIDATION_FAILED');
903: PA_ASSIGNMENTS_PUB.g_error_exists := FND_API.G_TRUE;
904: END IF;
905:
906: END IF;
907:

Line 1141: ,p_project_assignment_id => PA_ASSIGNMENTS_PUB.g_assignment_id_tbl(1).assignment_id

1137: ,p_task_version_id_tbl => l_task_version_id_tbl
1138: ,p_budget_version_id_tbl => l_budget_version_id_tbl
1139: ,p_struct_version_id_tbl => l_struct_version_id_tbl
1140: -- change project_assignment_id to this assignment_id
1141: ,p_project_assignment_id => PA_ASSIGNMENTS_PUB.g_assignment_id_tbl(1).assignment_id
1142: -- ,p_resource_list_member_id => l_assignment_rec.resource_list_member_id
1143: -- change the named role to this assignment name
1144: ,p_named_role => p_assignment_rec.assignment_name
1145: ,p_project_role_id => p_assignment_rec.project_role_id

Line 1254: ( p_assignment_rec IN PA_ASSIGNMENTS_PUB.Assignment_Rec_Type

1250:
1251:
1252:
1253: PROCEDURE Update_Staffed_Assignment
1254: ( p_assignment_rec IN PA_ASSIGNMENTS_PUB.Assignment_Rec_Type
1255: ,p_location_city IN pa_locations.city%TYPE := FND_API.G_MISS_CHAR
1256: ,p_location_region IN pa_locations.region%TYPE := FND_API.G_MISS_CHAR
1257: ,p_location_country_code IN pa_locations.country_code%TYPE := FND_API.G_MISS_CHAR
1258: ,p_commit IN VARCHAR2 := FND_API.G_FALSE

Line 1263: l_assignment_rec PA_ASSIGNMENTS_PUB.Assignment_Rec_Type;

1259: ,p_validate_only IN VARCHAR2 := FND_API.G_TRUE
1260: ,x_return_status OUT NOCOPY VARCHAR2 --File.Sql.39 bug 4440895
1261: ) IS
1262:
1263: l_assignment_rec PA_ASSIGNMENTS_PUB.Assignment_Rec_Type;
1264: -- added for Bug: 4537865
1265: l_new_status_code pa_project_assignments.status_code%TYPE ;
1266:
1267: -- added for Bug: 4537865

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

1917: PA_UTILS.Add_Message( p_app_short_name => 'PA'
1918: ,p_msg_name => 'PA_ASGN_ID_REQUIRED_FOR_ASG'
1919: ,p_token1 => 'ASGNTYPE'
1920: ,p_value1 => l_asgn_text);
1921: PA_ASSIGNMENTS_PUB.g_error_exists := FND_API.G_TRUE;
1922: END IF;
1923:
1924: --
1925: --Get assignment text from message to be used as values for token

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

1933: PA_UTILS.Add_Message( p_app_short_name => 'PA'
1934: ,p_msg_name => 'PA_PROJ_ID_REQUIRED_FOR_ASGN'
1935: ,p_token1 => 'ASGNTYPE'
1936: ,p_value1 => l_asgn_text);
1937: PA_ASSIGNMENTS_PUB.g_error_exists := FND_API.G_TRUE;
1938: END IF;
1939:
1940:
1941: --

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

1945: PA_UTILS.Add_Message( p_app_short_name => 'PA'
1946: ,p_msg_name => 'PA_ASGN_NAME_REQUIRED_FOR_ASG'
1947: ,p_token1 => 'ASGNTYPE'
1948: ,p_value1 => l_asgn_text);
1949: PA_ASSIGNMENTS_PUB.g_error_exists := FND_API.G_TRUE;
1950: END IF;
1951:
1952:
1953: --

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

1957: PA_UTILS.Add_Message( p_app_short_name => 'PA'
1958: ,p_msg_name => 'PA_PROJ_ROLE_REQUIRED_FOR_ASGN'
1959: ,p_token1 => 'ASGNTYPE'
1960: ,p_value1 => l_asgn_text);
1961: PA_ASSIGNMENTS_PUB.g_error_exists := FND_API.G_TRUE;
1962: END IF;
1963:
1964: --
1965: --Check p_work_type_id IS NOT NULL

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

1967: IF l_assignment_rec.work_type_id IS NULL THEN
1968: --dbms_output.put_line('WORK TYPE INVALID');
1969: PA_UTILS.Add_Message( p_app_short_name => 'PA'
1970: ,p_msg_name => 'PA_WORK_TYPE_REQUIRED_FOR_ASGN' );
1971: PA_ASSIGNMENTS_PUB.g_error_exists := FND_API.G_TRUE;
1972:
1973: END IF;
1974:
1975: -- Get the location id for the p_location_id for the given location parameters

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

1984:
1985: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
1986: PA_UTILS.Add_Message ( p_app_short_name => 'PA'
1987: ,p_msg_name => l_msg_data );
1988: PA_ASSIGNMENTS_PUB.g_error_exists := FND_API.G_TRUE;
1989: END IF;
1990: END IF;
1991:
1992: /*

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

2017: PA_ASSIGNMENT_APPROVAL_PVT.Insert_Into_Assignment_History ( p_assignment_id => l_assignment_rec.assignment_id
2018: ,x_change_id => l_change_id
2019: ,x_return_status => l_return_status);
2020: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2021: PA_ASSIGNMENTS_PUB.g_error_exists := FND_API.G_TRUE;
2022: END IF;
2023: l_return_status := FND_API.G_MISS_CHAR;
2024: END IF;
2025:

Line 2037: -- if (PA_ASSIGNMENTS_PUB.G_update_assignment_bulk_call <> 'Y') then

2033: END IF;
2034: -- Get the status code after action performed.
2035: /* bug 8233045: GSI ER, skipping the following validation only when call is in bulk mode. This might need to be revisited later */
2036: -- bug#9441844
2037: -- if (PA_ASSIGNMENTS_PUB.G_update_assignment_bulk_call <> 'Y') then
2038: PA_ASSIGNMENT_APPROVAL_PVT.Get_Next_Status_After_Action ( p_action_code => PA_ASSIGNMENT_APPROVAL_PUB.g_update_action
2039: ,p_status_code => l_assignment_rec.apprvl_status_code
2040: -- ,x_status_code => l_assignment_rec.apprvl_status_code * commented for Bug: 4537865
2041: ,x_status_code => l_new_status_code -- added for Bug: 4537865

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

2052:
2053: -- added for Bug: 4537865
2054:
2055: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2056: PA_ASSIGNMENTS_PUB.g_error_exists := FND_API.G_TRUE;
2057: END IF;
2058: l_return_status := FND_API.G_MISS_CHAR;
2059:
2060: IF (p_validate_only = FND_API.G_FALSE AND PA_ASSIGNMENTS_PUB.g_error_exists <> FND_API.G_TRUE) THEN

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

2056: PA_ASSIGNMENTS_PUB.g_error_exists := FND_API.G_TRUE;
2057: END IF;
2058: l_return_status := FND_API.G_MISS_CHAR;
2059:
2060: IF (p_validate_only = FND_API.G_FALSE AND PA_ASSIGNMENTS_PUB.g_error_exists <> FND_API.G_TRUE) THEN
2061:
2062: --Log Message
2063: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
2064: PA_DEBUG.write_log (x_module => 'pa.plsql.PA_STAFFED_ASSIGNMENT_PVT.Update_Staffed_Assignment.update_row'

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

2215:
2216: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2217: PA_UTILS.Add_Message( p_app_short_name => 'PA'
2218: ,p_msg_name => l_error_message_code);
2219: PA_ASSIGNMENTS_PUB.g_error_exists := FND_API.G_TRUE;
2220:
2221: END IF;
2222: l_return_status := NULL;
2223:

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

2220:
2221: END IF;
2222: l_return_status := NULL;
2223:
2224: IF (p_validate_only = FND_API.G_FALSE AND PA_ASSIGNMENTS_PUB.g_error_exists <> FND_API.G_TRUE) THEN
2225:
2226: --Log Message
2227: IF P_DEBUG_MODE = 'Y' THEN /* Added Debug Profile Option Check for bug#2674619 */
2228: PA_DEBUG.write_log (x_module => 'pa.plsql.PA_STAFFED_ASSIGNMENT_PVT.Delete_Staffed_Assignment.del_schedules'