привет все помогите пожалуйста с запросом
мне нужно док получить из запроса но он не получает
Процедура Сформировать()
   спрБанка = СоздатьОбъект("Справочник.БанковскиеСчета");
   Если Счет_62 = 1 Тогда
       
       Счет_62_ = СчетПоКоду("62");
   Иначе
       Счет_62_ = "";
   КонецЕсли;
   Если Счет_76 = 1 Тогда
       Счет_76_ = СчетПоКоду("76");
   Иначе
       Счет_76_ = "";
   КонецЕсли;
   счет = Счет_62_; //+ Счет_76_;
   //*******************************************
   Таб = СоздатьОбъект("Таблица");
   Таб.ВывестиСекцию("Шапка");
   Ит_1 = СоздатьОбъект("БухгалтерскиеИтоги");
   Ит_1.ИспользоватьСубконто(ВидыСубконто.Контрагенты);
   Ит_1.ВыполнитьЗапрос(НачМесяца(Дата_),КонМесяца(Дата_),СчетПоКоду("62"),,,,"Проводка");
   Ит_1.ВыбратьПериоды();
   Пока Ит_1.ПолучитьПериод() > 0 Цикл    
       Ит_1.ВыбратьСубконто();
       Пока Ит_1.ПолучитьСубконто() = 1 Цикл
       РачетныйСчет = "";
       СуммаОбщая   = "";
       СуммаПросроченная = "";
       Если Ит_1.СКД() <> 0 Тогда    
           спрБанка.ИспользоватьВладельца(Ит_1.Субконто().ТекущийЭлемент());
           Контрагент            = Ит_1.Субконто();
           УНП                   = Ит_1.Субконто().УНН;
           спрБанка.ВыбратьЭлементы();
           Пока спрБанка.ПолучитьЭлемент() = 1 Цикл
               Если Число(спрБанка.Код) = 1 Тогда
                   РачетныйСчет          = спрБанка.Наименование + ": р/с №" + СокрЛП(спрБанка.НомерСчета);
               Иначе
                   РачетныйСчет = "";
               КонецЕсли;
           КонецЦикла;
           СуммаОбщая            = Ит_1.СКД();
           СуммаПросроченная     =  Ит_1.Операция.ДатаОперации;
           Таб.ВывестиСекцию("Строка");
       КонецЕсли;
   КонецЦикла;
КонецЦикла;
   Таб.ПараметрыСтраницы(2, , , , , , , , , 1);
   Таб.Опции(0, 0, 6, 13, "дебиторская задолжность");
   Таб.ТолькоПросмотр(1);
   Таб.Показать("дебиторская задолжность");
КонецПроцедуры

Ит_1.ВыполнитьЗапрос(НачМесяца(Дата_),КонМесяца(Дата_),СчетПоКоду("62"),,,,"месяц");

если делать так то  заполняется все кроме  СуммаПросроченная     =  Ит_1.Операция.ДатаОперации;
почему

ВыбратьСчета()

это что в место периода?

(1) какая операция должна быть при периодичности "месяц"?

Процедура Сформировать()
   спрБанка = СоздатьОбъект("Справочник.БанковскиеСчета");
   Если Счет_62 = 1 Тогда
       
       Счет_62_ = СчетПоКоду("62");
   Иначе
       Счет_62_ = "";
   КонецЕсли;
   Если Счет_76 = 1 Тогда
       Счет_76_ = СчетПоКоду("76");
   Иначе
       Счет_76_ = "";
   КонецЕсли;
   счет = Счет_62_; //+ Счет_76_;
   //*******************************************
   Таб = СоздатьОбъект("Таблица");
   Таб.ВывестиСекцию("Шапка");
   Ит_1 = СоздатьОбъект("БухгалтерскиеИтоги");
   Ит_1.ИспользоватьСубконто(ВидыСубконто.Контрагенты);
   Ит_1.ВыполнитьЗапрос(НачМесяца(Дата_),КонМесяца(Дата_),СчетПоКоду("62"),,,,"Проводка");
   Ит_1.ВыбратьСчета();
   Пока Ит_1.ПолучитьСчет() > 0 Цикл    
       Ит_1.ВыбратьСубконто();
       Пока Ит_1.ПолучитьСубконто() = 1 Цикл
       РачетныйСчет = "";
       СуммаОбщая   = "";
       СуммаПросроченная = "";
       Если Ит_1.СКД() <> 0 Тогда    
           спрБанка.ИспользоватьВладельца(Ит_1.Субконто().ТекущийЭлемент());
           Контрагент            = Ит_1.Субконто();
           УНП                   = Ит_1.Субконто().УНН;
           спрБанка.ВыбратьЭлементы();
           Пока спрБанка.ПолучитьЭлемент() = 1 Цикл
               Если Число(спрБанка.Код) = 1 Тогда
                   РачетныйСчет          = спрБанка.Наименование + ": р/с №" + СокрЛП(спрБанка.НомерСчета);
               Иначе
                   РачетныйСчет = "";
               КонецЕсли;
           КонецЦикла;
           СуммаОбщая            = Ит_1.СКД();
           СуммаПросроченная     =  Ит_1.Операция.Документ.Вид();
           Таб.ВывестиСекцию("Строка");
       КонецЕсли;
   КонецЦикла;
