B4J Question DB data sync B4J-B4A

'in Sub Handle(req As ServletRequest, resp As ServletResponse)
...
  Dim tdl As List
  tdl=PrepareTDL
  SendObject(tdl,resp.OutputStream)
...

'send the list to B4A app
Sub SendObject (Obj As Object, Out As OutputStream)
   Dim ser As B4XSerializator
   Dim buffer() As Byte
   buffer=ser.ConvertObjectToBytes(Obj)
   Out.WriteBytes(buffer, 0, buffer.Length)
end sub

'in Sub JobDone (Job As HttpJob)
...
Case "job4"
         Dim out As OutputStream
         out.InitializeToBytesArray(0)
         File.Copy2(Job.GetInputStream, out)
         Dim ar() As Byte
         ar=out.ToBytesArray
         Dim ser As B4XSerializator
         Dim tdl As List = ser.ConvertBytesToObject( ar)

Dim ser As B4XSerializator
Dim buffer() As Byte =ser.ConvertObjectToBytes(Obj)
Out.WriteBytes(buffer, 0, buffer.Length)

Dim set As B4XSerializator
Dim tdl As List = ser.ConvertBytesToObject(Bit.InputStreamToBytes(Job.GetInputStream))

SendObject(Array(Obj1, Obj2), out)
'or
SendObject(CreateMap("obj1": OBJ1, "obj2": OBJ2), out)