Check Json Support

K

K4sh

Member

• Aug 28, 2015

• #1

Hey there,
Is there a way to check in a speedscript if JSON is supported (CGI env vars etc ...) ?
The aim is to call JSON as much as possible and to have a fallback if Progress version is prior to 10.2B.

 

Rob Fitzpatrick

ProgressTalk.com Sponsor

• Aug 28, 2015

• #2

Does the PROVERSION function help you?

 

K

K4sh

Member

• Aug 28, 2015

• #3

It can help but it's not easy to say if version is greater or equal than 10.2B

 

Rob Fitzpatrick

ProgressTalk.com Sponsor

• Aug 28, 2015

• #4

I suppose it depends on the definition of "easy". It's maybe not a trivial comparison, but you can parse out the proversion output and make it work for you. Compare the part before the decimal to 10, then compare the digit(s) after the period to 2, compare the string after that to "B", etc.

 

K

K4sh

Member

• Aug 28, 2015

• #5

You've said it. Not a trivial comparision.
The reason why i would expect some kind of boolean variable or close to just to be sure it is supported.

 

TheMadDBA

Active Member

• Aug 28, 2015

• #6

How about this....

MESSAGE PROVERSION BEGINS "1" AND PROVERSION >= "10.2B".

 

G

GregTomkins

Active Member

• Sep 2, 2015

• #7

I'm not familiar with SpeedScript, but would this work?

Code:

def temp-table t no-undo field f as char.
def var h as handle no-undo.
h = temp-table t:handle.
disp can-query(h,"WRITE-JSON").

The temp-table is here only so I can query its WRITE-JSON method. It's not actually doing anything.

If this works, it's probably preferable to looking at version numbers.[/code]

 

TomBascom

Curmudgeon

• Sep 2, 2015

• #8

I like that. I may need to steal that idea if I can remember it long enough!

 

K

K4sh

Member

• Sep 2, 2015

• #9

Just tested it with 9.1d and 10.2b and it works like a charm.
Thank you greg tomkins.