Re: [WebDNA] TCPconnect and Bitcoin rate
This WebDNA talk-list message is from 2017
It keeps the original formatting.
numero = 113895
interpreted = N
texte = 1495 --Apple-Mail=_97D2AD07-1EDC-45AE-B901-54D2433624C9 Content-Transfer-Encoding: quoted-printable Content-Type: text/plain; charset=utf-8 There is a little problem with [JSONstore] when working with PayPal that = I found today. I have advised WebDNA, hopefully they will do a fix for it. Kind regards Stuart Tremain Pharoah Lane Software AUSTRALIA webdna@idfk.com.au > On 20 Dec 2017, at 13:47, Brian Harrington
= wrote: >=20 > I put that code on a page... was missing a showif... fixed that. You = have an example of a paste...? >=20 > On Tue, Dec 19, 2017 at 4:48 PM, Stuart Tremain > wrote: > Hey Tom >=20 > Nice function :) >=20 >=20 > Kind regards >=20 > Stuart Tremain > Pharoah Lane Software > AUSTRALIA > webdna@idfk.com.au >=20 >=20 >=20 >=20 >=20 >=20 >> On 19 Dec 2017, at 20:23, Tom Duke > wrote: >>=20 >> Hi all, >>=20 >> Here is the code I use to deal with JSON. >>=20 >> - Tom >>=20 >>=20 >>=20 >> First a function to pull a value when you know what JSON node you = want: >>=20 >> [!] >>=20 >>=20 >> +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ >> FUNCTION Name: smGetJsonValue >> ** Description: Pull out a value from a JSONobject >> ** Input:=20 >> jsonObject =3D (the json to be parsed) - required >> jsonNode =3D (the node that we the value of) - required >> ** usage:=20 >> [smGetJsonValue = jsonObject=3D[url][/url]&jsonNode=3D] >>=20 >> [/!][function name=3DsmGetJsonValue][!] >> [/!][text]tReturn=3D[/text][!] >>=20 >> [/!][text]tJsonObject=3D[/text][!] >> [/!][text]tJsonNode=3Dnull[/text][!] >>=20 >> [/!][showif = [url][params_string][/url]^jsonObject][text]tJsonObject=3D[jsonObject][/te= xt][/showif][!] >> [/!][showif = [url][params_string][/url]^jsonNode][text]tJsonNode=3D[jsonNode][/text][/s= howif][!] >>=20 >> ### Store the jsonObject in a table ### >>=20 >> [/!][jsonstore table=3DjsonOject][tJsonObject][/jsonstore][!] >>=20 >> ### Search the table ### >>=20 >> [/!][search = table=3DjsonOject&ne[tJsonNode]data=3Dfind_all][founditems][!] >>=20 >> [/!][text]tReturn=3D[interpret][[tJsonNode]][/interpret][/text][!]= >>=20 >> [/!][/founditems][/search][!] >>=20 >> ### Return the value ### >>=20 >> [/!][return][tReturn][/return][!] >> [/!][/function] >>=20 >>=20 >>=20 >>=20 >> Second a Json parser, that's a bit of a hack: >>=20 >> [text]debug=3DF[/text] >>=20 >> Paste some JSON
>> (some samples here ">http://www.jquery4u= ..com/json/10-example-json-files/ = )
>> >>=20 >>=20 >> [showif [action]=3Dparse-json] >>=20 >> Sample JSON
>> [text show=3DT]theJson=3D[sample-json][/text]
>>=20 >>=20 >> [!] >>=20 >>=20 >> ------------------------------------ >> ### Conversion table to strip non-breaking spaces ### >>=20 >> [/!][table name=3DjsonClean&fields=3Dfrom,to] >> %C2=09 >> %A0=09 >> [/table][!] >>=20 >>=20 >> ------------------------------------ >> ### Conversion table to facilitate spliting into key:value = pairs ### >>=20 >> [/!][table name=3DjsonSplitConversions&fields=3Dfrom,to] >> | ~~~~ >> \" ^^^^ >> [/table][!] >>=20 >>=20 >> ------------------------------------ >> ### Convert back after spliting into key:value pairs ### >>=20 >> [/!][table name=3DjsonSplitConversionsBack&fields=3Dfrom,to] >> "=09 >> ~~~~ | >> ^^^^ " >> [/table][!] >>=20 >>=20 >> ------------------------------------ >> ### pass one - run the conversions ### >>=20 >> [/!][text]theJson=3D[convertwords = table=3DjsonSplitConversions][convertchars = table=3DjsonClean][theJson][/convertchars][/convertwords][/text][!] >>=20 >>=20 >> ------------------------------------ >> ### pass two - add bar to just before each key:value pair ### >>=20 >> [/!][text]theJson=3D[grep = search=3D("[^"]*"):&replace=3D|\1=3D][theJson][/grep][/text][!] >>=20 >>=20 >> ------------------------------------ >> ### pass three - list out the key:value pairs and assign them = to text variables ### >>=20 >> [/!][text]count=3D0[/text][listwords = words=3D[url][theJson][/url]&delimiters=3D|{}][!] >>=20 >> [/!][text]thisVal=3D[grep search=3D(,$)&replace=3D][getchars = start=3D1&trim=3Dboth][convertwords = table=3DjsonSplitConversionsBack][word][/convertwords][/getchars][/grep][/= text][!] >> =09 >> [/!][showif [debug]=3DT][index]. [url][thisVal][/url]
[/showif][!] >> =09 >> [/!][hideif [url][thisVal][/url]=3D][!] >> [/!][text]json-[format .2d][text = show=3DT]count=3D[math][count]+1[/math][/text][/format]-[thisVal][/text][!= ] >> [/!][/hideif][!] >>=20 >> [/!][/listwords][!] >>=20 >>=20 >> ------------------------------------ >> ### Let's have a look at the variables ### >>=20 >> [/!]JSON Assigned to Text Variables
>> [listvariables name=3Djson-&exact=3DF][name] =3D [value]
>> [/listvariables] >>=20 >> [/showif] >>=20 >>=20 >>=20 >> =3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D= =3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D >> Digital Revolutionaries >> 1st Floor, Castleriver House >> 14-15 Parliament Street = >> Temple Bar,Dublin = 2 >> Ireland >> ---------------------------------------------- >> [t]: + 353 1 4403907 >> [e]: > >> [w]: > >> =3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D= =3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D >>=20 >> On 19 December 2017 at 08:01, Terry Nair > wrote: >> Kindly point out the link where I can find that JSON wonder =E2=80=A6ne= ed it for a project. Cannot seem to trace it =E2=80=A6my poor old eyes = are not as good as they used to be =E2=80=A6=F0=9F=98=89 >>=20 >> =20 >>=20 >> Cheers TDn >>=20 >> =C2=A0 <> >> From: Stuart Tremain [mailto:webdna@idfk.com.au = ]=20 >> Sent: Tuesday, December 19, 2017 08:19 AM >> To: WebDNA Talk List > >> Subject: Re: [WebDNA] TCPconnect and Bitcoin rate >>=20 >> =20 >>=20 >> OK, thanks. >>=20 >> =20 >>=20 >> Tom if that was you - nice job, have been using it for a few years = now :) >>=20 >> =20 >>=20 >> =20 >>=20 >> Kind regards >>=20 >> =20 >>=20 >> Stuart Tremain >>=20 >> Pharoah Lane Software >>=20 >> AUSTRALIA >>=20 >> webdna@idfk.com.au >> =20 >>=20 >> =20 >>=20 >> =20 >>=20 >> =20 >>=20 >>=20 >>=20 >>=20 >> On 19 Dec 2017, at 11:15, Michael Davis > wrote: >>=20 >> =20 >>=20 >> Stuart, >>=20 >> =20 >>=20 >> I think that was Tom. He had worked one up prior to JSONStore. >>=20 >> =20 >>=20 >> Mike >>=20 >>=20 >>=20 >>=20 >> On Dec 18, 2017, at 3:32 PM, Stuart Tremain > wrote: >>=20 >> =20 >>=20 >> Michael >>=20 >> =20 >>=20 >> Were you the person that did the JSON parser some time ago ? >>=20 >> =20 >>=20 >> =20 >>=20 >> Kind regards >>=20 >> =20 >>=20 >> Stuart Tremain >>=20 >> Pharoah Lane Software >>=20 >> AUSTRALIA >>=20 >> webdna@idfk.com.au >> =20 >>=20 >> =20 >>=20 >> =20 >>=20 >> =20 >>=20 >>=20 >>=20 >>=20 >> On 19 Dec 2017, at 10:22, Michael Davis > wrote: >>=20 >> =20 >>=20 >> Yariv, >>=20 >> =20 >>=20 >> Here's a starting point for you... >>=20 >> =20 >>=20 >> Had to use [middle] to get rid of some garbage, which was strange. = Other than that, it should be pretty straight forward. >>=20 >> =20 >>=20 >> =20 >>=20 >> --------------------------------------------------------- This = message is sent to you because you are subscribed to the mailing list = talk@webdna.us To unsubscribe, E-mail to: = talk-leave@webdna.us archives: = http://www.webdna.us/page.dna?numero=3D55 = Bug Reporting: = support@webdna.us >>=20 >> =20 >>=20 >>=20 >>=20 >>=20 >> On Dec 17, 2017, at 3:54 AM, Office > wrote: >>=20 >> =20 >>=20 >> For the last 20 years i never had to receive data from elsewhere till = today. >>=20 >> I need to ask an API for the bitcoin rate >>=20 >> i wanted to use the TCPconnect for this but the sample is dead ? : >>=20 >> =20 >>=20 >> http://www.webdna.us/page.dna?numero=3D264 = >> =20 >>=20 >> What i need is a piece of code to get the USD =E2=80=9Crate" out of = this thing (this number: 19,681.9725) so i can calculate the price of = the product to be divided to this to be able to show the current price = in Bitcoin at my store >>=20 >> = {"USD":{"code":"USD","symbol":"$","rate":"19,681.9725","description":"= United States Dollar","rate_float":19681.9725} >> This is where it update every second (or less) >>=20 >> https://api.coindesk.com/v1/bpi/currentprice.json = >> =20 >>=20 >> Or any other way to get a rate into my page :-) >>=20 >> =20 >>=20 >> Yours, >>=20 >> =20 >>=20 >> Yariv Nachshon >>=20 >> http://www.plonter.co.il >> =20 >>=20 >> =20 >>=20 >> =20 >>=20 >>=20 >>=20 >>=20 >> =20 >>=20 >> =20 >>=20 >>=20 >>=20 >>=20 >> --------------------------------------------------------- This = message is sent to you because you are subscribed to the mailing list = talk@webdna.us To unsubscribe, E-mail to: = talk-leave@webdna.us archives: = http://www.webdna.us/page.dna?numero=3D55 = Bug Reporting: = support@webdna.us >> =20 >>=20 >> =20 >>=20 >> --------------------------------------------------------- This = message is sent to you because you are subscribed to the mailing list = talk@webdna.us To unsubscribe, E-mail to: = talk-leave@webdna.us archives: = http://www.webdna.us/page.dna?numero=3D55 = Bug Reporting: = support@webdna.us >> =20 >>=20 >> --------------------------------------------------------- This = message is sent to you because you are subscribed to the mailing list = talk@webdna.us To unsubscribe, E-mail to: = talk-leave@webdna.us archives: = http://www.webdna.us/page.dna?numero=3D55 = Bug Reporting: = support@webdna.us >> =20 >>=20 >> --------------------------------------------------------- This = message is sent to you because you are subscribed to the mailing list = talk@webdna.us To unsubscribe, E-mail to: = talk-leave@webdna.us archives: = http://www.webdna.us/page.dna?numero=3D55 = Bug Reporting: = support@webdna.us >> --------------------------------------------------------- This = message is sent to you because you are subscribed to the mailing list = talk@webdna.us To unsubscribe, E-mail to: = talk-leave@webdna.us archives: = http://www.webdna.us/page.dna?numero=3D55 = Bug Reporting: = support@webdna.us >> --------------------------------------------------------- This = message is sent to you because you are subscribed to the mailing list = talk@webdna.us To unsubscribe, E-mail to: = talk-leave@webdna.us archives: = http://www.webdna.us/page.dna?numero=3D55 = Bug Reporting: = support@webdna.us > --------------------------------------------------------- This message = is sent to you because you are subscribed to the mailing list = talk@webdna.us To unsubscribe, E-mail to: = talk-leave@webdna.us archives: = http://www.webdna.us/page.dna?numero=3D55 = Bug Reporting: = support@webdna.us > --------------------------------------------------------- This message = is sent to you because you are subscribed to the mailing list = talk@webdna.us To unsubscribe, E-mail to: talk-leave@webdna.us archives: = http://www.webdna.us/page.dna?numero=3D55 Bug Reporting: = support@webdna.us --Apple-Mail=_97D2AD07-1EDC-45AE-B901-54D2433624C9 Content-Transfer-Encoding: quoted-printable Content-Type: text/html; charset=utf-8 There= is a little problem with [JSONstore] when working with PayPal that I = found today.
I have = advised WebDNA, hopefully they will do a fix for it.