1С 8.2 HELP Четверг, 03.07.2025, 10:57
Приветствую Вас Гость | RSS
Главная | Каталог статей | Регистрация | Вход
» Меню сайта

» Категории раздела
Модуль упровляемого приложения [1]
Общие Модули [2]
Мои статьи [20]
Справочники [4]
Документы [0]
Регистры сведений [0]
Регистры накоплений [0]
Отчеты [4]

» Статистика

Онлайн всего: 1
Гостей: 1
Пользователей: 0

Главная » Статьи » Мои статьи

В категории материалов: 20
Показано материалов: 1-10
Страницы: 1 2 »

Сортировать по: Дате · Названию · Рейтингу · Комментариям · Просмотрам

МенВрТаб=Новый МенеджерВременныхТаблиц;
    ЗапросТекст= новый запрос;
    ЗапросТекст.МенеджерВременныхТаблиц=МенВрТаб;
    ЗапросТекст.Текст="ВЫБРАТЬ
    |Номер,
    |Сумма,
    |Местонахождения
    |ПОМЕСТИТЬ ТаблицаТелефоны
    |ИЗ
    |&ТзТелефоны КАК ТзТелефоны";
    ЗапросТекст.УстановитьПараметр("ТзТелефоны",ЭтотОбъект.Телефонны.Выгрузить());
    ЗапросТекст.Выполнить();
    
    
    Запрос= новый запрос;
    Запрос.МенеджерВременныхТаблиц=МенВрТаб;
    Запрос.Текст="ВЫБРАТЬ
    |    СУММА(ТаблицаТелефоны.Сумма) КАК Сумма,
    |    ТаблицаТелефоны.Местонахождения КАК Местонахождения
    |ИЗ
    |    ТаблицаТелефоны КАК ТаблицаТелефоны
    |
    |СГРУППИРОВАТЬ ПО
    |    ТаблицаТелефоны.Местонахождения";
    РезультатыЗапроса=Запрос.Выполнить().Выгрузить();

 

Мои статьи | Просмотров: 122 | Добавил: alik-ZmeY | Дата: 25.09.2019 | Комментарии (0)

Ответ = Вопрос("Очистить табличную часть Услуги?",
        РежимДиалогаВопрос.ДаНетОтмена,
        0, // таймаут в секундах
        КодВозвратаДиалога.Да, // (необ.) кнопка по умолчанию
        "Внимание!!!" // (необ.) заголовок
        );
 
        Если Ответ = КодВозвратаДиалога.Да Тогда
            НовыйДок.Услуги.Очистить();
        иначеЕсли Ответ = КодВозвратаДиалога.Отмена тогда
            Возврат;
        КонецЕсли;    

 

Мои статьи | Просмотров: 143 | Добавил: alik-ZmeY | Дата: 25.09.2019 | Комментарии (0)

НовыйЭлемент=ЭлементыФормы.Добавить(Тип("ПолеВвода"),"Провод_"+ИмяКартинки,истина,ЭлементыФормы.Панель1);

Мои статьи | Просмотров: 301 | Добавил: alik-ZmeY | Дата: 05.03.2018 | Комментарии (0)

Запрос = Новый Запрос;
    МенеджерВТ = Новый МенеджерВременныхТаблиц;
    Запрос.МенеджерВременныхТаблиц=МенеджерВТ;
    Запрос.Текст = "ВЫБРАТЬ
                   |    ТаблицаТЧСтатьиЗатрат.КодСЗ,
                   |    ТаблицаТЧСтатьиЗатрат.СтатьиЗатрат,
                   |    ТаблицаТЧСтатьиЗатрат.Сумма
                   |ПОМЕСТИТЬ МВТТЧСтатьиЗатрат
                   |ИЗ
                   |    &Данные КАК ТаблицаТЧСтатьиЗатрат
                   |ГДЕ
                   |    ТаблицаТЧСтатьиЗатрат.КодСЗ = &КодСЗ
                   |;
                   |
                   |////////////////////////////////////////////////////////////////////////////////
                   |ВЫБРАТЬ
                   |    МВТТЧСтатьиЗатрат.КодСЗ,
                   |    МВТТЧСтатьиЗатрат.СтатьиЗатрат,
                   |    МВТТЧСтатьиЗатрат.Сумма
                   |ИЗ
                   |    МВТТЧСтатьиЗатрат КАК МВТТЧСтатьиЗатрат";
    
    
    Запрос.УстановитьПараметр("Данные",ТаблицаТЧСтатьиЗатрат);
    
    Запрос.УстановитьПараметр("КодСЗ", Число(Сред(СтрокаФормулы,СимволСтроки,КолСимволовЧисла)));
    РезультатЗапроса = Запрос.Выполнить();
            ВыборкаДетальныеЗаписи = РезультатЗапроса.Выбрать();

Мои статьи | Просмотров: 207 | Добавил: alik-ZmeY | Дата: 10.05.2017 | Комментарии (0)

    Результат = Запрос.Выполнить();
    ТЗ_МЦ2=Результат.Выгрузить();
    ЭлементыФормы.ТЗ_МЦ2.СоздатьКолонки();
    ЭлементыФормы.ТЗ_МЦ2.Значение=ТЗ_МЦ2;

 

Мои статьи | Просмотров: 399 | Добавил: alik-ZmeY | Дата: 23.07.2015 | Комментарии (0)

