<cffunction name="autoLink" returntype="string" access="public" output="false" hint="View, Helper, Turns all URLs and e-mail addresses into clickable links.">
	<cfargument name="text" type="string" required="true" hint="The text to create links in.">
	<cfargument name="link" type="string" required="false" default="all" hint="Whether to link URLs, email addresses or both. Possible values are: 'all' (default), 'URLs' and 'emailAddresses'.">

	<!---
		EXAMPLES:
		#autoLink("Download Wheels from http://www.cfwheels.com/download")#
		-> Download Wheels from <a href="http://www.cfwheels.com/download">http://www.cfwheels.com/download</a>

		#autoLink("Email us at [email protected]")#
		-> Email us at <a href="mailto:[email protected]">[email protected]</a>

		RELATED:
		 * [capitalize capitalize()] (function)
		 * [excerpt excerpt()] (function)
		 * [highlight highlight()] (function)
		 * [pluralize pluralize()] (function)
		 * [simpleFormat simpleFormat()] (function)
		 * [singularize singularize()] (function)
		 * [stripLinks stripLinks()] (function)
		 * [stripTags stripTags()] (function)
		 * [titleize titleize()] (function)
		 * [truncate truncate()] (function)
	--->

	<cfscript>
		var loc = {};
		loc.urlRegex = "(?ix)([^(url=)|(href=)'""])(((https?)://([^:]+\:[^@]*@)?)([\d\w\-]+\.)?[\w\d\-\.]+\.(com|net|org|info|biz|tv|co\.uk|de|ro|it|site)(( / [\w\d\.\-@%\\\/:]* )+)?(\?[\w\d\?%,\.\/\##!@:=\+~_\-&amp;]*(?<![\.]))?)";
		loc.mailRegex = "(([^@\s]+)@((?:[-a-z0-9]+\.)+[a-z]{2,}))";
		loc.returnValue = arguments.text;
		if (arguments.link IS NOT "URLs")
			loc.returnValue = REReplaceNoCase(loc.returnValue, loc.mailRegex, "<a href=""mailto:\1"">\1</a>", "all");
		if (arguments.link IS NOT "emailAddresses")
			loc.returnValue = loc.returnValue.ReplaceAll(loc.urlRegex, "$1<a href=""$2"">$2</a>");
	</cfscript>
	<cfreturn loc.returnValue>
</cffunction>

<cffunction name="excerpt" returntype="string" access="public" output="false" hint="View, Helper, Extracts an excerpt from text that matches the first instance of phrase.">
	<cfargument name="text" type="string" required="true" hint="The text to extract an excerpt from.">
	<cfargument name="phrase" type="string" required="true" hint="The phrase to extract.">
	<cfargument name="radius" type="numeric" required="false" default="100" hint="Number of characters to extract surronding the phrase.">
	<cfargument name="excerptString" type="string" required="false" default="..." hint="String to replace first and/or last characters with.">

	<!---
		EXAMPLES:
		#excerpt(text="Wheels is a framework for ColdFusion", phrase="framework", radius=5)#
		-> ...is a framework for ...

		RELATED:
		 * [autoLink autoLink()] (function)
		 * [capitalize capitalize()] (function)
		 * [highlight highlight()] (function)
		 * [pluralize pluralize()] (function)
		 * [simpleFormat simpleFormat()] (function)
		 * [singularize singularize()] (function)
		 * [stripLinks stripLinks()] (function)
		 * [stripTags stripTags()] (function)
		 * [titleize titleize()] (function)
		 * [truncate truncate()] (function)
	--->

	<cfscript>
	var loc = {};
	loc.pos = FindNoCase(arguments.phrase, arguments.text, 1);
	if (loc.pos != 0)
	{
		loc.excerptStringStart = arguments.excerptString;
		loc.excerptStringEnd = arguments.excerptString;
		loc.start = loc.pos - arguments.radius;
		if (loc.start <= 0)
		{
			loc.start = 1;
			loc.excerptStringStart = "";
		}
		loc.count = Len(arguments.phrase) + (arguments.radius*2);
		if (loc.count > (Len(arguments.text)-loc.start))
			loc.excerptStringEnd = "";
		loc.returnValue = loc.excerptStringStart & Mid(arguments.text, loc.start, loc.count) & loc.excerptStringEnd;
	}
	else
	{
		loc.returnValue = "";
	}

	</cfscript>
	<cfreturn loc.returnValue>
