Receiving ERROR #9406 on a string

Question

Question

Rick Prichett · Mar 6, 2021

My response definition is below. I keep getting ERROR #9406: Unexpected format for value of field, physicianFirstName, using class base mapping. Any ideas would be helpful.

response:

Response is [{"physicianFirstName":"STEVENSON","physicianLastName":"HOWARD","physicianMiddleNameInitial":"W","physicianSpecialty":"null","physicianNPI":"null","physicianMPIN":"null","physicianTaxID":"null","physicianADRId":"null","physicianAddressLine1":"null","physicianCity":"null","physicianState":"null","physicianZip":"null","physicianZipPlus4":"null","physicianPhone":"null","facilityNPI":"null","facilityAddressLine1":"\"\"","facilityCity":"\"\"","facilityState":"\"\"","facilityZip":"\"\"","error":"Invalid NPI. Requested NPI should contain 10 numeric digits","cdsm_Physician_Issue_ID":"null"}]

response defintion
Class CDSM.ProviderAPI.Response Extends (%Persistent, %XML.Adaptor, %JSON.Adaptor) [ Language = objectscript ]response definition :

{

Property physicianFirstName As %String;

Property physicianLastName As %String;

Property physicianMiddleNameInitial As %String;

Property physicianSpecialty As %String;

Property physicianNPI As %String;

Property physicianMPIN As %String;

Property physicianTaxID As %String;

Property physicianADRId As %String;

Property physicianAddressLine1 As %String;

Property physicianCity As %String;

Property physicianState As %String;

Property physicianZip As %String;

Property physicianZipPlus4 As %String;

Property physicianPhone As %String;

Property facilityNPI As %String;

Property facilityAddressLine1 As %String;

Property facilityCity As %String;

Property facilityState As %String;

Property facilityZip As %String;

Property error As %String(MAXLEN = 200);

Property "cdsm_Physician_Issue_ID" As %String;

}

Product version: IRIS 2020.2

Discussion (16)0

Log in or sign up to continue

Eduard Lebedyuk · Mar 10, 2021

pResponse.physicianFirstName

0 0

score 0 · Answer 1 · 2021-03-06T14:08:34-05:00

Get 0th array element from your array:

Class test.Provider Extends (%RegisteredObject, %JSON.Adaptor)
{

Property physicianFirstName As %String;

Property physicianLastName As %String;

Property physicianMiddleNameInitial As %String;

Property physicianSpecialty As %String;

Property physicianNPI As %String;

Property physicianMPIN As %String;

Property physicianTaxID As %String;

Property physicianADRId As %String;

Property physicianAddressLine1 As %String;

Property physicianCity As %String;

Property physicianState As %String;

Property physicianZip As %String;

Property physicianZipPlus4 As %String;

Property physicianPhone As %String;

Property facilityNPI As %String;

Property facilityAddressLine1 As %String;

Property facilityCity As %String;

Property facilityState As %String;

Property facilityZip As %String;

Property error As %String(MAXLEN = 200);

Property "cdsm_Physician_Issue_ID" As %String;

ClassMethod GetJSON() [ CodeMode = expression ]
{
[
    {
        "physicianFirstName": "STEVENSON",
        "physicianLastName": "HOWARD",
        "physicianMiddleNameInitial": "W",
        "physicianSpecialty": "null",
        "physicianNPI": "null",
        "physicianMPIN": "null",
        "physicianTaxID": "null",
        "physicianADRId": "null",
        "physicianAddressLine1": "null",
        "physicianCity": "null",
        "physicianState": "null",
        "physicianZip": "null",
        "physicianZipPlus4": "null",
        "physicianPhone": "null",
        "facilityNPI": "null",
        "facilityAddressLine1": "\"\"",
        "facilityCity": "\"\"",
        "facilityState": "\"\"",
        "facilityZip": "\"\"",
        "error": "Invalid NPI. Requested NPI should contain 10 numeric digits",
        "cdsm_Physician_Issue_ID": "null"
    }
]
}

/// do ##class(test.Provider).Test()
ClassMethod Test()
{
    set json = ..GetJSON()
    
    set obj = ..%New()
    set sc = obj.%JSONImport(json.%Get(0))
    
    zw sc,obj
}

}

score 0 · Answer 2 · 2021-03-06T14:11:58-05:00

I would also recommend rewriting this property:

Property "cdsm_Physician_Issue_ID" As %String;

like this:

Property physicianIssueID As %String(%JSONFIELDNAME = "cdsm_Physician_Issue_ID");

This way JSON would still be imported, but you would be able to refer to property name without double quotes.

score 0 · Answer 3 · 2021-03-08T16:03:02-05:00