КонецЦикла;
   Таб.ПараметрыСтраницы(2, , , , , , , , , 1);
   Таб.Опции(0, 0, 6, 13, "дебиторская задолжность");
   Таб.ТолькоПросмотр(1);
   Таб.Показать("дебиторская задолжность");
КонецПроцедуры

так колонка пустая

(5) не вместо, а ещё цикл добавь

(4) мне вообще нужно документ получить а из него уже реквизит что на форме дока лежит

а с переодичностью месяц проводка документ я просто пробовал и не чего не получается

так ит_1.ВыбратьПериод(); в отладчике = 0
цикл перд ним ставить?

(10) тебе надо по всем контрагентам вместе или перебрать их нужно?

по всем

только два счета 76 и 62

блин ну что ж такое то ни как не получается

(12) тогда убери вот это:

//Ит_1.ИспользоватьСубконто(ВидыСубконто.Контрагенты);

а следом и цикл
Ит_1.ВыбратьСубконто();
       Пока Ит_1.ПолучитьСубконто() = 1 Цикл
правильно?

(16) а, стоп. не заметил этого цикла

а как же я получу контрагента?

(16) ну, закомментируй, попробуй. Странно, что он у тебя периоды не выбирает

(18) тэкс. значит всё-таки надо не по всем

в том то и дело что странно

после коментирования ругается на контрагента

может тебе надо не счета перебирать, а корсчета?

спрБанка.ИспользоватьВладельца(Ит_1.Субконто().ТекущийЭлемент());
           Контрагент            = Ит_1.Субконто();
           УНП                   = Ит_1.Субконто().УНН;
           спрБанка.ВыбратьЭлементы();
           Пока спрБанка.ПолучитьЭлемент() = 1 Цикл
               Если Число(спрБанка.Код) = 1 Тогда
                   РачетныйСчет          = спрБанка.Наименование + ": р/с №" + СокрЛП(спрБанка.НомерСчета);
               Иначе
                   РачетныйСчет = "";
               КонецЕсли;
           КонецЦикла;

(22) а периоды вбирает?

выбирает?

нет!

так мой код правильный?

он вообще период выбирать отказывается

Процедура Сформировать()
   спрБанка = СоздатьОбъект("Справочник.БанковскиеСчета");
   Если Счет_62 = 1 Тогда
       
       Счет_62_ = СчетПоКоду("62");
   Иначе
       Счет_62_ = "";
   КонецЕсли;
   Если Счет_76 = 1 Тогда
       Счет_76_ = СчетПоКоду("76");
   Иначе
       Счет_76_ = "";
   КонецЕсли;
   счет = Счет_62_; //+ Счет_76_;
   //*******************************************
   Таб = СоздатьОбъект("Таблица");
   Таб.ВывестиСекцию("Шапка");
   Ит_1 = СоздатьОбъект("БухгалтерскиеИтоги");
   Ит_1.ИспользоватьСубконто(ВидыСубконто.Контрагенты);
   Ит_1.ВыполнитьЗапрос(НачМесяца(Дата_),КонМесяца(Дата_),СчетПоКоду("62"),,,,"Проводка");
   //Ит_1.ВыбратьСчета();
   //Пока Ит_1.ПолучитьСчет() > 0 Цикл
       Ит_1.ВыбратьПериоды();
       Пока Ит_1.ПолучитьПериод() > 0 Цикл
       //Ит_1.ВыбратьСубконто();
       //Пока Ит_1.ПолучитьСубконто() = 1 Цикл
       РачетныйСчет = "";
       СуммаОбщая   = "";
       СуммаПросроченная = "";
       Если Ит_1.СКД() <> 0 Тогда    
       //    спрБанка.ИспользоватьВладельца(Ит_1.Субконто().ТекущийЭлемент());
       //    Контрагент            = Ит_1.Субконто();
       //    УНП                   = Ит_1.Субконто().УНН;
       //    спрБанка.ВыбратьЭлементы();
       //    Пока спрБанка.ПолучитьЭлемент() = 1 Цикл
       //        Если Число(спрБанка.Код) = 1 Тогда
       //            РачетныйСчет          = спрБанка.Наименование + ": р/с №" + СокрЛП(спрБанка.НомерСчета);
       //        Иначе
       //            РачетныйСчет = "";
       //        КонецЕсли;
       //    КонецЦикла;
           СуммаОбщая            = Ит_1.СКД();
           СуммаПросроченная     =  Ит_1.Операция.Документ.Вид();
           Таб.ВывестиСекцию("Строка");
   КонецЕсли;
   КонецЦикла;
