1: Package Body irc_idt_shd as
2: /* $Header: iridtrhi.pkb 120.0 2005/07/26 15:07:27 mbocutt noship $ */
3: --
4: -- ----------------------------------------------------------------------------
5: -- | Private Global Definitions |
4: -- ----------------------------------------------------------------------------
5: -- | Private Global Definitions |
6: -- ----------------------------------------------------------------------------
7: --
8: g_package varchar2(33) := ' irc_idt_shd.'; -- Global package name
9: --
10: -- ----------------------------------------------------------------------------
11: -- |---------------------------< constraint_error >---------------------------|
12: -- ----------------------------------------------------------------------------
83: --
84: l_fct_ret := false;
85: Else
86: If (p_default_posting_id
87: = irc_idt_shd.g_old_rec.default_posting_id and
88: p_language
89: = irc_idt_shd.g_old_rec.language
90: ) Then
91: --
85: Else
86: If (p_default_posting_id
87: = irc_idt_shd.g_old_rec.default_posting_id and
88: p_language
89: = irc_idt_shd.g_old_rec.language
90: ) Then
91: --
92: -- The g_old_rec is current therefore we must
93: -- set the returning function to true
97: --
98: -- Select the current row into g_old_rec
99: --
100: Open C_Sel1;
101: Fetch C_Sel1 Into irc_idt_shd.g_old_rec;
102: If C_Sel1%notfound Then
103: Close C_Sel1;
104: --
105: -- The primary key is invalid therefore we must error
108: fnd_message.raise_error;
109: End If;
110: Close C_Sel1;
111: --
112: irc_idt_shd.g_old_rec.org_description
113: :=dbms_lob.substr(irc_idt_shd.g_old_rec.org_description_c);
114: irc_idt_shd.g_old_rec.brief_description
115: :=dbms_lob.substr(irc_idt_shd.g_old_rec.brief_description_c);
116: irc_idt_shd.g_old_rec.detailed_description
109: End If;
110: Close C_Sel1;
111: --
112: irc_idt_shd.g_old_rec.org_description
113: :=dbms_lob.substr(irc_idt_shd.g_old_rec.org_description_c);
114: irc_idt_shd.g_old_rec.brief_description
115: :=dbms_lob.substr(irc_idt_shd.g_old_rec.brief_description_c);
116: irc_idt_shd.g_old_rec.detailed_description
117: :=dbms_lob.substr(irc_idt_shd.g_old_rec.detailed_description_c);
110: Close C_Sel1;
111: --
112: irc_idt_shd.g_old_rec.org_description
113: :=dbms_lob.substr(irc_idt_shd.g_old_rec.org_description_c);
114: irc_idt_shd.g_old_rec.brief_description
115: :=dbms_lob.substr(irc_idt_shd.g_old_rec.brief_description_c);
116: irc_idt_shd.g_old_rec.detailed_description
117: :=dbms_lob.substr(irc_idt_shd.g_old_rec.detailed_description_c);
118: irc_idt_shd.g_old_rec.job_requirements
111: --
112: irc_idt_shd.g_old_rec.org_description
113: :=dbms_lob.substr(irc_idt_shd.g_old_rec.org_description_c);
114: irc_idt_shd.g_old_rec.brief_description
115: :=dbms_lob.substr(irc_idt_shd.g_old_rec.brief_description_c);
116: irc_idt_shd.g_old_rec.detailed_description
117: :=dbms_lob.substr(irc_idt_shd.g_old_rec.detailed_description_c);
118: irc_idt_shd.g_old_rec.job_requirements
119: :=dbms_lob.substr(irc_idt_shd.g_old_rec.job_requirements_c);
112: irc_idt_shd.g_old_rec.org_description
113: :=dbms_lob.substr(irc_idt_shd.g_old_rec.org_description_c);
114: irc_idt_shd.g_old_rec.brief_description
115: :=dbms_lob.substr(irc_idt_shd.g_old_rec.brief_description_c);
116: irc_idt_shd.g_old_rec.detailed_description
117: :=dbms_lob.substr(irc_idt_shd.g_old_rec.detailed_description_c);
118: irc_idt_shd.g_old_rec.job_requirements
119: :=dbms_lob.substr(irc_idt_shd.g_old_rec.job_requirements_c);
120: irc_idt_shd.g_old_rec.additional_details
113: :=dbms_lob.substr(irc_idt_shd.g_old_rec.org_description_c);
114: irc_idt_shd.g_old_rec.brief_description
115: :=dbms_lob.substr(irc_idt_shd.g_old_rec.brief_description_c);
116: irc_idt_shd.g_old_rec.detailed_description
117: :=dbms_lob.substr(irc_idt_shd.g_old_rec.detailed_description_c);
118: irc_idt_shd.g_old_rec.job_requirements
119: :=dbms_lob.substr(irc_idt_shd.g_old_rec.job_requirements_c);
120: irc_idt_shd.g_old_rec.additional_details
121: :=dbms_lob.substr(irc_idt_shd.g_old_rec.additional_details_c);
114: irc_idt_shd.g_old_rec.brief_description
115: :=dbms_lob.substr(irc_idt_shd.g_old_rec.brief_description_c);
116: irc_idt_shd.g_old_rec.detailed_description
117: :=dbms_lob.substr(irc_idt_shd.g_old_rec.detailed_description_c);
118: irc_idt_shd.g_old_rec.job_requirements
119: :=dbms_lob.substr(irc_idt_shd.g_old_rec.job_requirements_c);
120: irc_idt_shd.g_old_rec.additional_details
121: :=dbms_lob.substr(irc_idt_shd.g_old_rec.additional_details_c);
122: irc_idt_shd.g_old_rec.how_to_apply
115: :=dbms_lob.substr(irc_idt_shd.g_old_rec.brief_description_c);
116: irc_idt_shd.g_old_rec.detailed_description
117: :=dbms_lob.substr(irc_idt_shd.g_old_rec.detailed_description_c);
118: irc_idt_shd.g_old_rec.job_requirements
119: :=dbms_lob.substr(irc_idt_shd.g_old_rec.job_requirements_c);
120: irc_idt_shd.g_old_rec.additional_details
121: :=dbms_lob.substr(irc_idt_shd.g_old_rec.additional_details_c);
122: irc_idt_shd.g_old_rec.how_to_apply
123: :=dbms_lob.substr(irc_idt_shd.g_old_rec.how_to_apply_c);
116: irc_idt_shd.g_old_rec.detailed_description
117: :=dbms_lob.substr(irc_idt_shd.g_old_rec.detailed_description_c);
118: irc_idt_shd.g_old_rec.job_requirements
119: :=dbms_lob.substr(irc_idt_shd.g_old_rec.job_requirements_c);
120: irc_idt_shd.g_old_rec.additional_details
121: :=dbms_lob.substr(irc_idt_shd.g_old_rec.additional_details_c);
122: irc_idt_shd.g_old_rec.how_to_apply
123: :=dbms_lob.substr(irc_idt_shd.g_old_rec.how_to_apply_c);
124: irc_idt_shd.g_old_rec.image_url
117: :=dbms_lob.substr(irc_idt_shd.g_old_rec.detailed_description_c);
118: irc_idt_shd.g_old_rec.job_requirements
119: :=dbms_lob.substr(irc_idt_shd.g_old_rec.job_requirements_c);
120: irc_idt_shd.g_old_rec.additional_details
121: :=dbms_lob.substr(irc_idt_shd.g_old_rec.additional_details_c);
122: irc_idt_shd.g_old_rec.how_to_apply
123: :=dbms_lob.substr(irc_idt_shd.g_old_rec.how_to_apply_c);
124: irc_idt_shd.g_old_rec.image_url
125: :=dbms_lob.substr(irc_idt_shd.g_old_rec.image_url_c);
118: irc_idt_shd.g_old_rec.job_requirements
119: :=dbms_lob.substr(irc_idt_shd.g_old_rec.job_requirements_c);
120: irc_idt_shd.g_old_rec.additional_details
121: :=dbms_lob.substr(irc_idt_shd.g_old_rec.additional_details_c);
122: irc_idt_shd.g_old_rec.how_to_apply
123: :=dbms_lob.substr(irc_idt_shd.g_old_rec.how_to_apply_c);
124: irc_idt_shd.g_old_rec.image_url
125: :=dbms_lob.substr(irc_idt_shd.g_old_rec.image_url_c);
126: irc_idt_shd.g_old_rec.image_url_alt
119: :=dbms_lob.substr(irc_idt_shd.g_old_rec.job_requirements_c);
120: irc_idt_shd.g_old_rec.additional_details
121: :=dbms_lob.substr(irc_idt_shd.g_old_rec.additional_details_c);
122: irc_idt_shd.g_old_rec.how_to_apply
123: :=dbms_lob.substr(irc_idt_shd.g_old_rec.how_to_apply_c);
124: irc_idt_shd.g_old_rec.image_url
125: :=dbms_lob.substr(irc_idt_shd.g_old_rec.image_url_c);
126: irc_idt_shd.g_old_rec.image_url_alt
127: :=dbms_lob.substr(irc_idt_shd.g_old_rec.image_url_alt_c);
120: irc_idt_shd.g_old_rec.additional_details
121: :=dbms_lob.substr(irc_idt_shd.g_old_rec.additional_details_c);
122: irc_idt_shd.g_old_rec.how_to_apply
123: :=dbms_lob.substr(irc_idt_shd.g_old_rec.how_to_apply_c);
124: irc_idt_shd.g_old_rec.image_url
125: :=dbms_lob.substr(irc_idt_shd.g_old_rec.image_url_c);
126: irc_idt_shd.g_old_rec.image_url_alt
127: :=dbms_lob.substr(irc_idt_shd.g_old_rec.image_url_alt_c);
128: l_fct_ret := true;
121: :=dbms_lob.substr(irc_idt_shd.g_old_rec.additional_details_c);
122: irc_idt_shd.g_old_rec.how_to_apply
123: :=dbms_lob.substr(irc_idt_shd.g_old_rec.how_to_apply_c);
124: irc_idt_shd.g_old_rec.image_url
125: :=dbms_lob.substr(irc_idt_shd.g_old_rec.image_url_c);
126: irc_idt_shd.g_old_rec.image_url_alt
127: :=dbms_lob.substr(irc_idt_shd.g_old_rec.image_url_alt_c);
128: l_fct_ret := true;
129: End If;
122: irc_idt_shd.g_old_rec.how_to_apply
123: :=dbms_lob.substr(irc_idt_shd.g_old_rec.how_to_apply_c);
124: irc_idt_shd.g_old_rec.image_url
125: :=dbms_lob.substr(irc_idt_shd.g_old_rec.image_url_c);
126: irc_idt_shd.g_old_rec.image_url_alt
127: :=dbms_lob.substr(irc_idt_shd.g_old_rec.image_url_alt_c);
128: l_fct_ret := true;
129: End If;
130: End If;
123: :=dbms_lob.substr(irc_idt_shd.g_old_rec.how_to_apply_c);
124: irc_idt_shd.g_old_rec.image_url
125: :=dbms_lob.substr(irc_idt_shd.g_old_rec.image_url_c);
126: irc_idt_shd.g_old_rec.image_url_alt
127: :=dbms_lob.substr(irc_idt_shd.g_old_rec.image_url_alt_c);
128: l_fct_ret := true;
129: End If;
130: End If;
131: Return (l_fct_ret);
187: ,p_argument_value => p_language
188: );
189: --
190: Open C_Sel1;
191: Fetch C_Sel1 Into irc_idt_shd.g_old_rec;
192: If C_Sel1%notfound then
193: Close C_Sel1;
194: --
195: -- The primary key is invalid therefore we must error
197: fnd_message.set_name('PAY', 'HR_7220_INVALID_PRIMARY_KEY');
198: fnd_message.raise_error;
199: End If;
200: Close C_Sel1;
201: irc_idt_shd.g_old_rec.org_description
202: :=dbms_lob.substr(irc_idt_shd.g_old_rec.org_description_c);
203: irc_idt_shd.g_old_rec.brief_description
204: :=dbms_lob.substr(irc_idt_shd.g_old_rec.brief_description_c);
205: irc_idt_shd.g_old_rec.detailed_description
198: fnd_message.raise_error;
199: End If;
200: Close C_Sel1;
201: irc_idt_shd.g_old_rec.org_description
202: :=dbms_lob.substr(irc_idt_shd.g_old_rec.org_description_c);
203: irc_idt_shd.g_old_rec.brief_description
204: :=dbms_lob.substr(irc_idt_shd.g_old_rec.brief_description_c);
205: irc_idt_shd.g_old_rec.detailed_description
206: :=dbms_lob.substr(irc_idt_shd.g_old_rec.detailed_description_c);
199: End If;
200: Close C_Sel1;
201: irc_idt_shd.g_old_rec.org_description
202: :=dbms_lob.substr(irc_idt_shd.g_old_rec.org_description_c);
203: irc_idt_shd.g_old_rec.brief_description
204: :=dbms_lob.substr(irc_idt_shd.g_old_rec.brief_description_c);
205: irc_idt_shd.g_old_rec.detailed_description
206: :=dbms_lob.substr(irc_idt_shd.g_old_rec.detailed_description_c);
207: irc_idt_shd.g_old_rec.job_requirements
200: Close C_Sel1;
201: irc_idt_shd.g_old_rec.org_description
202: :=dbms_lob.substr(irc_idt_shd.g_old_rec.org_description_c);
203: irc_idt_shd.g_old_rec.brief_description
204: :=dbms_lob.substr(irc_idt_shd.g_old_rec.brief_description_c);
205: irc_idt_shd.g_old_rec.detailed_description
206: :=dbms_lob.substr(irc_idt_shd.g_old_rec.detailed_description_c);
207: irc_idt_shd.g_old_rec.job_requirements
208: :=dbms_lob.substr(irc_idt_shd.g_old_rec.job_requirements_c);
201: irc_idt_shd.g_old_rec.org_description
202: :=dbms_lob.substr(irc_idt_shd.g_old_rec.org_description_c);
203: irc_idt_shd.g_old_rec.brief_description
204: :=dbms_lob.substr(irc_idt_shd.g_old_rec.brief_description_c);
205: irc_idt_shd.g_old_rec.detailed_description
206: :=dbms_lob.substr(irc_idt_shd.g_old_rec.detailed_description_c);
207: irc_idt_shd.g_old_rec.job_requirements
208: :=dbms_lob.substr(irc_idt_shd.g_old_rec.job_requirements_c);
209: irc_idt_shd.g_old_rec.additional_details
202: :=dbms_lob.substr(irc_idt_shd.g_old_rec.org_description_c);
203: irc_idt_shd.g_old_rec.brief_description
204: :=dbms_lob.substr(irc_idt_shd.g_old_rec.brief_description_c);
205: irc_idt_shd.g_old_rec.detailed_description
206: :=dbms_lob.substr(irc_idt_shd.g_old_rec.detailed_description_c);
207: irc_idt_shd.g_old_rec.job_requirements
208: :=dbms_lob.substr(irc_idt_shd.g_old_rec.job_requirements_c);
209: irc_idt_shd.g_old_rec.additional_details
210: :=dbms_lob.substr(irc_idt_shd.g_old_rec.additional_details_c);
203: irc_idt_shd.g_old_rec.brief_description
204: :=dbms_lob.substr(irc_idt_shd.g_old_rec.brief_description_c);
205: irc_idt_shd.g_old_rec.detailed_description
206: :=dbms_lob.substr(irc_idt_shd.g_old_rec.detailed_description_c);
207: irc_idt_shd.g_old_rec.job_requirements
208: :=dbms_lob.substr(irc_idt_shd.g_old_rec.job_requirements_c);
209: irc_idt_shd.g_old_rec.additional_details
210: :=dbms_lob.substr(irc_idt_shd.g_old_rec.additional_details_c);
211: irc_idt_shd.g_old_rec.how_to_apply
204: :=dbms_lob.substr(irc_idt_shd.g_old_rec.brief_description_c);
205: irc_idt_shd.g_old_rec.detailed_description
206: :=dbms_lob.substr(irc_idt_shd.g_old_rec.detailed_description_c);
207: irc_idt_shd.g_old_rec.job_requirements
208: :=dbms_lob.substr(irc_idt_shd.g_old_rec.job_requirements_c);
209: irc_idt_shd.g_old_rec.additional_details
210: :=dbms_lob.substr(irc_idt_shd.g_old_rec.additional_details_c);
211: irc_idt_shd.g_old_rec.how_to_apply
212: :=dbms_lob.substr(irc_idt_shd.g_old_rec.how_to_apply_c);
205: irc_idt_shd.g_old_rec.detailed_description
206: :=dbms_lob.substr(irc_idt_shd.g_old_rec.detailed_description_c);
207: irc_idt_shd.g_old_rec.job_requirements
208: :=dbms_lob.substr(irc_idt_shd.g_old_rec.job_requirements_c);
209: irc_idt_shd.g_old_rec.additional_details
210: :=dbms_lob.substr(irc_idt_shd.g_old_rec.additional_details_c);
211: irc_idt_shd.g_old_rec.how_to_apply
212: :=dbms_lob.substr(irc_idt_shd.g_old_rec.how_to_apply_c);
213: irc_idt_shd.g_old_rec.image_url
206: :=dbms_lob.substr(irc_idt_shd.g_old_rec.detailed_description_c);
207: irc_idt_shd.g_old_rec.job_requirements
208: :=dbms_lob.substr(irc_idt_shd.g_old_rec.job_requirements_c);
209: irc_idt_shd.g_old_rec.additional_details
210: :=dbms_lob.substr(irc_idt_shd.g_old_rec.additional_details_c);
211: irc_idt_shd.g_old_rec.how_to_apply
212: :=dbms_lob.substr(irc_idt_shd.g_old_rec.how_to_apply_c);
213: irc_idt_shd.g_old_rec.image_url
214: :=dbms_lob.substr(irc_idt_shd.g_old_rec.image_url_c);
207: irc_idt_shd.g_old_rec.job_requirements
208: :=dbms_lob.substr(irc_idt_shd.g_old_rec.job_requirements_c);
209: irc_idt_shd.g_old_rec.additional_details
210: :=dbms_lob.substr(irc_idt_shd.g_old_rec.additional_details_c);
211: irc_idt_shd.g_old_rec.how_to_apply
212: :=dbms_lob.substr(irc_idt_shd.g_old_rec.how_to_apply_c);
213: irc_idt_shd.g_old_rec.image_url
214: :=dbms_lob.substr(irc_idt_shd.g_old_rec.image_url_c);
215: irc_idt_shd.g_old_rec.image_url_alt
208: :=dbms_lob.substr(irc_idt_shd.g_old_rec.job_requirements_c);
209: irc_idt_shd.g_old_rec.additional_details
210: :=dbms_lob.substr(irc_idt_shd.g_old_rec.additional_details_c);
211: irc_idt_shd.g_old_rec.how_to_apply
212: :=dbms_lob.substr(irc_idt_shd.g_old_rec.how_to_apply_c);
213: irc_idt_shd.g_old_rec.image_url
214: :=dbms_lob.substr(irc_idt_shd.g_old_rec.image_url_c);
215: irc_idt_shd.g_old_rec.image_url_alt
216: :=dbms_lob.substr(irc_idt_shd.g_old_rec.image_url_alt_c);
209: irc_idt_shd.g_old_rec.additional_details
210: :=dbms_lob.substr(irc_idt_shd.g_old_rec.additional_details_c);
211: irc_idt_shd.g_old_rec.how_to_apply
212: :=dbms_lob.substr(irc_idt_shd.g_old_rec.how_to_apply_c);
213: irc_idt_shd.g_old_rec.image_url
214: :=dbms_lob.substr(irc_idt_shd.g_old_rec.image_url_c);
215: irc_idt_shd.g_old_rec.image_url_alt
216: :=dbms_lob.substr(irc_idt_shd.g_old_rec.image_url_alt_c);
217: --
210: :=dbms_lob.substr(irc_idt_shd.g_old_rec.additional_details_c);
211: irc_idt_shd.g_old_rec.how_to_apply
212: :=dbms_lob.substr(irc_idt_shd.g_old_rec.how_to_apply_c);
213: irc_idt_shd.g_old_rec.image_url
214: :=dbms_lob.substr(irc_idt_shd.g_old_rec.image_url_c);
215: irc_idt_shd.g_old_rec.image_url_alt
216: :=dbms_lob.substr(irc_idt_shd.g_old_rec.image_url_alt_c);
217: --
218: --
211: irc_idt_shd.g_old_rec.how_to_apply
212: :=dbms_lob.substr(irc_idt_shd.g_old_rec.how_to_apply_c);
213: irc_idt_shd.g_old_rec.image_url
214: :=dbms_lob.substr(irc_idt_shd.g_old_rec.image_url_c);
215: irc_idt_shd.g_old_rec.image_url_alt
216: :=dbms_lob.substr(irc_idt_shd.g_old_rec.image_url_alt_c);
217: --
218: --
219: hr_utility.set_location(' Leaving:'||l_proc, 10);
212: :=dbms_lob.substr(irc_idt_shd.g_old_rec.how_to_apply_c);
213: irc_idt_shd.g_old_rec.image_url
214: :=dbms_lob.substr(irc_idt_shd.g_old_rec.image_url_c);
215: irc_idt_shd.g_old_rec.image_url_alt
216: :=dbms_lob.substr(irc_idt_shd.g_old_rec.image_url_alt_c);
217: --
218: --
219: hr_utility.set_location(' Leaving:'||l_proc, 10);
220: --
388: -- ----------------------------------------------------------------------------
389: -- |------------------------------< clob_dml >--------------------------------|
390: -- ----------------------------------------------------------------------------
391: Procedure clob_dml
392: (p_rec in out nocopy irc_idt_shd.g_rec_type
393: ,p_api_updating boolean
394: ) is
395: --
396: l_proc varchar2(72) := g_package||'clob_dml';
568: Exception
569: When hr_api.check_integrity_violated Then
570: -- A check constraint has been violated
571: --
572: irc_idt_shd.constraint_error
573: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
574: When hr_api.parent_integrity_violated Then
575: -- Parent integrity has been violated
576: --
573: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
574: When hr_api.parent_integrity_violated Then
575: -- Parent integrity has been violated
576: --
577: irc_idt_shd.constraint_error
578: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
579: When hr_api.unique_integrity_violated Then
580: -- Unique integrity has been violated
581: --
578: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
579: When hr_api.unique_integrity_violated Then
580: -- Unique integrity has been violated
581: --
582: irc_idt_shd.constraint_error
583: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
584: When Others Then
585: --
586: Raise;
585: --
586: Raise;
587: End clob_dml;
588: --
589: end irc_idt_shd;