DBA Data[Home] [Help]

APPS.PER_ORG_STRUCTURE_VERSIONS_PKG dependencies on PER_ORG_STRUCTURE_VERSIONS

Line 1: PACKAGE BODY PER_ORG_STRUCTURE_VERSIONS_PKG as

1: PACKAGE BODY PER_ORG_STRUCTURE_VERSIONS_PKG as
2: /* $Header: peosv01t.pkb 115.6 2002/12/06 16:34:45 pkakar ship $ */
3: -------------------------------------------------------------------------------
4: FUNCTION get_next_free_no(p_Org_Structure_Version_Id NUMBER) return NUMBER is
5: --

Line 18: from per_org_structure_versions osv

14: -- Existing or not.
15: --
16: select nvl(max(osv.version_number), 0) + 1
17: into l_next_no
18: from per_org_structure_versions osv
19: where osv.organization_structure_id = p_Org_Structure_Version_Id;
20: --
21: return l_next_no;
22: end get_next_free_no;

Line 42: from per_org_structure_versions osv

38: begin
39: p_gap_warning := 'N';
40: select max(osv.date_to)
41: into l_max_end
42: from per_org_structure_versions osv
43: where osv.organization_structure_id = p_org_structure_id
44: and osv.date_from < p_date_from
45: and (osv.rowid <> p_rowid
46: or p_rowid is null);

Line 52: from per_org_structure_versions osv

48: if (l_max_end is not null and p_date_from = (l_max_end + 1))
49: or (l_max_end is null) then
50: select min(osv.date_from)
51: into l_min_start
52: from per_org_structure_versions osv
53: where osv.organization_structure_id = p_org_structure_id
54: and osv.date_from > p_date_from
55: and (osv.rowid <> p_rowid
56: or p_rowid is null);

Line 80: from per_org_structure_versions osv

76: select null
77: into l_dummy
78: from sys.dual
79: where exists (select 1
80: from per_org_structure_versions osv
81: where osv.organization_structure_id = p_org_structure_id
82: and osv.version_number = p_version_number
83: and (osv.rowid <> p_rowid
84: or p_rowid is null));

Line 116: from per_org_structure_versions osv

112: into l_dummy
113: from sys.dual
114: where exists
115: (select 1
116: from per_org_structure_versions osv
117: where osv.organization_structure_id = p_org_structure_id
118: and p_date_from > osv.date_from
119: and osv.date_to is null);
120: --

Line 127: update per_org_structure_versions osv