//КонецЦикла;
//КонецЦикла;
   Таб.ПараметрыСтраницы(2, , , , , , , , , 1);
   Таб.Опции(0, 0, 6, 13, "дебиторская задолжность");
   Таб.ТолькоПросмотр(1);
   Таб.Показать("дебиторская задолжность");
КонецПроцедуры

(29) таблица пустая! Ит_1.ВыбратьПериоды() = 0

что делать?

что за фантаст код?
 Если Счет_62 = 1 Тогда
       
       Счет_62_ = СчетПоКоду("62");
   Иначе
       Счет_62_ = "";
   КонецЕсли;
   Если Счет_76 = 1 Тогда
       Счет_76_ = СчетПоКоду("76");
   Иначе
       Счет_76_ = "";
   КонецЕсли;
   счет = Счет_62_; //+ Счет_76_;

включатьсубсчета где?

//Если Счет_62 = 1 Тогда
       
    //   Счет_62_ = СчетПоКоду("62");
 //  Иначе
   //    Счет_62_ = "";
 //  КонецЕсли;
 //  Если Счет_76 = 1 Тогда
   //    Счет_76_ = СчетПоКоду("76");
 //  Иначе
   //    Счет_76_ = "";
  // КонецЕсли;
  // счет = Счет_62_; //+ Счет_76_;

это что то изменит

(35) если 62 - это группа, то да

как связяно СКД и период "Операция"
ЖКК в помощь

мне нужно получить документ а не связовать СКД с Операцией

БИ.Операция.Документ.ТекущийДокумент()
если не забыл еще )

Таб = СоздатьОбъект("Таблица");
   Таб.ВывестиСекцию("Шапка");
   Ит_1 = СоздатьОбъект("БухгалтерскиеИтоги");
   Ит_1.ИспользоватьСубконто(ВидыСубконто.Контрагенты);
   Ит_1.ВыполнитьЗапрос(НачМесяца(Дата_),КонМесяца(Дата_),СчетПоКоду("62"),,,,"Проводка");
   //Ит_1.ВыбратьСчета();
   //Пока Ит_1.ПолучитьСчет() > 0 Цикл
       Ит_1.ВыбратьПериоды();
       Пока Ит_1.ПолучитьПериод() > 0 Цикл
       //Ит_1.ВыбратьСубконто();
       //Пока Ит_1.ПолучитьСубконто() = 1 Цикл
       РачетныйСчет = "";
       СуммаОбщая   = "";
       СуммаПросроченная = "";
       Если Ит_1.СКД() <> 0 Тогда    
       //    спрБанка.ИспользоватьВладельца(Ит_1.Субконто().ТекущийЭлемент());
       //    Контрагент            = Ит_1.Субконто();
       //    УНП                   = Ит_1.Субконто().УНН;
       //    спрБанка.ВыбратьЭлементы();
       //    Пока спрБанка.ПолучитьЭлемент() = 1 Цикл
       //        Если Число(спрБанка.Код) = 1 Тогда
       //            РачетныйСчет          = спрБанка.Наименование + ": р/с №" + СокрЛП(спрБанка.НомерСчета);
       //        Иначе
       //            РачетныйСчет = "";
       //        КонецЕсли;
       //    КонецЦикла;
           СуммаОбщая            = Ит_1.СКД();
           СуммаПросроченная     =  Ит_1.Операция.Документ.ТекущийДокумент().Вид();
           Таб.ВывестиСекцию("Строка");
   КонецЕсли;
   КонецЦикла;
//КонецЦикла;
//КонецЦикла;
   Таб.ПараметрыСтраницы(2, , , , , , , , , 1);
   Таб.Опции(0, 0, 6, 13, "дебиторская задолжность");
   Таб.ТолькоПросмотр(1);
   Таб.Показать("дебиторская задолжность");
КонецПроцедуры




таблица пустая   Ит_1.ВыбратьПериоды() =0

что ни кто не поможет?

Ит_1.Операция.Документ.ТекущийДокумент() //пустое значение

вот Вы мне объясните, для чего после выборки по виду "Операция" необходимо получить значение СКД()?

аук люди не бросайте меня одного

вот задание что мне нужно было сделать

