B4J Question [SOLVED] How to extract JSONP?

[javiers]

How can I extract the elements of this response:

callback({"id":"48080","province":"Bizkaia","muni":"Valle de Trápaga-Trapagaran","type":"Municipio","address":"Valle de Trápaga-Trapagaran","postalCode":null,"poblacion":null,"geom":"POLYGON ((-3.0628470500000002 43.264890630000004, -3.0628470500000002 43.31237445, -3.00443827 43.31237445, -3.00443827 43.264890630000004, -3.0628470500000002 43.264890630000004))","tip_via":null,"lat":43.28863254,"lng":-3.0336426600000004,"portalNumber":0,"stateMsg":"Dirección no encontrada, se devuelve el municipio","state":10,"countryCode":"011","refCatastral":null})

I have used

Dim parser As JSONParser
parser.Initialize (Job.GetString)

but I get an error

java.lang.RuntimeException: JSON Object expected.

I would appreciate help.

 

[Erel]

Dim s As String = $"callback({"id":"48080","province":"Bizkaia","muni":"Valle de Trápaga-Trapagaran","type":"Municipio","address":"Valle de Trápaga-Trapagaran","postalCode":Null,"poblacion":Null,"geom":"POLYGON ((-3.0628470500000002 43.264890630000004, -3.0628470500000002 43.31237445, -3.00443827 43.31237445, -3.00443827 43.264890630000004, -3.0628470500000002 43.264890630000004))","tip_via":Null,"lat":43.28863254,"lng":-3.0336426600000004,"portalNumber":0,"stateMsg":"Dirección no encontrada, se devuelve el municipio","state":10,"countryCode":"011","refCatastral":Null})"$
s = s.SubString2(s.IndexOf("{"), s.LastIndexOf("}") + 1)
Dim p As JSONParser
p.Initialize(s)
Dim m As Map = p.NextObject
Log(m)

 

[BillMeyer]

@Erel

You're fast !!

 

[KMatle]

It's never good to initialize the parser with job.getstring because you never can be sure what the result is (e.g. server errors, etc.). So Erel's check is a good solution.

 

[javiers]

Dim s As String = $"callback({"id":"48080","province":"Bizkaia","muni":"Valle de Trápaga-Trapagaran","type":"Municipio","address":"Valle de Trápaga-Trapagaran","postalCode":Null,"poblacion":Null,"geom":"POLYGON ((-3.0628470500000002 43.264890630000004, -3.0628470500000002 43.31237445, -3.00443827 43.31237445, -3.00443827 43.264890630000004, -3.0628470500000002 43.264890630000004))","tip_via":Null,"lat":43.28863254,"lng":-3.0336426600000004,"portalNumber":0,"stateMsg":"Dirección no encontrada, se devuelve el municipio","state":10,"countryCode":"011","refCatastral":Null})"$
s = s.SubString2(s.IndexOf("{"), s.LastIndexOf("}") + 1)
Dim p As JSONParser
p.Initialize(s)
Dim m As Map = p.NextObject
Log(m)

Thank you!!
This community is fantastic and EREL more!!