Процедура КоманднаяПанельСпецодеждаРазбитьДокПо200поз(Кнопка)
    ФлагДвесте=0;
    СтрокаСпецодежда=0;
    НомерСозданогоДока=0;
    КолСтрок=Спецодежда.Количество();
    Пока СтрокаСпецодежда<>КолСтрок Цикл //Перебираем строки ТЗ
    НомерСозданогоДока=НомерСозданогоДока+1;    
    НовыйДокСписаниеИзЭксплуатации= Документы.СписаниеМатериаловИзЭксплуатации.СоздатьДокумент();
    НовыйДокСписаниеИзЭксплуатации.Дата=ТекущаяДата();
    НовыйДокСписаниеИзЭксплуатации.Организация=ЭлементыФормы.Организация.Значение;
    НовыйДокСписаниеИзЭксплуатации.ПодразделениеОрганизации=ЭлементыФормы.ПодразделениеОрганизации.Значение;
    НовыйДокСписаниеИзЭксплуатации.Номер= Строка(Строка(НомерСозданогоДока)+"_"+Элементыформы.Номер.Значение);
    НовыйДокСписаниеИзЭксплуатации.СпособСписанияРасходов=ЭлементыФормы.СпособСписанияРасходов.Значение;
    
    Пока (ФлагДвесте<>200) и (СтрокаСпецодежда<>КолСтрок) Цикл
    СтрокаНовойСпецодежды=НовыйДокСписаниеИзЭксплуатации.Спецодежда.Добавить();    
    СтрокаНовойСпецодежды.Номенклатура=Спецодежда[СтрокаСпецодежда]["Номенклатура"].Ссылка;
    СтрокаНовойСпецодежды.ПартияМатериаловВЭксплуатации=Спецодежда[СтрокаСпецодежда]["ПартияМатериаловВЭксплуатации"];
    СтрокаНовойСпецодежды.Сотрудник=Спецодежда[СтрокаСпецодежда]["Сотрудник"].Ссылка;
    СтрокаНовойСпецодежды.Количество=Спецодежда[СтрокаСпецодежда]["Количество"];
    СтрокаНовойСпецодежды.СчетПередачиБУ=Спецодежда[СтрокаСпецодежда]["СчетПередачиБУ"].Ссылка;
    СтрокаНовойСпецодежды.СчетПередачиНУ=Спецодежда[СтрокаСпецодежда]["СчетПередачиНУ"].Ссылка;
    СтрокаНовойСпецодежды.Партия=Спецодежда[СтрокаСпецодежда]["Партия"];
    СтрокаНовойСпецодежды.ПартияВЭксплуатации=Спецодежда[СтрокаСпецодежда]["ПартияВЭксплуатации"];


    СтрокаСпецодежда=СтрокаСпецодежда+1;
     ФлагДвесте=ФлагДвесте+1;
    КонецЦикла;

 

Мои статьи | Просмотров: 271 | Добавил: alik-ZmeY | Дата: 03.02.2015 | Комментарии (0)

//Инициализация макета
ТабДок = Новый ТабличныйДокумент;
Макет = ПолучитьМакет ("Макет");

//выводим шапку макета
Область = Макет.ПолучитьОбласть("Шапка");
//Область.Параметры.ПечДата = ТекущаяДата();
ТабДок.Вывести(Область);

// вывод строки в отчет (область макета Табл3 сделайте из одной строки и добавьте переменные, соответсвующие вашей таблице значений)
Область = Макет.ПолучитьОбласть("Строка");
Для Сч = 1 По 10 Цикл
        Область.Параметры.Наимен = "1";
        ТабДок.Вывести(Область);
КонецЦикла;

//Заполнение нижней части макета
Область = Макет.ПолучитьОбласть("Подвал");
//Область.Параметры.ПечИтого = ПечИтого;
ТабДок.Вывести(Область);

//Опции отображения макета
ТабДок.ОтображатьСетку = Ложь;
ТабДок.ОтображатьЗаголовки = Ложь;
//Вывод макета на экран
ТабДок.Показать("Печать созданных документов");

 

Мои статьи | Просмотров: 1244 | Добавил: alik-ZmeY | Дата: 19.01.2015 | Комментарии (0)

1. В конфигураторе открываем общие-интерфейсы

2. Добавляем новый интерфейс

Мои статьи | Просмотров: 388 | Добавил: alik-ZmeY | Дата: 16.10.2014 | Комментарии (0)

1. Создаем новую роль.

2. В общем модуле дописываем права роли на запуск

 

Мои статьи | Просмотров: 414 | Добавил: alik-ZmeY | Дата: 14.10.2014 | Комментарии (0)

Например так:

ЭтаФорма.Информация = ЭтаФорма.Информация + Символы.ПС;

Варианты символов:

Символы.ВК - Возврат каретки
Символы.ВТаб - Символ табуляции (вертикальной)
Символы.НПП - Неразрывный пробел. Пробел, по которому не должен выполняться перенос на другую строку или другое разбиение текста при форматировании
Символы.ПС - Перевод строки
Символы.ПФ - Перевод формы (страницы)
Символы.Таб - Символ табуляции (горизонтальной)
Мои статьи | Просмотров: 1145 | Добавил: alik-ZmeY | Дата: 20.03.2014 | Комментарии (0)

1-10 11-20
» Форма входа

» Поиск

» Друзья сайта
  • Официальный блог
  • Сообщество uCoz
  • FAQ по системе
  • Инструкции для uCoz


  • Copyright MyCorp © 2025
    Конструктор сайтовuCoz