General information
Category:
Coding, syntax & commands
I would do it this way:
WITH thisform.pageframe1.page3
with .List1
.Rowsource="chgnotce"
.RowsourceType=8
endwith
thisfoem.addproperty("List2src["+trans(.List1.ListCount)+",2]","")
sele (.list1.Rowsource)
FOR ia= 1 to .List1.ListCount
.List2src[ia,1]=.List1.list[ia,1]
lccom="count for not empty("+.List1.list[ia,1]+") to this.List2src[ia,2]"
&lccom
endfor
with .List2
.RowsourceType=5
.Rowsource="thisform.List2src"
.ColumnCount=2
endwith
endwith
>Hello Yuri,
>
>Can you please tell me.
>
>I am using the following code to show all the field names in the first list box.
>
>And in the second list box i am showing how many times this field is being used in the table i have 20,000 records. i am trying to find the count for each field. means how frequently are the fields used.
>
>but in the second list box i am getting the same number for all the fields the number is right for the first field and the same is being repeated for the rest of the fields count.
>I am doing this:
>
>select count("+col1+") as total;
> from chgnotce where not empty("+col1+") and Deleted() = .f. into cursor temp
>
> select cuList2
> append from dbf("temp")
> use in select("temp")
>
>**************************Code Start**************************************
>If not used("chgnotce")
>use chgnotce
>endif
>with thisform.pageframe1.page3.List1
>.Rowsource="chgnotce"
>.RowsourceType=8
>endwith
>
>
>CREATE CURSOR cuList2 (Total N(5))
>
>for n = 1 to thisform.pageframe1.page3.list1.listcount
> col1 = thisform.pageframe1.page3.list1.listitem(n,1)
>
> select count("+col1+") as total;
> from chgnotce where not empty("+col1+") and Deleted() = .f. into cursor temp
>
> select cuList2
> append from dbf("temp")
> use in select("temp")
>endfor
>
>
>WITH thisform.pageframe1.page3.list2
> .RowSourceType = 2 && Alias
> .RowSource = "cuList2"
> .Requery()
> .refresh()
> .setfocus()
>ENDWITH
>
>********************************************END***************
Previous
Next
Reply
View the map of this thread
View the map of this thread starting from this message only
View all messages of this thread
View all messages of this thread starting from this message only