ئhGOWdAX8g.TEditg.TButtonpt@cdDialogsZkg MessageDlghf TMsgDlgTypeg mtWarningqeDf TMsgDlgBtn"b$gmbOK| BcdFormsZkfTFormNbg.TForm8NgTCustomForm.AlignControls6j-gTCustomForm.CreateParams9j-gTCustomForm.CreateWindowHandle:j-gTCustomForm.CreateWnd;j-gTCustomForm.DefineProperties=j-gTCustomForm.DestroyWindowHandle>j-gTCustomForm.GetClientRectBj-gTCustomForm.GetFloatingDj-gTCustomForm.LoadedEj-gTCustomForm.NotificationFj-gTCustomForm.PaintWindowHj-gTCustomForm.QueryInterfaceJj-gTCustomForm.ReadStateKj-gTCustomForm.SetParentBiDiModeNj-gTCustomForm.SetParentPj-gTCustomForm.UpdateActionsQj-gTCustomForm.ValidateRenameSj-gTCustomForm.WndProcUj-gTCustomForm.Createj-gTCustomForm.CreateNewj-gTCustomForm.Destroyj-gTCustomForm.AfterConstructionj-gTCustomForm.BeforeDestructionj-gTCustomForm.CloseQueryj-gTCustomForm.DefaultHandlerj-gTCustomForm.SetFocusj-gTCustomForm.SetFocusedControlj-gTCustomForm.ShowModalj-gTCustomForm.WantChildKeyj-g%TScrollingWinControl.AdjustClientRecthg&TScrollingWinControl.AutoScrollEnabledhcdControlsZkgTWinControl.UpdateLastResize)gTWinControl.AssignTo*gTWinControl.CanAutoSize*gTWinControl.CanResize*gTWinControl.ConstrainedResize*gTWinControl.CreateHandle*gTWinControl.DestroyWnd*gTWinControl.GetClientOrigin1*gTWinControl.GetControlExtents3*gTWinControl.GetDeviceContext4*gTWinControl.ShowControlN*gTWinControl.Invalidate*gTWinControl.Repaint*gTWinControl.SetBounds*gTWinControl.Update*gTControl.GetDragImages_gTControl.GetEnabled_g!TControl.GetFloatingDockSiteClass_gTControl.SetDragMode_gTControl.SetEnabled_gTControl.SetName_gTControl.SetBiDiMode_gTControl.InitiateAction_gTControl.SetTextc_gTControl.GetText?_gmrOkDСcdGraphicsZkcdClassesZkgTComponent.UpdateRegistry2gTComponent.WriteState2gTComponent.SafeCallException+2gTPersistent.Assign0f TStringList-SB>g .TStringList<*fTStringsRg+cdSysUtilsZkgTrim~ g UpperCase~ cdMessagesZkcdWindowsZkcdSysInitZkcdSystemZkfTObject.fBooleanNcf AnsiString8fString8gTObject.Dispatch݋RgTObject.NewInstance݋RgTObject.FreeInstance݋RgPosg@LStrPosX,Tdg TObject.Free݋Rg@LStrAsgX,Tdg @LStrArrayClrX,Tdg@HandleFinallyX,Tdg@LStrCatX,Tdg@LStrClrg @LStrAddRefX,TdfInteger|ogTObject.Create݋RgCopyg @LStrCopyX,TdgLengthg@LStrLen?g @LStrLAsgX,Tdg @LStrCatNX,Tdg @LStrCat3X,Tdg@LStrCmpX,TdceGenFnsXg TestForAudit Ut7g SetAuditStartwg SetAuditDataog SetAuditIDg SaveAudit[>ce PPSysMainXgMainFormc&.TSysEditServiceKpiForm'/*TSysEditServiceKpiFormX) % LEN_COMMONDС"d%LEN_DESCRIPTIONPС$ SysEditServiceKpiForm7r) u sUserName樞y .2f&(!TSysEditServiceKpiForm.FormCreateӔFM (!Self !Sender qFormCreate ActionDescriptionfc( TSysEditServiceKpiForm.SetAppendFM(!Self !Valuec(TSysEditServiceKpiForm.SetIDFM(!Self !Valuefc(#TSysEditServiceKpiForm.SetKpiNumberFM(!Self !Valuec(#TSysEditServiceKpiForm.GetKpiNumberFM !Self #Resultc(%TSysEditServiceKpiForm.SetDescriptionFM(!Self !Valuec(%TSysEditServiceKpiForm.GetDescriptionFM !Self #Resultc('TSysEditServiceKpiForm.SetResponseHoursFM(!Self !Valuec('TSysEditServiceKpiForm.GetResponseHoursFM !Self #Resultc(*TSysEditServiceKpiForm.SetRestorationHoursFM(!Self !Valuec(*TSysEditServiceKpiForm.GetRestorationHoursFM !Self #Resultc(&TSysEditServiceKpiForm.SetAvailabilityFM(!Self !Valuec(&TSysEditServiceKpiForm.GetAvailabilityFM !Self #Resultc(#TSysEditServiceKpiForm.SetCoreHoursFM(!Self !Valuec(#TSysEditServiceKpiForm.GetCoreHoursFM !Self #Resultc($TSysEditServiceKpiForm.SetAfterHoursFM(!Self !Valuec($TSysEditServiceKpiForm.GetAfterHoursFM !Self #Resultc($TSysEditServiceKpiForm.SetTravelTimeFM(!Self !Valuec($TSysEditServiceKpiForm.GetTravelTimeFM !Self #Resultc(%TSysEditServiceKpiForm.SetFaultDetectFM(!Self !Valuec(%TSysEditServiceKpiForm.GetFaultDetectFM !Self #Resultc(!TSysEditServiceKpiForm.btnOkClickԔFMP(!Self !Sender qKpi AmendStringf AuditStringf sFieldf sValuef sTempValuef sAuditInsertf sAuditFieldf sAuditValuef AuditActionf sOperatorNamef slFieldListf slValueListf nCountf nMaxCountf sStartedf lContinuef . . c( FinalizationX,Tdt! (c(SysEditServiceKpi!(cG -FQ-A )j,lblID ,lblDescription! ,lblResponseHours1 ,lblRestorationHoursA ,lblAvailabilityQ , lblCoreHoursa , lblAfterHoursq , lblTravelTime , lblKpiNumber ,lblFaultDetect ,edtFaultDetect ,edtID , edtKpiNumber ,edtDescription ,edtResponseHours ,edtRestorationHours ,edtAvailability , edtCoreHours! , edtAfterHours1 , edtTravelTimeA ,btnOkQ , btnCancela - FormCreateE- btnOkClickI,lAppendq ,lAuditu ,AuditActionUpdate ,AuditActionDelete ,AuditActionInsert ,Original_KpiNumber ,Original_Description ,Original_ResponseHours ,Original_RestorationHours ,Original_Availability ,Original_CoreHours ,Original_AfterHours ,Original_TravelTime! ,Original_FaultDetect1 - SetAppendY-SetIDe- SetKpiNumberq- GetKpiNumber}-SetDescription-GetDescription-SetResponseHours-GetResponseHours-SetRestorationHours-GetRestorationHours-SetAvailability-GetAvailability- SetCoreHours- GetCoreHours- SetAfterHours- GetAfterHours - SetTravelTime- GetTravelTime%-SetFaultDetect1-GetFaultDetect=0 AppendModeU Y0IDYe0 KpiNumber]}q0 Descriptiona0 ResponseHourse0RestorationHoursi0 Availabilitym0 CoreHoursq0 AfterHoursu 0 TravelTimey%0 FaultDetect}=1cD&?D&>D&@lqL BfP $(,048<@DHL}lblIDlblDescriptionlblResponseHourslblRestorationHourslblAvailability lblCoreHours lblAfterHours lblTravelTime lblKpiNumberlblFaultDetectedtFaultDetectedtID edtKpiNumberedtDescriptionedtResponseHoursedtRestorationHoursedtAvailability edtCoreHours  edtAfterHours edtTravelTimebtnOk btnCancel FormCreate btnOkClickTSysEditServiceKpiFormTSysEditServiceKpiFormL`SysEditServiceKpi U AppendModeVIDW KpiNumberX DescriptionY ResponseHoursZRestorationHours[ Availability\ CoreHours] AfterHours^ TravelTime_ FaultDetectUjjSV3Uhd0d βUUβغQ4Q4Q4(UQXEUU<~$LUQXU hUX~$LUQXU$3Uh~"LUQXU(0x3ZYYdhE^[YY]dbPPdataSELECT * FROM tEvent#WHERE Description LIKE 'Reference%' DescriptionUPDATEidDELETEINSERT tBatchTypeUjS3Uhd0d ˆt0UEU3ҋ!UEU3ZYYdhE[Y] (ADD) (EDIT)UQSU؋E3UhMd0d uU3ZYYdhTE[Y]UjSV3UhXd0d UU,,3ZYYdh_E^[Y]UjSV3UhGd0d UE3ZYYdhNE^[Y]UjSV3UhXd0d UU003ZYYdh_E^[Y]UjSV3UhGd0d UE3ZYYdhNE^[Y]UjSV3UhXd0d UU443ZYYdh_E^[Y]UjSV3UhGd0d UE3ZYYdhNE^[Y]UjSV3UhXd0d UU883ZYYdh_E^[Y]UjSV3UhGd0d UE3ZYYdhNE^[Y]UjSV3UhXd0d UU<<3ZYYdh_E^[Y]UjSV3UhGd0d UE3ZYYdhNE^[Y]UjSV3UhXd0d UU@@3ZYYdh_E^[Y]UjSV3UhGd0d UE3ZYYdhNE^[Y]UjSV3UhXd0d UUDD 3ZYYdh_E^[Y]UjSV3UhGd0d U E3ZYYdhNE^[Y]UjSV3UhXd0d UUHH3ZYYdh_E^[Y]UjSV3UhGd0d UE3ZYYdhNE^[Y]UjSV3UhXd0d UULL3ZYYdh_E^[Y]UjSV3UhGd0d UE3ZYYdhNE^[Y]U jjIuSVW3Uhd0d ˲tE܋(E܋ E؋EEEԲEЍEPUE2EUE4EÀ}tYNjQ4 NjQ4h(uhHEUNjQ4EË}ujf L3ҸX tEPEPEPUܡEQ4EEuE KhHuh Et(EPM3Ҹ0EPD3ҸPEPUEEuE`9uhHuhpEtEPM3Ҹ|EPUE2EuE`9uhHuhpEtEPM3ҸEPUE2EuE`9uhHuhpEtEPM3ҸUEԋQ4EMUEЋQ4EEEEPUE2EuE`9uhHuhpEtEPM3Ҹ EPUE2EuE`9uhHuhpEtEPM3Ҹ8EPUE2EuE`9uhHuhpEtEPM3ҸLEPUE2EuE`9uhHuhpEtEPM3Ҹ`EPUE2EuEt9uhHuhEtEPM3ҸUEԋQ4UEЋQ4EԋRHEȋEȅ|,@EEMŰEԋ8W UEQ4EMuߋEȅ@EEMŰEЋ8W UEQ4EMuEPUE2EUE4EÀ}NjQ4 NjQ4h(uhHEUNjQ4UMEUNjQ4EË}ujf L3ҸXEQ4EPUE2tiEPEPEPUܡUEUEUE싓,tEPM싓,0EuE`hHuhpEEMEPUEE싓0tmtEPM싓0|EuE`hHuhpEuhuEEPUE2E싓4tmtEPM싓4EuE`hHuhpEuh uEUEQ4EEPUE2E싓8tmtEPM싓8EuE`hHuhpEuh<uEEPUE2E싓<tmtEPM싓< EuE`hHuhpEuh\uEEPUE2E싓@tmtEPM싓@8EuE`hHuhpEuhxuEE~UEQ4EEPUE2E싓DtmtEPM싓DLEuE`hHuhpEuhuEEPUE2E싓HtmtEPM싓H`EuE`hHuhpEuhuEEPUE2E싓LtmtEPM싓LEuE`hHuhpEuhuEEPUE2E~UEQ4EERJMċE8W EPEIEEPERJEY8W UEUMEUEQ4}UEQUQ,R@Q4 Q4h(UuhHEUQ4hUuhHEUQ4 Q48UQXEUEPMUEEE}t ǃ,3ZYYdhEEEEغ_^[]dbPPdataSELECT KpiNumberFROM tServiceKpiWHERE KpiNumber LIKE ''+The KPInumber must be unique and Not empty. tServiceKpiINSERT INTO tServiceKpiA(KpiNumber, Active, Description, ResponseHours, RestorationHours,NULL, 1,',1, KPINUMBER1ACTIVENULL,', DESCRIPTION RESONSEHOURSRESTORATIONHOURSVALUES (=Availability, CoreHours, AfterHours, TravelTime, FaultDetect) AVAILABILITY COREHOURS AFTERHOURS TRAVELTIMENULL)') FAULTDETECT AND ID <> UPDATE tServiceKpiSET KpiNumber =  Description = RESPONSEHOURS ResponseHours =  RestorationHours =  Availability = CoreHours =  AfterHours =  TravelTime =  FaultDetect = WHERE id = SELECT IDAND Description LIKE 'AND Active = 1IDU3Uh1d0d u 3ZYYdh8]Ã-m )))-))):fhld~DLNT\R`|HJXV^v<>@BFPnxZbjprt)E"IP$&(--8)84Y:e*}q8<@F>8 :%:=1<EE %=  E E E E$E&E E,E E,E E,( E  &E eYY8Y Y Y Tee:e qq "q }}(}  " (  " (  " (  " (  " (  "   (   " %%(% 11 "1 ==(= I0I I . %  .  "}$6IIII" II ,>I=  I I I II.I II $I II.I $I II.I $I II.I ,I &I $I II.I $I II.I  $I II.I %$I II.I =$I II.I }}$>IIII0I " II ,I,}$4I= (I I III $:I I III $:I I III &$:I I III $:I I III $:I I III . $:I I III %$:I I III =$:I I III $.D LI 8@ TI I I}I&II&I$ I&$:I A=  A }2D    >"H"H"DdM,B|H@h20\ 2j 20\ 2j 20\ 2j 20\ 2j 20\ 2j 20\ 2j 20\ 2j 20\ 2j 20\ 2j* D 2,V$  H 4<64&*@6:&@6:&@6:&6@6:&@6:&@6:&@6:&@6:&fxV$ HP 4@<H .64 @ .640@ .640@ .640@ .640@ .640@ .640@ .640@ .640@ ,hh2  dd >$  a% YU-5------ -  -"-$-&-(-*-,-.-0-2- 4-"6-$8-&:-(<-*>-,@EDB-.BIFD-0D-2J-4L-6N-8P-:R-<T->V-@X-BZ-D\-F^-H`-Jb-LdYjh -Nhelj=-PjqnlQ-Rl}pni-Tnrp}-Vptr-Xrvt-Ztxv-\vzx-^x|z-`z~|-b|~-d~--fE-hY-j q-l-n%-p1-r=-t-v-x-z-|-~------159=IyMQU]&a im=uyQm}#-I Yu!)-59AEMQUY]aeimquy } !%)E`0I2QQIY`],a,a<]Ae@2i@iq`0u2y2ybu}`022`022b`022`022b`022`022b`022`022b`022`022b`022`02 2 b `022`02!2!b%`0)2-2)-1`052929b5=`0A2E2AEIpMDUd5 % 1U=M5?  a