SELECT o$.name, d$.os_path, o$.obj#,
substr(d$.audit$, 1, 1) || substr(d$.audit$, 2, 1) || /* ALTER */
substr(d$.audit$, 3, 1) || substr(d$.audit$, 4, 1) || /* AUDIT */
substr(d$.audit$, 5, 1) || substr(d$.audit$, 6, 1) || /* COMMENT */
substr(d$.audit$, 7, 1) || substr(d$.audit$, 8, 1) || /* DELETE */
substr(d$.audit$, 9, 1) || substr(d$.audit$, 10, 1) || /* GRANT */
substr(d$.audit$, 11, 1) || substr(d$.audit$, 12, 1) || /* INDEX */
substr(d$.audit$, 13, 1) || substr(d$.audit$, 14, 1) || /* INSERT */
substr(d$.audit$, 15, 1) || substr(d$.audit$, 16, 1) || /* LOCK */
substr(d$.audit$, 17, 1) || substr(d$.audit$, 18, 1) || /* RENAME */
substr(d$.audit$, 19, 1) || substr(d$.audit$, 20, 1) || /* SELECT */
substr(d$.audit$, 21, 1) || substr(d$.audit$, 22, 1) || /* UPDATE */
'--' || /* REFERENCES */
substr(d$.audit$, 25, 1) || substr(d$.audit$, 26, 1) || /* EXECUTE */
substr(d$.audit$, 27, 1) || substr(d$.audit$, 28, 1) || /* CREATE */
substr(d$.audit$, 35, 1) || substr(d$.audit$, 36, 1) || /* READ */
substr(d$.audit$, 37, 1) || substr(d$.audit$, 38, 1) /* WRITE */
FROM sys.exu81obj o$, sys.dir$ d$
WHERE o$.type# = 23 AND /* directory aliases */
o$.obj# = d$.obj# AND
NOT EXISTS (
SELECT owner, name
FROM sys.noexp$ ne$
WHERE ne$.name = o$.name AND
ne$.obj_type = 23)
SELECT O$.NAME
, D$.OS_PATH
, O$.OBJ#
,
SUBSTR(D$.AUDIT$
, 1
, 1) || SUBSTR(D$.AUDIT$
, 2
, 1) || /* ALTER */
SUBSTR(D$.AUDIT$
, 3
, 1) || SUBSTR(D$.AUDIT$
, 4
, 1) || /* AUDIT */
SUBSTR(D$.AUDIT$
, 5
, 1) || SUBSTR(D$.AUDIT$
, 6
, 1) || /* COMMENT */
SUBSTR(D$.AUDIT$
, 7
, 1) || SUBSTR(D$.AUDIT$
, 8
, 1) || /* DELETE */
SUBSTR(D$.AUDIT$
, 9
, 1) || SUBSTR(D$.AUDIT$
, 10
, 1) || /* GRANT */
SUBSTR(D$.AUDIT$
, 11
, 1) || SUBSTR(D$.AUDIT$
, 12
, 1) || /* INDEX */
SUBSTR(D$.AUDIT$
, 13
, 1) || SUBSTR(D$.AUDIT$
, 14
, 1) || /* INSERT */
SUBSTR(D$.AUDIT$
, 15
, 1) || SUBSTR(D$.AUDIT$
, 16
, 1) || /* LOCK */
SUBSTR(D$.AUDIT$
, 17
, 1) || SUBSTR(D$.AUDIT$
, 18
, 1) || /* RENAME */
SUBSTR(D$.AUDIT$
, 19
, 1) || SUBSTR(D$.AUDIT$
, 20
, 1) || /* SELECT */
SUBSTR(D$.AUDIT$
, 21
, 1) || SUBSTR(D$.AUDIT$
, 22
, 1) || /* UPDATE */
'--' || /* REFERENCES */
SUBSTR(D$.AUDIT$
, 25
, 1) || SUBSTR(D$.AUDIT$
, 26
, 1) || /* EXECUTE */
SUBSTR(D$.AUDIT$
, 27
, 1) || SUBSTR(D$.AUDIT$
, 28
, 1) || /* CREATE */
SUBSTR(D$.AUDIT$
, 35
, 1) || SUBSTR(D$.AUDIT$
, 36
, 1) || /* READ */
SUBSTR(D$.AUDIT$
, 37
, 1) || SUBSTR(D$.AUDIT$
, 38
, 1) /* WRITE */
FROM SYS.EXU81OBJ O$
, SYS.DIR$ D$
WHERE O$.TYPE# = 23
AND /* DIRECTORY ALIASES */
O$.OBJ# = D$.OBJ# AND
NOT EXISTS (
SELECT OWNER
, NAME
FROM SYS.NOEXP$ NE$
WHERE NE$.NAME = O$.NAME AND
NE$.OBJ_TYPE = 23)
|
|
|