AQD{c*zXp movinv.pasc*r movinv.DFM *dDialogsc&f TPrintDialogI$2g .TPrintDialog"RcdgraficoszXcdchecazXgleerutas5hgrutaog FormatosPaisPCgcaso81gcomenta9ygImpresoraListaPCg fechavalidaۛf%cdSpinc&f TSpinEdit:uUg .TSpinEditFvcdMenusc&f TMainMenuf TMenuItem%) f TPopupMenug .TMainMenuqg .TMenuItem-Cg .TPopupMenu}RٰgTMenuItem.SetEnabled#cdButtonsc&f TSpeedButton\fTBitBtnQg .TSpeedButtonװ g.TBitBtnj"4hcdExtCtrlsc&fTBevelM#-fTPanel02ag.TBevelDg.TPanel R%cdGridsc&cdDBTablesc&fTTableDg.TTabletwgTTable.SetIndexName#gTTable.SetRange#gTTable.FindKey#gTDBDataSet.SetDatabaseName#gTTable.CancelRange#gTTable.FindNearest#gTTable.SetTableName#cdMaskc&gTCustomMaskEdit.SetText#gTCustomMaskEdit.GetText#cdDBGridsc&fTDBGridM)g.TDBGridYngTCustomDBGrid.SetSelectedIndex#gTCustomDBGrid.GetSelectedIndex#cdDbc&f TDataSourcev f TFloatField+f TStringFieldxf TDateFieldYCAfTCurrencyField*T fTDataSet1mbfEDatabaseError?f TDataActionoXg .TDataSourceOjg .TFloatFieldeg .TStringFieldHg .TDateField)dg.TCurrencyField%,gTDataSet.FieldByName#gTDataSet.First#g TDataSet.Edit#g TDataSet.Next#g TDataSet.Last#gTDataSet.Insert#g TDataSet.Open#gTDataSet.Delete#gTDataSet.Prior#gTDataSet.GetField#f TDataSetState6 gdsEditilgdsInsertjlg DatabaseError>f%cdDBCtrlsc&fTDBEdit毤f TNavigateBtng.TDBEditūcdFormsc&fTFormH)f TCloseActiong.TForm!gTCustomForm.AlignControls#gTCustomForm.CreateParams#gTCustomForm.CreateWindowHandle#gTCustomForm.CreateWnd#gTCustomForm.DefaultHandler#gTCustomForm.DefineProperties#gTCustomForm.DestroyWindowHandle#gTCustomForm.GetClientRect#gTCustomForm.Loaded#gTCustomForm.Notification#gTCustomForm.PaintWindow#gTCustomForm.ReadState#gTCustomForm.SetParent#gTCustomForm.ValidateRename#gTCustomForm.WndProc#gTCustomForm.Create#gTCustomForm.Destroy#gTCustomForm.SetFocus#gTCustomForm.WantChildKey#gTCustomForm.Close#gTCustomForm.ShowModal#gcaNone >DgTCustomForm.Show#cdStdCtrlsc&fTLabel>g.TLabel_vcdControlsc&f TMouseButton|gTWinControl.CreateHandle#gTWinControl.DestroyWnd#gTWinControl.GetClientOrigin#gTWinControl.GetDeviceContext#gTWinControl.ShowControl#gTWinControl.Invalidate#gTWinControl.Repaint#gTWinControl.SetBounds#gTWinControl.Update#gTControl.GetDragImages#gTControl.SetDragMode#gTControl.SetName#gTControl.GetText#gTControl.SetText#gTControl.SetEnabled#gTControl.SetVisible#cdGraphicsc&cdClassesc&f TShiftStateYgTComponent.WriteState#gTComponent.SafeCallException#gTPersistent.AssignTo#gTPersistent.Assign#gTStrings.Append#gTComponent.GetComponentCount#gTComponent.GetComponent#cdMessageskcdWindowskcdSysUtilskg DecodeDateg}g StrToDateTimeT> gIntToStrog FileExistsۛ gDate6g DateToStrT> cdSysInitkcdSystemkfTObject!fWord@fInteger`LfBooleanaUfChar^y^gTObject.NewInstance#gTObject.FreeInstance#fLongint`LfReal{Of AnsiStringHDfStringHDg AssignFileg@Assign/PgRewriteg @RewritFileQgWriteg @WriteRecQg CloseFileg@CloseQg @LStrCatNQg@_IOTestQg @LStrToStringQg @PStrNCpyQg @Ext2RealQg @LStrArrayClrQg@LStrClr'@g@HandleFinallyQgResetg @ResetFileQgFileSizeg @FileSizeQgReadg@ReadRecQg@LStrFromStringR!g @Real2ExtQgTruejQgFalsejQg@LStrCatQg@IsClassQg@HandleAnyExceptionQg @DoneExceptQg @LStrAddRefQgOrdgValg@ValExtQceedicionzXg FormaEdicionG鑈ceayudaModzXg PoneAyuda+ceCosteozXg FormaCosteo%ceprogresozXg condicionesg concentrarNYg poneetiquetast'g PoneAnchosxicedescribezXg describirW$ceformatoszXg FormaFormatosUjJgactivacondicionesvvcebarraszXg FormaBarrasrÞcemailzXg FormaMailkNqceformatozXgforma.cecerrarzXg FormaCerrar6G&ceconsultazXg FormaConsulta0fTFormaConsultagleearchivocamposi'cebuscarzXg FormaBusquedaceConProzXgFormaConProductr,ceConPromozXgFormaConProvee(Gce ConMovinvzXgFormaConMovimientogc&.TFormaMovimientosInventarioxL*TFormaMovimientosInventarioN FormaMovimientosInventarioN ultimon[fB indicen[f< entrada,P salida,P nombreformato撀aDF .1fR( generamailT*movinvV movfVD archfX af: mf: df: numefB antefBc( actualizamail!T*movinvZ movfZD archf\ af: mf: df: ultimofB iB mayorBc( asignatipoT*datos^ datf^E faltan> archf` arch2f` i<c(calcuaexistenciasTc( calculamontos T af: mf: df:c( dibujabarrasT i< max< interD EtiqFbc(rutasT jf!cadfF Result>c(guardamovimientoT fechafd reffd provfd tipomovf< contaff%QT!clavefFc(,TFormaMovimientosInventario.DBNavigatorClick#T!SelfN!Sender8!Button,c(/TFormaMovimientosInventario.BotonsiguienteClick#!T!SelfN!Sender8 siguiente< anterior<c(-TFormaMovimientosInventario.BotonprimeroClick#T!SelfN!Sender8 siguiente<c(,TFormaMovimientosInventario.BotonultimoClick#T!SelfN!Sender8 siguienteBc(.TFormaMovimientosInventario.BotonanteriorClick#T!SelfN!Sender8 siguiente< anterior<c(+TFormaMovimientosInventario.BotonSalirClick# T!SelfN!Sender8c(/TFormaMovimientosInventario.EditTIMOV_MIKeyDown#T!SelfN!Sender8"Key:!Shift&6c(+TFormaMovimientosInventario.BotonNuevoClick#T!SelfN!Sender8c(-TFormaMovimientosInventario.EditFEDOC_MIEnter#1T!SelfN!Sender8c(+TFormaMovimientosInventario.DetalleColEnter# T!SelfN!Sender8 valorfD codef< cadenaFFc(-TFormaMovimientosInventario.BotonGuardarClick# T!SelfN!Sender8c(-TFormaMovimientosInventario.EditCLDOC_MIEnter#T!SelfN!Sender8c(,TFormaMovimientosInventario.EditTIMOV_MIExit#1T!SelfN!Sender8c(/TFormaMovimientosInventario.EditFEDOC_MIKeyDown#5T!SelfN!Sender8"Key:!Shift&6c(/TFormaMovimientosInventario.EditCLDOC_MIKeyDown#4T!SelfN!Sender8"Key:!Shift&6c(/TFormaMovimientosInventario.EditCLPRO_MIKeyDown#T!SelfN!Sender8"Key:!Shift&6c(.TFormaMovimientosInventario.EditAlmacenKeyDown#4T!SelfN!Sender8"Key:!Shift&6c(/TFormaMovimientosInventario.EditREFMO_MIKeyDown#4T!SelfN!Sender8"Key:!Shift&6c(*TFormaMovimientosInventario.DetalleKeyDown#UT!SelfN!Sender8"Key:!Shift&6c(%TFormaMovimientosInventario.FormClose#T!SelfN!Sender8"Action0c((TFormaMovimientosInventario.FormActivate#T!SelfN!Sender8c(,TFormaMovimientosInventario.BotonBuscarClick#qT!SelfN!Sender8 siguienteBc(+TFormaMovimientosInventario.Consultas1Click#A T!SelfN!Sender8c(,TFormaMovimientosInventario.EditREFMO_MIExit#T!SelfN!Sender8c((TFormaMovimientosInventario.BitBtn1Click#T!SelfN!Sender8c((TFormaMovimientosInventario.FolderChange#T!SelfN!Sender8!NewTab<" AllowChange&>c(-TFormaMovimientosInventario.SpeedButton1Click#T!SelfN!Sender8 claveffc(-TFormaMovimientosInventario.SpeedButton4Click#T!SelfN!Sender8 clavefhc(-TFormaMovimientosInventario.SpeedButton2Click#T!SelfN!Sender8 clavefjc(-TFormaMovimientosInventario.SpeedButton3Click#T!SelfN!Sender8 claveflc(,TFormaMovimientosInventario.AreaGraficaPaint# T!SelfN!Sender8c(.TFormaMovimientosInventario.BotonImprimirClick#T!SelfN!Sender8c(*TFormaMovimientosInventario.BotonMailClick#T!SelfN!Sender8c(-TFormaMovimientosInventario.EditCLPRO_MIEnter#aT!SelfN!Sender8c(,TFormaMovimientosInventario.EditAlmacenEnter#aT!SelfN!Sender8c(-TFormaMovimientosInventario.EditREFMO_MIEnter#aT!SelfN!Sender8c(*TFormaMovimientosInventario.DetalleColExit#T!SelfN!Sender8c(,TFormaMovimientosInventario.EditFEDOC_MIExit#T!SelfN!Sender8c(1TFormaMovimientosInventario.EditFEDOC_MIMouseMove#AT!SelfN!Sender8!ShiftF6!X&<!Y&<c(1TFormaMovimientosInventario.EditCLDOC_MIMouseMove#AT!SelfN!Sender8!ShiftF6!X&<!Y&<c(1TFormaMovimientosInventario.EditCLPRO_MIMouseMove#AT!SelfN!Sender8!ShiftF6!X&<!Y&<c(0TFormaMovimientosInventario.EditAlmacenMouseMove#AT!SelfN!Sender8!ShiftF6!X&<!Y&<c(1TFormaMovimientosInventario.EditREFMO_MIMouseMove#AT!SelfN!Sender8!ShiftF6!X&<!Y&<c(1TFormaMovimientosInventario.EditTIMOV_MIMouseMove#AT!SelfN!Sender8!ShiftF6!X&<!Y&<c(-TFormaMovimientosInventario.EditTIMOV_MIEnter#1T!SelfN!Sender8c(*TFormaMovimientosInventario.Entradas1Click#T!SelfN!Sender8 siguiente< anterior< desdefF hastavalorfFc()TFormaMovimientosInventario.Salidas1Click#qT!SelfN!Sender8 siguiente< anterior< desdefF hastavalorfFc(1TFormaMovimientosInventario.TablamovinveEditError#T!SelfN!DataSet"!E$"Action&&c(1TFormaMovimientosInventario.TablamovinvePostError#T!SelfN!DataSet"!E$"Action&&c(/TFormaMovimientosInventario.BotonNuevoMouseDown#zT!SelfN!Sender8!Button4!Shift&6 !X&<!Y&<c(1TFormaMovimientosInventario.BotonGuardarMouseDown#zT!SelfN!Sender8!Button4!Shift&6 !X&<!Y&<c(0TFormaMovimientosInventario.BotonBuscarMouseDown#zT!SelfN!Sender8!Button4!Shift&6 !X&<!Y&<c(.TFormaMovimientosInventario.BotonMailMouseDown#zT!SelfN!Sender8!Button4!Shift&6 !X&<!Y&<c(2TFormaMovimientosInventario.BotonImprimirMouseDown#zT!SelfN!Sender8!Button4!Shift&6 !X&<!Y&<c(*TFormaMovimientosInventario.Utilidad1Click#T!SelfN!Sender8c('TFormaMovimientosInventario.Temas1Click#T!SelfN!Sender8c(0TFormaMovimientosInventario.BotonPreliminarClick#1T!SelfN!Sender8c(+TFormaMovimientosInventario.DetalleKeyPress#T!SelfN!Sender8"Key@c( FinalizationQt! Tc(movinv!TcGN2Fh. @v,TIPMOV2q,TablaInventario, TablaConcepto,DialogoImpresora, DataSource3, TablaDeta, DataSource2, Tablamovinve, Tablamovinvd,TablamovinvdCANTI_MI,TablamovinvdCLPRO_MI,TablamovinvdCOSUN_MI!,TablamovinvdCLDOC_MI1, DataSource1A, MainMenu1Q,Archivo1a,Salir1q, Registro1,Nuevo1, Modificar1,Guardar1,Buscar1, Imprimir1, Reportes1, Consultas1,Ayuda1 , TablaReporte , DataSource4! ,TablaReporteCLDOC_MI1 ,TablaReporteCLPRO_MIA ,TablaReporteDESCR_MIQ ,TablaReporteFEDOC_MIa ,TablaReporteCANTI_MIq ,TablaReportePUNIT_MI ,TablaReporteCOSUN_MI ,TablaDetaCANTIDAD ,TablaDetaCLAVE ,TablaDetaDESCRIPCION ,TablaDetaCOSTO ,TablaDetaPRECIO ,TablaDetaIMPORTE ,dos2 ,uno2 ,Bevel1! ,Panel11 , BotonNuevo A , BotonGuardar Q , BotonBuscar a , BotonImprimir q , BotonSalir , BotonMail ,Usuario2 ,Botonsiguiente1 , Botonanterior , Botonprimero , Botonultimo ,Panel3 ,Caja ,Label32 ,Label12! ,Label421 ,Label22A ,Label52Q ,Label62a ,Label72q ,Label82 , EditFEDOC_MI* , EditAlmacen , EditCLDOC_MI* , EditREFMO_MI* , EditCLPRO_MI* , EditTIMOV_MI* ,Detalle , Entradas1 ,Salidas1 , PopupMenu1 ! ,Costeo11 , Utilidad1A ,Temas1Q ,Bevel2a ,Bevel3q ,Bevel4 ,Bevel5 ,Bevel6 ,Bevel7 ,aa2 ,BotonPreliminar - FormCreate-DBNavigatorClick -BotonsiguienteClick-BotonprimeroClick--BotonultimoClick=-BotonanteriorClickM-BotonSalirClicka-EditTIMOV_MIKeyDownm-BotonNuevoClick-EditFEDOC_MIEnter-DetalleColEnter-BotonGuardarClick-EditCLDOC_MIEnter-EditTIMOV_MIExit-EditFEDOC_MIKeyDown-EditCLDOC_MIKeyDown-EditCLPRO_MIKeyDown-EditAlmacenKeyDown-EditREFMO_MIKeyDown%-DetalleKeyDown9- FormCloseM- FormActivate]-BotonBuscarClicki-Consultas1Clicky-EditREFMO_MIExit- BitBtn1Click- FolderChange-SpeedButton1Click-SpeedButton4Click-SpeedButton2Click-SpeedButton3Click-AreaGraficaPaint-BotonImprimirClick-BotonMailClick -EditCLPRO_MIEnter-EditAlmacenEnter!-EditREFMO_MIEnter--DetalleColExit9-EditFEDOC_MIExitE-EditFEDOC_MIMouseMoveQ-EditCLDOC_MIMouseMovei-EditCLPRO_MIMouseMove-EditAlmacenMouseMove-EditREFMO_MIMouseMove-EditTIMOV_MIMouseMove-EditTIMOV_MIEnter-Entradas1Click- Salidas1Click -TablamovinveEditError%-TablamovinvePostError9-BotonNuevoMouseDownM-BotonGuardarMouseDowni-BotonBuscarMouseDown-BotonMailMouseDown-BotonImprimirMouseDown-Utilidad1Click- Temas1Click-BotonPreliminarClick-DetalleKeyPresscL!nDDR@M,fechap,numero<, proveedorr,almacent5, DocumentovM,Tipo3Uhd0d U3ZYYdDEMu3ZYYdh2E_^[]8Ha Ocurrido un Error al Abrir una de las Bases de Datos.SVWN|WF3ۋӋtӋ3ӋtӋ3CNu3_^[áá3SVؾ3D$fD$ 3$fD$gúR@\$D$D$D$R@\$D${YtD$|$l$؃(^[PrecioCosto=} $(DUfwRxáRxáRxáRxáRxáRxUQSEE3UhJd0d }u`33ZYYdhQE[Y] No se puede Guardar faltan datosUĨSV3E3UhGd0d UEUUEUUEUEEUUEαEƺ\R@h}u E\R@$tRpUQHEPZQxPEUUXQxUQHEPZQxPEUUXQxPEUUXQxUEPZQx$R@$4RpPHZQt\UQtpR@$RpQt}3UQHEƅ 34R@ݝ\R@܅$RpUQHEƅ 3tvR@ݝ\R@ܭ$Rp~Y3ZYYdhNE^[]CANTIDADCANTI_MICLAVECLPRO_MICLPRV_MI DESCRIPCIONDESCR_MIFEDOC_MIREFMO_MICLCOP_MICOSTOCOSUN_MINALMA_MITIMOV_MIPRECIOPUNIT_MICLDOC_MICLaveEXIST_ISxYt[US3E3Uhd0d LR@$RpUQHEPZQx$UQHEP8ZQxLR@$`RppR@$RpUQH}RD2}UR@]pR@M$RpSR@]LR@M$RpR@u xXRD3ZYYdhE[]CANTI_MICANTIDADCLPRO_MIClAVEDESCR_MI DESCRIPCIONCOSUN_MICOSTOPUNIT_MIPRECIOTIMOV_MIIMPORTECLDOC_MIS$D$TjD$D$T$3xYt[Ujj3Uhdd0d EuhxUu3ZYYdhkEYY] \consulta\Uj3Uhd0d UEUEtiUEtJ3,33ZYYdhEY]USV3҉UUEE3Uhd0d x u@ EEE U3UQHEEE EPjúUQHEEE U3UQHUUEEE U3t*UQHU3ZYYdhEEE^[]CLDOC_MINALMA_MIUS3ۉ]]3Uhd0d UQHEEE EPjUQHEEE U3ɋ3ZYYdhEE[]CLDOC_MIUSV3ɉMM3Uhd0d ~YDRDRD RD;u xYtкUQHEEE EPjUQHEEE U3ɋUQHUUEEE U3ɋt&UQHU3ZYYdhEE^[]CLDOC_MINALMA_MIUS3ɉM3Uhd0d RDEEURjEEU3ɋ0UQHU싃U싃EEE U3ɋt&UQHU싃3ZYYdhE[]CLDOC_MINALMA_MIUS3ɉM3Uhd0d RDEEURjEEU3ɋ0UQHU싃U싃EEE U3ɋt&UQHU싃3ZYYdhE[]CLDOC_MINALMA_MIUSV3ɉMM3Uhd0d RDRD RD;u xXtкUQHEEE EPjUQHEEE U3ɋUQHUUEEE U3ɋt&UQHU3ZYYdhEE^[]CLDOC_MINALMA_MIUSVf] .] 2&] . " >] m$ M0 Q V !" Q ^  ^  M0 Q V ! Q %  $ )* M&Q  !QhQ * !Q!&!%  % %  < & ".h  """"" -" $& r.,jq  j&  j&  jq&j& & 8  2 $ 2 &  , 2 &  ,  2j" & 2 0q & * 2 $  8 Z\* 2 > N Z\" 2 > d> (&$ 2 $ 2 & 2 & 2 $ 2 $ > . , 8 ( , 8 D $>     ^Z.     >j jj    % : % .- &  J\* N <Z 0!  ` j8\,0!  " j *  : DZ  @,6$ 4:<Z ,!  `j4\(,!  j-$-" -RZ -,!  `j4\(,! - f=$=" =RZ =,!  `j4\(,! = fM,MMM$ M4M:M<Z M,!  `j4\(,! M ja m"Dr(q  ih2  yuh ! "%:% X$jy}h!! >&"t:6tr&9" 6trD\& """*rtr  $ ($   !! d$(j $0j4\ ,! "y}h"   4,  (.4%490t$rtr$tR M0  6 6]  %%  i$i4b iRZ  `i @yy& ^y Xy d0!0! y  ! y  ! y  !y ! y  ! =y m(j $0 L0"` B xZ Y @0"` B xZ Y @0"` B xZ Y B0"` B xZ Y Bm     m  ( $ $  !  , , !! B!!!!!!! B---!-!- B9t  99(9EE(jyuhE QQQ!Q!Q Fiii!i!i F!! F!! F!! F!! F!! >*u*))"y & 8(("((("((("Y  (   "  (] &   aBe $(* !  $ RZ ,!  `j4\(,!  E *u *))" y  &  8(("((("((("Y   (       "     (]  &      aBe $(*  !  $  RZ  ,!  `j4\(,!   5%% 99 M$0mi$0m$0m$0m$0mQ   I N m"  $ A$A f        i 3$4Bp*$ L L4>DD$848$ 0Ap*4:$X<ZZZ4R*ZZ*R*ZZ LZZRR z$tPP"0*($@bP"X*($@,  P"X*0,@$  dX.n L $LH8$^h(848H 648B D"0 0 $$ $ $.X\ :P&b""""" < BbR:ff6f @ jlNlNNXjn4j: *  bt  >$jlljjH8  D6$r   b     * 2&    $$^\   HT  `T n ^> 4@ &.* L  XLT^8*HL  XLD Z8*HL  XLD Z@..* L  XLT^   0P 66 D dL,l@z 2:"F<8J ><8tdb&b$.   ,6@zX8(X2 D   D    (  .*  "      8^*H  P44:$$NNJJJ$J HU,(P@ DxJ 4DxJ 4DxJ 6DxJ6 4rX (, , ,@z6,@z6,@z6   t,4~,@z:,@z:,@z:,@z:,@z:,@z:,@z 2N800ENB$(*"*HL  XLx -N800ENB$(*"*HL  XLx d  d  d  d  d &xB,6J$RZA*NV=NTZMN^JpNA2N0N] N N NM N N N) xN- Ni >N N N : 0 0=`a pIAII%IY ] (pm  pR@p2   P0  2 a0         802 @0 > y00@)%%)))-`(189x91=`(A8IxIAM00Q@]nYY]Qa@ee m`0qyyFq|@0 @,`00:A  @ ,a@8!`022`,`0  p`,%`)11),9`p=EE= M`0Q Y YQ]@aani`(m8uuAm y @,  @D@D@D@D @4 @  @,!@%,%-@1,19@ = =E@I,IQ@U,Ui@m,m@,@,@,@,@,`0N 1 e `0 N 1 e% 9 M`0Q Y QnYni`0m u mnun`0  nn`0  nn`0  nn  @,~@    a