<HttpPost>
Public Async Function SaveData() As Task(Of IHttpActionResult)
    Dim jsonString = Await Request.Content.ReadAsStringAsync()
    Dim reponsedData = New ResponsedData()
    Try
        Dim data = SQLHelper.ExecProcedureDataFistOrDefault(Of ResponsedData)("sp_insert_multi_table", New With {.jsonData = jsonString})
        Return Ok(data)
    Catch ex As Exception
        reponsedData.status = "ERROR"
        reponsedData.message = ex.Message
    End Try
    Return Ok(reponsedData)
End Function