Хостинг Портала RusFAQ.ru:
MosHoster.ru - Профессиональный хостинг на Windows 2008

РАССЫЛКИ ПОРТАЛА RUSFAQ.RU

Чемпионы рейтинга экспертов в этой рассылке

Faustofel Статус: 6-й класс Рейтинг: 52 ∙ повысить рейтинг >>

Бородин Константин Игоревич Статус: 8-й класс Рейтинг: 45 ∙ повысить рейтинг >>

Владимир Лазурко Статус: Практикант Рейтинг: 40 ∙ повысить рейтинг >>

/ КОМПЬЮТЕРЫ И ПО / Языки программирования / 1С для программиста

Выпуск № 971
от 13.03.2009, 12:01

Вопрос № 161830: как стандартными способами можно посмотреть содержание и движение регистра?...

Вопрос № 161.830

как стандартными способами можно посмотреть содержание и движение регистра?

Отправлен: 02.03.2009, 17:06 Вопрос задала: Vechkova (статус: Посетитель) Всего ответов: 1 Мини-форум вопроса >>> (сообщений: 0)

Отвечает: Анатолий Ясень Здравствуйте, Vechkova! если платформа 7.7, то: 1. Для просмотра движений выбранного документа следует выбрать пункт меню "Действия - Движения документа" и выбрать тот регистр, который нужно просмотреть. 1а. В типовых конфигурациях удобнее воспользоваться кнопкой "Действия - Отчет о движениях документа" 2. Для просмотра всего регистра в целом удобен универсальный отчет "Универсальный отчет: Отчет по регистру" (файл REGPRINT.ERT на диске ИТС) если платформа 8, то: 1. Для просмотра движений выбранного документа следует воспользоваться кнопкой "Перейти - (название нужного регистра)" или "Результат проведения документа". 2. Для просмотра всего регистра в целом в типовых конфигурациях можно воспользоваться одним из следующих универсальных отчетов: * "Список/кросс таблица" * "Универсальный отчет" * "Универсальный отчет (по регистрам, документам, справочникам)" 3 . Регистр "в исходном виде" доступен через меню "Операции - Регистры накопления (сведений, бухгалтерии)" --------- Только вперед!

Ответ отправил: Анатолий Ясень (статус: 7-й класс) Ответ отправлен: 02.03.2009, 17:47 Как сказать этому эксперту "спасибо"? Отправить SMS #thank 244860 на номер 1151 (Россия) | Еще номера >> Отправить WebMoney: Неплохо (10 руб.) Хорошо (15 руб.) Отлично (20 руб.) БЛЕСТЯЩЕ! (30 руб.) Вам помогли? Пожалуйста, поблагодарите эксперта за это!

Вопрос № 161.887

Здравствуйте. ЗиК 285 релиз. Месяц февраль 2009. В календаре на "40 часовая рабочая неделя" вбито 152 рабочих часа. Система оплаты сотрудника ХХХ "Повременно-премиальная по окладу согласно табеля (по часам)". В табеле фактически отработано 155 часов, в том числе 3 часа сверх нормы. По смыслу в расчетном листке должны быть 152 часа с такой то суммой и 3 часа сверхурочных с такой то, ну или 155 часов с суммой включающей в себя сумму 3-х сверхурочных часов. А у меня 155 часов и отдельно сверху 3 часа ночных. Помогите, не пойму где грабли.... P.S. Надеюсь понятно написал...

Отправлен: 03.03.2009, 09:27 Вопрос задал: kaban (статус: 1-й класс) Всего ответов: 1 Мини-форум вопроса >>> (сообщений: 2)

Отвечает: Анатолий Ясень Здравствуйте, kaban! Вероятно, ошибка заполнения табеля. Вы можете приложить скриншоты табеля и расчетного листка? --------- Только вперед!

Ответ отправил: Анатолий Ясень (статус: 7-й класс) Ответ отправлен: 04.03.2009, 16:15 Как сказать этому эксперту "спасибо"? Отправить SMS #thank 245031 на номер 1151 (Россия) | Еще номера >> Отправить WebMoney: Неплохо (10 руб.) Хорошо (15 руб.) Отлично (20 руб.) БЛЕСТЯЩЕ! (30 руб.) Вам помогли? Пожалуйста, поблагодарите эксперта за это! Оценка за ответ: 5 Комментарий оценки: Пятерочку я конечно же поставлю. Но я уже проверял табель. И мне кажется что ошибка не в табеле, а в самом расчете внутри программы...... :)

Вопрос № 161.888

Ошибка в выводе итогов. Помогите пожалуйста найти ошибку. На рис макет1 , отчет который должен быть получен.Проблема с выводом итогов.Надо, чтобы выводились итоги по группировке сотрудников, т.е например ИТОГ по топливу для Васина по всему приходящему через него топливу, а у меня выводит отдельно для каждой строчки итог.В чем ошибка?Может быть в макете, который на рис макет или в запросе? Запрос = Новый Запрос("ВЫБРАТЬ | ХозрасчетныйДвиженияССубконто.СчетДт КАК СчетДт, | ХозрасчетныйДвиженияССубконто.СубконтоДт1 КАК Номенклатура, | ХозрасчетныйДвиженияССубконто.СубконтоКт1 КАК ФизическоеЛицо, | СУММА(ХозрасчетныйДвиженияССубконто.Сумма) КАК Сумма, | ХозрасчетныйДвиженияССубконто.Регистратор КАК Документ, | СУММА(ХозрасчетныйДвиженияССубконто.КоличествоДт) КАК Количество, | ХозрасчетныйДвиженияССубконто.СубконтоКт1.Код КАК ТабельныйНомер, | ХозрасчетныйДвиженияССубконто.СубконтоДт1.БазоваяЕдиницаИзмерения КАК ЕдиницаИзмерения, | ХозрасчетныйДвиженияССубконто.СчетДт.Код КАК Код, | ХозрасчетныйДвиженияССубконто.СчетДт.Наименование КАК ИмяСчета |ИЗ | РегистрБухгалтерии.Хозрасчетный.ДвиженияССубконто( | &НачПериода, | &КонПериода, | СчетДт В ИЕРАРХИИ (&Счет10_3) | И СчетКт В ИЕРАРХИИ (&Счет71_1)) КАК ХозрасчетныйДвиженияССубконто | |СГРУППИРОВАТЬ ПО | ХозрасчетныйДвиженияССубконто.СчетДт, | ХозрасчетныйДвиженияССубконто.СубконтоДт1, | ХозрасчетныйДвиженияССубконто.СубконтоКт1, | ХозрасчетныйДвиженияССубконто.Регистратор, | ХозрасчетныйДвиженияССубконто.СубконтоКт1.Код, | ХозрасчетныйДвиженияССубконто.СубконтоДт1.БазоваяЕдиницаИзмерения |ИТОГИ | СУММА(Сумма), | СУММА(Количество) |ПО | ОБЩИЕ, | СчетДт, | Номенклатура"); Запрос.Параметры.Вставить("НачПериода", НачПериода); Запрос.Параметры.Вставить("КонПериода", КонПериода); Запрос.Параметры.Вставить("Счет10_3", ПланыСчетов.Хозрасчетн ый.НайтиПоКоду("10.03")); Запрос.Параметры.Вставить("Счет71_1", ПланыСчетов.Хозрасчетный.НайтиПоКоду("71.01")); Результат = Запрос.Выполнить(); Если Результат.Пустой() Тогда Возврат; КонецЕсли; ТабДок = ЭлементыФормы.ПолеТабличногоДокумента; Макет = ПолучитьМакет("МакетТопливо"); ОбластьШапкаТаблицы= Макет.ПолучитьОбласть("Шапка"); ОбластьСчетДт=Макет.ПолучитьОбласть("СчетДт"); ОбластьДетали= Макет.ПолучитьОбласть("Детали"); ОбластьИтоги= Макет.ПолучитьОбласть("ОбщиеИтоги"); ОбластьИтогиПоГруппировке= Макет.ПолучитьОбласть("ИтогПоГруппировке"); ТабДок.Очистить(); ТабДок.Вывести(ОбластьШапкаТаблицы); ТабДок.НачатьАвтогруппировкуСтрок(); ВыборкаОбщие = Результат.Выбрать(ОбходРезультатаЗапроса.ПоГруппировкам); Пока ВыборкаОбщие.Следующий() Цикл ВыборкаСчет = ВыборкаОбщие.Выбрать(ОбходРезультатаЗапроса.ПоГруппировкам); Пок а ВыборкаСчет.Следующий() Цикл ВыборкаНоменклатура = ВыборкаСчет.Выбрать(ОбходРезультатаЗапроса.ПоГруппировкам); Пока ВыборкаНоменклатура.Следующий() Цикл Выборка = ВыборкаНоменклатура.Выбрать(); ОбластьСчетДт.Параметры.Заполнить(ВыборкаНоменклатура); ТабДок.Вывести(ОбластьСчетДт); Пока Выборка.Следующий() Цикл ОбластьДетали.Параметры.Заполнить(Выборка); ТабДок.Вывести(ОбластьДетали); ОбластьИтогиПоГруппировке.Параметры.Заполнить(Выборка); ТабДок.Вывести(ОбластьИтогиПоГруппировке); КонецЦикла; КонецЦикла; КонецЦикла; КонецЦикла; ТабДок.ЗакончитьАвтогруппировкуСтрок();

