Report Control - Transposed Grouping

Print Page | Close Window

Transposed Grouping

Printed From: Codejock Forums
Category: Codejock Products
Forum Name: Report Control
Forum Description: Topics Related to Codejock Report Control
URL: http://forum.codejock.com/forum_posts.asp?TID=14876
Printed Date: 17 June 2024 at 9:24am
Software Version: Web Wiz Forums 12.04 - http://www.webwizforums.com

Topic: Transposed Grouping

Posted By: joeliner
Subject: Transposed Grouping
Date Posted: 31 July 2009 at 5:08am

On the release notes there is a feature i really need to know how to apply it:

Transposed Grouping (Column-based) (while existed Grouping is Rows-based)

A sample would help!

Thanks

-------------
Product: Xtreme SuitePro (ActiveX) version 13.1
Platform: Windows XP SP 3
Language: Visual Basic 6 SP6

Replies:

Posted By: mdoubson
Date Posted: 13 August 2009 at 3:36pm

https://forum.codejock.com/uploads/20090813_153716_RcPlusMinus.rar - uploads/20090813_153716_RcPlusMinus.rar

OK - get it

-------------
Mark Doubson, Ph.D.

Posted By: joeliner
Date Posted: 17 August 2009 at 1:23am

Is there hope that CJ will implement something like this:

Something like columns within columns.

regards,

-------------
Product: Xtreme SuitePro (ActiveX) version 13.1
Platform: Windows XP SP 3
Language: Visual Basic 6 SP6

Posted By: joeliner
Date Posted: 17 August 2009 at 3:32am

uploads/20090817_032054_RcPlusMinus_bug.rar - uploads/20090817_032054_RcPlusMinus_bug.rar

Hi,

this feature has a bug when you user savesettings. After savesettings the 'hidden' groups dont show even after you click on plus-minus. see attached project for more info.

Then on a cosmetic note, if i wud equate > to + and < to -, then
if columns are show, use <
else if hidden
use >
end if :)

just my thoughts

-------------
Product: Xtreme SuitePro (ActiveX) version 13.1
Platform: Windows XP SP 3
Language: Visual Basic 6 SP6

Posted By: mdoubson
Date Posted: 17 August 2009 at 10:04am

Thanks - this is not bug in feature but in old SaveSetting / LoadSetting functions - I will take a look

You can also use this PlusMinus feature with negative settings - it will show / hide columns LEFT of PlusMinus Column

-------------
Mark Doubson, Ph.D.

Posted By: mdoubson
Date Posted: 17 August 2009 at 4:50pm

This is fresh version covered your bug case - https://forum.codejock.com/uploads/DemoVersion/ReportControlUpdated.rar - https://forum.codejock.com/uploads/DemoVersion/ReportControlUpdated.rar

Flag .PaintManager.ColumnPlusMinusSign = True

show more reasonable for functionality icons - please try

Private Sub Form_Load()

   With Me.ReportControl1
      .ShowGroupBox = True
      With .Columns.Add(.Columns.Count, "Col1", 100, True)
         .PlusMinus = True
         .NextVisualBlock = 2

' .Expanded = False

'THIS IS PROPER INITIAL SETTING NOW because we don't have follows columns yet

'I CHANGED DEFAULT to be False so you don't need to use such setting in your initialization code

      End With
      .Columns.Add .Columns.Count, "Col2", 100, True
      .Columns.Add .Columns.Count, "Col3", 100, True

      With .Records.Add
         .AddItem "A"
         .AddItem "B"
         .AddItem "C"
      End With

      .Populate
      .PaintManager.ColumnPlusMinusSign = True
   End With

    openlayout

End Sub

-------------
Mark Doubson, Ph.D.

Posted By: mdoubson
Date Posted: 17 August 2009 at 5:25pm

Still I am not sure that SaveSettings - LoadSettings is safe way for all cases - e.g. if you call SaveSettings only in Form_Unload

and LoadSettings in Form_Load - it looks safe but if you call LoadSettings after some user steps - you can't be sure that static set of properties will match user expectations

-------------
Mark Doubson, Ph.D.

Posted By: mdoubson
Date Posted: 18 August 2009 at 5:16pm

About your layout - I think that you can use in this case simple title logic everybody understand:

like full-qualified name and intenal name inside same qualifier

btw - there is your respond about modified ocx?

as we are going to make release sometimes in September - you all should review current state of control and report now to make some improvements...

[same rule as before - clear isolated test-case with simple VB sample to proof]

for example - I know that some RC properties not covered by SaveSettings - LoadSettings or design-mode PropertyBag but this is in most case minor and developer can always write proper initialization code to be sure that app will run in proper mode.

-------------
Mark Doubson, Ph.D.

Posted By: mlatona
Date Posted: 19 August 2009 at 7:20am

Hi Mark,

