Hello Timofey.
I`m getting the following error when I try to execute exchange mechanism beetween server and mobile.
On the server in the web service is all ok, function for sending data is executing.
Function in the web service module for sending data to mobile is:
| Code |
|---|
Function PerformExchange(DeviceCode, DeviceData)
SetPrivilegedMode(True);
//1. Initialization (if necessary)
ExchangeNode = ExchangePlans.Mobile.ThisNode().GetObject();
If Not ValueIsFilled(ExchangeNode.Code) Then
ExchangeNode.Code="001";
ExchangeNode.Description="Main";
ExchangeNode.Write();
EndIf;
ExchangeNode = ExchangePlans.Mobile.FindByCode(DeviceCode);
If ExchangeNode.IsEmpty() Then
NewNode = ExchangePlans.Mobile.CreateNode();
NewNode.Code = DeviceCode;
NewNode.Description = DeviceCode;
NewNode.Write();
RecordDataChanges(NewNode.Ref);
ExchangeNode = NewNode.Ref;
EndIf;
//2. Retrieving data from the mobile device
ExchangeNode = ExchangePlans.Mobile.FindByCode(DeviceCode);
XMLReader = New XMLReader;
XMLReader.SetString(DeviceData.Get());
MessageReader = ExchangePlans.CreateMessageReader();
MessageReader.BeginRead(XMLReader);
ExchangePlans.DeleteChangeRecords(MessageReader.Sender,MessageReader.ReceivedNo);
BeginTransaction();
While CanReadXML(XMLReader) Do
Data = ReadXML(XMLReader);
If Not Data = Undefined Then
Data.DataExchange.Sender = MessageReader.Sender;
Data.DataExchange.Load = True;
Data.Write();
EndIf;
EndDo;
CommitTransaction();
MessageReader.EndRead();
XMLReader.Close();
//3. Exporting data to the mobile device
ExchangeNode = ExchangePlans.Mobile.FindByCode(DeviceCode);
XMLWriter = New XMLWriter;
XMLWriter.SetString("UTF-8");
XMLWriter.WriteXMLDeclaration();
MessageWriter = ExchangePlans.CreateMessageWriter();
MessageWriter.BeginWrite(XMLWriter, ExchangeNode);
XMLWriter.WriteNamespaceMapping("xsi", "http://www.w3.org/2001/XMLSchema-instance");
XMLWriter.WriteNamespaceMapping("v8", "http://v8.1c.ru/data");
ChangeSelection = ExchangePlans.SelectChanges(ExchangeNode, MessageWriter.MessageNo);//, Users.GetExchangePermissionsFilter(SystemUser));
While ChangeSelection.Next() Do
Data = ChangeSelection.Get();
WriteXML(XMLWriter, Data);// Writing data to the message
EndDo;
MessageWriter.EndWrite();
Return New ValueStorage(XMLWriter.Close(), New Deflation(9));
EndFunction
|
On the mobile when processing server response i`m getting the following error
"Error setting value of context attribute(Sender)".
Can you please help me to fix this?
The function is:
| Code |
|---|
&AtServer
Procedure ExecuteDataExchange() Export
Address = Constants.ServerAdress.Get();
Definitions = New WSDefinitions(Address,"admin", "admin");
URI = "http://localhost/ws1";
Proxy = New WSProxy(Definitions, URI, "WebExchange", "WebExchangeSoap");
Proxy.User = "admin";
Proxy.Password = "admin";
SysInfo = New SystemInfo;
MobileDeviceCode = String(SysInfo.ClientID);
//1. Initialization (if necessary)
Node = ExchangePlans.Mobile.ThisNode();
If Not ValueIsFilled(Node.Code)
Or Node.Code <> MobileDeviceCode Then
NodeObject = Node.GetObject();
NodeObject.Code = MobileDeviceCode;
NodeObject.Description = MobileDeviceCode;
NodeObject.Write();
EndIf;
MainExchangeNode = ExchangePlans.Mobile.FindByCode("001");
If MainExchangeNode.IsEmpty() Then
NewNode = ExchangePlans.Mobile.CreateNode();
NewNode.Code="001";
NewNode.Description="Main";
NewNode.Write();
MainExchangeNode = NewNode.Ref;
EndIf;
//2. Exchange with the main base
ExchangeData = Proxy.PerformExchange(MobileDeviceCode, GenerateExchangePackage(MainExchangeNode));
//3. Processing data received from the main base
XMLReader = New XMLReader;
XMLReader.SetString(ExchangeData.Get());
MessageReader = ExchangePlans.CreateMessageReader();
MessageReader.BeginRead(XMLReader);
ExchangePlans.DeleteChangeRecords(MessageReader.Sender,MessageReader.ReceivedNo);
BeginTransaction();
While CanReadXML(XMLReader) Do
Data = ReadXML(XMLReader);
If Not Data = Undefined Then
Message(MessageReader.Sender);
Data.DataExchange.Sender = MessageReader.Sender;
Data.DataExchange.Load = True;
Data.Write();
EndIf;
EndDo;
CommitTransaction();
MessageReader.EndRead();
XMLReader.Close();
EndProcedure
|
