This commit is contained in:
Paul Trowbridge 2022-12-20 10:12:38 -05:00
parent 56e00d7d5c
commit 2d5e32b123

View File

@ -243,11 +243,17 @@ Function request_adjust(doc As String, ByRef fail As Boolean) As Object
Exit Function Exit Function
End If End If
If Mid(wr, 1, 6) = "null" Then
MsgBox ("API route not implemented")
fail = True
Exit Function
End If
Set json = JsonConverter.ParseJson(wr) Set json = JsonConverter.ParseJson(wr)
If IsNull(json("x")) Then If IsNull(json("x")) Then
MsgBox ("no adjustment was made") MsgBox ("no adjustment was made")
fail = True fail = False
Exit Function Exit Function
End If End If