DBA Data[Home] [Help]

APPS.PQH_BPL_BUS dependencies on PQH_BPL_SHD

Line 182: ,p_rec in pqh_bpl_shd.g_rec_type

178: -- {End Of Comments}
179: -- ----------------------------------------------------------------------------
180: Procedure chk_non_updateable_args
181: (p_effective_date in date
182: ,p_rec in pqh_bpl_shd.g_rec_type
183: ) IS
184: --
185: l_proc varchar2(72) := g_package || 'chk_non_updateable_args';
186: --

Line 192: IF NOT pqh_bpl_shd.api_updating

188: --
189: -- Only proceed with the validation if a row exists for the current
190: -- record in the HR Schema.
191: --
192: IF NOT pqh_bpl_shd.api_updating
193: (p_pool_id => p_rec.pool_id
194: ,p_object_version_number => p_rec.object_version_number
195: ) THEN
196: fnd_message.set_name('PER', 'HR_6153_ALL_PROCEDURE_FAIL');

Line 239: l_api_updating := pqh_bpl_shd.api_updating

235: Begin
236: --
237: hr_utility.set_location('Entering:'||l_proc, 5);
238: --
239: l_api_updating := pqh_bpl_shd.api_updating
240: (p_pool_id => p_pool_id,
241: p_object_version_number => p_object_version_number);
242: --
243: if (l_api_updating

Line 245: <> pqh_bpl_shd.g_old_rec.pool_id) then

241: p_object_version_number => p_object_version_number);
242: --
243: if (l_api_updating
244: and nvl(p_pool_id,hr_api.g_number)
245: <> pqh_bpl_shd.g_old_rec.pool_id) then
246: --
247: -- raise error as PK has changed
248: --
249: pqh_bpl_shd.constraint_error('PQH_BUDGET_POOLS_PK');

Line 249: pqh_bpl_shd.constraint_error('PQH_BUDGET_POOLS_PK');

245: <> pqh_bpl_shd.g_old_rec.pool_id) then
246: --
247: -- raise error as PK has changed
248: --
249: pqh_bpl_shd.constraint_error('PQH_BUDGET_POOLS_PK');
250: --
251: elsif not l_api_updating then
252: --
253: -- check if PK is null

Line 259: pqh_bpl_shd.constraint_error('PQH_BUDGET_POOLS_PK');

255: if p_pool_id is not null then
256: --
257: -- raise error as PK is not null
258: --
259: pqh_bpl_shd.constraint_error('PQH_BUDGET_POOLS_PK');
260: --
261: end if;
262: --
263: end if;

Line 316: l_api_updating := pqh_bpl_shd.api_updating

312: Begin
313: --
314: hr_utility.set_location('Entering:'||l_proc,5);
315: --
316: l_api_updating := pqh_bpl_shd.api_updating
317: (p_pool_id => p_pool_id,
318: p_object_version_number => p_object_version_number);
319: --
320: if (l_api_updating

Line 322: <> nvl(pqh_bpl_shd.g_old_rec.budget_version_id,hr_api.g_number)

318: p_object_version_number => p_object_version_number);
319: --
320: if (l_api_updating
321: and nvl(p_budget_version_id,hr_api.g_number)
322: <> nvl(pqh_bpl_shd.g_old_rec.budget_version_id,hr_api.g_number)
323: or not l_api_updating) then
324: --
325: -- check if budget_version_id value exists in pqh_budgets table
326: --

Line 337: pqh_bpl_shd.constraint_error('PQH_BUDGET_POOLS_FK1');

333: --
334: -- raise error as FK does not relate to PK in pqh_budgets
335: -- table.
336: --
337: pqh_bpl_shd.constraint_error('PQH_BUDGET_POOLS_FK1');
338: --
339: end if;
340: --
341: close c1;

Line 437: l_api_updating := pqh_bpl_shd.api_updating

433: Begin
434: --
435: hr_utility.set_location('Entering:'||l_proc, 5);
436: --
437: l_api_updating := pqh_bpl_shd.api_updating
438: (p_pool_id => p_pool_id,
439: p_object_version_number => p_object_version_number);
440: --
441: if (l_api_updating

Line 443: <> nvl(pqh_bpl_shd.g_old_rec.budget_unit_id,hr_api.g_number)

439: p_object_version_number => p_object_version_number);
440: --
441: if (l_api_updating
442: and p_budget_unit_id
443: <> nvl(pqh_bpl_shd.g_old_rec.budget_unit_id,hr_api.g_number)
444: or not l_api_updating) then
445: --
446: -- check if value of budget_unit falls within per shared types
447: --

Line 510: l_api_updating := pqh_bpl_shd.api_updating

506: Begin
507: --
508: hr_utility.set_location('Entering:'||l_proc, 5);
509: --
510: l_api_updating := pqh_bpl_shd.api_updating
511: (p_pool_id => p_pool_id,
512: p_object_version_number => p_object_version_number);
513: --
514: if l_api_updating then

