[Templates]
$WeekPlanAttr = check(26,152,133),deny(229,229,229)
$Border_Sep_Grey = sz(p,1) a(la) bg("KtsTableSeparator") rs(0,0)
$Border_Sep_Blue = sz(p,1) a(la) bg("KtsTableSeparator_Blue") rs(0,0)
$ParCtlEx_ChartUsageElem = t(chartseries) mg(3) bg("ChartBg")
$ParCtlMainWindow_StatCol_Width = 250
; кнопки для ToolBar
$ToolbarBtn = a(ac) at(chklike) sz(22,22) mg(3,,,3) xy(1) bg(ctl.selected ? "ToolBarItemPressed" : (ctl.hotlight ? "ToolBarItemHilight" : ""))
[MainWindow_Body.ParCtl]
@ = $TaskTab ext(1) at(enum) alias(task) ns(ParCtl) ontimer(10000, if(repopulateSettingsUserAccounts(ser(users)), (ctl.UserList.reinit();ctl.updatedata()) )) h(25657)
Header = a(lt) f("Header6KGreen") xy(-1) text($ParCtl)
InfoIcon = $TaskInfoIcon onclick(url($HelpURLSettingsParCtl))
TaskSep = $TaskSep_Temp
Descr = at(readonly,noborder,nofocus) f("Description") a(la) xy(,,,9)
UserList = [MainWindow_Body.ParCtl.UserList]
footer = [MainWindow_Body.ParCtl.UserList.Footer] visible(ctl.parent.UserList.getTotalPages() > 1)
[MainWindow_Body.ParCtl.UserList.Footer]
@ = sz(a,15) a(cb)
Prev = a(lc) at(btnlike) i("ParCtlArrows,2") enable(ctl.parent.UserList.isPrevEnabled()) onclick(ctl.parent.UserList.doPrev())
Text = a(ac) xy(9,,10,) f("Header0Light")
Next = a(ac) at(btnlike) i("ParCtlArrows,0") enable(ctl.parent.UserList.isNextEnabled()) onclick(ctl.parent.UserList.doNext())
[MainWindow_Body.ParCtl.UserList]
@ = t(itemslist) a(la) v(users) id("UserId") sz(p,p) filter("UserId!=\".DEFAULT\"&&UserId!=\".CHILD\"&&UserId!=\".TEENAGER\"")
row = [MainWindow_Body.ParCtl.Users_List_Row]
[MainWindow_Body.ParCtl.Users_List_Row]
@ = a(la) sz(p,a) at(btnlike) mg(,10) bg(ctl.selected ? "HilightBtn_sel" : (ctl.hotlight ? "HilightBtn" : "")) ns(users.find("UserId=="+toExpr(ctl.id)).settings) \
onclick( f_ParCtl_ShowWindow("Settings", ctl.id) )
Icon = sz(a,a) xy(10) i(depend(users);s_ParCtlEx_UserAvatarId2Image(f_ParCtlEx_GetUserAvatar(ctl.parent.id)))
Cont = [MainWindow_Body.ParCtl.Users_List_Row_Cont]
Check = a(ls) sz(a,a) xy(375,) at(btnlike) i(depend(Enabled) ? s_Ico(#ICO_PCSW_ON) : s_Ico(#ICO_PCSW_OFF)) onclick( f_Check_ParctlFirstStartDialog(); Enabled = !Enabled))
[MainWindow_Body.ParCtl.Users_List_Row_Cont]
@ = a(as) sz(a,a) xy(15,10) oninit(ctl.setTimeRange(ctl.parent.id, 0, 0, 0)) alias(statex) prm("ParCtl:" + serid("ParentalControlCommonReportStatistics")) ns(ctl.ser("ParentalControlCommonReportStatistics"))
Name = sz(a,a) a(lt) f("Header3KGreenLite") text(depend(f_UserName(ctl.parent.parent.id)))
LastViolation= sz(a,a) a(la) xy(,9) t(richtext) f("KtsDescriptionDGrey")
;---------- ParCtlMainWindow ------------------
[ParCtlMainWindow]
$prmOnInit = oninit( if(!productData("DisableParctlNoPasswordDialog") && (!AskForParCtl || !EnablePswrdProtect),dialog("ParctlFirstStartDialog")) )
$prmFooter = [DialogPanel] sz(p,42) mg(6,,8) subst( Bckgnd(use(0)) ResizeBackground(use(0)) Sep(use(0)) Help(use(1)) )
@ = [StyledWindowT] at(dragable,a_close,minimizable,customfooter) alias(task) ns(ParCtl) subst( BodyEx( [ParCtlMainWindow_BodyEx] ) Footer( $prmFooter ) ) $prmOnInit
[ParCtlMainWindow_BodyEx]
Header = [ParCtlMainWindow_Header]
Body = [ParCtlMainWindow_Body]
[ParCtlMainWindow_Header]
@ = sz(p,54)
hdr = [ProductHeader] sz(p,p) subst(Sep(use(0)) Bg(use(0)) _rs(use(0)) Logo(use(1) xy(5,21) bg("titledsc_parctl")) ) extprm(1)
AlphaWarning = sz(a,a) a(ct) f("Header0") use(!$IsRelease) text($AlphaWarning)
[ParCtlMainWindow_Body]
@ = sz(p,p) xy(,12,,$DialogPanelSizeY) alias(navigator2) pages(Area) a(lt) ontimer(10000, if(repopulateSettingsUserAccounts(ser(users)), updatedata()))
Navigator = [ParCtlMainWindow_Navigator]
Area = [ParCtlMainWindow_Body_Area] a(at) sz(p,p) mg(15,15,15,15) bg("ColorWindow")
Top = a(st) sz(p,5) bg("WizardTabTop")
Bottom = a(sb) sz(p,5) bg("WizardTabBottom")
[ParCtlMainWindow_Navigator]
@ = sz(a,p) xy(12) order(0) at(enum)
Border = a(rt) sz(5,p) xy(,5,,5) bg("WizardTabLeft")
Users = [MainWindow_Navigator_Button] a(lt) xy(,63) subst(Icon(i("ParCtlTabUsers") xy(11,4,3)) Text() Desc())
Stat = [MainWindow_Navigator_Button] subst(Icon(i("ParCtlTabStat") xy(11,4,3)) Text() Desc())
Topleft = a(rt) sz(5,5) bg("WizardTabTL")
BottomLeft = a(rb) sz(5,5) bg("WizardTabBL")
[ParCtlMainWindow_Body_Area]
$AreaItem = sz(p,p) mg(,0)
Stat = [ParCtlMainWindow_Body_Area_Stat] $AreaItem
Users = [ParCtlMainWindow_Body_Area_Users] $AreaItem
[ParCtlMainWindow_Body_Area_Stat]
Header = [InfoLink] subst(Text(f("Header4Lite")) Icon(onclick(url($ParentalControlURL)))) xy(-1) extprm(1)
Descr = f("KtsDescriptionGrey") a(la) extprm(1)
User = [ParCtlMainWindow_Body_Area_Stat_User] xy(,15) a(la)
PeriodSwitch = [MainThreats_Tab_Statistics_Line] a(la) xy(,20) subst(IsChange(+onchange(ctl.parent.Body.setTimeRange(ctl.parent.User.Id.value, ctl.PeriodBegin.value, ctl.PeriodEnd.value, f_ParCtlEx_GetStatRangePeriod(ctl.PeriodType.value)))) ) use(1)
Body = [ParCtlMainWindow_Body_Area_Stat_Body] a(la) xy(,10)
[ParCtlMainWindow_Body_Area_Stat_User]
@ = sz(p,a) a(la)
Avatar = i(s_ParCtlEx_UserAvatarId2Image(f_ParCtlEx_GetUserAvatar(ctl.Id.value))) sz(a,a)
Id = t(combo) a(lt) xy(70) at(sorted) f("Header0") sz(240,a) items(vector(users) v(UserId) text(if(UserId!=".DEFAULT"&&UserId!=".CHILD"&&UserId!=".TEENAGER", f_UserName(UserId)))) onchange(ctl.PeriodSwitch.PeriodBegin.setchanged())
Descr = [ValueA] a(la) xy(70,5) subst(Name(f("KtsDescriptionDGrey")) Val(f("KtsHeader0") text(s_ParCtlEx_User_Enabled(users.ser().findSettingsUserAccount(ctl.Id.value).settings.Enabled))) )
FullReport = $LinkKL a(sb) text($LinkFullReport) onclick(window("ParCtlUserReport", p_User(ctl.Id.value)))
[ParCtlMainWindow_Body_Area_Stat_Body]
@ = sz(p,a) at(enum, rememberdata) alias(statex) prm("ParCtl:" + serid("InternetUsageControlReportStatistics"), serid("WebSiteControlReportStatistics"), serid("FileDownloadControlReportStatistics"), serid("InstantMessangerControlReportStatistics"), serid("ComputerControlReportStatistics"), serid("AppControlReportStatistics"))
Internet = [ParCtlUserReport_MainStat_ItemT] subst(Name(i("ParCtlExAll16,0")) Body([ParCtlMainWindow_Body_Area_Stat_Body_Internet]) Body2([ParCtlMainWindow_Body_Area_Stat_Body_InternetSel]) BodyEx([ParCtlMainWindow_Body_Area_Stat_Body_InternetEx]) )
Communication = [ParCtlUserReport_MainStat_ItemT] subst(Name(i("ParCtlExAll16,1")) Body([ParCtlMainWindow_Body_Area_Stat_Body_Communication]) Body2([ParCtlMainWindow_Body_Area_Stat_Body_CommunicationSel]) BodyEx([ParCtlMainWindow_Body_Area_Stat_Body_CommunicationEx]) )
Computer = [ParCtlUserReport_MainStat_ItemT] subst(Name(i("ParCtlExAll16,2")) Body([ParCtlMainWindow_Body_Area_Stat_Body_Computer] visible(1)) Body2(use(0)) BodyEx([ParCtlMainWindow_Body_Area_Stat_Body_ComputerEx]) )
[ParCtlMainWindow_Body_Area_Stat_Body_Internet]
Col1 = [ParCtlMainWindow_Body_Area_Stat_Body_Internet_Col1] a(lt) sz(p,a) rs(50,0)
Col2 = [ParCtlMainWindow_Body_Area_Stat_Body_Internet_Col2] a(at) sz(p,a) xy(14)
[ParCtlMainWindow_Body_Area_Stat_Body_InternetSel]
Col1 = [ParCtlMainWindow_Body_Area_Stat_Body_Internet_Col1] a(lt) sz(p,a) rs(50,0) subst(DomainsBlocked(use(0)))
[ParCtlMainWindow_Body_Area_Stat_Body_Internet_Col1]
@ = ext(1)
Duration = [ValueA] a(la) subst(Name(f("KtsDescriptionDGrey")) Val(f("KtsHeader0") text(timestamp(ctl.ser("InternetUsageControlReportStatistics").TotalTime))) ) xy(,,,6)
DomainsBlocked = [ValueA] a(la) subst(Name(f("KtsDescriptionDGrey")) Val(f("KtsHeader0") text(ctl.ser("WebSiteControlReportStatistics").CriticalCount)) ) extprm(1)
[ParCtlMainWindow_Body_Area_Stat_Body_Internet_Col2]
@ = ext(1)
Dummy = [ValueA] xy(,,,6) extprm(1)
FilesBlocked = [ValueA] a(la) subst(Name(f("KtsDescriptionDGrey")) Val(f("KtsHeader0") text(ctl.ser("FileDownloadControlReportStatistics").CriticalCount)) )
[ParCtlMainWindow_Body_Area_Stat_Body_InternetEx]
Col1 = [ParCtlMainWindow_Body_Area_Stat_Body_InternetEx_Col1] a(la) sz(p,a) rs(50,0)
Col2 = [ParCtlMainWindow_Body_Area_Stat_Body_InternetEx_Col2] a(as) sz(p,a) xy(14)
[ParCtlMainWindow_Body_Area_Stat_Body_InternetEx_Col1]
@ = ns(ctl.ser("WebSiteControlReportStatistics"))
Total = [Value] a(la) subst(Name(f("KtsDescriptionDGrey")) Val(f("KtsHeader0") text(Count)) )
Sep = a(la) sz(p,2) bg("ParctlSeparator") xy(,7,,7)
Top1 = [Value] a(la) subst(Name(sz(190,a) at(singleline) f("KtsDescriptionDGrey") text("1. " + Domains[0].Domain)) Val(f("KtsDescriptionDGrey") text(Domains[0].Count)) ) visible(Domains.size() >= 1)
Top2 = [Value] a(la) subst(Name(sz(190,a) at(singleline) f("KtsDescriptionDGrey") text("2. " + Domains[1].Domain)) Val(f("KtsDescriptionDGrey") text(Domains[1].Count)) ) visible(Domains.size() >= 2)
Top3 = [Value] a(la) subst(Name(sz(190,a) at(singleline) f("KtsDescriptionDGrey") text("3. " + Domains[2].Domain)) Val(f("KtsDescriptionDGrey") text(Domains[2].Count)) ) visible(Domains.size() >= 3)
Sep2 = a(la) sz(0,4)
Other = [Value] a(la) subst(Name(f("KtsDescriptionDGrey")) Val(f("KtsDescriptionDGrey") text(Count-Domains[0].Count-Domains[1].Count-Domains[2].Count)) ) visible(Domains.size() >= 4)
Blocked = [Value] a(la) subst(Name(f("KtsDescriptionDGrey")) Val(f("KtsDescriptionDGrey") text(CriticalCount)) )
[ParCtlMainWindow_Body_Area_Stat_Body_InternetEx_Col2]
@ = ns(ctl.ser("FileDownloadControlReportStatistics"))
Total = [Value] a(la) subst(Name(f("KtsDescriptionDGrey")) Val(f("KtsHeader0") text(Count)) )
Sep = a(la) sz(p,2) bg("ParctlSeparator") xy(,7,,7)
Top1 = [Value] a(la) subst(Name(sz(190,a) at(singleline) f("KtsDescriptionDGrey") text("1. " + Domains[0].Domain)) Val(f("KtsDescriptionDGrey") text(Domains[0].Count)) ) visible(Domains.size() >= 1)
Top2 = [Value] a(la) subst(Name(sz(190,a) at(singleline) f("KtsDescriptionDGrey") text("2. " + Domains[1].Domain)) Val(f("KtsDescriptionDGrey") text(Domains[1].Count)) ) visible(Domains.size() >= 2)
Top3 = [Value] a(la) subst(Name(sz(190,a) at(singleline) f("KtsDescriptionDGrey") text("3. " + Domains[2].Domain)) Val(f("KtsDescriptionDGrey") text(Domains[2].Count)) ) visible(Domains.size() >= 3)
Sep2 = a(la) sz(0,4)
Other = [Value] a(la) subst(Name(f("KtsDescriptionDGrey")) Val(f("KtsDescriptionDGrey") text(Count-Domains[0].Count-Domains[1].Count-Domains[2].Count)) ) visible(Domains.size() >= 4)
Blocked = [Value] a(la) subst(Name(f("KtsDescriptionDGrey")) Val(f("KtsDescriptionDGrey") text(CriticalCount)) )
[ParCtlMainWindow_Body_Area_Stat_Body_Communication]
@ = ns(ctl.ser("InstantMessangerControlReportStatistics"))
Col1 = [ParCtlMainWindow_Body_Area_Stat_Body_Communication_Col1] a(lt) sz(p,a) rs(50,0)
Col2 = [ParCtlMainWindow_Body_Area_Stat_Body_Communication_Col2] a(at) sz(p,a) xy(14)
[ParCtlMainWindow_Body_Area_Stat_Body_CommunicationSel]
@ = ns(ctl.ser("InstantMessangerControlReportStatistics"))
Col1 = [ParCtlMainWindow_Body_Area_Stat_Body_Communication_Col1] a(lt) sz(p,a) rs(50,0) subst(MsgBlocked(use(0)))
Col2 = [ParCtlMainWindow_Body_Area_Stat_Body_Communication_Col2] a(at) sz(p,a) xy(14)
[ParCtlMainWindow_Body_Area_Stat_Body_Communication_Col1]
@ = ext(1)
PersInfo = [ValueA] a(la) subst(Name(f("KtsDescriptionDGrey")) Val(f("KtsHeader0") text(PersonalInfo)) ) xy(,,,6)
MsgBlocked = [ValueA] a(la) subst(Name(f("KtsDescriptionDGrey")) Val(f("KtsHeader0") text(Critical)) ) extprm(1)
[ParCtlMainWindow_Body_Area_Stat_Body_Communication_Col2]
Keywords = [ValueA] a(la) subst(Name(f("KtsDescriptionDGrey")) Val(f("KtsHeader0") text(Keywords)) )
[ParCtlMainWindow_Body_Area_Stat_Body_CommunicationEx]
@ = ns(ctl.ser("InstantMessangerControlReportStatistics"))
Col1 = [ParCtlMainWindow_Body_Area_Stat_Body_CommunicationEx_Col1] a(lt) sz(p,a) rs(50,0)
[ParCtlMainWindow_Body_Area_Stat_Body_CommunicationEx_Col1]
Total = [Value] a(la) subst(Name(f("KtsDescriptionDGrey")) Val(f("KtsHeader0") text(Count)) )
Sep = a(la) sz(p,2) bg("ParctlSeparator") xy(,7,,7)
Top1 = [Value] a(la) subst(Name(sz(190,a) at(singleline) f("KtsDescriptionDGrey") text("1. " + f_ParCtlEx_GetIMContactName(UserName, Contacts[0].ContactId))) Val(f("KtsDescriptionDGrey") text(Contacts[0].MsgCount)) ) visible(Contacts.size() >= 1)
Top2 = [Value] a(la) subst(Name(sz(190,a) at(singleline) f("KtsDescriptionDGrey") text("2. " + f_ParCtlEx_GetIMContactName(UserName, Contacts[1].ContactId))) Val(f("KtsDescriptionDGrey") text(Contacts[1].MsgCount)) ) visible(Contacts.size() >= 2)
Top3 = [Value] a(la) subst(Name(sz(190,a) at(singleline) f("KtsDescriptionDGrey") text("3. " + f_ParCtlEx_GetIMContactName(UserName, Contacts[2].ContactId))) Val(f("KtsDescriptionDGrey") text(Contacts[2].MsgCount)) ) visible(Contacts.size() >= 3)
Sep2 = a(la) sz(0,4)
Other = [Value] a(la) subst(Name(f("KtsDescriptionDGrey")) Val(f("KtsDescriptionDGrey") text(Count-Contacts[0].MsgCount-Contacts[1].MsgCount-Contacts[2].MsgCount)) ) visible(Contacts.size() >= 4)
Blocked = [Value] a(la) subst(Name(f("KtsDescriptionDGrey")) Val(f("KtsDescriptionDGrey") text(Critical)) )
[ParCtlMainWindow_Body_Area_Stat_Body_Computer]
Col1 = [ParCtlMainWindow_Body_Area_Stat_Body_Computer_Col1] a(lt) sz(p,a) rs(50,0)
Col2 = [ParCtlMainWindow_Body_Area_Stat_Body_Computer_Col2] a(at) sz(p,a) xy(14)
[ParCtlMainWindow_Body_Area_Stat_Body_Computer_Col1]
Duration = [ValueA] a(la) subst(Name(f("KtsDescriptionDGrey")) Val(f("KtsHeader0") text(timestamp(ctl.ser("ComputerControlReportStatistics").TotalTime))) ) xy(,,,6)
[ParCtlMainWindow_Body_Area_Stat_Body_Computer_Col2]
AppBlocked = [ValueA] a(la) subst(Name(f("KtsDescriptionDGrey")) Val(f("KtsHeader0") text(ctl.ser("AppControlReportStatistics").CriticalCount)) ) xy(,,,6)
[ParCtlMainWindow_Body_Area_Stat_Body_ComputerEx]
@ = ns(ctl.ser("AppControlReportStatistics"))
Col1 = [ParCtlMainWindow_Body_Area_Stat_Body_ComputerEx_Col1] a(lt) sz(p,a) rs(50,0)
Col2 = [ParCtlMainWindow_Body_Area_Stat_Body_ComputerEx_Col2] a(at) sz(p,a) xy(14)
[ParCtlMainWindow_Body_Area_Stat_Body_ComputerEx_Col1]
Total = [Value] a(la) subst(Name(f("KtsDescriptionDGrey")) Val(f("KtsDescriptionDGrey")) )
Sep = a(la) sz(p,2) bg("ParctlSeparator") xy(,7,,7)
Top1 = [Value] a(la) subst(Name(sz(190,a) at(singleline) f("KtsDescriptionDGrey") text("1. " + f_ParCtlEx_GetAUAppName(UserName, Apps[0].AppID))) Val(f("KtsDescriptionDGrey") text(timestamp(Apps[0].Duration)))) visible(Apps.size() >= 1)
Top2 = [Value] a(la) subst(Name(sz(190,a) at(singleline) f("KtsDescriptionDGrey") text("2. " + f_ParCtlEx_GetAUAppName(UserName, Apps[1].AppID))) Val(f("KtsDescriptionDGrey") text(timestamp(Apps[1].Duration)))) visible(Apps.size() >= 2)
Top3 = [Value] a(la) subst(Name(sz(190,a) at(singleline) f("KtsDescriptionDGrey") text("3. " + f_ParCtlEx_GetAUAppName(UserName, Apps[2].AppID))) Val(f("KtsDescriptionDGrey") text(timestamp(Apps[2].Duration)))) visible(Apps.size() >= 3)
Sep2 = a(la) sz(0,4)
Other = [Value] a(la) subst(Name(f("KtsDescriptionDGrey")) Val(f("KtsDescriptionDGrey") text(timestamp(Duration-Apps[0].Duration-Apps[1].Duration-Apps[2].Duration))) ) visible(Apps.size() >= 4)
[ParCtlMainWindow_Body_Area_Stat_Body_ComputerEx_Col2]
[ParCtlMainWindow_Body_Area_Users]
@ = ext(1) h(25657) onshow(ctl.UsersList.List.focus())
Header = [InfoLink] subst(Text(f("Header4Lite")) Icon(onclick(url($ParentalControlSettingsHelpURL)))) xy(-1) extprm(1)
Descr = f("KtsDescriptionGrey") a(la) extprm(1)
ParCtlStateDesc = f("KtsHeader1Lite") a(la) xy(,20)
ParCtlState = a(as) xy(2) f(state == #StateRunning ? "KtsHeader1Green" : "KtsHeader1Red") text(s_ParCtlEx_Enabled(state == #StateRunning))
ParCtlPausePlay = t(hotlink) sz(a,30) xy(-5,3) mg(6) f("Header3KGreenLite") i(state == #StateRunning?"ParCtlOptionsIcon,4" : "ParCtlOptionsIcon,6") a(la) bg(ctl.hotlight ? "HilightBtn" : "") onclick(if(state == #StateRunning,if(checkPassword(#pwdc_OpenParctl),setstate(#TASK_REQUEST_PAUSE, name)),setstate(#TASK_REQUEST_RUN, name)))
ParCtlStop = t(hotlink) sz(a,30) mg(6) f("Header3KGreenLite") i(ctl.enabled ? "ParCtlOptionsIcon,2" : "ParCtlOptionsIcon,3") a(as) enable(state == #StateRunning) bg(ctl.hotlight ? "HilightBtn" : "") onclick(if(state == #StateRunning,if(checkPassword(#pwdc_OpenParctl),(setstate(#TASK_REQUEST_STOP, name))))))
ToolBar = [ParCtlMainWindow_Body_Area_Users_ListArea_Toolbar] a(la) xy(,7)
UsersList = [ParCtlMainWindow_Body_Area_Users_ListArea] a(la) xy(,-1)
[ParCtlMainWindow_Body_Area_Users_ListArea_Toolbar]
$FindUser = users.find("UserId=="+toExpr(ctl.UsersList.List.seldata().UserId)).settings
@ = a(la) sz(p,a) enable(state == #StateRunning)
Left = a(lt) sz(a,a) bg("ToolbarGreenLeft")
Right = a(rt) sz(a,a) bg("ToolbarGreenRight")
Middle = a(lt) sz(p,a) xy(5,,5) bg("ToolbarGreenMiddle")
UserPlayStop = [ParCtlMainWindow.Label] a(lt) xy(8,3) subst(Icon(i( var pSett; pSett = $FindUser; (f_IsParCtlSettingsEnabled(pSett.Enabled) ? "ParCtlOptionsIcon,2" : "ParCtlOptionsIcon,6") )) Label(text(var pSett; pSett = $FindUser; s_ParCtlEx_Set_Enable(f_IsParCtlSettingsEnabled(pSett.Enabled)))) ) onclick(var pSett; pSett = $FindUser; pSett.Enabled = f_TryInvertParCtlSettings(pSett.Enabled); true) enable(ctl.UsersList.List.seldata())
UserSetup = [ParCtlMainWindow.Label] a(as) mg(2,0,0,0) subst(Icon(i( s_Ico(#ICO_PC_SETTING_16) )) Label(text()) ) onclick(ctl.UsersList.List.edit(dialog("ParCtlUserSettings"))) enable(ctl.UsersList.List.seldata())
UserReport = [ParCtlMainWindow.Label] a(as) mg(0,0,30,0) subst(Icon(i("report16")) Label(text()) ) onclick(window("ParCtlUserReport", $ModalIfRemote, p_User(ctl.UsersList.List.seldata().UserId))) enable(ctl.UsersList.List.seldata())
;; dialog development link UserReport2 = [ParCtlMainWindow.Label] subst(Icon(i("ParCtlExAll16,6")) Label(text()) ) xy(7) a(as) onclick(window("BrowseInstalledSoftwareDialog", p_User(ctl.UsersList.List.seldata().UserId)))
[ParCtlMainWindow_Body_Area_Users_ListArea]
@ = sz(p,p) enable(ctl.ToolBar.enabled)
List = [ParCtlMainWindow_Body_Area_Users_List]
[ParCtlMainWindow_Body_Area_Users_List]
@ = $List alias(vector) v(users) filter(UserId!=".DEFAULT"&&UserId!=".CHILD"&&UserId!=".TEENAGER") at(noheader,singlesel,nosearch) onshow(if(!ctl.selcount(),ctl.focus())) onfocus(l_CurrentUserId=UserId)
fakeRow = text(toupper(f_UserName(UserId))) sort(,sortup)
row = [ParCtlMainWindow_Body_Area_Users_List_Row]
[ParCtlMainWindow_Body_Area_Users_List_Row]
@ = sz(p,a) at(custom) mg(,10) bg(ctl.enabled && ctl.selected ? "SelectedListItem" : "White")
Icon = sz(a,a) xy(10) i(s_ParCtlEx_UserAvatarId2Image(f_ParCtlEx_GetUserAvatar(UserId)))
Name = sz(a,a) a(as) xy(15,10) i(s_ParCtlEx_ComponentEnabled_Icon(f_IsParCtlSettingsEnabled(settings.Enabled))) f("Header3KGreenLite") text(f_UserName(UserId))
UserControl = sz(a,a) a(sa) xy(,4) f("KtsDescriptionDGrey")
ControlState = sz(a,a) a(as) f(f_IsParCtlSettingsEnabled(settings.Enabled)? depend(ctl.parent.selected ? "KtsHeader0White" : "KtsHeader0Green"):"KtsHeader0Red") text(s_ParCtlEx_User_Enabled(f_IsParCtlSettingsEnabled(settings.Enabled)))
;MinVSize = sz(1,36) a(la) visible(ctl.parent.selected)
;---------- ParCtlUserSettings ------------------
;__DELETE__ - [ParCtlUserSettings] подлежит уничтожению
[ParCtlUserSettings]
@ = [StyledWindowT] at(dragable,a_ok,a_cancel) subst( BodyEx( [ParCtlUserSettings_BodyEx] ) ) sz(800,a) alias(settings) bg(isOsGuiThemed ? "ColorWindow" : "ColorWindowClassic")
[ParCtlUserSettings_BodyEx]
Header = sz(p,54)
Body = [ParCtlUserSettings_Body] ns(settings)
Export = t(hotlink) a(rt) xy(15,20) f("Header0") i("ParCtlExAll16,24") onclick(if(browsefilesave(l_SaveFilePath, $BrowseForConfig, "pctl"), (f_IfErrThenMsg(cfgParCtrlSave(l_SaveFilePath, UserId, ser(UserId)), "SettingsOperationError");true)))
Import = t(hotlink) a(ps) xy(10) f("Header0") i("ParCtlExAll16,23") onclick(if(dialog("ImportUserSettingsDialog"),true))
;;DebugWin1 = t(hotlink) a(as) xy(20) f("Header0White") i("ParCtlExAll16,24") onclick(dialog("ParCtlEx_InternetTerminateTimeoutWindow"))
;;DebugWin1 = t(hotlink) a(lt) xy(480,40) f("Header0White") i("ParCtlExAll16,23") onclick(dialog("ParCtlEx_AppTerminateTimeoutWindow"))
;;DebugWin2 = t(hotlink) a(as) xy(20) f("Header0White") i("ParCtlExAll16,24") onclick(dialog("ParCtlEx_ComputerTerminateTimeoutWindow"))
[ParCtlUserSettings_Body]
@ = $DlgBodyAttr sz(p,a) a(la) alias(navigator2) pages(WorkArea)
Navigator = [ParCtlUserSettings_Navigator]
SepVert = sz(1,p) a(as) b(SettingsVertSep) rs(0,0)
WorkArea = [ParCtlUserSettings_Navigator_WorkArea] a(at) mg(12,7)
[ParCtlUserSettings_Navigator]
$GroupHdr = f("Header0") sz(a,a) xy(,13,,7) a(la)
@ = onshow(ctl.top.Body.BodyEx.Body.WorkArea.Settings.Navigator.value = ctl.top.Body.ctlFind("BodyEx.Bdy.WorkArea.Report.Navigator").value,"from report") at(enum) sz(220,p) mg(7,7) rs(0,100) bg((isOsGuiThemed || true) ? "TopNavigator" : "ColorWindow")
AddView = [ParCtl_Navigator_Item] subst(Icon(i(s_ParCtlEx_ComponentEnabled_Icon(f_IsParCtlSettingsEnabled(Enabled)))) ) xy(,85)
ComputerUsage = [ParCtl_Navigator_Item] subst(Icon(i(s_ParCtlEx_ComponentEnabled_Icon(ComputerControl.Enabled))) ) xy(,8)
AppUsage = [ParCtl_Navigator_Item] subst(Icon(i(s_ParCtlEx_ComponentEnabled_Icon(AppControl.Enabled))) )
InternetUsage = [ParCtl_Navigator_Item] subst(Icon(i(s_ParCtlEx_ComponentEnabled_Icon(InternetControl.Enabled))) ) xy(,8)
WebContent = [ParCtl_Navigator_Item] subst(Icon(i(s_ParCtlEx_ComponentEnabled_Icon(WebControl.Enabled))) )
Download = [ParCtl_Navigator_Item] subst(Icon(i(s_ParCtlEx_ComponentEnabled_Icon(FileDownloadControl.Enabled))) )
IM_Usage = [ParCtl_Navigator_Item] subst(Icon(i(s_ParCtlEx_ComponentEnabled_Icon(IMControl.Enabled))) ) xy(,8)
SN_Usage = [ParCtl_Navigator_Item] subst(Icon(i(s_ParCtlEx_ComponentEnabled_Icon(SNControl.Enabled))) )
PersonalInfo = [ParCtl_Navigator_Item] subst(Icon(i(s_ParCtlEx_ComponentEnabled_Icon(PersonalInfo.Enabled))) )
Keywords = [ParCtl_Navigator_Item] subst(Icon(i(s_ParCtlEx_ComponentEnabled_Icon(Keywords.Enabled))) )
[ParCtlUserSettings_Navigator_WorkArea]
@ = sz(p,470) rs(100,100)
InternetUsage = [ParCtlUserSettings_Navigator_WorkArea_InternetUsage] sz(p,p)
WebContent = [ParCtlUserSettings_Navigator_WorkArea_WebContent] sz(p,p)
Download = [ParCtlUserSettings_Navigator_WorkArea_Download] sz(p,p)
SafeSearch = [ParCtlUserSettings_Navigator_WorkArea_SafeSearch] sz(p,p)
IM_Usage = [ParCtlUserSettings_Navigator_WorkArea_IM_Usage] sz(p,p)
SN_Usage = [ParCtlUserSettings_Navigator_WorkArea_SN_Usage] sz(p,p)
PersonalInfo = [ParCtlUserSettings_Navigator_WorkArea_PersonalInfo] sz(p,p)
Keywords = [ParCtlUserSettings_Navigator_WorkArea_Keywords] sz(p,p)
ComputerUsage = [ParCtlUserSettings_Navigator_WorkArea_ComputerUsage] sz(p,p)
AppUsage = [ParCtlUserSettings_Navigator_WorkArea_AppUsage] sz(p,p)
AddView = [ParCtlUserSettings_Navigator_WorkArea_AddView] sz(p,p)
;---------- ParCtlUserReport ------------------
[ParCtlUserReport]
@ = [StyledWindowT] at(dragable,resizable,minimizable,a_close) subst( BodyEx( [ParCtlUserReport_BodyEx] ) ) alias(task) ns(ParCtl) sz($TopWindows_Min_X,$TopWindows_Min_Y,800,556)
[ParCtlUserReport_BodyEx]
Header = [ProductHeader_Ex] sz(p,54)
Body = [ParCtlUserReport_Body]
[ProductHeader_Ex]
@ = sz(p,54) rs(0,0)
hdr = [ProductHeader] sz(p,54) extprm(1)
Descr = a(lc) sz(a,a) xy(220,0) f("SettingsDescr") at(singleline)
[ParCtlUserReport_Body]
@ = $DlgBodyAttr a(la) alias(navigator2) pages(WorkArea)
Navigator = [ParCtlUserReport_Navigator]
SepVert = sz(1,p) a(as) b(SettingsVertSep) rs(0,0)
WorkArea = sz(p,p) rs(100,100) a(at) mg(12,7,12,12)
[ParCtlUserReport_Navigator]
$GroupHdr = f("Header0") sz(a,a) xy(,13,,5) a(la)
@ = onshow(ctl.top.WorkArea.Report.Navigator.value = ctl.top.WorkArea.Settings.Navigator.value) at(enum) sz(220,p) mg(7,7) rs(0,100) ns(users.find("UserId == " + toExpr(p_User)).settings) bg((isOsGuiThemed || true) ? "TopNavigator" : "ColorWindow")
AddView = [ParCtl_Navigator_Item] subst(Icon(i(s_ParCtlEx_ComponentEnabled_Icon(f_IsParCtlSettingsEnabled(Enabled)))) ) xy(,85)
ComputerUsage = [ParCtl_Navigator_Item] subst(Icon(i(s_ParCtlEx_ComponentEnabled_Icon(ComputerControl.Enabled))) ) xy(,8)
AppUsage = [ParCtl_Navigator_Item] subst(Icon(i(s_ParCtlEx_ComponentEnabled_Icon(AppControl.Enabled))) )
InternetUsage = [ParCtl_Navigator_Item] subst(Icon(i(s_ParCtlEx_ComponentEnabled_Icon(InternetControl.Enabled))) ) xy(,8)
WebContent = [ParCtl_Navigator_Item] subst(Icon(i(s_ParCtlEx_ComponentEnabled_Icon(WebControl.Enabled))) )
Download = [ParCtl_Navigator_Item] subst(Icon(i(s_ParCtlEx_ComponentEnabled_Icon(FileDownloadControl.Enabled))) )
IM_Usage = [ParCtl_Navigator_Item] subst(Icon(i(s_ParCtlEx_ComponentEnabled_Icon(IMControl.Enabled))) ) xy(,8)
SN_Usage = [ParCtl_Navigator_Item] subst(Icon(i(s_ParCtlEx_ComponentEnabled_Icon(SNControl.Enabled))) )
PersonalInfo = [ParCtl_Navigator_Item] subst(Icon(i(s_ParCtlEx_ComponentEnabled_Icon(PersonalInfo.Enabled))) )
Keywords = [ParCtl_Navigator_Item] subst(Icon(i(s_ParCtlEx_ComponentEnabled_Icon(Keywords.Enabled))) )
;---------- ParCtl_Navigator_Item ------------------
[ParCtl_Navigator_Item]
@ = ext(1) a(la) xy(0,0,0,0) sz(p,23) at(radiolike) at(noowncontent) rs(0,0) bg(ctl.selected ? "GreenSel" : (ctl.hotlight? "GreenHotlight":"") )
Icon = sz(16,16) a(lc) xy(8,,,) extprm(1)
Sel = [ParCtl_Navigator_Item_Sel] a(a) extprm(1)
[ParCtl_Navigator_Item_Sel]
@ = ext(1) mg(4,5) a(lc) sz(p,a)
Text = text(ctl.parent.parent.text) f(ctl.parent.parent.selected ? "Normal_White" : "Normal") extprm(1)
;---------- ParCtlUserReport_MainStatItemT ---------------
[ParCtlUserReport_MainStat_ItemT]
@ = at(radiolike) sz(p,a) a(la) xy(,-1) bg("GroupBody") ext(1)
Header = [ParCtlUserReport_MainStat_ItemT_Header]
Body = sz(p,a) a(la) mg(30,7) xy(,-1) bg("GroupBody") visible(!ctl.parent.selected) extprm(1)
Body2 = sz(p,a) a(la) mg(30,7) xy(,-1) bg("GroupBody") visible(ctl.parent.selected) extprm(1)
BodyEx = sz(p,a) a(la) mg(30,7) xy(,-1) bg("GroupBody") visible(ctl.parent.selected) extprm(1)
[ParCtlUserReport_MainStat_ItemT_Header]
@ = sz(p,a) mg(7,7) bg("Chart11")
Name = a(lc) f("Header1") extprm(1)
Icon = a(rc) sz(16,16) bg(ctl.parent.parent.selected ? "Arrows,5" : "Arrows,4")
;---------- ParCtlUserReport_Navigator_WorkArea_PageT ---------------
[Templates]
$ParCtlUserReport_NoStat_PeriodSwitch_OnChange = +onchange(ctl.parent.parent.ListArea.List.setfilter(f_ParCtlEx_Events_PeriodFilter(ctl.PeriodBegin.value, ctl.PeriodEnd.value), 2))
$ParCtlUserReport_TimeSingle_PeriodSwitch_OnChange = +onchange(ctl.parent.parent.StatArea.Stat.setTimeRange(p_User, ctl.PeriodBegin.value, ctl.PeriodEnd.value); ctl.parent.parent.ListArea.List.setfilter(f_ParCtlEx_Events_PeriodFilter(ctl.PeriodBegin.value, ctl.PeriodEnd.value), 2))
$ParCtlUserReport_TimeRange_PeriodSwitch_OnChange = +onchange( \
var nPeriodDescritization; var nChartPeriod; \
debugTrace(ctl.PeriodBegin.value ,"BeginTime"); \
debugTrace(ctl.PeriodEnd.value ,"EndTime"); \
nPeriodDescritization = s_ParCtlEx_GetStatRangePeriod(ctl.parent.PeriodType.value);\
ctl.parent.parent.StatArea.Stat.Period.value = ctl.parent.PeriodType.value; \
ctl.parent.parent.StatArea.Stat.PeriodStart.value = ctl.PeriodBegin.value; \
ctl.parent.parent.StatArea.Stat.setTimeRange(p_User, ctl.PeriodBegin.value, ctl.PeriodEnd.value, nPeriodDescritization); \
ctl.parent.parent.ListArea.List.setfilter(f_ParCtlEx_EventsTimeRange_PeriodFilter(ctl.PeriodBegin.value, ctl.PeriodEnd.value), 2))
$ParCtlUserReport_TimeRange_PeriodSwitch_NoArea_OnChange = +onchange( \
var nPeriodDescritization; \
nPeriodDescritization = s_ParCtlEx_GetStatRangePeriod(ctl.parent.PeriodType.value);\
ctl.parent.parent.StatArea.Stat.setTimeRange(p_User, ctl.PeriodBegin.value, ctl.PeriodEnd.value, nPeriodDescritization) )
[ParCtlUserReport_Navigator_WorkArea_PageT]
@ = sz(p,p) ext(1)
Hdr = [ParCtlUserReport_Navigator_WorkArea_PageT_Hdr]
Body = [ParCtlUserReport_Navigator_WorkArea_PageT_Body] a(la) sz(p,p) rs(100,100)
[ParCtlUserReport_Navigator_WorkArea_PageT_Hdr]
@ = sz(p,a) xy(,,,10)
Title = f("Header6KGreen") text(ctl.top.ctlFind("Navigator." + ctl.parent.parent.id).text) extprm(1)
PeriodSwitch = [Statistics_Switch_Time] extprm(1) xy(,10)
[ParCtlUserReport_Navigator_WorkArea_PageT_Body]
StatArea = [ParCtlUserReport_Navigator_WorkArea_PageT_Body_StatArea] sz(p,a) rs(100,0) a(lb) extprm(1)
ListArea = [ParCtlUserReport_Navigator_WorkArea_PageT_Body_ListArea] sz(p,p) a(lp) extprm(1)
[ParCtlUserReport_Navigator_WorkArea_PageT_Body_StatArea]
@ = bg("ColorWindow")
Stat = sz(p,100) a(la) extprm(1)
[ParCtlUserReport_Navigator_WorkArea_PageT_Body_ListArea]
@ = b(System)
List = sz(p,p) a(la) at(rememberdata,noborder) filter(UserName == p_User) extprm(1)
Toolbar = [Grid.Toolbar.Template] a(lt) b() t(listtoolbar) subst( Add(use(0)) Edit(use(0)) Delete(use(0)) Other([ParCtlUserReport_Navigator_WorkArea_PageT_Body_ListArea_ActionsArea] xy(0) use(1) ) ) extprm(1)
[ParCtlUserReport_Navigator_WorkArea_PageT_Body_ListArea_ActionsArea]
@ = sz(p,p) rs(100,0)
SeverityFilter = [ParCtlUserReport_Navigator_WorkArea_SeverityFilterEx] a(rc) xy(4)
ListActions = a(lc) xy(2) extprm(1)
[ParCtlUserReport_Navigator_WorkArea_SeverityFilterEx]
$parToolbarBtnChoose = ctl.parent.parent.List.setfilter( if(ctl.Info.value,"Severity=="+#eParCtlEx_SeverityInfo,"false") + "||"+ if(ctl.Warn.value,"Severity=="+#eParCtlEx_SeverityWarning,"false") + "||"+ if(ctl.Crit.value,"Severity=="+#eParCtlEx_SeverityCritical,"false"), 1 )
@ = sz(a,a) oninit(ctl.Info.value=true;ctl.Warn.value=true;ctl.Crit.value=true)
Info = [TB_Button_ChkLike] subst(Icon(i(s_ParCtlEx_SeverityIcon(#eParCtlEx_SeverityInfo)))) onchange($parToolbarBtnChoose)
Warn = [TB_Button_ChkLike] subst(Icon(i(s_ParCtlEx_SeverityIcon(#eParCtlEx_SeverityWarning)))) onchange($parToolbarBtnChoose)
Crit = [TB_Button_ChkLike] subst(Icon(i(s_ParCtlEx_SeverityIcon(#eParCtlEx_SeverityCritical)))) onchange($parToolbarBtnChoose)
;---------- ParCtlUserReport_Navigator_WorkArea_TimeUsage_Stat ---------------
[ParCtlUserReport_Navigator_WorkArea_TimeUsage_Stat]
@ = ext(1) alias(statex) sz(p,a)
Period = $ValPrm
PeriodStart = $ValPrm
Header = a(ct) f("Header1") extprm(1)
SubHeader = a(la) sz(a,a) f("Description") xy(,4,,5) extprm(1)
Data = [ParCtlUserReport_Navigator_WorkArea_TimeUsage_Stat_Data] a(la) xy(,17) sz(p,110) rs(100,0)
[ParCtlUserReport_Navigator_WorkArea_TimeUsage_Stat_Data]
$tmpStatData = a(lt) xy(20,,,5)
$ctlPeriod = ctl.parent.Period.value
@ = sz(p,p)
YAxisDescr = a(lt) sz(a,p) ta(cb) f("Normal_Vert") at(singleline) text(s_YAxisDescr(ctl.parent.Period.value))
Day = $tmpStatData [ParCtlUserReport_Navigator_WorkArea_TimeUsage_ChartDay] visible( $ctlPeriod == #ePeriodDay)
Week = $tmpStatData [ParCtlUserReport_Navigator_WorkArea_TimeUsage_ChartWeek] visible( $ctlPeriod == #ePeriodWeek)
Month = $tmpStatData [ParCtlUserReport_Navigator_WorkArea_TimeUsage_ChartMonth] visible( $ctlPeriod == #ePeriodMonth)
Year = $tmpStatData [ParCtlUserReport_Navigator_WorkArea_TimeUsage_ChartYear] visible( $ctlPeriod == #ePeriodYear)
;XAxisDescr = a(lb) sz(p,a) ta(ct) text(s_XAxisDescr(ctl.parent.Period.value))
[ParCtlUserReport_Navigator_WorkArea_TimeUsage_ChartDay]
@ = $ChartStatPctrl sz(p,p) at(disable_auto_tt)
$GetPeriodStart = ctl.parent.parent.PeriodStart.value
;$GetPeriodStart = 0
RedZone = $ValPrm v(60 - 15)
Plot = t(chartplotarea)
AxisY = $ChartStatAxisY
AxisX = $ChartStatAxisX
Val_1 = $ParCtlEx_ChartUsageElem v(Descritization.at(0 )/60) tt(s_TTHour( $GetPeriodStart + 00*3600, Descritization.at(0 ))) text("00") ta(c)
Val_2 = $ParCtlEx_ChartUsageElem v(Descritization.at(1 )/60) tt(s_TTHour( $GetPeriodStart + 01*3600, Descritization.at(1 ))) text("01") ta(c)
Val_3 = $ParCtlEx_ChartUsageElem v(Descritization.at(2 )/60) tt(s_TTHour( $GetPeriodStart + 02*3600, Descritization.at(2 ))) text("02") ta(c)
Val_4 = $ParCtlEx_ChartUsageElem v(Descritization.at(3 )/60) tt(s_TTHour( $GetPeriodStart + 03*3600, Descritization.at(3 ))) text("03") ta(c)
Val_5 = $ParCtlEx_ChartUsageElem v(Descritization.at(4 )/60) tt(s_TTHour( $GetPeriodStart + 04*3600, Descritization.at(4 ))) text("04") ta(c)
Val_6 = $ParCtlEx_ChartUsageElem v(Descritization.at(5 )/60) tt(s_TTHour( $GetPeriodStart + 05*3600, Descritization.at(5 ))) text("05") ta(c)
Val_7 = $ParCtlEx_ChartUsageElem v(Descritization.at(6 )/60) tt(s_TTHour( $GetPeriodStart + 06*3600, Descritization.at(6 ))) text("06") ta(c)
Val_8 = $ParCtlEx_ChartUsageElem v(Descritization.at(7 )/60) tt(s_TTHour( $GetPeriodStart + 07*3600, Descritization.at(7 ))) text("07") ta(c)
Val_9 = $ParCtlEx_ChartUsageElem v(Descritization.at(8 )/60) tt(s_TTHour( $GetPeriodStart + 08*3600, Descritization.at(8 ))) text("08") ta(c)
Val_10 = $ParCtlEx_ChartUsageElem v(Descritization.at(9 )/60) tt(s_TTHour( $GetPeriodStart + 09*3600, Descritization.at(9 ))) text("09") ta(c)
Val_11 = $ParCtlEx_ChartUsageElem v(Descritization.at(10)/60) tt(s_TTHour( $GetPeriodStart + 10*3600, Descritization.at(10))) text("10") ta(c)
Val_12 = $ParCtlEx_ChartUsageElem v(Descritization.at(11)/60) tt(s_TTHour( $GetPeriodStart + 11*3600, Descritization.at(11))) text("11") ta(c)
Val_13 = $ParCtlEx_ChartUsageElem v(Descritization.at(12)/60) tt(s_TTHour( $GetPeriodStart + 12*3600, Descritization.at(12))) text("12") ta(c)
Val_14 = $ParCtlEx_ChartUsageElem v(Descritization.at(13)/60) tt(s_TTHour( $GetPeriodStart + 13*3600, Descritization.at(13))) text("13") ta(c)
Val_15 = $ParCtlEx_ChartUsageElem v(Descritization.at(14)/60) tt(s_TTHour( $GetPeriodStart + 14*3600, Descritization.at(14))) text("14") ta(c)
Val_16 = $ParCtlEx_ChartUsageElem v(Descritization.at(15)/60) tt(s_TTHour( $GetPeriodStart + 15*3600, Descritization.at(15))) text("15") ta(c)
Val_17 = $ParCtlEx_ChartUsageElem v(Descritization.at(16)/60) tt(s_TTHour( $GetPeriodStart + 16*3600, Descritization.at(16))) text("16") ta(c)
Val_18 = $ParCtlEx_ChartUsageElem v(Descritization.at(17)/60) tt(s_TTHour( $GetPeriodStart + 17*3600, Descritization.at(17))) text("17") ta(c)
Val_19 = $ParCtlEx_ChartUsageElem v(Descritization.at(18)/60) tt(s_TTHour( $GetPeriodStart + 18*3600, Descritization.at(18))) text("18") ta(c)
Val_20 = $ParCtlEx_ChartUsageElem v(Descritization.at(19)/60) tt(s_TTHour( $GetPeriodStart + 19*3600, Descritization.at(19))) text("19") ta(c)
Val_21 = $ParCtlEx_ChartUsageElem v(Descritization.at(20)/60) tt(s_TTHour( $GetPeriodStart + 20*3600, Descritization.at(20))) text("20") ta(c)
Val_22 = $ParCtlEx_ChartUsageElem v(Descritization.at(21)/60) tt(s_TTHour( $GetPeriodStart + 21*3600, Descritization.at(21))) text("21") ta(c)
Val_23 = $ParCtlEx_ChartUsageElem v(Descritization.at(22)/60) tt(s_TTHour( $GetPeriodStart + 22*3600, Descritization.at(22))) text("22") ta(c)
Val_24 = $ParCtlEx_ChartUsageElem v(Descritization.at(23)/60) tt(s_TTHour( $GetPeriodStart + 23*3600, Descritization.at(23))) text("23") ta(c)
[ParCtlUserReport_Navigator_WorkArea_TimeUsage_ChartWeek]
@ = $ChartStatPctrl sz(p,p) at(disable_auto_tt)
$GetPeriodStart = ctl.parent.parent.PeriodStart.value
RedZone = $ValPrm v(24 - 6)
Plot = t(chartplotarea)
AxisY = $ChartStatAxisY
AxisX = $ChartStatAxisX
Val_1 = $ParCtlEx_ChartUsageElem v(Descritization.at(0)/60) tt(s_TTWeek((firstdayofweek()+0)%7, Descritization.at(0))) ta(c)
Val_2 = $ParCtlEx_ChartUsageElem v(Descritization.at(1)/60) tt(s_TTWeek((firstdayofweek()+1)%7, Descritization.at(1))) ta(c)
Val_3 = $ParCtlEx_ChartUsageElem v(Descritization.at(2)/60) tt(s_TTWeek((firstdayofweek()+2)%7, Descritization.at(2))) ta(c)
Val_4 = $ParCtlEx_ChartUsageElem v(Descritization.at(3)/60) tt(s_TTWeek((firstdayofweek()+3)%7, Descritization.at(3))) ta(c)
Val_5 = $ParCtlEx_ChartUsageElem v(Descritization.at(4)/60) tt(s_TTWeek((firstdayofweek()+4)%7, Descritization.at(4))) ta(c)
Val_6 = $ParCtlEx_ChartUsageElem v(Descritization.at(5)/60) tt(s_TTWeek((firstdayofweek()+5)%7, Descritization.at(5))) ta(c)
Val_7 = $ParCtlEx_ChartUsageElem v(Descritization.at(6)/60) tt(s_TTWeek((firstdayofweek()+6)%7, Descritization.at(6))) ta(c)
[ParCtlUserReport_Navigator_WorkArea_TimeUsage_ChartMonth]
@ = $ChartStatPctrl sz(p,p) at(disable_auto_tt)
$GetPeriodStart = ctl.parent.parent.PeriodStart.value
RedZone = $ValPrm v(24 - 6)
Plot = t(chartplotarea)
AxisY = $ChartStatAxisY
AxisX = $ChartStatAxisX
Val_1 = $ParCtlEx_ChartUsageElem v(Descritization.at(0 )/60) tt(s_TTMonth( $GetPeriodStart + 00*24*3600, Descritization.at(0 ))) text("01") ta(c)
Val_2 = $ParCtlEx_ChartUsageElem v(Descritization.at(1 )/60) tt(s_TTMonth( $GetPeriodStart + 01*24*3600, Descritization.at(1 ))) text("02") ta(c)
Val_3 = $ParCtlEx_ChartUsageElem v(Descritization.at(2 )/60) tt(s_TTMonth( $GetPeriodStart + 02*24*3600, Descritization.at(2 ))) text("03") ta(c)
Val_4 = $ParCtlEx_ChartUsageElem v(Descritization.at(3 )/60) tt(s_TTMonth( $GetPeriodStart + 03*24*3600, Descritization.at(3 ))) text("04") ta(c)
Val_5 = $ParCtlEx_ChartUsageElem v(Descritization.at(4 )/60) tt(s_TTMonth( $GetPeriodStart + 04*24*3600, Descritization.at(4 ))) text("05") ta(c)
Val_6 = $ParCtlEx_ChartUsageElem v(Descritization.at(5 )/60) tt(s_TTMonth( $GetPeriodStart + 05*24*3600, Descritization.at(5 ))) text("06") ta(c)
Val_7 = $ParCtlEx_ChartUsageElem v(Descritization.at(6 )/60) tt(s_TTMonth( $GetPeriodStart + 06*24*3600, Descritization.at(6 ))) text("07") ta(c)
Val_8 = $ParCtlEx_ChartUsageElem v(Descritization.at(7 )/60) tt(s_TTMonth( $GetPeriodStart + 07*24*3600, Descritization.at(7 ))) text("08") ta(c)
Val_9 = $ParCtlEx_ChartUsageElem v(Descritization.at(8 )/60) tt(s_TTMonth( $GetPeriodStart + 08*24*3600, Descritization.at(8 ))) text("09") ta(c)
Val_10 = $ParCtlEx_ChartUsageElem v(Descritization.at(9 )/60) tt(s_TTMonth( $GetPeriodStart + 09*24*3600, Descritization.at(9 ))) text("10") ta(c)
Val_11 = $ParCtlEx_ChartUsageElem v(Descritization.at(10)/60) tt(s_TTMonth( $GetPeriodStart + 10*24*3600, Descritization.at(10))) text("11") ta(c)
Val_12 = $ParCtlEx_ChartUsageElem v(Descritization.at(11)/60) tt(s_TTMonth( $GetPeriodStart + 11*24*3600, Descritization.at(11))) text("12") ta(c)
Val_13 = $ParCtlEx_ChartUsageElem v(Descritization.at(12)/60) tt(s_TTMonth( $GetPeriodStart + 12*24*3600, Descritization.at(12))) text("13") ta(c)
Val_14 = $ParCtlEx_ChartUsageElem v(Descritization.at(13)/60) tt(s_TTMonth( $GetPeriodStart + 13*24*3600, Descritization.at(13))) text("14") ta(c)
Val_15 = $ParCtlEx_ChartUsageElem v(Descritization.at(14)/60) tt(s_TTMonth( $GetPeriodStart + 14*24*3600, Descritization.at(14))) text("15") ta(c)
Val_16 = $ParCtlEx_ChartUsageElem v(Descritization.at(15)/60) tt(s_TTMonth( $GetPeriodStart + 15*24*3600, Descritization.at(15))) text("16") ta(c)
Val_17 = $ParCtlEx_ChartUsageElem v(Descritization.at(16)/60) tt(s_TTMonth( $GetPeriodStart + 16*24*3600, Descritization.at(16))) text("17") ta(c)
Val_18 = $ParCtlEx_ChartUsageElem v(Descritization.at(17)/60) tt(s_TTMonth( $GetPeriodStart + 17*24*3600, Descritization.at(17))) text("18") ta(c)
Val_19 = $ParCtlEx_ChartUsageElem v(Descritization.at(18)/60) tt(s_TTMonth( $GetPeriodStart + 18*24*3600, Descritization.at(18))) text("19") ta(c)
Val_20 = $ParCtlEx_ChartUsageElem v(Descritization.at(19)/60) tt(s_TTMonth( $GetPeriodStart + 19*24*3600, Descritization.at(19))) text("20") ta(c)
Val_21 = $ParCtlEx_ChartUsageElem v(Descritization.at(20)/60) tt(s_TTMonth( $GetPeriodStart + 20*24*3600, Descritization.at(20))) text("21") ta(c)
Val_22 = $ParCtlEx_ChartUsageElem v(Descritization.at(21)/60) tt(s_TTMonth( $GetPeriodStart + 21*24*3600, Descritization.at(21))) text("22") ta(c)
Val_23 = $ParCtlEx_ChartUsageElem v(Descritization.at(22)/60) tt(s_TTMonth( $GetPeriodStart + 22*24*3600, Descritization.at(22))) text("23") ta(c)
Val_24 = $ParCtlEx_ChartUsageElem v(Descritization.at(23)/60) tt(s_TTMonth( $GetPeriodStart + 23*24*3600, Descritization.at(23))) text("24") ta(c)
Val_25 = $ParCtlEx_ChartUsageElem v(Descritization.at(24)/60) tt(s_TTMonth( $GetPeriodStart + 24*24*3600, Descritization.at(24))) text("25") ta(c)
Val_26 = $ParCtlEx_ChartUsageElem v(Descritization.at(25)/60) tt(s_TTMonth( $GetPeriodStart + 25*24*3600, Descritization.at(25))) text("26") ta(c)
Val_27 = $ParCtlEx_ChartUsageElem v(Descritization.at(26)/60) tt(s_TTMonth( $GetPeriodStart + 26*24*3600, Descritization.at(26))) text("27") ta(c)
Val_28 = $ParCtlEx_ChartUsageElem v(Descritization.at(27)/60) tt(s_TTMonth( $GetPeriodStart + 27*24*3600, Descritization.at(27))) text("28") ta(c)
Val_29 = $ParCtlEx_ChartUsageElem v(Descritization.at(28)/60) tt(s_TTMonth( $GetPeriodStart + 28*24*3600, Descritization.at(28))) text("29") ta(c) visible(Descritization.size() >= 29)
Val_30 = $ParCtlEx_ChartUsageElem v(Descritization.at(29)/60) tt(s_TTMonth( $GetPeriodStart + 29*24*3600, Descritization.at(29))) text("30") ta(c) visible(Descritization.size() >= 30)
Val_31 = $ParCtlEx_ChartUsageElem v(Descritization.at(30)/60) tt(s_TTMonth( $GetPeriodStart + 30*24*3600, Descritization.at(30))) text("31") ta(c) visible(Descritization.size() >= 31)
[ParCtlUserReport_Navigator_WorkArea_TimeUsage_ChartYear]
@ = $ChartStatPctrl sz(p,p) at(disable_auto_tt)
$GetPeriodStart = ctl.parent.parent.PeriodStart.value
RedZone = $ValPrm v((24*30)*2/3)
Plot = t(chartplotarea)
AxisY = $ChartStatAxisY
AxisX = $ChartStatAxisX
Val_1 = $ParCtlEx_ChartUsageElem v(Descritization.at(0 )/3600) tt(s_TTYear(0 , Descritization.at(0 ))) text(s_MonthOfYear_Short( 0)) ta(c)
Val_2 = $ParCtlEx_ChartUsageElem v(Descritization.at(1 )/3600) tt(s_TTYear(1 , Descritization.at(1 ))) text(s_MonthOfYear_Short( 1)) ta(c)
Val_3 = $ParCtlEx_ChartUsageElem v(Descritization.at(2 )/3600) tt(s_TTYear(2 , Descritization.at(2 ))) text(s_MonthOfYear_Short( 2)) ta(c)
Val_4 = $ParCtlEx_ChartUsageElem v(Descritization.at(3 )/3600) tt(s_TTYear(3 , Descritization.at(3 ))) text(s_MonthOfYear_Short( 3)) ta(c)
Val_5 = $ParCtlEx_ChartUsageElem v(Descritization.at(4 )/3600) tt(s_TTYear(4 , Descritization.at(4 ))) text(s_MonthOfYear_Short( 4)) ta(c)
Val_6 = $ParCtlEx_ChartUsageElem v(Descritization.at(5 )/3600) tt(s_TTYear(5 , Descritization.at(5 ))) text(s_MonthOfYear_Short( 5)) ta(c)
Val_7 = $ParCtlEx_ChartUsageElem v(Descritization.at(6 )/3600) tt(s_TTYear(6 , Descritization.at(6 ))) text(s_MonthOfYear_Short( 6)) ta(c)
Val_8 = $ParCtlEx_ChartUsageElem v(Descritization.at(7 )/3600) tt(s_TTYear(7 , Descritization.at(7 ))) text(s_MonthOfYear_Short( 7)) ta(c)
Val_9 = $ParCtlEx_ChartUsageElem v(Descritization.at(8 )/3600) tt(s_TTYear(8 , Descritization.at(8 ))) text(s_MonthOfYear_Short( 8)) ta(c)
Val_10 = $ParCtlEx_ChartUsageElem v(Descritization.at(9 )/3600) tt(s_TTYear(9 , Descritization.at(9 ))) text(s_MonthOfYear_Short( 9)) ta(c)
Val_11 = $ParCtlEx_ChartUsageElem v(Descritization.at(10)/3600) tt(s_TTYear(10, Descritization.at(10))) text(s_MonthOfYear_Short(10)) ta(c)
Val_12 = $ParCtlEx_ChartUsageElem v(Descritization.at(11)/3600) tt(s_TTYear(11, Descritization.at(11))) text(s_MonthOfYear_Short(11)) ta(c)
;----------------- ParCtlEx Report StatTopElem ----------------------
[ParCtlExReport_StatTopElem]
@ = ext(1) sz(a,a) a(la) xy(,,,7)
Legend = a(at) sz(8,8) xy(,3) xy(,3,3) extprm(1)
Number = a(at) extprm(1)
Text = a(at) f("Description") extprm(1)
Descr = a(sa) f("Description") at(disabled) extprm(1)
[Templates]
$ColSeverity = sz(40) i(if(Severity != #eParCtlEx_SeverityInfo, s_ParCtlEx_SeverityIcon(Severity))) text("")
;------------------- ParCtlUserReport.InternetUsage ----------
[ParCtlUserReport.InternetUsage]
@ = ext(1) [ParCtlUserReport_Navigator_WorkArea_PageT] subst(PeriodSwitch(subst(IsChange($ParCtlUserReport_TimeRange_PeriodSwitch_OnChange) )) List([ParCtlUserReport_Navigator_WorkArea_InternetUsage_List]) Stat([ParCtlUserReport_Navigator_WorkArea_TimeUsage_Stat] prm("ParCtl:" + serid("InternetUsageControlReportStatistics")) subst(Header() )) ) h(24805)
[ParCtlUserReport_Navigator_WorkArea_InternetUsage_List]
@ = $ListToolbar alias(events.ParCtlEx.InetUsage) refresh(100) ontimer(1000, updatedata())
Severity = $ColSeverity
Time = sz(120) text(datetime(DateTime)) group(ParCtlEx_InternetUsage_DateTime, dategroup(DateTime), default) sort(index, sortdown)
TimeUsage = sz(120) text(timestamp(f_ParCtlEx_GetTimeUsage(StopTime, DateTime)))
AccessStatus = sz(120) text(s_ParCtlEx_Access(AccessStatus))
;Reason = sz(120) text(capitalize(s_ParCtlEx_IU_Reason(Reason)))
;Requests = sz(120) text(Requests)
[Grid.Groups]
ParCtlEx_InternetUsage_DateTime = [ParCtlEx_InternetUsage_DateTime_Group]
[ParCtlEx_InternetUsage_DateTime_Group]
@ = sz(p,30) mg(,,,2) rs(100,0) onaggrow(if(!agg.Severity, agg.Severity = #eParCtlEx_SeverityInfo); if(agg.Severity > Severity, agg.Severity = Severity); if(StopTime != 0xFFFFFFFF, agg.GroupRunTime = agg.GroupRunTime + f_ParCtlEx_GetTimeUsage(StopTime, DateTime), agg.LastOpenedTime = DateTime))
Severity = a(ac) xy(20) i(s_ParCtlEx_SeverityIcon(agg.Severity))
Date = a(ac) f(ctl.parent.selected && ctl.List.focused ? "GridGroupSel" : "GridGroup")
Info = a(ac)
border = a(lb) xy(,-2) sz(p,2) bg("GridGroup")
;------------- ParCtlUserReport.InternetWebContent -----------------
[ParCtlUserReport.InternetWebContent]
@ = ext(1) [ParCtlUserReport_Navigator_WorkArea_PageT] subst(PeriodSwitch(subst(IsChange($ParCtlUserReport_TimeSingle_PeriodSwitch_OnChange) )) List([ParCtlUserReport_Navigator_WorkArea_InternetWebContent_List]) ListActions([ParCtlUserReport_InternetWebContent_List_Actions]) Stat([ParCtlUserReport_Navigator_WorkArea_InternetWebContent_Stat]) ) h(24806)
[ParCtlUserReport_Navigator_WorkArea_InternetWebContent_List]
@ = $ListToolbar alias(events.ParCtlEx.WebSiteControl) refresh(100) sz(p,p) ext(1) group(ParCtlEx_IWC_Domain, Domain, default)
Severity = $ColSeverity
URL = sz(200) text(Url)
;Domain = sz(120) group(ParCtlEx_IWC_Domain, Domain, default) text(Domain)
Time = sz(120) text(datetime(DateTime)) sort(index,sortup)
AccessStatus = sz(200) text(s_ParCtlEx_IWC_Access(AccessStatus, Reason, Category))
;Reason = sz(200) text(capitalize(s_ParCtlEx_IWC_Reason(Reason)))
;Category = sz(150) text(f_ParCtlEx_IWC_Category_Mask(Category, 1))
row = at(clickable) onrclick(menu("ParCtlUserReport_InternetUrls_List_Menu"))
[ParCtlUserReport_InternetUrls_List_Menu]
@ = t(menu)
OpenURL = onclick(url(ctl.List.isNode ? ctl.List.val : Url))
sep
AllowDenyEx = visible(ctl.ListActions.AllowDeny.visible) enable(ctl.ListActions.AllowDeny.enabled) text(ctl.ListActions.AllowDeny.text) onclick(ctl.ListActions.AllowDeny.click())
[ParCtlUserReport_InternetWebContent_List_Actions]
$GetListSelDomain = (ctl.List.isNode ? ctl.List.val : ctl.List.seldata().Domain)
@ = ext(1) sz(a,a) enable($GetListSelDomain)
AllowDeny = [TB_Button] xy(0) enable($GetListSelDomain) subst(Icon(i(if($GetListSelDomain && WebControl.BlackWhiteList.find("Name == " + toExpr($GetListSelDomain)).Blocked,s_Ico(#ICO_UNBLOCK_16),s_Ico(#ICO_BLOCK_16))))) onclick(var l_url; var l_domain; l_domain = $GetListSelDomain; l_url = WebControl.BlackWhiteList.find("Name == " + toExpr(l_domain),#vAdd, "Name = " + toExpr(l_domain) + "; Timestamp = utctime()"); debugTrace(l_url); debugTrace(l_url.Name); debugTrace(l_domain); l_url.Blocked = !l_url.Blocked)
[Grid.Groups]
ParCtlEx_IWC_Domain = [ParCtlEx_IWC_Domain_Group]
[ParCtlEx_IWC_Domain_Group]
@ = sz(p,30) mg(,,,2) rs(100,0) onaggrow(if(!agg.Severity, agg.Severity = #eParCtlEx_SeverityInfo); if(agg.Severity > Severity, agg.Severity = Severity); if(!agg.criticalCount,agg.criticalCount=0); if(Severity == #eParCtlEx_SeverityCritical,agg.criticalCount=agg.criticalCount+1))
Severity = a(ac) xy(20) i(s_ParCtlEx_SeverityIcon(agg.Severity))
Domain = a(ac) sz(a,a) i(getIcon(".html")) f(ctl.parent.selected && ctl.List.focused ? "GridGroupSel" : "GridGroup") text(val)
Info = a(ac) sz(a,a)
border = a(lb) xy(,-2) sz(p,2) bg("GridGroup")
[ParCtlUserReport_Navigator_WorkArea_InternetWebContent_Stat]
@ = alias(statex) prm("ParCtl:" + serid("WebSiteControlReportStatistics")) ext(1) sz(p,a) mg(0,12,0,0)
Header = a(lt) f("Header1") visible(Domains.size())
SubHeader = a(la) f("Description") xy(,7,,5) visible(Domains.size())
Data = [ParCtlUserReport_Navigator_WorkArea_InternetWebContent_Stat_Data] a(la) sz(p,110) rs(100,0) visible(Domains.size())
[ParCtlUserReport_Navigator_WorkArea_InternetWebContent_Stat_Data]
Top3 = [ParCtlUserReport_Navigator_WorkArea_InternetWebContent_Stat_Top3] xy(,6)
Chart = [ParCtlUserReport_Navigator_WorkArea_InternetWebContent_Chart]
[ParCtlUserReport_Navigator_WorkArea_InternetWebContent_Stat_Top3]
@ = sz(a,a) rs(0,0) a(la) xy(,,10)
Top_1 = [ParCtlExReport_StatTopElem] visible(Domains.size() >= 1) subst(Legend(bg("Chart2")) Number(text("1. ")) Text(text(Domains[0].Domain)) Descr() )
Top_2 = [ParCtlExReport_StatTopElem] visible(Domains.size() >= 2) subst(Legend(bg("Chart3")) Number(text("2. ")) Text(text(Domains[1].Domain)) Descr() )
Top_3 = [ParCtlExReport_StatTopElem] visible(Domains.size() >= 3) subst(Legend(bg("Chart4")) Number(text("3. ")) Text(text(Domains[2].Domain)) Descr() )
[ParCtlUserReport_Navigator_WorkArea_InternetWebContent_Chart]
@ = $ChartStat mg(20,20) a(as) sz(p,p) at(disable_auto_tt)
Plot = t(chartplotarea)
AxisY = $ChartStatAxisY -b()
AxisX = $ChartStatAxisX xy(-5)
Top_1 = t(chartseries) visible(Domains.size() >= 1) mg(10) bg("Chart2") v(Domains.at(0).Count) tt(s_TTInternetWebContent_Chart(Domains[0]))
Top_2 = t(chartseries) visible(Domains.size() >= 2) mg(10) bg("Chart3") v(Domains.at(1).Count) tt(s_TTInternetWebContent_Chart(Domains[1]))
Top_3 = t(chartseries) visible(Domains.size() >= 3) mg(10) bg("Chart4") v(Domains.at(2).Count) tt(s_TTInternetWebContent_Chart(Domains[2]))
;------------- ParCtlUserReport.InternetDownload -----------------
[ParCtlUserReport.InternetDownload]
@ = ext(1) [ParCtlUserReport_Navigator_WorkArea_PageT] subst(PeriodSwitch(subst(IsChange($ParCtlUserReport_TimeSingle_PeriodSwitch_OnChange) )) List([ParCtlUserReport_Navigator_WorkArea_InternetDownload_List]) ListActions([ParCtlUserReport_InternetDownload_List_Actions]) Stat([ParCtlUserReport_Navigator_WorkArea_InternetDownload_Stat]) ) h(24807)
[ParCtlUserReport_Navigator_WorkArea_InternetDownload_List]
@ = $ListToolbar alias(events.ParCtlEx.FileDownloadControl) refresh(100) sz(p,p) ext(1)
Severity = $ColSeverity
File = [ParCtlUserReport_Navigator_WorkArea_InternetDownload_List_File]
;Category = sz(150) group(ParCtlEx_FDC_Category, Category) text(capitalize(s_ParCtlEx_FileCategory(Category)))
;Domain = sz(120) group(ParCtlEx_FDC_Domain, Domain, default) text(Domain)
Time = sz(120) text(datetime(DateTime)) sort(index,sortup)
AccessStatus = sz(200) text(s_ParCtlEx_ID_Access(AccessStatus, Category))
;Reason = sz(200) text(capitalize(s_ParCtlEx_FDC_Reason(Reason)))
;URL = sz(200) text(Url)
row = at(clickable) onrclick(menu("ParCtlUserReport_InternetUrls_List_Menu"))
[ParCtlUserReport_Navigator_WorkArea_InternetDownload_List_File]
@ = sz(200) i(getIcon("." + Extension, "unkobj")) text(FileName + "." + Extension)
Name = sz(150) text(FileName)
Type = sz(50) i(getIcon("." + Extension, "unkobj")) text(Extension))
[ParCtlUserReport_InternetDownload_List_Actions]
Category = [ParCtlUserReport_InternetDownload_List_Actions_Category]
Domain = [ParCtlUserReport_InternetDownload_List_Actions_Domain] xy($TB_ShiftNext_Btn)
[ParCtlUserReport_InternetDownload_List_Actions_Category]
$GetListSelCategory = (ctl.List.groupId == "Category" ? ctl.List.val : ctl.List.seldata().Category)
@ = sz(a,a) enable($GetListSelCategory) a(at)
AllowDeny = [TB_Button] xy(0) subst(Icon(i(if( $GetListSelCategory && FileDownloadControl.Items.find("Name=="+toExpr($GetListSelCategory)).Enabled, s_Ico(#ICO_UNBLOCK_16), s_Ico(#ICO_BLOCK_16) )))) onclick(var l_category; l_category=FileDownloadControl.Items.find("Name=="+toExpr($GetListSelCategory)); l_category.Enabled = !l_category.Enabled)
[ParCtlUserReport_InternetDownload_List_Actions_Domain]
$GetListSelDomain = (ctl.List.groupId == "Domain" ? ctl.List.val : ctl.List.seldata().Domain)
@ = ext(1) sz(a,a) enable($GetListSelDomain) a(at)
AllowDeny = [TB_Button] xy(0) subst(Icon(i(if($GetListSelDomain && WebControl.BlackWhiteList.find("Name == " + toExpr($GetListSelDomain)).Blocked,s_Ico(#ICO_UNBLOCK_16),s_Ico(#ICO_BLOCK_16))))) onclick(var l_url; var l_domain; l_domain = $GetListSelDomain; l_url = WebControl.BlackWhiteList.find("Name == " + toExpr(l_domain),#vAdd, "Name = " + toExpr(l_domain) + "; Timestamp = utctime()"); l_url.Blocked = !l_url.Blocked)
[Grid.Groups]
ParCtlEx_FDC_Category = [ParCtlEx_FDC_Category_Group]
ParCtlEx_FDC_Domain = [ParCtlEx_FDC_Domain_Group]
[ParCtlEx_FDC_Category_Group]
@ = sz(p,30) mg(,,,2) rs(100,0) onaggrow(if(!agg.Severity, agg.Severity = #eParCtlEx_SeverityInfo); if(agg.Severity > Severity, agg.Severity = Severity); if(AccessStatus == #eParCtlEx_AccessBlocked, agg.Blocked = agg.Blocked + 1))
Severity = a(ac) xy(20) i(s_ParCtlEx_SeverityIcon(agg.Severity))
Category = a(ac) sz(a,a) f(ctl.parent.selected && ctl.List.focused ? "GridGroupSel" : "GridGroup") text(capitalize(s_ParCtlEx_FileCategory(val)))
Info = a(ac) sz(a,a)
border = a(lb) xy(,-2) sz(p,2) bg("GridGroup")
[ParCtlEx_FDC_Domain_Group]
@ = sz(p,30) mg(,,,2) rs(100,0) onaggrow(if(!agg.Severity, agg.Severity = #eParCtlEx_SeverityInfo); if(agg.Severity > Severity, agg.Severity = Severity); if(AccessStatus == #eParCtlEx_AccessBlocked, agg.Blocked = agg.Blocked + 1))
Severity = a(ac) xy(20) i(s_ParCtlEx_SeverityIcon(agg.Severity))
Domain = a(ac) sz(a,a) i(getIcon(".html", "unkobj")) f(ctl.parent.selected && ctl.List.focused ? "GridGroupSel" : "GridGroup") text(val)
Info = a(ac) sz(a,a)
border = a(lb) xy(,-2) sz(p,2) bg("GridGroup")
[ParCtlUserReport_Navigator_WorkArea_InternetDownload_Stat]
@ = alias(statex) prm("ParCtl:" + serid("FileDownloadControlReportStatistics")) ext(1) sz(p,a) mg(0,12,0,0)
Header = a(lt) f("Header1") visible(Domains.size())
SubHeader = a(la) f("Description") xy(,7,,5) visible(Domains.size())
Data = [ParCtlUserReport_Navigator_WorkArea_InternetDownload_Stat_Data] a(la) sz(p,110) rs(100,0) visible(Domains.size())
[ParCtlUserReport_Navigator_WorkArea_InternetDownload_Stat_Data]
Top3 = [ParCtlUserReport_Navigator_WorkArea_InternetDownload_Stat_Top3] xy(,6)
Chart = [ParCtlUserReport_Navigator_WorkArea_InternetDownload_Chart]
[ParCtlUserReport_Navigator_WorkArea_InternetDownload_Stat_Top3]
@ = sz(a,a) rs(0,0) a(la) xy(,,10)
Top_1 = [ParCtlExReport_StatTopElem] visible(Domains.size() >= 1) subst(Legend(bg("Chart2")) Number(text("1. ")) Text(text(Domains.at(0).Domain)) Descr() )
Top_2 = [ParCtlExReport_StatTopElem] visible(Domains.size() >= 2) subst(Legend(bg("Chart3")) Number(text("2. ")) Text(text(Domains.at(1).Domain)) Descr() )
Top_3 = [ParCtlExReport_StatTopElem] visible(Domains.size() >= 3) subst(Legend(bg("Chart4")) Number(text("3. ")) Text(text(Domains.at(2).Domain)) Descr() )
[ParCtlUserReport_Navigator_WorkArea_InternetDownload_Chart]
@ = $ChartStat mg(20,20) a(as) sz(p,p) at(disable_auto_tt)
Plot = t(chartplotarea)
AxisY = $ChartStatAxisY -b()
AxisX = $ChartStatAxisX xy(-5)
Top_1 = t(chartseries) visible(Domains.size() >= 1) mg(10) bg("Chart2") v(Domains.at(0).Count) tt(s_TTInternetDownload_Chart(Domains[0]))
Top_2 = t(chartseries) visible(Domains.size() >= 2) mg(10) bg("Chart3") v(Domains.at(1).Count) tt(s_TTInternetDownload_Chart(Domains[1]))
Top_3 = t(chartseries) visible(Domains.size() >= 3) mg(10) bg("Chart4") v(Domains.at(2).Count) tt(s_TTInternetDownload_Chart(Domains[2]))
;------------- ParCtlUserReport.MessagingIM -----------------
[ParCtlUserReport.MessagingIM]
@ = ext(1) [ParCtlUserReport_Navigator_WorkArea_PageT] subst(PeriodSwitch(subst(IsChange($ParCtlUserReport_TimeSingle_PeriodSwitch_OnChange) )) List([ParCtlUserReport_Navigator_WorkArea_MessagingIM_List]) ListActions([ParCtlUserReport_MessagingIM_List_Actions]) Stat([ParCtlUserReport_Navigator_WorkArea_MessagingIM_Stat]) ) h(25596)
[ParCtlUserReport_Navigator_WorkArea_MessagingIM_List]
@ = $ListToolbar alias(events.ParCtlEx.IM) refresh(100) sz(p,p) ext(1)
Severity = sz(40) i(s_ParCtlEx_SeverityIconEx(Severity)) at(clickable) onrclick(menu("Report_MessagingIM_List.Menu"))
Direction = sz(80) i(s_IcoMessageDirection(Direction))) text("") at(clickable) onrclick(menu("Report_MessagingIM_List.Menu"))
UserName = sz(130) group(ParCtlEx_IM_ContactId, ContactId + ProtocolType, default) text(Direction == #eParCtlEx_DirectionInbound ? f_ParCtlEx_GetIMContactName(UserName, ContactId) : f_UserName(UserName)) at(clickable) onrclick(menu("Report_MessagingIM_List.Menu"))
MessageText = sz(150) text(MessageText) at(clickable) at(clickable) onrclick(menu("Report_MessagingIM_List.Menu"))
Time = sz(120) text(datetime(DateTime)) sort(index,sortup) at(clickable) onrclick(menu("Report_MessagingIM_List.Menu"))
AccessStatus = sz(100) text(s_ParCtlEx_Access(AccessStatus)) at(clickable) onrclick(menu("Report_MessagingIM_List.Menu"))
Reason = sz(150) text(capitalize(s_ParCtlEx_IM_Reason(Reason))) at(clickable) onrclick(menu("Report_MessagingIM_List.Menu"))
IsPersInfo = sz(100) i(if(PersonalInfos, $ParCtlEx_IM_IsPersInfo_Icon)) text("") tt(PersonalInfos) at(clickable) onrclick(menu("Report_MessagingIM_List.Menu"))
IsKeywords = sz(100) i(if(Keywords, $ParCtlEx_IM_IsKeywords_Icon)) text("") tt(Keywords) at(clickable) onrclick(menu("Report_MessagingIM_List.Menu"))
[Report_MessagingIM_List.Menu]
$GetListSelData = (ctl.List.isNode ? (ctl.List.agg.ContactId ? ctl.List.finddata("ContactId == \"" + ctl.List.agg.ContactId + "\" && ProtocolType == " + ctl.List.agg.ProtocolType) : NULL) : ctl.List.seldata())
$GetListSelContactId = (ctl.List.isNode ? ctl.List.agg.ContactId : ctl.List.seldata().ContactId)
$GetListData = IMControl.Contacts.find("Id==" + toExpr($GetListSelContactId))
@ = t(menu) bg("MenuIconBg")
History = i("listctrls,10") onclick(ctl.parent.parent.Toolbar.Edit.click())
AllowDeny = i(if($GetListData.Blocked,s_Ico(#ICO_UNBLOCK_16), s_Ico(#ICO_BLOCK_16))) onclick(ctl.parent.parent.Toolbar.AllowDeny.click())
[ParCtlUserReport_MessagingIM_List_Actions]
$GetListSelData = (ctl.List.isNode ? (ctl.List.agg.ContactId ? ctl.List.finddata("ContactId == \"" + ctl.List.agg.ContactId + "\" && ProtocolType == " + ctl.List.agg.ProtocolType) : NULL) : ctl.List.seldata())
$GetListSelContactId = (ctl.List.isNode ? ctl.List.agg.ContactId : ctl.List.seldata().ContactId)
$GetListData = IMControl.Contacts.find("Id==" + toExpr($GetListSelContactId))
@ = ext(1) sz(a,a) enable($GetListSelData)
AllowDeny = [TB_Button] xy(0) subst(Icon(i(if($GetListData.Blocked,s_Ico(#ICO_UNBLOCK_16), s_Ico(#ICO_BLOCK_16))))) onclick(var l_contactId; var p; l_contactId = $GetListSelContactId; p = IMControl.Contacts.find("Id==" + toExpr(l_contactId), #vAdd, "Id="+toExpr(l_contactId)); p.Blocked = !p.Blocked )
;Open = [TB_Button] subst(Icon(i("listctrls,10"))) onclick(dialog("ParCtlReportIMMessageDetails", p_data($GetListSelData), p_period(f_ParCtlEx_Events_PeriodFilter(ctl.PeriodBegin.value, ctl.PeriodEnd.value))))
Edit = [TB_Button] subst(Icon(i("listctrls,10"))) onclick(dialog("IMControl_History", p_data($GetListSelContactId), p_period(f_ParCtlEx_Events_PeriodFilter(ctl.PeriodBegin.value, ctl.PeriodEnd.value))))
;ParCtlReportIMMessageDetails
[Grid.Groups]
ParCtlEx_IM_ContactId = [ParCtlEx_IM_ContactId_Group]
[ParCtlEx_IM_ContactId_Group]
@ = sz(p,30) mg(,,,2) rs(100,0) onaggrow(agg.ContactId = ContactId; agg.ProtocolType = ProtocolType; if(!agg.Severity, agg.Severity = #eParCtlEx_SeverityInfo); if(agg.Severity > Severity, agg.Severity = Severity); if(AccessStatus == #eParCtlEx_AccessBlocked, agg.Blocked = agg.Blocked + 1); if(PersonalInfos, agg.IsPersonalInfoSending = true); if(Keywords, agg.IsKeywords = true))
Severity = a(ac) xy(20) i(s_ParCtlEx_SeverityIcon(agg.Severity))
ContactId = a(ac) sz(a,a) i(s_ParCtlUserReport_IM_ContactId_Icon(f_ParCtlEx_GetIMContactGroup(p_User, agg.ContactId))) f(ctl.parent.selected && ctl.List.focused ? "GridGroupSel" : "GridGroup") text(f_ParCtlEx_GetIMContactName(p_User, agg.ContactId))
Info = a(ac) sz(a,a) xy(,,10)
IsPersInfo = a(ac) i($ParCtlEx_IM_IsPersInfo_Icon) visible(agg.IsPersonalInfoSending)
IsKeywords = a(ac) i($ParCtlEx_IM_IsKeywords_Icon) visible(agg.IsKeywords)
border = a(lb) xy(,-2) sz(p,2) bg("GridGroup")
[ParCtlUserReport_Navigator_WorkArea_MessagingIM_Stat]
@ = alias(statex) prm("ParCtl:" + serid("InstantMessangerControlReportStatistics")) ext(1) sz(p,a) mg(0,12,0,0)
Header = a(lt) f("Header1") visible(Contacts.size())
SubHeader = a(la) f("Description") xy(,7,,5) visible(Contacts.size())
Data = [ParCtlUserReport_Navigator_WorkArea_MessagingIM_Stat_Data] a(la) sz(p,110) rs(100,0) visible(Contacts.size())
[ParCtlUserReport_Navigator_WorkArea_MessagingIM_Stat_Data]
Top3 = [ParCtlUserReport_Navigator_WorkArea_MessagingIM_Stat_Top3] xy(,6)
Chart = [ParCtlUserReport_Navigator_WorkArea_MessagingIM_Chart]
[ParCtlUserReport_Navigator_WorkArea_MessagingIM_Stat_Top3]
@ = sz(a,a) rs(0,0) a(la) xy(,,10)
Top_1 = [ParCtlExReport_StatTopElem] visible(Contacts.size() >= 1) subst(Legend(bg("Chart2")) Number(text("1. ")) Text(text(f_ParCtlEx_GetIMContactName(p_User, Contacts.at(0).ContactId))) Descr() )
Top_2 = [ParCtlExReport_StatTopElem] visible(Contacts.size() >= 2) subst(Legend(bg("Chart3")) Number(text("2. ")) Text(text(f_ParCtlEx_GetIMContactName(p_User, Contacts.at(1).ContactId))) Descr() )
Top_3 = [ParCtlExReport_StatTopElem] visible(Contacts.size() >= 3) subst(Legend(bg("Chart4")) Number(text("3. ")) Text(text(f_ParCtlEx_GetIMContactName(p_User, Contacts.at(2).ContactId))) Descr() )
[ParCtlUserReport_Navigator_WorkArea_MessagingIM_Chart]
@ = $ChartStat mg(20,20) a(as) sz(p,p) at(disable_auto_tt)
Plot = t(chartplotarea)
AxisY = $ChartStatAxisY -b()
AxisX = $ChartStatAxisX xy(-5)
Top_1 = t(chartseries) visible(Contacts.size() >= 1) mg(10) bg("Chart2") v(Contacts.at(0).MsgCount) tt(s_TTMessagingIM_Chart(Contacts[0]))
Top_2 = t(chartseries) visible(Contacts.size() >= 2) mg(10) bg("Chart3") v(Contacts.at(1).MsgCount) tt(s_TTMessagingIM_Chart(Contacts[1]))
Top_3 = t(chartseries) visible(Contacts.size() >= 3) mg(10) bg("Chart4") v(Contacts.at(2).MsgCount) tt(s_TTMessagingIM_Chart(Contacts[2]))
;---------- ParCtlReportIMMessageDetails ------------------
[ParCtlReportIMMessageDetails]
@ = [StyledWindowT] at(dragable,resizable,a_close) subst( BodyEx( [ParCtlReportIMMessageDetails_Body] ns(p_data) ) ) alias(task) ns(ParCtl) sz(500,300) h(25596)
[ParCtlReportIMMessageDetails_Body]
@ = sz(p,p) a(lt) mg(7,7,7,7)
ContactId = [LValue] xy(,,,7) subst(Name() Val(f("Header0") text(f_ParCtlEx_GetIMContactName(UserName, ContactId))) )
Group = [LValue] xy(,,,7) subst(Name(i(s_ImGroupIcon(ctl.Val.value)) ia(r) sz(116)) Val(xy(116) [ParCtlReportIMMessageDetails_Body_Group] v(inout(f_ParCtlEx_GetIMContactGroup(UserName, ContactId), f_ParCtlEx_SetIMContactGroup(UserName, ContactId, ctl.value), true))) )
Proto = [LValue] xy(,,,7) subst(Name() Val(f("Header0") text(s_ParCtlEx_IM_ProtocolTypes(ProtocolType))) )
Search = [ParCtlReportIMMessageDetails_Search] a(rs) xy(,-5,,5)
List = [ParCtlReportIMMessageDetails_List] a(la)
[ParCtlReportIMMessageDetails_Search]
@ = b(System) mg(5,1,,1) bg("ColorWindow") sz(150,a)
Icon = a(rc) i("Find")
Edit = t(edit) a(pc) sz(p) xy(2) at(noborder) onchange(if(ctl.value, ctl.List.setfilter("strfind(toupper(MessageText)," + toExpr(toupper(ctl.value)) + ")",1), ctl.List.setfilter("",1)))
[ParCtlReportIMMessageDetails_Body_Group]
@ = t(combo) f("Header0") sz(a,a)
WhiteList = v(#eParCtlEx_IM_ReasonContactInWhiteList)
BlackList = v(#eParCtlEx_IM_ReasonContactInBlackList)
Other = v(0)
[ParCtlReportIMMessageDetails_List]
@ = $List alias(events.ParCtlEx.IM) at(noheader,singlesel,rememberdata,nosearch) oninit(ctl.setfilter(p_period, 1)) filter(ContactId == p_data.ContactId && ProtocolType == p_data.ProtocolType && UserName == p_data.UserName) refresh(100)
row = [ParCtlReportIMMessageDetails_List_Row]
[ParCtlReportIMMessageDetails_List_Row]
@ = sz(p,a) at(custom) f("Description")
_space = sz(0) xy(5,5)
Severity = a(as) i(if(Severity != #eParCtlEx_SeverityInfo, s_ParCtlEx_SeverityIcon(Severity)))
AccessStatus = a(as) i(if(AccessStatus != #eParCtlEx_AccessAllowed, "ParCtlExAll16,12"))
Direction = a(as) i("ParCtlExAll16," + (Direction == #eParCtlEx_DirectionInbound ? 10 : 11))
UserName = a(as) f(ctl.parent.selected && ctl.List.focused ? "Header0White" : "Header0") text(Direction == #eParCtlEx_DirectionInbound ? f_ParCtlEx_GetIMContactName(UserName, ContactId) : f_UserName(UserName))
MessageText = a(la) xy(5,5) f("Description") text(MessageText)
Sep = a(la) sz(p,1) xy(,5) b(Topline_lgrey)
IsKeywords = a(rt) xy(5,5) sz(16,16) i(if(Keywords, $ParCtlEx_IM_IsKeywords_Icon)) tt(Keywords)
IsPersInfo = a(ps) xy(3) sz(16,16) i(if(PersonalInfos, $ParCtlEx_IM_IsPersInfo_Icon)) tt(PersonalInfos)
Time = a(ps) f("Description") xy(20) text(datetime(DateTime))
;------------- ParCtlReportSNControlDetails -----------------
[ParCtlReportSNControlDetails]
@ = [StyledWindowT] at(dragable,resizable,a_ok,a_cancel) subst( BodyEx( [ParCtlReportSNControlDetails_Body] ) ) alias(taskedit) ns(ParCtl) sz(520,220) h(55963)
[ParCtlReportSNControlDetails_Body]
@ = a(lt) sz(p,p) rs(100,100) oninit(\
l_obj = parctl_getSNContacts(); \
ctl.ValueAlias.value=p_data.ContactId; \
l_obj.SNContacts.find("Id==" + toExpr(p_data.ContactId), #vAdd, ("Id="+toExpr(p_data.ContactId)+";Alias="+toExpr(p_data.ContactAlias)));\
Contacts.find("Id==" + toExpr(p_data.ContactId), #vAdd, ("Id="+toExpr(p_data.ContactId)+";Name="+toExpr(p_data.ContactAlias))) )
ValueAlias = t(v)
Header = [ParCtlReportSNControlDetails_Header]
ListArea = [ParCtlReportSNControlDetails_ListArea]
[ParCtlReportSNControlDetails_Header]
@ = sz(p,a) mg(11,11) bg("ColorLGrey") ns(users.find("UserId == " + toExpr(p_User)).settings)
BigIcon = a(lt) i(s_GetImTypeBigIcon(ctl.parent.ListArea.List.finddata("true").AppID)) sz(64,64)
Contact = a(at) xy(17) [SNControl_Users_Combo]
Status = a(sb) [SNControl_History_StatusDeny]
AllowButton = a(rc) xy(4) [BtnGlassGreen] sz(200,a) subst(Text()) visible( Contacts.find("Id == " + toExpr(ctl.Contact.value)).Blocked) onclick(var p; p=l_obj.SNContacts.find("Id=="+toExpr(ctl.Contact.value)); Contacts.find("Id==" + toExpr(p.Id), #vAdd, ("Id="+toExpr(p.Id)+";Name="+toExpr(p.Alias))).Blocked = false)
DenyButton = a(rc) xy(4) [BtnGlassRed] sz(200,a) subst(Text(text(ctl.text))) visible(!Contacts.find("Id == " + toExpr(ctl.Contact.value)).Blocked) onclick(var p; p=l_obj.SNContacts.find("Id=="+toExpr(ctl.Contact.value)); Contacts.find("Id==" + toExpr(p.Id), #vAdd, ("Id="+toExpr(p.Id)+";Name="+toExpr(p.Alias))).Blocked = true)
[SNControl_History_StatusDeny]
@ = a(sb) sz(a,a)
Icon = i(Contacts.find("Id == " + toExpr(ctl.Contact.value)).Blocked ? "RedSemaphorSmall" : "GreenSemaphorSmall")
Text = a(as) f("Normal")
Status = a(as) text(" " + s_Blocked(Contacts.find("Id == " + toExpr(ctl.Contact.value)).Blocked)) f(Contacts.find("Id == " + toExpr(ctl.Contact.value)).Blocked? "Normal_Red":"Normal_Green")
[SNControl_Users_Combo]
@ = t(combo) sz(a) v(ctl.top.ValueAlias.value) items(vector(l_obj.SNContacts) v(Id) text(f_ParCtlEx_GetSNContactName_Ex(Id,Alias)) ) onchange(ctl.parent.parent.ListArea.List.setfilter("ContactId == " + toExpr(ctl.value)+"&&UserName == "+toExpr(p_data.UserName)) )
[ParCtlReportSNControlDetails_ListArea]
@ = a(la) sz(p,p)
Separator = $StdAreaSeparator
List = [ParCtlReportSNControlDetails_List] a(la) xy(,1)
[ParCtlReportSNControlDetails_List]
@ = $List alias(events.ParCtlEx.SNControl) at(noborder,noheader,singlesel,rememberdata,nosearch) oninit(ctl.setfilter(p_period, 1)) filter(ContactId == p_data.ContactId && UserName == p_data.UserName) refresh(100)
row = [ParCtlReportSNControlDetails_List_Row]
[ParCtlReportSNControlDetails_List_Row]
@ = sz(p,a) at(custom) f("Description") mg(5,5,5,5)
;_space = sz(0) xy(5,5)
Time = xy(5) sz(70,a) text(datetime(DateTime))
DenyIcon = xy(5) a(sa) i(s_IcoMessageAccessStatus(AccessStatus))
Severity = xy(5) a(as) i(s_ParCtlEx_SeverityIcon(Severity)))
;AccessStatus = a(as) i(if(AccessStatus != #eParCtlEx_AccessAllowed, "ParCtlExAll16,12"))
Direction = xy(5) a(la) i("ParCtlExAll16," + (Direction == #eParCtlEx_DirectionInbound ? 10 : 11))
UserName = xy(75) a(lt) f(ctl.parent.selected && ctl.List.focused ? "Header0White" : "Header0") text(Direction == #eParCtlEx_DirectionInbound ? f_ParCtlEx_GetSNContactName(ContactId, ContactAlias) : f_UserName(UserName))
MessageText = a(sa) f("Description") text(MessageText) f(AccessStatus == #eParCtlEx_AccessBlocked ? "Description" : "KtsDescriptionRed")
;Sep = a(la) sz(p,1) xy(,5) b(Topline_lgrey)
;------------- ParCtlUserReport.MessagingPersonalData -----------------
[ParCtlUserReport.MessagingPersonalData]
@ = ext(1) [ParCtlUserReport_Navigator_WorkArea_PageT] subst(PeriodSwitch(subst(IsChange($ParCtlUserReport_NoStat_PeriodSwitch_OnChange) )) List([ParCtlUserReport_Navigator_WorkArea_MessagingPersonalData_List]) Stat([ParCtlUserReport_Navigator_WorkArea_MessagingPersonalData_Stat]) ) h(24811)
[ParCtlUserReport_Navigator_WorkArea_MessagingPersonalData_List]
@ = $ListToolbar alias(events.ParCtlEx.PersonalInfoControl) refresh(100) sz(p,p) ext(1)
Severity = $ColSeverity
PersonalInfo = sz(150) text(PersonalInfo) group(ParCtlEx_MPD_PersonalInfo, PersonalInfo, default)
;Protocol = sz(100) text(s_ParCtlEx_IM_ProtocolTypes(Protocol))
Recipient = sz(130) text(UserName != Recipient ? f_ParCtlEx_GetIMContactName(UserName, Recipient) : f_UserName(UserName))
Time = sz(120) text(datetime(DateTime)) sort(index,sortup) group(ParCtlEx_MPD_Date, dategroup(DateTime))
AccessStatus = sz(100) text(s_ParCtlEx_Access(#eParCtlEx_AccessBlocked))
[Grid.Groups]
ParCtlEx_MPD_PersonalInfo = [ParCtlEx_MPD_PersonalInfo_Group]
ParCtlEx_MPD_Date = [ParCtlEx_MPD_Date_Group]
[ParCtlEx_MPD_PersonalInfo_Group]
@ = sz(p,30) mg(,,,2) rs(100,0) onaggrow(if(!agg.Severity, agg.Severity = #eParCtlEx_SeverityInfo); if(agg.Severity > Severity, agg.Severity = Severity))
Severity = a(ac) xy(20) i(s_ParCtlEx_SeverityIcon(agg.Severity))
Id = a(ac) sz(a,a) f(ctl.parent.selected && ctl.List.focused ? "GridGroupSel" : "GridGroup") text(val)
Info = a(ac) sz(a,a)
border = a(lb) xy(,-2) sz(p,2) bg("GridGroup")
[ParCtlEx_MPD_Date_Group]
@ = sz(p,30) mg(,,,2) rs(100,0) onaggrow(if(!agg.Severity, agg.Severity = #eParCtlEx_SeverityInfo); if(agg.Severity > Severity, agg.Severity = Severity))
Severity = a(ac) xy(20) i(s_ParCtlEx_SeverityIcon(agg.Severity))
Id = a(ac) sz(a,a) f(ctl.parent.selected && ctl.List.focused ? "GridGroupSel" : "GridGroup")
Info = a(ac) sz(a,a)
border = a(lb) xy(,-2) sz(p,2) bg("GridGroup")
[ParCtlUserReport_Navigator_WorkArea_MessagingPersonalData_Stat]
@ = ext(1) sz(p,a)
Header = a(lt) f("Header1")
;------------- ParCtlUserReport.MessagingKeywords -----------------
[ParCtlUserReport.MessagingKeywords]
@ = ext(1) [ParCtlUserReport_Navigator_WorkArea_PageT] subst(PeriodSwitch(subst(IsChange($ParCtlUserReport_NoStat_PeriodSwitch_OnChange) )) List([ParCtlUserReport_Navigator_WorkArea_MessagingKeywords_List]) Stat([ParCtlUserReport_Navigator_WorkArea_MessagingKeywords_Stat]) ) h(24812)
[ParCtlUserReport_Navigator_WorkArea_MessagingKeywords_List]
@ = $ListToolbar alias(events.ParCtlEx.KeywordsControl) refresh(100) sz(p,p) ext(1)
Severity = $ColSeverity
;Direction = sz(80) i("ParCtlExAll16," + (Direction == #eParCtlEx_DirectionInbound ? 10 : 11)) text("")
Keyword = sz(150) text(Keyword) group(ParCtlEx_MPD_PersonalInfo, Keyword, default)
Recipient = sz(160) text(UserName != Recipient ? f_ParCtlEx_GetIMContactName(UserName, Recipient) : f_UserName(UserName))
;Protocol = sz(100) text(s_ParCtlEx_IM_ProtocolTypes(Protocol))
;AccessStatus = sz(100) text(s_ParCtlEx_Access(#eParCtlEx_AccessBlocked))
Time = sz(120) text(datetime(DateTime)) sort(index,sortup) group(ParCtlEx_MPD_Date, dategroup(DateTime))
[ParCtlUserReport_Navigator_WorkArea_MessagingKeywords_Stat]
@ = ext(1) sz(p,a)
Header = a(lt) f("Header1")
;------------------- ParCtlUserReport.ComputerUsage ----------
[ParCtlUserReport.ComputerUsage]
$tmpPeriodSwitch = PeriodSwitch(subst( IsChange($ParCtlUserReport_TimeRange_PeriodSwitch_OnChange) ) )
$tmpList = List( [ParCtlUserReport_Navigator_WorkArea_ComputerUsage_List] )
$parPrm = "ParCtl:" + serid("ComputerControlReportStatistics")
$tmpStat = Stat([ParCtlUserReport_Navigator_WorkArea_TimeUsage_Stat] prm($parPrm) subst(Header()) )
@ = ext(1) [ParCtlUserReport_Navigator_WorkArea_PageT] subst( $tmpPeriodSwitch $tmpList $tmpStat ) h(24803)
[ParCtlUserReport_Navigator_WorkArea_ComputerUsage_List]
@ = $ListToolbar alias(events.ParCtlEx.CompUsage) refresh(100) ontimer(1000, updatedata())
Severity = $ColSeverity
Time = sz(120) text(datetime(DateTime)) group(ParCtlEx_ComputerUsage_DateTime, dategroup(DateTime), default) sort(index, sortdown)
TimeUsage = sz(100) text(timestamp(f_ParCtlEx_GetTimeUsage(StopTime, DateTime)))
;AccessStatus = sz(200) text(s_ParCtlEx_Access(Action)+", "+s_ParCtlEx_CU_Reason(Reason))
AccessStatus = sz(200) text(s_ParCtl_CU_GetResultDesc(Action,Reason))
[Grid.Groups]
ParCtlEx_ComputerUsage_DateTime = [ParCtlEx_ComputerUsage_DateTime_Group]
[ParCtlEx_ComputerUsage_DateTime_Group]
@ = sz(p,30) mg(,,,2) rs(100,0) onaggrow(if(!agg.Severity, agg.Severity = #eParCtlEx_SeverityInfo); if(agg.Severity > Severity, agg.Severity = Severity); if(StopTime != 0xFFFFFFFF, agg.GroupRunTime = agg.GroupRunTime + f_ParCtlEx_GetTimeUsage(StopTime, DateTime), agg.LastOpenedTime = DateTime))
Severity = a(ac) xy(20) i(s_ParCtlEx_SeverityIcon(agg.Severity))
Date = a(ac) f(ctl.parent.selected && ctl.List.focused ? "GridGroupSel" : "GridGroup")
Info = a(ac)
border = a(lb) xy(,-2) sz(p,2) bg("GridGroup")
;------------------- ParCtlUserReport.ApplicationUsage ----------
[ParCtlUserReport.ApplicationUsage]
@ = ext(1) [ParCtlUserReport_Navigator_WorkArea_PageT] subst(PeriodSwitch(subst(IsChange($ParCtlUserReport_TimeSingle_PeriodSwitch_OnChange) )) List([ParCtlUserReport_Navigator_WorkArea_ApplicationUsage_List]) ListActions([ParCtlUserReport_ApplicationUsage_List_Actions]) Stat([ParCtlUserReport_Navigator_WorkArea_ApplicationUsage_Stat]) ) h(24804)
[ParCtlUserReport_Navigator_WorkArea_ApplicationUsage_List]
@ = $ListToolbar alias(events.ParCtlEx.AppControl) refresh(100) ontimer(1000, updatedata())
Severity = $ColSeverity
Application = [Product_Events_Report_Application] text(f_ParCtlEx_GetAUAppName(p_User, AppID)) group(ParCtlEx_ApplicationUsage_Group, f_ParCtlEx_GetAUAppName(p_User, AppID), default) subst(PID(use(0)) CommandLine(use(0)) )
TimeUsage = sz(150) text(timestamp(f_ParCtlEx_GetTimeUsage(StopTime, DateTime)))
AccessStatus = sz(150) text(s_ParCtlEx_AU_Access(AccessStatus,Reason))
;Reason = sz(150) text(capitalize(s_ParCtlEx_AU_Reason(Reason)))
[Grid.Groups]
ParCtlEx_ApplicationUsage_Group = [ParCtlEx_ApplicationUsage_Group]
[ParCtlEx_ApplicationUsage_Group]
@ = sz(p,30) mg(,,,2) rs(100,0) onaggrow(agg.AppID = AppID; if(!agg.Severity, agg.Severity = #eParCtlEx_SeverityInfo); if(agg.Severity > Severity, agg.Severity = Severity); if(StopTime != 0xFFFFFFFF, agg.GroupRunTime = agg.GroupRunTime + f_ParCtlEx_GetTimeUsage(StopTime, DateTime), agg.LastOpenedTime = DateTime))
Severity = a(ac) xy(20) i(s_ParCtlEx_SeverityIcon(agg.Severity))
App = a(ac) i(s_AppIcon(agg.AppID)) f(ctl.parent.selected && ctl.List.focused ? "GridGroupSel" : "GridGroup") text(val)
Info = a(ac)
border = a(lb) xy(,-2) sz(p,2) bg("GridGroup")
[ParCtlUserReport_ApplicationUsage_List_Actions]
$GetListSelAppID = (ctl.List.isNode ? ctl.List.agg.AppID : ctl.List.seldata().AppID)
@ = ext(1) sz(a,a) enable($GetListSelAppID)
AllowDeny = [TB_Button] xy(0) enable($GetListSelAppID) subst(Icon(i(if( $GetListSelAppID && AppControl.Applications.find("AppID=="+toExpr($GetListSelAppID)).Blocked,s_Ico(#ICO_UNBLOCK_16),s_Ico(#ICO_BLOCK_16))))) onclick(var l_app; var l_appId; l_appId = $GetListSelAppID; l_app = AppControl.Applications.find("AppID=="+toExpr(l_appId), #vAdd, "AppID = " + l_appId + "; AppHash = filehash(f_AppInfo(" + l_appId + ").sImagePath); AppAlias = " + toExpr(AppName) + "; AddTime = utctime()"); l_app.Blocked = !l_app.Blocked)
Settings = [TB_Button] enable($GetListSelAppID) subst(Icon(i( s_Ico(#ICO_PC_SETTING_16) ))) onclick(var p; var bFound; if(!(p=AppControl.Applications.find("AppID=="+toExpr($GetListSelAppID))), (p.serinit("AppControlAppSettings");p.AppID=$GetListSelAppID), bFound=true); if((l_DisableAppIDEdit=true;dialog("[AppUsage_Edit] alias(settings)",p_data(p))), if(!bFound, AppControl.Applications.find("AppID==" +toExpr(p.AppID), #vAdd ).sercopy(p)) );l_DisableAppIDEdit=false)
[ParCtlUserReport_Navigator_WorkArea_ApplicationUsage_Stat]
@ = alias(statex) prm("ParCtl:" + serid("AppControlReportStatistics")) ext(1) sz(p,a) mg(0,12,0,0)
Header = a(lt) f("Header1") visible(Apps.size())
SubHeader = a(la) f("Description") xy(,7,,5) visible(Apps.size())
Data = [ParCtlUserReport_Navigator_WorkArea_ApplicationUsage_Stat_Data] a(la) sz(p,110) rs(100,0) visible(Apps.size())
[ParCtlUserReport_Navigator_WorkArea_ApplicationUsage_Stat_Data]
Top3 = [ParCtlUserReport_Navigator_WorkArea_ApplicationUsage_Stat_Top3] xy(,6)
Chart = [ParCtlUserReport_Navigator_WorkArea_ApplicationUsage_Chart]
[ParCtlUserReport_Navigator_WorkArea_ApplicationUsage_Stat_Top3]
@ = sz(a,a) rs(0,0) a(la) xy(,,10)
Top_1 = [ParCtlExReport_StatTopElem] visible(Apps.size() >= 1) subst(Legend(bg("Chart2")) Number(text("1. ")) Text(text(f_ParCtlEx_GetAUAppName(p_User, Apps.at(0).AppID))) Descr() )
Top_2 = [ParCtlExReport_StatTopElem] visible(Apps.size() >= 2) subst(Legend(bg("Chart3")) Number(text("2. ")) Text(text(f_ParCtlEx_GetAUAppName(p_User, Apps.at(1).AppID))) Descr() )
Top_3 = [ParCtlExReport_StatTopElem] visible(Apps.size() >= 3) subst(Legend(bg("Chart4")) Number(text("3. ")) Text(text(f_ParCtlEx_GetAUAppName(p_User, Apps.at(2).AppID))) Descr() )
[ParCtlUserReport_Navigator_WorkArea_ApplicationUsage_Chart]
@ = $ChartStat mg(20,20) a(as) sz(p,p) at(disable_auto_tt)
Plot = t(chartplotarea)
AxisY = $ChartStatAxisY -b()
AxisX = $ChartStatAxisX xy(-5)
Top_1 = t(chartseries) visible(Apps.size() >= 1) mg(10) bg("Chart2") v(Apps.at(0).Duration) tt(s_TTApplicationUsage_Chart(Apps[0], p_User))
Top_2 = t(chartseries) visible(Apps.size() >= 2) mg(10) bg("Chart3") v(Apps.at(1).Duration) tt(s_TTApplicationUsage_Chart(Apps[1], p_User))
Top_3 = t(chartseries) visible(Apps.size() >= 3) mg(10) bg("Chart4") v(Apps.at(2).Duration) tt(s_TTApplicationUsage_Chart(Apps[2], p_User))
;--- ParCtlUserSettings_Navigator_WorkArea_InternetUsage --
[ParCtlUserSettings_Navigator_WorkArea_InternetUsage]
@ = ns(InternetControl) h(17400)
Header = f("Header6KGreen")
Sep1 = a(sa) sz(p,1) xy(,7) b(SettingsVertSep)
Description = a(la) xy(,8)
Enable = $Check xy(,23) v(Enabled) f("Header0")
Sep2 = a(sa) sz(p,1) xy(,25) b(SettingsVertSep)
WeekLimitCheck = $Check xy(,26) v(UseWeekTimeSpace) enable(Enabled)
WeekLimit = a(la) xy(20,16) sz(p,180) t(weekplan) at($WeekPlanAttr) f("Normal") v(WeekTimeSpace) enable(UseWeekTimeSpace&&Enabled)
DayLimitCheck = $Check xy(,40) v(UseDayTimeLimit) enable(Enabled)
DayLimit = a(as) xy(7,-5) t(timeedit) sz(80,22) at(seconds, 24h, notz) v(DayTimeLimit) enable(UseDayTimeLimit&&Enabled)
;---- ParCtlUserSettings_Navigator_WorkArea_WebContent ----
[ParCtlUserSettings_Navigator_WorkArea_WebContent]
@ = ns(WebControl) h(17401)
Header = f("Header6KGreen")
Sep1 = a(sa) sz(p,1) xy(,7) b(SettingsVertSep)
Description = a(la) xy(,8)
SafeSearch = [ParCtlUserSettings_Navigator_WorkArea_WebContent_SafeSeach] xy(,23)
Enable = $Check xy(,11) v(Enabled) f("Header0")
Sep2 = a(sa) sz(p,1) xy(,25) b(SettingsVertSep)
Header2 = f("Header3Lite") a(la) xy(,12) enable(Enabled)
Ext = [ParCtlUserSettings_Navigator_WorkArea_WebContent_Ext] enable(Enabled) xy(,11)
[ParCtlUserSettings_Navigator_WorkArea_WebContent_Ext]
@ = a(la) sz(p,p) v(BlockOther)
BlockSpecified = $Radio a(la) v(0)
Tab = [ParCtlUserSettings_Navigator_WorkArea_WebContent_Tab] xy(20,11) enable(!BlockOther)
BlockOther = $Radio a(la) v(1) xy(0,20)
OtherDescription = a(la) xy(20,7) i("warning") enable(BlockOther)
Exclusions = $Button mg(15,0,15,0) a(la) xy(,19) onclick(dialog("[WebContent_Exclusions_Edit] alias(settings)"))
[ParCtlUserSettings_Navigator_WorkArea_WebContent_SafeSeach]
@ = a(la) sz(p,a) ns(SafeSearch)
Enable = $Check v(Enabled) f("Header0")
[ParCtlUserSettings_Navigator_WorkArea_WebContent_Tab]
@ = a(la) sz(p,a) rs(100,0)
Categories = [ParCtlUserSettings_Navigator_WorkArea_WebContent_Tab_Categories] enable(!BlockOther)
[ParCtlUserSettings_Navigator_WorkArea_WebContent_Tab_Categories]
@ = sz(p,a)
;Categories = $Check v(SelectAll) xy(,,,3) onchange(if(ctl.value == 1, DenyCategoriesMask = #eParCtlCategoryAll))
SelectAll = $Link onclick(SelectAll=1;DenyCategoriesMask = #eParCtlCategoryAll)
ResetAll = $Link a(as) xy(20,,,3) onclick(SelectAll=0;DenyCategoriesMask = 0)
Group = [ParCtlUserSettings_Navigator_WorkArea_WebContent_Tab_Categories_Group]
[ParCtlUserSettings_Navigator_WorkArea_WebContent_Tab_Categories_Group]
@ = a(la) enable1(!SelectAll) mg(20,0,0,0) sz(p,a)
L = [ParCtlUserSettings_Navigator_WorkArea_WebContent_Tab_Categories_Group_L] sz(a,a)
M = [ParCtlUserSettings_Navigator_WorkArea_WebContent_Tab_Categories_Group_M] xy(15) a(at) sz(a,a)
R = [ParCtlUserSettings_Navigator_WorkArea_WebContent_Tab_Categories_Group_R] xy(15) a(at) sz(p,a)
[ParCtlUserSettings_Navigator_WorkArea_WebContent_Tab_Categories_Group_L]
$SettCheck = $Check at(singleline) xy(0,7)
DenyCategoryPorno = $SettCheck text(capitalize($ParCtlCategoryPorno)) v(bmask(DenyCategoriesMask, #eParCtlCategoryPorno))
DenyCategorySoftware = $SettCheck text(capitalize($ParCtlCategorySoftware)) v(bmask(DenyCategoriesMask, #eParCtlCategorySoftware))
DenyCategoryDrugs = $SettCheck text(capitalize($ParCtlCategoryDrugs)) v(bmask(DenyCategoriesMask, #eParCtlCategoryDrugs))
DenyCategoryViolence = $SettCheck text(capitalize($ParCtlCategoryViolence)) v(bmask(DenyCategoriesMask, #eParCtlCategoryViolence))
DenyCategoryUncens = $SettCheck text(capitalize($ParCtlCategoryUncens)) v(bmask(DenyCategoriesMask, #eParCtlCategoryUncens))
[ParCtlUserSettings_Navigator_WorkArea_WebContent_Tab_Categories_Group_M]
$SettCheck = $Check at(singleline) xy(0,7)
DenyCategoryWeapons = $SettCheck text(capitalize($ParCtlCategoryWeapons)) v(bmask(DenyCategoriesMask, #eParCtlCategoryWeapons))
DenyCategoryGambling = $SettCheck text(capitalize($ParCtlCategoryGambling)) v(bmask(DenyCategoriesMask, #eParCtlCategoryGambling))
DenyCategoryWebMail = $SettCheck text(capitalize($ParCtlCategoryWebMail)) v(bmask(DenyCategoriesMask, #eParCtlCategoryWebMail))
DenyCategoryShops = $SettCheck text(capitalize($ParCtlCategoryShops)) v(bmask(DenyCategoriesMask, #eParCtlCategoryShops))
DenyCategorySocialNets = $SettCheck text(capitalize($ParCtlCategorySocialNets)) v(bmask(DenyCategoriesMask, #eParCtlCategorySocialNets))
[ParCtlUserSettings_Navigator_WorkArea_WebContent_Tab_Categories_Group_R]
$SettCheck = $Check at(singleline) xy(0,7)
DenyCategoryProxy = $SettCheck text(capitalize($ParCtlCategoryProxy)) v(bmask(DenyCategoriesMask, #eParCtlCategoryProxy))
DenyCategoryCreditCards = $SettCheck text(capitalize($ParCtlCategoryCreditCards)) v(bmask(DenyCategoriesMask, #eParCtlCategoryCreditCards))
DenyCategoryChat = $SettCheck text(capitalize($ParCtlCategoryChat)) v(bmask(DenyCategoriesMask, #eParCtlCategoryChat))
DenyCategoryCasualGames = $SettCheck text(capitalize($ParCtlCategoryCasualGames)) v(bmask(DenyCategoriesMask, #eParCtlCategoryCasualGames))
;----------ParCtlUserSettings_Navigator_WorkArea_Download--------------------
[ParCtlUserSettings_Navigator_WorkArea_Download]
@ = ns(FileDownloadControl) h(17534)
Header = f("Header6KGreen")
Sep1 = a(sa) sz(p,1) xy(,7) b(SettingsVertSep)
Description = a(la) xy(,8)
Enable = $Check xy(,23) v(Enabled) f("Header0")
Sep2 = a(sa) sz(p,1) xy(,25) b(SettingsVertSep)
Header2 = f("Header3Lite") a(la) xy(,13) enable(Enabled)
FileTypesList = [FileDownloadControl_File]
[FileDownloadControl_File]
@ = a(sa) sz(p,p) xy(,11) rs(100,0) b(System) enable(Enabled)
List = [FileDownloadControl_FileTypesList] a(sa)
Toolbar = [Grid.Toolbar.Template] a(lt) b() t(listtoolbar) subst( Add(use(0)) Edit(use(0)) Delete(use(0)) \
AllowDeny(use(1) $TB_Btn subst(Icon(i(!ctl.parent.parent.List.seldata().Enabled? s_Ico(#ICO_BLOCK_16) : s_Ico(#ICO_UNBLOCK_16)))) onclick( edit( ((Enabled = !Enabled),true)) ) ) \
)
[FileDownloadControl_FileTypesList]
@ = $ListToolbar sz(p,p) alias(vector) v(Items) bg("White") at(noborder,singlesel) onshow(ctl.focus()) enable(FileDownloadControl.Enabled)
ItemName = sz(250,a) xy(8) v(Enabled) text(capitalize(s_ParCtlEx_FileCategory(Name)))
ItemState = sz(300,a) text(s_DownloadCategoryState(!Enabled)) f(!Enabled? "Normal_Green":"Normal_Red")
;----------ParCtlUserSettings_Navigator_WorkArea_SafeSearch--------------------
[ParCtlUserSettings_Navigator_WorkArea_SafeSearch]
@ = ns(SafeSearch) h(17633)
Header = f("Header6Lite")
Sep1 = a(sa) sz(p,1) xy(,7) b(SettingsVertSep)
Description = a(la) xy(,11)
Enable = $Check xy(,17) v(Enabled) f("Header0KGreen")
;---- ParCtlUserSettings_Navigator_WorkArea_IM_Usage ----
[ParCtlUserSettings_Navigator_WorkArea_IM_Usage]
@ = ns(IMControl) h(17404)
Header = f("Header6KGreen")
Sep1 = a(sa) sz(p,1) xy(,7) b(SettingsVertSep)
Description = a(la) xy(,8)
Enable = $Check xy(,23) v(Enabled) f("Header0")
Sep2 = a(la) sz(p,1) xy(,25) b(SettingsVertSep)
Header2 = f("Header3Lite") a(la) xy(,13) enable(Enabled)
Contacts = [ParCtlUserSettings_Navigator_WorkArea_IM_Usage_Contacts] xy(,11,,29) enable(Enabled)
Other = $Check a(lb) v(BlockOther) enable(Enabled)
[BtnGlassGreen]
@ = t(bmpbutton) at(noowncontent,btnlike) ext(1)
L = bg("BtnGlass26Left") a(lt)
R = bg("BtnGlass26Right") a(rt)
M = bg("BtnGlass26Middle") sz(p) xy(6,,6)
Text = a(cc) sz(a,a) f("KtsHead_White") extprm(1)
[BtnGlassRed]
@ = t(bmpbutton) at(noowncontent,btnlike) ext(1)
L = bg("BtnGlass26RedLeft") a(lt)
R = bg("BtnGlass26RedRight") a(rt)
M = bg("BtnGlass26RedMiddle") sz(p) xy(6,,6)
Text = a(cc) sz(a,a) f("KtsHead_White") extprm(1)
[ParCtlUserSettings_Navigator_WorkArea_IM_Usage_Contacts]
@ = a(sa) sz(p,p) rs(100,0) b(System)
List = [ParCtlUserSettings_Navigator_WorkArea_IM_Usage_Contacts_List]
Toolbar = [Grid.Toolbar.Template] a(lt) b() t(listtoolbar) subst(\
Add( onclick(add(dialog("IMControl_Add", p_data(IMControl.Contacts), p_blocked(ctl.parent.parent.parent.Other.value) ))) ) \
AllowDeny( use(1) enable(depend(ctl.List.selcount()) == 1) $TB_Btn subst(Icon(i(ctl.parent.parent.List.seldata().Blocked? s_Ico(#ICO_UNBLOCK_16) : s_Ico(#ICO_BLOCK_16) ))) onclick(edit(((Blocked = !Blocked),true))) ) \
Edit( onclick(dialog("IMControl_History", p_data(ctl.List.seldata().Id))) subst(Icon(i("ParCtlExAll16,4"))) )\
)
[ParCtlUserSettings_Navigator_WorkArea_IM_Usage_Contacts_List]
@ = $ListToolbar a(la) at(noborder) alias(vector) v(Contacts) unique(Id==tolower(newItem.Id),(balloon("ImContactReplaced", p_imContactId(Id));true)) onchange(ctl.parent.updatedata())
Name = sz(180) i(f_GetImTypeIco(Id)) text(Id) sort(,sortup) at(clickable) onrclick(menu("Settings_IM_Usage_Contacts.menu"))
Description = sz(150) text(Name) at(clickable) onrclick(menu("Settings_IM_Usage_Contacts.menu"))
Action = sz(90) text(s_BlockedEx(Blocked)) f(Blocked? "Normal_Red":"Normal_Green") at(clickable) onrclick(menu("Settings_IM_Usage_Contacts.menu"))
[Settings_IM_Usage_Contacts.menu]
@ = t(menu) bg("MenuIconBg")
AllowDeny = t(menuitem) i(ctl.parent.parent.List.seldata().Blocked? s_Ico(#ICO_UNBLOCK_16) : s_Ico(#ICO_BLOCK_16) ) onclick(ctl.parent.parent.Toolbar.AllowDeny.click())
History = t(menuitem) i("ParCtlExAll16,4") onclick(ctl.parent.parent.Toolbar.Edit.click())
Change = t(menuitem) i("ParCtlExAll16,20") onclick(ctl.paretn.parent.List.edit(dialog("[SNControl_Edit] alias(settings)")))
Delete = t(menuitem) i("listctrls,2") onclick(ctl.parent.parent.Toolbar.Delete.click())
;---------------------------------- IMControl_History dialog ----------------------------------
[IMControl_History]
@ = [StyledWindowT] at(dragable,resizable,a_ok,a_cancel) h(34729) oninit(var p; p = IMControl.Contacts.find("Id==" + toExpr(p_data), #vAdd, "Id="+toExpr(p_data)) ) subst( BodyEx( [IMControl_History_Body] ) ) sz(500,500) alias(taskedit) ns(ParCtl)
[IMControl_History_Body]
@ = sz(p,p)
Header = [IMControl_History_Header]
List = [IMControl_History_List] a(la) sz(p,p) oninit(ctl.setfilter("ContactId == " + toExpr(p_data)))
[IMControl_History_Header]
@ = a(lt) sz(p,a) mg(11,11) bg("ColorLGrey")
BigIcon = a(lt) i(s_GetImTypeBigIcon(ctl.parent.List.finddata("true").AppID)) sz(64,64)
Contact = a(as) xy(17) [IMControl_Users_Combo]
Name = a(sa) text(IMControl.Contacts.find("Id == " + toExpr(p_data)).Name) f("Normal_Grey")
Status = a(sb) [IMControl_History_StatusDeny]
AllowButton = a(rb) xy(4) [BtnGlassGreen] sz(200,a) subst(Text()) visible( IMControl.Contacts.find("Id == " + toExpr(p_data)).Blocked) onclick(IMControl.Contacts.find("Id == " + toExpr(p_data)).Blocked = false)
DenyButton = a(rb) xy(4) [BtnGlassRed] sz(200,a) subst(Text(text(ctl.text))) visible(!IMControl.Contacts.find("Id == " + toExpr(p_data)).Blocked) onclick(IMControl.Contacts.find("Id == " + toExpr(p_data)).Blocked = true)
[IMControl_Users_Combo]
@ = t(combo) sz(a) v(p_data) items(vector(IMControl.Contacts) v(Id) text(Id)) onchange(ctl.parent.List.setfilter("ContactId == " + toExpr(ctl.value)) )
[IMControl_History_StatusDeny]
Icon = i(IMControl.Contacts.find("Id == " + toExpr(p_data)).Blocked ? "RedSemaphorSmall" : "GreenSemaphorSmall")
Text = a(as) f("Normal")
Status = a(as) text(" " + s_Blocked(IMControl.Contacts.find("Id == " + toExpr(p_data)).Blocked)) f(IMControl.Contacts.find("Id == " + toExpr(p_data)).Blocked? "Normal_Red":"Normal_Green")
[IMControl_History_List]
@ = $List alias(events.ParCtlEx.IM) at(noheader,singlesel,rememberdata,nosearch)
row = [IMControl_History_List_Row]
[IMControl_History_List_Row]
@ = sz(p,a) at(custom) f("Description") mg(5,5,5,5)
Info = xy(5) sz(70,a) text(datetime(DateTime))
DenyIcon = xy(5) a(sa) i(s_IcoMessageAccessStatus(AccessStatus))
ColSeverity = xy(5) a(as) i(s_ParCtlEx_SeverityIconEx(#eParCtlEx_SeverityWarning))
DirectionIcon= xy(5) a(la) i(s_IcoMessageDirection(Direction))
Sender = xy(75) a(lt) text((Direction == #eParCtlEx_DirectionInbound ? f_ParCtlEx_GetIMContactName(UserName, ContactId) : f_UserName(UserName)) + ":") f("Normal_Bold")
MessageText = a(sa) text(MessageText) f(AccessStatus == #eParCtlEx_AccessBlocked ? "Description" : "KtsDescriptionRed")
[IMControl_Add]
@ = [StyledWindowT] at(dragable,a_ok,a_cancel) subst( BodyEx( [IMControl_Add_Body] ) ) sz(500,500) h(17488) btns(Ok(enable(ctl.ValueId.value))) onok( \
if( ctl.ValueId.value, (Name=ctl.ValueName.value;Id=ctl.ValueId.value;Blocked=!p_blocked; true), false) \
)
[IMControl_Add_Body]
@ = sz(p,p) oninit(l_IMContacts = parctl_getIMContacts(p_data); p_blocked)
ValueName = t(v)
ValueId = t(v)
Header = sz(p,190) [IMControl_Add_Header]
Line = sz(p,1) a(la) xy() bg("WizardLine")
HistoryArea = sz(p,p) a(sa) [IMControl_History_List] visible(false)
HistoryEmpty = sz(p,p) a(sa) ta(cc) f("DescriptionDGrey_Italic") visible(!ctl.HistoryArea.visible)
[IMControl_Add_Header]
@ = bg("TopNavigator") mg(15,15,15,15)
AddContact = a(lt) xy(3) f("Normal_Bold_Black")
ContactsButton = a(la) xy(,10) [IMControl_Add_Type] sz(150,a)
Contacts = a(as) xy(10) [IMControl_Add_Contacts]
[IMControl_Add_Contacts]
@ = sz(p,p)
FromContacts = a(lt) [IMControl_Add_FromContacts] sz(p,p) visible(!ctl.parent.ContactsButton.value)
ManualAdd = a(lt) [IMControl_Add_Manual] sz(p,p) visible(ctl.parent.ContactsButton.value)
[IMControl_Add_Type]
@ = at(enum)
FromContacts = [AddContactButtonT] a(lt) v(0) sz(p, 20) onclick(if(ctl.parent.List.selcount() == 1,ctl.parent.HistoryArea.visible = true))
ManualAdd = xy(,9) [AddContactButtonT] a(sa) v(1) sz(p, 20) onclick(ctl.parent.HistoryArea.visible = false)
[AddContactButtonT]
@ = bg("AddContactButton,2,0,2,2,2,1") sz(pa) at(noowncontent, radiolike) mg(10,2)
Text = text(ctl.parent.text)
[IMControl_Add_FromContacts]
@ = alias(taskview) ns(ParCtl) onshow(ctl.ValueId.value=ctl.Contact.value)
Contact = t(edit) a(as) sz(p, 20) at(readonly,nofocus) text(ctl.List.seldata().Id)
Descr = a(sb) [IMControl_Add_FromContacts_Descr]
List = a(sp) sz(p,p) xy(,3,,22) [IMControl_Contacts_List]
[IMControl_Add_FromContacts_Descr]
@ = sz(p,a) rs(100,0) onshow(ctl.ValueName.value=ctl.Name.value)
NameDesc = a(lt) xy(,0) f("Normal_Black")
Name = a(sa) xy(,5) t(edit) sz(p,20) onchange(ctl.ValueName.value = ctl.text)
[IMControl_Add_Manual]
@ = sz(p,p) onshow(ctl.ValueName.value=ctl.Name.value;ctl.ValueId.value=ctl.Contact.value)
ContactDesc = a(lt) xy(,10) f("Normal_Black")
Contact = a(sa) xy(,5) t(edit) sz(p, 20) onchange(ctl.ValueId.value = ctl.text)
NameDesc = a(sa) xy(,15) f("Normal_Black")
Name = a(sa) xy(,5) t(edit) sz(p,20) onchange(ctl.ValueName.value = ctl.text)
[IMControl_Contacts_List]
@ = $List alias(vector) v(l_IMContacts.IMContacts) at(noheader) \
onfocus(ctl.ValueId.value=ctl.seldata().Id;ctl.parent.HistoryArea.setfilter(debug("ContactId == " + toExpr(ctl.seldata().Id)));ctl.parent.HistoryArea.visible = true)
column = text(Id)
;---- ParCtlUserSettings_Navigator_WorkArea_SN_Usage ----
[ParCtlUserSettings_Navigator_WorkArea_SN_Usage]
@ = ns(SNControl) h(31635)
Header = f("Header6KGreen")
Sep1 = a(sa) sz(p,1) xy(,7) b(SettingsVertSep)
Description = a(la) xy(,8)
Enable = $Check xy(,23) v(Enabled) f("Header0")
Sep2 = a(sa) sz(p,1) xy(,25) b(SettingsVertSep)
Header2 = f("Header3Lite") a(la) xy(,13) enable(Enabled)
ContactsArea = [ParCtlUserSettings_Navigator_WorkArea_SN_Usage_ContactsArea]
[ParCtlUserSettings_Navigator_WorkArea_SN_Usage_ContactsArea]
@ = a(la) sz(p,p) oninit(l_SNContactsCount = Contacts.size()) ontimer(500, (var prev; var obj; prev = l_SNContactsCount; if(!l_SNContactsCount, (obj = parctl_getSNContacts(); l_SNContactsCount=obj.SNContacts.size()) ); if(prev!=l_SNContactsCount,ctl.updatedata()) ) )
Empty = a(lt) sz(p,p) ta(cc) bg("White") b(BlockBorder) f("DescriptionDGrey_Italic") xy(,10) visible(!l_SNContactsCount)
Contacts = a(lt) [ParCtlUserSettings_Navigator_WorkArea_SN_Usage_Contacts] xy(,11,,29) enable(Enabled) visible(l_SNContactsCount)
Other = $Check a(lb) v(BlockOther) enable(Enabled) visible(l_SNContactsCount)
[ParCtlUserSettings_Navigator_WorkArea_SN_Usage_Contacts]
@ = a(la) sz(p,p) rs(100,0) b(System)
List = [ParCtlUserSettings_Navigator_WorkArea_SN_Usage_Contacts_List]
Toolbar = [Grid.Toolbar.Template] a(lt) b() t(listtoolbar) subst( \
Add( onclick(add(dialog("SNControl_Add"))) ) \
Edit( onclick(edit(dialog("SNControl_Edit_History", p_data(ctl.parent.parent.List.seldata()),p_User(p_User)))) subst(Icon(i("ParCtlExAll16,4"))) ) \
AllowDeny( use(1) $TB_Btn subst(Icon(i(ctl.parent.parent.List.seldata().Blocked? s_Ico(#ICO_UNBLOCK_16) : s_Ico(#ICO_BLOCK_16) ))) onclick( edit(((Blocked = !Blocked),true)) ) ) \
)
[ParCtlUserSettings_Navigator_WorkArea_SN_Usage_Contacts_List]
@ = $ListToolbar a(la) at(noborder) alias(vector) v(Contacts) unique(Id==tolower(newItem.Id),(balloon("ImContactReplaced", p_imContactId(Id));true)) onchange(ctl.parent.updatedata())
Id = sz(220) text(Id) sort(,sortup) at(clickable) onrclick(menu("Settings_SN_Usage_Contacts.menu"))
Name = sz(130) text(Name) at(clickable) onrclick(menu("Settings_SN_Usage_Contacts.menu"))
Action = sz(90) text(s_Blocked(Blocked)) f(Blocked? "Normal_Red":"Normal_Green") at(clickable) onrclick(menu("Settings_SN_Usage_Contacts.menu"))
[Settings_SN_Usage_Contacts.menu]
@ = t(menu) bg("MenuIconBg")
AllowDeny = t(menuitem) i(ctl.parent.parent.List.seldata().Blocked? s_Ico(#ICO_UNBLOCK_16) : s_Ico(#ICO_BLOCK_16) ) onclick(ctl.parent.parent.Toolbar.AllowDeny.click())
History = t(menuitem) i("ParCtlExAll16,4") onclick(ctl.parent.parent.Toolbar.Edit.click())
Delete = t(menuitem) i("listctrls,2") onclick(ctl.parent.parent.Toolbar.Delete.click())
;-----------------------SNControl_Edit_History-----------------------
[SNControl_Edit_History]
@ = [StyledWindowT] at(dragable,resizable,a_ok,a_cancel) subst( BodyEx( [SNControl_Edit_History_Body] ) ) alias(taskedit) ns(ParCtl) sz(520,220) h(24810)
[SNControl_Edit_History_Body]
@ = a(lt) sz(p,p) rs(100,100) oninit(\
l_obj = parctl_getSNContacts(); \
ctl.ValueAlias.value=p_data.Id \
)
ValueAlias = t(v)
Header = [SNControl_Edit_History_Body_Header]
ListArea = [SNControl_Edit_History_Body_ListArea]
[SNControl_Edit_History_Body_Header]
@ = a(lt) sz(p,a) rs(100,100) mg(11,11) bg("ColorLGrey") ns(users.find("UserId == " + toExpr(p_User)).settings)
BigIcon = a(lt) i(s_GetImTypeBigIcon(ctl.parent.ListArea.List.finddata("true").AppID)) sz(64,64)
Contact = a(as) xy(17) [SNControl_Edit_History_Users_Combo]
Status = a(sb) [SNControl_Edit_History_Status]
AllowButton = a(rc) xy(4) [BtnGlassGreen] sz(200,a) subst(Text()) visible( SNControl.Contacts.find("Id == " + toExpr(ctl.Contact.value)).Blocked) onclick(var p; p=l_obj.SNContacts.find("Id=="+toExpr(ctl.Contact.value)); SNControl.Contacts.find("Id==" + toExpr(p.Id), #vAdd, ("Id="+toExpr(p.Id)+";Name="+toExpr(p.Alias))).Blocked = false)
DenyButton = a(rc) xy(4) [BtnGlassRed] sz(200,a) subst(Text(text(ctl.text))) visible(!SNControl.Contacts.find("Id == " + toExpr(ctl.Contact.value)).Blocked) onclick(var p; p=l_obj.SNContacts.find("Id=="+toExpr(ctl.Contact.value)); SNControl.Contacts.find("Id==" + toExpr(p.Id), #vAdd, ("Id="+toExpr(p.Id)+";Name="+toExpr(p.Alias))).Blocked = true)
[SNControl_Edit_History_Users_Combo]
@ = t(combo) sz(a) v(ctl.top.ValueAlias.value) items(vector(const(l_obj.SNContacts)) v(Id) text(f_ParCtlEx_GetSNContactName_Ex(Id,Alias)) ) onchange(ctl.parent.parent.ListArea.List.setfilter("ContactId == " + toExpr(ctl.value)+"&& UserName == "+toExpr(p_User)) )
[SNControl_Edit_History_Status]
@ = a(sb) sz(a,a)
Icon = i(SNControl.Contacts.find("Id == " + toExpr(ctl.parent.Contact.value)).Blocked ? "RedSemaphorSmall" : "GreenSemaphorSmall")
Text = a(as) f("Normal")
Status = a(as) text(" " + s_Blocked(SNControl.Contacts.find("Id == " + toExpr(ctl.parent.Contact.value)).Blocked)) f(SNControl.Contacts.find("Id == " + toExpr(ctl.parent.Contact.value)).Blocked? "Normal_Red":"Normal_Green")
[SNControl_Edit_History_Body_ListArea]
@ = a(la) sz(p,p)
Separator = $StdAreaSeparator
List = [SNControl_Edit_History_List] a(la) xy(,1)
[SNControl_Edit_History_List]
@ = $List alias(events.ParCtlEx.SNControl) at(noborder,noheader,singlesel,rememberdata,nosearch) oninit(ctl.setfilter(p_period, 1)) filter(ContactId == p_data.Id && UserName == p_User) refresh(100)
row = [ParCtlReportSNControlDetails_List_Row]
;-----------------------SNControl_Add-----------------------
[SNControl_Add]
@ = [StyledWindowT] at(dragable,a_ok,a_cancel) subst( BodyEx( [SNControl_Add_Body] ) ) sz(500,500) h(39774) btns(Ok(enable(ctl.ValueAlias.value))) onok(Name=ctl.ValueAlias.value;Id=ctl.ValueId.value;Proto=ctl.ValueProto.value;true)
[SNControl_Add_Body]
@ = sz(p,p)
ValueAlias = t(v)
ValueId = t(v)
ValueProto = t(v)
Header = [SNControl_Add_Body_Header]
HistoryArea = [SNControl_Add_Body_History]
[SNControl_Add_Body_Header]
@ = a(lt) sz(p,130) rs(100,0) bg("ColorLGrey") mg(9,9,9,9)
AddContact = a(lt) f("Normal10_Bold")
ContactsArea = [SNControl_Add_ContactsArea]
[SNControl_Add_ContactsArea]
@ = a(as) xy(24) sz(p,p)
SearchEdit = [SystemMonitor_Search] a(lt) subst( \
Filter(onchange(ctl.Contacts.setfilter("wildcard(" + toExpr("*" + ctl.value + "*") + ", ctl.Contacts.rowdatatext(), 3)", 100);if(!ctl.Contacts.seldata(),ctl.top.ValueAlias.value=""))) )
Contacts = [SNControl_Add_ContactsArea_Contacts] a(sa) xy(,2)
[SNControl_Add_ContactsArea_Contacts]
@ = $List at(noheader,clickable,rememberdata) alias(vector) sz(p,p) oninit(l_obj =parctl_getSNContacts()) v(l_obj.SNContacts) onfocus(ctl.top.ValueAlias.value=ctl.seldata().Alias;ctl.top.ValueId.value=ctl.seldata().Id;ctl.top.ValueProto.value=ctl.seldata().Proto; ctl.top.HistoryArea.HistoryList.setfilter(debug("ContactId == " + toExpr(ctl.seldata().Id))))
AliasItem = text(Alias)
[SNControl_Add_Body_History]
@ = a(la) sz(p,p) rs(100,100)
Separator = $StdAreaSeparator
EmptyHistory = sz(p,p) a(lt) xy(,1) ta(cc) f("DescriptionDGrey_Italic") visible(!ctl.top.ValueAlias.value)
HistoryList = [ParCtlReportSNControlDetails_List] a(lt) xy(,1) sz(p,p) visible(ctl.top.ValueAlias.value)
;--- ParCtlUserSettings_Navigator_WorkArea_PersonalInfo ---
[ParCtlUserSettings_Navigator_WorkArea_PersonalInfo]
@ = ns(PersonalInfo) h(17405)
Header = f("Header6KGreen")
Sep1 = a(sa) sz(p,1) xy(,7) b(SettingsVertSep)
Description = a(la) xy(,8)
Enable = $Check xy(,23) v(Enabled) f("Header0")
Sep2 = a(sa) sz(p,1) xy(,25) b(SettingsVertSep)
Header2 = f("Header3Lite") a(la) xy(,13) enable(Enabled)
Data = [ParCtlUserSettings_Navigator_WorkArea_PersonalInfo_Data] enable(Enabled)
[ParCtlUserSettings_Navigator_WorkArea_PersonalInfo_Data]
@ = a(sa) sz(p,p) xy(,11) bg("TableBigHeader") rs(100,0) b(System)
List = [ParCtlUserSettings_Navigator_WorkArea_PersonalInfo_List]
Toolbar = [Grid.Toolbar.Template] a(lt) b() t(listtoolbar) subst( \
Add(onclick(add(dialog("PersonalInfo_Edit")))) \
Edit(onclick(edit(dialog("PersonalInfo_Edit")))) \
)
[ParCtlUserSettings_Navigator_WorkArea_PersonalInfo_ToolBar]
@ = a(la) sz(p,30) rs(100,0)
Add = a(lc) sz(a,a) xy(16) at(btnlike) i("listctrls,0") onclick(ctl.parent.parent.List.add(dialog("[PersonalInfo_Edit] alias(settings)")) )
Delete = a(ac) sz(a,a) xy(16) at(btnlike) i("listctrls,2") onclick(ctl.parent.parent.List.delete() ) enable(ctl.parent.parent.List.seldata())
Change = a(ac) sz(a,a) xy(16) at(btnlike) i("listctrls,1") onclick(ctl.parent.parent.List.edit(dialog("[PersonalInfo_Edit] alias(settings)")) ) enable(ctl.parent.parent.List.seldata())
[ParCtlUserSettings_Navigator_WorkArea_PersonalInfo_List]
@ = $ListToolbar at(noborder,clickable) alias(vector) v(Items) onchange(ctl.parent.updatedata()) unique(Name==newItem.Name || tolower(Word)==tolower(newItem.Word),(balloon("PersonalInfoReplaced");true))
Data = text(Word) sort(tolower(Word),sortup) at(clickable)
Descr = text(Name) at(clickable)
;--- ParCtlUserSettings_Navigator_WorkArea_Keywords ---
[ParCtlUserSettings_Navigator_WorkArea_Keywords]
@ = ns(Keywords) h(17406)
Header = f("Header6KGreen")
Sep1 = a(sa) sz(p,1) xy(,7) b(SettingsVertSep)
Description = a(la) xy(,8)
Enable = $Check xy(,23) v(Enabled) f("Header0")
Sep2 = a(sa) sz(p,1) xy(,25) b(SettingsVertSep)
Header2 = f("Header3Lite") a(la) xy(,13) enable(Enabled)
Data = [ParCtlUserSettings_Navigator_WorkArea_Keywords_Data] enable(Enabled)
[ParCtlUserSettings_Navigator_WorkArea_Keywords_Data]
@ = a(sa) sz(p,p) xy(,11) rs(100,0) b(System)
List = [ParCtlUserSettings_Navigator_WorkArea_Keywords_List]
Toolbar = [Grid.Toolbar.Template] a(lt) b() t(listtoolbar) subst( \
Add(onclick(add(dialog("Keyword_Edit")))) \
Edit(onclick(edit(dialog("Keyword_Edit")))) \
)
[ParCtlUserSettings_Navigator_WorkArea_Keywords_List]
@ = $ListToolbar a(la) sz(p,p) at(noborder,noheader) alias(vector) v(Items) unique(tolower(Name)==tolower(newItem.Name),(balloon("KeywordReplaced", p_keyword(Name));true))
Name = text(Name) sort(tolower(Name),sortup) at(clickable)
;--- ParCtlUserSettings_Navigator_WorkArea_ComputerUsage --
[ParCtlUserSettings_Navigator_WorkArea_ComputerUsage]
@ = ns(ComputerControl) h(17407)
Header = f("Header6KGreen")
Sep1 = a(sa) sz(p,1) xy(,7) b(SettingsVertSep)
Description = a(la) xy(,8)
Enable = $Check xy(,23) v(Enabled) f("Header0")
Sep2 = a(sa) sz(p,1) xy(,25) b(SettingsVertSep)
WeekLimitCheck = $Check xy(,26) v(ScheduleLimit.Enabled) enable(Enabled)
WeekLimit = a(la) xy(20,16) sz(p,180) t(weekplan) at($WeekPlanAttr) f("Normal") v(ScheduleLimit.WeekTimeSpace) enable(ScheduleLimit.Enabled&&Enabled)
DayLimitCheck = $Check xy(,40) v(DayLimit.Enabled) enable(Enabled)
DayLimit = a(as) t(timeedit) xy(7,-5) sz(80,22) at(seconds, 24h, notz) v(DayLimit.Daylimit) enable(DayLimit.Enabled&&Enabled)
;---- ParCtlUserSettings_Navigator_WorkArea_AppUsage ----
[ParCtlUserSettings_Navigator_WorkArea_AppUsage]
@ = ns(AppControl) h(17408)
Header = f("Header6KGreen")
Sep1 = a(sa) sz(p,1) xy(,7) b(SettingsVertSep)
Description = a(la) xy(,8)
Enable = $Check xy(,23) v(Enabled) f("Header0")
Sep2 = a(sa) sz(p,1) xy(,25) b(SettingsVertSep)
Header2 = f("Header3Lite") a(la) xy(,13) enable(Enabled)
Apps = [ParCtlUserSettings_Navigator_WorkArea_AppUsage_Apps] xy(,11) enable(Enabled)
[ParCtlUserSettings_Navigator_WorkArea_AppUsage_Apps]
@ = a(sa) sz(p,p) rs(100,0) b(System)
List = [ParCtlUserSettings_Navigator_WorkArea_AppUsage_Apps_List]
Toolbar = [Grid.Toolbar.Template] a(lt) b() t(listtoolbar) subst( \
Add(onclick( if((product.Local), add(dialog("AppUsage_Edit")), balloon("ForLocalUsageOnly")) )) \
AllowDeny(use(1) $TB_Btn subst(Icon(i(ctl.parent.List.seldata().Blocked? s_Ico(#ICO_UNBLOCK_16) : s_Ico(#ICO_BLOCK_16)))) onclick( edit((Blocked = !Blocked, true) ) )) \
Edit( onclick(edit(dialog("AppUsage_Edit")) )) \
)
[ParCtlUserSettings_Navigator_WorkArea_AppUsage_Apps_List]
$GetAppUsageStatus = if(Blocked, 0, if( DayLimit.Enabled||ScheduleLimit.Enabled, 2,1) )
$GetAppUsageStatusFont = if(Blocked, "Normal_Red", if( DayLimit.Enabled||ScheduleLimit.Enabled, "Normal_Yellow","Normal_Green") )
@ = $ListToolbar alias(vector) v(Applications) unique(AppID == newItem.AppID,(balloon("ApplicationReplaced",p_appId(AppID));true)) onchange1(ctl.parent.updatedata())
AppName = sz(220) text($AppName)
Action = sz(160) text(s_AppUsageText($GetAppUsageStatus)) f($GetAppUsageStatusFont)
;---- ParCtlUserSettings_Navigator_WorkArea_AddView ----
[ParCtlUserSettings_Navigator_WorkArea_AddView]
@ = h(18266) oninit(ctl.Enable.value = f_IsParCtlSettingsEnabled(Enabled)) onok(Enabled = ctl.Enable.value; true)
Header = f("Header6KGreen")
Sep1 = a(sa) sz(p,1) xy(,7) b(SettingsVertSep)
Description = a(la) xy(,8)
Enable = $Check xy(,23) f("Header0") onchange(if(ctl.value, ctl.value = f_TryEnableParCtl(ctl.value)))
Sep2 = a(sa) sz(p,1) xy(,25) b(SettingsVertSep)
UserAliasGroup = f("Header3Lite") a(la) xy(,13)
AliasName = t(edit) a(la) sz(250,a) xy(,7) v(strAlias) onok(if(strAlias && f_ParCtlEx_IsUserAliasDuplicate(p_User,strAlias),(balloon("UserAliasAlreadyInUse");false),true))
UserAvatarGroup = f("Header3Lite") a(la) xy(,23)
UserAvatar = [ParCtlUserSettings_Navigator_WorkArea_AddView_UserAvatar] a(la) xy(,12)
ImportExportDesc = f("Header3Lite") a(la) xy(,28)
Export = $Button_Large a(la) xy(,14) onclick(if(browsefilesave(l_SaveFilePath, $BrowseForConfig, "pctl"), (f_IfErrThenMsg(cfgParCtrlSave(l_SaveFilePath, p_User, ser(p_User)), "SettingsOperationError");true)))
Import = $Button_Large a(as) xy(10) onclick( if(dialog("ImportUserSettingsDialog", p_data(users.find("UserId=="+toExpr(p_User))) ),(ctl.top.updatedata(),true) ))
[ParCtlUserSettings_Navigator_WorkArea_AddView_UserAvatar]
@ = sz(a,a) at(enum) v(strAvatarId)
Father = [ParCtlUserSettings_Navigator_WorkArea_AddView_UserAvatar_ItemT]
Mother = [ParCtlUserSettings_Navigator_WorkArea_AddView_UserAvatar_ItemT]
SonMajor = [ParCtlUserSettings_Navigator_WorkArea_AddView_UserAvatar_ItemT]
DotherMajor = [ParCtlUserSettings_Navigator_WorkArea_AddView_UserAvatar_ItemT]
SonMinor = [ParCtlUserSettings_Navigator_WorkArea_AddView_UserAvatar_ItemT]
DotherMinor = [ParCtlUserSettings_Navigator_WorkArea_AddView_UserAvatar_ItemT]
[ParCtlUserSettings_Navigator_WorkArea_AddView_UserAvatar_ItemT]
@ = at(radiolike) sz(a,a) a(at) xy(,,7)
Icon = sz(a,a) xy(2,2,2,2) i(s_ParCtlEx_UserAvatarId2Image(ctl.parent.id))
Sel = b(SettingsVertSep) sz(p,p) xy(,,3) visible(ctl.parent.selected || ctl.parent.hotlight)
;------------- ParCtl_BWUrl_Edit ------------------
[ParCtl_BWUrl_Edit_Allow]
@ = [StyledWindowT_Small] at(dragable,a_ok,a_cancel) subst( BodyEx( [ParCtl_BWUrl_Edit_Body_Allow] ) ) sz(380,a) btns(Ok(enable(f_IsValidUrl(ctl.Name.value)))) onok(((Blocked = false), true)) h(63100)
[ParCtl_BWUrl_Edit_Body_Allow]
@ = sz(p,a)
Prompt = sz(a,a)
Name = a(la) t(edit) sz(p,a) v(Name) extprm(1) at(ignorertl) oninit(if(!Name,Name = "http://")) xy(,5)
Policy = a(la) [ParCtl_BWUrl_Edit_Body_Allow_Policy] xy(,5)
[ParCtl_BWUrl_Edit_Body_Allow_Policy]
@ = sz(p,a) v(needExpandMask)
AllowAll = t(radio) v(true) a(la) sz(a,a) xy(0,5)
Allow = t(radio) v(false) a(la) sz(a,a) xy(0,3)
[ParCtl_BWUrl_Edit_Deny]
@ = [StyledWindowT_Small] at(dragable,a_ok,a_cancel) subst( BodyEx( [ParCtl_BWUrl_Edit_Body_Deny] ) ) sz(380,a) btns(Ok(enable(f_IsValidUrl(ctl.Name.value)))) onok(Blocked = true) h(63101)
[ParCtl_BWUrl_Edit_Body_Deny]
@ = sz(p,a)
Prompt = sz(a,a)
Name = a(la) t(edit) sz(p,a) v(Name) extprm(1) at(ignorertl) oninit(if(!Name,Name = "http://")) xy(,5)
Policy = a(la) [ParCtl_BWUrl_Edit_Body_Deny_Policy] xy(,5)
[ParCtl_BWUrl_Edit_Body_Deny_Policy]
@ = sz(p,a) v(needExpandMask)
BlockAll = t(radio) v(true) a(la) sz(a,a) xy(0,5)
Block = t(radio) v(false) a(la) sz(a,a) xy(0,3)
;------------------- WebContent_Exclusions_Edit -----------------------
[WebContent_Exclusions_Edit]
@ = [StyledWindowT] at(dragable,a_ok,a_cancel) subst( BodyEx( [WebContent_Exclusions_Edit_Body] ) ) sz(560,a) h(55961)
[WebContent_Exclusions_Edit_Body]
@ = sz(p,a) mg(7,7,7,7)
Header = a(la) xy(,7) f("Header3Lite")
Sep1 = a(sa) sz(p,1) xy(,7) b(SettingsVertSep)
Description = a(la) xy(,11)
WhiteList = a(la) sz(a,a) xy(,13)
WList = a(la) [WebContent_Exclusions_Edit_Body_WList]
BlackList = a(la) sz(a,a) xy(,13)
BList = a(la) [WebContent_Exclusions_Edit_Body_BList]
[WebContent_Exclusions_Edit_Body_WList]
@ = a(sa) sz(p,a) rs(100,0) b(System)
List = a(sa) [WebContent_Exclusions_Edit_Body_WList_List]
Toolbar = [Grid.Toolbar.Template] a(lt) b() t(listtoolbar) subst(Add(onclick(add(dialog("ParCtl_BWUrl_Edit_Allow")))) Edit(onclick(edit(dialog("ParCtl_BWUrl_Edit_Allow")))))
[WebContent_Exclusions_Edit_Body_WList_List]
@ = $ListToolbar sz(p,120) at(noheader, noborder) alias(vector) v(BlackWhiteList) filter(!Blocked) unique(Name==newItem.Name,(balloon("WebURLReplaced", p_url(Name));true)) onchange1(ctl.parent.updatedata())
URL = text(Name) sort(,sortup)
[WebContent_Exclusions_Edit_Body_BList]
@ = a(sa) sz(p,a) rs(100,0) b(System)
List = a(sa) [WebContent_Exclusions_Edit_Body_BList_List]
Toolbar = [Grid.Toolbar.Template] a(lt) b() t(listtoolbar) subst(Add(onclick(add(dialog("ParCtl_BWUrl_Edit_Deny")))) Edit(onclick(edit(dialog("ParCtl_BWUrl_Edit_Deny")))))
[WebContent_Exclusions_Edit_Body_BList_List]
@ = $ListToolbar sz(p,120) at(noheader, noborder) alias(vector) v(BlackWhiteList) filter(Blocked) unique(Name==newItem.Name,(balloon("WebURLReplaced", p_url(Name));true)) onchange1(ctl.parent.updatedata())
URL = text(Name) sort(,sortup)
;------------------- AppUsage_Edit -----------------------
[AppUsage_Edit]
@ = [StyledWindowT] at(dragable,a_ok,a_cancel) subst( BodyEx( [AppUsage_Edit_Body] ) ) sz(560,a) oninit(AppAlias=$AppName) \
btns(Ok(enable((ctl.AppPath.value && AppAlias) || (!product.Local)))) \
onapply(if((product.Local),(AppID = moduleAppId(ctl.AppPath.value), AppHash = filehash(ctl.AppPath.value))); AppAlias=$AppName; AddTime = utctime(); true) h(55960)
[AppUsage_Edit_Body]
$crossBrowseApp = ( $IsKAV ? browseapp(ctl.AppPath.value) : browseappex(ctl.AppPath.value) )
; ----
$parOnCl_Cond_0 = AppID = moduleAppId(ctl.AppPath.value)
$parOnCl_Cond_1 = if( isUncontrolledApp(AppID), ctl.AppPath.balloon("AppNotControlled") )
$parOnCl_Cond_2 = AppAlias = $AppName; updatedata()
$parOnCl = if( $crossBrowseApp, ($parOnCl_Cond_0; $parOnCl_Cond_1; $parOnCl_Cond_1) )
; ----
@ = sz(p,a) mg(7,7,7,7)
AppLabel = a(la) f("Header3Lite")
AppButton = $Button_Medium a(ra) xy(,5) enable(!l_DisableAppIDEdit) onclick( $parOnCl ) visible(product.Local)
AppPath = t(edit) a(ps) xy(3,2) sz(p,a) oninit(ctl.value = f_AppInfo(AppID).sImagePath) at(readonly) onok(if(isUncontrolledApp(AppID),(balloon("AppNotControlled");false),true)) visible(product.Local)
AllowDeny = [AppUsage_Edit_Body_AllowDeny] xy(,13)
TimeTable = [AppUsage_Edit_Body_TimeTable] xy(,16)
[AppUsage_Edit_Body_AllowDeny]
@ = a(la) sz(p,a) v(Blocked)
Deny = $Radio v(1)
Allow = $Radio v(0) xy(,11)
[AppUsage_Edit_Body_TimeTable]
@ = a(la) sz(p,a) mg(14,19,14,15) enable(!Blocked)
LogAppEvents = $Check v(Logging) enable(!(ScheduleLimit.Enabled||DayLimit.Enabled))
WeekLimitCheck = $Check xy(,15) v(ScheduleLimit.Enabled) onchange(if(DayLimit.Enabled|ScheduleLimit.Enabled,Logging=1, ctl.LogAppEvents.enabled=1))
WeekLimit = t(weekplan) a(la) xy(20,18) sz(p,180) at($WeekPlanAttr) f("Normal") v(ScheduleLimit.WeekTimeSpace) enable(ScheduleLimit.Enabled)
DayLimitCheck = $Check xy(,33) v(DayLimit.Enabled) onchange(if(DayLimit.Enabled|ScheduleLimit.Enabled,Logging=1, ctl.LogAppEvents.enabled=1))
DayLimit = a(as) xy(10,-5) t(timeedit) sz(80,22) at(seconds, 24h, notz) v(DayLimit.Daylimit) enable(DayLimit.Enabled)
;------------------- IMControl_Edit -----------------------
[IMControl_Edit]
@ = [StyledWindowT_Small] at(dragable,a_ok,a_cancel) subst( BodyEx( [IMControl_Edit_Body] ) ) sz(350,a) h(24721) btns(Ok(enable(!(Id==""))))
[IMControl_Edit_Body]
@ = sz(p,a)
Description = a(la)
AddressLabel = a(la) xy(,7) f("Normal_Bold")
Address = t(edit) a(la) xy(,7) sz(p,a) v(Id)
AllowDeny = t(check) a(la) xy(,7) f("Normal_Bold") v(Blocked)
DescrLabel = a(la) xy(,7) f("Normal_Bold")
Title = t(edit) a(la) xy(,7) sz(p,a) v(Name)
;------------------- SNControl_Edit -----------------------
[SNControl_Edit]
@ = [StyledWindowT_Small] at(dragable,a_ok,a_cancel) subst( BodyEx( [SNControl_Edit_Body] ) ) sz(350,a) h(24721) btns(Ok(enable(!(Id==""))))
[SNControl_Edit_Body]
@ = sz(p,a)
Description = a(la)
IdLabel = a(la) xy(,7) f("Normal_Bold")
Id = t(edit) at(readonly) a(la) xy(,7) sz(p,a) v(Id)
AliasLabel = a(la) xy(,7) f("Normal_Bold")
Alias = t(edit) a(la) xy(,7) sz(p,a) v(Name)
AllowDeny = t(check) a(la) xy(,7) f("Normal_Bold") v(Blocked)
;----------------- PersonalInfo_Edit ----------------------
[PersonalInfo_Edit]
@ = [StyledWindowT_Small] at(dragable,a_ok,a_cancel) subst( BodyEx( [PersonalInfo_Edit_Body] ) ) sz(350,a) h(17489) btns(Ok(enable((!(Word==""))&&(!(Name=="")))))
[PersonalInfo_Edit_Body]
@ = sz(p,a)
Description = a(la)
AddressLabel = a(la) xy(,7) f("Normal_Bold")
Address = t(edit) a(la) xy(,7) sz(p,a) v(Word)
DescrLabel = a(la) xy(,7) f("Normal_Bold")
Content = t(edit) a(la) xy(,7) sz(p,a) v(Name)
;----------------- Keyword_Edit ----------------------
[Keyword_Edit]
@ = [StyledWindowT_Small] at(dragable,a_ok,a_cancel) subst( BodyEx( [Keyword_Edit_Body] ) ) sz(350,a) h(17491) btns(Ok(enable(!(Name==""))))
[Keyword_Edit_Body]
@ = sz(p,a)
Description = a(la)
NameLabel = a(la) xy(,7) f("Normal_Bold")
Name = t(edit) a(la) xy(,7) sz(p,a) v(Name)
;----------------- shared window footer for next two windows ----------------------
[ParCtlEx_TerminateTimeoutWindow_Footer]
@ = a(lb) sz(p,$DialogPanelSizeY)
panel = [DialogPanel] subst(BtnsGroup(use(0)) Bckgnd(bg(f_IsTimeCriticalPeriod(TerminateTime) ? "DlgFooterYellow" : "DlgFooter")) )
Close = [BtnGlass24] a(rb) xy($Button_Shift,$Button_Shift) onclick(close())
[ParCtlEx_AppTerminateTimeoutWindow_Footer]
@ = a(lb) sz(p,$DialogPanelSizeY) ext(1)
panel = [DialogPanel] subst(BtnsGroup(use(0)) Bckgnd(bg("DlgFooterYellow")) )
Close = [BtnGlass28] a(rb) xy($Button_Shift,$Button_Shift) onclick(close())
Request = [BtnGlass28] a(pb) xy($Button_Shift,$Button_Shift) onclick(f_ParCtl_ShowWindow("", CurrentUserSID, true)) extprm(1)
MoreTime = [BtnGlass28] a(pb) xy($Button_Shift,$Button_Shift) onclick(f_ParCtl_ShowWindow("", CurrentUserSID, true)) extprm(1)
[ParCtlEx_AppCloseTimeoutWindow_Footer]
@ = a(lb) sz(p,$DialogPanelSizeY)
panel = [DialogPanel] subst(BtnsGroup(use(0)) Bckgnd(bg("DlgFooter")) )
Close = [BtnGlass24] a(rb) xy($Button_Shift,$Button_Shift) onclick(close())
;----------------- ParCtlEx_AppCloseTimeoutWindow ----------------------
[ParCtlEx_AppCloseTimeoutWindow]
$attr = dragable,a_close,alwaysontop,noautofocus,customfooter,nohelp
;---
@ = [StyledWindowT_Small] at($attr) subst( Footer( [ParCtlEx_AppTerminateTimeoutWindow_Footer] subst(Request(use(0))) ) BodyEx( [ParCtlEx_AppCloseTimeoutWindow_Body] ) ) sz(560,a) ns(p_data) h(20865) ontimer(100, updatedata() )
[ParCtlEx_AppCloseTimeoutWindow_Body]
@ = $DlgBodyAttr sz(p,a) a(lt) mg(20,20,20,20) ext(1)
Image = a(rb) bg("Time") sz(189,189)
Header = [ParCtlEx_AppDescBlock] a(lt) sz(p,a)
AppInfo = [ParCtlEx_AppInfoBlock] a(la) xy(5,60) extprm(1)
WarningText = [ParCtlEx_AppWarnBlock] a(sa) xy(,60)
[ParCtlEx_AppInfoBlock]
@ = sz(p,a) mg(0,0,0,0) ext(1)
AppIcon = sz(a,a) a(lt) xy(5,5) i(mergeIcon(getIcon(f_AppInfo(AppID).sImagePath,"unkobj",1),"IconLimit,2"))
AppNameDesc = sz(a,a) a(lt) at(singleline) xy(50,5)
AppName = sz(p,a) a(as) at(singleline) text($AppName) xy(,-1) f("Header1")
AppPublisherDesc = sz(a,a) a(lt) at(singleline) xy(50,22)
AppPublisher = sz(p,a) a(as) at(singleline) text($AppVendor)
[ParCtlEx_AppWarnBlock]
@ = sz(p,a)
Descr = f("SecondWndDescription") a(la)
TerminateTimeout = f("SecondWndHeader0") text(var cur_time; cur_time = utctime(); timestamp(if(depend(CloseTime) > cur_time, depend(CloseTime) - cur_time, 0))) a(sa) xy(,7)
[ParCtlEx_AppDescBlock]
@ = sz(p,a)
TitleText = f("SecondWndHeader1") a(la)
NotifyText = f("SecondWndDescription") a(la) xy(,7)
;----------------- ParCtlEx_AppTerminateTimeoutWindow -----------------
[ParCtlEx_AppTerminateTimeoutWindow]
$attr = dragable,a_close,alwaysontop,noautofocus,customfooter,nohelp
@ = [StyledWindowT_Small] at($attr) subst( Footer([ParCtlEx_AppTerminateTimeoutWindow_Footer] subst(Request(use(0)))) BodyEx( [ParCtlEx_AppTerminateTimeoutWindow_Body] ) ) sz(420,a) ns(p_data) h(20865) ontimer(30000,parctl_close_app(p_data))
[ParCtlEx_AppTerminateTimeoutWindow_Body]
@ = $DlgBodyAttr sz(p,a) mg(20,10) ext(1)
AppInfo = [ParCtlEx_AppInfoBlock] a(lt) extprm(1)
ClosureText = a(la) xy(50,23) f("Normal9")
Bottom = [ParCtlEx_App_Bottom] a(la) sz(p,a)
;----------------- ParCtlEx_QuitAppCloseGuiWarningWindow -----------------
[ParCtlEx_QuitAppCloseGuiWarningWindow]
$attr = dragable,a_close,alwaysontop,noautofocus,customfooter,nohelp
@ = [StyledWindowT_Small] at($attr) subst( Footer([ParCtlEx_AppTerminateTimeoutWindow_Footer] subst(MoreTime(use(0)))) BodyEx( [ParCtlEx_QuitAppCloseGuiWarningWindow_Body] ) ) sz(560,a) ns(p_data) h(20865)
[ParCtlEx_QuitAppCloseGuiWarningWindow_Body]
@ = $DlgBodyAttr sz(p,a) mg(20,20,20,20) ext(1)
Image = a(rb) bg("smile_medium")
ClosureText = a(pt) sz(p,a) f("SecondWndHeader1")
ClosureText2 = a(la) f("SecondWndDescription") xy(,7)
AppInfo = [ParCtlEx_AppInfoBlock] a(la) xy(,40) extprm(1)
[ParCtlEx_QuitAppDescBlock]
@ = sz(p,a)
NotifyText = f("KtsDescriptionGrey") a(la) xy(,7)
;----------------- ParCtlEx_InternetTerminateTimeoutWindow ----------------------
[ParCtlEx_InternetTerminateTimeoutWindow]
$attr = dragable,a_close,alwaysontop,noautofocus,customfooter,nohelp
@ = [StyledWindowT_Small] at($attr) subst( Footer([ParCtlEx_TerminateTimeoutWindow_Footer]) BodyEx( [ParCtlEx_InternetTerminateTimeoutWindow_Body] ) ) sz(420,a) ns(p_data) h(21342) ontimer(100, updatedata(); if(TerminateTime <= utctime(), close()))
[ParCtlEx_InternetTerminateTimeoutWindow_Body]
@ = $DlgBodyAttr sz(p,a) a(lt) mg(20,20,10,20) ext(1)
WarningText = [ParCtlEx_InternetWarnBlock] a(sa)
Sep = sz(p,1) b(SettingsVertSep) a(sa) xy(50,15)
WarningText = [ParCtlEx_InternetDescBlock] a(sa)
[ParCtlEx_InternetWarnBlock]
@ = sz(p,a) mg(0,0,0,0) ext(1)
Icon = sz(a,a) a(lt) xy(0,0) i("IconLimit,1")
Descr = sz(a,a) a(lt) xy(50,0) f("Normal9")
TerminateTimeout = sz(a,a) a(lt) xy(50,15) f("Header3") text(timestamp(depend(TerminateTime) - utctime())) a(sa) xy(,7)
[ParCtlEx_InternetDescBlock]
@ = sz(p,a)
NotifyText = f("KtsDescriptionGrey") a(la) xy(,7)
;----------------- ParCtlEx_ComputerTerminateTimeoutWindow ----------------------
[ParCtlEx_ComputerTerminateTimeoutWindow]
$attr = dragable,a_close,alwaysontop,noautofocus,customfooter,nohelp
@ = [StyledWindowT_Small] at($attr) subst( Footer([ParCtlEx_TerminateTimeoutWindow_Footer]) BodyEx( [ParCtlEx_ComputerTerminateTimeoutWindow_Body] ) ) sz(420,a) ns(p_data) h(21344) ontimer(100, updatedata(); if(TerminateTime <= utctime(), close()))
[ParCtlEx_ComputerTerminateTimeoutWindow_Body]
@ = sz(p,230) a(lt) alias(taskview) ns(ParCtl) mg(20,20,10,20)
AppInfo = [ParCtlEx_CpuInfoBlock] a(lt) xy(0,0) extprm(1)
;;;WarningText = [ParCtlEx_CpuWarnBlock] a(sa) xy(,7)
Sep = sz(300,1) b(SettingsVertSep) a(sa) xy(65,15)
WarningText = [ParCtlEx_AppDescBlock] a(sa) xy(,7)
ParCtlStop = t(hotlink) sz(300,30) mg(10,10,10,10) a(sa) xy(,15) f("Header0Lite") i("ParCtlOptionsIcon,2") bg(ctl.hotlight ? "HilightBtn" : "") onclick(if(checkPassword(#pwdc_OpenParctl,"ParCtl"), (users.find("UserId=="+toExpr(CurrentUserSID)).settings.Enabled = 0; if(f_IfErrThenMsg(savesettings(), "SettingsOperationError"), ctl.close() ))))
[ParCtlEx_CpuInfoBlock]
@ = sz(p,a) mg(0,0,0,0) ext(1)
CpuIcon = sz(a,a) a(lt) xy(10,10) i("IconLimit,0")
CpuUsageDesc = sz(a,a) a(lt) f("Header1") xy(65,10)
TerminateTimeout = f("Header3") text(timestamp(depend(TerminateTime) - utctime())) a(sa) xy(,7)
[ParCtlEx_CpuWarnBlock]
@ = sz(p,a) a(as) xy(,15)
Descr = f("Description") a(ct) xy(15,5)
CpuUser = sz(a,a) a(as) text(f_UserNameSystem(UserId)) f("Header1")
; ---------------------- ImportUserSettingsDialog ------------------------------
[ImportUserSettingsDialog]
$ex1 = ( f_IfErrThenMsg(cfgParCtrlLoad(l_LoadFilePath,UserId,ser(UserId)),"SettingsLoadError") )
$ex2 = ( $cnd_if_1; $cnd_if_2 )
$cnd_if_1 = if(ctl.Buttons.RadioButtons.value==1,( if(l_SelectedSettings,(ser(UserId).settings=l_SelectedSettings;updatedata();true))))
$cnd_if_2 = if(ctl.Buttons.RadioButtons.value==2,( f_IfErrThenMsg(cfgParCtrlLoadTemplate(l_SelectedTemplate), "SettingsLoadError");updatedata();true))
$defOnOk = if(ctl.Buttons.RadioButtons.value==0, $ex1, $ex2)
; ---
@ = [StyledWindowT_Small] at(dragable,a_ok,a_cancel) subst( BodyEx( [ImportUserSettingsDialog_Body] ) ) sz(440,a) mg(0) ns(p_data) onok($defOnOk) h(18723) \
btns(Ok(enable(l_pctl != 0 || l_LoadFilePath))) oninit(l_pctl = 0)
[ImportUserSettingsDialog_Body]
Header = [ImportUserSettingsDialogHeader]
Buttons = [ImportUserSettingsDialogButtonsArea]
[ImportUserSettingsDialogHeader]
@ = a(lt) sz(p, a) xy(1,1) bg("White")
Icon = sz(a,a) i() i(s_ParCtlEx_UserAvatarId2Image(f_ParCtlEx_GetUserAvatar(UserId)))
HdrDescr = [ImportUserSettingsDialogHeader_HdrDescr]
[ImportUserSettingsDialogHeader_HdrDescr]
@ = a(as) sz(p,p) xy(10)
ImportSettingsMsg = a(lt) sz(p,a) at(singleline) a(lt) f("Header2")
Description = a(sa) xy(,5) f("DescriptionGrey")
[ImportUserSettingsDialogButtonsArea]
@ = a(sa) sz(p,a) xy(,12) bg("White")
ImportSource = a(lt) sz(a,a) f("Header0")
RadioButtons = [ImportUserSettingsDialogButtonsAreaRadioButtons]
[ImportUserSettingsDialogButtonsAreaRadioButtons]
@ = a(sa) sz(p,a) at(enum) oninit(l_CurrentId=UserId) v(l_pctl)
ImportFromFile = $Radio a(sa) xy(,13) v(0)
Button = [BtnGlass24] a(ra) xy(0,7) enable(ctl.parent.value==0) onclick(if(browsefileopen(l_LoadFilePath, $BrowseForConfig, "pctl"),true))
Edit = t(edit) sz(p,a) a(ps) xy(10,2,20) enable(ctl.parent.value==0) v(l_LoadFilePath) at(readonly)
;
ImportFromUser = $Radio a(la) xy(,17) v(1)
UserListCombo = t(combo) a(rs) xy(,-3,20,5) enable(ctl.parent.value==1) at(sorted) sz(200,a) items(vector(users) v(UserId) text(if( (UserId!=".DEFAULT"&&UserId!=".CHILD"&&UserId!=".TEENAGER")&&(UserId!=l_CurrentId), f_UserName(UserId)))) onchange(l_SelectedSettings=users.ser().findSettingsUserAccount(ctl.value).settings)
ImportFromTemplate = $Radio a(la) xy(,13) v(2)
TemplateListCombo = t(combo) a(rs) xy(,-3,20,0) enable(ctl.parent.value==2) sz(200,a) [ImportTemlates] v(l_SelectedTemplate)
; items(vector(users) v(UserId) text(if( (UserId!=".DEFAULT"&&UserId!=".CHILD"&&UserId!=".TEENAGER")&&(UserId!=l_CurrentId), f_UserName(UserId)))) onchange(l_SelectedSettings=users.ser().findSettingsUserAccount(ctl.value).settings)
[ImportTemlates]
0 = v(0)
1 = v(1)
; ---------------------- BrowseInstalledSoftwareDialog ------------------------------
[BrowseInstalledSoftwareDialog]
@ = [StyledWindowT] at(dragable,resizable,a_ok,a_cancel) subst( BodyEx( [BrowseInstalledSoftwareDialog_Body] ) ) sz(550,300) mg(0) at(resizable) rs(100,100) btns(Ok(enable(Name))) h(52282)
[BrowseInstalledSoftwareDialog_Body]
@ = sz(p,p) a(lt) mg(10,10,10,10)
Desc = [BrowseInstalledSoftwareDialog_Desc] a(sa)
Files = [BrowseInstalledSoftwareDialog_Files] a(sa)
[BrowseInstalledSoftwareDialog_Desc]
@ = sz(p,a)
Desc = sz(a,a) a(lt) f("Description")
Filter = sz(200) a(rt) t(edit) onchange(if(ctl.value,ctl.List.setfilter("wildcard(" + toExpr("*" + ctl.value + "*") + ", ctl.List.rowdatatext(), 3)", 100), ctl.List.setfilter("",100)))
[BrowseInstalledSoftwareDialog_Files]
@ = a(sa) sz(p,p) xy(,11) bg("TableBigHeader") rs(100,0) b(System)
Sep = a(sa) sz(p,1) b(SettingsVertSep)
L = [BrowseInstalledSoftwareDialog_List] a(sa)
[BrowseInstalledSoftwareDialog_List]
@ = at(enum) v(Name) sz(p,p)
List = [BrowseInstalledSoftwareDialog_ProgsListI] visible(true) id(Rating.ModuleInfo.sImagePath)
[BrowseInstalledSoftwareDialog_ProgsListI]
$displayName = (Id == #AppIdProduct ? $ProductName : f_AppNameEx(Rating.ModuleInfo))
@ = $List alias(vector.AllPrograms) at(sorted,rememberdata,singlesel,noborder) v(Applications)
;Program = [Programs_Program] text($displayName) i(s_AppIcon(Id)) sort(tolower($displayName))
Program = sz(200) text($displayName) i(s_AppIcon(Id)) sort(tolower($displayName)) group(AppProgramm, Rating.ModuleInfo.sVendor, default)
Vendor = sz(200) text(s_filterEmptyText(Rating.ModuleInfo.sVendor))
FilePath = sz(200) text(s_filterEmptyText(Rating.ModuleInfo.sImagePath))
;Tmp = sz(200) text("111")
;Parents = text(if(GroupInfo.Parents.size(),GroupInfo.Parents.format("objfile(f_AppInfo(e).sImagePath)", " > ") + " > " + objfile(Rating.ModuleInfo.sImagePath)))
;Status = [Programs_AllList_Status] i(mergeIcon(s_AppStatusIcon(HipsTask.state), GroupInfo.ByUser ? "Proc_status_owner,0,cc" : "Proc_status_owner,1,cc")) f(s_IsStateRunning(depend(HipsTask.state)) ? "Hotlink_Normal" : "Normal") at(clickable) text(f_AppStatusName(GroupInfo)) tt(f_AppStatusDetails(GroupInfo)) onclick(if(s_IsStateRunning(HipsTask.state),menu("ApplicationStatusMenu"))) onrclick(menu("Programs_AllList_Menu"))
;LastRun = [Programs_LastRun] a(r) text(s_date(dategroup(ExecuteInfo.nLastExecuteTime)))
;row = at(clickable) onrclick(menu("Programs_AllList_Menu"))
;views = [Programs_AllList.Views]
[BrowseInstalledSoftwareDialog_Object]
@ = sz(p,a) mg(10,10,10,10)
Desc = sz(a,a) a(lt) f("Header1")
Object = t(edit) at(readonly) v(Name) sz(p,a) a(sa) xy(,7)
; ---------------------- ParctlFirstStartDialog ------------------------------
[ParctlFirstStartDialog]
@ = [StyledWindowT_Small] at(dragable,a_close) subst( BodyEx( [ParctlFirstStartDialog_BodyEx] )) sz(450,a) h(25659)
[ParctlFirstStartDialog_BodyEx]
; BackupDialogHeader - блок не существует
;Header = [BackupDialogHeader] subst(Title() Descr())
Body = [ParctlFirstStartDialog.Body]
[ParctlFirstStartDialog.Body]
@ = a(la) sz(p,a) mg(15,15,15,15)
Descr = a(la) f("KtsDescriptionDGrey")
Create = [WizardButton] a(la) sz(p,a) xy(,10) subst(Name(f("KtsHeader1Green") xy(,1)) Descr(use(0))) onclick(if(dialog("[PasswordEdit] subst(Sett(subst(ParentalContlrol(oninit(AskForParCtl=1;AskWhenExitApp=1;AskWhenSaveSetting=1;ctl.enabled=0)))))", p_new(true)),close(#m_res_ok)))
DoNotShow = a(la) t(check) xy(,30) f("KtsDescriptionDGrey") onchange(productData("DisableParctlNoPasswordDialog") = ctl.value ? "1" : "")
;--------------------------------------------------------
[ParCtlMainWindow.Label]
@ = ext(1) at(btnlike) sz(a,26)
Bg = a(lc) sz(p,p) bg(ctl.parent.selected ? "KtsToolbarButtonBg,1" : ctl.parent.hotlight ? "KtsToolbarButtonBg,0" : "") xy(5,,5)
Left = a(lc) sz(5,p) bg(ctl.parent.selected ? "KtsToolbarButtonLeft,1" : ctl.parent.hotlight ? "KtsToolbarButtonLeft,0" : "")
Icon = a(ac) extprm(1)
Label = a(ac) f("KtsToolbarLink") extprm(1)
Right = a(ac) sz(5,p) bg(ctl.parent.selected ? "KtsToolbarButtonRight,1" : ctl.parent.hotlight ? "KtsToolbarButtonRight,0" : "")
;---------------------------------------------------------
;---------------------------------------------------------
;---------------------------------------------------------
[ParCtlRepSettMainWindow]
@ = [StyledWindowT] at(a_ok,a_apply,a_cancel,resizable,minimizable) sz(790,556) alias(taskedit) onapply(f_IfErrThenMsg(savesettings(), "SettingsOperationError") ) subst( Body( a(lt) -xy() -bg() ) BodyEx( [ParCtlRepSettMainWindow_BodyEx] ) ) ns(ParCtl) oninit()
[ParCtlRepSettMainWindow_BodyEx]
@ = sz(p,p) a(lt)
Bdy = [ParCtlRepSettMainWindow_Body]
PersonalInfo = [ParCtlRepSettMainWindow_PersonalInfo]
[ParCtlRepSettMainWindow_PersonalInfo]
@ = a(lt) sz(a,a) xy(23,46)
Icon = a(lt) sz(a,a) i(s_ParCtlEx_UserAvatarId2Image(f_ParCtlEx_GetUserAvatar(p_User))) enable(users.find("UserId=="+toExpr(p_User)).settings.Enabled)
Name = a(ac ) sz(130,a,,,,65) xy(10) f("Header6KGreen") text(f_UserName(p_User)) enable(users.find("UserId=="+toExpr(p_User)).settings.Enabled)
[ParCtlRepSettMainWindow_Body]
@ = $DlgBodyAttr a(lt) alias(navigator2) pages(WorkArea) suffix(MainWnd)
Navigator = [ParCtlRepSettMainWindow_Body_Navigator] xy(,6)
WorkArea = a(lt) sz(p,p) $dlg_body_xy rs(100,100) bg("ColorWindow")
[BtmTabLeft]
@ = sz($Tab_ParCtl_Left_CX,$Tab_ParCtl_CY) ext(1)
L = bg(ctl.parent.selected? "TabLeftWhite":"TabLeftGray") a(lt) sz(17,p) extprm(1)
R = bg(ctl.parent.selected? "TabRightWhite_A":"TabRightGray_A") a(rt) sz(10,p) extprm(1)
M = bg(ctl.parent.selected? "TabMidWhite":"TabMidGray") sz(p,p) xy(17,,10) extprm(1)
Cont = a(lc) ta(cc) sz(p,p) xy(17,,10) extprm(1)
[BtmTabRight]
@ = sz($Tab_ParCtl_Right_CX,$Tab_ParCtl_CY) ext(1)
L = bg(ctl.parent.selected? "TabLeftWhite_A":"TabLeftGray_A") a(lt) sz(10,p) extprm(1)
R = bg(ctl.parent.selected? "TabRightWhite":"TabRightGray") a(rt) sz(17,p) extprm(1)
M = bg(ctl.parent.selected? "TabMidWhite":"TabMidGray") sz(p,p) xy(10,,17) extprm(1)
Cont = a(lc) ta(cc) sz(p,p) xy(10,,17) extprm(1)
[ParCtlRepSettMainWindow_Body_Navigator]
@ = a(ct) sz(a,a) at(enum)
Settings = [BtmTabLeft] a(lt) at(radiolike) subst(Cont())
Report = [BtmTabRight] a(as) at(radiolike) subst(Cont())
[ParCtlRepSettMainWindow.MainWnd.Settings]
@ = [ParCtlRepSettMainWindow_Body_Settings] sz(p,p) ns(users.find("UserId=="+toExpr(p_User)).settings)
[ParCtlRepSettMainWindow.MainWnd.Report]
@ = [ParCtlRepSettMainWindow_Body_Report] sz(p,p) ns(users.find("UserId=="+toExpr(p_User)).settings)
[ParCtlRepSettMainWindow_Body_Settings]
@ = a(lt) sz(p,p) alias(navigator2) pages(WorkArea) suffix(Settings)
Navigator = [ParCtlUserSettings_Navigator]
SepVert = sz(1,p) a(at) b(SettingsVertSep) rs(0,0)
WorkArea = a(at) sz(p,470) rs(100,100) mg(12,7,12,22) xy(,15)
;WorkArea = [ParCtlUserSettings_Navigator_WorkArea] a(at) xy(,15)
[ParCtlRepSettMainWindow.Settings.InternetUsage]
@ = [ParCtlUserSettings_Navigator_WorkArea_InternetUsage] sz(p,p)
[ParCtlRepSettMainWindow.Settings.WebContent]
@ = [ParCtlUserSettings_Navigator_WorkArea_WebContent] sz(p,p)
[ParCtlRepSettMainWindow.Settings.Download]
@ = [ParCtlUserSettings_Navigator_WorkArea_Download] sz(p,p)
[ParCtlRepSettMainWindow.Settings.SafeSearch]
@ = [ParCtlUserSettings_Navigator_WorkArea_SafeSearch] sz(p,p)
[ParCtlRepSettMainWindow.Settings.IM_Usage]
@ = [ParCtlUserSettings_Navigator_WorkArea_IM_Usage] sz(p,p)
[ParCtlRepSettMainWindow.Settings.SN_Usage]
@ = [ParCtlUserSettings_Navigator_WorkArea_SN_Usage] sz(p,p)
[ParCtlRepSettMainWindow.Settings.PersonalInfo]
@ = [ParCtlUserSettings_Navigator_WorkArea_PersonalInfo] sz(p,p)
[ParCtlRepSettMainWindow.Settings.Keywords]
@ = [ParCtlUserSettings_Navigator_WorkArea_Keywords] sz(p,p)
[ParCtlRepSettMainWindow.Settings.ComputerUsage]
@ = [ParCtlUserSettings_Navigator_WorkArea_ComputerUsage] sz(p,p)
[ParCtlRepSettMainWindow.Settings.AppUsage]
@ = [ParCtlUserSettings_Navigator_WorkArea_AppUsage] sz(p,p)
[ParCtlRepSettMainWindow.Settings.AddView]
@ = [ParCtlUserSettings_Navigator_WorkArea_AddView] sz(p,p)
[ParCtlRepSettMainWindow_Body_Report]
@ = a(lt) sz(p,p) alias(navigator2) pages(WorkArea)
Navigator = [ParCtlUserReport_Navigator]
SepVert = sz(1,p) a(at) b(SettingsVertSep) rs(0,0)
WorkArea = sz(p,p) rs(100,100) a(at) mg(12,7,12,12) xy(,15)
;--------------------------------------------------------------
[ParCtlRepSettMainWindow.Statistics_Column]
@ = sz(220,a) ext(1)
Cont = a(lt) sz(p,a) extprm(1)
[ParCtlRepSettMainWindow.Statistics_ItemT]
@ = a(lt) sz(p,a) ext(1)
Icon = extprm(1)
Hdr = [ParCtlRepSettMainWindow.Statistics_HeaderT]
Body = a(sa) extprm(1)
[ParCtlRepSettMainWindow.Statistics_HeaderT]
@ = a(at) sz(p,a) xy(8)
Header = a(lt) sz(a,a) f("Header3Lite") extprm(1)
Descr = a(ac) sz(p,a) ta(lc) xy(4) at(singleline) f("Description") extprm(1)
[PCtrlValue]
@ = [Value] a(la) subst(Name(sz(160,a) at(singleline) f("Description")) Val(f("DescriptionBold") sz(p,a)) )
[ParCtlRepSettMainWindow.Statistics_Internet_Body]
@ = a(sa) sz(470,a) rs(0,100) xy(,7)
LeftCol = [ParCtlRepSettMainWindow.Statistics_Column] a(lt) subst(Cont([ParCtlRepSettMainWindow.Statistics_Internet_LeftCol]))
RightCol= [ParCtlRepSettMainWindow.Statistics_Column] a(rs) subst(Cont([ParCtlRepSettMainWindow.Statistics_Internet_RightCol]))
[ParCtlRepSettMainWindow.Statistics_Internet_LeftCol]
@ = a(lt) sz(p,a) ns(ctl.ser("WebSiteControlReportStatistics"))
Total = [PCtrlValue] subst(Name() Val(text(Count) ) )
Sep = a(la) sz(p,1) bg("GridGroup") xy(,6,,6)
Top1 = [PCtrlValue] subst(Name( text("1. " + Domains[0].Domain)) Val( text(Domains[0].Count)) ) visible(Domains.size() >= 1)
Top2 = [PCtrlValue] subst(Name( text("2. " + Domains[1].Domain)) Val( text(Domains[1].Count)) ) visible(Domains.size() >= 2)
Top3 = [PCtrlValue] subst(Name( text("3. " + Domains[2].Domain)) Val( text(Domains[2].Count)) ) visible(Domains.size() >= 3)
Sep = a(la) sz(p,1) bg("GridGroup") xy(,6,,6) visible(Domains.size() >= 1)
Blocked = [PCtrlValue] subst(Name() Val( text(CriticalCount)) )
[ParCtlRepSettMainWindow.Statistics_Internet_RightCol]
@ = ns(ctl.ser("FileDownloadControlReportStatistics"))
Total = [PCtrlValue] subst(Name() Val( text(Count)) )
Sep = a(la) sz(p,1) bg("GridGroup") xy(,6,,6)
Top1 = [PCtrlValue] subst(Name( text("1. " + Domains[0].Domain)) Val( text(Domains[0].Count)) ) visible(Domains.size() >= 1)
Top2 = [PCtrlValue] subst(Name( text("2. " + Domains[1].Domain)) Val( text(Domains[1].Count)) ) visible(Domains.size() >= 2)
Top3 = [PCtrlValue] subst(Name( text("3. " + Domains[2].Domain)) Val( text(Domains[2].Count)) ) visible(Domains.size() >= 3)
Sep = a(la) sz(p,1) bg("GridGroup") xy(,6,,6) visible(Domains.size() >= 1)
Blocked = [PCtrlValue] a(la) subst(Name() Val( text(CriticalCount)) )
[ParCtlRepSettMainWindow.Statistics_Meeting_Body]
@ = a(sa) sz(470,a) rs(0,100) xy(,7)
LeftCol = [ParCtlRepSettMainWindow.Statistics_Column] a(lt) subst(Cont([ParCtlRepSettMainWindow.Statistics_Meeting_LeftCol]))
RightCol= [ParCtlRepSettMainWindow.Statistics_Column] a(rs) subst(Cont([ParCtlRepSettMainWindow.Statistics_Meeting_RightCol]))
[ParCtlRepSettMainWindow.Statistics_Meeting_LeftCol]
@ = a(lt) sz(p,a)
Total = [PCtrlValue] subst(Name() Val( text(ctl.ser("InstantMessangerControlReportStatistics").Count + ctl.ser("SocialNetworkControlReportStatistics").Count )) )
Sep = a(la) sz(p,1) bg("GridGroup") xy(,6,,6)
TopN = [ParCtlRepSettMainWindow.Statistics_Meeting_LeftCol_TopN]
Blocked = [PCtrlValue] subst(Name() Val(text(ctl.ser("InstantMessangerControlReportStatistics").Critical+ctl.ser("SocialNetworkControlReportStatistics").Critical)) )
[ParCtlRepSettMainWindow.Statistics_Meeting_LeftCol_TopN]
@ = a(la) sz(p,a) ns(ctl.ser("InstantMessangerControlReportStatistics"))
Top1 = [PCtrlValue] subst(Name(text("1. " + f_ParCtlEx_GetIMContactName(UserName, Contacts[0].ContactId))) Val(text(Contacts[0].MsgCount)) ) visible(Contacts.size() >= 1)
Top2 = [PCtrlValue] subst(Name(text("2. " + f_ParCtlEx_GetIMContactName(UserName, Contacts[1].ContactId))) Val(text(Contacts[1].MsgCount)) ) visible(Contacts.size() >= 2)
Top3 = [PCtrlValue] subst(Name(text("3. " + f_ParCtlEx_GetIMContactName(UserName, Contacts[2].ContactId))) Val(text(Contacts[2].MsgCount)) ) visible(Contacts.size() >= 3)
Sep = a(la) sz(p,1) bg("GridGroup") xy(,6,,6) visible(Contacts.size() >= 1)
[ParCtlRepSettMainWindow.Statistics_Meeting_RightCol]
@ = a(lt) sz(p,a)
PersInfo= [PCtrlValue] subst(Name(sz(175,a)) Val(text(ctl.ser("PersonalInfoControlReportStatistics").Count)))
Keywords= [PCtrlValue] subst(Name() Val(text(ctl.ser("KeywordsControlReportStatistics").Count))) xy(,3)
[ParCtlRepSettMainWindow.Statistics_Computer_Body]
@ = a(sa) sz(470,a) rs(0,100) xy(,7)
LeftCol = [ParCtlRepSettMainWindow.Statistics_Column] a(lt) subst(Cont([ParCtlRepSettMainWindow.Statistics_Computer_LeftCol]))
RightCol= [ParCtlRepSettMainWindow.Statistics_Column] a(rs) subst(Cont([ParCtlRepSettMainWindow.Statistics_Computer_RightCol]))
[ParCtlRepSettMainWindow.Statistics_Computer_LeftCol]
@ = a(lt) sz(p,a)
AppBlocked = [PCtrlValue] subst(Name() Val(text(ctl.ser("AppControlReportStatistics").CriticalCount))) )
[ParCtlRepSettMainWindow.Statistics_Computer_RightCol]
@ = a(lt) sz(p,a)
Duration = [PCtrlValue] subst(Name() Val(text(timestamp(ctl.ser("ComputerControlReportStatistics").TotalTime))) ))
[ParCtlRepSettMainWindow.Statistics_Internet]
@ = [ParCtlRepSettMainWindow.Statistics_ItemT] subst( Icon(i("ParCtlExAll16,0")) Header() Body([ParCtlRepSettMainWindow.Statistics_Internet_Body]) Descr(visible(!ctl.ser("InternetUsageControlReportStatistics").TotalTime && !ctl.ser("WebSiteControlReportStatistics").Domains.size() && !ctl.ser("FileDownloadControlReportStatistics").Domains.size())) )
[ParCtlRepSettMainWindow.Statistics_Meeting]
@ = [ParCtlRepSettMainWindow.Statistics_ItemT] subst( Icon(i("ParCtlExAll16,1")) Header() Body([ParCtlRepSettMainWindow.Statistics_Meeting_Body]) Descr(visible(!ctl.ser("InstantMessangerControlReportStatistics").Count && !ctl.ser("SocialNetworkControlReportStatistics").Count)) )
[ParCtlRepSettMainWindow.Statistics_Computer]
@ = [ParCtlRepSettMainWindow.Statistics_ItemT] subst( Icon(i("ParCtlExAll16,2")) Header() Body([ParCtlRepSettMainWindow.Statistics_Computer_Body]) Descr(visible(!ctl.ser("ComputerControlReportStatistics").TotalTime&&!ctl.ser("AppControlReportStatistics").CriticalCount)) )
;--------------------------------------------
[ParCtlRepSettMainWindow.Statistics_StatArea]
@ = a(lt) sz(p,p)
Stat = [ParCtlRepSettMainWindow.Statistics_StatArea_Stat]
[ParCtlRepSettMainWindow.Statistics_StatArea_Stat]
@ = a(lt) sz(p,p) at(enum, rememberdata) alias(statex) prm("ParCtl:" + serid("SocialNetworkControlReportStatistics"), serid("InternetUsageControlReportStatistics"), serid("WebSiteControlReportStatistics"), serid("FileDownloadControlReportStatistics"), serid("InstantMessangerControlReportStatistics"), serid("ComputerControlReportStatistics"), serid("AppControlReportStatistics"), serid("KeywordsControlReportStatistics"), serid("PersonalInfoControlReportStatistics"))
Sep = a(lt) sz(p,1) b(SettingsVertSep) xy(,1,,20)
Internet = [ParCtlRepSettMainWindow.Statistics_Internet] a(la)
Sep1 = a(sa) sz(p,20)
Meeting = [ParCtlRepSettMainWindow.Statistics_Meeting] a(sa)
Sep2 = a(sa) sz(p,20)
Computer = [ParCtlRepSettMainWindow.Statistics_Computer] a(sa)
Sep3 = a(sa) sz(p,p)
;--------------------------------------------
[ParCtlRepSettMainWindow.AddView]
@ = ext(1) [ParCtlUserReport_Navigator_WorkArea_PageT] subst( Title() PeriodSwitch(subst(IsChange($ParCtlUserReport_TimeRange_PeriodSwitch_NoArea_OnChange) )) ListArea(use(0)) StatArea([ParCtlRepSettMainWindow.Statistics_StatArea]) subst(Header(use(0)) )) h(17402)
[ParCtlRepSettMainWindow.ComputerUsage]
@ = ext(1) [ParCtlUserReport_Navigator_WorkArea_PageT] subst( Title() PeriodSwitch(subst(IsChange($ParCtlUserReport_TimeRange_PeriodSwitch_OnChange) )) List([ParCtlUserReport_Navigator_WorkArea_ComputerUsage_List]) Stat([ParCtlUserReport_Navigator_WorkArea_TimeUsage_Stat] prm("ParCtl:" + serid("ComputerControlReportStatistics")) subst(SubHeader() Header(use(0)) )) ) h(17504)
[ParCtlRepSettMainWindow.AppUsage]
@ = ext(1) [ParCtlUserReport_Navigator_WorkArea_PageT] subst( Title() PeriodSwitch(subst(IsChange($ParCtlUserReport_TimeSingle_PeriodSwitch_OnChange) )) List([ParCtlUserReport_Navigator_WorkArea_ApplicationUsage_List]) Stat([ParCtlUserReport_Navigator_WorkArea_ApplicationUsage_Stat]) Toolbar(subst(ListActions([ParCtlUserReport_ApplicationUsage_List_Actions]))) ) h(17505)
[ParCtlRepSettMainWindow.InternetUsage]
@ = ext(1) [ParCtlUserReport_Navigator_WorkArea_PageT] subst( Title() PeriodSwitch(subst(IsChange($ParCtlUserReport_TimeRange_PeriodSwitch_OnChange) )) List([ParCtlUserReport_Navigator_WorkArea_InternetUsage_List]) Stat([ParCtlUserReport_Navigator_WorkArea_TimeUsage_Stat] prm("ParCtl:" + serid("InternetUsageControlReportStatistics") ) subst(SubHeader() Header(use(0)) ) )) h(17494)
[ParCtlRepSettMainWindow.WebContent]
@ = ext(1) [ParCtlUserReport_Navigator_WorkArea_PageT] subst( Title() PeriodSwitch(subst(IsChange($ParCtlUserReport_TimeSingle_PeriodSwitch_OnChange) )) List([ParCtlUserReport_Navigator_WorkArea_InternetWebContent_List]) Stat([ParCtlUserReport_Navigator_WorkArea_InternetWebContent_Stat]) Toolbar(subst(ListActions([ParCtlUserReport_InternetWebContent_List_Actions]))) ) h(17495)
[ParCtlRepSettMainWindow.Download]
@ = ext(1) [ParCtlUserReport_Navigator_WorkArea_PageT] subst( Title() PeriodSwitch(subst(IsChange($ParCtlUserReport_TimeSingle_PeriodSwitch_OnChange) )) List([ParCtlUserReport_Navigator_WorkArea_InternetDownload_List]) Stat([ParCtlUserReport_Navigator_WorkArea_InternetDownload_Stat]) Toolbar(subst(ListActions([ParCtlUserReport_InternetDownload_List_Actions]))) ) h(17496)
[ParCtlRepSettMainWindow.IM_Usage]
@ = ext(1) [ParCtlUserReport_Navigator_WorkArea_PageT] subst(Title() PeriodSwitch(subst(IsChange($ParCtlUserReport_TimeSingle_PeriodSwitch_OnChange) )) List([ParCtlUserReport_Navigator_WorkArea_MessagingIM_List]) Stat([ParCtlUserReport_Navigator_WorkArea_MessagingIM_Stat]) Toolbar(subst(ListActions([ParCtlUserReport_MessagingIM_List_Actions]))) ) h(17497)
[ParCtlRepSettMainWindow.SN_Usage]
@ = ext(1) [ParCtlUserReport_Navigator_WorkArea_PageT] subst( Title() PeriodSwitch(subst(IsChange($ParCtlUserReport_TimeSingle_PeriodSwitch_OnChange) )) List([ParCtlUserReport_Navigator_WorkArea_SNControl_List]) Stat([ParCtlUserReport_Navigator_WorkArea_SNControl_Stat]) Toolbar(subst(ListActions([ParCtlUserReport_SNControl_List_Actions]))) ) h(31636)
[ParCtlRepSettMainWindow.PersonalInfo]
@ = ext(1) [ParCtlUserReport_Navigator_WorkArea_PageT] subst( Title() PeriodSwitch(subst(IsChange($ParCtlUserReport_NoStat_PeriodSwitch_OnChange) )) List([ParCtlUserReport_Navigator_WorkArea_MessagingPersonalData_List]) StatArea(xy(0,0)) Stat([ParCtlUserReport_Navigator_WorkArea_MessagingPersonalData_Stat] use(0) ) ) h(17503)
[ParCtlRepSettMainWindow.Keywords]
@ = ext(1) [ParCtlUserReport_Navigator_WorkArea_PageT] subst( Title() PeriodSwitch(subst(IsChange($ParCtlUserReport_NoStat_PeriodSwitch_OnChange) )) List([ParCtlUserReport_Navigator_WorkArea_MessagingKeywords_List]) StatArea(xy(0,0)) Stat([ParCtlUserReport_Navigator_WorkArea_MessagingKeywords_Stat] use(0)) ) h(17533)
[ParCtlUserReport_Navigator_WorkArea_SNControl_List]
@ = $ListToolbar alias(events.ParCtlEx.SNControl) refresh(100) sz(p,p) ext(1)
Severity = $ColSeverity at(clickable) onrclick(menu("Report_SNControl_List.Menu"))
Direction = sz(80) i("ParCtlExAll16," + (Direction == #eParCtlEx_DirectionInbound ? 10 : 11)) text("") at(clickable) onrclick(menu("Report_SNControl_List.Menu"))
Contact = sz(100) group(ParCtlEx_SN_ContactId, ContactId, default) text(Direction == #eParCtlEx_DirectionInbound ? f_ParCtlEx_GetSNContactName(UserName, ContactId) : f_UserName(UserName)) at(clickable) onrclick(menu("Report_SNControl_List.Menu"))
MessageText = sz(200) text(MessageText) at(clickable) onrclick(menu("Report_SNControl_List.Menu"))
Time = sz(120) text(datetime(DateTime)) sort(index,sortup) at(clickable) onrclick(menu("Report_SNControl_List.Menu"))
[Report_SNControl_List.Menu]
$GetListSelData = (ctl.List.isNode ? (ctl.List.agg.ContactId ? ctl.List.finddata("ContactId == " + toExpr(ctl.List.agg.ContactId) ) : NULL) : ctl.List.seldata())
$GetListSelContactId = (ctl.List.isNode ? ctl.List.agg.ContactId : ctl.List.seldata().ContactId)
$GetListSelContactAlias = (ctl.List.isNode ? ctl.List.agg.ContactAlias : ctl.List.seldata().ContactAlias)
$GetListData = SNControl.Contacts.find("Id==" + toExpr($GetListSelContactId))
@ = t(menu) bg("MenuIconBg")
AllowDeny = i(if($GetListData.Blocked,s_Ico(#ICO_UNBLOCK_16), s_Ico(#ICO_BLOCK_16) )) onclick(ctl.parent.parent.Toolbar.AllowDeny.click())
History = i("listctrls,10") onclick(ctl.parent.parent.Toolbar.Edit.click())
[Grid.Groups]
ParCtlEx_SN_ContactId = [ParCtlEx_SN_ContactId_Group]
[ParCtlEx_SN_ContactId_Group]
@ = sz(p,30) mg(,,,2) rs(100,0) onaggrow(agg.ContactId = ContactId; agg.ContactAlias = ContactAlias; if(!agg.Severity, agg.Severity = #eParCtlEx_SeverityInfo); if(agg.Severity > Severity, agg.Severity = Severity); if(AccessStatus == #eParCtlEx_AccessBlocked, agg.Blocked = agg.Blocked + 1))
Severity = a(ac) xy(20) i(s_ParCtlEx_SeverityIcon(agg.Severity))
Contact = a(ac) sz(a,a) text(f_ParCtlEx_GetSNContactName(agg.ContactId, agg.ContactAlias)) f(ctl.parent.selected && ctl.List.focused ? "GridGroupSel" : "GridGroup")
Info = a(ac) sz(a,a) xy(,,10)
[ParCtlUserReport_SNControl_List_Actions]
$GetListSelData = (ctl.List.isNode ? (ctl.List.agg.ContactId ? ctl.List.finddata("ContactId == " + toExpr(ctl.List.agg.ContactId) ) : NULL) : ctl.List.seldata())
$GetListSelContactId = (ctl.List.isNode ? ctl.List.agg.ContactId : ctl.List.seldata().ContactId)
$GetListSelContactAlias = (ctl.List.isNode ? ctl.List.agg.ContactAlias : ctl.List.seldata().ContactAlias)
$GetListData = SNControl.Contacts.find("Id==" + toExpr($GetListSelContactId))
@ = ext(1) sz(a,a) enable($GetListSelData)
AllowDeny = [TB_Button] xy(0) subst(Icon(i(if($GetListData.Blocked,s_Ico(#ICO_UNBLOCK_16), s_Ico(#ICO_BLOCK_16) )))) onclick(var l_contactId; var l_contactAlias; var p; l_contactId = $GetListSelContactId; l_contactAlias = $GetListSelContactAlias; p = SNControl.Contacts.find("Id==" + toExpr(l_contactId), #vAdd, "Id="+toExpr(l_contactId) +";Name="+toExpr(l_contactAlias)); p.Blocked = !p.Blocked )
Edit = [TB_Button] subst(Icon(i("listctrls,10"))) onclick(dialog("[ParCtlReportSNControlDetails] ns(SNControl)", p_data($GetListSelData), p_period(f_ParCtlEx_Events_PeriodFilter(ctl.PeriodBegin.value, ctl.PeriodEnd.value))))
[ParCtlUserReport_Navigator_WorkArea_SNControl_Stat]
@ = alias(statex) prm("ParCtl:" + serid("SocialNetworkControlReportStatistics")) ext(1) sz(p,a) mg(0,12,0,0)
Header = a(lt) f("Header1") visible(Contacts.size())
SubHeader = a(la) f("Description") xy(,7,,5) visible(Contacts.size())
Data = [ParCtlUserReport_Navigator_WorkArea_SNControl_Stat_Data] a(la) sz(p,110) rs(100,0) visible(Contacts.size())
[ParCtlUserReport_Navigator_WorkArea_SNControl_Stat_Data]
Top3 = [ParCtlUserReport_Navigator_WorkArea_SNControl_Stat_Top3] xy(,6)
Chart = [ParCtlUserReport_Navigator_WorkArea_SNControl_Stat_Chart]
[ParCtlUserReport_Navigator_WorkArea_SNControl_Stat_Top3]
@ = sz(a,a) rs(0,0) a(la) xy(,,10)
Top_1 = [ParCtlExReport_StatTopElem] visible(Contacts.size() >= 1) subst(Legend(bg("Chart2")) Number(text("1. ")) Text(text(f_ParCtlEx_GetSNContactName(Contacts.at(0).ContactId))) Descr() )
Top_2 = [ParCtlExReport_StatTopElem] visible(Contacts.size() >= 2) subst(Legend(bg("Chart3")) Number(text("2. ")) Text(text(f_ParCtlEx_GetSNContactName(Contacts.at(1).ContactId))) Descr() )
Top_3 = [ParCtlExReport_StatTopElem] visible(Contacts.size() >= 3) subst(Legend(bg("Chart4")) Number(text("3. ")) Text(text(f_ParCtlEx_GetSNContactName(Contacts.at(2).ContactId))) Descr() )
[ParCtlUserReport_Navigator_WorkArea_SNControl_Stat_Chart]
@ = $ChartStat mg(20,20) a(as) sz(p,p) at(disable_auto_tt)
Plot = t(chartplotarea)
AxisY = $ChartStatAxisY -b()
AxisX = $ChartStatAxisX xy(-5)
Top_1 = t(chartseries) visible(Contacts.size() >= 1) mg(10) bg("Chart2") v(Contacts.at(0).MsgCount) tt(s_TTMessagingIM_Chart(Contacts[0]))
Top_2 = t(chartseries) visible(Contacts.size() >= 2) mg(10) bg("Chart3") v(Contacts.at(1).MsgCount) tt(s_TTMessagingIM_Chart(Contacts[1]))
Top_3 = t(chartseries) visible(Contacts.size() >= 3) mg(10) bg("Chart4") v(Contacts.at(2).MsgCount) tt(s_TTMessagingIM_Chart(Contacts[2]))