Re: Sequential Code Logic

This WebDNA talk-list message is from

2003


It keeps the original formatting.
numero = 54009
interpreted = N
texte = i would have just created a database with ALL the possible combinations, = Primary Index'd with a counter that went from 1->100,000 or however many = there are and one last field called USED=3DT/F then just select the next un-used combination from the database each time= you need one, ordered by the ID creating the database would have been pretty easy. [loop start=3D1&end=3D99] [loop start=3D1&end=3D99] [loop start=3D1&end=3D99] [loop start=3D1&end=3D99] [loop start=3D1&end=3D99] [apend db.... [/loop] [/loop] [/loop] [/loop] [/loop] i love coding stuff that makes webcat work :-) ssssh... don't tell alain... ;-) > It always amazes me how difficult it is to code some logic that the hum= an > mind has no trouble with. Anyway, I figured out a solution, so I though= t I > post it for the archives. > > > [!]----- Calculate the last deed number -----[/!] > [search db=3Dadmin/deed_number.db&neIDdatarq=3Dfind_all&deIDsort=3D1&ma= x=3D1] > [founditems] > [text]theTract=3D[TRACT][/text] > [text]theSub=3D[SUB][/text] > [text]theSquare=3D[SQUARE][/text] > [text]theBlock=3D[BLOCK][/text] > [text]theLot=3D[LOT][/text] > [/founditems] > [/search] > > [!]----- Roll sections over if they've reached their max -----[/!] > [if "[theLot]"=3D"999"] > [then] > [text]newLot=3D1[/text] > [/then] > [else] > [text]newLot=3D[math][theLot]+1[/math][/text] > [text]newBlock=3D[theBlock][/text] > [/else] > [/if] > [if ("[theLot]"=3D"999") & ("[theBlock]"=3D"99")] > [then] > [text]newBlock=3D1[/text] > [/then] > [else] > [text]newSquare=3D[theSquare][/text] > [/else] > [/if] > [if ("[theLot]"=3D"999") & ("[theBlock]"=3D"99") & ("[theSquare]"=3D"D"= )] > [then] > [text]newSquare=3DA[/text] > [/then] > [else] > [text]newSub=3D[theSub][/text] > [/else] > [/if] > [if ("[theLot]"=3D"999") & ("[theBlock]"=3D"99") & ("[theSquare]"=3D"D"= ) & > ("[theSub]"=3D"99")] > [then] > [text]newSub=3D1[/text] > [text]newTract=3D[math][theTract]+1[/math][/text] > [/then] > [else] > [text]newTract=3D[theTract][/text] > [/else] > [/if] > > [!]----- Increase sections by one where needed -----[/!] > [if ("[theLot]"=3D"999") & ("[theBlock]"!"99")] > [then] > [text]newBlock=3D[math][theBlock]+1[/math][/text] > [/then] > [/if] > [if ("[theLot]"=3D"999") & ("[theBlock]"=3D"99") & ("[theSquare]"!"D")]= > [then] > [switch value=3D[theSquare]] > [case value=3DA] > [text]newSquare=3DB[/text] > [/case] > [case value=3DB] > [text]newSquare=3DC[/text] > [/case] > [case value=3DC] > [text]newSquare=3DD[/text] > [/case] > [case value=3DD] > [text]newSquare=3DA[/text] > [/case] > [/switch] > [/then] > [/if] > [if ("[theLot]"=3D"999") & ("[theBlock]"=3D"99") & ("[theSquare]"=3D"D"= ) & > ("[theSub]"!"99")] > [then] > [text]newSub=3D[math][theSub]+1[/math][/text] > [/then] > [/if] > > > > On 11/12/03 8:58 AM, "Clint Davis" wrote: > > > A store I'm building will be selling an item that is serialized with = a > > sequential code like this: > > > > 1 1 A 1 1 > > 1 1 A 1 2 > > ... > > 1 1 A 1 99 > > 1 1 A 2 1 > > ... > > 1 1 A 99 99 > > 1 1 B 1 1 > > ... > > 1 1 D 99 99 > > 1 2 A 1 1 > > ... > > 1 99 D 99 99 > > 2 1 A 1 1 > > > > > > Field 1 =3D 1-99 > > Field 2 =3D 1-99 > > Field 3 =3D A-D > > Field 4 =3D 1-99 > > Field 5 =3D 1-99 > > > --------------------------------------------------------------------- > Clint Davis > Webmaster / Interactive Media Specialist > Gray Loon Marketing Group, Inc. http://www.grayloon.com > 204 Main Street | Evansville, IN 47708 | Phone:812-422-9999 > --------------------------------------------------------------------- > > > ------------------------------------------------------------- > This message is sent to you because you are subscribed to > the mailing list . > To unsubscribe, E-mail to: > To switch to the DIGEST mode, E-mail to > Web Archive of this list is at: http://webdna.smithmicro.com/ ------------------------------------------------------------- This message is sent to you because you are subscribed to the mailing list . To unsubscribe, E-mail to: To switch to the DIGEST mode, E-mail to Web Archive of this list is at: http://webdna.smithmicro.com/ Associated Messages, from the most recent to the oldest:

    
  1. Re: Sequential Code Logic ( Donovan Brooke 2003)
  2. Re: Sequential Code Logic ( Clint Davis 2003)
  3. Re: Sequential Code Logic ( "Jan Donald" 2003)
  4. Re: Sequential Code Logic ( "Andrew Simpson" 2003)
  5. Re: Sequential Code Logic ( Donovan Brooke 2003)
  6. Re: Sequential Code Logic ( Gary Krockover 2003)
  7. Re: Sequential Code Logic ( Clint Davis 2003)
  8. Sequential Code Logic ( Clint Davis 2003)