Отправлен: 03.03.2009, 09:30 Вопрос задала: Екатерина Петрова (статус: Посетитель) Всего ответов: 1 Мини-форум вопроса >>> (сообщений: 2)

Отвечает: Полякова Ирина Николаевна Здравствуйте, Екатерина Петрова! Для вывода итогов по физ лицу надо добавить еще один уровень группировки в запросе(как в приложении). Также в вашем коде не заполняются параметры для области макета "Шапка". Заполнение области итогов по топливу вы проводите в цикле выбора детальных записей, что и приводит к выводу строки после каждой детальной записи. Я вынесла эту строку за цикл по физическим лицам. Это позволит получить необходимые данные в отчете. Приложение: Запрос = Новый Запрос("ВЫБРАТЬ | ХозрасчетныйДвиженияССубконто.СчетДт КАК СчетДт, | ХозрасчетныйДвиженияССубконто.СубконтоДт1 КАК Номенклатура, | ХозрасчетныйДвиженияССубконто.СубконтоКт1 КАК ФизическоеЛицо, | СУММА(ХозрасчетныйДвиженияССубконто.Сумма) КАК Сумма, | ХозрасчетныйДвиженияССубконто.Регистратор КАК Документ, | СУММА(ХозрасчетныйДвиженияССубконто.КоличествоДт) КАК Количество, | ХозрасчетныйДвиженияССубконто.СубконтоКт1.Код КАК ТабельныйНомер, | ХозрасчетныйДвиженияССубконто.СубконтоДт1.БазоваяЕдиницаИзмерения КАК ЕдиницаИзмерения, | ХозрасчетныйДвиженияССубконто.СчетДт.Код КАК Код, | ХозрасчетныйДвиженияССубконто.СчетДт.Наименование КАК ИмяСчета |ИЗ | РегистрБухгалтерии.Хозрасчетный.ДвиженияССубконто( | &НачПериода, | &КонПериода, | СчетДт В ИЕРАРХИИ (&Счет10_3) | И СчетКт В ИЕРАРХИИ (&Счет71_1)) КАК ХозрасчетныйДвиженияССубконто | |СГРУППИРОВАТЬ ПО | ХозрасчетныйДвиженияССубконто.СчетДт, | ХозрасчетныйДвиженияССубконто.СубконтоДт1, | ХозрасчетныйДвиженияССубконто.СубконтоКт1, | ХозрасчетныйДвиженияССубконто.Регистратор, | ХозрасчетныйДвиженияССубконто.СубконтоКт1.Код, | ХозрасчетныйДвиженияССубконто.СубконтоДт1.БазоваяЕдиницаИзмерения, | ХозрасчетныйДвиженияССубконто.СчетДт.Код, | ХозрасчетныйДвиженияССубконто.СчетДт.Наименование |ИТОГИ | СУММА(Сумма), | СУММА(Количество) |ПО | ОБЩИЕ, | СчетДт, | Номенклатура, | ФизическоеЛицо"); Запрос.Параметры.Вставить("НачПериода", НачПериода); Запрос.Параметры.Вставить("КонПериода", КонПериода); Запрос.Параметры.Вставить("Счет10_3", ПланыСчетов.Хозрасчетный.НайтиПоКоду("10.03")); Запрос.Параметры.Вставить("Счет71_1", ПланыСчетов.Хозрасчетный.НайтиПоКоду("71.01")); Результат = Запрос.Выполнить(); Если Результат.Пустой() Тогда Возврат; КонецЕсли; ТабДок = ЭлементыФормы.ПолеТабличногоДокумента; Макет = ПолучитьМакет("МакетТопливо"); ОбластьШапкаТаблицы = Макет.ПолучитьОбласть("Шапка"); ОбластьСчетДт = Макет.ПолучитьОбласть("СчетДт"); ОбластьДетали = Макет.ПолучитьОбласть("Детали"); ОбластьИтоги = Макет.ПолучитьОбласть("ОбщиеИтоги"); ОбластьИтогиПоГруппировке= Макет.ПолучитьОбласть("ИтогПоГруппировке"); ТабДок.Очистить(); //заполнение параметров шапки !!! ОбластьШапкаТаблицы.Параметры.НачПериода = Формат(НачПериода, "ДФ=dd.MM.yyyy"); ОбластьШапкаТаблицы.Параметры.КонПериода = Формат(КонПериода, "ДФ=dd.MM.yyyy"); ТабДок.Вывести(ОбластьШапкаТаблицы); ТабДок.НачатьАвтогруппировкуСтрок(); ВыборкаОбщие = Результат.Выбрать(ОбходРезультатаЗапроса.ПоГруппировкам); Пока ВыборкаОбщие.Следующий() Цикл ВыборкаСчет = ВыборкаОбщие.Выбрать(ОбходРезультатаЗапроса.ПоГруппировкам); Пока ВыборкаСчет.Следующий() Цикл ВыборкаНоменклатура = ВыборкаСчет.Выбрать(ОбходРезультатаЗапроса.ПоГруппировкам); Пока ВыборкаНоменклатура.Следующий() Цикл ОбластьСчетДт.Параметры.Заполнить(ВыборкаНоменклатура); ТабДок.Вывести(ОбластьСчетДт, 1); ВыборкаФизЛицо = ВыборкаНоменклатура.Выбрать(ОбходРезультатаЗапроса.ПоГруппировкам); Пока ВыборкаФизЛицо.Следующий() Цикл Выборка = ВыборкаФизЛицо.Выбрать(); Пока Выборка.Следующий() Цикл ОбластьДетали.Параметры.Заполнить(Выборка); ТабДок.Вывести(ОбластьДетали); КонецЦикла; ОбластьИтогиПоГруппировке.Параметры.Заполнить(Выборка); ТабДок.Вывести(ОбластьИтогиПоГруппировке); КонецЦикла; КонецЦикла; КонецЦикла; КонецЦикла; ТабДок.ЗакончитьАвтогруппировкуСтрок(); --------- Деньги склока, а без них плохо...

