Administrator Main Administrator ProLinga Administrator Developer Main Developer ProLinga Developer Standard Main Stock Application Example ProLinga Application 16 1 1 String Character 0 Left False 16 1 1 String Character 0 Left False 16 1 1 String Character 0 Left False 16 1 1 String Character 0 Left False 16 1 1 String Character 0 Left False 20 1 1 String Character 0 Left False Description Short Object Description 2003-02-13T02:43:19 180 1 1 String Character 0 Left False DetailDescription Long Object Description 2003-02-13T02:43:19 19 1 1 String Character 0 Left False LastModifed Last Modification Time 2003-02-13T02:43:19 32 1 1 String Character 0 Left False 32 1 1 String Character 0 Left False 8 1 1 String Character 0 Left False 16 1 1 String Character 0 Left False 5 1 1 SignedDecimal Character 0 Left False Count Counter 2003-03-22T01:46:09 5 1 1 SignedDecimal Character 0 Left False Count Counter 2003-03-22T01:46:09 32 1 1 String Character 0 Left False Name of Application Name of System Application 2003-02-04T01:32:15 32 1 1 String Character 0 Left False Type Type of Repository Object 2003-02-04T01:46:09 32 1 1 String Character 0 Left False Name Name of Repository Object 2003-02-04T01:46:09 80 1 1 String Character 0 Left False 5 1 1 String Character 0 Left False 5 1 1 String Character 0 Left False 5 1 1 String Character 0 Left False 15 1 1 String Character 0 Left False 20 1 1 String Character 0 Left False Description Short Object Description 2003-02-13T02:43:19 180 1 1 String Character 0 Left False DetailDescription Long Object Description 2003-02-13T02:43:19 19 1 1 String Character 0 Left False LastModifed Last Modification Time 2003-02-13T02:43:19 32 1 1 String Character 0 Left False Name Name of Repository Object 2003-02-04T01:46:09 16 1 1 String Character 0 Left False 32 1 1 String Character 0 Left False 1 1 1 String Character 0 Left False 32 1 1 String Character 0 Left False 16 1 1 String Character 0 Left False 10 1 1 String Character Left False 10 1 1 String Character Left False RepositoryObject Generic Repository Object Index Application Ascending Type Ascending Name Ascending 3 user List of Users 1 User Text True Ascending 2 Application Text False None 3 Description Text False None 1 1 User Name Text True Ascending 1 1 Application Name Text True Ascending 3 1 Application Text True Ascending 2 Initial Logic Text False None 3 Description Text False None SCREEN Administrator DISPLAY ALL DISPLAY ALL SCREEN UserEntryAdd CLEAR RECORD User LET F-Application.User = "Administrator" LET F-Type.User = "User" LET F-AllowAccessAdminAppn.User = P-TrueFalse(2) LET F-AllowAccessDevAppn.User = P-TrueFalse(2) DISPLAY ALL DISPLAY ALL CLEAR RECORD Application LET F-Application.Application = "Administrator" LET F-Type.Application = "Application" LET F-ApplicationType.Application = P-ApplicationType(1) DISPLAY ALL DISPLAY ALL LET L-TempString = "Are you sure you want to delete Application : " V-ApplicationName " ?" ERROR L-TempString SEVERITY Question IF ERRORRETURN() = 0 LET F-Application.Application = "Administrator" LET F-Type.Application = "Application" LET F-Name.Application = V-ApplicationName REPOSITORY GET Application IF REPOSITORYSTATUS() <> 0 ERROR "Can not read system file Application" RETURN ENDIF REPOSITORY DELETE Application IF REPOSITORYSTATUS() <> 0 ERROR "Can not update system file Application" RETURN ENDIF CALL ApplicationInit ENDIF LIST GET application VALUE V-ApplicationName COLNO 1 IF F-Name.User = "" ERROR "User name required." RETURN ENDIF REPOSITORY TEST User IF REPOSITORYSTATUS() = 0 ERROR "User already exists. Choose another name." RETURN ENDIF REPOSITORY PUT User IF REPOSITORYSTATUS() <> 0 ERROR "Error writing system file User" RETURN ENDIF LIST APPEND userlist VALUE CLIP(F-Name.User) LIST APPEND user VALUE CLIP(F-Name.User) CLIP(F-ApplicationName.User) CLIP(F-Description.User) CONTROL commit LIST GET user VALUE V-UserName COLNO 1 IF F-Name.Application = "" ERROR "Application name required." RETURN ENDIF IF F-InitialLogicName.Application = "" ERROR "Initial logic name required." RETURN ENDIF REPOSITORY TEST Application IF REPOSITORYSTATUS() = 0 ERROR "Application already exists. Choose another name." RETURN ENDIF REPOSITORY PUT Application IF REPOSITORYSTATUS() <> 0 ERROR "Error writing system file Application" RETURN ENDIF LIST APPEND appnlist VALUE CLIP(F-Name.Application) LIST APPEND application VALUE CLIP(F-Name.Application) CLIP(F-InitialLogicName.Application) CLIP(F-Description.Application) CONTROL commit LET F-Application.User = "Administrator" LET F-Type.User = "User" LET F-Name.User = V-UserName REPOSITORY GET User IF REPOSITORYSTATUS() <> 0 ERROR "Can not read system file User" RETURN ENDIF LET V-Accept = "N" SCREEN UserEntryProp IF V-Accept = "Y" DISPLAY UserView ENDIF LET L-TempString = "Are you sure you want to delete User : " V-UserName " ?" ERROR L-TempString SEVERITY Question IF ERRORRETURN() = 0 LET F-Application.User = "Administrator" LET F-Type.User = "User" LET F-Name.User = V-UserName REPOSITORY GET User IF REPOSITORYSTATUS() <> 0 ERROR "Can not read system file User" RETURN ENDIF REPOSITORY DELETE User IF REPOSITORYSTATUS() <> 0 ERROR "Can not update system file User" RETURN ENDIF CALL UserInit ENDIF CLEAR LISTSTORE userlist REPOSITORY OBJECTLIST User FILTER "*" LISTSTORE userlist CLEAR LISTSTORE user LET L-Hits = LISTROWCOUNT("userlist") LET L-Count = 0 FOREVER IF L-Count = L-Hits BREAK ENDIF LET L-Count = L-Count + 1 LIST GET userlist VALUE V-UserName COLNO 1 ROWNO L-Count LET F-Application.User = "Administrator" LET F-Type.User = "User" LET F-Name.User = V-UserName REPOSITORY GET User IF REPOSITORYSTATUS() <> 0 ERROR "Can not read system file User" RETURN ENDIF LIST APPEND user VALUE CLIP(F-Name.User) CLIP(F-ApplicationName.User) CLIP(F-Description.User) ENDFOR DISPLAY UserView REPOSITORY PUT User IF REPOSITORYSTATUS() <> 0 ERROR "Error writing system file User" RETURN ENDIF CLEAR LISTSTORE user LET L-Hits = LISTROWCOUNT("userlist") LET L-Count = 0 FOREVER IF L-Count = L-Hits BREAK ENDIF LET L-Count = L-Count + 1 LIST GET userlist VALUE V-UserName COLNO 1 ROWNO L-Count LET F-Application.User = "Administrator" LET F-Type.User = "User" LET F-Name.User = V-UserName REPOSITORY GET User IF REPOSITORYSTATUS() <> 0 ERROR "Can not read user" RETURN ENDIF LIST APPEND user VALUE CLIP(F-Name.User) CLIP(F-ApplicationName.User) CLIP(F-Description.User) ENDFOR LET V-Accept = "Y" CONTROL commit CLEAR LISTSTORE appnlist REPOSITORY OBJECTLIST Application FILTER "*" LISTSTORE appnlist CLEAR LISTSTORE application LET L-Hits = LISTROWCOUNT("appnlist") LET L-Count = 0 FOREVER IF L-Count = L-Hits BREAK ENDIF LET L-Count = L-Count + 1 LIST GET appnlist VALUE V-ApplicationName COLNO 1 ROWNO L-Count LET F-Application.Application = "Administrator" LET F-Type.Application = "Application" LET F-Name.Application = V-ApplicationName REPOSITORY GET Application IF REPOSITORYSTATUS() <> 0 ERROR "Can not read application" RETURN ENDIF LIST APPEND application VALUE CLIP(F-Name.Application) CLIP(F-InitialLogicName.Application) CLIP(F-Description.Application) ENDFOR DISPLAY ApplicationView IF F-InitialLogicName.Application = "" ERROR "Initial logic name required." RETURN ENDIF IF F-InitialLogicName.Application = "" ERROR "Initial logic name required." RETURN ENDIF REPOSITORY PUT Application IF REPOSITORYSTATUS() <> 0 ERROR "Error writing system file Application" RETURN ENDIF CLEAR LISTSTORE application LET L-Hits = LISTROWCOUNT("appnlist") LET L-Count = 0 FOREVER IF L-Count = L-Hits BREAK ENDIF LET L-Count = L-Count + 1 LIST GET appnlist VALUE V-ApplicationName COLNO 1 ROWNO L-Count LET F-Application.Application = "Administrator" LET F-Type.Application = "Application" LET F-Name.Application = V-ApplicationName REPOSITORY GET Application IF REPOSITORYSTATUS() <> 0 ERROR "Can not read application" RETURN ENDIF LIST APPEND application VALUE CLIP(F-Name.Application) CLIP(F-InitialLogicName.Application) CLIP(F-Description.Application) ENDFOR LET V-Accept = "Y" CONTROL commit CLEAR LISTSTORE application LET L-Hits = LISTROWCOUNT("appnlist") LET L-Count = 0 FOREVER IF L-Count = L-Hits BREAK ENDIF LET L-Count = L-Count + 1 LIST GET appnlist VALUE V-ApplicationName COLNO 1 ROWNO L-Count LET F-Application.Application = "Administrator" LET F-Type.Application = "Application" LET F-Name.Application = V-ApplicationName REPOSITORY GET Application IF REPOSITORYSTATUS() <> 0 ERROR "Can not read application" RETURN ENDIF LIST APPEND application VALUE CLIP(F-Name.Application) CLIP(F-InitialLogicName.Application) CLIP(F-Description.Application) ENDFOR LET F-Application.Application = "Administrator" LET F-Type.Application = "Application" LET F-Name.Application = V-ApplicationName REPOSITORY GET Application IF REPOSITORYSTATUS() <> 0 ERROR "Can not read system file Application" RETURN ENDIF LET V-Accept = "N" SCREEN ApplicationEntryProp IF V-Accept = "Y" DISPLAY ApplicationView ENDIF LET F-Application.System = "Administrator" LET F-Type.System = "System" LET F-Name.System = "System" REPOSITORY GET System IF REPOSITORYSTATUS() <> 0 ERROR "Can not read system file System" RETURN ENDIF CALL ApplicationInit CALL UserInit DISPLAY ALL REPOSITORY PUT System IF REPOSITORYSTATUS() <> 0 ERROR "Error writing system file System" RETURN ENDIF ERROR "System file has been updated." SEVERITY Info SCREEN ApplicationEntryAdd SCREEN Runner 2005-06-28T12:37:29Z CLEAR RECORD User LET F-Application.User = "Administrator" LET F-Type.User = "User" LET F-Name.User = G-UserName.Logon REPOSITORY GET User IF REPOSITORYSTATUS() <> 0 ERROR "Logon incorrect. Please try again." RETURN ENDIF IF CLIPPED(G-UserPassword.Logon) <> CLIPPED(F-Password.User) ERROR "Incorrect user password. Please try again." RETURN ENDIF IF G-ApplicationName.Logon = "" LET G-ApplicationName.Logon = F-ApplicationName.User ENDIF CLEAR RECORD Application LET F-Application.Application = "Administrator" LET F-Type.Application = "Application" LET F-Name.Application = G-ApplicationName.Logon REPOSITORY GET Application IF REPOSITORYSTATUS() <> 0 ERROR "Logon incorrect. Please try again." RETURN ENDIF IF CLIPPED(G-ApplicationPassword.Logon) <> CLIPPED(F-Password.User) ERROR "Incorrect application password. Please try again." RETURN ENDIF IF F-ApplicationType.Application = "Administrator" IF F-AllowAccessAdminAppn.User = "False" ERROR "User has no access to this application." RETURN ENDIF ENDIF IF F-ApplicationType.Application = "Developer" IF F-AllowAccessDevAppn.User = "False" ERROR "User has no access to this application." RETURN ENDIF ENDIF CONTROL user G-UserName.Logon CONTROL logon G-ApplicationName.Logon 2005-06-29T13:24:56Z PARAMETER ApplicationName UserName LET G-ApplicationName.Logon = L-ApplicationName LET G-UserName.Logon = L-UserName SCREEN DirectConnect 2005-07-01T01:55:59Z CLEAR RECORD User LET F-Application.User = "Administrator" LET F-Type.User = "User" LET F-Name.User = G-UserName.Logon REPOSITORY GET User IF REPOSITORYSTATUS() <> 0 ERROR "Logon incorrect. User name [" CLIPPED(G-UserName.Logon) "] does not exist." CONTROL exit RETURN ENDIF IF CLIPPED(F-Password.User) <> "" LET G-UserPassword.Logon = "" SCREEN PasswordUser IF CLIPPED(G-UserPassword.Logon) <> CLIPPED(F-Password.User) ERROR "Logon incorrect. Wrong user password." CONTROL exit RETURN ENDIF ENDIF IF G-ApplicationName.Logon = "" LET G-ApplicationName.Logon = F-ApplicationName.User ENDIF CLEAR RECORD Application LET F-Application.Application = "Administrator" LET F-Type.Application = "Application" LET F-Name.Application = G-ApplicationName.Logon REPOSITORY GET Application IF REPOSITORYSTATUS() <> 0 ERROR "Logon incorrect. Application name [" CLIPPED(G-ApplicationName.Logon) "] does not exist." CONTROL exit RETURN ENDIF IF CLIPPED(F-Password.Application) <> "" LET G-ApplicationPassword.Logon = "" SCREEN PasswordApplication IF CLIPPED(G-ApplicationPassword.Logon) <> CLIPPED(F-Password.Application) ERROR "Logon incorrect. Wrong application password." CONTROL exit RETURN ENDIF ENDIF CONTROL user G-UserName.Logon CONTROL logon G-ApplicationName.Logon 2005-07-01T02:52:54Z Function Screen English MYSQL True False BERKELEY-DB SYSTEM GDA Repository Administrator Developer Standard Application Application Record Application Type Name Password ApplicationType InitialLogicName Description DetailDescription Modified User User Record Application Type Name Password ApplicationName AllowAccessAdminAppn AllowAccessDevAppn Description DetailDescription Modified System System Record Application Type Name TrueValue FalseValue Description DetailDescription Modified *CLEAR "appnlist" *STORE "appnlist" *COLUMNS= 1 *DEFTYPE= *TYPESTR OBJECTLIST Application FILTER "*" LISTSTORE "appnlist" *CLEAR "application" SCREENFIELD ApplicationView *STORE "application" *COLUMNS= 4 *DEFTYPE= *TYPESTR L-Hits = LISTROWCOUNT("appnlist") L-Count = 0 L-Count = L-Hits THEN L-Count = L-Count + 1 *GETVALUE "appnlist" *COLNO= 1 *ROWNO= L-Count V-ApplicationName F-Application.Application = "Administrator" F-Type.Application = "Application" F-Name.Application = V-ApplicationName READ Application TABLESTATUS() <> 0 THEN "Can not read application" *APPEND "application" F-Name.Application F-InitialLogicName.Application F-InitialLogicName.Application F-Description.Application *LINK "application" *VIEW= S-ApplicationView *SORTCOL= 1 *ASC "Application" "Initial Action" "Initial Type" "Description" Administrator ALL ALL UserEntryAdd RECORD User F-Application.User = "Administrator" F-Type.User = "User" F-AllowAccessAdminAppn.User = P-TrueFalse(2) F-AllowAccessDevAppn.User = P-TrueFalse(2) ALL ALL RECORD Application F-Application.Application = "Administrator" F-Type.Application = "Application" F-ApplicationType.Application = P-ApplicationType(1) ALL ALL L-TempString = "Are you sure you want to delete Application : " V-ApplicationName " ?" L-TempString SEVERITY Question ERRORRETURN() = 0 F-Application.Application = "Administrator" F-Type.Application = "Application" F-Name.Application = V-ApplicationName GET Application REPOSITORYSTATUS() <> 0 "Can not read system file Application" DELETE Application REPOSITORYSTATUS() <> 0 "Can not update system file Application" ApplicationInit GET application VALUE V-ApplicationName COLNO 1 F-Name.User = "" "User name required." TEST User REPOSITORYSTATUS() = 0 "User already exists. Choose another name." PUT User REPOSITORYSTATUS() <> 0 "Error writing system file User" APPEND userlist VALUE CLIP(F-Name.User) APPEND user VALUE CLIP(F-Name.User) CLIP(F-ApplicationName.User) CLIP(F-Description.User) commit GET user VALUE V-UserName COLNO 1 F-Name.Application = "" "Application name required." F-InitialLogicName.Application = "" "Initial logic name required." TEST Application REPOSITORYSTATUS() = 0 "Application already exists. Choose another name." PUT Application REPOSITORYSTATUS() <> 0 "Error writing system file Application" APPEND appnlist VALUE CLIP(F-Name.Application) APPEND application VALUE CLIP(F-Name.Application) CLIP(F-InitialLogicName.Application) CLIP(F-Description.Application) commit F-Application.User = "Administrator" F-Type.User = "User" F-Name.User = V-UserName GET User REPOSITORYSTATUS() <> 0 "Can not read system file User" V-Accept = "N" UserEntryProp V-Accept = "Y" UserView L-TempString = "Are you sure you want to delete User : " V-UserName " ?" L-TempString SEVERITY Question ERRORRETURN() = 0 F-Application.User = "Administrator" F-Type.User = "User" F-Name.User = V-UserName GET User REPOSITORYSTATUS() <> 0 "Can not read system file User" DELETE User REPOSITORYSTATUS() <> 0 "Can not update system file User" UserInit LISTSTORE userlist OBJECTLIST User FILTER "*" LISTSTORE userlist LISTSTORE user L-Hits = LISTROWCOUNT("userlist") L-Count = 0 L-Count = L-Hits L-Count = L-Count + 1 GET userlist VALUE V-UserName COLNO 1 ROWNO L-Count F-Application.User = "Administrator" F-Type.User = "User" F-Name.User = V-UserName GET User REPOSITORYSTATUS() <> 0 "Can not read system file User" APPEND user VALUE CLIP(F-Name.User) CLIP(F-ApplicationName.User) CLIP(F-Description.User) UserView PUT User REPOSITORYSTATUS() <> 0 "Error writing system file User" LISTSTORE user L-Hits = LISTROWCOUNT("userlist") L-Count = 0 L-Count = L-Hits L-Count = L-Count + 1 GET userlist VALUE V-UserName COLNO 1 ROWNO L-Count F-Application.User = "Administrator" F-Type.User = "User" F-Name.User = V-UserName GET User REPOSITORYSTATUS() <> 0 "Can not read user" APPEND user VALUE CLIP(F-Name.User) CLIP(F-ApplicationName.User) CLIP(F-Description.User) V-Accept = "Y" commit LISTSTORE appnlist OBJECTLIST Application FILTER "*" LISTSTORE appnlist LISTSTORE application L-Hits = LISTROWCOUNT("appnlist") L-Count = 0 L-Count = L-Hits L-Count = L-Count + 1 GET appnlist VALUE V-ApplicationName COLNO 1 ROWNO L-Count F-Application.Application = "Administrator" F-Type.Application = "Application" F-Name.Application = V-ApplicationName GET Application REPOSITORYSTATUS() <> 0 "Can not read application" APPEND application VALUE CLIP(F-Name.Application) CLIP(F-InitialLogicName.Application) CLIP(F-Description.Application) ApplicationView F-InitialLogicName.Application = "" "Initial logic name required." F-InitialLogicName.Application = "" "Initial logic name required." PUT Application REPOSITORYSTATUS() <> 0 "Error writing system file Application" LISTSTORE application L-Hits = LISTROWCOUNT("appnlist") L-Count = 0 L-Count = L-Hits L-Count = L-Count + 1 GET appnlist VALUE V-ApplicationName COLNO 1 ROWNO L-Count F-Application.Application = "Administrator" F-Type.Application = "Application" F-Name.Application = V-ApplicationName GET Application REPOSITORYSTATUS() <> 0 "Can not read application" APPEND application VALUE CLIP(F-Name.Application) CLIP(F-InitialLogicName.Application) CLIP(F-Description.Application) V-Accept = "Y" commit LISTSTORE application L-Hits = LISTROWCOUNT("appnlist") L-Count = 0 L-Count = L-Hits L-Count = L-Count + 1 GET appnlist VALUE V-ApplicationName COLNO 1 ROWNO L-Count F-Application.Application = "Administrator" F-Type.Application = "Application" F-Name.Application = V-ApplicationName GET Application REPOSITORYSTATUS() <> 0 "Can not read application" APPEND application VALUE CLIP(F-Name.Application) CLIP(F-InitialLogicName.Application) CLIP(F-Description.Application) F-Application.Application = "Administrator" F-Type.Application = "Application" F-Name.Application = V-ApplicationName GET Application REPOSITORYSTATUS() <> 0 "Can not read system file Application" V-Accept = "N" ApplicationEntryProp V-Accept = "Y" ApplicationView F-Application.System = "Administrator" F-Type.System = "System" F-Name.System = "System" GET System REPOSITORYSTATUS() <> 0 "Can not read system file System" ApplicationInit UserInit ALL PUT System REPOSITORYSTATUS() <> 0 "Error writing system file System" "System file has been updated." SEVERITY Info ApplicationEntryAdd Runner RECORD User F-Application.User = "Administrator" F-Type.User = "User" F-Name.User = G-UserName.Logon GET User REPOSITORYSTATUS() <> 0 "Logon incorrect. Please try again." CLIPPED(G-UserPassword.Logon) <> CLIPPED(F-Password.User) "Incorrect user password. Please try again." G-ApplicationName.Logon = "" G-ApplicationName.Logon = F-ApplicationName.User RECORD Application F-Application.Application = "Administrator" F-Type.Application = "Application" F-Name.Application = G-ApplicationName.Logon GET Application REPOSITORYSTATUS() <> 0 "Logon incorrect. Please try again." CLIPPED(G-ApplicationPassword.Logon) <> CLIPPED(F-Password.User) "Incorrect application password. Please try again." F-ApplicationType.Application = "Administrator" F-AllowAccessAdminAppn.User = "False" "User has no access to this application." F-ApplicationType.Application = "Developer" F-AllowAccessDevAppn.User = "False" "User has no access to this application." user G-UserName.Logon logon G-ApplicationName.Logon ApplicationName UserName G-ApplicationName.Logon = L-ApplicationName G-UserName.Logon = L-UserName DirectConnect RECORD User F-Application.User = "Administrator" F-Type.User = "User" F-Name.User = G-UserName.Logon GET User REPOSITORYSTATUS() <> 0 "Logon incorrect. User name [" CLIPPED(G-UserName.Logon) "] does not exist." exit CLIPPED(F-Password.User) <> "" G-UserPassword.Logon = "" PasswordUser CLIPPED(G-UserPassword.Logon) <> CLIPPED(F-Password.User) "Logon incorrect. Wrong user password." exit G-ApplicationName.Logon = "" G-ApplicationName.Logon = F-ApplicationName.User RECORD Application F-Application.Application = "Administrator" F-Type.Application = "Application" F-Name.Application = G-ApplicationName.Logon GET Application REPOSITORYSTATUS() <> 0 "Logon incorrect. Application name [" CLIPPED(G-ApplicationName.Logon) "] does not exist." exit CLIPPED(F-Password.Application) <> "" G-ApplicationPassword.Logon = "" PasswordApplication CLIPPED(G-ApplicationPassword.Logon) <> CLIPPED(F-Password.Application) "Logon incorrect. Wrong application password." exit user G-UserName.Logon logon G-ApplicationName.Logon True Add User GTK_WINDOW_TOPLEVEL GTK_WIN_POS_NONE False True False True False False GDK_WINDOW_TYPE_HINT_NORMAL GDK_GRAVITY_NORTH_WEST True True False 0 True GTK_BUTTONBOX_END True True True gtk-cancel True GTK_RELIEF_NORMAL True -6 True True True gtk-ok True GTK_RELIEF_NORMAL True -5 0 False True GTK_PACK_END True True True True GTK_POS_TOP False False 10 True 5 2 False 5 0 True User Name: False False GTK_JUSTIFY_LEFT False False 0 0.5 0 0 0 1 0 1 fill True Password: False False GTK_JUSTIFY_LEFT False False 0 0.5 0 0 0 1 1 2 fill True True True True 0 True * False 1 2 0 1 True True True False 0 True * False 1 2 1 2 True Allow Access Developer Applications: False False GTK_JUSTIFY_LEFT False False 0 0.5 0 0 0 1 4 5 fill True Allow Access Administrator Applications: False False GTK_JUSTIFY_LEFT False False 0 0.5 0 0 0 1 3 4 fill True Application Name: False False GTK_JUSTIFY_LEFT False False 0 0.5 0 0 0 1 2 3 fill True True True True 0 True * False 1 2 2 3 True True togglebutton1 True GTK_RELIEF_NORMAL True False False 1 2 3 4 fill True True togglebutton2 True GTK_RELIEF_NORMAL True False False 1 2 4 5 fill False True True _General True False GTK_JUSTIFY_LEFT False False 0.5 0.5 0 0 tab 10 True False 5 True Description: False False GTK_JUSTIFY_LEFT False False 0 0.5 0 0 0 False False True True True True 0 True * False 0 False False True True GTK_POLICY_ALWAYS GTK_POLICY_ALWAYS GTK_SHADOW_NONE GTK_CORNER_TOP_LEFT True True True False True GTK_JUSTIFY_LEFT GTK_WRAP_NONE True 0 0 0 0 0 0 0 True True True False 0 True Modified: False False GTK_JUSTIFY_LEFT False False 0.5 0.5 0 0 0 False False True False False GTK_JUSTIFY_LEFT False False 0.5 0.5 0 0 0 False False 0 False True False True True _Description True False GTK_JUSTIFY_LEFT False False 0.5 0.5 0 0 tab 0 True True False True Properties User GTK_WINDOW_TOPLEVEL GTK_WIN_POS_NONE False True False True False False GDK_WINDOW_TYPE_HINT_NORMAL GDK_GRAVITY_NORTH_WEST True True False 0 True GTK_BUTTONBOX_END True True True gtk-cancel True GTK_RELIEF_NORMAL True -6 True True True gtk-ok True GTK_RELIEF_NORMAL True -5 0 False True GTK_PACK_END True True True True GTK_POS_TOP False False 10 True 5 2 False 5 0 True User Name: False False GTK_JUSTIFY_LEFT False False 0 0.5 0 0 0 1 0 1 fill True Password: False False GTK_JUSTIFY_LEFT False False 0 0.5 0 0 0 1 1 2 fill True True False True 0 True * False 1 2 0 1 True True True False 0 True * False 1 2 1 2 True Allow Access Developer Applications: False False GTK_JUSTIFY_LEFT False False 0 0.5 0 0 0 1 4 5 fill True Allow Access Administrator Applications: False False GTK_JUSTIFY_LEFT False False 0 0.5 0 0 0 1 3 4 fill True Application Name: False False GTK_JUSTIFY_LEFT False False 0 0.5 0 0 0 1 2 3 fill True True True True 0 True * False 1 2 2 3 True True togglebutton1 True GTK_RELIEF_NORMAL True False False 1 2 3 4 fill True True togglebutton2 True GTK_RELIEF_NORMAL True False False 1 2 4 5 fill False True True _General True False GTK_JUSTIFY_LEFT False False 0.5 0.5 0 0 tab 10 True False 5 True Description: False False GTK_JUSTIFY_LEFT False False 0 0.5 0 0 0 False False True True True True 0 True * False 0 False False True True GTK_POLICY_ALWAYS GTK_POLICY_ALWAYS GTK_SHADOW_NONE GTK_CORNER_TOP_LEFT True True True False True GTK_JUSTIFY_LEFT GTK_WRAP_NONE True 0 0 0 0 0 0 0 True True True False 0 True Modified: False False GTK_JUSTIFY_LEFT False False 0.5 0.5 0 0 0 False False True False False GTK_JUSTIFY_LEFT False False 0.5 0.5 0 0 0 False False 0 False True False True True _Description True False GTK_JUSTIFY_LEFT False False 0.5 0.5 0 0 tab 0 True True False True Properties Application GTK_WINDOW_TOPLEVEL GTK_WIN_POS_NONE False True False True False False GDK_WINDOW_TYPE_HINT_NORMAL GDK_GRAVITY_NORTH_WEST True True False 0 True GTK_BUTTONBOX_END True True True gtk-cancel True GTK_RELIEF_NORMAL True -6 True True True gtk-ok True GTK_RELIEF_NORMAL True -5 0 False True GTK_PACK_END True True True True GTK_POS_TOP False False 10 True 4 2 False 5 0 True Application Name: False False GTK_JUSTIFY_LEFT False False 0 0.5 0 0 0 1 0 1 fill True Password: False False GTK_JUSTIFY_LEFT False False 0 0.5 0 0 0 1 1 2 fill True True False True 0 True * False 1 2 0 1 True True True True 0 True * False 1 2 1 2 True Application Type: False False GTK_JUSTIFY_LEFT False False 0 0.5 0 0 0 1 2 3 fill True Initial Logic Name: False False GTK_JUSTIFY_LEFT False False 0 0.5 0 0 0 1 3 4 fill True True True True 0 True * False 1 2 3 4 True 1 2 2 3 fill fill False True True _General True False GTK_JUSTIFY_LEFT False False 0.5 0.5 0 0 tab 10 True False 5 True Description: False False GTK_JUSTIFY_LEFT False False 0 0.5 0 0 0 False False True True True True 0 True * False 0 False False True True GTK_POLICY_ALWAYS GTK_POLICY_ALWAYS GTK_SHADOW_NONE GTK_CORNER_TOP_LEFT True True True False True GTK_JUSTIFY_LEFT GTK_WRAP_NONE True 0 0 0 0 0 0 0 True True True False 0 True Modified: False False GTK_JUSTIFY_LEFT False False 0.5 0.5 0 0 0 False False True False False GTK_JUSTIFY_LEFT False False 0.5 0.5 0 0 0 False False 0 False True False True True _Description True False GTK_JUSTIFY_LEFT False False 0.5 0.5 0 0 tab 0 True True False True About... GTK_WINDOW_TOPLEVEL GTK_WIN_POS_NONE False False False True False False GDK_WINDOW_TYPE_HINT_NORMAL GDK_GRAVITY_NORTH_WEST True True False 0 True GTK_BUTTONBOX_END True True True gtk-ok True GTK_RELIEF_NORMAL True -6 0 False True GTK_PACK_END 10 True True True True GTK_POS_TOP False False 5 True False 0 True <span foreground="yellow" background="#b82b11" face="arial" size="30000"><b> Pro</b><span foreground="white" background="#b82b11" face="arial" size="30000"><b><i>Linga </i></b></span></span> False True GTK_JUSTIFY_LEFT False False 0.5 0.5 0 0 5 False False True <big><big><big><big><b>ProLinga Administrator</b></big></big></big></big> False True GTK_JUSTIFY_LEFT False False 0.5 0.5 10 0 5 False False True ProLinga Administrator is a configuration tool for the ProLinga Runner. False True GTK_JUSTIFY_LEFT False False 0.5 0.5 10 0 5 False False True <small>(c) 2002-2009 The ProLinga Team.</small> False True GTK_JUSTIFY_LEFT False False 0.5 0.5 10 0 5 False False GTK_PACK_END False True True About False False GTK_JUSTIFY_LEFT False False 0.5 0.5 0 0 tab 10 True 4 2 False 15 5 True Default Configuration File: False False GTK_JUSTIFY_LEFT False False 0 0.5 0 0 0 1 3 4 fill True Compiled with Components: False False GTK_JUSTIFY_LEFT False False 0 0.5 0 0 0 1 2 3 fill True Version: False False GTK_JUSTIFY_LEFT False False 0 0.5 0 0 0 1 1 2 fill True False False GTK_JUSTIFY_LEFT False False 0 0.5 0 0 1 2 3 4 fill True False False GTK_JUSTIFY_LEFT False False 0 0.5 0 0 1 2 2 3 fill True False False GTK_JUSTIFY_LEFT False False 0 0.5 0 0 1 2 1 2 fill True <big><b>ProLinga Runner</b></big> False True GTK_JUSTIFY_LEFT False False 0 0.5 0 0 0 1 0 1 fill False True True Runner False False GTK_JUSTIFY_LEFT False False 0.5 0.5 0 0 tab True True GTK_POLICY_ALWAYS GTK_POLICY_ALWAYS GTK_SHADOW_NONE GTK_CORNER_TOP_LEFT 5 True True False False True GTK_JUSTIFY_LEFT GTK_WRAP_NONE False 5 5 0 5 5 0 Bas Driessen <bas.driessen@xobas.com> False True True Credits False False GTK_JUSTIFY_LEFT False False 0.5 0.5 0 0 tab 0 True True False 600 500 True ProLinga Administrator GTK_WINDOW_TOPLEVEL GTK_WIN_POS_CENTER False True False True False False GDK_WINDOW_TYPE_HINT_NORMAL GDK_GRAVITY_NORTH_WEST True False 0 True True _File True True _Logout True True gtk-quit True True _Edit True True gtk-cut True True gtk-copy True True gtk-paste True True gtk-delete True True _View True True _Help True True _About True 0 False False True GTK_ORIENTATION_HORIZONTAL GTK_TOOLBAR_BOTH True True True True True False True True gtk-quit True GTK_RELIEF_NORMAL True False False 0 False False True True True True GTK_POS_TOP False False True False 0 5 True True GTK_POLICY_ALWAYS GTK_POLICY_ALWAYS GTK_SHADOW_NONE GTK_CORNER_TOP_LEFT 10 True True True False False True 0 True True True GTK_BUTTONBOX_START 0 True True True gtk-add True GTK_RELIEF_NORMAL True True True True gtk-properties True GTK_RELIEF_NORMAL True True True True gtk-remove True GTK_RELIEF_NORMAL True 0 False True False True True _User True False GTK_JUSTIFY_LEFT False False 0.5 0.5 0 0 tab True False 0 5 True True GTK_POLICY_ALWAYS GTK_POLICY_ALWAYS GTK_SHADOW_NONE GTK_CORNER_TOP_LEFT 10 True True True False False True 0 True True True GTK_BUTTONBOX_START 0 True True True gtk-add True GTK_RELIEF_NORMAL True True True True gtk-properties True GTK_RELIEF_NORMAL True True True True gtk-remove True GTK_RELIEF_NORMAL True 0 False True False True True _Application True False GTK_JUSTIFY_LEFT False False 0.5 0.5 0 0 tab True False 0 5 True 0 0.5 GTK_SHADOW_ETCHED_IN 10 True 2 2 False 5 0 True True Value: False False GTK_JUSTIFY_LEFT False False 0 0.5 0 0 0 1 0 1 fill True False Value: False False GTK_JUSTIFY_LEFT False False 0 0.5 0 0 0 1 1 2 fill True True True True 0 True * False 1 2 0 1 True True True True 0 True * False 1 2 1 2 True False False GTK_JUSTIFY_LEFT False False 0.5 0.5 0 0 label_item 0 True True 5 True GTK_BUTTONBOX_END 0 True True True gtk-apply True GTK_RELIEF_NORMAL True 0 False True False True True _System True False GTK_JUSTIFY_LEFT False False 0.5 0.5 0 0 tab 0 True True True True 0 False False False True Add Application GTK_WINDOW_TOPLEVEL GTK_WIN_POS_NONE False True False True False False GDK_WINDOW_TYPE_HINT_NORMAL GDK_GRAVITY_NORTH_WEST True True False 0 True GTK_BUTTONBOX_END True True True gtk-cancel True GTK_RELIEF_NORMAL True -6 True True True gtk-ok True GTK_RELIEF_NORMAL True -5 0 False True GTK_PACK_END True True True True GTK_POS_TOP False False 10 True 4 2 False 5 0 True Application Name: False False GTK_JUSTIFY_LEFT False False 0 0.5 0 0 0 1 0 1 fill True Password: False False GTK_JUSTIFY_LEFT False False 0 0.5 0 0 0 1 1 2 fill True True True True 0 True * False 1 2 0 1 True True True True 0 True * False 1 2 1 2 True Application Type: False False GTK_JUSTIFY_LEFT False False 0 0.5 0 0 0 1 2 3 fill True Initial Logic Name: False False GTK_JUSTIFY_LEFT False False 0 0.5 0 0 0 1 3 4 fill True True True True 0 True * False 1 2 3 4 True 1 2 2 3 fill fill False True True _General True False GTK_JUSTIFY_LEFT False False 0.5 0.5 0 0 tab 10 True False 5 True Description: False False GTK_JUSTIFY_LEFT False False 0 0.5 0 0 0 False False True True True True 0 True * False 0 False False True True GTK_POLICY_ALWAYS GTK_POLICY_ALWAYS GTK_SHADOW_NONE GTK_CORNER_TOP_LEFT True True True False True GTK_JUSTIFY_LEFT GTK_WRAP_NONE True 0 0 0 0 0 0 0 True True True False 0 True Modified: False False GTK_JUSTIFY_LEFT False False 0.5 0.5 0 0 0 False False True False False GTK_JUSTIFY_LEFT False False 0.5 0.5 0 0 0 False False 0 False True False True True _Description True False GTK_JUSTIFY_LEFT False False 0.5 0.5 0 0 tab 0 True True False True ProLinga Logon GTK_WINDOW_TOPLEVEL GTK_WIN_POS_CENTER_ON_PARENT False True False True False False GDK_WINDOW_TYPE_HINT_NORMAL GDK_GRAVITY_NORTH_WEST True True False 0 True <b><span size="large" >Welcome to ProLinga.</span></b> False True GTK_JUSTIFY_LEFT False False 0.5 0.5 0 0 PANGO_ELLIPSIZE_NONE -1 False 0 30 False False True True 0 False False GTK_PACK_END 10 True 0 0.5 GTK_SHADOW_ETCHED_IN 10 True 5 2 False 5 0 True Number of Threads: False False GTK_JUSTIFY_LEFT False False 0 0.5 0 0 PANGO_ELLIPSIZE_NONE -1 False 0 0 1 4 5 fill True Port Number: False False GTK_JUSTIFY_LEFT False False 0 0.5 0 0 PANGO_ELLIPSIZE_NONE -1 False 0 0 1 3 4 fill True Host Name: False False GTK_JUSTIFY_LEFT False False 0 0.5 0 0 PANGO_ELLIPSIZE_NONE -1 False 0 0 1 2 3 fill True False False GTK_JUSTIFY_LEFT False False 0 0.5 0 0 PANGO_ELLIPSIZE_NONE -1 False 0 1 2 4 5 fill True False False GTK_JUSTIFY_LEFT False False 0 0.5 0 0 PANGO_ELLIPSIZE_NONE -1 False 0 1 2 3 4 fill True False False GTK_JUSTIFY_LEFT False False 0 0.5 0 0 PANGO_ELLIPSIZE_NONE -1 False 0 1 2 2 3 fill True False False GTK_JUSTIFY_LEFT False False 0 0.5 0 0 PANGO_ELLIPSIZE_NONE -1 False 0 1 2 0 2 fill True Repository Service Id: False False GTK_JUSTIFY_LEFT False False 0 0.5 0 0 PANGO_ELLIPSIZE_NONE -1 False 0 0 1 0 2 fill True Connection Details False False GTK_JUSTIFY_LEFT False False 0.5 0.5 0 0 PANGO_ELLIPSIZE_NONE -1 False 0 label_item 0 False False 10 True 0 0.5 GTK_SHADOW_ETCHED_IN 10 True 4 2 False 5 0 True User Name: False False GTK_JUSTIFY_LEFT False False 0 0.5 0 0 PANGO_ELLIPSIZE_NONE -1 False 0 0 1 0 1 fill True User Password: False False GTK_JUSTIFY_LEFT False False 0 0.5 0 0 PANGO_ELLIPSIZE_NONE -1 False 0 0 1 1 2 fill True Application Name: False False GTK_JUSTIFY_LEFT False False 0 0.5 0 0 PANGO_ELLIPSIZE_NONE -1 False 0 0 1 2 3 fill True Application Password: False False GTK_JUSTIFY_LEFT False False 0 0.5 0 0 PANGO_ELLIPSIZE_NONE -1 False 0 0 1 3 4 fill True True True True 0 True * False 1 2 0 1 True True True False 0 True * False 1 2 1 2 True True True True 0 True * False 1 2 2 3 True True True False 0 True * False 1 2 3 4 True Login Details False False GTK_JUSTIFY_LEFT False False 0.5 0.5 0 0 PANGO_ELLIPSIZE_NONE -1 False 0 label_item 0 False False True GTK_BUTTONBOX_END 0 True True True True gtk-close True GTK_RELIEF_NORMAL True True True True True gtk-ok True GTK_RELIEF_NORMAL True 0 True False False 2005-06-28T10:47:01Z True Logon Incorrect. GTK_WINDOW_TOPLEVEL GTK_WIN_POS_CENTER_ALWAYS False True False True False False GDK_WINDOW_TYPE_HINT_NORMAL GDK_GRAVITY_NORTH_WEST True 10 True False 0 10 True False 0 True gtk-cancel 4 0.5 0.5 0 0 10 False True True Logon Incorrect. Please try again. False False GTK_JUSTIFY_LEFT False False 0.5 0.5 0 0 PANGO_ELLIPSIZE_NONE -1 False 0 0 False False 0 True False 5 True GTK_BUTTONBOX_END 0 True True True gtk-close True GTK_RELIEF_NORMAL True 0 False True True True 0 False False GTK_PACK_END False 2005-06-29T12:57:38Z True window1 GTK_WINDOW_TOPLEVEL GTK_WIN_POS_NONE False True False True False False GDK_WINDOW_TYPE_HINT_NORMAL GDK_GRAVITY_NORTH_WEST True True 53 27 True True button1 True GTK_RELIEF_NORMAL True 56 72 False 2005-07-01T01:12:15Z 400 150 True Direct Connect GTK_WINDOW_TOPLEVEL GTK_WIN_POS_CENTER_ALWAYS False True False True False False GDK_WINDOW_TYPE_HINT_NORMAL GDK_GRAVITY_NORTH_WEST True 5 True False 5 True Press the 'Connect' button to start the logon validation process. False False GTK_JUSTIFY_LEFT True False 0.5 0.5 0 0 PANGO_ELLIPSIZE_NONE -1 False 0 0 True False True GTK_BUTTONBOX_END 0 True True True True C_onnect True GTK_RELIEF_NORMAL True True True True gtk-close True GTK_RELIEF_NORMAL True 0 False False True True 0 False False False 2005-07-01T02:13:05Z True Password User GTK_WINDOW_TOPLEVEL GTK_WIN_POS_CENTER_ALWAYS False True False True False False GDK_WINDOW_TYPE_HINT_NORMAL GDK_GRAVITY_NORTH_WEST True True True False 0 True GTK_BUTTONBOX_END True True True gtk-cancel True GTK_RELIEF_NORMAL True -6 True True True True gtk-ok True GTK_RELIEF_NORMAL True -5 0 False True GTK_PACK_END 5 True False 0 True Enter User Password False False GTK_JUSTIFY_LEFT False False 0.5 0.5 0 0 PANGO_ELLIPSIZE_NONE -1 False 0 5 False False True True True True 0 True * True 6 True True 0 True True False 2005-07-01T02:20:48Z True Password Application GTK_WINDOW_TOPLEVEL GTK_WIN_POS_CENTER_ALWAYS False True False True False False GDK_WINDOW_TYPE_HINT_NORMAL GDK_GRAVITY_NORTH_WEST True True True False 0 True GTK_BUTTONBOX_END True True True gtk-cancel True GTK_RELIEF_NORMAL True -6 True True True True gtk-ok True GTK_RELIEF_NORMAL True -5 0 False True GTK_PACK_END 5 True False 0 True Enter Application Password False False GTK_JUSTIFY_LEFT False False 0.5 0.5 0 0 PANGO_ELLIPSIZE_NONE -1 False 0 5 False False True True True True 0 True * True 6 True True 0 True True False 2005-07-01T02:55:24Z True False System record System wide Settings ApplicationRepository Application Definition Application Definition Table. Application RepositoryObject True Ascending True
UserRepository User definition. User definition Table. User RepositoryObject True Ascending True
SystemRepository System Definition System Definition Table. System RepositoryObject True Ascending
False False Guest User. Guest User to access end user applications. Administrator True False Administrator User. Developer True True Developer User. Name ApplicationName Accept UserName UserName UserPassword ApplicationName ApplicationPassword