'@Description This function writes the action parameter value and returns back.
'@Documentation This function writes the action parameter value and returns back.
Function WriteParameter_FN(str_Name, str_Value)
Err.Clear
On Error Resume Next
Datatable.Value(str_Name,dataSource) = str_Value
If Err.Number <> 0 Then
DataTable.getSheet(dataSource).AddParameter str_Name, str_Value
Err.Clear
End If
If dataSource <> "Global" Then
Datatable.Value(str_Name,"Global") = str_Value
If Err.Number <> 0 Then
DataTable.getSheet("Global").AddParameter str_Name, str_Value
Err.Clear
End If
End If
Err.Clear
End Function
'@Documentation This function writes the action parameter value and returns back.
Function WriteParameter_FN(str_Name, str_Value)
Err.Clear
On Error Resume Next
Datatable.Value(str_Name,dataSource) = str_Value
If Err.Number <> 0 Then
DataTable.getSheet(dataSource).AddParameter str_Name, str_Value
Err.Clear
End If
If dataSource <> "Global" Then
Datatable.Value(str_Name,"Global") = str_Value
If Err.Number <> 0 Then
DataTable.getSheet("Global").AddParameter str_Name, str_Value
Err.Clear
End If
End If
Err.Clear
End Function
No comments:
Post a Comment