Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Division to columns
Message
 
To
28/09/2005 06:31:44
General information
Forum:
Visual FoxPro
Category:
Coding, syntax & commands
Environment versions
Visual FoxPro:
VFP 8 SP1
Database:
Visual FoxPro
Miscellaneous
Thread ID:
01053818
Message ID:
01053820
Views:
6
>Hi
>Help please:
>I have a cursor with 10 lines:
>for example:
>
create cursor crsr1(id i)
>for i=1 to 10
>insert into crsr1value(i)
>endfor
>Now, I have another cursor with three columns
>for example:
>
create cursor crsr2(a c(1),b c(1),c c(1))
>
>I want to divide the values of the first cursor inside the second like this:
>A B C
>1 2 3
>4 5 6
>7 8 9
>10
>
>How can I do it?
SELECT crsr1
lnTest = 0
lcInsert = "INSERT INTO Crsr2 VALUES (?m.Val1, ?m.Val2, ?m.Val3)"
SCAN
  lnTest  = lnTest + 1
  m.TestV = "m.Val" + TRANSFORM(lnTest)
  &TestV  = TRANSFORM(Id)
  IF lnTest == 3
     &lcInsert
     lnTest  = 0
  ENDIF
ENDSCAN
(not tested)
Against Stupidity the Gods themselves Contend in Vain - Johann Christoph Friedrich von Schiller
The only thing normal about database guys is their tables.
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform