Конференция VBStreets

**shady** » 26.09.2006 (Вт) 14:34

при установке например:

Код: Выделить всё: GroupHeader1.GroupValue = adoWBill.Recordset("WayBillsID").Value

всегда, сначала печатается секция PageHeader и все GroupHeader, пустая секция Detail, и GroupFooter с PageFooter соответственно. Причем в секцию GroupFooter 16457 - это число берется из первой записи следующей накладной.
При этом выставлено свойство NewPage - After у секции GroupFooter

**Andrey Fedorov** » 26.09.2006 (Вт) 15:16

shady писал(а):при установке например:
Код: Выделить всё
GroupHeader1.GroupValue = adoWBill.Recordset("WayBillsID").Value

всегда, сначала печатается секция PageHeader и все GroupHeader, пустая секция Detail, и GroupFooter с PageFooter соответственно. Причем в секцию GroupFooter 16457 - это число берется из первой записи следующей накладной.
При этом выставлено свойство NewPage - After у секции GroupFooter

Что-то ты явно накрутил...

Код: Выделить всё: GroupHeader1.GroupValue = doWBill.Recordset("WayBillsID").Value

У тебя что, так в коде и написано?

Просто укажи нужный DataField в соответствующем свойстве у GroupHeader в дизайнере. И свойство NewPage оставь по умолчанию.

**shady** » 27.09.2006 (Ср) 7:59

У тебя что, так в коде и написано?

ну, да, пробывал, в helpe так написано

Код: Выделить всё: Private Sub Detail_Format() ' Set the unbound group breaking value ghCountry.GroupValue = dcRptData.Recordset.Fields("Country").Value End Sub

Просто укажи нужный DataField в соответствующем свойстве у GroupHeader

так и сделал, только не в дизайнере, а кодом, но сысла это не меняет, работает как нужно.

Только теперь другой вопрос.
А можно в секцию Detail вставить "вручную" дополнительную строку?
Мне нужно это для Транспортных расходов, если они отдельной строкой, то нужно эту строку "пририсовать", если нет, то не рисовать.
Я пока сделал это в секции GroupFooter и делаю

Код: Выделить всё: .Field_N_.Visible = False

для всех полей которые нужно показывать. Ну и соответственно придется все остальные fieldы и labelы подтягивать вверх...

**Andrey Fedorov** » 27.09.2006 (Ср) 8:14

shady писал(а):так и сделал, только не в дизайнере, а кодом, но сысла это не меняет, работает как нужно.

Смысла писать что-либо кодом в простеньком отчете совершенно нет.
По крайней мере в дизайнере нужно было лишь имя поля ручками набрать, а тут строку кода - мне было бы лень...

shady писал(а):Только теперь другой вопрос.
А можно в секцию Detail вставить "вручную" дополнительную строку?
Мне нужно это для Транспортных расходов, если они отдельной строкой, то нужно эту строку "пририсовать", если нет, то не рисовать.

Не совсем понятно что хочешь получить в итоге... И что значит "отдельной строкой"...

Они у тебя не в Recordset-e с Detail накладной?
Ну дык добавь их туда, чтобы все упростить...

shady писал(а):Я пока сделал это в секции GroupFooter и делаю
Код: Выделить всё
.Field_N_.Visible = False
для всех полей которые нужно показывать. Ну и соответственно придется все остальные fieldы и labelы подтягивать вверх...

**shady** » 27.09.2006 (Ср) 8:48

Они у тебя не в Recordset-e с Detail накладной?

Да (но я их выбираю из другой таблицы, т.е. если в деталях например продукции 6 позиций, то и сумма транспортных повторяется 6 раз)

Ну дык добавь их туда, чтобы все упростить...

Не совсем понял?

**Andrey Fedorov** » 27.09.2006 (Ср) 8:52

shady писал(а):
Они у тебя не в Recordset-e с Detail накладной?

Да (но я их выбираю из другой таблицы, т.е. если в деталях например продукции 6 позиций, то и сумма транспортных повторяется 6 раз)
Ну дык добавь их туда, чтобы все упростить...

Не совсем понял?

SELECT .. FROM ИзОднойТаблицы ...
UNION ALL
SELECT .. FROM ИзДругойТаблицы ...

**shady** » 27.09.2006 (Ср) 9:22

SELECT .. FROM ИзОднойТаблицы ...
UNION ALL
SELECT .. FROM ИзДругойТаблицы ...

Но это применимо только к одной накладной. А если напримербудет несколько накладных, в которых наприер через одну, есть транспортные расходы?

**Andrey Fedorov** » 27.09.2006 (Ср) 9:27

shady писал(а):
SELECT .. FROM ИзОднойТаблицы ...
UNION ALL
SELECT .. FROM ИзДругойТаблицы ...

Но это применимо только к одной накладной. А если напримербудет несколько накладных, в которых наприер через одну, есть транспортные расходы?

Ну и что?

**shady** » 27.09.2006 (Ср) 10:11

Код: Выделить всё: SELECT dbo.Bills.ID, dbo.Bills.IDBill, dbo.Bills.IDTMC, dbo.Bills.CrDate, dbo.Bills.NDSPrice, dbo.Bills.Comm, dbo.Bills.IDTR, Ru.Name AS RegName, Ra.Name AS RegNameAct, Tu.Name AS TownCust, Ta.Name AS TownCustAct, Tu.ID AS IDTown, Ta.ID AS IDTownAct, Tu.IDReg, Ta.IDReg AS IDregAct, Cu.ID AS IDCust, Cu.Name AS NameCust, Cu.INN, Cu.KPP, Cu.Adress, Cu.Phone, Ca.ID AS IDCustAct, Ca.Name AS NameCustAct, Ca.KPP AS KPPAct, Ca.Adress AS AdressAct, Ca.Phone AS PhoneAct, Ca.INN AS INNAct, dbo.Bills.CheckB, STR(Tu.PIndex) AS PIndex, STR(Ta.PIndex) AS PIndexAct FROM dbo.Bills INNER JOIN dbo.Customers AS Cu ON dbo.Bills.IDCust = Cu.ID INNER JOIN dbo.Customers AS Ca ON dbo.Bills.IDPay = Ca.ID INNER JOIN dbo.Towns AS Tu ON Cu.IDTown = Tu.ID INNER JOIN dbo.Towns AS Ta ON Ca.IDActTown = Ta.ID INNER JOIN dbo.Regions AS Ru ON Tu.IDReg = Ru.ID INNER JOIN dbo.Regions AS Ra ON Ta.IDReg = Ra.ID

и как я это смогу использовать с моим запросом?

**Andrey Fedorov** » 27.09.2006 (Ср) 10:36

shady писал(а):и как я это смогу использовать с моим запросом?

Да точно так-же - результаты разных запросов прекрасно объединяются через UNION ALL. Я пока не вижу у тебя проблемы...

Конференция VBStreets

ActiveReports GroupValue как быть?

ActiveReports GroupValue как быть?

Re: ActiveReports GroupValue как быть?

Кто сейчас на конференции