Recent content by Rod Anderson

I feel like I'm being really stupid here. I co-working brought me a problem similar to this code snippet: def temp-table masterGroup field groupid as char field groupdesc as char INDEX idxid is primary unique groupid. DEF temp-table masterDetail field groupid as char field...

If I understand your question correctly your only missing the OVERRIDE option: METHOD PUBLIC VOID OVERRIDE GetStyle(vStyle AS CHARACTER): setGStyle("C:\Projects\CustomerApplication\src\Styles\Nautilus.isl"). END METHOD. Be careful with inheritance. IMHO evil exist everywhere:) Rod

Aaltair, I lead you slightly astray, trying to do too many things at one time. Here are a couple of notes: I'm assuming you can get to www.httbin.org in your browser so that's not the issue. In the code below I'll show you a slightly different approach to use the URI Since it's a get...

Altair, Unauthorized Web Services calls are block for me at work but try playing around with httpbin(1): HTTP Client Testing Service. You can try all kinds of things. Change my previous code to something like this (disclaimer, I can't test this code from work so it may have some typo's etc)...

I just recently finished a project. A lot of head banging but hopefully, this will get you started. I wrote it on 11.6.3 but I believe it will work on your version. /*------------------------------------------------------------------------ File Sample.p Purpose Sample...

Thanks Tom, I finally figured out that if I cast oEntity (the JSON response) to a JsonObject then I could access the properties directly: oJsonObject = CAST(oEntity, Jsonobject). myrequestID = oJsonObject:getJsonText("requestId"). /* and read the _links into an array */ DEF VAR oJsonArray...

I'm calling a rest service and getting back the below JSON. I tried to build a dynamic dataset but since the the JSON document omits the outer object I get errors 15358 and 15374 which I can't seem to find a work around. I then tried picking the specific data I need using: oObject =...

If it's a known constant (ie "-") you could use RIGHT-TRIM. cString = RIGHT-TRIM(cString,"-").

Resolved: I'm still open to a better, more graceful solution but building a dynamic where clause and using can-find() worked. Good morning, I'm hoping I'm just being ignorant and someone can cure me. Please see below. OE 11.6.3 Oracle Linux First some background: We managing and package...

OpenEdge 11.6 SP2 Linux PASOE Has any found any good tools that work will with OpenEdge REST API Services?

This has been resolved. I need to Set the fill-mode property of the child temp-table buffers to „no-fill“.

I haven't really used PDS very much and feel really stupid asking this question but pride aside here it goes. I'm trying to create a dataset with only one tabled defined as a database table (cds-prod) and the rest of the temp tables (about 10 in total) would be used just as transports in the...

OE 11.6 SP1 Redhat Linux I'm beginning a project to port client server code to be used on the Pacific App Server to support web services. The programs make heavy use of everything "shared". There are over 50 shared variables and multiple shared temp tables. I would prefer to migrate most of...

Dean, This is a very dated code/solution but it might work for you. I think I still have the lat/long data (ziploc table) if you want it for a start. It's not near as accurate as today's web services but would get you close enough for government work:) Note it ran on windows but could be...

I'm not sure if you solve it but here is a method I wrote. Works good in Linux for my needs. Rod METHOD PUBLIC VOID GetDirList (INPUT cSourceDir AS CHAR, INPUT cMask AS CHAR, INPUT lForward AS LOG)...