i would have just created a database with ALL the possible combinations, = Primary Index'd with a counter that went from 1->100,000 or however many = there are and one last field called USED=3DT/F then just select the next un-used combination from the database each time= you need one, ordered by the ID creating the database would have been pretty easy. [loop start=3D1&end=3D99] [loop start=3D1&end=3D99] [loop start=3D1&end=3D99] [loop start=3D1&end=3D99] [loop start=3D1&end=3D99] [apend db.... [/loop] [/loop] [/loop] [/loop] [/loop] i love coding stuff that makes webcat work :-) ssssh... don't tell alain... ;-) > It always amazes me how difficult it is to code some logic that the hum= an > mind has no trouble with. Anyway, I figured out a solution, so I though= t I > post it for the archives. > > > [!]----- Calculate the last deed number -----[/!] > [search db=3Dadmin/deed_number.db&neIDdatarq=3Dfind_all&deIDsort=3D1&ma= x=3D1] > [founditems] > [text]theTract=3D[TRACT][/text] > [text]theSub=3D[SUB][/text] > [text]theSquare=3D[SQUARE][/text] > [text]theBlock=3D[BLOCK][/text] > [text]theLot=3D[LOT][/text] > [/founditems] > [/search] > > [!]----- Roll sections over if they've reached their max -----[/!] > [if "[theLot]"=3D"999"] > [then] > [text]newLot=3D1[/text] > [/then] > [else] > [text]newLot=3D[math][theLot]+1[/math][/text] > [text]newBlock=3D[theBlock][/text] > [/else] > [/if] > [if ("[theLot]"=3D"999") & ("[theBlock]"=3D"99")] > [then] > [text]newBlock=3D1[/text] > [/then] > [else] > [text]newSquare=3D[theSquare][/text] > [/else] > [/if] > [if ("[theLot]"=3D"999") & ("[theBlock]"=3D"99") & ("[theSquare]"=3D"D"= )] > [then] > [text]newSquare=3DA[/text] > [/then] > [else] > [text]newSub=3D[theSub][/text] > [/else] > [/if] > [if ("[theLot]"=3D"999") & ("[theBlock]"=3D"99") & ("[theSquare]"=3D"D"= ) & > ("[theSub]"=3D"99")] > [then] > [text]newSub=3D1[/text] > [text]newTract=3D[math][theTract]+1[/math][/text] > [/then] > [else] > [text]newTract=3D[theTract][/text] > [/else] > [/if] > > [!]----- Increase sections by one where needed -----[/!] > [if ("[theLot]"=3D"999") & ("[theBlock]"!"99")] > [then] > [text]newBlock=3D[math][theBlock]+1[/math][/text] > [/then] > [/if] > [if ("[theLot]"=3D"999") & ("[theBlock]"=3D"99") & ("[theSquare]"!"D")]= > [then] > [switch value=3D[theSquare]] > [case value=3DA] > [text]newSquare=3DB[/text] > [/case] > [case value=3DB] > [text]newSquare=3DC[/text] > [/case] > [case value=3DC] > [text]newSquare=3DD[/text] > [/case] > [case value=3DD] > [text]newSquare=3DA[/text] > [/case] > [/switch] > [/then] > [/if] > [if ("[theLot]"=3D"999") & ("[theBlock]"=3D"99") & ("[theSquare]"=3D"D"= ) & > ("[theSub]"!"99")] > [then] > [text]newSub=3D[math][theSub]+1[/math][/text] > [/then] > [/if] > > > > On 11/12/03 8:58 AM, "Clint Davis" wrote: > > > A store I'm building will be selling an item that is serialized with = a > > sequential code like this: > > > > 1 1 A 1 1 > > 1 1 A 1 2 > > ... > > 1 1 A 1 99 > > 1 1 A 2 1 > > ... > > 1 1 A 99 99 > > 1 1 B 1 1 > > ... > > 1 1 D 99 99 > > 1 2 A 1 1 > > ... > > 1 99 D 99 99 > > 2 1 A 1 1 > > > > > > Field 1 =3D 1-99 > > Field 2 =3D 1-99 > > Field 3 =3D A-D > > Field 4 =3D 1-99 > > Field 5 =3D 1-99 > > > --------------------------------------------------------------------- > Clint Davis > Webmaster / Interactive Media Specialist > Gray Loon Marketing Group, Inc. http://www.grayloon.com > 204 Main Street | Evansville, IN 47708 | Phone:812-422-9999 > --------------------------------------------------------------------- > > > ------------------------------------------------------------- > This message is sent to you because you are subscribed to > the mailing list . > To unsubscribe, E-mail to: > To switch to the DIGEST mode, E-mail to > Web Archive of this list is at: http://webdna.smithmicro.com/ ------------------------------------------------------------- This message is sent to you because you are subscribed to the mailing list . To unsubscribe, E-mail to: To switch to the DIGEST mode, E-mail to Web Archive of this list is at: http://webdna.smithmicro.com/ "Andrew Simpson"

DOWNLOAD WEBDNA NOW!

Top Articles:

Talk List

The WebDNA community talk-list is the best place to get some help: several hundred extremely proficient programmers with an excellent knowledge of WebDNA and an excellent spirit will deliver all the tips and tricks you can imagine...

Related Readings:

Generating Report Totals (1997) Another webcatalog site!! (1997) more info on [setlineitems] (1997) grep question - how to strip spaces from the beginning ofa string? (2002) Width & Height (1998) WebCatalog NT beta 18 problem (1997) Searching Multiple DBs (1997) WebCat2b15MacPlugin - showing [math] (1997) [WebDNA] Unofficial WebDna 6.2 and 7 - Mac Mavericks Installer (2014) PCS Frames (1997) Slow Server (2005) Files not moved to EmailCompleted (2002) Num Sort Descending (2004) No luck with taxes (1997) [Fwd: Rotating Banners ... (was LinkExchange)] (1997) Formulas.db + Users.db (1997) Associative lookup style? + bit more (1997) [WebDNA] WebDNA Upgrade Question - eCommerce (2009) Blog Aggregator (2006) redirect from the errorsMessages.db entry (1997)