diff --git a/lexers/openedgeabl.go b/lexers/openedgeabl.go
index ea19631..30473b8 100644
--- a/lexers/openedgeabl.go
+++ b/lexers/openedgeabl.go
@@ -23,8 +23,8 @@ var OpenEdgeABL = Register(MustNewLexer(
 				{`(?i)(DEFINE|DEF|DEFI|DEFIN)\b`, KeywordDeclaration, nil},
 				{`(?i)(^|(?<=[^\w\-]))(CHARACTER|CHAR|CHARA|CHARAC|CHARACT|CHARACTE|COM-HANDLE|DATE|DATETIME|DATETIME-TZ|DECIMAL|DEC|DECI|DECIM|DECIMA|HANDLE|INT64|INTEGER|INT|INTE|INTEG|INTEGE|LOGICAL|LONGCHAR|MEMPTR|RAW|RECID|ROWID)\s*($|(?=[^\w\-]))`, KeywordType, nil},
 				{Words(`(?i)(^|(?<=[^\w\-]))`, `\s*($|(?=[^\w\-]))`, `ABS`, `ABSO`, `ABSOL`, `ABSOLU`, `ABSOLUT`, `ABSOLUTE`, `ABSTRACT`, `ACCELERATOR`, `ACCUM`, `ACCUMU`, `ACCUMUL`, `ACCUMULA`, `ACCUMULAT`, `ACCUMULATE`, `ACTIVE-FORM`, `ACTIVE-WINDOW`, `ADD`, `ADD-BUFFER`, `ADD-CALC-COLUMN`, `ADD-COLUMNS-FROM`, `ADD-EVENTS-PROCEDURE`, `ADD-FIELDS-FROM`, `ADD-FIRST`, `ADD-INDEX-FIELD`, `ADD-LAST`, `ADD-LIKE-COLUMN`, `ADD-LIKE-FIELD`, `ADD-LIKE-INDEX`, `ADD-NEW-FIELD`, `ADD-NEW-INDEX`, `ADD-SCHEMA-LOCATION`, `ADD-SUPER-PROCEDURE`, `ADM-DATA`, `ADVISE`, `ALERT-BOX`, `ALIAS`, `ALL`, `ALLOW-COLUMN-SEARCHING`, `ALLOW-REPLICATION`, `ALTER`, `ALWAYS-ON-TOP`, `AMBIG`, `AMBIGU`, `AMBIGUO`, `AMBIGUOU`, `AMBIGUOUS`, `ANALYZ`, `ANALYZE`, `AND`, `ANSI-ONLY`, `ANY`, `ANYWHERE`, `APPEND`, `APPL-ALERT`, `APPL-ALERT-`, `APPL-ALERT-B`, `APPL-ALERT-BO`, `APPL-ALERT-BOX`, `APPL-ALERT-BOXE`, `APPL-ALERT-BOXES`, `APPL-CONTEXT-ID`, `APPLICATION`, `APPLY`, `APPSERVER-INFO`, `APPSERVER-PASSWORD`, `APPSERVER-USERID`, `ARRAY-MESSAGE`, `AS`, `ASC`, `ASCE`, `ASCEN`, `ASCEND`, `ASCENDI`, `ASCENDIN`, `ASCENDING`, `ASK-OVERWRITE`, `ASSEMBLY`, `ASSIGN`, `ASYNC-REQUEST-COUNT`, `ASYNC-REQUEST-HANDLE`, `ASYNCHRONOUS`, `AT`, `ATTACHED-PAIRLIST`, `ATTR`, `ATTR-SPACE`, `ATTRI`, `ATTRIB`, `ATTRIBU`, `ATTRIBUT`, `AUDIT-CONTROL`, `AUDIT-ENABLED`, `AUDIT-EVENT-CONTEXT`, `AUDIT-POLICY`, `AUTHENTICATION-FAILED`, `AUTHORIZATION`, `AUTO-COMP`, `AUTO-COMPL`, `AUTO-COMPLE`, `AUTO-COMPLET`, `AUTO-COMPLETI`, `AUTO-COMPLETIO`, `AUTO-COMPLETION`, `AUTO-END-KEY`, `AUTO-ENDKEY`, `AUTO-GO`, `AUTO-IND`, `AUTO-INDE`, `AUTO-INDEN`, `AUTO-INDENT`, `AUTO-RESIZE`, `AUTO-RET`, `AUTO-RETU`, `AUTO-RETUR`, `AUTO-RETURN`, `AUTO-SYNCHRONIZE`, `AUTO-Z`, `AUTO-ZA`, `AUTO-ZAP`, `AUTOMATIC`, `AVAIL`, `AVAILA`, `AVAILAB`, `AVAILABL`, `AVAILABLE`, `AVAILABLE-FORMATS`, `AVE`, `AVER`, `AVERA`, `AVERAG`, `AVERAGE`, `AVG`, `BACK`, `BACKG`, `BACKGR`, `BACKGRO`, `BACKGROU`, `BACKGROUN`, `BACKGROUND`, `BACKWARD`, `BACKWARDS`, `BASE64-DECODE`, `BASE64-ENCODE`, `BASE-ADE`, `BASE-KEY`, `BATCH`, `BATCH-`, `BATCH-M`, `BATCH-MO`, `BATCH-MOD`, `BATCH-MODE`, `BATCH-SIZE`, `BEFORE-H`, `BEFORE-HI`, `BEFORE-HID`, `BEFORE-HIDE`, `BEGIN-EVENT-GROUP`, `BEGINS`, `BELL`, `BETWEEN`, `BGC`, `BGCO`, `BGCOL`, `BGCOLO`, `BGCOLOR`, `BIG-ENDIAN`, `BINARY`, `BIND`, `BIND-WHERE`, `BLANK`, `BLOCK-ITERATION-DISPLAY`, `BLOCK-LEVEL`, `BORDER-B`, `BORDER-BO`, `BORDER-BOT`, `BORDER-BOTT`, `BORDER-BOTTO`, `BORDER-BOTTOM-CHARS`, `BORDER-BOTTOM-P`, `BORDER-BOTTOM-PI`, `BORDER-BOTTOM-PIX`, `BORDER-BOTTOM-PIXE`, `BORDER-BOTTOM-PIXEL`, `BORDER-BOTTOM-PIXELS`, `BORDER-L`, `BORDER-LE`, `BORDER-LEF`, `BORDER-LEFT`, `BORDER-LEFT-`, `BORDER-LEFT-C`, `BORDER-LEFT-CH`, `BORDER-LEFT-CHA`, `BORDER-LEFT-CHAR`, `BORDER-LEFT-CHARS`, `BORDER-LEFT-P`, `BORDER-LEFT-PI`, `BORDER-LEFT-PIX`, `BORDER-LEFT-PIXE`, `BORDER-LEFT-PIXEL`, `BORDER-LEFT-PIXELS`, `BORDER-R`, `BORDER-RI`, `BORDER-RIG`, `BORDER-RIGH`, `BORDER-RIGHT`, `BORDER-RIGHT-`, `BORDER-RIGHT-C`, `BORDER-RIGHT-CH`, `BORDER-RIGHT-CHA`, `BORDER-RIGHT-CHAR`, `BORDER-RIGHT-CHARS`, `BORDER-RIGHT-P`, `BORDER-RIGHT-PI`, `BORDER-RIGHT-PIX`, `BORDER-RIGHT-PIXE`, `BORDER-RIGHT-PIXEL`, `BORDER-RIGHT-PIXELS`, `BORDER-T`, `BORDER-TO`, `BORDER-TOP`, `BORDER-TOP-`, `BORDER-TOP-C`, `BORDER-TOP-CH`, `BORDER-TOP-CHA`, `BORDER-TOP-CHAR`, `BORDER-TOP-CHARS`, `BORDER-TOP-P`, `BORDER-TOP-PI`, `BORDER-TOP-PIX`, `BORDER-TOP-PIXE`, `BORDER-TOP-PIXEL`, `BORDER-TOP-PIXELS`, `BOX`, `BOX-SELECT`, `BOX-SELECTA`, `BOX-SELECTAB`, `BOX-SELECTABL`, `BOX-SELECTABLE`, `BREAK`, `BROWSE`, `BUFFER`, `BUFFER-CHARS`, `BUFFER-COMPARE`, `BUFFER-COPY`, `BUFFER-CREATE`, `BUFFER-DELETE`, `BUFFER-FIELD`, `BUFFER-HANDLE`, `BUFFER-LINES`, `BUFFER-NAME`, `BUFFER-PARTITION-ID`, `BUFFER-RELEASE`, `BUFFER-VALUE`, `BUTTON`, `BUTTONS`, `BY`, `BY-POINTER`, `BY-VARIANT-POINTER`, `CACHE`, `CACHE-SIZE`, `CALL`, `CALL-NAME`, `CALL-TYPE`, `CAN-CREATE`, `CAN-DELETE`, `CAN-DO`, `CAN-DO-DOMAIN-SUPPORT`, `CAN-FIND`, `CAN-QUERY`, `CAN-READ`, `CAN-SET`, `CAN-WRITE`, `CANCEL-BREAK`, `CANCEL-BUTTON`, `CAPS`, `CAREFUL-PAINT`, `CASE`, `CASE-SEN`, `CASE-SENS`, `CASE-SENSI`, `CASE-SENSIT`, `CASE-SENSITI`, `CASE-SENSITIV`, `CASE-SENSITIVE`, `CAST`, `CATCH`, `CDECL`, `CENTER`, `CENTERE`, `CENTERED`, `CHAINED`, `CHARACTER`, `CHARACTER_LENGTH`, `CHARSET`, `CHECK`, `CHECKED`, `CHOOSE`, `CHR`, `CLASS`, `CLASS-TYPE`, `CLEAR`, `CLEAR-APPL-CONTEXT`, `CLEAR-LOG`, `CLEAR-SELECT`, `CLEAR-SELECTI`, `CLEAR-SELECTIO`, `CLEAR-SELECTION`, `CLEAR-SORT-ARROW`, `CLEAR-SORT-ARROWS`, `CLIENT-CONNECTION-ID`, `CLIENT-PRINCIPAL`, `CLIENT-TTY`, `CLIENT-TYPE`, `CLIENT-WORKSTATION`, `CLIPBOARD`, `CLOSE`, `CLOSE-LOG`, `CODE`, `CODEBASE-LOCATOR`, `CODEPAGE`, `CODEPAGE-CONVERT`, `COL`, `COL-OF`, `COLLATE`, `COLON`, `COLON-ALIGN`, `COLON-ALIGNE`, `COLON-ALIGNED`, `COLOR`, `COLOR-TABLE`, `COLU`, `COLUM`, `COLUMN`, `COLUMN-BGCOLOR`, `COLUMN-DCOLOR`, `COLUMN-FGCOLOR`, `COLUMN-FONT`, `COLUMN-LAB`, `COLUMN-LABE`, `COLUMN-LABEL`, `COLUMN-MOVABLE`, `COLUMN-OF`, `COLUMN-PFCOLOR`, `COLUMN-READ-ONLY`, `COLUMN-RESIZABLE`, `COLUMN-SCROLLING`, `COLUMNS`, `COM-HANDLE`, `COM-SELF`, `COMBO-BOX`, `COMMAND`, `COMPARES`, `COMPILE`, `COMPILER`, `COMPLETE`, `CONFIG-NAME`, `CONNECT`, `CONNECTED`, `CONSTRUCTOR`, `CONTAINS`, `CONTENTS`, `CONTEXT`, `CONTEXT-HELP`, `CONTEXT-HELP-FILE`, `CONTEXT-HELP-ID`, `CONTEXT-POPUP`, `CONTROL`, `CONTROL-BOX`, `CONTROL-FRAME`, `CONVERT`, `CONVERT-3D-COLORS`, `CONVERT-TO-OFFS`, `CONVERT-TO-OFFSE`, `CONVERT-TO-OFFSET`, `COPY-DATASET`, `COPY-LOB`, `COPY-SAX-ATTRIBUTES`, `COPY-TEMP-TABLE`, `COUNT`, `COUNT-OF`, `CPCASE`, `CPCOLL`, `CPINTERNAL`, `CPLOG`, `CPPRINT`, `CPRCODEIN`, `CPRCODEOUT`, `CPSTREAM`, `CPTERM`, `CRC-VALUE`, `CREATE`, `CREATE-LIKE`, `CREATE-LIKE-SEQUENTIAL`, `CREATE-NODE-NAMESPACE`, `CREATE-RESULT-LIST-ENTRY`, `CREATE-TEST-FILE`, `CURRENT`, `CURRENT-CHANGED`, `CURRENT-COLUMN`, `CURRENT-ENV`, `CURRENT-ENVI`, `CURRENT-ENVIR`, `CURRENT-ENVIRO`, `CURRENT-ENVIRON`, `CURRENT-ENVIRONM`, `CURRENT-ENVIRONME`, `CURRENT-ENVIRONMEN`, `CURRENT-ENVIRONMENT`, `CURRENT-ITERATION`, `CURRENT-LANG`, `CURRENT-LANGU`, `CURRENT-LANGUA`, `CURRENT-LANGUAG`, `CURRENT-LANGUAGE`, `CURRENT-QUERY`, `CURRENT-REQUEST-INFO`, `CURRENT-RESPONSE-INFO`, `CURRENT-RESULT-ROW`, `CURRENT-ROW-MODIFIED`, `CURRENT-VALUE`, `CURRENT-WINDOW`, `CURRENT_DATE`, `CURS`, `CURSO`, `CURSOR`, `CURSOR-CHAR`, `CURSOR-LINE`, `CURSOR-OFFSET`, `DATA-BIND`, `DATA-ENTRY-RET`, `DATA-ENTRY-RETU`, `DATA-ENTRY-RETUR`, `DATA-ENTRY-RETURN`, `DATA-REL`, `DATA-RELA`, `DATA-RELAT`, `DATA-RELATI`, `DATA-RELATIO`, `DATA-RELATION`, `DATA-SOURCE`, `DATA-SOURCE-COMPLETE-MAP`, `DATA-SOURCE-MODIFIED`, `DATA-SOURCE-ROWID`, `DATA-T`, `DATA-TY`, `DATA-TYP`, `DATA-TYPE`, `DATABASE`, `DATASERVERS`, `DATASET`, `DATASET-HANDLE`, `DATE`, `DATE-F`, `DATE-FO`, `DATE-FOR`, `DATE-FORM`, `DATE-FORMA`, `DATE-FORMAT`, `DAY`, `DB-CONTEXT`, `DB-REFERENCES`, `DBCODEPAGE`, `DBCOLLATION`, `DBNAME`, `DBPARAM`, `DBREST`, `DBRESTR`, `DBRESTRI`, `DBRESTRIC`, `DBRESTRICT`, `DBRESTRICTI`, `DBRESTRICTIO`, `DBRESTRICTION`, `DBRESTRICTIONS`, `DBTASKID`, `DBTYPE`, `DBVERS`, `DBVERSI`, `DBVERSIO`, `DBVERSION`, `DCOLOR`, `DDE`, `DDE-ERROR`, `DDE-I`, `DDE-ID`, `DDE-ITEM`, `DDE-NAME`, `DDE-TOPIC`, `DEBLANK`, `DEBU`, `DEBUG`, `DEBUG-ALERT`, `DEBUG-LIST`, `DEBUGGER`, `DECIMAL`, `DECIMALS`, `DECLARE`, `DECLARE-NAMESPACE`, `DECRYPT`, `DEFAULT`, `DEFAULT-B`, `DEFAULT-BU`, `DEFAULT-BUFFER-HANDLE`, `DEFAULT-BUT`, `DEFAULT-BUTT`, `DEFAULT-BUTTO`, `DEFAULT-BUTTON`, `DEFAULT-COMMIT`, `DEFAULT-EX`, `DEFAULT-EXT`, `DEFAULT-EXTE`, `DEFAULT-EXTEN`, `DEFAULT-EXTENS`, `DEFAULT-EXTENSI`, `DEFAULT-EXTENSIO`, `DEFAULT-EXTENSION`, `DEFAULT-NOXL`, `DEFAULT-NOXLA`, `DEFAULT-NOXLAT`, `DEFAULT-NOXLATE`, `DEFAULT-VALUE`, `DEFAULT-WINDOW`, `DEFINE`, `DEFINE-USER-EVENT-MANAGER`, `DEFINED`, `DEL`, `DELE`, `DELEGATE`, `DELET`, `DELETE PROCEDURE`, `DELETE`, `DELETE-CHAR`, `DELETE-CHARA`, `DELETE-CHARAC`, `DELETE-CHARACT`, `DELETE-CHARACTE`, `DELETE-CHARACTER`, `DELETE-CURRENT-ROW`, `DELETE-LINE`, `DELETE-RESULT-LIST-ENTRY`, `DELETE-SELECTED-ROW`, `DELETE-SELECTED-ROWS`, `DELIMITER`, `DESC`, `DESCE`, `DESCEN`, `DESCEND`, `DESCENDI`, `DESCENDIN`, `DESCENDING`, `DESELECT-FOCUSED-ROW`, `DESELECT-ROWS`, `DESELECT-SELECTED-ROW`, `DESELECTION`, `DESTRUCTOR`, `DIALOG-BOX`, `DICT`, `DICTI`, `DICTIO`, `DICTION`, `DICTIONA`, `DICTIONAR`, `DICTIONARY`, `DIR`, `DISABLE`, `DISABLE-AUTO-ZAP`, `DISABLE-DUMP-TRIGGERS`, `DISABLE-LOAD-TRIGGERS`, `DISABLED`, `DISCON`, `DISCONN`, `DISCONNE`, `DISCONNEC`, `DISCONNECT`, `DISP`, `DISPL`, `DISPLA`, `DISPLAY`, `DISPLAY-MESSAGE`, `DISPLAY-T`, `DISPLAY-TY`, `DISPLAY-TYP`, `DISPLAY-TYPE`, `DISTINCT`, `DO`, `DOMAIN-DESCRIPTION`, `DOMAIN-NAME`, `DOMAIN-TYPE`, `DOS`, `DOUBLE`, `DOWN`, `DRAG-ENABLED`, `DROP`, `DROP-DOWN`, `DROP-DOWN-LIST`, `DROP-FILE-NOTIFY`, `DROP-TARGET`, `DS-CLOSE-CURSOR`, `DSLOG-MANAGER`, `DUMP`, `DYNAMIC`, `DYNAMIC-ENUM`, `DYNAMIC-FUNCTION`, `DYNAMIC-INVOKE`, `EACH`, `ECHO`, `EDGE`, `EDGE-`, `EDGE-C`, `EDGE-CH`, `EDGE-CHA`, `EDGE-CHAR`, `EDGE-CHARS`, `EDGE-P`, `EDGE-PI`, `EDGE-PIX`, `EDGE-PIXE`, `EDGE-PIXEL`, `EDGE-PIXELS`, `EDIT-CAN-PASTE`, `EDIT-CAN-UNDO`, `EDIT-CLEAR`, `EDIT-COPY`, `EDIT-CUT`, `EDIT-PASTE`, `EDIT-UNDO`, `EDITING`, `EDITOR`, `ELSE`, `EMPTY`, `EMPTY-TEMP-TABLE`, `ENABLE`, `ENABLED-FIELDS`, `ENCODE`, `ENCRYPT`, `ENCRYPT-AUDIT-MAC-KEY`, `ENCRYPTION-SALT`, `END`, `END-DOCUMENT`, `END-ELEMENT`, `END-EVENT-GROUP`, `END-FILE-DROP`, `END-KEY`, `END-MOVE`, `END-RESIZE`, `END-ROW-RESIZE`, `END-USER-PROMPT`, `ENDKEY`, `ENTERED`, `ENTITY-EXPANSION-LIMIT`, `ENTRY`, `ENUM`, `EQ`, `ERROR`, `ERROR-COL`, `ERROR-COLU`, `ERROR-COLUM`, `ERROR-COLUMN`, `ERROR-ROW`, `ERROR-STACK-TRACE`, `ERROR-STAT`, `ERROR-STATU`, `ERROR-STATUS`, `ESCAPE`, `ETIME`, `EVENT`, `EVENT-GROUP-ID`, `EVENT-PROCEDURE`, `EVENT-PROCEDURE-CONTEXT`, `EVENT-T`, `EVENT-TY`, `EVENT-TYP`, `EVENT-TYPE`, `EVENTS`, `EXCEPT`, `EXCLUSIVE`, `EXCLUSIVE-`, `EXCLUSIVE-ID`, `EXCLUSIVE-L`, `EXCLUSIVE-LO`, `EXCLUSIVE-LOC`, `EXCLUSIVE-LOCK`, `EXCLUSIVE-WEB-USER`, `EXECUTE`, `EXISTS`, `EXP`, `EXPAND`, `EXPANDABLE`, `EXPLICIT`, `EXPORT`, `EXPORT-PRINCIPAL`, `EXTENDED`, `EXTENT`, `EXTERNAL`, `FALSE`, `FETCH`, `FETCH-SELECTED-ROW`, `FGC`, `FGCO`, `FGCOL`, `FGCOLO`, `FGCOLOR`, `FIELD`, `FIELDS`, `FILE`, `FILE-CREATE-DATE`, `FILE-CREATE-TIME`, `FILE-INFO`, `FILE-INFOR`, `FILE-INFORM`, `FILE-INFORMA`, `FILE-INFORMAT`, `FILE-INFORMATI`, `FILE-INFORMATIO`, `FILE-INFORMATION`, `FILE-MOD-DATE`, `FILE-MOD-TIME`, `FILE-NAME`, `FILE-OFF`, `FILE-OFFS`, `FILE-OFFSE`, `FILE-OFFSET`, `FILE-SIZE`, `FILE-TYPE`, `FILENAME`, `FILL`, `FILL-IN`, `FILLED`, `FILTERS`, `FINAL`, `FINALLY`, `FIND`, `FIND-BY-ROWID`, `FIND-CASE-SENSITIVE`, `FIND-CURRENT`, `FIND-FIRST`, `FIND-GLOBAL`, `FIND-LAST`, `FIND-NEXT-OCCURRENCE`, `FIND-PREV-OCCURRENCE`, `FIND-SELECT`, `FIND-UNIQUE`, `FIND-WRAP-AROUND`, `FINDER`, `FIRST`, `FIRST-ASYNCH-REQUEST`, `FIRST-CHILD`, `FIRST-COLUMN`, `FIRST-FORM`, `FIRST-OBJECT`, `FIRST-OF`, `FIRST-PROC`, `FIRST-PROCE`, `FIRST-PROCED`, `FIRST-PROCEDU`, `FIRST-PROCEDUR`, `FIRST-PROCEDURE`, `FIRST-SERVER`, `FIRST-TAB-I`, `FIRST-TAB-IT`, `FIRST-TAB-ITE`, `FIRST-TAB-ITEM`, `FIT-LAST-COLUMN`, `FIXED-ONLY`, `FLAT-BUTTON`, `FLOAT`, `FOCUS`, `FOCUSED-ROW`, `FOCUSED-ROW-SELECTED`, `FONT`, `FONT-TABLE`, `FOR`, `FORCE-FILE`, `FORE`, `FOREG`, `FOREGR`, `FOREGRO`, `FOREGROU`, `FOREGROUN`, `FOREGROUND`, `FORM INPUT`, `FORM`, `FORM-LONG-INPUT`, `FORMA`, `FORMAT`, `FORMATTE`, `FORMATTED`, `FORWARD`, `FORWARDS`, `FRAGMEN`, `FRAGMENT`, `FRAM`, `FRAME`, `FRAME-COL`, `FRAME-DB`, `FRAME-DOWN`, `FRAME-FIELD`, `FRAME-FILE`, `FRAME-INDE`, `FRAME-INDEX`, `FRAME-LINE`, `FRAME-NAME`, `FRAME-ROW`, `FRAME-SPA`, `FRAME-SPAC`, `FRAME-SPACI`, `FRAME-SPACIN`, `FRAME-SPACING`, `FRAME-VAL`, `FRAME-VALU`, `FRAME-VALUE`, `FRAME-X`, `FRAME-Y`, `FREQUENCY`, `FROM`, `FROM-C`, `FROM-CH`, `FROM-CHA`, `FROM-CHAR`, `FROM-CHARS`, `FROM-CUR`, `FROM-CURR`, `FROM-CURRE`, `FROM-CURREN`, `FROM-CURRENT`, `FROM-P`, `FROM-PI`, `FROM-PIX`, `FROM-PIXE`, `FROM-PIXEL`, `FROM-PIXELS`, `FULL-HEIGHT`, `FULL-HEIGHT-`, `FULL-HEIGHT-C`, `FULL-HEIGHT-CH`, `FULL-HEIGHT-CHA`, `FULL-HEIGHT-CHAR`, `FULL-HEIGHT-CHARS`, `FULL-HEIGHT-P`, `FULL-HEIGHT-PI`, `FULL-HEIGHT-PIX`, `FULL-HEIGHT-PIXE`, `FULL-HEIGHT-PIXEL`, `FULL-HEIGHT-PIXELS`, `FULL-PATHN`, `FULL-PATHNA`, `FULL-PATHNAM`, `FULL-PATHNAME`, `FULL-WIDTH`, `FULL-WIDTH-`, `FULL-WIDTH-C`, `FULL-WIDTH-CH`, `FULL-WIDTH-CHA`, `FULL-WIDTH-CHAR`, `FULL-WIDTH-CHARS`, `FULL-WIDTH-P`, `FULL-WIDTH-PI`, `FULL-WIDTH-PIX`, `FULL-WIDTH-PIXE`, `FULL-WIDTH-PIXEL`, `FULL-WIDTH-PIXELS`, `FUNCTION`, `FUNCTION-CALL-TYPE`, `GATEWAY`, `GATEWAYS`, `GE`, `GENERATE-MD5`, `GENERATE-PBE-KEY`, `GENERATE-PBE-SALT`, `GENERATE-RANDOM-KEY`, `GENERATE-UUID`, `GET`, `GET-ATTR-CALL-TYPE`, `GET-ATTRIBUTE-NODE`, `GET-BINARY-DATA`, `GET-BLUE`, `GET-BLUE-`, `GET-BLUE-V`, `GET-BLUE-VA`, `GET-BLUE-VAL`, `GET-BLUE-VALU`, `GET-BLUE-VALUE`, `GET-BROWSE-COLUMN`, `GET-BUFFER-HANDLE`, `GET-BYTE`, `GET-CALLBACK-PROC-CONTEXT`, `GET-CALLBACK-PROC-NAME`, `GET-CGI-LIST`, `GET-CGI-LONG-VALUE`, `GET-CGI-VALUE`, `GET-CLASS`, `GET-CODEPAGES`, `GET-COLLATIONS`, `GET-CONFIG-VALUE`, `GET-CURRENT`, `GET-DOUBLE`, `GET-DROPPED-FILE`, `GET-DYNAMIC`, `GET-ERROR-COLUMN`, `GET-ERROR-ROW`, `GET-FILE`, `GET-FILE-NAME`, `GET-FILE-OFFSE`, `GET-FILE-OFFSET`, `GET-FIRST`, `GET-FLOAT`, `GET-GREEN`, `GET-GREEN-`, `GET-GREEN-V`, `GET-GREEN-VA`, `GET-GREEN-VAL`, `GET-GREEN-VALU`, `GET-GREEN-VALUE`, `GET-INDEX-BY-NAMESPACE-NAME`, `GET-INDEX-BY-QNAME`, `GET-INT64`, `GET-ITERATION`, `GET-KEY-VAL`, `GET-KEY-VALU`, `GET-KEY-VALUE`, `GET-LAST`, `GET-LOCALNAME-BY-INDEX`, `GET-LONG`, `GET-MESSAGE`, `GET-NEXT`, `GET-NUMBER`, `GET-POINTER-VALUE`, `GET-PREV`, `GET-PRINTERS`, `GET-PROPERTY`, `GET-QNAME-BY-INDEX`, `GET-RED`, `GET-RED-`, `GET-RED-V`, `GET-RED-VA`, `GET-RED-VAL`, `GET-RED-VALU`, `GET-RED-VALUE`, `GET-REPOSITIONED-ROW`, `GET-RGB-VALUE`, `GET-SELECTED`, `GET-SELECTED-`, `GET-SELECTED-W`, `GET-SELECTED-WI`, `GET-SELECTED-WID`, `GET-SELECTED-WIDG`, `GET-SELECTED-WIDGE`, `GET-SELECTED-WIDGET`, `GET-SHORT`, `GET-SIGNATURE`, `GET-SIZE`, `GET-STRING`, `GET-TAB-ITEM`, `GET-TEXT-HEIGHT`, `GET-TEXT-HEIGHT-`, `GET-TEXT-HEIGHT-C`, `GET-TEXT-HEIGHT-CH`, `GET-TEXT-HEIGHT-CHA`, `GET-TEXT-HEIGHT-CHAR`, `GET-TEXT-HEIGHT-CHARS`, `GET-TEXT-HEIGHT-P`, `GET-TEXT-HEIGHT-PI`, `GET-TEXT-HEIGHT-PIX`, `GET-TEXT-HEIGHT-PIXE`, `GET-TEXT-HEIGHT-PIXEL`, `GET-TEXT-HEIGHT-PIXELS`, `GET-TEXT-WIDTH`, `GET-TEXT-WIDTH-`, `GET-TEXT-WIDTH-C`, `GET-TEXT-WIDTH-CH`, `GET-TEXT-WIDTH-CHA`, `GET-TEXT-WIDTH-CHAR`, `GET-TEXT-WIDTH-CHARS`, `GET-TEXT-WIDTH-P`, `GET-TEXT-WIDTH-PI`, `GET-TEXT-WIDTH-PIX`, `GET-TEXT-WIDTH-PIXE`, `GET-TEXT-WIDTH-PIXEL`, `GET-TEXT-WIDTH-PIXELS`, `GET-TYPE-BY-INDEX`, `GET-TYPE-BY-NAMESPACE-NAME`, `GET-TYPE-BY-QNAME`, `GET-UNSIGNED-LONG`, `GET-UNSIGNED-SHORT`, `GET-URI-BY-INDEX`, `GET-VALUE-BY-INDEX`, `GET-VALUE-BY-NAMESPACE-NAME`, `GET-VALUE-BY-QNAME`, `GET-WAIT-STATE`, `GETBYTE`, `GLOBAL`, `GO-ON`, `GO-PEND`, `GO-PENDI`, `GO-PENDIN`, `GO-PENDING`, `GRANT`, `GRAPHIC-E`, `GRAPHIC-ED`, `GRAPHIC-EDG`, `GRAPHIC-EDGE`, `GRID-FACTOR-H`, `GRID-FACTOR-HO`, `GRID-FACTOR-HOR`, `GRID-FACTOR-HORI`, `GRID-FACTOR-HORIZ`, `GRID-FACTOR-HORIZO`, `GRID-FACTOR-HORIZON`, `GRID-FACTOR-HORIZONT`, `GRID-FACTOR-HORIZONTA`, `GRID-FACTOR-HORIZONTAL`, `GRID-FACTOR-V`, `GRID-FACTOR-VE`, `GRID-FACTOR-VER`, `GRID-FACTOR-VERT`, `GRID-FACTOR-VERTI`, `GRID-FACTOR-VERTIC`, `GRID-FACTOR-VERTICA`, `GRID-FACTOR-VERTICAL`, `GRID-SNAP`, `GRID-UNIT-HEIGHT`, `GRID-UNIT-HEIGHT-`, `GRID-UNIT-HEIGHT-C`, `GRID-UNIT-HEIGHT-CH`, `GRID-UNIT-HEIGHT-CHA`, `GRID-UNIT-HEIGHT-CHARS`, `GRID-UNIT-HEIGHT-P`, `GRID-UNIT-HEIGHT-PI`, `GRID-UNIT-HEIGHT-PIX`, `GRID-UNIT-HEIGHT-PIXE`, `GRID-UNIT-HEIGHT-PIXEL`, `GRID-UNIT-HEIGHT-PIXELS`, `GRID-UNIT-WIDTH`, `GRID-UNIT-WIDTH-`, `GRID-UNIT-WIDTH-C`, `GRID-UNIT-WIDTH-CH`, `GRID-UNIT-WIDTH-CHA`, `GRID-UNIT-WIDTH-CHAR`, `GRID-UNIT-WIDTH-CHARS`, `GRID-UNIT-WIDTH-P`, `GRID-UNIT-WIDTH-PI`, `GRID-UNIT-WIDTH-PIX`, `GRID-UNIT-WIDTH-PIXE`, `GRID-UNIT-WIDTH-PIXEL`, `GRID-UNIT-WIDTH-PIXELS`, `GRID-VISIBLE`, `GROUP`, `GT`, `GUID`, `HANDLE`, `HANDLER`, `HAS-RECORDS`, `HAVING`, `HEADER`, `HEIGHT`, `HEIGHT-`, `HEIGHT-C`, `HEIGHT-CH`, `HEIGHT-CHA`, `HEIGHT-CHAR`, `HEIGHT-CHARS`, `HEIGHT-P`, `HEIGHT-PI`, `HEIGHT-PIX`, `HEIGHT-PIXE`, `HEIGHT-PIXEL`, `HEIGHT-PIXELS`, `HELP`, `HEX-DECODE`, `HEX-ENCODE`, `HIDDEN`, `HIDE`, `HORI`, `HORIZ`, `HORIZO`, `HORIZON`, `HORIZONT`, `HORIZONTA`, `HORIZONTAL`, `HOST-BYTE-ORDER`, `HTML-CHARSET`, `HTML-END-OF-LINE`, `HTML-END-OF-PAGE`, `HTML-FRAME-BEGIN`, `HTML-FRAME-END`, `HTML-HEADER-BEGIN`, `HTML-HEADER-END`, `HTML-TITLE-BEGIN`, `HTML-TITLE-END`, `HWND`, `ICON`, `IF`, `IMAGE`, `IMAGE-DOWN`, `IMAGE-INSENSITIVE`, `IMAGE-SIZE`, `IMAGE-SIZE-C`, `IMAGE-SIZE-CH`, `IMAGE-SIZE-CHA`, `IMAGE-SIZE-CHAR`, `IMAGE-SIZE-CHARS`, `IMAGE-SIZE-P`, `IMAGE-SIZE-PI`, `IMAGE-SIZE-PIX`, `IMAGE-SIZE-PIXE`, `IMAGE-SIZE-PIXEL`, `IMAGE-SIZE-PIXELS`, `IMAGE-UP`, `IMMEDIATE-DISPLAY`, `IMPLEMENTS`, `IMPORT`, `IMPORT-PRINCIPAL`, `IN`, `IN-HANDLE`, `INCREMENT-EXCLUSIVE-ID`, `INDEX`, `INDEX-HINT`, `INDEX-INFORMATION`, `INDEXED-REPOSITION`, `INDICATOR`, `INFO`, `INFOR`, `INFORM`, `INFORMA`, `INFORMAT`, `INFORMATI`, `INFORMATIO`, `INFORMATION`, `INHERIT-BGC`, `INHERIT-BGCO`, `INHERIT-BGCOL`, `INHERIT-BGCOLO`, `INHERIT-BGCOLOR`, `INHERIT-FGC`, `INHERIT-FGCO`, `INHERIT-FGCOL`, `INHERIT-FGCOLO`, `INHERIT-FGCOLOR`, `INHERITS`, `INIT`, `INITI`, `INITIA`, `INITIAL`, `INITIAL-DIR`, `INITIAL-FILTER`, `INITIALIZE-DOCUMENT-TYPE`, `INITIATE`, `INNER-CHARS`, `INNER-LINES`, `INPUT`, `INPUT-O`, `INPUT-OU`, `INPUT-OUT`, `INPUT-OUTP`, `INPUT-OUTPU`, `INPUT-OUTPUT`, `INPUT-VALUE`, `INSERT`, `INSERT-ATTRIBUTE`, `INSERT-B`, `INSERT-BA`, `INSERT-BAC`, `INSERT-BACK`, `INSERT-BACKT`, `INSERT-BACKTA`, `INSERT-BACKTAB`, `INSERT-FILE`, `INSERT-ROW`, `INSERT-STRING`, `INSERT-T`, `INSERT-TA`, `INSERT-TAB`, `INT64`, `INT`, `INTEGER`, `INTERFACE`, `INTERNAL-ENTRIES`, `INTO`, `INVOKE`, `IS`, `IS-ATTR`, `IS-ATTR-`, `IS-ATTR-S`, `IS-ATTR-SP`, `IS-ATTR-SPA`, `IS-ATTR-SPAC`, `IS-ATTR-SPACE`, `IS-CLASS`, `IS-JSON`, `IS-LEAD-BYTE`, `IS-OPEN`, `IS-PARAMETER-SET`, `IS-PARTITIONED`, `IS-ROW-SELECTED`, `IS-SELECTED`, `IS-XML`, `ITEM`, `ITEMS-PER-ROW`, `JOIN`, `JOIN-BY-SQLDB`, `KBLABEL`, `KEEP-CONNECTION-OPEN`, `KEEP-FRAME-Z`, `KEEP-FRAME-Z-`, `KEEP-FRAME-Z-O`, `KEEP-FRAME-Z-OR`, `KEEP-FRAME-Z-ORD`, `KEEP-FRAME-Z-ORDE`, `KEEP-FRAME-Z-ORDER`, `KEEP-MESSAGES`, `KEEP-SECURITY-CACHE`, `KEEP-TAB-ORDER`, `KEY`, `KEY-CODE`, `KEY-FUNC`, `KEY-FUNCT`, `KEY-FUNCTI`, `KEY-FUNCTIO`, `KEY-FUNCTION`, `KEY-LABEL`, `KEYCODE`, `KEYFUNC`, `KEYFUNCT`, `KEYFUNCTI`, `KEYFUNCTIO`, `KEYFUNCTION`, `KEYLABEL`, `KEYS`, `KEYWORD`, `KEYWORD-ALL`, `LABEL`, `LABEL-BGC`, `LABEL-BGCO`, `LABEL-BGCOL`, `LABEL-BGCOLO`, `LABEL-BGCOLOR`, `LABEL-DC`, `LABEL-DCO`, `LABEL-DCOL`, `LABEL-DCOLO`, `LABEL-DCOLOR`, `LABEL-FGC`, `LABEL-FGCO`, `LABEL-FGCOL`, `LABEL-FGCOLO`, `LABEL-FGCOLOR`, `LABEL-FONT`, `LABEL-PFC`, `LABEL-PFCO`, `LABEL-PFCOL`, `LABEL-PFCOLO`, `LABEL-PFCOLOR`, `LABELS`, `LABELS-HAVE-COLONS`, `LANDSCAPE`, `LANGUAGE`, `LANGUAGES`, `LARGE`, `LARGE-TO-SMALL`, `LAST`, `LAST-ASYNCH-REQUEST`, `LAST-BATCH`, `LAST-CHILD`, `LAST-EVEN`, `LAST-EVENT`, `LAST-FORM`, `LAST-KEY`, `LAST-OBJECT`, `LAST-OF`, `LAST-PROCE`, `LAST-PROCED`, `LAST-PROCEDU`, `LAST-PROCEDUR`, `LAST-PROCEDURE`, `LAST-SERVER`, `LAST-TAB-I`, `LAST-TAB-IT`, `LAST-TAB-ITE`, `LAST-TAB-ITEM`, `LASTKEY`, `LC`, `LDBNAME`, `LE`, `LEAVE`, `LEFT-ALIGN`, `LEFT-ALIGNE`, `LEFT-ALIGNED`, `LEFT-TRIM`, `LENGTH`, `LIBRARY`, `LIKE`, `LIKE-SEQUENTIAL`, `LINE`, `LINE-COUNT`, `LINE-COUNTE`, `LINE-COUNTER`, `LIST-EVENTS`, `LIST-ITEM-PAIRS`, `LIST-ITEMS`, `LIST-PROPERTY-NAMES`, `LIST-QUERY-ATTRS`, `LIST-SET-ATTRS`, `LIST-WIDGETS`, `LISTI`, `LISTIN`, `LISTING`, `LITERAL-QUESTION`, `LITTLE-ENDIAN`, `LOAD`, `LOAD-DOMAINS`, `LOAD-ICON`, `LOAD-IMAGE`, `LOAD-IMAGE-DOWN`, `LOAD-IMAGE-INSENSITIVE`, `LOAD-IMAGE-UP`, `LOAD-MOUSE-P`, `LOAD-MOUSE-PO`, `LOAD-MOUSE-POI`, `LOAD-MOUSE-POIN`, `LOAD-MOUSE-POINT`, `LOAD-MOUSE-POINTE`, `LOAD-MOUSE-POINTER`, `LOAD-PICTURE`, `LOAD-SMALL-ICON`, `LOCAL-NAME`, `LOCAL-VERSION-INFO`, `LOCATOR-COLUMN-NUMBER`, `LOCATOR-LINE-NUMBER`, `LOCATOR-PUBLIC-ID`, `LOCATOR-SYSTEM-ID`, `LOCATOR-TYPE`, `LOCK-REGISTRATION`, `LOCKED`, `LOG`, `LOG-AUDIT-EVENT`, `LOG-MANAGER`, `LOGICAL`, `LOGIN-EXPIRATION-TIMESTAMP`, `LOGIN-HOST`, `LOGIN-STATE`, `LOGOUT`, `LONGCHAR`, `LOOKAHEAD`, `LOOKUP`, `LT`, `MACHINE-CLASS`, `MANDATORY`, `MANUAL-HIGHLIGHT`, `MAP`, `MARGIN-EXTRA`, `MARGIN-HEIGHT`, `MARGIN-HEIGHT-`, `MARGIN-HEIGHT-C`, `MARGIN-HEIGHT-CH`, `MARGIN-HEIGHT-CHA`, `MARGIN-HEIGHT-CHAR`, `MARGIN-HEIGHT-CHARS`, `MARGIN-HEIGHT-P`, `MARGIN-HEIGHT-PI`, `MARGIN-HEIGHT-PIX`, `MARGIN-HEIGHT-PIXE`, `MARGIN-HEIGHT-PIXEL`, `MARGIN-HEIGHT-PIXELS`, `MARGIN-WIDTH`, `MARGIN-WIDTH-`, `MARGIN-WIDTH-C`, `MARGIN-WIDTH-CH`, `MARGIN-WIDTH-CHA`, `MARGIN-WIDTH-CHAR`, `MARGIN-WIDTH-CHARS`, `MARGIN-WIDTH-P`, `MARGIN-WIDTH-PI`, `MARGIN-WIDTH-PIX`, `MARGIN-WIDTH-PIXE`, `MARGIN-WIDTH-PIXEL`, `MARGIN-WIDTH-PIXELS`, `MARK-NEW`, `MARK-ROW-STATE`, `MATCHES`, `MAX`, `MAX-BUTTON`, `MAX-CHARS`, `MAX-DATA-GUESS`, `MAX-HEIGHT`, `MAX-HEIGHT-C`, `MAX-HEIGHT-CH`, `MAX-HEIGHT-CHA`, `MAX-HEIGHT-CHAR`, `MAX-HEIGHT-CHARS`, `MAX-HEIGHT-P`, `MAX-HEIGHT-PI`, `MAX-HEIGHT-PIX`, `MAX-HEIGHT-PIXE`, `MAX-HEIGHT-PIXEL`, `MAX-HEIGHT-PIXELS`, `MAX-ROWS`, `MAX-SIZE`, `MAX-VAL`, `MAX-VALU`, `MAX-VALUE`, `MAX-WIDTH`, `MAX-WIDTH-`, `MAX-WIDTH-C`, `MAX-WIDTH-CH`, `MAX-WIDTH-CHA`, `MAX-WIDTH-CHAR`, `MAX-WIDTH-CHARS`, `MAX-WIDTH-P`, `MAX-WIDTH-PI`, `MAX-WIDTH-PIX`, `MAX-WIDTH-PIXE`, `MAX-WIDTH-PIXEL`, `MAX-WIDTH-PIXELS`, `MAXI`, `MAXIM`, `MAXIMIZE`, `MAXIMU`, `MAXIMUM`, `MAXIMUM-LEVEL`, `MD5-DIGEST`, `MEMBER`, `MEMPTR-TO-NODE-VALUE`, `MENU`, `MENU-BAR`, `MENU-ITEM`, `MENU-K`, `MENU-KE`, `MENU-KEY`, `MENU-M`, `MENU-MO`, `MENU-MOU`, `MENU-MOUS`, `MENU-MOUSE`, `MENUBAR`, `MERGE-BY-FIELD`, `MESSAGE`, `MESSAGE-AREA`, `MESSAGE-AREA-FONT`, `MESSAGE-LINES`, `METHOD`, `MIN`, `MIN-BUTTON`, `MIN-COLUMN-WIDTH-C`, `MIN-COLUMN-WIDTH-CH`, `MIN-COLUMN-WIDTH-CHA`, `MIN-COLUMN-WIDTH-CHAR`, `MIN-COLUMN-WIDTH-CHARS`, `MIN-COLUMN-WIDTH-P`, `MIN-COLUMN-WIDTH-PI`, `MIN-COLUMN-WIDTH-PIX`, `MIN-COLUMN-WIDTH-PIXE`, `MIN-COLUMN-WIDTH-PIXEL`, `MIN-COLUMN-WIDTH-PIXELS`, `MIN-HEIGHT`, `MIN-HEIGHT-`, `MIN-HEIGHT-C`, `MIN-HEIGHT-CH`, `MIN-HEIGHT-CHA`, `MIN-HEIGHT-CHAR`, `MIN-HEIGHT-CHARS`, `MIN-HEIGHT-P`, `MIN-HEIGHT-PI`, `MIN-HEIGHT-PIX`, `MIN-HEIGHT-PIXE`, `MIN-HEIGHT-PIXEL`, `MIN-HEIGHT-PIXELS`, `MIN-SIZE`, `MIN-VAL`, `MIN-VALU`, `MIN-VALUE`, `MIN-WIDTH`, `MIN-WIDTH-`, `MIN-WIDTH-C`, `MIN-WIDTH-CH`, `MIN-WIDTH-CHA`, `MIN-WIDTH-CHAR`, `MIN-WIDTH-CHARS`, `MIN-WIDTH-P`, `MIN-WIDTH-PI`, `MIN-WIDTH-PIX`, `MIN-WIDTH-PIXE`, `MIN-WIDTH-PIXEL`, `MIN-WIDTH-PIXELS`, `MINI`, `MINIM`, `MINIMU`, `MINIMUM`, `MOD`, `MODIFIED`, `MODU`, `MODUL`, `MODULO`, `MONTH`, `MOUSE`, `MOUSE-P`, `MOUSE-PO`, `MOUSE-POI`, `MOUSE-POIN`, `MOUSE-POINT`, `MOUSE-POINTE`, `MOUSE-POINTER`, `MOVABLE`, `MOVE-AFTER`, `MOVE-AFTER-`, `MOVE-AFTER-T`, `MOVE-AFTER-TA`, `MOVE-AFTER-TAB`, `MOVE-AFTER-TAB-`, `MOVE-AFTER-TAB-I`, `MOVE-AFTER-TAB-IT`, `MOVE-AFTER-TAB-ITE`, `MOVE-AFTER-TAB-ITEM`, `MOVE-BEFOR`, `MOVE-BEFORE`, `MOVE-BEFORE-`, `MOVE-BEFORE-T`, `MOVE-BEFORE-TA`, `MOVE-BEFORE-TAB`, `MOVE-BEFORE-TAB-`, `MOVE-BEFORE-TAB-I`, `MOVE-BEFORE-TAB-IT`, `MOVE-BEFORE-TAB-ITE`, `MOVE-BEFORE-TAB-ITEM`, `MOVE-COL`, `MOVE-COLU`, `MOVE-COLUM`, `MOVE-COLUMN`, `MOVE-TO-B`, `MOVE-TO-BO`, `MOVE-TO-BOT`, `MOVE-TO-BOTT`, `MOVE-TO-BOTTO`, `MOVE-TO-BOTTOM`, `MOVE-TO-EOF`, `MOVE-TO-T`, `MOVE-TO-TO`, `MOVE-TO-TOP`, `MPE`, `MTIME`, `MULTI-COMPILE`, `MULTIPLE`, `MULTIPLE-KEY`, `MULTITASKING-INTERVAL`, `MUST-EXIST`, `NAME`, `NAMESPACE-PREFIX`, `NAMESPACE-URI`, `NATIVE`, `NE`, `NEEDS-APPSERVER-PROMPT`, `NEEDS-PROMPT`, `NEW`, `NEW-INSTANCE`, `NEW-ROW`, `NEXT`, `NEXT-COLUMN`, `NEXT-PROMPT`, `NEXT-ROWID`, `NEXT-SIBLING`, `NEXT-TAB-I`, `NEXT-TAB-IT`, `NEXT-TAB-ITE`, `NEXT-TAB-ITEM`, `NEXT-VALUE`, `NO`, `NO-APPLY`, `NO-ARRAY-MESSAGE`, `NO-ASSIGN`, `NO-ATTR`, `NO-ATTR-`, `NO-ATTR-L`, `NO-ATTR-LI`, `NO-ATTR-LIS`, `NO-ATTR-LIST`, `NO-ATTR-S`, `NO-ATTR-SP`, `NO-ATTR-SPA`, `NO-ATTR-SPAC`, `NO-ATTR-SPACE`, `NO-AUTO-VALIDATE`, `NO-BIND-WHERE`, `NO-BOX`, `NO-CONSOLE`, `NO-CONVERT`, `NO-CONVERT-3D-COLORS`, `NO-CURRENT-VALUE`, `NO-DEBUG`, `NO-DRAG`, `NO-ECHO`, `NO-EMPTY-SPACE`, `NO-ERROR`, `NO-F`, `NO-FI`, `NO-FIL`, `NO-FILL`, `NO-FOCUS`, `NO-HELP`, `NO-HIDE`, `NO-INDEX-HINT`, `NO-INHERIT-BGC`, `NO-INHERIT-BGCO`, `NO-INHERIT-BGCOLOR`, `NO-INHERIT-FGC`, `NO-INHERIT-FGCO`, `NO-INHERIT-FGCOL`, `NO-INHERIT-FGCOLO`, `NO-INHERIT-FGCOLOR`, `NO-JOIN-BY-SQLDB`, `NO-LABE`, `NO-LABELS`, `NO-LOBS`, `NO-LOCK`, `NO-LOOKAHEAD`, `NO-MAP`, `NO-MES`, `NO-MESS`, `NO-MESSA`, `NO-MESSAG`, `NO-MESSAGE`, `NO-PAUSE`, `NO-PREFE`, `NO-PREFET`, `NO-PREFETC`, `NO-PREFETCH`, `NO-ROW-MARKERS`, `NO-SCROLLBAR-VERTICAL`, `NO-SEPARATE-CONNECTION`, `NO-SEPARATORS`, `NO-TAB-STOP`, `NO-UND`, `NO-UNDE`, `NO-UNDER`, `NO-UNDERL`, `NO-UNDERLI`, `NO-UNDERLIN`, `NO-UNDERLINE`, `NO-UNDO`, `NO-VAL`, `NO-VALI`, `NO-VALID`, `NO-VALIDA`, `NO-VALIDAT`, `NO-VALIDATE`, `NO-WAIT`, `NO-WORD-WRAP`, `NODE-VALUE-TO-MEMPTR`, `NONAMESPACE-SCHEMA-LOCATION`, `NONE`, `NORMALIZE`, `NOT`, `NOT-ACTIVE`, `NOW`, `NULL`, `NUM-ALI`, `NUM-ALIA`, `NUM-ALIAS`, `NUM-ALIASE`, `NUM-ALIASES`, `NUM-BUFFERS`, `NUM-BUT`, `NUM-BUTT`, `NUM-BUTTO`, `NUM-BUTTON`, `NUM-BUTTONS`, `NUM-COL`, `NUM-COLU`, `NUM-COLUM`, `NUM-COLUMN`, `NUM-COLUMNS`, `NUM-COPIES`, `NUM-DBS`, `NUM-DROPPED-FILES`, `NUM-ENTRIES`, `NUM-FIELDS`, `NUM-FORMATS`, `NUM-ITEMS`, `NUM-ITERATIONS`, `NUM-LINES`, `NUM-LOCKED-COL`, `NUM-LOCKED-COLU`, `NUM-LOCKED-COLUM`, `NUM-LOCKED-COLUMN`, `NUM-LOCKED-COLUMNS`, `NUM-MESSAGES`, `NUM-PARAMETERS`, `NUM-REFERENCES`, `NUM-REPLACED`, `NUM-RESULTS`, `NUM-SELECTED`, `NUM-SELECTED-`, `NUM-SELECTED-ROWS`, `NUM-SELECTED-W`, `NUM-SELECTED-WI`, `NUM-SELECTED-WID`, `NUM-SELECTED-WIDG`, `NUM-SELECTED-WIDGE`, `NUM-SELECTED-WIDGET`, `NUM-SELECTED-WIDGETS`, `NUM-TABS`, `NUM-TO-RETAIN`, `NUM-VISIBLE-COLUMNS`, `NUMERIC`, `NUMERIC-F`, `NUMERIC-FO`, `NUMERIC-FOR`, `NUMERIC-FORM`, `NUMERIC-FORMA`, `NUMERIC-FORMAT`, `OCTET-LENGTH`, `OF`, `OFF`, `OK`, `OK-CANCEL`, `OLD`, `ON`, `ON-FRAME`, `ON-FRAME-`, `ON-FRAME-B`, `ON-FRAME-BO`, `ON-FRAME-BOR`, `ON-FRAME-BORD`, `ON-FRAME-BORDE`, `ON-FRAME-BORDER`, `OPEN`, `OPSYS`, `OPTION`, `OR`, `ORDERED-JOIN`, `ORDINAL`, `OS-APPEND`, `OS-COMMAND`, `OS-COPY`, `OS-CREATE-DIR`, `OS-DELETE`, `OS-DIR`, `OS-DRIVE`, `OS-DRIVES`, `OS-ERROR`, `OS-GETENV`, `OS-RENAME`, `OTHERWISE`, `OUTPUT`, `OVERLAY`, `OVERRIDE`, `OWNER`, `PAGE`, `PAGE-BOT`, `PAGE-BOTT`, `PAGE-BOTTO`, `PAGE-BOTTOM`, `PAGE-NUM`, `PAGE-NUMB`, `PAGE-NUMBE`, `PAGE-NUMBER`, `PAGE-SIZE`, `PAGE-TOP`, `PAGE-WID`, `PAGE-WIDT`, `PAGE-WIDTH`, `PAGED`, `PARAM`, `PARAME`, `PARAMET`, `PARAMETE`, `PARAMETER`, `PARENT`, `PARSE-STATUS`, `PARTIAL-KEY`, `PASCAL`, `PASSWORD-FIELD`, `PATHNAME`, `PAUSE`, `PBE-HASH-ALG`, `PBE-HASH-ALGO`, `PBE-HASH-ALGOR`, `PBE-HASH-ALGORI`, `PBE-HASH-ALGORIT`, `PBE-HASH-ALGORITH`, `PBE-HASH-ALGORITHM`, `PBE-KEY-ROUNDS`, `PDBNAME`, `PERSIST`, `PERSISTE`, `PERSISTEN`, `PERSISTENT`, `PERSISTENT-CACHE-DISABLED`, `PFC`, `PFCO`, `PFCOL`, `PFCOLO`, `PFCOLOR`, `PIXELS`, `PIXELS-PER-COL`, `PIXELS-PER-COLU`, `PIXELS-PER-COLUM`, `PIXELS-PER-COLUMN`, `PIXELS-PER-ROW`, `POPUP-M`, `POPUP-ME`, `POPUP-MEN`, `POPUP-MENU`, `POPUP-O`, `POPUP-ON`, `POPUP-ONL`, `POPUP-ONLY`, `PORTRAIT`, `POSITION`, `PRECISION`, `PREFER-DATASET`, `PREPARE-STRING`, `PREPARED`, `PREPROC`, `PREPROCE`, `PREPROCES`, `PREPROCESS`, `PRESEL`, `PRESELE`, `PRESELEC`, `PRESELECT`, `PREV`, `PREV-COLUMN`, `PREV-SIBLING`, `PREV-TAB-I`, `PREV-TAB-IT`, `PREV-TAB-ITE`, `PREV-TAB-ITEM`, `PRIMARY`, `PRINTER`, `PRINTER-CONTROL-HANDLE`, `PRINTER-HDC`, `PRINTER-NAME`, `PRINTER-PORT`, `PRINTER-SETUP`, `PRIVATE`, `PRIVATE-D`, `PRIVATE-DA`, `PRIVATE-DAT`, `PRIVATE-DATA`, `PRIVILEGES`, `PROC-HA`, `PROC-HAN`, `PROC-HAND`, `PROC-HANDL`, `PROC-HANDLE`, `PROC-ST`, `PROC-STA`, `PROC-STAT`, `PROC-STATU`, `PROC-STATUS`, `PROC-TEXT`, `PROC-TEXT-BUFFER`, `PROCE`, `PROCED`, `PROCEDU`, `PROCEDUR`, `PROCEDURE`, `PROCEDURE-CALL-TYPE`, `PROCEDURE-TYPE`, `PROCESS`, `PROFILER`, `PROGRAM-NAME`, `PROGRESS`, `PROGRESS-S`, `PROGRESS-SO`, `PROGRESS-SOU`, `PROGRESS-SOUR`, `PROGRESS-SOURC`, `PROGRESS-SOURCE`, `PROMPT`, `PROMPT-F`, `PROMPT-FO`, `PROMPT-FOR`, `PROMSGS`, `PROPATH`, `PROPERTY`, `PROTECTED`, `PROVERS`, `PROVERSI`, `PROVERSIO`, `PROVERSION`, `PROXY`, `PROXY-PASSWORD`, `PROXY-USERID`, `PUBLIC`, `PUBLIC-ID`, `PUBLISH`, `PUBLISHED-EVENTS`, `PUT`, `PUT-BYTE`, `PUT-DOUBLE`, `PUT-FLOAT`, `PUT-INT64`, `PUT-KEY-VAL`, `PUT-KEY-VALU`, `PUT-KEY-VALUE`, `PUT-LONG`, `PUT-SHORT`, `PUT-STRING`, `PUT-UNSIGNED-LONG`, `PUTBYTE`, `QUERY`, `QUERY-CLOSE`, `QUERY-OFF-END`, `QUERY-OPEN`, `QUERY-PREPARE`, `QUERY-TUNING`, `QUESTION`, `QUIT`, `QUOTER`, `R-INDEX`, `RADIO-BUTTONS`, `RADIO-SET`, `RANDOM`, `RAW`, `RAW-TRANSFER`, `RCODE-INFO`, `RCODE-INFOR`, `RCODE-INFORM`, `RCODE-INFORMA`, `RCODE-INFORMAT`, `RCODE-INFORMATI`, `RCODE-INFORMATIO`, `RCODE-INFORMATION`, `READ-AVAILABLE`, `READ-EXACT-NUM`, `READ-FILE`, `READ-JSON`, `READ-ONLY`, `READ-XML`, `READ-XMLSCHEMA`, `READKEY`, `REAL`, `RECID`, `RECORD-LENGTH`, `RECT`, `RECTA`, `RECTAN`, `RECTANG`, `RECTANGL`, `RECTANGLE`, `RECURSIVE`, `REFERENCE-ONLY`, `REFRESH`, `REFRESH-AUDIT-POLICY`, `REFRESHABLE`, `REGISTER-DOMAIN`, `RELEASE`, `REMOTE`, `REMOVE-EVENTS-PROCEDURE`, `REMOVE-SUPER-PROCEDURE`, `REPEAT`, `REPLACE`, `REPLACE-SELECTION-TEXT`, `REPOSITION`, `REPOSITION-BACKWARD`, `REPOSITION-FORWARD`, `REPOSITION-MODE`, `REPOSITION-TO-ROW`, `REPOSITION-TO-ROWID`, `REQUEST`, `REQUEST-INFO`, `RESET`, `RESIZA`, `RESIZAB`, `RESIZABL`, `RESIZABLE`, `RESIZE`, `RESPONSE-INFO`, `RESTART-ROW`, `RESTART-ROWID`, `RETAIN`, `RETAIN-SHAPE`, `RETRY`, `RETRY-CANCEL`, `RETURN`, `RETURN-ALIGN`, `RETURN-ALIGNE`, `RETURN-INS`, `RETURN-INSE`, `RETURN-INSER`, `RETURN-INSERT`, `RETURN-INSERTE`, `RETURN-INSERTED`, `RETURN-TO-START-DI`, `RETURN-TO-START-DIR`, `RETURN-VAL`, `RETURN-VALU`, `RETURN-VALUE`, `RETURN-VALUE-DATA-TYPE`, `RETURNS`, `REVERSE-FROM`, `REVERT`, `REVOKE`, `RGB-VALUE`, `RIGHT-ALIGNED`, `RIGHT-TRIM`, `ROLES`, `ROUND`, `ROUTINE-LEVEL`, `ROW`, `ROW-HEIGHT-CHARS`, `ROW-HEIGHT-PIXELS`, `ROW-MARKERS`, `ROW-OF`, `ROW-RESIZABLE`, `ROWID`, `RULE`, `RUN`, `RUN-PROCEDURE`, `SAVE CACHE`, `SAVE`, `SAVE-AS`, `SAVE-FILE`, `SAX-COMPLE`, `SAX-COMPLET`, `SAX-COMPLETE`, `SAX-PARSE`, `SAX-PARSE-FIRST`, `SAX-PARSE-NEXT`, `SAX-PARSER-ERROR`, `SAX-RUNNING`, `SAX-UNINITIALIZED`, `SAX-WRITE-BEGIN`, `SAX-WRITE-COMPLETE`, `SAX-WRITE-CONTENT`, `SAX-WRITE-ELEMENT`, `SAX-WRITE-ERROR`, `SAX-WRITE-IDLE`, `SAX-WRITE-TAG`, `SAX-WRITER`, `SCHEMA`, `SCHEMA-LOCATION`, `SCHEMA-MARSHAL`, `SCHEMA-PATH`, `SCREEN`, `SCREEN-IO`, `SCREEN-LINES`, `SCREEN-VAL`, `SCREEN-VALU`, `SCREEN-VALUE`, `SCROLL`, `SCROLL-BARS`, `SCROLL-DELTA`, `SCROLL-OFFSET`, `SCROLL-TO-CURRENT-ROW`, `SCROLL-TO-I`, `SCROLL-TO-IT`, `SCROLL-TO-ITE`, `SCROLL-TO-ITEM`, `SCROLL-TO-SELECTED-ROW`, `SCROLLABLE`, `SCROLLBAR-H`, `SCROLLBAR-HO`, `SCROLLBAR-HOR`, `SCROLLBAR-HORI`, `SCROLLBAR-HORIZ`, `SCROLLBAR-HORIZO`, `SCROLLBAR-HORIZON`, `SCROLLBAR-HORIZONT`, `SCROLLBAR-HORIZONTA`, `SCROLLBAR-HORIZONTAL`, `SCROLLBAR-V`, `SCROLLBAR-VE`, `SCROLLBAR-VER`, `SCROLLBAR-VERT`, `SCROLLBAR-VERTI`, `SCROLLBAR-VERTIC`, `SCROLLBAR-VERTICA`, `SCROLLBAR-VERTICAL`, `SCROLLED-ROW-POS`, `SCROLLED-ROW-POSI`, `SCROLLED-ROW-POSIT`, `SCROLLED-ROW-POSITI`, `SCROLLED-ROW-POSITIO`, `SCROLLED-ROW-POSITION`, `SCROLLING`, `SDBNAME`, `SEAL`, `SEAL-TIMESTAMP`, `SEARCH`, `SEARCH-SELF`, `SEARCH-TARGET`, `SECTION`, `SECURITY-POLICY`, `SEEK`, `SELECT`, `SELECT-ALL`, `SELECT-FOCUSED-ROW`, `SELECT-NEXT-ROW`, `SELECT-PREV-ROW`, `SELECT-ROW`, `SELECTABLE`, `SELECTED`, `SELECTION`, `SELECTION-END`, `SELECTION-LIST`, `SELECTION-START`, `SELECTION-TEXT`, `SELF`, `SEND`, `SEND-SQL-STATEMENT`, `SENSITIVE`, `SEPARATE-CONNECTION`, `SEPARATOR-FGCOLOR`, `SEPARATORS`, `SERIALIZABLE`, `SERIALIZE-HIDDEN`, `SERIALIZE-NAME`, `SERVER`, `SERVER-CONNECTION-BOUND`, `SERVER-CONNECTION-BOUND-REQUEST`, `SERVER-CONNECTION-CONTEXT`, `SERVER-CONNECTION-ID`, `SERVER-OPERATING-MODE`, `SESSION`, `SESSION-ID`, `SET`, `SET-APPL-CONTEXT`, `SET-ATTR-CALL-TYPE`, `SET-ATTRIBUTE-NODE`, `SET-BLUE`, `SET-BLUE-`, `SET-BLUE-V`, `SET-BLUE-VA`, `SET-BLUE-VAL`, `SET-BLUE-VALU`, `SET-BLUE-VALUE`, `SET-BREAK`, `SET-BUFFERS`, `SET-CALLBACK`, `SET-CLIENT`, `SET-COMMIT`, `SET-CONTENTS`, `SET-CURRENT-VALUE`, `SET-DB-CLIENT`, `SET-DYNAMIC`, `SET-EVENT-MANAGER-OPTION`, `SET-GREEN`, `SET-GREEN-`, `SET-GREEN-V`, `SET-GREEN-VA`, `SET-GREEN-VAL`, `SET-GREEN-VALU`, `SET-GREEN-VALUE`, `SET-INPUT-SOURCE`, `SET-OPTION`, `SET-OUTPUT-DESTINATION`, `SET-PARAMETER`, `SET-POINTER-VALUE`, `SET-PROPERTY`, `SET-RED`, `SET-RED-`, `SET-RED-V`, `SET-RED-VA`, `SET-RED-VAL`, `SET-RED-VALU`, `SET-RED-VALUE`, `SET-REPOSITIONED-ROW`, `SET-RGB-VALUE`, `SET-ROLLBACK`, `SET-SELECTION`, `SET-SIZE`, `SET-SORT-ARROW`, `SET-WAIT-STATE`, `SETUSER`, `SETUSERI`, `SETUSERID`, `SHA1-DIGEST`, `SHARE`, `SHARE-`, `SHARE-L`, `SHARE-LO`, `SHARE-LOC`, `SHARE-LOCK`, `SHARED`, `SHOW-IN-TASKBAR`, `SHOW-STAT`, `SHOW-STATS`, `SIDE-LAB`, `SIDE-LABE`, `SIDE-LABEL`, `SIDE-LABEL-H`, `SIDE-LABEL-HA`, `SIDE-LABEL-HAN`, `SIDE-LABEL-HAND`, `SIDE-LABEL-HANDL`, `SIDE-LABEL-HANDLE`, `SIDE-LABELS`, `SIGNATURE`, `SILENT`, `SIMPLE`, `SINGLE`, `SINGLE-RUN`, `SINGLETON`, `SIZE`, `SIZE-C`, `SIZE-CH`, `SIZE-CHA`, `SIZE-CHAR`, `SIZE-CHARS`, `SIZE-P`, `SIZE-PI`, `SIZE-PIX`, `SIZE-PIXE`, `SIZE-PIXEL`, `SIZE-PIXELS`, `SKIP`, `SKIP-DELETED-RECORD`, `SLIDER`, `SMALL-ICON`, `SMALL-TITLE`, `SMALLINT`, `SOME`, `SORT`, `SORT-ASCENDING`, `SORT-NUMBER`, `SOURCE`, `SOURCE-PROCEDURE`, `SPACE`, `SQL`, `SQRT`, `SSL-SERVER-NAME`, `STANDALONE`, `START`, `START-DOCUMENT`, `START-ELEMENT`, `START-MOVE`, `START-RESIZE`, `START-ROW-RESIZE`, `STATE-DETAIL`, `STATIC`, `STATUS`, `STATUS-AREA`, `STATUS-AREA-FONT`, `STDCALL`, `STOP`, `STOP-AFTER`, `STOP-PARSING`, `STOPPE`, `STOPPED`, `STORED-PROC`, `STORED-PROCE`, `STORED-PROCED`, `STORED-PROCEDU`, `STORED-PROCEDUR`, `STORED-PROCEDURE`, `STREAM`, `STREAM-HANDLE`, `STREAM-IO`, `STRETCH-TO-FIT`, `STRICT`, `STRICT-ENTITY-RESOLUTION`, `STRING`, `STRING-VALUE`, `STRING-XREF`, `SUB-AVE`, `SUB-AVER`, `SUB-AVERA`, `SUB-AVERAG`, `SUB-AVERAGE`, `SUB-COUNT`, `SUB-MAXIMUM`, `SUB-MENU`, `SUB-MIN`, `SUB-MINIMUM`, `SUB-TOTAL`, `SUBSCRIBE`, `SUBST`, `SUBSTI`, `SUBSTIT`, `SUBSTITU`, `SUBSTITUT`, `SUBSTITUTE`, `SUBSTR`, `SUBSTRI`, `SUBSTRIN`, `SUBSTRING`, `SUBTYPE`, `SUM`, `SUM-MAX`, `SUM-MAXI`, `SUM-MAXIM`, `SUM-MAXIMU`, `SUPER`, `SUPER-PROCEDURES`, `SUPPRESS-NAMESPACE-PROCESSING`, `SUPPRESS-W`, `SUPPRESS-WA`, `SUPPRESS-WAR`, `SUPPRESS-WARN`, `SUPPRESS-WARNI`, `SUPPRESS-WARNIN`, `SUPPRESS-WARNING`, `SUPPRESS-WARNINGS`, `SYMMETRIC-ENCRYPTION-ALGORITHM`, `SYMMETRIC-ENCRYPTION-IV`, `SYMMETRIC-ENCRYPTION-KEY`, `SYMMETRIC-SUPPORT`, `SYSTEM-ALERT`, `SYSTEM-ALERT-`, `SYSTEM-ALERT-B`, `SYSTEM-ALERT-BO`, `SYSTEM-ALERT-BOX`, `SYSTEM-ALERT-BOXE`, `SYSTEM-ALERT-BOXES`, `SYSTEM-DIALOG`, `SYSTEM-HELP`, `SYSTEM-ID`, `TAB-POSITION`, `TAB-STOP`, `TABLE`, `TABLE-HANDLE`, `TABLE-NUMBER`, `TABLE-SCAN`, `TARGET`, `TARGET-PROCEDURE`, `TEMP-DIR`, `TEMP-DIRE`, `TEMP-DIREC`, `TEMP-DIRECT`, `TEMP-DIRECTO`, `TEMP-DIRECTOR`, `TEMP-DIRECTORY`, `TEMP-TABLE`, `TEMP-TABLE-PREPARE`, `TERM`, `TERMI`, `TERMIN`, `TERMINA`, `TERMINAL`, `TERMINATE`, `TEXT`, `TEXT-CURSOR`, `TEXT-SEG-GROW`, `TEXT-SELECTED`, `THEN`, `THIS-OBJECT`, `THIS-PROCEDURE`, `THREAD-SAFE`, `THREE-D`, `THROUGH`, `THROW`, `THRU`, `TIC-MARKS`, `TIME`, `TIME-SOURCE`, `TITLE`, `TITLE-BGC`, `TITLE-BGCO`, `TITLE-BGCOL`, `TITLE-BGCOLO`, `TITLE-BGCOLOR`, `TITLE-DC`, `TITLE-DCO`, `TITLE-DCOL`, `TITLE-DCOLO`, `TITLE-DCOLOR`, `TITLE-FGC`, `TITLE-FGCO`, `TITLE-FGCOL`, `TITLE-FGCOLO`, `TITLE-FGCOLOR`, `TITLE-FO`, `TITLE-FON`, `TITLE-FONT`, `TO`, `TO-ROWID`, `TODAY`, `TOGGLE-BOX`, `TOOLTIP`, `TOOLTIPS`, `TOP-NAV-QUERY`, `TOP-ONLY`, `TOPIC`, `TOTAL`, `TRAILING`, `TRANS`, `TRANS-INIT-PROCEDURE`, `TRANSACTION`, `TRANSACTION-MODE`, `TRANSPARENT`, `TRIGGER`, `TRIGGERS`, `TRIM`, `TRUE`, `TRUNC`, `TRUNCA`, `TRUNCAT`, `TRUNCATE`, `TYPE`, `TYPE-OF`, `UNBOX`, `UNBUFF`, `UNBUFFE`, `UNBUFFER`, `UNBUFFERE`, `UNBUFFERED`, `UNDERL`, `UNDERLI`, `UNDERLIN`, `UNDERLINE`, `UNDO`, `UNFORM`, `UNFORMA`, `UNFORMAT`, `UNFORMATT`, `UNFORMATTE`, `UNFORMATTED`, `UNION`, `UNIQUE`, `UNIQUE-ID`, `UNIQUE-MATCH`, `UNIX`, `UNLESS-HIDDEN`, `UNLOAD`, `UNSIGNED-LONG`, `UNSUBSCRIBE`, `UP`, `UPDATE`, `UPDATE-ATTRIBUTE`, `URL`, `URL-DECODE`, `URL-ENCODE`, `URL-PASSWORD`, `URL-USERID`, `USE`, `USE-DICT-EXPS`, `USE-FILENAME`, `USE-INDEX`, `USE-REVVIDEO`, `USE-TEXT`, `USE-UNDERLINE`, `USE-WIDGET-POOL`, `USER`, `USER-ID`, `USERID`, `USING`, `V6DISPLAY`, `V6FRAME`, `VALID-EVENT`, `VALID-HANDLE`, `VALID-OBJECT`, `VALIDATE`, `VALIDATE-EXPRESSION`, `VALIDATE-MESSAGE`, `VALIDATE-SEAL`, `VALIDATION-ENABLED`, `VALUE`, `VALUE-CHANGED`, `VALUES`, `VAR`, `VARI`, `VARIA`, `VARIAB`, `VARIABL`, `VARIABLE`, `VERBOSE`, `VERSION`, `VERT`, `VERTI`, `VERTIC`, `VERTICA`, `VERTICAL`, `VIEW`, `VIEW-AS`, `VIEW-FIRST-COLUMN-ON-REOPEN`, `VIRTUAL-HEIGHT`, `VIRTUAL-HEIGHT-`, `VIRTUAL-HEIGHT-C`, `VIRTUAL-HEIGHT-CH`, `VIRTUAL-HEIGHT-CHA`, `VIRTUAL-HEIGHT-CHAR`, `VIRTUAL-HEIGHT-CHARS`, `VIRTUAL-HEIGHT-P`, `VIRTUAL-HEIGHT-PI`, `VIRTUAL-HEIGHT-PIX`, `VIRTUAL-HEIGHT-PIXE`, `VIRTUAL-HEIGHT-PIXEL`, `VIRTUAL-HEIGHT-PIXELS`, `VIRTUAL-WIDTH`, `VIRTUAL-WIDTH-`, `VIRTUAL-WIDTH-C`, `VIRTUAL-WIDTH-CH`, `VIRTUAL-WIDTH-CHA`, `VIRTUAL-WIDTH-CHAR`, `VIRTUAL-WIDTH-CHARS`, `VIRTUAL-WIDTH-P`, `VIRTUAL-WIDTH-PI`, `VIRTUAL-WIDTH-PIX`, `VIRTUAL-WIDTH-PIXE`, `VIRTUAL-WIDTH-PIXEL`, `VIRTUAL-WIDTH-PIXELS`, `VISIBLE`, `VOID`, `WAIT`, `WAIT-FOR`, `WARNING`, `WEB-CONTEXT`, `WEEKDAY`, `WHEN`, `WHERE`, `WHILE`, `WIDGET`, `WIDGET-E`, `WIDGET-EN`, `WIDGET-ENT`, `WIDGET-ENTE`, `WIDGET-ENTER`, `WIDGET-ID`, `WIDGET-L`, `WIDGET-LE`, `WIDGET-LEA`, `WIDGET-LEAV`, `WIDGET-LEAVE`, `WIDGET-POOL`, `WIDTH`, `WIDTH-`, `WIDTH-C`, `WIDTH-CH`, `WIDTH-CHA`, `WIDTH-CHAR`, `WIDTH-CHARS`, `WIDTH-P`, `WIDTH-PI`, `WIDTH-PIX`, `WIDTH-PIXE`, `WIDTH-PIXEL`, `WIDTH-PIXELS`, `WINDOW`, `WINDOW-MAXIM`, `WINDOW-MAXIMI`, `WINDOW-MAXIMIZ`, `WINDOW-MAXIMIZE`, `WINDOW-MAXIMIZED`, `WINDOW-MINIM`, `WINDOW-MINIMI`, `WINDOW-MINIMIZ`, `WINDOW-MINIMIZE`, `WINDOW-MINIMIZED`, `WINDOW-NAME`, `WINDOW-NORMAL`, `WINDOW-STA`, `WINDOW-STAT`, `WINDOW-STATE`, `WINDOW-SYSTEM`, `WITH`, `WORD-INDEX`, `WORD-WRAP`, `WORK-AREA-HEIGHT-PIXELS`, `WORK-AREA-WIDTH-PIXELS`, `WORK-AREA-X`, `WORK-AREA-Y`, `WORK-TAB`, `WORK-TABL`, `WORK-TABLE`, `WORKFILE`, `WRITE`, `WRITE-CDATA`, `WRITE-CHARACTERS`, `WRITE-COMMENT`, `WRITE-DATA-ELEMENT`, `WRITE-EMPTY-ELEMENT`, `WRITE-ENTITY-REF`, `WRITE-EXTERNAL-DTD`, `WRITE-FRAGMENT`, `WRITE-JSON`, `WRITE-MESSAGE`, `WRITE-PROCESSING-INSTRUCTION`, `WRITE-STATUS`, `WRITE-XML`, `WRITE-XMLSCHEMA`, `X`, `X-OF`, `XCODE`, `XML-DATA-TYPE`, `XML-ENTITY-EXPANSION-LIMIT`, `XML-NODE-TYPE`, `XML-SCHEMA-PATH`, `XML-STRICT-ENTITY-RESOLUTION`, `XML-SUPPRESS-NAMESPACE-PROCESSING`, `XREF`, `XREF-XML`, `Y`, `Y-OF`, `YEAR`, `YEAR-OFFSET`, `YES`, `YES-NO`, `YES-NO-CANCEL`), KeywordReserved, nil}, // nolint
-				{`"(\\\\|\\[^\\]|[^"\\])*"`, LiteralStringDouble, nil},
-				{`'(\\\\|\\[^\\]|[^'\\])*'`, LiteralStringSingle, nil},
+				{`"(~~|~[^~]|[^"~])*"`, LiteralStringDouble, nil},
+				{`'(~~|~[^~]|[^"~])*'`, LiteralStringSingle, nil},
 				{`[0-9][0-9]*\.[0-9]+([eE][0-9]+)?[fd]?`, LiteralNumberFloat, nil},
 				{`[0-9]+`, LiteralNumberInteger, nil},
 				{`\s+`, Text, nil},
diff --git a/lexers/testdata/openedgeabl.expected b/lexers/testdata/openedgeabl.expected
index 0d1baa8..fdafdfd 100644
--- a/lexers/testdata/openedgeabl.expected
+++ b/lexers/testdata/openedgeabl.expected
@@ -2403,22 +2403,7 @@
   {"type":"Text","value":" "},
   {"type":"KeywordReserved","value":"SUBSTITUTE"},
   {"type":"Punctuation","value":"("},
-  {"type":"LiteralStringSingle","value":"'DataDigger-\u00261'"},
-  {"type":"NameVariable","value":","},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"getUserName"},
-  {"type":"Punctuation","value":"()"},
-  {"type":"Text","value":" "},
-  {"type":"Punctuation","value":")."},
-  {"type":"Text","value":"\n\n  "},
-  {"type":"KeywordReserved","value":"UNLOAD "},
-  {"type":"LiteralStringSingle","value":"'DataDiggerHelp'"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"NO-ERROR"},
-  {"type":"Punctuation","value":"."},
-  {"type":"Text","value":"\n  "},
-  {"type":"KeywordReserved","value":"UNLOAD "},
-  {"type":"LiteralStringSingle","value":"'DataDigger'"},
+  {"type":"LiteralStringSingle","value":"'DataDigger-\u00261', getUserName() ).\n\n  UNLOAD 'DataDiggerHelp' NO-ERROR.\n  UNLOAD 'DataDigger'"},
   {"type":"Text","value":"     "},
   {"type":"KeywordReserved","value":"NO-ERROR"},
   {"type":"Punctuation","value":"."},
@@ -2716,28 +2701,7 @@
   {"type":"Punctuation","value":"("},
   {"type":"Text","value":" "},
   {"type":"KeywordReserved","value":"INPUT "},
-  {"type":"LiteralStringSingle","value":"'dump'"},
-  {"type":"Text","value":" "},
-  {"type":"CommentMultiline","value":"/* action */"},
-  {"type":"Text","value":"\n      "},
-  {"type":"NameVariable","value":","},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"INPUT "},
-  {"type":"LiteralStringSingle","value":"''"},
-  {"type":"Text","value":"     "},
-  {"type":"CommentMultiline","value":"/* database */"},
-  {"type":"Text","value":"\n      "},
-  {"type":"NameVariable","value":","},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"INPUT "},
-  {"type":"LiteralStringSingle","value":"''"},
-  {"type":"Text","value":"     "},
-  {"type":"CommentMultiline","value":"/* table */"},
-  {"type":"Text","value":"\n      "},
-  {"type":"NameVariable","value":","},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"INPUT "},
-  {"type":"LiteralStringSingle","value":"''"},
+  {"type":"LiteralStringSingle","value":"'dump' /* action */\n      , INPUT ''     /* database */\n      , INPUT ''     /* table */\n      , INPUT ''"},
   {"type":"Text","value":"     "},
   {"type":"CommentMultiline","value":"/* extension */"},
   {"type":"Text","value":"\n      "},
@@ -2977,15 +2941,62 @@
   {"type":"KeywordReserved","value":"R-INDEX"},
   {"type":"Punctuation","value":"("},
   {"type":"NameVariable","value":"pcFileName,"},
-  {"type":"LiteralStringDouble","value":"\"\\\")).\n  IF cDumpDir = '' THEN cDumpDir = '.'.\n\n  /* We cannot use the program dir itself */\n  FILE-INFO:FILE-NAME = cDumpDir.\n  IF TRIM(FILE-INFO:FULL-PATHNAME,'\\/') = TRIM(getProgramDir(),\""},
-  {"type":"Operator","value":"/"},
-  {"type":"NameVariable","value":"\\"},
-  {"type":"LiteralStringDouble","value":"\") THEN\n  DO:\n    pcError = getRegistry('DataDigger:Help', 'ExportToProgramdir:message').\n    RETURN.\n  END.\n\n  PUBLISH \""},
-  {"type":"NameVariable","value":"debugInfo"},
-  {"type":"LiteralStringDouble","value":"\" (3, SUBSTITUTE(\""},
-  {"type":"KeywordReserved","value":"Dir "},
+  {"type":"LiteralStringDouble","value":"\"\\\""},
+  {"type":"Punctuation","value":"))."},
+  {"type":"Text","value":"\n  "},
+  {"type":"KeywordReserved","value":"IF"},
+  {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"cDumpDir"},
+  {"type":"Text","value":" "},
   {"type":"Operator","value":"="},
-  {"type":"CommentPreproc","value":" \u00261\", cDumpDir))."},
+  {"type":"Text","value":" "},
+  {"type":"LiteralStringSingle","value":"'' THEN cDumpDir = '.'.\n\n  /* We cannot use the program dir itself */\n  FILE-INFO:FILE-NAME = cDumpDir.\n  IF TRIM(FILE-INFO:FULL-PATHNAME,'\\/'"},
+  {"type":"Punctuation","value":")"},
+  {"type":"Text","value":" "},
+  {"type":"Operator","value":"="},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"TRIM"},
+  {"type":"Punctuation","value":"("},
+  {"type":"NameVariable","value":"getProgramDir"},
+  {"type":"Punctuation","value":"()"},
+  {"type":"NameVariable","value":","},
+  {"type":"LiteralStringDouble","value":"\"/\\\""},
+  {"type":"Punctuation","value":")"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"THEN\n "},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"DO"},
+  {"type":"Punctuation","value":":"},
+  {"type":"Text","value":"\n    "},
+  {"type":"NameVariable","value":"pcError"},
+  {"type":"Text","value":" "},
+  {"type":"Operator","value":"="},
+  {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"getRegistry"},
+  {"type":"Punctuation","value":"("},
+  {"type":"LiteralStringSingle","value":"'DataDigger:Help', 'ExportToProgramdir:message'"},
+  {"type":"Punctuation","value":")."},
+  {"type":"Text","value":"\n    "},
+  {"type":"KeywordReserved","value":"RETURN"},
+  {"type":"Punctuation","value":"."},
+  {"type":"Text","value":"\n  "},
+  {"type":"KeywordReserved","value":"END"},
+  {"type":"Punctuation","value":"."},
+  {"type":"Text","value":"\n\n  "},
+  {"type":"KeywordReserved","value":"PUBLISH "},
+  {"type":"LiteralStringDouble","value":"\"debugInfo\""},
+  {"type":"Text","value":" "},
+  {"type":"Punctuation","value":"("},
+  {"type":"LiteralNumberInteger","value":"3"},
+  {"type":"NameVariable","value":","},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"SUBSTITUTE"},
+  {"type":"Punctuation","value":"("},
+  {"type":"LiteralStringDouble","value":"\"Dir = \u00261\""},
+  {"type":"NameVariable","value":","},
+  {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"cDumpDir"},
+  {"type":"Punctuation","value":"))."},
   {"type":"Text","value":"\n\n  "},
   {"type":"CommentMultiline","value":"/* Ask to overwrite if it already exists */"},
   {"type":"Text","value":"\n  "},
@@ -3040,36 +3051,7 @@
   {"type":"KeywordReserved","value":"FILE-TYPE"},
   {"type":"Text","value":" "},
   {"type":"KeywordReserved","value":"MATCHES "},
-  {"type":"LiteralStringSingle","value":"'*F*'"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"THEN\n   "},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"DO"},
-  {"type":"Punctuation","value":":"},
-  {"type":"Text","value":"\n      "},
-  {"type":"KeywordReserved","value":"RUN"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"showHelp"},
-  {"type":"Punctuation","value":"("},
-  {"type":"LiteralStringSingle","value":"'OverwriteDumpFile'"},
-  {"type":"NameVariable","value":","},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"pcFileName"},
-  {"type":"Punctuation","value":")."},
-  {"type":"Text","value":"\n      "},
-  {"type":"KeywordReserved","value":"IF"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"getRegistry"},
-  {"type":"Punctuation","value":"("},
-  {"type":"LiteralStringSingle","value":"'DataDigger:Help'"},
-  {"type":"NameVariable","value":","},
-  {"type":"Text","value":" "},
-  {"type":"LiteralStringSingle","value":"'OverwriteDumpFile:answer'"},
-  {"type":"Punctuation","value":")"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"\u003c\u003e"},
-  {"type":"Text","value":" "},
-  {"type":"LiteralStringSingle","value":"'1'"},
+  {"type":"LiteralStringSingle","value":"'*F*' THEN\n    DO:\n      RUN showHelp('OverwriteDumpFile', pcFileName).\n      IF getRegistry('DataDigger:Help', 'OverwriteDumpFile:answer') \u003c\u003e '1'"},
   {"type":"Text","value":" "},
   {"type":"KeywordReserved","value":"THEN\n     "},
   {"type":"Text","value":" "},
@@ -3080,89 +3062,44 @@
   {"type":"Text","value":"\n        "},
   {"type":"NameVariable","value":"setRegistry"},
   {"type":"Punctuation","value":"("},
-  {"type":"LiteralStringSingle","value":"'DataDigger:Help'"},
-  {"type":"NameVariable","value":","},
+  {"type":"LiteralStringSingle","value":"'DataDigger:Help', 'OverwriteDumpFile:answer',?).\n        pcError = 'Aborted by user.'.\n        RETURN.\n      END.\n\n      /* Write access to this file? */\n      IF NOT FILE-INFO:FILE-TYPE MATCHES '*W*' THEN\n      DO:\n        pcError = SUBSTITUTE('"},
+  {"type":"NameVariable","value":"Cannot"},
   {"type":"Text","value":" "},
-  {"type":"LiteralStringSingle","value":"'OverwriteDumpFile:answer'"},
-  {"type":"NameVariable","value":",?"},
-  {"type":"Punctuation","value":")."},
-  {"type":"Text","value":"\n        "},
-  {"type":"NameVariable","value":"pcError"},
+  {"type":"NameVariable","value":"overwrite"},
   {"type":"Text","value":" "},
-  {"type":"Operator","value":"="},
+  {"type":"KeywordReserved","value":"output"},
   {"type":"Text","value":" "},
-  {"type":"LiteralStringSingle","value":"'Aborted by user.'"},
+  {"type":"KeywordReserved","value":"file "},
+  {"type":"LiteralStringDouble","value":"\"\u00261\""},
+  {"type":"LiteralStringSingle","value":"', pcFileName).\n        RETURN.\n      END.\n    END.\n\n    /* If a dir already exists with the same name as the output file, we cannot create it */\n    IF FILE-INFO:FILE-TYPE MATCHES '*D*' THEN\n    DO:\n      pcError = SUBSTITUTE('"},
+  {"type":"NameVariable","value":"A"},
+  {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"directory"},
+  {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"named"},
+  {"type":"Text","value":" "},
+  {"type":"LiteralStringDouble","value":"\"\u00261\""},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"exists"},
+  {"type":"NameVariable","value":";"},
+  {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"cannot"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"create"},
+  {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"a"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"file"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"with"},
+  {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"the"},
+  {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"same"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"name"},
   {"type":"Punctuation","value":"."},
-  {"type":"Text","value":"\n        "},
-  {"type":"KeywordReserved","value":"RETURN"},
-  {"type":"Punctuation","value":"."},
-  {"type":"Text","value":"\n      "},
-  {"type":"KeywordReserved","value":"END"},
-  {"type":"Punctuation","value":"."},
-  {"type":"Text","value":"\n\n      "},
-  {"type":"CommentMultiline","value":"/* Write access to this file? */"},
-  {"type":"Text","value":"\n      "},
-  {"type":"KeywordReserved","value":"IF"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"NOT"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"FILE-INFO"},
-  {"type":"Punctuation","value":":"},
-  {"type":"KeywordReserved","value":"FILE-TYPE"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"MATCHES "},
-  {"type":"LiteralStringSingle","value":"'*W*'"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"THEN\n     "},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"DO"},
-  {"type":"Punctuation","value":":"},
-  {"type":"Text","value":"\n        "},
-  {"type":"NameVariable","value":"pcError"},
-  {"type":"Text","value":" "},
-  {"type":"Operator","value":"="},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"SUBSTITUTE"},
-  {"type":"Punctuation","value":"("},
-  {"type":"LiteralStringSingle","value":"'Cannot overwrite output file \"\u00261\"'"},
-  {"type":"NameVariable","value":","},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"pcFileName"},
-  {"type":"Punctuation","value":")."},
-  {"type":"Text","value":"\n        "},
-  {"type":"KeywordReserved","value":"RETURN"},
-  {"type":"Punctuation","value":"."},
-  {"type":"Text","value":"\n      "},
-  {"type":"KeywordReserved","value":"END"},
-  {"type":"Punctuation","value":"."},
-  {"type":"Text","value":"\n    "},
-  {"type":"KeywordReserved","value":"END"},
-  {"type":"Punctuation","value":"."},
-  {"type":"Text","value":"\n\n    "},
-  {"type":"CommentMultiline","value":"/* If a dir already exists with the same name as the output file, we cannot create it */"},
-  {"type":"Text","value":"\n    "},
-  {"type":"KeywordReserved","value":"IF"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"FILE-INFO"},
-  {"type":"Punctuation","value":":"},
-  {"type":"KeywordReserved","value":"FILE-TYPE"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"MATCHES "},
-  {"type":"LiteralStringSingle","value":"'*D*'"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"THEN\n   "},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"DO"},
-  {"type":"Punctuation","value":":"},
-  {"type":"Text","value":"\n      "},
-  {"type":"NameVariable","value":"pcError"},
-  {"type":"Text","value":" "},
-  {"type":"Operator","value":"="},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"SUBSTITUTE"},
-  {"type":"Punctuation","value":"("},
-  {"type":"LiteralStringSingle","value":"'A directory named \"\u00261\" exists; cannot create a file with the same name.'"},
-  {"type":"NameVariable","value":","},
+  {"type":"NameVariable","value":"',"},
   {"type":"Text","value":" "},
   {"type":"NameVariable","value":"pcFileName"},
   {"type":"Punctuation","value":")."},
@@ -3214,62 +3151,7 @@
   {"type":"Text","value":" "},
   {"type":"NameVariable","value":"showHelp"},
   {"type":"Punctuation","value":"("},
-  {"type":"LiteralStringSingle","value":"'CreateDumpDir'"},
-  {"type":"NameVariable","value":","},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"cDumpDir"},
-  {"type":"Punctuation","value":")."},
-  {"type":"Text","value":"\n    "},
-  {"type":"KeywordReserved","value":"IF"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"getRegistry"},
-  {"type":"Punctuation","value":"("},
-  {"type":"LiteralStringSingle","value":"'DataDigger:Help'"},
-  {"type":"NameVariable","value":","},
-  {"type":"Text","value":" "},
-  {"type":"LiteralStringSingle","value":"'CreateDumpDir:answer'"},
-  {"type":"Punctuation","value":")"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"\u003c\u003e"},
-  {"type":"Text","value":" "},
-  {"type":"LiteralStringSingle","value":"'1'"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"THEN\n   "},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"DO"},
-  {"type":"Punctuation","value":":"},
-  {"type":"Text","value":"\n      "},
-  {"type":"NameVariable","value":"pcError"},
-  {"type":"Text","value":" "},
-  {"type":"Operator","value":"="},
-  {"type":"Text","value":" "},
-  {"type":"LiteralStringSingle","value":"'Aborted by user.'"},
-  {"type":"Punctuation","value":"."},
-  {"type":"Text","value":"\n      "},
-  {"type":"KeywordReserved","value":"RETURN"},
-  {"type":"Punctuation","value":"."},
-  {"type":"Text","value":"\n    "},
-  {"type":"KeywordReserved","value":"END"},
-  {"type":"Punctuation","value":"."},
-  {"type":"Text","value":"\n  "},
-  {"type":"KeywordReserved","value":"END"},
-  {"type":"Punctuation","value":"."},
-  {"type":"Text","value":"\n\n  "},
-  {"type":"CommentMultiline","value":"/* Try to create path + file. Progress will not raise an error if it already exists */"},
-  {"type":"Text","value":"\n  "},
-  {"type":"NameVariable","value":"cDirToCreate"},
-  {"type":"Text","value":" "},
-  {"type":"Operator","value":"="},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"ENTRY"},
-  {"type":"Punctuation","value":"("},
-  {"type":"LiteralNumberInteger","value":"1"},
-  {"type":"NameVariable","value":",cDumpDir,"},
-  {"type":"LiteralStringSingle","value":"'\\').\n  DO iDir = 2 TO NUM-ENTRIES(cDumpDir,'"},
-  {"type":"NameVariable","value":"\\"},
-  {"type":"LiteralStringSingle","value":"').\n\n    /* In which dir do we want to create a subdir? */\n    IF iDir = 2 THEN\n      FILE-INFO:FILE-NAME = cDirToCreate + '"},
-  {"type":"NameVariable","value":"\\"},
-  {"type":"LiteralStringSingle","value":"'.\n    ELSE\n      FILE-INFO:FILE-NAME = cDirToCreate.\n\n    /* Does it even exist? */\n    IF FILE-INFO:FULL-PATHNAME = ? THEN\n    DO:\n      pcError = SUBSTITUTE('"},
+  {"type":"LiteralStringSingle","value":"'CreateDumpDir', cDumpDir).\n    IF getRegistry('DataDigger:Help', 'CreateDumpDir:answer') \u003c\u003e '1' THEN\n    DO:\n      pcError = 'Aborted by user.'.\n      RETURN.\n    END.\n  END.\n\n  /* Try to create path + file. Progress will not raise an error if it already exists */\n  cDirToCreate = ENTRY(1,cDumpDir,'\\').\n  DO iDir = 2 TO NUM-ENTRIES(cDumpDir,'\\').\n\n    /* In which dir do we want to create a subdir? */\n    IF iDir = 2 THEN\n      FILE-INFO:FILE-NAME = cDirToCreate + '\\'.\n    ELSE\n      FILE-INFO:FILE-NAME = cDirToCreate.\n\n    /* Does it even exist? */\n    IF FILE-INFO:FULL-PATHNAME = ? THEN\n    DO:\n      pcError = SUBSTITUTE('"},
   {"type":"NameVariable","value":"Directory"},
   {"type":"Text","value":" "},
   {"type":"LiteralStringDouble","value":"\"\u00261\""},
@@ -3280,19 +3162,42 @@
   {"type":"Text","value":" "},
   {"type":"NameVariable","value":"exist"},
   {"type":"Punctuation","value":"."},
-  {"type":"LiteralStringSingle","value":"', cDirToCreate).\n      PUBLISH \"debugInfo\" (3, SUBSTITUTE(\"Error: \u00261\", pcError)).\n      RETURN.\n    END.\n\n    /* Check if the dir is writable */\n    IF FILE-INFO:FILE-TYPE MATCHES '"},
-  {"type":"Operator","value":"*"},
-  {"type":"KeywordReserved","value":"X"},
-  {"type":"Operator","value":"*"},
-  {"type":"LiteralStringSingle","value":"'  /* Happens on CD-ROM drives */\n      OR (        FILE-INFO:FILE-TYPE MATCHES '"},
-  {"type":"Operator","value":"*"},
-  {"type":"NameVariable","value":"D"},
-  {"type":"Operator","value":"*"},
-  {"type":"LiteralStringSingle","value":"'\n          AND NOT FILE-INFO:FILE-TYPE MATCHES '"},
-  {"type":"Operator","value":"*"},
-  {"type":"NameVariable","value":"W"},
-  {"type":"Operator","value":"*"},
-  {"type":"LiteralStringSingle","value":"' ) THEN\n    DO:\n      pcError = SUBSTITUTE('"},
+  {"type":"NameVariable","value":"',"},
+  {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"cDirToCreate"},
+  {"type":"Punctuation","value":")."},
+  {"type":"Text","value":"\n      "},
+  {"type":"KeywordReserved","value":"PUBLISH "},
+  {"type":"LiteralStringDouble","value":"\"debugInfo\""},
+  {"type":"Text","value":" "},
+  {"type":"Punctuation","value":"("},
+  {"type":"LiteralNumberInteger","value":"3"},
+  {"type":"NameVariable","value":","},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"SUBSTITUTE"},
+  {"type":"Punctuation","value":"("},
+  {"type":"LiteralStringDouble","value":"\"Error: \u00261\""},
+  {"type":"NameVariable","value":","},
+  {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"pcError"},
+  {"type":"Punctuation","value":"))."},
+  {"type":"Text","value":"\n      "},
+  {"type":"KeywordReserved","value":"RETURN"},
+  {"type":"Punctuation","value":"."},
+  {"type":"Text","value":"\n    "},
+  {"type":"KeywordReserved","value":"END"},
+  {"type":"Punctuation","value":"."},
+  {"type":"Text","value":"\n\n    "},
+  {"type":"CommentMultiline","value":"/* Check if the dir is writable */"},
+  {"type":"Text","value":"\n    "},
+  {"type":"KeywordReserved","value":"IF"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"FILE-INFO"},
+  {"type":"Punctuation","value":":"},
+  {"type":"KeywordReserved","value":"FILE-TYPE"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"MATCHES "},
+  {"type":"LiteralStringSingle","value":"'*X*'  /* Happens on CD-ROM drives */\n      OR (        FILE-INFO:FILE-TYPE MATCHES '*D*'\n          AND NOT FILE-INFO:FILE-TYPE MATCHES '*W*' ) THEN\n    DO:\n      pcError = SUBSTITUTE('"},
   {"type":"KeywordReserved","value":"No"},
   {"type":"Text","value":" "},
   {"type":"NameVariable","value":"write"},
@@ -3305,15 +3210,43 @@
   {"type":"Punctuation","value":":"},
   {"type":"Text","value":" "},
   {"type":"LiteralStringDouble","value":"\"\u00261\""},
-  {"type":"LiteralStringSingle","value":"', cDirToCreate).\n      PUBLISH \"debugInfo\" (3, SUBSTITUTE(\"Error: \u00261\", pcError)).\n      RETURN.\n    END.\n\n    /* Seems to exist and to be writable. */\n    cDirToCreate = cDirToCreate + '"},
-  {"type":"NameVariable","value":"\\"},
-  {"type":"LiteralStringSingle","value":"' + ENTRY(iDir,cDumpDir,'"},
-  {"type":"NameVariable","value":"\\"},
-  {"type":"LiteralStringSingle","value":"').\n\n    /* If a file already exists with the same name, we cannot create a dir */\n    FILE-INFO:FILE-NAME = cDirToCreate.\n    IF FILE-INFO:FILE-TYPE MATCHES '"},
-  {"type":"Operator","value":"*"},
-  {"type":"NameVariable","value":"F"},
-  {"type":"Operator","value":"*"},
-  {"type":"LiteralStringSingle","value":"' THEN\n    DO:\n      pcError = SUBSTITUTE('"},
+  {"type":"NameVariable","value":"',"},
+  {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"cDirToCreate"},
+  {"type":"Punctuation","value":")."},
+  {"type":"Text","value":"\n      "},
+  {"type":"KeywordReserved","value":"PUBLISH "},
+  {"type":"LiteralStringDouble","value":"\"debugInfo\""},
+  {"type":"Text","value":" "},
+  {"type":"Punctuation","value":"("},
+  {"type":"LiteralNumberInteger","value":"3"},
+  {"type":"NameVariable","value":","},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"SUBSTITUTE"},
+  {"type":"Punctuation","value":"("},
+  {"type":"LiteralStringDouble","value":"\"Error: \u00261\""},
+  {"type":"NameVariable","value":","},
+  {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"pcError"},
+  {"type":"Punctuation","value":"))."},
+  {"type":"Text","value":"\n      "},
+  {"type":"KeywordReserved","value":"RETURN"},
+  {"type":"Punctuation","value":"."},
+  {"type":"Text","value":"\n    "},
+  {"type":"KeywordReserved","value":"END"},
+  {"type":"Punctuation","value":"."},
+  {"type":"Text","value":"\n\n    "},
+  {"type":"CommentMultiline","value":"/* Seems to exist and to be writable. */"},
+  {"type":"Text","value":"\n    "},
+  {"type":"NameVariable","value":"cDirToCreate"},
+  {"type":"Text","value":" "},
+  {"type":"Operator","value":"="},
+  {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"cDirToCreate"},
+  {"type":"Text","value":" "},
+  {"type":"Operator","value":"+"},
+  {"type":"Text","value":" "},
+  {"type":"LiteralStringSingle","value":"'\\' + ENTRY(iDir,cDumpDir,'\\').\n\n    /* If a file already exists with the same name, we cannot create a dir */\n    FILE-INFO:FILE-NAME = cDirToCreate.\n    IF FILE-INFO:FILE-TYPE MATCHES '*F*' THEN\n    DO:\n      pcError = SUBSTITUTE('"},
   {"type":"NameVariable","value":"A"},
   {"type":"Text","value":" "},
   {"type":"KeywordReserved","value":"file"},
@@ -3341,16 +3274,595 @@
   {"type":"Text","value":" "},
   {"type":"KeywordReserved","value":"name"},
   {"type":"Punctuation","value":"."},
-  {"type":"LiteralStringSingle","value":"', cDirToCreate).\n      PUBLISH \"debugInfo\" (3, SUBSTITUTE(\"Error: \u00261\", pcError)).\n      RETURN.\n    END.\n\n    /* Create the dir. Creating an existing dir gives no error */\n    OS-CREATE-DIR value(cDirToCreate).\n    IF OS-ERROR \u003c\u003e 0 THEN\n    DO:\n      pcError = getOsErrorDesc(OS-ERROR).\n      PUBLISH \"debugInfo\" (3, SUBSTITUTE(\"Error: \u00261\", pcError)).\n      RETURN.\n    END. /* error */\n\n  END. /* iDir */\n\nEND PROCEDURE. /* checkDir */\n\n/* _UIB-CODE-BLOCK-END */\n\u0026ANALYZE-RESUME\n\n\u0026ENDIF\n\n\u0026IF DEFINED(EXCLUDE-clearColorCache) = 0 \u0026THEN\n\n\u0026ANALYZE-SUSPEND _UIB-CODE-BLOCK _PROCEDURE clearColorCache Procedure\nPROCEDURE clearColorCache :\n/* Clear the registry cache\n  */\n  PUBLISH \"debugInfo\" (3, SUBSTITUTE(\"Clearing color cache\")).\n  EMPTY TEMP-TABLE ttColor.\n\nEND PROCEDURE. /* clearColorCache */\n\n/* _UIB-CODE-BLOCK-END */\n\u0026ANALYZE-RESUME\n\n\u0026ENDIF\n\n\u0026IF DEFINED(EXCLUDE-clearDiskCache) = 0 \u0026THEN\n\n\u0026ANALYZE-SUSPEND _UIB-CODE-BLOCK _PROCEDURE clearDiskCache Procedure\nPROCEDURE clearDiskCache :\n/* Clear the cache files on disk\n  */\n  DEFINE VARIABLE cFile AS CHARACTER NO-UNDO EXTENT 3.\n\n  PUBLISH \"debugInfo\" (3, SUBSTITUTE(\"Clearing disk cache\")).\n\n  FILE-INFORMATION:FILE-NAME = getWorkFolder() + \"cache\".\n  IF FILE-INFORMATION:FULL-PATHNAME = ? THEN RETURN.\n\n  INPUT FROM OS-DIR(FILE-INFORMATION:FULL-PATHNAME).\n  REPEAT:\n    IMPORT cFile.\n    IF cFile[1] MATCHES \"*.xml\" THEN OS-DELETE VALUE( cFile[2]).\n  END.\n  INPUT CLOSE.\n\nEND PROCEDURE. /* clearDiskCache */\n\n/* _UIB-CODE-BLOCK-END */\n\u0026ANALYZE-RESUME\n\n\u0026ENDIF\n\n\u0026IF DEFINED(EXCLUDE-clearFontCache) = 0 \u0026THEN\n\n\u0026ANALYZE-SUSPEND _UIB-CODE-BLOCK _PROCEDURE clearFontCache Procedure\nPROCEDURE clearFontCache :\n/* Clear the font cache\n  */\n  PUBLISH \"debugInfo\" (3, SUBSTITUTE(\"Clearing font cache\")).\n  EMPTY TEMP-TABLE ttFont.\n\nEND PROCEDURE. /* clearFontCache */\n\n/* _UIB-CODE-BLOCK-END */\n\u0026ANALYZE-RESUME\n\n\u0026ENDIF\n\n\u0026IF DEFINED(EXCLUDE-clearMemoryCache) = 0 \u0026THEN\n\n\u0026ANALYZE-SUSPEND _UIB-CODE-BLOCK _PROCEDURE clearMemoryCache Procedure\nPROCEDURE clearMemoryCache :\n/* Clear the memory cache\n  */\n  PUBLISH \"debugInfo\" (3, SUBSTITUTE(\"Clearing memory cache\")).\n  EMPTY TEMP-TABLE ttFieldCache.\n\nEND PROCEDURE. /* clearMemoryCache */\n\n/* _UIB-CODE-BLOCK-END */\n\u0026ANALYZE-RESUME\n\n\u0026ENDIF\n\n\u0026IF DEFINED(EXCLUDE-clearRegistryCache) = 0 \u0026THEN\n\n\u0026ANALYZE-SUSPEND _UIB-CODE-BLOCK _PROCEDURE clearRegistryCache Procedure\nPROCEDURE clearRegistryCache :\n/* Clear the registry cache\n  */\n  PUBLISH \"debugInfo\" (3, SUBSTITUTE(\"Clearing registry cache\")).\n  EMPTY TEMP-TABLE ttConfig.\n\nEND PROCEDURE. /* clearRegistryCache */\n\n/* _UIB-CODE-BLOCK-END */\n\u0026ANALYZE-RESUME\n\n\u0026ENDIF\n\n\u0026IF DEFINED(EXCLUDE-collectQueryInfo) = 0 \u0026THEN\n\n\u0026ANALYZE-SUSPEND _UIB-CODE-BLOCK _PROCEDURE collectQueryInfo Procedure\nPROCEDURE collectQueryInfo :\n/* Fill the query temp-table\n  */\n  DEFINE INPUT  PARAMETER pcDatabase     AS CHARACTER   NO-UNDO.\n  DEFINE INPUT  PARAMETER pcTable        AS CHARACTER   NO-UNDO.\n\n  DEFINE VARIABLE iMaxQueryHistory AS INTEGER NO-UNDO.\n  DEFINE VARIABLE iQueryNr         AS INTEGER NO-UNDO.\n  DEFINE VARIABLE iLoop            AS INTEGER NO-UNDO.\n  DEFINE VARIABLE cSetting         AS CHARACTER NO-UNDO.\n\n  DEFINE BUFFER bQuery FOR ttQuery.\n  {\u0026timerStart}\n\n  /* Delete all known queries in memory of this table */\n  FOR EACH bQuery\n    WHERE bQuery.cDatabase = pcDatabase\n      AND bQuery.cTable    = pcTable:\n    DELETE bQuery.\n  END.\n\n  iMaxQueryHistory = INTEGER(getRegistry(\"DataDigger\", \"MaxQueryHistory\" )).\n  IF iMaxQueryHistory = 0 THEN RETURN. /* no query history wanted */\n\n  /* If it is not defined use default setting */\n  IF iMaxQueryHistory = ? THEN iMaxQueryHistory = 10.\n\n  collectQueries:\n  DO iLoop = 1 TO iMaxQueryHistory:\n    cSetting = getRegistry( SUBSTITUTE(\"DB:\u00261\", pcDatabase)\n                          , SUBSTITUTE('"},
-  {"type":"CommentPreproc","value":"\u00261:query:\u00262', pcTable, iLoop ))."},
+  {"type":"NameVariable","value":"',"},
+  {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"cDirToCreate"},
+  {"type":"Punctuation","value":")."},
+  {"type":"Text","value":"\n      "},
+  {"type":"KeywordReserved","value":"PUBLISH "},
+  {"type":"LiteralStringDouble","value":"\"debugInfo\""},
+  {"type":"Text","value":" "},
+  {"type":"Punctuation","value":"("},
+  {"type":"LiteralNumberInteger","value":"3"},
+  {"type":"NameVariable","value":","},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"SUBSTITUTE"},
+  {"type":"Punctuation","value":"("},
+  {"type":"LiteralStringDouble","value":"\"Error: \u00261\""},
+  {"type":"NameVariable","value":","},
+  {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"pcError"},
+  {"type":"Punctuation","value":"))."},
+  {"type":"Text","value":"\n      "},
+  {"type":"KeywordReserved","value":"RETURN"},
+  {"type":"Punctuation","value":"."},
+  {"type":"Text","value":"\n    "},
+  {"type":"KeywordReserved","value":"END"},
+  {"type":"Punctuation","value":"."},
   {"type":"Text","value":"\n\n    "},
+  {"type":"CommentMultiline","value":"/* Create the dir. Creating an existing dir gives no error */"},
+  {"type":"Text","value":"\n    "},
+  {"type":"KeywordReserved","value":"OS-CREATE-DIR"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"value"},
+  {"type":"Punctuation","value":"("},
+  {"type":"NameVariable","value":"cDirToCreate"},
+  {"type":"Punctuation","value":")."},
+  {"type":"Text","value":"\n    "},
   {"type":"KeywordReserved","value":"IF"},
   {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"OS-ERROR "},
+  {"type":"NameVariable","value":"\u003c\u003e"},
+  {"type":"Text","value":" "},
+  {"type":"LiteralNumberInteger","value":"0"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"THEN\n   "},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"DO"},
+  {"type":"Punctuation","value":":"},
+  {"type":"Text","value":"\n      "},
+  {"type":"NameVariable","value":"pcError"},
+  {"type":"Text","value":" "},
+  {"type":"Operator","value":"="},
+  {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"getOsErrorDesc"},
+  {"type":"Punctuation","value":"("},
+  {"type":"KeywordReserved","value":"OS-ERROR"},
+  {"type":"Punctuation","value":")."},
+  {"type":"Text","value":"\n      "},
+  {"type":"KeywordReserved","value":"PUBLISH "},
+  {"type":"LiteralStringDouble","value":"\"debugInfo\""},
+  {"type":"Text","value":" "},
+  {"type":"Punctuation","value":"("},
+  {"type":"LiteralNumberInteger","value":"3"},
+  {"type":"NameVariable","value":","},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"SUBSTITUTE"},
+  {"type":"Punctuation","value":"("},
+  {"type":"LiteralStringDouble","value":"\"Error: \u00261\""},
+  {"type":"NameVariable","value":","},
+  {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"pcError"},
+  {"type":"Punctuation","value":"))."},
+  {"type":"Text","value":"\n      "},
+  {"type":"KeywordReserved","value":"RETURN"},
+  {"type":"Punctuation","value":"."},
+  {"type":"Text","value":"\n    "},
+  {"type":"KeywordReserved","value":"END"},
+  {"type":"Punctuation","value":"."},
+  {"type":"Text","value":" "},
+  {"type":"CommentMultiline","value":"/* error */"},
+  {"type":"Text","value":"\n\n  "},
+  {"type":"KeywordReserved","value":"END"},
+  {"type":"Punctuation","value":"."},
+  {"type":"Text","value":" "},
+  {"type":"CommentMultiline","value":"/* iDir */"},
+  {"type":"Text","value":"\n\n"},
+  {"type":"KeywordReserved","value":"END"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"PROCEDURE"},
+  {"type":"Punctuation","value":"."},
+  {"type":"Text","value":" "},
+  {"type":"CommentMultiline","value":"/* checkDir */"},
+  {"type":"Text","value":"\n\n"},
+  {"type":"CommentMultiline","value":"/* _UIB-CODE-BLOCK-END */"},
+  {"type":"CommentPreproc","value":"\n\u0026ANALYZE-RESUME\n\n\u0026ENDIF\n\n\u0026IF DEFINED(EXCLUDE-clearColorCache) = 0 \u0026THEN\n\n\u0026ANALYZE-SUSPEND _UIB-CODE-BLOCK _PROCEDURE clearColorCache Procedure"},
+  {"type":"Text","value":"\n"},
+  {"type":"KeywordReserved","value":"PROCEDURE"},
+  {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"clearColorCache"},
+  {"type":"Text","value":" "},
+  {"type":"Punctuation","value":":"},
+  {"type":"Text","value":"\n"},
+  {"type":"CommentMultiline","value":"/* Clear the registry cache\n  */"},
+  {"type":"Text","value":"\n  "},
+  {"type":"KeywordReserved","value":"PUBLISH "},
+  {"type":"LiteralStringDouble","value":"\"debugInfo\""},
+  {"type":"Text","value":" "},
+  {"type":"Punctuation","value":"("},
+  {"type":"LiteralNumberInteger","value":"3"},
+  {"type":"NameVariable","value":","},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"SUBSTITUTE"},
+  {"type":"Punctuation","value":"("},
+  {"type":"LiteralStringDouble","value":"\"Clearing color cache\""},
+  {"type":"Punctuation","value":"))."},
+  {"type":"Text","value":"\n  "},
+  {"type":"KeywordReserved","value":"EMPTY"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"TEMP-TABLE"},
+  {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"ttColor"},
+  {"type":"Punctuation","value":"."},
+  {"type":"Text","value":"\n\n"},
+  {"type":"KeywordReserved","value":"END"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"PROCEDURE"},
+  {"type":"Punctuation","value":"."},
+  {"type":"Text","value":" "},
+  {"type":"CommentMultiline","value":"/* clearColorCache */"},
+  {"type":"Text","value":"\n\n"},
+  {"type":"CommentMultiline","value":"/* _UIB-CODE-BLOCK-END */"},
+  {"type":"CommentPreproc","value":"\n\u0026ANALYZE-RESUME\n\n\u0026ENDIF\n\n\u0026IF DEFINED(EXCLUDE-clearDiskCache) = 0 \u0026THEN\n\n\u0026ANALYZE-SUSPEND _UIB-CODE-BLOCK _PROCEDURE clearDiskCache Procedure"},
+  {"type":"Text","value":"\n"},
+  {"type":"KeywordReserved","value":"PROCEDURE"},
+  {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"clearDiskCache"},
+  {"type":"Text","value":" "},
+  {"type":"Punctuation","value":":"},
+  {"type":"Text","value":"\n"},
+  {"type":"CommentMultiline","value":"/* Clear the cache files on disk\n  */"},
+  {"type":"Text","value":"\n  "},
+  {"type":"KeywordDeclaration","value":"DEFINE"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"VARIABLE"},
+  {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"cFile"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"AS"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordType","value":"CHARACTER"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"NO-UNDO"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"EXTENT"},
+  {"type":"Text","value":" "},
+  {"type":"LiteralNumberInteger","value":"3"},
+  {"type":"Punctuation","value":"."},
+  {"type":"Text","value":"\n\n  "},
+  {"type":"KeywordReserved","value":"PUBLISH "},
+  {"type":"LiteralStringDouble","value":"\"debugInfo\""},
+  {"type":"Text","value":" "},
+  {"type":"Punctuation","value":"("},
+  {"type":"LiteralNumberInteger","value":"3"},
+  {"type":"NameVariable","value":","},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"SUBSTITUTE"},
+  {"type":"Punctuation","value":"("},
+  {"type":"LiteralStringDouble","value":"\"Clearing disk cache\""},
+  {"type":"Punctuation","value":"))."},
+  {"type":"Text","value":"\n\n  "},
+  {"type":"KeywordReserved","value":"FILE-INFORMATION"},
+  {"type":"Punctuation","value":":"},
+  {"type":"KeywordReserved","value":"FILE-NAME "},
+  {"type":"Operator","value":"="},
+  {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"getWorkFolder"},
+  {"type":"Punctuation","value":"()"},
+  {"type":"Text","value":" "},
+  {"type":"Operator","value":"+"},
+  {"type":"Text","value":" "},
+  {"type":"LiteralStringDouble","value":"\"cache\""},
+  {"type":"Punctuation","value":"."},
+  {"type":"Text","value":"\n  "},
+  {"type":"KeywordReserved","value":"IF"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"FILE-INFORMATION"},
+  {"type":"Punctuation","value":":"},
+  {"type":"KeywordReserved","value":"FULL-PATHNAME "},
+  {"type":"Operator","value":"="},
+  {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"?"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"THEN"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"RETURN"},
+  {"type":"Punctuation","value":"."},
+  {"type":"Text","value":"\n\n  "},
+  {"type":"KeywordReserved","value":"INPUT"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"FROM"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"OS-DIR"},
+  {"type":"Punctuation","value":"("},
+  {"type":"KeywordReserved","value":"FILE-INFORMATION"},
+  {"type":"Punctuation","value":":"},
+  {"type":"KeywordReserved","value":"FULL-PATHNAME"},
+  {"type":"Punctuation","value":")."},
+  {"type":"Text","value":"\n  "},
+  {"type":"KeywordReserved","value":"REPEAT"},
+  {"type":"Punctuation","value":":"},
+  {"type":"Text","value":"\n    "},
+  {"type":"KeywordReserved","value":"IMPORT"},
+  {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"cFile"},
+  {"type":"Punctuation","value":"."},
+  {"type":"Text","value":"\n    "},
+  {"type":"KeywordReserved","value":"IF"},
+  {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"cFile["},
+  {"type":"LiteralNumberInteger","value":"1"},
+  {"type":"NameVariable","value":"]"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"MATCHES "},
+  {"type":"LiteralStringDouble","value":"\"*.xml\""},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"THEN"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"OS-DELETE"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"VALUE"},
+  {"type":"Punctuation","value":"("},
+  {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"cFile["},
+  {"type":"LiteralNumberInteger","value":"2"},
+  {"type":"NameVariable","value":"]"},
+  {"type":"Punctuation","value":")."},
+  {"type":"Text","value":"\n  "},
+  {"type":"KeywordReserved","value":"END"},
+  {"type":"Punctuation","value":"."},
+  {"type":"Text","value":"\n  "},
+  {"type":"KeywordReserved","value":"INPUT"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"CLOSE"},
+  {"type":"Punctuation","value":"."},
+  {"type":"Text","value":"\n\n"},
+  {"type":"KeywordReserved","value":"END"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"PROCEDURE"},
+  {"type":"Punctuation","value":"."},
+  {"type":"Text","value":" "},
+  {"type":"CommentMultiline","value":"/* clearDiskCache */"},
+  {"type":"Text","value":"\n\n"},
+  {"type":"CommentMultiline","value":"/* _UIB-CODE-BLOCK-END */"},
+  {"type":"CommentPreproc","value":"\n\u0026ANALYZE-RESUME\n\n\u0026ENDIF\n\n\u0026IF DEFINED(EXCLUDE-clearFontCache) = 0 \u0026THEN\n\n\u0026ANALYZE-SUSPEND _UIB-CODE-BLOCK _PROCEDURE clearFontCache Procedure"},
+  {"type":"Text","value":"\n"},
+  {"type":"KeywordReserved","value":"PROCEDURE"},
+  {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"clearFontCache"},
+  {"type":"Text","value":" "},
+  {"type":"Punctuation","value":":"},
+  {"type":"Text","value":"\n"},
+  {"type":"CommentMultiline","value":"/* Clear the font cache\n  */"},
+  {"type":"Text","value":"\n  "},
+  {"type":"KeywordReserved","value":"PUBLISH "},
+  {"type":"LiteralStringDouble","value":"\"debugInfo\""},
+  {"type":"Text","value":" "},
+  {"type":"Punctuation","value":"("},
+  {"type":"LiteralNumberInteger","value":"3"},
+  {"type":"NameVariable","value":","},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"SUBSTITUTE"},
+  {"type":"Punctuation","value":"("},
+  {"type":"LiteralStringDouble","value":"\"Clearing font cache\""},
+  {"type":"Punctuation","value":"))."},
+  {"type":"Text","value":"\n  "},
+  {"type":"KeywordReserved","value":"EMPTY"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"TEMP-TABLE"},
+  {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"ttFont"},
+  {"type":"Punctuation","value":"."},
+  {"type":"Text","value":"\n\n"},
+  {"type":"KeywordReserved","value":"END"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"PROCEDURE"},
+  {"type":"Punctuation","value":"."},
+  {"type":"Text","value":" "},
+  {"type":"CommentMultiline","value":"/* clearFontCache */"},
+  {"type":"Text","value":"\n\n"},
+  {"type":"CommentMultiline","value":"/* _UIB-CODE-BLOCK-END */"},
+  {"type":"CommentPreproc","value":"\n\u0026ANALYZE-RESUME\n\n\u0026ENDIF\n\n\u0026IF DEFINED(EXCLUDE-clearMemoryCache) = 0 \u0026THEN\n\n\u0026ANALYZE-SUSPEND _UIB-CODE-BLOCK _PROCEDURE clearMemoryCache Procedure"},
+  {"type":"Text","value":"\n"},
+  {"type":"KeywordReserved","value":"PROCEDURE"},
+  {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"clearMemoryCache"},
+  {"type":"Text","value":" "},
+  {"type":"Punctuation","value":":"},
+  {"type":"Text","value":"\n"},
+  {"type":"CommentMultiline","value":"/* Clear the memory cache\n  */"},
+  {"type":"Text","value":"\n  "},
+  {"type":"KeywordReserved","value":"PUBLISH "},
+  {"type":"LiteralStringDouble","value":"\"debugInfo\""},
+  {"type":"Text","value":" "},
+  {"type":"Punctuation","value":"("},
+  {"type":"LiteralNumberInteger","value":"3"},
+  {"type":"NameVariable","value":","},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"SUBSTITUTE"},
+  {"type":"Punctuation","value":"("},
+  {"type":"LiteralStringDouble","value":"\"Clearing memory cache\""},
+  {"type":"Punctuation","value":"))."},
+  {"type":"Text","value":"\n  "},
+  {"type":"KeywordReserved","value":"EMPTY"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"TEMP-TABLE"},
+  {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"ttFieldCache"},
+  {"type":"Punctuation","value":"."},
+  {"type":"Text","value":"\n\n"},
+  {"type":"KeywordReserved","value":"END"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"PROCEDURE"},
+  {"type":"Punctuation","value":"."},
+  {"type":"Text","value":" "},
+  {"type":"CommentMultiline","value":"/* clearMemoryCache */"},
+  {"type":"Text","value":"\n\n"},
+  {"type":"CommentMultiline","value":"/* _UIB-CODE-BLOCK-END */"},
+  {"type":"CommentPreproc","value":"\n\u0026ANALYZE-RESUME\n\n\u0026ENDIF\n\n\u0026IF DEFINED(EXCLUDE-clearRegistryCache) = 0 \u0026THEN\n\n\u0026ANALYZE-SUSPEND _UIB-CODE-BLOCK _PROCEDURE clearRegistryCache Procedure"},
+  {"type":"Text","value":"\n"},
+  {"type":"KeywordReserved","value":"PROCEDURE"},
+  {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"clearRegistryCache"},
+  {"type":"Text","value":" "},
+  {"type":"Punctuation","value":":"},
+  {"type":"Text","value":"\n"},
+  {"type":"CommentMultiline","value":"/* Clear the registry cache\n  */"},
+  {"type":"Text","value":"\n  "},
+  {"type":"KeywordReserved","value":"PUBLISH "},
+  {"type":"LiteralStringDouble","value":"\"debugInfo\""},
+  {"type":"Text","value":" "},
+  {"type":"Punctuation","value":"("},
+  {"type":"LiteralNumberInteger","value":"3"},
+  {"type":"NameVariable","value":","},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"SUBSTITUTE"},
+  {"type":"Punctuation","value":"("},
+  {"type":"LiteralStringDouble","value":"\"Clearing registry cache\""},
+  {"type":"Punctuation","value":"))."},
+  {"type":"Text","value":"\n  "},
+  {"type":"KeywordReserved","value":"EMPTY"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"TEMP-TABLE"},
+  {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"ttConfig"},
+  {"type":"Punctuation","value":"."},
+  {"type":"Text","value":"\n\n"},
+  {"type":"KeywordReserved","value":"END"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"PROCEDURE"},
+  {"type":"Punctuation","value":"."},
+  {"type":"Text","value":" "},
+  {"type":"CommentMultiline","value":"/* clearRegistryCache */"},
+  {"type":"Text","value":"\n\n"},
+  {"type":"CommentMultiline","value":"/* _UIB-CODE-BLOCK-END */"},
+  {"type":"CommentPreproc","value":"\n\u0026ANALYZE-RESUME\n\n\u0026ENDIF\n\n\u0026IF DEFINED(EXCLUDE-collectQueryInfo) = 0 \u0026THEN\n\n\u0026ANALYZE-SUSPEND _UIB-CODE-BLOCK _PROCEDURE collectQueryInfo Procedure"},
+  {"type":"Text","value":"\n"},
+  {"type":"KeywordReserved","value":"PROCEDURE"},
+  {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"collectQueryInfo"},
+  {"type":"Text","value":" "},
+  {"type":"Punctuation","value":":"},
+  {"type":"Text","value":"\n"},
+  {"type":"CommentMultiline","value":"/* Fill the query temp-table\n  */"},
+  {"type":"Text","value":"\n  "},
+  {"type":"KeywordDeclaration","value":"DEFINE"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"INPUT "},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"PARAMETER"},
+  {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"pcDatabase"},
+  {"type":"Text","value":"     "},
+  {"type":"KeywordReserved","value":"AS"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordType","value":"CHARACTER  "},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"NO-UNDO"},
+  {"type":"Punctuation","value":"."},
+  {"type":"Text","value":"\n  "},
+  {"type":"KeywordDeclaration","value":"DEFINE"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"INPUT "},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"PARAMETER"},
+  {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"pcTable"},
+  {"type":"Text","value":"        "},
+  {"type":"KeywordReserved","value":"AS"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordType","value":"CHARACTER  "},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"NO-UNDO"},
+  {"type":"Punctuation","value":"."},
+  {"type":"Text","value":"\n\n  "},
+  {"type":"KeywordDeclaration","value":"DEFINE"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"VARIABLE"},
+  {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"iMaxQueryHistory"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"AS"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordType","value":"INTEGER"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"NO-UNDO"},
+  {"type":"Punctuation","value":"."},
+  {"type":"Text","value":"\n  "},
+  {"type":"KeywordDeclaration","value":"DEFINE"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"VARIABLE"},
+  {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"iQueryNr"},
+  {"type":"Text","value":"         "},
+  {"type":"KeywordReserved","value":"AS"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordType","value":"INTEGER"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"NO-UNDO"},
+  {"type":"Punctuation","value":"."},
+  {"type":"Text","value":"\n  "},
+  {"type":"KeywordDeclaration","value":"DEFINE"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"VARIABLE"},
+  {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"iLoop"},
+  {"type":"Text","value":"            "},
+  {"type":"KeywordReserved","value":"AS"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordType","value":"INTEGER"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"NO-UNDO"},
+  {"type":"Punctuation","value":"."},
+  {"type":"Text","value":"\n  "},
+  {"type":"KeywordDeclaration","value":"DEFINE"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"VARIABLE"},
+  {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"cSetting"},
+  {"type":"Text","value":"         "},
+  {"type":"KeywordReserved","value":"AS"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordType","value":"CHARACTER"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"NO-UNDO"},
+  {"type":"Punctuation","value":"."},
+  {"type":"Text","value":"\n\n  "},
+  {"type":"KeywordDeclaration","value":"DEFINE"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"BUFFER"},
+  {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"bQuery"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"FOR"},
+  {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"ttQuery"},
+  {"type":"Punctuation","value":"."},
+  {"type":"Text","value":"\n  "},
+  {"type":"CommentPreproc","value":"{\u0026timerStart}"},
+  {"type":"Text","value":"\n\n  "},
+  {"type":"CommentMultiline","value":"/* Delete all known queries in memory of this table */"},
+  {"type":"Text","value":"\n  "},
+  {"type":"KeywordReserved","value":"FOR"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"EACH"},
+  {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"bQuery"},
+  {"type":"Text","value":"\n    "},
+  {"type":"KeywordReserved","value":"WHERE"},
+  {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"bQuery"},
+  {"type":"Punctuation","value":"."},
+  {"type":"NameVariable","value":"cDatabase"},
+  {"type":"Text","value":" "},
+  {"type":"Operator","value":"="},
+  {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"pcDatabase"},
+  {"type":"Text","value":"\n      "},
+  {"type":"KeywordReserved","value":"AND"},
+  {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"bQuery"},
+  {"type":"Punctuation","value":"."},
+  {"type":"NameVariable","value":"cTable"},
+  {"type":"Text","value":"    "},
+  {"type":"Operator","value":"="},
+  {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"pcTable"},
+  {"type":"Punctuation","value":":"},
+  {"type":"Text","value":"\n    "},
+  {"type":"KeywordReserved","value":"DELETE"},
+  {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"bQuery"},
+  {"type":"Punctuation","value":"."},
+  {"type":"Text","value":"\n  "},
+  {"type":"KeywordReserved","value":"END"},
+  {"type":"Punctuation","value":"."},
+  {"type":"Text","value":"\n\n  "},
+  {"type":"NameVariable","value":"iMaxQueryHistory"},
+  {"type":"Text","value":" "},
+  {"type":"Operator","value":"="},
+  {"type":"Text","value":" "},
+  {"type":"KeywordType","value":"INTEGER"},
+  {"type":"Punctuation","value":"("},
+  {"type":"NameVariable","value":"getRegistry"},
+  {"type":"Punctuation","value":"("},
+  {"type":"LiteralStringDouble","value":"\"DataDigger\""},
+  {"type":"NameVariable","value":","},
+  {"type":"Text","value":" "},
+  {"type":"LiteralStringDouble","value":"\"MaxQueryHistory\""},
+  {"type":"Text","value":" "},
+  {"type":"Punctuation","value":"))."},
+  {"type":"Text","value":"\n  "},
+  {"type":"KeywordReserved","value":"IF"},
+  {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"iMaxQueryHistory"},
+  {"type":"Text","value":" "},
+  {"type":"Operator","value":"="},
+  {"type":"Text","value":" "},
+  {"type":"LiteralNumberInteger","value":"0"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"THEN"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"RETURN"},
+  {"type":"Punctuation","value":"."},
+  {"type":"Text","value":" "},
+  {"type":"CommentMultiline","value":"/* no query history wanted */"},
+  {"type":"Text","value":"\n\n  "},
+  {"type":"CommentMultiline","value":"/* If it is not defined use default setting */"},
+  {"type":"Text","value":"\n  "},
+  {"type":"KeywordReserved","value":"IF"},
+  {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"iMaxQueryHistory"},
+  {"type":"Text","value":" "},
+  {"type":"Operator","value":"="},
+  {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"?"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"THEN"},
+  {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"iMaxQueryHistory"},
+  {"type":"Text","value":" "},
+  {"type":"Operator","value":"="},
+  {"type":"Text","value":" "},
+  {"type":"LiteralNumberInteger","value":"10"},
+  {"type":"Punctuation","value":"."},
+  {"type":"Text","value":"\n\n  "},
+  {"type":"NameVariable","value":"collectQueries"},
+  {"type":"Punctuation","value":":"},
+  {"type":"Text","value":"\n  "},
+  {"type":"KeywordReserved","value":"DO"},
+  {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"iLoop"},
+  {"type":"Text","value":" "},
+  {"type":"Operator","value":"="},
+  {"type":"Text","value":" "},
+  {"type":"LiteralNumberInteger","value":"1"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"TO"},
+  {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"iMaxQueryHistory"},
+  {"type":"Punctuation","value":":"},
+  {"type":"Text","value":"\n    "},
   {"type":"NameVariable","value":"cSetting"},
   {"type":"Text","value":" "},
   {"type":"Operator","value":"="},
   {"type":"Text","value":" "},
-  {"type":"LiteralStringSingle","value":"'\u003cEmpty\u003e'"},
+  {"type":"NameVariable","value":"getRegistry"},
+  {"type":"Punctuation","value":"("},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"SUBSTITUTE"},
+  {"type":"Punctuation","value":"("},
+  {"type":"LiteralStringDouble","value":"\"DB:\u00261\""},
+  {"type":"NameVariable","value":","},
+  {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"pcDatabase"},
+  {"type":"Punctuation","value":")"},
+  {"type":"Text","value":"\n                          "},
+  {"type":"NameVariable","value":","},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"SUBSTITUTE"},
+  {"type":"Punctuation","value":"("},
+  {"type":"LiteralStringSingle","value":"'\u00261:query:\u00262', pcTable, iLoop )).\n\n    IF cSetting = '\u003cEmpty\u003e'"},
   {"type":"Text","value":" "},
   {"type":"KeywordReserved","value":"THEN"},
   {"type":"Text","value":" "},
@@ -3561,150 +4073,167 @@
   {"type":"Text","value":" "},
   {"type":"Operator","value":"+"},
   {"type":"Text","value":" "},
-  {"type":"LiteralStringSingle","value":"','"},
+  {"type":"LiteralStringSingle","value":"',' + TRIM(ENTRY(iWord,pcPositive),'!'),',').\n\n        /* And wipe it from the positive-list */\n        ENTRY(iWord,pcPositive) = ''.\n      END.\n    END.\n\n    /* Remove empty elements */\n    pcPositive = TRIM(pcPositive,',').\n    REPEAT WHILE INDEX(pcPositive,',,') \u003e 0:\n      pcPositive = REPLACE(pcPositive,',,',',').\n    END.\n  END.\n\nEND PROCEDURE. /* correctFilterList */\n\n/* _UIB-CODE-BLOCK-END */\n\u0026ANALYZE-RESUME\n\n\u0026ENDIF\n\n\u0026IF DEFINED(EXCLUDE-createFolder) = 0 \u0026THEN\n\n\u0026ANALYZE-SUSPEND _UIB-CODE-BLOCK _PROCEDURE createFolder Procedure\nPROCEDURE createFolder :\n/* Create a folder structure\n  */\n  DEFINE INPUT PARAMETER pcFolder AS CHARACTER NO-UNDO.\n\n  DEFINE VARIABLE iElement AS INTEGER     NO-UNDO.\n  DEFINE VARIABLE cPath    AS CHARACTER   NO-UNDO.\n\n  /* c:\\temp\\somefolder\\subfolder\\ */\n  DO iElement = 1 TO NUM-ENTRIES(pcFolder,'\\'):\n    cPath = SUBSTITUTE('\u00261\\\u00262', cPath, ENTRY(iElement,pcFolder,'\\')).\n    cPath = LEFT-TRIM(cPath,'\\').\n\n    IF iElement \u003e 1 THEN OS-CREATE-DIR VALUE(cPath).\n  END.\n\nEND PROCEDURE. /* createFolder */\n\n/* _UIB-CODE-BLOCK-END */\n\u0026ANALYZE-RESUME\n\n\u0026ENDIF\n\n\u0026IF DEFINED(EXCLUDE-dumpRecord) = 0 \u0026THEN\n\n\u0026ANALYZE-SUSPEND _UIB-CODE-BLOCK _PROCEDURE dumpRecord Procedure\nPROCEDURE dumpRecord :\n/* Dump the record(s) to disk\n  */\n  DEFINE INPUT  PARAMETER pcAction   AS CHARACTER   NO-UNDO.\n  DEFINE INPUT  PARAMETER phSource   AS HANDLE      NO-UNDO.\n  DEFINE OUTPUT PARAMETER plContinue AS LOGICAL     NO-UNDO.\n\n  DEFINE VARIABLE hExportTT       AS HANDLE    NO-UNDO.\n  DEFINE VARIABLE hExportTtBuffer AS HANDLE    NO-UNDO.\n  DEFINE VARIABLE hBuffer         AS HANDLE    NO-UNDO.\n  DEFINE VARIABLE cFileName       AS CHARACTER NO-UNDO.\n  DEFINE VARIABLE cError          AS CHARACTER NO-UNDO.\n  DEFINE VARIABLE cMessage        AS CHARACTER NO-UNDO.\n  DEFINE VARIABLE iRow            AS INTEGER   NO-UNDO.\n  DEFINE VARIABLE lDefaultDump    AS LOGICAL   NO-UNDO.\n\n  IF NOT VALID-HANDLE(phSource) THEN RETURN.\n\n  /* Protect against wrong input */\n  IF LOOKUP(pcAction,'Dump,Create,Update,Delete') = 0 THEN\n  DO:\n    MESSAGE 'Unknown action' pcAction VIEW-AS ALERT-BOX INFORMATION BUTTONS OK.\n    RETURN.\n  END.\n\n  /* Determine appropriate buffer and populate an intermediate tt\n   * with the data to export\n   */\n  CASE phSource:TYPE:\n    WHEN 'buffer'"},
   {"type":"Text","value":" "},
-  {"type":"Operator","value":"+"},
+  {"type":"KeywordReserved","value":"THEN\n   "},
   {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"TRIM"},
-  {"type":"Punctuation","value":"("},
-  {"type":"KeywordReserved","value":"ENTRY"},
-  {"type":"Punctuation","value":"("},
-  {"type":"NameVariable","value":"iWord,pcPositive"},
-  {"type":"Punctuation","value":")"},
-  {"type":"NameVariable","value":","},
-  {"type":"LiteralStringSingle","value":"'!'"},
-  {"type":"Punctuation","value":")"},
-  {"type":"NameVariable","value":","},
-  {"type":"LiteralStringSingle","value":"','"},
-  {"type":"Punctuation","value":")."},
-  {"type":"Text","value":"\n\n        "},
-  {"type":"CommentMultiline","value":"/* And wipe it from the positive-list */"},
-  {"type":"Text","value":"\n        "},
-  {"type":"KeywordReserved","value":"ENTRY"},
-  {"type":"Punctuation","value":"("},
-  {"type":"NameVariable","value":"iWord,pcPositive"},
-  {"type":"Punctuation","value":")"},
+  {"type":"KeywordReserved","value":"DO"},
+  {"type":"Punctuation","value":":"},
+  {"type":"Text","value":"\n      "},
+  {"type":"NameVariable","value":"hBuffer"},
   {"type":"Text","value":" "},
   {"type":"Operator","value":"="},
   {"type":"Text","value":" "},
-  {"type":"LiteralStringSingle","value":"''"},
+  {"type":"NameVariable","value":"phSource"},
+  {"type":"Punctuation","value":"."},
+  {"type":"Text","value":"\n\n      "},
+  {"type":"CommentMultiline","value":"/* Create temptable-handle... */"},
+  {"type":"Text","value":"\n      "},
+  {"type":"KeywordReserved","value":"CREATE"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"TEMP-TABLE"},
+  {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"hExportTt"},
   {"type":"Punctuation","value":"."},
   {"type":"Text","value":"\n      "},
-  {"type":"KeywordReserved","value":"END"},
+  {"type":"NameVariable","value":"hExportTt"},
+  {"type":"Punctuation","value":":"},
+  {"type":"KeywordReserved","value":"CREATE-LIKE"},
+  {"type":"Punctuation","value":"("},
+  {"type":"KeywordReserved","value":"SUBSTITUTE"},
+  {"type":"Punctuation","value":"("},
+  {"type":"LiteralStringDouble","value":"\"\u00261.\u00262\""},
+  {"type":"NameVariable","value":","},
+  {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"hBuffer"},
+  {"type":"Punctuation","value":":"},
+  {"type":"KeywordReserved","value":"DBNAME"},
+  {"type":"NameVariable","value":","},
+  {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"hBuffer"},
+  {"type":"Punctuation","value":":"},
+  {"type":"KeywordReserved","value":"TABLE"},
+  {"type":"Punctuation","value":"))."},
+  {"type":"Text","value":"\n\n      "},
+  {"type":"CommentMultiline","value":"/* Prepare the TempTable... */"},
+  {"type":"Text","value":"\n      "},
+  {"type":"NameVariable","value":"hExportTt"},
+  {"type":"Punctuation","value":":"},
+  {"type":"KeywordReserved","value":"TEMP-TABLE-PREPARE"},
+  {"type":"Punctuation","value":"("},
+  {"type":"KeywordReserved","value":"SUBSTITUTE"},
+  {"type":"Punctuation","value":"("},
+  {"type":"LiteralStringDouble","value":"\"\u00261\""},
+  {"type":"NameVariable","value":","},
+  {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"hBuffer"},
+  {"type":"Punctuation","value":":"},
+  {"type":"KeywordReserved","value":"TABLE"},
+  {"type":"Punctuation","value":"))."},
+  {"type":"Text","value":"\n      "},
+  {"type":"NameVariable","value":"hExportTtBuffer"},
+  {"type":"Text","value":" "},
+  {"type":"Operator","value":"="},
+  {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"hExportTt"},
+  {"type":"Punctuation","value":":"},
+  {"type":"KeywordReserved","value":"DEFAULT-BUFFER-HANDLE"},
   {"type":"Punctuation","value":"."},
+  {"type":"Text","value":"\n      "},
+  {"type":"NameVariable","value":"hExportTtBuffer"},
+  {"type":"Punctuation","value":":"},
+  {"type":"KeywordReserved","value":"BUFFER-CREATE"},
+  {"type":"Punctuation","value":"()."},
+  {"type":"Text","value":"\n      "},
+  {"type":"NameVariable","value":"hExportTtBuffer"},
+  {"type":"Punctuation","value":":"},
+  {"type":"KeywordReserved","value":"BUFFER-COPY"},
+  {"type":"Punctuation","value":"("},
+  {"type":"NameVariable","value":"hBuffer"},
+  {"type":"Punctuation","value":")."},
   {"type":"Text","value":"\n    "},
   {"type":"KeywordReserved","value":"END"},
   {"type":"Punctuation","value":"."},
   {"type":"Text","value":"\n\n    "},
-  {"type":"CommentMultiline","value":"/* Remove empty elements */"},
-  {"type":"Text","value":"\n    "},
-  {"type":"NameVariable","value":"pcPositive"},
+  {"type":"KeywordReserved","value":"WHEN "},
+  {"type":"LiteralStringSingle","value":"'browse'"},
   {"type":"Text","value":" "},
-  {"type":"Operator","value":"="},
+  {"type":"KeywordReserved","value":"THEN\n   "},
   {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"TRIM"},
-  {"type":"Punctuation","value":"("},
-  {"type":"NameVariable","value":"pcPositive,"},
-  {"type":"LiteralStringSingle","value":"','"},
-  {"type":"Punctuation","value":")."},
-  {"type":"Text","value":"\n    "},
-  {"type":"KeywordReserved","value":"REPEAT"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"WHILE"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"INDEX"},
-  {"type":"Punctuation","value":"("},
-  {"type":"NameVariable","value":"pcPositive,"},
-  {"type":"LiteralStringSingle","value":"',,'"},
-  {"type":"Punctuation","value":")"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"\u003e"},
-  {"type":"Text","value":" "},
-  {"type":"LiteralNumberInteger","value":"0"},
+  {"type":"KeywordReserved","value":"DO"},
   {"type":"Punctuation","value":":"},
   {"type":"Text","value":"\n      "},
-  {"type":"NameVariable","value":"pcPositive"},
+  {"type":"NameVariable","value":"hBuffer"},
   {"type":"Text","value":" "},
   {"type":"Operator","value":"="},
   {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"REPLACE"},
-  {"type":"Punctuation","value":"("},
-  {"type":"NameVariable","value":"pcPositive,"},
-  {"type":"LiteralStringSingle","value":"',,'"},
-  {"type":"NameVariable","value":","},
-  {"type":"LiteralStringSingle","value":"','"},
-  {"type":"Punctuation","value":")."},
-  {"type":"Text","value":"\n    "},
-  {"type":"KeywordReserved","value":"END"},
-  {"type":"Punctuation","value":"."},
-  {"type":"Text","value":"\n  "},
-  {"type":"KeywordReserved","value":"END"},
-  {"type":"Punctuation","value":"."},
-  {"type":"Text","value":"\n\n"},
-  {"type":"KeywordReserved","value":"END"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"PROCEDURE"},
-  {"type":"Punctuation","value":"."},
-  {"type":"Text","value":" "},
-  {"type":"CommentMultiline","value":"/* correctFilterList */"},
-  {"type":"Text","value":"\n\n"},
-  {"type":"CommentMultiline","value":"/* _UIB-CODE-BLOCK-END */"},
-  {"type":"CommentPreproc","value":"\n\u0026ANALYZE-RESUME\n\n\u0026ENDIF\n\n\u0026IF DEFINED(EXCLUDE-createFolder) = 0 \u0026THEN\n\n\u0026ANALYZE-SUSPEND _UIB-CODE-BLOCK _PROCEDURE createFolder Procedure"},
-  {"type":"Text","value":"\n"},
-  {"type":"KeywordReserved","value":"PROCEDURE"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"createFolder"},
-  {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"phSource"},
   {"type":"Punctuation","value":":"},
-  {"type":"Text","value":"\n"},
-  {"type":"CommentMultiline","value":"/* Create a folder structure\n  */"},
-  {"type":"Text","value":"\n  "},
-  {"type":"KeywordDeclaration","value":"DEFINE"},
+  {"type":"KeywordReserved","value":"QUERY"},
+  {"type":"Punctuation","value":":"},
+  {"type":"KeywordReserved","value":"GET-BUFFER-HANDLE"},
+  {"type":"Punctuation","value":"("},
+  {"type":"LiteralNumberInteger","value":"1"},
+  {"type":"Punctuation","value":")."},
+  {"type":"Text","value":"\n\n      "},
+  {"type":"CommentMultiline","value":"/* Create temptable-handle... */"},
+  {"type":"Text","value":"\n      "},
+  {"type":"KeywordReserved","value":"CREATE"},
   {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"INPUT"},
+  {"type":"KeywordReserved","value":"TEMP-TABLE"},
   {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"PARAMETER"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"pcFolder"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"AS"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordType","value":"CHARACTER"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"NO-UNDO"},
+  {"type":"NameVariable","value":"hExportTt"},
   {"type":"Punctuation","value":"."},
-  {"type":"Text","value":"\n\n  "},
-  {"type":"KeywordDeclaration","value":"DEFINE"},
+  {"type":"Text","value":"\n      "},
+  {"type":"NameVariable","value":"hExportTt"},
+  {"type":"Punctuation","value":":"},
+  {"type":"KeywordReserved","value":"CREATE-LIKE"},
+  {"type":"Punctuation","value":"("},
+  {"type":"KeywordReserved","value":"SUBSTITUTE"},
+  {"type":"Punctuation","value":"("},
+  {"type":"LiteralStringDouble","value":"\"\u00261.\u00262\""},
+  {"type":"NameVariable","value":","},
   {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"VARIABLE"},
+  {"type":"NameVariable","value":"hBuffer"},
+  {"type":"Punctuation","value":":"},
+  {"type":"KeywordReserved","value":"DBNAME"},
+  {"type":"NameVariable","value":","},
   {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"iElement"},
+  {"type":"NameVariable","value":"hBuffer"},
+  {"type":"Punctuation","value":":"},
+  {"type":"KeywordReserved","value":"TABLE"},
+  {"type":"Punctuation","value":"))."},
+  {"type":"Text","value":"\n\n      "},
+  {"type":"CommentMultiline","value":"/* Prepare the TempTable... */"},
+  {"type":"Text","value":"\n      "},
+  {"type":"NameVariable","value":"hExportTt"},
+  {"type":"Punctuation","value":":"},
+  {"type":"KeywordReserved","value":"TEMP-TABLE-PREPARE"},
+  {"type":"Punctuation","value":"("},
+  {"type":"KeywordReserved","value":"SUBSTITUTE"},
+  {"type":"Punctuation","value":"("},
+  {"type":"LiteralStringDouble","value":"\"\u00261\""},
+  {"type":"NameVariable","value":","},
   {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"AS"},
+  {"type":"NameVariable","value":"hBuffer"},
+  {"type":"Punctuation","value":":"},
+  {"type":"KeywordReserved","value":"TABLE"},
+  {"type":"Punctuation","value":"))."},
+  {"type":"Text","value":"\n      "},
+  {"type":"NameVariable","value":"hExportTtBuffer"},
   {"type":"Text","value":" "},
-  {"type":"KeywordType","value":"INTEGER    "},
+  {"type":"Operator","value":"="},
   {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"NO-UNDO"},
+  {"type":"NameVariable","value":"hExportTt"},
+  {"type":"Punctuation","value":":"},
+  {"type":"KeywordReserved","value":"DEFAULT-BUFFER-HANDLE"},
   {"type":"Punctuation","value":"."},
-  {"type":"Text","value":"\n  "},
-  {"type":"KeywordDeclaration","value":"DEFINE"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"VARIABLE"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"cPath"},
-  {"type":"Text","value":"    "},
-  {"type":"KeywordReserved","value":"AS"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordType","value":"CHARACTER  "},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"NO-UNDO"},
-  {"type":"Punctuation","value":"."},
-  {"type":"Text","value":"\n\n  "},
-  {"type":"CommentMultiline","value":"/* c:\\temp\\somefolder\\subfolder\\ */"},
-  {"type":"Text","value":"\n  "},
+  {"type":"Text","value":"\n\n      "},
+  {"type":"CommentMultiline","value":"/* Copy the records */"},
+  {"type":"Text","value":"\n      "},
   {"type":"KeywordReserved","value":"DO"},
   {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"iElement"},
+  {"type":"NameVariable","value":"iRow"},
   {"type":"Text","value":" "},
   {"type":"Operator","value":"="},
   {"type":"Text","value":" "},
@@ -3712,45 +4241,47 @@
   {"type":"Text","value":" "},
   {"type":"KeywordReserved","value":"TO"},
   {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"NUM-ENTRIES"},
+  {"type":"NameVariable","value":"phSource"},
+  {"type":"Punctuation","value":":"},
+  {"type":"KeywordReserved","value":"NUM-SELECTED-ROWS"},
+  {"type":"Punctuation","value":":"},
+  {"type":"Text","value":"\n        "},
+  {"type":"NameVariable","value":"phSource"},
+  {"type":"Punctuation","value":":"},
+  {"type":"KeywordReserved","value":"FETCH-SELECTED-ROW"},
   {"type":"Punctuation","value":"("},
-  {"type":"NameVariable","value":"pcFolder,"},
-  {"type":"LiteralStringSingle","value":"'\\'):\n    cPath = SUBSTITUTE('"},
-  {"type":"CommentPreproc","value":"\u00261\\\u00262', cPath, ENTRY(iElement,pcFolder,'\\'))."},
+  {"type":"NameVariable","value":"iRow"},
+  {"type":"Punctuation","value":")."},
+  {"type":"Text","value":"\n        "},
+  {"type":"NameVariable","value":"hExportTtBuffer"},
+  {"type":"Punctuation","value":":"},
+  {"type":"KeywordReserved","value":"BUFFER-CREATE"},
+  {"type":"Punctuation","value":"()."},
+  {"type":"Text","value":"\n        "},
+  {"type":"NameVariable","value":"hExportTtBuffer"},
+  {"type":"Punctuation","value":":"},
+  {"type":"KeywordReserved","value":"BUFFER-COPY"},
+  {"type":"Punctuation","value":"("},
+  {"type":"NameVariable","value":"hBuffer"},
+  {"type":"Punctuation","value":")."},
+  {"type":"Text","value":"\n      "},
+  {"type":"KeywordReserved","value":"END"},
+  {"type":"Punctuation","value":"."},
   {"type":"Text","value":"\n    "},
-  {"type":"NameVariable","value":"cPath"},
+  {"type":"KeywordReserved","value":"END"},
+  {"type":"Punctuation","value":"."},
+  {"type":"Text","value":"\n\n    "},
+  {"type":"KeywordReserved","value":"OTHERWISE"},
   {"type":"Text","value":" "},
-  {"type":"Operator","value":"="},
+  {"type":"KeywordReserved","value":"RETURN"},
+  {"type":"Punctuation","value":"."},
+  {"type":"Text","value":"\n  "},
+  {"type":"KeywordReserved","value":"END"},
   {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"LEFT-TRIM"},
-  {"type":"Punctuation","value":"("},
-  {"type":"NameVariable","value":"cPath,"},
-  {"type":"LiteralStringSingle","value":"'\\').\n\n    IF iElement \u003e 1 THEN OS-CREATE-DIR VALUE(cPath).\n  END.\n\nEND PROCEDURE. /* createFolder */\n\n/* _UIB-CODE-BLOCK-END */\n\u0026ANALYZE-RESUME\n\n\u0026ENDIF\n\n\u0026IF DEFINED(EXCLUDE-dumpRecord) = 0 \u0026THEN\n\n\u0026ANALYZE-SUSPEND _UIB-CODE-BLOCK _PROCEDURE dumpRecord Procedure\nPROCEDURE dumpRecord :\n/* Dump the record(s) to disk\n  */\n  DEFINE INPUT  PARAMETER pcAction   AS CHARACTER   NO-UNDO.\n  DEFINE INPUT  PARAMETER phSource   AS HANDLE      NO-UNDO.\n  DEFINE OUTPUT PARAMETER plContinue AS LOGICAL     NO-UNDO.\n\n  DEFINE VARIABLE hExportTT       AS HANDLE    NO-UNDO.\n  DEFINE VARIABLE hExportTtBuffer AS HANDLE    NO-UNDO.\n  DEFINE VARIABLE hBuffer         AS HANDLE    NO-UNDO.\n  DEFINE VARIABLE cFileName       AS CHARACTER NO-UNDO.\n  DEFINE VARIABLE cError          AS CHARACTER NO-UNDO.\n  DEFINE VARIABLE cMessage        AS CHARACTER NO-UNDO.\n  DEFINE VARIABLE iRow            AS INTEGER   NO-UNDO.\n  DEFINE VARIABLE lDefaultDump    AS LOGICAL   NO-UNDO.\n\n  IF NOT VALID-HANDLE(phSource) THEN RETURN.\n\n  /* Protect against wrong input */\n  IF LOOKUP(pcAction,'"},
-  {"type":"KeywordReserved","value":"Dump"},
-  {"type":"NameVariable","value":","},
-  {"type":"KeywordReserved","value":"Create"},
-  {"type":"NameVariable","value":","},
-  {"type":"KeywordReserved","value":"Update"},
-  {"type":"NameVariable","value":","},
-  {"type":"KeywordReserved","value":"Delete"},
-  {"type":"LiteralStringSingle","value":"') = 0 THEN\n  DO:\n    MESSAGE '"},
-  {"type":"NameVariable","value":"Unknown"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"action"},
-  {"type":"LiteralStringSingle","value":"' pcAction VIEW-AS ALERT-BOX INFORMATION BUTTONS OK.\n    RETURN.\n  END.\n\n  /* Determine appropriate buffer and populate an intermediate tt\n   * with the data to export\n   */\n  CASE phSource:TYPE:\n    WHEN '"},
-  {"type":"KeywordReserved","value":"buffer"},
-  {"type":"LiteralStringSingle","value":"' THEN\n    DO:\n      hBuffer = phSource.\n\n      /* Create temptable-handle... */\n      CREATE TEMP-TABLE hExportTt.\n      hExportTt:CREATE-LIKE(SUBSTITUTE(\"\u00261.\u00262\", hBuffer:DBNAME, hBuffer:TABLE)).\n\n      /* Prepare the TempTable... */\n      hExportTt:TEMP-TABLE-PREPARE(SUBSTITUTE(\"\u00261\", hBuffer:TABLE)).\n      hExportTtBuffer = hExportTt:DEFAULT-BUFFER-HANDLE.\n      hExportTtBuffer:BUFFER-CREATE().\n      hExportTtBuffer:BUFFER-COPY(hBuffer).\n    END.\n\n    WHEN '"},
-  {"type":"KeywordReserved","value":"browse"},
-  {"type":"LiteralStringSingle","value":"' THEN\n    DO:\n      hBuffer = phSource:QUERY:GET-BUFFER-HANDLE(1).\n\n      /* Create temptable-handle... */\n      CREATE TEMP-TABLE hExportTt.\n      hExportTt:CREATE-LIKE(SUBSTITUTE(\"\u00261.\u00262\", hBuffer:DBNAME, hBuffer:TABLE)).\n\n      /* Prepare the TempTable... */\n      hExportTt:TEMP-TABLE-PREPARE(SUBSTITUTE(\"\u00261\", hBuffer:TABLE)).\n      hExportTtBuffer = hExportTt:DEFAULT-BUFFER-HANDLE.\n\n      /* Copy the records */\n      DO iRow = 1 TO phSource:NUM-SELECTED-ROWS:\n        phSource:FETCH-SELECTED-ROW(iRow).\n        hExportTtBuffer:BUFFER-CREATE().\n        hExportTtBuffer:BUFFER-COPY(hBuffer).\n      END.\n    END.\n\n    OTHERWISE RETURN.\n  END CASE.\n\n  /* Do we need to dump at all?\n   * If the setting=NO or if no setting at all, then don'"},
-  {"type":"NameVariable","value":"t"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"do"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"any"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"checks"},
-  {"type":"Text","value":"\n   "},
-  {"type":"Operator","value":"*/"},
+  {"type":"KeywordReserved","value":"CASE"},
+  {"type":"Punctuation","value":"."},
+  {"type":"Text","value":"\n\n  "},
+  {"type":"CommentMultiline","value":"/* Do we need to dump at all?\n   * If the setting=NO or if no setting at all, then don't do any checks\n   */"},
   {"type":"Text","value":"\n  "},
   {"type":"KeywordReserved","value":"IF"},
   {"type":"Text","value":" "},
@@ -3758,35 +4289,7 @@
   {"type":"Text","value":" "},
   {"type":"NameVariable","value":"\u003c\u003e"},
   {"type":"Text","value":" "},
-  {"type":"LiteralStringSingle","value":"'Dump'"},
-  {"type":"Text","value":"\n    "},
-  {"type":"KeywordReserved","value":"AND "},
-  {"type":"Punctuation","value":"("},
-  {"type":"Text","value":"   "},
-  {"type":"NameVariable","value":"getRegistry"},
-  {"type":"Punctuation","value":"("},
-  {"type":"LiteralStringSingle","value":"'DataDigger:Backup'"},
-  {"type":"NameVariable","value":","},
-  {"type":"LiteralStringSingle","value":"'BackupOn'"},
-  {"type":"Text","value":" "},
-  {"type":"Operator","value":"+"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"pcAction"},
-  {"type":"Punctuation","value":")"},
-  {"type":"Text","value":" "},
-  {"type":"Operator","value":"="},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"?"},
-  {"type":"Text","value":"\n        "},
-  {"type":"KeywordReserved","value":"OR"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordType","value":"logical"},
-  {"type":"Punctuation","value":"("},
-  {"type":"NameVariable","value":"getRegistry"},
-  {"type":"Punctuation","value":"("},
-  {"type":"LiteralStringSingle","value":"'DataDigger:Backup'"},
-  {"type":"NameVariable","value":","},
-  {"type":"LiteralStringSingle","value":"'BackupOn'"},
+  {"type":"LiteralStringSingle","value":"'Dump'\n    AND (   getRegistry('DataDigger:Backup','BackupOn' + pcAction) = ?\n        OR logical(getRegistry('DataDigger:Backup','BackupOn'"},
   {"type":"Text","value":" "},
   {"type":"Operator","value":"+"},
   {"type":"Text","value":" "},
@@ -4716,73 +5219,7 @@
   {"type":"KeywordReserved","value":"PUT"},
   {"type":"Text","value":" "},
   {"type":"KeywordReserved","value":"CONTROL "},
-  {"type":"LiteralStringSingle","value":"' '"},
-  {"type":"Punctuation","value":":"},
-  {"type":"NameVariable","value":"u"},
-  {"type":"Punctuation","value":"."},
-  {"type":"Text","value":"\n      "},
-  {"type":"KeywordReserved","value":"END"},
-  {"type":"Punctuation","value":"."},
-  {"type":"Text","value":"\n\n      "},
-  {"type":"KeywordReserved","value":"IF"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"hField"},
-  {"type":"Punctuation","value":":"},
-  {"type":"KeywordReserved","value":"EXTENT "},
-  {"type":"NameVariable","value":"\u003e"},
-  {"type":"Text","value":" "},
-  {"type":"LiteralNumberInteger","value":"1"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"THEN\n     "},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"DO"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"iExtent"},
-  {"type":"Text","value":" "},
-  {"type":"Operator","value":"="},
-  {"type":"Text","value":" "},
-  {"type":"LiteralNumberInteger","value":"1"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"TO"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"hField"},
-  {"type":"Punctuation","value":":"},
-  {"type":"KeywordReserved","value":"EXTENT"},
-  {"type":"Punctuation","value":":"},
-  {"type":"Text","value":"\n        "},
-  {"type":"KeywordReserved","value":"IF"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"iExtent"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"\u003e"},
-  {"type":"Text","value":" "},
-  {"type":"LiteralNumberInteger","value":"1"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"THEN\n       "},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"DO"},
-  {"type":"Punctuation","value":":"},
-  {"type":"Text","value":"\n          "},
-  {"type":"KeywordReserved","value":"SEEK"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"OUTPUT"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"TO"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"SEEK"},
-  {"type":"Punctuation","value":"("},
-  {"type":"KeywordReserved","value":"OUTPUT"},
-  {"type":"Punctuation","value":")"},
-  {"type":"Text","value":" "},
-  {"type":"Operator","value":"-"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"iBack"},
-  {"type":"Punctuation","value":"."},
-  {"type":"Text","value":"\n          "},
-  {"type":"KeywordReserved","value":"PUT"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"CONTROL "},
-  {"type":"LiteralStringSingle","value":"' '"},
+  {"type":"LiteralStringSingle","value":"' ':u.\n      END.\n\n      IF hField:EXTENT \u003e 1 THEN\n      DO iExtent = 1 TO hField:EXTENT:\n        IF iExtent \u003e 1 THEN\n        DO:\n          SEEK OUTPUT TO SEEK(OUTPUT) - iBack.\n          PUT CONTROL ' '"},
   {"type":"Punctuation","value":":"},
   {"type":"NameVariable","value":"u"},
   {"type":"Punctuation","value":"."},
@@ -5364,25 +5801,7 @@
   {"type":"Text","value":" "},
   {"type":"KeywordReserved","value":"INITIAL "},
   {"type":"NameVariable","value":"["},
-  {"type":"LiteralStringSingle","value":"'Sun'"},
-  {"type":"NameVariable","value":","},
-  {"type":"Text","value":" "},
-  {"type":"LiteralStringSingle","value":"'Mon'"},
-  {"type":"NameVariable","value":","},
-  {"type":"Text","value":" "},
-  {"type":"LiteralStringSingle","value":"'Tue'"},
-  {"type":"NameVariable","value":","},
-  {"type":"Text","value":" "},
-  {"type":"LiteralStringSingle","value":"'Wed'"},
-  {"type":"NameVariable","value":","},
-  {"type":"Text","value":" "},
-  {"type":"LiteralStringSingle","value":"'Thu'"},
-  {"type":"NameVariable","value":","},
-  {"type":"Text","value":" "},
-  {"type":"LiteralStringSingle","value":"'Fri'"},
-  {"type":"NameVariable","value":","},
-  {"type":"Text","value":" "},
-  {"type":"LiteralStringSingle","value":"'Sat'"},
+  {"type":"LiteralStringSingle","value":"'Sun', 'Mon', 'Tue', 'Wed', 'Thu', 'Fri', 'Sat'"},
   {"type":"NameVariable","value":"]"},
   {"type":"Punctuation","value":"."},
   {"type":"Text","value":"\n  "},
@@ -5614,123 +6033,77 @@
   {"type":"LiteralStringDouble","value":"\"DumpDir\""},
   {"type":"Punctuation","value":")"},
   {"type":"NameVariable","value":","},
-  {"type":"LiteralStringSingle","value":"'/\\') + '"},
-  {"type":"NameVariable","value":"\\"},
-  {"type":"LiteralStringSingle","value":"'.\n  IF cDumpDir = ? OR cDumpDir = '' THEN cDumpDir = \"\u003cWORKDIR\u003edump\\\".\n\n  cBackupDir  = RIGHT-TRIM(getRegistry(\"DataDigger:Backup\", \"BackupDir\"),'"},
-  {"type":"Operator","value":"/"},
-  {"type":"NameVariable","value":"\\"},
-  {"type":"LiteralStringSingle","value":"') + '"},
-  {"type":"NameVariable","value":"\\"},
-  {"type":"LiteralStringSingle","value":"'.\n  IF cBackupDir = ? OR cBackupDir = '' THEN cBackupDir = \"\u003cWORKDIR\u003ebackup\\\".\n\n  cLastDir = RIGHT-TRIM(getRegistry(\"DumpAndLoad\", \"DumpLastFileName\"),'"},
-  {"type":"Operator","value":"/"},
-  {"type":"NameVariable","value":"\\"},
-  {"type":"LiteralStringSingle","value":"').\n  cLastDir = SUBSTRING(cLastDir,1,R-INDEX(cLastDir,\"\\\")).\n  IF cLastDir = ? THEN cLastDir = \"\u003cWORKDIR\u003edump\".\n  cLastDir = RIGHT-TRIM(cLastDir,'"},
-  {"type":"NameVariable","value":"\\"},
-  {"type":"LiteralStringSingle","value":"').\n\n  /* Find _file for the dump-name */\n  CREATE BUFFER hBuffer FOR TABLE SUBSTITUTE('"},
-  {"type":"CommentPreproc","value":"\u00261._file', pcDatabase) NO-ERROR."},
-  {"type":"Text","value":"\n  "},
-  {"type":"KeywordReserved","value":"IF"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"VALID-HANDLE"},
-  {"type":"Punctuation","value":"("},
-  {"type":"NameVariable","value":"hBuffer"},
-  {"type":"Punctuation","value":")"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"THEN\n "},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"DO"},
-  {"type":"Punctuation","value":":"},
-  {"type":"Text","value":"\n    "},
-  {"type":"NameVariable","value":"hBuffer"},
-  {"type":"Punctuation","value":":"},
-  {"type":"KeywordReserved","value":"FIND-UNIQUE"},
-  {"type":"Punctuation","value":"("},
-  {"type":"KeywordReserved","value":"SUBSTITUTE"},
-  {"type":"Punctuation","value":"("},
-  {"type":"LiteralStringSingle","value":"'where _file-name = \u00261 and _File._File-Number \u003c 32768'"},
-  {"type":"NameVariable","value":","},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"QUOTER"},
-  {"type":"Punctuation","value":"("},
-  {"type":"NameVariable","value":"pcTable"},
-  {"type":"Punctuation","value":"))"},
-  {"type":"NameVariable","value":","},
-  {"type":"KeywordReserved","value":"NO-LOCK"},
-  {"type":"Punctuation","value":")."},
-  {"type":"Text","value":"\n    "},
-  {"type":"KeywordReserved","value":"IF"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"hBuffer"},
-  {"type":"Punctuation","value":":"},
-  {"type":"KeywordReserved","value":"AVAILABLE"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"THEN\n     "},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"cDumpName"},
-  {"type":"Text","value":" "},
-  {"type":"Operator","value":"="},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"hBuffer"},
-  {"type":"Punctuation","value":"::"},
-  {"type":"NameVariable","value":"_dump"},
-  {"type":"Operator","value":"-"},
-  {"type":"NameVariable","value":"name"},
-  {"type":"Punctuation","value":"."},
-  {"type":"Text","value":"\n    "},
-  {"type":"KeywordReserved","value":"ELSE\n     "},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"cDumpName"},
-  {"type":"Text","value":" "},
-  {"type":"Operator","value":"="},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"pcTable"},
-  {"type":"Punctuation","value":"."},
-  {"type":"Text","value":"\n  "},
-  {"type":"KeywordReserved","value":"END"},
-  {"type":"Punctuation","value":"."},
-  {"type":"Text","value":"\n  "},
-  {"type":"KeywordReserved","value":"ELSE\n   "},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"cDumpName"},
-  {"type":"Text","value":" "},
-  {"type":"Operator","value":"="},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"pcTable"},
-  {"type":"Punctuation","value":"."},
-  {"type":"Text","value":"\n  "},
-  {"type":"KeywordReserved","value":"IF"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"cDumpName"},
-  {"type":"Text","value":" "},
-  {"type":"Operator","value":"="},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"?"},
+  {"type":"LiteralStringSingle","value":"'/\\') + '\\'.\n  IF cDumpDir = ? OR cDumpDir = ''"},
   {"type":"Text","value":" "},
   {"type":"KeywordReserved","value":"THEN"},
   {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"cDumpName"},
+  {"type":"NameVariable","value":"cDumpDir"},
   {"type":"Text","value":" "},
   {"type":"Operator","value":"="},
   {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"pcTable"},
+  {"type":"LiteralStringDouble","value":"\"\u003cWORKDIR\u003edump\\\""},
   {"type":"Punctuation","value":"."},
   {"type":"Text","value":"\n\n  "},
-  {"type":"CommentMultiline","value":"/* If you have no db connected, userid gives back unknown value\n   * which misbehaves in a replace statement */"},
-  {"type":"Text","value":"\n  "},
-  {"type":"NameVariable","value":"cUserId"},
+  {"type":"NameVariable","value":"cBackupDir"},
+  {"type":"Text","value":"  "},
+  {"type":"Operator","value":"="},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"RIGHT-TRIM"},
+  {"type":"Punctuation","value":"("},
+  {"type":"NameVariable","value":"getRegistry"},
+  {"type":"Punctuation","value":"("},
+  {"type":"LiteralStringDouble","value":"\"DataDigger:Backup\""},
+  {"type":"NameVariable","value":","},
+  {"type":"Text","value":" "},
+  {"type":"LiteralStringDouble","value":"\"BackupDir\""},
+  {"type":"Punctuation","value":")"},
+  {"type":"NameVariable","value":","},
+  {"type":"LiteralStringSingle","value":"'/\\') + '\\'.\n  IF cBackupDir = ? OR cBackupDir = ''"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"THEN"},
+  {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"cBackupDir"},
   {"type":"Text","value":" "},
   {"type":"Operator","value":"="},
   {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"USERID"},
+  {"type":"LiteralStringDouble","value":"\"\u003cWORKDIR\u003ebackup\\\""},
+  {"type":"Punctuation","value":"."},
+  {"type":"Text","value":"\n\n  "},
+  {"type":"NameVariable","value":"cLastDir"},
+  {"type":"Text","value":" "},
+  {"type":"Operator","value":"="},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"RIGHT-TRIM"},
   {"type":"Punctuation","value":"("},
-  {"type":"KeywordReserved","value":"LDBNAME"},
+  {"type":"NameVariable","value":"getRegistry"},
   {"type":"Punctuation","value":"("},
+  {"type":"LiteralStringDouble","value":"\"DumpAndLoad\""},
+  {"type":"NameVariable","value":","},
+  {"type":"Text","value":" "},
+  {"type":"LiteralStringDouble","value":"\"DumpLastFileName\""},
+  {"type":"Punctuation","value":")"},
+  {"type":"NameVariable","value":","},
+  {"type":"LiteralStringSingle","value":"'/\\'"},
+  {"type":"Punctuation","value":")."},
+  {"type":"Text","value":"\n  "},
+  {"type":"NameVariable","value":"cLastDir"},
+  {"type":"Text","value":" "},
+  {"type":"Operator","value":"="},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"SUBSTRING"},
+  {"type":"Punctuation","value":"("},
+  {"type":"NameVariable","value":"cLastDir,"},
   {"type":"LiteralNumberInteger","value":"1"},
+  {"type":"NameVariable","value":","},
+  {"type":"KeywordReserved","value":"R-INDEX"},
+  {"type":"Punctuation","value":"("},
+  {"type":"NameVariable","value":"cLastDir,"},
+  {"type":"LiteralStringDouble","value":"\"\\\""},
   {"type":"Punctuation","value":"))."},
   {"type":"Text","value":"\n  "},
   {"type":"KeywordReserved","value":"IF"},
   {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"cUserId"},
+  {"type":"NameVariable","value":"cLastDir"},
   {"type":"Text","value":" "},
   {"type":"Operator","value":"="},
   {"type":"Text","value":" "},
@@ -5738,11 +6111,21 @@
   {"type":"Text","value":" "},
   {"type":"KeywordReserved","value":"THEN"},
   {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"cUserId"},
+  {"type":"NameVariable","value":"cLastDir"},
   {"type":"Text","value":" "},
   {"type":"Operator","value":"="},
   {"type":"Text","value":" "},
-  {"type":"LiteralStringSingle","value":"''"},
+  {"type":"LiteralStringDouble","value":"\"\u003cWORKDIR\u003edump\""},
+  {"type":"Punctuation","value":"."},
+  {"type":"Text","value":"\n  "},
+  {"type":"NameVariable","value":"cLastDir"},
+  {"type":"Text","value":" "},
+  {"type":"Operator","value":"="},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"RIGHT-TRIM"},
+  {"type":"Punctuation","value":"("},
+  {"type":"NameVariable","value":"cLastDir,"},
+  {"type":"LiteralStringSingle","value":"'\\').\n\n  /* Find _file for the dump-name */\n  CREATE BUFFER hBuffer FOR TABLE SUBSTITUTE('\u00261._file', pcDatabase) NO-ERROR.\n  IF VALID-HANDLE(hBuffer) THEN\n  DO:\n    hBuffer:FIND-UNIQUE(SUBSTITUTE('where _file-name = \u00261 and _File._File-Number \u003c 32768', QUOTER(pcTable)),NO-LOCK).\n    IF hBuffer:AVAILABLE THEN\n      cDumpName = hBuffer::_dump-name.\n    ELSE\n      cDumpName = pcTable.\n  END.\n  ELSE\n    cDumpName = pcTable.\n  IF cDumpName = ? THEN cDumpName = pcTable.\n\n  /* If you have no db connected, userid gives back unknown value\n   * which misbehaves in a replace statement */\n  cUserId = USERID(LDBNAME(1)).\n  IF cUserId = ? THEN cUserId = ''"},
   {"type":"Punctuation","value":"."},
   {"type":"Text","value":"\n\n  "},
   {"type":"KeywordReserved","value":"PUBLISH "},
@@ -6221,38 +6604,664 @@
   {"type":"KeywordReserved","value":"TRIM"},
   {"type":"Punctuation","value":"("},
   {"type":"NameVariable","value":"pcFileName,"},
-  {"type":"LiteralStringSingle","value":"'/\\').\n\n  /* Get rid of double slashes (except at the beginning for UNC paths) */\n  pcFileName = SUBSTRING(pcFileName,1,1) + REPLACE(SUBSTRING(pcFileName,2),'"},
-  {"type":"NameVariable","value":"\\\\"},
-  {"type":"LiteralStringSingle","value":"','"},
-  {"type":"NameVariable","value":"\\"},
-  {"type":"LiteralStringSingle","value":"').\n\n  /* Sequences */\n  pcFileName = resolveSequence(pcFileName).\n\n  /* OS-vars */\n  pcFileName = resolveOsVars(pcFileName).\n\n  /* Make lower */\n  pcFileName = LC(pcFileName).\n  PUBLISH \"debugInfo\" (3, SUBSTITUTE(\"Dump to: \u00261\", pcFileName)).\n\nEND PROCEDURE. /* getDumpFileName */\n\n/* _UIB-CODE-BLOCK-END */\n\u0026ANALYZE-RESUME\n\n\u0026ENDIF\n\n\u0026IF DEFINED(EXCLUDE-getFavourites) = 0 \u0026THEN\n\n\u0026ANALYZE-SUSPEND _UIB-CODE-BLOCK _PROCEDURE getFavourites Procedure\nPROCEDURE getFavourites :\n/* Extract favourites from config table into own tt\n*/\n  DEFINE OUTPUT PARAMETER TABLE FOR ttFavGroup.\n\n  DEFINE BUFFER bfConfig   FOR ttConfig.\n  DEFINE BUFFER btFavGroup FOR ttFavGroup.\n\n  EMPTY TEMP-TABLE ttFavGroup.\n\n  FOR EACH bfConfig\n    WHERE bfConfig.cSection = '"},
-  {"type":"NameVariable","value":"DataDigger"},
-  {"type":"Punctuation","value":":"},
-  {"type":"NameVariable","value":"Favourites"},
-  {"type":"LiteralStringSingle","value":"'\n      AND bfConfig.cSetting \u003e \"\":\n\n    CREATE btFavGroup.\n    ASSIGN\n      btFavGroup.cGroup  = bfConfig.cSetting\n      btFavGroup.cTables = bfConfig.cValue.\n  END.\n\n  /* If no groups are found, create a default one */\n  IF NOT CAN-FIND(FIRST btFavGroup) THEN\n  DO:\n    CREATE btFavGroup.\n    ASSIGN btFavGroup.cGroup = '"},
-  {"type":"NameVariable","value":"MyFavourites"},
-  {"type":"LiteralStringSingle","value":"'.\n  END.\n\nEND PROCEDURE. /* getFavourites */\n\n/* _UIB-CODE-BLOCK-END */\n\u0026ANALYZE-RESUME\n\n\u0026ENDIF\n\n\u0026IF DEFINED(EXCLUDE-getFields) = 0 \u0026THEN\n\n\u0026ANALYZE-SUSPEND _UIB-CODE-BLOCK _PROCEDURE getFields Procedure\nPROCEDURE getFields :\n/* Fill the fields temp-table\n  */\n  DEFINE INPUT  PARAMETER pcDatabase  AS CHARACTER   NO-UNDO.\n  DEFINE INPUT  PARAMETER pcTableName AS CHARACTER   NO-UNDO.\n  DEFINE OUTPUT PARAMETER DATASET FOR dsFields.\n\n  DEFINE VARIABLE cCacheFile         AS CHARACTER   NO-UNDO.\n  DEFINE VARIABLE cPrimIndexFields   AS CHARACTER   NO-UNDO.\n  DEFINE VARIABLE cQuery             AS CHARACTER   NO-UNDO.\n  DEFINE VARIABLE cSelectedFields    AS CHARACTER   NO-UNDO.\n  DEFINE VARIABLE cUniqueIndexFields AS CHARACTER   NO-UNDO.\n  DEFINE VARIABLE cSDBName           AS CHARACTER   NO-UNDO.\n  DEFINE VARIABLE hBufferField       AS HANDLE      NO-UNDO.\n  DEFINE VARIABLE hBufferFile        AS HANDLE      NO-UNDO.\n  DEFINE VARIABLE hQuery             AS HANDLE      NO-UNDO.\n  DEFINE VARIABLE iFieldExtent       AS INTEGER     NO-UNDO.\n  DEFINE VARIABLE iFieldOrder        AS INTEGER     NO-UNDO.\n  DEFINE VARIABLE lDataField         AS LOGICAL     NO-UNDO.\n  DEFINE VARIABLE iDataOrder         AS INTEGER     NO-UNDO.\n  DEFINE VARIABLE i                  AS INTEGER     NO-UNDO.\n\n  DEFINE BUFFER bTable       FOR ttTable.\n  DEFINE BUFFER bField       FOR ttField.\n  DEFINE BUFFER bColumn      FOR ttColumn.\n  DEFINE BUFFER bFieldCache  FOR ttFieldCache.\n  DEFINE BUFFER bColumnCache FOR ttColumnCache.\n  DEFINE BUFFER bTableFilter FOR ttTableFilter.\n\n  {\u0026timerStart}\n\n  /* Clean up first */\n  EMPTY TEMP-TABLE bField.\n  EMPTY TEMP-TABLE bColumn.\n\n  /* For dataservers, use the schema name [dataserver] */\n  ASSIGN cSDBName = SDBNAME(pcDatabase).\n\n  /* Return if no db connected */\n  IF NUM-DBS = 0 THEN RETURN.\n\n  /* caching */\n  IF glCacheFieldDefs THEN\n  DO:\n    /* Find the table. Should exist. */\n    FIND bTable WHERE bTable.cDatabase = pcDatabase AND bTable.cTableName = pcTableName NO-ERROR.\n    IF NOT AVAILABLE bTable THEN RETURN.\n\n    /* Verify whether the CRC is still the same. If not, kill the cache */\n    PUBLISH \"DD:Timer\" (\"start\", '"},
-  {"type":"NameVariable","value":"getFields"},
-  {"type":"Text","value":" "},
-  {"type":"Operator","value":"-"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"step"},
-  {"type":"Text","value":" "},
-  {"type":"LiteralNumberInteger","value":"1"},
-  {"type":"Punctuation","value":":"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"verify"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"CRC"},
-  {"type":"LiteralStringSingle","value":"').\n    CREATE BUFFER hBufferFile FOR TABLE cSDBName + \"._File\".\n\n    hBufferFile:FIND-UNIQUE(SUBSTITUTE('"},
-  {"type":"KeywordReserved","value":"where"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"_file"},
-  {"type":"Operator","value":"-"},
-  {"type":"NameVariable","value":"name"},
+  {"type":"LiteralStringSingle","value":"'/\\').\n\n  /* Get rid of double slashes (except at the beginning for UNC paths) */\n  pcFileName = SUBSTRING(pcFileName,1,1) + REPLACE(SUBSTRING(pcFileName,2),'\\\\','\\'"},
+  {"type":"Punctuation","value":")."},
+  {"type":"Text","value":"\n\n  "},
+  {"type":"CommentMultiline","value":"/* Sequences */"},
+  {"type":"Text","value":"\n  "},
+  {"type":"NameVariable","value":"pcFileName"},
   {"type":"Text","value":" "},
   {"type":"Operator","value":"="},
-  {"type":"CommentPreproc","value":" \u00261 and _File._File-Number \u003c 32768', QUOTER(pcTableName)),NO-LOCK)."},
+  {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"resolveSequence"},
+  {"type":"Punctuation","value":"("},
+  {"type":"NameVariable","value":"pcFileName"},
+  {"type":"Punctuation","value":")."},
+  {"type":"Text","value":"\n\n  "},
+  {"type":"CommentMultiline","value":"/* OS-vars */"},
+  {"type":"Text","value":"\n  "},
+  {"type":"NameVariable","value":"pcFileName"},
+  {"type":"Text","value":" "},
+  {"type":"Operator","value":"="},
+  {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"resolveOsVars"},
+  {"type":"Punctuation","value":"("},
+  {"type":"NameVariable","value":"pcFileName"},
+  {"type":"Punctuation","value":")."},
+  {"type":"Text","value":"\n\n  "},
+  {"type":"CommentMultiline","value":"/* Make lower */"},
+  {"type":"Text","value":"\n  "},
+  {"type":"NameVariable","value":"pcFileName"},
+  {"type":"Text","value":" "},
+  {"type":"Operator","value":"="},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"LC"},
+  {"type":"Punctuation","value":"("},
+  {"type":"NameVariable","value":"pcFileName"},
+  {"type":"Punctuation","value":")."},
+  {"type":"Text","value":"\n  "},
+  {"type":"KeywordReserved","value":"PUBLISH "},
+  {"type":"LiteralStringDouble","value":"\"debugInfo\""},
+  {"type":"Text","value":" "},
+  {"type":"Punctuation","value":"("},
+  {"type":"LiteralNumberInteger","value":"3"},
+  {"type":"NameVariable","value":","},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"SUBSTITUTE"},
+  {"type":"Punctuation","value":"("},
+  {"type":"LiteralStringDouble","value":"\"Dump to: \u00261\""},
+  {"type":"NameVariable","value":","},
+  {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"pcFileName"},
+  {"type":"Punctuation","value":"))."},
+  {"type":"Text","value":"\n\n"},
+  {"type":"KeywordReserved","value":"END"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"PROCEDURE"},
+  {"type":"Punctuation","value":"."},
+  {"type":"Text","value":" "},
+  {"type":"CommentMultiline","value":"/* getDumpFileName */"},
+  {"type":"Text","value":"\n\n"},
+  {"type":"CommentMultiline","value":"/* _UIB-CODE-BLOCK-END */"},
+  {"type":"CommentPreproc","value":"\n\u0026ANALYZE-RESUME\n\n\u0026ENDIF\n\n\u0026IF DEFINED(EXCLUDE-getFavourites) = 0 \u0026THEN\n\n\u0026ANALYZE-SUSPEND _UIB-CODE-BLOCK _PROCEDURE getFavourites Procedure"},
+  {"type":"Text","value":"\n"},
+  {"type":"KeywordReserved","value":"PROCEDURE"},
+  {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"getFavourites"},
+  {"type":"Text","value":" "},
+  {"type":"Punctuation","value":":"},
+  {"type":"Text","value":"\n"},
+  {"type":"CommentMultiline","value":"/* Extract favourites from config table into own tt\n*/"},
+  {"type":"Text","value":"\n  "},
+  {"type":"KeywordDeclaration","value":"DEFINE"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"OUTPUT"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"PARAMETER"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"TABLE"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"FOR"},
+  {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"ttFavGroup"},
+  {"type":"Punctuation","value":"."},
+  {"type":"Text","value":"\n\n  "},
+  {"type":"KeywordDeclaration","value":"DEFINE"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"BUFFER"},
+  {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"bfConfig"},
+  {"type":"Text","value":"   "},
+  {"type":"KeywordReserved","value":"FOR"},
+  {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"ttConfig"},
+  {"type":"Punctuation","value":"."},
+  {"type":"Text","value":"\n  "},
+  {"type":"KeywordDeclaration","value":"DEFINE"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"BUFFER"},
+  {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"btFavGroup"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"FOR"},
+  {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"ttFavGroup"},
+  {"type":"Punctuation","value":"."},
+  {"type":"Text","value":"\n\n  "},
+  {"type":"KeywordReserved","value":"EMPTY"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"TEMP-TABLE"},
+  {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"ttFavGroup"},
+  {"type":"Punctuation","value":"."},
+  {"type":"Text","value":"\n\n  "},
+  {"type":"KeywordReserved","value":"FOR"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"EACH"},
+  {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"bfConfig"},
+  {"type":"Text","value":"\n    "},
+  {"type":"KeywordReserved","value":"WHERE"},
+  {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"bfConfig"},
+  {"type":"Punctuation","value":"."},
+  {"type":"NameVariable","value":"cSection"},
+  {"type":"Text","value":" "},
+  {"type":"Operator","value":"="},
+  {"type":"Text","value":" "},
+  {"type":"LiteralStringSingle","value":"'DataDigger:Favourites'"},
+  {"type":"Text","value":"\n      "},
+  {"type":"KeywordReserved","value":"AND"},
+  {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"bfConfig"},
+  {"type":"Punctuation","value":"."},
+  {"type":"NameVariable","value":"cSetting"},
+  {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"\u003e"},
+  {"type":"Text","value":" "},
+  {"type":"LiteralStringDouble","value":"\"\""},
+  {"type":"Punctuation","value":":"},
+  {"type":"Text","value":"\n\n    "},
+  {"type":"KeywordReserved","value":"CREATE"},
+  {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"btFavGroup"},
+  {"type":"Punctuation","value":"."},
+  {"type":"Text","value":"\n    "},
+  {"type":"KeywordReserved","value":"ASSIGN\n     "},
+  {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"btFavGroup"},
+  {"type":"Punctuation","value":"."},
+  {"type":"NameVariable","value":"cGroup"},
+  {"type":"Text","value":"  "},
+  {"type":"Operator","value":"="},
+  {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"bfConfig"},
+  {"type":"Punctuation","value":"."},
+  {"type":"NameVariable","value":"cSetting"},
+  {"type":"Text","value":"\n      "},
+  {"type":"NameVariable","value":"btFavGroup"},
+  {"type":"Punctuation","value":"."},
+  {"type":"NameVariable","value":"cTables"},
+  {"type":"Text","value":" "},
+  {"type":"Operator","value":"="},
+  {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"bfConfig"},
+  {"type":"Punctuation","value":"."},
+  {"type":"NameVariable","value":"cValue"},
+  {"type":"Punctuation","value":"."},
+  {"type":"Text","value":"\n  "},
+  {"type":"KeywordReserved","value":"END"},
+  {"type":"Punctuation","value":"."},
+  {"type":"Text","value":"\n\n  "},
+  {"type":"CommentMultiline","value":"/* If no groups are found, create a default one */"},
+  {"type":"Text","value":"\n  "},
+  {"type":"KeywordReserved","value":"IF"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"NOT"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"CAN-FIND"},
+  {"type":"Punctuation","value":"("},
+  {"type":"KeywordReserved","value":"FIRST"},
+  {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"btFavGroup"},
+  {"type":"Punctuation","value":")"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"THEN\n "},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"DO"},
+  {"type":"Punctuation","value":":"},
+  {"type":"Text","value":"\n    "},
+  {"type":"KeywordReserved","value":"CREATE"},
+  {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"btFavGroup"},
+  {"type":"Punctuation","value":"."},
+  {"type":"Text","value":"\n    "},
+  {"type":"KeywordReserved","value":"ASSIGN"},
+  {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"btFavGroup"},
+  {"type":"Punctuation","value":"."},
+  {"type":"NameVariable","value":"cGroup"},
+  {"type":"Text","value":" "},
+  {"type":"Operator","value":"="},
+  {"type":"Text","value":" "},
+  {"type":"LiteralStringSingle","value":"'MyFavourites'"},
+  {"type":"Punctuation","value":"."},
+  {"type":"Text","value":"\n  "},
+  {"type":"KeywordReserved","value":"END"},
+  {"type":"Punctuation","value":"."},
+  {"type":"Text","value":"\n\n"},
+  {"type":"KeywordReserved","value":"END"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"PROCEDURE"},
+  {"type":"Punctuation","value":"."},
+  {"type":"Text","value":" "},
+  {"type":"CommentMultiline","value":"/* getFavourites */"},
+  {"type":"Text","value":"\n\n"},
+  {"type":"CommentMultiline","value":"/* _UIB-CODE-BLOCK-END */"},
+  {"type":"CommentPreproc","value":"\n\u0026ANALYZE-RESUME\n\n\u0026ENDIF\n\n\u0026IF DEFINED(EXCLUDE-getFields) = 0 \u0026THEN\n\n\u0026ANALYZE-SUSPEND _UIB-CODE-BLOCK _PROCEDURE getFields Procedure"},
+  {"type":"Text","value":"\n"},
+  {"type":"KeywordReserved","value":"PROCEDURE"},
+  {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"getFields"},
+  {"type":"Text","value":" "},
+  {"type":"Punctuation","value":":"},
+  {"type":"Text","value":"\n"},
+  {"type":"CommentMultiline","value":"/* Fill the fields temp-table\n  */"},
+  {"type":"Text","value":"\n  "},
+  {"type":"KeywordDeclaration","value":"DEFINE"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"INPUT "},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"PARAMETER"},
+  {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"pcDatabase"},
+  {"type":"Text","value":"  "},
+  {"type":"KeywordReserved","value":"AS"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordType","value":"CHARACTER  "},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"NO-UNDO"},
+  {"type":"Punctuation","value":"."},
+  {"type":"Text","value":"\n  "},
+  {"type":"KeywordDeclaration","value":"DEFINE"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"INPUT "},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"PARAMETER"},
+  {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"pcTableName"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"AS"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordType","value":"CHARACTER  "},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"NO-UNDO"},
+  {"type":"Punctuation","value":"."},
+  {"type":"Text","value":"\n  "},
+  {"type":"KeywordDeclaration","value":"DEFINE"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"OUTPUT"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"PARAMETER"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"DATASET"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"FOR"},
+  {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"dsFields"},
+  {"type":"Punctuation","value":"."},
+  {"type":"Text","value":"\n\n  "},
+  {"type":"KeywordDeclaration","value":"DEFINE"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"VARIABLE"},
+  {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"cCacheFile"},
+  {"type":"Text","value":"         "},
+  {"type":"KeywordReserved","value":"AS"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordType","value":"CHARACTER  "},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"NO-UNDO"},
+  {"type":"Punctuation","value":"."},
+  {"type":"Text","value":"\n  "},
+  {"type":"KeywordDeclaration","value":"DEFINE"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"VARIABLE"},
+  {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"cPrimIndexFields"},
+  {"type":"Text","value":"   "},
+  {"type":"KeywordReserved","value":"AS"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordType","value":"CHARACTER  "},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"NO-UNDO"},
+  {"type":"Punctuation","value":"."},
+  {"type":"Text","value":"\n  "},
+  {"type":"KeywordDeclaration","value":"DEFINE"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"VARIABLE"},
+  {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"cQuery"},
+  {"type":"Text","value":"             "},
+  {"type":"KeywordReserved","value":"AS"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordType","value":"CHARACTER  "},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"NO-UNDO"},
+  {"type":"Punctuation","value":"."},
+  {"type":"Text","value":"\n  "},
+  {"type":"KeywordDeclaration","value":"DEFINE"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"VARIABLE"},
+  {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"cSelectedFields"},
+  {"type":"Text","value":"    "},
+  {"type":"KeywordReserved","value":"AS"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordType","value":"CHARACTER  "},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"NO-UNDO"},
+  {"type":"Punctuation","value":"."},
+  {"type":"Text","value":"\n  "},
+  {"type":"KeywordDeclaration","value":"DEFINE"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"VARIABLE"},
+  {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"cUniqueIndexFields"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"AS"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordType","value":"CHARACTER  "},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"NO-UNDO"},
+  {"type":"Punctuation","value":"."},
+  {"type":"Text","value":"\n  "},
+  {"type":"KeywordDeclaration","value":"DEFINE"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"VARIABLE"},
+  {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"cSDBName"},
+  {"type":"Text","value":"           "},
+  {"type":"KeywordReserved","value":"AS"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordType","value":"CHARACTER  "},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"NO-UNDO"},
+  {"type":"Punctuation","value":"."},
+  {"type":"Text","value":"\n  "},
+  {"type":"KeywordDeclaration","value":"DEFINE"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"VARIABLE"},
+  {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"hBufferField"},
+  {"type":"Text","value":"       "},
+  {"type":"KeywordReserved","value":"AS"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordType","value":"HANDLE     "},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"NO-UNDO"},
+  {"type":"Punctuation","value":"."},
+  {"type":"Text","value":"\n  "},
+  {"type":"KeywordDeclaration","value":"DEFINE"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"VARIABLE"},
+  {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"hBufferFile"},
+  {"type":"Text","value":"        "},
+  {"type":"KeywordReserved","value":"AS"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordType","value":"HANDLE     "},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"NO-UNDO"},
+  {"type":"Punctuation","value":"."},
+  {"type":"Text","value":"\n  "},
+  {"type":"KeywordDeclaration","value":"DEFINE"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"VARIABLE"},
+  {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"hQuery"},
+  {"type":"Text","value":"             "},
+  {"type":"KeywordReserved","value":"AS"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordType","value":"HANDLE     "},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"NO-UNDO"},
+  {"type":"Punctuation","value":"."},
+  {"type":"Text","value":"\n  "},
+  {"type":"KeywordDeclaration","value":"DEFINE"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"VARIABLE"},
+  {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"iFieldExtent"},
+  {"type":"Text","value":"       "},
+  {"type":"KeywordReserved","value":"AS"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordType","value":"INTEGER    "},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"NO-UNDO"},
+  {"type":"Punctuation","value":"."},
+  {"type":"Text","value":"\n  "},
+  {"type":"KeywordDeclaration","value":"DEFINE"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"VARIABLE"},
+  {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"iFieldOrder"},
+  {"type":"Text","value":"        "},
+  {"type":"KeywordReserved","value":"AS"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordType","value":"INTEGER    "},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"NO-UNDO"},
+  {"type":"Punctuation","value":"."},
+  {"type":"Text","value":"\n  "},
+  {"type":"KeywordDeclaration","value":"DEFINE"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"VARIABLE"},
+  {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"lDataField"},
+  {"type":"Text","value":"         "},
+  {"type":"KeywordReserved","value":"AS"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordType","value":"LOGICAL    "},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"NO-UNDO"},
+  {"type":"Punctuation","value":"."},
+  {"type":"Text","value":"\n  "},
+  {"type":"KeywordDeclaration","value":"DEFINE"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"VARIABLE"},
+  {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"iDataOrder"},
+  {"type":"Text","value":"         "},
+  {"type":"KeywordReserved","value":"AS"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordType","value":"INTEGER    "},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"NO-UNDO"},
+  {"type":"Punctuation","value":"."},
+  {"type":"Text","value":"\n  "},
+  {"type":"KeywordDeclaration","value":"DEFINE"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"VARIABLE"},
+  {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"i"},
+  {"type":"Text","value":"                  "},
+  {"type":"KeywordReserved","value":"AS"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordType","value":"INTEGER    "},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"NO-UNDO"},
+  {"type":"Punctuation","value":"."},
+  {"type":"Text","value":"\n\n  "},
+  {"type":"KeywordDeclaration","value":"DEFINE"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"BUFFER"},
+  {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"bTable"},
+  {"type":"Text","value":"       "},
+  {"type":"KeywordReserved","value":"FOR"},
+  {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"ttTable"},
+  {"type":"Punctuation","value":"."},
+  {"type":"Text","value":"\n  "},
+  {"type":"KeywordDeclaration","value":"DEFINE"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"BUFFER"},
+  {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"bField"},
+  {"type":"Text","value":"       "},
+  {"type":"KeywordReserved","value":"FOR"},
+  {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"ttField"},
+  {"type":"Punctuation","value":"."},
+  {"type":"Text","value":"\n  "},
+  {"type":"KeywordDeclaration","value":"DEFINE"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"BUFFER"},
+  {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"bColumn"},
+  {"type":"Text","value":"      "},
+  {"type":"KeywordReserved","value":"FOR"},
+  {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"ttColumn"},
+  {"type":"Punctuation","value":"."},
+  {"type":"Text","value":"\n  "},
+  {"type":"KeywordDeclaration","value":"DEFINE"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"BUFFER"},
+  {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"bFieldCache"},
+  {"type":"Text","value":"  "},
+  {"type":"KeywordReserved","value":"FOR"},
+  {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"ttFieldCache"},
+  {"type":"Punctuation","value":"."},
+  {"type":"Text","value":"\n  "},
+  {"type":"KeywordDeclaration","value":"DEFINE"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"BUFFER"},
+  {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"bColumnCache"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"FOR"},
+  {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"ttColumnCache"},
+  {"type":"Punctuation","value":"."},
+  {"type":"Text","value":"\n  "},
+  {"type":"KeywordDeclaration","value":"DEFINE"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"BUFFER"},
+  {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"bTableFilter"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"FOR"},
+  {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"ttTableFilter"},
+  {"type":"Punctuation","value":"."},
+  {"type":"Text","value":"\n\n  "},
+  {"type":"CommentPreproc","value":"{\u0026timerStart}"},
+  {"type":"Text","value":"\n\n  "},
+  {"type":"CommentMultiline","value":"/* Clean up first */"},
+  {"type":"Text","value":"\n  "},
+  {"type":"KeywordReserved","value":"EMPTY"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"TEMP-TABLE"},
+  {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"bField"},
+  {"type":"Punctuation","value":"."},
+  {"type":"Text","value":"\n  "},
+  {"type":"KeywordReserved","value":"EMPTY"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"TEMP-TABLE"},
+  {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"bColumn"},
+  {"type":"Punctuation","value":"."},
+  {"type":"Text","value":"\n\n  "},
+  {"type":"CommentMultiline","value":"/* For dataservers, use the schema name [dataserver] */"},
+  {"type":"Text","value":"\n  "},
+  {"type":"KeywordReserved","value":"ASSIGN"},
+  {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"cSDBName"},
+  {"type":"Text","value":" "},
+  {"type":"Operator","value":"="},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"SDBNAME"},
+  {"type":"Punctuation","value":"("},
+  {"type":"NameVariable","value":"pcDatabase"},
+  {"type":"Punctuation","value":")."},
+  {"type":"Text","value":"\n\n  "},
+  {"type":"CommentMultiline","value":"/* Return if no db connected */"},
+  {"type":"Text","value":"\n  "},
+  {"type":"KeywordReserved","value":"IF"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"NUM-DBS "},
+  {"type":"Operator","value":"="},
+  {"type":"Text","value":" "},
+  {"type":"LiteralNumberInteger","value":"0"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"THEN"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"RETURN"},
+  {"type":"Punctuation","value":"."},
+  {"type":"Text","value":"\n\n  "},
+  {"type":"CommentMultiline","value":"/* caching */"},
+  {"type":"Text","value":"\n  "},
+  {"type":"KeywordReserved","value":"IF"},
+  {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"glCacheFieldDefs"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"THEN\n "},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"DO"},
+  {"type":"Punctuation","value":":"},
+  {"type":"Text","value":"\n    "},
+  {"type":"CommentMultiline","value":"/* Find the table. Should exist. */"},
+  {"type":"Text","value":"\n    "},
+  {"type":"KeywordReserved","value":"FIND"},
+  {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"bTable"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"WHERE"},
+  {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"bTable"},
+  {"type":"Punctuation","value":"."},
+  {"type":"NameVariable","value":"cDatabase"},
+  {"type":"Text","value":" "},
+  {"type":"Operator","value":"="},
+  {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"pcDatabase"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"AND"},
+  {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"bTable"},
+  {"type":"Punctuation","value":"."},
+  {"type":"NameVariable","value":"cTableName"},
+  {"type":"Text","value":" "},
+  {"type":"Operator","value":"="},
+  {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"pcTableName"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"NO-ERROR"},
+  {"type":"Punctuation","value":"."},
+  {"type":"Text","value":"\n    "},
+  {"type":"KeywordReserved","value":"IF"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"NOT"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"AVAILABLE"},
+  {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"bTable"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"THEN"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"RETURN"},
+  {"type":"Punctuation","value":"."},
+  {"type":"Text","value":"\n\n    "},
+  {"type":"CommentMultiline","value":"/* Verify whether the CRC is still the same. If not, kill the cache */"},
+  {"type":"Text","value":"\n    "},
+  {"type":"KeywordReserved","value":"PUBLISH "},
+  {"type":"LiteralStringDouble","value":"\"DD:Timer\""},
+  {"type":"Text","value":" "},
+  {"type":"Punctuation","value":"("},
+  {"type":"LiteralStringDouble","value":"\"start\""},
+  {"type":"NameVariable","value":","},
+  {"type":"Text","value":" "},
+  {"type":"LiteralStringSingle","value":"'getFields - step 1: verify CRC'"},
+  {"type":"Punctuation","value":")."},
+  {"type":"Text","value":"\n    "},
+  {"type":"KeywordReserved","value":"CREATE"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"BUFFER"},
+  {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"hBufferFile"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"FOR"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"TABLE"},
+  {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"cSDBName"},
+  {"type":"Text","value":" "},
+  {"type":"Operator","value":"+"},
+  {"type":"Text","value":" "},
+  {"type":"LiteralStringDouble","value":"\"._File\""},
+  {"type":"Punctuation","value":"."},
+  {"type":"Text","value":"\n\n    "},
+  {"type":"NameVariable","value":"hBufferFile"},
+  {"type":"Punctuation","value":":"},
+  {"type":"KeywordReserved","value":"FIND-UNIQUE"},
+  {"type":"Punctuation","value":"("},
+  {"type":"KeywordReserved","value":"SUBSTITUTE"},
+  {"type":"Punctuation","value":"("},
+  {"type":"LiteralStringSingle","value":"'where _file-name = \u00261 and _File._File-Number \u003c 32768'"},
+  {"type":"NameVariable","value":","},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"QUOTER"},
+  {"type":"Punctuation","value":"("},
+  {"type":"NameVariable","value":"pcTableName"},
+  {"type":"Punctuation","value":"))"},
+  {"type":"NameVariable","value":","},
+  {"type":"KeywordReserved","value":"NO-LOCK"},
+  {"type":"Punctuation","value":")."},
   {"type":"Text","value":"\n    "},
   {"type":"KeywordReserved","value":"IF"},
   {"type":"Text","value":" "},
@@ -6563,24 +7572,7 @@
   {"type":"LiteralStringDouble","value":"\"stop\""},
   {"type":"NameVariable","value":","},
   {"type":"Text","value":" "},
-  {"type":"LiteralStringSingle","value":"'getFields - step 2: check memory cache'"},
-  {"type":"Punctuation","value":")."},
-  {"type":"Text","value":"\n      "},
-  {"type":"KeywordReserved","value":"RETURN"},
-  {"type":"Punctuation","value":"."},
-  {"type":"Text","value":"\n    "},
-  {"type":"KeywordReserved","value":"END"},
-  {"type":"Punctuation","value":"."},
-  {"type":"Text","value":"\n\n    "},
-  {"type":"CommentMultiline","value":"/* See if disk cache exists */"},
-  {"type":"Text","value":"\n    "},
-  {"type":"NameVariable","value":"cCacheFile"},
-  {"type":"Text","value":" "},
-  {"type":"Operator","value":"="},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"SUBSTITUTE"},
-  {"type":"Punctuation","value":"("},
-  {"type":"LiteralStringSingle","value":"'\u00261cache\\\u00262.xml'"},
+  {"type":"LiteralStringSingle","value":"'getFields - step 2: check memory cache').\n      RETURN.\n    END.\n\n    /* See if disk cache exists */\n    cCacheFile = SUBSTITUTE('\u00261cache\\\u00262.xml'"},
   {"type":"NameVariable","value":","},
   {"type":"Text","value":" "},
   {"type":"NameVariable","value":"getWorkFolder"},
@@ -7008,377 +8000,7 @@
   {"type":"Text","value":" "},
   {"type":"Operator","value":"="},
   {"type":"Text","value":" "},
-  {"type":"LiteralStringSingle","value":"'*'"},
-  {"type":"Punctuation","value":"."},
-  {"type":"Text","value":"\n\n  "},
-  {"type":"KeywordReserved","value":"REPEAT"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"WHILE"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"NOT"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"hQuery"},
-  {"type":"Punctuation","value":":"},
-  {"type":"KeywordReserved","value":"QUERY-OFF-END"},
-  {"type":"Punctuation","value":":"},
-  {"type":"Text","value":"\n\n    "},
-  {"type":"KeywordReserved","value":"CREATE"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"bField"},
-  {"type":"Punctuation","value":"."},
-  {"type":"Text","value":"\n    "},
-  {"type":"KeywordReserved","value":"ASSIGN\n     "},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"iFieldOrder"},
-  {"type":"Text","value":"          "},
-  {"type":"Operator","value":"="},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"iFieldOrder"},
-  {"type":"Text","value":" "},
-  {"type":"Operator","value":"+"},
-  {"type":"Text","value":" "},
-  {"type":"LiteralNumberInteger","value":"1"},
-  {"type":"Text","value":"\n      "},
-  {"type":"NameVariable","value":"bField"},
-  {"type":"Punctuation","value":"."},
-  {"type":"NameVariable","value":"cTableCacheId"},
-  {"type":"Text","value":" "},
-  {"type":"Operator","value":"="},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"bTable"},
-  {"type":"Punctuation","value":"."},
-  {"type":"NameVariable","value":"cCacheId"},
-  {"type":"Text","value":"\n      "},
-  {"type":"NameVariable","value":"bField"},
-  {"type":"Punctuation","value":"."},
-  {"type":"NameVariable","value":"cDatabase"},
-  {"type":"Text","value":"     "},
-  {"type":"Operator","value":"="},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"pcDatabase"},
-  {"type":"Text","value":"\n      "},
-  {"type":"NameVariable","value":"bField"},
-  {"type":"Punctuation","value":"."},
-  {"type":"NameVariable","value":"cTablename"},
-  {"type":"Text","value":"    "},
-  {"type":"Operator","value":"="},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"pcTableName"},
-  {"type":"Text","value":"\n      "},
-  {"type":"NameVariable","value":"bField"},
-  {"type":"Punctuation","value":"."},
-  {"type":"NameVariable","value":"cFieldName"},
-  {"type":"Text","value":"    "},
-  {"type":"Operator","value":"="},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"hBufferField"},
-  {"type":"Punctuation","value":":"},
-  {"type":"KeywordReserved","value":"BUFFER-FIELD"},
-  {"type":"Punctuation","value":"("},
-  {"type":"LiteralStringSingle","value":"'_field-name'"},
-  {"type":"Punctuation","value":"):"},
-  {"type":"KeywordReserved","value":"BUFFER-VALUE\n\n     "},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"bField"},
-  {"type":"Punctuation","value":"."},
-  {"type":"NameVariable","value":"lShow"},
-  {"type":"Text","value":"         "},
-  {"type":"Operator","value":"="},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"CAN-DO"},
-  {"type":"Punctuation","value":"("},
-  {"type":"NameVariable","value":"cSelectedFields,"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"hBufferField"},
-  {"type":"Punctuation","value":":"},
-  {"type":"KeywordReserved","value":"BUFFER-FIELD"},
-  {"type":"Punctuation","value":"("},
-  {"type":"LiteralStringSingle","value":"'_field-name'"},
-  {"type":"Punctuation","value":"):"},
-  {"type":"KeywordReserved","value":"BUFFER-VALUE"},
-  {"type":"Punctuation","value":")"},
-  {"type":"Text","value":"\n      "},
-  {"type":"NameVariable","value":"bField"},
-  {"type":"Punctuation","value":"."},
-  {"type":"NameVariable","value":"iOrder"},
-  {"type":"Text","value":"        "},
-  {"type":"Operator","value":"="},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"iFieldOrder"},
-  {"type":"Text","value":"\n      "},
-  {"type":"NameVariable","value":"bField"},
-  {"type":"Punctuation","value":"."},
-  {"type":"NameVariable","value":"iOrderOrg"},
-  {"type":"Text","value":"     "},
-  {"type":"Operator","value":"="},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"iFieldOrder"},
-  {"type":"Text","value":"\n\n      "},
-  {"type":"NameVariable","value":"bField"},
-  {"type":"Punctuation","value":"."},
-  {"type":"NameVariable","value":"cFullName"},
-  {"type":"Text","value":"     "},
-  {"type":"Operator","value":"="},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"hBufferField"},
-  {"type":"Punctuation","value":":"},
-  {"type":"KeywordReserved","value":"BUFFER-FIELD"},
-  {"type":"Punctuation","value":"("},
-  {"type":"LiteralStringSingle","value":"'_field-name'"},
-  {"type":"Punctuation","value":"):"},
-  {"type":"KeywordReserved","value":"BUFFER-VALUE\n     "},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"bField"},
-  {"type":"Punctuation","value":"."},
-  {"type":"NameVariable","value":"cDataType"},
-  {"type":"Text","value":"     "},
-  {"type":"Operator","value":"="},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"hBufferField"},
-  {"type":"Punctuation","value":":"},
-  {"type":"KeywordReserved","value":"BUFFER-FIELD"},
-  {"type":"Punctuation","value":"("},
-  {"type":"LiteralStringSingle","value":"'_data-type'"},
-  {"type":"Punctuation","value":"):"},
-  {"type":"KeywordReserved","value":"BUFFER-VALUE\n     "},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"bField"},
-  {"type":"Punctuation","value":"."},
-  {"type":"NameVariable","value":"cInitial"},
-  {"type":"Text","value":"      "},
-  {"type":"Operator","value":"="},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"hBufferField"},
-  {"type":"Punctuation","value":":"},
-  {"type":"KeywordReserved","value":"BUFFER-FIELD"},
-  {"type":"Punctuation","value":"("},
-  {"type":"LiteralStringSingle","value":"'_initial'"},
-  {"type":"Punctuation","value":"):"},
-  {"type":"KeywordReserved","value":"BUFFER-VALUE\n     "},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"bField"},
-  {"type":"Punctuation","value":"."},
-  {"type":"NameVariable","value":"cFormat"},
-  {"type":"Text","value":"       "},
-  {"type":"Operator","value":"="},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"hBufferField"},
-  {"type":"Punctuation","value":":"},
-  {"type":"KeywordReserved","value":"BUFFER-FIELD"},
-  {"type":"Punctuation","value":"("},
-  {"type":"LiteralStringSingle","value":"'_format'"},
-  {"type":"Punctuation","value":"):"},
-  {"type":"KeywordReserved","value":"BUFFER-VALUE\n     "},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"bField"},
-  {"type":"Punctuation","value":"."},
-  {"type":"NameVariable","value":"cFormatOrg"},
-  {"type":"Text","value":"    "},
-  {"type":"Operator","value":"="},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"hBufferField"},
-  {"type":"Punctuation","value":":"},
-  {"type":"KeywordReserved","value":"BUFFER-FIELD"},
-  {"type":"Punctuation","value":"("},
-  {"type":"LiteralStringSingle","value":"'_format'"},
-  {"type":"Punctuation","value":"):"},
-  {"type":"KeywordReserved","value":"BUFFER-VALUE\n     "},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"bField"},
-  {"type":"Punctuation","value":"."},
-  {"type":"NameVariable","value":"iWidth"},
-  {"type":"Text","value":"        "},
-  {"type":"Operator","value":"="},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"hBufferField"},
-  {"type":"Punctuation","value":":"},
-  {"type":"KeywordReserved","value":"BUFFER-FIELD"},
-  {"type":"Punctuation","value":"("},
-  {"type":"LiteralStringSingle","value":"'_width'"},
-  {"type":"Punctuation","value":"):"},
-  {"type":"KeywordReserved","value":"BUFFER-VALUE\n     "},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"bField"},
-  {"type":"Punctuation","value":"."},
-  {"type":"NameVariable","value":"cLabel"},
-  {"type":"Text","value":"        "},
-  {"type":"Operator","value":"="},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"hBufferField"},
-  {"type":"Punctuation","value":":"},
-  {"type":"KeywordReserved","value":"BUFFER-FIELD"},
-  {"type":"Punctuation","value":"("},
-  {"type":"LiteralStringSingle","value":"'_label'"},
-  {"type":"Punctuation","value":"):"},
-  {"type":"KeywordReserved","value":"BUFFER-VALUE\n     "},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"bField"},
-  {"type":"Punctuation","value":"."},
-  {"type":"NameVariable","value":"lPrimary"},
-  {"type":"Text","value":"      "},
-  {"type":"Operator","value":"="},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"CAN-DO"},
-  {"type":"Punctuation","value":"("},
-  {"type":"NameVariable","value":"cPrimIndexFields,"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"bField"},
-  {"type":"Punctuation","value":"."},
-  {"type":"NameVariable","value":"cFieldName"},
-  {"type":"Punctuation","value":")"},
-  {"type":"Text","value":"\n      "},
-  {"type":"NameVariable","value":"bField"},
-  {"type":"Punctuation","value":"."},
-  {"type":"NameVariable","value":"iExtent"},
-  {"type":"Text","value":"       "},
-  {"type":"Operator","value":"="},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"hBufferField"},
-  {"type":"Punctuation","value":":"},
-  {"type":"KeywordReserved","value":"BUFFER-FIELD"},
-  {"type":"Punctuation","value":"("},
-  {"type":"LiteralStringSingle","value":"'_Extent'"},
-  {"type":"Punctuation","value":"):"},
-  {"type":"KeywordReserved","value":"BUFFER-VALUE\n     "},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"bField"},
-  {"type":"Punctuation","value":"."},
-  {"type":"NameVariable","value":"lMandatory"},
-  {"type":"Text","value":"    "},
-  {"type":"Operator","value":"="},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"hBufferField"},
-  {"type":"Punctuation","value":":"},
-  {"type":"KeywordReserved","value":"BUFFER-FIELD"},
-  {"type":"Punctuation","value":"("},
-  {"type":"LiteralStringSingle","value":"'_mandatory'"},
-  {"type":"Punctuation","value":"):"},
-  {"type":"KeywordReserved","value":"BUFFER-VALUE\n     "},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"bField"},
-  {"type":"Punctuation","value":"."},
-  {"type":"NameVariable","value":"lUniqueIdx"},
-  {"type":"Text","value":"    "},
-  {"type":"Operator","value":"="},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"CAN-DO"},
-  {"type":"Punctuation","value":"("},
-  {"type":"NameVariable","value":"cUniqueIndexFields,bField"},
-  {"type":"Punctuation","value":"."},
-  {"type":"NameVariable","value":"cFieldName"},
-  {"type":"Punctuation","value":")"},
-  {"type":"Text","value":"\n\n      "},
-  {"type":"CommentMultiline","value":"/* New fields as per v19 */"},
-  {"type":"Text","value":"\n      "},
-  {"type":"NameVariable","value":"bField"},
-  {"type":"Punctuation","value":"."},
-  {"type":"NameVariable","value":"cColLabel"},
-  {"type":"Text","value":"     "},
-  {"type":"Operator","value":"="},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"hBufferField"},
-  {"type":"Punctuation","value":":"},
-  {"type":"KeywordReserved","value":"BUFFER-FIELD"},
-  {"type":"Punctuation","value":"("},
-  {"type":"LiteralStringSingle","value":"'_Col-label'"},
-  {"type":"Punctuation","value":"):"},
-  {"type":"KeywordReserved","value":"BUFFER-VALUE\n     "},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"bField"},
-  {"type":"Punctuation","value":"."},
-  {"type":"NameVariable","value":"iDecimals"},
-  {"type":"Text","value":"     "},
-  {"type":"Operator","value":"="},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"hBufferField"},
-  {"type":"Punctuation","value":":"},
-  {"type":"KeywordReserved","value":"BUFFER-FIELD"},
-  {"type":"Punctuation","value":"("},
-  {"type":"LiteralStringSingle","value":"'_Decimals'"},
-  {"type":"Punctuation","value":"):"},
-  {"type":"KeywordReserved","value":"BUFFER-VALUE\n     "},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"bField"},
-  {"type":"Punctuation","value":"."},
-  {"type":"NameVariable","value":"iFieldRpos"},
-  {"type":"Text","value":"    "},
-  {"type":"Operator","value":"="},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"hBufferField"},
-  {"type":"Punctuation","value":":"},
-  {"type":"KeywordReserved","value":"BUFFER-FIELD"},
-  {"type":"Punctuation","value":"("},
-  {"type":"LiteralStringSingle","value":"'_Field-rpos'"},
-  {"type":"Punctuation","value":"):"},
-  {"type":"KeywordReserved","value":"BUFFER-VALUE\n     "},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"bField"},
-  {"type":"Punctuation","value":"."},
-  {"type":"NameVariable","value":"cValExp"},
-  {"type":"Text","value":"       "},
-  {"type":"Operator","value":"="},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"hBufferField"},
-  {"type":"Punctuation","value":":"},
-  {"type":"KeywordReserved","value":"BUFFER-FIELD"},
-  {"type":"Punctuation","value":"("},
-  {"type":"LiteralStringSingle","value":"'_ValExp'"},
-  {"type":"Punctuation","value":"):"},
-  {"type":"KeywordReserved","value":"BUFFER-VALUE\n     "},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"bField"},
-  {"type":"Punctuation","value":"."},
-  {"type":"NameVariable","value":"cValMsg"},
-  {"type":"Text","value":"       "},
-  {"type":"Operator","value":"="},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"hBufferField"},
-  {"type":"Punctuation","value":":"},
-  {"type":"KeywordReserved","value":"BUFFER-FIELD"},
-  {"type":"Punctuation","value":"("},
-  {"type":"LiteralStringSingle","value":"'_ValMsg'"},
-  {"type":"Punctuation","value":"):"},
-  {"type":"KeywordReserved","value":"BUFFER-VALUE\n     "},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"bField"},
-  {"type":"Punctuation","value":"."},
-  {"type":"NameVariable","value":"cHelp"},
-  {"type":"Text","value":"         "},
-  {"type":"Operator","value":"="},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"hBufferField"},
-  {"type":"Punctuation","value":":"},
-  {"type":"KeywordReserved","value":"BUFFER-FIELD"},
-  {"type":"Punctuation","value":"("},
-  {"type":"LiteralStringSingle","value":"'_Help'"},
-  {"type":"Punctuation","value":"):"},
-  {"type":"KeywordReserved","value":"BUFFER-VALUE\n     "},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"bField"},
-  {"type":"Punctuation","value":"."},
-  {"type":"NameVariable","value":"cDesc"},
-  {"type":"Text","value":"         "},
-  {"type":"Operator","value":"="},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"hBufferField"},
-  {"type":"Punctuation","value":":"},
-  {"type":"KeywordReserved","value":"BUFFER-FIELD"},
-  {"type":"Punctuation","value":"("},
-  {"type":"LiteralStringSingle","value":"'_Desc'"},
-  {"type":"Punctuation","value":"):"},
-  {"type":"KeywordReserved","value":"BUFFER-VALUE\n     "},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"bField"},
-  {"type":"Punctuation","value":"."},
-  {"type":"NameVariable","value":"cViewAs"},
-  {"type":"Text","value":"       "},
-  {"type":"Operator","value":"="},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"hBufferField"},
-  {"type":"Punctuation","value":":"},
-  {"type":"KeywordReserved","value":"BUFFER-FIELD"},
-  {"type":"Punctuation","value":"("},
-  {"type":"LiteralStringSingle","value":"'_View-as'"},
+  {"type":"LiteralStringSingle","value":"'*'.\n\n  REPEAT WHILE NOT hQuery:QUERY-OFF-END:\n\n    CREATE bField.\n    ASSIGN\n      iFieldOrder          = iFieldOrder + 1\n      bField.cTableCacheId = bTable.cCacheId\n      bField.cDatabase     = pcDatabase\n      bField.cTablename    = pcTableName\n      bField.cFieldName    = hBufferField:BUFFER-FIELD('_field-name'):BUFFER-VALUE\n\n      bField.lShow         = CAN-DO(cSelectedFields, hBufferField:BUFFER-FIELD('_field-name'):BUFFER-VALUE)\n      bField.iOrder        = iFieldOrder\n      bField.iOrderOrg     = iFieldOrder\n\n      bField.cFullName     = hBufferField:BUFFER-FIELD('_field-name'):BUFFER-VALUE\n      bField.cDataType     = hBufferField:BUFFER-FIELD('_data-type'):BUFFER-VALUE\n      bField.cInitial      = hBufferField:BUFFER-FIELD('_initial'):BUFFER-VALUE\n      bField.cFormat       = hBufferField:BUFFER-FIELD('_format'):BUFFER-VALUE\n      bField.cFormatOrg    = hBufferField:BUFFER-FIELD('_format'):BUFFER-VALUE\n      bField.iWidth        = hBufferField:BUFFER-FIELD('_width'):BUFFER-VALUE\n      bField.cLabel        = hBufferField:BUFFER-FIELD('_label'):BUFFER-VALUE\n      bField.lPrimary      = CAN-DO(cPrimIndexFields, bField.cFieldName)\n      bField.iExtent       = hBufferField:BUFFER-FIELD('_Extent'):BUFFER-VALUE\n      bField.lMandatory    = hBufferField:BUFFER-FIELD('_mandatory'):BUFFER-VALUE\n      bField.lUniqueIdx    = CAN-DO(cUniqueIndexFields,bField.cFieldName)\n\n      /* New fields as per v19 */\n      bField.cColLabel     = hBufferField:BUFFER-FIELD('_Col-label'):BUFFER-VALUE\n      bField.iDecimals     = hBufferField:BUFFER-FIELD('_Decimals'):BUFFER-VALUE\n      bField.iFieldRpos    = hBufferField:BUFFER-FIELD('_Field-rpos'):BUFFER-VALUE\n      bField.cValExp       = hBufferField:BUFFER-FIELD('_ValExp'):BUFFER-VALUE\n      bField.cValMsg       = hBufferField:BUFFER-FIELD('_ValMsg'):BUFFER-VALUE\n      bField.cHelp         = hBufferField:BUFFER-FIELD('_Help'):BUFFER-VALUE\n      bField.cDesc         = hBufferField:BUFFER-FIELD('_Desc'):BUFFER-VALUE\n      bField.cViewAs       = hBufferField:BUFFER-FIELD('_View-as'"},
   {"type":"Punctuation","value":"):"},
   {"type":"KeywordReserved","value":"BUFFER-VALUE\n      "},
   {"type":"Punctuation","value":"."},
@@ -7810,15 +8432,7 @@
   {"type":"Text","value":"     "},
   {"type":"Operator","value":"="},
   {"type":"Text","value":" "},
-  {"type":"LiteralStringSingle","value":"'character'"},
-  {"type":"Text","value":"\n      "},
-  {"type":"NameVariable","value":"bField"},
-  {"type":"Punctuation","value":"."},
-  {"type":"NameVariable","value":"cInitial"},
-  {"type":"Text","value":"      "},
-  {"type":"Operator","value":"="},
-  {"type":"Text","value":" "},
-  {"type":"LiteralStringSingle","value":"''"},
+  {"type":"LiteralStringSingle","value":"'character'\n      bField.cInitial      = ''"},
   {"type":"Text","value":"\n      "},
   {"type":"NameVariable","value":"bField"},
   {"type":"Punctuation","value":"."},
@@ -9812,99 +10426,7 @@
   {"type":"Text","value":"  "},
   {"type":"Operator","value":"="},
   {"type":"Text","value":" "},
-  {"type":"LiteralStringSingle","value":"''"},
-  {"type":"Text","value":"  "},
-  {"type":"KeywordReserved","value":"OR"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"cNameShow"},
-  {"type":"Text","value":"  "},
-  {"type":"Operator","value":"="},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"?"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"THEN"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"cNameShow"},
-  {"type":"Text","value":"  "},
-  {"type":"Operator","value":"="},
-  {"type":"Text","value":" "},
-  {"type":"LiteralStringSingle","value":"'*'"},
-  {"type":"Punctuation","value":"."},
-  {"type":"Text","value":"\n  "},
-  {"type":"KeywordReserved","value":"IF"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"cNameHide"},
-  {"type":"Text","value":"  "},
-  {"type":"Operator","value":"="},
-  {"type":"Text","value":" "},
-  {"type":"LiteralStringSingle","value":"'*'"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"OR"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"cNameHide"},
-  {"type":"Text","value":"  "},
-  {"type":"Operator","value":"="},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"?"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"THEN"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"cNameHide"},
-  {"type":"Text","value":"  "},
-  {"type":"Operator","value":"="},
-  {"type":"Text","value":" "},
-  {"type":"LiteralStringSingle","value":"''"},
-  {"type":"Text","value":" "},
-  {"type":"Punctuation","value":"."},
-  {"type":"Text","value":"\n  "},
-  {"type":"KeywordReserved","value":"IF"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"cFieldShow"},
-  {"type":"Text","value":" "},
-  {"type":"Operator","value":"="},
-  {"type":"Text","value":" "},
-  {"type":"LiteralStringSingle","value":"'*'"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"OR"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"cFieldShow"},
-  {"type":"Text","value":" "},
-  {"type":"Operator","value":"="},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"?"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"THEN"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"cFieldShow"},
-  {"type":"Text","value":" "},
-  {"type":"Operator","value":"="},
-  {"type":"Text","value":" "},
-  {"type":"LiteralStringSingle","value":"''"},
-  {"type":"Punctuation","value":"."},
-  {"type":"Text","value":"\n  "},
-  {"type":"KeywordReserved","value":"IF"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"cFieldHide"},
-  {"type":"Text","value":" "},
-  {"type":"Operator","value":"="},
-  {"type":"Text","value":" "},
-  {"type":"LiteralStringSingle","value":"'*'"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"OR"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"cFieldHide"},
-  {"type":"Text","value":" "},
-  {"type":"Operator","value":"="},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"?"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"THEN"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"cFieldHide"},
-  {"type":"Text","value":" "},
-  {"type":"Operator","value":"="},
-  {"type":"Text","value":" "},
-  {"type":"LiteralStringSingle","value":"''"},
+  {"type":"LiteralStringSingle","value":"''  OR cNameShow  = ? THEN cNameShow  = '*'.\n  IF cNameHide  = '*' OR cNameHide  = ? THEN cNameHide  = '' .\n  IF cFieldShow = '*' OR cFieldShow = ? THEN cFieldShow = ''.\n  IF cFieldHide = '*' OR cFieldHide = ? THEN cFieldHide = ''"},
   {"type":"Punctuation","value":"."},
   {"type":"Text","value":"\n\n  "},
   {"type":"CommentMultiline","value":"/* Move elements starting with \"!\" from pos-list to neg-list */"},
@@ -10015,157 +10537,7 @@
   {"type":"Text","value":" "},
   {"type":"Operator","value":"="},
   {"type":"Text","value":" "},
-  {"type":"LiteralStringSingle","value":"'Normal'"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"THEN"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"NEXT "},
-  {"type":"NameVariable","value":"#"},
-  {"type":"KeywordReserved","value":"Table"},
-  {"type":"Punctuation","value":"."},
-  {"type":"Text","value":"\n    "},
-  {"type":"KeywordReserved","value":"IF"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"NOT"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"lSchema"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"AND"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"ttTable"},
-  {"type":"Punctuation","value":"."},
-  {"type":"NameVariable","value":"cCategory"},
-  {"type":"Text","value":" "},
-  {"type":"Operator","value":"="},
-  {"type":"Text","value":" "},
-  {"type":"LiteralStringSingle","value":"'Schema'"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"THEN"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"NEXT "},
-  {"type":"NameVariable","value":"#"},
-  {"type":"KeywordReserved","value":"Table"},
-  {"type":"Punctuation","value":"."},
-  {"type":"Text","value":"\n    "},
-  {"type":"KeywordReserved","value":"IF"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"NOT"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"lVst"},
-  {"type":"Text","value":"    "},
-  {"type":"KeywordReserved","value":"AND"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"ttTable"},
-  {"type":"Punctuation","value":"."},
-  {"type":"NameVariable","value":"cCategory"},
-  {"type":"Text","value":" "},
-  {"type":"Operator","value":"="},
-  {"type":"Text","value":" "},
-  {"type":"LiteralStringSingle","value":"'VST'"},
-  {"type":"Text","value":"    "},
-  {"type":"KeywordReserved","value":"THEN"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"NEXT "},
-  {"type":"NameVariable","value":"#"},
-  {"type":"KeywordReserved","value":"Table"},
-  {"type":"Punctuation","value":"."},
-  {"type":"Text","value":"\n    "},
-  {"type":"KeywordReserved","value":"IF"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"NOT"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"lSql"},
-  {"type":"Text","value":"    "},
-  {"type":"KeywordReserved","value":"AND"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"ttTable"},
-  {"type":"Punctuation","value":"."},
-  {"type":"NameVariable","value":"cCategory"},
-  {"type":"Text","value":" "},
-  {"type":"Operator","value":"="},
-  {"type":"Text","value":" "},
-  {"type":"LiteralStringSingle","value":"'SQL'"},
-  {"type":"Text","value":"    "},
-  {"type":"KeywordReserved","value":"THEN"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"NEXT "},
-  {"type":"NameVariable","value":"#"},
-  {"type":"KeywordReserved","value":"Table"},
-  {"type":"Punctuation","value":"."},
-  {"type":"Text","value":"\n    "},
-  {"type":"KeywordReserved","value":"IF"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"NOT"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"lOther"},
-  {"type":"Text","value":"  "},
-  {"type":"KeywordReserved","value":"AND"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"ttTable"},
-  {"type":"Punctuation","value":"."},
-  {"type":"NameVariable","value":"cCategory"},
-  {"type":"Text","value":" "},
-  {"type":"Operator","value":"="},
-  {"type":"Text","value":" "},
-  {"type":"LiteralStringSingle","value":"'Other'"},
-  {"type":"Text","value":"  "},
-  {"type":"KeywordReserved","value":"THEN"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"NEXT "},
-  {"type":"NameVariable","value":"#"},
-  {"type":"KeywordReserved","value":"Table"},
-  {"type":"Punctuation","value":"."},
-  {"type":"Text","value":"\n\n    "},
-  {"type":"CommentMultiline","value":"/* Handling for Hidden and Frozen apply only to user tables otherwise it will be too confusing\n     * because Schema, VST and SQL tables are all by default hidden and frozen.\n     */"},
-  {"type":"Text","value":"\n    "},
-  {"type":"KeywordReserved","value":"IF"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"NOT"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"lHidden"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"AND"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"ttTable"},
-  {"type":"Punctuation","value":"."},
-  {"type":"NameVariable","value":"cCategory"},
-  {"type":"Text","value":" "},
-  {"type":"Operator","value":"="},
-  {"type":"Text","value":" "},
-  {"type":"LiteralStringSingle","value":"'Application'"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"AND"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"ttTable"},
-  {"type":"Punctuation","value":"."},
-  {"type":"NameVariable","value":"lHidden"},
-  {"type":"Text","value":" "},
-  {"type":"Operator","value":"="},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"TRUE"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"THEN"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"NEXT "},
-  {"type":"NameVariable","value":"#"},
-  {"type":"KeywordReserved","value":"Table"},
-  {"type":"Punctuation","value":"."},
-  {"type":"Text","value":"\n    "},
-  {"type":"KeywordReserved","value":"IF"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"NOT"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"lFrozen"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"AND"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"ttTable"},
-  {"type":"Punctuation","value":"."},
-  {"type":"NameVariable","value":"cCategory"},
-  {"type":"Text","value":" "},
-  {"type":"Operator","value":"="},
-  {"type":"Text","value":" "},
-  {"type":"LiteralStringSingle","value":"'Application'"},
+  {"type":"LiteralStringSingle","value":"'Normal' THEN NEXT #Table.\n    IF NOT lSchema AND ttTable.cCategory = 'Schema' THEN NEXT #Table.\n    IF NOT lVst    AND ttTable.cCategory = 'VST'    THEN NEXT #Table.\n    IF NOT lSql    AND ttTable.cCategory = 'SQL'    THEN NEXT #Table.\n    IF NOT lOther  AND ttTable.cCategory = 'Other'  THEN NEXT #Table.\n\n    /* Handling for Hidden and Frozen apply only to user tables otherwise it will be too confusing\n     * because Schema, VST and SQL tables are all by default hidden and frozen.\n     */\n    IF NOT lHidden AND ttTable.cCategory = 'Application' AND ttTable.lHidden = TRUE THEN NEXT #Table.\n    IF NOT lFrozen AND ttTable.cCategory = 'Application'"},
   {"type":"Text","value":" "},
   {"type":"KeywordReserved","value":"AND"},
   {"type":"Text","value":" "},
@@ -10621,94 +10993,7 @@
   {"type":"Text","value":" "},
   {"type":"KeywordReserved","value":"SUBSTITUTE"},
   {"type":"Punctuation","value":"("},
-  {"type":"LiteralStringSingle","value":"'\u00261DataDigger-\u00262.ini'"},
-  {"type":"NameVariable","value":","},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"getWorkFolder"},
-  {"type":"Punctuation","value":"()"},
-  {"type":"NameVariable","value":","},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"getUserName"},
-  {"type":"Punctuation","value":"()"},
-  {"type":"Text","value":" "},
-  {"type":"Punctuation","value":")."},
-  {"type":"Text","value":"\n  "},
-  {"type":"KeywordReserved","value":"IF"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"SEARCH"},
-  {"type":"Punctuation","value":"("},
-  {"type":"NameVariable","value":"cIniFile"},
-  {"type":"Punctuation","value":")"},
-  {"type":"Text","value":" "},
-  {"type":"Operator","value":"="},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"?"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"THEN"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"RETURN"},
-  {"type":"Punctuation","value":"."},
-  {"type":"Text","value":"\n\n  "},
-  {"type":"KeywordReserved","value":"INPUT"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"FROM"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"VALUE"},
-  {"type":"Punctuation","value":"("},
-  {"type":"NameVariable","value":"cIniFile"},
-  {"type":"Punctuation","value":")."},
-  {"type":"Text","value":"\n\n  "},
-  {"type":"NameVariable","value":"#ReadLine"},
-  {"type":"Punctuation","value":":"},
-  {"type":"Text","value":"\n  "},
-  {"type":"KeywordReserved","value":"REPEAT"},
-  {"type":"Punctuation","value":":"},
-  {"type":"Text","value":"\n    "},
-  {"type":"CommentMultiline","value":"/* Sometimes lines get screwed up and are waaaay too long\n     * for the import statement. So just ignore those.\n     */"},
-  {"type":"Text","value":"\n    "},
-  {"type":"KeywordReserved","value":"IMPORT"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"UNFORMATTED"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"cLine"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"NO-ERROR"},
-  {"type":"Punctuation","value":"."},
-  {"type":"Text","value":"\n    "},
-  {"type":"KeywordReserved","value":"IF"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"ERROR-STATUS"},
-  {"type":"Punctuation","value":":"},
-  {"type":"KeywordReserved","value":"ERROR"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"THEN"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"NEXT "},
-  {"type":"NameVariable","value":"#ReadLine"},
-  {"type":"Punctuation","value":"."},
-  {"type":"Text","value":"\n\n    "},
-  {"type":"CommentMultiline","value":"/* Find DB sections */"},
-  {"type":"Text","value":"\n    "},
-  {"type":"KeywordReserved","value":"IF"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"cLine"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"MATCHES "},
-  {"type":"LiteralStringSingle","value":"'[DB:*]'"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"THEN\n   "},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"DO"},
-  {"type":"Punctuation","value":":"},
-  {"type":"Text","value":"\n      "},
-  {"type":"NameVariable","value":"cSection"},
-  {"type":"Text","value":" "},
-  {"type":"Operator","value":"="},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"TRIM"},
-  {"type":"Punctuation","value":"("},
-  {"type":"NameVariable","value":"cLine,"},
-  {"type":"LiteralStringSingle","value":"'[]'"},
+  {"type":"LiteralStringSingle","value":"'\u00261DataDigger-\u00262.ini', getWorkFolder(), getUserName() ).\n  IF SEARCH(cIniFile) = ? THEN RETURN.\n\n  INPUT FROM VALUE(cIniFile).\n\n  #ReadLine:\n  REPEAT:\n    /* Sometimes lines get screwed up and are waaaay too long\n     * for the import statement. So just ignore those.\n     */\n    IMPORT UNFORMATTED cLine NO-ERROR.\n    IF ERROR-STATUS:ERROR THEN NEXT #ReadLine.\n\n    /* Find DB sections */\n    IF cLine MATCHES '[DB:*]' THEN\n    DO:\n      cSection = TRIM(cLine,'[]'"},
   {"type":"Punctuation","value":")."},
   {"type":"Text","value":"\n      "},
   {"type":"NameVariable","value":"cDatabase"},
@@ -10801,36 +11086,7 @@
   {"type":"Punctuation","value":"("},
   {"type":"LiteralNumberInteger","value":"1"},
   {"type":"NameVariable","value":",cLine,"},
-  {"type":"LiteralStringSingle","value":"':'"},
-  {"type":"Punctuation","value":")"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"NO-ERROR"},
-  {"type":"Punctuation","value":"."},
-  {"type":"Text","value":"\n\n      "},
-  {"type":"KeywordReserved","value":"IF"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"AVAILABLE"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"ttTable"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"THEN\n     "},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"DO"},
-  {"type":"Punctuation","value":":"},
-  {"type":"Text","value":"\n        "},
-  {"type":"NameVariable","value":"ttTable"},
-  {"type":"Punctuation","value":"."},
-  {"type":"NameVariable","value":"iNumQueries"},
-  {"type":"Text","value":" "},
-  {"type":"Operator","value":"="},
-  {"type":"Text","value":" "},
-  {"type":"KeywordType","value":"INTEGER"},
-  {"type":"Punctuation","value":"("},
-  {"type":"KeywordReserved","value":"ENTRY"},
-  {"type":"Punctuation","value":"("},
-  {"type":"LiteralNumberInteger","value":"2"},
-  {"type":"NameVariable","value":",cLine,"},
-  {"type":"LiteralStringSingle","value":"'='"},
+  {"type":"LiteralStringSingle","value":"':') NO-ERROR.\n\n      IF AVAILABLE ttTable THEN\n      DO:\n        ttTable.iNumQueries = INTEGER(ENTRY(2,cLine,'='"},
   {"type":"Punctuation","value":"))"},
   {"type":"Text","value":" "},
   {"type":"KeywordReserved","value":"NO-ERROR"},
@@ -10907,113 +11163,7 @@
   {"type":"Punctuation","value":"("},
   {"type":"LiteralNumberInteger","value":"1"},
   {"type":"NameVariable","value":",cLine,"},
-  {"type":"LiteralStringSingle","value":"':'"},
-  {"type":"Punctuation","value":")"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"NO-ERROR"},
-  {"type":"Punctuation","value":"."},
-  {"type":"Text","value":"\n\n      "},
-  {"type":"KeywordReserved","value":"IF"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"AVAILABLE"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"ttTable"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"THEN\n       "},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"ttTable"},
-  {"type":"Punctuation","value":"."},
-  {"type":"NameVariable","value":"tLastUsed"},
-  {"type":"Text","value":" "},
-  {"type":"Operator","value":"="},
-  {"type":"Text","value":" "},
-  {"type":"KeywordType","value":"DATETIME"},
-  {"type":"Punctuation","value":"("},
-  {"type":"KeywordReserved","value":"ENTRY"},
-  {"type":"Punctuation","value":"("},
-  {"type":"LiteralNumberInteger","value":"2"},
-  {"type":"NameVariable","value":",cLine,"},
-  {"type":"LiteralStringSingle","value":"'='"},
-  {"type":"Punctuation","value":"))"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"NO-ERROR"},
-  {"type":"Punctuation","value":"."},
-  {"type":"Text","value":"\n\n    "},
-  {"type":"KeywordReserved","value":"END"},
-  {"type":"Punctuation","value":"."},
-  {"type":"Text","value":" "},
-  {"type":"CommentMultiline","value":"/* lastUsed */"},
-  {"type":"Text","value":"\n\n  "},
-  {"type":"KeywordReserved","value":"END"},
-  {"type":"Punctuation","value":"."},
-  {"type":"Text","value":" "},
-  {"type":"CommentMultiline","value":"/* repeat */"},
-  {"type":"Text","value":"\n  "},
-  {"type":"KeywordReserved","value":"INPUT"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"CLOSE"},
-  {"type":"Punctuation","value":"."},
-  {"type":"Text","value":"\n\n  "},
-  {"type":"CommentPreproc","value":"{\u0026timerStop}"},
-  {"type":"Text","value":"\n\n"},
-  {"type":"KeywordReserved","value":"END"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"PROCEDURE"},
-  {"type":"Punctuation","value":"."},
-  {"type":"Text","value":" "},
-  {"type":"CommentMultiline","value":"/* getTableStats */"},
-  {"type":"Text","value":"\n\n"},
-  {"type":"CommentMultiline","value":"/* _UIB-CODE-BLOCK-END */"},
-  {"type":"CommentPreproc","value":"\n\u0026ANALYZE-RESUME\n\n\u0026ENDIF\n\n\u0026IF DEFINED(EXCLUDE-initTableFilter) = 0 \u0026THEN\n\n\u0026ANALYZE-SUSPEND _UIB-CODE-BLOCK _PROCEDURE initTableFilter Procedure"},
-  {"type":"Text","value":"\n"},
-  {"type":"KeywordReserved","value":"PROCEDURE"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"initTableFilter"},
-  {"type":"Text","value":" "},
-  {"type":"Punctuation","value":":"},
-  {"type":"Text","value":"\n"},
-  {"type":"CommentMultiline","value":"/* Set table filter values back to their initial values\n  */"},
-  {"type":"Text","value":"\n  "},
-  {"type":"KeywordDeclaration","value":"DEFINE"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"INPUT-OUTPUT"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"PARAMETER"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"TABLE"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"FOR"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"ttTableFilter"},
-  {"type":"Punctuation","value":"."},
-  {"type":"Text","value":"\n\n  "},
-  {"type":"KeywordReserved","value":"EMPTY"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"TEMP-TABLE"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"ttTableFilter"},
-  {"type":"Punctuation","value":"."},
-  {"type":"Text","value":"\n  "},
-  {"type":"KeywordReserved","value":"CREATE"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"ttTableFilter"},
-  {"type":"Punctuation","value":"."},
-  {"type":"Text","value":"\n\n  "},
-  {"type":"CommentMultiline","value":"/* Set visibility of schema tables */"},
-  {"type":"Text","value":"\n  "},
-  {"type":"NameVariable","value":"ttTableFilter"},
-  {"type":"Punctuation","value":"."},
-  {"type":"NameVariable","value":"lShowSchema"},
-  {"type":"Text","value":" "},
-  {"type":"Operator","value":"="},
-  {"type":"Text","value":" "},
-  {"type":"KeywordType","value":"LOGICAL"},
-  {"type":"Punctuation","value":"("},
-  {"type":"NameVariable","value":"getRegistry"},
-  {"type":"Punctuation","value":"("},
-  {"type":"LiteralStringSingle","value":"'DataDigger'"},
-  {"type":"NameVariable","value":","},
-  {"type":"LiteralStringSingle","value":"'ShowHiddenTables'"},
+  {"type":"LiteralStringSingle","value":"':') NO-ERROR.\n\n      IF AVAILABLE ttTable THEN\n        ttTable.tLastUsed = DATETIME(ENTRY(2,cLine,'=')) NO-ERROR.\n\n    END. /* lastUsed */\n\n  END. /* repeat */\n  INPUT CLOSE.\n\n  {\u0026timerStop}\n\nEND PROCEDURE. /* getTableStats */\n\n/* _UIB-CODE-BLOCK-END */\n\u0026ANALYZE-RESUME\n\n\u0026ENDIF\n\n\u0026IF DEFINED(EXCLUDE-initTableFilter) = 0 \u0026THEN\n\n\u0026ANALYZE-SUSPEND _UIB-CODE-BLOCK _PROCEDURE initTableFilter Procedure\nPROCEDURE initTableFilter :\n/* Set table filter values back to their initial values\n  */\n  DEFINE INPUT-OUTPUT PARAMETER TABLE FOR ttTableFilter.\n\n  EMPTY TEMP-TABLE ttTableFilter.\n  CREATE ttTableFilter.\n\n  /* Set visibility of schema tables */\n  ttTableFilter.lShowSchema = LOGICAL(getRegistry('DataDigger','ShowHiddenTables'"},
   {"type":"Punctuation","value":"))."},
   {"type":"Text","value":"\n  "},
   {"type":"KeywordReserved","value":"IF"},
@@ -12076,25 +12226,7 @@
   {"type":"Text","value":" "},
   {"type":"Operator","value":"="},
   {"type":"Text","value":" "},
-  {"type":"LiteralStringSingle","value":"'DataDigger:Help'"},
-  {"type":"Text","value":"\n      "},
-  {"type":"KeywordReserved","value":"AND "},
-  {"type":"Punctuation","value":"("},
-  {"type":"NameVariable","value":"bfConfig"},
-  {"type":"Punctuation","value":"."},
-  {"type":"NameVariable","value":"cSetting"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"MATCHES "},
-  {"type":"LiteralStringSingle","value":"'*:hidden'"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"OR"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"bfConfig"},
-  {"type":"Punctuation","value":"."},
-  {"type":"NameVariable","value":"cSetting"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"MATCHES "},
-  {"type":"LiteralStringSingle","value":"'*:answer'"},
+  {"type":"LiteralStringSingle","value":"'DataDigger:Help'\n      AND (bfConfig.cSetting MATCHES '*:hidden' OR bfConfig.cSetting MATCHES '*:answer'"},
   {"type":"Punctuation","value":"):"},
   {"type":"Text","value":"\n    "},
   {"type":"NameVariable","value":"setRegistry"},
@@ -13022,337 +13154,7 @@
   {"type":"Punctuation","value":"("},
   {"type":"NameVariable","value":"pcWindowName,"},
   {"type":"Text","value":" "},
-  {"type":"LiteralStringSingle","value":"'Window:x'"},
-  {"type":"Text","value":" "},
-  {"type":"Punctuation","value":"))."},
-  {"type":"Text","value":"\n  "},
-  {"type":"KeywordReserved","value":"IF"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"iValue"},
-  {"type":"Text","value":" "},
-  {"type":"Operator","value":"="},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"?"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"THEN"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"iValue"},
-  {"type":"Text","value":" "},
-  {"type":"Operator","value":"="},
-  {"type":"Text","value":" "},
-  {"type":"KeywordType","value":"INTEGER"},
-  {"type":"Punctuation","value":"("},
-  {"type":"NameVariable","value":"getRegistry"},
-  {"type":"Punctuation","value":"("},
-  {"type":"LiteralStringSingle","value":"'DataDigger'"},
-  {"type":"NameVariable","value":","},
-  {"type":"Text","value":" "},
-  {"type":"LiteralStringSingle","value":"'Window:x'"},
-  {"type":"Text","value":" "},
-  {"type":"Punctuation","value":"))"},
-  {"type":"Text","value":" "},
-  {"type":"Operator","value":"+"},
-  {"type":"Text","value":" "},
-  {"type":"LiteralNumberInteger","value":"50"},
-  {"type":"Punctuation","value":"."},
-  {"type":"Text","value":"\n  "},
-  {"type":"KeywordReserved","value":"ASSIGN"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"phWindow"},
-  {"type":"Punctuation","value":":"},
-  {"type":"KeywordReserved","value":"X "},
-  {"type":"Operator","value":"="},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"iValue"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"NO-ERROR"},
-  {"type":"Punctuation","value":"."},
-  {"type":"Text","value":"\n\n  "},
-  {"type":"NameVariable","value":"iValue"},
-  {"type":"Text","value":" "},
-  {"type":"Operator","value":"="},
-  {"type":"Text","value":" "},
-  {"type":"KeywordType","value":"INTEGER"},
-  {"type":"Punctuation","value":"("},
-  {"type":"NameVariable","value":"getRegistry"},
-  {"type":"Punctuation","value":"("},
-  {"type":"NameVariable","value":"pcWindowName,"},
-  {"type":"Text","value":" "},
-  {"type":"LiteralStringSingle","value":"'Window:y'"},
-  {"type":"Text","value":" "},
-  {"type":"Punctuation","value":"))."},
-  {"type":"Text","value":"\n  "},
-  {"type":"KeywordReserved","value":"IF"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"iValue"},
-  {"type":"Text","value":" "},
-  {"type":"Operator","value":"="},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"?"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"THEN"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"iValue"},
-  {"type":"Text","value":" "},
-  {"type":"Operator","value":"="},
-  {"type":"Text","value":" "},
-  {"type":"KeywordType","value":"INTEGER"},
-  {"type":"Punctuation","value":"("},
-  {"type":"NameVariable","value":"getRegistry"},
-  {"type":"Punctuation","value":"("},
-  {"type":"LiteralStringSingle","value":"'DataDigger'"},
-  {"type":"NameVariable","value":","},
-  {"type":"Text","value":" "},
-  {"type":"LiteralStringSingle","value":"'Window:y'"},
-  {"type":"Text","value":" "},
-  {"type":"Punctuation","value":"))"},
-  {"type":"Text","value":" "},
-  {"type":"Operator","value":"+"},
-  {"type":"Text","value":" "},
-  {"type":"LiteralNumberInteger","value":"50"},
-  {"type":"Punctuation","value":"."},
-  {"type":"Text","value":"\n  "},
-  {"type":"KeywordReserved","value":"IF"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"iValue"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"\u003c\u003e"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"?"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"THEN"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"ASSIGN"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"phWindow"},
-  {"type":"Punctuation","value":":"},
-  {"type":"KeywordReserved","value":"Y "},
-  {"type":"Operator","value":"="},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"iValue"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"NO-ERROR"},
-  {"type":"Punctuation","value":"."},
-  {"type":"Text","value":"\n\n  "},
-  {"type":"NameVariable","value":"iValue"},
-  {"type":"Text","value":" "},
-  {"type":"Operator","value":"="},
-  {"type":"Text","value":" "},
-  {"type":"KeywordType","value":"INTEGER"},
-  {"type":"Punctuation","value":"("},
-  {"type":"NameVariable","value":"getRegistry"},
-  {"type":"Punctuation","value":"("},
-  {"type":"NameVariable","value":"pcWindowName,"},
-  {"type":"Text","value":" "},
-  {"type":"LiteralStringSingle","value":"'Window:height'"},
-  {"type":"Text","value":" "},
-  {"type":"Punctuation","value":"))."},
-  {"type":"Text","value":"\n  "},
-  {"type":"KeywordReserved","value":"IF"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"iValue"},
-  {"type":"Text","value":" "},
-  {"type":"Operator","value":"="},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"?"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"OR"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"iValue"},
-  {"type":"Text","value":" "},
-  {"type":"Operator","value":"="},
-  {"type":"Text","value":" "},
-  {"type":"LiteralNumberInteger","value":"0"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"THEN"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"iValue"},
-  {"type":"Text","value":" "},
-  {"type":"Operator","value":"="},
-  {"type":"Text","value":" "},
-  {"type":"KeywordType","value":"INTEGER"},
-  {"type":"Punctuation","value":"("},
-  {"type":"NameVariable","value":"getRegistry"},
-  {"type":"Punctuation","value":"("},
-  {"type":"LiteralStringSingle","value":"'DataDigger'"},
-  {"type":"NameVariable","value":","},
-  {"type":"Text","value":" "},
-  {"type":"LiteralStringSingle","value":"'Window:height'"},
-  {"type":"Text","value":" "},
-  {"type":"Punctuation","value":"))"},
-  {"type":"Text","value":" "},
-  {"type":"Operator","value":"-"},
-  {"type":"Text","value":" "},
-  {"type":"LiteralNumberInteger","value":"100"},
-  {"type":"Punctuation","value":"."},
-  {"type":"Text","value":"\n  "},
-  {"type":"KeywordReserved","value":"ASSIGN"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"phWindow"},
-  {"type":"Punctuation","value":":"},
-  {"type":"KeywordReserved","value":"HEIGHT-PIXELS "},
-  {"type":"Operator","value":"="},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"iValue"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"NO-ERROR"},
-  {"type":"Punctuation","value":"."},
-  {"type":"Text","value":"\n\n  "},
-  {"type":"NameVariable","value":"iValue"},
-  {"type":"Text","value":" "},
-  {"type":"Operator","value":"="},
-  {"type":"Text","value":" "},
-  {"type":"KeywordType","value":"INTEGER"},
-  {"type":"Punctuation","value":"("},
-  {"type":"NameVariable","value":"getRegistry"},
-  {"type":"Punctuation","value":"("},
-  {"type":"NameVariable","value":"pcWindowName,"},
-  {"type":"Text","value":" "},
-  {"type":"LiteralStringSingle","value":"'Window:width'"},
-  {"type":"Text","value":" "},
-  {"type":"Punctuation","value":"))."},
-  {"type":"Text","value":"\n  "},
-  {"type":"KeywordReserved","value":"IF"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"iValue"},
-  {"type":"Text","value":" "},
-  {"type":"Operator","value":"="},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"?"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"OR"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"iValue"},
-  {"type":"Text","value":" "},
-  {"type":"Operator","value":"="},
-  {"type":"Text","value":" "},
-  {"type":"LiteralNumberInteger","value":"0"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"THEN"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"iValue"},
-  {"type":"Text","value":" "},
-  {"type":"Operator","value":"="},
-  {"type":"Text","value":" "},
-  {"type":"KeywordType","value":"INTEGER"},
-  {"type":"Punctuation","value":"("},
-  {"type":"NameVariable","value":"getRegistry"},
-  {"type":"Punctuation","value":"("},
-  {"type":"LiteralStringSingle","value":"'DataDigger'"},
-  {"type":"NameVariable","value":","},
-  {"type":"Text","value":" "},
-  {"type":"LiteralStringSingle","value":"'Window:width'"},
-  {"type":"Text","value":" "},
-  {"type":"Punctuation","value":"))"},
-  {"type":"Text","value":" "},
-  {"type":"Operator","value":"-"},
-  {"type":"Text","value":" "},
-  {"type":"LiteralNumberInteger","value":"100"},
-  {"type":"Punctuation","value":"."},
-  {"type":"Text","value":"\n  "},
-  {"type":"KeywordReserved","value":"ASSIGN"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"phWindow"},
-  {"type":"Punctuation","value":":"},
-  {"type":"KeywordReserved","value":"WIDTH-PIXELS "},
-  {"type":"Operator","value":"="},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"iValue"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"NO-ERROR"},
-  {"type":"Punctuation","value":"."},
-  {"type":"Text","value":"\n\n  "},
-  {"type":"CommentMultiline","value":"/* Force a redraw */"},
-  {"type":"Text","value":"\n  "},
-  {"type":"KeywordReserved","value":"APPLY "},
-  {"type":"LiteralStringSingle","value":"'window-resized'"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"TO"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"phWindow"},
-  {"type":"Punctuation","value":"."},
-  {"type":"Text","value":"\n\n"},
-  {"type":"KeywordReserved","value":"END"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"PROCEDURE"},
-  {"type":"Punctuation","value":"."},
-  {"type":"Text","value":" "},
-  {"type":"CommentMultiline","value":"/* restoreWindowPos */"},
-  {"type":"Text","value":"\n\n"},
-  {"type":"CommentMultiline","value":"/* _UIB-CODE-BLOCK-END */"},
-  {"type":"CommentPreproc","value":"\n\u0026ANALYZE-RESUME\n\n\u0026ENDIF\n\n\u0026IF DEFINED(EXCLUDE-saveConfigFileSorted) = 0 \u0026THEN\n\n\u0026ANALYZE-SUSPEND _UIB-CODE-BLOCK _PROCEDURE saveConfigFileSorted Procedure"},
-  {"type":"Text","value":"\n"},
-  {"type":"KeywordReserved","value":"PROCEDURE"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"saveConfigFileSorted"},
-  {"type":"Text","value":" "},
-  {"type":"Punctuation","value":":"},
-  {"type":"Text","value":"\n"},
-  {"type":"CommentMultiline","value":"/* Save settings file sorted\n  */"},
-  {"type":"Text","value":"\n  "},
-  {"type":"KeywordDeclaration","value":"DEFINE"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"VARIABLE"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"cUserConfigFile"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"AS"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordType","value":"CHARACTER"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"NO-UNDO"},
-  {"type":"Punctuation","value":"."},
-  {"type":"Text","value":"\n  "},
-  {"type":"KeywordDeclaration","value":"DEFINE"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"BUFFER"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"bfConfig"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"FOR"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"ttConfig"},
-  {"type":"Punctuation","value":"."},
-  {"type":"Text","value":"\n\n  "},
-  {"type":"CommentPreproc","value":"{\u0026timerStart}"},
-  {"type":"Text","value":"\n\n  "},
-  {"type":"CommentMultiline","value":"/* Clean up rubbish settings data */"},
-  {"type":"Text","value":"\n  "},
-  {"type":"KeywordReserved","value":"FOR"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"EACH"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"bfConfig"},
-  {"type":"Text","value":"\n    "},
-  {"type":"KeywordReserved","value":"WHERE"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"bfConfig"},
-  {"type":"Punctuation","value":"."},
-  {"type":"NameVariable","value":"cSetting"},
-  {"type":"Text","value":" "},
-  {"type":"Operator","value":"="},
-  {"type":"Text","value":" "},
-  {"type":"LiteralStringSingle","value":"''"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"OR"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"bfConfig"},
-  {"type":"Punctuation","value":"."},
-  {"type":"NameVariable","value":"cSetting"},
-  {"type":"Text","value":" "},
-  {"type":"Operator","value":"="},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"?"},
-  {"type":"Text","value":"\n       "},
-  {"type":"KeywordReserved","value":"OR"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"bfConfig"},
-  {"type":"Punctuation","value":"."},
-  {"type":"NameVariable","value":"cValue"},
-  {"type":"Text","value":"   "},
-  {"type":"Operator","value":"="},
-  {"type":"Text","value":" "},
-  {"type":"LiteralStringSingle","value":"''"},
+  {"type":"LiteralStringSingle","value":"'Window:x' )).\n  IF iValue = ? THEN iValue = INTEGER(getRegistry('DataDigger', 'Window:x' )) + 50.\n  ASSIGN phWindow:X = iValue NO-ERROR.\n\n  iValue = INTEGER(getRegistry(pcWindowName, 'Window:y' )).\n  IF iValue = ? THEN iValue = INTEGER(getRegistry('DataDigger', 'Window:y' )) + 50.\n  IF iValue \u003c\u003e ? THEN ASSIGN phWindow:Y = iValue NO-ERROR.\n\n  iValue = INTEGER(getRegistry(pcWindowName, 'Window:height' )).\n  IF iValue = ? OR iValue = 0 THEN iValue = INTEGER(getRegistry('DataDigger', 'Window:height' )) - 100.\n  ASSIGN phWindow:HEIGHT-PIXELS = iValue NO-ERROR.\n\n  iValue = INTEGER(getRegistry(pcWindowName, 'Window:width' )).\n  IF iValue = ? OR iValue = 0 THEN iValue = INTEGER(getRegistry('DataDigger', 'Window:width' )) - 100.\n  ASSIGN phWindow:WIDTH-PIXELS = iValue NO-ERROR.\n\n  /* Force a redraw */\n  APPLY 'window-resized' TO phWindow.\n\nEND PROCEDURE. /* restoreWindowPos */\n\n/* _UIB-CODE-BLOCK-END */\n\u0026ANALYZE-RESUME\n\n\u0026ENDIF\n\n\u0026IF DEFINED(EXCLUDE-saveConfigFileSorted) = 0 \u0026THEN\n\n\u0026ANALYZE-SUSPEND _UIB-CODE-BLOCK _PROCEDURE saveConfigFileSorted Procedure\nPROCEDURE saveConfigFileSorted :\n/* Save settings file sorted\n  */\n  DEFINE VARIABLE cUserConfigFile AS CHARACTER NO-UNDO.\n  DEFINE BUFFER bfConfig FOR ttConfig.\n\n  {\u0026timerStart}\n\n  /* Clean up rubbish settings data */\n  FOR EACH bfConfig\n    WHERE bfConfig.cSetting = '' OR bfConfig.cSetting = ?\n       OR bfConfig.cValue   = ''"},
   {"type":"Text","value":" "},
   {"type":"KeywordReserved","value":"OR"},
   {"type":"Text","value":" "},
@@ -13643,34 +13445,7 @@
   {"type":"KeywordReserved","value":"REPLACE"},
   {"type":"Punctuation","value":"("},
   {"type":"NameVariable","value":"cQuery,"},
-  {"type":"LiteralStringSingle","value":"'~n'"},
-  {"type":"NameVariable","value":","},
-  {"type":"KeywordReserved","value":"CHR"},
-  {"type":"Punctuation","value":"("},
-  {"type":"LiteralNumberInteger","value":"1"},
-  {"type":"Punctuation","value":"))."},
-  {"type":"Text","value":"\n  "},
-  {"type":"NameVariable","value":"cQuery"},
-  {"type":"Text","value":" "},
-  {"type":"Operator","value":"="},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"REPLACE"},
-  {"type":"Punctuation","value":"("},
-  {"type":"NameVariable","value":"cQuery,"},
-  {"type":"CommentPreproc","value":"{\u0026QUERYSEP}"},
-  {"type":"NameVariable","value":","},
-  {"type":"KeywordReserved","value":"CHR"},
-  {"type":"Punctuation","value":"("},
-  {"type":"LiteralNumberInteger","value":"1"},
-  {"type":"Punctuation","value":"))."},
-  {"type":"Text","value":"\n  "},
-  {"type":"KeywordReserved","value":"IF"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"cQuery"},
-  {"type":"Text","value":" "},
-  {"type":"Operator","value":"="},
-  {"type":"Text","value":" "},
-  {"type":"LiteralStringSingle","value":"''"},
+  {"type":"LiteralStringSingle","value":"'~n',CHR(1)).\n  cQuery = REPLACE(cQuery,{\u0026QUERYSEP},CHR(1)).\n  IF cQuery = ''"},
   {"type":"Text","value":" "},
   {"type":"KeywordReserved","value":"THEN"},
   {"type":"Text","value":" "},
@@ -14528,135 +14303,7 @@
   {"type":"Text","value":" "},
   {"type":"Operator","value":"="},
   {"type":"Text","value":" "},
-  {"type":"LiteralStringSingle","value":"''"},
-  {"type":"Punctuation","value":"."},
-  {"type":"Text","value":"\n  "},
-  {"type":"NameVariable","value":"i"},
-  {"type":"Text","value":" "},
-  {"type":"Operator","value":"="},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"LOOKUP"},
-  {"type":"Punctuation","value":"("},
-  {"type":"NameVariable","value":"pcTable,"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"cList"},
-  {"type":"Punctuation","value":")."},
-  {"type":"Text","value":"\n\n  "},
-  {"type":"CommentMultiline","value":"/* Toggle setting? */"},
-  {"type":"Text","value":"\n  "},
-  {"type":"KeywordReserved","value":"IF"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"plFavourite"},
-  {"type":"Text","value":" "},
-  {"type":"Operator","value":"="},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"?"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"THEN"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"plFavourite"},
-  {"type":"Text","value":" "},
-  {"type":"Operator","value":"="},
-  {"type":"Text","value":" "},
-  {"type":"Punctuation","value":"("},
-  {"type":"NameVariable","value":"i"},
-  {"type":"Text","value":" "},
-  {"type":"Operator","value":"="},
-  {"type":"Text","value":" "},
-  {"type":"LiteralNumberInteger","value":"0"},
-  {"type":"Punctuation","value":")."},
-  {"type":"Text","value":"\n\n  "},
-  {"type":"CommentMultiline","value":"/* Add to favourites */"},
-  {"type":"Text","value":"\n  "},
-  {"type":"KeywordReserved","value":"IF"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"NOT"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"plFavourite"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"AND"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"i"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"\u003e"},
-  {"type":"Text","value":" "},
-  {"type":"LiteralNumberInteger","value":"0"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"THEN\n "},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"DO"},
-  {"type":"Punctuation","value":":"},
-  {"type":"Text","value":"\n    "},
-  {"type":"KeywordReserved","value":"ENTRY"},
-  {"type":"Punctuation","value":"("},
-  {"type":"NameVariable","value":"i,"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"cList"},
-  {"type":"Punctuation","value":")"},
-  {"type":"Text","value":" "},
-  {"type":"Operator","value":"="},
-  {"type":"Text","value":" "},
-  {"type":"LiteralStringSingle","value":"''"},
-  {"type":"Punctuation","value":"."},
-  {"type":"Text","value":"\n    "},
-  {"type":"NameVariable","value":"cList"},
-  {"type":"Text","value":" "},
-  {"type":"Operator","value":"="},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"REPLACE"},
-  {"type":"Punctuation","value":"("},
-  {"type":"NameVariable","value":"cList,"},
-  {"type":"LiteralStringSingle","value":"',,'"},
-  {"type":"NameVariable","value":","},
-  {"type":"LiteralStringSingle","value":"','"},
-  {"type":"Punctuation","value":")."},
-  {"type":"Text","value":"\n    "},
-  {"type":"NameVariable","value":"cList"},
-  {"type":"Text","value":" "},
-  {"type":"Operator","value":"="},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"TRIM"},
-  {"type":"Punctuation","value":"("},
-  {"type":"NameVariable","value":"cList,"},
-  {"type":"LiteralStringSingle","value":"','"},
-  {"type":"Punctuation","value":")."},
-  {"type":"Text","value":"\n  "},
-  {"type":"KeywordReserved","value":"END"},
-  {"type":"Punctuation","value":"."},
-  {"type":"Text","value":"\n\n  "},
-  {"type":"CommentMultiline","value":"/* Remove from favourites */"},
-  {"type":"Text","value":"\n  "},
-  {"type":"KeywordReserved","value":"IF"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"plFavourite"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"AND"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"i"},
-  {"type":"Text","value":" "},
-  {"type":"Operator","value":"="},
-  {"type":"Text","value":" "},
-  {"type":"LiteralNumberInteger","value":"0"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"THEN\n   "},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"cList"},
-  {"type":"Text","value":" "},
-  {"type":"Operator","value":"="},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"TRIM"},
-  {"type":"Punctuation","value":"("},
-  {"type":"KeywordReserved","value":"SUBSTITUTE"},
-  {"type":"Punctuation","value":"("},
-  {"type":"LiteralStringSingle","value":"'\u00261,\u00262'"},
-  {"type":"NameVariable","value":","},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"cList,"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"pcTable"},
-  {"type":"Punctuation","value":")"},
-  {"type":"NameVariable","value":","},
-  {"type":"LiteralStringSingle","value":"','"},
+  {"type":"LiteralStringSingle","value":"''.\n  i = LOOKUP(pcTable, cList).\n\n  /* Toggle setting? */\n  IF plFavourite = ? THEN plFavourite = (i = 0).\n\n  /* Add to favourites */\n  IF NOT plFavourite AND i \u003e 0 THEN\n  DO:\n    ENTRY(i, cList) = ''.\n    cList = REPLACE(cList,',,',',').\n    cList = TRIM(cList,',').\n  END.\n\n  /* Remove from favourites */\n  IF plFavourite AND i = 0 THEN\n    cList = TRIM(SUBSTITUTE('\u00261,\u00262', cList, pcTable),','"},
   {"type":"Punctuation","value":")."},
   {"type":"Text","value":"\n\n  "},
   {"type":"NameVariable","value":"setRegistry"},
@@ -14745,1348 +14392,7 @@
   {"type":"KeywordReserved","value":"TYPE "},
   {"type":"Operator","value":"="},
   {"type":"Text","value":" "},
-  {"type":"LiteralStringSingle","value":"'fill-in'"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"THEN"},
-  {"type":"Text","value":" "},
-  {"type":"LiteralNumberInteger","value":"5"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"ELSE"},
-  {"type":"Text","value":" "},
-  {"type":"LiteralNumberInteger","value":"0"},
-  {"type":"Punctuation","value":")"},
-  {"type":"Text","value":"\n    "},
-  {"type":"Punctuation","value":"."},
-  {"type":"Text","value":"\n\n"},
-  {"type":"KeywordReserved","value":"END"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"PROCEDURE"},
-  {"type":"Punctuation","value":"."},
-  {"type":"Text","value":" "},
-  {"type":"CommentMultiline","value":"/* setLabelPosition */"},
-  {"type":"Text","value":"\n\n"},
-  {"type":"CommentMultiline","value":"/* _UIB-CODE-BLOCK-END */"},
-  {"type":"CommentPreproc","value":"\n\u0026ANALYZE-RESUME\n\n\u0026ENDIF\n\n\u0026IF DEFINED(EXCLUDE-setSortArrow) = 0 \u0026THEN\n\n\u0026ANALYZE-SUSPEND _UIB-CODE-BLOCK _PROCEDURE setSortArrow Procedure"},
-  {"type":"Text","value":"\n"},
-  {"type":"KeywordReserved","value":"PROCEDURE"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"setSortArrow"},
-  {"type":"Text","value":" "},
-  {"type":"Punctuation","value":":"},
-  {"type":"Text","value":"\n"},
-  {"type":"CommentMultiline","value":"/* Set the sorting arrow on a browse\n  */"},
-  {"type":"Text","value":"\n  "},
-  {"type":"KeywordDeclaration","value":"DEFINE"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"INPUT"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"PARAMETER"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"phBrowse"},
-  {"type":"Text","value":"    "},
-  {"type":"KeywordReserved","value":"AS"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordType","value":"HANDLE   "},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"NO-UNDO"},
-  {"type":"Punctuation","value":"."},
-  {"type":"Text","value":"\n  "},
-  {"type":"KeywordDeclaration","value":"DEFINE"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"INPUT"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"PARAMETER"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"pcSortField"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"AS"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordType","value":"CHARACTER"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"NO-UNDO"},
-  {"type":"Punctuation","value":"."},
-  {"type":"Text","value":"\n  "},
-  {"type":"KeywordDeclaration","value":"DEFINE"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"INPUT"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"PARAMETER"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"plAscending"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"AS"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordType","value":"LOGICAL  "},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"NO-UNDO"},
-  {"type":"Punctuation","value":"."},
-  {"type":"Text","value":"\n\n  "},
-  {"type":"KeywordDeclaration","value":"DEFINE"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"VARIABLE"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"iColumn"},
-  {"type":"Text","value":"    "},
-  {"type":"KeywordReserved","value":"AS"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordType","value":"INTEGER  "},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"NO-UNDO"},
-  {"type":"Punctuation","value":"."},
-  {"type":"Text","value":"\n  "},
-  {"type":"KeywordDeclaration","value":"DEFINE"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"VARIABLE"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"hColumn"},
-  {"type":"Text","value":"    "},
-  {"type":"KeywordReserved","value":"AS"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordType","value":"HANDLE   "},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"NO-UNDO"},
-  {"type":"Punctuation","value":"."},
-  {"type":"Text","value":"\n  "},
-  {"type":"KeywordDeclaration","value":"DEFINE"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"VARIABLE"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"lSortFound"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"AS"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordType","value":"LOGICAL  "},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"NO-UNDO"},
-  {"type":"Punctuation","value":"."},
-  {"type":"Text","value":"\n\n  "},
-  {"type":"CommentPreproc","value":"{\u0026timerStart}"},
-  {"type":"Text","value":"\n\n  "},
-  {"type":"KeywordReserved","value":"DO"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"iColumn"},
-  {"type":"Text","value":" "},
-  {"type":"Operator","value":"="},
-  {"type":"Text","value":" "},
-  {"type":"LiteralNumberInteger","value":"1"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"TO"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"phBrowse"},
-  {"type":"Punctuation","value":":"},
-  {"type":"KeywordReserved","value":"NUM-COLUMNS"},
-  {"type":"Punctuation","value":":"},
-  {"type":"Text","value":"\n    "},
-  {"type":"NameVariable","value":"hColumn"},
-  {"type":"Text","value":" "},
-  {"type":"Operator","value":"="},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"phBrowse"},
-  {"type":"Punctuation","value":":"},
-  {"type":"KeywordReserved","value":"GET-BROWSE-COLUMN"},
-  {"type":"Punctuation","value":"("},
-  {"type":"NameVariable","value":"iColumn"},
-  {"type":"Punctuation","value":")."},
-  {"type":"Text","value":"\n\n    "},
-  {"type":"CommentMultiline","value":"/* If you apply the sort to the same column, the order\n     * of sorting is inverted.\n     */"},
-  {"type":"Text","value":"\n    "},
-  {"type":"KeywordReserved","value":"IF"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"hColumn"},
-  {"type":"Punctuation","value":":"},
-  {"type":"KeywordReserved","value":"NAME "},
-  {"type":"Operator","value":"="},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"pcSortField"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"THEN\n   "},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"DO"},
-  {"type":"Punctuation","value":":"},
-  {"type":"Text","value":"\n      "},
-  {"type":"NameVariable","value":"phBrowse"},
-  {"type":"Punctuation","value":":"},
-  {"type":"KeywordReserved","value":"SET-SORT-ARROW"},
-  {"type":"Punctuation","value":"("},
-  {"type":"NameVariable","value":"iColumn,"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"plAscending"},
-  {"type":"Text","value":" "},
-  {"type":"Punctuation","value":")."},
-  {"type":"Text","value":"\n      "},
-  {"type":"NameVariable","value":"lSortFound"},
-  {"type":"Text","value":" "},
-  {"type":"Operator","value":"="},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"TRUE"},
-  {"type":"Punctuation","value":"."},
-  {"type":"Text","value":"\n\n      "},
-  {"type":"CommentMultiline","value":"/* Setting is one of: ColumnSortFields | ColumnSortIndexes | ColumnSortTables */"},
-  {"type":"Text","value":"\n      "},
-  {"type":"NameVariable","value":"setRegistry"},
-  {"type":"Punctuation","value":"("},
-  {"type":"Text","value":" "},
-  {"type":"LiteralStringSingle","value":"'DataDigger'"},
-  {"type":"Text","value":"\n                "},
-  {"type":"NameVariable","value":","},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"SUBSTITUTE"},
-  {"type":"Punctuation","value":"("},
-  {"type":"LiteralStringSingle","value":"'ColumnSort\u00261'"},
-  {"type":"NameVariable","value":","},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"SUBSTRING"},
-  {"type":"Punctuation","value":"("},
-  {"type":"NameVariable","value":"phBrowse"},
-  {"type":"Punctuation","value":":"},
-  {"type":"KeywordReserved","value":"NAME"},
-  {"type":"NameVariable","value":","},
-  {"type":"LiteralNumberInteger","value":"3"},
-  {"type":"Punctuation","value":"))"},
-  {"type":"Text","value":"\n                "},
-  {"type":"NameVariable","value":","},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"SUBSTITUTE"},
-  {"type":"Punctuation","value":"("},
-  {"type":"LiteralStringSingle","value":"'\u00261,\u00262'"},
-  {"type":"NameVariable","value":",iColumn,"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"plAscending"},
-  {"type":"Punctuation","value":")"},
-  {"type":"Text","value":"\n                "},
-  {"type":"Punctuation","value":")."},
-  {"type":"Text","value":"\n    "},
-  {"type":"KeywordReserved","value":"END"},
-  {"type":"Punctuation","value":"."},
-  {"type":"Text","value":"\n    "},
-  {"type":"KeywordReserved","value":"ELSE\n     "},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"phBrowse"},
-  {"type":"Punctuation","value":":"},
-  {"type":"KeywordReserved","value":"SET-SORT-ARROW"},
-  {"type":"Punctuation","value":"("},
-  {"type":"NameVariable","value":"iColumn,"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"?"},
-  {"type":"Text","value":" "},
-  {"type":"Punctuation","value":")."},
-  {"type":"Text","value":" "},
-  {"type":"CommentMultiline","value":"/* erase existing arrow */"},
-  {"type":"Text","value":"\n  "},
-  {"type":"KeywordReserved","value":"END"},
-  {"type":"Punctuation","value":"."},
-  {"type":"Text","value":"\n\n  "},
-  {"type":"CommentMultiline","value":"/* If no sort is found, delete setting */"},
-  {"type":"Text","value":"\n  "},
-  {"type":"KeywordReserved","value":"IF"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"NOT"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"lSortFound"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"THEN\n   "},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"setRegistry"},
-  {"type":"Punctuation","value":"("},
-  {"type":"Text","value":" "},
-  {"type":"LiteralStringSingle","value":"'DataDigger'"},
-  {"type":"NameVariable","value":","},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"SUBSTITUTE"},
-  {"type":"Punctuation","value":"("},
-  {"type":"LiteralStringSingle","value":"'ColumnSort\u00261'"},
-  {"type":"NameVariable","value":","},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"SUBSTRING"},
-  {"type":"Punctuation","value":"("},
-  {"type":"NameVariable","value":"phBrowse"},
-  {"type":"Punctuation","value":":"},
-  {"type":"KeywordReserved","value":"NAME"},
-  {"type":"NameVariable","value":","},
-  {"type":"LiteralNumberInteger","value":"3"},
-  {"type":"Punctuation","value":"))"},
-  {"type":"NameVariable","value":","},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"?"},
-  {"type":"Punctuation","value":")."},
-  {"type":"Text","value":"\n\n  "},
-  {"type":"CommentPreproc","value":"{\u0026timerStop}"},
-  {"type":"Text","value":"\n\n"},
-  {"type":"KeywordReserved","value":"END"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"PROCEDURE"},
-  {"type":"Punctuation","value":"."},
-  {"type":"Text","value":" "},
-  {"type":"CommentMultiline","value":"/* setSortArrow */"},
-  {"type":"Text","value":"\n\n"},
-  {"type":"CommentMultiline","value":"/* _UIB-CODE-BLOCK-END */"},
-  {"type":"CommentPreproc","value":"\n\u0026ANALYZE-RESUME\n\n\u0026ENDIF\n\n\u0026IF DEFINED(EXCLUDE-setTransparency) = 0 \u0026THEN\n\n\u0026ANALYZE-SUSPEND _UIB-CODE-BLOCK _PROCEDURE setTransparency Procedure"},
-  {"type":"Text","value":"\n"},
-  {"type":"KeywordReserved","value":"PROCEDURE"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"setTransparency"},
-  {"type":"Text","value":" "},
-  {"type":"Punctuation","value":":"},
-  {"type":"Text","value":"\n"},
-  {"type":"CommentMultiline","value":"/* Set transparency level for a frame, using Windows api\n  */"},
-  {"type":"Text","value":"\n  "},
-  {"type":"KeywordDeclaration","value":"DEFINE"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"INPUT "},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"PARAMETER"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"phFrame"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"AS"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordType","value":"HANDLE    "},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"NO-UNDO"},
-  {"type":"Punctuation","value":"."},
-  {"type":"Text","value":"\n  "},
-  {"type":"KeywordDeclaration","value":"DEFINE"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"INPUT "},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"PARAMETER"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"piLevel"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"AS"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordType","value":"INTEGER   "},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"NO-UNDO"},
-  {"type":"Punctuation","value":"."},
-  {"type":"CommentPreproc","value":"\n\n  \u0026SCOPED-DEFINE GWL_EXSTYLE         -20\n  \u0026SCOPED-DEFINE WS_EX_LAYERED       524288\n  \u0026SCOPED-DEFINE LWA_ALPHA           2\n  \u0026SCOPED-DEFINE WS_EX_TRANSPARENT   32"},
-  {"type":"Text","value":"\n\n  "},
-  {"type":"CommentPreproc","value":"{\u0026_proparse_prolint-nowarn(varusage)}"},
-  {"type":"Text","value":"\n  "},
-  {"type":"KeywordDeclaration","value":"DEFINE"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"VARIABLE"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"stat"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"AS"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordType","value":"INTEGER   "},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"NO-UNDO"},
-  {"type":"Punctuation","value":"."},
-  {"type":"Text","value":"\n\n  "},
-  {"type":"CommentMultiline","value":"/* Set WS_EX_LAYERED on this window  */"},
-  {"type":"Text","value":"\n  "},
-  {"type":"CommentPreproc","value":"{\u0026_proparse_prolint-nowarn(varusage)}"},
-  {"type":"Text","value":"\n  "},
-  {"type":"KeywordReserved","value":"RUN"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"SetWindowLongA"},
-  {"type":"Punctuation","value":"("},
-  {"type":"NameVariable","value":"phFrame"},
-  {"type":"Punctuation","value":":"},
-  {"type":"KeywordReserved","value":"HWND"},
-  {"type":"NameVariable","value":","},
-  {"type":"Text","value":" "},
-  {"type":"CommentPreproc","value":"{\u0026GWL_EXSTYLE}"},
-  {"type":"NameVariable","value":","},
-  {"type":"Text","value":" "},
-  {"type":"CommentPreproc","value":"{\u0026WS_EX_LAYERED}"},
-  {"type":"NameVariable","value":","},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"OUTPUT"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"stat"},
-  {"type":"Punctuation","value":")."},
-  {"type":"Text","value":"\n\n  "},
-  {"type":"CommentMultiline","value":"/* Make this window transparent (0 - 255) */"},
-  {"type":"Text","value":"\n  "},
-  {"type":"CommentPreproc","value":"{\u0026_proparse_prolint-nowarn(varusage)}"},
-  {"type":"Text","value":"\n  "},
-  {"type":"KeywordReserved","value":"RUN"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"SetLayeredWindowAttributes"},
-  {"type":"Punctuation","value":"("},
-  {"type":"NameVariable","value":"phFrame"},
-  {"type":"Punctuation","value":":"},
-  {"type":"KeywordReserved","value":"HWND"},
-  {"type":"NameVariable","value":","},
-  {"type":"Text","value":" "},
-  {"type":"LiteralNumberInteger","value":"0"},
-  {"type":"NameVariable","value":","},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"piLevel,"},
-  {"type":"Text","value":" "},
-  {"type":"CommentPreproc","value":"{\u0026LWA_ALPHA}"},
-  {"type":"NameVariable","value":","},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"OUTPUT"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"stat"},
-  {"type":"Punctuation","value":")."},
-  {"type":"Text","value":"\n\n"},
-  {"type":"KeywordReserved","value":"END"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"PROCEDURE"},
-  {"type":"Punctuation","value":"."},
-  {"type":"Text","value":" "},
-  {"type":"CommentMultiline","value":"/* setTransparency */"},
-  {"type":"Text","value":"\n\n"},
-  {"type":"CommentMultiline","value":"/* _UIB-CODE-BLOCK-END */"},
-  {"type":"CommentPreproc","value":"\n\u0026ANALYZE-RESUME\n\n\u0026ENDIF\n\n\u0026IF DEFINED(EXCLUDE-setXmlNodeNames) = 0 \u0026THEN\n\n\u0026ANALYZE-SUSPEND _UIB-CODE-BLOCK _PROCEDURE setXmlNodeNames Procedure"},
-  {"type":"Text","value":"\n"},
-  {"type":"KeywordReserved","value":"PROCEDURE"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"setXmlNodeNames"},
-  {"type":"Text","value":" "},
-  {"type":"Punctuation","value":":"},
-  {"type":"Text","value":"\n"},
-  {"type":"CommentMultiline","value":"/* Set the XML-NODE-NAMES of all fields in a buffer\n  */"},
-  {"type":"Text","value":"\n  "},
-  {"type":"KeywordDeclaration","value":"DEFINE"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"INPUT"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"PARAMETER"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"phTable"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"AS"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordType","value":"HANDLE"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"NO-UNDO"},
-  {"type":"Punctuation","value":"."},
-  {"type":"Text","value":"\n  "},
-  {"type":"KeywordDeclaration","value":"DEFINE"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"VARIABLE"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"iField"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"AS"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordType","value":"INTEGER"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"NO-UNDO"},
-  {"type":"Punctuation","value":"."},
-  {"type":"Text","value":"\n\n  "},
-  {"type":"KeywordReserved","value":"DO"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"iField"},
-  {"type":"Text","value":" "},
-  {"type":"Operator","value":"="},
-  {"type":"Text","value":" "},
-  {"type":"LiteralNumberInteger","value":"1"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"TO"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"phTable"},
-  {"type":"Punctuation","value":":"},
-  {"type":"KeywordReserved","value":"NUM-FIELDS"},
-  {"type":"Punctuation","value":":"},
-  {"type":"Text","value":"\n    "},
-  {"type":"NameVariable","value":"phTable"},
-  {"type":"Punctuation","value":":"},
-  {"type":"KeywordReserved","value":"BUFFER-FIELD"},
-  {"type":"Punctuation","value":"("},
-  {"type":"NameVariable","value":"iField"},
-  {"type":"Punctuation","value":"):"},
-  {"type":"NameVariable","value":"XML"},
-  {"type":"Operator","value":"-"},
-  {"type":"NameVariable","value":"NODE"},
-  {"type":"Operator","value":"-"},
-  {"type":"NameVariable","value":"NAME"},
-  {"type":"Text","value":" "},
-  {"type":"Operator","value":"="},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"getXmlNodeName"},
-  {"type":"Punctuation","value":"("},
-  {"type":"NameVariable","value":"phTable"},
-  {"type":"Punctuation","value":":"},
-  {"type":"KeywordReserved","value":"BUFFER-FIELD"},
-  {"type":"Punctuation","value":"("},
-  {"type":"NameVariable","value":"iField"},
-  {"type":"Punctuation","value":"):"},
-  {"type":"KeywordReserved","value":"NAME"},
-  {"type":"Punctuation","value":")."},
-  {"type":"Text","value":"\n  "},
-  {"type":"KeywordReserved","value":"END"},
-  {"type":"Punctuation","value":"."},
-  {"type":"Text","value":"\n\n"},
-  {"type":"KeywordReserved","value":"END"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"PROCEDURE"},
-  {"type":"Punctuation","value":"."},
-  {"type":"Text","value":" "},
-  {"type":"CommentMultiline","value":"/* setXmlNodeNames */"},
-  {"type":"Text","value":"\n\n"},
-  {"type":"CommentMultiline","value":"/* _UIB-CODE-BLOCK-END */"},
-  {"type":"CommentPreproc","value":"\n\u0026ANALYZE-RESUME\n\n\u0026ENDIF\n\n\u0026IF DEFINED(EXCLUDE-showHelp) = 0 \u0026THEN\n\n\u0026ANALYZE-SUSPEND _UIB-CODE-BLOCK _PROCEDURE showHelp Procedure"},
-  {"type":"Text","value":"\n"},
-  {"type":"KeywordReserved","value":"PROCEDURE"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"showHelp"},
-  {"type":"Text","value":" "},
-  {"type":"Punctuation","value":":"},
-  {"type":"Text","value":"\n"},
-  {"type":"CommentMultiline","value":"/* Show a help message and save answer to ini\n  */"},
-  {"type":"Text","value":"\n  "},
-  {"type":"KeywordDeclaration","value":"DEFINE"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"INPUT"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"PARAMETER"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"pcTopic"},
-  {"type":"Text","value":"   "},
-  {"type":"KeywordReserved","value":"AS"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordType","value":"CHARACTER  "},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"NO-UNDO"},
-  {"type":"Punctuation","value":"."},
-  {"type":"Text","value":"\n  "},
-  {"type":"KeywordDeclaration","value":"DEFINE"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"INPUT"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"PARAMETER"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"pcStrings"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"AS"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordType","value":"CHARACTER  "},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"NO-UNDO"},
-  {"type":"Punctuation","value":"."},
-  {"type":"Text","value":"\n\n  "},
-  {"type":"KeywordDeclaration","value":"DEFINE"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"VARIABLE"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"cButtons"},
-  {"type":"Text","value":"       "},
-  {"type":"KeywordReserved","value":"AS"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordType","value":"CHARACTER  "},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"NO-UNDO"},
-  {"type":"Punctuation","value":"."},
-  {"type":"Text","value":"\n  "},
-  {"type":"KeywordDeclaration","value":"DEFINE"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"VARIABLE"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"cMessage"},
-  {"type":"Text","value":"       "},
-  {"type":"KeywordReserved","value":"AS"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordType","value":"CHARACTER  "},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"NO-UNDO"},
-  {"type":"Punctuation","value":"."},
-  {"type":"Text","value":"\n  "},
-  {"type":"KeywordDeclaration","value":"DEFINE"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"VARIABLE"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"cPrg"},
-  {"type":"Text","value":"           "},
-  {"type":"KeywordReserved","value":"AS"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordType","value":"CHARACTER  "},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"NO-UNDO"},
-  {"type":"Punctuation","value":"."},
-  {"type":"Text","value":"\n  "},
-  {"type":"KeywordDeclaration","value":"DEFINE"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"VARIABLE"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"cTitle"},
-  {"type":"Text","value":"         "},
-  {"type":"KeywordReserved","value":"AS"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordType","value":"CHARACTER  "},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"NO-UNDO"},
-  {"type":"Punctuation","value":"."},
-  {"type":"Text","value":"\n  "},
-  {"type":"KeywordDeclaration","value":"DEFINE"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"VARIABLE"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"cType"},
-  {"type":"Text","value":"          "},
-  {"type":"KeywordReserved","value":"AS"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordType","value":"CHARACTER  "},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"NO-UNDO"},
-  {"type":"Punctuation","value":"."},
-  {"type":"Text","value":"\n  "},
-  {"type":"KeywordDeclaration","value":"DEFINE"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"VARIABLE"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"cUrl"},
-  {"type":"Text","value":"           "},
-  {"type":"KeywordReserved","value":"AS"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordType","value":"CHARACTER  "},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"NO-UNDO"},
-  {"type":"Punctuation","value":"."},
-  {"type":"Text","value":"\n  "},
-  {"type":"KeywordDeclaration","value":"DEFINE"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"VARIABLE"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"cCanHide"},
-  {"type":"Text","value":"       "},
-  {"type":"KeywordReserved","value":"AS"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordType","value":"CHARACTER  "},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"NO-UNDO"},
-  {"type":"Punctuation","value":"."},
-  {"type":"Text","value":"\n  "},
-  {"type":"KeywordDeclaration","value":"DEFINE"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"VARIABLE"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"iButtonPressed"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"AS"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordType","value":"INTEGER    "},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"NO-UNDO"},
-  {"type":"Punctuation","value":"."},
-  {"type":"Text","value":"\n  "},
-  {"type":"KeywordDeclaration","value":"DEFINE"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"VARIABLE"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"lDontShowAgain"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"AS"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordType","value":"LOGICAL    "},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"NO-UNDO"},
-  {"type":"Punctuation","value":"."},
-  {"type":"Text","value":"\n  "},
-  {"type":"KeywordDeclaration","value":"DEFINE"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"VARIABLE"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"lCanHide"},
-  {"type":"Text","value":"       "},
-  {"type":"KeywordReserved","value":"AS"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordType","value":"LOGICAL    "},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"NO-UNDO"},
-  {"type":"Punctuation","value":"."},
-  {"type":"Text","value":"\n  "},
-  {"type":"KeywordDeclaration","value":"DEFINE"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"VARIABLE"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"lHidden"},
-  {"type":"Text","value":"        "},
-  {"type":"KeywordReserved","value":"AS"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordType","value":"LOGICAL    "},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"NO-UNDO"},
-  {"type":"Punctuation","value":"."},
-  {"type":"Text","value":"\n  "},
-  {"type":"KeywordDeclaration","value":"DEFINE"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"VARIABLE"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"iString"},
-  {"type":"Text","value":"        "},
-  {"type":"KeywordReserved","value":"AS"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordType","value":"INTEGER    "},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"NO-UNDO"},
-  {"type":"Punctuation","value":"."},
-  {"type":"Text","value":"\n  "},
-  {"type":"KeywordDeclaration","value":"DEFINE"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"VARIABLE"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"cUserString"},
-  {"type":"Text","value":"    "},
-  {"type":"KeywordReserved","value":"AS"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordType","value":"CHARACTER  "},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"NO-UNDO"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"EXTENT"},
-  {"type":"Text","value":" "},
-  {"type":"LiteralNumberInteger","value":"9"},
-  {"type":"Punctuation","value":"."},
-  {"type":"Text","value":"\n\n  "},
-  {"type":"CommentMultiline","value":"/* If no message, then just return */"},
-  {"type":"Text","value":"\n  "},
-  {"type":"NameVariable","value":"cMessage"},
-  {"type":"Text","value":" "},
-  {"type":"Operator","value":"="},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"getRegistry"},
-  {"type":"Punctuation","value":"("},
-  {"type":"LiteralStringSingle","value":"'DataDigger:Help'"},
-  {"type":"NameVariable","value":","},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"pcTopic"},
-  {"type":"Text","value":" "},
-  {"type":"Operator","value":"+"},
-  {"type":"Text","value":" "},
-  {"type":"LiteralStringSingle","value":"':message'"},
-  {"type":"Punctuation","value":")."},
-  {"type":"Text","value":"\n\n  "},
-  {"type":"CommentMultiline","value":"/* What to start? */"},
-  {"type":"Text","value":"\n  "},
-  {"type":"NameVariable","value":"cUrl"},
-  {"type":"Text","value":" "},
-  {"type":"Operator","value":"="},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"getRegistry"},
-  {"type":"Punctuation","value":"("},
-  {"type":"LiteralStringSingle","value":"'DataDigger:Help'"},
-  {"type":"NameVariable","value":","},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"pcTopic"},
-  {"type":"Text","value":" "},
-  {"type":"Operator","value":"+"},
-  {"type":"Text","value":" "},
-  {"type":"LiteralStringSingle","value":"':url'"},
-  {"type":"Punctuation","value":")."},
-  {"type":"Text","value":"\n  "},
-  {"type":"NameVariable","value":"cPrg"},
-  {"type":"Text","value":" "},
-  {"type":"Operator","value":"="},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"getRegistry"},
-  {"type":"Punctuation","value":"("},
-  {"type":"LiteralStringSingle","value":"'DataDigger:Help'"},
-  {"type":"NameVariable","value":","},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"pcTopic"},
-  {"type":"Text","value":" "},
-  {"type":"Operator","value":"+"},
-  {"type":"Text","value":" "},
-  {"type":"LiteralStringSingle","value":"':program'"},
-  {"type":"Punctuation","value":")."},
-  {"type":"Text","value":"\n  "},
-  {"type":"NameVariable","value":"cCanHide"},
-  {"type":"Text","value":" "},
-  {"type":"Operator","value":"="},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"getRegistry"},
-  {"type":"Punctuation","value":"("},
-  {"type":"LiteralStringSingle","value":"'DataDigger:Help'"},
-  {"type":"NameVariable","value":","},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"pcTopic"},
-  {"type":"Text","value":" "},
-  {"type":"Operator","value":"+"},
-  {"type":"Text","value":" "},
-  {"type":"LiteralStringSingle","value":"':canHide'"},
-  {"type":"Punctuation","value":")."},
-  {"type":"Text","value":"\n  "},
-  {"type":"NameVariable","value":"cCanHide"},
-  {"type":"Text","value":" "},
-  {"type":"Operator","value":"="},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"TRIM"},
-  {"type":"Punctuation","value":"("},
-  {"type":"NameVariable","value":"cCanHide"},
-  {"type":"Punctuation","value":")."},
-  {"type":"Text","value":"\n  "},
-  {"type":"NameVariable","value":"lCanHide"},
-  {"type":"Text","value":" "},
-  {"type":"Operator","value":"="},
-  {"type":"Text","value":" "},
-  {"type":"KeywordType","value":"LOGICAL"},
-  {"type":"Punctuation","value":"("},
-  {"type":"NameVariable","value":"cCanHide"},
-  {"type":"Punctuation","value":")"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"NO-ERROR"},
-  {"type":"Punctuation","value":"."},
-  {"type":"Text","value":"\n  "},
-  {"type":"KeywordReserved","value":"IF"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"lCanHide"},
-  {"type":"Text","value":" "},
-  {"type":"Operator","value":"="},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"?"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"THEN"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"lCanHide"},
-  {"type":"Text","value":" "},
-  {"type":"Operator","value":"="},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"TRUE"},
-  {"type":"Punctuation","value":"."},
-  {"type":"Text","value":"\n\n  "},
-  {"type":"KeywordReserved","value":"IF"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"cMessage"},
-  {"type":"Text","value":" "},
-  {"type":"Operator","value":"="},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"?"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"THEN\n "},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"DO"},
-  {"type":"Punctuation","value":":"},
-  {"type":"Text","value":"\n    "},
-  {"type":"KeywordReserved","value":"IF"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"cUrl"},
-  {"type":"Text","value":" "},
-  {"type":"Operator","value":"="},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"?"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"AND"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"cPrg"},
-  {"type":"Text","value":" "},
-  {"type":"Operator","value":"="},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"?"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"THEN"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"RETURN"},
-  {"type":"Punctuation","value":"."},
-  {"type":"Text","value":"\n    "},
-  {"type":"NameVariable","value":"lHidden"},
-  {"type":"Text","value":"        "},
-  {"type":"Operator","value":"="},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"YES"},
-  {"type":"Punctuation","value":"."},
-  {"type":"Text","value":" "},
-  {"type":"CommentMultiline","value":"/* suppress empty text window */"},
-  {"type":"Text","value":"\n    "},
-  {"type":"NameVariable","value":"iButtonPressed"},
-  {"type":"Text","value":" "},
-  {"type":"Operator","value":"="},
-  {"type":"Text","value":" "},
-  {"type":"LiteralNumberInteger","value":"1"},
-  {"type":"Punctuation","value":"."},
-  {"type":"Text","value":"   "},
-  {"type":"CommentMultiline","value":"/* forces to start the url or prog */"},
-  {"type":"Text","value":"\n  "},
-  {"type":"KeywordReserved","value":"END"},
-  {"type":"Punctuation","value":"."},
-  {"type":"Text","value":"\n\n  "},
-  {"type":"CommentMultiline","value":"/* If type is unknown, set to QUESTION if there is a question mark in the message */"},
-  {"type":"Text","value":"\n  "},
-  {"type":"NameVariable","value":"cType"},
-  {"type":"Text","value":"    "},
-  {"type":"Operator","value":"="},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"getRegistry"},
-  {"type":"Punctuation","value":"("},
-  {"type":"LiteralStringSingle","value":"'DataDigger:Help'"},
-  {"type":"NameVariable","value":","},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"pcTopic"},
-  {"type":"Text","value":" "},
-  {"type":"Operator","value":"+"},
-  {"type":"Text","value":" "},
-  {"type":"LiteralStringSingle","value":"':type'"},
-  {"type":"Punctuation","value":")."},
-  {"type":"Text","value":"\n  "},
-  {"type":"KeywordReserved","value":"IF"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"cType"},
-  {"type":"Text","value":" "},
-  {"type":"Operator","value":"="},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"?"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"THEN"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"cType"},
-  {"type":"Text","value":" "},
-  {"type":"Operator","value":"="},
-  {"type":"Text","value":" "},
-  {"type":"Punctuation","value":"("},
-  {"type":"KeywordReserved","value":"IF"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"cMessage"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"MATCHES "},
-  {"type":"LiteralStringSingle","value":"'*?*'"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"THEN "},
-  {"type":"LiteralStringSingle","value":"'Question'"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"ELSE "},
-  {"type":"LiteralStringSingle","value":"'Message'"},
-  {"type":"Punctuation","value":")."},
-  {"type":"Text","value":"\n\n  "},
-  {"type":"CommentMultiline","value":"/* If no button labels defined, set them based on message type */"},
-  {"type":"Text","value":"\n  "},
-  {"type":"NameVariable","value":"cButtons"},
-  {"type":"Text","value":" "},
-  {"type":"Operator","value":"="},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"getRegistry"},
-  {"type":"Punctuation","value":"("},
-  {"type":"LiteralStringSingle","value":"'DataDigger:Help'"},
-  {"type":"NameVariable","value":","},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"pcTopic"},
-  {"type":"Text","value":" "},
-  {"type":"Operator","value":"+"},
-  {"type":"Text","value":" "},
-  {"type":"LiteralStringSingle","value":"':buttons'"},
-  {"type":"Punctuation","value":")."},
-  {"type":"Text","value":"\n  "},
-  {"type":"KeywordReserved","value":"IF"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"cButtons"},
-  {"type":"Text","value":" "},
-  {"type":"Operator","value":"="},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"?"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"THEN"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"cButtons"},
-  {"type":"Text","value":" "},
-  {"type":"Operator","value":"="},
-  {"type":"Text","value":" "},
-  {"type":"Punctuation","value":"("},
-  {"type":"KeywordReserved","value":"IF"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"cType"},
-  {"type":"Text","value":" "},
-  {"type":"Operator","value":"="},
-  {"type":"Text","value":" "},
-  {"type":"LiteralStringSingle","value":"'Question'"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"THEN "},
-  {"type":"LiteralStringSingle","value":"'\u0026Yes,\u0026No,\u0026Cancel'"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"ELSE "},
-  {"type":"LiteralStringSingle","value":"'\u0026Ok'"},
-  {"type":"Punctuation","value":")."},
-  {"type":"Text","value":"\n\n  "},
-  {"type":"CommentMultiline","value":"/* If title is empty, set it to the type of the message */"},
-  {"type":"Text","value":"\n  "},
-  {"type":"NameVariable","value":"cTitle"},
-  {"type":"Text","value":"   "},
-  {"type":"Operator","value":"="},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"getRegistry"},
-  {"type":"Punctuation","value":"("},
-  {"type":"LiteralStringSingle","value":"'DataDigger:Help'"},
-  {"type":"NameVariable","value":","},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"pcTopic"},
-  {"type":"Text","value":" "},
-  {"type":"Operator","value":"+"},
-  {"type":"Text","value":" "},
-  {"type":"LiteralStringSingle","value":"':title'"},
-  {"type":"Punctuation","value":")."},
-  {"type":"Text","value":"\n  "},
-  {"type":"KeywordReserved","value":"IF"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"cTitle"},
-  {"type":"Text","value":" "},
-  {"type":"Operator","value":"="},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"?"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"THEN"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"cTitle"},
-  {"type":"Text","value":" "},
-  {"type":"Operator","value":"="},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"cType"},
-  {"type":"Punctuation","value":"."},
-  {"type":"Text","value":"\n\n  "},
-  {"type":"CommentMultiline","value":"/* If hidden has strange value, set it to NO */"},
-  {"type":"Text","value":"\n  "},
-  {"type":"NameVariable","value":"lHidden"},
-  {"type":"Text","value":" "},
-  {"type":"Operator","value":"="},
-  {"type":"Text","value":" "},
-  {"type":"KeywordType","value":"LOGICAL"},
-  {"type":"Punctuation","value":"("},
-  {"type":"NameVariable","value":"getRegistry"},
-  {"type":"Punctuation","value":"("},
-  {"type":"LiteralStringSingle","value":"'DataDigger:Help'"},
-  {"type":"NameVariable","value":","},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"pcTopic"},
-  {"type":"Text","value":" "},
-  {"type":"Operator","value":"+"},
-  {"type":"Text","value":" "},
-  {"type":"LiteralStringSingle","value":"':hidden'"},
-  {"type":"Punctuation","value":"))"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"NO-ERROR"},
-  {"type":"Punctuation","value":"."},
-  {"type":"Text","value":"\n  "},
-  {"type":"KeywordReserved","value":"IF"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"lHidden"},
-  {"type":"Text","value":" "},
-  {"type":"Operator","value":"="},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"?"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"THEN"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"lHidden"},
-  {"type":"Text","value":" "},
-  {"type":"Operator","value":"="},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"NO"},
-  {"type":"Punctuation","value":"."},
-  {"type":"Text","value":"\n\n  "},
-  {"type":"CommentMultiline","value":"/* If ButtonPressed has strange value, set hidden to NO */"},
-  {"type":"Text","value":"\n  "},
-  {"type":"NameVariable","value":"iButtonPressed"},
-  {"type":"Text","value":" "},
-  {"type":"Operator","value":"="},
-  {"type":"Text","value":" "},
-  {"type":"KeywordType","value":"INTEGER"},
-  {"type":"Punctuation","value":"("},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"getRegistry"},
-  {"type":"Punctuation","value":"("},
-  {"type":"LiteralStringSingle","value":"'DataDigger:Help'"},
-  {"type":"NameVariable","value":",pcTopic"},
-  {"type":"Text","value":" "},
-  {"type":"Operator","value":"+"},
-  {"type":"Text","value":" "},
-  {"type":"LiteralStringSingle","value":"':answer'"},
-  {"type":"Punctuation","value":")"},
-  {"type":"Text","value":" "},
-  {"type":"Punctuation","value":")"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"NO-ERROR"},
-  {"type":"Punctuation","value":"."},
-  {"type":"Text","value":"\n  "},
-  {"type":"KeywordReserved","value":"IF"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"iButtonPressed"},
-  {"type":"Text","value":" "},
-  {"type":"Operator","value":"="},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"?"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"THEN"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"lHidden"},
-  {"type":"Text","value":" "},
-  {"type":"Operator","value":"="},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"NO"},
-  {"type":"Punctuation","value":"."},
-  {"type":"Text","value":"\n\n  "},
-  {"type":"CommentMultiline","value":"/* if we have no message, but we do have an URL or prog, then\n   * dont show an empty message box.\n   */"},
-  {"type":"Text","value":"\n  "},
-  {"type":"KeywordReserved","value":"IF"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"cMessage"},
-  {"type":"Text","value":" "},
-  {"type":"Operator","value":"="},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"?"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"THEN\n   "},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"ASSIGN\n     "},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"lHidden"},
-  {"type":"Text","value":"        "},
-  {"type":"Operator","value":"="},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"YES "},
-  {"type":"CommentMultiline","value":"/* suppress empty text window */"},
-  {"type":"Text","value":"\n      "},
-  {"type":"NameVariable","value":"iButtonPressed"},
-  {"type":"Text","value":" "},
-  {"type":"Operator","value":"="},
-  {"type":"Text","value":" "},
-  {"type":"LiteralNumberInteger","value":"1"},
-  {"type":"Punctuation","value":"."},
-  {"type":"Text","value":"   "},
-  {"type":"CommentMultiline","value":"/* forces to start the url or prog */"},
-  {"type":"Text","value":"\n\n  "},
-  {"type":"CommentMultiline","value":"/* Fill in strings in message */"},
-  {"type":"Text","value":"\n  "},
-  {"type":"KeywordReserved","value":"DO"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"iString"},
-  {"type":"Text","value":" "},
-  {"type":"Operator","value":"="},
-  {"type":"Text","value":" "},
-  {"type":"LiteralNumberInteger","value":"1"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"TO"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"NUM-ENTRIES"},
-  {"type":"Punctuation","value":"("},
-  {"type":"NameVariable","value":"pcStrings"},
-  {"type":"Punctuation","value":"):"},
-  {"type":"Text","value":"\n    "},
-  {"type":"NameVariable","value":"cUserString[iString]"},
-  {"type":"Text","value":" "},
-  {"type":"Operator","value":"="},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"ENTRY"},
-  {"type":"Punctuation","value":"("},
-  {"type":"NameVariable","value":"iString,pcStrings"},
-  {"type":"Punctuation","value":")."},
-  {"type":"Text","value":"\n  "},
-  {"type":"KeywordReserved","value":"END"},
-  {"type":"Punctuation","value":"."},
-  {"type":"Text","value":"\n\n  "},
-  {"type":"NameVariable","value":"cMessage"},
-  {"type":"Text","value":" "},
-  {"type":"Operator","value":"="},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"SUBSTITUTE"},
-  {"type":"Punctuation","value":"("},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"cMessage"},
-  {"type":"Text","value":"\n                      "},
-  {"type":"NameVariable","value":","},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"cUserString["},
-  {"type":"LiteralNumberInteger","value":"1"},
-  {"type":"NameVariable","value":"]"},
-  {"type":"Text","value":"\n                      "},
-  {"type":"NameVariable","value":","},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"cUserString["},
-  {"type":"LiteralNumberInteger","value":"2"},
-  {"type":"NameVariable","value":"]"},
-  {"type":"Text","value":"\n                      "},
-  {"type":"NameVariable","value":","},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"cUserString["},
-  {"type":"LiteralNumberInteger","value":"3"},
-  {"type":"NameVariable","value":"]"},
-  {"type":"Text","value":"\n                      "},
-  {"type":"NameVariable","value":","},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"cUserString["},
-  {"type":"LiteralNumberInteger","value":"4"},
-  {"type":"NameVariable","value":"]"},
-  {"type":"Text","value":"\n                      "},
-  {"type":"NameVariable","value":","},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"cUserString["},
-  {"type":"LiteralNumberInteger","value":"5"},
-  {"type":"NameVariable","value":"]"},
-  {"type":"Text","value":"\n                      "},
-  {"type":"NameVariable","value":","},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"cUserString["},
-  {"type":"LiteralNumberInteger","value":"6"},
-  {"type":"NameVariable","value":"]"},
-  {"type":"Text","value":"\n                      "},
-  {"type":"NameVariable","value":","},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"cUserString["},
-  {"type":"LiteralNumberInteger","value":"7"},
-  {"type":"NameVariable","value":"]"},
-  {"type":"Text","value":"\n                      "},
-  {"type":"NameVariable","value":","},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"cUserString["},
-  {"type":"LiteralNumberInteger","value":"8"},
-  {"type":"NameVariable","value":"]"},
-  {"type":"Text","value":"\n                      "},
-  {"type":"NameVariable","value":","},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"cUserString["},
-  {"type":"LiteralNumberInteger","value":"9"},
-  {"type":"NameVariable","value":"]"},
-  {"type":"Text","value":"\n                      "},
-  {"type":"Punctuation","value":")."},
-  {"type":"Text","value":"\n\n  "},
-  {"type":"CommentMultiline","value":"/* If not hidden, show the message and let the user choose an answer */"},
-  {"type":"Text","value":"\n  "},
-  {"type":"KeywordReserved","value":"IF"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"NOT"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"lHidden"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"THEN\n "},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"DO"},
-  {"type":"Punctuation","value":":"},
-  {"type":"Text","value":"\n    "},
-  {"type":"KeywordReserved","value":"RUN"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"VALUE"},
-  {"type":"Punctuation","value":"("},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"getProgramDir"},
-  {"type":"Punctuation","value":"()"},
-  {"type":"Text","value":" "},
-  {"type":"Operator","value":"+"},
-  {"type":"Text","value":" "},
-  {"type":"LiteralStringSingle","value":"'dQuestion.w'"},
-  {"type":"Punctuation","value":")"},
-  {"type":"Text","value":"\n      "},
-  {"type":"Punctuation","value":"("},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"INPUT"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"cTitle"},
-  {"type":"Text","value":"\n      "},
-  {"type":"NameVariable","value":","},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"INPUT"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"cMessage"},
-  {"type":"Text","value":"\n      "},
-  {"type":"NameVariable","value":","},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"INPUT"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"cButtons"},
-  {"type":"Text","value":"\n      "},
-  {"type":"NameVariable","value":","},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"INPUT"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"lCanHide"},
-  {"type":"Text","value":"\n      "},
-  {"type":"NameVariable","value":","},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"OUTPUT"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"iButtonPressed"},
-  {"type":"Text","value":"\n      "},
-  {"type":"NameVariable","value":","},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"OUTPUT"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"lDontShowAgain"},
-  {"type":"Text","value":"\n      "},
-  {"type":"Punctuation","value":")."},
-  {"type":"Text","value":"\n\n    "},
-  {"type":"KeywordReserved","value":"IF"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"lDontShowAgain"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"THEN\n     "},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"setRegistry"},
-  {"type":"Punctuation","value":"("},
-  {"type":"LiteralStringSingle","value":"'DataDigger:Help'"},
-  {"type":"NameVariable","value":","},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"pcTopic"},
-  {"type":"Text","value":" "},
-  {"type":"Operator","value":"+"},
-  {"type":"Text","value":" "},
-  {"type":"LiteralStringSingle","value":"':hidden'"},
-  {"type":"NameVariable","value":","},
-  {"type":"Text","value":" "},
-  {"type":"LiteralStringSingle","value":"'yes'"},
-  {"type":"Punctuation","value":")."},
-  {"type":"Text","value":"\n  "},
-  {"type":"KeywordReserved","value":"END"},
-  {"type":"Punctuation","value":"."},
-  {"type":"Text","value":"\n\n  "},
-  {"type":"CommentMultiline","value":"/* Start external things if needed */"},
-  {"type":"Text","value":"\n  "},
-  {"type":"KeywordReserved","value":"IF"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"iButtonPressed"},
-  {"type":"Text","value":" "},
-  {"type":"Operator","value":"="},
-  {"type":"Text","value":" "},
-  {"type":"LiteralNumberInteger","value":"1"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"THEN\n "},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"DO"},
-  {"type":"Punctuation","value":":"},
-  {"type":"Text","value":"\n    "},
-  {"type":"KeywordReserved","value":"IF"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"cUrl"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"\u003c\u003e"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"?"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"THEN"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"OS-COMMAND"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"NO-WAIT"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"START "},
-  {"type":"Punctuation","value":"("},
-  {"type":"NameVariable","value":"cUrl"},
-  {"type":"Punctuation","value":")."},
-  {"type":"Text","value":"\n    "},
-  {"type":"KeywordReserved","value":"IF"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"cPrg"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"\u003c\u003e"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"?"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"THEN"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"RUN"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"VALUE"},
-  {"type":"Punctuation","value":"("},
-  {"type":"NameVariable","value":"cPrg"},
-  {"type":"Punctuation","value":")"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"NO-ERROR"},
-  {"type":"Punctuation","value":"."},
-  {"type":"Text","value":"\n  "},
-  {"type":"KeywordReserved","value":"END"},
-  {"type":"Punctuation","value":"."},
-  {"type":"Text","value":"\n\n  "},
-  {"type":"CommentMultiline","value":"/* Save answer */"},
-  {"type":"Text","value":"\n  "},
-  {"type":"NameVariable","value":"setRegistry"},
-  {"type":"Punctuation","value":"("},
-  {"type":"LiteralStringSingle","value":"'DataDigger:Help'"},
-  {"type":"NameVariable","value":",pcTopic"},
-  {"type":"Text","value":" "},
-  {"type":"Operator","value":"+"},
-  {"type":"Text","value":" "},
-  {"type":"LiteralStringSingle","value":"':answer'"},
+  {"type":"LiteralStringSingle","value":"'fill-in' THEN 5 ELSE 0)\n    .\n\nEND PROCEDURE. /* setLabelPosition */\n\n/* _UIB-CODE-BLOCK-END */\n\u0026ANALYZE-RESUME\n\n\u0026ENDIF\n\n\u0026IF DEFINED(EXCLUDE-setSortArrow) = 0 \u0026THEN\n\n\u0026ANALYZE-SUSPEND _UIB-CODE-BLOCK _PROCEDURE setSortArrow Procedure\nPROCEDURE setSortArrow :\n/* Set the sorting arrow on a browse\n  */\n  DEFINE INPUT PARAMETER phBrowse    AS HANDLE    NO-UNDO.\n  DEFINE INPUT PARAMETER pcSortField AS CHARACTER NO-UNDO.\n  DEFINE INPUT PARAMETER plAscending AS LOGICAL   NO-UNDO.\n\n  DEFINE VARIABLE iColumn    AS INTEGER   NO-UNDO.\n  DEFINE VARIABLE hColumn    AS HANDLE    NO-UNDO.\n  DEFINE VARIABLE lSortFound AS LOGICAL   NO-UNDO.\n\n  {\u0026timerStart}\n\n  DO iColumn = 1 TO phBrowse:NUM-COLUMNS:\n    hColumn = phBrowse:GET-BROWSE-COLUMN(iColumn).\n\n    /* If you apply the sort to the same column, the order\n     * of sorting is inverted.\n     */\n    IF hColumn:NAME = pcSortField THEN\n    DO:\n      phBrowse:SET-SORT-ARROW(iColumn, plAscending ).\n      lSortFound = TRUE.\n\n      /* Setting is one of: ColumnSortFields | ColumnSortIndexes | ColumnSortTables */\n      setRegistry( 'DataDigger'\n                , SUBSTITUTE('ColumnSort\u00261', SUBSTRING(phBrowse:NAME,3))\n                , SUBSTITUTE('\u00261,\u00262',iColumn, plAscending)\n                ).\n    END.\n    ELSE\n      phBrowse:SET-SORT-ARROW(iColumn, ? ). /* erase existing arrow */\n  END.\n\n  /* If no sort is found, delete setting */\n  IF NOT lSortFound THEN\n    setRegistry( 'DataDigger', SUBSTITUTE('ColumnSort\u00261', SUBSTRING(phBrowse:NAME,3)), ?).\n\n  {\u0026timerStop}\n\nEND PROCEDURE. /* setSortArrow */\n\n/* _UIB-CODE-BLOCK-END */\n\u0026ANALYZE-RESUME\n\n\u0026ENDIF\n\n\u0026IF DEFINED(EXCLUDE-setTransparency) = 0 \u0026THEN\n\n\u0026ANALYZE-SUSPEND _UIB-CODE-BLOCK _PROCEDURE setTransparency Procedure\nPROCEDURE setTransparency :\n/* Set transparency level for a frame, using Windows api\n  */\n  DEFINE INPUT  PARAMETER phFrame AS HANDLE     NO-UNDO.\n  DEFINE INPUT  PARAMETER piLevel AS INTEGER    NO-UNDO.\n\n  \u0026SCOPED-DEFINE GWL_EXSTYLE         -20\n  \u0026SCOPED-DEFINE WS_EX_LAYERED       524288\n  \u0026SCOPED-DEFINE LWA_ALPHA           2\n  \u0026SCOPED-DEFINE WS_EX_TRANSPARENT   32\n\n  {\u0026_proparse_prolint-nowarn(varusage)}\n  DEFINE VARIABLE stat AS INTEGER    NO-UNDO.\n\n  /* Set WS_EX_LAYERED on this window  */\n  {\u0026_proparse_prolint-nowarn(varusage)}\n  RUN SetWindowLongA(phFrame:HWND, {\u0026GWL_EXSTYLE}, {\u0026WS_EX_LAYERED}, OUTPUT stat).\n\n  /* Make this window transparent (0 - 255) */\n  {\u0026_proparse_prolint-nowarn(varusage)}\n  RUN SetLayeredWindowAttributes(phFrame:HWND, 0, piLevel, {\u0026LWA_ALPHA}, OUTPUT stat).\n\nEND PROCEDURE. /* setTransparency */\n\n/* _UIB-CODE-BLOCK-END */\n\u0026ANALYZE-RESUME\n\n\u0026ENDIF\n\n\u0026IF DEFINED(EXCLUDE-setXmlNodeNames) = 0 \u0026THEN\n\n\u0026ANALYZE-SUSPEND _UIB-CODE-BLOCK _PROCEDURE setXmlNodeNames Procedure\nPROCEDURE setXmlNodeNames :\n/* Set the XML-NODE-NAMES of all fields in a buffer\n  */\n  DEFINE INPUT PARAMETER phTable AS HANDLE NO-UNDO.\n  DEFINE VARIABLE iField AS INTEGER NO-UNDO.\n\n  DO iField = 1 TO phTable:NUM-FIELDS:\n    phTable:BUFFER-FIELD(iField):XML-NODE-NAME = getXmlNodeName(phTable:BUFFER-FIELD(iField):NAME).\n  END.\n\nEND PROCEDURE. /* setXmlNodeNames */\n\n/* _UIB-CODE-BLOCK-END */\n\u0026ANALYZE-RESUME\n\n\u0026ENDIF\n\n\u0026IF DEFINED(EXCLUDE-showHelp) = 0 \u0026THEN\n\n\u0026ANALYZE-SUSPEND _UIB-CODE-BLOCK _PROCEDURE showHelp Procedure\nPROCEDURE showHelp :\n/* Show a help message and save answer to ini\n  */\n  DEFINE INPUT PARAMETER pcTopic   AS CHARACTER   NO-UNDO.\n  DEFINE INPUT PARAMETER pcStrings AS CHARACTER   NO-UNDO.\n\n  DEFINE VARIABLE cButtons       AS CHARACTER   NO-UNDO.\n  DEFINE VARIABLE cMessage       AS CHARACTER   NO-UNDO.\n  DEFINE VARIABLE cPrg           AS CHARACTER   NO-UNDO.\n  DEFINE VARIABLE cTitle         AS CHARACTER   NO-UNDO.\n  DEFINE VARIABLE cType          AS CHARACTER   NO-UNDO.\n  DEFINE VARIABLE cUrl           AS CHARACTER   NO-UNDO.\n  DEFINE VARIABLE cCanHide       AS CHARACTER   NO-UNDO.\n  DEFINE VARIABLE iButtonPressed AS INTEGER     NO-UNDO.\n  DEFINE VARIABLE lDontShowAgain AS LOGICAL     NO-UNDO.\n  DEFINE VARIABLE lCanHide       AS LOGICAL     NO-UNDO.\n  DEFINE VARIABLE lHidden        AS LOGICAL     NO-UNDO.\n  DEFINE VARIABLE iString        AS INTEGER     NO-UNDO.\n  DEFINE VARIABLE cUserString    AS CHARACTER   NO-UNDO EXTENT 9.\n\n  /* If no message, then just return */\n  cMessage = getRegistry('DataDigger:Help', pcTopic + ':message').\n\n  /* What to start? */\n  cUrl = getRegistry('DataDigger:Help', pcTopic + ':url').\n  cPrg = getRegistry('DataDigger:Help', pcTopic + ':program').\n  cCanHide = getRegistry('DataDigger:Help', pcTopic + ':canHide').\n  cCanHide = TRIM(cCanHide).\n  lCanHide = LOGICAL(cCanHide) NO-ERROR.\n  IF lCanHide = ? THEN lCanHide = TRUE.\n\n  IF cMessage = ? THEN\n  DO:\n    IF cUrl = ? AND cPrg = ? THEN RETURN.\n    lHidden        = YES. /* suppress empty text window */\n    iButtonPressed = 1.   /* forces to start the url or prog */\n  END.\n\n  /* If type is unknown, set to QUESTION if there is a question mark in the message */\n  cType    = getRegistry('DataDigger:Help', pcTopic + ':type').\n  IF cType = ? THEN cType = (IF cMessage MATCHES '*?*' THEN 'Question' ELSE 'Message').\n\n  /* If no button labels defined, set them based on message type */\n  cButtons = getRegistry('DataDigger:Help', pcTopic + ':buttons').\n  IF cButtons = ? THEN cButtons = (IF cType = 'Question' THEN '\u0026Yes,\u0026No,\u0026Cancel' ELSE '\u0026Ok').\n\n  /* If title is empty, set it to the type of the message */\n  cTitle   = getRegistry('DataDigger:Help', pcTopic + ':title').\n  IF cTitle = ? THEN cTitle = cType.\n\n  /* If hidden has strange value, set it to NO */\n  lHidden = LOGICAL(getRegistry('DataDigger:Help', pcTopic + ':hidden')) NO-ERROR.\n  IF lHidden = ? THEN lHidden = NO.\n\n  /* If ButtonPressed has strange value, set hidden to NO */\n  iButtonPressed = INTEGER( getRegistry('DataDigger:Help',pcTopic + ':answer') ) NO-ERROR.\n  IF iButtonPressed = ? THEN lHidden = NO.\n\n  /* if we have no message, but we do have an URL or prog, then\n   * dont show an empty message box.\n   */\n  IF cMessage = ? THEN\n    ASSIGN\n      lHidden        = YES /* suppress empty text window */\n      iButtonPressed = 1.   /* forces to start the url or prog */\n\n  /* Fill in strings in message */\n  DO iString = 1 TO NUM-ENTRIES(pcStrings):\n    cUserString[iString] = ENTRY(iString,pcStrings).\n  END.\n\n  cMessage = SUBSTITUTE( cMessage\n                      , cUserString[1]\n                      , cUserString[2]\n                      , cUserString[3]\n                      , cUserString[4]\n                      , cUserString[5]\n                      , cUserString[6]\n                      , cUserString[7]\n                      , cUserString[8]\n                      , cUserString[9]\n                      ).\n\n  /* If not hidden, show the message and let the user choose an answer */\n  IF NOT lHidden THEN\n  DO:\n    RUN VALUE( getProgramDir() + 'dQuestion.w')\n      ( INPUT cTitle\n      , INPUT cMessage\n      , INPUT cButtons\n      , INPUT lCanHide\n      , OUTPUT iButtonPressed\n      , OUTPUT lDontShowAgain\n      ).\n\n    IF lDontShowAgain THEN\n      setRegistry('DataDigger:Help', pcTopic + ':hidden', 'yes').\n  END.\n\n  /* Start external things if needed */\n  IF iButtonPressed = 1 THEN\n  DO:\n    IF cUrl \u003c\u003e ? THEN OS-COMMAND NO-WAIT START (cUrl).\n    IF cPrg \u003c\u003e ? THEN RUN VALUE(cPrg) NO-ERROR.\n  END.\n\n  /* Save answer */\n  setRegistry('DataDigger:Help',pcTopic + ':answer'"},
   {"type":"NameVariable","value":","},
   {"type":"Text","value":" "},
   {"type":"KeywordReserved","value":"STRING"},
@@ -16714,27 +15020,7 @@
   {"type":"Text","value":" "},
   {"type":"Operator","value":"="},
   {"type":"Text","value":" "},
-  {"type":"LiteralStringSingle","value":"'!RECID,!ROWID,*'"},
-  {"type":"Punctuation","value":"."},
-  {"type":"Text","value":"\n\n  "},
-  {"type":"CommentMultiline","value":"/* Get field ordering */"},
-  {"type":"Text","value":"\n  "},
-  {"type":"NameVariable","value":"cFieldOrder"},
-  {"type":"Text","value":" "},
-  {"type":"Operator","value":"="},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"getRegistry"},
-  {"type":"Punctuation","value":"("},
-  {"type":"KeywordReserved","value":"SUBSTITUTE"},
-  {"type":"Punctuation","value":"("},
-  {"type":"LiteralStringSingle","value":"'DB:\u00261'"},
-  {"type":"NameVariable","value":",pcDatabase"},
-  {"type":"Punctuation","value":")"},
-  {"type":"NameVariable","value":","},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"SUBSTITUTE"},
-  {"type":"Punctuation","value":"("},
-  {"type":"LiteralStringSingle","value":"'\u00261:fieldOrder'"},
+  {"type":"LiteralStringSingle","value":"'!RECID,!ROWID,*'.\n\n  /* Get field ordering */\n  cFieldOrder = getRegistry(SUBSTITUTE('DB:\u00261',pcDatabase), SUBSTITUTE('\u00261:fieldOrder'"},
   {"type":"NameVariable","value":",pcTableName"},
   {"type":"Punctuation","value":"))."},
   {"type":"Text","value":"\n\n  "},
@@ -16893,11 +15179,7 @@
   {"type":"LiteralStringDouble","value":"\"start\""},
   {"type":"NameVariable","value":","},
   {"type":"Text","value":" "},
-  {"type":"LiteralStringSingle","value":"'customShowField'"},
-  {"type":"Punctuation","value":")."},
-  {"type":"Text","value":"\n    "},
-  {"type":"KeywordReserved","value":"PUBLISH "},
-  {"type":"LiteralStringSingle","value":"'customShowField'"},
+  {"type":"LiteralStringSingle","value":"'customShowField').\n    PUBLISH 'customShowField'"},
   {"type":"Text","value":" "},
   {"type":"Punctuation","value":"("},
   {"type":"NameVariable","value":"pcDatabase,"},
@@ -16934,11 +15216,7 @@
   {"type":"LiteralStringDouble","value":"\"start\""},
   {"type":"NameVariable","value":","},
   {"type":"Text","value":" "},
-  {"type":"LiteralStringSingle","value":"'customFormat'"},
-  {"type":"Punctuation","value":")."},
-  {"type":"Text","value":"\n    "},
-  {"type":"KeywordReserved","value":"PUBLISH "},
-  {"type":"LiteralStringSingle","value":"'customFormat'"},
+  {"type":"LiteralStringSingle","value":"'customFormat').\n    PUBLISH 'customFormat'"},
   {"type":"Text","value":" "},
   {"type":"Punctuation","value":"("},
   {"type":"NameVariable","value":"pcDatabase,"},
@@ -17855,69 +16133,7 @@
   {"type":"Text","value":" "},
   {"type":"NameVariable","value":"\u003c\u003e"},
   {"type":"Text","value":" "},
-  {"type":"LiteralStringSingle","value":"''"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"AND"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"cReturnValue"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"\u003c\u003e"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"?"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"THEN\n "},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"DO"},
-  {"type":"Punctuation","value":":"},
-  {"type":"Text","value":"\n    "},
-  {"type":"CommentMultiline","value":"/* There might be chr(1) chars in the text (if read from ini, for example)\n     * Replace these with normal CRLF, then proceed\n     */"},
-  {"type":"Text","value":"\n    "},
-  {"type":"NameVariable","value":"cReturnValue"},
-  {"type":"Text","value":" "},
-  {"type":"Operator","value":"="},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"REPLACE"},
-  {"type":"Punctuation","value":"("},
-  {"type":"NameVariable","value":"cReturnValue,"},
-  {"type":"KeywordReserved","value":"CHR"},
-  {"type":"Punctuation","value":"("},
-  {"type":"LiteralNumberInteger","value":"1"},
-  {"type":"Punctuation","value":")"},
-  {"type":"NameVariable","value":","},
-  {"type":"LiteralStringSingle","value":"'~n'"},
-  {"type":"Punctuation","value":")."},
-  {"type":"Text","value":"\n\n    "},
-  {"type":"KeywordReserved","value":"IF"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"plExpanded"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"THEN\n     "},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"cReturnValue"},
-  {"type":"Text","value":" "},
-  {"type":"Operator","value":"="},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"REPLACE"},
-  {"type":"Punctuation","value":"("},
-  {"type":"NameVariable","value":"cReturnValue,"},
-  {"type":"Text","value":" "},
-  {"type":"CommentPreproc","value":"{\u0026QUERYSEP}"},
-  {"type":"NameVariable","value":","},
-  {"type":"Text","value":" "},
-  {"type":"LiteralStringSingle","value":"'~n'"},
-  {"type":"Punctuation","value":")."},
-  {"type":"Text","value":"\n    "},
-  {"type":"KeywordReserved","value":"ELSE\n     "},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"cReturnValue"},
-  {"type":"Text","value":" "},
-  {"type":"Operator","value":"="},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"REPLACE"},
-  {"type":"Punctuation","value":"("},
-  {"type":"NameVariable","value":"cReturnValue,"},
-  {"type":"Text","value":" "},
-  {"type":"LiteralStringSingle","value":"'~n'"},
+  {"type":"LiteralStringSingle","value":"'' AND cReturnValue \u003c\u003e ? THEN\n  DO:\n    /* There might be chr(1) chars in the text (if read from ini, for example)\n     * Replace these with normal CRLF, then proceed\n     */\n    cReturnValue = REPLACE(cReturnValue,CHR(1),'~n').\n\n    IF plExpanded THEN\n      cReturnValue = REPLACE(cReturnValue, {\u0026QUERYSEP}, '~n').\n    ELSE\n      cReturnValue = REPLACE(cReturnValue, '~n'"},
   {"type":"NameVariable","value":","},
   {"type":"Text","value":" "},
   {"type":"CommentPreproc","value":"{\u0026QUERYSEP}"},
@@ -18443,33 +16659,7 @@
   {"type":"Text","value":" "},
   {"type":"KeywordReserved","value":"SUBSTITUTE"},
   {"type":"Punctuation","value":"("},
-  {"type":"LiteralStringSingle","value":"'\u00261,\u00262:\u00263'"},
-  {"type":"Text","value":"\n                          "},
-  {"type":"NameVariable","value":","},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"cWidthList"},
-  {"type":"Text","value":"\n                          "},
-  {"type":"NameVariable","value":","},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"hColumn"},
-  {"type":"Punctuation","value":":"},
-  {"type":"KeywordReserved","value":"NAME\n                          "},
-  {"type":"NameVariable","value":","},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"hColumn"},
-  {"type":"Punctuation","value":":"},
-  {"type":"KeywordReserved","value":"WIDTH-PIXELS\n                          "},
-  {"type":"Punctuation","value":")."},
-  {"type":"Text","value":"\n  "},
-  {"type":"KeywordReserved","value":"END"},
-  {"type":"Punctuation","value":"."},
-  {"type":"Text","value":"\n\n  "},
-  {"type":"KeywordReserved","value":"RETURN"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"TRIM"},
-  {"type":"Punctuation","value":"("},
-  {"type":"NameVariable","value":"cWidthList,"},
-  {"type":"LiteralStringSingle","value":"','"},
+  {"type":"LiteralStringSingle","value":"'\u00261,\u00262:\u00263'\n                          , cWidthList\n                          , hColumn:NAME\n                          , hColumn:WIDTH-PIXELS\n                          ).\n  END.\n\n  RETURN TRIM(cWidthList,','"},
   {"type":"Punctuation","value":")."},
   {"type":"Text","value":"\n  "},
   {"type":"CommentPreproc","value":"{\u0026timerStop}"},
@@ -18657,19 +16847,7 @@
   {"type":"Text","value":" "},
   {"type":"NameVariable","value":"\u003c\u003e"},
   {"type":"Text","value":" "},
-  {"type":"LiteralStringSingle","value":"'PROGRESS'"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"THEN\n     "},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"cSchemaHolders"},
-  {"type":"Text","value":" "},
-  {"type":"Operator","value":"="},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"cSchemaHolders"},
-  {"type":"Text","value":" "},
-  {"type":"Operator","value":"+"},
-  {"type":"Text","value":" "},
-  {"type":"LiteralStringSingle","value":"','"},
+  {"type":"LiteralStringSingle","value":"'PROGRESS' THEN\n      cSchemaHolders = cSchemaHolders + ','"},
   {"type":"Text","value":" "},
   {"type":"Operator","value":"+"},
   {"type":"Text","value":" "},
@@ -19611,308 +17789,7 @@
   {"type":"KeywordReserved","value":"THEN"},
   {"type":"Text","value":" "},
   {"type":"KeywordReserved","value":"RETURN "},
-  {"type":"LiteralStringSingle","value":"'Normal'"},
-  {"type":"Punctuation","value":"."},
-  {"type":"Text","value":"\n  "},
-  {"type":"KeywordReserved","value":"IF"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"piFileNumber"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"\u003e"},
-  {"type":"Text","value":" "},
-  {"type":"Operator","value":"-"},
-  {"type":"LiteralNumberInteger","value":"80"},
-  {"type":"Text","value":"     "},
-  {"type":"KeywordReserved","value":"AND"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"piFileNumber"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"\u003c"},
-  {"type":"Text","value":" "},
-  {"type":"LiteralNumberInteger","value":"0"},
-  {"type":"Text","value":"     "},
-  {"type":"KeywordReserved","value":"THEN"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"RETURN "},
-  {"type":"LiteralStringSingle","value":"'Schema'"},
-  {"type":"Punctuation","value":"."},
-  {"type":"Text","value":"\n  "},
-  {"type":"KeywordReserved","value":"IF"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"piFileNumber"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"\u003c"},
-  {"type":"Text","value":" "},
-  {"type":"Operator","value":"-"},
-  {"type":"LiteralNumberInteger","value":"16384"},
-  {"type":"Text","value":"                           "},
-  {"type":"KeywordReserved","value":"THEN"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"RETURN "},
-  {"type":"LiteralStringSingle","value":"'VST'"},
-  {"type":"Punctuation","value":"."},
-  {"type":"Text","value":"\n  "},
-  {"type":"KeywordReserved","value":"IF"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"pcFileName"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"BEGINS "},
-  {"type":"LiteralStringSingle","value":"'_sys'"},
-  {"type":"Text","value":"                        "},
-  {"type":"KeywordReserved","value":"THEN"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"RETURN "},
-  {"type":"LiteralStringSingle","value":"'SQL'"},
-  {"type":"Punctuation","value":"."},
-  {"type":"Text","value":"\n  "},
-  {"type":"KeywordReserved","value":"IF"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"piFileNumber"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"\u003e"},
-  {"type":"Operator","value":"="},
-  {"type":"Text","value":" "},
-  {"type":"Operator","value":"-"},
-  {"type":"LiteralNumberInteger","value":"16384"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"AND"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"piFileNumber"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"\u003c"},
-  {"type":"Operator","value":"="},
-  {"type":"Text","value":" "},
-  {"type":"Operator","value":"-"},
-  {"type":"LiteralNumberInteger","value":"80"},
-  {"type":"Text","value":"  "},
-  {"type":"KeywordReserved","value":"THEN"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"RETURN "},
-  {"type":"LiteralStringSingle","value":"'Other'"},
-  {"type":"Punctuation","value":"."},
-  {"type":"Text","value":"\n\n  "},
-  {"type":"KeywordReserved","value":"RETURN "},
-  {"type":"LiteralStringSingle","value":"''"},
-  {"type":"Punctuation","value":"."},
-  {"type":"Text","value":"   "},
-  {"type":"CommentMultiline","value":"/* Function return value. */"},
-  {"type":"Text","value":"\n\n"},
-  {"type":"KeywordReserved","value":"END"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"FUNCTION"},
-  {"type":"Punctuation","value":"."},
-  {"type":"Text","value":" "},
-  {"type":"CommentMultiline","value":"/* getFileCategory */"},
-  {"type":"Text","value":"\n\n"},
-  {"type":"CommentMultiline","value":"/* _UIB-CODE-BLOCK-END */"},
-  {"type":"CommentPreproc","value":"\n\u0026ANALYZE-RESUME\n\n\u0026ENDIF\n\n\u0026IF DEFINED(EXCLUDE-getFont) = 0 \u0026THEN\n\n\u0026ANALYZE-SUSPEND _UIB-CODE-BLOCK _FUNCTION getFont Procedure"},
-  {"type":"Text","value":"\n"},
-  {"type":"KeywordReserved","value":"FUNCTION"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"getFont"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"RETURNS"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordType","value":"INTEGER\n  "},
-  {"type":"Punctuation","value":"("},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"pcName"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"AS"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordType","value":"CHARACTER "},
-  {"type":"Punctuation","value":")"},
-  {"type":"Text","value":" "},
-  {"type":"Punctuation","value":":"},
-  {"type":"Text","value":"\n  "},
-  {"type":"CommentMultiline","value":"/* Return the fontnumber for the type given\n  */"},
-  {"type":"Text","value":"\n  "},
-  {"type":"KeywordDeclaration","value":"DEFINE"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"BUFFER"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"bFont"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"FOR"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"ttFont"},
-  {"type":"Punctuation","value":"."},
-  {"type":"Text","value":"\n\n  "},
-  {"type":"CommentPreproc","value":"{\u0026timerStart}"},
-  {"type":"Text","value":"\n\n  "},
-  {"type":"KeywordReserved","value":"FIND"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"bFont"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"WHERE"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"bFont"},
-  {"type":"Punctuation","value":"."},
-  {"type":"NameVariable","value":"cName"},
-  {"type":"Text","value":" "},
-  {"type":"Operator","value":"="},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"pcName"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"NO-ERROR"},
-  {"type":"Punctuation","value":"."},
-  {"type":"Text","value":"\n  "},
-  {"type":"KeywordReserved","value":"IF"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"AVAILABLE"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"bFont"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"THEN"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"RETURN"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"bFont"},
-  {"type":"Punctuation","value":"."},
-  {"type":"NameVariable","value":"iFont"},
-  {"type":"Punctuation","value":"."},
-  {"type":"Text","value":"\n\n  "},
-  {"type":"KeywordReserved","value":"CREATE"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"bFont"},
-  {"type":"Punctuation","value":"."},
-  {"type":"Text","value":"\n  "},
-  {"type":"KeywordReserved","value":"ASSIGN"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"bFont"},
-  {"type":"Punctuation","value":"."},
-  {"type":"NameVariable","value":"cName"},
-  {"type":"Text","value":" "},
-  {"type":"Operator","value":"="},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"pcName"},
-  {"type":"Punctuation","value":"."},
-  {"type":"Text","value":"\n\n  "},
-  {"type":"NameVariable","value":"bFont"},
-  {"type":"Punctuation","value":"."},
-  {"type":"NameVariable","value":"iFont"},
-  {"type":"Text","value":" "},
-  {"type":"Operator","value":"="},
-  {"type":"Text","value":" "},
-  {"type":"KeywordType","value":"INTEGER"},
-  {"type":"Punctuation","value":"("},
-  {"type":"NameVariable","value":"getRegistry"},
-  {"type":"Punctuation","value":"("},
-  {"type":"LiteralStringSingle","value":"'DataDigger:Fonts'"},
-  {"type":"NameVariable","value":",pcName"},
-  {"type":"Punctuation","value":"))"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"NO-ERROR"},
-  {"type":"Punctuation","value":"."},
-  {"type":"Text","value":"\n\n  "},
-  {"type":"KeywordReserved","value":"IF"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"bFont"},
-  {"type":"Punctuation","value":"."},
-  {"type":"NameVariable","value":"iFont"},
-  {"type":"Text","value":" "},
-  {"type":"Operator","value":"="},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"?"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"OR"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"bFont"},
-  {"type":"Punctuation","value":"."},
-  {"type":"NameVariable","value":"iFont"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"\u003e"},
-  {"type":"Text","value":" "},
-  {"type":"LiteralNumberInteger","value":"23"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"THEN\n "},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"CASE"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"pcName"},
-  {"type":"Punctuation","value":":"},
-  {"type":"Text","value":"\n    "},
-  {"type":"KeywordReserved","value":"WHEN "},
-  {"type":"LiteralStringSingle","value":"'Default'"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"THEN"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"bFont"},
-  {"type":"Punctuation","value":"."},
-  {"type":"NameVariable","value":"iFont"},
-  {"type":"Text","value":" "},
-  {"type":"Operator","value":"="},
-  {"type":"Text","value":" "},
-  {"type":"LiteralNumberInteger","value":"4"},
-  {"type":"Punctuation","value":"."},
-  {"type":"Text","value":"\n    "},
-  {"type":"KeywordReserved","value":"WHEN "},
-  {"type":"LiteralStringSingle","value":"'Fixed'"},
-  {"type":"Text","value":"   "},
-  {"type":"KeywordReserved","value":"THEN"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"bFont"},
-  {"type":"Punctuation","value":"."},
-  {"type":"NameVariable","value":"iFont"},
-  {"type":"Text","value":" "},
-  {"type":"Operator","value":"="},
-  {"type":"Text","value":" "},
-  {"type":"LiteralNumberInteger","value":"0"},
-  {"type":"Punctuation","value":"."},
-  {"type":"Text","value":"\n  "},
-  {"type":"KeywordReserved","value":"END"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"CASE"},
-  {"type":"Punctuation","value":"."},
-  {"type":"Text","value":"\n\n  "},
-  {"type":"KeywordReserved","value":"RETURN"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"bFont"},
-  {"type":"Punctuation","value":"."},
-  {"type":"NameVariable","value":"iFont"},
-  {"type":"Punctuation","value":"."},
-  {"type":"Text","value":"   "},
-  {"type":"CommentMultiline","value":"/* Function return value. */"},
-  {"type":"Text","value":"\n  "},
-  {"type":"CommentPreproc","value":"{\u0026timerStop}"},
-  {"type":"Text","value":"\n\n"},
-  {"type":"KeywordReserved","value":"END"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"FUNCTION"},
-  {"type":"Punctuation","value":"."},
-  {"type":"Text","value":" "},
-  {"type":"CommentMultiline","value":"/* getFont */"},
-  {"type":"Text","value":"\n\n"},
-  {"type":"CommentMultiline","value":"/* _UIB-CODE-BLOCK-END */"},
-  {"type":"CommentPreproc","value":"\n\u0026ANALYZE-RESUME\n\n\u0026ENDIF\n\n\u0026IF DEFINED(EXCLUDE-getImagePath) = 0 \u0026THEN\n\n\u0026ANALYZE-SUSPEND _UIB-CODE-BLOCK _FUNCTION getImagePath Procedure"},
-  {"type":"Text","value":"\n"},
-  {"type":"KeywordReserved","value":"FUNCTION"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"getImagePath"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"RETURNS"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordType","value":"CHARACTER\n  "},
-  {"type":"Punctuation","value":"("},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"pcImage"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"AS"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordType","value":"CHARACTER "},
-  {"type":"Punctuation","value":")"},
-  {"type":"Text","value":" "},
-  {"type":"Punctuation","value":":"},
-  {"type":"Text","value":"\n  "},
-  {"type":"CommentMultiline","value":"/* Return the image path + icon set name\n  */"},
-  {"type":"Text","value":"\n  "},
-  {"type":"CommentPreproc","value":"{\u0026timerStart}"},
-  {"type":"Text","value":"\n  "},
-  {"type":"KeywordReserved","value":"RETURN"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"SUBSTITUTE"},
-  {"type":"Punctuation","value":"("},
-  {"type":"LiteralStringSingle","value":"'\u00261Image/default_\u00262'"},
+  {"type":"LiteralStringSingle","value":"'Normal'.\n  IF piFileNumber \u003e -80     AND piFileNumber \u003c 0     THEN RETURN 'Schema'.\n  IF piFileNumber \u003c -16384                           THEN RETURN 'VST'.\n  IF pcFileName BEGINS '_sys'                        THEN RETURN 'SQL'.\n  IF piFileNumber \u003e= -16384 AND piFileNumber \u003c= -80  THEN RETURN 'Other'.\n\n  RETURN ''.   /* Function return value. */\n\nEND FUNCTION. /* getFileCategory */\n\n/* _UIB-CODE-BLOCK-END */\n\u0026ANALYZE-RESUME\n\n\u0026ENDIF\n\n\u0026IF DEFINED(EXCLUDE-getFont) = 0 \u0026THEN\n\n\u0026ANALYZE-SUSPEND _UIB-CODE-BLOCK _FUNCTION getFont Procedure\nFUNCTION getFont RETURNS INTEGER\n  ( pcName AS CHARACTER ) :\n  /* Return the fontnumber for the type given\n  */\n  DEFINE BUFFER bFont FOR ttFont.\n\n  {\u0026timerStart}\n\n  FIND bFont WHERE bFont.cName = pcName NO-ERROR.\n  IF AVAILABLE bFont THEN RETURN bFont.iFont.\n\n  CREATE bFont.\n  ASSIGN bFont.cName = pcName.\n\n  bFont.iFont = INTEGER(getRegistry('DataDigger:Fonts',pcName)) NO-ERROR.\n\n  IF bFont.iFont = ? OR bFont.iFont \u003e 23 THEN\n  CASE pcName:\n    WHEN 'Default' THEN bFont.iFont = 4.\n    WHEN 'Fixed'   THEN bFont.iFont = 0.\n  END CASE.\n\n  RETURN bFont.iFont.   /* Function return value. */\n  {\u0026timerStop}\n\nEND FUNCTION. /* getFont */\n\n/* _UIB-CODE-BLOCK-END */\n\u0026ANALYZE-RESUME\n\n\u0026ENDIF\n\n\u0026IF DEFINED(EXCLUDE-getImagePath) = 0 \u0026THEN\n\n\u0026ANALYZE-SUSPEND _UIB-CODE-BLOCK _FUNCTION getImagePath Procedure\nFUNCTION getImagePath RETURNS CHARACTER\n  ( pcImage AS CHARACTER ) :\n  /* Return the image path + icon set name\n  */\n  {\u0026timerStart}\n  RETURN SUBSTITUTE('\u00261Image/default_\u00262'"},
   {"type":"NameVariable","value":","},
   {"type":"Text","value":" "},
   {"type":"NameVariable","value":"getProgramDir"},
@@ -21175,77 +19052,852 @@
   {"type":"Punctuation","value":":"},
   {"type":"KeywordReserved","value":"FULL-PATHNAME"},
   {"type":"NameVariable","value":","},
-  {"type":"LiteralStringSingle","value":"'\\')).\n    PUBLISH \"message\"(50,gcProgramDir).\n  END.\n\n  RETURN gcProgramDir.\n\nEND FUNCTION. /* getProgramDir */\n\n/* _UIB-CODE-BLOCK-END */\n\u0026ANALYZE-RESUME\n\n\u0026ENDIF\n\n\u0026IF DEFINED(EXCLUDE-getQuery) = 0 \u0026THEN\n\n\u0026ANALYZE-SUSPEND _UIB-CODE-BLOCK _FUNCTION getQuery Procedure\nFUNCTION getQuery RETURNS CHARACTER\n  ( INPUT pcDatabase AS CHARACTER\n  , INPUT pcTable    AS CHARACTER\n  , INPUT piQuery    AS INTEGER\n  ) :\n  /* Get previously used query nr \u003cpiQuery\u003e\n  */\n  DEFINE BUFFER bQuery FOR ttQuery.\n\n  FIND bQuery\n    WHERE bQuery.cDatabase = pcDatabase\n      AND bQuery.cTable    = pcTable\n      AND bQuery.iQueryNr  = piQuery NO-ERROR.\n\n  IF AVAILABLE bQuery THEN\n    RETURN bQuery.cQueryTxt.\n  ELSE\n    RETURN ?.\n\nEND FUNCTION. /* getQuery */\n\n/* _UIB-CODE-BLOCK-END */\n\u0026ANALYZE-RESUME\n\n\u0026ENDIF\n\n\u0026IF DEFINED(EXCLUDE-getReadableQuery) = 0 \u0026THEN\n\n\u0026ANALYZE-SUSPEND _UIB-CODE-BLOCK _FUNCTION getReadableQuery Procedure\nFUNCTION getReadableQuery RETURNS CHARACTER\n  ( INPUT pcQuery AS CHARACTER ):\n  /* Return a query as a string that is readable for humans.\n  */\n  DEFINE VARIABLE hQuery AS HANDLE NO-UNDO.\n\n  /* Accept query or query-handle */\n  hQuery = WIDGET-HANDLE(pcQuery) NO-ERROR.\n  IF VALID-HANDLE( hQuery ) THEN\n  DO:\n    hQuery = WIDGET-HANDLE(pcQuery).\n    pcQuery = hQuery:PREPARE-STRING.\n  END.\n\n  pcQuery = REPLACE(pcQuery,'"},
+  {"type":"LiteralStringSingle","value":"'\\'"},
+  {"type":"Punctuation","value":"))."},
+  {"type":"Text","value":"\n    "},
+  {"type":"KeywordReserved","value":"PUBLISH "},
+  {"type":"LiteralStringDouble","value":"\"message\""},
+  {"type":"Punctuation","value":"("},
+  {"type":"LiteralNumberInteger","value":"50"},
+  {"type":"NameVariable","value":",gcProgramDir"},
+  {"type":"Punctuation","value":")."},
+  {"type":"Text","value":"\n  "},
+  {"type":"KeywordReserved","value":"END"},
+  {"type":"Punctuation","value":"."},
+  {"type":"Text","value":"\n\n  "},
+  {"type":"KeywordReserved","value":"RETURN"},
   {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"EACH "},
-  {"type":"LiteralStringSingle","value":"' ,'"},
+  {"type":"NameVariable","value":"gcProgramDir"},
+  {"type":"Punctuation","value":"."},
+  {"type":"Text","value":"\n\n"},
+  {"type":"KeywordReserved","value":"END"},
   {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"EACH "},
-  {"type":"LiteralStringSingle","value":"').\n  pcQuery = REPLACE(pcQuery,'"},
+  {"type":"KeywordReserved","value":"FUNCTION"},
+  {"type":"Punctuation","value":"."},
   {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"FIRST "},
-  {"type":"LiteralStringSingle","value":"','"},
+  {"type":"CommentMultiline","value":"/* getProgramDir */"},
+  {"type":"Text","value":"\n\n"},
+  {"type":"CommentMultiline","value":"/* _UIB-CODE-BLOCK-END */"},
+  {"type":"CommentPreproc","value":"\n\u0026ANALYZE-RESUME\n\n\u0026ENDIF\n\n\u0026IF DEFINED(EXCLUDE-getQuery) = 0 \u0026THEN\n\n\u0026ANALYZE-SUSPEND _UIB-CODE-BLOCK _FUNCTION getQuery Procedure"},
+  {"type":"Text","value":"\n"},
+  {"type":"KeywordReserved","value":"FUNCTION"},
   {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"FIRST "},
-  {"type":"LiteralStringSingle","value":"').\n  pcQuery = REPLACE(pcQuery,'"},
+  {"type":"NameVariable","value":"getQuery"},
   {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"WHERE "},
-  {"type":"LiteralStringSingle","value":"',  '"},
-  {"type":"NameVariable","value":"~n"},
-  {"type":"Text","value":"  "},
-  {"type":"KeywordReserved","value":"WHERE "},
-  {"type":"LiteralStringSingle","value":"').\n  pcQuery = REPLACE(pcQuery,'"},
+  {"type":"KeywordReserved","value":"RETURNS"},
   {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"AND "},
-  {"type":"LiteralStringSingle","value":"'  ,  '"},
-  {"type":"NameVariable","value":"~n"},
+  {"type":"KeywordType","value":"CHARACTER\n  "},
+  {"type":"Punctuation","value":"("},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"INPUT"},
+  {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"pcDatabase"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"AS"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordType","value":"CHARACTER\n  "},
+  {"type":"NameVariable","value":","},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"INPUT"},
+  {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"pcTable"},
   {"type":"Text","value":"    "},
-  {"type":"KeywordReserved","value":"AND "},
-  {"type":"LiteralStringSingle","value":"').\n  pcQuery = REPLACE(pcQuery,'"},
+  {"type":"KeywordReserved","value":"AS"},
   {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"BY "},
-  {"type":"LiteralStringSingle","value":"'   ,  '"},
-  {"type":"NameVariable","value":"~n"},
+  {"type":"KeywordType","value":"CHARACTER\n  "},
+  {"type":"NameVariable","value":","},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"INPUT"},
+  {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"piQuery"},
+  {"type":"Text","value":"    "},
+  {"type":"KeywordReserved","value":"AS"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordType","value":"INTEGER\n  "},
+  {"type":"Punctuation","value":")"},
+  {"type":"Text","value":" "},
+  {"type":"Punctuation","value":":"},
+  {"type":"Text","value":"\n  "},
+  {"type":"CommentMultiline","value":"/* Get previously used query nr \u003cpiQuery\u003e\n  */"},
+  {"type":"Text","value":"\n  "},
+  {"type":"KeywordDeclaration","value":"DEFINE"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"BUFFER"},
+  {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"bQuery"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"FOR"},
+  {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"ttQuery"},
+  {"type":"Punctuation","value":"."},
+  {"type":"Text","value":"\n\n  "},
+  {"type":"KeywordReserved","value":"FIND"},
+  {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"bQuery"},
+  {"type":"Text","value":"\n    "},
+  {"type":"KeywordReserved","value":"WHERE"},
+  {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"bQuery"},
+  {"type":"Punctuation","value":"."},
+  {"type":"NameVariable","value":"cDatabase"},
+  {"type":"Text","value":" "},
+  {"type":"Operator","value":"="},
+  {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"pcDatabase"},
+  {"type":"Text","value":"\n      "},
+  {"type":"KeywordReserved","value":"AND"},
+  {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"bQuery"},
+  {"type":"Punctuation","value":"."},
+  {"type":"NameVariable","value":"cTable"},
+  {"type":"Text","value":"    "},
+  {"type":"Operator","value":"="},
+  {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"pcTable"},
+  {"type":"Text","value":"\n      "},
+  {"type":"KeywordReserved","value":"AND"},
+  {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"bQuery"},
+  {"type":"Punctuation","value":"."},
+  {"type":"NameVariable","value":"iQueryNr"},
+  {"type":"Text","value":"  "},
+  {"type":"Operator","value":"="},
+  {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"piQuery"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"NO-ERROR"},
+  {"type":"Punctuation","value":"."},
+  {"type":"Text","value":"\n\n  "},
+  {"type":"KeywordReserved","value":"IF"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"AVAILABLE"},
+  {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"bQuery"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"THEN\n   "},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"RETURN"},
+  {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"bQuery"},
+  {"type":"Punctuation","value":"."},
+  {"type":"NameVariable","value":"cQueryTxt"},
+  {"type":"Punctuation","value":"."},
+  {"type":"Text","value":"\n  "},
+  {"type":"KeywordReserved","value":"ELSE\n   "},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"RETURN "},
+  {"type":"NameVariable","value":"?"},
+  {"type":"Punctuation","value":"."},
+  {"type":"Text","value":"\n\n"},
+  {"type":"KeywordReserved","value":"END"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"FUNCTION"},
+  {"type":"Punctuation","value":"."},
+  {"type":"Text","value":" "},
+  {"type":"CommentMultiline","value":"/* getQuery */"},
+  {"type":"Text","value":"\n\n"},
+  {"type":"CommentMultiline","value":"/* _UIB-CODE-BLOCK-END */"},
+  {"type":"CommentPreproc","value":"\n\u0026ANALYZE-RESUME\n\n\u0026ENDIF\n\n\u0026IF DEFINED(EXCLUDE-getReadableQuery) = 0 \u0026THEN\n\n\u0026ANALYZE-SUSPEND _UIB-CODE-BLOCK _FUNCTION getReadableQuery Procedure"},
+  {"type":"Text","value":"\n"},
+  {"type":"KeywordReserved","value":"FUNCTION"},
+  {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"getReadableQuery"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"RETURNS"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordType","value":"CHARACTER\n  "},
+  {"type":"Punctuation","value":"("},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"INPUT"},
+  {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"pcQuery"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"AS"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordType","value":"CHARACTER "},
+  {"type":"Punctuation","value":"):"},
+  {"type":"Text","value":"\n  "},
+  {"type":"CommentMultiline","value":"/* Return a query as a string that is readable for humans.\n  */"},
+  {"type":"Text","value":"\n  "},
+  {"type":"KeywordDeclaration","value":"DEFINE"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"VARIABLE"},
+  {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"hQuery"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"AS"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordType","value":"HANDLE"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"NO-UNDO"},
+  {"type":"Punctuation","value":"."},
+  {"type":"Text","value":"\n\n  "},
+  {"type":"CommentMultiline","value":"/* Accept query or query-handle */"},
+  {"type":"Text","value":"\n  "},
+  {"type":"NameVariable","value":"hQuery"},
+  {"type":"Text","value":" "},
+  {"type":"Operator","value":"="},
+  {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"WIDGET"},
+  {"type":"Operator","value":"-"},
+  {"type":"NameVariable","value":"HANDLE"},
+  {"type":"Punctuation","value":"("},
+  {"type":"NameVariable","value":"pcQuery"},
+  {"type":"Punctuation","value":")"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"NO-ERROR"},
+  {"type":"Punctuation","value":"."},
+  {"type":"Text","value":"\n  "},
+  {"type":"KeywordReserved","value":"IF"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"VALID-HANDLE"},
+  {"type":"Punctuation","value":"("},
+  {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"hQuery"},
+  {"type":"Text","value":" "},
+  {"type":"Punctuation","value":")"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"THEN\n "},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"DO"},
+  {"type":"Punctuation","value":":"},
+  {"type":"Text","value":"\n    "},
+  {"type":"NameVariable","value":"hQuery"},
+  {"type":"Text","value":" "},
+  {"type":"Operator","value":"="},
+  {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"WIDGET"},
+  {"type":"Operator","value":"-"},
+  {"type":"NameVariable","value":"HANDLE"},
+  {"type":"Punctuation","value":"("},
+  {"type":"NameVariable","value":"pcQuery"},
+  {"type":"Punctuation","value":")."},
+  {"type":"Text","value":"\n    "},
+  {"type":"NameVariable","value":"pcQuery"},
+  {"type":"Text","value":" "},
+  {"type":"Operator","value":"="},
+  {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"hQuery"},
+  {"type":"Punctuation","value":":"},
+  {"type":"KeywordReserved","value":"PREPARE-STRING"},
+  {"type":"Punctuation","value":"."},
+  {"type":"Text","value":"\n  "},
+  {"type":"KeywordReserved","value":"END"},
+  {"type":"Punctuation","value":"."},
+  {"type":"Text","value":"\n\n  "},
+  {"type":"NameVariable","value":"pcQuery"},
+  {"type":"Text","value":" "},
+  {"type":"Operator","value":"="},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"REPLACE"},
+  {"type":"Punctuation","value":"("},
+  {"type":"NameVariable","value":"pcQuery,"},
+  {"type":"LiteralStringSingle","value":"' EACH ' ,' EACH ').\n  pcQuery = REPLACE(pcQuery,' FIRST ',' FIRST ').\n  pcQuery = REPLACE(pcQuery,' WHERE ',  '~n  WHERE ').\n  pcQuery = REPLACE(pcQuery,' AND '  ,  '~n    AND ').\n  pcQuery = REPLACE(pcQuery,' BY '   ,  '~n     BY ').\n  pcQuery = REPLACE(pcQuery,' FIELDS ()','').\n  pcQuery = REPLACE(pcQuery,'FOR EACH ' ,'FOR EACH ').\n  pcQuery = REPLACE(pcQuery,' NO-LOCK',  ' NO-LOCK').\n  pcQuery = REPLACE(pcQuery,' INDEXED-REPOSITION',  '').\n\n  pcQuery = pcQuery + '~n'"},
+  {"type":"Punctuation","value":"."},
+  {"type":"Text","value":"\n\n  "},
+  {"type":"KeywordReserved","value":"RETURN"},
+  {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"pcQuery"},
+  {"type":"Punctuation","value":"."},
+  {"type":"Text","value":"\n"},
+  {"type":"KeywordReserved","value":"END"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"FUNCTION"},
+  {"type":"Punctuation","value":"."},
+  {"type":"Text","value":" "},
+  {"type":"CommentMultiline","value":"/* getReadableQuery */"},
+  {"type":"Text","value":"\n\n"},
+  {"type":"CommentMultiline","value":"/* _UIB-CODE-BLOCK-END */"},
+  {"type":"CommentPreproc","value":"\n\u0026ANALYZE-RESUME\n\n\u0026ENDIF\n\n\u0026IF DEFINED(EXCLUDE-getRegistry) = 0 \u0026THEN\n\n\u0026ANALYZE-SUSPEND _UIB-CODE-BLOCK _FUNCTION getRegistry Procedure"},
+  {"type":"Text","value":"\n"},
+  {"type":"KeywordReserved","value":"FUNCTION"},
+  {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"getRegistry"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"RETURNS"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordType","value":"CHARACTER\n    "},
+  {"type":"Punctuation","value":"("},
+  {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"pcSection"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"AS"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordType","value":"CHARACTER\n    "},
+  {"type":"NameVariable","value":","},
+  {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"pcKey"},
   {"type":"Text","value":"     "},
-  {"type":"KeywordReserved","value":"BY "},
-  {"type":"LiteralStringSingle","value":"').\n  pcQuery = REPLACE(pcQuery,'"},
+  {"type":"KeywordReserved","value":"AS"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordType","value":"CHARACTER\n    "},
+  {"type":"Punctuation","value":")"},
+  {"type":"Text","value":" "},
+  {"type":"Punctuation","value":":"},
+  {"type":"Text","value":"\n  "},
+  {"type":"CommentMultiline","value":"/* Get a value from the registry.\n  */"},
+  {"type":"Text","value":"\n  "},
+  {"type":"CommentPreproc","value":"{\u0026timerStart}"},
+  {"type":"Text","value":"\n  "},
+  {"type":"KeywordDeclaration","value":"DEFINE"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"BUFFER"},
+  {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"bDatabase"},
   {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"FIELDS "},
-  {"type":"Punctuation","value":"()"},
-  {"type":"LiteralStringSingle","value":"','').\n  pcQuery = REPLACE(pcQuery,'"},
   {"type":"KeywordReserved","value":"FOR"},
   {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"EACH "},
-  {"type":"LiteralStringSingle","value":"' ,'"},
+  {"type":"NameVariable","value":"ttDatabase"},
+  {"type":"Punctuation","value":"."},
+  {"type":"Text","value":"\n  "},
+  {"type":"KeywordDeclaration","value":"DEFINE"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"BUFFER"},
+  {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"bConfig"},
+  {"type":"Text","value":"   "},
   {"type":"KeywordReserved","value":"FOR"},
   {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"EACH "},
-  {"type":"LiteralStringSingle","value":"').\n  pcQuery = REPLACE(pcQuery,'"},
+  {"type":"NameVariable","value":"ttConfig"},
+  {"type":"Punctuation","value":"."},
+  {"type":"Text","value":"\n\n  "},
+  {"type":"CommentMultiline","value":"/* If this is a DB-specific section then replace db name if needed */"},
+  {"type":"Text","value":"\n  "},
+  {"type":"KeywordReserved","value":"IF"},
   {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"NO-LOCK"},
-  {"type":"LiteralStringSingle","value":"',  '"},
+  {"type":"NameVariable","value":"pcSection"},
   {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"NO-LOCK"},
-  {"type":"LiteralStringSingle","value":"').\n  pcQuery = REPLACE(pcQuery,'"},
+  {"type":"KeywordReserved","value":"BEGINS "},
+  {"type":"LiteralStringDouble","value":"\"DB:\""},
   {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"INDEXED-REPOSITION"},
-  {"type":"LiteralStringSingle","value":"',  '').\n\n  pcQuery = pcQuery + '"},
-  {"type":"NameVariable","value":"~n"},
-  {"type":"LiteralStringSingle","value":"'.\n\n  RETURN pcQuery.\nEND FUNCTION. /* getReadableQuery */\n\n/* _UIB-CODE-BLOCK-END */\n\u0026ANALYZE-RESUME\n\n\u0026ENDIF\n\n\u0026IF DEFINED(EXCLUDE-getRegistry) = 0 \u0026THEN\n\n\u0026ANALYZE-SUSPEND _UIB-CODE-BLOCK _FUNCTION getRegistry Procedure\nFUNCTION getRegistry RETURNS CHARACTER\n    ( pcSection AS CHARACTER\n    , pcKey     AS CHARACTER\n    ) :\n  /* Get a value from the registry.\n  */\n  {\u0026timerStart}\n  DEFINE BUFFER bDatabase FOR ttDatabase.\n  DEFINE BUFFER bConfig   FOR ttConfig.\n\n  /* If this is a DB-specific section then replace db name if needed */\n  IF pcSection BEGINS \"DB:\" THEN\n  DO:\n    FIND bDatabase WHERE bDatabase.cLogicalName = ENTRY(2,pcSection,\":\") NO-ERROR.\n    IF AVAILABLE bDatabase THEN pcSection = \"DB:\" + bDatabase.cSection.\n  END.\n\n  /* Load settings if there is nothing in the config table */\n  IF NOT TEMP-TABLE ttConfig:HAS-RECORDS THEN\n    RUN loadSettings.\n\n  /* Search in settings tt */\n  FIND bConfig WHERE bConfig.cSection = pcSection AND bConfig.cSetting = pcKey NO-ERROR.\n\n  RETURN ( IF AVAILABLE bConfig THEN bConfig.cValue ELSE ? ).\n  {\u0026timerStop}\nEND FUNCTION. /* getRegistry */\n\n/* _UIB-CODE-BLOCK-END */\n\u0026ANALYZE-RESUME\n\n\u0026ENDIF\n\n\u0026IF DEFINED(EXCLUDE-getSchemaHolder) = 0 \u0026THEN\n\n\u0026ANALYZE-SUSPEND _UIB-CODE-BLOCK _FUNCTION getSchemaHolder Procedure\nFUNCTION getSchemaHolder RETURNS CHARACTER\n  ( INPUT pcDataSrNameOrDbName AS CHARACTER\n  ):\n  DEFINE BUFFER bDataserver FOR ttDataserver.\n\n  FIND bDataserver WHERE bDataserver.cLDBNameDataserver = pcDataSrNameOrDbName NO-ERROR.\n  RETURN (IF AVAILABLE bDataserver THEN bDataserver.cLDBNameSchema ELSE pcDataSrNameOrDbName).\n\nEND FUNCTION. /* getSchemaHolder */\n\n/* _UIB-CODE-BLOCK-END */\n\u0026ANALYZE-RESUME\n\n\u0026ENDIF\n\n\u0026IF DEFINED(EXCLUDE-getStackSize) = 0 \u0026THEN\n\n\u0026ANALYZE-SUSPEND _UIB-CODE-BLOCK _FUNCTION getStackSize Procedure\nFUNCTION getStackSize RETURNS INTEGER():\n  /* Return value of the -s session setting\n  */\n  DEFINE VARIABLE cList      AS CHARACTER   NO-UNDO.\n  DEFINE VARIABLE cParm      AS CHARACTER   CASE-SENSITIVE NO-UNDO.\n  DEFINE VARIABLE cSetting   AS CHARACTER   NO-UNDO.\n  DEFINE VARIABLE cValue     AS CHARACTER   NO-UNDO.\n  DEFINE VARIABLE iParm      AS INTEGER     NO-UNDO.\n  DEFINE VARIABLE iStackSize AS INTEGER     NO-UNDO.\n\n  cList = SESSION:STARTUP-PARAMETERS.\n\n  DO iParm = 1 TO NUM-ENTRIES(cList):\n    cSetting = ENTRY(iParm,cList) + \" \".\n    cParm    = ENTRY(1,cSetting,\" \").\n    cValue   = ENTRY(2,cSetting,\" \").\n\n    IF cParm = \"-s\" THEN\n    DO:\n      iStackSize = INTEGER(cValue) NO-ERROR.\n      IF ERROR-STATUS:ERROR THEN iStackSize = 0.\n    END.\n  END.\n\n  /* If not defined, report the default */\n  IF iStackSize = 0 THEN iStackSize = 40.\n\n  RETURN iStackSize.\nEND FUNCTION. /* getStackSize */\n\n/* _UIB-CODE-BLOCK-END */\n\u0026ANALYZE-RESUME\n\n\u0026ENDIF\n\n\u0026IF DEFINED(EXCLUDE-getTableDesc) = 0 \u0026THEN\n\n\u0026ANALYZE-SUSPEND _UIB-CODE-BLOCK _FUNCTION getTableDesc Procedure\nFUNCTION getTableDesc RETURNS CHARACTER\n  ( INPUT pcDatabase AS CHARACTER\n  , INPUT pcTable    AS CHARACTER\n  ) :\n  DEFINE BUFFER bTable FOR ttTable.\n\n  FIND bTable\n    WHERE bTable.cDatabase  = pcDatabase\n      AND bTable.cTableName = pcTable NO-ERROR.\n\n  RETURN (IF AVAILABLE bTable THEN bTable.cTableDesc ELSE '').\n\nEND FUNCTION. /* getTableDesc */\n\n/* _UIB-CODE-BLOCK-END */\n\u0026ANALYZE-RESUME\n\n\u0026ENDIF\n\n\u0026IF DEFINED(EXCLUDE-getTableLabel) = 0 \u0026THEN\n\n\u0026ANALYZE-SUSPEND _UIB-CODE-BLOCK _FUNCTION getTableLabel Procedure\nFUNCTION getTableLabel RETURNS CHARACTER\n  ( INPUT  pcDatabase AS CHARACTER\n  , INPUT  pcTable    AS CHARACTER\n  ) :\n  DEFINE BUFFER bTable FOR ttTable.\n\n  FIND bTable\n    WHERE bTable.cDatabase  = pcDatabase\n      AND bTable.cTableName = pcTable NO-ERROR.\n\n  RETURN (IF AVAILABLE bTable AND bTable.cTableLabel \u003c\u003e ? THEN bTable.cTableLabel ELSE '').\n\nEND FUNCTION. /* getTableLabel */\n\n/* _UIB-CODE-BLOCK-END */\n\u0026ANALYZE-RESUME\n\n\u0026ENDIF\n\n\u0026IF DEFINED(EXCLUDE-getTableList) = 0 \u0026THEN\n\n\u0026ANALYZE-SUSPEND _UIB-CODE-BLOCK _FUNCTION getTableList Procedure\nFUNCTION getTableList RETURNS CHARACTER\n  ( INPUT  pcDatabaseFilter AS CHARACTER\n  , INPUT  pcTableFilter    AS CHARACTER\n  ) :\n  /* Get a filtered list of all tables in the current database\n  */\n  DEFINE VARIABLE cTableList  AS CHARACTER   NO-UNDO.\n  DEFINE VARIABLE cQuery      AS CHARACTER   NO-UNDO.\n\n  DEFINE BUFFER bTable FOR ttTable.\n  DEFINE QUERY qTable FOR bTable.\n\n  {\u0026timerStart}\n  IF pcDatabaseFilter = '' OR pcDatabaseFilter = ? THEN pcDatabaseFilter = '"},
-  {"type":"Operator","value":"*"},
-  {"type":"LiteralStringSingle","value":"'.\n\n  /* Build query */\n  cQuery = SUBSTITUTE('"},
-  {"type":"KeywordReserved","value":"for"},
+  {"type":"KeywordReserved","value":"THEN\n "},
   {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"each"},
+  {"type":"KeywordReserved","value":"DO"},
+  {"type":"Punctuation","value":":"},
+  {"type":"Text","value":"\n    "},
+  {"type":"KeywordReserved","value":"FIND"},
+  {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"bDatabase"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"WHERE"},
+  {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"bDatabase"},
+  {"type":"Punctuation","value":"."},
+  {"type":"NameVariable","value":"cLogicalName"},
+  {"type":"Text","value":" "},
+  {"type":"Operator","value":"="},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"ENTRY"},
+  {"type":"Punctuation","value":"("},
+  {"type":"LiteralNumberInteger","value":"2"},
+  {"type":"NameVariable","value":",pcSection,"},
+  {"type":"LiteralStringDouble","value":"\":\""},
+  {"type":"Punctuation","value":")"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"NO-ERROR"},
+  {"type":"Punctuation","value":"."},
+  {"type":"Text","value":"\n    "},
+  {"type":"KeywordReserved","value":"IF"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"AVAILABLE"},
+  {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"bDatabase"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"THEN"},
+  {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"pcSection"},
+  {"type":"Text","value":" "},
+  {"type":"Operator","value":"="},
+  {"type":"Text","value":" "},
+  {"type":"LiteralStringDouble","value":"\"DB:\""},
+  {"type":"Text","value":" "},
+  {"type":"Operator","value":"+"},
+  {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"bDatabase"},
+  {"type":"Punctuation","value":"."},
+  {"type":"NameVariable","value":"cSection"},
+  {"type":"Punctuation","value":"."},
+  {"type":"Text","value":"\n  "},
+  {"type":"KeywordReserved","value":"END"},
+  {"type":"Punctuation","value":"."},
+  {"type":"Text","value":"\n\n  "},
+  {"type":"CommentMultiline","value":"/* Load settings if there is nothing in the config table */"},
+  {"type":"Text","value":"\n  "},
+  {"type":"KeywordReserved","value":"IF"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"NOT"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"TEMP-TABLE"},
+  {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"ttConfig"},
+  {"type":"Punctuation","value":":"},
+  {"type":"KeywordReserved","value":"HAS-RECORDS"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"THEN\n   "},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"RUN"},
+  {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"loadSettings"},
+  {"type":"Punctuation","value":"."},
+  {"type":"Text","value":"\n\n  "},
+  {"type":"CommentMultiline","value":"/* Search in settings tt */"},
+  {"type":"Text","value":"\n  "},
+  {"type":"KeywordReserved","value":"FIND"},
+  {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"bConfig"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"WHERE"},
+  {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"bConfig"},
+  {"type":"Punctuation","value":"."},
+  {"type":"NameVariable","value":"cSection"},
+  {"type":"Text","value":" "},
+  {"type":"Operator","value":"="},
+  {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"pcSection"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"AND"},
+  {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"bConfig"},
+  {"type":"Punctuation","value":"."},
+  {"type":"NameVariable","value":"cSetting"},
+  {"type":"Text","value":" "},
+  {"type":"Operator","value":"="},
+  {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"pcKey"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"NO-ERROR"},
+  {"type":"Punctuation","value":"."},
+  {"type":"Text","value":"\n\n  "},
+  {"type":"KeywordReserved","value":"RETURN "},
+  {"type":"Punctuation","value":"("},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"IF"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"AVAILABLE"},
+  {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"bConfig"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"THEN"},
+  {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"bConfig"},
+  {"type":"Punctuation","value":"."},
+  {"type":"NameVariable","value":"cValue"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"ELSE "},
+  {"type":"NameVariable","value":"?"},
+  {"type":"Text","value":" "},
+  {"type":"Punctuation","value":")."},
+  {"type":"Text","value":"\n  "},
+  {"type":"CommentPreproc","value":"{\u0026timerStop}"},
+  {"type":"Text","value":"\n"},
+  {"type":"KeywordReserved","value":"END"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"FUNCTION"},
+  {"type":"Punctuation","value":"."},
+  {"type":"Text","value":" "},
+  {"type":"CommentMultiline","value":"/* getRegistry */"},
+  {"type":"Text","value":"\n\n"},
+  {"type":"CommentMultiline","value":"/* _UIB-CODE-BLOCK-END */"},
+  {"type":"CommentPreproc","value":"\n\u0026ANALYZE-RESUME\n\n\u0026ENDIF\n\n\u0026IF DEFINED(EXCLUDE-getSchemaHolder) = 0 \u0026THEN\n\n\u0026ANALYZE-SUSPEND _UIB-CODE-BLOCK _FUNCTION getSchemaHolder Procedure"},
+  {"type":"Text","value":"\n"},
+  {"type":"KeywordReserved","value":"FUNCTION"},
+  {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"getSchemaHolder"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"RETURNS"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordType","value":"CHARACTER\n  "},
+  {"type":"Punctuation","value":"("},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"INPUT"},
+  {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"pcDataSrNameOrDbName"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"AS"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordType","value":"CHARACTER\n  "},
+  {"type":"Punctuation","value":"):"},
+  {"type":"Text","value":"\n  "},
+  {"type":"KeywordDeclaration","value":"DEFINE"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"BUFFER"},
+  {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"bDataserver"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"FOR"},
+  {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"ttDataserver"},
+  {"type":"Punctuation","value":"."},
+  {"type":"Text","value":"\n\n  "},
+  {"type":"KeywordReserved","value":"FIND"},
+  {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"bDataserver"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"WHERE"},
+  {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"bDataserver"},
+  {"type":"Punctuation","value":"."},
+  {"type":"NameVariable","value":"cLDBNameDataserver"},
+  {"type":"Text","value":" "},
+  {"type":"Operator","value":"="},
+  {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"pcDataSrNameOrDbName"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"NO-ERROR"},
+  {"type":"Punctuation","value":"."},
+  {"type":"Text","value":"\n  "},
+  {"type":"KeywordReserved","value":"RETURN "},
+  {"type":"Punctuation","value":"("},
+  {"type":"KeywordReserved","value":"IF"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"AVAILABLE"},
+  {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"bDataserver"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"THEN"},
+  {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"bDataserver"},
+  {"type":"Punctuation","value":"."},
+  {"type":"NameVariable","value":"cLDBNameSchema"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"ELSE"},
+  {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"pcDataSrNameOrDbName"},
+  {"type":"Punctuation","value":")."},
+  {"type":"Text","value":"\n\n"},
+  {"type":"KeywordReserved","value":"END"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"FUNCTION"},
+  {"type":"Punctuation","value":"."},
+  {"type":"Text","value":" "},
+  {"type":"CommentMultiline","value":"/* getSchemaHolder */"},
+  {"type":"Text","value":"\n\n"},
+  {"type":"CommentMultiline","value":"/* _UIB-CODE-BLOCK-END */"},
+  {"type":"CommentPreproc","value":"\n\u0026ANALYZE-RESUME\n\n\u0026ENDIF\n\n\u0026IF DEFINED(EXCLUDE-getStackSize) = 0 \u0026THEN\n\n\u0026ANALYZE-SUSPEND _UIB-CODE-BLOCK _FUNCTION getStackSize Procedure"},
+  {"type":"Text","value":"\n"},
+  {"type":"KeywordReserved","value":"FUNCTION"},
+  {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"getStackSize"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"RETURNS"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordType","value":"INTEGER"},
+  {"type":"Punctuation","value":"():"},
+  {"type":"Text","value":"\n  "},
+  {"type":"CommentMultiline","value":"/* Return value of the -s session setting\n  */"},
+  {"type":"Text","value":"\n  "},
+  {"type":"KeywordDeclaration","value":"DEFINE"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"VARIABLE"},
+  {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"cList"},
+  {"type":"Text","value":"      "},
+  {"type":"KeywordReserved","value":"AS"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordType","value":"CHARACTER  "},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"NO-UNDO"},
+  {"type":"Punctuation","value":"."},
+  {"type":"Text","value":"\n  "},
+  {"type":"KeywordDeclaration","value":"DEFINE"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"VARIABLE"},
+  {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"cParm"},
+  {"type":"Text","value":"      "},
+  {"type":"KeywordReserved","value":"AS"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordType","value":"CHARACTER  "},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"CASE-SENSITIVE"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"NO-UNDO"},
+  {"type":"Punctuation","value":"."},
+  {"type":"Text","value":"\n  "},
+  {"type":"KeywordDeclaration","value":"DEFINE"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"VARIABLE"},
+  {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"cSetting"},
+  {"type":"Text","value":"   "},
+  {"type":"KeywordReserved","value":"AS"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordType","value":"CHARACTER  "},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"NO-UNDO"},
+  {"type":"Punctuation","value":"."},
+  {"type":"Text","value":"\n  "},
+  {"type":"KeywordDeclaration","value":"DEFINE"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"VARIABLE"},
+  {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"cValue"},
+  {"type":"Text","value":"     "},
+  {"type":"KeywordReserved","value":"AS"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordType","value":"CHARACTER  "},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"NO-UNDO"},
+  {"type":"Punctuation","value":"."},
+  {"type":"Text","value":"\n  "},
+  {"type":"KeywordDeclaration","value":"DEFINE"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"VARIABLE"},
+  {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"iParm"},
+  {"type":"Text","value":"      "},
+  {"type":"KeywordReserved","value":"AS"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordType","value":"INTEGER    "},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"NO-UNDO"},
+  {"type":"Punctuation","value":"."},
+  {"type":"Text","value":"\n  "},
+  {"type":"KeywordDeclaration","value":"DEFINE"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"VARIABLE"},
+  {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"iStackSize"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"AS"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordType","value":"INTEGER    "},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"NO-UNDO"},
+  {"type":"Punctuation","value":"."},
+  {"type":"Text","value":"\n\n  "},
+  {"type":"NameVariable","value":"cList"},
+  {"type":"Text","value":" "},
+  {"type":"Operator","value":"="},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"SESSION"},
+  {"type":"Punctuation","value":":"},
+  {"type":"NameVariable","value":"STARTUP"},
+  {"type":"Operator","value":"-"},
+  {"type":"NameVariable","value":"PARAMETERS"},
+  {"type":"Punctuation","value":"."},
+  {"type":"Text","value":"\n\n  "},
+  {"type":"KeywordReserved","value":"DO"},
+  {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"iParm"},
+  {"type":"Text","value":" "},
+  {"type":"Operator","value":"="},
+  {"type":"Text","value":" "},
+  {"type":"LiteralNumberInteger","value":"1"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"TO"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"NUM-ENTRIES"},
+  {"type":"Punctuation","value":"("},
+  {"type":"NameVariable","value":"cList"},
+  {"type":"Punctuation","value":"):"},
+  {"type":"Text","value":"\n    "},
+  {"type":"NameVariable","value":"cSetting"},
+  {"type":"Text","value":" "},
+  {"type":"Operator","value":"="},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"ENTRY"},
+  {"type":"Punctuation","value":"("},
+  {"type":"NameVariable","value":"iParm,cList"},
+  {"type":"Punctuation","value":")"},
+  {"type":"Text","value":" "},
+  {"type":"Operator","value":"+"},
+  {"type":"Text","value":" "},
+  {"type":"LiteralStringDouble","value":"\" \""},
+  {"type":"Punctuation","value":"."},
+  {"type":"Text","value":"\n    "},
+  {"type":"NameVariable","value":"cParm"},
+  {"type":"Text","value":"    "},
+  {"type":"Operator","value":"="},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"ENTRY"},
+  {"type":"Punctuation","value":"("},
+  {"type":"LiteralNumberInteger","value":"1"},
+  {"type":"NameVariable","value":",cSetting,"},
+  {"type":"LiteralStringDouble","value":"\" \""},
+  {"type":"Punctuation","value":")."},
+  {"type":"Text","value":"\n    "},
+  {"type":"NameVariable","value":"cValue"},
+  {"type":"Text","value":"   "},
+  {"type":"Operator","value":"="},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"ENTRY"},
+  {"type":"Punctuation","value":"("},
+  {"type":"LiteralNumberInteger","value":"2"},
+  {"type":"NameVariable","value":",cSetting,"},
+  {"type":"LiteralStringDouble","value":"\" \""},
+  {"type":"Punctuation","value":")."},
+  {"type":"Text","value":"\n\n    "},
+  {"type":"KeywordReserved","value":"IF"},
+  {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"cParm"},
+  {"type":"Text","value":" "},
+  {"type":"Operator","value":"="},
+  {"type":"Text","value":" "},
+  {"type":"LiteralStringDouble","value":"\"-s\""},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"THEN\n   "},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"DO"},
+  {"type":"Punctuation","value":":"},
+  {"type":"Text","value":"\n      "},
+  {"type":"NameVariable","value":"iStackSize"},
+  {"type":"Text","value":" "},
+  {"type":"Operator","value":"="},
+  {"type":"Text","value":" "},
+  {"type":"KeywordType","value":"INTEGER"},
+  {"type":"Punctuation","value":"("},
+  {"type":"NameVariable","value":"cValue"},
+  {"type":"Punctuation","value":")"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"NO-ERROR"},
+  {"type":"Punctuation","value":"."},
+  {"type":"Text","value":"\n      "},
+  {"type":"KeywordReserved","value":"IF"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"ERROR-STATUS"},
+  {"type":"Punctuation","value":":"},
+  {"type":"KeywordReserved","value":"ERROR"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"THEN"},
+  {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"iStackSize"},
+  {"type":"Text","value":" "},
+  {"type":"Operator","value":"="},
+  {"type":"Text","value":" "},
+  {"type":"LiteralNumberInteger","value":"0"},
+  {"type":"Punctuation","value":"."},
+  {"type":"Text","value":"\n    "},
+  {"type":"KeywordReserved","value":"END"},
+  {"type":"Punctuation","value":"."},
+  {"type":"Text","value":"\n  "},
+  {"type":"KeywordReserved","value":"END"},
+  {"type":"Punctuation","value":"."},
+  {"type":"Text","value":"\n\n  "},
+  {"type":"CommentMultiline","value":"/* If not defined, report the default */"},
+  {"type":"Text","value":"\n  "},
+  {"type":"KeywordReserved","value":"IF"},
+  {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"iStackSize"},
+  {"type":"Text","value":" "},
+  {"type":"Operator","value":"="},
+  {"type":"Text","value":" "},
+  {"type":"LiteralNumberInteger","value":"0"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"THEN"},
+  {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"iStackSize"},
+  {"type":"Text","value":" "},
+  {"type":"Operator","value":"="},
+  {"type":"Text","value":" "},
+  {"type":"LiteralNumberInteger","value":"40"},
+  {"type":"Punctuation","value":"."},
+  {"type":"Text","value":"\n\n  "},
+  {"type":"KeywordReserved","value":"RETURN"},
+  {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"iStackSize"},
+  {"type":"Punctuation","value":"."},
+  {"type":"Text","value":"\n"},
+  {"type":"KeywordReserved","value":"END"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"FUNCTION"},
+  {"type":"Punctuation","value":"."},
+  {"type":"Text","value":" "},
+  {"type":"CommentMultiline","value":"/* getStackSize */"},
+  {"type":"Text","value":"\n\n"},
+  {"type":"CommentMultiline","value":"/* _UIB-CODE-BLOCK-END */"},
+  {"type":"CommentPreproc","value":"\n\u0026ANALYZE-RESUME\n\n\u0026ENDIF\n\n\u0026IF DEFINED(EXCLUDE-getTableDesc) = 0 \u0026THEN\n\n\u0026ANALYZE-SUSPEND _UIB-CODE-BLOCK _FUNCTION getTableDesc Procedure"},
+  {"type":"Text","value":"\n"},
+  {"type":"KeywordReserved","value":"FUNCTION"},
+  {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"getTableDesc"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"RETURNS"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordType","value":"CHARACTER\n  "},
+  {"type":"Punctuation","value":"("},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"INPUT"},
+  {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"pcDatabase"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"AS"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordType","value":"CHARACTER\n  "},
+  {"type":"NameVariable","value":","},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"INPUT"},
+  {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"pcTable"},
+  {"type":"Text","value":"    "},
+  {"type":"KeywordReserved","value":"AS"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordType","value":"CHARACTER\n  "},
+  {"type":"Punctuation","value":")"},
+  {"type":"Text","value":" "},
+  {"type":"Punctuation","value":":"},
+  {"type":"Text","value":"\n  "},
+  {"type":"KeywordDeclaration","value":"DEFINE"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"BUFFER"},
   {"type":"Text","value":" "},
   {"type":"NameVariable","value":"bTable"},
   {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"where"},
+  {"type":"KeywordReserved","value":"FOR"},
   {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"ttTable"},
+  {"type":"Punctuation","value":"."},
+  {"type":"Text","value":"\n\n  "},
+  {"type":"KeywordReserved","value":"FIND"},
+  {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"bTable"},
+  {"type":"Text","value":"\n    "},
+  {"type":"KeywordReserved","value":"WHERE"},
+  {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"bTable"},
+  {"type":"Punctuation","value":"."},
   {"type":"NameVariable","value":"cDatabase"},
+  {"type":"Text","value":"  "},
+  {"type":"Operator","value":"="},
   {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"matches "},
-  {"type":"CommentPreproc","value":"\u00261', QUOTER(pcDatabaseFilter))."},
+  {"type":"NameVariable","value":"pcDatabase"},
+  {"type":"Text","value":"\n      "},
+  {"type":"KeywordReserved","value":"AND"},
+  {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"bTable"},
+  {"type":"Punctuation","value":"."},
+  {"type":"NameVariable","value":"cTableName"},
+  {"type":"Text","value":" "},
+  {"type":"Operator","value":"="},
+  {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"pcTable"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"NO-ERROR"},
+  {"type":"Punctuation","value":"."},
+  {"type":"Text","value":"\n\n  "},
+  {"type":"KeywordReserved","value":"RETURN "},
+  {"type":"Punctuation","value":"("},
+  {"type":"KeywordReserved","value":"IF"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"AVAILABLE"},
+  {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"bTable"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"THEN"},
+  {"type":"Text","value":" "},
+  {"type":"NameVariable","value":"bTable"},
+  {"type":"Punctuation","value":"."},
+  {"type":"NameVariable","value":"cTableDesc"},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"ELSE "},
+  {"type":"LiteralStringSingle","value":"'').\n\nEND FUNCTION. /* getTableDesc */\n\n/* _UIB-CODE-BLOCK-END */\n\u0026ANALYZE-RESUME\n\n\u0026ENDIF\n\n\u0026IF DEFINED(EXCLUDE-getTableLabel) = 0 \u0026THEN\n\n\u0026ANALYZE-SUSPEND _UIB-CODE-BLOCK _FUNCTION getTableLabel Procedure\nFUNCTION getTableLabel RETURNS CHARACTER\n  ( INPUT  pcDatabase AS CHARACTER\n  , INPUT  pcTable    AS CHARACTER\n  ) :\n  DEFINE BUFFER bTable FOR ttTable.\n\n  FIND bTable\n    WHERE bTable.cDatabase  = pcDatabase\n      AND bTable.cTableName = pcTable NO-ERROR.\n\n  RETURN (IF AVAILABLE bTable AND bTable.cTableLabel \u003c\u003e ? THEN bTable.cTableLabel ELSE '').\n\nEND FUNCTION. /* getTableLabel */\n\n/* _UIB-CODE-BLOCK-END */\n\u0026ANALYZE-RESUME\n\n\u0026ENDIF\n\n\u0026IF DEFINED(EXCLUDE-getTableList) = 0 \u0026THEN\n\n\u0026ANALYZE-SUSPEND _UIB-CODE-BLOCK _FUNCTION getTableList Procedure\nFUNCTION getTableList RETURNS CHARACTER\n  ( INPUT  pcDatabaseFilter AS CHARACTER\n  , INPUT  pcTableFilter    AS CHARACTER\n  ) :\n  /* Get a filtered list of all tables in the current database\n  */\n  DEFINE VARIABLE cTableList  AS CHARACTER   NO-UNDO.\n  DEFINE VARIABLE cQuery      AS CHARACTER   NO-UNDO.\n\n  DEFINE BUFFER bTable FOR ttTable.\n  DEFINE QUERY qTable FOR bTable.\n\n  {\u0026timerStart}\n  IF pcDatabaseFilter = '' OR pcDatabaseFilter = ? THEN pcDatabaseFilter = '*'.\n\n  /* Build query */\n  cQuery = SUBSTITUTE('for each bTable where cDatabase matches \u00261'"},
+  {"type":"NameVariable","value":","},
+  {"type":"Text","value":" "},
+  {"type":"KeywordReserved","value":"QUOTER"},
+  {"type":"Punctuation","value":"("},
+  {"type":"NameVariable","value":"pcDatabaseFilter"},
+  {"type":"Punctuation","value":"))."},
   {"type":"Text","value":"\n  "},
   {"type":"NameVariable","value":"cQuery"},
   {"type":"Text","value":" "},
@@ -21821,724 +20473,7 @@
   {"type":"Text","value":" "},
   {"type":"Operator","value":"="},
   {"type":"Text","value":" "},
-  {"type":"LiteralStringSingle","value":"''"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"THEN\n     "},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"gcWorkFolder"},
-  {"type":"Text","value":" "},
-  {"type":"Operator","value":"="},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"getProgramDir"},
-  {"type":"Punctuation","value":"()."},
-  {"type":"Text","value":"\n    "},
-  {"type":"KeywordReserved","value":"ELSE\n   "},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"DO"},
-  {"type":"Punctuation","value":":"},
-  {"type":"Text","value":"\n      "},
-  {"type":"NameVariable","value":"gcWorkFolder"},
-  {"type":"Text","value":" "},
-  {"type":"Operator","value":"="},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"RIGHT-TRIM"},
-  {"type":"Punctuation","value":"("},
-  {"type":"NameVariable","value":"gcWorkFolder,"},
-  {"type":"LiteralStringSingle","value":"'/\\') + '"},
-  {"type":"NameVariable","value":"\\"},
-  {"type":"LiteralStringSingle","value":"'.\n      gcWorkFolder = resolveOsVars(gcWorkFolder).\n      RUN createFolder(gcWorkFolder).\n\n      FILE-INFO:FILE-NAME = gcWorkFolder.\n      IF FILE-INFO:FULL-PATHNAME = ? THEN gcWorkFolder = getProgramDir().\n    END.\n  END.\n\n  RETURN gcWorkFolder.\n\nEND FUNCTION. /* getWorkFolder */\n\n/* _UIB-CODE-BLOCK-END */\n\u0026ANALYZE-RESUME\n\n\u0026ENDIF\n\n\u0026IF DEFINED(EXCLUDE-getXmlNodeName) = 0 \u0026THEN\n\n\u0026ANALYZE-SUSPEND _UIB-CODE-BLOCK _FUNCTION getXmlNodeName Procedure\nFUNCTION getXmlNodeName RETURNS CHARACTER\n  ( pcFieldName AS CHARACTER ) :\n  /* Return a name that is safe to use in XML output\n  */\n  pcFieldName = REPLACE(pcFieldName,'"},
-  {"type":"NameVariable","value":"%"},
-  {"type":"LiteralStringSingle","value":"', '"},
-  {"type":"NameVariable","value":"_"},
-  {"type":"LiteralStringSingle","value":"').\n  pcFieldName = REPLACE(pcFieldName,'"},
-  {"type":"NameVariable","value":"#"},
-  {"type":"LiteralStringSingle","value":"', '"},
-  {"type":"NameVariable","value":"_"},
-  {"type":"LiteralStringSingle","value":"').\n\n  RETURN pcFieldName.\n\nEND FUNCTION. /* getXmlNodeName */\n\n/* _UIB-CODE-BLOCK-END */\n\u0026ANALYZE-RESUME\n\n\u0026ENDIF\n\n\u0026IF DEFINED(EXCLUDE-isDataServer) = 0 \u0026THEN\n\n\u0026ANALYZE-SUSPEND _UIB-CODE-BLOCK _FUNCTION isDataServer Procedure\nFUNCTION isDataServer RETURNS LOGICAL\n  ( INPUT pcDataSrNameOrDbName AS CHARACTER\n  ):\n  RETURN CAN-FIND(ttDataserver WHERE ttDataserver.cLDBNameDataserver = pcDataSrNameOrDbName).\n\nEND FUNCTION. /* isDataServer */\n\n/* _UIB-CODE-BLOCK-END */\n\u0026ANALYZE-RESUME\n\n\u0026ENDIF\n\n\u0026IF DEFINED(EXCLUDE-isDefaultFontsChanged) = 0 \u0026THEN\n\n\u0026ANALYZE-SUSPEND _UIB-CODE-BLOCK _FUNCTION isDefaultFontsChanged Procedure\nFUNCTION isDefaultFontsChanged RETURNS LOGICAL\n  ( /* parameter-definitions */ ) :\n  /* Returns whether the default fonts 0-7 were changed.\n  */\n  DEFINE VARIABLE cFontSize AS CHARACTER NO-UNDO EXTENT 8.\n  DEFINE VARIABLE i         AS INTEGER   NO-UNDO.\n\n  /* These are the expected fontsizes of the text '"},
-  {"type":"NameVariable","value":"DataDigger"},
-  {"type":"LiteralStringSingle","value":"' */\n  cFontSize[1] = '"},
-  {"type":"LiteralNumberInteger","value":"70"},
-  {"type":"Operator","value":"/"},
-  {"type":"LiteralNumberInteger","value":"14"},
-  {"type":"LiteralStringSingle","value":"'. /* font0 */\n  cFontSize[2] = '"},
-  {"type":"LiteralNumberInteger","value":"54"},
-  {"type":"Operator","value":"/"},
-  {"type":"LiteralNumberInteger","value":"13"},
-  {"type":"LiteralStringSingle","value":"'. /* font1 */\n  cFontSize[3] = '"},
-  {"type":"LiteralNumberInteger","value":"70"},
-  {"type":"Operator","value":"/"},
-  {"type":"LiteralNumberInteger","value":"14"},
-  {"type":"LiteralStringSingle","value":"'. /* font2 */\n  cFontSize[4] = '"},
-  {"type":"LiteralNumberInteger","value":"70"},
-  {"type":"Operator","value":"/"},
-  {"type":"LiteralNumberInteger","value":"14"},
-  {"type":"LiteralStringSingle","value":"'. /* font3 */\n  cFontSize[5] = '"},
-  {"type":"LiteralNumberInteger","value":"54"},
-  {"type":"Operator","value":"/"},
-  {"type":"LiteralNumberInteger","value":"13"},
-  {"type":"LiteralStringSingle","value":"'. /* font4 */\n  cFontSize[6] = '"},
-  {"type":"LiteralNumberInteger","value":"70"},
-  {"type":"Operator","value":"/"},
-  {"type":"LiteralNumberInteger","value":"16"},
-  {"type":"LiteralStringSingle","value":"'. /* font5 */\n  cFontSize[7] = '"},
-  {"type":"LiteralNumberInteger","value":"65"},
-  {"type":"Operator","value":"/"},
-  {"type":"LiteralNumberInteger","value":"13"},
-  {"type":"LiteralStringSingle","value":"'. /* font6 */\n  cFontSize[8] = '"},
-  {"type":"LiteralNumberInteger","value":"54"},
-  {"type":"Operator","value":"/"},
-  {"type":"LiteralNumberInteger","value":"13"},
-  {"type":"LiteralStringSingle","value":"'. /* font7 */\n\n  checkFont:\n  DO i = 0 TO 7:\n    IF cFontSize[i + 1] \u003c\u003e SUBSTITUTE('"},
-  {"type":"CommentPreproc","value":"\u00261/\u00262'"},
-  {"type":"Text","value":"\n                                    "},
-  {"type":"NameVariable","value":","},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"FONT-TABLE"},
-  {"type":"Punctuation","value":":"},
-  {"type":"KeywordReserved","value":"GET-TEXT-WIDTH-PIXELS"},
-  {"type":"Punctuation","value":"("},
-  {"type":"LiteralStringSingle","value":"'DataDigger'"},
-  {"type":"NameVariable","value":",i"},
-  {"type":"Punctuation","value":")"},
-  {"type":"Text","value":"\n                                    "},
-  {"type":"NameVariable","value":","},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"FONT-TABLE"},
-  {"type":"Punctuation","value":":"},
-  {"type":"KeywordReserved","value":"GET-TEXT-HEIGHT-PIXELS"},
-  {"type":"Punctuation","value":"("},
-  {"type":"NameVariable","value":"i"},
-  {"type":"Punctuation","value":")"},
-  {"type":"Text","value":"\n                                    "},
-  {"type":"Punctuation","value":")"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"THEN"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"RETURN"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"TRUE"},
-  {"type":"Punctuation","value":"."},
-  {"type":"Text","value":"\n  "},
-  {"type":"KeywordReserved","value":"END"},
-  {"type":"Punctuation","value":"."},
-  {"type":"Text","value":" "},
-  {"type":"CommentMultiline","value":"/* checkFont */"},
-  {"type":"Text","value":"\n\n  "},
-  {"type":"KeywordReserved","value":"RETURN"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"FALSE"},
-  {"type":"Punctuation","value":"."},
-  {"type":"Text","value":"\n\n"},
-  {"type":"KeywordReserved","value":"END"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"FUNCTION"},
-  {"type":"Punctuation","value":"."},
-  {"type":"Text","value":" "},
-  {"type":"CommentMultiline","value":"/* isDefaultFontsChanged */"},
-  {"type":"Text","value":"\n\n"},
-  {"type":"CommentMultiline","value":"/* _UIB-CODE-BLOCK-END */"},
-  {"type":"CommentPreproc","value":"\n\u0026ANALYZE-RESUME\n\n\u0026ENDIF\n\n\u0026IF DEFINED(EXCLUDE-isFileLocked) = 0 \u0026THEN\n\n\u0026ANALYZE-SUSPEND _UIB-CODE-BLOCK _FUNCTION isFileLocked Procedure"},
-  {"type":"Text","value":"\n"},
-  {"type":"KeywordReserved","value":"FUNCTION"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"isFileLocked"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"RETURNS"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordType","value":"LOGICAL\n  "},
-  {"type":"Punctuation","value":"("},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"pcFileName"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"AS"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordType","value":"CHARACTER "},
-  {"type":"Punctuation","value":")"},
-  {"type":"Text","value":" "},
-  {"type":"Punctuation","value":":"},
-  {"type":"Text","value":"\n  "},
-  {"type":"CommentMultiline","value":"/* Check whether a file is locked on the file system\n  */"},
-  {"type":"Text","value":"\n  "},
-  {"type":"KeywordDeclaration","value":"DEFINE"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"VARIABLE"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"iFileHandle"},
-  {"type":"Text","value":"   "},
-  {"type":"KeywordReserved","value":"AS"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordType","value":"INTEGER"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"NO-UNDO"},
-  {"type":"Punctuation","value":"."},
-  {"type":"Text","value":"\n  "},
-  {"type":"CommentPreproc","value":"{\u0026_proparse_prolint-nowarn(varusage)}"},
-  {"type":"Text","value":"\n  "},
-  {"type":"KeywordDeclaration","value":"DEFINE"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"VARIABLE"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"nReturn"},
-  {"type":"Text","value":"       "},
-  {"type":"KeywordReserved","value":"AS"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordType","value":"INTEGER"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"NO-UNDO"},
-  {"type":"Punctuation","value":"."},
-  {"type":"Text","value":"\n\n  "},
-  {"type":"CommentMultiline","value":"/* Try to lock the file agains writing */"},
-  {"type":"Text","value":"\n  "},
-  {"type":"KeywordReserved","value":"RUN"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"CreateFileA"},
-  {"type":"Text","value":" "},
-  {"type":"Punctuation","value":"("},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"INPUT"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"pcFileName"},
-  {"type":"Text","value":"\n                  "},
-  {"type":"NameVariable","value":","},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"INPUT "},
-  {"type":"CommentPreproc","value":"{\u0026GENERIC_WRITE}"},
-  {"type":"Text","value":"\n                  "},
-  {"type":"NameVariable","value":","},
-  {"type":"Text","value":" "},
-  {"type":"CommentPreproc","value":"{\u0026FILE_SHARE_READ}"},
-  {"type":"Text","value":"\n                  "},
-  {"type":"NameVariable","value":","},
-  {"type":"Text","value":" "},
-  {"type":"LiteralNumberInteger","value":"0"},
-  {"type":"Text","value":"\n                  "},
-  {"type":"NameVariable","value":","},
-  {"type":"Text","value":" "},
-  {"type":"CommentPreproc","value":"{\u0026OPEN_EXISTING}"},
-  {"type":"Text","value":"\n                  "},
-  {"type":"NameVariable","value":","},
-  {"type":"Text","value":" "},
-  {"type":"CommentPreproc","value":"{\u0026FILE_ATTRIBUTE_NORMAL}"},
-  {"type":"Text","value":"\n                  "},
-  {"type":"NameVariable","value":","},
-  {"type":"Text","value":" "},
-  {"type":"LiteralNumberInteger","value":"0"},
-  {"type":"Text","value":"\n                  "},
-  {"type":"NameVariable","value":","},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"OUTPUT"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"iFileHandle"},
-  {"type":"Text","value":"\n                  "},
-  {"type":"Punctuation","value":")."},
-  {"type":"Text","value":"\n\n  "},
-  {"type":"CommentMultiline","value":"/* Release file handle */"},
-  {"type":"Text","value":"\n  "},
-  {"type":"CommentPreproc","value":"{\u0026_proparse_prolint-nowarn(varusage)}"},
-  {"type":"Text","value":"\n  "},
-  {"type":"KeywordReserved","value":"RUN"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"CloseHandle"},
-  {"type":"Text","value":" "},
-  {"type":"Punctuation","value":"("},
-  {"type":"KeywordReserved","value":"INPUT"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"iFileHandle,"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"OUTPUT"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"nReturn"},
-  {"type":"Punctuation","value":")."},
-  {"type":"Text","value":"\n\n  "},
-  {"type":"KeywordReserved","value":"RETURN "},
-  {"type":"Punctuation","value":"("},
-  {"type":"NameVariable","value":"iFileHandle"},
-  {"type":"Text","value":" "},
-  {"type":"Operator","value":"="},
-  {"type":"Text","value":" "},
-  {"type":"Operator","value":"-"},
-  {"type":"LiteralNumberInteger","value":"1"},
-  {"type":"Punctuation","value":")."},
-  {"type":"Text","value":"\n\n"},
-  {"type":"KeywordReserved","value":"END"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"FUNCTION"},
-  {"type":"Punctuation","value":"."},
-  {"type":"Text","value":" "},
-  {"type":"CommentMultiline","value":"/* isFileLocked */"},
-  {"type":"Text","value":"\n\n"},
-  {"type":"CommentMultiline","value":"/* _UIB-CODE-BLOCK-END */"},
-  {"type":"CommentPreproc","value":"\n\u0026ANALYZE-RESUME\n\n\u0026ENDIF\n\n\u0026IF DEFINED(EXCLUDE-isMouseOver) = 0 \u0026THEN\n\n\u0026ANALYZE-SUSPEND _UIB-CODE-BLOCK _FUNCTION isMouseOver Procedure"},
-  {"type":"Text","value":"\n"},
-  {"type":"KeywordReserved","value":"FUNCTION"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"isMouseOver"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"RETURNS"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordType","value":"LOGICAL\n  "},
-  {"type":"Punctuation","value":"("},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"phWidget"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"AS"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordType","value":"HANDLE "},
-  {"type":"Punctuation","value":")"},
-  {"type":"Text","value":" "},
-  {"type":"Punctuation","value":":"},
-  {"type":"Text","value":"\n  "},
-  {"type":"CommentMultiline","value":"/* Return whether the mouse is currently over a certain widget\n  */"},
-  {"type":"Text","value":"\n  "},
-  {"type":"KeywordDeclaration","value":"DEFINE"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"VARIABLE"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"iMouseX"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"AS"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordType","value":"INTEGER  "},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"NO-UNDO"},
-  {"type":"Punctuation","value":"."},
-  {"type":"Text","value":"\n  "},
-  {"type":"KeywordDeclaration","value":"DEFINE"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"VARIABLE"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"iMouseY"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"AS"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordType","value":"INTEGER  "},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"NO-UNDO"},
-  {"type":"Punctuation","value":"."},
-  {"type":"Text","value":"\n\n  "},
-  {"type":"KeywordReserved","value":"IF"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"NOT"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"VALID-HANDLE"},
-  {"type":"Punctuation","value":"("},
-  {"type":"NameVariable","value":"phWidget"},
-  {"type":"Punctuation","value":")"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"THEN"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"RETURN"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"FALSE"},
-  {"type":"Punctuation","value":"."},
-  {"type":"Text","value":"\n  "},
-  {"type":"KeywordReserved","value":"RUN"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"getMouseXY"},
-  {"type":"Punctuation","value":"("},
-  {"type":"KeywordReserved","value":"INPUT"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"phWidget"},
-  {"type":"Punctuation","value":":"},
-  {"type":"KeywordReserved","value":"FRAME"},
-  {"type":"NameVariable","value":","},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"OUTPUT"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"iMouseX,"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"OUTPUT"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"iMouseY"},
-  {"type":"Punctuation","value":")."},
-  {"type":"Text","value":"\n\n  "},
-  {"type":"KeywordReserved","value":"RETURN "},
-  {"type":"Punctuation","value":"("},
-  {"type":"Text","value":"    "},
-  {"type":"NameVariable","value":"iMouseX"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"\u003e"},
-  {"type":"Operator","value":"="},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"phWidget"},
-  {"type":"Punctuation","value":":"},
-  {"type":"KeywordReserved","value":"X\n         "},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"AND"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"iMouseX"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"\u003c"},
-  {"type":"Operator","value":"="},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"phWidget"},
-  {"type":"Punctuation","value":":"},
-  {"type":"KeywordReserved","value":"X "},
-  {"type":"Operator","value":"+"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"phWidget"},
-  {"type":"Punctuation","value":":"},
-  {"type":"KeywordReserved","value":"WIDTH-PIXELS\n         "},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"AND"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"iMouseY"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"\u003e"},
-  {"type":"Operator","value":"="},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"phWidget"},
-  {"type":"Punctuation","value":":"},
-  {"type":"KeywordReserved","value":"Y\n         "},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"AND"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"iMouseY"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"\u003c"},
-  {"type":"Operator","value":"="},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"phWidget"},
-  {"type":"Punctuation","value":":"},
-  {"type":"KeywordReserved","value":"Y "},
-  {"type":"Operator","value":"+"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"phWidget"},
-  {"type":"Punctuation","value":":"},
-  {"type":"KeywordReserved","value":"HEIGHT-PIXELS "},
-  {"type":"Punctuation","value":")."},
-  {"type":"Text","value":"\n\n"},
-  {"type":"KeywordReserved","value":"END"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"FUNCTION"},
-  {"type":"Punctuation","value":"."},
-  {"type":"Text","value":" "},
-  {"type":"CommentMultiline","value":"/* isMouseOver */"},
-  {"type":"Text","value":"\n\n"},
-  {"type":"CommentMultiline","value":"/* _UIB-CODE-BLOCK-END */"},
-  {"type":"CommentPreproc","value":"\n\u0026ANALYZE-RESUME\n\n\u0026ENDIF\n\n\u0026IF DEFINED(EXCLUDE-isTableFilterUsed) = 0 \u0026THEN\n\n\u0026ANALYZE-SUSPEND _UIB-CODE-BLOCK _FUNCTION isTableFilterUsed Procedure"},
-  {"type":"Text","value":"\n"},
-  {"type":"KeywordReserved","value":"FUNCTION"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"isTableFilterUsed"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"RETURNS"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordType","value":"LOGICAL\n  "},
-  {"type":"Punctuation","value":"("},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"INPUT"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"TABLE"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"ttTableFilter"},
-  {"type":"Text","value":" "},
-  {"type":"Punctuation","value":")"},
-  {"type":"Text","value":" "},
-  {"type":"Punctuation","value":":"},
-  {"type":"Text","value":"\n  "},
-  {"type":"CommentMultiline","value":"/* Returns whether any setting is used for table filtering\n  */"},
-  {"type":"Text","value":"\n  "},
-  {"type":"KeywordReserved","value":"FIND"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"ttTableFilter"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"NO-ERROR"},
-  {"type":"Punctuation","value":"."},
-  {"type":"Text","value":"\n  "},
-  {"type":"KeywordReserved","value":"IF"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"NOT"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"AVAILABLE"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"ttTableFilter"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"THEN"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"RETURN"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"FALSE"},
-  {"type":"Punctuation","value":"."},
-  {"type":"Text","value":"\n\n  "},
-  {"type":"CommentMultiline","value":"/* Main toggles */"},
-  {"type":"Text","value":"\n  "},
-  {"type":"KeywordReserved","value":"IF  "},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"ttTableFilter"},
-  {"type":"Punctuation","value":"."},
-  {"type":"NameVariable","value":"lShowNormal"},
-  {"type":"Text","value":" "},
-  {"type":"Operator","value":"="},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"FALSE\n   "},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"OR"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"ttTableFilter"},
-  {"type":"Punctuation","value":"."},
-  {"type":"NameVariable","value":"lShowSchema"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"\u003c\u003e"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordType","value":"LOGICAL"},
-  {"type":"Punctuation","value":"("},
-  {"type":"NameVariable","value":"getRegistry"},
-  {"type":"Punctuation","value":"("},
-  {"type":"LiteralStringSingle","value":"'DataDigger'"},
-  {"type":"NameVariable","value":","},
-  {"type":"LiteralStringSingle","value":"'ShowHiddenTables'"},
-  {"type":"Punctuation","value":"))"},
-  {"type":"Text","value":"\n    "},
-  {"type":"KeywordReserved","value":"OR"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"ttTableFilter"},
-  {"type":"Punctuation","value":"."},
-  {"type":"NameVariable","value":"lShowVst"},
-  {"type":"Text","value":"    "},
-  {"type":"Operator","value":"="},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"TRUE\n   "},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"OR"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"ttTableFilter"},
-  {"type":"Punctuation","value":"."},
-  {"type":"NameVariable","value":"lShowSql"},
-  {"type":"Text","value":"    "},
-  {"type":"Operator","value":"="},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"TRUE\n   "},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"OR"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"ttTableFilter"},
-  {"type":"Punctuation","value":"."},
-  {"type":"NameVariable","value":"lShowOther"},
-  {"type":"Text","value":"  "},
-  {"type":"Operator","value":"="},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"TRUE\n   "},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"OR"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"ttTableFilter"},
-  {"type":"Punctuation","value":"."},
-  {"type":"NameVariable","value":"lShowHidden"},
-  {"type":"Text","value":" "},
-  {"type":"Operator","value":"="},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"TRUE\n   "},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"OR"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"ttTableFilter"},
-  {"type":"Punctuation","value":"."},
-  {"type":"NameVariable","value":"lShowFrozen"},
-  {"type":"Text","value":" "},
-  {"type":"Operator","value":"="},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"TRUE"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"THEN"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"RETURN"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"TRUE"},
-  {"type":"Punctuation","value":"."},
-  {"type":"Text","value":"\n\n  "},
-  {"type":"CommentMultiline","value":"/* Show these tables */"},
-  {"type":"Text","value":"\n  "},
-  {"type":"KeywordReserved","value":"IF  "},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"ttTableFilter"},
-  {"type":"Punctuation","value":"."},
-  {"type":"NameVariable","value":"cTableNameShow"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"\u003c\u003e"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"?"},
-  {"type":"Text","value":"\n    "},
-  {"type":"KeywordReserved","value":"AND"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"ttTableFilter"},
-  {"type":"Punctuation","value":"."},
-  {"type":"NameVariable","value":"cTableNameShow"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"\u003c\u003e"},
-  {"type":"Text","value":" "},
-  {"type":"LiteralStringSingle","value":"''"},
-  {"type":"Text","value":"\n    "},
-  {"type":"KeywordReserved","value":"AND"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"ttTableFilter"},
-  {"type":"Punctuation","value":"."},
-  {"type":"NameVariable","value":"cTableNameShow"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"\u003c\u003e"},
-  {"type":"Text","value":" "},
-  {"type":"LiteralStringSingle","value":"'*'"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"THEN"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"RETURN"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"TRUE"},
-  {"type":"Punctuation","value":"."},
-  {"type":"Text","value":"\n\n  "},
-  {"type":"CommentMultiline","value":"/* But hide these */"},
-  {"type":"Text","value":"\n  "},
-  {"type":"KeywordReserved","value":"IF  "},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"ttTableFilter"},
-  {"type":"Punctuation","value":"."},
-  {"type":"NameVariable","value":"cTableNameHide"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"\u003c\u003e"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"?"},
-  {"type":"Text","value":"\n    "},
-  {"type":"KeywordReserved","value":"AND"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"ttTableFilter"},
-  {"type":"Punctuation","value":"."},
-  {"type":"NameVariable","value":"cTableNameHide"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"\u003c\u003e"},
-  {"type":"Text","value":" "},
-  {"type":"LiteralStringSingle","value":"''"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"THEN"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"RETURN"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"TRUE"},
-  {"type":"Punctuation","value":"."},
-  {"type":"Text","value":"\n\n  "},
-  {"type":"CommentMultiline","value":"/* Show only tables that contain all of these fields */"},
-  {"type":"Text","value":"\n  "},
-  {"type":"KeywordReserved","value":"IF   "},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"ttTableFilter"},
-  {"type":"Punctuation","value":"."},
-  {"type":"NameVariable","value":"cTableFieldShow"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"\u003c\u003e"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"?"},
-  {"type":"Text","value":"\n    "},
-  {"type":"KeywordReserved","value":"AND"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"ttTableFilter"},
-  {"type":"Punctuation","value":"."},
-  {"type":"NameVariable","value":"cTableFieldShow"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"\u003c\u003e"},
-  {"type":"Text","value":" "},
-  {"type":"LiteralStringSingle","value":"''"},
-  {"type":"Text","value":"\n    "},
-  {"type":"KeywordReserved","value":"AND"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"ttTableFilter"},
-  {"type":"Punctuation","value":"."},
-  {"type":"NameVariable","value":"cTableFieldShow"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"\u003c\u003e"},
-  {"type":"Text","value":" "},
-  {"type":"LiteralStringSingle","value":"'*'"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"THEN"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"RETURN"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"TRUE"},
-  {"type":"Punctuation","value":"."},
-  {"type":"Text","value":"\n\n  "},
-  {"type":"CommentMultiline","value":"/* But hide tables that contain any of these */"},
-  {"type":"Text","value":"\n  "},
-  {"type":"KeywordReserved","value":"IF   "},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"ttTableFilter"},
-  {"type":"Punctuation","value":"."},
-  {"type":"NameVariable","value":"cTableFieldHide"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"\u003c\u003e"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"?"},
-  {"type":"Text","value":"\n    "},
-  {"type":"KeywordReserved","value":"AND"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"ttTableFilter"},
-  {"type":"Punctuation","value":"."},
-  {"type":"NameVariable","value":"cTableFieldHide"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"\u003c\u003e"},
-  {"type":"Text","value":" "},
-  {"type":"LiteralStringSingle","value":"''"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"THEN"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"RETURN"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"TRUE"},
-  {"type":"Punctuation","value":"."},
-  {"type":"Text","value":"\n\n  "},
-  {"type":"CommentMultiline","value":"/* else */"},
-  {"type":"Text","value":"\n  "},
-  {"type":"KeywordReserved","value":"RETURN"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"FALSE"},
-  {"type":"Punctuation","value":"."},
-  {"type":"Text","value":"\n\n"},
-  {"type":"KeywordReserved","value":"END"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"FUNCTION"},
-  {"type":"Punctuation","value":"."},
-  {"type":"Text","value":" "},
-  {"type":"CommentMultiline","value":"/* isTableFilterUsed */"},
-  {"type":"Text","value":"\n\n"},
-  {"type":"CommentMultiline","value":"/* _UIB-CODE-BLOCK-END */"},
-  {"type":"CommentPreproc","value":"\n\u0026ANALYZE-RESUME\n\n\u0026ENDIF\n\n\u0026IF DEFINED(EXCLUDE-isValidCodePage) = 0 \u0026THEN\n\n\u0026ANALYZE-SUSPEND _UIB-CODE-BLOCK _FUNCTION isValidCodePage Procedure"},
-  {"type":"Text","value":"\n"},
-  {"type":"KeywordReserved","value":"FUNCTION"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"isValidCodePage"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"RETURNS"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordType","value":"LOGICAL\n  "},
-  {"type":"Punctuation","value":"("},
-  {"type":"NameVariable","value":"pcCodepage"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"AS"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordType","value":"CHARACTER"},
-  {"type":"Punctuation","value":"):"},
-  {"type":"Text","value":"\n  "},
-  {"type":"CommentMultiline","value":"/* Returns whether pcCodePage is valid\n  */"},
-  {"type":"Text","value":"\n  "},
-  {"type":"CommentPreproc","value":"{\u0026_proparse_prolint-nowarn(varusage)}"},
-  {"type":"Text","value":"\n  "},
-  {"type":"KeywordDeclaration","value":"DEFINE"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"VARIABLE"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"cDummy"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"AS"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordType","value":"LONGCHAR"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"NO-UNDO"},
-  {"type":"Punctuation","value":"."},
-  {"type":"Text","value":"\n\n  "},
-  {"type":"KeywordReserved","value":"IF"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"pcCodePage"},
-  {"type":"Text","value":" "},
-  {"type":"Operator","value":"="},
-  {"type":"Text","value":" "},
-  {"type":"LiteralStringSingle","value":"''"},
+  {"type":"LiteralStringSingle","value":"'' THEN\n      gcWorkFolder = getProgramDir().\n    ELSE\n    DO:\n      gcWorkFolder = RIGHT-TRIM(gcWorkFolder,'/\\') + '\\'.\n      gcWorkFolder = resolveOsVars(gcWorkFolder).\n      RUN createFolder(gcWorkFolder).\n\n      FILE-INFO:FILE-NAME = gcWorkFolder.\n      IF FILE-INFO:FULL-PATHNAME = ? THEN gcWorkFolder = getProgramDir().\n    END.\n  END.\n\n  RETURN gcWorkFolder.\n\nEND FUNCTION. /* getWorkFolder */\n\n/* _UIB-CODE-BLOCK-END */\n\u0026ANALYZE-RESUME\n\n\u0026ENDIF\n\n\u0026IF DEFINED(EXCLUDE-getXmlNodeName) = 0 \u0026THEN\n\n\u0026ANALYZE-SUSPEND _UIB-CODE-BLOCK _FUNCTION getXmlNodeName Procedure\nFUNCTION getXmlNodeName RETURNS CHARACTER\n  ( pcFieldName AS CHARACTER ) :\n  /* Return a name that is safe to use in XML output\n  */\n  pcFieldName = REPLACE(pcFieldName,'%', '_').\n  pcFieldName = REPLACE(pcFieldName,'#', '_').\n\n  RETURN pcFieldName.\n\nEND FUNCTION. /* getXmlNodeName */\n\n/* _UIB-CODE-BLOCK-END */\n\u0026ANALYZE-RESUME\n\n\u0026ENDIF\n\n\u0026IF DEFINED(EXCLUDE-isDataServer) = 0 \u0026THEN\n\n\u0026ANALYZE-SUSPEND _UIB-CODE-BLOCK _FUNCTION isDataServer Procedure\nFUNCTION isDataServer RETURNS LOGICAL\n  ( INPUT pcDataSrNameOrDbName AS CHARACTER\n  ):\n  RETURN CAN-FIND(ttDataserver WHERE ttDataserver.cLDBNameDataserver = pcDataSrNameOrDbName).\n\nEND FUNCTION. /* isDataServer */\n\n/* _UIB-CODE-BLOCK-END */\n\u0026ANALYZE-RESUME\n\n\u0026ENDIF\n\n\u0026IF DEFINED(EXCLUDE-isDefaultFontsChanged) = 0 \u0026THEN\n\n\u0026ANALYZE-SUSPEND _UIB-CODE-BLOCK _FUNCTION isDefaultFontsChanged Procedure\nFUNCTION isDefaultFontsChanged RETURNS LOGICAL\n  ( /* parameter-definitions */ ) :\n  /* Returns whether the default fonts 0-7 were changed.\n  */\n  DEFINE VARIABLE cFontSize AS CHARACTER NO-UNDO EXTENT 8.\n  DEFINE VARIABLE i         AS INTEGER   NO-UNDO.\n\n  /* These are the expected fontsizes of the text 'DataDigger' */\n  cFontSize[1] = '70/14'. /* font0 */\n  cFontSize[2] = '54/13'. /* font1 */\n  cFontSize[3] = '70/14'. /* font2 */\n  cFontSize[4] = '70/14'. /* font3 */\n  cFontSize[5] = '54/13'. /* font4 */\n  cFontSize[6] = '70/16'. /* font5 */\n  cFontSize[7] = '65/13'. /* font6 */\n  cFontSize[8] = '54/13'. /* font7 */\n\n  checkFont:\n  DO i = 0 TO 7:\n    IF cFontSize[i + 1] \u003c\u003e SUBSTITUTE('\u00261/\u00262'\n                                    , FONT-TABLE:GET-TEXT-WIDTH-PIXELS('DataDigger',i)\n                                    , FONT-TABLE:GET-TEXT-HEIGHT-PIXELS(i)\n                                    ) THEN RETURN TRUE.\n  END. /* checkFont */\n\n  RETURN FALSE.\n\nEND FUNCTION. /* isDefaultFontsChanged */\n\n/* _UIB-CODE-BLOCK-END */\n\u0026ANALYZE-RESUME\n\n\u0026ENDIF\n\n\u0026IF DEFINED(EXCLUDE-isFileLocked) = 0 \u0026THEN\n\n\u0026ANALYZE-SUSPEND _UIB-CODE-BLOCK _FUNCTION isFileLocked Procedure\nFUNCTION isFileLocked RETURNS LOGICAL\n  ( pcFileName AS CHARACTER ) :\n  /* Check whether a file is locked on the file system\n  */\n  DEFINE VARIABLE iFileHandle   AS INTEGER NO-UNDO.\n  {\u0026_proparse_prolint-nowarn(varusage)}\n  DEFINE VARIABLE nReturn       AS INTEGER NO-UNDO.\n\n  /* Try to lock the file agains writing */\n  RUN CreateFileA ( INPUT pcFileName\n                  , INPUT {\u0026GENERIC_WRITE}\n                  , {\u0026FILE_SHARE_READ}\n                  , 0\n                  , {\u0026OPEN_EXISTING}\n                  , {\u0026FILE_ATTRIBUTE_NORMAL}\n                  , 0\n                  , OUTPUT iFileHandle\n                  ).\n\n  /* Release file handle */\n  {\u0026_proparse_prolint-nowarn(varusage)}\n  RUN CloseHandle (INPUT iFileHandle, OUTPUT nReturn).\n\n  RETURN (iFileHandle = -1).\n\nEND FUNCTION. /* isFileLocked */\n\n/* _UIB-CODE-BLOCK-END */\n\u0026ANALYZE-RESUME\n\n\u0026ENDIF\n\n\u0026IF DEFINED(EXCLUDE-isMouseOver) = 0 \u0026THEN\n\n\u0026ANALYZE-SUSPEND _UIB-CODE-BLOCK _FUNCTION isMouseOver Procedure\nFUNCTION isMouseOver RETURNS LOGICAL\n  ( phWidget AS HANDLE ) :\n  /* Return whether the mouse is currently over a certain widget\n  */\n  DEFINE VARIABLE iMouseX AS INTEGER   NO-UNDO.\n  DEFINE VARIABLE iMouseY AS INTEGER   NO-UNDO.\n\n  IF NOT VALID-HANDLE(phWidget) THEN RETURN FALSE.\n  RUN getMouseXY(INPUT phWidget:FRAME, OUTPUT iMouseX, OUTPUT iMouseY).\n\n  RETURN (    iMouseX \u003e= phWidget:X\n          AND iMouseX \u003c= phWidget:X + phWidget:WIDTH-PIXELS\n          AND iMouseY \u003e= phWidget:Y\n          AND iMouseY \u003c= phWidget:Y + phWidget:HEIGHT-PIXELS ).\n\nEND FUNCTION. /* isMouseOver */\n\n/* _UIB-CODE-BLOCK-END */\n\u0026ANALYZE-RESUME\n\n\u0026ENDIF\n\n\u0026IF DEFINED(EXCLUDE-isTableFilterUsed) = 0 \u0026THEN\n\n\u0026ANALYZE-SUSPEND _UIB-CODE-BLOCK _FUNCTION isTableFilterUsed Procedure\nFUNCTION isTableFilterUsed RETURNS LOGICAL\n  ( INPUT TABLE ttTableFilter ) :\n  /* Returns whether any setting is used for table filtering\n  */\n  FIND ttTableFilter NO-ERROR.\n  IF NOT AVAILABLE ttTableFilter THEN RETURN FALSE.\n\n  /* Main toggles */\n  IF   ttTableFilter.lShowNormal = FALSE\n    OR ttTableFilter.lShowSchema \u003c\u003e LOGICAL(getRegistry('DataDigger','ShowHiddenTables'))\n    OR ttTableFilter.lShowVst    = TRUE\n    OR ttTableFilter.lShowSql    = TRUE\n    OR ttTableFilter.lShowOther  = TRUE\n    OR ttTableFilter.lShowHidden = TRUE\n    OR ttTableFilter.lShowFrozen = TRUE THEN RETURN TRUE.\n\n  /* Show these tables */\n  IF   ttTableFilter.cTableNameShow \u003c\u003e ?\n    AND ttTableFilter.cTableNameShow \u003c\u003e ''\n    AND ttTableFilter.cTableNameShow \u003c\u003e '*' THEN RETURN TRUE.\n\n  /* But hide these */\n  IF   ttTableFilter.cTableNameHide \u003c\u003e ?\n    AND ttTableFilter.cTableNameHide \u003c\u003e '' THEN RETURN TRUE.\n\n  /* Show only tables that contain all of these fields */\n  IF    ttTableFilter.cTableFieldShow \u003c\u003e ?\n    AND ttTableFilter.cTableFieldShow \u003c\u003e ''\n    AND ttTableFilter.cTableFieldShow \u003c\u003e '*' THEN RETURN TRUE.\n\n  /* But hide tables that contain any of these */\n  IF    ttTableFilter.cTableFieldHide \u003c\u003e ?\n    AND ttTableFilter.cTableFieldHide \u003c\u003e '' THEN RETURN TRUE.\n\n  /* else */\n  RETURN FALSE.\n\nEND FUNCTION. /* isTableFilterUsed */\n\n/* _UIB-CODE-BLOCK-END */\n\u0026ANALYZE-RESUME\n\n\u0026ENDIF\n\n\u0026IF DEFINED(EXCLUDE-isValidCodePage) = 0 \u0026THEN\n\n\u0026ANALYZE-SUSPEND _UIB-CODE-BLOCK _FUNCTION isValidCodePage Procedure\nFUNCTION isValidCodePage RETURNS LOGICAL\n  (pcCodepage AS CHARACTER):\n  /* Returns whether pcCodePage is valid\n  */\n  {\u0026_proparse_prolint-nowarn(varusage)}\n  DEFINE VARIABLE cDummy AS LONGCHAR NO-UNDO.\n\n  IF pcCodePage = ''"},
   {"type":"Text","value":" "},
   {"type":"KeywordReserved","value":"THEN"},
   {"type":"Text","value":" "},
@@ -22821,668 +20756,7 @@
   {"type":"KeywordReserved","value":"NUM-ENTRIES"},
   {"type":"Punctuation","value":"("},
   {"type":"NameVariable","value":"pcString,"},
-  {"type":"LiteralStringSingle","value":"'%'"},
-  {"type":"Punctuation","value":"):"},
-  {"type":"Text","value":"\n    "},
-  {"type":"KeywordReserved","value":"IF"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"i"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"MODULO"},
-  {"type":"Text","value":" "},
-  {"type":"LiteralNumberInteger","value":"2"},
-  {"type":"Text","value":" "},
-  {"type":"Operator","value":"="},
-  {"type":"Text","value":" "},
-  {"type":"LiteralNumberInteger","value":"0"},
-  {"type":"Text","value":"\n      "},
-  {"type":"KeywordReserved","value":"AND"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"OS-GETENV"},
-  {"type":"Punctuation","value":"("},
-  {"type":"KeywordReserved","value":"ENTRY"},
-  {"type":"Punctuation","value":"("},
-  {"type":"NameVariable","value":"i,pcString,"},
-  {"type":"LiteralStringSingle","value":"'%'"},
-  {"type":"Punctuation","value":"))"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"\u003c\u003e"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"?"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"THEN\n     "},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"ENTRY"},
-  {"type":"Punctuation","value":"("},
-  {"type":"NameVariable","value":"i,pcString,"},
-  {"type":"LiteralStringSingle","value":"'%'"},
-  {"type":"Punctuation","value":")"},
-  {"type":"Text","value":" "},
-  {"type":"Operator","value":"="},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"OS-GETENV"},
-  {"type":"Punctuation","value":"("},
-  {"type":"KeywordReserved","value":"ENTRY"},
-  {"type":"Punctuation","value":"("},
-  {"type":"NameVariable","value":"i,pcString,"},
-  {"type":"LiteralStringSingle","value":"'%'"},
-  {"type":"Punctuation","value":"))."},
-  {"type":"Text","value":"\n  "},
-  {"type":"KeywordReserved","value":"END"},
-  {"type":"Punctuation","value":"."},
-  {"type":"Text","value":"\n\n  "},
-  {"type":"NameVariable","value":"pcString"},
-  {"type":"Text","value":" "},
-  {"type":"Operator","value":"="},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"REPLACE"},
-  {"type":"Punctuation","value":"("},
-  {"type":"NameVariable","value":"pcString,"},
-  {"type":"LiteralStringSingle","value":"'%'"},
-  {"type":"NameVariable","value":","},
-  {"type":"LiteralStringSingle","value":"''"},
-  {"type":"Punctuation","value":")."},
-  {"type":"Text","value":"\n  "},
-  {"type":"KeywordReserved","value":"RETURN"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"pcString"},
-  {"type":"Punctuation","value":"."},
-  {"type":"Text","value":"\n"},
-  {"type":"KeywordReserved","value":"END"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"FUNCTION"},
-  {"type":"Punctuation","value":"."},
-  {"type":"Text","value":" "},
-  {"type":"CommentMultiline","value":"/* resolveOsVars */"},
-  {"type":"Text","value":"\n\n"},
-  {"type":"CommentMultiline","value":"/* _UIB-CODE-BLOCK-END */"},
-  {"type":"CommentPreproc","value":"\n\u0026ANALYZE-RESUME\n\n\u0026ENDIF\n\n\u0026IF DEFINED(EXCLUDE-resolveSequence) = 0 \u0026THEN\n\n\u0026ANALYZE-SUSPEND _UIB-CODE-BLOCK _FUNCTION resolveSequence Procedure"},
-  {"type":"Text","value":"\n"},
-  {"type":"KeywordReserved","value":"FUNCTION"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"resolveSequence"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"RETURNS"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordType","value":"CHARACTER\n  "},
-  {"type":"Punctuation","value":"("},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"pcString"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"AS"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordType","value":"CHARACTER "},
-  {"type":"Punctuation","value":")"},
-  {"type":"Text","value":" "},
-  {"type":"Punctuation","value":":"},
-  {"type":"Text","value":"\n  "},
-  {"type":"CommentMultiline","value":"/* Return a string where sequence nr for file is resolved\n  */"},
-  {"type":"Text","value":"\n  "},
-  {"type":"KeywordDeclaration","value":"DEFINE"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"VARIABLE"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"iFileNr"},
-  {"type":"Text","value":"    "},
-  {"type":"KeywordReserved","value":"AS"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordType","value":"INTEGER  "},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"NO-UNDO"},
-  {"type":"Punctuation","value":"."},
-  {"type":"Text","value":"\n  "},
-  {"type":"KeywordDeclaration","value":"DEFINE"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"VARIABLE"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"cSeqMask"},
-  {"type":"Text","value":"   "},
-  {"type":"KeywordReserved","value":"AS"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordType","value":"CHARACTER"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"NO-UNDO "},
-  {"type":"Punctuation","value":"."},
-  {"type":"Text","value":"\n  "},
-  {"type":"KeywordDeclaration","value":"DEFINE"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"VARIABLE"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"cSeqFormat"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"AS"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordType","value":"CHARACTER"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"NO-UNDO "},
-  {"type":"Punctuation","value":"."},
-  {"type":"Text","value":"\n  "},
-  {"type":"KeywordDeclaration","value":"DEFINE"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"VARIABLE"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"cFileName"},
-  {"type":"Text","value":"  "},
-  {"type":"KeywordReserved","value":"AS"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordType","value":"CHARACTER"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"NO-UNDO"},
-  {"type":"Punctuation","value":"."},
-  {"type":"Text","value":"\n\n  "},
-  {"type":"NameVariable","value":"cFileName"},
-  {"type":"Text","value":" "},
-  {"type":"Operator","value":"="},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"pcString"},
-  {"type":"Punctuation","value":"."},
-  {"type":"Text","value":"\n\n  "},
-  {"type":"CommentMultiline","value":"/* User can specify a sequence for the file. The length of\n   * the tag sets the format: \u003c###\u003e translates to a 3-digit nr\n   * Special case is \u003c#\u003e which translates to no leading zeros\n   */"},
-  {"type":"Text","value":"\n  "},
-  {"type":"KeywordReserved","value":"IF   "},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"INDEX"},
-  {"type":"Punctuation","value":"("},
-  {"type":"NameVariable","value":"cFileName,"},
-  {"type":"LiteralStringSingle","value":"'\u003c#'"},
-  {"type":"Punctuation","value":")"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"\u003e"},
-  {"type":"Text","value":" "},
-  {"type":"LiteralNumberInteger","value":"0"},
-  {"type":"Text","value":"\n    "},
-  {"type":"KeywordReserved","value":"AND"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"index"},
-  {"type":"Punctuation","value":"("},
-  {"type":"NameVariable","value":"cFileName,"},
-  {"type":"LiteralStringSingle","value":"'#\u003e'"},
-  {"type":"Punctuation","value":")"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"\u003e"},
-  {"type":"Text","value":" "},
-  {"type":"LiteralNumberInteger","value":"0"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"THEN\n "},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"DO"},
-  {"type":"Punctuation","value":":"},
-  {"type":"Text","value":"\n    "},
-  {"type":"NameVariable","value":"cSeqMask"},
-  {"type":"Text","value":" "},
-  {"type":"Operator","value":"="},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"SUBSTRING"},
-  {"type":"Punctuation","value":"("},
-  {"type":"NameVariable","value":"cFileName,"},
-  {"type":"KeywordReserved","value":"INDEX"},
-  {"type":"Punctuation","value":"("},
-  {"type":"NameVariable","value":"cFileName,"},
-  {"type":"LiteralStringSingle","value":"'\u003c#'"},
-  {"type":"Punctuation","value":"))."},
-  {"type":"Text","value":" "},
-  {"type":"CommentMultiline","value":"/* \u003c#####\u003etralalala */"},
-  {"type":"Text","value":"\n    "},
-  {"type":"NameVariable","value":"cSeqMask"},
-  {"type":"Text","value":" "},
-  {"type":"Operator","value":"="},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"SUBSTRING"},
-  {"type":"Punctuation","value":"("},
-  {"type":"NameVariable","value":"cSeqMask,"},
-  {"type":"LiteralNumberInteger","value":"1"},
-  {"type":"NameVariable","value":","},
-  {"type":"KeywordReserved","value":"INDEX"},
-  {"type":"Punctuation","value":"("},
-  {"type":"NameVariable","value":"cSeqMask,"},
-  {"type":"LiteralStringSingle","value":"'\u003e'"},
-  {"type":"Punctuation","value":"))."},
-  {"type":"Text","value":" "},
-  {"type":"CommentMultiline","value":"/* \u003c#####\u003e */"},
-  {"type":"Text","value":"\n    "},
-  {"type":"NameVariable","value":"cSeqFormat"},
-  {"type":"Text","value":" "},
-  {"type":"Operator","value":"="},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"TRIM"},
-  {"type":"Punctuation","value":"("},
-  {"type":"NameVariable","value":"cSeqMask,"},
-  {"type":"LiteralStringSingle","value":"'\u003c\u003e'"},
-  {"type":"Punctuation","value":")."},
-  {"type":"Text","value":" "},
-  {"type":"CommentMultiline","value":"/* ##### */"},
-  {"type":"Text","value":"\n    "},
-  {"type":"NameVariable","value":"cSeqFormat"},
-  {"type":"Text","value":" "},
-  {"type":"Operator","value":"="},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"REPLACE"},
-  {"type":"Punctuation","value":"("},
-  {"type":"NameVariable","value":"cSeqFormat,"},
-  {"type":"LiteralStringSingle","value":"'#'"},
-  {"type":"NameVariable","value":","},
-  {"type":"LiteralStringSingle","value":"'9'"},
-  {"type":"Punctuation","value":")."},
-  {"type":"Text","value":"\n    "},
-  {"type":"KeywordReserved","value":"IF"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"cSeqFormat"},
-  {"type":"Text","value":" "},
-  {"type":"Operator","value":"="},
-  {"type":"Text","value":" "},
-  {"type":"LiteralStringSingle","value":"'9'"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"THEN"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"cSeqFormat"},
-  {"type":"Text","value":" "},
-  {"type":"Operator","value":"="},
-  {"type":"Text","value":" "},
-  {"type":"LiteralStringSingle","value":"'\u003e\u003e\u003e\u003e\u003e\u003e\u003e\u003e\u003e9'"},
-  {"type":"Punctuation","value":"."},
-  {"type":"Text","value":"\n\n    "},
-  {"type":"NameVariable","value":"setFileNr"},
-  {"type":"Punctuation","value":":"},
-  {"type":"Text","value":"\n    "},
-  {"type":"KeywordReserved","value":"REPEAT"},
-  {"type":"Punctuation","value":":"},
-  {"type":"Text","value":"\n      "},
-  {"type":"NameVariable","value":"iFileNr"},
-  {"type":"Text","value":" "},
-  {"type":"Operator","value":"="},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"iFileNr"},
-  {"type":"Text","value":" "},
-  {"type":"Operator","value":"+"},
-  {"type":"Text","value":" "},
-  {"type":"LiteralNumberInteger","value":"1"},
-  {"type":"Punctuation","value":"."},
-  {"type":"Text","value":"\n      "},
-  {"type":"KeywordReserved","value":"IF"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"SEARCH"},
-  {"type":"Punctuation","value":"("},
-  {"type":"KeywordReserved","value":"REPLACE"},
-  {"type":"Punctuation","value":"("},
-  {"type":"NameVariable","value":"cFileName,cSeqMask,"},
-  {"type":"KeywordReserved","value":"TRIM"},
-  {"type":"Punctuation","value":"("},
-  {"type":"KeywordReserved","value":"STRING"},
-  {"type":"Punctuation","value":"("},
-  {"type":"NameVariable","value":"iFileNr,cSeqFormat"},
-  {"type":"Punctuation","value":"))))"},
-  {"type":"Text","value":" "},
-  {"type":"Operator","value":"="},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"?"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"THEN\n     "},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"DO"},
-  {"type":"Punctuation","value":":"},
-  {"type":"Text","value":"\n        "},
-  {"type":"NameVariable","value":"cFileName"},
-  {"type":"Text","value":" "},
-  {"type":"Operator","value":"="},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"REPLACE"},
-  {"type":"Punctuation","value":"("},
-  {"type":"NameVariable","value":"cFileName,cSeqMask,"},
-  {"type":"KeywordReserved","value":"TRIM"},
-  {"type":"Punctuation","value":"("},
-  {"type":"KeywordReserved","value":"STRING"},
-  {"type":"Punctuation","value":"("},
-  {"type":"NameVariable","value":"iFileNr,cSeqFormat"},
-  {"type":"Punctuation","value":")))."},
-  {"type":"Text","value":"\n        "},
-  {"type":"KeywordReserved","value":"LEAVE"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"setFileNr"},
-  {"type":"Punctuation","value":"."},
-  {"type":"Text","value":"\n      "},
-  {"type":"KeywordReserved","value":"END"},
-  {"type":"Punctuation","value":"."},
-  {"type":"Text","value":"\n    "},
-  {"type":"KeywordReserved","value":"END"},
-  {"type":"Punctuation","value":"."},
-  {"type":"Text","value":"\n  "},
-  {"type":"KeywordReserved","value":"END"},
-  {"type":"Punctuation","value":"."},
-  {"type":"Text","value":"\n\n  "},
-  {"type":"KeywordReserved","value":"RETURN"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"cFileName"},
-  {"type":"Punctuation","value":"."},
-  {"type":"Text","value":"\n\n"},
-  {"type":"KeywordReserved","value":"END"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"FUNCTION"},
-  {"type":"Punctuation","value":"."},
-  {"type":"Text","value":" "},
-  {"type":"CommentMultiline","value":"/* resolveSequence */"},
-  {"type":"Text","value":"\n\n"},
-  {"type":"CommentMultiline","value":"/* _UIB-CODE-BLOCK-END */"},
-  {"type":"CommentPreproc","value":"\n\u0026ANALYZE-RESUME\n\n\u0026ENDIF\n\n\u0026IF DEFINED(EXCLUDE-setColor) = 0 \u0026THEN\n\n\u0026ANALYZE-SUSPEND _UIB-CODE-BLOCK _FUNCTION setColor Procedure"},
-  {"type":"Text","value":"\n"},
-  {"type":"KeywordReserved","value":"FUNCTION"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"setColor"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"RETURNS"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordType","value":"INTEGER\n  "},
-  {"type":"Punctuation","value":"("},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"pcName"},
-  {"type":"Text","value":"  "},
-  {"type":"KeywordReserved","value":"AS"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordType","value":"CHARACTER\n  "},
-  {"type":"NameVariable","value":","},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"piColor"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"AS"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordType","value":"INTEGER"},
-  {"type":"Punctuation","value":")"},
-  {"type":"Text","value":" "},
-  {"type":"Punctuation","value":":"},
-  {"type":"Text","value":"\n  "},
-  {"type":"CommentMultiline","value":"/* Set color nr in the color tt\n   */"},
-  {"type":"Text","value":"\n  "},
-  {"type":"KeywordDeclaration","value":"DEFINE"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"BUFFER"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"bColor"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"FOR"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"ttColor"},
-  {"type":"Punctuation","value":"."},
-  {"type":"Text","value":"\n\n  "},
-  {"type":"KeywordReserved","value":"FIND"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"bColor"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"WHERE"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"bColor"},
-  {"type":"Punctuation","value":"."},
-  {"type":"NameVariable","value":"cName"},
-  {"type":"Text","value":" "},
-  {"type":"Operator","value":"="},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"pcName"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"NO-ERROR"},
-  {"type":"Punctuation","value":"."},
-  {"type":"Text","value":"\n  "},
-  {"type":"KeywordReserved","value":"IF"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"NOT"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"AVAILABLE"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"bColor"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"THEN\n "},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"DO"},
-  {"type":"Punctuation","value":":"},
-  {"type":"Text","value":"\n    "},
-  {"type":"KeywordReserved","value":"CREATE"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"bColor"},
-  {"type":"Punctuation","value":"."},
-  {"type":"Text","value":"\n    "},
-  {"type":"KeywordReserved","value":"ASSIGN"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"bColor"},
-  {"type":"Punctuation","value":"."},
-  {"type":"NameVariable","value":"cName"},
-  {"type":"Text","value":" "},
-  {"type":"Operator","value":"="},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"pcName"},
-  {"type":"Punctuation","value":"."},
-  {"type":"Text","value":"\n  "},
-  {"type":"KeywordReserved","value":"END"},
-  {"type":"Punctuation","value":"."},
-  {"type":"Text","value":"\n\n  "},
-  {"type":"CommentMultiline","value":"/* Set to default value from settings */"},
-  {"type":"Text","value":"\n  "},
-  {"type":"KeywordReserved","value":"IF"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"piColor"},
-  {"type":"Text","value":" "},
-  {"type":"Operator","value":"="},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"?"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"THEN\n "},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"DO"},
-  {"type":"Punctuation","value":":"},
-  {"type":"Text","value":"\n    "},
-  {"type":"NameVariable","value":"piColor"},
-  {"type":"Text","value":" "},
-  {"type":"Operator","value":"="},
-  {"type":"Text","value":" "},
-  {"type":"KeywordType","value":"INTEGER"},
-  {"type":"Punctuation","value":"("},
-  {"type":"NameVariable","value":"getRegistry"},
-  {"type":"Punctuation","value":"("},
-  {"type":"LiteralStringSingle","value":"'DataDigger:Colors'"},
-  {"type":"NameVariable","value":","},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"pcName"},
-  {"type":"Punctuation","value":"))"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"NO-ERROR"},
-  {"type":"Punctuation","value":"."},
-  {"type":"Text","value":"\n    "},
-  {"type":"KeywordReserved","value":"IF"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"ERROR-STATUS"},
-  {"type":"Punctuation","value":":"},
-  {"type":"KeywordReserved","value":"ERROR"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"THEN"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"piColor"},
-  {"type":"Text","value":" "},
-  {"type":"Operator","value":"="},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"?"},
-  {"type":"Punctuation","value":"."},
-  {"type":"Text","value":"\n  "},
-  {"type":"KeywordReserved","value":"END"},
-  {"type":"Punctuation","value":"."},
-  {"type":"Text","value":"\n\n  "},
-  {"type":"NameVariable","value":"bColor"},
-  {"type":"Punctuation","value":"."},
-  {"type":"NameVariable","value":"iColor"},
-  {"type":"Text","value":" "},
-  {"type":"Operator","value":"="},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"piColor"},
-  {"type":"Punctuation","value":"."},
-  {"type":"Text","value":"\n  "},
-  {"type":"KeywordReserved","value":"RETURN"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"bColor"},
-  {"type":"Punctuation","value":"."},
-  {"type":"NameVariable","value":"iColor"},
-  {"type":"Punctuation","value":"."},
-  {"type":"Text","value":"\n\n"},
-  {"type":"KeywordReserved","value":"END"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"FUNCTION"},
-  {"type":"Punctuation","value":"."},
-  {"type":"Text","value":" "},
-  {"type":"CommentMultiline","value":"/* setColor */"},
-  {"type":"Text","value":"\n\n"},
-  {"type":"CommentMultiline","value":"/* _UIB-CODE-BLOCK-END */"},
-  {"type":"CommentPreproc","value":"\n\u0026ANALYZE-RESUME\n\n\u0026ENDIF\n\n\u0026IF DEFINED(EXCLUDE-setColumnWidthList) = 0 \u0026THEN\n\n\u0026ANALYZE-SUSPEND _UIB-CODE-BLOCK _FUNCTION setColumnWidthList Procedure"},
-  {"type":"Text","value":"\n"},
-  {"type":"KeywordReserved","value":"FUNCTION"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"setColumnWidthList"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"RETURNS"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordType","value":"LOGICAL\n  "},
-  {"type":"Punctuation","value":"("},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"INPUT"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"phBrowse"},
-  {"type":"Text","value":"    "},
-  {"type":"KeywordReserved","value":"AS"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordType","value":"HANDLE\n  "},
-  {"type":"NameVariable","value":","},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"INPUT"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"pcWidthList"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"AS"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordType","value":"CHARACTER"},
-  {"type":"Punctuation","value":"):"},
-  {"type":"Text","value":"\n  "},
-  {"type":"CommentMultiline","value":"/* Set all specified columns in pcWidthList to a specified width\n  */"},
-  {"type":"Text","value":"\n  "},
-  {"type":"KeywordDeclaration","value":"DEFINE"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"VARIABLE"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"cColumnName"},
-  {"type":"Text","value":"  "},
-  {"type":"KeywordReserved","value":"AS"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordType","value":"CHARACTER"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"NO-UNDO"},
-  {"type":"Punctuation","value":"."},
-  {"type":"Text","value":"\n  "},
-  {"type":"KeywordDeclaration","value":"DEFINE"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"VARIABLE"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"cListItem"},
-  {"type":"Text","value":"    "},
-  {"type":"KeywordReserved","value":"AS"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordType","value":"CHARACTER"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"NO-UNDO"},
-  {"type":"Punctuation","value":"."},
-  {"type":"Text","value":"\n  "},
-  {"type":"KeywordDeclaration","value":"DEFINE"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"VARIABLE"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"hColumn"},
-  {"type":"Text","value":"      "},
-  {"type":"KeywordReserved","value":"AS"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordType","value":"HANDLE   "},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"NO-UNDO"},
-  {"type":"Punctuation","value":"."},
-  {"type":"Text","value":"\n  "},
-  {"type":"KeywordDeclaration","value":"DEFINE"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"VARIABLE"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"iColumnWidth"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"AS"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordType","value":"INTEGER  "},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"NO-UNDO"},
-  {"type":"Punctuation","value":"."},
-  {"type":"Text","value":"\n  "},
-  {"type":"KeywordDeclaration","value":"DEFINE"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"VARIABLE"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"i"},
-  {"type":"Text","value":"            "},
-  {"type":"KeywordReserved","value":"AS"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordType","value":"INTEGER  "},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"NO-UNDO"},
-  {"type":"Punctuation","value":"."},
-  {"type":"Text","value":"\n  "},
-  {"type":"KeywordDeclaration","value":"DEFINE"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"VARIABLE"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"j"},
-  {"type":"Text","value":"            "},
-  {"type":"KeywordReserved","value":"AS"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordType","value":"INTEGER  "},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"NO-UNDO"},
-  {"type":"Punctuation","value":"."},
-  {"type":"Text","value":"\n\n  "},
-  {"type":"KeywordReserved","value":"DO"},
-  {"type":"Text","value":" "},
-  {"type":"NameVariable","value":"i"},
-  {"type":"Text","value":" "},
-  {"type":"Operator","value":"="},
-  {"type":"Text","value":" "},
-  {"type":"LiteralNumberInteger","value":"1"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"TO"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"NUM-ENTRIES"},
-  {"type":"Punctuation","value":"("},
-  {"type":"NameVariable","value":"pcWidthList"},
-  {"type":"Punctuation","value":"):"},
-  {"type":"Text","value":"\n    "},
-  {"type":"NameVariable","value":"cListItem"},
-  {"type":"Text","value":"    "},
-  {"type":"Operator","value":"="},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"ENTRY"},
-  {"type":"Punctuation","value":"("},
-  {"type":"NameVariable","value":"i,pcWidthList"},
-  {"type":"Punctuation","value":")."},
-  {"type":"Text","value":"\n    "},
-  {"type":"NameVariable","value":"cColumnName"},
-  {"type":"Text","value":"  "},
-  {"type":"Operator","value":"="},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"ENTRY"},
-  {"type":"Punctuation","value":"("},
-  {"type":"LiteralNumberInteger","value":"1"},
-  {"type":"NameVariable","value":",cListItem,"},
-  {"type":"LiteralStringSingle","value":"':'"},
-  {"type":"Punctuation","value":")"},
-  {"type":"Text","value":" "},
-  {"type":"KeywordReserved","value":"NO-ERROR"},
-  {"type":"Punctuation","value":"."},
-  {"type":"Text","value":"\n    "},
-  {"type":"NameVariable","value":"iColumnWidth"},
-  {"type":"Text","value":" "},
-  {"type":"Operator","value":"="},
-  {"type":"Text","value":" "},
-  {"type":"KeywordType","value":"INTEGER"},
-  {"type":"Punctuation","value":"("},
-  {"type":"KeywordReserved","value":"ENTRY"},
-  {"type":"Punctuation","value":"("},
-  {"type":"LiteralNumberInteger","value":"2"},
-  {"type":"NameVariable","value":",cListItem,"},
-  {"type":"LiteralStringSingle","value":"':'"},
+  {"type":"LiteralStringSingle","value":"'%'):\n    IF i MODULO 2 = 0\n      AND OS-GETENV(ENTRY(i,pcString,'%')) \u003c\u003e ? THEN\n      ENTRY(i,pcString,'%') = OS-GETENV(ENTRY(i,pcString,'%')).\n  END.\n\n  pcString = REPLACE(pcString,'%','').\n  RETURN pcString.\nEND FUNCTION. /* resolveOsVars */\n\n/* _UIB-CODE-BLOCK-END */\n\u0026ANALYZE-RESUME\n\n\u0026ENDIF\n\n\u0026IF DEFINED(EXCLUDE-resolveSequence) = 0 \u0026THEN\n\n\u0026ANALYZE-SUSPEND _UIB-CODE-BLOCK _FUNCTION resolveSequence Procedure\nFUNCTION resolveSequence RETURNS CHARACTER\n  ( pcString AS CHARACTER ) :\n  /* Return a string where sequence nr for file is resolved\n  */\n  DEFINE VARIABLE iFileNr    AS INTEGER   NO-UNDO.\n  DEFINE VARIABLE cSeqMask   AS CHARACTER NO-UNDO .\n  DEFINE VARIABLE cSeqFormat AS CHARACTER NO-UNDO .\n  DEFINE VARIABLE cFileName  AS CHARACTER NO-UNDO.\n\n  cFileName = pcString.\n\n  /* User can specify a sequence for the file. The length of\n   * the tag sets the format: \u003c###\u003e translates to a 3-digit nr\n   * Special case is \u003c#\u003e which translates to no leading zeros\n   */\n  IF    INDEX(cFileName,'\u003c#') \u003e 0\n    AND index(cFileName,'#\u003e') \u003e 0 THEN\n  DO:\n    cSeqMask = SUBSTRING(cFileName,INDEX(cFileName,'\u003c#')). /* \u003c#####\u003etralalala */\n    cSeqMask = SUBSTRING(cSeqMask,1,INDEX(cSeqMask,'\u003e')). /* \u003c#####\u003e */\n    cSeqFormat = TRIM(cSeqMask,'\u003c\u003e'). /* ##### */\n    cSeqFormat = REPLACE(cSeqFormat,'#','9').\n    IF cSeqFormat = '9' THEN cSeqFormat = '\u003e\u003e\u003e\u003e\u003e\u003e\u003e\u003e\u003e9'.\n\n    setFileNr:\n    REPEAT:\n      iFileNr = iFileNr + 1.\n      IF SEARCH(REPLACE(cFileName,cSeqMask,TRIM(STRING(iFileNr,cSeqFormat)))) = ? THEN\n      DO:\n        cFileName = REPLACE(cFileName,cSeqMask,TRIM(STRING(iFileNr,cSeqFormat))).\n        LEAVE setFileNr.\n      END.\n    END.\n  END.\n\n  RETURN cFileName.\n\nEND FUNCTION. /* resolveSequence */\n\n/* _UIB-CODE-BLOCK-END */\n\u0026ANALYZE-RESUME\n\n\u0026ENDIF\n\n\u0026IF DEFINED(EXCLUDE-setColor) = 0 \u0026THEN\n\n\u0026ANALYZE-SUSPEND _UIB-CODE-BLOCK _FUNCTION setColor Procedure\nFUNCTION setColor RETURNS INTEGER\n  ( pcName  AS CHARACTER\n  , piColor AS INTEGER) :\n  /* Set color nr in the color tt\n   */\n  DEFINE BUFFER bColor FOR ttColor.\n\n  FIND bColor WHERE bColor.cName = pcName NO-ERROR.\n  IF NOT AVAILABLE bColor THEN\n  DO:\n    CREATE bColor.\n    ASSIGN bColor.cName = pcName.\n  END.\n\n  /* Set to default value from settings */\n  IF piColor = ? THEN\n  DO:\n    piColor = INTEGER(getRegistry('DataDigger:Colors', pcName)) NO-ERROR.\n    IF ERROR-STATUS:ERROR THEN piColor = ?.\n  END.\n\n  bColor.iColor = piColor.\n  RETURN bColor.iColor.\n\nEND FUNCTION. /* setColor */\n\n/* _UIB-CODE-BLOCK-END */\n\u0026ANALYZE-RESUME\n\n\u0026ENDIF\n\n\u0026IF DEFINED(EXCLUDE-setColumnWidthList) = 0 \u0026THEN\n\n\u0026ANALYZE-SUSPEND _UIB-CODE-BLOCK _FUNCTION setColumnWidthList Procedure\nFUNCTION setColumnWidthList RETURNS LOGICAL\n  ( INPUT phBrowse    AS HANDLE\n  , INPUT pcWidthList AS CHARACTER):\n  /* Set all specified columns in pcWidthList to a specified width\n  */\n  DEFINE VARIABLE cColumnName  AS CHARACTER NO-UNDO.\n  DEFINE VARIABLE cListItem    AS CHARACTER NO-UNDO.\n  DEFINE VARIABLE hColumn      AS HANDLE    NO-UNDO.\n  DEFINE VARIABLE iColumnWidth AS INTEGER   NO-UNDO.\n  DEFINE VARIABLE i            AS INTEGER   NO-UNDO.\n  DEFINE VARIABLE j            AS INTEGER   NO-UNDO.\n\n  DO i = 1 TO NUM-ENTRIES(pcWidthList):\n    cListItem    = ENTRY(i,pcWidthList).\n    cColumnName  = ENTRY(1,cListItem,':') NO-ERROR.\n    iColumnWidth = INTEGER(ENTRY(2,cListItem,':'"},
   {"type":"Punctuation","value":"))"},
   {"type":"Text","value":" "},
   {"type":"KeywordReserved","value":"NO-ERROR"},