Recent content by Bounty

  1. B

    Adding new extents to database

    I believe that you can't remove extents once they are created. Why don't you go for "EnableLargeFiles" and create a variable size extent? You created extents with a size of 450 MB which is pretty small these days. For example, I have an extent that is 20 GB in size and still growing.
  2. B

    Is it possible to store a json file into master

    I am not quite sure what you try to accomplish, but the following will read the json example you have posted. DEFINE TEMP-TABLE ttUploadRateValues NO-UNDO FIELD valuelist AS CHARACTER EXTENT 4 FIELD fromDate AS DATETIME FIELD isBasic AS LOGICAL FIELD tableId AS INTEGER. DEFINE...
  3. B

    Question What version of 11.7 for PASOE

    Release notes for 11.7.12: Progress Documentation Don't expect new features in 11.7.12 but bug fixes that might affect your business. There are also release notes for the versions between the one you are using and the latest one. Pretty much bugs have been fixed in those 3 or 4 years.
  4. B

    Question Display HTML File

    How to open a web page or an html file from an ABL/4GL application? Is this helpful?
  5. B

    Best practice for refactoring functions in OO?

    Something like this: MyLibrary.cls CLASS MyLibrary: METHOD PUBLIC CHARACTER getObjectType(INPUT objectType AS INTEGER): ... END METHOD. END CLASS. FrontEnd.cls CLASS FrontEnd INHERITS MyLibrary: METHOD ... VOID SomeMethod: DISPLAY getObjectType(1). END METHOD. END CLASS.
  6. B

    Occasionally encounter error 5890 and 5884 with excel com-object

    In the error message I see 'GetToppanData', that is the name of the procedure where the error occurs. The code snippet is procedure 'GetData'.
  7. B

    Question Learning

    https://pec.progress.com
  8. B

    DataDigger 25 is here

    Thanks for the update. Unfortunately I get an error on startup: This is the offending line: glShowFavourites evaluates to ? OpenEdge 11.7.7
  9. B

    Answered Parsing JSON with dynamic keys

    DEFINE VARIABLE FieldNames AS CHARACTER NO-UNDO EXTENT. FieldNames = JsonAircraft:GetNames(). DO i = 1 to EXTENT(FieldNames): JsonAircraft:GetCharacter(FieldNames[i]).
  10. B

    Differences between Persistent & Super Procedures?

    Try the following with Google: openedge super procedure openedge persistent procedure You will get several useful results.
  11. B

    Differences between RECID & ROWID

    Link: Row Identifiers, RECID and ROWID Explained
  12. B

    Why use substitute

    Readability: t1 = "File " + MyFile + " was deleted on " + STRING(TODAY) + " at " + STRING(TIME, "HH:MM"). t2 = SUBSTITUTE("File &1 was deleted on &2 at &3", MyFile, STRING(TODAY), STRING(TIME, "HH:MM")). I definitely prefer SUBSTITUTE in these cases and if you need to translate texts it will...
  13. B

    JSON on version of progress 10.1B03

    Your advise is to go from an ancient version to an old version. Why wouldn't you do the upgrade to 12.1?
  14. B

    Question Standardize procedure and function

    I don't want to start a lengthy discussion here. Everybody has his own style of coding, but what I would do: 1) Make "action" a local variable in the OpenFile function; 2) Let OpenFile return a LOGICAL (in this case variable "action"); 3) Change "path" to a PROPERTY with GET and PRIVATE SET...
  15. B

    Guidance on licensing for a small application

    When you are coming from such an old version I would research other options like moving away from Progress entirely. For REST services you have to write code anyway and nowadays there are a lot of other tools. The database can be migrated to PostgreSQL, MySQL, ...
Top