DBA Data[Home] [Help]

APPS.PER_POS_STRUCTURE_ELEMENTS_PKG dependencies on PER_POS_STRUCTURE_ELEMENTS

Line 1: PACKAGE BODY PER_POS_STRUCTURE_ELEMENTS_PKG as

1: PACKAGE BODY PER_POS_STRUCTURE_ELEMENTS_PKG as
2: /* $Header: pepse01t.pkb 120.0 2005/05/31 15:14:31 appldev noship $ */
3: ------------------------------------------------------------------------------
4: FUNCTION get_subordinates(X_View_All_Positions VARCHAR2
5: ,X_Parent_Position_Id NUMBER

Line 22: from per_pos_structure_elements pse

18: -- the current security profile
19: --
20: select nvl( count(pse.pos_structure_element_id), 0)
21: into l_count
22: from per_pos_structure_elements pse
23: where ((X_View_All_Positions <> 'Y'
24: and EXISTS
25: (select '1'
26: from hr_positions_f hpf

Line 233: from per_POS_structure_elements a

229: into l_exists
230: from sys.dual
231: where X_Position_Id in
232: (select a.subordinate_position_id
233: from per_POS_structure_elements a
234: where a.business_group_id + 0 = X_Business_Group_Id
235: and a.POS_structure_VERSION_id =
236: X_Sec_Pos_Structure_Version_id
237: connect by prior

Line 314: FROM PER_POS_STRUCTURE_ELEMENTS PSE

310: l_dummy VARCHAR2(1);
311: begin
312: select null
313: into l_dummy
314: FROM PER_POS_STRUCTURE_ELEMENTS PSE
315: WHERE PSE.POS_STRUCTURE_VERSION_ID = X_Pos_Structure_Version_Id
316: AND PSE.PARENT_POSITION_ID = X_Parent_position_id
317: AND PSE.SUBORDINATE_POSITION_ID = X_Subordinate_Position_Id;
318: --

Line 338: from per_pos_structure_elements pse

334: select null
335: into l_dummy
336: from sys.dual
337: where exists(select 1
338: from per_pos_structure_elements pse
339: where pse.parent_position_id = X_Subordinate_position_Id
340: and pse.pos_structure_version_id = X_Pos_Structure_version_Id);
341: --
342: hr_utility.set_message('801','HR_6915_POS_DEL_FIRST');

Line 377: CURSOR C IS SELECT rowid FROM PER_POS_STRUCTURE_ELEMENTS

373: X_Pos_Structure_Version_Id NUMBER,
374: X_Subordinate_Position_Id NUMBER,
375: X_Parent_Position_Id NUMBER
376: ) IS
377: CURSOR C IS SELECT rowid FROM PER_POS_STRUCTURE_ELEMENTS
378: WHERE pos_structure_element_id = X_Pos_Structure_Element_Id;
379: CURSOR C2 IS SELECT per_pos_structure_elements_s.nextval FROM sys.dual;
380: --
381: cursor get_details is select rowid, POS_STRUCTURE_ELEMENT_ID

Line 379: CURSOR C2 IS SELECT per_pos_structure_elements_s.nextval FROM sys.dual;

375: X_Parent_Position_Id NUMBER
376: ) IS
377: CURSOR C IS SELECT rowid FROM PER_POS_STRUCTURE_ELEMENTS
378: WHERE pos_structure_element_id = X_Pos_Structure_Element_Id;
379: CURSOR C2 IS SELECT per_pos_structure_elements_s.nextval FROM sys.dual;
380: --
381: cursor get_details is select rowid, POS_STRUCTURE_ELEMENT_ID
382: ,BUSINESS_GROUP_ID, POS_STRUCTURE_VERSION_ID
383: ,SUBORDINATE_POSITION_ID,PARENT_POSITION_ID

Line 384: FROM PER_POS_STRUCTURE_ELEMENTS

380: --
381: cursor get_details is select rowid, POS_STRUCTURE_ELEMENT_ID
382: ,BUSINESS_GROUP_ID, POS_STRUCTURE_VERSION_ID
383: ,SUBORDINATE_POSITION_ID,PARENT_POSITION_ID
384: FROM PER_POS_STRUCTURE_ELEMENTS
385: where Subordinate_Position_Id = X_Subordinate_Position_Id
386: and Pos_Structure_Version_Id = X_Pos_Structure_Version_Id;
387: Recinfo get_details%ROWTYPE;
388: --

Line 390: /* PER_POS_STRUCTURE_ELEMENTS_PKG.check_unique(

386: and Pos_Structure_Version_Id = X_Pos_Structure_Version_Id;
387: Recinfo get_details%ROWTYPE;
388: --
389: BEGIN
390: /* PER_POS_STRUCTURE_ELEMENTS_PKG.check_unique(
391: X_Parent_position_id => X_Parent_position_id
392: ,X_Pos_Structure_Version_Id => X_Pos_Structure_Version_Id
393: ,X_Subordinate_Position_Id => X_Subordinate_Position_Id);
394: */

Line 411: PER_POS_STRUCTURE_ELEMENTS_PKG.lock_row(

407: --
408: -- Lock the row
409: --
410:
411: PER_POS_STRUCTURE_ELEMENTS_PKG.lock_row(
412: X_Rowid => Recinfo.ROWID,
413: X_Pos_Structure_Element_Id => Recinfo.POS_STRUCTURE_ELEMENT_ID,
414: X_Business_Group_Id => Recinfo.BUSINESS_GROUP_ID,
415: X_Pos_Structure_Version_Id => Recinfo.POS_STRUCTURE_VERSION_ID,

Line 421: PER_POS_STRUCTURE_ELEMENTS_PKG.update_row(

417: X_Parent_Position_Id => Recinfo.PARENT_POSITION_ID);
418: --
419: -- Update the row
420: --
421: PER_POS_STRUCTURE_ELEMENTS_PKG.update_row(
422: X_Rowid => Recinfo.ROWID,
423: X_Pos_Structure_Element_Id => Recinfo.POS_STRUCTURE_ELEMENT_ID,
424: X_Business_Group_Id => Recinfo.BUSINESS_GROUP_ID,
425: X_Pos_Structure_Version_Id => Recinfo.POS_STRUCTURE_VERSION_ID,

Line 442: INSERT INTO PER_POS_STRUCTURE_ELEMENTS(

438: OPEN C2;
439: FETCH C2 INTO X_Pos_Structure_Element_Id;
440: CLOSE C2;
441: end if;
442: INSERT INTO PER_POS_STRUCTURE_ELEMENTS(
443: pos_structure_element_id,
444: business_group_id,
445: pos_structure_version_id,
446: subordinate_position_id,

Line 473: FROM PER_POS_STRUCTURE_ELEMENTS

469: X_Parent_Position_Id NUMBER
470: ) IS
471: CURSOR C IS
472: SELECT *
473: FROM PER_POS_STRUCTURE_ELEMENTS
474: WHERE rowid = X_Rowid
475: FOR UPDATE of Pos_Structure_Element_Id NOWAIT;
476: Recinfo C%ROWTYPE;
477: BEGIN

Line 517: UPDATE PER_POS_STRUCTURE_ELEMENTS

513: X_Subordinate_Position_Id NUMBER,
514: X_Parent_Position_Id NUMBER
515: ) IS
516: BEGIN
517: UPDATE PER_POS_STRUCTURE_ELEMENTS
518: SET
519: pos_structure_element_id = X_Pos_Structure_Element_Id,
520: business_group_id = X_Business_Group_Id,
521: pos_structure_version_id = X_Pos_Structure_Version_Id,

Line 540: PER_POS_STRUCTURE_ELEMENTS_PKG.pre_delete_checks(

536: BEGIN
537: --
538: -- Do the Pre-delete checks
539: --
540: PER_POS_STRUCTURE_ELEMENTS_PKG.pre_delete_checks(
541: X_Subordinate_position_Id => X_Subordinate_position_Id
542: ,X_Position_Structure_Id => X_Position_Structure_Id
543: ,X_Business_Group_Id => X_Business_Group_Id
544: ,X_Hr_Installed => X_Hr_Installed

Line 547: DELETE FROM PER_POS_STRUCTURE_ELEMENTS

543: ,X_Business_Group_Id => X_Business_Group_Id
544: ,X_Hr_Installed => X_Hr_Installed
545: ,X_Pos_Structure_version_Id => X_Pos_Structure_version_Id);
546: --
547: DELETE FROM PER_POS_STRUCTURE_ELEMENTS
548: WHERE rowid = X_Rowid;
549: if (SQL%NOTFOUND) then
550: RAISE NO_DATA_FOUND;
551: end if;

Line 554: END PER_POS_STRUCTURE_ELEMENTS_PKG;

550: RAISE NO_DATA_FOUND;
551: end if;
552: END Delete_Row;
553:
554: END PER_POS_STRUCTURE_ELEMENTS_PKG;