Ответ отправила: Полякова Ирина Николаевна (статус: 4-й класс) Ответ отправлен: 03.03.2009, 10:26 Как сказать этому эксперту "спасибо"? Отправить SMS #thank 244928 на номер 1151 (Россия) | Еще номера >> Отправить WebMoney: Неплохо (10 руб.) Хорошо (15 руб.) Отлично (20 руб.) БЛЕСТЯЩЕ! (30 руб.) Вам помогли? Пожалуйста, поблагодарите эксперта за это!

Вопрос № 162.004

Уважаемые Эксперты. Я начинающий программист. Скажите пожалуйста правильно-ли я начал писать отчет и как его вывести на экран (как таблицу или список), чтобы просмотреть что у меня получилось. Приложение: Процедура КнопкаВыполнитьНажатие(Кнопка) Запрос = новый Запрос("ВЫБРАТЬ | Расходная.Номер, | Расходная.Дата, | Расходная.Ссылка | ИЗ | Документ.РасходнаяНакладная КАК Расходная | ГДЕ | Расходная.Дата МЕЖДУ &Дата1 И &Дата2 | И Расходная.Проведен = &Проведен | И Расходная.ПометкаУдаления = &ПометкаУдаления | И Расходная.МестоХранения = &Склад"); Запрос.Параметры.Вставить("Дата1", НачалоПериода); Запрос.УстановитьПараметр("Дата2", КонецДня(КонецПериода)); Запрос.УстановитьПараметр("Проведен", Истина); Запрос.УстановитьПараметр("ПометкаУдаления", Ложь); Запрос.УстановитьПараметр("Склад", Склад); Результат = Запрос.Выполнить(); Если Результат.Пустой() Тогда Возврат; КонецЕсли; Выборка = Результат.Выбрать(); Пока Выборка.Следующий() Цикл Макет = Дата = Выборка.Дата; Номер = Выборка.Номер; Док = Выборка.Ссылка; Для каждого Строка из Док.тчОсновная Цикл Если не Строка.флСтрокаПодч Тогда Продолжить; КонецЕсли; Номенклатура = Строка.Номенклатура.Наименование КонецЦикла; ???????????????? КонецЦикла; КонецПроцедуры Процедура ВыбратьПериодНажатие(Элемент) НастрПер = Новый НастройкаПериода; НастрПер.УстановитьПериод(НачалоПериода, КонецПериода); НастрПер.ВариантНастройки = ВариантНастройкиПериода.Период; НастрПер.РедактироватьКакИнтервал = Истина; НастрПер.РедактироватьКакПериод = Истина; Если НастрПер.Редактировать() Тогда НачалоПериода = НастрПер.ПолучитьДатуНачала(); КонецПериода = НастрПер.ПолучитьДатуОкончания(); КонецЕсли; КонецПроцедуры

