Помогите с запросом 1С 8.1 / 1С

ReSQL.ru

Мобильная версия Контакт Правила FAQ Помощь

Гость

Войти | Регистрация | Профиль | Очистить

Новые сообщения | Избранное

Форумы | Пользователи | Статистика | Мод. лог | Поиск

Цитировать

Написать

Автор*:

Ввести пароль для входа

Тема*:

Сообщение

Данное сообщение тематическое

Сообщение содержит картинки или видео 18+

Автор:

ВНИМАНИЕ! На данном подфоруме действуют строгие правила. Удостоверьтесь, что ваше сообщение соответствует им!

Форум или тема закрыты для гостей. Необходима авторизация!

Загрузить последнюю сохраненную версию

Вложение:

Вставить как галерею

Максимальный размер вложений: 4,0 МБ, аудио/видео: 8,0 МБ. Картинки большего размера ужимаются, если возможно.

Введите код, изображенный на картинке. Если код нечитаемый, кликните картинку, чтобы загрузить другой вариант.

Отправляя сообщение, я выражаю свое согласие с правилами форума и принимаю пользовательское соглашение.

Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр

Форумы / 1С [игнор отключен] [закрыт для гостей] / Помогите с запросом 1С 8.1

13 сообщений из 13, страница 1 из 1

Помогите с запросом 1С 8.1

#36129910

HSV

Гость

Помогите пожалуйста. На 8 только начинаю программировать, немного непривычно, вот споткнулась о простой запрос, уже всю голову сломала, не получается.
Надо организовать простой запрос к документу РеализациТоваровУслуг. Выбирать для нужного контагента Сумму из таблицы Услуги по определенному коду. Запрос вроде написала. Только вот значение этой Суммы вытащить не могу
ВыбКонтрагент = Док.Контрагент;
Запрос = Новый Запрос();
Запрос.УстановитьПараметр("ВыбКонтрагент", Док.Контрагент);
Запрос.Текст = "ВЫБРАТЬ
| РеализацияТоваровУслуг.ССылка,
| РеализацияТоваровУслуг.Услуги.Номенклатура.Код КАК Номенклатура,
| РеализацияТоваровУслуг.Услуги.СуммаНДС КАК СуммаНДС,
| РеализацияТоваровУслуг.Услуги.Сумма КАК Сумма
|ИЗ
| Документ.РеализацияТоваровУслуг КАК РеализацияТоваровУслуг
|ГДЕ
| РеализацияТоваровУслуг.Услуги.Номенклатура.Код = &Код
| И РеализацияТоваровУслуг.Контрагент = &ВыбКонтрагент";

Всего = 0;
Запрос.УстановитьПараметр("НачалоПериода",НачалоДня(Док.Дата));
Запрос.УстановитьПараметр("КонецПериода",КонецДня(Док.Дата));
Запрос.УстановитьПараметр("Код","00000001351");
Результат = Запрос.Выполнить().Выбрать();
Пока Результат.Следующий() Цикл
Всего = Всего + Результат.Сумма + Результат.СуммаНДС;
КонецЦикла;

Не могу подобраться к значению запроса Сумма
В строке: Всего = Всего + Результат.Сумма + Результат.СуммаНДС;
Ругается

...

Рейтинг:

0 / 0

06.08.2009, 13:41

| Ответить | Цитировать | Написать

Помогите с запросом 1С 8.1

#36129992

Алексей2003

Участник

Откуда: Москва

Сообщения: 5 501

Рейтинг: 0 / 0

Пока Результат.Следующий() Цикл
выборкатаблица = Результат.Услуги.Выбрать();
пока выборкатаблица.следующий() цикл
Всего = Всего + Результат.Сумма + Результат.СуммаНДС;
конеццикла;
КонецЦикла;

или лучше запрос переделайте. сразу табличную часть выбирайте.

для спящего время бодрствования равносильно сну

...

Рейтинг:

0 / 0

06.08.2009, 13:58

| Ответить | Цитировать | Написать

Помогите с запросом 1С 8.1

#36130111

HSV

Гость

Алексей2003,
К сожалению ничего не изменилось ((

...

Рейтинг:

0 / 0

06.08.2009, 14:29

| Ответить | Цитировать | Написать

Помогите с запросом 1С 8.1

#36130155

tiniji

Гость

HSV, Как то так наверное

Код: plaintext

1.
2.
3.
4.
5.
6.
7.
8.
9.

Запрос.Текст = "ВЫБРАТЬ
| РеализацияТоваровУслуг.Ссылка,
| РеализацияТоваровУслуг.Номенклатура.Код КАК Номенклатура,
| РеализацияТоваровУслуг.СуммаНДС КАК СуммаНДС,
| РеализацияТоваровУслуг.Сумма КАК Сумма
|ИЗ
| Документ.РеализацияТоваровУслуг.Услуги КАК РеализацияТоваровУслуг
|ГДЕ
| РеализацияТоваровУслуг.Номенклатура.Код = &Код
| И РеализацияТоваровУслуг.Ссылка.Контрагент = &ВыбКонтрагент";

...

Рейтинг:

0 / 0

06.08.2009, 14:39

| Ответить | Цитировать | Написать

Помогите с запросом 1С 8.1

#36130177

HSV

Гость

tiniji,

Спасибо большое! Все пошло!!! Помогло! А вот теперь не пойму почему у меня этот запрос выбирает докумены не за указанный период.... Мне надо за конкретную дату. Значение Док.Дата у меня равно 30,06,09. А он мне берет документы за 02,07,09 .....

...

Рейтинг:

0 / 0

06.08.2009, 14:45

| Ответить | Цитировать | Написать

Помогите с запросом 1С 8.1

#36130216

Господин ПЖ

Участник

Сообщения: 5 172

Рейтинг: 0 / 0

потому что лепите запросы 8-ки с 7-кой в голове...

параметры
Запрос.УстановитьПараметр("НачалоПериода",НачалоДня(Док.Дата));
Запрос.УстановитьПараметр("КонецПериода",КонецДня(Док.Дата));

вашему запросу никуда не стучат, т.к. их нет в условиях

ГДЕ
....

РеализацияТоваровУслуг.ССылка.Дата Между &НачалоПериода И &КонецПериода

...

Рейтинг:

0 / 0

06.08.2009, 14:56

| Ответить | Цитировать | Написать

Помогите с запросом 1С 8.1

#36130224

tiniji

Гость

HSV,

Запрос.Текст = "ВЫБРАТЬ
| РеализацияТоваровУслуг.Ссылка,
| РеализацияТоваровУслуг.Номенклатура.Код КАК Номенклатура,
| РеализацияТоваровУслуг.СуммаНДС КАК СуммаНДС,
| РеализацияТоваровУслуг.Сумма КАК Сумма
|ИЗ
| Документ.РеализацияТоваровУслуг.Услуги КАК РеализацияТоваровУслуг
|ГДЕ
| РеализацияТоваровУслуг.Номенклатура.Код = &Код
| И РеализацияТоваровУслуг.Ссылка.Контрагент = &ВыбКонтрагент";

У вас в запросе не указано ограничения по дате документа. Если вас интересует конкретный документ то передаете ссылку документа например

|ГДЕ
| РеализацияТоваровУслуг.Номенклатура.Код = &Код
| И РеализацияТоваровУслуг.Ссылка = &Ссылка";

Запрос.УстановитьПараметр("Ссылка", Док.Ссылка);

Тогда он выберет таб часть только этого документа с Номенклатурой по коду.

Если нужно неск. док-ов то в запрос добавляете

|ГДЕ
| РеализацияТоваровУслуг.Номенклатура.Код = &Код
| И РеализацияТоваровУслуг.Ссылка.Контрагент = &ВыбКонтрагент";
| И РеализацияТоваровУслуг.Ссылка.Дата >= &НачалоПериода
| И РеализацияТоваровУслуг.Ссылка.Дата <= &КонецПериода

...

Рейтинг:

0 / 0

06.08.2009, 14:58

| Ответить | Цитировать | Написать

Помогите с запросом 1С 8.1

#36130236

HSV

Гость

Господин ПЖ , tiniji
Большое спасибо!!!
Оказывается все очень логично! Все работает! Еще раз СПАСИБО!!!

...

Рейтинг:

0 / 0

06.08.2009, 15:02

| Ответить | Цитировать | Написать

Помогите с запросом 1С 8.1

#36130381

Алексей2003

Участник

Откуда: Москва

Сообщения: 5 501

Рейтинг: 0 / 0

а если нужна просто сумма, тогда сразу нужно выбирать ее.
Запрос.Текст = "ВЫБРАТЬ
| РеализацияТоваровУслуг.Ссылка,
| РеализацияТоваровУслуг.СуммаНДС + РеализацияТоваровУслуг.Сумма КАК Всего
|ИЗ
| Документ.РеализацияТоваровУслуг.Услуги КАК РеализацияТоваровУслуг
|ГДЕ
| РеализацияТоваровУслуг.Номенклатура.Код = &Код
| И РеализацияТоваровУслуг.Ссылка.Контрагент = &ВыбКонтрагент
|СГРУППИРОВАТЬ ПО Ссылка";

для спящего время бодрствования равносильно сну

...

Рейтинг:

0 / 0

06.08.2009, 15:39

| Ответить | Цитировать | Написать

Помогите с запросом 1С 8.1

#36130385

Алексей2003

Участник

Откуда: Москва

Сообщения: 5 501

Рейтинг: 0 / 0

Запрос.Текст = "ВЫБРАТЬ
| РеализацияТоваровУслуг.Ссылка,
| СУММА(РеализацияТоваровУслуг.СуммаНДС + РеализацияТоваровУслуг.Сумма) КАК Всего
|ИЗ
| Документ.РеализацияТоваровУслуг.Услуги КАК РеализацияТоваровУслуг
|ГДЕ
| РеализацияТоваровУслуг.Номенклатура.Код = &Код
| И РеализацияТоваровУслуг.Ссылка.Контрагент = &ВыбКонтрагент
|СГРУППИРОВАТЬ ПО Ссылка";

для спящего время бодрствования равносильно сну

...

Рейтинг:

0 / 0

06.08.2009, 15:39

| Ответить | Цитировать | Написать

Помогите с запросом 1С 8.1

#36130415

Алексей2003

Участник

Откуда: Москва

Сообщения: 5 501

Рейтинг: 0 / 0

на счет первого вопроса (никогда таким извратом не пользовался):

Код: plaintext

1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.

Пока Результат.Следующий() Цикл

 ВыборкаСуммаНДС = Результат.СуммаНДС.Выбрать();
 Если ВыборкаСуммаНДС.Следующий() Тогда
  Всего = Всего + ВыборкаСуммаНДС.СуммаНДС;
 КонецЕсли;

 ВыборкаСумма = Результат.Сумма.Выбрать();
 Если ВыборкаСумма.Следующий() Тогда
  Всего = Всего + ВыборкаСумма.Сумма;
 КонецЕсли;

КонецЦикла;

для спящего время бодрствования равносильно сну

...

Рейтинг:

0 / 0

06.08.2009, 15:47

| Ответить | Цитировать | Написать

Помогите с запросом 1С 8.1

#36130479

HSV

Гость

Алексей2003,

Спасибо, поняла и последний изврат .... действительно изврат!

...

Рейтинг:

0 / 0

06.08.2009, 16:03

| Ответить | Цитировать | Написать

Помогите с запросом 1С 8.1

#36130568

tiniji

Гость

Вообщем приходим к:
Запрос.Текст = "ВЫБРАТЬ
| СУММА(РеализацияТоваровУслуг.СуммаНДС + РеализацияТоваровУслуг.Сумма) КАК Всего
|ИЗ
| Документ.РеализацияТоваровУслуг.Услуги КАК РеализацияТоваровУслуг
|ГДЕ
| РеализацияТоваровУслуг.Номенклатура.Код = &Код
| И РеализацияТоваровУслуг.Ссылка.Контрагент = &ВыбКонтрагент";

Результат = Запрос.Выполнить().Выбрать();
Если Результат.Следующий() Тогда
Всего = Результат.Всего;
Иначе
Всего = 0;
КонецЕсли;

...

Рейтинг:

0 / 0

06.08.2009, 16:22

| Ответить | Цитировать | Написать

13 сообщений из 13, страница 1 из 1

Форумы / 1С [игнор отключен] [закрыт для гостей] / Помогите с запросом 1С 8.1

Читали тему (0):

Читали форум (0):

Пользователи онлайн (0):

start [/forum/topic.php?fid=28&msg=36130177&tid=1523469]:	0ms
get settings:	9ms
get forum list:	17ms
check forum access:	3ms
check topic access:	3ms
track hit:	165ms
get topic data:	9ms
get forum data:	2ms
get page messages:	62ms
get tp. blocked users:	1ms
others:	218ms

total:	489ms

	Необходимые cookie
	Cookie для сбора статистики
	Cookie для маркетинга и рекламы