APPS.GHR_CCL_UPD dependencies on GHR_CCL_SHD

Line 55: (p_rec in out nocopy ghr_ccl_shd.g_rec_type

51: --
52: -- {End Of Comments}
53: -- ----------------------------------------------------------------------------
54: Procedure update_dml
55: (p_rec in out nocopy ghr_ccl_shd.g_rec_type
56: ) is
57: --
58: l_proc varchar2(72) := g_package||'update_dml';
59: --

Line 93: ghr_ccl_shd.constraint_error

89: Exception
90: When hr_api.check_integrity_violated Then
91: -- A check constraint has been violated
92: --
93: ghr_ccl_shd.constraint_error
94: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
95: When hr_api.parent_integrity_violated Then
96: -- Parent integrity has been violated
97: --

Line 98: ghr_ccl_shd.constraint_error

94: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
95: When hr_api.parent_integrity_violated Then
96: -- Parent integrity has been violated
97: --
98: ghr_ccl_shd.constraint_error
99: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
100: When hr_api.unique_integrity_violated Then
101: -- Unique integrity has been violated
102: --

Line 103: ghr_ccl_shd.constraint_error

99: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
100: When hr_api.unique_integrity_violated Then
101: -- Unique integrity has been violated
102: --
103: ghr_ccl_shd.constraint_error
104: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
105: When Others Then
106: --
107: Raise;

Line 143: (p_rec in ghr_ccl_shd.g_rec_type

139: --
140: -- {End Of Comments}
141: -- ----------------------------------------------------------------------------
142: Procedure pre_update
143: (p_rec in ghr_ccl_shd.g_rec_type
144: ) is
145: --
146: l_proc varchar2(72) := g_package||'pre_update';
147: --

Line 188: ,p_rec in ghr_ccl_shd.g_rec_type

184: -- {End Of Comments}
185: -- ----------------------------------------------------------------------------
186: Procedure post_update
187: (p_effective_date in date
188: ,p_rec in ghr_ccl_shd.g_rec_type
189: ) is
190: --
191: l_proc varchar2(72) := g_package||'post_update';
192: --

Line 209: ,p_complaint_id_o => ghr_ccl_shd.g_old_rec.complaint_id

205: ,p_claim_source => p_rec.claim_source
206: ,p_agency_acceptance => p_rec.agency_acceptance
207: ,p_aj_acceptance => p_rec.aj_acceptance
208: ,p_agency_appeal => p_rec.agency_appeal
209: ,p_complaint_id_o => ghr_ccl_shd.g_old_rec.complaint_id
210: ,p_claim_o => ghr_ccl_shd.g_old_rec.claim
211: ,p_incident_date_o => ghr_ccl_shd.g_old_rec.incident_date
212: ,p_phase_o => ghr_ccl_shd.g_old_rec.phase
213: ,p_mixed_flag_o => ghr_ccl_shd.g_old_rec.mixed_flag

Line 210: ,p_claim_o => ghr_ccl_shd.g_old_rec.claim

206: ,p_agency_acceptance => p_rec.agency_acceptance
207: ,p_aj_acceptance => p_rec.aj_acceptance
208: ,p_agency_appeal => p_rec.agency_appeal
209: ,p_complaint_id_o => ghr_ccl_shd.g_old_rec.complaint_id
210: ,p_claim_o => ghr_ccl_shd.g_old_rec.claim
211: ,p_incident_date_o => ghr_ccl_shd.g_old_rec.incident_date
212: ,p_phase_o => ghr_ccl_shd.g_old_rec.phase
213: ,p_mixed_flag_o => ghr_ccl_shd.g_old_rec.mixed_flag
214: ,p_claim_source_o => ghr_ccl_shd.g_old_rec.claim_source

Line 211: ,p_incident_date_o => ghr_ccl_shd.g_old_rec.incident_date

207: ,p_aj_acceptance => p_rec.aj_acceptance
208: ,p_agency_appeal => p_rec.agency_appeal
209: ,p_complaint_id_o => ghr_ccl_shd.g_old_rec.complaint_id
210: ,p_claim_o => ghr_ccl_shd.g_old_rec.claim
211: ,p_incident_date_o => ghr_ccl_shd.g_old_rec.incident_date
212: ,p_phase_o => ghr_ccl_shd.g_old_rec.phase
213: ,p_mixed_flag_o => ghr_ccl_shd.g_old_rec.mixed_flag
214: ,p_claim_source_o => ghr_ccl_shd.g_old_rec.claim_source
215: ,p_agency_acceptance_o => ghr_ccl_shd.g_old_rec.agency_acceptance

Line 212: ,p_phase_o => ghr_ccl_shd.g_old_rec.phase

208: ,p_agency_appeal => p_rec.agency_appeal
209: ,p_complaint_id_o => ghr_ccl_shd.g_old_rec.complaint_id
210: ,p_claim_o => ghr_ccl_shd.g_old_rec.claim
211: ,p_incident_date_o => ghr_ccl_shd.g_old_rec.incident_date
212: ,p_phase_o => ghr_ccl_shd.g_old_rec.phase
213: ,p_mixed_flag_o => ghr_ccl_shd.g_old_rec.mixed_flag
214: ,p_claim_source_o => ghr_ccl_shd.g_old_rec.claim_source
215: ,p_agency_acceptance_o => ghr_ccl_shd.g_old_rec.agency_acceptance
216: ,p_aj_acceptance_o => ghr_ccl_shd.g_old_rec.aj_acceptance

Line 213: ,p_mixed_flag_o => ghr_ccl_shd.g_old_rec.mixed_flag

209: ,p_complaint_id_o => ghr_ccl_shd.g_old_rec.complaint_id
210: ,p_claim_o => ghr_ccl_shd.g_old_rec.claim
211: ,p_incident_date_o => ghr_ccl_shd.g_old_rec.incident_date
212: ,p_phase_o => ghr_ccl_shd.g_old_rec.phase
213: ,p_mixed_flag_o => ghr_ccl_shd.g_old_rec.mixed_flag
214: ,p_claim_source_o => ghr_ccl_shd.g_old_rec.claim_source
215: ,p_agency_acceptance_o => ghr_ccl_shd.g_old_rec.agency_acceptance
216: ,p_aj_acceptance_o => ghr_ccl_shd.g_old_rec.aj_acceptance
217: ,p_agency_appeal_o => ghr_ccl_shd.g_old_rec.agency_appeal

Line 214: ,p_claim_source_o => ghr_ccl_shd.g_old_rec.claim_source

210: ,p_claim_o => ghr_ccl_shd.g_old_rec.claim
211: ,p_incident_date_o => ghr_ccl_shd.g_old_rec.incident_date
212: ,p_phase_o => ghr_ccl_shd.g_old_rec.phase
213: ,p_mixed_flag_o => ghr_ccl_shd.g_old_rec.mixed_flag
214: ,p_claim_source_o => ghr_ccl_shd.g_old_rec.claim_source
215: ,p_agency_acceptance_o => ghr_ccl_shd.g_old_rec.agency_acceptance
216: ,p_aj_acceptance_o => ghr_ccl_shd.g_old_rec.aj_acceptance
217: ,p_agency_appeal_o => ghr_ccl_shd.g_old_rec.agency_appeal
218: );

Line 215: ,p_agency_acceptance_o => ghr_ccl_shd.g_old_rec.agency_acceptance

211: ,p_incident_date_o => ghr_ccl_shd.g_old_rec.incident_date
212: ,p_phase_o => ghr_ccl_shd.g_old_rec.phase
213: ,p_mixed_flag_o => ghr_ccl_shd.g_old_rec.mixed_flag
214: ,p_claim_source_o => ghr_ccl_shd.g_old_rec.claim_source
215: ,p_agency_acceptance_o => ghr_ccl_shd.g_old_rec.agency_acceptance
216: ,p_aj_acceptance_o => ghr_ccl_shd.g_old_rec.aj_acceptance
217: ,p_agency_appeal_o => ghr_ccl_shd.g_old_rec.agency_appeal
218: );
219: --

