:: Вопросы по 1С
Свести дебит с кредитом
Петров Андрей
Автор

Сообщений: 2506
Откуда: Химки (М.О.)
Дата регистрации: 17.04.2002
Товарищи помогите - есть такая задачка свести вместе дебит с кредитом.
Имеем следующее:
62.1 -> 90.1.1 - Оказание услуг
51 -> 62.1 - Списание денег с контрагента за услуги

Соотвественно нужно сматчить какая проводка какую гасила в итоге.
Сделать это можно вопрос пока у меня свелся вот к чему:

Когда открываем поводки 62.1 - 90.1.1 то внизу видим комментарий о том на основании какого счета они были сделаны.
Как бы его оттуда выцепить и распарсить на 2 поля номер счета и дата...

Картинка с примером:
Ratings: 0 negative/0 positive
Re: Свести дебит с кредитом
ssa

Сообщений: 12999
Откуда: Москва
Дата регистрации: 23.03.2005
М-да...
Документ.Основание.Наименование
Документ.Основание.ДатаДок


------------------
Лень - это неосознанная мудрость.
Ratings: 0 negative/0 positive
Re: Свести дебит с кредитом
Петров Андрей
Автор

Сообщений: 2506
Откуда: Химки (М.О.)
Дата регистрации: 17.04.2002
понял примерно идею.
Но не работает.

Делаю следующее (новый отчет в конфигураторе):
//*******************************************
Процедура Сформировать()
Перем Т, Опер;
Т = СоздатьОбъект("Таблица");
Т.ИсходнаяТаблица("Таблица");
Т.ВывестиСекцию("Шапка");
Опер = СоздатьОбъект("Операция");
Опер.ВыбратьОперации(ДатаС, ДатаПо);
Пока Опер.ПолучитьОперацию()=1 Цикл
Опер.ВыбратьПроводки();
Пока Опер.ПолучитьПроводку() = 1 Цикл
Если (Опер.Дебет.Счет = СчетПоКоду("62.1")) и (Опер.Кредит.Счет = СчетПоКоду("90.1.1")) Тогда
Т.ВывестиСекцию("Дебетовка");
КонецЕсли;
Если (Опер.Дебет.Счет = СчетПоКоду("51")) и (Опер.Кредит.Счет = СчетПоКоду("62.1")) Тогда
Т.ВывестиСекцию("Кредитовка");
КонецЕсли;
Если (Опер.Кредит.Счет = СчетПоКоду("60.2")) и (Опер.Дебет.Счет = СчетПоКоду("51")) Тогда
Т.ВывестиСекцию("Аванс");
КонецЕсли;
КонецЦикла;
КонецЦикла;
Т.ТолькоПросмотр(1);
Т.Показать()
КонецПроцедуры

Далее в таблице вывожу данные по проводкам.
Так вот для Дебетовой проводки как мне выцепить Основание документа?
Опер.Документ.Основание.НомерДок не проходит :-(
Ratings: 0 negative/0 positive
Re: Свести дебит с кредитом
PaulWist

Сообщений: 14601
Дата регистрации: 01.04.2004
Дык, Андрюх, ошибка-то какая?


------------------
Есть многое на свете, друг Горацио...
Что и не снилось нашим мудрецам.
(В.Шекспир Гамлет)
Ratings: 0 negative/0 positive
Re: Свести дебит с кредитом
Петров Андрей
Автор

Сообщений: 2506
Откуда: Химки (М.О.)
Дата регистрации: 17.04.2002
Поле агрегатного объекта не обнаружено (Основание)
Т.е. у операции которую я выбираю по периоду дат такого поля нет.
Ratings: 0 negative/0 positive
Re: Свести дебит с кредитом
ssa

Сообщений: 12999
Откуда: Москва
Дата регистрации: 23.03.2005
Петров Андрей
Поле агрегатного объекта не обнаружено (Основание)
Т.е. у операции которую я выбираю по периоду дат такого поля нет.
У операции такого поля и нет. Оно есть у Документа, к которому принадлежит операция.

------------------
Лень - это неосознанная мудрость.
Ratings: 0 negative/0 positive
Re: Свести дебит с кредитом
Петров Андрей
Автор

Сообщений: 2506
Откуда: Химки (М.О.)
Дата регистрации: 17.04.2002
Правильно. А операция линкуется к документу вот таким образом:
Опер.Документ.Основание.НомерДок

Т.е. при использовании этого линка получаем указанную ошибку

Вобщем это значение поля: Опер.Документ.Комментарий



Исправлено 1 раз(а). Последнее : Петров Андрей, 07.12.09 16:10
Ratings: 0 negative/0 positive


Извините, только зарегистрированные пользователи могут оставлять сообщения в этом форуме.

On-line: 3 (Гостей: 3)

© 2000-2024 Fox Club 
Яндекс.Метрика