выплаченностьзарплаты » Поиск

Результаты по ключевому слову: выплаченностьзарплаты

Временные таблицы в отчетах СКД

Нужно в отчете СКД Связать Данные из Регистра Накопления ВзаиморасчетыСРаботниками и Табличной Части Документа ЗарплатаКВыплате по Ссылке на Документ и ФизЛицу! И вывести полученные данные за указанный Период(с ДатаН по ДатаК) - Запрос будет такой:

Код 1C v 8.х

 ВЫБРАТЬ

                ВзаиморасчетыСРаботникамиОрганизаций.Период,

                ВзаиморасчетыСРаботникамиОрганизаций.Физлицо,

                ВзаиморасчетыСРаботникамиОрганизаций.СуммаВзаиморасчетов,

                ВзаиморасчетыСРаботникамиОрганизаций.Организация,

                ВзаиморасчетыСРаботникамиОрганизаций.ПериодВзаиморасчетов,

                ВзаиморасчетыСРаботникамиОрганизаций.Регистратор

ПОМЕСТИТЬ РегВзаимРасч

ИЗ

                РегистрНакопления.ВзаиморасчетыСРаботникамиОрганизаций КАК ВзаиморасчетыСРаботникамиОрганизаций

ГДЕ

                ВзаиморасчетыСРаботникамиОрганизаций.Период МЕЖДУ &ДатаН И &ДатаК

;



////////////////////////////////////////////////////////////////////////////////

ВЫБРАТЬ

                ЗарплатаКВыплатеОрганизацийЗарплата.Физлицо,

                ЗарплатаКВыплатеОрганизацийЗарплата.Сумма,

                ЗарплатаКВыплатеОрганизацийЗарплата.ВыплаченностьЗарплаты,

                ЗарплатаКВыплатеОрганизацийЗарплата.КомпенсацияЗаЗадержкуЗарплаты,

                ЗарплатаКВыплатеОрганизацийЗарплата.Ссылка

ПОМЕСТИТЬ ДокумЗарплКВыпл

ИЗ

                Документ.ЗарплатаКВыплатеОрганизаций.Зарплата КАК ЗарплатаКВыплатеОрганизацийЗарплата

ГДЕ

                ЗарплатаКВыплатеОрганизацийЗарплата.Ссылка.Дата МЕЖДУ &ДатаН И &ДатаК

;



////////////////////////////////////////////////////////////////////////////////

ВЫБРАТЬ

                РегВзаимРасч.Период,

                РегВзаимРасч.Физлицо,

                РегВзаимРасч.СуммаВзаиморасчетов,

                ДокумЗарплКВыпл.Сумма,

                ДокумЗарплКВыпл.ВыплаченностьЗарплаты,

                ДокумЗарплКВыпл.КомпенсацияЗаЗадержкуЗарплаты

ИЗ

                РегВзаимРасч КАК РегВзаимРасч

                               ВНУТРЕННЕЕ СОЕДИНЕНИЕ ДокумЗарплКВыпл КАК ДокумЗарплКВыпл

                               ПО РегВзаимРасч.Регистратор = ДокумЗарплКВыпл.Ссылка

                                               И РегВзаимРасч.Физлицо = ДокумЗарплКВыпл.Физлицо

;



////////////////////////////////////////////////////////////////////////////////

УНИЧТОЖИТЬ РегВзаимРасч

;



////////////////////////////////////////////////////////////////////////////////

УНИЧТОЖИТЬ ДокумЗарплКВыпл

Категория: Схема Компоновки Данных

Временные таблицы, что из себя представляют и как с ними работать?

Временные таблицы - хранятся на сервере и позволяют писать более простые запросы.
Временные таблицы хранятся в объекте типа МенеджерВременныхТаблиц. Когда этот объект уничтожается, уничтожаются и временные таблицы.
Чтобы создать временную таблицу, используется ключевое слово "ПОМЕСТИТЬ В", например:

Код 1C v 8.х

 |ВЫБРАТЬ * ИЗ Справочник.Номенклатура ПОМЕСТИТЬ В ВТТовары

Временная таблица создается при выполнении запроса, если повторно выполнить запрос, то выдастся ошибка, что таблица уже существует.
Описания временных таблиц хранятся в свойстве запроса МенеджерВременныхТаблиц. К сожалению, нельзя получить список временных таблиц, которые хранятся в запросе.

Пример 1: Как можно выгрузить временную таблицу в таблицу значений и как использовать менеджер временных таблиц:

