[Home] [Help]
1: Package Body pqh_tjr_ins as
2: /* $Header: pqtjrrhi.pkb 115.3 2002/12/12 21:47:19 rpasapul noship $ */
3: --
4: -- ----------------------------------------------------------------------------
5: -- | Private Global Definitions |
4: -- ----------------------------------------------------------------------------
5: -- | Private Global Definitions |
6: -- ----------------------------------------------------------------------------
7: --
8: g_package varchar2(33) := ' pqh_tjr_ins.'; -- Global package name
9: --
10: -- ----------------------------------------------------------------------------
11: -- |------------------------------< insert_dml >------------------------------|
12: -- ----------------------------------------------------------------------------
372: );
373: --
374: -- Call the supporting pre-insert operation
375: --
376: pqh_tjr_ins.pre_insert(p_rec);
377: --
378: -- Insert the row
379: --
380: pqh_tjr_ins.insert_dml(p_rec);
376: pqh_tjr_ins.pre_insert(p_rec);
377: --
378: -- Insert the row
379: --
380: pqh_tjr_ins.insert_dml(p_rec);
381: --
382: -- Call the supporting post-insert operation
383: --
384: pqh_tjr_ins.post_insert
380: pqh_tjr_ins.insert_dml(p_rec);
381: --
382: -- Call the supporting post-insert operation
383: --
384: pqh_tjr_ins.post_insert
385: (p_rec
386: );
387: --
388: hr_utility.set_location('Leaving:'||l_proc, 20);
481: --
482: -- Having converted the arguments into the pqh_tjr_rec
483: -- plsql record structure we call the corresponding record business process.
484: --
485: pqh_tjr_ins.ins
486: (l_rec
487: );
488: --
489: -- As the primary key argument(s)
494: --
495: hr_utility.set_location(' Leaving:'||l_proc, 10);
496: End ins;
497: --
498: end pqh_tjr_ins;