I would use a case construct.  Or even use the MOD function with an array to
load the values or count of values into an array:

// NOTE:  THIS IS OFF OF THE TOP OF A VERY EMPTY HEAD SO FORGIVE SYNTAX ERRORS

RangeCount = 6;                                //Create ranges of 1-6, 7-12,
etc
NumRanges = 6;                                // Last range will be 36 and
larger
Rangess = arrayNew(NumRanges);     // Array containing whatever you are
looking for

//Loop through list to put into ranges
for (i;1;ListCount(var1);i=i+1) {
    //This statement will depend on what you are capturing in the ranges
    //This should count number of items in each range
    Ranges(Min(NumRanges, i mod rangeCount)) = Groups(Min(NumRanges, i mod
RangeCount))  + 1
}

Regards,
Andy
  -----Original Message-----
  From: Nathan R. Jessop [mailto:[EMAIL PROTECTED]
  Sent: Thursday, May 20, 2004 8:37 AM
  To: CF-Talk
  Subject: RE: **UPDATE** Arrange sequential selections into ranges how to???

  Hmm...

  If my var1 is equal to...

  <cfset var1 = "1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17,
18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 31, 32, 33, 34, 35, 36,
37, 38, 39, 40, 41, 42, 43, 44, 45, 46, 47, 48, 49, 50,
  51, 52, 53, 54, 55, 56, 57, 58, 59, 60, 61, 62, 63, 64, 65, 66, 67, 68, 69,
70, 71, 72, 73, 74, 75, 76, 77, 78, 79, 80, 81, 82, 83, 84, 85, 86, 87, 88,
89, 90, 91, 92, 93, 94, 95, 96, 97, 98, 99, 100,
  101, 102, 103, 104, 105, 106, 107, 108, 109, 110, 111, 112, 113, 114, 115,
116, 117, 118, 119, 120, 121, 122, 123, 124, 125, 126, 127, 128, 129, 130">

  I get this for the output:

  1

  It should be 1-130

  Still not quite right:
  initial : 1,2,3,4,5,6,10,11,12,13,14,20,25,30,31,32,33,50
  desired : 1-6,10-14,20,25,30-33,50
  computed: 1-6,10-14,20-20,25-25,50
                         ^^ ^^ ^^

  The code in my initial post works correctly, and is reposted (with slight
  optimizations) below:

  <cfset var1 = "1,2,3,4,5,6,10,11,12,13,14,20,25,30,31,32,33,50" />

  <cfset last = "" />
  <cfset var2 = "" />
  <cfset startedRange = false />
  <cfloop list="#var1#" index="curr">
  <cfif last EQ curr - 1>
  <cfset startedRange = true />
  <cfelseif startedRange>
  <cfset var2 = var2 & "-" & last />
  <cfset startedRange = false />
  </cfif>
  <cfif NOT startedRange>
  <cfset var2 = listAppend(var2, curr) />
  </cfif>
  <cfset last = curr />
  </cfloop>

  Cheers,
  barneyb

  > -----Original Message-----
  > From: Steve Nelson [mailto:[EMAIL PROTECTED]
  > Sent: Wednesday, May 19, 2004 11:50 AM
  > To: CF-Talk
  > Subject: RE: **UPDATE** Arrange sequential selections into
  > ranges how to???
  >
  > <cfset var1 = "1,2,3,4,5,6,10,11,12,13,14,20,25,30,31,32,33,50">
  >
  >
  >
  > <cfset var2="">
  >
  > <cfset lastitem=listfirst(var1)>
  >
  > <cfset groupstart=lastitem>
  >
  > <cfloop list="#var1#" index="item">
  >
  >             <cfif item gt lastitem+1>
  >
  >                         <cfif item is listlast(var1)>
  >
  >                                     <cfset newgroup=item>
  >
  >                         <cfelse>
  >
  >                                     <cfset
  > newgroup="#groupstart#-#lastitem#">
  >
  >                         </cfif>
  >
  >                         <cfset var2=listappend(var2,newgroup)>
  >
  >                         <cfset groupstart=item>
  >
  >             </cfif>
  >
  >             <cfset lastitem=item>
  >
  > </cfloop>
  >
  >
  >
  > <cfoutput>#var2#</cfoutput>
  >
  >
  >
  > I left out the lastitem=item
  >
  >
  >
  > Steve
[Todays Threads] [This Message] [Subscription] [Fast Unsubscribe] [User Settings]

Reply via email to