Message
From
08/01/1999 12:38:43
 
 
To
08/01/1999 12:36:13
General information
Forum:
Visual FoxPro
Category:
Coding, syntax & commands
Miscellaneous
Thread ID:
00174074
Message ID:
00174088
Views:
24
>>>I am faced with the need to create (actually participate with) an alphabetic numbering system. The sequence is straight forward, and looks like this:
>>>
>>>AAAA
>>>AAAB
>>>.
>>>.
>>>AAAZ
>>>AABA
>>>
>>>etc.
>>>
>>>Really my only need is to be able to increment these codes by one, so I need a function that receives "DPRZ" and returns "DPSA". Get it?
>>>
>>>I am fairly confident that I can pound out the code to do this, but all of my ideas so far would take an enormous amount of code- can anybody think of a practical solution?
>>
>>
>>FOR n1=65 to 90
>>	FOR n2=65 to 90
>>		FOR n3=65 to 90
>>			FOR n4=65 to 90
>>				cString=CHR(n1)+CHR(n2)+CHR(n3)+CHR(n4)
>>			ENDFOR
>>		ENDFOR
>>	ENDFOR
>>ENDFOR
>>
>
>This will indeed work to produce an initial list, but I don't want to store a list. I need to pass a parameter and receive a parameter that is one greater than the initial value. Your post has me thinking along different lines though...
>
>PROCEDURE Increment


You just need to think in base 26 (A-Z) instead of base 10, constructing each "digit" in the new base. Hope that's clear enough for you.
Fred
Microsoft Visual FoxPro MVP

foxcentral.net
Previous
Next
Reply
Map
View