DBA Data[Home] [Help]

APPS.OTA_THG_UPD dependencies on OTA_THG_SHD

Line 55: (p_rec in out nocopy ota_thg_shd.g_rec_type

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

Line 90: ota_thg_shd.constraint_error

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

Line 95: ota_thg_shd.constraint_error

91: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
92: When hr_api.parent_integrity_violated Then
93: -- Parent integrity has been violated
94: --
95: ota_thg_shd.constraint_error
96: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
97: When hr_api.unique_integrity_violated Then
98: -- Unique integrity has been violated
99: --

Line 100: ota_thg_shd.constraint_error

96: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
97: When hr_api.unique_integrity_violated Then
98: -- Unique integrity has been violated
99: --
100: ota_thg_shd.constraint_error
101: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
102: When Others Then
103: --
104: Raise;

Line 140: (p_rec in ota_thg_shd.g_rec_type

136: --
137: -- {End Of Comments}
138: -- ----------------------------------------------------------------------------
139: Procedure pre_update
140: (p_rec in ota_thg_shd.g_rec_type
141: ) is
142: --
143: l_proc varchar2(72) := g_package||'pre_update';
144: --

Line 185: ,p_rec in ota_thg_shd.g_rec_type

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

Line 213: => ota_thg_shd.g_old_rec.cross_charge_id

209: => p_rec.hr_cost_segment
210: ,p_object_version_number
211: => p_rec.object_version_number
212: ,p_cross_charge_id_o
213: => ota_thg_shd.g_old_rec.cross_charge_id
214: ,p_segment_o
215: => ota_thg_shd.g_old_rec.segment
216: ,p_segment_num_o
217: => ota_thg_shd.g_old_rec.segment_num

Line 215: => ota_thg_shd.g_old_rec.segment

211: => p_rec.object_version_number
212: ,p_cross_charge_id_o
213: => ota_thg_shd.g_old_rec.cross_charge_id
214: ,p_segment_o
215: => ota_thg_shd.g_old_rec.segment
216: ,p_segment_num_o
217: => ota_thg_shd.g_old_rec.segment_num
218: ,p_hr_data_source_o
219: => ota_thg_shd.g_old_rec.hr_data_source

Line 217: => ota_thg_shd.g_old_rec.segment_num

213: => ota_thg_shd.g_old_rec.cross_charge_id
214: ,p_segment_o
215: => ota_thg_shd.g_old_rec.segment
216: ,p_segment_num_o
217: => ota_thg_shd.g_old_rec.segment_num
218: ,p_hr_data_source_o
219: => ota_thg_shd.g_old_rec.hr_data_source
220: ,p_constant_o
221: => ota_thg_shd.g_old_rec.constant

Line 219: => ota_thg_shd.g_old_rec.hr_data_source

215: => ota_thg_shd.g_old_rec.segment
216: ,p_segment_num_o
217: => ota_thg_shd.g_old_rec.segment_num
218: ,p_hr_data_source_o
219: => ota_thg_shd.g_old_rec.hr_data_source
220: ,p_constant_o
221: => ota_thg_shd.g_old_rec.constant
222: ,p_hr_cost_segment_o
223: => ota_thg_shd.g_old_rec.hr_cost_segment

Line 221: => ota_thg_shd.g_old_rec.constant

217: => ota_thg_shd.g_old_rec.segment_num
218: ,p_hr_data_source_o
219: => ota_thg_shd.g_old_rec.hr_data_source
220: ,p_constant_o
221: => ota_thg_shd.g_old_rec.constant
222: ,p_hr_cost_segment_o
223: => ota_thg_shd.g_old_rec.hr_cost_segment
224: ,p_object_version_number_o
225: => ota_thg_shd.g_old_rec.object_version_number

Line 223: => ota_thg_shd.g_old_rec.hr_cost_segment

219: => ota_thg_shd.g_old_rec.hr_data_source
220: ,p_constant_o
221: => ota_thg_shd.g_old_rec.constant
222: ,p_hr_cost_segment_o
223: => ota_thg_shd.g_old_rec.hr_cost_segment
224: ,p_object_version_number_o
225: => ota_thg_shd.g_old_rec.object_version_number
226: );
227: --

Line 225: => ota_thg_shd.g_old_rec.object_version_number

221: => ota_thg_shd.g_old_rec.constant
222: ,p_hr_cost_segment_o
223: => ota_thg_shd.g_old_rec.hr_cost_segment
224: ,p_object_version_number_o
225: => ota_thg_shd.g_old_rec.object_version_number
226: );
227: --
228: exception
229: --

