CREATE OR REPLACE FUNCTION F_DAYS2STR(P_DAYS IN NUMBER DEFAULT 0) RETURN VARCHAR2 IS --For: 将天数转换成天时分秒格式
 DAYS NUMBER := NVL( P_DAYS,0 );
 VD NUMBER;--天
 VH NUMBER;--小时
 VM NUMBER;--分
 VS NUMBER;--秒
RESULT VARCHAR2(100);--返回值
BEGIN VD := TRUNC( DAYS );
VH := TRUNC(( DAYS - VD )* 24 );
VM := TRUNC(( DAYS - VD - VH / 24 )* 24 * 60 );
VS := TRUNC(( DAYS - VD - VH / 24 - VM / 24 / 60 )* 24 * 60 * 60 );
SELECT DECODE( VD,'',VD || '天' )|| DECODE( VH,VH || '小时' )|| DECODE( VM,VM || '分' )|| DECODE( VS,VS || '秒' ) INTO RESULT FROM DUAL;
RETURN(RESULT);
END;


ps:SELECT F_DAYS2STR(SYSDATE-TO_DATE('2017-08-22 15:30','yyyy-MM-dd hh24:mi')) FROM dual。