How showing all function/procedure

Question

- How showing all function/procedure headers parameter with type and
return type in Pl/sql .
- How to calculate the number of days to this year 1800 using sql-
statment without using pl/sql

Answer 1

DECLARE
STR VARCHAR2(2000);
STR1 VARCHAR2(100);
BEGIN
FOR I IN (select OBJECT_NAME,OBJECT_TYPE from user_objects where object_type in ('PROCEDURE','FUNCTION'))
LOOP
STR:=I.OBJECT_TYPE ||' '||I.OBJECT_NAME||'(';
FOR J IN (SELECT T.OBJECT_TYPE OBJECT_TYPE,U.object_name object_name, U.sequence sequence,u.in_out in_out,
U.argument_name argument_name, U.data_type data_type
FROM user_arguments U,
(select OBJECT_NAME,OBJECT_TYPE from user_objects where object_type in ('PROCEDURE','FUNCTION')) T
WHERE U.OBJECT_NAME=T.OBJECT_NAME AND U.OBJECT_NAME=I.OBJECT_NAME
ORDER BY U.object_name, U.sequence)
LOOP
IF J.ARGUMENT_NAME IS NULL THEN
STR1:=' RETURN '||J.DATA_TYPE||' '||J.IN_OUT;
ELSE
STR:=STR||J.ARGUMENT_NAME||' '||J.DATA_TYPE||' '||J.IN_OUT||',';
END IF;
END LOOP;
STR:=RTRIM(STR,',')||')'||STR1;
DBMS_OUTPUT.PUT_LINE(STR);
END LOOP;
END;
REGARDS
SUNIL