DataReport - Group Footer Problem

[PeterWallace]

Using Msdatashape I can extract Data I need to Genrate a Non DataEnvironment report

At This point the Receipts and Disbursments have all been
calculated and The Carried Forward Figure Generated under Field Bfwd

The Ledger needs to Show

Group Header
acc no 1234 ABLE BAKER BFWD 123.45

Detail
eggs 10.00
Bacon 20.00
Butter -20.00

Group Footer
PLUS 10.00

Carried Fwd 133.45

SqlParent = "SELECT Lno,..., Bfwd, Cfwd from AccountTable order by ....etc"

SqlChild = "SELECT Lno, ... , Amount , etc Order By Etc "



This is A Ledger

Group By Account No

I can Place Bfwd Balance in Group Header TextBox

I can Place Each Amount I Detail Line TextBox

I can use rptFuncSum to Total Amount and Show In Group Footer

As is Group Footer I can Not get Cfwd figure into A TextBox

BUT I can Not Get ANything else ...Lablel etc to Show Value either


WITH RptEomLedger.Sections("Section7").controls
.item(1).DataMember="Child"
.item(1).DataField="Amount"
.item(1).FunctionType=RptFuncSum
' above gives what want

'.item.("LblCfwd").caption = rs.fields(7).Value
' this gives error message
' Have Tried formatted ...
' Tried field Cfwd to string
' ... Put Cfwd in Child

'.item.("LblCfwd").caption = rs.fields(7).Value
' this gives error message

'.item.("LblCfwd").caption = rs.fields(7).Name
' this at Least fills the label ...with the FieldName

There Must Be a way Of getting the cfwd figure into the group footer ...........!!!!!!!!!

Can Anyone advise

Peter