DBA Data[Home] [Help]

APPS.PA_OBJECT_RELATIONSHIPS_PKG dependencies on PA_OBJECT_RELATIONSHIPS

Line 1: package body PA_OBJECT_RELATIONSHIPS_PKG as

1: package body PA_OBJECT_RELATIONSHIPS_PKG as
2: /* $Header: PAOBRPKB.pls 120.1 2005/08/19 16:36:25 mwasowic noship $ */
3:
4:
5: procedure INSERT_ROW

Line 33: cursor C is select object_relationship_id from PA_OBJECT_RELATIONSHIPS

29: --end FPM bug 3301192
30: x_object_relationship_id OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
31: x_return_status OUT NOCOPY VARCHAR2) is --File.Sql.39 bug 4440895
32:
33: cursor C is select object_relationship_id from PA_OBJECT_RELATIONSHIPS
34: where OBJECT_RELATIONSHIP_ID = X_OBJECT_RELATIONSHIP_ID ;
35: x_object_relationship c%rowtype;
36:
37: begin

Line 41: select pa_object_relationships_s.nextval into x_object_relationship_id

37: begin
38:
39: x_return_status := 'S';
40:
41: select pa_object_relationships_s.nextval into x_object_relationship_id
42: from dual;
43:
44: insert into PA_OBJECT_RELATIONSHIPS (
45: object_relationship_id,

Line 44: insert into PA_OBJECT_RELATIONSHIPS (

40:
41: select pa_object_relationships_s.nextval into x_object_relationship_id
42: from dual;
43:
44: insert into PA_OBJECT_RELATIONSHIPS (
45: object_relationship_id,
46: object_type_from,
47: object_id_from1,
48: object_id_from2,

Line 143: update pa_object_relationships

139: x_return_status := 'S';
140:
141: if p_weighting_percentage = PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM then
142:
143: update pa_object_relationships
144: set
145: relationship_subtype = p_relationship_subtype,
146: lag_day = p_lag_day,
147: priority = p_priority,

Line 169: update pa_object_relationships

165: x_return_status := 'E';
166: end if;
167:
168: else
169: update pa_object_relationships
170: set
171: relationship_subtype = p_relationship_subtype,
172: lag_day = p_lag_day,
173: priority = p_priority,

Line 221: delete from pa_object_relationships

217: x_return_status := 'S';
218:
219: if p_object_relationship_id is null or p_object_relationship_id = FND_API.G_MISS_NUM then
220: if p_object_type_to is null and (p_object_id_to1 is null or p_object_id_to1 = FND_API.G_MISS_NUM) then
221: delete from pa_object_relationships
222: where object_type_from = 'PA_TASKS'
223: and object_id_from1 = p_object_id_from1
224: and object_id_from2 = p_object_id_from2;
225:

Line 226: delete from pa_object_relationships

222: where object_type_from = 'PA_TASKS'
223: and object_id_from1 = p_object_id_from1
224: and object_id_from2 = p_object_id_from2;
225:
226: delete from pa_object_relationships
227: where object_type_to = 'PA_TASKS'
228: and object_id_to1 = p_object_id_from1
229: and object_id_to2 = p_object_id_from2;
230:

Line 232: delete from pa_object_relationships

228: and object_id_to1 = p_object_id_from1
229: and object_id_to2 = p_object_id_from2;
230:
231: else
232: delete from pa_object_relationships
233: where object_type_from in ('PA_TASKS', 'PA_PROJECTS')
234: and object_type_to in ('PA_TASKS', 'PA_PROJECTS')
235: and object_id_from1 = p_object_id_from1
236: and object_id_to1 = p_object_id_to1

Line 241: delete from pa_object_relationships

237: and pm_product_code is not null;
238: end if;
239:
240: else
241: delete from pa_object_relationships
242: where object_relationship_id = p_object_relationship_id
243: and record_version_number = nvl(p_record_version_number,record_version_number);
244:
245: if (sql%notfound) then

Line 262: end PA_OBJECT_RELATIONSHIPS_PKG;

258: x_return_status := 'U';
259:
260: end DELETE_ROW;
261:
262: end PA_OBJECT_RELATIONSHIPS_PKG;
263: