| 0
    
        DeeK   06.07.12✎ 00:14 | 
        ребята извиняюсь за тупой вопрос но подскажите как перебрать все проводки документов "Операция" в 7.7
 
 оп = создатьобъект("операция");
 
 оп.ВыбратьОперацииСПроводками(нач,кон,,,,,,);
 Пока оп.Получитьпроводку()=1 Цикл
 
 ТЗ.НоваяСтрока();
 ТЗ.дата = оп.датаоперации;
 попытка
 ТЗ.содержание = оп.содержание;
 исключение
 конецпопытки;
 ТЗ.сумма = оп.сумма;
 ТЗ.дт = оп.дебет.счет;
 ТЗ.субконто1 = оп.дебет.субконто(1,);
 ТЗ.субконто2 = оп.дебет.субконто(2,);
 ТЗ.субконто3 = оп.дебет.субконто(3,);
 ТЗ.кт = оп.кредит.счет;
 ТЗ.субконто1кт = оп.кредит.субконто(1,);
 ТЗ.субконто2кт = оп.кредит.субконто(2,);
 ТЗ.субконто3кт = оп.кредит.субконто(3,);
 
 КонецЦикла;
 
 пытасю так, но похоже что выбирает вообще все проводки за период
 |  | 
    
        | 1
    
        DeeK   06.07.12✎ 01:13 | 
        разобрался
 
 Док=СоздатьОбъект("Документ.Операция");
 
 нач = дата("01.01.2012");
 кон = дата("31.12.2012");
 Док.ВыбратьДокументы(нач,кон);
 
 Пока Док.ПолучитьДокумент()=1 Цикл
 
 оп = создатьобъект("операция");
 
 
 Оп.НайтиОперацию(док);
 
 Оп.ВыбратьПроводки();
 
 Пока Оп.ПолучитьПроводку() = 1 Цикл
 
 ТЗ.НоваяСтрока();
 ТЗ.дата = оп.датаоперации;
 
 ТЗ.содержание = оп.содержание;
 
 ТЗ.сумма = оп.сумма;
 ТЗ.дт = оп.дебет.счет;
 ТЗ.субконто1 = оп.дебет.субконто(1,);
 ТЗ.субконто2 = оп.дебет.субконто(2,);
 ТЗ.субконто3 = оп.дебет.субконто(3,);
 ТЗ.кт = оп.кредит.счет;
 ТЗ.субконто1кт = оп.кредит.субконто(1,);
 ТЗ.субконто2кт = оп.кредит.субконто(2,);
 ТЗ.субконто3кт = оп.кредит.субконто(3,);
 
 КонецЦикла;
 конеццикла;
 |  |