добавил процедуру и процедурную переменную для связи с внешним миром