The following lines contain the word 'select', 'insert', 'update' or 'delete':
Procedure Insert_Rec
(p_BUSINESS_GROUP_ID IN NUMBER
,p_effective_Date IN Date
,p_ENTITY_ID IN Varchar2
,P_Parent_Entity_Id IN Number Default NULL
,p_Operation_Group IN Number
,p_TRN_TYPE IN Varchar2
,p_HIERARCHY_NODE_ID Out NOCOPY NUMBER
,p_Status Out NOCOPY Varchar2
,p_Object_Version_Number Out NOCOPY Number) Is
l_Hierarchy_Version_Id Per_gen_Hierarchy_Versions.Hierarchy_Version_Id%TYPE;
l_proc Varchar2(100) := 'Pqh_De_Operation.Insert_Rec';
Select Hierarchy_Node_id
from Per_gen_Hierarchy_Nodes a, Pqh_de_operations b
Where Parent_hierarchy_Node_id = p_Operation_Group
and Node_type = 'OPR_OPTS'
and Entity_Id = b.Operation_Number
and b.Operation_Id = P_Parent_Entity_Id;
Select Hierarchy_version_Id
from Per_gen_hierarchy_Nodes
where Hierarchy_Node_Id = p_Operation_Group;
Select Nvl(Max(Seq),0) + 1
Into l_seq
From Per_gen_Hierarchy_Nodes
Where Hierarchy_Version_Id = l_Hierarchy_Version_Id
and Node_type = l_Node_Type;
Select Per_Gen_Hierarchy_Nodes_s.nextval
into l_Hierarchy_Node_Id from Dual;
Insert into
Per_Gen_Hierarchy_Nodes
(HIERARCHY_NODE_ID, BUSINESS_GROUP_ID, ENTITY_ID, HIERARCHY_VERSION_ID,
NODE_TYPE, PARENT_HIERARCHY_NODE_ID, SEQ, Object_Version_Number)
Values
(l_Hierarchy_Node_Id, p_BUSINESS_GROUP_ID, p_ENTITY_ID,l_Hierarchy_version_Id,
l_Node_type, l_Parent_Hierarchy_Node_Id,l_seq, 1);
Select Decode(Node_Type,'OPR_OPTS','O','OPR_JOB_DTLS','J','OPR_JOB_FTR','F'), Entity_Id
From Per_Gen_Hierarchy_Nodes
Where Hierarchy_Version_Id = l_Hierarchy_version_Id
Start With Hierarchy_node_id = p_Hierarchy_Node_id
Connect By Parent_Hierarchy_Node_Id = Prior Hierarchy_Node_Id; */
Select Description
From Pqh_De_Operations
Where OPERATION_NUMBER = p_Operation_Job_Number;
Select TATIGKEIT_DETAIL_ID, Description
From Pqh_de_Tatigkeit_details
Where TATIGKEIT_NUMBER = p_Job_Number;
Select Entity_Id, Node_Type, Hierarchy_Node_Id
from Per_Gen_Hierarchy_Nodes
Where Parent_Hierarchy_Node_id = p_Hierarchy_Node_Id;
Select Entity_Id, Node_Type, Hierarchy_Node_Id
from Per_Gen_Hierarchy_Nodes
Where Parent_Hierarchy_Node_id = p_Hierarchy_Node_Id;
hr_utility.set_message(8302, 'PQH_DE_INVALD_OP_SELECT');
PQH_DE_VLDOPR_API.Insert_Vldtn_Oprn
(p_effective_date => Trunc(Sysdate)
,p_business_group_id => P_Business_Group_Id
,p_WRKPLC_VLDTN_VER_ID => p_Vldtn_Ver_Op_Id
,P_WRKPLC_OPERATION_ID => p_Operation_Job_Id
,P_DESCRIPTION => l_Desc
,P_UNIT_PERCENTAGE => NULL
,P_WRKPLC_VLDTN_OP_ID => l_Wrkplc_Vldtn_Op_Id
,p_object_version_number => l_Object_Version_Number);
PQH_DE_VLDJOBFTR_API.Insert_Vldtn_JObftr
(p_effective_date => Trunc(Sysdate)
,p_business_group_id => p_Business_Group_Id
,p_WRKPLC_VLDTN_OPR_JOB_ID => l_Wrkplc_Vldtn_Op_Id
,P_JOB_FEATURE_CODE => Oprrec.Entity_Id
,P_Wrkplc_Vldtn_Opr_job_Type => 'O'
,P_WRKPLC_VLDTN_JObFTR_ID => l_WRKPLC_VLDTN_JObFTR_ID
,p_object_version_number => l_Object_Version_Number);
PQH_DE_VLDJOB_API.Insert_Vldtn_JOb
(p_effective_date => Trunc(Sysdate)
,p_business_group_id => p_Business_Group_Id
,p_WRKPLC_VLDTN_OP_ID => l_Wrkplc_Vldtn_Op_Id
,P_WRKPLC_JOB_ID => l_Job_Id
,P_DESCRIPTION => l_desc
,P_WRKPLC_VLDTN_JOb_ID => l_Wrkplc_Vldtn_Job_Id
,p_object_version_number => l_Object_Version_Number);
PQH_DE_VLDJOBFTR_API.Insert_Vldtn_JObftr
(p_effective_date => Trunc(Sysdate)
,p_business_group_id => p_Business_Group_Id
,p_WRKPLC_VLDTN_OPR_JOB_ID => l_Wrkplc_Vldtn_Job_Id
,P_JOB_FEATURE_CODE => Jobrec.Entity_Id
,P_Wrkplc_Vldtn_Opr_job_Type => 'J'
,P_WRKPLC_VLDTN_JObFTR_ID => l_WRKPLC_VLDTN_JObFTR_ID
,p_object_version_number => l_Object_Version_Number);
hr_utility.set_message(8302, 'PQH_DE_INVALD_JOB_SELECT');
PQH_DE_VLDJOB_API.Insert_Vldtn_JOb
(p_effective_date => Trunc(Sysdate)
,p_business_group_id => p_Business_Group_Id
,p_WRKPLC_VLDTN_OP_ID => p_Vldtn_Ver_Op_Id
,P_WRKPLC_JOB_ID => p_Operation_Job_Id
,P_DESCRIPTION => l_desc
,P_WRKPLC_VLDTN_JOb_ID => l_Wrkplc_Vldtn_Job_Id
,p_object_version_number => l_Object_Version_Number);
PQH_DE_VLDJOBFTR_API.Insert_Vldtn_JObftr
(p_effective_date => Trunc(Sysdate)
,p_business_group_id => p_Business_Group_Id
,p_WRKPLC_VLDTN_OPR_JOB_ID => l_Wrkplc_Vldtn_Job_Id
,P_JOB_FEATURE_CODE => Jobrec.Entity_Id
,P_Wrkplc_Vldtn_Opr_job_Type => 'J'
,P_WRKPLC_VLDTN_JObFTR_ID => l_WRKPLC_VLDTN_JObFTR_ID
,p_object_version_number => l_Object_Version_Number);
Select WRKPLC_VLDTN_OP_ID, OPERATION_NUMBER, WRKPLC_OPERATION_ID
From Pqh_de_operations a, Pqh_De_Wrkplc_Vldtn_Ops b
Where WRKPLC_VLDTN_VER_ID = p_WRKPLC_VLDTN_VER_ID
and a.Operation_Id = WRKPLC_OPERATION_ID;
Select WRKPLC_VLDTN_JOB_ID, b.DESCRIPTION,
WRKPLC_JOB_ID, TATIGKEIT_NUMBER
From PQH_DE_TATIGKEIT_DETAILS a, Pqh_De_Wrkplc_Vldtn_JObs b
Where WRKPLC_VLDTN_OP_ID = p_WRKPLC_VLDTN_OP_ID
and a.TATIGKEIT_DETAIL_ID = WRKPLC_JOB_ID;
Select WRKPLC_VLDTN_JOBFTR_ID, WRKPLC_VLDTN_OPR_JOB_ID
JOB_FEATURE_CODE, WRKPLC_VLDTN_OPR_JOB_TYPE
From Pqh_De_Wrkplc_Vldtn_Jobftrs
Where WRKPLC_VLDTN_OPR_JOB_ID = p_WRKPLC_VLDTN_OPR_JOB_ID
and WRKPLC_VLDTN_OPR_JOB_TYPE = Type;
Select Hierarchy_Node_Id, a.Hierarchy_Version_Id, Parent_Hierarchy_Node_Id, Node_type
From Per_Gen_Hierarchy_Nodes a, Per_gen_hierarchy_Versions b
Where Node_Type = P_Node_Type
and Entity_Id = p_Entity_Id
and b.Hierarchy_Version_Id = a.Hierarchy_Version_Id
and trunc(P_effective_Date) between date_From and nvl(Date_To,trunc(P_effective_Date));
Select Nvl(Max(Seq),0) + 1
From Per_Gen_Hierarchy_Nodes
Where Node_type = p_Node_type
and Parent_Hierarchy_Node_id = p_OprHierarchy_Node_Id;
Select Per_gen_Hierarchy_Nodes_s.Nextval into l_JHierarchy_Node_Id from Dual;
Insert into
Per_Gen_Hierarchy_Nodes
(HIERARCHY_NODE_ID, BUSINESS_GROUP_ID, ENTITY_ID, HIERARCHY_VERSION_ID,
NODE_TYPE, PARENT_HIERARCHY_NODE_ID, SEQ, Object_Version_Number)
Values
(l_JHierarchy_Node_Id, p_BUSINESS_GROUP_ID, Jobrec.TATIGKEIT_NUMBER, l_OprHierarchy_Version_Id,
'OPR_JOB_DTLS', l_OprParent_Hierarchy_Node_Id,l_seq, 1);
Select Per_gen_Hierarchy_Nodes_s.Nextval into l_Hierarchy_Node_Id from Dual;
Insert into
Per_Gen_Hierarchy_Nodes
(HIERARCHY_NODE_ID, BUSINESS_GROUP_ID, ENTITY_ID, HIERARCHY_VERSION_ID,
NODE_TYPE, PARENT_HIERARCHY_NODE_ID, SEQ, Object_Version_Number)
Values
(l_Hierarchy_Node_Id, p_BUSINESS_GROUP_ID, Jobftrrec.JOB_FEATURE_CODE, l_OprHierarchy_Version_Id,
'OPR_JOB_FTR', l_JHierarchy_Node_Id, l_seq, 1);
Select Per_gen_Hierarchy_Nodes_s.Nextval into l_Hierarchy_Node_Id from Dual;
Insert Into
Per_Gen_Hierarchy_Nodes
(HIERARCHY_NODE_ID, BUSINESS_GROUP_ID, ENTITY_ID, HIERARCHY_VERSION_ID,
NODE_TYPE, PARENT_HIERARCHY_NODE_ID, SEQ, Object_Version_Number)
Values
(l_Hierarchy_Node_Id, p_BUSINESS_GROUP_ID, Jobftrrec.JOB_FEATURE_CODE, l_OprHierarchy_Version_Id,
'OPR_JOB_FTR', l_OprParent_Hierarchy_Node_Id, l_seq, 1);