</cffunction>

<cffunction name="highlight" returntype="string" access="public" output="false" hint="View, Helper, Highlights the phrase(s) everywhere in the text if found by wrapping it in a strong tag (by default).">
	<cfargument name="text" type="string" required="true">
	<cfargument name="phrases" type="string" required="true">
	<cfargument name="highlighter" type="string" required="false" default="<strong class=""highlight"">\1</strong>">

	<!---
		EXAMPLES:
		#highlight(text="You searched for: Wheels", phrases="Wheels")#
		-> You searched for: <strong class="highlight">Wheels</strong>

		RELATED:
		 * [autoLink autoLink()] (function)
		 * [capitalize capitalize()] (function)
		 * [excerpt excerpt()] (function)
		 * [pluralize pluralize()] (function)
		 * [simpleFormat simpleFormat()] (function)
		 * [singularize singularize()] (function)
		 * [stripLinks stripLinks()] (function)
		 * [stripTags stripTags()] (function)
		 * [titleize titleize()] (function)
		 * [truncate truncate()] (function)
	--->

	<cfscript>
		var loc = {};
		loc.returnValue = arguments.text;
		loc.iEnd = ListLen(arguments.phrases);
		for (loc.i=1; loc.i LTE loc.iEnd; loc.i=loc.i+1)
		{
			loc.returnValue = REReplaceNoCase(loc.returnValue, "(#ListGetAt(arguments.phrases, loc.i)#)", arguments.highlighter, "all");
		}
	</cfscript>
	<cfreturn loc.returnValue>
</cffunction>

<cffunction name="simpleFormat" returntype="string" access="public" output="false" hint="View, Helper, Replaces single newline characters with HTML break tags and double newline characters with HTML paragraph tags (properly closed to comply with XHTML standards).">
	<cfargument name="text" type="string" required="true" hint="The text to format.">

	<!---
		EXAMPLES:
		#simpleFormat(params.content)#

		RELATED:
		 * [autoLink autoLink()] (function)
		 * [capitalize capitalize()] (function)
		 * [excerpt excerpt()] (function)
		 * [highlight highlight()] (function)
		 * [pluralize pluralize()] (function)
		 * [singularize singularize()] (function)
		 * [stripLinks stripLinks()] (function)
		 * [stripTags stripTags()] (function)
		 * [titleize titleize()] (function)
		 * [truncate truncate()] (function)
	--->

	<cfscript>
		var loc = {};
		loc.returnValue = Trim(arguments.text);
		loc.returnValue = Replace(loc.returnValue, "#Chr(10)##Chr(10)#", "</p><p>", "all");
		loc.returnValue = Replace(loc.returnValue, "#Chr(10)#", "<br />", "all");
		if (loc.returnValue != "")
			loc.returnValue = "<p>" & loc.returnValue & "</p>";
	</cfscript>
	<cfreturn loc.returnValue>
</cffunction>

<cffunction name="stripLinks" returntype="string" access="public" output="false" hint="View, Helper, Removes all links from the text (leaving just the link text).">
	<cfargument name="text" type="string" required="true" hint="The text to remove links from.">

	<!---
		EXAMPLES:
		#stripLinks("Wheels is a framework for <a href='http://www.adobe.com'>ColdFusion</a>")#
		-> Wheels is a framework for ColdFusion

		RELATED:
		 * [autoLink autoLink()] (function)
		 * [capitalize capitalize()] (function)
		 * [excerpt excerpt()] (function)
		 * [highlight highlight()] (function)
		 * [pluralize pluralize()] (function)
		 * [simpleFormat simpleFormat()] (function)
		 * [singularize singularize()] (function)
		 * [stripTags stripTags()] (function)
		 * [titleize titleize()] (function)
		 * [truncate truncate()] (function)
	--->

	<cfreturn REReplaceNoCase(arguments.text, "<a.*?>(.*?)</a>", "\1" , "all")>
</cffunction>

