Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Givng a new name to multiple Cursors for each month
Message
General information
Forum:
Visual FoxPro
Category:
Databases,Tables, Views, Indexing and SQL syntax
Environment versions
Visual FoxPro:
VFP 9 SP2
Database:
Visual FoxPro
Miscellaneous
Thread ID:
01512741
Message ID:
01512742
Views:
75
This message has been marked as the solution to the initial question of the thread.
>I would like to give a new name to each of the 12 months of data cursors that I will produce in the below SQL statements, but the below isn't working. How do you give a variable name to the cursor name?

Try
FOR nMonth = 1 TO 12
	lcMonth = GetAlphaMonth(nMonth)
	ldDate = date(2010,nMonth,1) && First Day of the month

	ldStartOfMonth=ldDate
	ldStartOfNextMonth=GOMONTH(ldDate,1) && First day of next month
	
	SELECT lcMonth+" 2010" AS Month_Year, ;
			GrpID, Emp_ID, ;
			SUM(bill_prem) AS Month_Billed, ;
			BnftName, ;
			0000000.00 AS Month_Collected ;
		FROM tmp1 ;
		WHERE bill_date>= ldStartOfMonth and  bill_date<ldStartOfNextMonth ;
		INTO CURSOR ("tmp" +alltrim(str(nMonth)));
		GROUP BY GrpID, Emp_ID, BnftName
	
ENDFOR
If it's not broken, fix it until it is.


My Blog
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform