CFLib.org – Common Function Library Project

Description:
This function simulates the <cfdump> tag except you can use it inside cfscript. It accepts any variable and returns a string representing the data, formatted in a color coded table. This UDF currently does not display WDDX data.

Return Values:
Returns a string.

Example:

<cfscript>
    simple = "simple variable";
    
    array = ArrayNew(1);
    array[1] = "element1";
    array[2] = "element2";
    
    struct = StructNew();
    struct.key1=simple;
    struct.key2="value2";
    struct.array=array;
    struct.q = QueryNew("col1,col2,col3");
    QueryAddRow(struct.q,2);
    QuerySetCell(struct.q,"col1","col1val",1);
    QuerySetCell(struct.q,"col2","col2val",1);
    QuerySetCell(struct.q,"col3","col3val",1);
    QuerySetCell(struct.q,"col1","col1val row 2",2);
    QuerySetCell(struct.q,"col2","col2val row 2",2);
    QuerySetCell(struct.q,"col3","col3val row 2",2);
</cfscript>
<cfoutput>#dumpvar(struct)#</cfoutput>

Parameters:

Full UDF Source:

/**
 * Displays contents of any data type except WDDX.
 * 
 * @param varToProcess      The variable to dump. 
 * @return Returns a string. 
 * @author Chris Benson (airfoof@yahoo.com) 
 * @version 1, April 23, 2002 
 */
function DumpVar(varToProcess){
        var structLoopCount = 0;
        var LoopCount = 0;
        var ObjSize = 0;
        var key = "";
        var keys = "";
        var numOfColumns = 0;
        var count2 = 0;
        
        var StartString = "";
        var EndString = "</table>#chr(10)#";
        if(isSimpleValue(varToProcess)){
            if(isWDDX(varToProcess)){
                StartString = "#chr(10)#<table bordercolor='black' border='1' cellspacing='0' cellpadding='1'>#chr(10)#";
                
                return StartString & "<tr>#chr(10)#<td>WDDX currently not displayable</td>#chr(10)#</tr>#chr(10)#" & EndString;
            }else{
                return varToProcess;
            }
        }else if(isArray(varToProcess)){
            StartString = "#chr(10)#<table bordercolor='##008000' border='1' cellspacing='0' cellpadding='1'>#chr(10)#";
            ObjSize = ArrayLen(varToProcess);
            
            for(LoopCount = 1;LoopCount LTE ObjSize;LoopCount = LoopCount + 1){
                StartString = StartString & "<tr>#chr(10)#<td bgcolor='##cceecc' valign='top'>#LoopCount#</td><td>#dumpVar(varToProcess[LoopCount])#</td>#chr(10)#</tr>#chr(10)#";
            }
            return StartString & EndString;
        }else if(isStruct(varToProcess)){
            StartString = "#chr(10)#<table bordercolor='blue' border='1' cellspacing='0' cellpadding='1'>#chr(10)#";
            
            for(key in varToProcess){
                StartString = StartString & "<tr>#chr(10)#<td bgcolor='##aaaaee' valign='top'>#key#</td>#chr(10)#<td>#dumpVar(varToProcess[key])#</td>#chr(10)#</tr>#chr(10)#";
            }
            return StartString & EndString;
        }else if(isQuery(varToProcess)){
            StartString = "#chr(10)#<table bordercolor='red' border='1' cellspacing='0' cellpadding='1'>#chr(10)#";
            ObjSize = varToProcess.recordCount;
            Keys = varToProcess.columnList;
            numOfColumns = ListLen(Keys);
            StartString = StartString & "<tr>#chr(10)#";
            
            for(count2 = 1;count2 LTE numOfColumns;count2 = count2 + 1){
                StartString = StartString & "<td bgcolor='##eeaaaa'>#listGetAt(Keys,count2)#</td>#chr(10)#";
            }
            StartString = StartString & "</tr>#chr(10)#";
            
            for(LoopCount = 1;LoopCount LTE ObjSize;LoopCount = LoopCount + 1){
                StartString = StartString & "<tr>#chr(10)#";
                for(count2 = 1;count2 LTE numOfColumns;count2 = count2 + 1){
                    StartString = StartString & "<td>#varToProcess[listGetAt(Keys,count2)][loopCount]#</td>#chr(10)#";
                }
                StartString = StartString & "</tr>#chr(10)#";
            }
            return StartString & EndString;
        }else{
            return " ";
        }
}