It looks like my response is not a true JSON response (encapsulated in {}) but, is returned as a JSON array like the example. is there any way to read in my response so that I can access the variables?

[ { "physicianFirstName": "STEVENSON", "physicianLastName": "HOWARD", "physicianMiddleNameInitial": "W", "physicianSpecialty": "null", "physicianNPI": "null", "physicianMPIN": "null", "physicianTaxID": "null", "physicianADRId": "null", "physicianAddressLine1": "null", "physicianCity": "null", "physicianState": "null", "physicianZip": "null", "physicianZipPlus4": "null", "physicianPhone": "null", "facilityNPI": "null", "facilityAddressLine1": "\"\"", "facilityCity": "\"\"", "facilityState": "\"\"", "facilityZip": "\"\"", "error": "Invalid NPI. Requested NPI should contain 10 numeric digits", "cdsm_Physician_Issue_ID": "null" } ]

score 0 · Answer 4 · 2021-03-08T16:20:00-05:00

Yes, check my other reply, I get the zeroth element from the JSON array with %Get(0).

Also both [] and {} are valid JSON.

score 0 · Answer 5 · 2021-03-09T12:36:46-05:00

How would I modify the code below to return the response so that it can be accessed as an array later in the code?

/// REST EISL Provider API Business Operation
Class CDSM.ProviderAPI.EISLProviderAPIOperation Extends EnsLib.REST.Operation [ Language = objectscript ]
{ Parameter INVOCATION = "Queue"; Method getProviderInfo(pRequest As CDSM.ProviderAPI.Request, Output pResponse As CDSM.ProviderAPI.ProviderInfo) As %Status
{ Try { Set tSC = $$$OK
//Build the API request
Set tHttpRequest = ##class(%Net.HttpRequest).%New()
Set tHttpRequest.ContentType = "application/json"
Set tSC = pRequest.%JSONExportToStream(.tJSONRequest) Quit:$$$ISERR(tSC)
Set tSC = tHttpRequest.EntityBody.CopyFrom(tJSONRequest) Quit:$$$ISERR(tSC)
Set tSC = tHttpRequest.EntityBody.Rewind() //Build the Response
#Dim tHttpResponse As %Net.HttpResponse
Set tSC = ..Adapter.SendFormDataArray(.tHttpResponse,"POST",tHttpRequest) If $$$ISERR(tSC) && $IsObject(tHttpResponse) && (tHttpResponse.Data.Size) {
Set tSC = $$$ERROR($$$EnsErrGeneral,$$$StatusDisplayString(tSC)_":"_tHttpResponse.Data.Read())
//Quit:$$$ISERR(tSC)
} If $IsObject(tHttpResponse) {
$$$LOGINFO("Response is "_tHttpResponse.Data.Read())
Set tSC = tHttpResponse.Data.Rewind() Quit:$$$ISERR(tSC)
// Copy the contents of HttpResponse into pResponse
// Navigate pResponse and grab the things we want to store into SQL
// SQL Insert
Set pResponse=##class(CDSM.ProviderAPI.Response).%New()
Set tSC = pResponse.%JSONImport(tHttpResponse.Data.Read()) Quit:$$$ISERR(tSC) }
} catch {
Set tSC = $$$SystemError
}
Quit tSC
} // below is not auto generated programmer must put XData MessageMap
{
<MapItems>
  <MapItem MessageType="CDSM.ProviderAPI.Request">
    <Method>getProviderInfo</Method>
  </MapItem>
</MapItems>
} }

score 0 · Answer 6 · 2021-03-09T12:56:00-05:00

If you're sure that there's only one object in response, replace:

Set tSC = pResponse.%JSONImport(tHttpResponse.Data.Read())

with:

Set tSC = pResponse.%JSONImport({}.%FromJSON(tHttpResponse.Data).%Get(0))

If you want to parse an entire array, you'll need another class:

Class CDSM.ProviderAPI.Responses Extends (%Persistent, %JSON.Adaptor) {

Property Responses As List Of CDSM.ProviderAPI.ProviderInfo;

}

And in this case replace this code:

Set pResponse=##class(CDSM.ProviderAPI.Response).%New()
Set tSC = pResponse.%JSONImport(tHttpResponse.Data.Read())

With:

Set pResponse=##class(CDSM.ProviderAPI.Responses).%New()
Set tSC = pResponse.%JSONImport(tHttpResponse.Data)

and update the method signature too.

score 0 · Answer 7 · 2021-03-09T13:37:14-05:00

