vfpx / fastxtab Goto Github PK

Hi there!

I'm running fastxtab 1.6 and I'm getting type mismatch error at the line just after this weird one.

It seems the code in lines 7 to 9 bellow is misplaced (or am I missing something?)

1			for lnI = 1 to This.nMultiRowField
2				lcField = InpFields[This.anRowField[m.lnI], 1]
3				if This.nMultiRowField = 1
4					lcValue = rowfld
5				else
6					lcValue = evaluate('rowfld' + transform(lnI))
7				endif _This.nMultiRowField > 1
8				rowfldvalue = rowfldvalue + iif(empty(rowfldvalue), '', ',') + ;
9					lcValue
10				if lnI = 1
11					insert into (m.cOutStem) ((lcField)) values (lcValue)
12				else
13					replace (lcField) with lcValue in (m.cOutStem)
14				endif
15			next

Here is the bit of code I'm using to test Fastxtab:

Local oFastX As fastxtab
oFastX = NEWOBJECT('fastxtab',[fastxtab.prg])
With oFastX As fastxtab
   .cOuTFILE = [curTemp]
   .lCuRSORONLY = .T.
   .CROWFIELD = [user_id]   
   .cCOLFIELD = [YEAR(sale_date)]
   .cDATAFIELD = [total]        
   .runxtab()
Endwith

Is it possible to get a summed total of the values in the rows? (i.e. a horizontal total for each row). I can see that if the value for 'lTotalRows' is set to True, that you get an additional row at the end of the data in the xtab showing the totals for the (vertical) columns. Is there a similar function to get a total of the (horizontal) rows? For example, the existing VFPXTAB routine has an true/false option for totaling the rows as the 8th parameter.

PS. Have tested FastXtab on some local clients data and it is noticeably faster so would really like to use this updated utility (assuming that row totals are also possible).