Форум 1С
Программистам, бухгалтерам, администраторам, пользователям
Задай вопрос - получи решение проблемы
11 дек 2024, 21:23

Вопрос по "операции"

Автор didigo, 18 апр 2012, 09:36

0 Пользователей и 1 гость просматривают эту тему.

didigo

После проведения документа, в операциях субконто Кт и Дб почему то не показывает...
спасибо...

Пока ПолучитьСтроку() = 1 Цикл
Операция.НоваяПроводка();
Операция.Дебет.Счет = Сотрудник.Подразделение.Получить(ДатаДок).СчетЗатрат;

Спр.ВыбратьЭлементы();
Пока Спр.ПолучитьЭлемент()=1 Цикл
Если Спр.Текущийэлемент().Наименование = "Начислена зарплата" Тогда
Операция.Дебет.ЭлементыЗатрат = Спр.ТекущийЭлемент();
// Иначе Операция.Дебет.ЭлементыЗатрат = Справочники.ЭлементыЗатрат;
КонецЕсли;
КонецЦикла;

Операция.Кредит.Счет = Сотрудник.Подразделение.Получить(ДатаДок).СчетЗП;
Операция.Кредит.Сотрудники = Сотрудник;
Операция.Кредит.Подразделения = Сотрудник.Подразделение.Получить(ДатаДок);
Операция.Сумма = Начислено;
Операция.СодержаниеПроводки = "Начислено";
Операция.НомерЖурнала = "ЗП"; 

Операция.НоваяПроводка();
    Операция.Кредит.Сотрудники = Сотрудник;
Операция.Кредит.Подразделения = Сотрудник.Подразделение.Получить(ДатаДок);
Операция.Дебет.Счет = СчетПоКоду(681.2);
Операция.Кредит.Счет = СчетПоКоду(653.1);
Операция.Сумма = ОПВ;
Операция.СодержаниеПроводки = "ОПВ";
Операция.НомерЖурнала = "ЗП";

Операция.НоваяПроводка();
Операция.Кредит.Сотрудники = Сотрудник;
Операция.Кредит.Подразделения = Сотрудник.Подразделение.Получить(ДатаДок);
Операция.Дебет.Счет = СчетПоКоду(681.2);
Операция.Кредит.Счет = СчетПоКоду(862);
Операция.Сумма = СуммаШтрафа;
Операция.СодержаниеПроводки = "СуммаШтрафа";
Операция.НомерЖурнала = "ЗП";
КонецЦикла;   

sergejK74

Документ хотя бы проводится?
        Операция.НоваяПроводка();
        Операция.Кредит.Сотрудники = Сотрудник;
        Операция.Кредит.Подразделения = Сотрудник.Подразделение.Получить(ДатаДок);
        Операция.Дебет.Счет = СчетПоКоду(681.2);
        Операция.Кредит.Счет = СчетПоКоду(653.1);

Если так располагать выбор счета и субконто, то система должна ругаться на Для счета  вид субконто Сотрудники неопределен!

Тип значения у субконто определен?
СчетПоКоду(681.2) код счета кажется в кавычках пишется?

Кнопочка Спасибо - слева!

didigo

Документ без этого проводится!

                Операция.Кредит.Сотрудники = ТекущийЭлемент(Сотрудник);
      Операция.Кредит.Подразделения = Сотрудник.Подразделение.Получить(ДатаДок);

И в операциях вместо Субконто Дб Кт <...>

sergejK74

Посмотри отладчиком что возвращает Сотрудник.Подразделение.Получить(ДатаДок);
Кнопочка Спасибо - слева!

didigo

Цитата: sergejK74 от 18 апр 2012, 10:37
Посмотри отладчиком что возвращает Сотрудник.Подразделение.Получить(ДатаДок);
Спасибо, Сергей большое за помощь! разобрался! Просто в счетах Субконто был не указанным!

Теги:

Похожие темы (2)

Рейтинг@Mail.ru

Поиск