yanweiyuan3
2023-08-09 588bc7829387dfc761cc25f06f77d4c81818bd10
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
Quintiq file version 2.0
#parent: #root
Method GetStatusFromJson (
  JSON JsonInput,
  String DataName
) as String
{
  Description: 'analysis json and transfer it to data(object)'
  TextBody:
  [*
    // Administrator Jul-7-2023 (created)
    code := JsonInput.Get( "resultCode" ).GetString();
    message := JsonInput.Get( "resultMsg" );
    data := JsonInput.Get( "responseData" );
    datalist := data.Get( "dataList" );
    
    result := " ";
    
    if( code = "1" )
    {
      this.GetDataFromJson( datalist, DataName );
      result := "Data have been written into table";
      }
    else
    {
      messagestring := " ";
      if ( message.IsNull() )
      {
        messagestring := "No message returns!";
        }
      else
      {
        messagestring := message.GetString();
        }
      result :=  "Error! error code: " + code + ", error message: " + messagestring;
      }
    
    return result;
  *]
}