Вернуться

Листинг 7. Демонстрирация использования процедуры

Этот блок кода демонстрирует использование процедуры из Листинга 6. 
/* dropany2.tst */
BEGIN 
	dropany ('TABLE', 'blip');
EXCEPTION
	WHEN OTHERS
	THEN 
		DECLARE 
			v_errcode PLS_INTEGER;
			v_errtext VARCHAR2(1000);
		BEGIN
			getErrorInfo (v_errcode, v_errtext);
			log81.saveline (v_errcode, v_errtext);
		END;
END;
/

Вернуться