- 01
- 02
- 03
- 04
- 05
- 06
- 07
- 08
- 09
- 10
- 11
- 12
- 13
- 14
- 15
- 16
- 17
- 18
- 19
- 20
- 21
- 22
- 23
- 24
- 25
ВыборкаИсточник = РезультатЗапроса.Выбрать(ОбходРезультатаЗапроса.ПоГруппировкам);
Пока ВыборкаИсточник.Следующий() Цикл
ВыборкаВнутреннийЗаказ = ВыборкаИсточник.Выбрать(ОбходРезультатаЗапроса.ПоГруппировкам);
Пока ВыборкаВнутреннийЗаказ.Следующий() Цикл
ВыборкаВнешнийЗаказ = ВыборкаВнутреннийЗаказ.Выбрать(ОбходРезультатаЗапроса.ПоГруппировкам);
Пока ВыборкаВнешнийЗаказ.Следующий() Цикл
ВыборкаПоступление = ВыборкаВнешнийЗаказ.Выбрать(ОбходРезультатаЗапроса.ПоГруппировкам);
Пока ВыборкаПоступление.Следующий() Цикл
ВыборкаКЕ = ВыборкаПоступление.Выбрать(ОбходРезультатаЗапроса.ПоГруппировкам);
Пока ВыборкаКЕ.Следующий() Цикл
ВыборкаНоменклатура = ВыборкаКЕ.Выбрать(ОбходРезультатаЗапроса.ПоГруппировкам);
Пока ВыборкаНоменклатура.Следующий() Цикл
ВыборкаХарактеристика = ВыборкаНоменклатура.Выбрать(ОбходРезультатаЗапроса.ПоГруппировкам);
Пока ВыборкаХарактеристика.Следующий() Цикл
ВыборкаСерийныйНомер = ВыборкаХарактеристика.Выбрать(ОбходРезультатаЗапроса.ПоГруппировкам);
Пока ВыборкаСерийныйНомер.Следующий() Цикл
ПроверитьНехватку(ВыборкаСерийныйНомер, Отказ, "складе числится");
Конфа Итилиум, редакция 4.4 (4.4.2.3). Проведение документа.... таких циклов два.....
смотри 1c 7.7 телепат
http://openconf.1cpp.ru/plugins/telepat/
http://www.1cpp.ru/docum/html/1cpp.html
http://www.1cpp.ru/index.php/Main
как-только нормальные программисты не извращались, чтоб привести ее к божескому виду...
Судя по названиям переменных, проверяется остаток номенклатуры по сериям, а это довольно простая задачка, раписаная на множестве форумов и сайтов, если уж у самого автора "тяму" не хватило, мог бы и глянуть.
Автор просто нажал "Оk" и не стал думать о последствиях.