Отправляет email-рассылки с помощью сервиса Sendsay

RFpro.ru: 1С для программиста

Подписаться Бесплатная «Золотая» новостная рассылка . Подписчиков 2.508 RSS
←   Ноябрь 2005   →
 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30


За последние 60 дней ни разу не выходила


Открыта: 02-06-2005

Автор
Калашников О.А.

Статистика

2.508 подписчиков
0 за неделю
←   Все выпуски   →

RusFAQ.ru: 1С для программиста


Информационный Канал Subscribe.Ru
РАССЫЛКИ ПОРТАЛА RUSFAQ.RU

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

Выпуск № 77
от 27.11.2005, 11:45

Администратор:Калашников О.А.
В рассылке:Подписчиков: 136, Экспертов: 18
В номере:Вопросов: 1, Ответов: 1

Вопрос № 29953: Здравствуйте эксперты! У меня 1С 7.7 комплекс. Нужно переделать отчет ПартииТоваров В теле модуля выбираю контрагента Контр = СоздатьОбъект("Справочник.Контрагенты"); Контр.НайтиПоНаименованию("Розница",0,0)...

Вопрос № 29.953
Здравствуйте эксперты!
У меня 1С 7.7 комплекс.
Нужно переделать отчет ПартииТоваров
В теле модуля выбираю контрагента
Контр = СоздатьОбъект("Справочник.Контрагенты");
Контр.НайтиПоНаименованию("Розница",0,0);
Потом составляю запрос
|ПЕРИОД С Дата1 По Дата2;
|Товар=Регистр.ПартииТоваров.Товар;
|Фирма=Регистр.ПартииТоваров.Фирма;
|Статус=Регистр.ПартииТоваров.Статус;
|Поставщик=Регистр.ПартииТоваров.Поставщик;
|Контрагент=Регистр.ПартииТоваров.Контрагент;
|ПрихДокумент=Регистр.ПартииТоваров.ПрихДокумент;
|Докум=Регистр.ПартииТоваров.ТекущийДокумент;
|ОстатокТовара=Регистр.ПартииТоваров.ОстатокТовара;
|Стоимость=Регистр.ПартииТоваров.Стоимость;
|ПродСтоимость=Регистр.ПартииТоваров.ПродСтоимость;
|НДС=Регистр.ПартииТоваров.НДС;
|НДСрасхода=Регистр.ПартииТоваров.НДСрасхода;
|Оборот=Регистр.ПартииТоваров.Оборот;
|Прибыль=Регистр.ПартииТоваров.Прибыль;
|Группировка Товар Без групп;";

Если ДеталПоНакладным<>0 Тогда
ТекстЗапроса=ТекстЗапроса+"
|Группировка Статус;
|Группировка Поставщик;
|Группировка ПрихДокумент;";
КонецЕсли;

Если ДеталПоВсемДокументам<>0 Тогда
ТекстЗапроса=ТекстЗапроса+"
|Группировка Докум;";
КонецЕсли;

ТекстЗапроса=ТекстЗапроса+"
|Функция НачОстатокТовара=НачОст(ОстатокТовара);
|Функция КонОстатокТовара=КонОст(ОстатокТовара);
|Функция ПрихОстатокТовара=Приход(ОстатокТовара);
|Функция РасхОстатокТовара=Расход(ОстатокТовара) Когда (Докум.Контрагент<>Контр);
|Функция РасхОстатокТовараНал=Расход(ОстатокТовара) Когда (Докум.Контрагент=Контр);
|Функция НачСтоимость=НачОст(Стоимость);
|Функция КонСтоимость=КонОст(Стоимость);
|Функция ПрихСтоимость=Приход(Стоимость);
|Функция ПрихСтоимостьДляПрофит=Приход(Стоимость) Когда (Оборот<>0);
|Функция РасхСтоимость=Расход(Стоимость);
|Функция РасхСтоимостьДляПрофит=Расход(Стоимость) Когда (Оборот<>0);
|Функция ПрихПродСтоимость=Приход(ПродСтоимость);
|Функция РасхПродСтоимость=Расход(ПродСтоимость);
|Функция НачНДС=НачОст(НДС);
|Функция КонНДС=КонОст(НДС);
|Функция ПрихНДС=Приход(НДС);
|Функция ПрихНДСДляПрофит=Приход(НДС) Когда (Оборот<>0);
|Функция РасхНДС=Расход(НДС);
|Функция РасхНДСДляПрофит=Расход(НДС) Когда (Оборот<>0);
|Функция НДСрасходаТовара=Сумма(НДСрасхода);
|Функция ОборотТовара=Сумма(Оборот);
|Функция ПрибыльТовара=Сумма(Прибыль);
|Условие (Фирма=выбФирма);
|Условие (Статус<>Услуга);
|";

Получается что Функция РасхОстатокТовара всегда истина не зависимо от значения Контр
Отправлен: 21.11.2005, 16:55
Вопрос задал: Александр Павлович (статус: Посетитель)
Всего ответов: 1
Мини-форум вопроса >>> (сообщений: 0)
Отвечает: Ovr1970
Здравствуйте, Александр Павлович!
Дело в том что в условии "(Докум.Контрагент<>Контр)" левая и правая часть разных типов. Правильно будет (Докум.Контрагент<>Контр.ТекущийЭлемент())
Ответ отправил: Ovr1970 (статус: 3-ий класс)
Отправлен: 21.11.2005, 17:44
Оценка за ответ: 4
Комментарий оценки:
Результат тот же. Я пробывал Докум.Контрагент.Наименование<>Контр.Наименование;Докум.Контрагент.Код<>Контр.Код все равно выборка происходит по всем документам.

Отправить вопрос экспертам этой рассылки

Приложение (если необходимо):

* Код программы, выдержки из закона и т.п. дополнение к вопросу.
Эта информация будет отображена в аналогичном окне как есть.

Обратите внимание!
Вопрос будет отправлен всем экспертам данной рассылки!
Для того, чтобы отправить вопрос выбранным экспертам этой рассылки или
экспертам другой рассылки портала RusFAQ.ru, зайдите непосредственно на RusFAQ.ru.


Форма НЕ работает в почтовых программах The BAT! и MS Outlook (кроме версии 2003+)!
Чтобы отправить вопрос, откройте это письмо в браузере или зайдите на сайт RusFAQ.ru.

© 2001-2005, Портал RusFAQ.ru, Россия, Москва.
Идея, дизайн, программирование: Калашников О.А.
Email: adm@rusfaq.ru, Тел.: +7 (926) 535-23-31
Авторские права | Реклама на портале 		Яндекс Rambler's Top100 hotlog_js="1.0"; hotlog_r=""+Math.random()+"&s=314124&im=101&r="+escape(document.referrer)+"&pg="+ escape(window.location.href); document.cookie="hotlog=1; path=/"; hotlog_r+="&c="+(document.cookie?"Y":"N"); hotlog_js="1.1";hotlog_r+="&j="+(navigator.javaEnabled()?"Y":"N") hotlog_js="1.2"; hotlog_r+="&wh="+screen.width+'x'+screen.height+"&px="+ (((navigator.appName.substring(0,3)=="Mic"))? screen.colorDepth:screen.pixelDepth) hotlog_js="1.3" hotlog_r+="&js="+hotlog_js; document.write("HotLog")
Subscribe.Ru
Поддержка подписчиков
Другие рассылки этой тематики
Другие рассылки этого автора 		Подписан адрес:
Код этой рассылки: comp.soft.prog.1cprogfaq
Архив рассылки 		Отписаться
Вспомнить пароль
В избранное