Figure 1 ---- CF action template for responding to Flash request

<cfprocessingdirective suppresswhitespace="yes">
<!--- SECTION 1 ------------------------------------------------->
<cfset theParsedInput = "">
<cfloop collection="#form#" item="inputFormKey">
	<cfif inputFormKey neq "FIELDNAMES">
		<cfset theParsedInput = "#theParsedInput#" &
		"#inputFormKey#=#form[inputFormKey]#">
	</cfif>
</cfloop>

<!--- SECTION 2 -------------------------------------------------->
<cfset theParsedInput = "#LCase(ToString(theParsedInput))#">
<cfset theInputTree = #XMLParse(theParsedInput)#>
<cfset theYearIn = theInputTree.XmlRoot.XmlChildren[1]
		.Row.Column.XmlText>

<!--- SECTION 3 -------------------------------------------------->
<cfstoredproc procedure="GetPerfs" datasource="#request.DSN#">
	<cfprocparam type="In"
				cfsqltype="CF_SQL_INTEGER"
				dbvarname="@theYear"
				value="#theYearIn#"
				null="no">
	<cfprocresult name="theRecords">
</cfstoredproc>

<!--- SECTION 4 -------------------------------------------------->
<cfset sXML = "<data>" & "<variable name=" & "#chr(34)#" & 
		"theResult" &"#chr(34)#" & ">">

<cfloop query="theRecords">
	<cfset sXML = sXML & "<row>">
	<cfset sXML = sXML & "<column>" & "#Trim(mth)#" & "</column>">
	<cfset sXML = sXML & "<column>" & "#Trim(jan)#" & "</column>">
	<cfset sXML = sXML & "<column>" & "#Trim(feb)#" & "</column>"> 
	<cfset sXML = sXML & "<column>" & "#Trim(mar)#" & "</column>">  
	<cfset sXML = sXML & "<column>" & "#Trim(apr)#" & "</column>">
	<cfset sXML = sXML & "<column>" & "#Trim(may)#" & "</column>">
	<cfset sXML = sXML & "<column>" & "#Trim(jun)#" & "</column>">
	<cfset sXML = sXML & "<column>" & "#Trim(jul)#" & "</column>">
	<cfset sXML = sXML & "<column>" & "#Trim(aug)#" & "</column>">
	<cfset sXML = sXML & "<column>" & "#Trim(sep)#" & "</column>">
	<cfset sXML = sXML & "<column>" & "#Trim(oct)#" & "</column>">
	<cfset sXML = sXML & "<column>" & "#Trim(nov)#" & "</column>">
	<cfset sXML = sXML & "<column>" & "#Trim(dec)#" & "</column>">
	<cfset sXML = sXML & "</row>">
</cfloop>
<cfset sXML = sXML &  "</variable>" & "</data>">

<!--- SECTION 5: the output ---------------------------------------->
<cfcontent type="text/plain">
<cfoutput>#sXML#</cfoutput>

</cfprocessingdirective>