Добавил:
Upload Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз: Предмет: Файл:
1C_pr77_Lang2.doc
Скачиваний:
7
Добавлен:
20.11.2019
Размер:
2.52 Mб
Скачать

Атрибуты журнала расчетов Документ

Документ-основание текущей записи журнала расчетов.

Синтаксис:

Документ

Англоязычный синоним:

Document

Описание:

Атрибут типа «Документ». Ссылка на документ, на основании которого данная запись (расчет) введена в журнал расчетов. Это может быть, например, документ «Больничный лист», породивший одну или несколько записей с ви­дом расчета «Оплата больничного листа».

Этот атрибут журнала расчетов заполняется в момент проведения докумен­та ссылкой на этот документ, в случае использования методов ВвестиРасчет, ВвестиПерерасчет, ЗаписатьРасчет, или ссылкой на другой документ, в случае использования методов ВвестиРасчетНаОсновании, ЗаписатьРасчетНаОсновании, ВвестиПерерасчетНаОсновании (см. ни­же).

Атрибут Документ предназначен только для чтения.

Пример:

Процедура ПровестиРасчет()

Календ = Объект.Категория.Получить(ДатаНачала).Календарь;

Дней = Календ.Дней(ДатаНачала, ДатаОкончания);

Если ОткрытДок(Документ) = 0 Тогда

РассчитатьСреднюю(Документ, Константа.МесСреднБЛ,

ГруппаРасчетов.СредняяДляБЛ, 0);

КонецЕсли;

// среднюю зарплату берем из документа породившего расчет

Результат =Окр(Дней * Документ.СрЗарплата);

Дни = ?(Сторно = 1, -Дней, Дней);

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

См. также: ВвестиРасчет, ЗаписатьРасчет, ВвестиПерерасчет, ЗаписатьРасчетНаОсновании, ВестиРасчетНаОсновании, ВвестиПерерасчетНаОсновании

РодительскийДокумент

Документ, который ввел данную запись в журнал расчетов.

Синтаксис:

РодительскийДокумент

Англоязычный синоним:

ParentDocument

Описание:

Атрибут типа «Документ». Ссылка на документ расчета, который ввел дан­ную запись (расчет) журнала расчетов.

В момент проведения документа, при вводе новых записей в журнал расче­тов любым способом, атрибут РодительскийДокумент заполняется ссылкой на тот документ, который проводится.

Атрибут РодительскийДокумент предназначен только для чтения.

Пример:

ЖР = СоздатьОбъект("ЖурналРасчетов.Зарплата");

ЖР.ВыбратьЗаписиПоОбъекту();

Пока ЖР.ПолучитьЗапись() = 1 Цикл

Если (ЖР.ВидРасч = ВидРасчета.ПоОкладу) И

(ЖР.РодительскийДокумент.Вид() <> "НачалоМесяца") Тогда

СообщитьОПерерасчете();

КонецЕсли;

КонецЦикла;

См. также: ВвестиРасчет, ЗаписатьРасчет, ВвестиПерерасчет, ЗаписатьРасчетНаОсновании, ВвестиРасчетНаОсновании, ВвестиПерерасчетНаОсновании

Объект

Элемент справочника, для которого введена данная запись журнала расчетов.

Синтаксис:

Объект

Англоязычный синоним:

Object

Описание:

Атрибут типа «Справочник». Ссылка на конкретный элемент того справоч­ника, который при конфигурировании журнала расчетов задан как список объ­ектов расчета (справочник объектов расчета). К этому конкретному элементу справочника имеет отношение данная запись (расчет) журнала расчетов.

Атрибут Объект предназначен только для чтения.

Пример:

// Расчет профвзносов

Процедура ПровестиРасчет()

// объект расчета — сотрудник

Если Объект.Профсоюз.Получить(ДатаОкончания) = Да Тогда

// Зануляем результат перед расчетом для того,

// чтобы не учитывать его при расчете уже взятого налога!!!

Результат = 0;

// Журнал расчетов

ЖР = СоздатьОбъект("ЖурналРасчетов.Зарплата");

ЖР.ВыбратьЗаписиПоОбъекту(Объект, ЖР.НачалоПериодаПоДате(ДатаНачала),

ЖР.КонецПериодаПоДате(ДатаНачала));

Облагаем = 0;

УжеВзяли = 0;

Группа = ГруппаРасчетов.ОблагаетсяПроф;

Пока ЖР.ПолучитьЗапись() > 0 Цикл

Если ЖР.ВидРасч.ВходитВГруппу(Группа) = 1 Тогда

Облагаем = Облагаем + ЖР.Результат;

ИначеЕсли ЖР.ВидРасч = ВидРасчета.ПрофВзносы Тогда

УжеВзяли = УжеВзяли + ЖР.Результат;

КонецЕсли;

КонецЦикла;

Результат = Окр(Константа.ПроцентПроф.Получить(ДатаНачала) / 100 *

Облагаем - УжеВзяли);

Иначе

Результат = 0;

КонецЕсли;

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

См. также: ВыбратьПериодПоОбъекту, ВыбратьЗаписиПоОбъекту

Соседние файлы в предмете [НЕСОРТИРОВАННОЕ]