1: PACKAGE BODY per_succ_mgmt_migration_pkg AS
2: /* $Header: pesucmgr.pkb 120.1 2010/05/27 18:28:23 sidsaxen noship $*/
3: PROCEDURE check_migration_required(p_business_group_id IN NUMBER, retcode IN OUT NOCOPY NUMBER) IS
4: CURSOR csr_chk_eit (p_bg_id NUMBER) IS
5: SELECT 'Y'
152: retcode := 2;
153: fnd_file.put_line(fnd_file.log,'Error while completing the migation of EIT Data for Succession Management');
154: fnd_file.put_line(fnd_file.log,'ERROR: '||SQLERRM);
155: END migrate_succ_plan_eit;
156: END per_succ_mgmt_migration_pkg;