the report control don`t work correct when I use a negative settings. Not all columns are visible, when I expand the plus minus column.

Regards

Marco

-------------
Product: Xtreme SuitePro (ActiveX) version 13.2.1
Platform: Windows XP
Language: Visual Basic 6.0 SP6

Posted By: mdoubson
Date Posted: 19 August 2009 at 7:28am

Are you sure that in the moment you set column#5 - PlusMinus and NextVisualBlock = -2 you already have visible column#4 and column#3?

-------------
Mark Doubson, Ph.D.

Posted By: mlatona
Date Posted: 19 August 2009 at 7:38am

Hi, here is a sample. Collapse column 'Q1'. Column 'Jan', 'Feb' and 'May' are hidden. Exand column 'Q1'. Only column 'Jan' and 'Feb' are visible. http://forum.codejock.com/uploads/20090819_073816_PlusMinusSample.zip - uploads/20090819_073816_PlusMinusSample.zip

-------------
Product: Xtreme SuitePro (ActiveX) version 13.2.1
Platform: Windows XP
Language: Visual Basic 6.0 SP6

Posted By: mdoubson
Date Posted: 19 August 2009 at 7:39am

Thanks

Try this simple code please

Private Sub Form_Load()

   With Me.ReportControl1
      .ShowGroupBox = True
      With .Columns.Add(.Columns.Count, "Col1", 100, True)
         .PlusMinus = True
         .NextVisualBlock = 2
      End With
      With .Columns.Add(.Columns.Count, "Col2", 100, True)
      End With
      With .Columns.Add(.Columns.Count, "Col3", 100, True)
         .PlusMinus = True
         .NextVisualBlock = -2
      End With

      With .Records.Add
         .AddItem "A"
         .AddItem "B"
         .AddItem "C"
      End With

      .Populate
      .PaintManager.ColumnPlusMinusSign = True
   End With

-------------
Mark Doubson, Ph.D.

Posted By: mdoubson
Date Posted: 19 August 2009 at 7:56am

If I modify your sample like this - easy to see

Private Sub Form_Load()

With ReportControl1
.Columns.Add 0, "Jan", 50, False
.Columns.Add 1, "Feb", 50, False
.Columns.Add 2, "Mar", 50, False

With .Columns.Add(3, "Q1", 50, False)
    .PlusMinus = True
    .NextVisualBlock = -2
End With

.Columns.Add 4, "Apr", 50, False
.Columns.Add 5, "May", 50, False
.Columns.Add 6, "Jun", 50, False
With .Columns.Add(7, "Q2", 50, False)
    .PlusMinus = True
    .NextVisualBlock = -2
End With
.PaintManager.ColumnPlusMinusSign = True
.Populate
End With

End Sub

it works. Will check deep

-------------
Mark Doubson, Ph.D.

Posted By: mlatona
Date Posted: 19 August 2009 at 8:14am

Yes, it works, but column 'Jan' is visible when you collapse the column 'Q1' and this is not correct.

-------------
Product: Xtreme SuitePro (ActiveX) version 13.2.1
Platform: Windows XP
Language: Visual Basic 6.0 SP6

Posted By: mlatona
Date Posted: 19 August 2009 at 8:17am

Try this code and it works not correct.

With Me.ReportControl1
      .ShowGroupBox = True
      With .Columns.Add(.Columns.Count, "Col1", 100, True)
         .PlusMinus = True
         .NextVisualBlock = 2
      End With
      With .Columns.Add(.Columns.Count, "Col2", 100, True)
      End With
      With .Columns.Add(.Columns.Count, "Col3", 100, True)
      End With
      With .Columns.Add(.Columns.Count, "Col4", 100, True)
         .PlusMinus = True
         .NextVisualBlock = -3
      End With

      With .Records.Add
         .AddItem "A"
         .AddItem "B"
         .AddItem "C"
      End With

      .Populate
      .PaintManager.ColumnPlusMinusSign = True
   End With

-------------
Product: Xtreme SuitePro (ActiveX) version 13.2.1
Platform: Windows XP
Language: Visual Basic 6.0 SP6

Posted By: mdoubson
Date Posted: 19 August 2009 at 8:44am

Right - fixed - please try now - https://forum.codejock.com/uploads/DemoVersion/ReportControlUpdated.rar - https://forum.codejock.com/uploads/DemoVersion/ReportControlUpdated.rar

-------------
Mark Doubson, Ph.D.

Posted By: mlatona
Date Posted: 19 August 2009 at 9:03am

It works. Thank you. Is it possible, that you add a unicode version in your rar file?

-------------
Product: Xtreme SuitePro (ActiveX) version 13.2.1
Platform: Windows XP
Language: Visual Basic 6.0 SP6

Posted By: mdoubson
Date Posted: 19 August 2009 at 9:10am

Ok - get it

-------------
Mark Doubson, Ph.D.