Wrap this into a procedure
SQL> select ename,sal,TO_CHAR(TO_DATE(sal, 'J'), 'JSP') inWords from emp;
ENAME SAL INWORDS
---------- ---------- ------------------------------------------------------------------------------
SMITH
ALLEN 1600 ONE THOUSAND SIX HUNDRED
WARD 1250 ONE THOUSAND TWO HUNDRED FIFTY
JONES 2975 TWO THOUSAND NINE HUNDRED SEVENTY-FIVE
MARTIN 1250 ONE THOUSAND TWO HUNDRED FIFTY
BLAKE 2850 TWO THOUSAND EIGHT HUNDRED FIFTY
CLARK 2450 TWO THOUSAND FOUR HUNDRED FIFTY
SCOTT 3000 THREE THOUSAND
KING 5000 FIVE THOUSAND
TURNER 1500 ONE THOUSAND FIVE HUNDRED
ADAMS 1100 ONE THOUSAND ONE HUNDRED
JAMES 950 NINE HUNDRED FIFTY
FORD 3000 THREE THOUSAND
MILLER 1300 ONE THOUSAND THREE HUNDRED