ئhGveC

8g.TButtonpt@g.TEditcdDialogsZkcdFormsZkfTFormNbf TCloseAction.g.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<*cdSysUtilsZkgIntToStrJ 7gStrToIntgTrim~ cdMessagesZkcdWindowsZkcdSysInitZkcdSystemZkfTObject.fInteger|ofBooleanNcf AnsiString8fString8gTObject.Dispatch݋RgTObject.NewInstance݋RgTObject.FreeInstance݋RgFalse1og@LStrAsgX,Tdg@LStrClrg@HandleFinallyX,Tdg @LStrAddRefX,TdgLengthg@LStrLen?gTObject.Create݋Rg TObject.Free݋Rg@LStrCmpX,Tdg @LStrCatNX,Tdg @LStrCat3X,Tdg @LStrArrayClrX,TdceMain gaWinForm┋hgWINNUMDСgMainForm.|ceDataMod c& .TDCEditForm{m(* TDCEditForm!/< DCEditForm/<^ .2f(TDCEditForm.FormCreate` !Self!Senderc(TDCEditForm.FormClose`, !Self!Sender"Action c(TDCEditForm.SetWindowNum`J !Self!Valuec(TDCEditForm.SetBatchID` !Self!Valuec(TDCEditForm.GetBatchID` !Self Resultc(TDCEditForm.SetServiceID` !Self!Valuefc(TDCEditForm.GetServiceID `, !Self#Resultc(TDCEditForm.SetDCDetail!` !Self!Valuec(TDCEditForm.GetDCDetail"` !Self Resultc(TDCEditForm.btnSaveClick` !Self!Sender slManual sTempf sServiceIDf qSave c( FinalizationX,Td\! c(DCEdit! cGQF j, lblServiceID , btnCancel! ,btnSave1 , edtServiceIDA - FormCreate- FormClose - btnSaveClickq,nWindowQ , lDCDetaila , sOldServiceIDq ,sBatchID - SetWindowNum- SetBatchID)- GetBatchID5- SetServiceIDA- GetServiceIDM- SetDCDetailY- GetDCDetaile0ActiveWindowNumU0BatchIDY5)0 ServiceID]MA0DCdetailaeYcD@lL : lblServiceID btnCancelbtnSave edtServiceID FormCreate FormClose btnSaveClick TDCEditForm TDCEditFormLYDCEditUActiveWindowNumVBatchIDW ServiceIDXDCdetailƀËt ;t~ "} ǀUjSV3UhGd0d UU3ZYYdhNE^[Y]ËUQSU؋E3UhUd0d U3ZYYdh\E[Y]SV؋֋^[ÈÊU3QQQQSVW3Uh0d0d UEUEthHuhdEEpƋQ4UƋQ4EUƋQ4hhdEUƋQ4֋ǃ,3ZYYdh7EEE_^[]SET ServiceID = ''UPDATE tDataCollectionWHERE BatchID = AND ServiceID LIKE 'U3Uh%d0d 3ZYYdh,]Ã-ma.Z\`Xr8@BHPFTpvtx~<>LJRj0z246:|DblNV^dfh"  q> "$"*D5)4MA8eY6 J)) ) 5 AA("A MYeq$q(qq q>q qq" .q M  Xt-   2j @\   82 4 :Nx-@ "q$6)85:AY@eBp@ @*`!%%4!H)`0-212-15@99A@2E@EM`0Q U Q&U&Y`]a] a e@ii q pu8} }u  a