APPS.PA_RES_LIST_ASSIGNMENTS dependencies on PA_RES_LIST_ASSIGNMENTS

Line 1: PACKAGE BODY PA_RES_LIST_ASSIGNMENTS AS

1: PACKAGE BODY PA_RES_LIST_ASSIGNMENTS AS
2: /* $Header: PARLASMB.pls 120.2.12010000.2 2008/11/03 11:08:44 rballamu ship $ */
3:
4: Procedure Create_Rl_Assgmt (X_Project_id In Number,
5: X_Resource_list_id In Number,

Line 28: X_err_stack := X_err_stack ||'->PA_RES_LIST_ASSIGNMENTS.Create_Rl_Asgmt';

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 '||
30: To_Char(X_project_id);
31: Open Proj_Cur;
32: Fetch Proj_Cur into W_Num;

Line 107: X_err_stack := X_err_stack ||'->PA_RES_LIST_ASSIGNMENTS.Get_Rl_Asgmt';

103: Project_id = X_Project_id;
104: Begin
105: X_err_code := 0;
106: Old_Stack := X_Err_Stack;
107: X_err_stack := X_err_stack ||'->PA_RES_LIST_ASSIGNMENTS.Get_Rl_Asgmt';
108: x_err_stage := ' Select Resource_List_Assignment_id from '||
109: ' PA_RESOURCE_LIST_ASSIGNMENTS '||
110: To_Char(X_Resource_List_Id);
111: Open Res_List_Asgmt_Cur;

Line 165: X_err_stack := X_err_stack ||'->PA_RES_LIST_ASSIGNMENTS.Create_Rl_Uses';

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 '||
167: ' from Pa_Resource_list_Assignments '||
168: To_Char(X_Resource_list_Assgmt_id);
169: Open Res_List_Asgmt_Cur;

Line 249: X_err_stack := X_err_stack ||'->PA_RES_LIST_ASSIGNMENTS.Delete_Rl_Uses';

245:
246: Begin
247: X_err_code := 0;
248: Old_Stack := X_Err_Stack;
249: X_err_stack := X_err_stack ||'->PA_RES_LIST_ASSIGNMENTS.Delete_Rl_Uses';
250: x_err_stage := ' Delete from PA_RESOURCE_LIST_USES';
251: Delete from PA_RESOURCE_LIST_USES Where
252: Resource_List_Assignment_id = X_Resource_list_Assgmt_id and
253: Use_Code = X_Use_Code;

Line 291: X_err_stack := X_err_stack ||'->PA_RES_LIST_ASSIGNMENTS.Delete_Rl_Asgmt';

287:
288: Begin
289: X_err_code := 0;
290: Old_Stack := X_Err_Stack;
291: X_err_stack := X_err_stack ||'->PA_RES_LIST_ASSIGNMENTS.Delete_Rl_Asgmt';
292: x_err_stage :=
293: ' Select Resource_list_Assignment_Id from PA_RESOURCE_LIST_USES '
294: || To_Char(X_Resource_list_Assgmt_id);
295: Open Res_List_Asgmt_Cur;