Код 1C v 8.х

 Запрос=Новый Запрос("ВЫБРАТЬ * ИЗ Справочник.Номенклатура ПОМЕСТИТЬ В ВТТовары");

Запрос.Выполнить(); //Создалась таблица ВТТовары

ЗапросТМП=Новый Запрос("ВЫБРАТЬ * ИЗ ВТТовары");

ЗапросТМП.МенеджерВременныхТаблиц=Запрос.МенеджерВременныхТаблиц; //Копируем ссылку на временные таблицы

ТЗ=ЗапросТМП.Выполнить().Выгрузить(); //Получаем временную таблицу в таблице значений

Готовую таблицу значений из памяти можно выгружать в менеджер временных таблиц запроса. Единственное условие - колонки таблицы значений должны быть типизированными, т.е. иметь тип. Вот пример, демонстрирующий это:



ТЗ=Новый ТаблицаЗначений();

//Колонки должны быть типизированы

ТЗ.Колонки.Добавить("А", Новый ОписаниеТипов("Строка"));

ТЗ.Колонки.Добавить("Б", Новый ОписаниеТипов("Строка"));



//Заполняем таблицу данными

Стр=ТЗ.Добавить();

Стр.А="А";

Стр.Б="Б";

Стр=ТЗ.Добавить();

Стр.А="А1";

Стр.Б="Б1";



//Загружаем таблицу значений в менеджер временных таблиц запроса

Запрос=Новый Запрос("Выбрать Т.А, Т.Б ПОМЕСТИТЬ ВТТаб Из &Таб Как Т");

//Вариант: Запрос=Новый Запрос("Выбрать * ПОМЕСТИТЬ ВТТаб Из &Таб Как Т");

Запрос.МенеджерВременныхТаблиц=Новый МенеджерВременныхТаблиц;

Запрос.УстановитьПараметр("Таб",ТЗ);

Запрос.Выполнить();



//Получаем таблицу из менеджера временных таблиц запроса

ЗапросТМП=Новый Запрос("ВЫБРАТЬ * ИЗ ВТТаб");

ЗапросТМП.МенеджерВременныхТаблиц=Запрос.МенеджерВременныхТаблиц;

ТЗ1=ЗапросТМП.Выполнить().Выгрузить();

ТЗ1.ВыбратьСтроку(); //Показываем полученную таблицу

Вместо перечисления списка полей можно использовать "ВЫБРАТЬ * ".
Если есть ТЗ, в каждой колонке которой значения всего одного типа, для типизации колонок, можно воспользоваться функцией:

Код 1C v 8.х

 Процедура ТипизацияТЗ(ТЗ) Экспорт

РезультатТЗ = новый ТаблицаЗначений;

Для Каждого Колонка из ТЗ.Колонки Цикл

Имя = Колонка.Имя;

МассивТипов = новый Массив(1);

МассивТипов[0] = ТипЗнч(ТЗ[0][Имя]);

Описатель = новый ОписаниеТипов(МассивТипов);

РезультатТЗ.Колонки.Добавить(Имя, Описатель);

КонецЦикла;



Для каждого Строка из ТЗ Цикл

СтрокаРез = РезультатТЗ.Добавить();

ЗаполнитьЗначенияСвойств(СтрокаРез, Строка);

КонецЦикла;



ТЗ = РезультатТЗ.Скопировать();

КонецПроцедуры

Пример 2: Нужно в отчете СКД Связать Данные из Регистра Накопления ВзаиморасчетыСРаботниками и Табличной Части Документа ЗарплатаКВыплате по Ссылке на Документ и ФизЛицу! И вывести полученные данные за указанный Период(с ДатаН по ДатаК) - Запрос будет такой:

Код 1C v 8.х

 ВЫБРАТЬ

                ВзаиморасчетыСРаботникамиОрганизаций.Период,

                ВзаиморасчетыСРаботникамиОрганизаций.Физлицо,

                ВзаиморасчетыСРаботникамиОрганизаций.СуммаВзаиморасчетов,

                ВзаиморасчетыСРаботникамиОрганизаций.Организация,

                ВзаиморасчетыСРаботникамиОрганизаций.ПериодВзаиморасчетов,

                ВзаиморасчетыСРаботникамиОрганизаций.Регистратор

ПОМЕСТИТЬ РегВзаимРасч

ИЗ

                РегистрНакопления.ВзаиморасчетыСРаботникамиОрганизаций КАК ВзаиморасчетыСРаботникамиОрганизаций