Отправлен: 04.03.2009, 14:46 Вопрос задал: Гайдаренко Александр Аркадьевич (статус: Посетитель) Всего ответов: 1 Мини-форум вопроса >>> (сообщений: 1)

Отвечает: Полякова Ирина Николаевна Здравствуйте, Гайдаренко Александр Аркадьевич! Можно воспользоваться построителем отчета. Он позволяет автоматически формировать табличный документ для вывода на экран. Или же воспользоваться консолью отчетов, он идет на дисках ИТС Я изменила запрос, чтобы в одном запросе получить все необходимые данные. Для формирования печатной формы вручную необходимо создать макет. Задать в макете области вывода данных, параметры данных. Приложение: Построитель = Новый ПостроительОтчета; Построитель.Текст = "ВЫБРАТЬ | Расходная.Ссылка.Номер КАК НомерДок, | Расходная.Ссылка.Дата КАК ДатаДок, | Расходная.Ссылка КАК Ссылка, | Расходная.Номенклатура | ИЗ | Документ.РасходнаяНакладная.тчОсновная КАК Расходная | ГДЕ | Расходная.Ссылка.Дата МЕЖДУ &Дата1 И &Дата2 | И Расходная.Ссылка.Проведен = ИСТИНА | И Расходная.Ссылка.ПометкаУдаления = ИСТИНА | И Расходная.флСтрокаПодч = ЛОЖЬ | И Расходная.Ссылка.МестоХранения = &Склад |ИТОГИ ПО | Расходная.Ссылка"; Построитель.Параметры.Вставить("Дата1", НачалоПериода); Построитель.Параметры.Вставить("Дата2", КонецДня(КонецПериода)); Построитель.Параметры.Вставить("Склад", Склад); Построитель.Выполнить(); Если Построитель.Результат.Пустой() Тогда Возврат; КонецЕсли; Построитель.Вывести(); --------- Деньги склока, а без них плохо...

Ответ отправила: Полякова Ирина Николаевна (статус: 4-й класс) Ответ отправлен: 04.03.2009, 15:14 Как сказать этому эксперту "спасибо"? Отправить SMS #thank 245026 на номер 1151 (Россия) | Еще номера >> Отправить WebMoney: Неплохо (10 руб.) Хорошо (15 руб.) Отлично (20 руб.) БЛЕСТЯЩЕ! (30 руб.) Вам помогли? Пожалуйста, поблагодарите эксперта за это! Оценка за ответ: 5

Вопрос № 162.062

