))`
So here it does now find the ‘summary’ field, but then fails to find the ‘#value’ field.
What am I doing wrong?
Thanks
---
### Author:  [@lydell](https://discourse.elm-lang.org/u/lydell)
#### Post date: [April 26, 2021, 4:08pm UTC](https://discourse.elm-lang.org/t/error-converting-xml-to-json-and-extracting-values/7297/2 "2021-04-26T16:08:12Z")
`Xml.xmlToJson2` seems to create a JSON _array:_ `[{ "summary": "\"123\"" }]`
I figured this out by first converting the XML to JSON, and then turning that into a string using `Json.Encode.encode` so I could see what we’ve got to work with.
Play with it here: [https://ellie-app.com/cZWvzCV2f8ba1](https://ellie-app.com/cZWvzCV2f8ba1)
> So here it does now find the ‘summary’ field, but then fails to find the ‘#value’ field.
No, it doesn’t even try to look at the `"#value"` field since it fails earlier on finding `"summary"`.
---
### Author:  [@AlanQ](https://discourse.elm-lang.org/u/AlanQ)
#### Post date: [April 30, 2021, 3:08pm UTC](https://discourse.elm-lang.org/t/error-converting-xml-to-json-and-extracting-values/7297/3 "2021-04-30T15:08:07Z")
Thank you, @lydell, that was it!
So,
`summaryString = JD.decodeValue summaryDecoder decodedJSON`
`Err (Failure "Expecting an OBJECT with a field named summary" )`
becomes
`summaryList = JD.decodeValue (JD.list summaryDecoder) decodedJSON`
`Ok ["\"123\""]`
---
### Author:  [@choonkeat](https://discourse.elm-lang.org/u/choonkeat)
#### Post date: [May 1, 2021, 2:14pm UTC](https://discourse.elm-lang.org/t/error-converting-xml-to-json-and-extracting-values/7297/4 "2021-05-01T14:14:32Z")
> [@AlanQ](#):
>
> `decodedJSON = Xml.xmlToJson2 decodedXml`
> _Debug.log:_
>
> > ``
`` isn’t helpful and I need to debug json value often and actually have a function
```auto
debugJson : String -> Json.Encode.Value -> Json.Encode.Value
debugJson string value =
let
_ =
Debug.log string (Json.Encode.encode 0 value)
in
value
```
so I can tag it to any value
```auto
decodedJSON =
Xml.xmlToJson2 decodedXml
|> debugJson "xmlToJson2"
```
---
### Author:  [@AlanQ](https://discourse.elm-lang.org/u/AlanQ)
#### Post date: [May 2, 2021, 10:58pm UTC](https://discourse.elm-lang.org/t/error-converting-xml-to-json-and-extracting-values/7297/5 "2021-05-02T22:58:48Z")
@choonkeat, that’s brilliant. Thank you.
```auto
debugJson : String -> JE.Value -> JE.Value
debugJson string value =
let
_ = Debug.log string (JE.encode 0 value)
in
value
```
```auto
decodedJSON =
Xml.xmlToJson2 decodedXml
|> debugJson "decodedJSON"
```
So,
The `debugJson` function is given
- a string to identify the `Debug.log` output
- the JSON Value.
The output of the function is just the JSON Value, so the Value passes through; it is unchanged by the function, and therefore doesn’t affect the code where it is inserted.
The clever stuff happens in the `let`:
The calling of Debug.log generates debug output without assignment. But `let` must contain assignments. The underscore `_` could have been `x` or `y` or anything else. But, given that `_` is used in case statements to mean ‘_any value_’, presumably assigning the output of Debug.log to `_` is the equivalent of piping the output of a command line function to `/dev/null`.
Neat 🙂
---
### Author:  [@system](https://discourse.elm-lang.org/u/system)
#### Post date: [May 12, 2021, 10:59pm UTC](https://discourse.elm-lang.org/t/error-converting-xml-to-json-and-extracting-values/7297/6 "2021-05-12T22:59:26Z")
This topic was automatically closed 10 days after the last reply. New replies are no longer allowed.