select u.name, o.name,
s.minvalue, s.maxvalue, s.increment$,
decode (s.cycle#, 0, 'N', 1, 'Y'),
decode (s.order$, 0, 'N', 1, 'Y'),
s.cache, s.highwater,
decode (s.partcount, 0, to_number(NULL), s.partcount),
decode(bitand(s.flags, 64), 64, 'Y', 'N'),
decode(bitand(s.flags, 512), 512, 'Y', 'N')
from sys.seq$ s, sys.obj$ o, sys.user$ u
where u.user# = o.owner#
and o.obj# = s.obj#
and (o.owner# = userenv('SCHEMAID')
or o.obj# in
(select oa.obj#
from sys.objauth$ oa
where grantee# in ( select kzsrorol
from x$kzsro
)
)
or
exists (select null from v$enabledprivs
where priv_number = -109 /* SELECT ANY SEQUENCE */
)
)
SELECT U.NAME
, O.NAME
,
S.MINVALUE
, S.MAXVALUE
, S.INCREMENT$
,
DECODE (S.CYCLE#
, 0
, 'N'
, 1
, 'Y')
,
DECODE (S.ORDER$
, 0
, 'N'
, 1
, 'Y')
,
S.CACHE
, S.HIGHWATER
,
DECODE (S.PARTCOUNT
, 0
, TO_NUMBER(NULL)
, S.PARTCOUNT)
,
DECODE(BITAND(S.FLAGS
, 64)
, 64
, 'Y'
, 'N')
,
DECODE(BITAND(S.FLAGS
, 512)
, 512
, 'Y'
, 'N')
FROM SYS.SEQ$ S
, SYS.OBJ$ O
, SYS.USER$ U
WHERE U.USER# = O.OWNER#
AND O.OBJ# = S.OBJ#
AND (O.OWNER# = USERENV('SCHEMAID')
OR O.OBJ# IN
(SELECT OA.OBJ#
FROM SYS.OBJAUTH$ OA
WHERE GRANTEE# IN ( SELECT KZSROROL
FROM X$KZSRO
)
)
OR
EXISTS (SELECT NULL
FROM V$ENABLEDPRIVS
WHERE PRIV_NUMBER = -109 /* SELECT ANY SEQUENCE */
)
)
|
|
|