ГДЕ

                ВзаиморасчетыСРаботникамиОрганизаций.Период МЕЖДУ &ДатаН И &ДатаК

;



////////////////////////////////////////////////////////////////////////////////

ВЫБРАТЬ

                ЗарплатаКВыплатеОрганизацийЗарплата.Физлицо,

                ЗарплатаКВыплатеОрганизацийЗарплата.Сумма,

                ЗарплатаКВыплатеОрганизацийЗарплата.ВыплаченностьЗарплаты,

                ЗарплатаКВыплатеОрганизацийЗарплата.КомпенсацияЗаЗадержкуЗарплаты,

                ЗарплатаКВыплатеОрганизацийЗарплата.Ссылка

ПОМЕСТИТЬ ДокумЗарплКВыпл

ИЗ

                Документ.ЗарплатаКВыплатеОрганизаций.Зарплата КАК ЗарплатаКВыплатеОрганизацийЗарплата

ГДЕ

                ЗарплатаКВыплатеОрганизацийЗарплата.Ссылка.Дата МЕЖДУ &ДатаН И &ДатаК

;



////////////////////////////////////////////////////////////////////////////////

ВЫБРАТЬ

                РегВзаимРасч.Период,

                РегВзаимРасч.Физлицо,

                РегВзаимРасч.СуммаВзаиморасчетов,

                ДокумЗарплКВыпл.Сумма,

                ДокумЗарплКВыпл.ВыплаченностьЗарплаты,

                ДокумЗарплКВыпл.КомпенсацияЗаЗадержкуЗарплаты

ИЗ

                РегВзаимРасч КАК РегВзаимРасч

                               ВНУТРЕННЕЕ СОЕДИНЕНИЕ ДокумЗарплКВыпл КАК ДокумЗарплКВыпл

                               ПО РегВзаимРасч.Регистратор = ДокумЗарплКВыпл.Ссылка

                                               И РегВзаимРасч.Физлицо = ДокумЗарплКВыпл.Физлицо

;



////////////////////////////////////////////////////////////////////////////////

УНИЧТОЖИТЬ РегВзаимРасч

;



////////////////////////////////////////////////////////////////////////////////

УНИЧТОЖИТЬ ДокумЗарплКВыпл

Категория: Запросы

Создание нового документа

Для 8.2:
Открыть форму нового документа и предоставить пользователю самому интерактивно записать данные объекта в базу данных:
проще всего использовать метод глобального контекста ОткрытьФорму(). Это можно сделать на клиенте.

Код 1C v 8.2 УП

 ОткрытьФорму("Документ.ПриходнаяНакладная.ФормаОбъекта");

При этом создается новый документ и открывается для редактирования основная форма этого документа.

Если нужно какое-то предварительное заполнение документа начальными данными, то это можно сделать либо с помощью свойств реквизитов документа ЗначениеЗаполнения, ЗаполнятьИзДанныхЗаполнения либо в обработчике события документа ОбработкаЗаполнения.

Создать новый документ программно, программно заполнить его данными и программно записать. Затем, если нужно, показать его пользователю:
можно программно создать документ на сервере, заполнить данными, если это нужно в обработчике события ОбработкаЗаполнения, записать, и передать ссылку на новый документ в метод глобального контекста ОткрытьЗначение(), который откроет форму этого документа. Например:

Код 1C v 8.2 УП

 &НаКлиенте

Процедура ПриходнаяНакладная(Команда)



    СсылкаНаДокумент = СоздатьНовыйДокумент();

    ОткрытьЗначение(СсылкаНаДокумент);



КонецПроцедуры



&НаСервере

Функция СоздатьНовыйДокумент()



   НовыйДокумент = Документы.ПриходнаяНакладная.СоздатьДокумент();

   НовыйДокумент.Номер = "111";

   НовыйДокумент.Дата = ТекущаяДата();

   НовыйДокумент.Записать();



   Возврат НовыйДокумент.Ссылка;



КонецФункции

Подробнее об использовании методов ОткрытьЗначение() и ОткрытьФорму() можно прочитать в синтакс-помощнике: Глобальный контекст - Процедуры и функции для интерактивной работы

Код 1C v 8.2 УП

 // ЕЩЕ ПРИМЕР:

&НаКлиенте

Процедура СоздатьНовыйДокумент(Команда)

   

        // Вставить содержимое обработчика.

        Если СоздатьНовыйДокументНаСервере() = 0 Тогда

                Сообщить("Не удалось создать новый документ");

        КонецЕсли;



