T100 WebService Server End development ：

Development process ：1. Service registration ;2. Service program checkout ;3. Service program writing ;4. Service program upload

1.azzi700 Register service specification number , Then check it out and you can write the program

2. Declare JSON form Requent and Response The content of

#add-point: Customize customer specific module variables (Module Variable)
PRIVATE TYPE type_detail  RECORD    # Pass in the detail array 
                      isagseq              LIKE isag_t.isagseq,   # item 
                      isag001              LIKE isag_t.isag001,   # Source type 
                      isag002              LIKE isag_t.isag002,   # Source number 
                      isag003              LIKE isag_t.isag003,   # Source LN 
                      isag009              LIKE isag_t.isag009,   # Item number 
                      isag004              LIKE isag_t.isag004,   # Invoice quantity 
                      isag005              LIKE isag_t.isag005,   # Invoice unit 
                      isag101              LIKE isag_t.isag101,   # Unit price in original currency 
                      isag105              LIKE isag_t.isag105    # After tax amount in original currency 
                          END RECORD
PRIVATE TYPE type_master  RECORD    # Pass in a single header array 
                      isaf003              LIKE isaf_t.isaf003,     # Account customers  
                      isafdocdt            LIKE isaf_t.isafdocdt,   # Document date  
                      isaf018              LIKE isaf_t.isaf018,     # tax rate 
                      isafud001            LIKE isaf_t.isafud001,   #EDB Reconciliation No 
                      items                DYNAMIC ARRAY OF type_detail
                          END RECORD
PRIVATE TYPE type_return  RECORD   # Returns an array of 
                       code          LIKE type_t.chr20,
                       sqlcode       LIKE type_t.chr20,
                       description   LIKE type_t.chr1000,
                       orderNo       LIKE type_t.chr50  #EDB Sales return doc No 
                          END RECORD

3. from json Read from request data

# Retrieve  datakey  Information content 
   LET g_ent  = cl_aws_json_getValue("datakey","EntId")
   LET g_company = cl_aws_json_getValue("datakey","CompanyId")
   LET l_json_obj = cl_aws_json_getParam()
   
   # Will data  Transfer in l_master record
   CALL l_json_obj.toFGL(l_master)
   
   IF l_json_obj IS NULL THEN
      LET g_status.code = "wss-00216"   # Read in json  Something went wrong 
      RETURN
   END IF
   
   # Check for incoming datakey Is it empty 
   IF cl_null(g_ent) THEN
      LET g_status.code = "wss-00138"
      LET l_str = cl_replace_err_msg(cl_getmsg('wss-00138',g_dlang),'EntId')
      LET g_status.description = l_str
      RETURN
   END IF
   IF cl_null(g_company) THEN
      LET g_status.code = "wss-00138"
      LET l_str = cl_replace_err_msg(cl_getmsg('wss-00138',g_dlang),'CompanyId')
      LET g_status.description = l_str
      RETURN
   END IF

4. return response Of json

# Return value 
CALL cl_aws_json_addParam(util.JSONObject.fromFGL(l_return))
 stay Server In the development process of the end , There are several common ways ：

5. Common function interpretation

cl_aws_json_getValue()        Get the field value 
cl_aws_json_getParam()      Get the whole param paragraph 
l_json_obj.toFGL()         take param The data conversion of the segment is read into predefined variables 
cl_aws_json_addParam(util.JSONObject.fromFGL(l_return))      Automatically add the return variable response Of json in 
T100 WebService Client End development ：
 Declare JSON form Request What is necessary , Refer to the following type_service  Of RECORD, Declare these necessities first so that they can be called later ：
type type_service    RECODE
    prod		STRING,
	name		STRING,
	ip	   	    STRING
                END RECODE

Illustrate with examples ：
The program starts by announcing that it will call the module variable , Such as type_service, Then initialize these variables , Such as preset parameter content and preset service products 、 The service name 、ip：

After declaring variables ：

1. initialization JSON Content , Reference resources cl_rest_json_init();
2. call addParam() as well as addDatakey() function Add parameter、datakey The action of ;
3. through cl_rest_json_invokeSrv() take request Send it out and get the execution status code 、 Return the contents and error messages , When the status code is 0 It means successful execution ;
4. Use cl_rest_json_getParam() obtain parameter And put its content through toFGL() This function To turn into RECORD Form so that we can get the information we need , On the contrary, from l_errmsg Get the error message

T100 WebService Client End development ( Zhongtai )

Announce that the application service should be transferred to the main data of the other party's product , And receive the returned main data RECORD