%%%%%$$$$&&ABC%%%%%$$$$&&ABC%%%%%$$$$&&ABC%%%%%$$$$&&ABC%%%%%$$$$&&ABC%%%%%$$$$&&ABC%%%%%$$$$&&ABC%%%%%$$$$&&ABC%%%%%$$$$&&ABC%%%%%$$$$&&ABC%%%%%$$$$&&ABC%%%%%$$$$&&ABC%%%%%$$$$&&ABC0%%%%%$$$$&&ABC%%%%%$$$$&&ABC XBMP AlarmDVFilterif (AlarmDVFilter = "","0")((=0nSliderQtdChannelsnQtdChannels-6- RunMath[11]06 nAlrAux nAlrDevSel[0]63sDevCmbArray[0]"(None)"(None)AlrYear)If(AlrYear < 1998 Or AlrYear > 2100,Year)BB<4> AlarmDVFilter*If(nAlrAux=0,0,Num(sDevCmbArray[nAlrAux]))886=6 bScreenOpen0Q  AlrDayFrom'If(AlrDayFrom < 1 or AlrDayFrom > 31,1)<<<>nAlrAux nAlrModSel[0]64AlrDayTo%If(AlrDayTo < 1 or AlrDayFrom > 31,1)<<<>AlarmModFilterYIf(nAlrAux=0,0,If(sModCmbArray[nAlrAux].Cmb0 = "Comp",7,Num(sModCmbArray[nAlrAux].Cmb0)))dd6=6Comp=6AlrMonth#If(AlrMonth < 1 or AlrMonth > 12,1)<<< >nAlrAux nAlrCHSel[0]65 nActiveScreen3L  AlarmCHFilter.If(nAlrAux=0,0,Num(sCHCmbArray[nAlrAux].Cmb0))886= 6:ForceTagChange("nShowCmb[3]",0) //Label information update**nShowCmb[3]Z AlrDayFrom$if( AlrDayFrom > AlrDayTo, AlrDayTo)22> RunMath[11]16 AlrDayTo*if( AlrDayTo > AlrDayToMax, AlrDayToMax) 22L>LsDevCmbArray[0]"(All)"(All) AlrHiPriorityif(bIsLocal = 0 , 255)&&=.ForceTagChange("nAlrDevSel[0]", nAlrDevSel[0])44nAlrDevSel[0]3Z AlarmDVFilterif(bIsLocal = 0 , 0)&&=.ForceTagChange("nAlrModSel[0]", nAlrModSel[0])44nAlrModSel[0]4Z(2{if(StrLen(printAlmString)=0, " ",printAlmString)}%%%%%$$$$&&ABC 0f37c3a4e014b900d5a9a0857c3f0721  333   Arial333%%%%%$$$$&&ABC c&53111438283q104699-6988239 c &53111438283q104699-6988239  Arial%%%%%$$$$&&ABC~xx%%   Arial%%%%%$$$$&&ABC$% &115311442283q1484991588239!  AlrOnLineHist=2=00.000000100 100.000000d00.000000100 100.000000d&115311442283q1484991588239"Tahoma}00001D000000060003000A00FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF %%%%%$$$$&&ABC%%%%%$$$$&&ABC%%%%%$$$$&&ABC%%%%%$$$$&&ABC triggeralarm{AlarmDVFilter}{AlrSelection}AlrLowPriority AlrHiPriority100startalarmtime endalarmtimeɌ Ack Requiredˌ Active Time܌TagnamedӌMessage,ʌAck TimeЌ Norm Timeь Event Time݌Typed֌Priorityd ߌValueF ތUsernameK ͌Commentd ΌDelete Message ҌGroupd׌ SelectiondٌStationdՌPreviousPό Mostrar ValorP،EstadoP %%%%%$$$$&&ABC$% &115311443283q1486991568239!  AlrOnLineHist=3=00.000000100 100.000000d00.000000100 100.000000d&115311443283q1486991568239"Tahoma}00001D00060003000A00FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF %%%%%$$$$&&ABC%%%%%$$$$&&ABC%%%%%$$$$&&ABC%%%%%$$$$&&ABC triggeralarm{AlarmDVFilter}{AlrSelection}AlrLowPriority AlrHiPriority100startalarmtime endalarmtimeɌ Ack Requiredˌ Active Time܌TagnamedӌMessage,ʌAck TimeЌ Norm Timeь Event Time݌Typed֌Priorityd ߌValueF ތUsernameK ͌Commentd ΌDelete Message ҌGroupd׌ SelectiondٌStationdՌPreviousPό Mostrar ValorP،EstadoP %%%%%$$$$&&ABC$% &115311442283q1484991588239!  AlrOnLineHist=1=00.000000100 100.000000d00.000000100 100.000000d&115311442283q1484991588239"Tahoma}00001D000000060003000A00FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF %%%%%$$$$&&ABC%%%%%$$$$&&ABC%%%%%$$$$&&ABC%%%%%$$$$&&ABC PrintAlrHst triggeralarm{AlarmDVFilter}{AlrSelection}AlrLowPriority AlrHiPriority100startalarmtime endalarmtimeɌ Ack Requiredˌ Active Time܌TagnamedӌMessage,ʌAck TimeЌ Norm Timeь Event Time݌Typed֌Priorityd ߌValueF ތUsernameK ͌Commentd ΌDelete Message ҌGroupd׌ SelectiondٌStationdՌPreviousPό Mostrar ValorP،EstadoP %%%%%$$$$&&ABC$%  &115211442283q1482991578239!  AlrOnLineHist=0=00.000000100 100.000000d00.000000100 100.000000d&115211442283q1482991578239"Tahoma}00001D000000060003000A00FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF %%%%%$$$$&&ABC%%%%%$$$$&&ABC%%%%%$$$$&&ABC%%%%%$$$$&&ABCPrintAlrOnLine{AlarmDVFilter}{AlrSelection}AlrLowPriority AlrHiPriority100Ɍ Ack Requiredˌ Active Time܌TagnameӌMessage,ʌAck TimeЌ Norm Timeь Event Time݌Typed֌Priorityd ߌValueF ތUsernameK ͌Commentd ΌDelete Message ҌGroupd׌ SelectiondٌStationdՌPreviousPό Mostrar ValorP،EstadoP %%%%%$$$$&&ABC S Q   Arial%%%%%$$$$&&ABCYY  AlrOnLineHist=0=00.000000100 100.000000d00.000000100 100.000000dYj&51811107283q46699-1878239j &51811107283q46699-1878239  Arial%%%%%$$$$&&ABCG^Yf&4651121283q35699-1078239G^Yf &4651121283q35699-1078239 Ack "Tahoma%%%%%$$$$&&ABC!r&5101163283q43099-1958239!r  ackalr not ackalr&5101163283q43099-1958239 Last Alarm"Tahoma%%%%%$$$$&&ABC!!&5101199283q50299-2678239!  ackall not ackall&5101199283q50299-2678239 All Alarms"Tahoma%%%%%$$$$&&ABC!!&5101181283q46699-2318239  triggeralarm//not triggeralarmopen("alarmfilters")&&alarmfilters! AlrOnLineHist>=100.000000100 100.000000d00.000000100 100.000000d &5101181283q46699-2318239 Period of Viewing"Tahoma%%%%%$$$$&&ABC! O&53111-2283q26499-148239 O &53111-2283q26499-148239  Arial%%%%%$$$$&&ABCH`"Sk# Type"Tahoma%%%%%$$$$&&ABC""  Open("AlarmOptions.scr")..AlarmOptions.scr! Settings"Tahoma%%%%%$$$$&&ABC!!&51011421283q114099-8998239!   PrintSetUp()&51011421283q114099-8998239 Print Setup"Tahoma%%%%%$$$$&&ABC!"&51111381283q106299-8188239"  zIf $AlrOnLineHist=1 Then $PrintAlrHst = $Toggle($PrintAlrHst) Else $PrintAlrOnLine = $Toggle($PrintAlrOnLine) End IfIf StGetMnTagVal__(171, 0, 0, 0, 0, "") =1 Then Call StSetMnTagVal__(494, 0, 0, 0, 0, 22, 2, "", StFunction1__(251, 1, StGetMnTagVal__(494, 0, 0, 0, 0, "") )) Else Call StSetMnTagVal__(495, 0, 0, 0, 0, 22, 4, "", StFunction1__(251, 1, StGetMnTagVal__(495, 0, 0, 0, 0, "") )) End If&51111381283q106299-8188239  Print"Tahoma%%%%%$$$$&&ABC!<pkx<piv Commands"Tahoma%%%%%$$$$&&ABC1a.E&44011375283q100499-8208239 &44011375283q100499-8208239  Arial%%%%%$$$$&&ABCIcon\printer.png0|16777215|0||01a%<*&43111-39283q15899-18239  OnLineHistory=1q=00.000000100 100.000000d00.000000100 100.000000d&43111-39283q15899-18239  Arial%%%%%$$$$&&ABCIcon\folder.png0|16777215|0||01a:4&42911-29283q15899-128239:4  OnLineHistory=0q=00.000000100 100.000000d00.000000100 100.000000d &42911-29283q15899-128239:41a#:+&42911-38283q15699-58239#:+ &42911-38283q15699-58239  Arial%%%%%$$$$&&ABCIcon\window.png0|16777215|0||01a34&42211-29283q16099-30823934 &42211-29283q16099-308239  Arial%%%%%$$$$&&ABCIcon\hourglass.png0|16777215|0||01a _ _  &(Not AlrOnLineHist) and (bIsLocal = 1)((=00.000000100 100.000000d00.000000100 100.000000d! _  _ _ +  Arial%%%%%$$$$&&ABCZZ ,  Arial%%%%%$$$$&&ABC&52511193283q67299-4318239 -&52511193283q67299-4318239  Arial%%%%%$$$$&&ABCYYYY ."Tahoma%%%%%$$$$&&ABC'>&43311162283q57499-4218239'> /&43311162283q57499-4218239Inst."Tahoma%%%%%$$$$&&ABC`` 0Module"Tahoma%%%%%$$$$&&ABCI)&44411216283q68499-5388239I) 1&44411216283q68499-5388239Channel:"Tahoma%%%%%$$$$&&ABC42?&42311238283q70499-585823942? 2&42311238283q70499-5858239Label"Tahoma%%%%%$$$$&&ABC5v&48911141283q60299-36582395v 3&48911141283q60299-3658239 Alarm Filters "Tahoma%%%%%$$$$&&ABC%$Device SelectionS &45411184283q62099-4608239S   nCmbNumber 1 Ext(Alar")}  {Ex("Acive"}. //CM1[3].MG3} Ext(Alar")}  {Ex("Acive"}M. //CM1[3].MG1} Ext(Alar")}  {Ex("Acive"}\. //CM1[3].M4&45411184283q62099-4608239"Tahoma nAlrDevSel[0] sDevCmbArray nDevCmbAmount%$Category SelectionY Y   nCmbNumber 1 rm") 2 {xt("ctiv")}.&//{CM[90]MSG7 {Ex("Alrm") 1 {xt("ctiv")}.5//{CM[90]MSG7 {Ex("Alrm") 1 {xt("ctiv")}.D//{CM[90]MSG9 {Ex5"Tahoma nAlrModSel[0] sModCmbSel[0]sModCmbArray[0].Cmb0nModCmbAmount[0]%$Channel SelectionY-Y-  nCmbNumber 1 {Ext"Actve").s /{M1[5].MS2} {xt("larm)} 1{Ext"Actve"). /{M1[6].MS5} {xt("larm)} 2{Ext"Actve"). /{M1[6].MS5} {xt("larm6"Tahoma nAlrCHSel[0]sCHCmbArray[0].Cmb0nCHCmbAmount[0]()1aAUAU 7 tahoma sLblCmb[0]0.0000000.0000001a _ _   AlrOnLineHist and (bIsLocal = 1)&&=00.000000100 100.000000d00.000000100 100.000000d" _ _ _   Arial%%%%%$$$$&&ABCZZ   Arial%%%%%$$$$&&ABC&52511193283q67299-4318239 &52511193283q67299-4318239  Arial%%%%%$$$$&&ABCYYYY "Tahoma%%%%%$$$$&&ABC'>&43311162283q57499-4218239'> &43311162283q57499-4218239Inst."Tahoma%%%%%$$$$&&ABC`` Module"Tahoma%%%%%$$$$&&ABCI)&44411216283q68499-5388239I) &44411216283q68499-5388239Channel:"Tahoma%%%%%$$$$&&ABC42?&42311238283q70499-585823942? !&42311238283q70499-5858239Label"Tahoma%%%%%$$$$&&ABC2s&48611141283q59699-36882392s "&48611141283q59699-3688239 Alarm Filters "Tahoma%%%%%$$$$&&ABC%$Device SelectionS &45411185283q62299-4628239S   nCmbNumber 1 .CM1[].MS5} {xt("larm)} 1{Ext"Actve")i//CM1[].MS21} Ext(Alar")}  {Ex("Acive"}//CM1[].MS11} Ext(Alar")}  {Ex("Acive"}#&45411185283q62299-4628239"Tahoma nAlrDevSel[0] sDevCmbArray nDevCmbAmount%$Category SelectionY Y   nCmbNumber 1 id ik//{C1[18.MSG} {Et("Aarm"} 2 Ext(Actie")}e "k//{C1[18.MSG} {Et("Aarm"} 2 Ext(Actie")}e Ek//{C1[18.MSG} {Et("Aarm"} 2 Ext(Acti$"Tahoma nAlrModSel[0] sModCmbSel[0]sModCmbArray[0].Cmb0nModCmbAmount[0]%$Channel SelectionX,X,  nCmbNumber 1 tive)}$/{CM146].SG3}{Ext"Alam")}1 {Et("Ative)}+/{CM146].SG5}{Ext"Alam")}1 {Et("Ative)}Z)/{CM146].SG5}{Ext"Alam")}1 {E%"Tahoma nAlrCHSel[0]sCHCmbArray[0].Cmb0nCHCmbAmount[0]%$Device SelectionS &45411185283q62299-4628239S   nCmbNumber 1 {Ext"Actve")Ms /{M1[7].MS8} {xt("larm)} 1{Ext"Actve") /{M1[7].MS8} {xt("larm)} 1{Ext"Actve")0 /{M1[7].MS6} {xt("larm&&45411185283q62299-4628239"Tahoma nAlrDevSel[0] sDevCmbArray nDevCmbAmount%$Category SelectionY Y   nCmbNumber 1 rm") 1 {xt("ctiv")} }&//{CM[98]MSG4 {Ex("Alrm") 1 {xt("ctiv")} Sr//{CM[98]MSG6 {Ex("Alrm") 1 {xt("ctiv")} 1//{CM[98]MSG6 {Ex'"Tahoma nAlrModSel[0] sModCmbSel[0]sModCmbArray[0].Cmb0nModCmbAmount[0]%$Channel SelectionX,X,  nCmbNumber 1 Ext(Alar")}  {Ex("Acive"}] //CM1[9].MG4} Ext(Alar")}  {Ex("Acive"}L //CM1[9].MG4} Ext(Alar")}  {Ex("Acive"}s //CM1[7].M("Tahoma nAlrCHSel[0]sCHCmbArray[0].Cmb0nCHCmbAmount[0]()1aAUAU ) tahoma sLblCmb[0]0.0000000.000000%$2G2G  not bEnableFDA00.000000100 100.000000d00.000000100 100.000000d"Tahoma AlrOnLineHistAAlarm Online Alarm History Alarm + Event History Event History%$2G2G   bEnableFDA00.000000100 100.000000d00.000000100 100.000000dNot bHasLicenseK"Tahoma AlrOnLineHistOn Line History0.000000VBScript^'Variables available on this screen can be declared and initialized here. Dim oldOnLineHist 'Procedures available on this screen can be implemented here 'This procedure is executed just once when this screen is open. Sub Screen_OnOpen() oldOnLineHist = -1 End Sub 'This procedure is executed continuously while this screen is open. Sub Screen_WhileOpen() If ($bHasLicense = 0) Then If ($AlrOnLineHist <> 0) Then $AlrOnLineHist = 0 MsgBox "You are using the Lite version of Fluke DAQ. This version does not support this feature.",vbOKOnly+vbExclamation,"Beta" End If End If If (Len($endalarmtime) = 0 Or Len($startalarmtime) = 0 ) And $AlrOnLineHist = 1 Then $startalarmtime = $Date $endalarmtime = $Date End If End Sub 'This procedure is executed just once when this screen is closed. Sub Screen_OnClose() End Sub Dim oldOnLineHist Sub Screen_OnOpen() oldOnLineHist = -1 End Sub Sub Screen_WhileOpen() If (StGetMnTagVal__(587, 0, 0, 0, 0, "") = 0) Then If (StGetMnTagVal__(171, 0, 0, 0, 0, "") <> 0) Then Call StSetMnTagVal__(171, 0, 0, 0, 0, 1, 16, "", 0) MsgBox "You are using the Lite version of Fluke DAQ. This version does not support this feature.",vbOKOnly+vbExclamation,"Beta" End If End If If (Len(StGetMnTagVal__(453, 0, 0, 0, 0, "") ) = 0 Or Len(StGetMnTagVal__(452, 0, 0, 0, 0, "") ) = 0 ) And StGetMnTagVal__(171, 0, 0, 0, 0, "") = 1 Then Call StSetMnTagVal__(452, 0, 0, 0, 0, 1, 21, "", StGetMnTagVal__(1, 0, 0, 0, 0, "") ) Call StSetMnTagVal__(453, 0, 0, 0, 0, 1, 22, "", StGetMnTagVal__(1, 0, 0, 0, 0, "") ) End If End Sub Sub Screen_OnClose() End Sub qq534   K ALARMDVFILTER ALRHIPRIORITYALRLOWPRIORITY ALRONLINEHIST ALRSELECTION ENDALARMTIMESTARTALARMTIME TRIGGERALARM TRIGGERALARM PRINTALRHSTPRINTALRONLINEACKALLACKALR ONLINEHISTORY ONLINEHISTORYBISLOCAL NALRCHSEL[0] NALRDEVSEL[0] NALRMODSEL[0]NCHCMBAMOUNT[0] NCMBNUMBER NDEVCMBAMOUNTNMODCMBAMOUNT[0]SCHCMBARRAY[0].CMB0 SDEVCMBARRAY SLBLCMB[0]SMODCMBARRAY[0].CMB0 SMODCMBSEL[0] SMODCMBSEL[0] BENABLEFDA BENABLEFDA BHASLICENSE