<cffunction name="stripTags" returntype="string" access="public" output="false" hint="View, Helper, Removes all tags from the text.">
	<cfargument name="text" type="string" required="true" hint="The text to remove links from.">

	<!---
		EXAMPLES:
		#stripTags("Wheels is a <b>framework</b> for <a href='http://www.adobe.com'>ColdFusion</a>")#
		-> Wheels is a framework for ColdFusion

		RELATED:
		 * [autoLink autoLink()] (function)
		 * [capitalize capitalize()] (function)
		 * [excerpt excerpt()] (function)
		 * [highlight highlight()] (function)
		 * [pluralize pluralize()] (function)
		 * [simpleFormat simpleFormat()] (function)
		 * [singularize singularize()] (function)
		 * [stripLinks stripLinks()] (function)
		 * [titleize titleize()] (function)
		 * [truncate truncate()] (function)
	--->

	<cfreturn REReplaceNoCase(arguments.text, "<[a-z].*?>(.*?)</[a-z]>", "\1" , "all")>
</cffunction>

<cffunction name="titleize" returntype="string" access="public" output="false" hint="View, Helper, Capitalizes all words in the text to create a nicer looking title.">
	<cfargument name="text" type="string" required="true" hint="The text to turn into a title.">

	<!---
		EXAMPLES:
		#titleize("Wheels is a framework for ColdFusion")#
		-> Wheels Is A Framework For ColdFusion

		RELATED:
		 * [autoLink autoLink()] (function)
		 * [capitalize capitalize()] (function)
		 * [excerpt excerpt()] (function)
		 * [highlight highlight()] (function)
		 * [pluralize pluralize()] (function)
		 * [simpleFormat simpleFormat()] (function)
		 * [singularize singularize()] (function)
		 * [stripLinks stripLinks()] (function)
		 * [stripTags stripTags()] (function)
		 * [truncate truncate()] (function)
	--->

	<cfscript>
		var loc = {};
		loc.returnValue = "";
		loc.iEnd = ListLen(arguments.text, " ");
		for (loc.i=1; loc.i LTE loc.iEnd; loc.i=loc.i+1)
		{
			loc.returnValue = ListAppend(loc.returnValue, capitalize(ListGetAt(arguments.text, loc.i, " ")), " ");
		}
	</cfscript>
	<cfreturn loc.returnValue>
</cffunction>

<cffunction name="truncate" returntype="string" access="public" output="false" hint="View, Helper, Truncates text to the specified length and replaces the last characters with the specified truncate string (defaults to '...').">
	<cfargument name="text" type="string" required="true" hint="The text to truncate.">
	<cfargument name="length" type="numeric" required="false" default="30" hint="Length to truncate the text to.">
	<cfargument name="truncateString" type="string" required="false" default="..." hint="String to replace the last characters with.">

	<!---
		EXAMPLES:
		#truncate(text="Wheels is a framework for ColdFusion", length=20)#
		-> Wheels is a frame...

		#truncate(text="Wheels is a framework for ColdFusion", truncateString=" (more)")#
		-> Wheels is a fra... (continued)

		RELATED:
		 * [autoLink autoLink()] (function)
		 * [capitalize capitalize()] (function)
		 * [excerpt excerpt()] (function)
		 * [highlight highlight()] (function)
		 * [pluralize pluralize()] (function)
		 * [simpleFormat simpleFormat()] (function)
		 * [singularize singularize()] (function)
		 * [stripLinks stripLinks()] (function)
		 * [stripTags stripTags()] (function)
		 * [titleize titleize()] (function)
	--->

	<cfscript>
		var loc = {};
		if (Len(arguments.text) > arguments.length)
			loc.returnValue = Left(arguments.text, arguments.length-Len(arguments.truncateString)) & arguments.truncateString;
		else
			loc.returnValue = arguments.text;
	</cfscript>
	<cfreturn loc.returnValue>
</cffunction>

 <Cfquery name="Gets" dataSource="#ds#">
	select * from directoryarticles
where id = #url.id#
</cfquery>


<cfif gets.region contains 'Manhattan'>
	<Cfset #url.mag# = 'BAP'>
	</Cfif>

<cfif gets.region contains 'Manahttan'>
	<Cfset #url.mag# = 'BAP'>
	</Cfif>


<cfif gets.region eq 'Westchester'>
	<Cfset #url.mag# = 'WP'>
	</Cfif>

	<cfif gets.region contains 'Brooklyn'>
	<Cfset #url.mag# = 'BP'>
	</Cfif>

	<cfif gets.region contains 'Queens'>
	<Cfset #url.mag# = 'QP'>
	</Cfif>

	<cfif gets.region contains 'Rockland'>
	<Cfset #url.mag# = 'RP'>
	</Cfif>


	<cfif gets.region contains 'Fairfield'>
	<Cfset #url.mag# = 'FP'>
	</Cfif>

