helpf.pro
Регистрация
 0 
Распечатать

1С 7.x : Проверка наличия компонент Бухгалтерский, Оперативный Учеты, Расчет

Код 1C v 7.x
 
// При старте проверяем наличие компоненты "Бухгалтерский Учет" 1С:Предприятия
Попытка
БухИтоги = СоздатьОбъект("БухгалтерскиеИтоги");
Исключение
Предупреждение("Для работы конфигурации необходимо наличие" + РазделительСтрок
+"компоненты Бухгалтерский Учет 1С:Предприятия 7.7!"+ РазделительСтрок
+"Повторите запуск программы после проверки"+ РазделительСтрок
+"состава установленных компонент и доступа к ключам защиты.");
СтатусВозврата(0);
Возврат;
КонецПопытки;

// При старте проверяем наличие компоненты "Оперативный учет" 1С:Предприятия
Попытка
ТестовыйРегистр = СоздатьОбъект("Регистр.ВидЛюбогоРегистра");
Исключение
Предупреждение("Для работы конфигурации необходимо наличие"+ РазделительСтрок
+"компоненты Оперативный Учет 1С:Предприятия 7.7!"+ РазделительСтрок
+"Повторите запуск программы после проверки состава "+ РазделительСтрок
+"установленных компонент и доступа к ключам защиты.");
СтатусВозврата(0);
Возврат;
КонецПопытки;

// При старте проверяем наличие компоненты "Расчет" 1С:Предприятия
Попытка
ЖЗ = СоздатьОбъект("ЖурналРасчетов.ЛюбойВидЖурналаРасчетов");
Исключение
Предупреждение("Для работы конфигурации необходимо наличие"+ РазделительСтрок
+"компоненты Расчет! Повторите запуск программы после проверки"+ РазделительСтрок
+"состава установленных компонент и доступа к ключам защиты.");
СтатусВозврата(0);
Возврат;
КонецПопытки;
Разместил:   Версии: | 7.x |  Дата:   Прочитано: 9021
 0 
Распечатать
Возможно, вас также заинтересует
Автоматическая установка ширины колонки табличного документа. 0
Процедура, которая " примерно" делает автоширину колонок (навроде, как если бы выделить все колонки и дважды щелкнуть мышкой по границе заголовка колонки). Привожу текст, работает неахти, но лучше чем ничего: Процедура...
Ввести дату, ввод даты 1
ДатаНапоминания = РабочаяДата; Подсказка = "Введите дату и время"; ЧастьДаты = ЧастиДаты.ДатаВремя; Если ВвестиДату(ДатаНапоминания, Подсказка, ЧастьДаты) Тогда // обработка даты напоминания КонецЕсли Если...
Ввод записей в журнал расчетов 0
Добавление записи в журнал расчетов: Метод Новая может быть вызван где угодно, в глобальном модуле, модуле обработок, документов и т.д. Данный метод проверяет корректность заполненных реквизитов журнала расчетов....
Временный расчет регистров 0
Временный расчет регистров требуется, если нужно выбрать итоги или движения на определенную дату. По умолчанию итоги регистров выдаются на Точку актуальности. Формулировка 1С - Метод ВременныйРасчет устанавливает...
Вхождение вида расчета в группу 0
Посчитаем все начисления текущего сотрудника за январь: // 1-й вариант: ВсегоНачислено = 0; ЖЗ.ВыбратьЗаписиПоОбъекту (ТекСотр, ДатаНач, ДатаКон); Пока ЖЗ.ПолучитьЗапись()=1 Цикл Если...
Посмотреть все результаты поиска похожих
Вы не можете отправить комментарий анонимно, пожалуйста войдите или зарегистрируйтесь.