Возможность использования внешних макросов для изменения каких-либо данных или параметров одновременно в нескольких сметах
Макросы представляют собой последовательность команд, при помощи которых можно изменять определённые данные или параметры одновременно в нескольких сметах – например, выполнить перенумерацию позиций или задать способ привязки индексов. Макросы пишутся на языке VBScript, каждый макрос сохраняется в отдельном файле. Строки, начинающиеся с символа «’», являются комментариями и не влияют на работу макроса. При этом в макросах предусмотрен ряд констант, которые указывают, для каких типов документов предназначен данный макрос, обозначают выполняемое действие, а также определяют внешний вид кнопки для вызова макроса в ПК «ГРАНД-Смета». Такие константы начинаются с символов «‘#». Ниже в таблице приводится перечень таких констант (в первой колонке курсивом указан пример значения для использования константы).
Используя существующие макросы в качестве образца, можно создавать свои собственные макросы, выполняющие в сметах какие угодно изменения. Макросы находятся на компьютере в папке с данными клиента «ГРАНД-Сметы» во вложенной папке Macros. При установке программы на компьютер сюда копируются стандартные макросы, включённые в дистрибутив ПК «ГРАНД-Смета». Новые макросы, которые может создавать сам пользователь, также необходимо записывать в данную папку. На данный момент в составе ПК «ГРАНД-Смета» предлагаются макросы для работы с индексами, а также для ряда иных действий. Для того чтобы выполнить указанное в макросе действие одновременно в нескольких сметах, необходимо выделить в базе смет требуемые сметы (либо папки со сметами), после чего выбрать нужный макрос в выпадающем меню кнопки Макросы, которая расположена на панели инструментов на вкладке Операции. Ниже для наглядности приводится программный код и окно выполнения макроса, выполняющего перенумерацию позиций сметы. Программный код макроса Перенумерация позиций: '#Title = Перенумерация позиций '#Description = Перенумерация позиций '#DocTypes = Smeta '#Category = Прочее '#ImageIndex = 0
'#InitProc: ' Инициализация и запрос параметров у пользователя
set mode = Options.AddRadioGroup("Режим") mode.AddItem srnmSequential, "По порядку" mode.AddItem srnmChapterFrac, "По разделам дробная" mode.AddItem srnmChapterInt, "По разделам целая"
mode.Value = srnmSequential
set renumOptions = Options.AddGroup("Параметры") set autoReenum = renumOptions.AddCheckBox("Автоматическая перенумерация") set skipEmpty = renumOptions.AddCheckBox("Пропускать пустые номера") set skipInactive = renumOptions.AddCheckBox("Пропускать неучтенные позиции")
autoReenum.Value = srnoAuto skipEmpty.Value = srnoSkipEmptyNum skipInactive.Value = srnoSkipInactive
set doReenum = Options.AddCheckBox("Немедленно перенумеровать")
'#DocProc: ' Работа над документом
Document.Renumerator.Mode = mode.Value Document.Renumerator.Options = renumOptions.Value
If doReenum.Checked Then Document.Renumerator.Renumerate End If Окно выполнения макроса Перенумерация позиций:
Популярное: Почему стероиды повышают давление?: Основных причин три... Как распознать напряжение: Говоря о мышечном напряжении, мы в первую очередь имеем в виду мускулы, прикрепленные к костям ... Как вы ведете себя при стрессе?: Вы можете самостоятельно управлять стрессом! Каждый из нас имеет право и возможность уменьшить его воздействие на нас... ©2015-2024 megaobuchalka.ru Все материалы представленные на сайте исключительно с целью ознакомления читателями и не преследуют коммерческих целей или нарушение авторских прав. (2263)
|
Почему 1285321 студент выбрали МегаОбучалку... Система поиска информации Мобильная версия сайта Удобная навигация Нет шокирующей рекламы |