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

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 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 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 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 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 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 1110: ,p_project_assignment_id => PA_ASSIGNMENTS_PUB.g_assignment_id_tbl(1).assignment_id

1106: ,p_task_version_id_tbl => l_task_version_id_tbl
1107: ,p_budget_version_id_tbl => l_budget_version_id_tbl
1108: ,p_struct_version_id_tbl => l_struct_version_id_tbl
1109: -- change project_assignment_id to this assignment_id
1110: ,p_project_assignment_id => PA_ASSIGNMENTS_PUB.g_assignment_id_tbl(1).assignment_id
1111: -- ,p_resource_list_member_id => l_assignment_rec.resource_list_member_id
1112: -- change the named role to this assignment name
1113: ,p_named_role => p_assignment_rec.assignment_name
1114: ,p_project_role_id => p_assignment_rec.project_role_id

Line 1223: ( p_assignment_rec IN PA_ASSIGNMENTS_PUB.Assignment_Rec_Type

1219:
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

Line 1232: l_assignment_rec PA_ASSIGNMENTS_PUB.Assignment_Rec_Type;

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;
1233: -- added for Bug: 4537865
1234: l_new_status_code pa_project_assignments.status_code%TYPE ;
1235:
1236: -- added for Bug: 4537865

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 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 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 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 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 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'