Line 285: (p_rec in out nocopy ota_thg_shd.g_rec_type

281: --
282: -- {End Of Comments}
283: -- ----------------------------------------------------------------------------
284: Procedure convert_defs
285: (p_rec in out nocopy ota_thg_shd.g_rec_type
286: ) is
287: --
288: Begin
289: --

Line 297: ota_thg_shd.g_old_rec.cross_charge_id;

293: -- is being used then we must set to the 'current' argument value.
294: --
295: If (p_rec.cross_charge_id = hr_api.g_number) then
296: p_rec.cross_charge_id :=
297: ota_thg_shd.g_old_rec.cross_charge_id;
298: End If;
299: If (p_rec.segment = hr_api.g_varchar2) then
300: p_rec.segment :=
301: ota_thg_shd.g_old_rec.segment;

Line 301: ota_thg_shd.g_old_rec.segment;

297: ota_thg_shd.g_old_rec.cross_charge_id;
298: End If;
299: If (p_rec.segment = hr_api.g_varchar2) then
300: p_rec.segment :=
301: ota_thg_shd.g_old_rec.segment;
302: End If;
303: If (p_rec.segment_num = hr_api.g_number) then
304: p_rec.segment_num :=
305: ota_thg_shd.g_old_rec.segment_num;

Line 305: ota_thg_shd.g_old_rec.segment_num;

301: ota_thg_shd.g_old_rec.segment;
302: End If;
303: If (p_rec.segment_num = hr_api.g_number) then
304: p_rec.segment_num :=
305: ota_thg_shd.g_old_rec.segment_num;
306: End If;
307: If (p_rec.hr_data_source = hr_api.g_varchar2) then
308: p_rec.hr_data_source :=
309: ota_thg_shd.g_old_rec.hr_data_source;

Line 309: ota_thg_shd.g_old_rec.hr_data_source;

305: ota_thg_shd.g_old_rec.segment_num;
306: End If;
307: If (p_rec.hr_data_source = hr_api.g_varchar2) then
308: p_rec.hr_data_source :=
309: ota_thg_shd.g_old_rec.hr_data_source;
310: End If;
311: If (p_rec.constant = hr_api.g_varchar2) then
312: p_rec.constant :=
313: ota_thg_shd.g_old_rec.constant;

Line 313: ota_thg_shd.g_old_rec.constant;

309: ota_thg_shd.g_old_rec.hr_data_source;
310: End If;
311: If (p_rec.constant = hr_api.g_varchar2) then
312: p_rec.constant :=
313: ota_thg_shd.g_old_rec.constant;
314: End If;
315: If (p_rec.hr_cost_segment = hr_api.g_varchar2) then
316: p_rec.hr_cost_segment :=
317: ota_thg_shd.g_old_rec.hr_cost_segment;

Line 317: ota_thg_shd.g_old_rec.hr_cost_segment;

313: ota_thg_shd.g_old_rec.constant;
314: End If;
315: If (p_rec.hr_cost_segment = hr_api.g_varchar2) then
316: p_rec.hr_cost_segment :=
317: ota_thg_shd.g_old_rec.hr_cost_segment;
318: End If;
319: --
320: End convert_defs;
321: --

Line 327: ,p_rec in out nocopy ota_thg_shd.g_rec_type

323: -- |---------------------------------< upd >----------------------------------|
324: -- ----------------------------------------------------------------------------
325: Procedure upd
326: (p_effective_date in date
327: ,p_rec in out nocopy ota_thg_shd.g_rec_type
328: ,p_validate in boolean default false
329: ) is
330: --
331: l_proc varchar2(72) := g_package||'upd';

Line 346: ota_thg_shd.lck

342:
343: --
344: -- We must lock the row which we need to update.
345: --
346: ota_thg_shd.lck
347: (p_rec.gl_default_segment_id
348: ,p_rec.object_version_number
349: );
350: --

Line 410: l_rec ota_thg_shd.g_rec_type;

406: ,p_hr_cost_segment in varchar2 default hr_api.g_varchar2
407: ,p_validate in boolean default false
408: ) is
409: --
410: l_rec ota_thg_shd.g_rec_type;
411: l_proc varchar2(72) := g_package||'upd';
412: --
413: Begin
414: hr_utility.set_location('Entering:'||l_proc, 5);

Line 420: ota_thg_shd.convert_args

416: -- Call conversion function to turn arguments into the
417: -- l_rec structure.
418: --
419: l_rec :=
420: ota_thg_shd.convert_args
421: (p_gl_default_segment_id
422: ,p_cross_charge_id
423: ,p_segment
424: ,p_segment_num