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

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

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

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

Chesnochkov Vitaliy Viktorovich Статус: 3-й класс Рейтинг: 27 ∙ повысить рейтинг >>

Drbios Статус: 3-й класс Рейтинг: 13 ∙ повысить рейтинг >>

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

Выпуск № 957
от 18.02.2009, 11:35

Вопрос № 160281: Подскажите пожалуйста как реализовать следующий алгоритм: 1.Просмотреть все элементы справочника Основные средства 2. Для каждого элемента из этого справочника посмотреть по счетам 01.01 и 02.01 начальное сальдо и обороты(дебетовый и кредитовы...

Вопрос № 160.281

Подскажите пожалуйста как реализовать следующий алгоритм: 1.Просмотреть все элементы справочника Основные средства 2. Для каждого элемента из этого справочника посмотреть по счетам 01.01 и 02.01 начальное сальдо и обороты(дебетовый и кредитовый) 3. Если начальное сальдо и обороты >0, то пропустить, иначе элемент пометить на удаление

Отправлен: 12.02.2009, 12:06 Вопрос задала: Artmari (статус: Посетитель) Всего ответов: 2 Мини-форум вопроса >>> (сообщений: 3)

Отвечает: DERL.KG Здравствуйте, Artmari! БИ = СоздатьОбъект("БухгалтерскиеИтоги"); Спр = СоздатьОбъект("Справочник.ОсновныеСредства"); Спр.ВыбратьЭлементы(); Пока Спр.ПолучитьЭлемент() = 1 Цикл БИ.ИспользоватьСубконто(ВидыСубконто.ОсновныеСредства,Спр.ТекущийЭлемент(),2); БИ.ВыполнитьЗапрос(НачДата,КонДата,"01.01,02.01",,,1); Если (БИ.СНД() = 0) И (БИ.ДО() = 0) Тогда Спр.Удалить(0); КонецЕсли; КонецЦикла;

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

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

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

Вопрос № 160.310

Здравствуйте, уважаемые эксперты. Вопрос по 8,1 ТК РАРУС. Есть запрос Анализ продаж (см. Приложение, ПЕРВЫЙЗАПРОС). Работает хорошо и достаточно быстро. Далее на основе этого запроса создан второй запрос с использованием ПостроителяОтчета (см. Приложение, ВТОРОЙЗАПРОС). На форме отчета есть табличное поле, источник данных ПостроительОтчета.Отбор. Пользователь отбирает по Номенклатура.ТоварнаяМарка - получаем пустой результат, хотя первый запрос результат выдает. Почему получаем пустой результат? Заранее спасибо. Приложение: ПЕРВЫЙЗАПРОС "ВЫБРАТЬ | ВложенныйЗапросПродажиОбороты.Регистратор КАК Регистратор, | ВложенныйЗапросПродажиОбороты.Партия КАК Партия, | ВложенныйЗапросПродажиОбороты.Номенклатура КАК Номенклатура, | ВложенныйЗапросПродажиОбороты.КоличествоОборот КАК КоличествоОборот, | ВложенныйЗапросПродажиОбороты.СуммаУпрОборот КАК СуммаУпрОборот, | ВложенныйЗапросПродажиОбороты.СебестоимостьУпрОборот КАК СебестоимостьУпрОборот, | ВложенныйЗапросПродажиОбороты.СебестоимостьОборот КАК СебестоимостьОборот, | КурсыВалют.Курс КАК Курс, | КурсыВалют.Валюта КАК Валюта, | КурсВалютыОтчета.Курс КАК КурсВалютыОтчета, | КурсыВалют.Курс * ВложенныйЗапросПродажиОбороты.СебестоимостьОборот КАК ІндексованаСобівартість |ИЗ | (ВЫБРАТЬ | ПродажиОбороты.Регистратор КАК Регистратор, | ПродажиОбороты.Партия КАК Партия, | ПродажиОбороты.Номенклатура КАК Номенклатура, | ПродажиОбороты.КоличествоОборот КАК КоличествоОборот, | ПродажиОбороты.СуммаУпрОборот КАК СуммаУпрОборот, | ПродажиОбороты.СебестоимостьУпрОборот КАК СебестоимостьУпрОборот, | ПродажиОбороты.СебестоимостьУпрОборот / ПродажиОбороты.Партия.КурсДокумента КАК СебестоимостьОборот, | МАКСИМУМ(КурсыВалют.Период) КАК Период, | КурсыВалют.Валюта КАК Валюта | ИЗ | РегистрНакопления.Продажи.Обороты(&ДатаНачала, &ДатаКонца, Регистратор, Номенклатура.Наименование = ""gomez"") КАК ПродажиОбороты | ЛЕВОЕ СОЕДИНЕНИЕ РегистрСведений.КурсыВалют КАК КурсыВалют | ПО ПродажиОбороты.Регистратор.Дата >= КурсыВалют.Период | И ПродажиОбороты.Партия.ВалютаДокумента.Ссылка = КурсыВалют.Валюта.Ссылка | | СГРУППИРОВАТЬ ПО | ПродажиОбороты.Регистратор, | ПродажиОбороты.Партия, | ПродажиОбороты.Номенклатура, | ПродажиОбороты.КоличествоОборот, | ПродажиОбороты.СуммаУпрОборот, | ПродажиОбороты.СебестоимостьУпрОборот, | КурсыВалют.Валюта, | ПродажиОбороты.СебестоимостьУпрОборот / ПродажиОбороты.Партия.КурсДокумента) КАК ВложенныйЗапросПродажиОбороты | ВНУТРЕННЕЕ СОЕДИНЕНИЕ РегистрСведений.КурсыВалют КАК КурсыВалют | ПО ВложенныйЗапросПродажиОбороты.Период = КурсыВалют.Период | И ВложенныйЗапросПродажиОбороты.Валюта = КурсыВалют.Валюта | ВНУТРЕННЕЕ СОЕДИНЕНИЕ РегистрСведений.КурсыВалют КАК КурсВалютыОтчета | ПО ВложенныйЗапросПродажиОбороты.Период = КурсВалютыОтчета.Период |ГДЕ | КурсВалютыОтчета.Валюта = &Валюта |ИТОГИ | СУММА(КоличествоОборот), | СУММА(СуммаУпрОборот), | СУММА(СебестоимостьУпрОборот), | СУММА(СебестоимостьОборот), | СРЕДНЕЕ(Курс), | СРЕДНЕЕ(КурсВалютыОтчета), | СУММА(ІндексованаСобівартість) |ПО | Валюта, | Регистратор, | Номенклатура, | Партия"; ВТОРОЙЗАПРОС --------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------- "ВЫБРАТЬ | ВложенныйЗапросПродажиОбороты.Регистратор КАК Регистратор, | ВложенныйЗапросПродажиОбороты.Партия КАК Партия, | ВложенныйЗапросПродажиОбороты.Номенклатура КАК Номенклатура, | ВложенныйЗапросПродажиОбороты.КоличествоОборот КАК КоличествоОборот, | ВложенныйЗапросПродажиОбороты.СуммаУпрОборот КАК СуммаУпрОборот, | ВложенныйЗапросПродажиОбороты.СебестоимостьУпрОборот КАК СебестоимостьУпрОборот, | ВложенныйЗапросПродажиОбороты.СебестоимостьОборот КАК СебестоимостьОборот, | КурсыВалют.Курс КАК Курс, | КурсыВалют.Валюта КАК Валюта, | КурсВалютыОтчета.Курс КАК КурсВалютыОтчета, | КурсыВалют.Курс * ВложенныйЗапросПродажиОбороты.СебестоимостьОборот КАК ІндексованаСобівартість |{ВЫБРАТЬ | Регистратор.*, | Партия.*, | Номенклатура.*, | КоличествоОборот, | СуммаУпрОборот, | СебестоимостьУпрОборот, | СебестоимостьОборот, | Курс, | Валюта.*, | КурсВалютыОтчета, | ІндексованаСобівартість} |ИЗ | (ВЫБРАТЬ | ПродажиОбороты.Регистратор КАК Регистратор, | ПродажиОбороты.Партия КАК Партия, | ПродажиОбороты.Номенклатура КАК Номенклатура, | ПродажиОбороты.КоличествоОборот КАК КоличествоОборот, | ПродажиОбороты.СуммаУпрОборот КАК СуммаУпрОборот, | ПродажиОбороты.СебестоимостьУпрОборот КАК СебестоимостьУпрОборот, | ПродажиОбороты.СебестоимостьУпрОборот / ПродажиОбороты.Партия.КурсДокумента КАК СебестоимостьОборот, | МАКСИМУМ(КурсыВалют.Период) КАК Период, | КурсыВалют.Валюта КАК Валюта | {ВЫБРАТЬ | Регистратор.*, | Партия.*, | Номенклатура.*, | КоличествоОборот, | СуммаУпрОборот, | СебестоимостьУпрОборот, | СебестоимостьОборот, | Период, | Валюта.*} | ИЗ | РегистрНакопления.Продажи.Обороты(&ДатаНачала, &ДатаКонца, Регистратор, {(Номенклатура).*, (Партия).*}) КАК ПродажиОбороты | ЛЕВОЕ СОЕДИНЕНИЕ РегистрСведений.КурсыВалют КАК КурсыВалют | ПО ПродажиОбороты.Регистратор.Дата >= КурсыВалют.Период | И ПродажиОбороты.Партия.ВалютаДокумента.Ссылка = КурсыВалют.Валюта.Ссылка | {ГДЕ | ПродажиОбороты.Регистратор.*} | | СГРУППИРОВАТЬ ПО | ПродажиОбороты.Регистратор, | ПродажиОбороты.Партия, | ПродажиОбороты.Номенклатура, | ПродажиОбороты.КоличествоОборот, | ПродажиОбороты.СуммаУпрОборот, | ПродажиОбороты.СебестоимостьУпрОборот, | КурсыВалют.Валюта, | ПродажиОбороты.СебестоимостьУпрОборот / ПродажиОбороты.Партия.КурсДокумента) КАК ВложенныйЗапросПродажиОбороты | ВНУТРЕННЕЕ СОЕДИНЕНИЕ РегистрСведений.КурсыВалют КАК КурсыВалют | ПО ВложенныйЗапросПродажиОбороты.Период = КурсыВалют.Период | И ВложенныйЗапросПродажиОбороты.Валюта = КурсыВалют.Валюта | ВНУТРЕННЕЕ СОЕДИНЕНИЕ РегистрСведений.КурсыВалют КАК КурсВалютыОтчета | ПО ВложенныйЗапросПродажиОбороты.Период = КурсВалютыОтчета.Период |ГДЕ | КурсВалютыОтчета.Валюта = &Валюта |{УПОРЯДОЧИТЬ ПО | Регистратор.*, | Номенклатура.*, | Партия.*} |ИТОГИ | СУММА(КоличествоОборот), | СУММА(СуммаУпрОборот), | СУММА(СебестоимостьУпрОборот), | СУММА(СебестоимостьОборот), | СРЕДНЕЕ(Курс), | СРЕДНЕЕ(КурсВалютыОтчета), | СУММА(ІндексованаСобівартість) |ПО | Валюта, | Регистратор, | Номенклатура, | Партия |{ИТОГИ ПО | Регистратор.*, | Номенклатура.*, | Партия.*}";

Отправлен: 12.02.2009, 18:59 Вопрос задал: М.Денис (статус: 2-й класс) Всего ответов: 1 Мини-форум вопроса >>> (сообщений: 0)

Отвечает: Анатолий Ясень Уважаемый Денис, сталкивался с подобной ситуацией. Дело в том, что на поведение построителя отчетов влияет состав выбранных полей. Побробуйте выбрать все поля в выводимы отчет (Номенклатура, Партия, Регистратор) --------- Только вперед!

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

Вопрос № 160.362

Добрый день. Господа, подскажите, малознающему, в чём моя ошибка? В стандартной ТиС 7.7 создал новый документ и пробую подключить внешние отчёты через кнопку выбор печатной формы. Код скопировал из документа "ЗаявкаПокупателя", поключил внешний отчёт через меню "Сервис/Регистрация внешних печатных форм". Но в документе по кнопке выбора печатной формы выдется сообщение, что для документа зарегистрирована только одна печатная форма (внутренняя). Если смотреть в отладчике ТаблицаПечФорм содержит одну запись с названием "Печатная форма" Код следующий (синтаксических ошибок нет): Процедура ПоКнопкеВыборПечатнойФормы() ВыбНомер = глВыборПечатнойФормы("Документ." + Вид(), ТаблицаПечФорм); Если ВыбНомер > 0 Тогда НомерТекущейФормы = ВыбНомер; Форма.кнПечать.Заголовок(ТаблицаПечФорм.ПолучитьЗначение(НомерТекущейФормы, "Кнопка")); ПоКнопкеПечать(); КонецЕсли; КонецПроцедуры // ПоКно пкеВыборПечатнойФормы() НомерТекущейФормы = 0; ТаблицаПечФорм = СоздатьОбъект("ТаблицаЗначений"); ТаблицаПечФорм.НоваяКолонка("Название","Строка",,,,30); ТаблицаПечФорм.НоваяКолонка("Файл","Строка",,,"Файл",10); ТаблицаПечФорм.НоваяКолонка("Кнопка","Строка",,,,10); ТаблицаПечФорм.НоваяКолонка("ФайлОписания","Строка"); // добавим информацию о встроенной форме ТаблицаПечФорм.НоваяСтрока(); ТаблицаПечФорм.Название = "Печатная форма"; ТаблицаПечФорм.Кнопка = "Печать";

Отправлен: 13.02.2009, 11:07 Вопрос задал: Igor Maevsky (статус: Посетитель) Всего ответов: 1 Мини-форум вопроса >>> (сообщений: 1)

Отвечает: Maximush Здравствуйте, Igor Maevsky! Вероятно вы забыли заполнить таблицу самими печатными формами. В документе откуда вы скопировали ПокнопкеВыборПечатнойФормы наверняка есть процедура ПриОткрытии, в которой указано : //Заполним талицу для выбора печатной формы НомерТекущейФормы = глУстановкаКнопкиПечать(Контекст, "Документ."+Вид(), ТаблицаПечФорм); Кроме того, раз вы добавляете информацию о встроенной форме, не забудьте епренести и процедуру встроенной формы. Т.е. в процедуре ПоКнопкеПечать есть вызов встроенной формы: .... Если номерТекущейФормы=1 тогда Печать(СразуНаПринтер, КолЭкс); ... Либо вы создаете процедуру Печать, либо, если не нужна встроенная печатная форма, удаляете все что идет в вашем коде после // добавим информацию о встроенной форме

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

© 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