Line 216: ,p_aj_acceptance_o => ghr_ccl_shd.g_old_rec.aj_acceptance

212: ,p_phase_o => ghr_ccl_shd.g_old_rec.phase
213: ,p_mixed_flag_o => ghr_ccl_shd.g_old_rec.mixed_flag
214: ,p_claim_source_o => ghr_ccl_shd.g_old_rec.claim_source
215: ,p_agency_acceptance_o => ghr_ccl_shd.g_old_rec.agency_acceptance
216: ,p_aj_acceptance_o => ghr_ccl_shd.g_old_rec.aj_acceptance
217: ,p_agency_appeal_o => ghr_ccl_shd.g_old_rec.agency_appeal
218: );
219: --
220: exception

Line 217: ,p_agency_appeal_o => ghr_ccl_shd.g_old_rec.agency_appeal

213: ,p_mixed_flag_o => ghr_ccl_shd.g_old_rec.mixed_flag
214: ,p_claim_source_o => ghr_ccl_shd.g_old_rec.claim_source
215: ,p_agency_acceptance_o => ghr_ccl_shd.g_old_rec.agency_acceptance
216: ,p_aj_acceptance_o => ghr_ccl_shd.g_old_rec.aj_acceptance
217: ,p_agency_appeal_o => ghr_ccl_shd.g_old_rec.agency_appeal
218: );
219: --
220: exception
221: --

