EXCEPTION
WHEN OTHERS THEN
V_ALARM_MSG := SQLERRM;
--错误日志表
V_SQLTEXT := 'CALL DD_PAK.ERRLOG(:V1,:V2,:V3,:V4,:V5)';
EXECUTE IMMEDIATE V_SQLTEXT
USING IN_CALLING_NBR, IN_CALLED_NBR, V_ALARM_HAND, V_ALARM_MSG, IN_CALL_TIME;
--告警
v_sqltext := 'call alarm_exec_prc ( :v1, :v2, :v3 )';
EXECUTE IMMEDIATE v_sqltext
USING V_ALARM_HAND, v_alarm_msg, v_alarm_team;
end;
END DD_PAK_new;