<Cfset be = #dateformat(now(),'2025-mm-dd')#>





 <cfquery name="getstuff" datasource="#ds#">
 select issueguide.writeup,issueguide.id, issueguide.pkid,issueguidecat.issue,issueguidecat.mags,issueguide.offer,issueguide.expirationdate,issueguidecat.issueguideid,ParentsListings.address,city,state,zip,name,email,publishedname,phone,locationmultiple,showemail,ParentsListingsCatMain.shortname as category,issueguide.*
 from issueguide inner join issueguidecat on issueguidecat.issueguideid = issueguide.id inner join ParentsListings on issueguide.pkid = ParentsListings.id inner join ParentsListingsCatMain on issueguide.catid = ParentsListingsCatMain.id
 where
1=1

and ( issueguidecat.issue = '#dateformat(now(),'mmmm yyyy')#'
or issueguide.expirationdate  > '#dateformat(now(),'yyyy-mm-dd')#'

<Cfif #dateformat(now(),'mm')# eq 12>
	<Cfset lastyear1 = #dateformat(now(),'mm')# + 0>

	<cfelse>
<Cfset lastyear1 = #dateformat(now(),'mm')# + 1>


</Cfif>
or issueguidecat.issuemy between '2020-#lastyear1#-01' and '#be#'

<!---
or issueguidecat.issue = '#dateformat(gets.livedate,'mmmm yyyy')#'
--->
)

<!--- and
--->
<!--- issueguidecat.issue = '#url.issue#'



(issueguidecat.issue = 'August 2015' or issueguidecat.issue = 'August 2015' )--->

<cfif gets.region contains 'Long'>
and (issueguidecat.mags like '%NP%' or issueguidecat.mags like '%SP%')

<cfelseif #gets.region# contains '/'>

<cfif url.id eq 234>
and (issueguidecat.mags like '%BP%' or issueguidecat.mags like '%QP%' or issueguidecat.mags like '%NP%')
<cfelseif url.id eq 233>
and (issueguidecat.mags like '%NP%' or issueguidecat.mags like '%SP%')

<cfelseif url.id eq 232>
and (issueguidecat.mags like '%WP%' or issueguidecat.mags like '%RP%')

</cfif>
<Cfelse>
and issueguidecat.mags like '%#url.mag#%'


	</Cfif>

