Отчеты, тонкая настройка.

[Александр]

Дак я и говорю про Ваш шаблон.  Вот бросаю свой
Программа не видит заполнение в прошлых заказах, если там есть и сэндвич, и стп. Если одни пакеты, то видит

[stekol`щик]

Можно сделать еще проще.
Если у вас все артикулы сэндвича начинаются на слово "Сендвич", то замените код процедуры на этот:
Код: [Выделить]
procedure MasterData1OnBeforePrint(Sender: TfrxComponent);
var s:String;
    i:Integer;
begin               
s:=<ЗаполненияЗаявка."Артикул">;
i:=Pos('Сендвич',s);
                                 
 if i>0 then
 MasterData1.Visible := False;
   
end;

Если у меня несколько видов непрозрачного заполнения (сэндвичи, вагонка, композит, оргстекло и т.д. ), что нужно добавить в этот код, чтобы всё заработало ? И ещё, в моем отчете "заявка на стеклопакеты" нет строки "Артикул", только "Наименование". Будет ли работать данный код, если я вместо <ЗаполненияЗаявка."Артикул"> буду использовать <ЗаполнениеЗаявка."Наименование">

[Алексей]

Чтобы исключить еще что-то, надо добавить еще критерии сравнения:

Код: [Выделить]

procedure MasterData1OnBeforePrint(Sender: TfrxComponent);
var s:String;
begin
s:=<ЗаполненияЗаявка."Артикул">;

 if (Pos('Сендвич',s)>0) or (Pos('Вагонка',s)>0)
  or (Pos('Композит',s)>0)  or (Pos('Оргстекло',s)>0) then
        MasterData1.Visible := false           
            else
               MasterData1.Visible := true;     
   
end;
Можно вместо артикула поставить [ЗаполненияЗаявка."Наименование"].

[Алексей]

Программа не видит заполнение в прошлых заказах, если там есть и сэндвич, и стп. Если одни пакеты, то видит

Надо добавить в код:

Код: [Выделить]

else
               MasterData1.Visible := true; 
Т.е. полный код процедуры либо как я выше написал или если нужен один Сендвич такой:

Код: [Выделить]

procedure MasterData1OnBeforePrint(Sender: TfrxComponent);
var s:String;
begin
s:=<ЗаполненияЗаявка."Артикул">;

 if Pos('Сендвич',s)>0  then
        MasterData1.Visible := false           
            else
               MasterData1.Visible := true;     
   
end;

[Александр]

Т.е. полный код процедуры либо как я выше написал или если нужен один Сендвич такой:
Код: [Выделить]

procedure MasterData1OnBeforePrint(Sender: TfrxComponent);
var s:String;
begin
s:=<ЗаполненияЗаявка."Артикул">;

 if Pos('Сендвич',s)>0  then
        MasterData1.Visible := false           
            else
               MasterData1.Visible := true;     
   
end;

Доброе утро, Алексей. Сделал всё, как у Вас, и все равно выскакивает такая ошибка

[Алексей]

Лишняя точка с запятой у вас там у коде наверное. Лучше бы код сюда скопировали.
Ловите ваш шаблон, я его поправил.

[Александр]

Ловите ваш шаблон, я его поправил.

Спасибо, всё заработало. И старые заказы видит, как надо

[KFOD]

Добрый день. Помогите посчитать общее количество изделий в проекте. На фото внизу 1,1,4 это проект с 3-мя позициями и количеством 1,1, и 4 шт. соотв.

[Александр]

Всем добрый день. Алексей, проявилась небольшая проблемка - после запуска программы, если сразу пробовать вывести отчёт ЗАЯВКА НА СЭНДВИЧ, программа пишет ошибку. А если открыть-закрыть ЗАЯВКА НА СТЕКЛОПАКЕТЫ, то после этого ЗАЯВКА НА СЭНДВИЧ работает нормально. Почему так?

[KFOD]

Что с отчетом не так не понятно. Все сделано по типу   "Счет с эскизами.fr3". В проекте окно №3 - 4 шт. и Окно №4- 2шт. Почему количество распечатанных эcкизов окон не по 1?

[KFOD]

То же самое и с вашим стандартным отчетом "Счет с эскизами с НДС.fr3". База данных на сервере находится может с этим связано. Все отчеты заменил на недавно  присланные.

[Алексей]

Почему количество распечатанных эcкизов окон не по 1?

Тут ответ прост: Зайдите в верхнее меню Отчет - > Данные и снимите галочку с набора "ИзделияВсе" (см. скриншот). Этот набор применяется для печати этикеток когда нужно, чтобы все изделия распечатывались.

[Алексей]

Всем добрый день. Алексей, проявилась небольшая проблемка - после запуска программы, если сразу пробовать вывести отчёт ЗАЯВКА НА СЭНДВИЧ, программа пишет ошибку. А если открыть-закрыть ЗАЯВКА НА СТЕКЛОПАКЕТЫ, то после этого ЗАЯВКА НА СЭНДВИЧ работает нормально. Почему так?

Привет! Так выкладывайте сюда ваш шаблон на сэндвичи, я же не телепат, чтоб угадывать, что у вас там в шаблоне .

[Алексей]

Помогите посчитать общее количество изделий в проекте.

Суммарного поля кол-ва изделий нет в наборах данных. Можно создать переменную в отчете и подсчитать кол-во изделий. Но такая переменная не будет выводить данные в банде ReportTitle, а сможет только в банде ReportSummary - внизу отчета. Во вложении инструкция и ваш шаблон с переменной.

[Александр]

Так выкладывайте сюда ваш шаблон на сэндвичи

Извините, не подумал. Вот, выложил.