Узнать является ли сторока числом

select case when length(TRIM(TRANSLATE('45', ' 0123456789', ' '))) is null 
                 then 'ЧИСЛО'
            else 'СТРОКА'
       end res from dual
union all
select case when length(TRIM(TRANSLATE('a4', ' 0123456789', ' '))) is null 
                 then 'ЧИСЛО'
            else 'СТРОКА'
       end res from dual