APPS.PA_RESOURCES_PKG dependencies on PA_RESOURCES

Line 1: PACKAGE BODY PA_Resources_Pkg AS

1: PACKAGE BODY PA_Resources_Pkg AS
2: /* $Header: PARESOTB.pls 120.1.12010000.3 2009/03/12 07:41:52 rkartha ship $ */
3: -- Standard Table Handler procedures for PA_RESOURCES table
4: PROCEDURE Insert_row (
5: X_Row_Id IN OUT NOCOPY VARCHAR2, --File.Sql.39 bug 4440895

Line 3: -- Standard Table Handler procedures for PA_RESOURCES table

1: PACKAGE BODY PA_Resources_Pkg AS
2: /* $Header: PARESOTB.pls 120.1.12010000.3 2009/03/12 07:41:52 rkartha ship $ */
3: -- Standard Table Handler procedures for PA_RESOURCES table
4: PROCEDURE Insert_row (
5: X_Row_Id IN OUT NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
6: X_RESOURCE_ID IN NUMBER,
7: X_NAME IN VARCHAR2,

Line 23: CURSOR RES_CUR IS Select Rowid from PA_RESOURCES

19: X_LAST_UPDATE_LOGIN IN NUMBER,
20: X_ATTRIBUTE_CATEGORY IN VARCHAR2,
21: X_ATTRIBUTE1 IN VARCHAR2)
22: IS
23: CURSOR RES_CUR IS Select Rowid from PA_RESOURCES
24: Where Resource_Id = X_Resource_Id;
25: BEGIN
26: Insert Into PA_RESOURCES (
27: RESOURCE_ID,

Line 26: Insert Into PA_RESOURCES (

22: IS
23: CURSOR RES_CUR IS Select Rowid from PA_RESOURCES
24: Where Resource_Id = X_Resource_Id;
25: BEGIN
26: Insert Into PA_RESOURCES (
27: RESOURCE_ID,
28: NAME,
29: DESCRIPTION,
30: RESOURCE_TYPE_ID,

Line 85: Update PA_RESOURCES

81: X_LAST_UPDATE_LOGIN IN NUMBER,
82: X_ATTRIBUTE_CATEGORY IN VARCHAR2,
83: X_ATTRIBUTE1 IN VARCHAR2) IS
84: Begin
85: Update PA_RESOURCES
86: SET
87: NAME = X_Name,
88: DESCRIPTION = X_Description,
89: RESOURCE_TYPE_ID = X_Resource_Type_Id,

Line 107: Delete from PA_RESOURCES Where RowId = X_Row_Id;

103: End If;
104: End Update_Row;
105: Procedure Delete_Row (X_Row_Id In Varchar2) Is
106: Begin
107: Delete from PA_RESOURCES Where RowId = X_Row_Id;
108: If SQL%NOTFOUND Then
109: Raise NO_DATA_FOUND;
110: End If;
111: End Delete_Row;

Line 129: Select * From PA_RESOURCES WHERE ROWID = X_ROW_ID

125: X_LAST_UPDATE_LOGIN IN NUMBER,
126: X_ATTRIBUTE_CATEGORY IN VARCHAR2,
127: X_ATTRIBUTE1 IN VARCHAR2) IS
128: CURSOR C Is
129: Select * From PA_RESOURCES WHERE ROWID = X_ROW_ID
130: For Update of RESOURCE_ID NOWAIT;
131: Recinfo C%ROWTYPE;
132: Begin
133: OPEN C;

Line 184: P_START_DATE_ACTIVE pa_resources.start_date_active%TYPE; */

180: P_vendor_name po_vendors.vendor_name%TYPE;
181:
182: P_Name VARCHAR2(80); -- Bug 2191972, incresed the size from 60 to 80.
183: /*Commented the code for bug# 4143659 as this is not required.
184: P_START_DATE_ACTIVE pa_resources.start_date_active%TYPE; */
185: l_uncateg_rl_name pa_resource_list_members.alias%TYPE; /* added the variable for bug 2738156 */
186: BEGIN
187: select resource_type_code
188: into P_Resource_Type_Code

Line 197: from pa_resources

193:
194: /* Commented the code for bug# 4143659 as this is not required.
195: Select start_date_active
196: into p_start_date_active
197: from pa_resources
198: Where resource_id = P_resource_id; */
199:
200: if P_Resource_Type_Code = 'ORGANIZATION' then
201: select substrb(org.name,1,60) -- Bug#7832726

Line 252: from pa_resources r,

248: elsif P_Resource_Type_Code = 'UNCATEGORIZED' then /* added this elsif condition for bug 2738156 */
249:
250: select distinct m.alias /* bug 7615636 */
251: into l_uncateg_rl_name
252: from pa_resources r,
253: pa_resource_list_members m,
254: pa_resource_lists_all_bg rl,
255: pa_implementations i
256: where rl.uncategorized_flag = 'Y'

Line 265: from pa_resources

261: return l_uncateg_rl_name;
262: else
263: select substr(name,1,80) -- Bug 2191972 , replaced 60 with 80
264: into P_name
265: from pa_resources
266: where resource_id = P_resource_id;
267:
268: return P_name;
269: end if;

Line 295: END PA_Resources_Pkg;

291: WHEN OTHERS THEN
292: RAISE;
293: End Get_Resource_List_Member_Name;
294:
295: END PA_Resources_Pkg;