• 15 апреля стартует «Курс «SQL-injection Master» ©» от команды The Codeby

    За 3 месяца вы пройдете путь от начальных навыков работы с SQL-запросами к базам данных до продвинутых техник. Научитесь находить уязвимости связанные с базами данных, и внедрять произвольный SQL-код в уязвимые приложения.

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

    Запись на курс до 25 апреля. Получить промодоступ ...

непонятное сообщение НННН<<?>>()

  • Автор темы binx
  • Дата начала
B

binx

Запрос1 = СоздатьОбъект("Запрос");
ТекстЗапроса1 =
"
|Период С НачДата По КонДата;
|Обрабатывать НеПомеченныеНаУдаление;
|ОбрабатыватьДокументы Все;
|Контр = Документ.РеализацияПродукции.Контрагент;
|Отгружен = Документ.РеализацияПродукции.Отгружен;
|Товар = Документ.РеализацияПродукции.Товар;
|Количество = Документ.РеализацияПродукции.Количество;
|Вес = Документ.РеализацияПродукции.Товар.ВесИзделия;
|ВсегоСумма = Документ.РеализацияПродукции.Всего;
|Функция КолРеализация = Сумма(Количество*Вес/1000);
|Функция СумРеализация = Сумма(ВсегоСумма);
|Группировка Товар;
|Условие(Отгружен = 1);
|"//}}Запрос
;
Если Запрос1.Выполнить(ТекстЗапроса1) = 0 Тогда

Возврат;

КонецЕсли;
Сум=0;
Кол=0;
СумДр=0;
КолДр=0;
Пока Запрос1.Группировка("Товар")=1 Цикл
Если СокрЛП(Запрос1.Товар.Родитель.Наименование)=СокрЛП("Хлебобулочные изделия") Тогда
Если (Найти(СокрЛП(Запрос1.Товар.Наименование),СокрЛП("Хлеб пшеничный Кишиневский 0,65 кг")))>0 Тогда
Сум=Запрос1.СумРеализация;
Кол=Запрос1.КолРеализация;
Иначе
СумДр=СумДр+Запрос1.СумРеализация;
КолДр=КолДр+Запрос1.КолРеализация;
КонецЕсли;
КонецЕсли;
КонецЦикла;

/////////////////////////////////////////////////////////////////////////////////////////////////////////////
Запрос = СоздатьОбъект("Запрос");
ТекстЗапроса =
"
|Период С НачДата По КонДата;
|Обрабатывать НеПомеченныеНаУдаление;
|ОбрабатыватьДокументы Все;
|Контр = Документ.РеализацияПродукции.Контрагент;
|Отгружен = Документ.РеализацияПродукции.Отгружен;
|Товар = Документ.РеализацияПродукции.Товар;
|Количество = Документ.РеализацияПродукции.Количество;
|Вес = Документ.РеализацияПродукции.Товар.ВесИзделия;
|ВсегоСумма = Документ.РеализацияПродукции.Всего;
|Функция КолРеализация = Сумма(Количество*Вес/1000);
|Функция СумРеализация = Сумма(ВсегоСумма);
|Группировка Товар;
|Условие(Отгружен = 1);
|"//}}Запрос
;
Если Запрос.Выполнить(ТекстЗапроса) = 0 Тогда
// Возврат;
КонецЕсли;

Пока Запрос.Группировка("Товар") = 1 Цикл
Товар = Запрос.Товар;
Если Товар.ЭтоГруппа() = 1 Тогда
Если СокрЛП(Запрос.Товар.Наименование)=СокрЛП("Хлебобулочные изделия") Тогда
//ТЗ.НоваяСтрока();
//ТЗ.Группа = Товар;
//ТЗ.КолРеализация = Запрос.КолРеализация;
//ТЗ.СумРеализация = Запрос.СумРеализация;
ТЗ.НоваяСтрока();
ТЗ.Группа= "Хлеб пшеничный Кишиневский 0,65 кг";
ТЗ.СумРеализация = Сум;
ТЗ.КолРеализация=Кол;
ТЗ.НоваяСтрока();
ТЗ.Группа="Другие хлебобулочные изделия";
ТЗ.СумРеализация = СумДр;
ТЗ.КолРеализация=КолДр;
Иначе
ТЗ.НоваяСтрока();
ТЗ.Группа = Товар;
ТЗ.КолРеализация = Запрос.КолРеализация;
ТЗ.СумРеализация = Запрос.СумРеализация;
КонецЕсли;
КонецЕсли;
КонецЦикла;
///////////////////////////////////////////////////////
//Отчет
Таб=СоздатьОбъект("Таблица");
Таб.ИсходнаяТаблица("Таблица");
Таб.ВывестиСекцию("Заголовок");
ай=1;
Тз.ВыбратьСтроки();
Пока Тз.ПолучитьСтроку()=1 Цикл
Таб.ВывестиСекцию("Строка");
//Ошибка возникает здесь для каждой строки
ай=ай+1;
КонецЦикла;
Таб.ВывестиСекцию("Итого");
Таб.ТолькоПросмотр();
Таб.Показать("Выпуск продукции");
КонецПроцедуры
Выводится 2 колонки ТЗ.КолРеализация и ТЗ.СумРеализация как Выражение
Полный текст ошибки
Функция не обнаружена (НННН) НННН<<?>>()
НННН<<?>>()
 
L

LSH

Покопайтесь в ячейках таблицы. Где-то там зашита эта функция.
 
B

binx

Свами согласен на все 100, но в этом то и вопрос, что в колонках всего две выражения и я их выше указал, но почему он матерится??????
 
L

LSH

Неее, смотрите в поле "Расшифровка" в свойствах ячейки таблицы.
 
Мы в соцсетях:

Обучение наступательной кибербезопасности в игровой форме. Начать игру!