Внешняя обработка

Форум Программирование Инструменты разработчика (Tools)

1. user1582389 23.04.21 15:25 Сейчас в теме

Помогите, пожалуйста, дописать код. Нужно чтобы брались документы за определённый период и у всех взятых документов менялась дата на ту, которую задаёт пользователь.
Мой код и форма обработки см. ниже.

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

&НаКлиенте
Процедура Записать(Команда)
	ЗаписатьНаСервере();
КонецПроцедуры

Показать

Прикрепленные файлы:

По теме из базы знаний

Ответы

Подписаться на ответы Инфостарт бот

Свернуть все

3. nomad_irk 76 23.04.21 15:36 Сейчас в теме

(1)и в чем именно проблемы?

5. pavel06 2 27.04.21 00:31 Сейчас в теме

(3)

и в чем именно проблемы?

ГДЕ
| &С <= РеализацияТоваровИУслуг.Дата <= &ДатаОконч" ???

6. nomad_irk 76 27.04.21 06:10 Сейчас в теме

(5)это рабочая конструкция языка запросов.

7. pavel06 2 28.04.21 00:00 Сейчас в теме

(6) Что-то так никто не пишет. Все пишут Между.

8. nomad_irk 76 28.04.21 06:02 Сейчас в теме

2. starik-2005 3088 23.04.21 15:34 Сейчас в теме

1. "ГДЕ Дата МЕЖДУ &ДатаНачала И &ДатаОкончания"
1.1.

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

ОбъектДокумент = ВыборкаДокументов.Ссылка.ПолучитьОбъект();
ОбъектДокумент.Дата = Дата;
ОбъектДокумент.Записать( РежимЗаписиДокумента.Проведение );

4. DenisVol 2 23.04.21 15:44 Сейчас в теме

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

	Запрос.УстановитьПараметр("НачДата", НачалоДня(НачПериода));
        Запрос.УстановитьПараметр("КонДата", КонецДня(КонПериода));
 
        РезультатЗапроса = Запрос.Выполнить();
 	Если РезультатЗапроса.Пустой() Тогда	
		Сообщить("Нет подходящих документов!!!") 
	Иначе
		
		ВыборкаДетальныеЗаписи = РезультатЗапроса.Выбрать();
		
		Пока ВыборкаДетальныеЗаписи.Следующий() Цикл
			ДокументО = ВыборкаДетальныеЗаписи.Ссылка.ПолучитьОбъект();
			ДокументО.Дата = ДатаДок;
			
			ДокументО.Записать(РежимЗаписиДокумента.Проведение);
			//Сообщить(ВыборкаДетальныеЗаписи.Ссылка);			
		КонецЦикла;
	КонецЕсли;

Показать

Оставьте свое сообщение

E-mail: