mhulse

<csp:comment>++++++++++++++++++++++++++++++++++++++++++++++++++++++++++</csp:comment>

<script language="cache" method="email" arguments='name:%String=""' returntype="%String" procedureblock="1">
	
	set return = ""
	
	try {
		
		set currentNS = $znspace
		znspace ##class(dt.common.NamespaceProcs).GetLocationsName()

mhulse

<csp:comment>++++++++++++++++++++++++++++++++++++++++++++++++++++++++++</csp:comment>

<script language="cache" method="timesince" arguments='ts1:%String="", ts2:%String=""' returntype="%String" procedureblock="1">
	
	/*
	** 
	** Note: dformat/tformat are not currently used.
	** Read comments below for more info.
	** 
	** More info:

mhulse

<script language="cache" method="OnPreHTTP" arguments="" returntype="%Boolean">
	do %response.SetHeader("Content-Type", "text/plain")
	quit 1
</script>

#[ new string set string = " Top Story ,               Top Stories , Other Stories   , Bulleted Stories " ]#

<csp:comment>++++++++++++++++++++++++++++++++++++++++++++++++++++++++++</csp:comment>

<script language="cache" method="cleanListM1" arguments='str:%String=""' returntype="%List" procedureblock="1">

mhulse

<dti:file:include base="assets" file="/includes/csp/story.prevnext.inc.csp?areas=Top Story,Top Stories,Other Stories,Bulleted Stories,Updates" />

mhulse

package  {
	
	// Imports:
	import flash.display.*;
	import flash.events.*;
	
	/**
	* AS3 test class.
	* 
	* <p>Tests if this class is a "Document" class

mhulse

<csp:comment>++++++++++++++++++++++++++++++++++++++++++++++++++++++++++</csp:comment>

<script language="cache" method="nab" arguments='haystack:%String="", from:%String="", to:%String=""' returntype="%String" procedureblock="1">
	
	set return = ""
	
	if ($length(haystack) && $length(from) && $length(to)) {
		
		//set from = "data="""
		//set to = """"

mhulse

<csp:comment>++++++++++++++++++++++++++++++++++++++++++++++++++++++++++</csp:comment>

<script language="cache" method="getSwf" arguments='cmsStory:dt.cms.schema.CMSStory=-1' returntype="%ArrayOfDataTypes" procedureblock="1">
	
	set sc = $$$OK
	set return = ##class(%ArrayOfDataTypes).%New()
	set storyId = cmsStory.story.storyId
	
	set currentNS = $znspace
	znspace ##class(dt.common.NamespaceProcs).GetNewsMediaName()

mhulse

<ol>
	<li>AUTH_PASSWORD: #($get(%request.CgiEnvs("AUTH_PASSWORD"), "empty"))#</li>
	<li>AUTH_TYPE: #($get(%request.CgiEnvs("AUTH_TYPE"), "empty"))#</li>
	<li>CONTENT_TYPE: #($get(%request.CgiEnvs("CONTENT_TYPE"), "empty"))#</li>
	<li>GATEWAY_INTERFACE: #($get(%request.CgiEnvs("GATEWAY_INTERFACE"), "empty"))#</li>
	<li>HTTP_ACCEPT_CHARSET: #($get(%request.CgiEnvs("HTTP_ACCEPT_CHARSET"), "empty"))#</li>
	<li>HTTP_ACCEPT_LANGUAGE: #($get(%request.CgiEnvs("HTTP_ACCEPT_LANGUAGE"), "empty"))#</li>
	<li>HTTP_AUTHORIZATION: #($get(%request.CgiEnvs("HTTP_AUTHORIZATION"), "empty"))#</li>
	<li>HTTP_COOKIE: #($get(%request.CgiEnvs("HTTP_COOKIE"), "empty"))#</li>
	<li>HTTP_REFERER: #($get(%request.CgiEnvs("HTTP_REFERER"), "empty"))#</li>

mhulse

<div id="container">
	
	<header>
		
		<!-- Site logo/flag here -->
		
	</header>
	
	<section>
		

mhulse

#container {
	padding: 5em;
	padding: 10px;
}

#flag {
	line-height: 1;
	text-indent: -999em;
	width: 79px;
	height: 48px;