IF (V_COUNT > 0) THEN
--更新ets_item_info
UPDATE ETS_ITEM_INFO
SET FINANCE_PROP = 'CTZC',
LAST_UPDATE_DATE = SYSDATE,
LAST_UPDATE_BY =P_USER_ID
WHERE SYSTEMID = P_SYSTEMID;
RETURN 1;
ELSE
GOTO lable;
END IF;
<>
NULL;
EXCEPTION
WHEN OTHERSTHEN
BEGIN
P_ERRMSG := SQLERRM;
RETURN 0;
END;
[注意:] <> 后面不能直接跟EXCEPTION这种关键字类的语句,要用NULL把标签跟关键字隔开。类似
的关键字还有ENDLOOP之类的,这里就不一一列举了。