CFLib.org – formatListAsSeries

formatListAsSeries(theList)

Last updated January 14, 2010

author

Version: 2 | Requires: ColdFusion 5 | Library: StrLib

Rated 0 time(s). Average Rating: 0

Description:
Function that formats a numeric list so that successive numbers are shown as a series. List must be numeric. For this function to be useful, list elements should be sorted in ascending order. Updated 1/14/10 by Todd Sharp (todd@cfsilence.com) to sort the list before grouping.

Return Values:
Returns a string.

Example:

view plain print about

<cfoutput>
#formatListAsSeries("2,1,6,4,7,8,10")#
<!--- outputs: 1-2, 4, 6-8, 10 --->
</cfoutput>

<cfoutput>
#formatListAsSeries("2,1,6,4,7,8,10")#

</cfoutput>

Parameters:

Name	Description	Required
theList	The list to parse.	Yes

Full UDF Source:

	
	
			
			
			
				
				view plain
				
				
				copy to clipboard
				
				
				
				
				print
				
				
				about
				ColdFISH is developed by Jason Delmore.  Source code and license information available at coldfish.riaforge.org.  Version 3.1.1
				
			<cfscript>
/**
 * Function that formats a numeric list so that successive numbers are shown as a series.
 * 
 * @param theList 	 The list to parse. (Required)
 * @return Returns a string. 
 * @author Mosh Teitelbaum (&#109;&#111;&#115;&#104;&#46;&#116;&#101;&#105;&#116;&#101;&#108;&#98;&#97;&#117;&#109;&#64;&#101;&#118;&#111;&#99;&#104;&#46;&#99;&#111;&#109;) 
 * @version 2, January 14, 2010 
 */
function formatListAsSeries(theList) {
    var lastEle = "";
    var isSet = false;
    var fList = "";
    var currEle = "";
    var idx = 0;
	
	theList = listSort(theList, "numeric", "asc");
	
	for ( idx = 1; idx LTE ListLen(theList); idx = idx + 1 ) {
		currEle = ListGetAt(theList, idx);
		
		if ( Len(lastEle) EQ 0 ) {
			fList = fList & currEle;
			lastEle = currEle;
			isSet = false;
		} else if ( lastEle EQ currEle ) {
			//do nothing
		} else if ( lastEle + 1 NEQ currEle ) {
			if ( isSet ) {
				fList = fList & lastEle;
			}
			fList = fList & ", " & currEle;
			lastEle = currEle;
			isSet = false;
		} else {
		if ( NOT isSet ) {
			fList = fList & "-";
		}
		lastEle = currEle;
		isSet = true;
		}
	}

	if ( isSet ) {
		fList = fList & lastEle;
	}

	return fList;
}
</cfscript>
		<cfscript>
/**
 * Function that formats a numeric list so that successive numbers are shown as a series.
 * 
 * @param theList      The list to parse. (Required)
 * @return Returns a string. 
 * @author Mosh Teitelbaum (mosh.teitelbaum@evoch.com) 
 * @version 2, January 14, 2010 
 */
function formatListAsSeries(theList) {
    var lastEle = "";
    var isSet = false;
    var fList = "";
    var currEle = "";
    var idx = 0;
    
    theList = listSort(theList, "numeric", "asc");
    
    for ( idx = 1; idx LTE ListLen(theList); idx = idx + 1 ) {
        currEle = ListGetAt(theList, idx);
        
        if ( Len(lastEle) EQ 0 ) {
            fList = fList & currEle;
            lastEle = currEle;
            isSet = false;
        } else if ( lastEle EQ currEle ) {
            //do nothing
        } else if ( lastEle + 1 NEQ currEle ) {
            if ( isSet ) {
                fList = fList & lastEle;
            }
            fList = fList & ", " & currEle;
            lastEle = currEle;
            isSet = false;
        } else {
        if ( NOT isSet ) {
            fList = fList & "-";
        }
        lastEle = currEle;
        isSet = true;
        }
    }

    if ( isSet ) {
        fList = fList & lastEle;
    }

    return fList;
}
</cfscript>