Write a pl/sql procedure/function.