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

УстановитьВремя

Задает время текущей операции.

Синтаксис:

УстановитьВремя(<Часы>, <Минуты>, <Секунды>)

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

SetTime

Пареметры:

<Часы>

Необязательный параметр. Число — час операции.

<Минуты>

Необязательный параметр. Число — минуты опе­рации.

<Секунды>

Необязательный параметр. Число — секунды опе­рации.

Описание:

Метод УстановитьВремя изменяет время операции.

Данный метод может использоваться только для объектов, созданных функцией СоздатьОбъект. Так как время является значением относящимся к документу, то вызов этого метода изменяет время собственно документа, кото­рому принадлежит операция.

Пример:

Перем Час;

Перем Минута;

Перем Секунда;

Опер = СоздатьОбъект("Операция");

Опер.ВыбратьОперации(ДатаНач, ДатаКон);

Пока Опер.ПолучитьОперацию() = 1 Цикл

Опер.ПолучитьВремя(Час, Минута, Секунда);

Опер.УстановитьВремя(Час + 1, Минута, Секунда);

КонецЦикла;

ПолучитьДокумент

Возвращает значение типа «Документ» содержащий документ, кото­рому принадлежит операция.

Синтаксис:

ПолучитьДокумент()

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

GetDocument

Возвращаемое значение:

Значение типа «Документ».

Описание:

Метод ПолучитьДокумент возвращает значение типа «Документ» содер-жащий документ, которому принадлежит операция. Его следует использовать, если нужно передать какому либо методу или запомнить в переменную значе­ние типа документ операции. Для доступа к данным документа непосредствен­но из объекта типа «Операция» следует использовать атрибут объекта «Доку­мент».

Пример:

Опер = СоздатьОбъект("Операция");

Док = СоздатьОбъект("Документ");

Опер.ВыбратьОперации(ДатаНач, ДатаКон);

Пока Опер.ПолучитьОперацию() = 1 Цикл

Сообщить("Номер " = Опер.Документ.Номер);

Док.НайтиДокумент(Опер.ПолучитьДокумент());

КонецЦикла;

ВключитьПроводки

Включает/выключает проводки операции.

Синтаксис:

ВключитьПроводки(<Флаг>)

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

EntriesOn

Пареметры:

<Флаг>

Необязательный параметр. 1 — включить провод­ки операции. 0 — выключить проводки операции. Если параметр не передан — состояние не изменя­ется.

Возвращаемое значение:

Состояние на момент вызова метода. 1 — проводки операции включены; 0 — проводки операции выключениы.

Описание:

Для каждой бухгалтерской операции может быть выполнено выключение проводок. Это значит, что проводки остаются, но исключаются из итогов. Эти действия могут выполняться пользователем интерактивно и методом ВключитьПроводки для объекта типа «Операция».

Данный метод может использоваться только для объектов, созданных функцией СоздатьОбъект. Изменяется состояние всех выбранной проводок операции одноврменно.

Пример:

Опер = СоздатьОбъект("Операция");

Опер.ВыбратьОперации(ДатаНач, ДатаКон);

Пока Опер.ПолучитьОперацию() = 1 Цикл

Опер.ВключитьПроводки(0);

КонецЦикла;

НоваяПроводка

Создать новую проводку.

Синтаксис:

НоваяПроводка()

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

NewEntry

Описание:

Метод создает новую проводку для текущей операции. Новая проводка ста­новится текущей.

Во-первых, метод может быть вызван для объекта «Операция», созданного функцией СоздатьОбъект, при создании или изменении операции принад­лежащей документу специального вида «Операция».

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

Созданная проводка будет записана и повлечет изменения в бухгалтерских итогах после вызова метода операции Записать.

Пример:

* Создание и запись новой операции созданной в модуле отчета или обработки

Опер = СоздатьОбъект("Операция");

Опер.Новая();

Опер.Дата = РабочаяДата();

Опер.Содержание = "Деньги по чеку";

Опер.НоваяПроводка();

Опер.Дебет.Счет = СчетПоКоду("5 0");

Опер.Кредит.Счет = СчетПоКоду("51");

Опер.Сумма = 1000000;

Опер.Записать();

* Запись операции в модуле документа в процессе проведения

Процедура ОбработкаПроведения()

Операция.Содержание = "Выдача денег из кассы";

Операция.НоваяПроводка();

Операция.Дебет.Счет = СчетПоКоду("71");

Операция.Дебет.Сотрудники = Сотрудник;

Операция.Кредит.Счет = СчетПоКоду("50");

Операция.Сумма = СуммаВыдачи;

Операция.Записать();

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

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