Здравствуйте, уважаемые эксперты. Может быть, кто-нибудь поможет решить следующий вопрос? Имеется обычная типовая Бухгалтерия 7.7, сетевая ПРОФ. Требуется работать одновременно 7 пользователям. Шесть человек заходят в программу нормально, а когда пытается войти седьмой, выдается ошибка "Ошибка загрузки модуля USERDEF.DLL", и 1С у него не запускается. Каким способом можно все-таки заставить работать конфигурацию для семи пользователей одновременно?

Отправлен: 05.03.2009, 06:09 Вопрос задала: Грейс Флетчер (статус: Практикант) Всего ответов: 2 Мини-форум вопроса >>> (сообщений: 0)

Отвечает: Vlad Skorochod Здравствуйте, Грейс Флетчер! Первый и основной вопрос на какой операционной системе у вас находятся базы. Если это WinXP Home то там стоит ограничение на 5 одновременных соединений. На winXpProf все работает нормально. Проверено ниоднократно.

Ответ отправил: Vlad Skorochod (статус: Студент) Ответ отправлен: 05.03.2009, 09:30 Как сказать этому эксперту "спасибо"? Отправить SMS #thank 245079 на номер 1151 (Россия) | Еще номера >> Отправить WebMoney: Неплохо (10 руб.) Хорошо (15 руб.) Отлично (20 руб.) БЛЕСТЯЩЕ! (30 руб.) Вам помогли? Пожалуйста, поблагодарите эксперта за это! Оценка за ответ: 5 Комментарий оценки: Спасибо!

Отвечает: Астафьев Александр Николаевич Здравствуйте, Грейс Флетчер! Переносите базу на компьютер с Windows Server (без особой разницы какой сервер если мы говорим о Windows). --------- не верь, не бойся, не проси!!!

Ответ отправил: Астафьев Александр Николаевич (статус: Студент) Ответ отправлен: 05.03.2009, 16:26 Как сказать этому эксперту "спасибо"? Отправить SMS #thank 245126 на номер 1151 (Россия) | Еще номера >> Отправить WebMoney: Неплохо (10 руб.) Хорошо (15 руб.) Отлично (20 руб.) БЛЕСТЯЩЕ! (30 руб.) Вам помогли? Пожалуйста, поблагодарите эксперта за это! Оценка за ответ: 5 Комментарий оценки: Спасибо!

Вопрос № 162.072

Как в списке источников запроса задать файл DBF? и вообще можно-ли сделать отчет по файлу если можно то подскажите как, а лучше покажите.

Отправлен: 05.03.2009, 09:42 Вопрос задал: Гайдаренко Александр Аркадьевич (статус: Посетитель) Всего ответов: 1 Мини-форум вопроса >>> (сообщений: 3)

