@DIV
CREATE or REPLACE FUNCTION today
RETURN VARCHAR2
AS
RET_VALUE VARCHAR2(50);
BEGIN
BEGIN
select 売上日付 into RET_VALUE from コントロールマスタ where キー = '1';
RET_VALUE := 'ああああああ';
EXCEPTION
WHEN OTHERS THEN
RET_VALUE := SYSDATE;
END;
RETURN RET_VALUE;
END today;
@END
|