(file) Return to dsp_expertiseList.cfm CVS log (file) (dir) Up to [Development] / p2rx-programs / include

File: [Development] / p2rx-programs / include / dsp_expertiseList.cfm (download)
Revision: 1.2, Wed Jun 14 18:47:18 2006 UTC (3 years, 5 months ago) by nbisbee
Branch: MAIN
CVS Tags: HEAD
Changes since 1.1: +6 -1 lines
Added code to account for P2Rx server being down

<!--- 	Name:  dsp_expertiselist.cfm
    	Purpose: This file will get the the list of service expertise 
		Date created: 05/01/2006 
       	Dependancy: PageAction
					URL - for CFHTTP
					region - Number of region
		Variables: 	ServiceID
					Service
		Date changed: 
					05/01/2006     	Prabin Kanel	Created file
					05/12/2006		Prabin Kanel	Documentation
--->

<cftry>
	<cfoutput>
	<cfhttp method="GET" url="http://www.p2rx.org/webservices/p2rx/getServices.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/getServices.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].Service# , ">
						<a href="index.cfm?pageAction=searchByService&ServiceID=#strOutput.List[intCounter].ServiceID#&Format=WDDX&region=#region###Header">#replacelist(strOutput.List[intCounter].Service,good_chars,Bad_chars)# (#strOutput.List[intCounter].ServiceCount#)</a>
				&nbsp;&nbsp;|
				</cfoutput>
				</cfloop>
			<cfoutput><a name="Header"><HR></a></cfoutput>
			
		<cfcatch type="Any">
			The services data was not provided by remote server. The administrator has been notified.
		</cfcatch>
	</cftry>
	

CVS Admin
Powered by
ViewCVS 1.0-dev