obj.startEvent is not a function
obj.startEvent(cookie, method);                                 cspbroker.js (строка 249)

function cspIntRunServerMethod(method, args)
{
var arg;
var obj = cspFindBroker();
if (null == obj) {
err='Unable to locate CacheCSPBroker applet!'
// Allow caller to override our error handling
if (typeof cspRunServerMethodError == 'function')
return cspRunServerMethodError(err);
alert(err);
return null;
}
var cookie = cspFindCookie('CSPSESSIONID');
// If Mozilla for Mac, then indicate to applet that cookie
// must be explicitly added to work around bug.
if (cookie != null) {
if (-1 != navigator.appVersion.indexOf("Macintosh")) {
cookie = '+' + cookie;
}
}
obj.startEvent(cookie, method);
for (var i = 1; i < args.length; i++) {
arg = args[i];
if (typeof arg != "object") {
// Convert boolean to Cache value before sending
if (typeof arg == "boolean") arg = cspMakeBoolean(arg);
// Force arg to string to work around IE problem
// with passing empty form text field. There is a problem with Sun JVM 1.2
// when you pass '' it takes this as null. So to hack around this bug we
// call the addNullStringParam method rather than addParam!
if ((typeof arg == "string") && (arg == '')) {
obj.addNullStringParam();
} else {
if (typeof arg == "number") {
arg = arg.toString();
} else if ((arg != null) && (arg.length > 32000)) {
alert( 'Argument ' + i + ' too long.');
}
obj.addParam(arg);
}
} else {
// If array, then create placeholder and add each element
obj.addVector();
for (var el in arg) {
obj.addElement(arg[el]);
}
}
}
var r = obj.doEvent();
var js = new String(obj.getJS());
var err = new String(obj.getBrokerError());
// Allow caller to override our error handling
if ((err.length > 0) && (typeof cspRunServerMethodError == 'function')) {
return cspRunServerMethodError(err)
}
if (err.length > 0) {
js = 'alert(\'An error occurred while processing an event\\n\\n' + err + '\');';
}
if (js.length > 0) {
var bidding = new Function('CSPPage', js);
bidding(self);
}
// In Java plug-in 1.4.1, Java method may return value of type object rather than string.
// Workaround this problem by forcing to string
if (typeof r == "object") r = r + "";
return r;
} 

<script language="cache" method="SelectDevice" arguments="Device">
S $zt="ERR5"	
	s ^ASTUPRSHDATA=Device
	s devNum=""
	f  {
		s devNum=$O(^ASTUPRSHDATA(Device,devNum)) q:devNum=""
		s nz=""
		f  {
			s nz=$O(^ASTUPRSHDATA(Device,devNum,nz)) q:nz=""
			s para1=$P(^ASTUPRSHDATA(Device,devNum,nz),"\",1)
			s para2=$P(^ASTUPRSHDATA(Device,devNum,nz),"\",2)
			s $P(params,"_",1)=devNum
			s $P(params,"_",2)=para1
			s $P(params,"_",3)=para2
			s html="<li params='"_params_"'>"_^DEVICE(Device)_" "_devNum_"<span class='para'>("_para1_"-"_para2_")</span>"		
			&js<$("#allUstrList ul").append("#(html)#");>
		}
	}
	Q
:ERR5
	S $ZT=""
	D BACK^%ETN
	Q
</script>

        Set httprequest=##class(%Net.HttpRequest).%New() 
	Set httprequest.Server=server //IP адрес, куда будет направлен запрос
	Set httprequest.Port=80 //порт сервера, обычно 80, но может быть и другим		
	
	/* добавление параметров в запрос */
	Do httprequest.InsertFormData("rsh",RSH)	
	
	Do httprequest.Get(URL)			
	s response=httprequest.HttpResponse
	i response.StatusCode'=200 {		
		q "1\HTTP RESPONSE:"_response.StatusCode
	}	
	
	;получаем ответ
	s data=response.Data.Read(response.Data.Size) 	
	
	;читаем XML
	set sc=##class(%XML.TextReader).ParseString(data,.reader) 	
       ;парсинг XML

s $ZT="err2"	
k ^ASTUPRSHDATA
s DEVICE("*")="Шкаф"
s DEVICE(0)="Ведомст."
s DEVICE(1)="Громоотвод"
s DEVICE(2)="Гром. парал."
s DEVICE(3)="РБ"
s DEVICE(4)="IIклР"
s DEVICE(5)="II*кл"
s DEVICE(6)="IIклМ"
s DEVICE(7)="НЕИЗВЕСТНОЕ УСТРОЙСТВО"
s DEVICE(8)="Стрипс"
s DEVICE(9)="Рамка"
s DEVICE(10)="*Стрипс"

s res=$$^ASTUPRSH(rsh)
s kod=$P(res,"\",1)
s msg=$P(res,"\",2)
i (kod=0){
	s nz=""
	f  {
		s nz=$O(^ASTUPRSHDATA(nz)) q:nz=""
		s devName=DEVICE(nz)
		s html="<option value='"_nz_"'>"_devName_"</option>"
		&js<$("#astup_device").append("#(html)#");>	
	}		
}
q res

:err2
	s $ZT=""
	d BACK^%ETN
	q "1\Программная ошибка при получении информации . Работу можно продолжить, но обратитесь к программистам."	

ASTUPRSH(RSH)

	s $ZT="err"
	k ^ASTUPRSHDATA
	
	s server="10.248.4.14"	
	s URL="/csp/work/tmtest.csp" //адрес страницы, куда отправляется запрос		
	Set httprequest=##class(%Net.HttpRequest).%New() 
	Set httprequest.Server=server //IP адрес, куда будет направлен запрос
	Set httprequest.Port=80 //порт сервера, обычно 80, но может быть и другим		
	
	/* добавление параметров в запрос */
	Do httprequest.InsertFormData("rshNum",RSH)	
	
	Do httprequest.Get(URL)			
	s response=httprequest.HttpResponse
	i response.StatusCode'=200 {		
		q "1\HTTP RESPONSE:"_response.StatusCode
	}	
	
	;получаем ответ
	s data=response.Data.Read(response.Data.Size) 	
	
	;читаем XML
	set sc=##class(%XML.TextReader).ParseString(data,.reader) 	
	
	;читаем результат ответа от АСТУП 	
	s count=0
DEVICE
	s count=count+1	
	s res=reader.ReadStartElement("device")
	if res=0 g END
	d reader.ReadStartElement("deviceType")
	d reader.Read()
	s type=reader.Value	
	
	d reader.ReadStartElement("deviceNum")
        d reader.Read()
	s num=reader.Value	
	
	d reader.ReadStartElement("devicePara1")
        d reader.Read()
	s para1=reader.Value	
	
	d reader.ReadStartElement("devicePara2")
        d reader.Read()
	s para2=reader.Value	
	
	s lastNZ=$O(^ASTUPRSHDATA(type,num,""),-1)+1
	s ^ASTUPRSHDATA(type,num,lastNZ)=para1_"\"_para2
	g DEVICE	
END
	Q 0
err
	s $ZT=""
	d BACK^%ETN
	q "1\Программная ошибка при обработке XML. Обратитесь к программистам."

q "0"

obj.startEvent is not a function
obj.startEvent(cookie, method);                                 cspbroker.js (строка 249)