Line 574: l_api_updating := pqh_bpl_shd.api_updating

570: Begin
571: --
572: hr_utility.set_location('Entering:'||l_proc, 5);
573: --
574: l_api_updating := pqh_bpl_shd.api_updating
575: (p_pool_id => p_pool_id,
576: p_object_version_number => p_object_version_number);
577: --
578: if (l_api_updating

Line 580: <> nvl(pqh_bpl_shd.g_old_rec.name,hr_api.g_varchar2)

576: p_object_version_number => p_object_version_number);
577: --
578: if (l_api_updating
579: and p_name
580: <> nvl(pqh_bpl_shd.g_old_rec.name,hr_api.g_varchar2)
581: or not l_api_updating) then
582:
583: If p_name IS NULL then
584: If p_parent_pool_id IS NULL Then

Line 643: l_api_updating := pqh_bpl_shd.api_updating

639: Begin
640: --
641: hr_utility.set_location('Entering:'||l_proc, 5);
642: --
643: l_api_updating := pqh_bpl_shd.api_updating
644: (p_pool_id => p_pool_id,
645: p_object_version_number => p_object_version_number);
646: --
647: if (l_api_updating

Line 649: <> nvl(pqh_bpl_shd.g_old_rec.budget_version_id,hr_api.g_number)

645: p_object_version_number => p_object_version_number);
646: --
647: if (l_api_updating
648: and (nvl(p_budget_version_id,hr_api.g_number)
649: <> nvl(pqh_bpl_shd.g_old_rec.budget_version_id,hr_api.g_number)
650: or p_budget_unit_id
651: <> nvl(pqh_bpl_shd.g_old_rec.budget_unit_id,hr_api.g_number) )
652: or not l_api_updating) then
653: --

Line 651: <> nvl(pqh_bpl_shd.g_old_rec.budget_unit_id,hr_api.g_number) )

647: if (l_api_updating
648: and (nvl(p_budget_version_id,hr_api.g_number)
649: <> nvl(pqh_bpl_shd.g_old_rec.budget_version_id,hr_api.g_number)
650: or p_budget_unit_id
651: <> nvl(pqh_bpl_shd.g_old_rec.budget_unit_id,hr_api.g_number) )
652: or not l_api_updating) then
653: --
654: --
655: Open c1;

Line 662: pqh_bpl_shd.constraint_error('PQH_BUDGET_POOLS_U1');

658: --
659: if c1%found then
660:
661: Close c1;
662: pqh_bpl_shd.constraint_error('PQH_BUDGET_POOLS_U1');
663:
664: End if;
665: --
666: Close c1;

Line 701: ,p_rec in pqh_bpl_shd.g_rec_type

697: -- |---------------------------< insert_validate >----------------------------|
698: -- ----------------------------------------------------------------------------
699: Procedure insert_validate
700: (p_effective_date in date
701: ,p_rec in pqh_bpl_shd.g_rec_type
702: ) is
703: --
704: l_proc varchar2(72) := g_package||'insert_validate';
705: --

Line 713: ,p_associated_column1 => pqh_bpl_shd.g_tab_nam

709: -- Call all supporting business operations
710: --
711: hr_api.validate_bus_grp_id
712: (p_business_group_id => p_rec.business_group_id
713: ,p_associated_column1 => pqh_bpl_shd.g_tab_nam
714: || '.BUSINESS_GROUP_ID');
715: --
716: chk_pool_id
717: (p_pool_id => p_rec.pool_id,

Line 761: ,p_rec in pqh_bpl_shd.g_rec_type

757: -- |---------------------------< update_validate >----------------------------|
758: -- ----------------------------------------------------------------------------
759: Procedure update_validate
760: (p_effective_date in date
761: ,p_rec in pqh_bpl_shd.g_rec_type
762: ) is
763: --
764: l_proc varchar2(72) := g_package||'update_validate';
765: --

Line 773: ,p_associated_column1 => pqh_bpl_shd.g_tab_nam

769: -- Call all supporting business operations
770: --
771: hr_api.validate_bus_grp_id
772: (p_business_group_id => p_rec.business_group_id
773: ,p_associated_column1 => pqh_bpl_shd.g_tab_nam
774: || '.BUSINESS_GROUP_ID');
775: chk_pool_id
776: (p_pool_id => p_rec.pool_id,
777: p_object_version_number => p_rec.object_version_number);

Line 831: (p_rec in pqh_bpl_shd.g_rec_type

827: -- ----------------------------------------------------------------------------
828: -- |---------------------------< delete_validate >----------------------------|
829: -- ----------------------------------------------------------------------------
830: Procedure delete_validate
831: (p_rec in pqh_bpl_shd.g_rec_type
832: ) is
833: --
834: l_proc varchar2(72) := g_package||'delete_validate';
835: --