oracle show running procedures

1SELECT 'CALLED PLSQL' AS STATUT,
2       VS.USERNAME,
3       VS.OSUSER,
4       VS.PROGRAM,
5       VS.MODULE,
6       VS.ACTION,
7       VS.SQL_EXEC_START,
8       D_O.OBJECT_NAME,
9       D_O.OBJECT_TYPE
10FROM DBA_OBJECTS D_O
11         INNER JOIN V$SESSION VS ON D_O.OBJECT_ID = VS.PLSQL_ENTRY_OBJECT_ID
12UNION ALL
13SELECT 'CURRENT PLSQL' AS STATUT,
14       VS.USERNAME,
15       VS.OSUSER,
16       VS.PROGRAM,
17       VS.MODULE,
18       VS.ACTION,
19       VS.SQL_EXEC_START,
20       D_O.OBJECT_NAME,
21       D_O.OBJECT_TYPE
22FROM DBA_OBJECTS D_O
23         INNER JOIN V$SESSION VS ON D_O.OBJECT_ID = VS.PLSQL_OBJECT_ID;

1-- Specifically for SQL:Oracle
2
3SELECT * 
4FROM ALL_PROCEDURES;