[ {"type":"CommentSingle","value":"//Source of this test file: https://github.com/patrickTingen/DataDigger/blob/master/DataDiggerLib.p"}, {"type":"CommentPreproc","value":"\n\u0026ANALYZE-SUSPEND _VERSION-NUMBER AB_v10r12\n\u0026ANALYZE-RESUME\n\u0026ANALYZE-SUSPEND _UIB-CODE-BLOCK _CUSTOM _DEFINITIONS Procedure"}, {"type":"Text","value":"\n"}, {"type":"CommentMultiline","value":"/*------------------------------------------------------------------------\n\n Name: DataDiggerLib.p\n Desc: Library for DataDigger functions\n\n------------------------------------------------------------------------*/"}, {"type":"Text","value":"\n"}, {"type":"CommentMultiline","value":"/* This .W file was created with the Progress AppBuilder. */"}, {"type":"Text","value":"\n"}, {"type":"CommentMultiline","value":"/*----------------------------------------------------------------------*/"}, {"type":"Text","value":"\n"}, {"type":"KeywordDeclaration","value":"DEFINE"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"VARIABLE"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"gcSaveDatabaseList"}, {"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":"giDataserverNr"}, {"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":" "}, {"type":"CommentMultiline","value":"/* [JAG 01-11-2019] */"}, {"type":"Text","value":"\n"}, {"type":"KeywordDeclaration","value":"DEFINE"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"VARIABLE"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"glDirtyCache"}, {"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":"CommentMultiline","value":"/* Buildnr, temp-tables and forward defs */"}, {"type":"Text","value":"\n"}, {"type":"CommentPreproc","value":"{ DataDigger.i }"}, {"type":"Text","value":"\n\n"}, {"type":"KeywordReserved","value":"PROCEDURE"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"GetUserNameA"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"EXTERNAL "}, {"type":"LiteralStringDouble","value":"\"ADVAPI32.DLL\""}, {"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":"mUserId"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"AS"}, {"type":"Text","value":" "}, {"type":"KeywordType","value":"MEMPTR"}, {"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-OUTPUT"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"PARAMETER"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"intBufferSize"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"AS"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"LONG"}, {"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":"RETURN "}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"PARAMETER"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"intResult"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"AS"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"SHORT"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"NO-UNDO"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n"}, {"type":"KeywordReserved","value":"END"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"PROCEDURE"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n\n"}, {"type":"CommentMultiline","value":"/* Detect bitness of running Progress version\n * See Progress kb #54631\n */"}, {"type":"CommentPreproc","value":"\n\u0026IF PROVERSION \u003c= '8' \u0026THEN /* OE 10+ */\n \u0026IF PROVERSION \u003e= '11.3' \u0026THEN /* PROCESS-ARCHITECTURE function is available */\n \u0026IF PROCESS-ARCHITECTURE = 32 \u0026THEN /* 32-bit pointers */\n \u0026GLOBAL-DEFINE POINTERTYPE LONG\n \u0026GLOBAL-DEFINE POINTERBYTES 4\n \u0026ELSEIF PROCESS-ARCHITECTURE = 64 \u0026THEN /* 64-bit pointers */\n \u0026GLOBAL-DEFINE POINTERTYPE INT64\n \u0026GLOBAL-DEFINE POINTERBYTES 8\n \u0026ENDIF /* PROCESS-ARCHITECTURE */\n \u0026ELSE /* Can't check architecture pre-11.3 so default to 32-bit */\n \u0026GLOBAL-DEFINE POINTERTYPE LONG\n \u0026GLOBAL-DEFINE POINTERBYTES 4\n \u0026ENDIF /* PROVERSION \u003e 11.3 */\n\u0026ELSE /* pre-OE10 always 32-bit on Windows */\n \u0026GLOBAL-DEFINE POINTERTYPE LONG\n \u0026GLOBAL-DEFINE POINTERBYTES 4\n\u0026ENDIF /* PROVERSION \u003c 8 */"}, {"type":"Text","value":"\n\n"}, {"type":"KeywordReserved","value":"PROCEDURE"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"GetKeyboardState"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"EXTERNAL "}, {"type":"LiteralStringDouble","value":"\"user32.dll\""}, {"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":"KBState"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"AS "}, {"type":"CommentPreproc","value":"{\u0026POINTERTYPE}"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":" "}, {"type":"CommentMultiline","value":"/* memptr */"}, {"type":"Text","value":"\n "}, {"type":"KeywordDeclaration","value":"DEFINE"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"RETURN"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"PARAMETER"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"RetVal"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"AS"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"LONG"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":" "}, {"type":"CommentMultiline","value":"/* bool */"}, {"type":"Text","value":"\n"}, {"type":"KeywordReserved","value":"END"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"PROCEDURE"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n\n"}, {"type":"CommentMultiline","value":"/* Windows API entry point */"}, {"type":"Text","value":"\n"}, {"type":"KeywordReserved","value":"PROCEDURE"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"ShowScrollBar"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"EXTERNAL "}, {"type":"LiteralStringDouble","value":"\"user32.dll\""}, {"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":"KeywordReserved","value":"hwnd "}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"AS"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"LONG"}, {"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":"fnBar"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"AS"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"LONG"}, {"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":"fShow"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"AS"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"LONG"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n "}, {"type":"KeywordDeclaration","value":"DEFINE"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"RETURN"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"PARAMETER"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"ReturnValue"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"AS"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"LONG"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n"}, {"type":"KeywordReserved","value":"END"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"PROCEDURE"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n\n"}, {"type":"KeywordReserved","value":"PROCEDURE"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"SendMessageA"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"EXTERNAL "}, {"type":"LiteralStringDouble","value":"\"user32.dll\""}, {"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":"KeywordReserved","value":"hwnd "}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"AS"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"long"}, {"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":"wmsg"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"AS"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"long"}, {"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":"wparam"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"AS"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"long"}, {"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":"lparam"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"AS"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"long"}, {"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":"RETURN"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"PARAMETER"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"rc"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"AS"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"long"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"NO-UNDO"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n"}, {"type":"KeywordReserved","value":"END"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"PROCEDURE"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n\n"}, {"type":"KeywordReserved","value":"PROCEDURE"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"RedrawWindow"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"EXTERNAL "}, {"type":"LiteralStringDouble","value":"\"user32.dll\""}, {"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":"v"}, {"type":"Operator","value":"-"}, {"type":"NameVariable","value":"hwnd"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"AS"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"LONG"}, {"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":"v"}, {"type":"Operator","value":"-"}, {"type":"NameVariable","value":"rect"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"AS"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"LONG"}, {"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":"v"}, {"type":"Operator","value":"-"}, {"type":"NameVariable","value":"rgn"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"AS"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"LONG"}, {"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":"v"}, {"type":"Operator","value":"-"}, {"type":"NameVariable","value":"flags"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"AS"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"LONG"}, {"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":"RETURN"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"PARAMETER"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"v"}, {"type":"Operator","value":"-"}, {"type":"NameVariable","value":"ret"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"AS"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"LONG"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"NO-UNDO"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n"}, {"type":"KeywordReserved","value":"END"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"PROCEDURE"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n\n"}, {"type":"KeywordReserved","value":"PROCEDURE"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"SetWindowTextA"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"EXTERNAL "}, {"type":"LiteralStringDouble","value":"\"user32.dll\""}, {"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":"KeywordReserved","value":"hwnd"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"AS"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"long"}, {"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":"txt"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"AS"}, {"type":"Text","value":" "}, {"type":"KeywordType","value":"CHARACTER"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n"}, {"type":"KeywordReserved","value":"END"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"PROCEDURE"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n\n"}, {"type":"KeywordReserved","value":"PROCEDURE"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"GetWindow"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"EXTERNAL "}, {"type":"LiteralStringDouble","value":"\"user32.dll\""}, {"type":"Text","value":" "}, {"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":"KeywordReserved","value":"hwnd"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"AS"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"LONG"}, {"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":"uCmd"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"AS"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"LONG"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n "}, {"type":"KeywordDeclaration","value":"DEFINE"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"RETURN"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"PARAMETER"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"hwndOther"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"AS"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"LONG"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n"}, {"type":"KeywordReserved","value":"END"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"PROCEDURE"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n\n"}, {"type":"KeywordReserved","value":"PROCEDURE"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"GetParent"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"EXTERNAL "}, {"type":"LiteralStringDouble","value":"\"user32.dll\""}, {"type":"Text","value":" "}, {"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":"hwndChild"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"AS"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"LONG"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n "}, {"type":"KeywordDeclaration","value":"DEFINE"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"RETURN"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"PARAMETER"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"hwndParent"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"AS"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"LONG"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n"}, {"type":"KeywordReserved","value":"END"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"PROCEDURE"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n\n"}, {"type":"KeywordReserved","value":"PROCEDURE"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"GetCursorPos"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"EXTERNAL "}, {"type":"LiteralStringDouble","value":"\"user32\""}, {"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":"lpPoint"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"AS "}, {"type":"CommentPreproc","value":"{\u0026POINTERTYPE}"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":" "}, {"type":"CommentMultiline","value":"/* memptr */"}, {"type":"Text","value":"\n "}, {"type":"KeywordDeclaration","value":"DEFINE"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"RETURN"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"PARAMETER "}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"ReturnValue"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"AS"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"LONG"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n"}, {"type":"KeywordReserved","value":"END"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"PROCEDURE"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n\n"}, {"type":"KeywordReserved","value":"PROCEDURE"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"GetSysColor"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"EXTERNAL "}, {"type":"LiteralStringDouble","value":"\"user32.dll\""}, {"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":"nDspElement"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"AS"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"LONG"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n "}, {"type":"KeywordDeclaration","value":"DEFINE"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"RETURN"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"PARAMETER"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"COLORREF"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"AS"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"LONG"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n"}, {"type":"KeywordReserved","value":"END"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"PROCEDURE"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n\n"}, {"type":"KeywordReserved","value":"PROCEDURE"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"ScreenToClient"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"EXTERNAL "}, {"type":"LiteralStringDouble","value":"\"user32.dll\""}, {"type":"Text","value":" "}, {"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":"KeywordReserved","value":"hWnd "}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"AS"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"LONG"}, {"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":"lpPoint"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"AS"}, {"type":"Text","value":" "}, {"type":"KeywordType","value":"MEMPTR"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n"}, {"type":"KeywordReserved","value":"END"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"PROCEDURE"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n\n"}, {"type":"CommentMultiline","value":"/* Transparency */"}, {"type":"Text","value":"\n"}, {"type":"KeywordReserved","value":"PROCEDURE"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"SetWindowLongA"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"EXTERNAL "}, {"type":"LiteralStringDouble","value":"\"user32.dll\""}, {"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":"KeywordReserved","value":"HWND"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"AS"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"LONG"}, {"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":"nIndex"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"AS"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"LONG"}, {"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":"dwNewLong"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"AS"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"LONG"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n "}, {"type":"KeywordDeclaration","value":"DEFINE"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"RETURN"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"PARAMETER"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"stat"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"AS"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"LONG"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n"}, {"type":"KeywordReserved","value":"END"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"PROCEDURE"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n\n"}, {"type":"KeywordReserved","value":"PROCEDURE"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"SetLayeredWindowAttributes"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"EXTERNAL "}, {"type":"LiteralStringDouble","value":"\"user32.dll\""}, {"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":"KeywordReserved","value":"HWND"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"AS"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"LONG"}, {"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":"crKey"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"AS"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"LONG"}, {"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":"bAlpha"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"AS"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"SHORT"}, {"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":"dwFlagsas"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"AS"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"LONG"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n "}, {"type":"KeywordDeclaration","value":"DEFINE"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"RETURN"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"PARAMETER"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"stat"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"AS"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"SHORT"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n"}, {"type":"KeywordReserved","value":"END"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"PROCEDURE"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n\n\n"}, {"type":"CommentMultiline","value":"/* Find out if a file is locked */"}, {"type":"CommentPreproc","value":"\n\u0026GLOBAL-DEFINE GENERIC_WRITE 1073741824 /* \u0026H40000000 */\n\u0026GLOBAL-DEFINE OPEN_EXISTING 3\n\u0026GLOBAL-DEFINE FILE_SHARE_READ 1 /* = \u0026H1 */\n\u0026GLOBAL-DEFINE FILE_ATTRIBUTE_NORMAL 128 /* = \u0026H80 */"}, {"type":"Text","value":"\n\n"}, {"type":"KeywordReserved","value":"PROCEDURE"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"CreateFileA"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"EXTERNAL "}, {"type":"LiteralStringDouble","value":"\"kernel32\""}, {"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":"lpFileName"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"AS"}, {"type":"Text","value":" "}, {"type":"KeywordType","value":"CHARACTER"}, {"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":"dwDesiredAccess"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"AS"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"LONG"}, {"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":"dwShareMode"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"AS"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"LONG"}, {"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":"lpSecurityAttributes"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"AS"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"LONG"}, {"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":"dwCreationDisposition"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"AS"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"LONG"}, {"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":"dwFlagsAndAttributes"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"AS"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"LONG"}, {"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":"hTemplateFile"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"AS"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"LONG"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n "}, {"type":"KeywordDeclaration","value":"DEFINE"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"RETURN"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"PARAMETER"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"ReturnValue"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"AS"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"LONG"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n"}, {"type":"KeywordReserved","value":"END"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"PROCEDURE"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n\n"}, {"type":"KeywordReserved","value":"PROCEDURE"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"CloseHandle"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"EXTERNAL "}, {"type":"LiteralStringDouble","value":"\"kernel32\""}, {"type":"Text","value":" "}, {"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":"hObject"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"AS"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"LONG"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n "}, {"type":"KeywordDeclaration","value":"DEFINE"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"RETURN"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"PARAMETER"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"ReturnValue"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"AS"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"LONG"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n"}, {"type":"KeywordReserved","value":"END"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"PROCEDURE"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n\n"}, {"type":"CommentMultiline","value":"/* Used in update check / about window */"}, {"type":"Text","value":"\n"}, {"type":"KeywordReserved","value":"PROCEDURE"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"URLDownloadToFileA"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"EXTERNAL "}, {"type":"LiteralStringDouble","value":"\"URLMON.DLL\""}, {"type":"Text","value":" "}, {"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":"pCaller"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"AS"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"LONG"}, {"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":"szURL"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"AS"}, {"type":"Text","value":" "}, {"type":"KeywordType","value":"CHARACTER"}, {"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":"szFilename"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"AS"}, {"type":"Text","value":" "}, {"type":"KeywordType","value":"CHARACTER"}, {"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":"dwReserved"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"AS"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"LONG"}, {"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":"lpfnCB"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"AS"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"LONG"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n "}, {"type":"KeywordDeclaration","value":"DEFINE"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"RETURN"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"PARAMETER"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"ReturnValue"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"AS"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"LONG"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n"}, {"type":"KeywordReserved","value":"END"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"PROCEDURE"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":" "}, {"type":"CommentMultiline","value":"/* URLDownloadToFileA */"}, {"type":"Text","value":"\n\n"}, {"type":"KeywordReserved","value":"PROCEDURE"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"DeleteUrlCacheEntry"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"EXTERNAL "}, {"type":"LiteralStringDouble","value":"\"WININET.DLL\""}, {"type":"Text","value":" "}, {"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":"lbszUrlName"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"AS"}, {"type":"Text","value":" "}, {"type":"KeywordType","value":"CHARACTER"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n"}, {"type":"KeywordReserved","value":"END"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"PROCEDURE"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":" "}, {"type":"CommentMultiline","value":"/* DeleteUrlCacheEntry */"}, {"type":"Text","value":"\n\n"}, {"type":"KeywordDeclaration","value":"DEFINE"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"TEMP-TABLE"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"ttColor"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"NO-UNDO\n "}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"FIELD"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"cName"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"AS"}, {"type":"Text","value":" "}, {"type":"KeywordType","value":"CHARACTER\n "}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"FIELD"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"iColor"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"AS"}, {"type":"Text","value":" "}, {"type":"KeywordType","value":"INTEGER\n "}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"INDEX"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"iPrim"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"AS"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"PRIMARY"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"cName"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n\n"}, {"type":"KeywordDeclaration","value":"DEFINE"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"TEMP-TABLE"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"ttFont"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"NO-UNDO\n "}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"FIELD"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"cName"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"AS"}, {"type":"Text","value":" "}, {"type":"KeywordType","value":"CHARACTER\n "}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"FIELD"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"iFont"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"AS"}, {"type":"Text","value":" "}, {"type":"KeywordType","value":"INTEGER\n "}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"INDEX"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"iPrim"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"AS"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"PRIMARY"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"cName"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n\n"}, {"type":"CommentMultiline","value":"/* If you have trouble with the cache, disable it in the settings screen */"}, {"type":"Text","value":"\n"}, {"type":"KeywordDeclaration","value":"DEFINE"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"VARIABLE"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"glCacheTableDefs"}, {"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":"glCacheFieldDefs"}, {"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":"CommentMultiline","value":"/* Vars for caching dirnames */"}, {"type":"Text","value":"\n"}, {"type":"KeywordDeclaration","value":"DEFINE"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"VARIABLE"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"gcProgramDir"}, {"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":"gcWorkFolder"}, {"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":"/* Locking / unlocking windows */"}, {"type":"CommentPreproc","value":"\n\u0026GLOBAL-DEFINE WM_SETREDRAW 11\n\u0026GLOBAL-DEFINE RDW_ALLCHILDREN 128\n\u0026GLOBAL-DEFINE RDW_ERASE 4\n\u0026GLOBAL-DEFINE RDW_INVALIDATE 1"}, {"type":"Text","value":"\n\n"}, {"type":"CommentMultiline","value":"/* _UIB-CODE-BLOCK-END */"}, {"type":"CommentPreproc","value":"\n\u0026ANALYZE-RESUME\n\n\n\u0026ANALYZE-SUSPEND _UIB-PREPROCESSOR-BLOCK"}, {"type":"Text","value":"\n\n"}, {"type":"CommentMultiline","value":"/* ******************** Preprocessor Definitions ******************** */"}, {"type":"CommentPreproc","value":"\n\n\u0026Scoped-define PROCEDURE-TYPE Procedure\n\u0026Scoped-define DB-AWARE no"}, {"type":"Text","value":"\n\n\n\n"}, {"type":"CommentMultiline","value":"/* _UIB-PREPROCESSOR-BLOCK-END */"}, {"type":"CommentPreproc","value":"\n\u0026ANALYZE-RESUME"}, {"type":"Text","value":"\n\n\n"}, {"type":"CommentMultiline","value":"/* ************************ Function Prototypes ********************** */"}, {"type":"CommentPreproc","value":"\n\n\u0026IF DEFINED(EXCLUDE-addConnection) = 0 \u0026THEN\n\n\u0026ANALYZE-SUSPEND _UIB-CODE-BLOCK _FUNCTION-FORWARD addConnection Procedure"}, {"type":"Text","value":"\n"}, {"type":"KeywordReserved","value":"FUNCTION"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"addConnection"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"RETURNS"}, {"type":"Text","value":" "}, {"type":"KeywordType","value":"LOGICAL\n "}, {"type":"Punctuation","value":"("}, {"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":"NameVariable","value":"pcSection"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"AS"}, {"type":"Text","value":" "}, {"type":"KeywordType","value":"CHARACTER "}, {"type":"Punctuation","value":")"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"FORWARD"}, {"type":"Punctuation","value":"."}, {"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-formatQueryString) = 0 \u0026THEN\n\n\u0026ANALYZE-SUSPEND _UIB-CODE-BLOCK _FUNCTION-FORWARD formatQueryString Procedure"}, {"type":"Text","value":"\n"}, {"type":"KeywordReserved","value":"FUNCTION"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"formatQueryString"}, {"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":"pcQueryString"}, {"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":"plExpanded"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"AS"}, {"type":"Text","value":" "}, {"type":"KeywordType","value":"LOGICAL "}, {"type":"Punctuation","value":")"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"FORWARD"}, {"type":"Punctuation","value":"."}, {"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-getColor) = 0 \u0026THEN\n\n\u0026ANALYZE-SUSPEND _UIB-CODE-BLOCK _FUNCTION-FORWARD getColor Procedure"}, {"type":"Text","value":"\n"}, {"type":"KeywordReserved","value":"FUNCTION"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"getColor"}, {"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":"KeywordReserved","value":"FORWARD"}, {"type":"Punctuation","value":"."}, {"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-getColorByRGB) = 0 \u0026THEN\n\n\u0026ANALYZE-SUSPEND _UIB-CODE-BLOCK _FUNCTION-FORWARD getColorByRGB Procedure"}, {"type":"Text","value":"\n"}, {"type":"KeywordReserved","value":"FUNCTION"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"getColorByRGB"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"RETURNS"}, {"type":"Text","value":" "}, {"type":"KeywordType","value":"INTEGER\n "}, {"type":"Punctuation","value":"("}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"piRed"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"AS"}, {"type":"Text","value":" "}, {"type":"KeywordType","value":"INTEGER\n "}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"piGreen"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"AS"}, {"type":"Text","value":" "}, {"type":"KeywordType","value":"INTEGER\n "}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"piBlue"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"AS"}, {"type":"Text","value":" "}, {"type":"KeywordType","value":"INTEGER\n "}, {"type":"Punctuation","value":")"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"FORWARD"}, {"type":"Punctuation","value":"."}, {"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-getColumnLabel) = 0 \u0026THEN\n\n\u0026ANALYZE-SUSPEND _UIB-CODE-BLOCK _FUNCTION-FORWARD getColumnLabel Procedure"}, {"type":"Text","value":"\n"}, {"type":"KeywordReserved","value":"FUNCTION"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"getColumnLabel"}, {"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":"phFieldBuffer"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"AS"}, {"type":"Text","value":" "}, {"type":"KeywordType","value":"HANDLE "}, {"type":"Punctuation","value":")"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"FORWARD"}, {"type":"Punctuation","value":"."}, {"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-getColumnWidthList) = 0 \u0026THEN\n\n\u0026ANALYZE-SUSPEND _UIB-CODE-BLOCK _FUNCTION-FORWARD getColumnWidthList Procedure"}, {"type":"Text","value":"\n"}, {"type":"KeywordReserved","value":"FUNCTION"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"getColumnWidthList"}, {"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":"phBrowse"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"AS"}, {"type":"Text","value":" "}, {"type":"KeywordType","value":"HANDLE "}, {"type":"Punctuation","value":")"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"FORWARD"}, {"type":"Punctuation","value":"."}, {"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-getDatabaseList) = 0 \u0026THEN\n\n\u0026ANALYZE-SUSPEND _UIB-CODE-BLOCK _FUNCTION-FORWARD getDatabaseList Procedure"}, {"type":"Text","value":"\n"}, {"type":"KeywordReserved","value":"FUNCTION"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"getDatabaseList"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"RETURNS"}, {"type":"Text","value":" "}, {"type":"KeywordType","value":"CHARACTER"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"FORWARD"}, {"type":"Punctuation","value":"."}, {"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-getEscapedData) = 0 \u0026THEN\n\n\u0026ANALYZE-SUSPEND _UIB-CODE-BLOCK _FUNCTION-FORWARD getEscapedData Procedure"}, {"type":"Text","value":"\n"}, {"type":"KeywordReserved","value":"FUNCTION"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"getEscapedData"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"RETURNS"}, {"type":"Text","value":" "}, {"type":"KeywordType","value":"CHARACTER\n "}, {"type":"Punctuation","value":"("}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"pcTarget"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"AS"}, {"type":"Text","value":" "}, {"type":"KeywordType","value":"CHARACTER\n "}, {"type":"NameVariable","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":"KeywordReserved","value":"FORWARD"}, {"type":"Punctuation","value":"."}, {"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-getFieldList) = 0 \u0026THEN\n\n\u0026ANALYZE-SUSPEND _UIB-CODE-BLOCK _FUNCTION-FORWARD getFieldList Procedure"}, {"type":"Text","value":"\n"}, {"type":"KeywordReserved","value":"FUNCTION"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"getFieldList"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"RETURNS"}, {"type":"Text","value":" "}, {"type":"KeywordType","value":"CHARACTER\n "}, {"type":"Punctuation","value":"("}, {"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":"NameVariable","value":"pcFile"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"AS"}, {"type":"Text","value":" "}, {"type":"KeywordType","value":"CHARACTER\n "}, {"type":"Punctuation","value":")"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"FORWARD"}, {"type":"Punctuation","value":"."}, {"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-getFileCategory) = 0 \u0026THEN\n\n\u0026ANALYZE-SUSPEND _UIB-CODE-BLOCK _FUNCTION-FORWARD getFileCategory Procedure"}, {"type":"Text","value":"\n"}, {"type":"KeywordReserved","value":"FUNCTION"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"getFileCategory"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"RETURNS"}, {"type":"Text","value":" "}, {"type":"KeywordType","value":"CHARACTER\n "}, {"type":"Punctuation","value":"("}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"piFileNumber"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"AS"}, {"type":"Text","value":" "}, {"type":"KeywordType","value":"INTEGER\n "}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"pcFileName"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"AS"}, {"type":"Text","value":" "}, {"type":"KeywordType","value":"CHARACTER\n "}, {"type":"Punctuation","value":")"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"FORWARD"}, {"type":"Punctuation","value":"."}, {"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-FORWARD 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":"KeywordReserved","value":"FORWARD"}, {"type":"Punctuation","value":"."}, {"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-FORWARD 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":"KeywordReserved","value":"FORWARD"}, {"type":"Punctuation","value":"."}, {"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-getIndexFields) = 0 \u0026THEN\n\n\u0026ANALYZE-SUSPEND _UIB-CODE-BLOCK _FUNCTION-FORWARD getIndexFields Procedure"}, {"type":"Text","value":"\n"}, {"type":"KeywordReserved","value":"FUNCTION"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"getIndexFields"}, {"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":"pcDatabaseName"}, {"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":"pcTableName"}, {"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":"pcFlags"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"AS"}, {"type":"Text","value":" "}, {"type":"KeywordType","value":"CHARACTER\n "}, {"type":"Punctuation","value":")"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"FORWARD"}, {"type":"Punctuation","value":"."}, {"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-getKeyList) = 0 \u0026THEN\n\n\u0026ANALYZE-SUSPEND _UIB-CODE-BLOCK _FUNCTION-FORWARD getKeyList Procedure"}, {"type":"Text","value":"\n"}, {"type":"KeywordReserved","value":"FUNCTION"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"getKeyList"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"RETURNS"}, {"type":"Text","value":" "}, {"type":"KeywordType","value":"CHARACTER\n "}, {"type":"Punctuation","value":"("}, {"type":"Text","value":" "}, {"type":"CommentMultiline","value":"/* parameter-definitions */"}, {"type":"Text","value":" "}, {"type":"Punctuation","value":")"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"FORWARD"}, {"type":"Punctuation","value":"."}, {"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-getLinkInfo) = 0 \u0026THEN\n\n\u0026ANALYZE-SUSPEND _UIB-CODE-BLOCK _FUNCTION-FORWARD getLinkInfo Procedure"}, {"type":"Text","value":"\n"}, {"type":"KeywordReserved","value":"FUNCTION"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"getLinkInfo"}, {"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":"pcFieldName"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"AS"}, {"type":"Text","value":" "}, {"type":"KeywordType","value":"CHARACTER\n "}, {"type":"Punctuation","value":")"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"FORWARD"}, {"type":"Punctuation","value":"."}, {"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-getMaxLength) = 0 \u0026THEN\n\n\u0026ANALYZE-SUSPEND _UIB-CODE-BLOCK _FUNCTION-FORWARD getMaxLength Procedure"}, {"type":"Text","value":"\n"}, {"type":"KeywordReserved","value":"FUNCTION"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"getMaxLength"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"RETURNS"}, {"type":"Text","value":" "}, {"type":"KeywordType","value":"INTEGER\n "}, {"type":"Punctuation","value":"("}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"cFieldList"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"AS"}, {"type":"Text","value":" "}, {"type":"KeywordType","value":"CHARACTER "}, {"type":"Punctuation","value":")"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"FORWARD"}, {"type":"Punctuation","value":"."}, {"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-getOsErrorDesc) = 0 \u0026THEN\n\n\u0026ANALYZE-SUSPEND _UIB-CODE-BLOCK _FUNCTION-FORWARD getOsErrorDesc Procedure"}, {"type":"Text","value":"\n"}, {"type":"KeywordReserved","value":"FUNCTION"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"getOsErrorDesc"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"RETURNS"}, {"type":"Text","value":" "}, {"type":"KeywordType","value":"CHARACTER\n "}, {"type":"Punctuation","value":"("}, {"type":"KeywordReserved","value":"INPUT"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"piOsError"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"AS"}, {"type":"Text","value":" "}, {"type":"KeywordType","value":"INTEGER"}, {"type":"Punctuation","value":")"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"FORWARD"}, {"type":"Punctuation","value":"."}, {"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-getProgramDir) = 0 \u0026THEN\n\n\u0026ANALYZE-SUSPEND _UIB-CODE-BLOCK _FUNCTION-FORWARD getProgramDir Procedure"}, {"type":"Text","value":"\n"}, {"type":"KeywordReserved","value":"FUNCTION"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"getProgramDir"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"RETURNS"}, {"type":"Text","value":" "}, {"type":"KeywordType","value":"CHARACTER\n "}, {"type":"Punctuation","value":"("}, {"type":"Text","value":" "}, {"type":"CommentMultiline","value":"/* parameter-definitions */"}, {"type":"Text","value":" "}, {"type":"Punctuation","value":")"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"FORWARD"}, {"type":"Punctuation","value":"."}, {"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-FORWARD getQuery Procedure"}, {"type":"Text","value":"\n"}, {"type":"KeywordReserved","value":"FUNCTION"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"getQuery"}, {"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":"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":"KeywordReserved","value":"FORWARD"}, {"type":"Punctuation","value":"."}, {"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-FORWARD 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":" "}, {"type":"KeywordReserved","value":"FORWARD"}, {"type":"Punctuation","value":"."}, {"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-FORWARD 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":"AS"}, {"type":"Text","value":" "}, {"type":"KeywordType","value":"CHARACTER\n "}, {"type":"Punctuation","value":")"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"FORWARD"}, {"type":"Punctuation","value":"."}, {"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-FORWARD 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":" "}, {"type":"KeywordReserved","value":"FORWARD"}, {"type":"Punctuation","value":"."}, {"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-FORWARD 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":" "}, {"type":"KeywordReserved","value":"FORWARD"}, {"type":"Punctuation","value":"."}, {"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-FORWARD 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":"KeywordReserved","value":"FORWARD"}, {"type":"Punctuation","value":"."}, {"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-getTableLabel) = 0 \u0026THEN\n\n\u0026ANALYZE-SUSPEND _UIB-CODE-BLOCK _FUNCTION-FORWARD getTableLabel Procedure"}, {"type":"Text","value":"\n"}, {"type":"KeywordReserved","value":"FUNCTION"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"getTableLabel"}, {"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":"KeywordReserved","value":"FORWARD"}, {"type":"Punctuation","value":"."}, {"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-getTableList) = 0 \u0026THEN\n\n\u0026ANALYZE-SUSPEND _UIB-CODE-BLOCK _FUNCTION-FORWARD getTableList Procedure"}, {"type":"Text","value":"\n"}, {"type":"KeywordReserved","value":"FUNCTION"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"getTableList"}, {"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":"pcDatabaseFilter"}, {"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":"pcTableFilter"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"AS"}, {"type":"Text","value":" "}, {"type":"KeywordType","value":"CHARACTER\n "}, {"type":"Punctuation","value":")"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"FORWARD"}, {"type":"Punctuation","value":"."}, {"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-getUserName) = 0 \u0026THEN\n\n\u0026ANALYZE-SUSPEND _UIB-CODE-BLOCK _FUNCTION-FORWARD getUserName Procedure"}, {"type":"Text","value":"\n"}, {"type":"KeywordReserved","value":"FUNCTION"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"getUserName"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"RETURNS"}, {"type":"Text","value":" "}, {"type":"KeywordType","value":"CHARACTER\n "}, {"type":"Punctuation","value":"("}, {"type":"Text","value":" "}, {"type":"CommentMultiline","value":"/* parameter-definitions */"}, {"type":"Text","value":" "}, {"type":"Punctuation","value":")"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"FORWARD"}, {"type":"Punctuation","value":"."}, {"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-getWidgetUnderMouse) = 0 \u0026THEN\n\n\u0026ANALYZE-SUSPEND _UIB-CODE-BLOCK _FUNCTION-FORWARD getWidgetUnderMouse Procedure"}, {"type":"Text","value":"\n"}, {"type":"KeywordReserved","value":"FUNCTION"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"getWidgetUnderMouse"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"RETURNS"}, {"type":"Text","value":" "}, {"type":"KeywordType","value":"HANDLE\n "}, {"type":"Punctuation","value":"("}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"phFrame"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"AS"}, {"type":"Text","value":" "}, {"type":"KeywordType","value":"HANDLE "}, {"type":"Punctuation","value":")"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"FORWARD"}, {"type":"Punctuation","value":"."}, {"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-getWorkFolder) = 0 \u0026THEN\n\n\u0026ANALYZE-SUSPEND _UIB-CODE-BLOCK _FUNCTION-FORWARD getWorkFolder Procedure"}, {"type":"Text","value":"\n"}, {"type":"KeywordReserved","value":"FUNCTION"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"getWorkFolder"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"RETURNS"}, {"type":"Text","value":" "}, {"type":"KeywordType","value":"CHARACTER\n "}, {"type":"Punctuation","value":"("}, {"type":"Text","value":" "}, {"type":"CommentMultiline","value":"/* parameter-definitions */"}, {"type":"Text","value":" "}, {"type":"Punctuation","value":")"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"FORWARD"}, {"type":"Punctuation","value":"."}, {"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-getXmlNodeName) = 0 \u0026THEN\n\n\u0026ANALYZE-SUSPEND _UIB-CODE-BLOCK _FUNCTION-FORWARD getXmlNodeName Procedure"}, {"type":"Text","value":"\n"}, {"type":"KeywordReserved","value":"FUNCTION"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"getXmlNodeName"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"RETURNS"}, {"type":"Text","value":" "}, {"type":"KeywordType","value":"CHARACTER\n "}, {"type":"Punctuation","value":"("}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"pcFieldName"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"AS"}, {"type":"Text","value":" "}, {"type":"KeywordType","value":"CHARACTER "}, {"type":"Punctuation","value":")"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"FORWARD"}, {"type":"Punctuation","value":"."}, {"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-isDataServer) = 0 \u0026THEN\n\n\u0026ANALYZE-SUSPEND _UIB-CODE-BLOCK _FUNCTION-FORWARD isDataServer Procedure"}, {"type":"Text","value":"\n"}, {"type":"KeywordReserved","value":"FUNCTION"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"isDataServer"}, {"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":"pcDataSrNameOrDbName"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"AS"}, {"type":"Text","value":" "}, {"type":"KeywordType","value":"CHARACTER\n "}, {"type":"Punctuation","value":")"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"FORWARD"}, {"type":"Punctuation","value":"."}, {"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-isDefaultFontsChanged) = 0 \u0026THEN\n\n\u0026ANALYZE-SUSPEND _UIB-CODE-BLOCK _FUNCTION-FORWARD isDefaultFontsChanged Procedure"}, {"type":"Text","value":"\n"}, {"type":"KeywordReserved","value":"FUNCTION"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"isDefaultFontsChanged"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"RETURNS"}, {"type":"Text","value":" "}, {"type":"KeywordType","value":"LOGICAL\n "}, {"type":"Punctuation","value":"("}, {"type":"Text","value":" "}, {"type":"CommentMultiline","value":"/* parameter-definitions */"}, {"type":"Text","value":" "}, {"type":"Punctuation","value":")"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"FORWARD"}, {"type":"Punctuation","value":"."}, {"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-FORWARD 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":"KeywordReserved","value":"FORWARD"}, {"type":"Punctuation","value":"."}, {"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-FORWARD 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":"KeywordReserved","value":"FORWARD"}, {"type":"Punctuation","value":"."}, {"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-FORWARD 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":"KeywordReserved","value":"FORWARD"}, {"type":"Punctuation","value":"."}, {"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-FORWARD 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":" "}, {"type":"KeywordReserved","value":"FORWARD"}, {"type":"Punctuation","value":"."}, {"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-readFile) = 0 \u0026THEN\n\n\u0026ANALYZE-SUSPEND _UIB-CODE-BLOCK _FUNCTION-FORWARD readFile Procedure"}, {"type":"Text","value":"\n"}, {"type":"KeywordReserved","value":"FUNCTION"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"readFile"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"RETURNS"}, {"type":"Text","value":" "}, {"type":"KeywordType","value":"LONGCHAR\n "}, {"type":"Punctuation","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":"KeywordReserved","value":"FORWARD"}, {"type":"Punctuation","value":"."}, {"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-removeConnection) = 0 \u0026THEN\n\n\u0026ANALYZE-SUSPEND _UIB-CODE-BLOCK _FUNCTION-FORWARD removeConnection Procedure"}, {"type":"Text","value":"\n"}, {"type":"KeywordReserved","value":"FUNCTION"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"removeConnection"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"RETURNS"}, {"type":"Text","value":" "}, {"type":"KeywordType","value":"LOGICAL\n "}, {"type":"Punctuation","value":"("}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"pcDatabase"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"AS"}, {"type":"Text","value":" "}, {"type":"KeywordType","value":"CHARACTER "}, {"type":"Punctuation","value":")"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"FORWARD"}, {"type":"Punctuation","value":"."}, {"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-resolveOsVars) = 0 \u0026THEN\n\n\u0026ANALYZE-SUSPEND _UIB-CODE-BLOCK _FUNCTION-FORWARD resolveOsVars Procedure"}, {"type":"Text","value":"\n"}, {"type":"KeywordReserved","value":"FUNCTION"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"resolveOsVars"}, {"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":"KeywordReserved","value":"FORWARD"}, {"type":"Punctuation","value":"."}, {"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-FORWARD 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":"KeywordReserved","value":"FORWARD"}, {"type":"Punctuation","value":"."}, {"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-FORWARD 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":"KeywordReserved","value":"FORWARD"}, {"type":"Punctuation","value":"."}, {"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-FORWARD 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":" "}, {"type":"KeywordReserved","value":"FORWARD"}, {"type":"Punctuation","value":"."}, {"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-setLinkInfo) = 0 \u0026THEN\n\n\u0026ANALYZE-SUSPEND _UIB-CODE-BLOCK _FUNCTION-FORWARD setLinkInfo Procedure"}, {"type":"Text","value":"\n"}, {"type":"KeywordReserved","value":"FUNCTION"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"setLinkInfo"}, {"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":"pcFieldName"}, {"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":"pcValue"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"AS"}, {"type":"Text","value":" "}, {"type":"KeywordType","value":"CHARACTER\n "}, {"type":"Punctuation","value":")"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"FORWARD"}, {"type":"Punctuation","value":"."}, {"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-setRegistry) = 0 \u0026THEN\n\n\u0026ANALYZE-SUSPEND _UIB-CODE-BLOCK _FUNCTION-FORWARD setRegistry Procedure"}, {"type":"Text","value":"\n"}, {"type":"KeywordReserved","value":"FUNCTION"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"setRegistry"}, {"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":"AS"}, {"type":"Text","value":" "}, {"type":"KeywordType","value":"CHARACTER\n "}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"pcValue"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"AS"}, {"type":"Text","value":" "}, {"type":"KeywordType","value":"CHARACTER\n "}, {"type":"Punctuation","value":")"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"FORWARD"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n\n"}, {"type":"CommentMultiline","value":"/* _UIB-CODE-BLOCK-END */"}, {"type":"CommentPreproc","value":"\n\u0026ANALYZE-RESUME\n\n\u0026ENDIF"}, {"type":"Text","value":"\n\n\n"}, {"type":"CommentMultiline","value":"/* *********************** Procedure Settings ************************ */"}, {"type":"CommentPreproc","value":"\n\n\u0026ANALYZE-SUSPEND _PROCEDURE-SETTINGS"}, {"type":"Text","value":"\n"}, {"type":"CommentMultiline","value":"/* Settings for THIS-PROCEDURE\n Type: Procedure\n Allow:\n Frames: 0\n Add Fields to: Neither\n Other Settings: CODE-ONLY COMPILE\n */"}, {"type":"CommentPreproc","value":"\n\u0026ANALYZE-RESUME _END-PROCEDURE-SETTINGS"}, {"type":"Text","value":"\n\n"}, {"type":"CommentMultiline","value":"/* ************************* Create Window ************************** */"}, {"type":"CommentPreproc","value":"\n\n\u0026ANALYZE-SUSPEND _CREATE-WINDOW"}, {"type":"Text","value":"\n"}, {"type":"CommentMultiline","value":"/* DESIGN Window definition (used by the UIB)\n CREATE WINDOW Procedure ASSIGN\n HEIGHT = 41\n WIDTH = 57.4.\n/* END WINDOW DEFINITION */\n */"}, {"type":"CommentPreproc","value":"\n\u0026ANALYZE-RESUME\n\n\n\n\n\u0026ANALYZE-SUSPEND _UIB-CODE-BLOCK _CUSTOM _MAIN-BLOCK Procedure"}, {"type":"Text","value":"\n\n\n"}, {"type":"CommentMultiline","value":"/* *************************** Main Block *************************** */"}, {"type":"Text","value":"\n\n"}, {"type":"CommentMultiline","value":"/* terminate it. */"}, {"type":"Text","value":"\n"}, {"type":"KeywordReserved","value":"ON"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"CLOSE"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"OF"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"THIS-PROCEDURE"}, {"type":"Text","value":"\n"}, {"type":"KeywordReserved","value":"DO"}, {"type":"Punctuation","value":":"}, {"type":"Text","value":"\n "}, {"type":"KeywordDeclaration","value":"DEFINE"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"VARIABLE"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"cEnvironment"}, {"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":"NameVariable","value":"cEnvironment"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"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":"Text","value":" "}, {"type":"KeywordReserved","value":"NO-ERROR"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"UNLOAD"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"cEnvironment"}, {"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":" "}, {"type":"CommentMultiline","value":"/* CLOSE OF THIS-PROCEDURE */"}, {"type":"Text","value":"\n\n"}, {"type":"CommentMultiline","value":"/* Caching settings must be set from within UI.\n * Since the library might be started from DataDigger.p\n * we cannot rely on the registry being loaded yet\n */"}, {"type":"Text","value":"\n"}, {"type":"NameVariable","value":"glCacheTableDefs"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"TRUE"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n"}, {"type":"NameVariable","value":"glCacheFieldDefs"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"TRUE"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n\n"}, {"type":"CommentMultiline","value":"/* _UIB-CODE-BLOCK-END */"}, {"type":"CommentPreproc","value":"\n\u0026ANALYZE-RESUME"}, {"type":"Text","value":"\n\n\n"}, {"type":"CommentMultiline","value":"/* ********************** Internal Procedures *********************** */"}, {"type":"CommentPreproc","value":"\n\n\u0026IF DEFINED(EXCLUDE-applyChoose) = 0 \u0026THEN\n\n\u0026ANALYZE-SUSPEND _UIB-CODE-BLOCK _PROCEDURE applyChoose Procedure"}, {"type":"Text","value":"\n"}, {"type":"KeywordReserved","value":"PROCEDURE"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"applyChoose"}, {"type":"Text","value":" "}, {"type":"Punctuation","value":":"}, {"type":"Text","value":"\n"}, {"type":"CommentMultiline","value":"/* Apply the choose event to a dynamically created widget\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":"pihWidget"}, {"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":"KeywordReserved","value":"IF"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"VALID-HANDLE"}, {"type":"Punctuation","value":"("}, {"type":"NameVariable","value":"pihWidget"}, {"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":"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":"\"Apply CHOOSE to \u00261 \u00262\""}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"pihWidget"}, {"type":"Punctuation","value":":"}, {"type":"KeywordReserved","value":"TYPE"}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"pihWidget"}, {"type":"Punctuation","value":":"}, {"type":"KeywordReserved","value":"NAME"}, {"type":"Punctuation","value":"))."}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"APPLY "}, {"type":"LiteralStringSingle","value":"'choose'"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"TO"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"pihWidget"}, {"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":"/* applyChoose */"}, {"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-applyEvent) = 0 \u0026THEN\n\n\u0026ANALYZE-SUSPEND _UIB-CODE-BLOCK _PROCEDURE applyEvent Procedure"}, {"type":"Text","value":"\n"}, {"type":"KeywordReserved","value":"PROCEDURE"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"applyEvent"}, {"type":"Text","value":" "}, {"type":"Punctuation","value":":"}, {"type":"Text","value":"\n"}, {"type":"CommentMultiline","value":"/* Apply an event to a dynamically created widget\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":"pihWidget"}, {"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":"pcEvent"}, {"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":"KeywordReserved","value":"IF"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"VALID-HANDLE"}, {"type":"Punctuation","value":"("}, {"type":"NameVariable","value":"pihWidget"}, {"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":"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":"\"Apply \u00261 to \u00262 \u00263\""}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"CAPS"}, {"type":"Punctuation","value":"("}, {"type":"NameVariable","value":"pcEvent"}, {"type":"Punctuation","value":")"}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"pihWidget"}, {"type":"Punctuation","value":":"}, {"type":"KeywordReserved","value":"TYPE"}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"pihWidget"}, {"type":"Punctuation","value":":"}, {"type":"KeywordReserved","value":"NAME"}, {"type":"Punctuation","value":"))."}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"APPLY"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"pcEvent"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"TO"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"pihWidget"}, {"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":"/* applyEvent */"}, {"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-checkBackupFolder) = 0 \u0026THEN\n\n\u0026ANALYZE-SUSPEND _UIB-CODE-BLOCK _PROCEDURE checkBackupFolder Procedure"}, {"type":"Text","value":"\n"}, {"type":"KeywordReserved","value":"PROCEDURE"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"checkBackupFolder"}, {"type":"Text","value":" "}, {"type":"Punctuation","value":":"}, {"type":"Text","value":"\n"}, {"type":"CommentMultiline","value":"/* If backup is on, create a folder for it\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":"NameVariable","value":"plFolderOk"}, {"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":"cFolder"}, {"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":"KeywordReserved","value":"IF"}, {"type":"Text","value":" "}, {"type":"KeywordType","value":"LOGICAL"}, {"type":"Punctuation","value":"("}, {"type":"NameVariable","value":"getRegistry"}, {"type":"Punctuation","value":"("}, {"type":"LiteralStringDouble","value":"\"DataDigger:Backup\""}, {"type":"NameVariable","value":","}, {"type":"LiteralStringDouble","value":"\"BackupOnCreate\""}, {"type":"Punctuation","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":"LiteralStringDouble","value":"\"DataDigger:Backup\""}, {"type":"NameVariable","value":","}, {"type":"LiteralStringDouble","value":"\"BackupOnDelete\""}, {"type":"Punctuation","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":"LiteralStringDouble","value":"\"DataDigger:Backup\""}, {"type":"NameVariable","value":","}, {"type":"LiteralStringDouble","value":"\"BackupOnDelete\""}, {"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":"RUN"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"getDumpFileName"}, {"type":"Text","value":"\n "}, {"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":"Text","value":" "}, {"type":"CommentMultiline","value":"/* extension */"}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"INPUT"}, {"type":"Text","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":"Text","value":" "}, {"type":"CommentMultiline","value":"/* template */"}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"OUTPUT"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"cFolder"}, {"type":"Text","value":"\n "}, {"type":"Punctuation","value":")."}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"RUN"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"createFolder"}, {"type":"Punctuation","value":"("}, {"type":"NameVariable","value":"cFolder"}, {"type":"Punctuation","value":")."}, {"type":"Text","value":"\n\n "}, {"type":"CommentMultiline","value":"/* Now check if folder is actually created */"}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"FILE-INFO"}, {"type":"Punctuation","value":":"}, {"type":"KeywordReserved","value":"FILE-NAME "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"cFolder"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":"plFolderOk"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"Punctuation","value":"("}, {"type":"KeywordReserved","value":"FILE-INFO"}, {"type":"Punctuation","value":":"}, {"type":"KeywordReserved","value":"FULL-PATHNAME "}, {"type":"NameVariable","value":"\u003c\u003e"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"?"}, {"type":"Punctuation","value":")."}, {"type":"Text","value":"\n\n "}, {"type":"KeywordReserved","value":"IF"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"NOT"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"plFolderOk"}, {"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":"'CannotCreateBackupFolder'"}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"cFolder"}, {"type":"Punctuation","value":")."}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":"setRegistry"}, {"type":"Punctuation","value":"("}, {"type":"LiteralStringDouble","value":"\"DataDigger:Backup\""}, {"type":"NameVariable","value":","}, {"type":"LiteralStringDouble","value":"\"BackupOnCreate\""}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"LiteralStringDouble","value":"\"NO\""}, {"type":"Punctuation","value":")."}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":"setRegistry"}, {"type":"Punctuation","value":"("}, {"type":"LiteralStringDouble","value":"\"DataDigger:Backup\""}, {"type":"NameVariable","value":","}, {"type":"LiteralStringDouble","value":"\"BackupOnUpdate\""}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"LiteralStringDouble","value":"\"NO\""}, {"type":"Punctuation","value":")."}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":"setRegistry"}, {"type":"Punctuation","value":"("}, {"type":"LiteralStringDouble","value":"\"DataDigger:Backup\""}, {"type":"NameVariable","value":","}, {"type":"LiteralStringDouble","value":"\"BackupOnDelete\""}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"LiteralStringDouble","value":"\"NO\""}, {"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":"ELSE\n "}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"plFolderOk"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"TRUE"}, {"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":"/* checkBackupFolder */"}, {"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-checkDir) = 0 \u0026THEN\n\n\u0026ANALYZE-SUSPEND _UIB-CODE-BLOCK _PROCEDURE checkDir Procedure"}, {"type":"Text","value":"\n"}, {"type":"KeywordReserved","value":"PROCEDURE"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"checkDir"}, {"type":"Text","value":" "}, {"type":"Punctuation","value":":"}, {"type":"Text","value":"\n"}, {"type":"CommentMultiline","value":"/* Check if a folder exists, is accessible etc\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":"pcFileName"}, {"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":"NameVariable","value":"pcError"}, {"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":"cDumpDir"}, {"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":"cDirToCreate"}, {"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":"iDir"}, {"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":"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":"\"Check \u00261\""}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"pcFileName"}, {"type":"Punctuation","value":"))."}, {"type":"Text","value":"\n\n "}, {"type":"CommentMultiline","value":"/* If no path is given, use startup folder */"}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":"cDumpDir"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"SUBSTRING"}, {"type":"Punctuation","value":"("}, {"type":"NameVariable","value":"pcFileName,"}, {"type":"Text","value":" "}, {"type":"LiteralNumberInteger","value":"1"}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"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":"Operator","value":"="}, {"type":"CommentPreproc","value":" \u00261\", cDumpDir))."}, {"type":"Text","value":"\n\n "}, {"type":"CommentMultiline","value":"/* Ask to overwrite if it already exists */"}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"FILE-INFO"}, {"type":"Punctuation","value":":"}, {"type":"KeywordReserved","value":"FILE-NAME "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"pcFileName"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"IF"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"FILE-INFO"}, {"type":"Punctuation","value":":"}, {"type":"KeywordReserved","value":"FULL-PATHNAME "}, {"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":"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":"\"Already exists as \u00261 (\u00262)\""}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"FILE-INFO"}, {"type":"Punctuation","value":":"}, {"type":"KeywordReserved","value":"FULL-PATHNAME"}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"FILE-INFO"}, {"type":"Punctuation","value":":"}, {"type":"KeywordReserved","value":"FILE-TYPE"}, {"type":"Punctuation","value":"))."}, {"type":"Text","value":"\n\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":"'*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":"Text","value":" "}, {"type":"KeywordReserved","value":"THEN\n "}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"DO"}, {"type":"Punctuation","value":":"}, {"type":"Text","value":"\n "}, {"type":"CommentMultiline","value":"/* Do not remember the answer \"No\" for this question, otherwise it will be\n * confusing the next time the user encounters this situation\n */"}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":"setRegistry"}, {"type":"Punctuation","value":"("}, {"type":"LiteralStringSingle","value":"'DataDigger:Help'"}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"LiteralStringSingle","value":"'OverwriteDumpFile:answer'"}, {"type":"NameVariable","value":",?"}, {"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\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":"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":"/* Check dir */"}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"FILE-INFO"}, {"type":"Punctuation","value":":"}, {"type":"KeywordReserved","value":"FILE-NAME "}, {"type":"Operator","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":"cDumpDir"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"\u003c\u003e"}, {"type":"Text","value":" "}, {"type":"LiteralStringDouble","value":"\"\""}, {"type":"Text","value":" "}, {"type":"CommentMultiline","value":"/* Don't complain about not using a dir */"}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"AND"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"FILE-INFO"}, {"type":"Punctuation","value":":"}, {"type":"KeywordReserved","value":"FULL-PATHNAME "}, {"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":"RUN"}, {"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":"NameVariable","value":"Directory"}, {"type":"Text","value":" "}, {"type":"LiteralStringDouble","value":"\"\u00261\""}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"does"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"not"}, {"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":"KeywordReserved","value":"No"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"write"}, {"type":"Operator","value":"-"}, {"type":"NameVariable","value":"access"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"to"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"directory"}, {"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":"A"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"file"}, {"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":"dir"}, {"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":"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":"Text","value":"\n\n "}, {"type":"KeywordReserved","value":"IF"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"cSetting"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"LiteralStringSingle","value":"'\u003cEmpty\u003e'"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"THEN"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"NEXT"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"collectQueries"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n\n "}, {"type":"KeywordReserved","value":"IF"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"cSetting"}, {"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":"KeywordReserved","value":"CREATE"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"bQuery"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"ASSIGN\n "}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"iQueryNr"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"iQueryNr"}, {"type":"Text","value":" "}, {"type":"Operator","value":"+"}, {"type":"Text","value":" "}, {"type":"LiteralNumberInteger","value":"1"}, {"type":"Text","value":"\n "}, {"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":"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":"NameVariable","value":"bQuery"}, {"type":"Punctuation","value":"."}, {"type":"NameVariable","value":"iQueryNr"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"iQueryNr"}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":"bQuery"}, {"type":"Punctuation","value":"."}, {"type":"NameVariable","value":"cQueryTxt"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"cSetting"}, {"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":"KeywordReserved","value":"LEAVE"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"collectQueries"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n\n "}, {"type":"KeywordReserved","value":"END"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":" "}, {"type":"CommentMultiline","value":"/* 1 .. MaxQueryHistory */"}, {"type":"Text","value":"\n "}, {"type":"CommentPreproc","value":"{\u0026timerStop}"}, {"type":"Text","value":"\n"}, {"type":"KeywordReserved","value":"END"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"PROCEDURE"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":" "}, {"type":"CommentMultiline","value":"/* collectQueryInfo */"}, {"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-correctFilterList) = 0 \u0026THEN\n\n\u0026ANALYZE-SUSPEND _UIB-CODE-BLOCK _PROCEDURE correctFilterList Procedure"}, {"type":"Text","value":"\n"}, {"type":"KeywordReserved","value":"PROCEDURE"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"correctFilterList"}, {"type":"Text","value":" "}, {"type":"Punctuation","value":":"}, {"type":"Text","value":"\n"}, {"type":"CommentMultiline","value":"/* Move negative entries from positive list to negative\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":"NameVariable","value":"pcPositive"}, {"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-OUTPUT"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"PARAMETER"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"pcNegative"}, {"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":"iWord"}, {"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":"/* Strip entries that start with a ! */"}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"IF"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"INDEX"}, {"type":"Punctuation","value":"("}, {"type":"NameVariable","value":"pcPositive,"}, {"type":"LiteralStringDouble","value":"\"!\""}, {"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":"KeywordReserved","value":"DO"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"iWord"}, {"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":"pcPositive"}, {"type":"Punctuation","value":"):"}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"IF"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"ENTRY"}, {"type":"Punctuation","value":"("}, {"type":"NameVariable","value":"iWord,pcPositive"}, {"type":"Punctuation","value":")"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"BEGINS "}, {"type":"LiteralStringDouble","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":"/* Add this word to the negative-list */"}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":"pcNegative"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"TRIM"}, {"type":"Punctuation","value":"("}, {"type":"NameVariable","value":"pcNegative"}, {"type":"Text","value":" "}, {"type":"Operator","value":"+"}, {"type":"Text","value":" "}, {"type":"LiteralStringSingle","value":"','"}, {"type":"Text","value":" "}, {"type":"Operator","value":"+"}, {"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":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","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":"CommentMultiline","value":"/* Remove empty elements */"}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":"pcPositive"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"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":"Punctuation","value":":"}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":"pcPositive"}, {"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":"Punctuation","value":":"}, {"type":"Text","value":"\n"}, {"type":"CommentMultiline","value":"/* Create a folder structure\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":"pcFolder"}, {"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":"iElement"}, {"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":"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":"KeywordReserved","value":"DO"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"iElement"}, {"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":"pcFolder,"}, {"type":"LiteralStringSingle","value":"'\\'):\n cPath = SUBSTITUTE('"}, {"type":"CommentPreproc","value":"\u00261\\\u00262', cPath, ENTRY(iElement,pcFolder,'\\'))."}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":"cPath"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"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":"Text","value":"\n "}, {"type":"KeywordReserved","value":"IF"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"pcAction"}, {"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":"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":"KeywordReserved","value":"NO\n "}, {"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":"ASSIGN"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"plContinue"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"YES"}, {"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":"/* Determine the default name to save to */"}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"RUN"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"getDumpFileName"}, {"type":"Text","value":"\n "}, {"type":"Punctuation","value":"("}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"INPUT"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"pcAction"}, {"type":"Text","value":" "}, {"type":"CommentMultiline","value":"/* Dump | Create | Update | Delete */"}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"INPUT"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"hBuffer"}, {"type":"Punctuation","value":":"}, {"type":"KeywordReserved","value":"DBNAME\n "}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"INPUT"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"hBuffer"}, {"type":"Punctuation","value":":"}, {"type":"KeywordReserved","value":"TABLE\n "}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"INPUT "}, {"type":"LiteralStringDouble","value":"\"XML\""}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"INPUT "}, {"type":"LiteralStringDouble","value":"\"\""}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"OUTPUT"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"cFileName"}, {"type":"Text","value":"\n "}, {"type":"Punctuation","value":")."}, {"type":"Text","value":"\n\n "}, {"type":"KeywordReserved","value":"RUN"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"checkDir"}, {"type":"Punctuation","value":"("}, {"type":"KeywordReserved","value":"INPUT"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"cFileName,"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"OUTPUT"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"cError"}, {"type":"Punctuation","value":")."}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"IF"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"cError"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"\u003c\u003e"}, {"type":"Text","value":" "}, {"type":"LiteralStringDouble","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":"MESSAGE"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"cError"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"VIEW-AS"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"ALERT-BOX"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"INFORMATION"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"BUTTONS"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"OK"}, {"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":"/* Fix XML Node Names for fields in the tt */"}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"RUN"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"setXmlNodeNames"}, {"type":"Punctuation","value":"("}, {"type":"KeywordReserved","value":"INPUT"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"hExportTt"}, {"type":"Punctuation","value":":"}, {"type":"KeywordReserved","value":"DEFAULT-BUFFER-HANDLE"}, {"type":"Punctuation","value":")."}, {"type":"Text","value":"\n\n "}, {"type":"CommentMultiline","value":"/* See if the user has specified his own dump program\n */"}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":"plContinue"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"?"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":" "}, {"type":"CommentMultiline","value":"/* To see if it ran or not */"}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"PUBLISH "}, {"type":"LiteralStringDouble","value":"\"customDump\""}, {"type":"Text","value":"\n "}, {"type":"Punctuation","value":"("}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"INPUT"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"pcAction"}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"INPUT"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"hBuffer"}, {"type":"Punctuation","value":":"}, {"type":"KeywordReserved","value":"DBNAME\n "}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"INPUT"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"hBuffer"}, {"type":"Punctuation","value":":"}, {"type":"KeywordReserved","value":"TABLE\n "}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"INPUT"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"hExportTt"}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"INPUT"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"cFileName"}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"OUTPUT"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"cMessage"}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"OUTPUT"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"lDefaultDump"}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"OUTPUT"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"plContinue"}, {"type":"Text","value":"\n "}, {"type":"Punctuation","value":")."}, {"type":"Text","value":"\n\n "}, {"type":"KeywordReserved","value":"IF"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"plContinue"}, {"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":"KeywordReserved","value":"IF"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"cMessage"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"\u003c\u003e"}, {"type":"Text","value":" "}, {"type":"LiteralStringDouble","value":"\"\""}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"THEN"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"MESSAGE"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"cMessage"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"VIEW-AS"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"ALERT-BOX"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"INFORMATION"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"BUTTONS"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"OK"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"IF"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"NOT"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"lDefaultDump"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"OR"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"NOT"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"plContinue"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"THEN"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"RETURN"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"END"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n\n "}, {"type":"NameVariable","value":"plContinue"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"hExportTT"}, {"type":"Punctuation","value":":"}, {"type":"KeywordReserved","value":"WRITE-XML\n "}, {"type":"Punctuation","value":"("}, {"type":"Text","value":" "}, {"type":"LiteralStringSingle","value":"'file'"}, {"type":"Text","value":" "}, {"type":"CommentMultiline","value":"/* TargetType */"}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"cFileName"}, {"type":"Text","value":" "}, {"type":"CommentMultiline","value":"/* File */"}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"YES "}, {"type":"CommentMultiline","value":"/* Formatted */"}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"?"}, {"type":"Text","value":" "}, {"type":"CommentMultiline","value":"/* Encoding */"}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"?"}, {"type":"Text","value":" "}, {"type":"CommentMultiline","value":"/* SchemaLocation */"}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"NO "}, {"type":"CommentMultiline","value":"/* WriteSchema */"}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"NO "}, {"type":"CommentMultiline","value":"/* MinSchema */"}, {"type":"Text","value":"\n "}, {"type":"Punctuation","value":")."}, {"type":"Text","value":"\n\n "}, {"type":"KeywordReserved","value":"DELETE"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"OBJECT"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"hExportTt"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n"}, {"type":"KeywordReserved","value":"END"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"PROCEDURE"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":" "}, {"type":"CommentMultiline","value":"/* dumpRecord */"}, {"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-dynamicDump) = 0 \u0026THEN\n\n\u0026ANALYZE-SUSPEND _UIB-CODE-BLOCK _PROCEDURE dynamicDump Procedure"}, {"type":"Text","value":"\n"}, {"type":"KeywordReserved","value":"PROCEDURE"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"dynamicDump"}, {"type":"Text","value":" "}, {"type":"Punctuation","value":":"}, {"type":"Text","value":"\n"}, {"type":"CommentMultiline","value":"/* Dump the data to a file that is similar to those of Progress self.\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":"pihBrowse"}, {"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":"picFile"}, {"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":"cTimeStamp"}, {"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":"hBuffer"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"AS"}, {"type":"Text","value":" "}, {"type":"KeywordType","value":"HANDLE "}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"NO-UNDO"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"EXTENT"}, {"type":"Text","value":" "}, {"type":"LiteralNumberInteger","value":"5"}, {"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":"hField"}, {"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":"iBack"}, {"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":"iBuffer"}, {"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":"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":"iExtent"}, {"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":"iRecords"}, {"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":"iTrailer"}, {"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":"lFirst"}, {"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":"NameVariable","value":"hQuery"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"pihBrowse"}, {"type":"Punctuation","value":":"}, {"type":"KeywordReserved","value":"QUERY"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n\n "}, {"type":"CommentMultiline","value":"/* Accept max 5 buffers for a query */"}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"DO"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"iBuffer"}, {"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":"min"}, {"type":"Punctuation","value":"("}, {"type":"LiteralNumberInteger","value":"5"}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"hQuery"}, {"type":"Punctuation","value":":"}, {"type":"KeywordReserved","value":"NUM-BUFFERS"}, {"type":"Punctuation","value":"):"}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":"hBuffer[iBuffer]"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"hQuery"}, {"type":"Punctuation","value":":"}, {"type":"KeywordReserved","value":"GET-BUFFER-HANDLE"}, {"type":"Punctuation","value":"("}, {"type":"NameVariable","value":"iBuffer"}, {"type":"Punctuation","value":")."}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"END"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n\n "}, {"type":"KeywordReserved","value":"ASSIGN\n "}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"iRecords"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"LiteralNumberInteger","value":"0"}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":"cTimeStamp"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"STRING"}, {"type":"Punctuation","value":"("}, {"type":"KeywordReserved","value":"YEAR"}, {"type":"Punctuation","value":"("}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"TODAY"}, {"type":"Punctuation","value":")"}, {"type":"NameVariable","value":","}, {"type":"LiteralStringDouble","value":"\"9999\""}, {"type":"Punctuation","value":":"}, {"type":"NameVariable","value":"u"}, {"type":"Punctuation","value":")"}, {"type":"Text","value":" "}, {"type":"Operator","value":"+"}, {"type":"Text","value":" "}, {"type":"LiteralStringDouble","value":"\"/\""}, {"type":"Punctuation","value":":"}, {"type":"NameVariable","value":"u"}, {"type":"Text","value":"\n "}, {"type":"Operator","value":"+"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"string"}, {"type":"Punctuation","value":"("}, {"type":"KeywordReserved","value":"MONTH"}, {"type":"Punctuation","value":"("}, {"type":"KeywordReserved","value":"TODAY"}, {"type":"Punctuation","value":")"}, {"type":"NameVariable","value":","}, {"type":"LiteralStringDouble","value":"\"99\""}, {"type":"Punctuation","value":":"}, {"type":"NameVariable","value":"u"}, {"type":"Text","value":" "}, {"type":"Punctuation","value":")"}, {"type":"Text","value":" "}, {"type":"Operator","value":"+"}, {"type":"Text","value":" "}, {"type":"LiteralStringDouble","value":"\"/\""}, {"type":"Punctuation","value":":"}, {"type":"NameVariable","value":"u"}, {"type":"Text","value":"\n "}, {"type":"Operator","value":"+"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"string"}, {"type":"Punctuation","value":"("}, {"type":"KeywordReserved","value":"DAY"}, {"type":"Punctuation","value":"("}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"TODAY"}, {"type":"Punctuation","value":")"}, {"type":"NameVariable","value":","}, {"type":"LiteralStringDouble","value":"\"99\""}, {"type":"Punctuation","value":":"}, {"type":"NameVariable","value":"u"}, {"type":"Text","value":" "}, {"type":"Punctuation","value":")"}, {"type":"Text","value":" "}, {"type":"Operator","value":"+"}, {"type":"Text","value":" "}, {"type":"LiteralStringDouble","value":"\"-\""}, {"type":"Punctuation","value":":"}, {"type":"NameVariable","value":"u"}, {"type":"Text","value":"\n "}, {"type":"Operator","value":"+"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"string"}, {"type":"Punctuation","value":"("}, {"type":"KeywordReserved","value":"TIME"}, {"type":"NameVariable","value":","}, {"type":"LiteralStringDouble","value":"\"HH:MM:SS\""}, {"type":"Punctuation","value":":"}, {"type":"NameVariable","value":"u"}, {"type":"Punctuation","value":")."}, {"type":"Text","value":"\n\n "}, {"type":"NameVariable","value":"hQuery"}, {"type":"Punctuation","value":":"}, {"type":"KeywordReserved","value":"GET-FIRST"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n\n "}, {"type":"CommentMultiline","value":"/* Open outputfile */"}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"OUTPUT"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"to"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"value"}, {"type":"Punctuation","value":"("}, {"type":"NameVariable","value":"picFile"}, {"type":"Punctuation","value":")"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"no-echo"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"no-map"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"EXPORT "}, {"type":"NameVariable","value":"?"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":"iBack"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"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":"LiteralNumberInteger","value":"1"}, {"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":"LiteralNumberInteger","value":"0"}, {"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\n "}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"ON"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"STOP"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"UNDO"}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"LEAVE"}, {"type":"Punctuation","value":":"}, {"type":"Text","value":"\n\n "}, {"type":"KeywordReserved","value":"ASSIGN\n "}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"iRecords"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"iRecords"}, {"type":"Text","value":" "}, {"type":"Operator","value":"+"}, {"type":"Text","value":" "}, {"type":"LiteralNumberInteger","value":"1"}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":"lFirst"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"TRUE\n "}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n\n "}, {"type":"KeywordReserved","value":"PROCESS"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"EVENTS"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n\n "}, {"type":"NameVariable","value":"browseColumn"}, {"type":"Punctuation","value":":"}, {"type":"Text","value":"\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":"pihBrowse"}, {"type":"Punctuation","value":":"}, {"type":"KeywordReserved","value":"NUM-COLUMNS"}, {"type":"Punctuation","value":":"}, {"type":"Text","value":"\n\n "}, {"type":"CommentMultiline","value":"/* Grab the handle */"}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":"hColumn"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"pihBrowse"}, {"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":"/* Skip invisible columns */"}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"IF"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"NOT"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"hColumn"}, {"type":"Punctuation","value":":"}, {"type":"KeywordReserved","value":"VISIBLE"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"THEN"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"NEXT"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"browseColumn"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n\n "}, {"type":"CommentMultiline","value":"/* Find the buffer the column belongs to */"}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":"SearchLoop"}, {"type":"Punctuation","value":":"}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"DO"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"iBuffer"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"LiteralNumberInteger","value":"1"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"TO"}, {"type":"Text","value":" "}, {"type":"LiteralNumberInteger","value":"5"}, {"type":"Punctuation","value":":"}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"ASSIGN"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"hField"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"hBuffer[iBuffer]"}, {"type":"Punctuation","value":":"}, {"type":"KeywordReserved","value":"BUFFER-FIELD"}, {"type":"Punctuation","value":"("}, {"type":"NameVariable","value":"hColumn"}, {"type":"Punctuation","value":":"}, {"type":"KeywordReserved","value":"NAME"}, {"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":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"FALSE\n "}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"AND"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"hField"}, {"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":"LEAVE"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"SearchLoop"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"END"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n\n "}, {"type":"CommentMultiline","value":"/* If no column found, something weird happened */"}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"IF"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"hField"}, {"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":"NEXT"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"browseColumn"}, {"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":"DATA-TYPE "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"LiteralStringDouble","value":"\"recid\""}, {"type":"Punctuation","value":":"}, {"type":"NameVariable","value":"u"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"THEN"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"NEXT"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"browseColumn"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n\n "}, {"type":"KeywordReserved","value":"IF"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"lFirst"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"THEN\n "}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"lFirst"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"FALSE"}, {"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":"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":"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":"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":"EXPORT"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"hField"}, {"type":"Punctuation","value":":"}, {"type":"KeywordReserved","value":"BUFFER-VALUE"}, {"type":"Punctuation","value":"("}, {"type":"NameVariable","value":"iExtent"}, {"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":"KeywordReserved","value":"EXPORT"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"hField"}, {"type":"Punctuation","value":":"}, {"type":"KeywordReserved","value":"BUFFER-VALUE"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"END"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n\n "}, {"type":"NameVariable","value":"hQuery"}, {"type":"Punctuation","value":":"}, {"type":"KeywordReserved","value":"GET-NEXT"}, {"type":"Punctuation","value":"()."}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"END"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n\n "}, {"type":"CommentMultiline","value":"/* Add a checksum and nr of records at the end of the file.\n */"}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"PUT"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"UNFORMATTED "}, {"type":"LiteralStringDouble","value":"\".\""}, {"type":"Punctuation","value":":"}, {"type":"NameVariable","value":"u"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"SKIP"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":"iTrailer"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"SEEK"}, {"type":"Punctuation","value":"("}, {"type":"KeywordReserved","value":"OUTPUT"}, {"type":"Punctuation","value":")."}, {"type":"Text","value":"\n\n "}, {"type":"KeywordReserved","value":"PUT"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"UNFORMATTED\n "}, {"type":"LiteralStringDouble","value":"\"PSC\""}, {"type":"Punctuation","value":":"}, {"type":"NameVariable","value":"u"}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"SKIP "}, {"type":"LiteralStringDouble","value":"\"filename=\""}, {"type":"Punctuation","value":":"}, {"type":"NameVariable","value":"u"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"hBuffer["}, {"type":"LiteralNumberInteger","value":"1"}, {"type":"NameVariable","value":"]"}, {"type":"Punctuation","value":":"}, {"type":"KeywordReserved","value":"TABLE\n "}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"SKIP "}, {"type":"LiteralStringDouble","value":"\"records=\""}, {"type":"Punctuation","value":":"}, {"type":"NameVariable","value":"u"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"STRING"}, {"type":"Punctuation","value":"("}, {"type":"NameVariable","value":"iRecords,"}, {"type":"LiteralStringDouble","value":"\"9999999999999\""}, {"type":"Punctuation","value":":"}, {"type":"NameVariable","value":"u"}, {"type":"Punctuation","value":")"}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"SKIP "}, {"type":"LiteralStringDouble","value":"\"ldbname=\""}, {"type":"Punctuation","value":":"}, {"type":"NameVariable","value":"u"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"hBuffer["}, {"type":"LiteralNumberInteger","value":"1"}, {"type":"NameVariable","value":"]"}, {"type":"Punctuation","value":":"}, {"type":"KeywordReserved","value":"DBNAME\n "}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"SKIP "}, {"type":"LiteralStringDouble","value":"\"timestamp=\""}, {"type":"Punctuation","value":":"}, {"type":"NameVariable","value":"u"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"cTimeStamp"}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"SKIP "}, {"type":"LiteralStringDouble","value":"\"numformat=\""}, {"type":"Punctuation","value":":"}, {"type":"NameVariable","value":"u"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"ASC"}, {"type":"Punctuation","value":"("}, {"type":"KeywordReserved","value":"SESSION"}, {"type":"Punctuation","value":":"}, {"type":"NameVariable","value":"NUMERIC"}, {"type":"Operator","value":"-"}, {"type":"NameVariable","value":"SEPARATOR"}, {"type":"Punctuation","value":")"}, {"type":"Text","value":" "}, {"type":"LiteralStringDouble","value":"\",\""}, {"type":"Punctuation","value":":"}, {"type":"NameVariable","value":"u"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"ASC"}, {"type":"Punctuation","value":"("}, {"type":"KeywordReserved","value":"SESSION"}, {"type":"Punctuation","value":":"}, {"type":"NameVariable","value":"NUMERIC"}, {"type":"Operator","value":"-"}, {"type":"NameVariable","value":"DECIMAL"}, {"type":"Operator","value":"-"}, {"type":"NameVariable","value":"POINT"}, {"type":"Punctuation","value":")"}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"SKIP "}, {"type":"LiteralStringDouble","value":"\"dateformat=\""}, {"type":"Punctuation","value":":"}, {"type":"NameVariable","value":"u"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"SESSION"}, {"type":"Punctuation","value":":"}, {"type":"KeywordReserved","value":"DATE-FORMAT "}, {"type":"LiteralStringDouble","value":"\"-\""}, {"type":"Punctuation","value":":"}, {"type":"NameVariable","value":"u"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"SESSION"}, {"type":"Punctuation","value":":"}, {"type":"KeywordReserved","value":"YEAR-OFFSET\n "}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"SKIP "}, {"type":"LiteralStringDouble","value":"\"map=NO-MAP\""}, {"type":"Punctuation","value":":"}, {"type":"NameVariable","value":"u"}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"SKIP "}, {"type":"LiteralStringDouble","value":"\"cpstream=\""}, {"type":"Punctuation","value":":"}, {"type":"NameVariable","value":"u"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"SESSION"}, {"type":"Punctuation","value":":"}, {"type":"KeywordReserved","value":"CPSTREAM\n "}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"SKIP "}, {"type":"LiteralStringDouble","value":"\".\""}, {"type":"Punctuation","value":":"}, {"type":"NameVariable","value":"u"}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"SKIP"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"STRING"}, {"type":"Punctuation","value":"("}, {"type":"NameVariable","value":"iTrailer,"}, {"type":"LiteralStringDouble","value":"\"9999999999\""}, {"type":"Punctuation","value":":"}, {"type":"NameVariable","value":"u"}, {"type":"Punctuation","value":")"}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"SKIP"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n\n "}, {"type":"KeywordReserved","value":"OUTPUT"}, {"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":"/* dynamicDump */"}, {"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-flushRegistry) = 0 \u0026THEN\n\n\u0026ANALYZE-SUSPEND _UIB-CODE-BLOCK _PROCEDURE flushRegistry Procedure"}, {"type":"Text","value":"\n"}, {"type":"KeywordReserved","value":"PROCEDURE"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"flushRegistry"}, {"type":"Text","value":" "}, {"type":"Punctuation","value":":"}, {"type":"Text","value":"\n"}, {"type":"CommentMultiline","value":"/* Flush all dirty registry settings to disk\n*/"}, {"type":"Text","value":"\n "}, {"type":"CommentPreproc","value":"{\u0026timerStart}"}, {"type":"Text","value":"\n\n "}, {"type":"KeywordReserved","value":"IF"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"glDirtyCache"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"THEN\n "}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"RUN"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"saveConfigFileSorted"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n\n "}, {"type":"CommentPreproc","value":"{\u0026timerStop}"}, {"type":"Text","value":"\n"}, {"type":"KeywordReserved","value":"END"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"PROCEDURE"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":" "}, {"type":"CommentMultiline","value":"/* flushRegistry */"}, {"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-getColumnSort) = 0 \u0026THEN\n\n\u0026ANALYZE-SUSPEND _UIB-CODE-BLOCK _PROCEDURE getColumnSort Procedure"}, {"type":"Text","value":"\n"}, {"type":"KeywordReserved","value":"PROCEDURE"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"getColumnSort"}, {"type":"Text","value":" "}, {"type":"Punctuation","value":":"}, {"type":"Text","value":"\n"}, {"type":"CommentMultiline","value":"/* Return the column nr the browse is sorted on\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":"OUTPUT"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"PARAMETER"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"pcColumn"}, {"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":"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":"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":"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\n "}, {"type":"CommentPreproc","value":"{\u0026timerStart}"}, {"type":"Text","value":"\n\n "}, {"type":"NameVariable","value":"#BrowseColumns"}, {"type":"Punctuation","value":":"}, {"type":"Text","value":"\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 "}, {"type":"KeywordReserved","value":"IF"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"hColumn"}, {"type":"Punctuation","value":":"}, {"type":"KeywordReserved","value":"SORT-ASCENDING "}, {"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":"KeywordReserved","value":"ASSIGN\n "}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"pcColumn"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"hColumn"}, {"type":"Punctuation","value":":"}, {"type":"KeywordReserved","value":"NAME\n "}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"plAscending"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"hColumn"}, {"type":"Punctuation","value":":"}, {"type":"KeywordReserved","value":"SORT-ASCENDING\n "}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"LEAVE "}, {"type":"NameVariable","value":"#BrowseColumns"}, {"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":"IF"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"pcColumn"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"LiteralStringSingle","value":"''"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"THEN\n "}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"ASSIGN\n "}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"pcColumn"}, {"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":"LiteralNumberInteger","value":"1"}, {"type":"Punctuation","value":"):"}, {"type":"KeywordReserved","value":"name\n "}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"plAscending"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"TRUE"}, {"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":"\"Sorting \u00261 on \u00262\""}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"STRING"}, {"type":"Punctuation","value":"("}, {"type":"NameVariable","value":"plAscending,"}, {"type":"LiteralStringDouble","value":"\"up/down\""}, {"type":"Punctuation","value":")"}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"pcColumn"}, {"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":"/* getColumnSort */"}, {"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-getDumpFileName) = 0 \u0026THEN\n\n\u0026ANALYZE-SUSPEND _UIB-CODE-BLOCK _PROCEDURE getDumpFileName Procedure"}, {"type":"Text","value":"\n"}, {"type":"KeywordReserved","value":"PROCEDURE"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"getDumpFileName"}, {"type":"Text","value":" "}, {"type":"Punctuation","value":":"}, {"type":"Text","value":"\n"}, {"type":"CommentMultiline","value":"/* Return a file name based on a template\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":"pcAction"}, {"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":"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 "}, {"type":"KeywordDeclaration","value":"DEFINE"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"INPUT "}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"PARAMETER"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"pcExtension"}, {"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":"pcTemplate"}, {"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":"NameVariable","value":"pcFileName"}, {"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":"cLastDir"}, {"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":"cDayOfWeek"}, {"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":"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":"NameVariable","value":"]"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n "}, {"type":"KeywordDeclaration","value":"DEFINE"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"VARIABLE"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"cDumpName"}, {"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":"cDumpDir"}, {"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":"cBackupDir"}, {"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":"hBuffer"}, {"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":"cUserId"}, {"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":"/* Checks */"}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"IF"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"LOOKUP"}, {"type":"Punctuation","value":"("}, {"type":"NameVariable","value":"pcAction,"}, {"type":"Text","value":" "}, {"type":"LiteralStringDouble","value":"\"Dump,Create,Update,Delete\""}, {"type":"Punctuation","value":")"}, {"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":"KeywordReserved","value":"DO"}, {"type":"Punctuation","value":":"}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"MESSAGE "}, {"type":"LiteralStringSingle","value":"'Unknown action'"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"pcAction"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"VIEW-AS"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"ALERT-BOX"}, {"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":"/* If not provided, find the template from the settings,\n * depending on the action we want to perform.\n */"}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"IF"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"pcTemplate"}, {"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":"pcTemplate"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"LiteralStringDouble","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":"pcAction"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"LiteralStringSingle","value":"'Dump'"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"THEN\n "}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"pcFileName"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"LiteralStringDouble","value":"\"\u003cDUMPDIR\u003e\""}, {"type":"Text","value":" "}, {"type":"Operator","value":"+"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"getRegistry"}, {"type":"Punctuation","value":"("}, {"type":"LiteralStringDouble","value":"\"DumpAndLoad\""}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"LiteralStringDouble","value":"\"DumpFileTemplate\""}, {"type":"Punctuation","value":")."}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"ELSE\n "}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"pcFileName"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"LiteralStringDouble","value":"\"\u003cBACKUPDIR\u003e\""}, {"type":"Text","value":" "}, {"type":"Operator","value":"+"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"getRegistry"}, {"type":"Punctuation","value":"("}, {"type":"LiteralStringDouble","value":"\"DataDigger:Backup\""}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"LiteralStringDouble","value":"\"BackupFileTemplate\""}, {"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":"pcFileName"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"pcTemplate"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n\n "}, {"type":"KeywordReserved","value":"IF"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"pcFileName"}, {"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":"pcFileName"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"LiteralStringDouble","value":"\"\""}, {"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":"\"Dump to: \u00261\""}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"pcFileName"}, {"type":"Punctuation","value":"))."}, {"type":"Text","value":"\n\n "}, {"type":"CommentMultiline","value":"/* Dump dir / backup dir / last-used dir from settings */"}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":"cDumpDir"}, {"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":"\"DumpAndLoad\""}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"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":"Text","value":" "}, {"type":"KeywordReserved","value":"THEN"}, {"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\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":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"USERID"}, {"type":"Punctuation","value":"("}, {"type":"KeywordReserved","value":"LDBNAME"}, {"type":"Punctuation","value":"("}, {"type":"LiteralNumberInteger","value":"1"}, {"type":"Punctuation","value":"))."}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"IF"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"cUserId"}, {"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":"cUserId"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"LiteralStringSingle","value":"''"}, {"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":"\"DumpDir : \u00261\""}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"cDumpDir"}, {"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":"\"BackupDir: \u00261\""}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"cBackupDir"}, {"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":"\"LastDir : \u00261\""}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"cLastDir"}, {"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":"\"DumpName : \u00261\""}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"cDumpName"}, {"type":"Punctuation","value":"))."}, {"type":"Text","value":"\n\n "}, {"type":"CommentMultiline","value":"/* Now resolve all tags */"}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":"pcFileName"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"REPLACE"}, {"type":"Punctuation","value":"("}, {"type":"NameVariable","value":"pcFileName,"}, {"type":"LiteralStringDouble","value":"\"\u003cDUMPDIR\u003e\""}, {"type":"Text","value":" "}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"cDumpDir"}, {"type":"Text","value":" "}, {"type":"Punctuation","value":")."}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":"pcFileName"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"REPLACE"}, {"type":"Punctuation","value":"("}, {"type":"NameVariable","value":"pcFileName,"}, {"type":"LiteralStringDouble","value":"\"\u003cBACKUPDIR\u003e\""}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"cBackupDir"}, {"type":"Text","value":" "}, {"type":"Punctuation","value":")."}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":"pcFileName"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"REPLACE"}, {"type":"Punctuation","value":"("}, {"type":"NameVariable","value":"pcFileName,"}, {"type":"LiteralStringDouble","value":"\"\u003cLASTDIR\u003e\""}, {"type":"Text","value":" "}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"cLastDir"}, {"type":"Text","value":" "}, {"type":"Punctuation","value":")."}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":"pcFileName"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"REPLACE"}, {"type":"Punctuation","value":"("}, {"type":"NameVariable","value":"pcFileName,"}, {"type":"LiteralStringDouble","value":"\"\u003cPROGDIR\u003e\""}, {"type":"Text","value":" "}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"getWorkFolder"}, {"type":"Punctuation","value":"()"}, {"type":"Text","value":" "}, {"type":"Punctuation","value":")."}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":"pcFileName"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"REPLACE"}, {"type":"Punctuation","value":"("}, {"type":"NameVariable","value":"pcFileName,"}, {"type":"LiteralStringDouble","value":"\"\u003cWORKDIR\u003e\""}, {"type":"Text","value":" "}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"getWorkFolder"}, {"type":"Punctuation","value":"()"}, {"type":"Text","value":" "}, {"type":"Punctuation","value":")."}, {"type":"Text","value":"\n\n "}, {"type":"NameVariable","value":"pcFileName"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"REPLACE"}, {"type":"Punctuation","value":"("}, {"type":"NameVariable","value":"pcFileName,"}, {"type":"LiteralStringDouble","value":"\"\u003cACTION\u003e\""}, {"type":"Text","value":" "}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"pcAction"}, {"type":"Text","value":" "}, {"type":"Punctuation","value":")."}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":"pcFileName"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"REPLACE"}, {"type":"Punctuation","value":"("}, {"type":"NameVariable","value":"pcFileName,"}, {"type":"LiteralStringDouble","value":"\"\u003cUSERID\u003e\""}, {"type":"Text","value":" "}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"cUserId"}, {"type":"Text","value":" "}, {"type":"Punctuation","value":")."}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":"pcFileName"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"REPLACE"}, {"type":"Punctuation","value":"("}, {"type":"NameVariable","value":"pcFileName,"}, {"type":"LiteralStringDouble","value":"\"\u003cDB\u003e\""}, {"type":"Text","value":" "}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"pcDatabase"}, {"type":"Text","value":" "}, {"type":"Punctuation","value":")."}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":"pcFileName"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"REPLACE"}, {"type":"Punctuation","value":"("}, {"type":"NameVariable","value":"pcFileName,"}, {"type":"LiteralStringDouble","value":"\"\u003cTABLE\u003e\""}, {"type":"Text","value":" "}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"pcTable"}, {"type":"Text","value":" "}, {"type":"Punctuation","value":")."}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":"pcFileName"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"REPLACE"}, {"type":"Punctuation","value":"("}, {"type":"NameVariable","value":"pcFileName,"}, {"type":"LiteralStringDouble","value":"\"\u003cDUMPNAME\u003e\""}, {"type":"Text","value":" "}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"cDumpName"}, {"type":"Text","value":" "}, {"type":"Punctuation","value":")."}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":"pcFileName"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"REPLACE"}, {"type":"Punctuation","value":"("}, {"type":"NameVariable","value":"pcFileName,"}, {"type":"LiteralStringDouble","value":"\"\u003cEXT\u003e\""}, {"type":"Text","value":" "}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"pcExtension"}, {"type":"Text","value":" "}, {"type":"Punctuation","value":")."}, {"type":"Text","value":"\n\n "}, {"type":"NameVariable","value":"pcFileName"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"REPLACE"}, {"type":"Punctuation","value":"("}, {"type":"NameVariable","value":"pcFileName,"}, {"type":"LiteralStringDouble","value":"\"\u003cTIMESTAMP\u003e\""}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"LiteralStringDouble","value":"\"\u003cYEAR\u003e\u003cMONTH\u003e\u003cDAY\u003e.\u003cHH\u003e\u003cMM\u003e\u003cSS\u003e\""}, {"type":"Text","value":" "}, {"type":"Punctuation","value":")."}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":"pcFileName"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"REPLACE"}, {"type":"Punctuation","value":"("}, {"type":"NameVariable","value":"pcFileName,"}, {"type":"LiteralStringDouble","value":"\"\u003cDATE\u003e\""}, {"type":"Text","value":" "}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"LiteralStringDouble","value":"\"\u003cYEAR\u003e-\u003cMONTH\u003e-\u003cDAY\u003e\""}, {"type":"Text","value":" "}, {"type":"Punctuation","value":")."}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":"pcFileName"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"REPLACE"}, {"type":"Punctuation","value":"("}, {"type":"NameVariable","value":"pcFileName,"}, {"type":"LiteralStringDouble","value":"\"\u003cTIME\u003e\""}, {"type":"Text","value":" "}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"LiteralStringDouble","value":"\"\u003cHH\u003e:\u003cMM\u003e:\u003cSS\u003e\""}, {"type":"Text","value":" "}, {"type":"Punctuation","value":")."}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":"pcFileName"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"REPLACE"}, {"type":"Punctuation","value":"("}, {"type":"NameVariable","value":"pcFileName,"}, {"type":"LiteralStringDouble","value":"\"\u003cWEEKDAY\u003e\""}, {"type":"Text","value":" "}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"STRING"}, {"type":"Punctuation","value":"("}, {"type":"KeywordReserved","value":"WEEKDAY"}, {"type":"Punctuation","value":"("}, {"type":"KeywordReserved","value":"TODAY"}, {"type":"Punctuation","value":"))"}, {"type":"Text","value":" "}, {"type":"Punctuation","value":")."}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":"pcFileName"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"REPLACE"}, {"type":"Punctuation","value":"("}, {"type":"NameVariable","value":"pcFileName,"}, {"type":"LiteralStringDouble","value":"\"\u003cDAYNAME\u003e\""}, {"type":"Text","value":" "}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"cDayOfWeek["}, {"type":"KeywordReserved","value":"WEEKDAY"}, {"type":"Punctuation","value":"("}, {"type":"KeywordReserved","value":"today"}, {"type":"Punctuation","value":")"}, {"type":"NameVariable","value":"]"}, {"type":"Text","value":" "}, {"type":"Punctuation","value":")."}, {"type":"Text","value":"\n\n "}, {"type":"NameVariable","value":"pcFileName"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"REPLACE"}, {"type":"Punctuation","value":"("}, {"type":"NameVariable","value":"pcFileName,"}, {"type":"LiteralStringDouble","value":"\"\u003cYEAR\u003e\""}, {"type":"Text","value":" "}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"STRING"}, {"type":"Punctuation","value":"("}, {"type":"KeywordReserved","value":"YEAR "}, {"type":"Punctuation","value":"("}, {"type":"KeywordReserved","value":"TODAY"}, {"type":"Punctuation","value":")"}, {"type":"NameVariable","value":","}, {"type":"LiteralStringDouble","value":"\"9999\""}, {"type":"Punctuation","value":")"}, {"type":"Text","value":" "}, {"type":"Punctuation","value":")."}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":"pcFileName"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"REPLACE"}, {"type":"Punctuation","value":"("}, {"type":"NameVariable","value":"pcFileName,"}, {"type":"LiteralStringDouble","value":"\"\u003cMONTH\u003e\""}, {"type":"Text","value":" "}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"STRING"}, {"type":"Punctuation","value":"("}, {"type":"KeywordReserved","value":"MONTH"}, {"type":"Punctuation","value":"("}, {"type":"KeywordReserved","value":"TODAY"}, {"type":"Punctuation","value":")"}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"LiteralStringDouble","value":"\"99\""}, {"type":"Punctuation","value":")"}, {"type":"Text","value":" "}, {"type":"Punctuation","value":")."}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":"pcFileName"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"REPLACE"}, {"type":"Punctuation","value":"("}, {"type":"NameVariable","value":"pcFileName,"}, {"type":"LiteralStringDouble","value":"\"\u003cDAY\u003e\""}, {"type":"Text","value":" "}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"STRING"}, {"type":"Punctuation","value":"("}, {"type":"KeywordReserved","value":"DAY "}, {"type":"Punctuation","value":"("}, {"type":"KeywordReserved","value":"TODAY"}, {"type":"Punctuation","value":")"}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"LiteralStringDouble","value":"\"99\""}, {"type":"Punctuation","value":")"}, {"type":"Text","value":" "}, {"type":"Punctuation","value":")."}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":"pcFileName"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"REPLACE"}, {"type":"Punctuation","value":"("}, {"type":"NameVariable","value":"pcFileName,"}, {"type":"LiteralStringDouble","value":"\"\u003cHH\u003e\""}, {"type":"Text","value":" "}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"ENTRY"}, {"type":"Punctuation","value":"("}, {"type":"LiteralNumberInteger","value":"1"}, {"type":"NameVariable","value":","}, {"type":"KeywordReserved","value":"STRING"}, {"type":"Punctuation","value":"("}, {"type":"KeywordReserved","value":"TIME"}, {"type":"NameVariable","value":","}, {"type":"LiteralStringDouble","value":"\"HH:MM:SS\""}, {"type":"Punctuation","value":")"}, {"type":"NameVariable","value":","}, {"type":"LiteralStringDouble","value":"\":\""}, {"type":"Text","value":" "}, {"type":"Punctuation","value":")"}, {"type":"Text","value":" "}, {"type":"Punctuation","value":")."}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":"pcFileName"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"REPLACE"}, {"type":"Punctuation","value":"("}, {"type":"NameVariable","value":"pcFileName,"}, {"type":"LiteralStringDouble","value":"\"\u003cMM\u003e\""}, {"type":"Text","value":" "}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"ENTRY"}, {"type":"Punctuation","value":"("}, {"type":"LiteralNumberInteger","value":"2"}, {"type":"NameVariable","value":","}, {"type":"KeywordReserved","value":"STRING"}, {"type":"Punctuation","value":"("}, {"type":"KeywordReserved","value":"TIME"}, {"type":"NameVariable","value":","}, {"type":"LiteralStringDouble","value":"\"HH:MM:SS\""}, {"type":"Punctuation","value":")"}, {"type":"NameVariable","value":","}, {"type":"LiteralStringDouble","value":"\":\""}, {"type":"Text","value":" "}, {"type":"Punctuation","value":")"}, {"type":"Text","value":" "}, {"type":"Punctuation","value":")."}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":"pcFileName"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"REPLACE"}, {"type":"Punctuation","value":"("}, {"type":"NameVariable","value":"pcFileName,"}, {"type":"LiteralStringDouble","value":"\"\u003cSS\u003e\""}, {"type":"Text","value":" "}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"ENTRY"}, {"type":"Punctuation","value":"("}, {"type":"LiteralNumberInteger","value":"3"}, {"type":"NameVariable","value":","}, {"type":"KeywordReserved","value":"STRING"}, {"type":"Punctuation","value":"("}, {"type":"KeywordReserved","value":"TIME"}, {"type":"NameVariable","value":","}, {"type":"LiteralStringDouble","value":"\"HH:MM:SS\""}, {"type":"Punctuation","value":")"}, {"type":"NameVariable","value":","}, {"type":"LiteralStringDouble","value":"\":\""}, {"type":"Text","value":" "}, {"type":"Punctuation","value":")"}, {"type":"Text","value":" "}, {"type":"Punctuation","value":")."}, {"type":"Text","value":"\n\n "}, {"type":"CommentMultiline","value":"/* Get rid of annoying slashes */"}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":"pcFileName"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"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":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"CommentPreproc","value":" \u00261 and _File._File-Number \u003c 32768', QUOTER(pcTableName)),NO-LOCK)."}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"IF"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"hBufferFile"}, {"type":"Punctuation","value":"::"}, {"type":"NameVariable","value":"_crc"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"\u003c\u003e"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"bTable"}, {"type":"Punctuation","value":"."}, {"type":"NameVariable","value":"cCrc"}, {"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":"/* It seems that it is not possible to refresh the schema cache of the running\n * session. You just have to restart your session.\n */"}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"PUBLISH "}, {"type":"LiteralStringDouble","value":"\"debugInfo\""}, {"type":"Text","value":" "}, {"type":"Punctuation","value":"("}, {"type":"LiteralNumberInteger","value":"1"}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"SUBSTITUTE"}, {"type":"Punctuation","value":"("}, {"type":"LiteralStringDouble","value":"\"File CRC changed, kill cache and build new\""}, {"type":"Punctuation","value":"))."}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"FOR"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"EACH"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"bFieldCache"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"WHERE"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"bFieldCache"}, {"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":"Punctuation","value":":"}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"DELETE"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"bFieldCache"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"END"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"FOR"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"EACH"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"bColumnCache"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"WHERE"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"bColumnCache"}, {"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":"Punctuation","value":":"}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"DELETE"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"bColumnCache"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"END"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n\n "}, {"type":"CommentMultiline","value":"/* Get a fresh list of tables */"}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"RUN"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"getTables"}, {"type":"Punctuation","value":"("}, {"type":"KeywordReserved","value":"INPUT"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"TABLE"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"bTableFilter,"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"OUTPUT"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"TABLE"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"bTable"}, {"type":"Punctuation","value":")."}, {"type":"Text","value":"\n\n "}, {"type":"CommentMultiline","value":"/* Find the table back. 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 "}, {"type":"KeywordReserved","value":"END"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"PUBLISH "}, {"type":"LiteralStringDouble","value":"\"DD:Timer\""}, {"type":"Text","value":" "}, {"type":"Punctuation","value":"("}, {"type":"LiteralStringDouble","value":"\"stop\""}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"LiteralStringSingle","value":"'getFields - step 1: verify CRC'"}, {"type":"Punctuation","value":")."}, {"type":"Text","value":"\n\n "}, {"type":"CommentMultiline","value":"/* First look in the memory-cache */"}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"IF"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"CAN-FIND"}, {"type":"Punctuation","value":"("}, {"type":"KeywordReserved","value":"FIRST"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"bFieldCache"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"WHERE"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"bFieldCache"}, {"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":"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":"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 2: check memory cache'"}, {"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":"\"Get from memory-cache\""}, {"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":"bFieldCache"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"WHERE"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"bFieldCache"}, {"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":"Punctuation","value":":"}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"CREATE"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"bField"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"BUFFER-COPY"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"bFieldCache"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"TO"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"bField"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"END"}, {"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":"bColumnCache"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"WHERE"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"bColumnCache"}, {"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":"Punctuation","value":":"}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"CREATE"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"bColumn"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"BUFFER-COPY"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"bColumnCache"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"TO"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"bColumn"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"END"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n\n "}, {"type":"CommentMultiline","value":"/* Update with settings from registry */"}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"RUN"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"updateFields"}, {"type":"Punctuation","value":"("}, {"type":"KeywordReserved","value":"INPUT"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"pcDatabase,"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"INPUT"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"pcTableName,"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"INPUT-OUTPUT"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"TABLE"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"bField"}, {"type":"Punctuation","value":")."}, {"type":"Text","value":"\n\n "}, {"type":"KeywordReserved","value":"PUBLISH "}, {"type":"LiteralStringDouble","value":"\"DD:Timer\""}, {"type":"Text","value":" "}, {"type":"Punctuation","value":"("}, {"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":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"getWorkFolder"}, {"type":"Punctuation","value":"()"}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"bTable"}, {"type":"Punctuation","value":"."}, {"type":"NameVariable","value":"cCacheId"}, {"type":"Punctuation","value":")."}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"PUBLISH "}, {"type":"LiteralStringDouble","value":"\"debugInfo\""}, {"type":"Text","value":" "}, {"type":"Punctuation","value":"("}, {"type":"LiteralNumberInteger","value":"2"}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"SUBSTITUTE"}, {"type":"Punctuation","value":"("}, {"type":"LiteralStringDouble","value":"\"Cachefile: \u00261\""}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"cCacheFile"}, {"type":"Punctuation","value":"))."}, {"type":"Text","value":"\n\n "}, {"type":"KeywordReserved","value":"IF"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"SEARCH"}, {"type":"Punctuation","value":"("}, {"type":"NameVariable","value":"cCacheFile"}, {"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":"DO"}, {"type":"Punctuation","value":":"}, {"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 3: get from disk cache'"}, {"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":"\"Get from disk cache\""}, {"type":"Punctuation","value":"))."}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"DATASET"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"dsFields"}, {"type":"Punctuation","value":":"}, {"type":"KeywordReserved","value":"READ-XML"}, {"type":"Punctuation","value":"("}, {"type":"LiteralStringDouble","value":"\"file\""}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"cCacheFile,"}, {"type":"Text","value":" "}, {"type":"LiteralStringDouble","value":"\"empty\""}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"?,"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"?,"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"?,"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"?"}, {"type":"Punctuation","value":")."}, {"type":"Text","value":"\n\n "}, {"type":"CommentMultiline","value":"/* Add to memory cache, so the next time it's even faster */"}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"IF"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"TEMP-TABLE"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"bField"}, {"type":"Punctuation","value":":"}, {"type":"KeywordReserved","value":"HAS-RECORDS"}, {"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":"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":"\"Add to first-level cache\""}, {"type":"Punctuation","value":"))."}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"FOR"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"EACH"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"bField"}, {"type":"Text","value":" "}, {"type":"CommentPreproc","value":"{\u0026TABLE-SCAN}"}, {"type":"Punctuation","value":":"}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"CREATE"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"bFieldCache"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"BUFFER-COPY"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"bField"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"TO"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"bFieldCache"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"END"}, {"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":"bColumn"}, {"type":"Text","value":" "}, {"type":"CommentPreproc","value":"{\u0026TABLE-SCAN}"}, {"type":"Punctuation","value":":"}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"CREATE"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"bColumnCache"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"BUFFER-COPY"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"bColumn"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"TO"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"bColumnCache"}, {"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":"/* Update with settings from registry */"}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"RUN"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"updateFields"}, {"type":"Punctuation","value":"("}, {"type":"KeywordReserved","value":"INPUT"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"pcDatabase,"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"INPUT"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"pcTableName,"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"INPUT-OUTPUT"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"TABLE"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"bField"}, {"type":"Punctuation","value":")."}, {"type":"Text","value":"\n\n "}, {"type":"KeywordReserved","value":"PUBLISH "}, {"type":"LiteralStringDouble","value":"\"DD:Timer\""}, {"type":"Text","value":" "}, {"type":"Punctuation","value":"("}, {"type":"LiteralStringDouble","value":"\"stop\""}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"LiteralStringSingle","value":"'getFields - step 3: get from disk 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":"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":"\"Not found in any cache, build tables...\""}, {"type":"Punctuation","value":"))."}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"END"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n\n "}, {"type":"CommentMultiline","value":"/*\n * If we get here, the table either cannot be found in the cache\n * or caching is disabled. Either way, fill the tt with fields\n */"}, {"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 4: build cache'"}, {"type":"Punctuation","value":")."}, {"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":"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 "}, {"type":"KeywordReserved","value":"CREATE"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"BUFFER"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"hBufferField"}, {"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":"\"._Field\""}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n\n "}, {"type":"KeywordReserved","value":"CREATE"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"QUERY"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"hQuery"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":"hQuery"}, {"type":"Punctuation","value":":"}, {"type":"KeywordReserved","value":"SET-BUFFERS"}, {"type":"Punctuation","value":"("}, {"type":"NameVariable","value":"hBufferFile,hBufferField"}, {"type":"Punctuation","value":")."}, {"type":"Text","value":"\n\n "}, {"type":"NameVariable","value":"cQuery"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"SUBSTITUTE"}, {"type":"Punctuation","value":"("}, {"type":"LiteralStringDouble","value":"\"FOR EACH \u00261._File WHERE \u00261._file._file-name = '\u00262' AND _File._File-Number \u003c 32768 NO-LOCK, \""}, {"type":"Text","value":" "}, {"type":"Operator","value":"+"}, {"type":"Text","value":"\n "}, {"type":"LiteralStringDouble","value":"\" EACH \u00261._Field OF \u00261._File NO-LOCK BY _ORDER\""}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"cSDBName"}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"pcTableName"}, {"type":"Text","value":"\n "}, {"type":"Punctuation","value":")."}, {"type":"Text","value":"\n\n "}, {"type":"NameVariable","value":"hQuery"}, {"type":"Punctuation","value":":"}, {"type":"KeywordReserved","value":"QUERY-PREPARE"}, {"type":"Punctuation","value":"("}, {"type":"NameVariable","value":"cQuery"}, {"type":"Punctuation","value":")."}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":"hQuery"}, {"type":"Punctuation","value":":"}, {"type":"KeywordReserved","value":"QUERY-OPEN"}, {"type":"Punctuation","value":"()."}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":"hQuery"}, {"type":"Punctuation","value":":"}, {"type":"KeywordReserved","value":"GET-FIRST"}, {"type":"Punctuation","value":"()."}, {"type":"Text","value":"\n\n "}, {"type":"CommentMultiline","value":"/* Get list of fields in primary index. */"}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":"cPrimIndexFields"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"getIndexFields"}, {"type":"Punctuation","value":"("}, {"type":"NameVariable","value":"cSDBName,"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"pcTableName,"}, {"type":"Text","value":" "}, {"type":"LiteralStringDouble","value":"\"P\""}, {"type":"Punctuation","value":")."}, {"type":"Text","value":"\n\n "}, {"type":"CommentMultiline","value":"/* Get list of fields in all unique indexes. */"}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":"cUniqueIndexFields"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"getIndexFields"}, {"type":"Punctuation","value":"("}, {"type":"NameVariable","value":"cSDBName,"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"pcTableName,"}, {"type":"Text","value":" "}, {"type":"LiteralStringDouble","value":"\"U\""}, {"type":"Punctuation","value":")."}, {"type":"Text","value":"\n\n "}, {"type":"CommentMultiline","value":"/* Get list of all previously selected fields */"}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":"cSelectedFields"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"getRegistry"}, {"type":"Punctuation","value":"("}, {"type":"KeywordReserved","value":"SUBSTITUTE"}, {"type":"Punctuation","value":"("}, {"type":"LiteralStringDouble","value":"\"DB:\u00261\""}, {"type":"NameVariable","value":",pcDatabase"}, {"type":"Punctuation","value":")"}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"SUBSTITUTE"}, {"type":"Punctuation","value":"("}, {"type":"LiteralStringDouble","value":"\"\u00261:Fields\""}, {"type":"NameVariable","value":",pcTableName"}, {"type":"Punctuation","value":"))."}, {"type":"Text","value":"\n\n "}, {"type":"CommentMultiline","value":"/* If none selected, set mask to 'all' */"}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"IF"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"cSelectedFields"}, {"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":"cSelectedFields"}, {"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":"Punctuation","value":"):"}, {"type":"KeywordReserved","value":"BUFFER-VALUE\n "}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"ASSIGN\n "}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"bField"}, {"type":"Punctuation","value":"."}, {"type":"NameVariable","value":"cXmlNodeName"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"getXmlNodeName"}, {"type":"Punctuation","value":"("}, {"type":"NameVariable","value":"bField"}, {"type":"Punctuation","value":"."}, {"type":"NameVariable","value":"cFieldName"}, {"type":"Punctuation","value":")"}, {"type":"Text","value":"\n "}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n\n "}, {"type":"CommentMultiline","value":"/* Make a list of fields on table level */"}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":"bTable"}, {"type":"Punctuation","value":"."}, {"type":"NameVariable","value":"cFields"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"bTable"}, {"type":"Punctuation","value":"."}, {"type":"NameVariable","value":"cFields"}, {"type":"Text","value":" "}, {"type":"Operator","value":"+"}, {"type":"Text","value":" "}, {"type":"LiteralStringDouble","value":"\",\""}, {"type":"Text","value":" "}, {"type":"Operator","value":"+"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"bField"}, {"type":"Punctuation","value":"."}, {"type":"NameVariable","value":"cFieldName"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n\n "}, {"type":"CommentMultiline","value":"/* Some types should not be shown like CLOB BLOB and RAW */"}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":"lDataField"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"Punctuation","value":"("}, {"type":"KeywordReserved","value":"LOOKUP"}, {"type":"Punctuation","value":"("}, {"type":"NameVariable","value":"bField"}, {"type":"Punctuation","value":"."}, {"type":"NameVariable","value":"cDataType,"}, {"type":"Text","value":" "}, {"type":"LiteralStringSingle","value":"'clob,blob,raw'"}, {"type":"Punctuation","value":")"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"LiteralNumberInteger","value":"0"}, {"type":"Punctuation","value":")."}, {"type":"Text","value":"\n\n "}, {"type":"CommentMultiline","value":"/* Create TT records for each column to show, except for CLOB / BLOB / RAW */"}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"IF"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"lDataField"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"TRUE"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"THEN\n "}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"DO"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"iFieldExtent"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"Punctuation","value":"("}, {"type":"KeywordReserved","value":"IF"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"bField"}, {"type":"Punctuation","value":"."}, {"type":"NameVariable","value":"iExtent"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"LiteralNumberInteger","value":"0"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"THEN"}, {"type":"Text","value":" "}, {"type":"LiteralNumberInteger","value":"0"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"ELSE"}, {"type":"Text","value":" "}, {"type":"LiteralNumberInteger","value":"1"}, {"type":"Punctuation","value":")"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"TO"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"bField"}, {"type":"Punctuation","value":"."}, {"type":"NameVariable","value":"iExtent"}, {"type":"Punctuation","value":":"}, {"type":"Text","value":"\n\n "}, {"type":"NameVariable","value":"iDataOrder"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"iDataOrder"}, {"type":"Text","value":" "}, {"type":"Operator","value":"+"}, {"type":"Text","value":" "}, {"type":"LiteralNumberInteger","value":"1"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n\n "}, {"type":"KeywordReserved","value":"CREATE"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"bColumn"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"ASSIGN\n "}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"bColumn"}, {"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":"bColumn"}, {"type":"Punctuation","value":"."}, {"type":"NameVariable","value":"cDatabase"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"bField"}, {"type":"Punctuation","value":"."}, {"type":"NameVariable","value":"cDatabase"}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":"bColumn"}, {"type":"Punctuation","value":"."}, {"type":"NameVariable","value":"cTableName"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"bField"}, {"type":"Punctuation","value":"."}, {"type":"NameVariable","value":"cTablename"}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":"bColumn"}, {"type":"Punctuation","value":"."}, {"type":"NameVariable","value":"cFieldName"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"bField"}, {"type":"Punctuation","value":"."}, {"type":"NameVariable","value":"cFieldName"}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":"bColumn"}, {"type":"Punctuation","value":"."}, {"type":"NameVariable","value":"iExtent"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"iFieldExtent"}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":"bColumn"}, {"type":"Punctuation","value":"."}, {"type":"NameVariable","value":"cFullName"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"bField"}, {"type":"Punctuation","value":"."}, {"type":"NameVariable","value":"cFieldName"}, {"type":"Text","value":" "}, {"type":"Operator","value":"+"}, {"type":"Text","value":" "}, {"type":"Punctuation","value":"("}, {"type":"KeywordReserved","value":"IF"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"iFieldExtent"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"\u003e"}, {"type":"Text","value":" "}, {"type":"LiteralNumberInteger","value":"0"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"THEN"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"SUBSTITUTE"}, {"type":"Punctuation","value":"("}, {"type":"LiteralStringDouble","value":"\"[\u00261]\""}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"iFieldExtent"}, {"type":"Punctuation","value":")"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"ELSE "}, {"type":"LiteralStringDouble","value":"\"\""}, {"type":"Punctuation","value":")"}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":"bColumn"}, {"type":"Punctuation","value":"."}, {"type":"NameVariable","value":"iColumnNr"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"iDataOrder"}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":"bColumn"}, {"type":"Punctuation","value":"."}, {"type":"NameVariable","value":"iOrder"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"bField"}, {"type":"Punctuation","value":"."}, {"type":"NameVariable","value":"iOrder"}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":"bColumn"}, {"type":"Punctuation","value":"."}, {"type":"NameVariable","value":"cLabel"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"bField"}, {"type":"Punctuation","value":"."}, {"type":"NameVariable","value":"cLabel"}, {"type":"Text","value":"\n "}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"PUBLISH "}, {"type":"LiteralStringDouble","value":"\"debugInfo\""}, {"type":"Punctuation","value":"("}, {"type":"LiteralNumberInteger","value":"3"}, {"type":"NameVariable","value":","}, {"type":"KeywordReserved","value":"SUBSTITUTE"}, {"type":"Punctuation","value":"("}, {"type":"LiteralStringDouble","value":"\"Field \u00261 created\""}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"bColumn"}, {"type":"Punctuation","value":"."}, {"type":"NameVariable","value":"cFullName"}, {"type":"Punctuation","value":"))."}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"END"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":" "}, {"type":"CommentMultiline","value":"/* For each extent nr */"}, {"type":"Text","value":"\n\n "}, {"type":"NameVariable","value":"hQuery"}, {"type":"Punctuation","value":":"}, {"type":"KeywordReserved","value":"GET-NEXT"}, {"type":"Punctuation","value":"()."}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"END"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":"hQuery"}, {"type":"Punctuation","value":":"}, {"type":"KeywordReserved","value":"QUERY-CLOSE"}, {"type":"Punctuation","value":"()."}, {"type":"Text","value":"\n\n "}, {"type":"KeywordReserved","value":"DELETE"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"OBJECT"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"hQuery"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"DELETE"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"OBJECT"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"hBufferField"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"DELETE"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"OBJECT"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"hBufferFile"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n\n "}, {"type":"CommentMultiline","value":"/* Fieldlist */"}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":"bTable"}, {"type":"Punctuation","value":"."}, {"type":"NameVariable","value":"cFields"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"SUBSTRING"}, {"type":"Punctuation","value":"("}, {"type":"NameVariable","value":"bTable"}, {"type":"Punctuation","value":"."}, {"type":"NameVariable","value":"cFields,"}, {"type":"LiteralNumberInteger","value":"2"}, {"type":"Punctuation","value":")."}, {"type":"Text","value":"\n\n "}, {"type":"CommentMultiline","value":"/* Add columns for recid/rowid */"}, {"type":"Text","value":"\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":"LiteralNumberInteger","value":"2"}, {"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":"KeywordReserved","value":"ENTRY"}, {"type":"Punctuation","value":"("}, {"type":"NameVariable","value":"i,"}, {"type":"LiteralStringDouble","value":"\"RECID,ROWID\""}, {"type":"Punctuation","value":")"}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":"bField"}, {"type":"Punctuation","value":"."}, {"type":"NameVariable","value":"lShow"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"FALSE\n "}, {"type":"Text","value":" "}, {"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 "}, {"type":"NameVariable","value":"bField"}, {"type":"Punctuation","value":"."}, {"type":"NameVariable","value":"cFieldName"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"bField"}, {"type":"Punctuation","value":"."}, {"type":"NameVariable","value":"cFieldName"}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":"bField"}, {"type":"Punctuation","value":"."}, {"type":"NameVariable","value":"cFullName"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"bField"}, {"type":"Punctuation","value":"."}, {"type":"NameVariable","value":"cFieldName"}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":"bField"}, {"type":"Punctuation","value":"."}, {"type":"NameVariable","value":"cDataType"}, {"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":"Text","value":"\n "}, {"type":"NameVariable","value":"bField"}, {"type":"Punctuation","value":"."}, {"type":"NameVariable","value":"cFormat"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"ENTRY"}, {"type":"Punctuation","value":"("}, {"type":"NameVariable","value":"i,"}, {"type":"LiteralStringDouble","value":"\"X(20),X(24)\""}, {"type":"Punctuation","value":")"}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":"bField"}, {"type":"Punctuation","value":"."}, {"type":"NameVariable","value":"cFormatOrg"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"bField"}, {"type":"Punctuation","value":"."}, {"type":"NameVariable","value":"cFormat"}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":"bField"}, {"type":"Punctuation","value":"."}, {"type":"NameVariable","value":"cLabel"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"bField"}, {"type":"Punctuation","value":"."}, {"type":"NameVariable","value":"cFieldName"}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":"bField"}, {"type":"Punctuation","value":"."}, {"type":"NameVariable","value":"lPrimary"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"NO\n "}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"bField"}, {"type":"Punctuation","value":"."}, {"type":"NameVariable","value":"iExtent"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"LiteralNumberInteger","value":"0"}, {"type":"Text","value":"\n "}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n\n "}, {"type":"NameVariable","value":"iDataOrder"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"iDataOrder"}, {"type":"Text","value":" "}, {"type":"Operator","value":"+"}, {"type":"Text","value":" "}, {"type":"LiteralNumberInteger","value":"1"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"CREATE"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"bColumn"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"ASSIGN\n "}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"bColumn"}, {"type":"Punctuation","value":"."}, {"type":"NameVariable","value":"cTableCacheId"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"bField"}, {"type":"Punctuation","value":"."}, {"type":"NameVariable","value":"cTableCacheId"}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":"bColumn"}, {"type":"Punctuation","value":"."}, {"type":"NameVariable","value":"cDatabase"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"bField"}, {"type":"Punctuation","value":"."}, {"type":"NameVariable","value":"cDatabase"}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":"bColumn"}, {"type":"Punctuation","value":"."}, {"type":"NameVariable","value":"cTableName"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"bField"}, {"type":"Punctuation","value":"."}, {"type":"NameVariable","value":"cTablename"}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":"bColumn"}, {"type":"Punctuation","value":"."}, {"type":"NameVariable","value":"cFieldName"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"bField"}, {"type":"Punctuation","value":"."}, {"type":"NameVariable","value":"cFieldName"}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":"bColumn"}, {"type":"Punctuation","value":"."}, {"type":"NameVariable","value":"iExtent"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"LiteralNumberInteger","value":"0"}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":"bColumn"}, {"type":"Punctuation","value":"."}, {"type":"NameVariable","value":"cFullName"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"bField"}, {"type":"Punctuation","value":"."}, {"type":"NameVariable","value":"cFieldName"}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":"bColumn"}, {"type":"Punctuation","value":"."}, {"type":"NameVariable","value":"iColumnNr"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"iDataOrder"}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":"bColumn"}, {"type":"Punctuation","value":"."}, {"type":"NameVariable","value":"iOrder"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"bField"}, {"type":"Punctuation","value":"."}, {"type":"NameVariable","value":"iOrder"}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":"bColumn"}, {"type":"Punctuation","value":"."}, {"type":"NameVariable","value":"cLabel"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"bField"}, {"type":"Punctuation","value":"."}, {"type":"NameVariable","value":"cLabel"}, {"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":"PUBLISH "}, {"type":"LiteralStringDouble","value":"\"DD:Timer\""}, {"type":"Text","value":" "}, {"type":"Punctuation","value":"("}, {"type":"LiteralStringDouble","value":"\"stop\""}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"LiteralStringSingle","value":"'getFields - step 4: build cache'"}, {"type":"Punctuation","value":")."}, {"type":"Text","value":"\n\n "}, {"type":"CommentMultiline","value":"/* Update the cache */"}, {"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":"/* Add to disk 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 5: save to disk'"}, {"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":"\"Add to second-level cache.\""}, {"type":"Punctuation","value":"))."}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"DATASET"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"dsFields"}, {"type":"Punctuation","value":":"}, {"type":"KeywordReserved","value":"WRITE-XML"}, {"type":"Punctuation","value":"("}, {"type":"Text","value":" "}, {"type":"LiteralStringDouble","value":"\"file\""}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"cCacheFile,"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"YES"}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"?,"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"?,"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"NO"}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"NO"}, {"type":"Punctuation","value":")."}, {"type":"Text","value":"\n\n "}, {"type":"CommentMultiline","value":"/* Add to memory cache */"}, {"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":"\"Add to first-level cache.\""}, {"type":"Punctuation","value":"))."}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"FOR"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"EACH"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"bField"}, {"type":"Text","value":" "}, {"type":"CommentPreproc","value":"{\u0026TABLE-SCAN}"}, {"type":"Punctuation","value":":"}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"CREATE"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"bFieldCache"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"BUFFER-COPY"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"bField"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"TO"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"bFieldCache"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"END"}, {"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":"bColumn"}, {"type":"Text","value":" "}, {"type":"CommentPreproc","value":"{\u0026TABLE-SCAN}"}, {"type":"Punctuation","value":":"}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"CREATE"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"bColumnCache"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"BUFFER-COPY"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"bColumn"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"TO"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"bColumnCache"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"END"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"PUBLISH "}, {"type":"LiteralStringDouble","value":"\"DD:Timer\""}, {"type":"Text","value":" "}, {"type":"Punctuation","value":"("}, {"type":"LiteralStringDouble","value":"\"stop\""}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"LiteralStringSingle","value":"'getFields - step 5: save to disk'"}, {"type":"Punctuation","value":")."}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"END"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n\n "}, {"type":"CommentMultiline","value":"/* Update fields with settings from registry */"}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"RUN"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"updateFields"}, {"type":"Punctuation","value":"("}, {"type":"KeywordReserved","value":"INPUT"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"pcDatabase,"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"INPUT"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"pcTableName,"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"INPUT-OUTPUT"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"TABLE"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"bField"}, {"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":"/* getFields */"}, {"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-getMouseXY) = 0 \u0026THEN\n\n\u0026ANALYZE-SUSPEND _UIB-CODE-BLOCK _PROCEDURE getMouseXY Procedure"}, {"type":"Text","value":"\n"}, {"type":"KeywordReserved","value":"PROCEDURE"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"getMouseXY"}, {"type":"Text","value":" "}, {"type":"Punctuation","value":":"}, {"type":"Text","value":"\n"}, {"type":"CommentMultiline","value":"/* Get the position of the mouse relative to the frame\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":"OUTPUT"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"PARAMETER"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"piMouseX"}, {"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":"OUTPUT"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"PARAMETER"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"piMouseY"}, {"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":"VARIABLE"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"lp"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"AS"}, {"type":"Text","value":" "}, {"type":"KeywordType","value":"MEMPTR"}, {"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":"iRet"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"AS"}, {"type":"Text","value":" "}, {"type":"KeywordType","value":"INT64 "}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"NO-UNDO"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n\n "}, {"type":"KeywordReserved","value":"SET-SIZE"}, {"type":"Punctuation","value":"("}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"LP"}, {"type":"Text","value":" "}, {"type":"Punctuation","value":")"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"LiteralNumberInteger","value":"16"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n\n "}, {"type":"CommentPreproc","value":"{\u0026_proparse_prolint-nowarn(varusage)}"}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"RUN"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"GetCursorPos"}, {"type":"Punctuation","value":"("}, {"type":"KeywordReserved","value":"INPUT"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"GET-POINTER-VALUE"}, {"type":"Punctuation","value":"("}, {"type":"NameVariable","value":"lp"}, {"type":"Punctuation","value":")"}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"OUTPUT"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"iRet"}, {"type":"Punctuation","value":")."}, {"type":"Text","value":"\n\n "}, {"type":"KeywordReserved","value":"RUN"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"ScreenToClient"}, {"type":"Text","value":" "}, {"type":"Punctuation","value":"("}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"INPUT"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"phFrame"}, {"type":"Punctuation","value":":"}, {"type":"KeywordReserved","value":"HWND"}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"INPUT"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"lp"}, {"type":"Text","value":" "}, {"type":"Punctuation","value":")."}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":"piMouseX"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"GET-LONG"}, {"type":"Punctuation","value":"("}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"lp,"}, {"type":"Text","value":" "}, {"type":"LiteralNumberInteger","value":"1"}, {"type":"Text","value":" "}, {"type":"Punctuation","value":")."}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":"piMouseY"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"GET-LONG"}, {"type":"Punctuation","value":"("}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"lp,"}, {"type":"Text","value":" "}, {"type":"LiteralNumberInteger","value":"5"}, {"type":"Text","value":" "}, {"type":"Punctuation","value":")."}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"SET-SIZE"}, {"type":"Punctuation","value":"("}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"LP"}, {"type":"Text","value":" "}, {"type":"Punctuation","value":")"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"LiteralNumberInteger","value":"0"}, {"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":"\"Mouse X/Y = \u00261 / \u00262\""}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"piMouseX,"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"piMouseY"}, {"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":"/* getMouseXY */"}, {"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-getQueryTable) = 0 \u0026THEN\n\n\u0026ANALYZE-SUSPEND _UIB-CODE-BLOCK _PROCEDURE getQueryTable Procedure"}, {"type":"Text","value":"\n"}, {"type":"KeywordReserved","value":"PROCEDURE"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"getQueryTable"}, {"type":"Text","value":" "}, {"type":"Punctuation","value":":"}, {"type":"Text","value":"\n"}, {"type":"CommentMultiline","value":"/* Get the ttQuery table\n * Note: This procedure just returns the table, no further logic needed.\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":"ttQuery"}, {"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":"/* getQueryTable */"}, {"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-getRegistryTable) = 0 \u0026THEN\n\n\u0026ANALYZE-SUSPEND _UIB-CODE-BLOCK _PROCEDURE getRegistryTable Procedure"}, {"type":"Text","value":"\n"}, {"type":"KeywordReserved","value":"PROCEDURE"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"getRegistryTable"}, {"type":"Text","value":" "}, {"type":"Punctuation","value":":"}, {"type":"Text","value":"\n"}, {"type":"CommentMultiline","value":"/* Return complete registry 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":"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":"/* getRegistryTable */"}, {"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-getTables) = 0 \u0026THEN\n\n\u0026ANALYZE-SUSPEND _UIB-CODE-BLOCK _PROCEDURE getTables Procedure"}, {"type":"Text","value":"\n"}, {"type":"KeywordReserved","value":"PROCEDURE"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"getTables"}, {"type":"Text","value":" "}, {"type":"Punctuation","value":":"}, {"type":"Text","value":"\n"}, {"type":"CommentMultiline","value":"/* Fill ttTable with all currently connected databases.\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":"KeywordReserved","value":"TABLE"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"FOR"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"ttTableFilter"}, {"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":"TABLE"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"FOR"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"ttTable"}, {"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":"hDbBuffer"}, {"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":"hDbStatusBuffer"}, {"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":"hDbQuery"}, {"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":"iDatabase"}, {"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":"cCacheTimeStamp"}, {"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":"cCacheDir"}, {"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":"cSchemaCacheFile"}, {"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":"cOneCacheFile"}, {"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":"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":"bTableXml"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"FOR"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"ttTableXml"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n\n "}, {"type":"CommentPreproc","value":"{\u0026timerStart}"}, {"type":"Text","value":"\n\n "}, {"type":"CommentMultiline","value":"/* Dataserver support can be for:\n *\n * V9: \"PROGRESS,AS400,ORACLE,MSS,ODBC\"\n * V10: \"PROGRESS,ORACLE,MSS,ODBC\" (from V10 no native support for AS400)\n * V11: \"PROGRESS,ORACLE,MSS,ODBC\"\n * V12: \"PROGRESS,ORACLE,MSS\" (from V12 no ODBC support anymore)\n *\n */"}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"EMPTY"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"TEMP-TABLE"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"ttTable"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"CREATE"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"WIDGET-POOL "}, {"type":"LiteralStringDouble","value":"\"metaInfo\""}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n\n "}, {"type":"NameVariable","value":"#"}, {"type":"KeywordReserved","value":"Database"}, {"type":"Punctuation","value":":"}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"DO"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"iDatabase"}, {"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-DBS"}, {"type":"Punctuation","value":":"}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"IF"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"DBTYPE"}, {"type":"Punctuation","value":"("}, {"type":"NameVariable","value":"iDatabase"}, {"type":"Punctuation","value":")"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"\u003c\u003e"}, {"type":"Text","value":" "}, {"type":"LiteralStringDouble","value":"\"PROGRESS\""}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"THEN"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"NEXT "}, {"type":"NameVariable","value":"#"}, {"type":"KeywordReserved","value":"Database"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n\n "}, {"type":"CommentMultiline","value":"/* Compose name of the cache file. Use date/time of last schema change in the name */"}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"IF"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"glCacheTableDefs"}, {"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":"KeywordReserved","value":"BUFFER"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"hDbStatusBuffer"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"FOR"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"TABLE"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"LDBNAME"}, {"type":"Punctuation","value":"("}, {"type":"NameVariable","value":"iDatabase"}, {"type":"Punctuation","value":")"}, {"type":"Text","value":" "}, {"type":"Operator","value":"+"}, {"type":"Text","value":" "}, {"type":"LiteralStringDouble","value":"\"._DbStatus\""}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"IN"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"WIDGET-POOL "}, {"type":"LiteralStringDouble","value":"\"metaInfo\""}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":"hDbStatusBuffer"}, {"type":"Punctuation","value":":"}, {"type":"KeywordReserved","value":"FIND-FIRST"}, {"type":"Punctuation","value":"("}, {"type":"LiteralStringDouble","value":"\"\""}, {"type":"NameVariable","value":","}, {"type":"KeywordReserved","value":"NO-LOCK"}, {"type":"Punctuation","value":")."}, {"type":"Text","value":"\n\n "}, {"type":"KeywordReserved","value":"ASSIGN\n "}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"cCacheTimeStamp"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"REPLACE"}, {"type":"Punctuation","value":"("}, {"type":"KeywordReserved","value":"REPLACE"}, {"type":"Punctuation","value":"("}, {"type":"NameVariable","value":"hDbStatusBuffer"}, {"type":"Punctuation","value":"::"}, {"type":"NameVariable","value":"_dbstatus"}, {"type":"Operator","value":"-"}, {"type":"NameVariable","value":"cachestamp,"}, {"type":"LiteralStringDouble","value":"\" \""}, {"type":"NameVariable","value":","}, {"type":"LiteralStringDouble","value":"\"_\""}, {"type":"Punctuation","value":")"}, {"type":"NameVariable","value":","}, {"type":"LiteralStringDouble","value":"\":\""}, {"type":"NameVariable","value":","}, {"type":"LiteralStringDouble","value":"\"\""}, {"type":"Punctuation","value":")"}, {"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":"LiteralStringDouble","value":"\"\u00261cache\\db.\u00262.\u00263.xml\""}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"getWorkFolder"}, {"type":"Punctuation","value":"()"}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"LDBNAME"}, {"type":"Punctuation","value":"("}, {"type":"NameVariable","value":"iDatabase"}, {"type":"Punctuation","value":")"}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"cCacheTimeStamp"}, {"type":"Text","value":" "}, {"type":"Punctuation","value":")."}, {"type":"Text","value":"\n\n "}, {"type":"KeywordReserved","value":"DELETE"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"OBJECT"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"hDbStatusBuffer"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"END"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n\n "}, {"type":"CommentMultiline","value":"/* If caching enabled and there is a cache file, read it */"}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"IF"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"glCacheTableDefs"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"AND"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"SEARCH"}, {"type":"Punctuation","value":"("}, {"type":"NameVariable","value":"cCacheFile"}, {"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":"DO"}, {"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":"\"Get table list from cache file \u00261\""}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"cCacheFile"}, {"type":"Punctuation","value":"))."}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"TEMP-TABLE"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"ttTable"}, {"type":"Punctuation","value":":"}, {"type":"KeywordReserved","value":"READ-XML"}, {"type":"Punctuation","value":"("}, {"type":"LiteralStringDouble","value":"\"file\""}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"cCacheFile,"}, {"type":"Text","value":" "}, {"type":"LiteralStringDouble","value":"\"APPEND\""}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"?,"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"?,"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"?,"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"?"}, {"type":"Punctuation","value":")."}, {"type":"Text","value":"\n\n "}, {"type":"NameVariable","value":"cCacheDir"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"SUBSTITUTE"}, {"type":"Punctuation","value":"("}, {"type":"Text","value":" "}, {"type":"LiteralStringDouble","value":"\"\u00261cache\""}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"getWorkFolder"}, {"type":"Punctuation","value":"()"}, {"type":"Text","value":" "}, {"type":"Punctuation","value":")."}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"INPUT"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"FROM"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"OS-DIR"}, {"type":"Punctuation","value":"("}, {"type":"NameVariable","value":"cCacheDir"}, {"type":"Punctuation","value":")."}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":"#ReadSchemaCache"}, {"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":"cSchemaCacheFile"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n\n "}, {"type":"KeywordReserved","value":"IF"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"cSchemaCacheFile"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"BEGINS"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"SUBSTITUTE"}, {"type":"Punctuation","value":"("}, {"type":"LiteralStringDouble","value":"\"db.\u00261;\""}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"LDBNAME"}, {"type":"Punctuation","value":"("}, {"type":"NameVariable","value":"iDatabase"}, {"type":"Punctuation","value":"))"}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"AND"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"ENTRY"}, {"type":"Punctuation","value":"("}, {"type":"KeywordReserved","value":"NUM-ENTRIES"}, {"type":"Punctuation","value":"("}, {"type":"NameVariable","value":"cSchemaCacheFile,"}, {"type":"Text","value":" "}, {"type":"LiteralStringDouble","value":"\".\""}, {"type":"Punctuation","value":")"}, {"type":"Text","value":" "}, {"type":"Operator","value":"-"}, {"type":"Text","value":" "}, {"type":"LiteralNumberInteger","value":"1"}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"cSchemaCacheFile,"}, {"type":"Text","value":" "}, {"type":"LiteralStringDouble","value":"\".\""}, {"type":"Punctuation","value":")"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"ENTRY "}, {"type":"Punctuation","value":"("}, {"type":"KeywordReserved","value":"NUM-ENTRIES"}, {"type":"Punctuation","value":"("}, {"type":"NameVariable","value":"cCacheFile,"}, {"type":"Text","value":" "}, {"type":"LiteralStringDouble","value":"\".\""}, {"type":"Punctuation","value":")"}, {"type":"Text","value":" "}, {"type":"Operator","value":"-"}, {"type":"Text","value":" "}, {"type":"LiteralNumberInteger","value":"1"}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"cCacheFile,"}, {"type":"Text","value":" "}, {"type":"LiteralStringDouble","value":"\".\""}, {"type":"Punctuation","value":")"}, {"type":"Text","value":" "}, {"type":"CommentMultiline","value":"/* Check timestamp */"}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"THEN\n "}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"DO"}, {"type":"Punctuation","value":":"}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":"cOneCacheFile"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"SUBSTITUTE"}, {"type":"Punctuation","value":"("}, {"type":"Text","value":" "}, {"type":"LiteralStringDouble","value":"\"\u00261\\\u00262\""}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"cCacheDir,"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"cSchemaCacheFile"}, {"type":"Punctuation","value":")."}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"TEMP-TABLE"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"ttTable"}, {"type":"Punctuation","value":":"}, {"type":"KeywordReserved","value":"READ-XML"}, {"type":"Punctuation","value":"("}, {"type":"LiteralStringDouble","value":"\"file\""}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"cOneCacheFile,"}, {"type":"Text","value":" "}, {"type":"LiteralStringDouble","value":"\"APPEND\""}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"?,"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"?,"}, {"type":"Text","value":" "}, {"type":"NameVariable","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 "}, {"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 "}, {"type":"KeywordReserved","value":"END"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n\n "}, {"type":"CommentMultiline","value":"/* Otherwise build it */"}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"ELSE\n "}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"DO"}, {"type":"Punctuation","value":":"}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"CREATE"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"ALIAS "}, {"type":"LiteralStringSingle","value":"'dictdb'"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"FOR"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"DATABASE"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"VALUE"}, {"type":"Punctuation","value":"("}, {"type":"KeywordReserved","value":"LDBNAME"}, {"type":"Punctuation","value":"("}, {"type":"NameVariable","value":"iDatabase"}, {"type":"Punctuation","value":"))."}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"RUN"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"getSchema"}, {"type":"Punctuation","value":"."}, {"type":"NameVariable","value":"p"}, {"type":"Punctuation","value":"("}, {"type":"KeywordReserved","value":"INPUT"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"TABLE"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"ttTable"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"BY"}, {"type":"Operator","value":"-"}, {"type":"NameVariable","value":"REFERENCE"}, {"type":"Punctuation","value":")."}, {"type":"Text","value":"\n\n "}, {"type":"CommentMultiline","value":"/* Save cache file for next time */"}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"IF"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"glCacheTableDefs"}, {"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":"/* Move the tables of the current db to a separate tt so we can dump it. */"}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"EMPTY"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"TEMP-TABLE"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"ttTableXml"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n\n "}, {"type":"KeywordReserved","value":"CREATE"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"QUERY"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"hDbQuery"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"IN"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"WIDGET-POOL "}, {"type":"LiteralStringDouble","value":"\"metaInfo\""}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"CREATE"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"BUFFER"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"hDbBuffer"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"FOR"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"TABLE"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"LDBNAME"}, {"type":"Punctuation","value":"("}, {"type":"NameVariable","value":"iDatabase"}, {"type":"Punctuation","value":")"}, {"type":"Text","value":" "}, {"type":"Operator","value":"+"}, {"type":"Text","value":" "}, {"type":"LiteralStringDouble","value":"\"._Db\""}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"IN"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"WIDGET-POOL "}, {"type":"LiteralStringDouble","value":"\"metaInfo\""}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n\n "}, {"type":"NameVariable","value":"hDbQuery"}, {"type":"Punctuation","value":":"}, {"type":"KeywordReserved","value":"SET-BUFFERS"}, {"type":"Punctuation","value":"("}, {"type":"NameVariable","value":"hDbBuffer"}, {"type":"Punctuation","value":")."}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":"hDbQuery"}, {"type":"Punctuation","value":":"}, {"type":"KeywordReserved","value":"QUERY-PREPARE"}, {"type":"Punctuation","value":"("}, {"type":"LiteralStringDouble","value":"\"FOR EACH _Db NO-LOCK WHERE _Db._Db-local = TRUE\""}, {"type":"Punctuation","value":")."}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":"hDbQuery"}, {"type":"Punctuation","value":":"}, {"type":"KeywordReserved","value":"QUERY-OPEN"}, {"type":"Punctuation","value":"()."}, {"type":"Text","value":"\n\n "}, {"type":"NameVariable","value":"#DB"}, {"type":"Punctuation","value":":"}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"REPEAT"}, {"type":"Punctuation","value":":"}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":"hDbQuery"}, {"type":"Punctuation","value":":"}, {"type":"KeywordReserved","value":"GET-NEXT"}, {"type":"Punctuation","value":"()."}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"IF"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"hDbQuery"}, {"type":"Punctuation","value":":"}, {"type":"KeywordReserved","value":"QUERY-OFF-END"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"THEN"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"LEAVE "}, {"type":"NameVariable","value":"#DB"}, {"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":"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":"Punctuation","value":"("}, {"type":"KeywordReserved","value":"IF"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"hDbBuffer"}, {"type":"Punctuation","value":"::"}, {"type":"NameVariable","value":"_Db"}, {"type":"Operator","value":"-"}, {"type":"NameVariable","value":"slave"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"THEN"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"hDbBuffer"}, {"type":"Punctuation","value":"::"}, {"type":"NameVariable","value":"_Db"}, {"type":"Operator","value":"-"}, {"type":"NameVariable","value":"name"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"ELSE"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"LDBNAME"}, {"type":"Punctuation","value":"("}, {"type":"NameVariable","value":"iDatabase"}, {"type":"Punctuation","value":")):"}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"CREATE"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"bTableXml"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"BUFFER-COPY"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"bTable"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"TO"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"bTableXml"}, {"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":"NameVariable","value":"hDbQuery"}, {"type":"Punctuation","value":":"}, {"type":"KeywordReserved","value":"QUERY-CLOSE"}, {"type":"Punctuation","value":"()."}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"DELETE"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"OBJECT"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"hDbQuery"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"DELETE"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"OBJECT"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"hDbBuffer"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n\n "}, {"type":"KeywordReserved","value":"TEMP-TABLE"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"ttTableXml"}, {"type":"Punctuation","value":":"}, {"type":"KeywordReserved","value":"WRITE-XML"}, {"type":"Punctuation","value":"("}, {"type":"LiteralStringDouble","value":"\"file\""}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"cCacheFile,"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"YES"}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"?,"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"?,"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"NO"}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"NO"}, {"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":"ttTableXml"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n\n "}, {"type":"CommentMultiline","value":"/* Support Dataservers */"}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"FOR"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"EACH"}, {"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":"cSchemaHolder"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"LDBNAME"}, {"type":"Punctuation","value":"("}, {"type":"NameVariable","value":"iDatabase"}, {"type":"Punctuation","value":")"}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"BREAK"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"BY"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"bTable"}, {"type":"Punctuation","value":"."}, {"type":"NameVariable","value":"cDatabase"}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"BY"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"bTable"}, {"type":"Punctuation","value":"."}, {"type":"NameVariable","value":"cTableName"}, {"type":"Punctuation","value":":"}, {"type":"Text","value":"\n\n "}, {"type":"KeywordReserved","value":"IF"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"FIRST-OF"}, {"type":"Punctuation","value":"("}, {"type":"NameVariable","value":"bTable"}, {"type":"Punctuation","value":"."}, {"type":"NameVariable","value":"cDatabase"}, {"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":"cCacheFile"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"SUBSTITUTE"}, {"type":"Punctuation","value":"("}, {"type":"Text","value":" "}, {"type":"LiteralStringDouble","value":"\"\u00261cache\\db.\u00262;\u00263.\u00264.xml\""}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"getWorkFolder"}, {"type":"Punctuation","value":"()"}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"LDBNAME"}, {"type":"Punctuation","value":"("}, {"type":"NameVariable","value":"iDatabase"}, {"type":"Punctuation","value":")"}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"bTable"}, {"type":"Punctuation","value":"."}, {"type":"NameVariable","value":"cDatabase"}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"cCacheTimeStamp"}, {"type":"Text","value":"\n "}, {"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":"bTableXml"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"END"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n\n "}, {"type":"KeywordReserved","value":"CREATE"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"bTableXml"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"BUFFER-COPY"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"bTable"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"TO"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"bTableXml"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n\n "}, {"type":"KeywordReserved","value":"IF"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"LAST-OF"}, {"type":"Punctuation","value":"("}, {"type":"NameVariable","value":"bTable"}, {"type":"Punctuation","value":"."}, {"type":"NameVariable","value":"cDatabase"}, {"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":"TEMP-TABLE"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"bTableXml"}, {"type":"Punctuation","value":":"}, {"type":"KeywordReserved","value":"WRITE-XML"}, {"type":"Punctuation","value":"("}, {"type":"LiteralStringDouble","value":"\"file\""}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"cCacheFile,"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"YES"}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"?,"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"?,"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"NO"}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"NO"}, {"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":"bTableXml"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"END"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":" "}, {"type":"CommentMultiline","value":"/* IF LAST-OF */"}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"END"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":" "}, {"type":"CommentMultiline","value":"/* FOR EACH bTable */"}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"END"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":" "}, {"type":"CommentMultiline","value":"/* IF glCacheTableDefs THEN */"}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"END"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":" "}, {"type":"CommentMultiline","value":"/* tt empty */"}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"END"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":" "}, {"type":"CommentMultiline","value":"/* 1 to num-dbs */"}, {"type":"Text","value":"\n\n "}, {"type":"KeywordReserved","value":"DELETE"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"WIDGET-POOL "}, {"type":"LiteralStringDouble","value":"\"metaInfo\""}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n\n "}, {"type":"CommentMultiline","value":"/* Apply filter to collection of tables */"}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"RUN"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"getTablesFiltered"}, {"type":"Punctuation","value":"("}, {"type":"KeywordReserved","value":"INPUT"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"TABLE"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"ttTableFilter,"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"OUTPUT"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"TABLE"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"ttTable"}, {"type":"Punctuation","value":")."}, {"type":"Text","value":"\n\n "}, {"type":"CommentMultiline","value":"/* Get table properties from the INI file */"}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"RUN"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"getTableStats"}, {"type":"Punctuation","value":"("}, {"type":"KeywordReserved","value":"INPUT-OUTPUT"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"TABLE"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"ttTable"}, {"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":"/* getTables */"}, {"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-getTablesFiltered) = 0 \u0026THEN\n\n\u0026ANALYZE-SUSPEND _UIB-CODE-BLOCK _PROCEDURE getTablesFiltered Procedure"}, {"type":"Text","value":"\n"}, {"type":"KeywordReserved","value":"PROCEDURE"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"getTablesFiltered"}, {"type":"Text","value":" "}, {"type":"Punctuation","value":":"}, {"type":"Text","value":"\n"}, {"type":"CommentMultiline","value":"/* Determine whether tables in the ttTable are visible given a user defined filter\n */"}, {"type":"Text","value":"\n "}, {"type":"CommentPreproc","value":"{\u0026timerStart}"}, {"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":"KeywordReserved","value":"TABLE"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"FOR"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"ttTableFilter"}, {"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":"TABLE"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"FOR"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"ttTable"}, {"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":"cSearchFld"}, {"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":"cThisField"}, {"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":"iSearch"}, {"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":"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 "}, {"type":"KeywordDeclaration","value":"DEFINE"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"VARIABLE"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"lRejected"}, {"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":"lFieldFound"}, {"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":"lNormal"}, {"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":"lSchema"}, {"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":"lVst"}, {"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":"lSql"}, {"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":"lOther"}, {"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":"lFrozen"}, {"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":"cNameShow"}, {"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":"cNameHide"}, {"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":"cFieldShow"}, {"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":"cFieldHide"}, {"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":"/* This table **SHOULD** exist and have exactly 1 record */"}, {"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":"Punctuation","value":"."}, {"type":"Text","value":"\n\n "}, {"type":"KeywordReserved","value":"ASSIGN\n "}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"lNormal"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"ttTableFilter"}, {"type":"Punctuation","value":"."}, {"type":"NameVariable","value":"lShowNormal"}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":"lSchema"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"ttTableFilter"}, {"type":"Punctuation","value":"."}, {"type":"NameVariable","value":"lShowSchema"}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":"lVst"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"ttTableFilter"}, {"type":"Punctuation","value":"."}, {"type":"NameVariable","value":"lShowVst"}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":"lSql"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"ttTableFilter"}, {"type":"Punctuation","value":"."}, {"type":"NameVariable","value":"lShowSql"}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":"lOther"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"ttTableFilter"}, {"type":"Punctuation","value":"."}, {"type":"NameVariable","value":"lShowOther"}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":"lHidden"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"ttTableFilter"}, {"type":"Punctuation","value":"."}, {"type":"NameVariable","value":"lShowHidden"}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":"lFrozen"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"ttTableFilter"}, {"type":"Punctuation","value":"."}, {"type":"NameVariable","value":"lShowFrozen"}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":"cNameShow"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"ttTableFilter"}, {"type":"Punctuation","value":"."}, {"type":"NameVariable","value":"cTableNameShow"}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":"cNameHide"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"ttTableFilter"}, {"type":"Punctuation","value":"."}, {"type":"NameVariable","value":"cTableNameHide"}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":"cFieldShow"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"ttTableFilter"}, {"type":"Punctuation","value":"."}, {"type":"NameVariable","value":"cTableFieldShow"}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":"cFieldHide"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"ttTableFilter"}, {"type":"Punctuation","value":"."}, {"type":"NameVariable","value":"cTableFieldHide"}, {"type":"Text","value":"\n "}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n\n "}, {"type":"CommentMultiline","value":"/* Reset the filters to sane values if needed */"}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"IF"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"cNameShow"}, {"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":"Punctuation","value":"."}, {"type":"Text","value":"\n\n "}, {"type":"CommentMultiline","value":"/* Move elements starting with \"!\" from pos-list to neg-list */"}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"RUN"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"correctFilterList"}, {"type":"Punctuation","value":"("}, {"type":"KeywordReserved","value":"INPUT-OUTPUT"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"cNameShow,"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"INPUT-OUTPUT"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"cNameHide"}, {"type":"Punctuation","value":")."}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"RUN"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"correctFilterList"}, {"type":"Punctuation","value":"("}, {"type":"KeywordReserved","value":"INPUT-OUTPUT"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"cFieldShow,"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"INPUT-OUTPUT"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"cFieldHide"}, {"type":"Punctuation","value":")."}, {"type":"Text","value":"\n\n "}, {"type":"NameVariable","value":"#"}, {"type":"KeywordReserved","value":"Table"}, {"type":"Punctuation","value":":"}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"FOR"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"EACH"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"ttTable"}, {"type":"Text","value":" "}, {"type":"CommentPreproc","value":"{\u0026TABLE-SCAN}"}, {"type":"Punctuation","value":":"}, {"type":"Text","value":"\n "}, {"type":"CommentMultiline","value":"/* Init table to false until proven otherwise */"}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"ASSIGN"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"ttTable"}, {"type":"Punctuation","value":"."}, {"type":"NameVariable","value":"lShowInList"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"FALSE"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n\n "}, {"type":"CommentMultiline","value":"/* Check against filter-to-hide */"}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"IF"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"CAN-DO"}, {"type":"Punctuation","value":"("}, {"type":"NameVariable","value":"cNameHide,ttTable"}, {"type":"Punctuation","value":"."}, {"type":"NameVariable","value":"cTableName"}, {"type":"Punctuation","value":")"}, {"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":"/* Check against filter-to-show */"}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"IF"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"NOT"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"CAN-DO"}, {"type":"Punctuation","value":"("}, {"type":"NameVariable","value":"cNameShow,ttTable"}, {"type":"Punctuation","value":"."}, {"type":"NameVariable","value":"cTableName"}, {"type":"Punctuation","value":")"}, {"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":"/* User tables : _file-number \u003e 0 AND _file-number \u003c 32000\n * Schema tables : _file-number \u003e -80 AND _file-number \u003c 0\n * Virtual system tables: _file-number \u003c -16384\n * SQL catalog tables : _file-name BEGINS \"_sys\"\n */"}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"IF"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"NOT"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"lNormal"}, {"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":"'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":"Text","value":" "}, {"type":"KeywordReserved","value":"AND"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"ttTable"}, {"type":"Punctuation","value":"."}, {"type":"NameVariable","value":"lFrozen"}, {"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\n "}, {"type":"CommentMultiline","value":"/* Fields that must be in the list */"}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"DO"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"iSearch"}, {"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":"cFieldShow"}, {"type":"Punctuation","value":"):"}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":"cSearchFld"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"ENTRY"}, {"type":"Punctuation","value":"("}, {"type":"NameVariable","value":"iSearch,cFieldShow"}, {"type":"Punctuation","value":")."}, {"type":"Text","value":"\n\n "}, {"type":"CommentMultiline","value":"/* If no wildcards used, we can simply CAN-DO */"}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"IF"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"INDEX"}, {"type":"Punctuation","value":"("}, {"type":"NameVariable","value":"cSearchFld,"}, {"type":"LiteralStringDouble","value":"\"*\""}, {"type":"Punctuation","value":")"}, {"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":"KeywordReserved","value":"DO"}, {"type":"Punctuation","value":":"}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"IF"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"NOT"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"CAN-DO"}, {"type":"Punctuation","value":"("}, {"type":"NameVariable","value":"ttTable"}, {"type":"Punctuation","value":"."}, {"type":"NameVariable","value":"cFields,"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"cSearchFld"}, {"type":"Punctuation","value":")"}, {"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":"END"}, {"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":"lFieldFound"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"FALSE"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n\n "}, {"type":"NameVariable","value":"#"}, {"type":"KeywordReserved","value":"Field"}, {"type":"Punctuation","value":":"}, {"type":"Text","value":"\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":"KeywordReserved","value":"NUM-ENTRIES"}, {"type":"Punctuation","value":"("}, {"type":"NameVariable","value":"ttTable"}, {"type":"Punctuation","value":"."}, {"type":"NameVariable","value":"cFields"}, {"type":"Punctuation","value":"):"}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":"cThisField"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"ENTRY"}, {"type":"Punctuation","value":"("}, {"type":"NameVariable","value":"iField,ttTable"}, {"type":"Punctuation","value":"."}, {"type":"NameVariable","value":"cFields"}, {"type":"Punctuation","value":")."}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"IF"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"CAN-DO"}, {"type":"Punctuation","value":"("}, {"type":"NameVariable","value":"cSearchFld,cThisField"}, {"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":"lFieldFound"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"TRUE"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"LEAVE "}, {"type":"NameVariable","value":"#"}, {"type":"KeywordReserved","value":"Field"}, {"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":"IF"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"NOT"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"lFieldFound"}, {"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":"END"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"END"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n\n "}, {"type":"CommentMultiline","value":"/* Fields that may not be in the list */"}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"DO"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"iSearch"}, {"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":"cFieldHide"}, {"type":"Punctuation","value":"):"}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":"cSearchFld"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"ENTRY"}, {"type":"Punctuation","value":"("}, {"type":"NameVariable","value":"iSearch,cFieldHide"}, {"type":"Punctuation","value":")."}, {"type":"Text","value":"\n\n "}, {"type":"CommentMultiline","value":"/* If no wildcards used, we can simply CAN-DO */"}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"IF"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"INDEX"}, {"type":"Punctuation","value":"("}, {"type":"NameVariable","value":"cSearchFld,"}, {"type":"LiteralStringDouble","value":"\"*\""}, {"type":"Punctuation","value":")"}, {"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":"KeywordReserved","value":"DO"}, {"type":"Punctuation","value":":"}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"IF"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"CAN-DO"}, {"type":"Punctuation","value":"("}, {"type":"NameVariable","value":"ttTable"}, {"type":"Punctuation","value":"."}, {"type":"NameVariable","value":"cFields,"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"cSearchFld"}, {"type":"Punctuation","value":")"}, {"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":"END"}, {"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":"lRejected"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"FALSE"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":"#"}, {"type":"KeywordReserved","value":"Field"}, {"type":"Punctuation","value":":"}, {"type":"Text","value":"\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":"KeywordReserved","value":"NUM-ENTRIES"}, {"type":"Punctuation","value":"("}, {"type":"NameVariable","value":"ttTable"}, {"type":"Punctuation","value":"."}, {"type":"NameVariable","value":"cFields"}, {"type":"Punctuation","value":"):"}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":"cThisField"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"ENTRY"}, {"type":"Punctuation","value":"("}, {"type":"NameVariable","value":"iField,ttTable"}, {"type":"Punctuation","value":"."}, {"type":"NameVariable","value":"cFields"}, {"type":"Punctuation","value":")."}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"IF"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"CAN-DO"}, {"type":"Punctuation","value":"("}, {"type":"NameVariable","value":"cSearchFld,cThisField"}, {"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":"lRejected"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"TRUE"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"LEAVE "}, {"type":"NameVariable","value":"#"}, {"type":"KeywordReserved","value":"Field"}, {"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":" "}, {"type":"CommentMultiline","value":"/* do iField */"}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"IF"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"lRejected"}, {"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":"END"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":" "}, {"type":"CommentMultiline","value":"/* else */"}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"END"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":" "}, {"type":"CommentMultiline","value":"/* do iSearch */"}, {"type":"Text","value":"\n\n "}, {"type":"CommentMultiline","value":"/* If we get here, we should add the table */"}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"ASSIGN"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"ttTable"}, {"type":"Punctuation","value":"."}, {"type":"NameVariable","value":"lShowInList"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"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":"/* for each ttTable */"}, {"type":"Text","value":"\n\n "}, {"type":"CommentPreproc","value":"{\u0026timerStop}"}, {"type":"Text","value":"\n"}, {"type":"KeywordReserved","value":"END"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"PROCEDURE"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":" "}, {"type":"CommentMultiline","value":"/* getTablesFiltered */"}, {"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-getTableStats) = 0 \u0026THEN\n\n\u0026ANALYZE-SUSPEND _UIB-CODE-BLOCK _PROCEDURE getTableStats Procedure"}, {"type":"Text","value":"\n"}, {"type":"KeywordReserved","value":"PROCEDURE"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"getTableStats"}, {"type":"Text","value":" "}, {"type":"Punctuation","value":":"}, {"type":"Text","value":"\n"}, {"type":"CommentMultiline","value":"/* Get table statistics from the INI file\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":"ttTable"}, {"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":"cIniFile"}, {"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":"cLine"}, {"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":"cSection"}, {"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":"cDatabase"}, {"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":"/* Read the ini file as plain text and parse the lines.\n *\n * The normal way would be to do a FOR-EACH on the _file table and\n * retrieve the information needed. But if you have a large database\n * (or a lot of databases), this becomes VERY slow. Searching the\n * other way around by parsing the INI is a lot faster.\n */"}, {"type":"Text","value":"\n "}, {"type":"CommentPreproc","value":"{\u0026timerStart}"}, {"type":"Text","value":"\n\n "}, {"type":"NameVariable","value":"cIniFile"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"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":"Punctuation","value":")."}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":"cDatabase"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"ENTRY"}, {"type":"Punctuation","value":"("}, {"type":"LiteralNumberInteger","value":"2"}, {"type":"NameVariable","value":",cSection,"}, {"type":"LiteralStringDouble","value":"\":\""}, {"type":"Punctuation","value":")."}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"END"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n\n "}, {"type":"CommentMultiline","value":"/* Only process lines of database-sections */"}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"IF"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"NOT"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"cSection"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"BEGINS "}, {"type":"LiteralStringDouble","value":"\"DB:\""}, {"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":"/* Only process setting lines */"}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"IF"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"NOT"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"cLine"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"MATCHES "}, {"type":"LiteralStringSingle","value":"'*:*=*'"}, {"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":"/* Filter out some settings */"}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"IF"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"cLine"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"MATCHES "}, {"type":"LiteralStringDouble","value":"\"*:QueriesServed=*\""}, {"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":"FIND"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"FIRST"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"ttTable"}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"WHERE"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"ttTable"}, {"type":"Punctuation","value":"."}, {"type":"NameVariable","value":"cDatabase"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"cDatabase"}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"AND"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"ttTable"}, {"type":"Punctuation","value":"."}, {"type":"NameVariable","value":"cTableName"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"ENTRY"}, {"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":"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":"ttTable"}, {"type":"Punctuation","value":"."}, {"type":"NameVariable","value":"iNumQueries"}, {"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":"ttTable"}, {"type":"Punctuation","value":"."}, {"type":"NameVariable","value":"iNumQueries"}, {"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":" "}, {"type":"CommentMultiline","value":"/* queriesServed */"}, {"type":"Text","value":"\n\n "}, {"type":"KeywordReserved","value":"ELSE\n "}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"IF"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"cLine"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"MATCHES "}, {"type":"LiteralStringDouble","value":"\"*:LastUsed=*\""}, {"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":"FIND"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"FIRST"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"ttTable"}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"WHERE"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"ttTable"}, {"type":"Punctuation","value":"."}, {"type":"NameVariable","value":"cDatabase"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"cDatabase"}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"AND"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"ttTable"}, {"type":"Punctuation","value":"."}, {"type":"NameVariable","value":"cTableName"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"ENTRY"}, {"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":"Punctuation","value":"))."}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"IF"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"ttTableFilter"}, {"type":"Punctuation","value":"."}, {"type":"NameVariable","value":"lShowSchema"}, {"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":"ttTableFilter"}, {"type":"Punctuation","value":"."}, {"type":"NameVariable","value":"lShowSchema"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"NO"}, {"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":"/* initTableFilter */"}, {"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-loadSettings) = 0 \u0026THEN\n\n\u0026ANALYZE-SUSPEND _UIB-CODE-BLOCK _PROCEDURE loadSettings Procedure"}, {"type":"Text","value":"\n"}, {"type":"KeywordReserved","value":"PROCEDURE"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"loadSettings"}, {"type":"Text","value":" "}, {"type":"Punctuation","value":":"}, {"type":"Text","value":"\n"}, {"type":"CommentMultiline","value":"/* Load settings from ini files\n*/"}, {"type":"Text","value":"\n "}, {"type":"KeywordDeclaration","value":"DEFINE"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"VARIABLE"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"lValue"}, {"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":"CommentMultiline","value":"/* Help file is least important, so read that first */"}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"RUN"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"readConfigFile"}, {"type":"Punctuation","value":"("}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"SUBSTITUTE"}, {"type":"Punctuation","value":"("}, {"type":"LiteralStringDouble","value":"\"\u00261DataDiggerHelp.ini\""}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"getProgramDir"}, {"type":"Punctuation","value":"()"}, {"type":"Text","value":" "}, {"type":"Punctuation","value":")"}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"FALSE"}, {"type":"Punctuation","value":")."}, {"type":"Text","value":"\n\n "}, {"type":"CommentMultiline","value":"/* General DD settings (always in program folder) */"}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"RUN"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"readConfigFile"}, {"type":"Punctuation","value":"("}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"SUBSTITUTE"}, {"type":"Punctuation","value":"("}, {"type":"LiteralStringDouble","value":"\"\u00261DataDigger.ini\""}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"getProgramDir"}, {"type":"Punctuation","value":"()"}, {"type":"Text","value":" "}, {"type":"Punctuation","value":")"}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"FALSE"}, {"type":"Punctuation","value":")."}, {"type":"Text","value":"\n\n "}, {"type":"CommentMultiline","value":"/* Per-user settings */"}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"RUN"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"readConfigFile"}, {"type":"Punctuation","value":"("}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"SUBSTITUTE"}, {"type":"Punctuation","value":"("}, {"type":"LiteralStringDouble","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":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"TRUE"}, {"type":"Punctuation","value":")."}, {"type":"Text","value":"\n\n "}, {"type":"CommentMultiline","value":"/* When all ini-files have been read, we can determine whether\n * caching needs to be enabled\n */"}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":"lValue"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"KeywordType","value":"LOGICAL"}, {"type":"Punctuation","value":"("}, {"type":"NameVariable","value":"getRegistry"}, {"type":"Punctuation","value":"("}, {"type":"LiteralStringDouble","value":"\"DataDigger:Cache\""}, {"type":"NameVariable","value":","}, {"type":"LiteralStringDouble","value":"\"TableDefs\""}, {"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":"lValue"}, {"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":"glCacheTableDefs"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"lValue"}, {"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":"/* loadSettings */"}, {"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-lockWindow) = 0 \u0026THEN\n\n\u0026ANALYZE-SUSPEND _UIB-CODE-BLOCK _PROCEDURE lockWindow Procedure"}, {"type":"Text","value":"\n"}, {"type":"KeywordReserved","value":"PROCEDURE"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"lockWindow"}, {"type":"Text","value":" "}, {"type":"Punctuation","value":":"}, {"type":"Text","value":"\n"}, {"type":"CommentMultiline","value":"/* Lock / unlock updates that Windows does to windows.\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":"phWindow"}, {"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":"plLock"}, {"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":"{\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":"iRet"}, {"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":"BUFFER"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"ttWindowLock"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"FOR"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"ttWindowLock"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n\n "}, {"type":"CommentPreproc","value":"{\u0026timerStart}"}, {"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":"\"Window \u00261, lock: \u00262\""}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"phWindow"}, {"type":"Punctuation","value":":"}, {"type":"KeywordReserved","value":"TITLE"}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"STRING"}, {"type":"Punctuation","value":"("}, {"type":"NameVariable","value":"plLock,"}, {"type":"LiteralStringDouble","value":"\"ON/OFF\""}, {"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":"phWindow"}, {"type":"Punctuation","value":")"}, {"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":"/* Find window in our tt of locked windows */"}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"FIND"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"ttWindowLock"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"WHERE"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"ttWindowLock"}, {"type":"Punctuation","value":"."}, {"type":"NameVariable","value":"hWindow"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"phWindow"}, {"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":"ttWindowLock"}, {"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":"/* If we try to unlock a window thats not in the tt, just go back */"}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"IF"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"NOT"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"plLock"}, {"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":"/* Otherwise create a tt record for it */"}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"CREATE"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"ttWindowLock"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":"ttWindowLock"}, {"type":"Punctuation","value":"."}, {"type":"NameVariable","value":"hWindow"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"phWindow"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"END"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n\n "}, {"type":"CommentMultiline","value":"/* Because commands to lock or unlock may be nested, keep track\n * of the number of locks/unlocks using a semaphore.\n *\n * The order of commands may be:\n * lockWindow(yes). -\u003e actually lock the window\n * lockWindow(yes). -\u003e do nothing\n * lockWindow(yes). -\u003e do nothing\n * lockWindow(no). -\u003e do nothing\n * lockWindow(no). -\u003e do nothing\n * lockWindow(yes). -\u003e do nothing\n * lockWindow(no). -\u003e do nothing\n * lockWindow(no). -\u003e actually unlock the window\n */"}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"IF"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"plLock"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"THEN\n "}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"ttWindowLock"}, {"type":"Punctuation","value":"."}, {"type":"NameVariable","value":"iLockCounter"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"ttWindowLock"}, {"type":"Punctuation","value":"."}, {"type":"NameVariable","value":"iLockCounter"}, {"type":"Text","value":" "}, {"type":"Operator","value":"+"}, {"type":"Text","value":" "}, {"type":"LiteralNumberInteger","value":"1"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"ELSE\n "}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"ttWindowLock"}, {"type":"Punctuation","value":"."}, {"type":"NameVariable","value":"iLockCounter"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"ttWindowLock"}, {"type":"Punctuation","value":"."}, {"type":"NameVariable","value":"iLockCounter"}, {"type":"Text","value":" "}, {"type":"Operator","value":"-"}, {"type":"Text","value":" "}, {"type":"LiteralNumberInteger","value":"1"}, {"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":"\"Lock counter: \u00261\""}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"ttWindowLock"}, {"type":"Punctuation","value":"."}, {"type":"NameVariable","value":"iLockCounter"}, {"type":"Punctuation","value":"))."}, {"type":"Text","value":"\n\n "}, {"type":"CommentMultiline","value":"/* Now, only lock when the semaphore is increased to 1 */"}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"IF"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"plLock"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"AND"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"ttWindowLock"}, {"type":"Punctuation","value":"."}, {"type":"NameVariable","value":"iLockCounter"}, {"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":"CommentPreproc","value":"{\u0026_proparse_prolint-nowarn(varusage)}"}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"RUN"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"SendMessageA"}, {"type":"Punctuation","value":"("}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"phWindow"}, {"type":"Punctuation","value":":"}, {"type":"KeywordReserved","value":"HWND "}, {"type":"CommentMultiline","value":"/* {\u0026window-name}:hwnd */"}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"CommentPreproc","value":"{\u0026WM_SETREDRAW}"}, {"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":"LiteralNumberInteger","value":"0"}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"OUTPUT"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"iRet"}, {"type":"Text","value":"\n "}, {"type":"Punctuation","value":")."}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"END"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n\n "}, {"type":"CommentMultiline","value":"/* And only unlock after the last unlock command */"}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"ELSE"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"IF"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"ttWindowLock"}, {"type":"Punctuation","value":"."}, {"type":"NameVariable","value":"iLockCounter"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"\u003c"}, {"type":"Operator","value":"="}, {"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":"CommentPreproc","value":"{\u0026_proparse_prolint-nowarn(varusage)}"}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"RUN"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"SendMessageA"}, {"type":"Punctuation","value":"("}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"phWindow"}, {"type":"Punctuation","value":":"}, {"type":"KeywordReserved","value":"HWND "}, {"type":"CommentMultiline","value":"/* {\u0026window-name}:hwnd */"}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"CommentPreproc","value":"{\u0026WM_SETREDRAW}"}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"LiteralNumberInteger","value":"1"}, {"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":"iRet"}, {"type":"Text","value":"\n "}, {"type":"Punctuation","value":")."}, {"type":"Text","value":"\n\n "}, {"type":"CommentPreproc","value":"{\u0026_proparse_prolint-nowarn(varusage)}"}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"RUN"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"RedrawWindow"}, {"type":"Punctuation","value":"("}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"phWindow"}, {"type":"Punctuation","value":":"}, {"type":"KeywordReserved","value":"HWND "}, {"type":"CommentMultiline","value":"/* {\u0026window-name}:hwnd */"}, {"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":"LiteralNumberInteger","value":"0"}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"CommentPreproc","value":"{\u0026RDW_ALLCHILDREN}"}, {"type":"Text","value":" "}, {"type":"Operator","value":"+"}, {"type":"Text","value":" "}, {"type":"CommentPreproc","value":"{\u0026RDW_ERASE}"}, {"type":"Text","value":" "}, {"type":"Operator","value":"+"}, {"type":"Text","value":" "}, {"type":"CommentPreproc","value":"{\u0026RDW_INVALIDATE}"}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"OUTPUT"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"iRet"}, {"type":"Text","value":"\n "}, {"type":"Punctuation","value":")."}, {"type":"Text","value":"\n\n "}, {"type":"CommentMultiline","value":"/* Don't delete, creating records is more expensive than re-use, so just reset */"}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":"ttWindowLock"}, {"type":"Punctuation","value":"."}, {"type":"NameVariable","value":"iLockCounter"}, {"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\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":"/* lockWindow */"}, {"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-readConfigFile) = 0 \u0026THEN\n\n\u0026ANALYZE-SUSPEND _UIB-CODE-BLOCK _PROCEDURE readConfigFile Procedure"}, {"type":"Text","value":"\n"}, {"type":"KeywordReserved","value":"PROCEDURE"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"readConfigFile"}, {"type":"Text","value":" "}, {"type":"Punctuation","value":":"}, {"type":"Text","value":"\n"}, {"type":"CommentMultiline","value":"/* Read the ini-file and create tt records for it\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":"pcConfigFile"}, {"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":"plUserSettings"}, {"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":"cFile"}, {"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 "}, {"type":"KeywordDeclaration","value":"DEFINE"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"VARIABLE"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"cLine"}, {"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":"cChunk"}, {"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 "}, {"type":"KeywordDeclaration","value":"DEFINE"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"VARIABLE"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"cSection"}, {"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":"cTrimChars"}, {"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":"iLine"}, {"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":"CommentPreproc","value":"{\u0026timerStart}"}, {"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":"CommentMultiline","value":"/* Read file in 1 pass to memory */"}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"IF"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"SEARCH"}, {"type":"Punctuation","value":"("}, {"type":"NameVariable","value":"pcConfigFile"}, {"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 "}, {"type":"KeywordReserved","value":"COPY-LOB"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"FILE"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"pcConfigFile"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"TO"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"cFile"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"NO-CONVERT"}, {"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":"cFile"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"readFile"}, {"type":"Punctuation","value":"("}, {"type":"NameVariable","value":"pcConfigFile"}, {"type":"Punctuation","value":")."}, {"type":"Text","value":"\n\n "}, {"type":"NameVariable","value":"cTrimChars"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"LiteralStringDouble","value":"\" \""}, {"type":"Text","value":" "}, {"type":"Operator","value":"+"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"CHR"}, {"type":"Punctuation","value":"("}, {"type":"LiteralNumberInteger","value":"1"}, {"type":"Punctuation","value":")"}, {"type":"Text","value":" "}, {"type":"Operator","value":"+"}, {"type":"Text","value":" "}, {"type":"LiteralStringDouble","value":"\"~r\""}, {"type":"Punctuation","value":"."}, {"type":"Text","value":" "}, {"type":"CommentMultiline","value":"/* space / chr-1 / LF */"}, {"type":"Text","value":"\n\n "}, {"type":"CommentMultiline","value":"/* Process line by line */"}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":"#LineLoop"}, {"type":"Punctuation","value":":"}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"DO"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"iLine"}, {"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":"cFile,"}, {"type":"LiteralStringDouble","value":"\"~n\""}, {"type":"Punctuation","value":"):"}, {"type":"Text","value":"\n\n "}, {"type":"NameVariable","value":"cChunk"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"ENTRY"}, {"type":"Punctuation","value":"("}, {"type":"NameVariable","value":"iLine,cFile,"}, {"type":"LiteralStringDouble","value":"\"~n\""}, {"type":"Punctuation","value":")."}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":"cChunk"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"SUBSTRING"}, {"type":"Punctuation","value":"("}, {"type":"NameVariable","value":"cChunk,"}, {"type":"Text","value":" "}, {"type":"LiteralNumberInteger","value":"1"}, {"type":"NameVariable","value":","}, {"type":"LiteralNumberInteger","value":"20000"}, {"type":"Punctuation","value":")."}, {"type":"Text","value":" "}, {"type":"CommentMultiline","value":"/* trim very long lines */"}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":"cLine"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"TRIM"}, {"type":"Punctuation","value":"("}, {"type":"NameVariable","value":"cChunk,"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"cTrimChars"}, {"type":"Punctuation","value":")."}, {"type":"Text","value":" "}, {"type":"CommentMultiline","value":"/* remove junk */"}, {"type":"Text","value":"\n\n "}, {"type":"CommentMultiline","value":"/* Section line */"}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"IF"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"cLine"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"MATCHES "}, {"type":"LiteralStringDouble","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":"cSection"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"TRIM"}, {"type":"Punctuation","value":"("}, {"type":"NameVariable","value":"cLine,"}, {"type":"LiteralStringDouble","value":"\"[]\""}, {"type":"Punctuation","value":")."}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"NEXT "}, {"type":"NameVariable","value":"#LineLoop"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"END"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n\n "}, {"type":"CommentMultiline","value":"/* Ignore weird settings within [DB:xxxx] sections */"}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"IF"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"cSection"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"BEGINS "}, {"type":"LiteralStringSingle","value":"'DB:'"}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"AND"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"NUM-ENTRIES"}, {"type":"Punctuation","value":"("}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"TRIM"}, {"type":"Punctuation","value":"("}, {"type":"KeywordReserved","value":"ENTRY"}, {"type":"Punctuation","value":"("}, {"type":"LiteralNumberInteger","value":"1"}, {"type":"NameVariable","value":",cLine,"}, {"type":"LiteralStringDouble","value":"\"=\""}, {"type":"Punctuation","value":"))"}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"LiteralStringSingle","value":"':'"}, {"type":"Punctuation","value":")"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"LiteralNumberInteger","value":"1"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"THEN"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"NEXT "}, {"type":"NameVariable","value":"#LineLoop"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n\n "}, {"type":"CommentMultiline","value":"/* Config line */"}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"FIND"}, {"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":"NameVariable","value":"cSection"}, {"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":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"TRIM"}, {"type":"Punctuation","value":"("}, {"type":"KeywordReserved","value":"ENTRY"}, {"type":"Punctuation","value":"("}, {"type":"LiteralNumberInteger","value":"1"}, {"type":"NameVariable","value":",cLine,"}, {"type":"LiteralStringDouble","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":"NOT"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"AVAILABLE"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"bfConfig"}, {"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":"bfConfig"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"ASSIGN\n "}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"bfConfig"}, {"type":"Punctuation","value":"."}, {"type":"NameVariable","value":"cSection"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"cSection"}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":"bfConfig"}, {"type":"Punctuation","value":"."}, {"type":"NameVariable","value":"cSetting"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"TRIM"}, {"type":"Punctuation","value":"("}, {"type":"KeywordReserved","value":"ENTRY"}, {"type":"Punctuation","value":"("}, {"type":"LiteralNumberInteger","value":"1"}, {"type":"NameVariable","value":",cLine,"}, {"type":"LiteralStringDouble","value":"\"=\""}, {"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\n "}, {"type":"CommentMultiline","value":"/* Config line /might/ already exist. This can happen if you have\n * the same setting in multiple .ini files.\n */"}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"ASSIGN\n "}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"bfConfig"}, {"type":"Punctuation","value":"."}, {"type":"NameVariable","value":"cValue"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"TRIM"}, {"type":"Punctuation","value":"("}, {"type":"KeywordReserved","value":"SUBSTRING"}, {"type":"Punctuation","value":"("}, {"type":"NameVariable","value":"cLine,"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"INDEX"}, {"type":"Punctuation","value":"("}, {"type":"NameVariable","value":"cLine,"}, {"type":"LiteralStringDouble","value":"\"=\""}, {"type":"Punctuation","value":")"}, {"type":"Text","value":" "}, {"type":"Operator","value":"+"}, {"type":"Text","value":" "}, {"type":"LiteralNumberInteger","value":"1"}, {"type":"Punctuation","value":"))"}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":"bfConfig"}, {"type":"Punctuation","value":"."}, {"type":"NameVariable","value":"lUser"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"plUserSettings"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"END"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n\n "}, {"type":"CommentPreproc","value":"{\u0026timerStop}"}, {"type":"Text","value":"\n"}, {"type":"KeywordReserved","value":"END"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"PROCEDURE"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":" "}, {"type":"CommentMultiline","value":"/* readConfigFile */"}, {"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-resetAnswers) = 0 \u0026THEN\n\n\u0026ANALYZE-SUSPEND _UIB-CODE-BLOCK _PROCEDURE resetAnswers Procedure"}, {"type":"Text","value":"\n"}, {"type":"KeywordReserved","value":"PROCEDURE"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"resetAnswers"}, {"type":"Text","value":" "}, {"type":"Punctuation","value":":"}, {"type":"Text","value":"\n"}, {"type":"CommentMultiline","value":"/* Reset answers to all 'do not ask again' questions\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":"bfConfig"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"FOR"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"ttConfig"}, {"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: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":"Punctuation","value":"):"}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":"setRegistry"}, {"type":"Punctuation","value":"("}, {"type":"NameVariable","value":"bfConfig"}, {"type":"Punctuation","value":"."}, {"type":"NameVariable","value":"cSection,"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"bfConfig"}, {"type":"Punctuation","value":"."}, {"type":"NameVariable","value":"cSetting,"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"?"}, {"type":"Punctuation","value":")."}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"END"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":" "}, {"type":"CommentMultiline","value":"/* for each bfConfig */"}, {"type":"Text","value":"\n\n "}, {"type":"KeywordReserved","value":"RUN"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"flushRegistry"}, {"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":"/* resetAnswers */"}, {"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-resizeFilterFields) = 0 \u0026THEN\n\n\u0026ANALYZE-SUSPEND _UIB-CODE-BLOCK _PROCEDURE resizeFilterFields Procedure"}, {"type":"Text","value":"\n"}, {"type":"KeywordReserved","value":"PROCEDURE"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"resizeFilterFields"}, {"type":"Text","value":" "}, {"type":"Punctuation","value":":"}, {"type":"Text","value":"\n"}, {"type":"CommentMultiline","value":"/* Redraw the browse filter fields\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":"phLeadButton"}, {"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":"pcFilterFields"}, {"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":"pcButtons"}, {"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":"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\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 "}, {"type":"KeywordDeclaration","value":"DEFINE"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"VARIABLE"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"iButton"}, {"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":"iCurrentPos"}, {"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":"iRightEdge"}, {"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":"iWidth"}, {"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":"hButton"}, {"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":"hFilterField"}, {"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":"iFilter"}, {"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":"CommentPreproc","value":"{\u0026timerStart}"}, {"type":"Text","value":"\n\n "}, {"type":"CommentMultiline","value":"/* To prevent drawing error, make all fields small */"}, {"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":"LiteralStringDouble","value":"\"resizeFilterFields:makeSmall\""}, {"type":"Punctuation","value":")."}, {"type":"Text","value":"\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":"KeywordReserved","value":"NUM-ENTRIES"}, {"type":"Punctuation","value":"("}, {"type":"NameVariable","value":"pcFilterFields"}, {"type":"Punctuation","value":"):"}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":"hFilterField"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"KeywordType","value":"HANDLE"}, {"type":"Punctuation","value":"("}, {"type":"KeywordReserved","value":"ENTRY"}, {"type":"Punctuation","value":"("}, {"type":"NameVariable","value":"iField,pcFilterFields"}, {"type":"Punctuation","value":"))."}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":"hFilterField"}, {"type":"Punctuation","value":":"}, {"type":"KeywordReserved","value":"VISIBLE "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"NO"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":"hFilterField"}, {"type":"Punctuation","value":":"}, {"type":"KeywordReserved","value":"X "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"phBrowse"}, {"type":"Punctuation","value":":"}, {"type":"KeywordReserved","value":"X"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":"hFilterField"}, {"type":"Punctuation","value":":"}, {"type":"KeywordReserved","value":"Y "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"phBrowse"}, {"type":"Punctuation","value":":"}, {"type":"KeywordReserved","value":"Y"}, {"type":"Text","value":" "}, {"type":"Operator","value":"-"}, {"type":"Text","value":" "}, {"type":"LiteralNumberInteger","value":"23"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":"hFilterField"}, {"type":"Punctuation","value":":"}, {"type":"KeywordReserved","value":"WIDTH-PIXELS "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"LiteralNumberInteger","value":"1"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"END"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"PUBLISH "}, {"type":"LiteralStringDouble","value":"\"DD:Timer\""}, {"type":"Text","value":" "}, {"type":"Punctuation","value":"("}, {"type":"LiteralStringDouble","value":"\"stop\""}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"LiteralStringDouble","value":"\"resizeFilterFields:makeSmall\""}, {"type":"Punctuation","value":")."}, {"type":"Text","value":"\n\n "}, {"type":"CommentMultiline","value":"/* Start by setting the buttons at the proper place. Do this right to left */"}, {"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":"LiteralStringDouble","value":"\"resizeFilterFields:reposition\""}, {"type":"Punctuation","value":")."}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"ASSIGN"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"iRightEdge"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"phBrowse"}, {"type":"Punctuation","value":":"}, {"type":"KeywordReserved","value":"X "}, {"type":"Operator","value":"+"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"phBrowse"}, {"type":"Punctuation","value":":"}, {"type":"KeywordReserved","value":"WIDTH-PIXELS"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"DO"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"iButton"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"NUM-ENTRIES"}, {"type":"Punctuation","value":"("}, {"type":"NameVariable","value":"pcButtons"}, {"type":"Punctuation","value":")"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"TO"}, {"type":"Text","value":" "}, {"type":"LiteralNumberInteger","value":"1"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"BY"}, {"type":"Text","value":" "}, {"type":"Operator","value":"-"}, {"type":"LiteralNumberInteger","value":"1"}, {"type":"Punctuation","value":":"}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":"hButton"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"KeywordType","value":"HANDLE"}, {"type":"Punctuation","value":"("}, {"type":"KeywordReserved","value":"ENTRY"}, {"type":"Punctuation","value":"("}, {"type":"NameVariable","value":"iButton,pcButtons"}, {"type":"Punctuation","value":"))."}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":"hButton"}, {"type":"Punctuation","value":":"}, {"type":"KeywordReserved","value":"X "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"iRightEdge"}, {"type":"Text","value":" "}, {"type":"Operator","value":"-"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"hButton"}, {"type":"Punctuation","value":":"}, {"type":"KeywordReserved","value":"WIDTH-PIXELS"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":"hButton"}, {"type":"Punctuation","value":":"}, {"type":"KeywordReserved","value":"Y "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"phBrowse"}, {"type":"Punctuation","value":":"}, {"type":"KeywordReserved","value":"Y"}, {"type":"Text","value":" "}, {"type":"Operator","value":"-"}, {"type":"Text","value":" "}, {"type":"LiteralNumberInteger","value":"23"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":" "}, {"type":"CommentMultiline","value":"/* filter buttons close to the browse */"}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":"iRightEdge"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"hButton"}, {"type":"Punctuation","value":":"}, {"type":"KeywordReserved","value":"X "}, {"type":"Operator","value":"+"}, {"type":"Text","value":" "}, {"type":"LiteralNumberInteger","value":"0"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":" "}, {"type":"CommentMultiline","value":"/* A little margin between buttons */"}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"END"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"PUBLISH "}, {"type":"LiteralStringDouble","value":"\"DD:Timer\""}, {"type":"Text","value":" "}, {"type":"Punctuation","value":"("}, {"type":"LiteralStringDouble","value":"\"stop\""}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"LiteralStringDouble","value":"\"resizeFilterFields:reposition\""}, {"type":"Punctuation","value":")."}, {"type":"Text","value":"\n\n "}, {"type":"CommentMultiline","value":"/* The left side of the left button is the maximum point\n * Fortunately, this value is already in iRightEdge.\n * Resize and reposition the fields from left to right,\n * use the space between browse:x and iRightEdge\n */"}, {"type":"Text","value":"\n\n "}, {"type":"CommentMultiline","value":"/* Take the left side of the first visible column as a starting point. */"}, {"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":"LiteralStringDouble","value":"\"resizeFilterFields:firstVisibleColumn\""}, {"type":"Punctuation","value":")."}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":"firstVisibleColumn"}, {"type":"Punctuation","value":":"}, {"type":"Text","value":"\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":"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":"iField"}, {"type":"Punctuation","value":"):"}, {"type":"KeywordType","value":"HANDLE"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n\n "}, {"type":"KeywordReserved","value":"IF"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"hColumn"}, {"type":"Punctuation","value":":"}, {"type":"KeywordReserved","value":"X "}, {"type":"NameVariable","value":"\u003e"}, {"type":"Text","value":" "}, {"type":"LiteralNumberInteger","value":"0"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"AND"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"hColumn"}, {"type":"Punctuation","value":":"}, {"type":"KeywordReserved","value":"VISIBLE"}, {"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":"iCurrentPos"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"phBrowse"}, {"type":"Punctuation","value":":"}, {"type":"KeywordReserved","value":"X "}, {"type":"Operator","value":"+"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"hColumn"}, {"type":"Punctuation","value":":"}, {"type":"KeywordReserved","value":"X"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"LEAVE"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"firstVisibleColumn"}, {"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":"PUBLISH "}, {"type":"LiteralStringDouble","value":"\"DD:Timer\""}, {"type":"Text","value":" "}, {"type":"Punctuation","value":"("}, {"type":"LiteralStringDouble","value":"\"stop\""}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"LiteralStringDouble","value":"\"resizeFilterFields:firstVisibleColumn\""}, {"type":"Punctuation","value":")."}, {"type":"Text","value":"\n\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":"LiteralStringDouble","value":"\"resizeFilterFields:#Field\""}, {"type":"Punctuation","value":")."}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":"#"}, {"type":"KeywordReserved","value":"Field"}, {"type":"Punctuation","value":":"}, {"type":"Text","value":"\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":"phBrowse"}, {"type":"Punctuation","value":":"}, {"type":"KeywordReserved","value":"NUM-COLUMNS"}, {"type":"Punctuation","value":":"}, {"type":"Text","value":"\n\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":"iField"}, {"type":"Punctuation","value":"):"}, {"type":"KeywordType","value":"handle"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n\n "}, {"type":"CommentMultiline","value":"/* Some types cannot have a filter */"}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"IF"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"hColumn"}, {"type":"Punctuation","value":":"}, {"type":"KeywordReserved","value":"DATA-TYPE "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"LiteralStringSingle","value":"'raw'"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"THEN"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"NEXT "}, {"type":"NameVariable","value":"#"}, {"type":"KeywordReserved","value":"Field"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n\n "}, {"type":"NameVariable","value":"iFilter"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"iFilter"}, {"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":"NameVariable","value":"iFilter"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"\u003e"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"NUM-ENTRIES"}, {"type":"Punctuation","value":"("}, {"type":"NameVariable","value":"pcFilterFields"}, {"type":"Punctuation","value":")"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"THEN"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"LEAVE "}, {"type":"NameVariable","value":"#"}, {"type":"KeywordReserved","value":"Field"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n\n "}, {"type":"CommentMultiline","value":"/* Determine the handle of the filterfield */"}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":"hFilterField"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"KeywordType","value":"HANDLE"}, {"type":"Punctuation","value":"("}, {"type":"KeywordReserved","value":"ENTRY"}, {"type":"Punctuation","value":"("}, {"type":"NameVariable","value":"iFilter,"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"pcFilterFields"}, {"type":"Punctuation","value":"))."}, {"type":"Text","value":"\n\n "}, {"type":"CommentMultiline","value":"/* If the column is hidden, make the filter hidden and go to the next */"}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"IF"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"NOT"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"hColumn"}, {"type":"Punctuation","value":":"}, {"type":"KeywordReserved","value":"VISIBLE"}, {"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":"hFilterField"}, {"type":"Punctuation","value":":"}, {"type":"KeywordReserved","value":"VISIBLE "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"NO"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"NEXT "}, {"type":"NameVariable","value":"#"}, {"type":"KeywordReserved","value":"Field"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"END"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n\n "}, {"type":"CommentMultiline","value":"/* Where *are* we ?? */"}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":"iCurrentPos"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"phBrowse"}, {"type":"Punctuation","value":":"}, {"type":"KeywordReserved","value":"X "}, {"type":"Operator","value":"+"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"hColumn"}, {"type":"Punctuation","value":":"}, {"type":"KeywordReserved","value":"X"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n\n "}, {"type":"CommentMultiline","value":"/* If the columns have been resized, some columns might have fallen off the screen */"}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"IF"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"hColumn"}, {"type":"Punctuation","value":":"}, {"type":"KeywordReserved","value":"X "}, {"type":"NameVariable","value":"\u003c"}, {"type":"Text","value":" "}, {"type":"LiteralNumberInteger","value":"1"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"THEN"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"NEXT "}, {"type":"NameVariable","value":"#"}, {"type":"KeywordReserved","value":"Field"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n\n "}, {"type":"CommentMultiline","value":"/* Does it fit on the screen? */"}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"IF"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"iCurrentPos"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"\u003e"}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"iRightEdge"}, {"type":"Text","value":" "}, {"type":"Operator","value":"-"}, {"type":"Text","value":" "}, {"type":"LiteralNumberInteger","value":"5"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"THEN"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"LEAVE "}, {"type":"NameVariable","value":"#"}, {"type":"KeywordReserved","value":"Field"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":" "}, {"type":"CommentMultiline","value":"/* accept some margin */"}, {"type":"Text","value":"\n\n "}, {"type":"CommentMultiline","value":"/* Where will this field end? And does it fit? */"}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":"iWidth"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"hColumn"}, {"type":"Punctuation","value":":"}, {"type":"KeywordReserved","value":"WIDTH-PIXELS "}, {"type":"Operator","value":"+"}, {"type":"Text","value":" "}, {"type":"LiteralNumberInteger","value":"4"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"IF"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"iCurrentPos"}, {"type":"Text","value":" "}, {"type":"Operator","value":"+"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"iWidth"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"\u003e"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"iRightEdge"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"THEN"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"iWidth"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"iRightEdge"}, {"type":"Text","value":" "}, {"type":"Operator","value":"-"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"iCurrentPos"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n\n "}, {"type":"CommentMultiline","value":"/* Ok, seems to fit */"}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":"hFilterField"}, {"type":"Punctuation","value":":"}, {"type":"KeywordReserved","value":"X "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"iCurrentPos"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":"hFilterField"}, {"type":"Punctuation","value":":"}, {"type":"KeywordReserved","value":"WIDTH-PIXELS "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"iWidth"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":"iCurrentPos"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"iCurrentPos"}, {"type":"Text","value":" "}, {"type":"Operator","value":"+"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"iWidth"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":"hFilterField"}, {"type":"Punctuation","value":":"}, {"type":"KeywordReserved","value":"VISIBLE "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"phBrowse"}, {"type":"Punctuation","value":":"}, {"type":"KeywordReserved","value":"VISIBLE"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":" "}, {"type":"CommentMultiline","value":"/* take over the visibility of the browse */"}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"END"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"PUBLISH "}, {"type":"LiteralStringDouble","value":"\"DD:Timer\""}, {"type":"Text","value":" "}, {"type":"Punctuation","value":"("}, {"type":"LiteralStringDouble","value":"\"stop\""}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"LiteralStringDouble","value":"\"resizeFilterFields:#Field\""}, {"type":"Punctuation","value":")."}, {"type":"Text","value":"\n\n "}, {"type":"CommentMultiline","value":"/* Place lead-button at the utmost left */"}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"IF"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"VALID-HANDLE"}, {"type":"Punctuation","value":"("}, {"type":"NameVariable","value":"phLeadButton"}, {"type":"Punctuation","value":")"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"THEN\n "}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"ASSIGN\n "}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"phLeadButton"}, {"type":"Punctuation","value":":"}, {"type":"KeywordReserved","value":"X "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"phBrowse"}, {"type":"Punctuation","value":":"}, {"type":"KeywordReserved","value":"X\n "}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"phLeadButton"}, {"type":"Punctuation","value":":"}, {"type":"KeywordReserved","value":"Y "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"phBrowse"}, {"type":"Punctuation","value":":"}, {"type":"KeywordReserved","value":"Y"}, {"type":"Text","value":" "}, {"type":"Operator","value":"-"}, {"type":"Text","value":" "}, {"type":"LiteralNumberInteger","value":"23"}, {"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":"/* resizeFilterFields */"}, {"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-restoreWindowPos) = 0 \u0026THEN\n\n\u0026ANALYZE-SUSPEND _UIB-CODE-BLOCK _PROCEDURE restoreWindowPos Procedure"}, {"type":"Text","value":"\n"}, {"type":"KeywordReserved","value":"PROCEDURE"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"restoreWindowPos"}, {"type":"Text","value":" "}, {"type":"Punctuation","value":":"}, {"type":"Text","value":"\n"}, {"type":"CommentMultiline","value":"/* Restore position / size of a window\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":"phWindow"}, {"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":"pcWindowName"}, {"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":"iValue"}, {"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":"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: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":"Text","value":" "}, {"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":"NameVariable","value":"?"}, {"type":"Punctuation","value":":"}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"DELETE"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"bfConfig"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"END"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n\n "}, {"type":"NameVariable","value":"cUserConfigFile"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"SUBSTITUTE"}, {"type":"Punctuation","value":"("}, {"type":"LiteralStringDouble","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":"OUTPUT"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"TO"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"VALUE"}, {"type":"Punctuation","value":"("}, {"type":"NameVariable","value":"cUserConfigFile"}, {"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":"lUser"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"TRUE\n "}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"BREAK"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"BY "}, {"type":"Punctuation","value":"("}, {"type":"NameVariable","value":"bfConfig"}, {"type":"Punctuation","value":"."}, {"type":"NameVariable","value":"cSection"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"BEGINS "}, {"type":"LiteralStringDouble","value":"\"DataDigger\""}, {"type":"Punctuation","value":")"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"DESCENDING\n "}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"BY"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"bfConfig"}, {"type":"Punctuation","value":"."}, {"type":"NameVariable","value":"cSection"}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"BY"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"bfConfig"}, {"type":"Punctuation","value":"."}, {"type":"NameVariable","value":"cSetting"}, {"type":"Punctuation","value":":"}, {"type":"Text","value":"\n\n "}, {"type":"KeywordReserved","value":"IF"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"FIRST-OF"}, {"type":"Punctuation","value":"("}, {"type":"NameVariable","value":"bfConfig"}, {"type":"Punctuation","value":"."}, {"type":"NameVariable","value":"cSection"}, {"type":"Punctuation","value":")"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"THEN"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"PUT"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"UNFORMATTED"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"SUBSTITUTE"}, {"type":"Punctuation","value":"("}, {"type":"LiteralStringDouble","value":"\"[\u00261]\""}, {"type":"NameVariable","value":",bfConfig"}, {"type":"Punctuation","value":"."}, {"type":"NameVariable","value":"cSection"}, {"type":"Punctuation","value":")"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"SKIP"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"PUT"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"UNFORMATTED"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"SUBSTITUTE"}, {"type":"Punctuation","value":"("}, {"type":"LiteralStringDouble","value":"\"\u00261=\u00262\""}, {"type":"NameVariable","value":",bfConfig"}, {"type":"Punctuation","value":"."}, {"type":"NameVariable","value":"cSetting,"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"bfConfig"}, {"type":"Punctuation","value":"."}, {"type":"NameVariable","value":"cValue"}, {"type":"Punctuation","value":")"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"SKIP"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"IF"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"LAST-OF"}, {"type":"Punctuation","value":"("}, {"type":"NameVariable","value":"bfConfig"}, {"type":"Punctuation","value":"."}, {"type":"NameVariable","value":"cSection"}, {"type":"Punctuation","value":")"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"THEN"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"PUT"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"UNFORMATTED"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"SKIP"}, {"type":"Punctuation","value":"("}, {"type":"LiteralNumberInteger","value":"1"}, {"type":"Punctuation","value":")."}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"END"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n\n "}, {"type":"KeywordReserved","value":"OUTPUT"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"CLOSE"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":"glDirtyCache"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"FALSE"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n\n "}, {"type":"CommentPreproc","value":"{\u0026timerStop}"}, {"type":"Text","value":"\n"}, {"type":"KeywordReserved","value":"END"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"PROCEDURE"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":" "}, {"type":"CommentMultiline","value":"/* saveConfigFileSorted */"}, {"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-saveQuery) = 0 \u0026THEN\n\n\u0026ANALYZE-SUSPEND _UIB-CODE-BLOCK _PROCEDURE saveQuery Procedure"}, {"type":"Text","value":"\n"}, {"type":"KeywordReserved","value":"PROCEDURE"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"saveQuery"}, {"type":"Text","value":" "}, {"type":"Punctuation","value":":"}, {"type":"Text","value":"\n"}, {"type":"CommentMultiline","value":"/* Save a single query to the INI file.\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 "}, {"type":"KeywordDeclaration","value":"DEFINE"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"INPUT "}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"PARAMETER"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"pcQuery"}, {"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":"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":"iNewNr"}, {"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":"bQuery"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"FOR"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"ttQuery"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n\n "}, {"type":"CommentPreproc","value":"{\u0026timerStart}"}, {"type":"Text","value":"\n\n "}, {"type":"CommentMultiline","value":"/* Prepare query for saving in ini-file */"}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":"cQuery"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"pcQuery"}, {"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":"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":"Text","value":" "}, {"type":"KeywordReserved","value":"THEN"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"RETURN"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n\n "}, {"type":"CommentMultiline","value":"/* Get the table with queries again, because they might be\n * changed if the user has more than one window open.\n */"}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"RUN"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"collectQueryInfo"}, {"type":"Punctuation","value":"("}, {"type":"NameVariable","value":"pcDatabase,"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"pcTable"}, {"type":"Punctuation","value":")."}, {"type":"Text","value":"\n\n "}, {"type":"CommentMultiline","value":"/* Save current query in the tt. If it already is in the\n * TT then just move it to the top\n */"}, {"type":"Text","value":"\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":"cQueryTxt"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"cQuery"}, {"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":"DO"}, {"type":"Punctuation","value":":"}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"ASSIGN"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"bQuery"}, {"type":"Punctuation","value":"."}, {"type":"NameVariable","value":"iQueryNr"}, {"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":"ELSE\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":"bQuery"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"ASSIGN"}, {"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":"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":"NameVariable","value":"bQuery"}, {"type":"Punctuation","value":"."}, {"type":"NameVariable","value":"iQueryNr"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"LiteralNumberInteger","value":"0"}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":"bQuery"}, {"type":"Punctuation","value":"."}, {"type":"NameVariable","value":"cQueryTxt"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"cQuery"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"END"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n\n "}, {"type":"CommentMultiline","value":"/* The ttQuery temp-table is already filled, renumber it */"}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":"#QueryLoop"}, {"type":"Punctuation","value":":"}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"REPEAT"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"PRESELECT"}, {"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":"Text","value":"\n "}, {"type":"KeywordReserved","value":"BY"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"bQuery"}, {"type":"Punctuation","value":"."}, {"type":"NameVariable","value":"iQueryNr"}, {"type":"Punctuation","value":":"}, {"type":"Text","value":"\n\n "}, {"type":"KeywordReserved","value":"FIND"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"NEXT"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"bQuery"}, {"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":"bQuery"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"THEN"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"LEAVE "}, {"type":"NameVariable","value":"#QueryLoop"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"ASSIGN\n "}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"iNewNr"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"iNewNr"}, {"type":"Text","value":" "}, {"type":"Operator","value":"+"}, {"type":"Text","value":" "}, {"type":"LiteralNumberInteger","value":"1"}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":"bQuery"}, {"type":"Punctuation","value":"."}, {"type":"NameVariable","value":"iQueryNr"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"iNewNr"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"END"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n\n "}, {"type":"CommentMultiline","value":"/* And save it to the INI-file */"}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"RUN"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"saveQueryTable"}, {"type":"Punctuation","value":"("}, {"type":"KeywordReserved","value":"table"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"bQuery,"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"pcDatabase,"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"pcTable"}, {"type":"Punctuation","value":")."}, {"type":"Text","value":"\n\n "}, {"type":"CommentPreproc","value":"{\u0026timerStop}"}, {"type":"Text","value":"\n"}, {"type":"KeywordReserved","value":"END"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"PROCEDURE"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":" "}, {"type":"CommentMultiline","value":"/* saveQuery */"}, {"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-saveQueryTable) = 0 \u0026THEN\n\n\u0026ANALYZE-SUSPEND _UIB-CODE-BLOCK _PROCEDURE saveQueryTable Procedure"}, {"type":"Text","value":"\n"}, {"type":"KeywordReserved","value":"PROCEDURE"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"saveQueryTable"}, {"type":"Text","value":" "}, {"type":"Punctuation","value":":"}, {"type":"Text","value":"\n"}, {"type":"CommentMultiline","value":"/* Save the queries in the TT to the INI file with a max of MaxQueryHistory\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":"KeywordReserved","value":"table"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"FOR"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"ttQuery"}, {"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":"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":"iQuery"}, {"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\n "}, {"type":"CommentPreproc","value":"{\u0026timerStart}"}, {"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":"iQuery"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"LiteralNumberInteger","value":"1"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n\n "}, {"type":"NameVariable","value":"#SaveQuery"}, {"type":"Punctuation","value":":"}, {"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":"Text","value":"\n "}, {"type":"KeywordReserved","value":"BY"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"bQuery"}, {"type":"Punctuation","value":"."}, {"type":"NameVariable","value":"iQueryNr"}, {"type":"Punctuation","value":":"}, {"type":"Text","value":"\n\n "}, {"type":"NameVariable","value":"cSetting"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"bQuery"}, {"type":"Punctuation","value":"."}, {"type":"NameVariable","value":"cQueryTxt"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"IF"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"cSetting"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"LiteralStringSingle","value":"''"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"THEN"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"NEXT "}, {"type":"NameVariable","value":"#SaveQuery"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n\n "}, {"type":"NameVariable","value":"setRegistry"}, {"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'"}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"pcTable,"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"iQuery"}, {"type":"Punctuation","value":")"}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"cSetting"}, {"type":"Punctuation","value":")."}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":"iQuery"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"iQuery"}, {"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":"NameVariable","value":"iQuery"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"\u003e"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"iMaxQueryHistory"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"THEN"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"LEAVE "}, {"type":"NameVariable","value":"#SaveQuery"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"END"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n\n "}, {"type":"CommentMultiline","value":"/* Delete higher nrs than MaxQueryHistory */"}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"DO"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"WHILE"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"iQuery"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"\u003c"}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"iMaxQueryHistory"}, {"type":"Punctuation","value":":"}, {"type":"Text","value":"\n\n "}, {"type":"NameVariable","value":"setRegistry"}, {"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'"}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"pcTable,"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"iQuery"}, {"type":"Punctuation","value":")"}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"?"}, {"type":"Punctuation","value":")."}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":"iQuery"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"iQuery"}, {"type":"Text","value":" "}, {"type":"Operator","value":"+"}, {"type":"Text","value":" "}, {"type":"LiteralNumberInteger","value":"1"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"END"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":" "}, {"type":"CommentMultiline","value":"/* iQuery .. MaxQueryHistory */"}, {"type":"Text","value":"\n\n "}, {"type":"CommentPreproc","value":"{\u0026timerStop}"}, {"type":"Text","value":"\n"}, {"type":"KeywordReserved","value":"END"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"PROCEDURE"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":" "}, {"type":"CommentMultiline","value":"/* saveQueryTable */"}, {"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-saveWindowPos) = 0 \u0026THEN\n\n\u0026ANALYZE-SUSPEND _UIB-CODE-BLOCK _PROCEDURE saveWindowPos Procedure"}, {"type":"Text","value":"\n"}, {"type":"KeywordReserved","value":"PROCEDURE"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"saveWindowPos"}, {"type":"Text","value":" "}, {"type":"Punctuation","value":":"}, {"type":"Text","value":"\n"}, {"type":"CommentMultiline","value":"/* Save position / size of a window\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":"phWindow"}, {"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":"pcWindowName"}, {"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":"setRegistry"}, {"type":"Punctuation","value":"("}, {"type":"NameVariable","value":"pcWindowName,"}, {"type":"Text","value":" "}, {"type":"LiteralStringDouble","value":"\"Window:x\""}, {"type":"Text","value":" "}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"STRING"}, {"type":"Punctuation","value":"("}, {"type":"NameVariable","value":"phWindow"}, {"type":"Punctuation","value":":"}, {"type":"KeywordReserved","value":"X"}, {"type":"Punctuation","value":")"}, {"type":"Text","value":" "}, {"type":"Punctuation","value":")."}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":"setRegistry"}, {"type":"Punctuation","value":"("}, {"type":"NameVariable","value":"pcWindowName,"}, {"type":"Text","value":" "}, {"type":"LiteralStringDouble","value":"\"Window:y\""}, {"type":"Text","value":" "}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"STRING"}, {"type":"Punctuation","value":"("}, {"type":"NameVariable","value":"phWindow"}, {"type":"Punctuation","value":":"}, {"type":"KeywordReserved","value":"Y"}, {"type":"Punctuation","value":")"}, {"type":"Text","value":" "}, {"type":"Punctuation","value":")."}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":"setRegistry"}, {"type":"Punctuation","value":"("}, {"type":"NameVariable","value":"pcWindowName,"}, {"type":"Text","value":" "}, {"type":"LiteralStringDouble","value":"\"Window:height\""}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"STRING"}, {"type":"Punctuation","value":"("}, {"type":"NameVariable","value":"phWindow"}, {"type":"Punctuation","value":":"}, {"type":"KeywordReserved","value":"HEIGHT-PIXELS"}, {"type":"Punctuation","value":")"}, {"type":"Text","value":" "}, {"type":"Punctuation","value":")."}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":"setRegistry"}, {"type":"Punctuation","value":"("}, {"type":"NameVariable","value":"pcWindowName,"}, {"type":"Text","value":" "}, {"type":"LiteralStringDouble","value":"\"Window:width\""}, {"type":"Text","value":" "}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"STRING"}, {"type":"Punctuation","value":"("}, {"type":"NameVariable","value":"phWindow"}, {"type":"Punctuation","value":":"}, {"type":"KeywordReserved","value":"WIDTH-PIXELS"}, {"type":"Punctuation","value":")"}, {"type":"Text","value":" "}, {"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":"/* saveWindowPos */"}, {"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-setCaching) = 0 \u0026THEN\n\n\u0026ANALYZE-SUSPEND _UIB-CODE-BLOCK _PROCEDURE setCaching Procedure"}, {"type":"Text","value":"\n"}, {"type":"KeywordReserved","value":"PROCEDURE"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"setCaching"}, {"type":"Text","value":" "}, {"type":"Punctuation","value":":"}, {"type":"Text","value":"\n"}, {"type":"CommentMultiline","value":"/* Set the cache vars for the library\n */"}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":"glCacheTableDefs"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"KeywordType","value":"LOGICAL"}, {"type":"Punctuation","value":"("}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"getRegistry"}, {"type":"Punctuation","value":"("}, {"type":"LiteralStringDouble","value":"\"DataDigger:Cache\""}, {"type":"NameVariable","value":","}, {"type":"LiteralStringDouble","value":"\"TableDefs\""}, {"type":"Punctuation","value":")"}, {"type":"Text","value":" "}, {"type":"Punctuation","value":")."}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":"glCacheFieldDefs"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"KeywordType","value":"LOGICAL"}, {"type":"Punctuation","value":"("}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"getRegistry"}, {"type":"Punctuation","value":"("}, {"type":"LiteralStringDouble","value":"\"DataDigger:Cache\""}, {"type":"NameVariable","value":","}, {"type":"LiteralStringDouble","value":"\"FieldDefs\""}, {"type":"Punctuation","value":")"}, {"type":"Text","value":" "}, {"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":"/* setCaching */"}, {"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-setFavourite) = 0 \u0026THEN\n\n\u0026ANALYZE-SUSPEND _UIB-CODE-BLOCK _PROCEDURE setFavourite Procedure"}, {"type":"Text","value":"\n"}, {"type":"KeywordReserved","value":"PROCEDURE"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"setFavourite"}, {"type":"Text","value":" "}, {"type":"Punctuation","value":":"}, {"type":"Text","value":"\n"}, {"type":"CommentMultiline","value":"/* Set / unset / toggle a table as favourite\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":"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 "}, {"type":"KeywordDeclaration","value":"DEFINE"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"INPUT"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"PARAMETER"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"pcGroupName"}, {"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":"plFavourite"}, {"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":"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":"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\n "}, {"type":"NameVariable","value":"cList"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"getRegistry"}, {"type":"Punctuation","value":"("}, {"type":"LiteralStringDouble","value":"\"DataDigger:Favourites\""}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"pcGroupName"}, {"type":"Punctuation","value":")."}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"IF"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"cList"}, {"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":"cList"}, {"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":"Punctuation","value":")."}, {"type":"Text","value":"\n\n "}, {"type":"NameVariable","value":"setRegistry"}, {"type":"Punctuation","value":"("}, {"type":"LiteralStringDouble","value":"\"DataDigger:Favourites\""}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"pcGroupName,"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"cList"}, {"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":"/* setFavourite */"}, {"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-setLabelPosition) = 0 \u0026THEN\n\n\u0026ANALYZE-SUSPEND _UIB-CODE-BLOCK _PROCEDURE setLabelPosition Procedure"}, {"type":"Text","value":"\n"}, {"type":"KeywordReserved","value":"PROCEDURE"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"setLabelPosition"}, {"type":"Text","value":" "}, {"type":"Punctuation","value":":"}, {"type":"Text","value":"\n"}, {"type":"CommentMultiline","value":"/* Correct the position of the label for larger fonts\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":"phWidget"}, {"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":"/* Move horizontally far enough from the widget */"}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":"phWidget"}, {"type":"Punctuation","value":":"}, {"type":"KeywordReserved","value":"SIDE-LABEL-HANDLE"}, {"type":"Punctuation","value":":"}, {"type":"KeywordReserved","value":"X "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"phWidget"}, {"type":"Punctuation","value":":"}, {"type":"KeywordReserved","value":"X\n "}, {"type":"Text","value":" "}, {"type":"Operator","value":"-"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"FONT-TABLE"}, {"type":"Punctuation","value":":"}, {"type":"KeywordReserved","value":"GET-TEXT-WIDTH-PIXELS"}, {"type":"Punctuation","value":"("}, {"type":"NameVariable","value":"phWidget"}, {"type":"Punctuation","value":":"}, {"type":"KeywordReserved","value":"SIDE-LABEL-HANDLE"}, {"type":"Punctuation","value":":"}, {"type":"KeywordReserved","value":"SCREEN-VALUE"}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"phWidget"}, {"type":"Punctuation","value":":"}, {"type":"KeywordReserved","value":"FRAME"}, {"type":"Punctuation","value":":"}, {"type":"KeywordReserved","value":"FONT"}, {"type":"Punctuation","value":")"}, {"type":"Text","value":"\n "}, {"type":"Operator","value":"-"}, {"type":"Text","value":" "}, {"type":"Punctuation","value":"("}, {"type":"KeywordReserved","value":"IF"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"phWidget"}, {"type":"Punctuation","value":":"}, {"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":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"STRING"}, {"type":"Punctuation","value":"("}, {"type":"NameVariable","value":"iButtonPressed"}, {"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":"/* showHelp */"}, {"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-showScrollbars) = 0 \u0026THEN\n\n\u0026ANALYZE-SUSPEND _UIB-CODE-BLOCK _PROCEDURE showScrollbars Procedure"}, {"type":"Text","value":"\n"}, {"type":"KeywordReserved","value":"PROCEDURE"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"showScrollbars"}, {"type":"Text","value":" "}, {"type":"Punctuation","value":":"}, {"type":"Text","value":"\n"}, {"type":"CommentMultiline","value":"/* Hide or show scrollbars the hard way\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":"ip"}, {"type":"Operator","value":"-"}, {"type":"NameVariable","value":"Frame"}, {"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":"ip"}, {"type":"Operator","value":"-"}, {"type":"NameVariable","value":"horizontal"}, {"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":"INPUT"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"PARAMETER"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"ip"}, {"type":"Operator","value":"-"}, {"type":"NameVariable","value":"vertical"}, {"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":"{\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":"iv"}, {"type":"Operator","value":"-"}, {"type":"NameVariable","value":"retint"}, {"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":"CommentPreproc","value":"{\u0026timerStart}"}, {"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":"ip"}, {"type":"Operator","value":"-"}, {"type":"NameVariable","value":"Frame"}, {"type":"Punctuation","value":")"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"OR"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"ip"}, {"type":"Operator","value":"-"}, {"type":"NameVariable","value":"Frame"}, {"type":"Punctuation","value":":"}, {"type":"KeywordReserved","value":"HWND "}, {"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":"CommentPreproc","value":"\n\n \u0026scoped-define SB_HORZ 0\n \u0026scoped-define SB_VERT 1\n \u0026scoped-define SB_BOTH 3\n \u0026scoped-define SB_THUMBPOSITION 4"}, {"type":"Text","value":"\n\n "}, {"type":"CommentPreproc","value":"{\u0026_proparse_prolint-nowarn(varusage)}"}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"RUN"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"ShowScrollBar"}, {"type":"Text","value":" "}, {"type":"Punctuation","value":"("}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"ip"}, {"type":"Operator","value":"-"}, {"type":"NameVariable","value":"Frame"}, {"type":"Punctuation","value":":"}, {"type":"KeywordReserved","value":"HWND"}, {"type":"NameVariable","value":","}, {"type":"Text","value":"\n "}, {"type":"CommentPreproc","value":"{\u0026SB_HORZ}"}, {"type":"NameVariable","value":","}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"IF"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"ip"}, {"type":"Operator","value":"-"}, {"type":"NameVariable","value":"horizontal"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"THEN"}, {"type":"Text","value":" "}, {"type":"Operator","value":"-"}, {"type":"LiteralNumberInteger","value":"1"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"ELSE"}, {"type":"Text","value":" "}, {"type":"LiteralNumberInteger","value":"0"}, {"type":"NameVariable","value":","}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"OUTPUT"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"iv"}, {"type":"Operator","value":"-"}, {"type":"NameVariable","value":"retint"}, {"type":"Text","value":" "}, {"type":"Punctuation","value":")."}, {"type":"Text","value":"\n\n "}, {"type":"CommentPreproc","value":"{\u0026_proparse_prolint-nowarn(varusage)}"}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"RUN"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"ShowScrollBar"}, {"type":"Text","value":" "}, {"type":"Punctuation","value":"("}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"ip"}, {"type":"Operator","value":"-"}, {"type":"NameVariable","value":"Frame"}, {"type":"Punctuation","value":":"}, {"type":"KeywordReserved","value":"HWND"}, {"type":"NameVariable","value":","}, {"type":"Text","value":"\n "}, {"type":"CommentPreproc","value":"{\u0026SB_VERT}"}, {"type":"NameVariable","value":","}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"IF"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"ip"}, {"type":"Operator","value":"-"}, {"type":"NameVariable","value":"vertical"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"THEN"}, {"type":"Text","value":" "}, {"type":"Operator","value":"-"}, {"type":"LiteralNumberInteger","value":"1"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"ELSE"}, {"type":"Text","value":" "}, {"type":"LiteralNumberInteger","value":"0"}, {"type":"NameVariable","value":","}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"OUTPUT"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"iv"}, {"type":"Operator","value":"-"}, {"type":"NameVariable","value":"retint"}, {"type":"Text","value":" "}, {"type":"Punctuation","value":")."}, {"type":"CommentPreproc","value":"\n\n \u0026undefine SB_HORZ\n \u0026undefine SB_VERT\n \u0026undefine SB_BOTH\n \u0026undefine SB_THUMBPOSITION"}, {"type":"Text","value":"\n\n "}, {"type":"CommentPreproc","value":"{\u0026timerStop}"}, {"type":"Text","value":"\n"}, {"type":"KeywordReserved","value":"END"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"PROCEDURE"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":" "}, {"type":"CommentMultiline","value":"/* ShowScrollbars */"}, {"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-unlockWindow) = 0 \u0026THEN\n\n\u0026ANALYZE-SUSPEND _UIB-CODE-BLOCK _PROCEDURE unlockWindow Procedure"}, {"type":"Text","value":"\n"}, {"type":"KeywordReserved","value":"PROCEDURE"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"unlockWindow"}, {"type":"Text","value":" "}, {"type":"Punctuation","value":":"}, {"type":"Text","value":"\n"}, {"type":"CommentMultiline","value":"/* Force a window to unlock\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":"phWindow"}, {"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":"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":"iRet"}, {"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":"BUFFER"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"ttWindowLock"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"FOR"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"ttWindowLock"}, {"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":"\"Window \u00261, force to unlock\""}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"phWindow"}, {"type":"Punctuation","value":":"}, {"type":"KeywordReserved","value":"TITLE"}, {"type":"Punctuation","value":"))."}, {"type":"Text","value":"\n\n "}, {"type":"CommentMultiline","value":"/* Find window in our tt of locked windows */"}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"FIND"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"ttWindowLock"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"WHERE"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"ttWindowLock"}, {"type":"Punctuation","value":"."}, {"type":"NameVariable","value":"hWindow"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"phWindow"}, {"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":"ttWindowLock"}, {"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":"IF"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"ttWindowLock"}, {"type":"Punctuation","value":"."}, {"type":"NameVariable","value":"iLockCounter"}, {"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":"CommentPreproc","value":"{\u0026_proparse_prolint-nowarn(varusage)}"}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"RUN"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"SendMessageA"}, {"type":"Punctuation","value":"("}, {"type":"NameVariable","value":"phWindow"}, {"type":"Punctuation","value":":"}, {"type":"KeywordReserved","value":"HWND"}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"CommentPreproc","value":"{\u0026WM_SETREDRAW}"}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"LiteralNumberInteger","value":"1"}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"LiteralNumberInteger","value":"0"}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"OUTPUT"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"iRet"}, {"type":"Punctuation","value":")."}, {"type":"Text","value":"\n\n "}, {"type":"CommentPreproc","value":"{\u0026_proparse_prolint-nowarn(varusage)}"}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"RUN"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"RedrawWindow"}, {"type":"Punctuation","value":"("}, {"type":"NameVariable","value":"phWindow"}, {"type":"Punctuation","value":":"}, {"type":"KeywordReserved","value":"HWND"}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"LiteralNumberInteger","value":"0"}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"LiteralNumberInteger","value":"0"}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"CommentPreproc","value":"{\u0026RDW_ALLCHILDREN}"}, {"type":"Text","value":" "}, {"type":"Operator","value":"+"}, {"type":"Text","value":" "}, {"type":"CommentPreproc","value":"{\u0026RDW_ERASE}"}, {"type":"Text","value":" "}, {"type":"Operator","value":"+"}, {"type":"Text","value":" "}, {"type":"CommentPreproc","value":"{\u0026RDW_INVALIDATE}"}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"OUTPUT"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"iRet"}, {"type":"Punctuation","value":")."}, {"type":"Text","value":"\n\n "}, {"type":"KeywordReserved","value":"DELETE"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"ttWindowLock"}, {"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":"/* unlockWindow */"}, {"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-updateFields) = 0 \u0026THEN\n\n\u0026ANALYZE-SUSPEND _UIB-CODE-BLOCK _PROCEDURE updateFields Procedure"}, {"type":"Text","value":"\n"}, {"type":"KeywordReserved","value":"PROCEDURE"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"updateFields"}, {"type":"Text","value":" "}, {"type":"Punctuation","value":":"}, {"type":"Text","value":"\n"}, {"type":"CommentMultiline","value":"/* Update the fields temp-table with settings from registry\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":"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":"ttField"}, {"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":"cCustomFormat"}, {"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":"cFieldOrder"}, {"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":"iColumnOrder"}, {"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":"iMaxExtent"}, {"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":"lRecRowAtEnd"}, {"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":"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\n "}, {"type":"CommentPreproc","value":"{\u0026timerStart}"}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"PUBLISH "}, {"type":"LiteralStringDouble","value":"\"debugInfo\""}, {"type":"Text","value":" "}, {"type":"Punctuation","value":"("}, {"type":"LiteralNumberInteger","value":"1"}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"SUBSTITUTE"}, {"type":"Punctuation","value":"("}, {"type":"LiteralStringDouble","value":"\"Update field definitions for \u00261.\u00262\""}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"pcDatabase,"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"pcTableName"}, {"type":"Punctuation","value":"))."}, {"type":"Text","value":"\n\n "}, {"type":"CommentMultiline","value":"/* Get list of all previously selected fields */"}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":"cSelectedFields"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"getRegistry"}, {"type":"Punctuation","value":"("}, {"type":"KeywordReserved","value":"SUBSTITUTE"}, {"type":"Punctuation","value":"("}, {"type":"LiteralStringDouble","value":"\"DB:\u00261\""}, {"type":"NameVariable","value":",pcDatabase"}, {"type":"Punctuation","value":")"}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"SUBSTITUTE"}, {"type":"Punctuation","value":"("}, {"type":"LiteralStringDouble","value":"\"\u00261:fields\""}, {"type":"NameVariable","value":",pcTableName"}, {"type":"Punctuation","value":"))."}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"IF"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"cSelectedFields"}, {"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":"cSelectedFields"}, {"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":"NameVariable","value":",pcTableName"}, {"type":"Punctuation","value":"))."}, {"type":"Text","value":"\n\n "}, {"type":"CommentMultiline","value":"/* RECID and ROWID at the end? */"}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"IF"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"cFieldOrder"}, {"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":"NameVariable","value":"lRecRowAtEnd"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"LOOKUP"}, {"type":"Punctuation","value":"("}, {"type":"LiteralStringDouble","value":"\"ROWID\""}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"cFieldOrder"}, {"type":"Punctuation","value":")"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"\u003e"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"NUM-ENTRIES"}, {"type":"Punctuation","value":"("}, {"type":"NameVariable","value":"cFieldOrder"}, {"type":"Punctuation","value":")"}, {"type":"Text","value":" "}, {"type":"Operator","value":"-"}, {"type":"Text","value":" "}, {"type":"LiteralNumberInteger","value":"2"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"AND"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"LOOKUP"}, {"type":"Punctuation","value":"("}, {"type":"LiteralStringDouble","value":"\"RECID\""}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"cFieldOrder"}, {"type":"Punctuation","value":")"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"\u003e"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"NUM-ENTRIES"}, {"type":"Punctuation","value":"("}, {"type":"NameVariable","value":"cFieldOrder"}, {"type":"Punctuation","value":")"}, {"type":"Text","value":" "}, {"type":"Operator","value":"-"}, {"type":"Text","value":" "}, {"type":"LiteralNumberInteger","value":"2"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"PUBLISH "}, {"type":"LiteralStringDouble","value":"\"debugInfo\""}, {"type":"Text","value":" "}, {"type":"Punctuation","value":"("}, {"type":"LiteralNumberInteger","value":"2"}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"SUBSTITUTE"}, {"type":"Punctuation","value":"("}, {"type":"LiteralStringDouble","value":"\"Field order for table \u00261: \u00262\""}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"pcTableName,"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"cFieldOrder"}, {"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":"\"Rowid/recid at the end for table \u00261: \u00262\""}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"pcTableName,"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"lRecRowAtEnd"}, {"type":"Punctuation","value":"))."}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"END"}, {"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":"bField"}, {"type":"Text","value":" "}, {"type":"CommentPreproc","value":"{\u0026TABLE-SCAN}"}, {"type":"Punctuation","value":":"}, {"type":"Text","value":"\n\n "}, {"type":"CommentMultiline","value":"/* Due to a bug the nr of decimals may be set on non-decimal fields\n * See PKB P185263 (article 18087) for more information\n * http://knowledgebase.progress.com/articles/Article/P185263\n */"}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"IF"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"bField"}, {"type":"Punctuation","value":"."}, {"type":"NameVariable","value":"cDataType"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"\u003c\u003e"}, {"type":"Text","value":" "}, {"type":"LiteralStringSingle","value":"'DECIMAL'"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"THEN"}, {"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":"?"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n\n "}, {"type":"CommentMultiline","value":"/* Was this field selected? */"}, {"type":"Text","value":"\n "}, {"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":"bField"}, {"type":"Punctuation","value":"."}, {"type":"NameVariable","value":"cFullName"}, {"type":"Punctuation","value":")."}, {"type":"Text","value":"\n\n "}, {"type":"CommentMultiline","value":"/* Customization option for the user to show/hide certain fields */"}, {"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":"'customShowField'"}, {"type":"Punctuation","value":")."}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"PUBLISH "}, {"type":"LiteralStringSingle","value":"'customShowField'"}, {"type":"Text","value":" "}, {"type":"Punctuation","value":"("}, {"type":"NameVariable","value":"pcDatabase,"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"pcTableName,"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"bField"}, {"type":"Punctuation","value":"."}, {"type":"NameVariable","value":"cFieldName,"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"INPUT-OUTPUT"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"bField"}, {"type":"Punctuation","value":"."}, {"type":"NameVariable","value":"lShow"}, {"type":"Punctuation","value":")."}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"PUBLISH "}, {"type":"LiteralStringDouble","value":"\"DD:Timer\""}, {"type":"Text","value":" "}, {"type":"Punctuation","value":"("}, {"type":"LiteralStringDouble","value":"\"stop\""}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"LiteralStringSingle","value":"'customShowField'"}, {"type":"Punctuation","value":")."}, {"type":"Text","value":"\n\n "}, {"type":"CommentMultiline","value":"/* Customization option for the user to adjust the format */"}, {"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":"'customFormat'"}, {"type":"Punctuation","value":")."}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"PUBLISH "}, {"type":"LiteralStringSingle","value":"'customFormat'"}, {"type":"Text","value":" "}, {"type":"Punctuation","value":"("}, {"type":"NameVariable","value":"pcDatabase,"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"pcTableName,"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"bField"}, {"type":"Punctuation","value":"."}, {"type":"NameVariable","value":"cFieldName,"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"bField"}, {"type":"Punctuation","value":"."}, {"type":"NameVariable","value":"cDatatype,"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"INPUT-OUTPUT"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"bField"}, {"type":"Punctuation","value":"."}, {"type":"NameVariable","value":"cFormat"}, {"type":"Punctuation","value":")."}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"PUBLISH "}, {"type":"LiteralStringDouble","value":"\"DD:Timer\""}, {"type":"Text","value":" "}, {"type":"Punctuation","value":"("}, {"type":"LiteralStringDouble","value":"\"stop\""}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"LiteralStringSingle","value":"'customFormat'"}, {"type":"Punctuation","value":")."}, {"type":"Text","value":"\n\n "}, {"type":"CommentMultiline","value":"/* Restore changed field format. */"}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":"cCustomFormat"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"getRegistry"}, {"type":"Punctuation","value":"("}, {"type":"KeywordReserved","value":"SUBSTITUTE"}, {"type":"Punctuation","value":"("}, {"type":"LiteralStringDouble","value":"\"DB:\u00261\""}, {"type":"NameVariable","value":",pcDatabase"}, {"type":"Punctuation","value":")"}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"SUBSTITUTE"}, {"type":"Punctuation","value":"("}, {"type":"LiteralStringDouble","value":"\"\u00261.\u00262:format\""}, {"type":"NameVariable","value":",pcTableName,bField"}, {"type":"Punctuation","value":"."}, {"type":"NameVariable","value":"cFieldName"}, {"type":"Punctuation","value":")"}, {"type":"Text","value":" "}, {"type":"Punctuation","value":")."}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"IF"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"cCustomFormat"}, {"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":"NameVariable","value":"bField"}, {"type":"Punctuation","value":"."}, {"type":"NameVariable","value":"cFormat"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"cCustomFormat"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n\n "}, {"type":"CommentMultiline","value":"/* Restore changed field order. */"}, {"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":"KeywordReserved","value":"LOOKUP"}, {"type":"Punctuation","value":"("}, {"type":"NameVariable","value":"bField"}, {"type":"Punctuation","value":"."}, {"type":"NameVariable","value":"cFullName,cFieldOrder"}, {"type":"Punctuation","value":")."}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"IF"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"bField"}, {"type":"Punctuation","value":"."}, {"type":"NameVariable","value":"iOrder"}, {"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":"bField"}, {"type":"Punctuation","value":"."}, {"type":"NameVariable","value":"iOrder"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"bField"}, {"type":"Punctuation","value":"."}, {"type":"NameVariable","value":"iOrderOrg"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n\n "}, {"type":"CommentMultiline","value":"/* Keep track of highest nr */"}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":"iFieldOrder"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"MAXIMUM"}, {"type":"Punctuation","value":"("}, {"type":"NameVariable","value":"iFieldOrder,bField"}, {"type":"Punctuation","value":"."}, {"type":"NameVariable","value":"iOrder"}, {"type":"Punctuation","value":")."}, {"type":"Text","value":"\n\n "}, {"type":"KeywordReserved","value":"END"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":" "}, {"type":"CommentMultiline","value":"/* f/e bField */"}, {"type":"Text","value":"\n\n "}, {"type":"CommentMultiline","value":"/* Only show first X of an extent */"}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":"iMaxExtent"}, {"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":"LiteralStringDouble","value":"\"MaxExtent\""}, {"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":"iMaxExtent"}, {"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":"iMaxExtent"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"LiteralNumberInteger","value":"100"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"IF"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"iMaxExtent"}, {"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":"FOR"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"EACH"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"bColumn"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"WHERE"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"bColumn"}, {"type":"Punctuation","value":"."}, {"type":"NameVariable","value":"iExtent"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"\u003e"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"iMaxExtent"}, {"type":"Punctuation","value":":"}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"DELETE"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"bColumn"}, {"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":"KeywordReserved","value":"CAN-FIND"}, {"type":"Punctuation","value":"("}, {"type":"KeywordReserved","value":"FIRST"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"bField"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"WHERE"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"bField"}, {"type":"Punctuation","value":"."}, {"type":"NameVariable","value":"iOrder"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"LiteralNumberInteger","value":"0"}, {"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":"CommentMultiline","value":"/* Set new fields (no order assigned) at the end */"}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"FOR"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"EACH"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"bField"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"WHERE"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"bField"}, {"type":"Punctuation","value":"."}, {"type":"NameVariable","value":"iOrder"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"LiteralNumberInteger","value":"0"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"BY"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"bField"}, {"type":"Punctuation","value":"."}, {"type":"NameVariable","value":"iFieldRpos"}, {"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":"iOrder"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"iFieldOrder"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"END"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n\n "}, {"type":"CommentMultiline","value":"/* If RECID+ROWID should be at the end then re-assign them */"}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"IF"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"lRecRowAtEnd"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"THEN\n "}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"FOR"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"EACH"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"bField"}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"WHERE"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"bField"}, {"type":"Punctuation","value":"."}, {"type":"NameVariable","value":"cFieldName"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"LiteralStringDouble","value":"\"RECID\""}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"OR"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"bField"}, {"type":"Punctuation","value":"."}, {"type":"NameVariable","value":"cFieldName"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"LiteralStringDouble","value":"\"ROWID\""}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"BY"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"bField"}, {"type":"Punctuation","value":"."}, {"type":"NameVariable","value":"iOrder"}, {"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":"iOrder"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"iFieldOrder"}, {"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":"/* Reorder fields to get rid of gaps */"}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":"iFieldOrder"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"LiteralNumberInteger","value":"0"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":"#FieldLoop"}, {"type":"Punctuation","value":":"}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"REPEAT"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"PRESELECT"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"EACH"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"bField"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"BY"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"bField"}, {"type":"Punctuation","value":"."}, {"type":"NameVariable","value":"iOrder"}, {"type":"Punctuation","value":":"}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"FIND"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"NEXT"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"bField"}, {"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":"bField"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"THEN"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"LEAVE "}, {"type":"NameVariable","value":"#FieldLoop"}, {"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":"iOrder"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"iFieldOrder"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"END"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n\n "}, {"type":"CommentMultiline","value":"/* Assign order nrs to columns to handle extents */"}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":"iColumnOrder"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"LiteralNumberInteger","value":"0"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"FOR"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"EACH"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"bField"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"BY"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"bField"}, {"type":"Punctuation","value":"."}, {"type":"NameVariable","value":"iOrder"}, {"type":"Punctuation","value":":"}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"FOR"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"EACH"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"bColumn"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"WHERE"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"bColumn"}, {"type":"Punctuation","value":"."}, {"type":"NameVariable","value":"cFieldName"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"bField"}, {"type":"Punctuation","value":"."}, {"type":"NameVariable","value":"cFieldName"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"BY"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"bColumn"}, {"type":"Punctuation","value":"."}, {"type":"NameVariable","value":"cFieldName"}, {"type":"Punctuation","value":":"}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":"iColumnOrder"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"iColumnOrder"}, {"type":"Text","value":" "}, {"type":"Operator","value":"+"}, {"type":"Text","value":" "}, {"type":"LiteralNumberInteger","value":"1"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":"bColumn"}, {"type":"Punctuation","value":"."}, {"type":"NameVariable","value":"iColumnNr"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"iColumnOrder"}, {"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":"CommentPreproc","value":"{\u0026timerStop}"}, {"type":"Text","value":"\n"}, {"type":"KeywordReserved","value":"END"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"PROCEDURE"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":" "}, {"type":"CommentMultiline","value":"/* updateFields */"}, {"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-updateMemoryCache) = 0 \u0026THEN\n\n\u0026ANALYZE-SUSPEND _UIB-CODE-BLOCK _PROCEDURE updateMemoryCache Procedure"}, {"type":"Text","value":"\n"}, {"type":"KeywordReserved","value":"PROCEDURE"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"updateMemoryCache"}, {"type":"Text","value":" "}, {"type":"Punctuation","value":":"}, {"type":"Text","value":"\n"}, {"type":"CommentMultiline","value":"/* Update the memory cache with current settings\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":"INPUT"}, {"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":"ttField"}, {"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":"KeywordReserved","value":"TABLE"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"FOR"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"ttColumn"}, {"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":"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\n "}, {"type":"KeywordReserved","value":"PUBLISH "}, {"type":"LiteralStringDouble","value":"\"debugInfo\""}, {"type":"Text","value":" "}, {"type":"Punctuation","value":"("}, {"type":"LiteralNumberInteger","value":"2"}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"SUBSTITUTE"}, {"type":"Punctuation","value":"("}, {"type":"LiteralStringDouble","value":"\"Update first-level cache for \u00261.\u00262\""}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"pcDatabase,"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"pcTableName"}, {"type":"Punctuation","value":"))."}, {"type":"Text","value":"\n\n "}, {"type":"CommentMultiline","value":"/* Delete old */"}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"FOR"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"EACH"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"bFieldCache"}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"WHERE"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"bFieldCache"}, {"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":"bFieldCache"}, {"type":"Punctuation","value":"."}, {"type":"NameVariable","value":"cTableName"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"pcTableName"}, {"type":"Punctuation","value":":"}, {"type":"Text","value":"\n\n "}, {"type":"KeywordReserved","value":"DELETE"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"bFieldCache"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"END"}, {"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":"bColumnCache"}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"WHERE"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"bColumnCache"}, {"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":"bColumnCache"}, {"type":"Punctuation","value":"."}, {"type":"NameVariable","value":"cTableName"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"pcTableName"}, {"type":"Punctuation","value":":"}, {"type":"Text","value":"\n\n "}, {"type":"KeywordReserved","value":"DELETE"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"bColumnCache"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"END"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n\n "}, {"type":"CommentMultiline","value":"/* Create new */"}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"FOR"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"EACH"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"bField"}, {"type":"Text","value":" "}, {"type":"CommentPreproc","value":"{\u0026TABLE-SCAN}"}, {"type":"Punctuation","value":":"}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"CREATE"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"bFieldCache"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"BUFFER-COPY"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"bField"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"TO"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"bFieldCache"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"END"}, {"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":"bColumn"}, {"type":"Text","value":" "}, {"type":"CommentPreproc","value":"{\u0026TABLE-SCAN}"}, {"type":"Punctuation","value":":"}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"CREATE"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"bColumnCache"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"BUFFER-COPY"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"bColumn"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"TO"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"bColumnCache"}, {"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":"/* updateMemoryCache */"}, {"type":"Text","value":"\n\n"}, {"type":"CommentMultiline","value":"/* _UIB-CODE-BLOCK-END */"}, {"type":"CommentPreproc","value":"\n\u0026ANALYZE-RESUME\n\n\u0026ENDIF"}, {"type":"Text","value":"\n\n"}, {"type":"CommentMultiline","value":"/* ************************ Function Implementations ***************** */"}, {"type":"CommentPreproc","value":"\n\n\u0026IF DEFINED(EXCLUDE-addConnection) = 0 \u0026THEN\n\n\u0026ANALYZE-SUSPEND _UIB-CODE-BLOCK _FUNCTION addConnection Procedure"}, {"type":"Text","value":"\n"}, {"type":"KeywordReserved","value":"FUNCTION"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"addConnection"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"RETURNS"}, {"type":"Text","value":" "}, {"type":"KeywordType","value":"LOGICAL\n "}, {"type":"Punctuation","value":"("}, {"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":"NameVariable","value":"pcSection"}, {"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":"/* Add a connection to the temp-table\n */"}, {"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":"NameVariable","value":"ttDatabase"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"WHERE"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"ttDatabase"}, {"type":"Punctuation","value":"."}, {"type":"NameVariable","value":"cLogicalName"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"pcDatabase"}, {"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":"ttDatabase"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"ASSIGN\n "}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"ttDatabase"}, {"type":"Punctuation","value":"."}, {"type":"NameVariable","value":"cLogicalName"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"pcDatabase"}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":"ttDatabase"}, {"type":"Punctuation","value":"."}, {"type":"NameVariable","value":"cSection"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"pcSection"}, {"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":"RETURN"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"TRUE"}, {"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":"\n\n"}, {"type":"CommentMultiline","value":"/* _UIB-CODE-BLOCK-END */"}, {"type":"CommentPreproc","value":"\n\u0026ANALYZE-RESUME\n\n\u0026ENDIF\n\n\u0026IF DEFINED(EXCLUDE-formatQueryString) = 0 \u0026THEN\n\n\u0026ANALYZE-SUSPEND _UIB-CODE-BLOCK _FUNCTION formatQueryString Procedure"}, {"type":"Text","value":"\n"}, {"type":"KeywordReserved","value":"FUNCTION"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"formatQueryString"}, {"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":"pcQueryString"}, {"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":"plExpanded"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"AS"}, {"type":"Text","value":" "}, {"type":"KeywordType","value":"LOGICAL "}, {"type":"Punctuation","value":")"}, {"type":"Text","value":" "}, {"type":"Punctuation","value":":"}, {"type":"Text","value":"\n "}, {"type":"CommentMultiline","value":"/* Return a properly formatted query string\n */"}, {"type":"Text","value":"\n "}, {"type":"KeywordDeclaration","value":"DEFINE"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"VARIABLE"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"cReturnValue"}, {"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":"CommentPreproc","value":"{\u0026timerStart}"}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":"cReturnValue"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"pcQueryString"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"IF"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"cReturnValue"}, {"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":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"CommentPreproc","value":"{\u0026QUERYSEP}"}, {"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":"cReturnValue"}, {"type":"Punctuation","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":"/* formatQueryString */"}, {"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-getColor) = 0 \u0026THEN\n\n\u0026ANALYZE-SUSPEND _UIB-CODE-BLOCK _FUNCTION getColor Procedure"}, {"type":"Text","value":"\n"}, {"type":"KeywordReserved","value":"FUNCTION"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"getColor"}, {"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 color number for a color name\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":"RETURN"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"setColor"}, {"type":"Punctuation","value":"("}, {"type":"NameVariable","value":"pcName,?"}, {"type":"Punctuation","value":")."}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"ELSE\n "}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"RETURN"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"bColor"}, {"type":"Punctuation","value":"."}, {"type":"NameVariable","value":"iColor"}, {"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":"/* getColor */"}, {"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-getColorByRGB) = 0 \u0026THEN\n\n\u0026ANALYZE-SUSPEND _UIB-CODE-BLOCK _FUNCTION getColorByRGB Procedure"}, {"type":"Text","value":"\n"}, {"type":"KeywordReserved","value":"FUNCTION"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"getColorByRGB"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"RETURNS"}, {"type":"Text","value":" "}, {"type":"KeywordType","value":"INTEGER\n "}, {"type":"Punctuation","value":"("}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"piRed"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"AS"}, {"type":"Text","value":" "}, {"type":"KeywordType","value":"INTEGER\n "}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"piGreen"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"AS"}, {"type":"Text","value":" "}, {"type":"KeywordType","value":"INTEGER\n "}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"piBlue"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"AS"}, {"type":"Text","value":" "}, {"type":"KeywordType","value":"INTEGER\n "}, {"type":"Punctuation","value":"):"}, {"type":"Text","value":"\n "}, {"type":"CommentMultiline","value":"/* Return the color number for a RGB combination\n * if needed, add color to color table.\n */"}, {"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":"CommentMultiline","value":"/* See if already exists */"}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"DO"}, {"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":"TO"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"COLOR-TABLE"}, {"type":"Punctuation","value":":"}, {"type":"KeywordReserved","value":"NUM-ENTRIES"}, {"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":"COLOR-TABLE"}, {"type":"Punctuation","value":":"}, {"type":"KeywordReserved","value":"GET-RED-VALUE"}, {"type":"Punctuation","value":"("}, {"type":"NameVariable","value":"i"}, {"type":"Punctuation","value":")"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"piRed"}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"AND"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"COLOR-TABLE"}, {"type":"Punctuation","value":":"}, {"type":"KeywordReserved","value":"GET-GREEN-VALUE"}, {"type":"Punctuation","value":"("}, {"type":"NameVariable","value":"i"}, {"type":"Punctuation","value":")"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"piGreen"}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"AND"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"COLOR-TABLE"}, {"type":"Punctuation","value":":"}, {"type":"KeywordReserved","value":"GET-BLUE-VALUE"}, {"type":"Punctuation","value":"("}, {"type":"NameVariable","value":"i"}, {"type":"Punctuation","value":")"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"piBlue"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"THEN"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"RETURN"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"i"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"END"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n\n "}, {"type":"CommentMultiline","value":"/* Define new color */"}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":"i"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"COLOR-TABLE"}, {"type":"Punctuation","value":":"}, {"type":"KeywordReserved","value":"NUM-ENTRIES"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"COLOR-TABLE"}, {"type":"Punctuation","value":":"}, {"type":"KeywordReserved","value":"NUM-ENTRIES "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"COLOR-TABLE"}, {"type":"Punctuation","value":":"}, {"type":"KeywordReserved","value":"NUM-ENTRIES "}, {"type":"Operator","value":"+"}, {"type":"Text","value":" "}, {"type":"LiteralNumberInteger","value":"1"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"COLOR-TABLE"}, {"type":"Punctuation","value":":"}, {"type":"KeywordReserved","value":"SET-DYNAMIC"}, {"type":"Punctuation","value":"("}, {"type":"NameVariable","value":"i,"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"TRUE"}, {"type":"Punctuation","value":")."}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"COLOR-TABLE"}, {"type":"Punctuation","value":":"}, {"type":"KeywordReserved","value":"SET-RED-VALUE "}, {"type":"Punctuation","value":"("}, {"type":"NameVariable","value":"i,"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"piRed"}, {"type":"Text","value":" "}, {"type":"Punctuation","value":")."}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"COLOR-TABLE"}, {"type":"Punctuation","value":":"}, {"type":"KeywordReserved","value":"SET-GREEN-VALUE"}, {"type":"Punctuation","value":"("}, {"type":"NameVariable","value":"i,"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"piGreen"}, {"type":"Punctuation","value":")."}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"COLOR-TABLE"}, {"type":"Punctuation","value":":"}, {"type":"KeywordReserved","value":"SET-BLUE-VALUE "}, {"type":"Punctuation","value":"("}, {"type":"NameVariable","value":"i,"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"piBlue"}, {"type":"Text","value":" "}, {"type":"Punctuation","value":")."}, {"type":"Text","value":"\n\n "}, {"type":"KeywordReserved","value":"RETURN"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"i"}, {"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":"/* getColorByRGB */"}, {"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-getColumnLabel) = 0 \u0026THEN\n\n\u0026ANALYZE-SUSPEND _UIB-CODE-BLOCK _FUNCTION getColumnLabel Procedure"}, {"type":"Text","value":"\n"}, {"type":"KeywordReserved","value":"FUNCTION"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"getColumnLabel"}, {"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":"phFieldBuffer"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"AS"}, {"type":"Text","value":" "}, {"type":"KeywordType","value":"HANDLE "}, {"type":"Punctuation","value":"):"}, {"type":"Text","value":"\n "}, {"type":"CommentMultiline","value":"/* Return column label, based on settings\n */"}, {"type":"Text","value":"\n "}, {"type":"KeywordDeclaration","value":"DEFINE"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"VARIABLE"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"cColumnLabel"}, {"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":"cTemplate"}, {"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":"CommentPreproc","value":"{\u0026timerStart}"}, {"type":"Text","value":"\n\n "}, {"type":"NameVariable","value":"cTemplate"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"getRegistry"}, {"type":"Punctuation","value":"("}, {"type":"LiteralStringDouble","value":"\"DataDigger\""}, {"type":"NameVariable","value":","}, {"type":"LiteralStringDouble","value":"\"ColumnLabelTemplate\""}, {"type":"Punctuation","value":")."}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"IF"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"cTemplate"}, {"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":"cTemplate"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"LiteralStringDouble","value":"\"\""}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"THEN"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"cTemplate"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"LiteralStringDouble","value":"\"\u00261\""}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n\n "}, {"type":"NameVariable","value":"cColumnLabel"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"SUBSTITUTE"}, {"type":"Punctuation","value":"("}, {"type":"NameVariable","value":"cTemplate"}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"phFieldBuffer"}, {"type":"Punctuation","value":"::"}, {"type":"NameVariable","value":"cFullName"}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"phFieldBuffer"}, {"type":"Punctuation","value":"::"}, {"type":"NameVariable","value":"iOrder"}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"phFieldBuffer"}, {"type":"Punctuation","value":"::"}, {"type":"NameVariable","value":"cLabel"}, {"type":"Text","value":"\n "}, {"type":"Punctuation","value":")."}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"RETURN"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"cColumnLabel"}, {"type":"Punctuation","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":"/* getColumnLabel */"}, {"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-getColumnWidthList) = 0 \u0026THEN\n\n\u0026ANALYZE-SUSPEND _UIB-CODE-BLOCK _FUNCTION getColumnWidthList Procedure"}, {"type":"Text","value":"\n"}, {"type":"KeywordReserved","value":"FUNCTION"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"getColumnWidthList"}, {"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":"phBrowse"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"AS"}, {"type":"Text","value":" "}, {"type":"KeywordType","value":"HANDLE "}, {"type":"Punctuation","value":"):"}, {"type":"Text","value":"\n "}, {"type":"CommentMultiline","value":"/* returns a list of all fields and their width like:\n * custnum:12,custname:20,city:12\n */"}, {"type":"Text","value":"\n "}, {"type":"KeywordDeclaration","value":"DEFINE"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"VARIABLE"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"cWidthList"}, {"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":"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\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\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 "}, {"type":"NameVariable","value":"cWidthList"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"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":"Punctuation","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":"/* getColumnWidthList */"}, {"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-getDatabaseList) = 0 \u0026THEN\n\n\u0026ANALYZE-SUSPEND _UIB-CODE-BLOCK _FUNCTION getDatabaseList Procedure"}, {"type":"Text","value":"\n"}, {"type":"KeywordReserved","value":"FUNCTION"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"getDatabaseList"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"RETURNS"}, {"type":"Text","value":" "}, {"type":"KeywordType","value":"CHARACTER"}, {"type":"Punctuation","value":":"}, {"type":"Text","value":"\n "}, {"type":"CommentMultiline","value":"/* Return a comma separated list of all connected databases\n */"}, {"type":"Text","value":"\n "}, {"type":"KeywordDeclaration","value":"DEFINE"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"VARIABLE"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"cDatabaseList"}, {"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":"cSchemaHolders"}, {"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":"iCount"}, {"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":"cDbType"}, {"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":"cLogicalDbName"}, {"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":"iPos"}, {"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":"bDataserver"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"FOR"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"ttDataserver"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n\n "}, {"type":"CommentPreproc","value":"{\u0026timerStart}"}, {"type":"Text","value":"\n\n "}, {"type":"CommentMultiline","value":"/* Support Dataservers */"}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"IF"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"gcSaveDatabaseList"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"\u003c\u003e"}, {"type":"Text","value":" "}, {"type":"LiteralStringDouble","value":"\"\""}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"AND"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"PROGRAM-NAME"}, {"type":"Punctuation","value":"("}, {"type":"LiteralNumberInteger","value":"2"}, {"type":"Punctuation","value":")"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"BEGINS "}, {"type":"LiteralStringDouble","value":"\"initializeObjects \""}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"THEN"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"RETURN"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"gcSaveDatabaseList"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n\n "}, {"type":"CommentMultiline","value":"/* Make a list of schema holders */"}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":"#Db"}, {"type":"Punctuation","value":":"}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"DO"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"iCount"}, {"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-DBS"}, {"type":"Punctuation","value":":"}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"ASSIGN\n "}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"cDbType"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"DBTYPE"}, {"type":"Punctuation","value":"("}, {"type":"NameVariable","value":"iCount"}, {"type":"Punctuation","value":")"}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":"cLogicalDbName"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"LDBNAME"}, {"type":"Punctuation","value":"("}, {"type":"NameVariable","value":"iCount"}, {"type":"Punctuation","value":")."}, {"type":"Text","value":"\n\n "}, {"type":"KeywordReserved","value":"IF"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"cDbType"}, {"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":"Text","value":" "}, {"type":"Operator","value":"+"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"SDBNAME"}, {"type":"Punctuation","value":"("}, {"type":"NameVariable","value":"iCount"}, {"type":"Punctuation","value":")."}, {"type":"Text","value":"\n\n "}, {"type":"NameVariable","value":"cDbType"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"DBTYPE"}, {"type":"Punctuation","value":"("}, {"type":"NameVariable","value":"iCount"}, {"type":"Punctuation","value":")."}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"IF"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"cDbType"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"\u003c\u003e"}, {"type":"Text","value":" "}, {"type":"LiteralStringDouble","value":"\"PROGRESS\""}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"THEN"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"NEXT "}, {"type":"NameVariable","value":"#Db"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n\n "}, {"type":"NameVariable","value":"cDatabaseList"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"cDatabaseList"}, {"type":"Text","value":" "}, {"type":"Operator","value":"+"}, {"type":"Text","value":" "}, {"type":"LiteralStringSingle","value":"','"}, {"type":"Text","value":" "}, {"type":"Operator","value":"+"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"cLogicalDbName"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"END"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n\n "}, {"type":"CommentMultiline","value":"/* Build list of all databases. Skip if already in the list of schemaholders */"}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":"#Db"}, {"type":"Punctuation","value":":"}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"DO"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"iCount"}, {"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-DBS"}, {"type":"Punctuation","value":":"}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"ASSIGN\n "}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"cDbType"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"DBTYPE"}, {"type":"Punctuation","value":"("}, {"type":"NameVariable","value":"iCount"}, {"type":"Punctuation","value":")"}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":"cLogicalDbName"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"LDBNAME"}, {"type":"Punctuation","value":"("}, {"type":"NameVariable","value":"iCount"}, {"type":"Punctuation","value":")."}, {"type":"Text","value":"\n\n "}, {"type":"KeywordReserved","value":"IF"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"LOOKUP"}, {"type":"Punctuation","value":"("}, {"type":"KeywordReserved","value":"LDBNAME"}, {"type":"Punctuation","value":"("}, {"type":"NameVariable","value":"iCount"}, {"type":"Punctuation","value":")"}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"cSchemaHolders"}, {"type":"Punctuation","value":")"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"\u003e"}, {"type":"Text","value":" "}, {"type":"LiteralNumberInteger","value":"0"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"OR"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"cDbType"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"\u003c\u003e"}, {"type":"Text","value":" "}, {"type":"LiteralStringDouble","value":"\"PROGRESS\""}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"THEN"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"NEXT "}, {"type":"NameVariable","value":"#Db"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n\n "}, {"type":"KeywordReserved","value":"CREATE"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"ALIAS"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"dictdb"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"FOR"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"DATABASE"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"VALUE"}, {"type":"Punctuation","value":"("}, {"type":"NameVariable","value":"cLogicalDbName"}, {"type":"Punctuation","value":")."}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"RUN"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"getDataserver"}, {"type":"Punctuation","value":"."}, {"type":"NameVariable","value":"p"}, {"type":"Text","value":"\n "}, {"type":"Punctuation","value":"("}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"INPUT "}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"cLogicalDbName"}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"INPUT-OUTPUT "}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"giDataserverNr"}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"INPUT-OUTPUT"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"TABLE"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"bDataserver"}, {"type":"Text","value":"\n "}, {"type":"Punctuation","value":")."}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"DELETE"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"ALIAS"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"dictdb"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"END"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n\n "}, {"type":"CommentMultiline","value":"/* Support dataservers */"}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"FOR"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"EACH"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"bDataserver"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"BY"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"bDataserver"}, {"type":"Punctuation","value":"."}, {"type":"NameVariable","value":"cLDbNameSchema"}, {"type":"Punctuation","value":":"}, {"type":"Text","value":"\n "}, {"type":"CommentMultiline","value":"/* Remove schemaholder from database list */"}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"IF"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"bDataserver"}, {"type":"Punctuation","value":"."}, {"type":"NameVariable","value":"lDontShowSchemaHr"}, {"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":"iPos"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"LOOKUP"}, {"type":"Punctuation","value":"("}, {"type":"NameVariable","value":"bDataserver"}, {"type":"Punctuation","value":"."}, {"type":"NameVariable","value":"cLDbNameSchema,"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"cDatabaseList"}, {"type":"Punctuation","value":")."}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"IF"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"iPos"}, {"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":"NOT"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"CAN-FIND"}, {"type":"Punctuation","value":"("}, {"type":"KeywordReserved","value":"FIRST"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"ttTable"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"WHERE"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"ttTable"}, {"type":"Punctuation","value":"."}, {"type":"NameVariable","value":"cDatabase"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"bDataserver"}, {"type":"Punctuation","value":"."}, {"type":"NameVariable","value":"cLDbNameSchema"}, {"type":"Text","value":"\n "}, {"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":"NO"}, {"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":"ENTRY"}, {"type":"Punctuation","value":"("}, {"type":"NameVariable","value":"iPos,"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"cDatabaseList"}, {"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":"cDatabaseList"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"TRIM"}, {"type":"Punctuation","value":"("}, {"type":"KeywordReserved","value":"REPLACE"}, {"type":"Punctuation","value":"("}, {"type":"NameVariable","value":"cDatabaseList,"}, {"type":"Text","value":" "}, {"type":"LiteralStringDouble","value":"\",,\""}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"LiteralStringDouble","value":"\",\""}, {"type":"Punctuation","value":")"}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"LiteralStringDouble","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":"CommentMultiline","value":"/* Add dataserver to database list */"}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":"iPos"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"LOOKUP"}, {"type":"Punctuation","value":"("}, {"type":"NameVariable","value":"bDataserver"}, {"type":"Punctuation","value":"."}, {"type":"NameVariable","value":"cLDbNameDataserver,"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"cDatabaseList"}, {"type":"Punctuation","value":")."}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"IF"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"bDataserver"}, {"type":"Punctuation","value":"."}, {"type":"NameVariable","value":"lConnected"}, {"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":"iPos"}, {"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":"cDatabaseList"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"TRIM"}, {"type":"Punctuation","value":"("}, {"type":"NameVariable","value":"cDatabaseList"}, {"type":"Text","value":" "}, {"type":"Operator","value":"+"}, {"type":"Text","value":" "}, {"type":"LiteralStringDouble","value":"\",\""}, {"type":"Text","value":" "}, {"type":"Operator","value":"+"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"bDataserver"}, {"type":"Punctuation","value":"."}, {"type":"NameVariable","value":"cLDbNameDataserver,"}, {"type":"Text","value":" "}, {"type":"LiteralStringDouble","value":"\",\""}, {"type":"Punctuation","value":")."}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"END"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":" "}, {"type":"CommentMultiline","value":"/* IF bDataserver.lConnected */"}, {"type":"Text","value":"\n\n "}, {"type":"KeywordReserved","value":"ELSE\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":"iPos"}, {"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":"iPos,"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"cDatabaseList"}, {"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":"cDatabaseList"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"TRIM"}, {"type":"Punctuation","value":"("}, {"type":"KeywordReserved","value":"REPLACE"}, {"type":"Punctuation","value":"("}, {"type":"NameVariable","value":"cDatabaseList,"}, {"type":"Text","value":" "}, {"type":"LiteralStringDouble","value":"\",,\""}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"LiteralStringDouble","value":"\",\""}, {"type":"Punctuation","value":")"}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"LiteralStringDouble","value":"\",\""}, {"type":"Punctuation","value":")."}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"END"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":" "}, {"type":"CommentMultiline","value":"/* IF iPos \u003e 0 */"}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"END"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":" "}, {"type":"CommentMultiline","value":"/* else */"}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"END"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":" "}, {"type":"CommentMultiline","value":"/* FOR EACH bDataserver */"}, {"type":"Text","value":"\n\n "}, {"type":"KeywordReserved","value":"ASSIGN\n "}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"cDatabaseList"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"TRIM"}, {"type":"Punctuation","value":"("}, {"type":"NameVariable","value":"cDatabaseList,"}, {"type":"Text","value":" "}, {"type":"LiteralStringSingle","value":"','"}, {"type":"Punctuation","value":")"}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":"gcSaveDatabaseList"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"cDatabaseList"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n\n "}, {"type":"KeywordReserved","value":"RETURN"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"cDatabaseList"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n\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":"/* getDatabaseList */"}, {"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-getEscapedData) = 0 \u0026THEN\n\n\u0026ANALYZE-SUSPEND _UIB-CODE-BLOCK _FUNCTION getEscapedData Procedure"}, {"type":"Text","value":"\n"}, {"type":"KeywordReserved","value":"FUNCTION"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"getEscapedData"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"RETURNS"}, {"type":"Text","value":" "}, {"type":"KeywordType","value":"CHARACTER\n "}, {"type":"Punctuation","value":"("}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"pcTarget"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"AS"}, {"type":"Text","value":" "}, {"type":"KeywordType","value":"CHARACTER\n "}, {"type":"NameVariable","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 html- or 4gl-safe string\n */"}, {"type":"Text","value":"\n "}, {"type":"KeywordDeclaration","value":"DEFINE"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"VARIABLE"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"cOutput"}, {"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":"iTmp"}, {"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":"CommentPreproc","value":"{\u0026timerStart}"}, {"type":"Text","value":"\n\n "}, {"type":"CommentMultiline","value":"/* Garbage in, garbage out */"}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":"cOutput"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"pcString"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n\n "}, {"type":"KeywordReserved","value":"CASE"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"pcTarget"}, {"type":"Punctuation","value":":"}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"WHEN "}, {"type":"LiteralStringDouble","value":"\"HTML\""}, {"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":"cOutput"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"REPLACE"}, {"type":"Punctuation","value":"("}, {"type":"NameVariable","value":"cOutput,"}, {"type":"LiteralStringDouble","value":"\"\u003c\""}, {"type":"NameVariable","value":","}, {"type":"LiteralStringDouble","value":"\"\u0026lt;\""}, {"type":"Punctuation","value":")."}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":"cOutput"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"REPLACE"}, {"type":"Punctuation","value":"("}, {"type":"NameVariable","value":"cOutput,"}, {"type":"LiteralStringDouble","value":"\"\u003e\""}, {"type":"NameVariable","value":","}, {"type":"LiteralStringDouble","value":"\"\u0026gt;\""}, {"type":"Punctuation","value":")."}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"END"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n\n "}, {"type":"KeywordReserved","value":"WHEN "}, {"type":"LiteralStringDouble","value":"\"4GL\""}, {"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":"/* Replace single quotes because we are using them for 4GL separating too */"}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":"cOutput"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"REPLACE"}, {"type":"Punctuation","value":"("}, {"type":"NameVariable","value":"cOutput,"}, {"type":"Text","value":" "}, {"type":"LiteralStringDouble","value":"\"'\""}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"LiteralStringDouble","value":"\"~~'\""}, {"type":"Punctuation","value":")."}, {"type":"Text","value":"\n\n "}, {"type":"CommentMultiline","value":"/* Replace CHR's 1 till 13 */"}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"DO"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"iTmp"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"LiteralNumberInteger","value":"1"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"TO"}, {"type":"Text","value":" "}, {"type":"LiteralNumberInteger","value":"13"}, {"type":"Punctuation","value":":"}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":"cOutput"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"REPLACE"}, {"type":"Punctuation","value":"("}, {"type":"NameVariable","value":"cOutput,"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"CHR"}, {"type":"Punctuation","value":"("}, {"type":"NameVariable","value":"iTmp"}, {"type":"Punctuation","value":")"}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"LiteralStringDouble","value":"\"' + chr(\""}, {"type":"Text","value":" "}, {"type":"Operator","value":"+"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"string"}, {"type":"Punctuation","value":"("}, {"type":"NameVariable","value":"iTmp"}, {"type":"Punctuation","value":")"}, {"type":"Text","value":" "}, {"type":"Operator","value":"+"}, {"type":"Text","value":" "}, {"type":"LiteralStringDouble","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 "}, {"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":"cOutput"}, {"type":"Punctuation","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":"/* getEscapedData */"}, {"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-getFieldList) = 0 \u0026THEN\n\n\u0026ANALYZE-SUSPEND _UIB-CODE-BLOCK _FUNCTION getFieldList Procedure"}, {"type":"Text","value":"\n"}, {"type":"KeywordReserved","value":"FUNCTION"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"getFieldList"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"RETURNS"}, {"type":"Text","value":" "}, {"type":"KeywordType","value":"CHARACTER\n "}, {"type":"Punctuation","value":"("}, {"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":"NameVariable","value":"pcFile"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"AS"}, {"type":"Text","value":" "}, {"type":"KeywordType","value":"CHARACTER\n "}, {"type":"Punctuation","value":"):"}, {"type":"Text","value":"\n "}, {"type":"CommentMultiline","value":"/* Return a comma separated list of all fields of a table\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 "}, {"type":"KeywordDeclaration","value":"DEFINE"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"VARIABLE"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"hFile"}, {"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":"hField"}, {"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":"cFields"}, {"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":"KeywordReserved","value":"CREATE"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"BUFFER"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"hFile"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"FOR"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"TABLE"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"pcDatabase"}, {"type":"Text","value":" "}, {"type":"Operator","value":"+"}, {"type":"Text","value":" "}, {"type":"LiteralStringDouble","value":"\"._file\""}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"CREATE"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"BUFFER"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"hField"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"FOR"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"TABLE"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"pcDatabase"}, {"type":"Text","value":" "}, {"type":"Operator","value":"+"}, {"type":"Text","value":" "}, {"type":"LiteralStringDouble","value":"\"._field\""}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n\n "}, {"type":"KeywordReserved","value":"CREATE"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"QUERY"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"hQuery"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":"hQuery"}, {"type":"Punctuation","value":":"}, {"type":"KeywordReserved","value":"SET-BUFFERS"}, {"type":"Punctuation","value":"("}, {"type":"NameVariable","value":"hFile,hField"}, {"type":"Punctuation","value":")."}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":"hQuery"}, {"type":"Punctuation","value":":"}, {"type":"KeywordReserved","value":"QUERY-PREPARE"}, {"type":"Punctuation","value":"("}, {"type":"KeywordReserved","value":"SUBSTITUTE"}, {"type":"Punctuation","value":"("}, {"type":"LiteralStringSingle","value":"'FOR EACH _File WHERE _File-name = \u00261, EACH _Field OF _File'"}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"QUOTER"}, {"type":"Punctuation","value":"("}, {"type":"NameVariable","value":"pcFile"}, {"type":"Punctuation","value":")))."}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":"hQuery"}, {"type":"Punctuation","value":":"}, {"type":"KeywordReserved","value":"QUERY-OPEN"}, {"type":"Punctuation","value":"()."}, {"type":"Text","value":"\n\n "}, {"type":"NameVariable","value":"#CollectFields"}, {"type":"Punctuation","value":":"}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"REPEAT"}, {"type":"Punctuation","value":":"}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":"hQuery"}, {"type":"Punctuation","value":":"}, {"type":"KeywordReserved","value":"GET-NEXT"}, {"type":"Punctuation","value":"()."}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"IF"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"hQuery"}, {"type":"Punctuation","value":":"}, {"type":"KeywordReserved","value":"QUERY-OFF-END"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"THEN"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"LEAVE "}, {"type":"NameVariable","value":"#CollectFields"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":"cFields"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"cFields"}, {"type":"Text","value":" "}, {"type":"Operator","value":"+"}, {"type":"Text","value":" "}, {"type":"LiteralStringDouble","value":"\",\""}, {"type":"Text","value":" "}, {"type":"Operator","value":"+"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"hField"}, {"type":"Punctuation","value":"::"}, {"type":"NameVariable","value":"_Field"}, {"type":"Operator","value":"-"}, {"type":"NameVariable","value":"name"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"END"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":" "}, {"type":"CommentMultiline","value":"/* #CollectFields */"}, {"type":"Text","value":"\n\n "}, {"type":"NameVariable","value":"hQuery"}, {"type":"Punctuation","value":":"}, {"type":"KeywordReserved","value":"QUERY-CLOSE"}, {"type":"Punctuation","value":"()."}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"DELETE"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"OBJECT"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"hField"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"DELETE"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"OBJECT"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"hFile"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"DELETE"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"OBJECT"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"hQuery"}, {"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":"cFields,"}, {"type":"Text","value":" "}, {"type":"LiteralStringDouble","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":"/* getFieldList */"}, {"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-getFileCategory) = 0 \u0026THEN\n\n\u0026ANALYZE-SUSPEND _UIB-CODE-BLOCK _FUNCTION getFileCategory Procedure"}, {"type":"Text","value":"\n"}, {"type":"KeywordReserved","value":"FUNCTION"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"getFileCategory"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"RETURNS"}, {"type":"Text","value":" "}, {"type":"KeywordType","value":"CHARACTER\n "}, {"type":"Punctuation","value":"("}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"piFileNumber"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"AS"}, {"type":"Text","value":" "}, {"type":"KeywordType","value":"INTEGER\n "}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"pcFileName"}, {"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":"CommentMultiline","value":"/* Based on table name and -number, return the category for a table\n *\n * Application tables : _file-number \u003e 0 AND _file-number \u003c 32000\n * Schema tables : _file-number \u003e -80 AND _file-number \u003c 0\n * Virtual system tables: _file-number \u003c -16384\n * SQL catalog tables : _file-name BEGINS \"_sys\"\n * Other tables : _file-number \u003e= -16384 AND _file-number \u003c= -80\n */"}, {"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":"LiteralNumberInteger","value":"0"}, {"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":"32000"}, {"type":"Text","value":" "}, {"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":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"getProgramDir"}, {"type":"Punctuation","value":"()"}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"pcImage"}, {"type":"Punctuation","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":"/* getImagePath */"}, {"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-getIndexFields) = 0 \u0026THEN\n\n\u0026ANALYZE-SUSPEND _UIB-CODE-BLOCK _FUNCTION getIndexFields Procedure"}, {"type":"Text","value":"\n"}, {"type":"KeywordReserved","value":"FUNCTION"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"getIndexFields"}, {"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":"pcDatabaseName"}, {"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":"pcTableName"}, {"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":"pcFlags"}, {"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":"CommentMultiline","value":"/* Return the index fields of a table.\n */"}, {"type":"Text","value":"\n "}, {"type":"KeywordDeclaration","value":"DEFINE"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"VARIABLE"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"cWhere"}, {"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":"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":"hFieldBuffer"}, {"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":"hFileBuffer"}, {"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":"hIndexBuffer"}, {"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":"hIndexFieldBuffer"}, {"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":"cFieldList"}, {"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":"CommentPreproc","value":"{\u0026timerStart}"}, {"type":"Text","value":"\n\n "}, {"type":"KeywordReserved","value":"CREATE"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"BUFFER"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"hFileBuffer"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"FOR"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"TABLE"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"pcDatabaseName"}, {"type":"Text","value":" "}, {"type":"Operator","value":"+"}, {"type":"Text","value":" "}, {"type":"LiteralStringDouble","value":"\"._File\""}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"CREATE"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"BUFFER"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"hIndexBuffer"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"FOR"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"TABLE"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"pcDatabaseName"}, {"type":"Text","value":" "}, {"type":"Operator","value":"+"}, {"type":"Text","value":" "}, {"type":"LiteralStringDouble","value":"\"._Index\""}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"CREATE"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"BUFFER"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"hIndexFieldBuffer"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"FOR"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"TABLE"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"pcDatabaseName"}, {"type":"Text","value":" "}, {"type":"Operator","value":"+"}, {"type":"Text","value":" "}, {"type":"LiteralStringDouble","value":"\"._Index-Field\""}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"CREATE"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"BUFFER"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"hFieldBuffer"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"FOR"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"TABLE"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"pcDatabaseName"}, {"type":"Text","value":" "}, {"type":"Operator","value":"+"}, {"type":"Text","value":" "}, {"type":"LiteralStringDouble","value":"\"._Field\""}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n\n "}, {"type":"KeywordReserved","value":"CREATE"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"QUERY"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"hQuery"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":"hQuery"}, {"type":"Punctuation","value":":"}, {"type":"KeywordReserved","value":"SET-BUFFERS"}, {"type":"Punctuation","value":"("}, {"type":"NameVariable","value":"hFileBuffer,hIndexBuffer,hIndexFieldBuffer,hFieldBuffer"}, {"type":"Punctuation","value":")."}, {"type":"Text","value":"\n\n "}, {"type":"CommentPreproc","value":"{\u0026_proparse_ prolint-nowarn(longstrings)}"}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":"cWhere"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"SUBSTITUTE"}, {"type":"Punctuation","value":"("}, {"type":"LiteralStringDouble","value":"\"FOR EACH \u00261._file WHERE \u00261._file._file-name = \u00262 AND _File._File-Number \u003c 32768, ~\n EACH \u00261._index OF \u00261._file WHERE TRUE \u00263 \u00264, ~\n EACH \u00261._index-field OF \u00261._index, ~\n EACH \u00261._field OF \u00261._index-field\""}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"pcDatabaseName"}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"QUOTER"}, {"type":"Punctuation","value":"("}, {"type":"NameVariable","value":"pcTableName"}, {"type":"Punctuation","value":")"}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"Punctuation","value":"("}, {"type":"KeywordReserved","value":"IF"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"CAN-DO"}, {"type":"Punctuation","value":"("}, {"type":"NameVariable","value":"pcFlags,"}, {"type":"LiteralStringDouble","value":"\"U\""}, {"type":"Punctuation","value":")"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"THEN "}, {"type":"LiteralStringDouble","value":"\"AND _index._unique = true\""}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"ELSE "}, {"type":"LiteralStringDouble","value":"\"\""}, {"type":"Punctuation","value":")"}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"Punctuation","value":"("}, {"type":"KeywordReserved","value":"IF"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"CAN-DO"}, {"type":"Punctuation","value":"("}, {"type":"NameVariable","value":"pcFlags,"}, {"type":"LiteralStringDouble","value":"\"P\""}, {"type":"Punctuation","value":")"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"THEN "}, {"type":"LiteralStringDouble","value":"\"AND recid(_index) = _file._prime-index\""}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"ELSE "}, {"type":"LiteralStringDouble","value":"\"\""}, {"type":"Punctuation","value":")"}, {"type":"Text","value":"\n "}, {"type":"Punctuation","value":")."}, {"type":"Text","value":"\n\n "}, {"type":"KeywordReserved","value":"IF"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"hQuery"}, {"type":"Punctuation","value":":"}, {"type":"KeywordReserved","value":"QUERY-PREPARE "}, {"type":"Punctuation","value":"("}, {"type":"NameVariable","value":"cWhere"}, {"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":"Punctuation","value":":"}, {"type":"KeywordReserved","value":"QUERY-OPEN"}, {"type":"Punctuation","value":"()."}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":"hQuery"}, {"type":"Punctuation","value":":"}, {"type":"KeywordReserved","value":"GET-FIRST"}, {"type":"Punctuation","value":"("}, {"type":"KeywordReserved","value":"NO-LOCK"}, {"type":"Punctuation","value":")."}, {"type":"Text","value":"\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 "}, {"type":"NameVariable","value":"cFieldList"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"cFieldList"}, {"type":"Text","value":" "}, {"type":"Operator","value":"+"}, {"type":"Text","value":" "}, {"type":"LiteralStringDouble","value":"\",\""}, {"type":"Text","value":" "}, {"type":"Operator","value":"+"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"trim"}, {"type":"Punctuation","value":"("}, {"type":"NameVariable","value":"hFieldBuffer"}, {"type":"Punctuation","value":":"}, {"type":"KeywordReserved","value":"BUFFER-FIELD"}, {"type":"Punctuation","value":"("}, {"type":"LiteralStringDouble","value":"\"_field-name\""}, {"type":"Punctuation","value":"):"}, {"type":"KeywordReserved","value":"string-value"}, {"type":"Punctuation","value":")."}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":"hQuery"}, {"type":"Punctuation","value":":"}, {"type":"KeywordReserved","value":"GET-NEXT"}, {"type":"Punctuation","value":"("}, {"type":"KeywordReserved","value":"NO-LOCK"}, {"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":"NameVariable","value":"cFieldList"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"TRIM"}, {"type":"Punctuation","value":"("}, {"type":"NameVariable","value":"cFieldList,"}, {"type":"Text","value":" "}, {"type":"LiteralStringDouble","value":"\",\""}, {"type":"Punctuation","value":")."}, {"type":"Text","value":"\n\n "}, {"type":"NameVariable","value":"hQuery"}, {"type":"Punctuation","value":":"}, {"type":"KeywordReserved","value":"QUERY-CLOSE"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n\n "}, {"type":"KeywordReserved","value":"DELETE"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"OBJECT"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"hFileBuffer"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"DELETE"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"OBJECT"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"hIndexBuffer"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"DELETE"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"OBJECT"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"hIndexFieldBuffer"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"DELETE"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"OBJECT"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"hFieldBuffer"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"DELETE"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"OBJECT"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"hQuery"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n\n "}, {"type":"KeywordReserved","value":"RETURN"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"cFieldList"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":" "}, {"type":"CommentMultiline","value":"/* Function return 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":"/* getIndexFields */"}, {"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-getKeyList) = 0 \u0026THEN\n\n\u0026ANALYZE-SUSPEND _UIB-CODE-BLOCK _FUNCTION getKeyList Procedure"}, {"type":"Text","value":"\n"}, {"type":"KeywordReserved","value":"FUNCTION"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"getKeyList"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"RETURNS"}, {"type":"Text","value":" "}, {"type":"KeywordType","value":"CHARACTER\n "}, {"type":"Punctuation","value":"("}, {"type":"Text","value":" "}, {"type":"CommentMultiline","value":"/* parameter-definitions */"}, {"type":"Text","value":" "}, {"type":"Punctuation","value":")"}, {"type":"Text","value":" "}, {"type":"Punctuation","value":":"}, {"type":"Text","value":"\n "}, {"type":"CommentMultiline","value":"/* Return a list of special keys pressed\n */"}, {"type":"Text","value":"\n "}, {"type":"KeywordDeclaration","value":"DEFINE"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"VARIABLE"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"mKeyboardState"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"AS"}, {"type":"Text","value":" "}, {"type":"KeywordType","value":"MEMPTR "}, {"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":"iReturnValue"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"AS"}, {"type":"Text","value":" "}, {"type":"KeywordType","value":"INT64 "}, {"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":"cKeyList"}, {"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":"KeywordReserved","value":"SET-SIZE"}, {"type":"Punctuation","value":"("}, {"type":"NameVariable","value":"mKeyboardState"}, {"type":"Punctuation","value":")"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"LiteralNumberInteger","value":"256"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n\n "}, {"type":"CommentMultiline","value":"/* Get the current state of the keyboard */"}, {"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":"GetKeyboardState"}, {"type":"Punctuation","value":"("}, {"type":"KeywordReserved","value":"GET-POINTER-VALUE"}, {"type":"Punctuation","value":"("}, {"type":"NameVariable","value":"mKeyboardState"}, {"type":"Punctuation","value":")"}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"OUTPUT"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"iReturnValue"}, {"type":"Punctuation","value":")"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"NO-ERROR"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n\n "}, {"type":"CommentMultiline","value":"/* try to suppress error: 'C' Call Stack has been compromised after calling in (6069) */"}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"IF"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"NOT"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"ERROR-STATUS"}, {"type":"Punctuation","value":":"}, {"type":"KeywordReserved","value":"ERROR"}, {"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":"GET"}, {"type":"Operator","value":"-"}, {"type":"NameVariable","value":"BITS"}, {"type":"Punctuation","value":"("}, {"type":"KeywordReserved","value":"GET-BYTE"}, {"type":"Punctuation","value":"("}, {"type":"NameVariable","value":"mKeyboardState,"}, {"type":"Text","value":" "}, {"type":"LiteralNumberInteger","value":"1"}, {"type":"Text","value":" "}, {"type":"Operator","value":"+"}, {"type":"Text","value":" "}, {"type":"LiteralNumberInteger","value":"16"}, {"type":"Punctuation","value":")"}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"LiteralNumberInteger","value":"8"}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"LiteralNumberInteger","value":"1"}, {"type":"Punctuation","value":")"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"LiteralNumberInteger","value":"1"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"THEN"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"cKeyList"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"TRIM"}, {"type":"Punctuation","value":"("}, {"type":"NameVariable","value":"cKeyList"}, {"type":"Text","value":" "}, {"type":"Operator","value":"+"}, {"type":"Text","value":" "}, {"type":"LiteralStringDouble","value":"\",SHIFT\""}, {"type":"NameVariable","value":","}, {"type":"LiteralStringDouble","value":"\",\""}, {"type":"Punctuation","value":")."}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"IF"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"GET"}, {"type":"Operator","value":"-"}, {"type":"NameVariable","value":"BITS"}, {"type":"Punctuation","value":"("}, {"type":"KeywordReserved","value":"GET-BYTE"}, {"type":"Punctuation","value":"("}, {"type":"NameVariable","value":"mKeyboardState,"}, {"type":"Text","value":" "}, {"type":"LiteralNumberInteger","value":"1"}, {"type":"Text","value":" "}, {"type":"Operator","value":"+"}, {"type":"Text","value":" "}, {"type":"LiteralNumberInteger","value":"17"}, {"type":"Punctuation","value":")"}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"LiteralNumberInteger","value":"8"}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"LiteralNumberInteger","value":"1"}, {"type":"Punctuation","value":")"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"LiteralNumberInteger","value":"1"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"THEN"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"cKeyList"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"TRIM"}, {"type":"Punctuation","value":"("}, {"type":"NameVariable","value":"cKeyList"}, {"type":"Text","value":" "}, {"type":"Operator","value":"+"}, {"type":"Text","value":" "}, {"type":"LiteralStringDouble","value":"\",CTRL\""}, {"type":"NameVariable","value":","}, {"type":"LiteralStringDouble","value":"\",\""}, {"type":"Punctuation","value":")."}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"IF"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"GET"}, {"type":"Operator","value":"-"}, {"type":"NameVariable","value":"BITS"}, {"type":"Punctuation","value":"("}, {"type":"KeywordReserved","value":"GET-BYTE"}, {"type":"Punctuation","value":"("}, {"type":"NameVariable","value":"mKeyboardState,"}, {"type":"Text","value":" "}, {"type":"LiteralNumberInteger","value":"1"}, {"type":"Text","value":" "}, {"type":"Operator","value":"+"}, {"type":"Text","value":" "}, {"type":"LiteralNumberInteger","value":"18"}, {"type":"Punctuation","value":")"}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"LiteralNumberInteger","value":"8"}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"LiteralNumberInteger","value":"1"}, {"type":"Punctuation","value":")"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"LiteralNumberInteger","value":"1"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"THEN"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"cKeyList"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"TRIM"}, {"type":"Punctuation","value":"("}, {"type":"NameVariable","value":"cKeyList"}, {"type":"Text","value":" "}, {"type":"Operator","value":"+"}, {"type":"Text","value":" "}, {"type":"LiteralStringDouble","value":"\",ALT\""}, {"type":"NameVariable","value":","}, {"type":"LiteralStringDouble","value":"\",\""}, {"type":"Punctuation","value":")."}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"END"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n\n "}, {"type":"KeywordReserved","value":"SET-SIZE"}, {"type":"Punctuation","value":"("}, {"type":"NameVariable","value":"mKeyboardState"}, {"type":"Punctuation","value":")"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"LiteralNumberInteger","value":"0"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"RETURN"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"cKeyList"}, {"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":"/* getKeyList */"}, {"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-getLinkInfo) = 0 \u0026THEN\n\n\u0026ANALYZE-SUSPEND _UIB-CODE-BLOCK _FUNCTION getLinkInfo Procedure"}, {"type":"Text","value":"\n"}, {"type":"KeywordReserved","value":"FUNCTION"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"getLinkInfo"}, {"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":"pcFieldName"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"AS"}, {"type":"Text","value":" "}, {"type":"KeywordType","value":"CHARACTER\n "}, {"type":"Punctuation","value":"):"}, {"type":"Text","value":"\n "}, {"type":"CommentMultiline","value":"/* Save name/value of a field.\n */"}, {"type":"Text","value":"\n "}, {"type":"KeywordDeclaration","value":"DEFINE"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"BUFFER"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"bLinkInfo"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"FOR"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"ttLinkInfo"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n "}, {"type":"CommentPreproc","value":"{\u0026timerStart}"}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"FIND"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"bLinkInfo"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"WHERE"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"bLinkInfo"}, {"type":"Punctuation","value":"."}, {"type":"NameVariable","value":"cField"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"pcFieldName"}, {"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":"bLinkInfo"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"THEN"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"bLinkInfo"}, {"type":"Punctuation","value":"."}, {"type":"NameVariable","value":"cValue"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"ELSE "}, {"type":"LiteralStringDouble","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":"/* getLinkInfo */"}, {"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-getMaxLength) = 0 \u0026THEN\n\n\u0026ANALYZE-SUSPEND _UIB-CODE-BLOCK _FUNCTION getMaxLength Procedure"}, {"type":"Text","value":"\n"}, {"type":"KeywordReserved","value":"FUNCTION"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"getMaxLength"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"RETURNS"}, {"type":"Text","value":" "}, {"type":"KeywordType","value":"INTEGER\n "}, {"type":"Punctuation","value":"("}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"cFieldList"}, {"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 length of the longest element in a comma separated list\n */"}, {"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 "}, {"type":"KeywordDeclaration","value":"DEFINE"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"VARIABLE"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"iMaxLength"}, {"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":"{\u0026timerStart}"}, {"type":"Text","value":"\n\n "}, {"type":"CommentMultiline","value":"/* Get max field length */"}, {"type":"Text","value":"\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":"KeywordReserved","value":"NUM-ENTRIES"}, {"type":"Punctuation","value":"("}, {"type":"NameVariable","value":"cFieldList"}, {"type":"Punctuation","value":"):"}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":"iMaxLength"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"MAXIMUM"}, {"type":"Punctuation","value":"("}, {"type":"NameVariable","value":"iMaxLength,"}, {"type":"KeywordReserved","value":"LENGTH"}, {"type":"Punctuation","value":"("}, {"type":"KeywordReserved","value":"ENTRY"}, {"type":"Punctuation","value":"("}, {"type":"NameVariable","value":"iField,cFieldList"}, {"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":"iMaxLength"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":" "}, {"type":"CommentMultiline","value":"/* Function return 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":"/* getMaxLength */"}, {"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-getOsErrorDesc) = 0 \u0026THEN\n\n\u0026ANALYZE-SUSPEND _UIB-CODE-BLOCK _FUNCTION getOsErrorDesc Procedure"}, {"type":"Text","value":"\n"}, {"type":"KeywordReserved","value":"FUNCTION"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"getOsErrorDesc"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"RETURNS"}, {"type":"Text","value":" "}, {"type":"KeywordType","value":"CHARACTER\n "}, {"type":"Punctuation","value":"("}, {"type":"KeywordReserved","value":"INPUT"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"piOsError"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"AS"}, {"type":"Text","value":" "}, {"type":"KeywordType","value":"INTEGER"}, {"type":"Punctuation","value":"):"}, {"type":"Text","value":"\n "}, {"type":"CommentMultiline","value":"/* Return string for os-error\n */"}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"CASE"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"piOsError"}, {"type":"Punctuation","value":":"}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"WHEN "}, {"type":"Text","value":" "}, {"type":"LiteralNumberInteger","value":"0"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"THEN"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"RETURN "}, {"type":"LiteralStringDouble","value":"\"No error \""}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"WHEN "}, {"type":"Text","value":" "}, {"type":"LiteralNumberInteger","value":"1"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"THEN"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"RETURN "}, {"type":"LiteralStringDouble","value":"\"Not owner \""}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"WHEN "}, {"type":"Text","value":" "}, {"type":"LiteralNumberInteger","value":"2"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"THEN"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"RETURN "}, {"type":"LiteralStringDouble","value":"\"No such file or directory\""}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"WHEN "}, {"type":"Text","value":" "}, {"type":"LiteralNumberInteger","value":"3"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"THEN"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"RETURN "}, {"type":"LiteralStringDouble","value":"\"Interrupted system call \""}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"WHEN "}, {"type":"Text","value":" "}, {"type":"LiteralNumberInteger","value":"4"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"THEN"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"RETURN "}, {"type":"LiteralStringDouble","value":"\"I/O error \""}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"WHEN "}, {"type":"Text","value":" "}, {"type":"LiteralNumberInteger","value":"5"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"THEN"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"RETURN "}, {"type":"LiteralStringDouble","value":"\"Bad file number \""}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"WHEN "}, {"type":"Text","value":" "}, {"type":"LiteralNumberInteger","value":"6"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"THEN"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"RETURN "}, {"type":"LiteralStringDouble","value":"\"No more processes \""}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"WHEN "}, {"type":"Text","value":" "}, {"type":"LiteralNumberInteger","value":"7"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"THEN"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"RETURN "}, {"type":"LiteralStringDouble","value":"\"Not enough core memory \""}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"WHEN "}, {"type":"Text","value":" "}, {"type":"LiteralNumberInteger","value":"8"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"THEN"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"RETURN "}, {"type":"LiteralStringDouble","value":"\"Permission denied \""}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"WHEN "}, {"type":"Text","value":" "}, {"type":"LiteralNumberInteger","value":"9"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"THEN"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"RETURN "}, {"type":"LiteralStringDouble","value":"\"Bad address \""}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"WHEN "}, {"type":"Text","value":" "}, {"type":"LiteralNumberInteger","value":"10"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"THEN"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"RETURN "}, {"type":"LiteralStringDouble","value":"\"File exists \""}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"WHEN "}, {"type":"Text","value":" "}, {"type":"LiteralNumberInteger","value":"11"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"THEN"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"RETURN "}, {"type":"LiteralStringDouble","value":"\"No such device \""}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"WHEN "}, {"type":"Text","value":" "}, {"type":"LiteralNumberInteger","value":"12"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"THEN"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"RETURN "}, {"type":"LiteralStringDouble","value":"\"Not a directory \""}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"WHEN "}, {"type":"Text","value":" "}, {"type":"LiteralNumberInteger","value":"13"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"THEN"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"RETURN "}, {"type":"LiteralStringDouble","value":"\"Is a directory \""}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"WHEN "}, {"type":"Text","value":" "}, {"type":"LiteralNumberInteger","value":"14"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"THEN"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"RETURN "}, {"type":"LiteralStringDouble","value":"\"File table overflow \""}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"WHEN "}, {"type":"Text","value":" "}, {"type":"LiteralNumberInteger","value":"15"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"THEN"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"RETURN "}, {"type":"LiteralStringDouble","value":"\"Too many open files \""}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"WHEN "}, {"type":"Text","value":" "}, {"type":"LiteralNumberInteger","value":"16"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"THEN"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"RETURN "}, {"type":"LiteralStringDouble","value":"\"File too large \""}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"WHEN "}, {"type":"Text","value":" "}, {"type":"LiteralNumberInteger","value":"17"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"THEN"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"RETURN "}, {"type":"LiteralStringDouble","value":"\"No space left on device \""}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"WHEN "}, {"type":"Text","value":" "}, {"type":"LiteralNumberInteger","value":"18"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"THEN"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"RETURN "}, {"type":"LiteralStringDouble","value":"\"Directory not empty \""}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"OTHERWISE"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"RETURN "}, {"type":"LiteralStringDouble","value":"\"Unmapped error \""}, {"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":"END"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"FUNCTION"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":" "}, {"type":"CommentMultiline","value":"/* getOsErrorDesc */"}, {"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-getProgramDir) = 0 \u0026THEN\n\n\u0026ANALYZE-SUSPEND _UIB-CODE-BLOCK _FUNCTION getProgramDir Procedure"}, {"type":"Text","value":"\n"}, {"type":"KeywordReserved","value":"FUNCTION"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"getProgramDir"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"RETURNS"}, {"type":"Text","value":" "}, {"type":"KeywordType","value":"CHARACTER\n "}, {"type":"Punctuation","value":"("}, {"type":"Text","value":" "}, {"type":"CommentMultiline","value":"/* parameter-definitions */"}, {"type":"Text","value":" "}, {"type":"Punctuation","value":")"}, {"type":"Text","value":" "}, {"type":"Punctuation","value":":"}, {"type":"Text","value":"\n "}, {"type":"CommentMultiline","value":"/* Return the DataDigger install dir, including a backslash\n */"}, {"type":"Text","value":"\n\n "}, {"type":"CommentMultiline","value":"/* Cached the value in a global var (about 100x as fast) */"}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"IF"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"gcProgramDir"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"LiteralStringSingle","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":"/* this-procedure:file-name will return the .p name without path when the\n * procedure us run without full path. We need to seek it in the propath.\n */"}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"FILE-INFO"}, {"type":"Punctuation","value":":"}, {"type":"KeywordReserved","value":"FILE-NAME "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"THIS-PROCEDURE"}, {"type":"Punctuation","value":":"}, {"type":"KeywordReserved","value":"FILE-NAME"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"IF"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"FILE-INFO"}, {"type":"Punctuation","value":":"}, {"type":"KeywordReserved","value":"FULL-PATHNAME "}, {"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":"KeywordReserved","value":"SUBSTRING"}, {"type":"Punctuation","value":"("}, {"type":"KeywordReserved","value":"THIS-PROCEDURE"}, {"type":"Punctuation","value":":"}, {"type":"KeywordReserved","value":"FILE-NAME"}, {"type":"NameVariable","value":","}, {"type":"KeywordReserved","value":"LENGTH"}, {"type":"Punctuation","value":"("}, {"type":"KeywordReserved","value":"THIS-PROCEDURE"}, {"type":"Punctuation","value":":"}, {"type":"KeywordReserved","value":"FILE-NAME"}, {"type":"Punctuation","value":")"}, {"type":"Text","value":" "}, {"type":"Operator","value":"-"}, {"type":"Text","value":" "}, {"type":"LiteralNumberInteger","value":"1"}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"LiteralNumberInteger","value":"2"}, {"type":"Punctuation","value":")"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"LiteralStringDouble","value":"\".p\""}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"THEN\n "}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"FILE-INFO"}, {"type":"Punctuation","value":":"}, {"type":"KeywordReserved","value":"FILE-NAME "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"SUBSTRING"}, {"type":"Punctuation","value":"("}, {"type":"KeywordReserved","value":"THIS-PROCEDURE"}, {"type":"Punctuation","value":":"}, {"type":"KeywordReserved","value":"FILE-NAME"}, {"type":"NameVariable","value":","}, {"type":"LiteralNumberInteger","value":"1"}, {"type":"NameVariable","value":","}, {"type":"KeywordReserved","value":"LENGTH"}, {"type":"Punctuation","value":"("}, {"type":"KeywordReserved","value":"THIS-PROCEDURE"}, {"type":"Punctuation","value":":"}, {"type":"KeywordReserved","value":"FILE-NAME"}, {"type":"Punctuation","value":")"}, {"type":"Text","value":" "}, {"type":"Operator","value":"-"}, {"type":"Text","value":" "}, {"type":"LiteralNumberInteger","value":"2"}, {"type":"Punctuation","value":")"}, {"type":"Text","value":" "}, {"type":"Operator","value":"+"}, {"type":"Text","value":" "}, {"type":"LiteralStringDouble","value":"\".r\""}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"END"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n\n "}, {"type":"NameVariable","value":"gcProgramDir"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"SUBSTRING"}, {"type":"Punctuation","value":"("}, {"type":"KeywordReserved","value":"FILE-INFO"}, {"type":"Punctuation","value":":"}, {"type":"KeywordReserved","value":"FULL-PATHNAME"}, {"type":"NameVariable","value":","}, {"type":"LiteralNumberInteger","value":"1"}, {"type":"NameVariable","value":","}, {"type":"KeywordReserved","value":"R-INDEX"}, {"type":"Punctuation","value":"("}, {"type":"KeywordReserved","value":"FILE-INFO"}, {"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":"Text","value":" "}, {"type":"KeywordReserved","value":"EACH "}, {"type":"LiteralStringSingle","value":"' ,'"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"EACH "}, {"type":"LiteralStringSingle","value":"').\n pcQuery = REPLACE(pcQuery,'"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"FIRST "}, {"type":"LiteralStringSingle","value":"','"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"FIRST "}, {"type":"LiteralStringSingle","value":"').\n pcQuery = REPLACE(pcQuery,'"}, {"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":"Text","value":" "}, {"type":"KeywordReserved","value":"AND "}, {"type":"LiteralStringSingle","value":"' , '"}, {"type":"NameVariable","value":"~n"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"AND "}, {"type":"LiteralStringSingle","value":"').\n pcQuery = REPLACE(pcQuery,'"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"BY "}, {"type":"LiteralStringSingle","value":"' , '"}, {"type":"NameVariable","value":"~n"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"BY "}, {"type":"LiteralStringSingle","value":"').\n pcQuery = REPLACE(pcQuery,'"}, {"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":"KeywordReserved","value":"FOR"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"EACH "}, {"type":"LiteralStringSingle","value":"').\n pcQuery = REPLACE(pcQuery,'"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"NO-LOCK"}, {"type":"LiteralStringSingle","value":"', '"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"NO-LOCK"}, {"type":"LiteralStringSingle","value":"').\n pcQuery = REPLACE(pcQuery,'"}, {"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":"Text","value":" "}, {"type":"KeywordReserved","value":"each"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"bTable"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"where"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"cDatabase"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"matches "}, {"type":"CommentPreproc","value":"\u00261', QUOTER(pcDatabaseFilter))."}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":"cQuery"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"SUBSTITUTE"}, {"type":"Punctuation","value":"("}, {"type":"LiteralStringDouble","value":"\"\u00261 and cTableName matches \u00262\""}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"cQuery,"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"QUOTER"}, {"type":"Punctuation","value":"("}, {"type":"NameVariable","value":"pcTableFilter"}, {"type":"Text","value":" "}, {"type":"Punctuation","value":"))."}, {"type":"Text","value":"\n\n "}, {"type":"KeywordReserved","value":"QUERY"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"qTable"}, {"type":"Punctuation","value":":"}, {"type":"KeywordReserved","value":"QUERY-PREPARE"}, {"type":"Punctuation","value":"("}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"SUBSTITUTE"}, {"type":"Punctuation","value":"("}, {"type":"LiteralStringSingle","value":"'\u00261 by cTableName'"}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"cQuery"}, {"type":"Punctuation","value":"))."}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"QUERY"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"qTable"}, {"type":"Punctuation","value":":"}, {"type":"KeywordReserved","value":"QUERY-OPEN"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"QUERY"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"qTable"}, {"type":"Punctuation","value":":"}, {"type":"KeywordReserved","value":"GET-FIRST"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n\n "}, {"type":"CommentMultiline","value":"/* All fields */"}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"REPEAT"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"WHILE"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"NOT"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"QUERY"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"qTable"}, {"type":"Punctuation","value":":"}, {"type":"KeywordReserved","value":"QUERY-OFF-END"}, {"type":"Punctuation","value":":"}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":"cTableList"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"cTableList"}, {"type":"Text","value":" "}, {"type":"Operator","value":"+"}, {"type":"Text","value":" "}, {"type":"LiteralStringDouble","value":"\",\""}, {"type":"Text","value":" "}, {"type":"Operator","value":"+"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"bTable"}, {"type":"Punctuation","value":"."}, {"type":"NameVariable","value":"cTableName"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"QUERY"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"qTable"}, {"type":"Punctuation","value":":"}, {"type":"KeywordReserved","value":"GET-NEXT"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"END"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"QUERY"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"qTable"}, {"type":"Punctuation","value":":"}, {"type":"KeywordReserved","value":"QUERY-CLOSE"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n\n "}, {"type":"NameVariable","value":"cTableList"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"LEFT-TRIM"}, {"type":"Punctuation","value":"("}, {"type":"NameVariable","value":"cTableList,"}, {"type":"Text","value":" "}, {"type":"LiteralStringDouble","value":"\",\""}, {"type":"Punctuation","value":")."}, {"type":"Text","value":"\n\n "}, {"type":"KeywordReserved","value":"RETURN"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"cTableList"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":" "}, {"type":"CommentMultiline","value":"/* Function return 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":"/* getTableList */"}, {"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-getUserName) = 0 \u0026THEN\n\n\u0026ANALYZE-SUSPEND _UIB-CODE-BLOCK _FUNCTION getUserName Procedure"}, {"type":"Text","value":"\n"}, {"type":"KeywordReserved","value":"FUNCTION"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"getUserName"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"RETURNS"}, {"type":"Text","value":" "}, {"type":"KeywordType","value":"CHARACTER\n "}, {"type":"Punctuation","value":"("}, {"type":"Text","value":" "}, {"type":"CommentMultiline","value":"/* parameter-definitions */"}, {"type":"Text","value":" "}, {"type":"Punctuation","value":")"}, {"type":"Text","value":" "}, {"type":"Punctuation","value":":"}, {"type":"Text","value":"\n "}, {"type":"CommentMultiline","value":"/* Return login name of user\n */"}, {"type":"Text","value":"\n "}, {"type":"KeywordDeclaration","value":"DEFINE"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"VARIABLE"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"cUserName"}, {"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 "}, {"type":"KeywordDeclaration","value":"DEFINE"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"VARIABLE"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"intResult"}, {"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":"intSize"}, {"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":"mUserId"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"AS"}, {"type":"Text","value":" "}, {"type":"KeywordType","value":"MEMPTR "}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"NO-UNDO"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n\n "}, {"type":"CommentPreproc","value":"{\u0026startTimer}"}, {"type":"Text","value":"\n\n "}, {"type":"CommentMultiline","value":"/* Otherwise determine the value */"}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"SET-SIZE"}, {"type":"Punctuation","value":"("}, {"type":"NameVariable","value":"mUserId"}, {"type":"Punctuation","value":")"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"LiteralNumberInteger","value":"256"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":"intSize"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"LiteralNumberInteger","value":"255"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n\n "}, {"type":"KeywordReserved","value":"RUN"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"GetUserNameA"}, {"type":"Punctuation","value":"("}, {"type":"KeywordReserved","value":"INPUT"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"mUserId,"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"INPUT-OUTPUT"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"intSize,"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"OUTPUT"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"intResult"}, {"type":"Punctuation","value":")."}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"COPY-LOB"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"mUserId"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"FOR "}, {"type":"Punctuation","value":"("}, {"type":"NameVariable","value":"intSize"}, {"type":"Text","value":" "}, {"type":"Operator","value":"-"}, {"type":"Text","value":" "}, {"type":"LiteralNumberInteger","value":"1"}, {"type":"Punctuation","value":")"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"TO"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"cUserName"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"NO-CONVERT"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n\n "}, {"type":"KeywordReserved","value":"IF"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"intResult"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"\u003c\u003e"}, {"type":"Text","value":" "}, {"type":"LiteralNumberInteger","value":"1"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"OR"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"cUserName"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"LiteralStringDouble","value":"\"\""}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"OR"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"cUserName"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"?"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"THEN\n "}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"cUserName"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"LiteralStringDouble","value":"\"default\""}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"ELSE\n "}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"cUserName"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"REPLACE"}, {"type":"Punctuation","value":"("}, {"type":"NameVariable","value":"cUserName,"}, {"type":"LiteralStringDouble","value":"\".\""}, {"type":"NameVariable","value":","}, {"type":"LiteralStringDouble","value":"\"\""}, {"type":"Punctuation","value":")."}, {"type":"Text","value":"\n\n "}, {"type":"KeywordReserved","value":"RETURN"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"STRING"}, {"type":"Punctuation","value":"("}, {"type":"NameVariable","value":"cUserName"}, {"type":"Punctuation","value":")."}, {"type":"Text","value":" "}, {"type":"CommentMultiline","value":"/* Function return value. */"}, {"type":"Text","value":"\n\n "}, {"type":"CommentPreproc","value":"{\u0026stopTimer}"}, {"type":"Text","value":"\n"}, {"type":"KeywordReserved","value":"END"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"FUNCTION"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":" "}, {"type":"CommentMultiline","value":"/* getUserName */"}, {"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-getWidgetUnderMouse) = 0 \u0026THEN\n\n\u0026ANALYZE-SUSPEND _UIB-CODE-BLOCK _FUNCTION getWidgetUnderMouse Procedure"}, {"type":"Text","value":"\n"}, {"type":"KeywordReserved","value":"FUNCTION"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"getWidgetUnderMouse"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"RETURNS"}, {"type":"Text","value":" "}, {"type":"KeywordType","value":"HANDLE\n "}, {"type":"Punctuation","value":"("}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"phFrame"}, {"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 the handle of the widget that is currently under the mouse cursor\n */"}, {"type":"Text","value":"\n "}, {"type":"KeywordDeclaration","value":"DEFINE"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"VARIABLE"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"hWidget"}, {"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":"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":"CommentPreproc","value":"{\u0026timerStart}"}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":"hWidget"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"phFrame"}, {"type":"Punctuation","value":":"}, {"type":"KeywordReserved","value":"FIRST-CHILD"}, {"type":"Punctuation","value":":"}, {"type":"KeywordReserved","value":"first-child"}, {"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":"phFrame,"}, {"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":"REPEAT"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"WHILE"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"VALID-HANDLE"}, {"type":"Punctuation","value":"("}, {"type":"NameVariable","value":"hWidget"}, {"type":"Punctuation","value":"):"}, {"type":"Text","value":"\n\n "}, {"type":"KeywordReserved","value":"IF"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"hWidget"}, {"type":"Punctuation","value":":"}, {"type":"KeywordReserved","value":"TYPE "}, {"type":"NameVariable","value":"\u003c\u003e"}, {"type":"Text","value":" "}, {"type":"LiteralStringDouble","value":"\"RECTANGLE\""}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"AND"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"iMouseX"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"\u003e"}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"hWidget"}, {"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":"hWidget"}, {"type":"Punctuation","value":":"}, {"type":"KeywordReserved","value":"X "}, {"type":"Operator","value":"+"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"hWidget"}, {"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":"hWidget"}, {"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":"hWidget"}, {"type":"Punctuation","value":":"}, {"type":"KeywordReserved","value":"Y "}, {"type":"Operator","value":"+"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"hWidget"}, {"type":"Punctuation","value":":"}, {"type":"KeywordReserved","value":"HEIGHT-PIXELS"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"THEN"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"RETURN"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"hWidget"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n\n "}, {"type":"NameVariable","value":"hWidget"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"hWidget"}, {"type":"Punctuation","value":":"}, {"type":"KeywordReserved","value":"NEXT-SIBLING"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"END"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n\n "}, {"type":"KeywordReserved","value":"RETURN "}, {"type":"NameVariable","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":"/* getWidgetUnderMouse */"}, {"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-getWorkFolder) = 0 \u0026THEN\n\n\u0026ANALYZE-SUSPEND _UIB-CODE-BLOCK _FUNCTION getWorkFolder Procedure"}, {"type":"Text","value":"\n"}, {"type":"KeywordReserved","value":"FUNCTION"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"getWorkFolder"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"RETURNS"}, {"type":"Text","value":" "}, {"type":"KeywordType","value":"CHARACTER\n "}, {"type":"Punctuation","value":"("}, {"type":"Text","value":" "}, {"type":"CommentMultiline","value":"/* parameter-definitions */"}, {"type":"Text","value":" "}, {"type":"Punctuation","value":")"}, {"type":"Text","value":" "}, {"type":"Punctuation","value":":"}, {"type":"Text","value":"\n\n "}, {"type":"CommentMultiline","value":"/* Cached the value in a global var */"}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"IF"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"gcWorkFolder"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"LiteralStringSingle","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":"gcWorkFolder"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"getRegistry"}, {"type":"Punctuation","value":"("}, {"type":"LiteralStringDouble","value":"\"DataDigger\""}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"LiteralStringDouble","value":"\"WorkFolder\""}, {"type":"Punctuation","value":")."}, {"type":"Text","value":"\n\n "}, {"type":"CommentMultiline","value":"/* Possibility to specify where DD files are created */"}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"IF"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"gcWorkFolder"}, {"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":"gcWorkFolder"}, {"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":"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":"NameVariable","value":"FIX"}, {"type":"Operator","value":"-"}, {"type":"NameVariable","value":"CODEPAGE"}, {"type":"Punctuation","value":"("}, {"type":"NameVariable","value":"cDummy"}, {"type":"Punctuation","value":")"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"pcCodepage"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"NO-ERROR"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"RETURN"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"NOT"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"ERROR-STATUS"}, {"type":"Punctuation","value":":"}, {"type":"KeywordReserved","value":"ERROR"}, {"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":"/* isValidCodePage */"}, {"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-readFile) = 0 \u0026THEN\n\n\u0026ANALYZE-SUSPEND _UIB-CODE-BLOCK _FUNCTION readFile Procedure"}, {"type":"Text","value":"\n"}, {"type":"KeywordReserved","value":"FUNCTION"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"readFile"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"RETURNS"}, {"type":"Text","value":" "}, {"type":"KeywordType","value":"LONGCHAR\n "}, {"type":"Punctuation","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":"\n "}, {"type":"CommentMultiline","value":"/* Read contents of a file as a longchar.\n */"}, {"type":"Text","value":"\n "}, {"type":"KeywordDeclaration","value":"DEFINE"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"VARIABLE"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"cContent"}, {"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 "}, {"type":"KeywordDeclaration","value":"DEFINE"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"VARIABLE"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"cLine"}, {"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":"KeywordReserved","value":"IF"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"SEARCH"}, {"type":"Punctuation","value":"("}, {"type":"NameVariable","value":"pcFilename"}, {"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":"DO"}, {"type":"Punctuation","value":":"}, {"type":"Text","value":"\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":"pcFilename"}, {"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":"KeywordReserved","value":"UNFORMATTED"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"cLine"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":"cContent"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"cContent"}, {"type":"Text","value":" "}, {"type":"Operator","value":"+"}, {"type":"Text","value":" "}, {"type":"LiteralStringDouble","value":"\"~n\""}, {"type":"Text","value":" "}, {"type":"Operator","value":"+"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"cLine"}, {"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 "}, {"type":"KeywordReserved","value":"END"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n\n "}, {"type":"KeywordReserved","value":"RETURN"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"cContent"}, {"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":"/* readFile */"}, {"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-removeConnection) = 0 \u0026THEN\n\n\u0026ANALYZE-SUSPEND _UIB-CODE-BLOCK _FUNCTION removeConnection Procedure"}, {"type":"Text","value":"\n"}, {"type":"KeywordReserved","value":"FUNCTION"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"removeConnection"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"RETURNS"}, {"type":"Text","value":" "}, {"type":"KeywordType","value":"LOGICAL\n "}, {"type":"Punctuation","value":"("}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"pcDatabase"}, {"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":"/* Remove record from connection temp-table\n */"}, {"type":"Text","value":"\n "}, {"type":"KeywordDeclaration","value":"DEFINE"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"BUFFER"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"bfDatabase"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"FOR"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"ttDatabase"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"FIND"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"bfDatabase"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"WHERE"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"bfDatabase"}, {"type":"Punctuation","value":"."}, {"type":"NameVariable","value":"cLogicalName"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"pcDatabase"}, {"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":"bfDatabase"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"THEN"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"DELETE"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"bfDatabase"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"RETURN"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"TRUE"}, {"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":"/* removeConnection */"}, {"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-resolveOsVars) = 0 \u0026THEN\n\n\u0026ANALYZE-SUSPEND _UIB-CODE-BLOCK _FUNCTION resolveOsVars Procedure"}, {"type":"Text","value":"\n"}, {"type":"KeywordReserved","value":"FUNCTION"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"resolveOsVars"}, {"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\n "}, {"type":"CommentMultiline","value":"/* Return a string with OS vars resolved\n */"}, {"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":"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":"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":"Punctuation","value":"))"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"NO-ERROR"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n\n "}, {"type":"KeywordReserved","value":"DO"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"j"}, {"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":"j"}, {"type":"Punctuation","value":")."}, {"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":"cColumnName"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"THEN\n "}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"hColumn"}, {"type":"Punctuation","value":":"}, {"type":"KeywordReserved","value":"WIDTH-PIXELS "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"iColumnWidth"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"END"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":" "}, {"type":"CommentMultiline","value":"/* j */"}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"END"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":" "}, {"type":"CommentMultiline","value":"/* i */"}, {"type":"Text","value":"\n\n "}, {"type":"KeywordReserved","value":"RETURN"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"TRUE"}, {"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":"/* setColumnWidthList */"}, {"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-setLinkInfo) = 0 \u0026THEN\n\n\u0026ANALYZE-SUSPEND _UIB-CODE-BLOCK _FUNCTION setLinkInfo Procedure"}, {"type":"Text","value":"\n"}, {"type":"KeywordReserved","value":"FUNCTION"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"setLinkInfo"}, {"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":"pcFieldName"}, {"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":"pcValue"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"AS"}, {"type":"Text","value":" "}, {"type":"KeywordType","value":"CHARACTER\n "}, {"type":"Punctuation","value":"):"}, {"type":"Text","value":"\n "}, {"type":"CommentMultiline","value":"/* Save name/value of a field.\n */"}, {"type":"Text","value":"\n "}, {"type":"KeywordDeclaration","value":"DEFINE"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"BUFFER"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"bLinkInfo"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"FOR"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"ttLinkInfo"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n "}, {"type":"CommentPreproc","value":"{\u0026timerStart}"}, {"type":"Text","value":"\n\n "}, {"type":"KeywordReserved","value":"PUBLISH "}, {"type":"LiteralStringDouble","value":"\"debugInfo\""}, {"type":"Text","value":" "}, {"type":"Punctuation","value":"("}, {"type":"LiteralNumberInteger","value":"2"}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"SUBSTITUTE"}, {"type":"Punctuation","value":"("}, {"type":"LiteralStringDouble","value":"\"Set linkinfo for field \u00261 to \u00262\""}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"pcFieldName,"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"pcValue"}, {"type":"Punctuation","value":"))."}, {"type":"Text","value":"\n\n "}, {"type":"KeywordReserved","value":"FIND"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"bLinkInfo"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"WHERE"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"bLinkInfo"}, {"type":"Punctuation","value":"."}, {"type":"NameVariable","value":"cField"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"pcFieldName"}, {"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":"bLinkInfo"}, {"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":"bLinkInfo"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"ASSIGN"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"bLinkInfo"}, {"type":"Punctuation","value":"."}, {"type":"NameVariable","value":"cField"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"pcFieldName"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"END"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n\n "}, {"type":"NameVariable","value":"bLinkInfo"}, {"type":"Punctuation","value":"."}, {"type":"NameVariable","value":"cValue"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"TRIM"}, {"type":"Punctuation","value":"("}, {"type":"NameVariable","value":"pcValue"}, {"type":"Punctuation","value":")."}, {"type":"Text","value":"\n\n "}, {"type":"KeywordReserved","value":"RETURN"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"TRUE"}, {"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":"/* setLinkInfo */"}, {"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-setRegistry) = 0 \u0026THEN\n\n\u0026ANALYZE-SUSPEND _UIB-CODE-BLOCK _FUNCTION setRegistry Procedure"}, {"type":"Text","value":"\n"}, {"type":"KeywordReserved","value":"FUNCTION"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"setRegistry"}, {"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":"AS"}, {"type":"Text","value":" "}, {"type":"KeywordType","value":"CHARACTER\n "}, {"type":"NameVariable","value":","}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"pcValue"}, {"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":"CommentMultiline","value":"/* Set a value in 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":"bfConfig"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"FOR"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"ttConfig"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n\n "}, {"type":"KeywordReserved","value":"FIND"}, {"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":"NameVariable","value":"pcSection"}, {"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":"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":"IF"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"NOT"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"AVAILABLE"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"bfConfig"}, {"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":"bfConfig"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"ASSIGN\n "}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"bfConfig"}, {"type":"Punctuation","value":"."}, {"type":"NameVariable","value":"cSection"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"pcSection"}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":"bfConfig"}, {"type":"Punctuation","value":"."}, {"type":"NameVariable","value":"cSetting"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"pcKey"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n\n "}, {"type":"NameVariable","value":"glDirtyCache"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"TRUE"}, {"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":"pcValue"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"?"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"OR"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"TRIM"}, {"type":"Punctuation","value":"("}, {"type":"NameVariable","value":"pcValue"}, {"type":"Punctuation","value":")"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"LiteralStringSingle","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":"DELETE"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"bfConfig"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n "}, {"type":"NameVariable","value":"glDirtyCache"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"TRUE"}, {"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":"KeywordReserved","value":"DO"}, {"type":"Punctuation","value":":"}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"ASSIGN\n "}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"bfConfig"}, {"type":"Punctuation","value":"."}, {"type":"NameVariable","value":"lUser"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"TRUE\n "}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"bfConfig"}, {"type":"Punctuation","value":"."}, {"type":"NameVariable","value":"cValue"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"pcValue"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n\n "}, {"type":"KeywordReserved","value":"IF"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"bfConfig"}, {"type":"Punctuation","value":"."}, {"type":"NameVariable","value":"cValue"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"\u003c\u003e"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"pcValue"}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"THEN"}, {"type":"Text","value":" "}, {"type":"NameVariable","value":"glDirtyCache"}, {"type":"Text","value":" "}, {"type":"Operator","value":"="}, {"type":"Text","value":" "}, {"type":"KeywordReserved","value":"TRUE"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n "}, {"type":"KeywordReserved","value":"END"}, {"type":"Punctuation","value":"."}, {"type":"Text","value":"\n\n "}, {"type":"KeywordReserved","value":"RETURN "}, {"type":"LiteralStringDouble","value":"\"\""}, {"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":"/* setRegistry */"}, {"type":"Text","value":"\n\n"}, {"type":"CommentMultiline","value":"/* _UIB-CODE-BLOCK-END */"}, {"type":"CommentPreproc","value":"\n\u0026ANALYZE-RESUME\n\n\u0026ENDIF"} ]