I verified with the group sending the reply there will only be one. I would define a class but the reply does not have a tag to be identified in the reply (example above). How would I build a class in that case or would it be easier to Output pResponse As CDSM.ProviderAPI.ProviderInfo in the method as something else. This would also Set pResponse=##class(CDSM.ProviderAPI.Response).%New() need changed I do believe as well.

score 0 · Answer 8 · 2021-03-09T14:11:03-05:00

If the [ ] brackets were stripped off would the class definition work? if so how would I strip them on in the class?

score 0 · Answer 9 · 2021-03-09T14:25:00-05:00

If you're sure that there's only one object in response array, replace:

Set tSC = pResponse.%JSONImport(tHttpResponse.Data.Read())

with:

Set tSC = pResponse.%JSONImport({}.%FromJSON(tHttpResponse.Data).%Get(0))

It would parse your JSON stream into a dynamic JSON array (via {}.%FromJSON(tHttpResponse.Data)), get zeroth element from it (via %Get(0)), and pass it for JSON import (via pResponse.%JSONImport).

score 0 · Answer 10 · 2021-03-09T15:53:06-05:00

This this error when I replace the old code with the new line. It looks to me as though all are matched. Is there a bug?

score 0 · Answer 11 · 2021-03-09T15:56:23-05:00

Eduard Lebedyuk · Mar 9, 2021

Your code has a bracket at the end:

You might have erased it accidentally?

0 0

score 0 · Answer 12 · 2021-03-09T16:05:15-05:00

It was on another line below. The error is still there but it looks like all brackets are matched.

/// REST EISL Provider API Business Operation
Class CDSM.ProviderAPI.EISLProviderAPIOperation Extends EnsLib.REST.Operation [ Language = objectscript ]
{ Parameter INVOCATION = "Queue"; Method getProviderInfo(pRequest As CDSM.ProviderAPI.Request, Output pResponse As CDSM.ProviderAPI.ProviderInfo) As %Status
{ Try { Set tSC = $$$OK
//Build the API request
Set tHttpRequest = ##class(%Net.HttpRequest).%New()
Set tHttpRequest.ContentType = "application/json"
Set tSC = pRequest.%JSONExportToStream(.tJSONRequest) Quit:$$$ISERR(tSC)
Set tSC = tHttpRequest.EntityBody.CopyFrom(tJSONRequest) Quit:$$$ISERR(tSC)
Set tSC = tHttpRequest.EntityBody.Rewind() //Build the Response
#Dim tHttpResponse As %Net.HttpResponse
Set tSC = ..Adapter.SendFormDataArray(.tHttpResponse,"POST",tHttpRequest) If $$$ISERR(tSC) && $IsObject(tHttpResponse) && (tHttpResponse.Data.Size) {
Set tSC = $$$ERROR($$$EnsErrGeneral,$$$StatusDisplayString(tSC)_":"_tHttpResponse.Data.Read())
//Quit:$$$ISERR(tSC)
} If $IsObject(tHttpResponse) {
$$$LOGINFO("Response is "_tHttpResponse.Data.Read())
Set tSC = tHttpResponse.Data.Rewind() Quit:$$$ISERR(tSC)
// Copy the contents of HttpResponse into pResponse
// Navigate pResponse and grab the things we want to store into SQL
// SQL Insert
Set pResponse=##class(CDSM.ProviderAPI.Response).%New()
Set tSC = pResponse.%JSONImport({}.%FromJSON(tHttpResponse.Data).%Get(0))}
} catch {
Set tSC = $$$SystemError
}
Quit tSC
} // below is not auto generated programmer must put XData MessageMap
{
<MapItems>
  <MapItem MessageType="CDSM.ProviderAPI.Request">
    <Method>getProviderInfo</Method>
  </MapItem>
</MapItems>
} }

score 0 · Answer 13 · 2021-03-09T16:14:40-05:00

You probably have a mismatched brackets somewhere.

You can also try

[].%FromJSON

instead of

{}.%FromJSON

score 0 · Answer 14 · 2021-03-09T17:49:46-05:00

The [ ] seems to let it compile. How do I access the array? For example how would I get physicianFirstName from the array? Before I have been able to do something like this. Set pLOB = pResponse.memberPolicies.GetAt(1).insuranceInfo.lineOfBusiness

I now keep getting this

An error was received : ERROR <Ens>ErrException: <UNDEFINED>zgetProviderInfo+24^CDSM.ProviderAPI.EISLProviderAPIOperation.1 *tsc -- logged as '-' number - @' Set pphysicianFirstName =tsc.GetAt(0).physicianFirstName'

I tried tsc.GetAt(1).physicianFirstName' as well.

score 0 · Answer 15 · 2021-03-11T11:19:42-05:00

Thanks for all your help! Our group is transitioning to Iris from Mirth and Object script is a very different beast.