Иллюстрированный самоучитель по языку системы 1С:Предприятие

Методы объектов "Дебет" и "Кредит"

Субконто

Обращение к субконто дебета/кредита проводки (корреспонденции) операции.

Синтаксис:

Субконто(<ПорядковыйНомерСубконто> | <ВидСубконто>, <Субконто>)

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

Subconto

Параметры:

<ПорядковыйНомерСубконто> Необязательный параметр. Числовое выражение – порядковый номер субконто. По умолчанию 1.
<ВидСубконто> Значение типа "Вид субконто".
<Су6конто> Необязательный параметр. Значение субконто. Если параметр не задан – значение не изменяется.

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

Если указан порядковый номер вида субконто или вид субконто, метод возвращает значение субконто.

Описание:

К любому счету или субсчету в плане счетов может быть "прикреплено" до 5 видов субконто. Максимальное количество видов субконто, которое можно "прикрепить" к счету, устанавливается в конфигураторе при редактировании свойств планов счетов. Количество субконто, которое реально прикреплено к счету, не превышает установленного максимального количества.

Все виды субконто, прикрепленные к счету в плане счетов, имеют порядковые номера. Эти номера выдаются в названии колонок для видов субконто в окне редактирования плана счетов; "Субконто1", "Субконто2" … "Субконто5".

Метод Субконто дебета/кредита проводки служит для получения и установки значения субконто по его номеру или виду соотвественно в дебете или в кредите проводки (коррепспонденции) операции.

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

Если при использовании метода Субконто первым параметром передается порядковый номер субконто или вид субконто, то метод возвратит значение субконто, имеющего этот номер.

Если вторым параметром передается значение субконто, метод присваивает указаное значение виду субконто проводки.

Пример:

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

Опер.НайтиОперацию(ВыбрДокумент);

Опер.ВыбратьПроводки();

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

Для Инд = 1 По Опер.Дебет.Счет.КоличествоСубконто() Цикл

Сообщить("Субконто " + Опер.Дебет.Субконто(Инд));

КонецЦикла;

КонецЦикла;
Если Вы заметили ошибку, выделите, пожалуйста, необходимый текст и нажмите CTRL + Enter, чтобы сообщить об этом редактору.