Отчет по дебеторской задолжности
Должн онализировать задолжность по 62 и 76  счетам на дату
реквизиты формы
1.    Наименование субконто 1
2.    Унп субконто1. унн
3.    Банковские ревизиты (основ расчет счет , наименование, кодбанка) найти по контрагенту
4.    Сумма задолжности общая (с итогом по колонке) СКД
5.    Сумма задолжности просроч(датадок + дней для требов) из накладной

а где у меня выборка по виду операция?

да и на сколько у меня оброзования хватает  я думаю что если б СКД мешало то оно было бы равно 0 а колонка которая у меня пустая  заполнялась бы данными а вот почему запрос не хочет отдать мне документ на это образования у меня не хватает что бы понять

блин меня акоро забанят помогите мне пожалуйста

что за конфигурация?
Я повторю свой вопрос - Как Вы хотите получить СКД() по операции?!
Поймите - это не аналитика БИ!

конфигурация =  sway
Я повторю свой вопрос - Как Вы хотите получить СКД() по операции?!
Поймите - это не аналитика БИ!
//я вас не понимаю

5.    Сумма задолжности просроч(датадок + дней для требов) из накладной
Как это реализовано в Вашей конфигурации - документ - это субконто?

Сейчас все начнут советовать, я в принципе поддержу - "Переходите на 8-ку"

+(51) как узнать, что оплата прошла или не прошла именно по данному документу?

вот на 8 -ке у меня проблем нет!! а на 7 есть

да именно по скд!

или если док проведен!

та млять!
счет 62 имеет какие субконто?

СчетПоКоду("62") = Расчеты с покупателями и заказчиками
СчетПоКоду("76") = Расчеты с разными дебиторами и кредиторами

одно Контрагенты

еще немного и начну зарабатывать больше 8-шников )

давай

счета и есть факт оплаты!

и?
Итоги формируются только по данной аналитике. Повторю, как вы хотите получить итоги по документам? Может у вас какой-то регистр прикручен для отслеживания оплаты по документам? я ж не знаю...

да  Сумма задолжности просроч по из дока а  Сумма задолжности общая СКД!

регистров нет были бы зделал сам у меня с БИ проблемы а с регистрами нет

ТЗ = СоздатьОбъект("ТаблицаЗначений");
   ТЗ.НоваяКолонка("Контрагент");
   ТЗ.НоваяКолонка("ДолгОбщий","Число");
   ТЗ.НоваяКолонка("ДолгПросроченный","Число");
   
   Ит_1 = СоздатьОбъект("БухгалтерскиеИтоги");
   Ит_1.ИспользоватьСубконто(ВидыСубконто.Контрагенты);  
   Ит_1.ВключатьСубсчета(0);
   Ит_1.ВыполнитьЗапрос(НачМесяца(Дата_),КонМесяца(Дата_),"62",,,,"Операция");
   Ит_1.ВыбратьСубконто(ВидыСубконто.Контрагенты);
   Пока Ит_1.ПолучитьСубконто(ВидыСубконто.Контрагенты) = 1 Цикл  
       СуммаДолгаОбщая = Ит_1.СКД() - Ит_1.СКК();
       Если СуммаДолгаОбщая = 0 Тогда
           Продолжить;
       КонецЕсли;
       ТЗ.НоваяСтрока();
       ТЗ.Контрагент = Ит_1.Субконто(1);
       ТЗ.ДолгОбщий = СуммаДолгаОбщая;
       
       СуммаДолгаПросроченная = 0;
       Ит_1.ВыбратьПериоды();
       Пока Ит_1.ПолучитьПериод() = 1 Цикл  
           Сообщить(ТЗ.Контрагент);
           Сообщить(Ит_1.Операция.Документ.ТекущийДокумент());
           Сообщить(Ит_1.СКД());
       КонецЦикла;    
   КонецЦикла;    

Посмотрите данный код.
Вы получите СКД после каждой операции, только ОПЯТЬ! повторю вопрос - как определить оплату/не оплату по документу?!

значит так сночало  запрос получает наименование контрагента затем его унн затем расчетный счет контрагента затем скд затем  получает из текущего дока реквизиты датадок и ДнейТребования затем если ДатаДок + ДнейТребования < КонМесяца(Дата_) тогда сумма из дока

зачем мне ее определять факт данных на счету 62 и 76 и есть оплата!

Зарубите на носу - с такой аналитикой на счете 62 это невозможно

заведите вторую аналитику "Документ" и ведите партионный учет по документам. Тогда Ващи возможности учета увеличаться.

(68) почему

+(65) попробовал Ит_1.ВыбратьПериоды() =0

скажу как 8-ку - нет измерения "Документ" или регистратора

(71) за указанный период есть документы движения по контрагентам?

ладно всем спосибо нашел выход буду анализировать другой счет у которого есть несколько субконто и второе из низ док

(73) если б небыло то и ветки небыло

может так выбратьПериоды(,,,1)