Line 5: SELECT CS_COVERAGE_TXN_GROUPS_S.nextval FROM SYS.DUAL;
1: PACKAGE BODY CS_TXNGRP_PVT AS
2: /* $Header: csctxngb.pls 115.1 99/07/16 08:56:05 porting ship $ */
3: FUNCTION get_seq_id RETURN NUMBER IS
4: CURSOR get_seq_id_csr IS 5: SELECT CS_COVERAGE_TXN_GROUPS_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;