22: --
23: l_proc varchar2(72) := g_package||'set_base_key_value';
24: --
25: Begin
26: hr_utility.set_location('Entering:'||l_proc, 10);
27: --
28: pqh_tcd_ins.g_document_id_i := p_document_id;
29: pqh_tcd_ins.g_transaction_category_id_i := p_transaction_category_id;
30: --
27: --
28: pqh_tcd_ins.g_document_id_i := p_document_id;
29: pqh_tcd_ins.g_transaction_category_id_i := p_transaction_category_id;
30: --
31: hr_utility.set_location(' Leaving:'||l_proc, 20);
32: End set_base_key_value;
33: --
34: --
35: -- ----------------------------------------------------------------------------
81: --
82: l_proc varchar2(72) := g_package||'insert_dml';
83: --
84: Begin
85: hr_utility.set_location('Entering:'||l_proc, 5);
86: p_rec.object_version_number := 1; -- Initialise the object version
87: --
88: --
89: --
103: );
104: --
105: --
106: --
107: hr_utility.set_location(' Leaving:'||l_proc, 10);
108: Exception
109: When hr_api.check_integrity_violated Then
110: -- A check constraint has been violated
111: --
178: l_proc varchar2(72) := g_package||'pre_insert';
179: l_exists varchar2(1);
180: --
181: Begin
182: hr_utility.set_location('Entering:'||l_proc, 5);
183: --
184: If (pqh_tcd_ins.g_document_id_i is not null or
185: pqh_tcd_ins.g_transaction_category_id_i is not null) Then
186: --
208: pqh_tcd_ins.g_transaction_category_id_i;
209: pqh_tcd_ins.g_transaction_category_id_i := null;
210: End If;
211: --
212: hr_utility.set_location(' Leaving:'||l_proc, 10);
213: End pre_insert;
214: --
215: -- ----------------------------------------------------------------------------
216: -- |-----------------------------< post_insert >------------------------------|
251: --
252: l_proc varchar2(72) := g_package||'post_insert';
253: --
254: Begin
255: hr_utility.set_location('Entering:'||l_proc, 5);
256: begin
257: --
258: pqh_tcd_rki.after_insert
259: (p_effective_date => p_effective_date
276: ,p_hook_type => 'AI');
277: --
278: end;
279: --
280: hr_utility.set_location(' Leaving:'||l_proc, 10);
281: End post_insert;
282: --
283: -- ----------------------------------------------------------------------------
284: -- |---------------------------------< ins >----------------------------------|
290: --
291: l_proc varchar2(72) := g_package||'ins';
292: --
293: Begin
294: hr_utility.set_location('Entering:'||l_proc, 5);
295: --
296: -- Call the supporting insert validate operations
297: --
298: pqh_tcd_bus.insert_validate
320: --
321: -- Call to raise any errors on multi-message list
322: hr_multi_message.end_validation_set;
323: --
324: hr_utility.set_location('Leaving:'||l_proc, 20);
325: end ins;
326: --
327: -- ----------------------------------------------------------------------------
328: -- |---------------------------------< ins >----------------------------------|
338: l_rec pqh_tcd_shd.g_rec_type;
339: l_proc varchar2(72) := g_package||'ins';
340: --
341: Begin
342: hr_utility.set_location('Entering:'||l_proc, 5);
343: --
344: -- Call conversion function to turn arguments into the
345: -- p_rec structure.
346: --
361: );
362: --
363: p_object_version_number := l_rec.object_version_number;
364: --
365: hr_utility.set_location(' Leaving:'||l_proc, 10);
366: End ins;
367: --
368: end pqh_tcd_ins;