SELECT 
  n.nspname AS routine_schema, 
  p.proname AS routine_name,
  pg_get_function_identity_arguments(p.oid) AS parameters,
  CASE WHEN p.prokind='f' THEN 'FUNCTION'
  WHEN p.prokind='p' THEN 'PROCEDURE'
  WHEN p.prokind='w' THEN 'WINDOW FUNCTION' END AS routine_type,
  d.description AS comment,
  regexp_replace(pg_get_functiondef(p.oid),'[\r\n]','<br>','g')  AS routine_src
FROM 
  (pg_catalog.pg_proc p JOIN pg_catalog.pg_namespace n ON p.pronamespace = n.oid) JOIN pg_catalog.pg_type t ON p.prorettype=t.oid
  LEFT JOIN pg_catalog.pg_description d ON p.oid=d.objoid
WHERE 
p.prokind<>'a'
AND p.proname NOT IN ('f_assume_you_must_use_files', 'f_check_format_comma_separated_list', 'f_check_password', 'f_default_value_with_no_match')
AND n.nspname NOT IN (SELECT schema_name
FROM INFORMATION_SCHEMA.schemata
WHERE schema_name<>'public' AND
schema_owner='postgres' AND schema_name IS NOT NULL) 
AND t.typname<>'trigger' 
AND (d.description IS NULL OR d.description!~*'([[:space:]]*|")OP[[:space:]]*[[:digit:]]') 
AND pg_get_functiondef(p.oid)~*'([[:space:]]|[(])*(INSERT|UPDATE|DELETE)[[:space:]]'
ORDER BY routine_schema, routine_name, parameters;