Return to dsp_programTypeList.cfm CVS log

Up to [Development] / p2rx-programs / include

Added code to account for P2Rx server being down

<!--- 	Name:  dsp_programTypeList.cfm
    	Purpose: This file will get the the list of programtypes
		Date created: 05/01/2006 
       	Dependancy: PageAction
					URL - for CFHTTP
					region - regionNumber
		Variables: 	ProgramTypeID
					ProgramType
		Date changed: 
					05/01/2006     	Prabin Kanel	Created file
					05/12/2006		Prabin Kanel	Documentation
					06/14/2006		Terry Huss		Added lines 18-20 in case P2Rx server is down
--->

<cftry>
	<cfoutput>
	<cfhttp method="GET" url="http://www.p2rx.org/webservices/p2rx/getProgramType.cfm?format=WDDX&region=#region#" resolveurl="no"></cfoutput>
	<!---<cfoutput>#cfhttp.statuscode#</cfoutput>--->
			<cfif #cfhttp.statuscode# EQ "404 Not Found">
			<cfoutput>
		<cfhttp method="GET" url="http://wrrc.p2pays.org/webservices/p2rx/getProgramType.cfm?format=WDDX&region=#region#" resolveurl="no">
		</cfoutput>			
		</cfif> 
		<cfwddx action="WDDX2CFML" input="#cfhttp.fileContent#" output="strOutput">
			<P>
			<CFSET intNumberOfTerms = ArrayLen(strOutput.List)>
				<CFLOOP from="1" to="#intNumberOfTerms#" index="intCounter">
				<cfoutput>
					<cfset meta_keywords = Meta_keywords & "#strOutput.List[intCounter].ProgramType# , ">
						<a href="index.cfm?pageAction=searchByProgramType&ProgramTypeID=#strOutput.List[intCounter].ProgramTypeID#&Format=WDDX&region=#region###Header">#replacelist(strOutput.List[intCounter].ProgramType,good_chars,Bad_chars)# (#strOutput.List[intCounter].ProgramTypeCount#)</a>
				&nbsp;&nbsp;|
				</cfoutput>
				</cfloop>
			<cfoutput><a name="Header"><HR></a></cfoutput>
	<cfcatch type="Any">
			The browse by program Type data was not provided by remote server. The administrator has been notified.
		</cfcatch>
	</cftry>