Line 277: (p_rec in out nocopy ghr_ccl_shd.g_rec_type

273: --
274: -- {End Of Comments}
275: -- ----------------------------------------------------------------------------
276: Procedure convert_defs
277: (p_rec in out nocopy ghr_ccl_shd.g_rec_type
278: ) is
279: --
280: Begin
281: --

Line 289: ghr_ccl_shd.g_old_rec.complaint_id;

285: -- is being used then we must set to the 'current' argument value.
286: --
287: If (p_rec.complaint_id = hr_api.g_number) then
288: p_rec.complaint_id :=
289: ghr_ccl_shd.g_old_rec.complaint_id;
290: End If;
291: If (p_rec.claim = hr_api.g_varchar2) then
292: p_rec.claim :=
293: ghr_ccl_shd.g_old_rec.claim;

Line 293: ghr_ccl_shd.g_old_rec.claim;

289: ghr_ccl_shd.g_old_rec.complaint_id;
290: End If;
291: If (p_rec.claim = hr_api.g_varchar2) then
292: p_rec.claim :=
293: ghr_ccl_shd.g_old_rec.claim;
294: End If;
295: If (p_rec.incident_date = hr_api.g_date) then
296: p_rec.incident_date :=
297: ghr_ccl_shd.g_old_rec.incident_date;

Line 297: ghr_ccl_shd.g_old_rec.incident_date;

293: ghr_ccl_shd.g_old_rec.claim;
294: End If;
295: If (p_rec.incident_date = hr_api.g_date) then
296: p_rec.incident_date :=
297: ghr_ccl_shd.g_old_rec.incident_date;
298: End If;
299: If (p_rec.phase = hr_api.g_varchar2) then
300: p_rec.phase :=
301: ghr_ccl_shd.g_old_rec.phase;

Line 301: ghr_ccl_shd.g_old_rec.phase;

297: ghr_ccl_shd.g_old_rec.incident_date;
298: End If;
299: If (p_rec.phase = hr_api.g_varchar2) then
300: p_rec.phase :=
301: ghr_ccl_shd.g_old_rec.phase;
302: End If;
303: If (p_rec.mixed_flag = hr_api.g_varchar2) then
304: p_rec.mixed_flag :=
305: ghr_ccl_shd.g_old_rec.mixed_flag;

Line 305: ghr_ccl_shd.g_old_rec.mixed_flag;

301: ghr_ccl_shd.g_old_rec.phase;
302: End If;
303: If (p_rec.mixed_flag = hr_api.g_varchar2) then
304: p_rec.mixed_flag :=
305: ghr_ccl_shd.g_old_rec.mixed_flag;
306: End If;
307: If (p_rec.claim_source = hr_api.g_varchar2) then
308: p_rec.claim_source :=
309: ghr_ccl_shd.g_old_rec.claim_source;

Line 309: ghr_ccl_shd.g_old_rec.claim_source;

305: ghr_ccl_shd.g_old_rec.mixed_flag;
306: End If;
307: If (p_rec.claim_source = hr_api.g_varchar2) then
308: p_rec.claim_source :=
309: ghr_ccl_shd.g_old_rec.claim_source;
310: End If;
311: If (p_rec.agency_acceptance = hr_api.g_varchar2) then
312: p_rec.agency_acceptance :=
313: ghr_ccl_shd.g_old_rec.agency_acceptance;

Line 313: ghr_ccl_shd.g_old_rec.agency_acceptance;

309: ghr_ccl_shd.g_old_rec.claim_source;
310: End If;
311: If (p_rec.agency_acceptance = hr_api.g_varchar2) then
312: p_rec.agency_acceptance :=
313: ghr_ccl_shd.g_old_rec.agency_acceptance;
314: End If;
315: If (p_rec.aj_acceptance = hr_api.g_varchar2) then
316: p_rec.aj_acceptance :=
317: ghr_ccl_shd.g_old_rec.aj_acceptance;

Line 317: ghr_ccl_shd.g_old_rec.aj_acceptance;

313: ghr_ccl_shd.g_old_rec.agency_acceptance;
314: End If;
315: If (p_rec.aj_acceptance = hr_api.g_varchar2) then
316: p_rec.aj_acceptance :=
317: ghr_ccl_shd.g_old_rec.aj_acceptance;
318: End If;
319: If (p_rec.agency_appeal = hr_api.g_varchar2) then
320: p_rec.agency_appeal :=
321: ghr_ccl_shd.g_old_rec.agency_appeal;

Line 321: ghr_ccl_shd.g_old_rec.agency_appeal;

317: ghr_ccl_shd.g_old_rec.aj_acceptance;
318: End If;
319: If (p_rec.agency_appeal = hr_api.g_varchar2) then
320: p_rec.agency_appeal :=
321: ghr_ccl_shd.g_old_rec.agency_appeal;
322: End If;
323: If (p_rec.object_version_number = hr_api.g_number) then
324: p_rec.object_version_number :=
325: ghr_ccl_shd.g_old_rec.object_version_number;

Line 325: ghr_ccl_shd.g_old_rec.object_version_number;

321: ghr_ccl_shd.g_old_rec.agency_appeal;
322: End If;
323: If (p_rec.object_version_number = hr_api.g_number) then
324: p_rec.object_version_number :=
325: ghr_ccl_shd.g_old_rec.object_version_number;
326: End If;
327: --
328: End convert_defs;
329: --

Line 335: ,p_rec in out nocopy ghr_ccl_shd.g_rec_type

331: -- |---------------------------------< upd >----------------------------------|
332: -- ----------------------------------------------------------------------------
333: Procedure upd
334: (p_effective_date in date
335: ,p_rec in out nocopy ghr_ccl_shd.g_rec_type
336: ) is
337: --
338: l_proc varchar2(72) := g_package||'upd';
339: --

Line 345: ghr_ccl_shd.lck

341: hr_utility.set_location('Entering:'||l_proc, 5);
342: --
343: -- We must lock the row which we need to update.
344: --
345: ghr_ccl_shd.lck
346: (p_rec.compl_claim_id
347: ,p_rec.object_version_number
348: );
349: --

Line 396: l_rec ghr_ccl_shd.g_rec_type;

392: ,p_aj_acceptance in varchar2 default hr_api.g_varchar2
393: ,p_agency_appeal in varchar2 default hr_api.g_varchar2
394: ) is
395: --
396: l_rec ghr_ccl_shd.g_rec_type;
397: l_proc varchar2(72) := g_package||'upd';
398: --
399: Begin
400: hr_utility.set_location('Entering:'||l_proc, 5);

Line 406: ghr_ccl_shd.convert_args

402: -- Call conversion function to turn arguments into the
403: -- l_rec structure.
404: --
405: l_rec :=
406: ghr_ccl_shd.convert_args
407: (p_compl_claim_id
408: ,p_complaint_id
409: ,p_claim
410: ,p_incident_date