Line 5: SELECT CS_CONTRACT_STATUSES_S.nextval FROM SYS.DUAL;
1: PACKAGE BODY CS_CONTRACTSTATS_PVT AS
2: /* $Header: csctcstb.pls 115.1 99/07/16 08:51:26 porting ship $ */
3: FUNCTION get_seq_id RETURN NUMBER IS
4: CURSOR get_seq_id_csr IS 5: SELECT CS_CONTRACT_STATUSES_S.nextval FROM SYS.DUAL; 6: l_seq_id NUMBER := 0;
7: BEGIN
8: OPEN get_seq_id_csr;
9: FETCH get_seq_id_csr INTO l_seq_id;