КонецПроцедуры



&НаСервере

Функция СоздатьНовыйДокументНаСервере()

   

        Перем НоваяРасходнаяНакладная;

        Перем СтрокаТЧ;

   

        НоваяРасходнаяНакладная=ДокРасходнаяНакладная.СоздатьДокумент();

   

        //Заполняем реквизиты шапки

        НоваяРасходнаяНакладная.Дата=  ТекущаяДата();

        НоваяРасходнаяНакладная.Фирма =Справочники.Фирмы.ОсновнаяФирма;

        НоваяРасходнаяНакладная.Контрагент=Справочники.Контрагенты.НайтиПоКоду("000000001");

        НоваяРасходнаяНакладная.Склад=Справочники.Склады.ОсновнойСклад;

   

        //Заполняем табличную часть

        СтрокаТЧ=НоваяРасходнаяНакладная.ТЧТовары.Добавить();

        СтрокаТЧ.Товар=Справочники.Номенклатура.НайтиПоКоду("000000002");

        СтрокаТЧ.Цена=СтрокаТЧ.Товар.РозничнаяЦена;

        СтрокаТЧ.Количество= 2;

        СтрокаТЧ.Сумма=СтрокаТЧ.Цена*СтрокаТЧ.Количество;

   

        Попытка

                НоваяРасходнаяНакладная.Записать();

                Возврат 1;

        Исключение

                Возврат 0;

        КонецПопытки;

                                          

КонецФункции

Для 8.1:

Код 1C v 8.х

 

//Создаем документ Выплата, Документ будет создан и показан пользователю, Но НЕ ЗАПИСАН

НовДок = Документы.ЗарплатаКВыплатеОрганизаций.ПолучитьФормуНовогоДокумента(); 

НовДок.Дата=ТекущаяДата();

НовДок.Организация=Организация;

НовДок.ПериодРегистрации=ПериодРегистрации;

НовДок.ответственный= глЗначениеПеременной("глТекущийПользователь");

НовДок.Комментарий="Выплата за "+МесяцСтрока;

НовДок.ЭлементыФормы.Комментарий.Доступность=Ложь; 

Для Каждого ТекущаяСтрока Из ТаблицыЗначений Цикл  // заполним табличную часть документа, из ТаблицыЗначений

НС=НовДок.зарплата.добавить();	

нс.Авторасчет=истина;

нс.Физлицо = ТекущаяСтрока.Физлицо;

нс.ВыплаченностьЗарплаты=Перечисления.ВыплаченностьЗарплаты.НеВыплачено;

нс.сумма=ТекущаяСтрока.Результат; 

КонецЦикла;

НовДок.Открыть(); 



//Для создания и записи документа используется следующий код:

НовДок = Документы.РасходнаяНакладная.СоздатьДокумент();

НовДок.Дата=ТекущаяДата();

НовыйДок.УстановитьНовыйНомер();

НовДок.Организация=Организация;

НовДок.ПериодРегистрации=ПериодРегистрации;

НовДок.ответственный= глЗначениеПеременной("глТекущийПользователь");

НовДок.Комментарий="Выплата за "+МесяцСтрока;

НовДок.ЭлементыФормы.Комментарий.Доступность=Ложь; 

Для Каждого ТекущаяСтрока Из ТаблицыЗначений Цикл  // заполним табличную часть документа, из ТаблицыЗначений

НС=НовДок.зарплата.добавить();	

нс.Авторасчет=истина;

нс.Физлицо = ТекущаяСтрока.Физлицо;

нс.ВыплаченностьЗарплаты=Перечисления.ВыплаченностьЗарплаты.НеВыплачено;

нс.сумма=ТекущаяСтрока.Результат; 

КонецЦикла;

НовДок.Записать();



//Или так:

НовыйДок = Документы.ПеремещениеТоваров.СоздатьДокумент();

НовыйДок.Дата = ПолеВводаДаты;

НовыйДок.УстановитьВремя();

НовыйДок.УстановитьНовыйНомер();

// Формирование табличной части

Для Н=1 По N Цикл

    НоваяСтрока = НовыйДок.Товары.Добавить();

    НоваяСтрока.Номенклатура = СтрокаДанных.Номенклатура;

    // формируются другие реквизиты табличной части

КонецЦикла;

НовыйДок.Записать();

СписокДокументов.Добавить(НовыйДок.Ссылка);

Категория: Документы