CREATE FUNCTION numar_litere5(p_litere IN VARCHAR2)
RETURN INTEGER IS
  nr_litere INTEGER;
BEGIN
  SELECT LENGTH(p_litere) INTO nr_litere FROM DUAL;
  RETURN nr_litere;
END;

DECLARE
  contor INTEGER;
  pe_litere VARCHAR2(20);
BEGIN
  pe_litere :='OsamaBinLaden';
  contor:= numar_litere5(pe_litere);
  DBMS_OUTPUT.put_line('Cuvantul ' || pe_litere || ' are ' || contor || ' litere');
END;