Отвечает: М.Денис Здравствуйте, Гайдаренко Александр Аркадьевич! Предлагаю такой вариант: Создать Таблицу значений, куда выбрать данные из файла. Потом эту таблицу можно задать как источник для запроса. Далее используем МенеджерВременныхТаблиц Приложение: ТаблицаДляСчиткиИзФайла = Новый ТаблицаЗначений; ТаблицаДляСчиткиИзФайла.Колонки.Добавить("Контрагент"); ТаблицаДляСчиткиИзФайла.Колонки.Добавить("ДатаПервойНеоплаченнойРеализации"); ТаблицаДляСчиткиИзФайла.Колонки.Добавить("НаценкаЗаПериод"); ТаблицаДляСчиткиИзФайла.Колонки.Добавить("ОплаченнаяНаценкаЗаПериод"); ТаблицаДляСчиткиИзФайла.Колонки.Добавить("НеоплаченнаяНаценкаЗаПериод"); DBF = Новый XBase; ИмяФайлаБазы = Сред((ДатаНачала - 1),7,4) + Сред((ДатаНачала - 1),4,2) + Сред((ДатаНачала - 1),1,2) + ".dbf"; ПутьИмяФайлаБазы = "D:Public!!Zvity!!ТЕСТDBF" + ИмяФайлаБазы; DBF.ОткрытьФайл(ПутьИмяФайлаБазы); Попытка DBF.Первая(); Пока Истина Цикл НоваяСтрока = ТаблицаДляСчиткиИзФайла.Добавить(); НоваяСтрока.Контрагент = СокрЛП(DBF.NAME); НоваяСтрока.ДатаПервойНеоплаченнойРеализации = DBF.DATE; НоваяСтрока.НаценкаЗаПериод = DBF.NACINKA; НоваяСтрока.ОплаченнаяНаценкаЗаПериод = DBF.OPNAC; НоваяСтрока.НеоплаченнаяНаценкаЗаПериод = DBF.NOPNAC; Если Не DBF.Следующая() Тогда Прервать; КонецЕсли; КонецЦикла; Исключение КонецПопытки; МенеджерВременныхТаблиц = Новый МенеджерВременныхТаблиц; //створюємо новий МенеджерВременныхТаблиц Запрос = Новый Запрос; Запрос.МенеджерВременныхТаблиц = МенеджерВременныхТаблиц; //вказуємо запиту створений МенеджерВременныхТаблиц Запрос.Текст = "ВЫБРАТЬ | ТЗ. Контрагент КАК Контрагент, | ТЗ. ДатаПервойНеоплаченнойРеализации КАК ДатаПервойНеоплаченнойРеализации, | ТЗ. НаценкаЗаПериод КАК НаценкаЗаПериод, | ТЗ. ОплаченнаяНаценкаЗаПериод КАК ОплаченнаяНаценкаЗаПериод, | ТЗ. НеоплаченнаяНаценкаЗаПериод КАК НеоплаченнаяНаценкаЗаПериод |ПОМЕСТИТЬ ВременнаяТаблица |ИЗ | &ТЗ КАК ТЗ"; Запрос.УстановитьПараметр("ТЗ", ТаблицаДляСчиткиИзФайла); Результат = Запрос.Выполнить(); Запрос2 = Новый Запрос; //Створюємо новий запит Запрос2.МенеджерВременныхТаблиц = МенеджерВременныхТаблиц; //вказуємо новому запиту наш МенеджерВременныхТаблиц Запрос2.Текст = "ВЫБРАТЬ | ВременнаяТаблица. Контрагент КАК Контрагент, | ВременнаяТаблица. ДатаПервойНеоплаченнойРеализации КАК ДатаПервойНеоплаченнойРеализации, | ВременнаяТаблица. НаценкаЗаПериод КАК НаценкаЗаПериод , | ВременнаяТаблица. ОплаченнаяНаценкаЗаПериод КАК ОплаченнаяНаценкаЗаПериод, | ВременнаяТаблица. НеоплаченнаяНаценкаЗаПериод КАК НеоплаченнаяНаценкаЗаПериод |ИЗ | ВременнаяТаблица КАК ВременнаяТаблица | |УПОРЯДОЧИТЬ ПО | ВременнаяТаблица.Контрагент.Наименование |ИТОГИ | СУММА(НаценкаЗаПериод), | СУММА(ОплаченнаяНаценкаЗаПериод), | СУММА(НеоплаченнаяНаценкаЗаПериод) |ПО | Контрагент"; Результат = Запрос2.Выполнить(); ВыборкаКонтрагент = Результат.Выбрать(ОбходРезультатаЗапроса.ПоГруппировкам); Пока ВыборкаКонтрагент.Следующий() Цикл ОбластьКонтрагент.Параметры.Заполнить(ВыборкаКонтрагент); ТабДок.Вывести(ОбластьКонтрагент, ВыборкаКонтрагент.Уровень()); КонецЦикла;

Ответ отправил: М.Денис (статус: 2-й класс) Ответ отправлен: 05.03.2009, 11:01 Как сказать этому эксперту "спасибо"? Отправить SMS #thank 245091 на номер 1151 (Россия) | Еще номера >> Отправить WebMoney: Неплохо (10 руб.) Хорошо (15 руб.) Отлично (20 руб.) БЛЕСТЯЩЕ! (30 руб.) Вам помогли? Пожалуйста, поблагодарите эксперта за это!

© 2001-2009, Портал RusFAQ.ru, Россия, Москва. Авторское право: ООО "Мастер-Эксперт Про" Техподдержка портала, тел.: +7 (926) 535-23-31 Хостинг: "Московский хостер" Поддержка: "Московский дизайнер" Авторские права | Реклама на портале ∙ Версия системы: 5.13 от 01.12.2008
RusFAQ.ru | MosHoster.ru | MosDesigner.ru RusIRC.ru | Kalashnikoff.ru | RadioLeader.ru