530: -- -----------------------------------------------------------+
531: l_mynextval := 0;
532: l_currval := 0;
533: l_string := 'SELECT ' || l_seq_owner || '.' || l_seq_name ||
534: '.NEXTVAL FROM sys.dual';
535:
536: EXECUTE IMMEDIATE l_string INTO l_mynextval;
537:
538: l_mynextval := l_mynextval - 1;
566: hr_utility.trace('Forcing sequence increment');
567: end if;
568: --
569: l_string := 'SELECT ' || l_seq_owner || '.' || l_seq_name ||
570: '.nextval FROM sys.dual';
571:
572: EXECUTE IMMEDIATE l_string INTO l_mynextval;
573: l_alterflag := l_alterflag + 1;
574: -- ---------------------------------------+
598:
599: EXECUTE IMMEDIATE l_string;
600: --
601: l_string := 'SELECT ' || l_seq_owner || '.' || l_seq_name ||
602: '.nextval FROM sys.dual';
603:
604: EXECUTE IMMEDIATE l_string INTO l_mynextval;
605: -- return to previous settings
606: EXECUTE IMMEDIATE l_PrevSettings;
837: l_next_value := null;
838: if p_person_type = 'EMP' then
839: select PER_GLOBAL_EMP_NUM_S.NEXTVAL
840: into l_next_value
841: from dual;
842: elsif p_person_type = 'APL' then
843: select PER_GLOBAL_APL_NUM_S.NEXTVAL
844: into l_next_value
845: from dual;
841: from dual;
842: elsif p_person_type = 'APL' then
843: select PER_GLOBAL_APL_NUM_S.NEXTVAL
844: into l_next_value
845: from dual;
846:
847: elsif p_person_type = 'CWK' then
848: select PER_GLOBAL_CWK_NUM_S.NEXTVAL
849: into l_next_value
846:
847: elsif p_person_type = 'CWK' then
848: select PER_GLOBAL_CWK_NUM_S.NEXTVAL
849: into l_next_value
850: from dual;
851:
852: end if;
853: if g_debug then
854: hr_utility.set_location(c_proc_name,20);