Имя: Пароль:
1C
1C 7.7
v7: Тест с проводкой
0 furia
 
11.01.12
07:14
Почему не правильно работает ?
т.е. Товар берется только первый из ТЧ, а так же из ТЗ1 берется только первая строка. ТЗ все заполнены проверял... ну а 3й цикл срабатывает как нужно...

   ВыбратьСтроки();
   ТЗ1.ВыбратьСтроки();
   ТЗ2.ВыбратьСтроки();
   Пока ПолучитьСтроку()=1 Цикл    
       Пока ТЗ1.ПолучитьСтроку()=1 Цикл
           АнД3 = ТЗ1.Группа;            
           Пока ТЗ2.ПолучитьСтроку()=1 Цикл
               Расчет = Сумма / ИтогоКол * ТЗ2.Кол;
               Если глПроводка(Контекст,Дт,АнД1,АнД2,АнД3,СчетУчета,Товар,ВыбСклад,,0,,,Расчет,Фирма)=0 Тогда
                   НеПроводитьДокумент();  Возврат;
               КонецЕсли;  
               Сообщить(ТЗ2.Кол);
           КонецЦикла;
           Сообщить(АнД3);
       КонецЦикла;
       Сообщить(Товар);
   КонецЦикла;                                  
   Операция.Записать();
1 povar
 
11.01.12
07:15
ВыбратьСтроки();
Пока ПолучитьСтроку()=1 Цикл
   ТЗ1.ВыбратьСтроки();
       Пока ТЗ1.ПолучитьСтроку()=1 Цикл
           АнД3 = ТЗ1.Группа;
   ТЗ2.ВыбратьСтроки();
           Пока ТЗ2.ПолучитьСтроку()=1 Цикл
2 furia
 
11.01.12
07:17
спасибо...
:(
Кaк может человек ожидaть, что его мольбaм о снисхождении ответит тот, кто превыше, когдa сaм он откaзывaет в милосердии тем, кто ниже его? Петр Трубецкой