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

[sherbakov]

сделал фильтрацию в заявке на стеклопакеты-
procedure MasterData1OnBeforePrint(Sender: TfrxComponent);
begin
   if <ЗаполненияЗаявка."Наименование"> =  'Стеклопакет 40 мм ' then
   MasterData1.Visible := True else
   MasterData1.Visible := False;   
end.

еще бы в настройки фастрепорта формочки включить, чтобы была возможность выбора при формировании отчета и возможность присвоить например номер заявки, чтобы в редактирование не лезть.Если это не сложно.

зы... тут не нужно все в одном отчете выведу (тут просто несколько MasterData заведу))), а можно у пользователей(не у всех) убрать возможность редактирования отчета ?

[sherbakov]

Ну вроде все сделал- стеклопакеты фильтруются,кол-во считается. Только не могу посчитать полщадь стеклопакетов, написал так- [SUM(<ЗаполненияЗаявка."Площадь">,MasterData1) #n%2,2f],только не считает их (((  кстати не плохо получилось

[sherbakov]

в датасет "Аксессуары" нужно добавить данные -"номер заказа "

[Алексей]

сделал фильтрацию в заявке на стеклопакеты-
procedure MasterData1OnBeforePrint(Sender: TfrxComponent);
begin
   if <ЗаполненияЗаявка."Наименование"> =  'Стеклопакет 40 мм ' then
   MasterData1.Visible := True else
   MasterData1.Visible := False;   
end.

Да, смотрю вы неплохо продвинулись в изучении дизайнера отчета!  

еще бы в настройки фастрепорта формочки включить, чтобы была возможность выбора при формировании отчета и возможность присвоить например номер заявки, чтобы в редактирование не лезть.Если это не сложно.

Сделал заметку, пока отложим.

а можно у пользователей(не у всех) убрать возможность редактирования отчета ?

Можно сделать. Разрешить только администраторам править отчеты?

[Алексей]

в датасет "Аксессуары" нужно добавить данные -"номер заказа "

Просто вставляйте в ячейку данных датасет Счета.Номер Заказа (даже если сам банд Аксессуары).

[sherbakov]

в датасет "Аксессуары" нужно добавить данные -"номер заказа "

Просто вставляйте в ячейку данных датасет Счета.Номер Заказа (даже если сам банд Аксессуары).

Не получается,вернее ставит, если выводить в одном заказе(срин1) ,а вот в групповом(скрин2) не получается (

И еще подскажите как просуммировать корректно. а то голову уже сломал ... зы так программистом маленьким можно стать)))
А еще как бы так сделать чтобы аксессуары , допустим подоконник длинной 600мм в заказе две шт., чтобы вывод был 600мм -1шт ,600мм - 1шт, а не  600мм - 2 шт.
 

[sherbakov]

отключить редактирование у двух самых иерархически низких.)

[sherbakov]

что то еще ни как не могу мс вывести со сборкой- если после расчета открыть отчет мс нету, но если до этого открыть отчет "москитные сетки", то она каким то чудесным образом появляется))) посмотрите что не так,отчет прикладываю

[Алексей]

По сборке - вы пытались использовать суммовой набор МоскиткаЗаявка в разрезе изделий, поэтому было пусто. Я поправил, теперь можно использовать его и в разрезе изделий (обновляйтесь). Но в отчете надо заменить банды MasterData на DetalData у наборов москитки, аксессуаровфильтр и заполнений. Поправленный отчет прикрепил.

[Алексей]

отключить редактирование у двух самых иерархически низких.)

Отключил у всех, кроме администратора.

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

[sherbakov]

А когда размер считаю ([SUM(<Аксессуары."Размер мм">,MasterData1)]) там тоже строки? Их не преобразовать? Потому что в скрине кол-во считает(синим отмечено), а размер(красным) ни в какую??? Не подскажете?

[Алексей]

Да, там строки. Ладно, открыл вам и числа (снова обновляйтесь). Вообще строки сделали для упрощения форматирования вывода в отчеты (разделение на тысячные и т.п.).
В наборах Аксессуары появились еще РазмерЧ мм, РазмерЧ м, ВсегоЧ. В таблице можете не менять привязки, только в итоговой строке напишите:
[SUM(<Аксессуары."РазмерЧ м">,MasterData1)]

В набор ЗаполненияЗаявка добавил ПлощадьЧ. Сейчас можно в итого так написать:
[SUM(<ЗаполненияЗаявка."ПлощадьЧ">,MasterData2)]

Если еще в какие наборы надо, напишите, добавлю.

[sherbakov]

с формой почти разобрался --- в менеджере документов работает ))) а вот из печати заказов не хотит(((
делал так:
procedure Button1OnClick(Sender: TfrxComponent); 
begin                                   
   begin                 
    Memo96.text := Edit1.Text;                   
    DialogPage1.ModalResult := mrCancel;
    Report.ShowReport();
    DialogPage1.Visible := false;       
    end           
end;

Не подскажете почему так?


ЗЫ сделал!!! буду дальше копать)))) --  код на всякий случай вдруг кому пригодится) 

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

procedure Button1OnClick(Sender: TfrxComponent); 
begin                                   
    begin
        if edit1.text > '0'                               
          then
              begin                 
                  Memo96.text := Edit1.Text;  //
                  Memo98.text := DateToStr(DateEdit1.Date);    //                   
                  DialogPage1.ModalResult:=mrOK;
              end             
          else
                  ShowMessage('Введите номер заявки!!!');
    end;           
end;

[sherbakov]

Если еще в какие наборы надо, напишите, добавлю.

Номера счетов в датасет Аксессуары хотелось бы еще...

[Алексей]

отключить редактирование у двух самых иерархически низких.)

Отключил у всех, кроме администратора.

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

Пока отключил редактирование сформированных отчетов так же для счета с эскизами. А то защиты тогда совсем никакой. Потом может придумаем чего "покрепче".

А номер заявки - это что такое? В базе такого поля нет?