and issueguide.writeup <> ''


 and issueguide.catid in (#gets.catid#)





<cfif #gets.subcats# eq 1 or #url.id# eq 233 or #url.id# eq 234 or #url.id# eq 232>
group by ParentsListings.name

order by ParentsListings.sortby
<cfelse>
  order by category,premiumdate desc, ParentsListings.sortby,issueguide.id desc

</cfif>
<!--- added --->
 </cfquery>
 
 <p>
 	
 	<Cfquery name="getcolid" dataSource="#ds#">
 		select colid from directoryarticles where id = #url.id#
 	</Cfquery>
 	<cfquery name="getlink" dataSource="#ds#">select seo_friendly from columntable where id = #getcolid.colid#</cfquery>
<Cfoutput>
<cfset monthvar = '#dateformat(now(),'MMMM')# #dateformat(now(),'yyyy')#'>

	<Cfset newblurb = '#rereplace(gets.blurb,'MONTHNAME','#monthvar#')#'>

	#newblurb#
	<br>
	#gets.digitaltext#
<br>
<br>
<h3 style="font-size:20px;"><B> Check the boxes to connect with these businesses</B></h3>

</Cfoutput>

<cfif #getstuff.recordcount# gt 0>
Jump to: 
</cfif>
<Cfoutput query="getstuff">

<cfif #gets.subcats# eq 0>
<Cfif #gets.catid# contains ','>
<Cfif #category# is not #getstuff.category[currentrow-1]#>
<Cfset outputcat = #rereplacenocase(category,'- Print Guide','','ALL')#>
<Cfset outputcat = #rereplacenocase(outputcat,'-Print Guide','','ALL')#>
<Cfset outputcat = #rereplacenocase(outputcat,'EDU - ','','ALL')#>
<Cfset outputcat = #rereplacenocase(outputcat,'- \(hidden\)','','ALL')#>
<Cfset outputcat = #rereplacenocase(outputcat,'Professionals -- ','','ALL')#>
<Cfset outputcat = #rereplacenocase(outputcat,'Professionals---','','ALL')#>
<Cfset outputcat = #rereplacenocase(outputcat,'print guide','','ALL')#>
<Cfset outputcat = #rereplacenocase(outputcat,'Professionals --','','ALL')#>
<Cfset outputcat = #rereplacenocase(outputcat,'\(hidden\)','','ALL')#>
<Cfset outputcat = #rereplacenocase(outputcat,'- PRINT','','ALL')#>
<Cfset outputcat = #rereplacenocase(outputcat,'-','','ALL')#>
<Cfset outputcat = #replace(outputcat,'CAMPS ','','ALL')#>

| <A href="https://www.nymetroparents.com/article/#getlink.seo_friendly####outputcat#">#outputcat#</A>
</Cfif> </Cfif>
 </cfif>
</cfoutput>

<Cfoutput query="getstuff">

<cfif #gets.subcats# eq 0>

<Cfif #gets.catid# contains ','>
<Cfif #category# is not #getstuff.category[currentrow-1]#>
<Cfset outputcat = #rereplacenocase(category,'- Print Guide','','ALL')#>
<Cfset outputcat = #rereplacenocase(outputcat,'-Print Guide','','ALL')#>
<Cfset outputcat = #rereplacenocase(outputcat,'EDU - ','','ALL')#>
<Cfset outputcat = #rereplacenocase(outputcat,'- \(hidden\)','','ALL')#>
<Cfset outputcat = #rereplacenocase(outputcat,'Professionals -- ','','ALL')#>
<Cfset outputcat = #rereplacenocase(outputcat,'Professionals---','','ALL')#>
<Cfset outputcat = #rereplacenocase(outputcat,'print guide','','ALL')#>
<Cfset outputcat = #rereplacenocase(outputcat,'Professionals --','','ALL')#>
<Cfset outputcat = #rereplacenocase(outputcat,'\(hidden\)','','ALL')#>
<Cfset outputcat = #rereplacenocase(outputcat,'- PRINT','','ALL')#>
<Cfset outputcat = #rereplacenocase(outputcat,'-','','ALL')#>
<Cfset outputcat = #replace(outputcat,'CAMPS ','','ALL')#>

<cfif  #url.id# eq 233 or #url.id# eq 234 or #url.id# eq 232>
<cfelse>
<h2><A name="#outputcat#"></A>#outputcat#</h2>
</cfif>
<p>
</Cfif> </Cfif>
 </cfif>



 <cfif #gets.subcats# eq 1>



<cfif  name is not name[currentrow-1]>

<a href="https://www.nymetroparents.com/bestbetsinfo.cfm?id=#pkid#"><cfif #publishedname# eq '' or #publishedname# eq ' ' or len(publishedname) lt 5><b>#ucase(name)#<!--- <cfif eventtyper is not ''>- #ucase(eventtyper)#</cfif>---><br /></b><cfelse>
<strong>#replace(publishedname, chr(10), "<br />", "All")# <!---<cfif eventtyper is not ''>- #ucase(eventtyper)#</cfif>---></strong></cfif></a>

<cfif #address# is not ''>#address#, #city#<br /></cfif>
<cfif #phone# is not ''>#phone#<br /></cfif>
<cfif #locationmultiple# is not ''>


			<Cfset newlocation = #replace(locationmultiple, "http://gymboreeclasses.com/scarsdaleny.site", "", "All")#>
			<Cfset newlocation = #replace(newlocation, "http://bowlluckystrike.com/scarsdaleny.site", "", "All")#>

			<Cfset newlocation = #replace(newlocation, "http://bowlluckystrike.com", "", "All")#>


			<Cfset newlocation = #replace(newlocation, "http://chelseapiersct.com/camp", "", "All")#>
						<Cfset newlocation = #replacenocase(newlocation, "http://chelseapiersct.com/camp", "", "All")#>

												<Cfset newlocation = #replacenocase(newlocation, "http://facebook.com/bouncetrampolinesports", "", "All")#>



			<Cfset newlocation = #replace(newlocation, "http://skyzone.com/mountsinai", "", "All")#>

	<cfset newlocation = #autolink(newlocation)#>
			<Cfset newlocation = #replace(newlocation, chr(10), "<br />", "All")#>


	<Cfset loopme = #getlinks(newlocation)#>
<Cfset tome = #ArrayLen(loopme)#>

<cfset countlinks = 0>
<cfloop from="1" to="#tome#" index="i">
	<Cfset newlocation = rereplacenocase(newlocation,'<a href="#loopme[i].a#">#loopme[i].a#</a>','','ALL')>

</cfloop>
	<Cfset newlocation = rereplacenocase(newlocation,'<a href="http://">','<c href="http://"','ALL')>

<cfsavecontent variable="tester">
#paragraphformat(newlocation)#
</cfsavecontent>
<Cfset newlocation = #replace(tester, "<p><p>", "<p>", "All")#>
<Cfset newlocation = #replace(newlocation, "<br/> <br/> <br/>", "<br>", "All")#>

#newlocation#

	</C>
	<br /></cfif>
<cfif #showemail# eq 0 and #email# is not ''>Email <a href="mailto:#email#">#email#</a><br /></cfif>
<cfif #offer# is not ''>#offer#<br /></cfif>
<p>#writeup#<p>
	
	<cfif parameterexists(url.edit)>
		<a href="https://admin.nymetroparents.com/editguide.cfm?id=#pkid#&tid=#id#">edit</a>
	</cfif>	
	
</cfif>

<Cfelse>





<cfif #category# is not #getstuff.category[currentrow-1]# or name is not name[currentrow-1]>


	<Cfif #premium# eq 1>
       <img src="https://www.nymetroparents.com/premium/#getstuff.logo#" style="width:100px;float:right;">
</cfif>
<a href="https://www.nymetroparents.com/bestbetsinfo.cfm?id=#pkid#"><cfif #publishedname# eq '' or #publishedname# eq ' ' or len(publishedname) lt 5><input name="bingo" type="checkbox" value="#pkid#" /><b>#ucase(name)#<!--- <cfif eventtyper is not ''>- #ucase(eventtyper)#</cfif>---><br /></b><cfelse>
<strong>#replace(publishedname, chr(10), "<br />", "All")# <!---<cfif eventtyper is not ''>- #ucase(eventtyper)#</cfif>---></strong></cfif></a>

	<cfif parameterexists(url.edit)>
		<a href="https://admin.nymetroparents.com/editguide.cfm?id=#id#&tid=#pkid#">edit</a>
	</cfif>	
	
<cfif #address# is not ''>#address#, #city#<br /></cfif>
<cfif #phone# is not ''>#phone#<br /></cfif>
<cfif #locationmultiple# is not ''>


			<Cfset newlocation = #replace(locationmultiple, "http://gymboreeclasses.com/scarsdaleny.site", "", "All")#>
			<Cfset newlocation = #replace(newlocation, "http://bowlluckystrike.com/scarsdaleny.site", "", "All")#>

			<Cfset newlocation = #replace(newlocation, "http://bowlluckystrike.com", "", "All")#>


			<Cfset newlocation = #replace(newlocation, "http://chelseapiersct.com/camp", "", "All")#>
						<Cfset newlocation = #replacenocase(newlocation, "http://chelseapiersct.com/camp", "", "All")#>

												<Cfset newlocation = #replacenocase(newlocation, "http://facebook.com/bouncetrampolinesports", "", "All")#>



			<Cfset newlocation = #replace(newlocation, "http://skyzone.com/mountsinai", "", "All")#>

	<cfset newlocation = #autolink(newlocation)#>
			<Cfset newlocation = #replace(newlocation, chr(10), "<br />", "All")#>


	<Cfset loopme = #getlinks(newlocation)#>
<Cfset tome = #ArrayLen(loopme)#>

<cfset countlinks = 0>
<cfloop from="1" to="#tome#" index="i">
	<Cfset newlocation = rereplacenocase(newlocation,'<a href="#loopme[i].a#">#loopme[i].a#</a>','','ALL')>

</cfloop>
	<Cfset newlocation = rereplacenocase(newlocation,'<a href="http://">','<c href="http://"','ALL')>

<cfsavecontent variable="tester">
#paragraphformat(newlocation)#
</cfsavecontent>
<Cfset newlocation = #replace(tester, "<p><p>", "<p>", "All")#>
<Cfset newlocation = #replace(newlocation, "<br/> <br/> <br/>", "<br>", "All")#>

#newlocation#

	</C>
	</cfif>
<cfif #showemail# eq 0 and #email# is not ''>Email <a href="mailto:#email#">#email#</a><br /></cfif>
<cfif #offer# is not ''>#offer#<br /></cfif>

	<Cfif #premium# eq 1><Br>
		<a href="<Cfif left(urllink,4) is not 'http'>http://</cfif>#urllink#" target="_new">Website</a>
		<Cfif #facebook# is not ''> | <a href="<Cfif left(facebook,4) is not 'http'>http://</cfif>#facebook#" target="_new">Facebook</a></Cfif>
		<Cfif #youtube# is not ''> | <a href="<Cfif left(youtube,4) is not 'http'>http://</cfif>#youtube#" target="_new">YouTube</a></Cfif>
		<Cfif #instagram# is not ''> | <a href="<Cfif left(instagram,4) is not 'http'>http://</cfif>#instagram#"  target="_new">Instagram</a></Cfif>

		<br><br>
		#words90#
		<br><Br>
		
		<Cfelse><p>
				#writeup#
	</Cfif>
<p>
</cfif>
</cfif>


  </Cfoutput>



  <cfoutput><br>
	  #gets.bottomtext#
  </cfoutput>


<!---	<Cfif #gets.region# eq 'Westchester' and parameterexists(url.issue) and (#url.issue# eq 'March 2016' or #url.issue# eq 'February 2016')>


	<b>

<cfif #url.id# eq 39>
<b>RELATED:</b><br>
<a href="http://www.nymetroparents.com/westchester/article/Westchester-County-Camp-and-Summer-Program-Guide-Section-2Specialty-Camps">Find Specialty Camps in Westchester</a><br>
<a href="http://www.nymetroparents.com/westchester/article/Westchester-County-Camp-and-Summer-Program-Guide-Section-3Sleepaway-Camps-and-Camper-Outings">Find Sleepaway Camps, Outings, and Services for Campers in Westchester</a><br>
</cfif>
<cfif #url.id# eq 40>

<b>RELATED:</b><br>
<a href="http://www.nymetroparents.com/westchester/article/Westchester-County-Camp-and-Summer-Program-Guide-Section-1Day-Camps#.VOen1I2gc-M">Find Day Camps in Westchester</a><br>
<a href="http://www.nymetroparents.com/westchester/article/Westchester-County-Camp-and-Summer-Program-Guide-Section-3Sleepaway-Camps-and-Camper-Outings">Find Sleepaway Camps, Outings, and Services for Campers in Westchester</a><br>
</cfif>
<cfif #url.id# eq 41>

<b>RELATED:</b><br>
<a href="http://www.nymetroparents.com/westchester/article/Westchester-County-Camp-and-Summer-Program-Guide-Section-1Day-Camps#.VOen1I2gc-M">Find Day Camps in Westchester</a><br>
<a href="http://www.nymetroparents.com/westchester/article/Westchester-County-Camp-and-Summer-Program-Guide-Section-2Specialty-Camps">Find Specialty Camps in Westchester</a><br></b>
</cfif>

	</Cfif>
--->


  <cffunction name="getLinks" access="public" returntype="array" output="yes" hint="seperate Links from given HTML string, output as a array">
 <cfargument name="html" hint="HTML String with links" required="yes">
<cfset local.startpos = 1>
<cfset local.list  = ArrayNew(1)>

<cfloop condition="local.startpos GREATER THAN 0">
 <cfset local.linkpos = reFindNoCase('<a\b[^>]*>(.*?)</a>',arguments.html,local.startpos,'true')>

<cfif val(local.linkpos.len[1])>
<cfset local.startpos  = local.linkpos.len[1]+local.linkpos.pos[1]>
<cfset local.string  = mid(arguments.html,local.linkpos.pos[1],local.linkpos.len[1])>
<cfset local.hrefpos = reFindNoCase('(http|ftp|https):\/\/[\w\-_]+(\.[\w\-_]+)+([\w\-\.,@?^=%&:/~\+##]*[\w\-\@?^=%&/~\+##])?',local.string,1,'true')>
<cfif val(local.hrefpos.pos[1])>
<cfset local.this.a = mid(local.string,local.hrefpos.pos[1],local.hrefpos.len[1])>
<cfset local.this.title = reReplacenocase(local.string,'<a\b[^>]*.>',"")>
<cfset local.this.title = reReplacenocase(local.this.title,'</a*>',"")>
<cfset ArrayAppend(local.list,local.this)>
<cfset StructDelete(local,'this')>
</cfif>
  <cfelse>
 <cfbreak>
  </cfif>
</cfloop>

 <cfreturn local.list>
</cffunction>