DEFINE VARIABLE sAktiv         AS LOG       NO-UNDO.
DEFINE VARIABLE GlobKon        AS CHARACTER NO-UNDO.
DEFINE VARIABLE GlobFir        AS CHARACTER NO-UNDO.
DEFINE VARIABLE GlobFil        AS CHARACTER NO-UNDO.
DEFINE VARIABLE DBFirma        AS CHARACTER NO-UNDO.
DEFINE VARIABLE D1Firma        AS CHARACTER NO-UNDO.
DEFINE VARIABLE D2Firma        AS CHARACTER NO-UNDO.
DEFINE VARIABLE ADFirma        AS CHARACTER NO-UNDO.
DEFINE VARIABLE FBFirma        AS CHARACTER NO-UNDO.
DEFINE VARIABLE NRFirma        AS CHARACTER NO-UNDO.
DEFINE VARIABLE Firma          AS CHARACTER NO-UNDO.
DEFINE VARIABLE cInstallation  AS CHARACTER NO-UNDO.

DEFINE VARIABLE Progname       AS CHARACTER NO-UNDO.
DEFINE VARIABLE Sektion        AS CHARACTER NO-UNDO.
DEFINE VARIABLE Farbe          AS INTEGER   NO-UNDO.
DEFINE VARIABLE hDaten         AS HANDLE    NO-UNDO.
DEFINE VARIABLE hFenster       AS HANDLE    NO-UNDO.
DEFINE VARIABLE hObject        AS HANDLE    NO-UNDO.
DEFINE VARIABLE hBrowser       AS HANDLE    NO-UNDO.
DEFINE VARIABLE htBrowser      AS HANDLE    NO-UNDO.
DEFINE VARIABLE cBenutzerDaten AS CHARACTER NO-UNDO.
DEFINE VARIABLE iBenuSprcd     AS INTEGER   NO-UNDO.
DEFINE VARIABLE cHandles       AS CHARACTER NO-UNDO.
DEFINE VARIABLE lWindow        AS LOGICAL   NO-UNDO.

DEFINE TEMP-TABLE tBrowser NO-UNDO
    FIELD Feld     AS CHARACTER
    FIELD Pos      AS INTEGER
    FIELD Breit    AS DECIMAL
    FIELD fAktiv   AS LOG
    FIELD fVisible AS LOG
    FIELD PosAkt   AS INTEGER
    FIELD BreitAkt AS DECIMAL
    FIELD hCol     AS HANDLE
    FIELD cType    AS CHARACTER
    FIELD cFormat  AS CHARACTER
    FIELD cInitial AS CHARACTER
    FIELD cLabel   AS CHARACTER.

DEFINE TEMP-TABLE tMenuItems NO-UNDO
    FIELD hMenuItem AS HANDLE.