20: Select End_Date_Active from PA_RESOURCE_LISTS
21: where Resource_list_Id = X_Resource_List_id;
22: Begin
23: X_Resource_list_Assgmt_id := 0;
24: W_User_id := To_Number(FND_PROFILE.VALUE('USER_ID'));
25: W_login_id := To_Number(FND_PROFILE.VALUE('LOGIN_ID'));
26: X_err_code := 0;
27: Old_Stack := X_Err_Stack;
28: X_err_stack := X_err_stack ||'->PA_RES_LIST_ASSIGNMENTS.Create_Rl_Asgmt';
21: where Resource_list_Id = X_Resource_List_id;
22: Begin
23: X_Resource_list_Assgmt_id := 0;
24: W_User_id := To_Number(FND_PROFILE.VALUE('USER_ID'));
25: W_login_id := To_Number(FND_PROFILE.VALUE('LOGIN_ID'));
26: X_err_code := 0;
27: Old_Stack := X_Err_Stack;
28: X_err_stack := X_err_stack ||'->PA_RES_LIST_ASSIGNMENTS.Create_Rl_Asgmt';
29: x_err_stage := 'Select Project_id from Pa_Projects '||
157: from Pa_Resource_list_uses_v where Project_id = X_Project_id and
158: Use_Code = X_Use_Code ;
159:
160: Begin
161: W_User_id := To_Number(FND_PROFILE.VALUE('USER_ID'));
162: W_login_id := To_Number(FND_PROFILE.VALUE('LOGIN_ID'));
163: X_err_code := 0;
164: Old_Stack := X_Err_Stack;
165: X_err_stack := X_err_stack ||'->PA_RES_LIST_ASSIGNMENTS.Create_Rl_Uses';
158: Use_Code = X_Use_Code ;
159:
160: Begin
161: W_User_id := To_Number(FND_PROFILE.VALUE('USER_ID'));
162: W_login_id := To_Number(FND_PROFILE.VALUE('LOGIN_ID'));
163: X_err_code := 0;
164: Old_Stack := X_Err_Stack;
165: X_err_stack := X_err_stack ||'->PA_RES_LIST_ASSIGNMENTS.Create_Rl_Uses';
166: x_err_stage := 'Select Project_id,Resource_list_Id '||