123: begin
124: --
125: -- Close down the open structures, before doing the test for overlaps
126: --
127: update per_org_structure_versions osv
128: set osv.date_to = (p_date_from - 1)
129: where osv.organization_structure_id = p_org_structure_id
130: and osv.date_to is null
131: and (osv.rowid <> p_rowid

Line 151: from per_org_structure_versions osv

147: into l_dummy
148: from sys.dual
149: where exists
150: (select 1
151: from per_org_structure_versions osv
152: where osv.date_from <= nvl(p_date_to,
153: p_end_of_time)
154: and nvl(osv.date_to, p_end_of_time)
155: >= p_date_from

Line 259: FROM PER_ORG_STRUCTURE_VERSIONS

255: p_gap_warning IN OUT NOCOPY VARCHAR2
256: ) IS
257: --
258: CURSOR C IS SELECT rowid
259: FROM PER_ORG_STRUCTURE_VERSIONS
260: WHERE org_structure_version_id = p_Org_Structure_Version_Id;
261: CURSOR C2 IS SELECT per_org_structure_versions_s.nextval
262: FROM sys.dual;
263: --

Line 261: CURSOR C2 IS SELECT per_org_structure_versions_s.nextval

257: --
258: CURSOR C IS SELECT rowid
259: FROM PER_ORG_STRUCTURE_VERSIONS
260: WHERE org_structure_version_id = p_Org_Structure_Version_Id;
261: CURSOR C2 IS SELECT per_org_structure_versions_s.nextval
262: FROM sys.dual;
263: --
264: BEGIN
265: PER_ORG_STRUCTURE_VERSIONS_PKG.check_version_number(

Line 265: PER_ORG_STRUCTURE_VERSIONS_PKG.check_version_number(

261: CURSOR C2 IS SELECT per_org_structure_versions_s.nextval
262: FROM sys.dual;
263: --
264: BEGIN
265: PER_ORG_STRUCTURE_VERSIONS_PKG.check_version_number(
266: p_org_structure_id => p_Organization_Structure_Id
267: ,p_version_number => p_version_number
268: ,p_rowid => p_rowid);
269: --

Line 270: PER_ORG_STRUCTURE_VERSIONS_PKG.check_overlap(

266: p_org_structure_id => p_Organization_Structure_Id
267: ,p_version_number => p_version_number
268: ,p_rowid => p_rowid);
269: --
270: PER_ORG_STRUCTURE_VERSIONS_PKG.check_overlap(
271: p_org_structure_id => p_Organization_Structure_Id
272: ,p_rowid => p_rowid
273: ,p_date_from => p_date_from
274: ,p_date_to => p_date_to

Line 278: PER_ORG_STRUCTURE_VERSIONS_PKG.check_date_gaps(

274: ,p_date_to => p_date_to
275: ,p_end_of_time =>p_end_of_time
276: ,p_end_date_closedown => p_closedown_warning);
277: --
278: PER_ORG_STRUCTURE_VERSIONS_PKG.check_date_gaps(
279: p_org_structure_id=> p_Organization_Structure_Id
280: ,p_rowid => p_rowid
281: ,p_date_from => p_date_from
282: ,p_date_to => p_date_to

Line 295: INSERT INTO PER_ORG_STRUCTURE_VERSIONS(

291: OPEN C2;
292: FETCH C2 INTO p_Org_Structure_Version_Id;
293: CLOSE C2;
294: end if;
295: INSERT INTO PER_ORG_STRUCTURE_VERSIONS(
296: org_structure_version_id,
297: business_group_id,
298: organization_structure_id,
299: date_from,

Line 341: FROM PER_ORG_STRUCTURE_VERSIONS

337:
338: ) IS
339: CURSOR C IS
340: SELECT *
341: FROM PER_ORG_STRUCTURE_VERSIONS
342: WHERE rowid = p_Rowid
343: FOR UPDATE of Org_Structure_Version_Id NOWAIT;
344: Recinfo C%ROWTYPE;
345: --

Line 403: PER_ORG_STRUCTURE_VERSIONS_PKG.check_version_number(

399: p_gap_warning IN OUT NOCOPY VARCHAR2
400: ) IS
401: BEGIN
402: --
403: PER_ORG_STRUCTURE_VERSIONS_PKG.check_version_number(
404: p_org_structure_id => p_Organization_Structure_Id
405: ,p_version_number => p_version_number
406: ,p_rowid => p_rowid);
407: --

Line 408: PER_ORG_STRUCTURE_VERSIONS_PKG.check_overlap(

404: p_org_structure_id => p_Organization_Structure_Id
405: ,p_version_number => p_version_number
406: ,p_rowid => p_rowid);
407: --
408: PER_ORG_STRUCTURE_VERSIONS_PKG.check_overlap(
409: p_org_structure_id => p_Organization_Structure_Id
410: ,p_rowid => p_rowid
411: ,p_date_from => p_date_from
412: ,p_date_to => p_date_to

Line 421: UPDATE PER_ORG_STRUCTURE_VERSIONS

417: p_organization_structure_id => p_organization_structure_id
418: ,p_pos_control_enabled_flag => p_pos_ctrl_enabled_flag);
419: --
420:
421: UPDATE PER_ORG_STRUCTURE_VERSIONS
422: SET
423: org_structure_version_id = p_Org_Structure_Version_Id,
424: business_group_id = p_Business_Group_Id,
425: organization_structure_id = p_Organization_Structure_Id,

Line 477: from per_org_structure_versions osv

473: -- another version then null this reference.
474: --
475: cursor update_osv is
476: select rowid
477: from per_org_structure_versions osv
478: where osv.copy_structure_version_id = p_org_Structure_Version_Id
479: for update of osv.copy_structure_version_id nowait;
480: --
481: l_copied_rowid ROWID;

Line 490: update per_org_structure_versions osv

486: loop
487: fetch update_osv into l_copied_rowid;
488: exit when update_osv%NOTFOUND;
489: --
490: update per_org_structure_versions osv
491: set osv.copy_structure_version_id = ''
492: where rowid = l_copied_rowid;
493: end loop;
494: close update_osv;

Line 509: DELETE FROM PER_ORG_STRUCTURE_VERSIONS

505: BEGIN
506: pre_delete_checks(p_org_Structure_Version_Id => p_org_Structure_Version_Id,
507: p_Pa_Installed => p_Pa_Installed);
508: --
509: DELETE FROM PER_ORG_STRUCTURE_VERSIONS
510: WHERE rowid = p_Rowid;
511: if (SQL%NOTFOUND) then
512: RAISE NO_DATA_FOUND;
513: end if;

Line 518: PER_ORG_STRUCTURE_VERSIONS_PKG.check_date_gaps(

514: --
515: update_copied_versions(
516: p_org_Structure_Version_Id =>p_org_Structure_Version_Id);
517: --
518: PER_ORG_STRUCTURE_VERSIONS_PKG.check_date_gaps(
519: p_org_structure_id=> p_Organization_Structure_Id
520: ,p_rowid => p_rowid
521: ,p_date_from => p_date_from
522: ,p_date_to => p_date_to

Line 528: END PER_ORG_STRUCTURE_VERSIONS_PKG;

524: --
525: p_Next_no_free:=get_next_free_no(p_Organization_Structure_Id);
526: END Delete_Row;
527: ------------------------------------------------------------------------------
528: END PER_ORG_STRUCTURE_VERSIONS_PKG;