From c3e9132d9178449e2fc091bee771a04a5c391e93 Mon Sep 17 00:00:00 2001 From: roberto Date: Fri, 30 May 2008 17:59:41 +0000 Subject: [PATCH] Relaciones: presupuesto de cliente - albaranes de cliente git-svn-id: https://192.168.0.254/svn/Proyectos.Tecsitel_FactuGES2/trunk@393 0c75b7a4-871f-7646-8a2f-f78d34cc349f --- .../AlbaranesProveedor_Group.groupproj | 16 +- .../Views/AlbaranesProveedor_view.dpk | Bin 2602 -> 2631 bytes .../Views/AlbaranesProveedor_view.dproj | 9 +- .../Views/uEditorAlbaranesProveedor.dfm | 1 - .../Views/uEditorAlbaranesProveedor.pas | 15 +- .../uFacturasProveedorController.pas | 189 +---- .../FacturasProveedor_Group.groupproj | 16 +- .../Views/FacturasProveedor_view.dpk | Bin 1658 -> 1687 bytes .../Views/FacturasProveedor_view.dproj | 12 +- .../Views/uEditorFacturaProveedor.dfm | 256 ++++-- .../Views/uEditorFacturaProveedor.pas | 6 +- .../Views/uViewDetallesFacturaProveedor.dfm | 2 + .../Views/uViewDetallesFacturaProveedor.pas | 9 +- .../Views/uViewFacturaProveedor.dfm | 47 ++ .../Views/uViewFacturaProveedor.pas | 8 +- .../PresupuestosCliente_Group.groupproj | 26 +- .../Views/PresupuestosCliente_view.dpk | Bin 1952 -> 1979 bytes .../Views/PresupuestosCliente_view.dproj | 14 +- .../Views/uEditorPresupuestosCliente.dfm | 7 +- .../Views/uEditorPresupuestosCliente.pas | 38 +- .../AlbProv_FacProv_relation.dpk | 20 +- .../AlbProv_FacProv_relation.dproj | 596 +++++++++++--- .../AlbProv_FacProv_relation.rc | 22 + .../AlbProv_FacProv_relation.res | Bin 5056 -> 384 bytes .../uGenerarFacturasProvAlbProvUtils.pas | 216 ++++- .../uGenerarFacturasProvUtils.pas | 2 + .../PreCli_AlbCli_relation.dpk | 38 + .../PreCli_AlbCli_relation.dproj | 764 ++++++++++++++++++ .../PreCli_AlbCli_relation.rc | 0 .../PreCli_AlbCli_relation.res | Bin 0 -> 32 bytes .../uGenerarAlbaranesCliUtils.dfm | 313 +++++++ .../uGenerarAlbaranesCliUtils.pas | 289 +++++++ Source/Servidor/FactuGES_Server.RES | Bin 23200 -> 5156 bytes Source/Servidor/FactuGES_Server.dproj | 542 ++++++------- 34 files changed, 2754 insertions(+), 719 deletions(-) create mode 100644 Source/Modulos/Relaciones/Presupuestos de cliente - Albaranes de cliente/PreCli_AlbCli_relation.dpk create mode 100644 Source/Modulos/Relaciones/Presupuestos de cliente - Albaranes de cliente/PreCli_AlbCli_relation.dproj create mode 100644 Source/Modulos/Relaciones/Presupuestos de cliente - Albaranes de cliente/PreCli_AlbCli_relation.rc create mode 100644 Source/Modulos/Relaciones/Presupuestos de cliente - Albaranes de cliente/PreCli_AlbCli_relation.res create mode 100644 Source/Modulos/Relaciones/Presupuestos de cliente - Albaranes de cliente/uGenerarAlbaranesCliUtils.dfm create mode 100644 Source/Modulos/Relaciones/Presupuestos de cliente - Albaranes de cliente/uGenerarAlbaranesCliUtils.pas diff --git a/Source/Modulos/Albaranes de proveedor/AlbaranesProveedor_Group.groupproj b/Source/Modulos/Albaranes de proveedor/AlbaranesProveedor_Group.groupproj index 13a0ac7d..4e41c749 100644 --- a/Source/Modulos/Albaranes de proveedor/AlbaranesProveedor_Group.groupproj +++ b/Source/Modulos/Albaranes de proveedor/AlbaranesProveedor_Group.groupproj @@ -11,6 +11,7 @@ + @@ -131,14 +132,23 @@ + + + + + + + + + - + - + - + \ No newline at end of file diff --git a/Source/Modulos/Albaranes de proveedor/Views/AlbaranesProveedor_view.dpk b/Source/Modulos/Albaranes de proveedor/Views/AlbaranesProveedor_view.dpk index 5378484bf7f1f35a30249fca7c6d0e2fb668e372..51bba10d5b9d834a53d9889dc31f6cdd09210a34 100644 GIT binary patch delta 42 ucmZ1_a$ICX36rc2FPDOXV@^^)QGQvxTVgVpE=tWwEXmBz+g!r5jU50gj1I{F delta 12 TcmX>uvPxt_3Df3@OxxH2A&3OS diff --git a/Source/Modulos/Albaranes de proveedor/Views/AlbaranesProveedor_view.dproj b/Source/Modulos/Albaranes de proveedor/Views/AlbaranesProveedor_view.dproj index 4e523cbc..772dd0ce 100644 --- a/Source/Modulos/Albaranes de proveedor/Views/AlbaranesProveedor_view.dproj +++ b/Source/Modulos/Albaranes de proveedor/Views/AlbaranesProveedor_view.dproj @@ -1,4 +1,5 @@ - + + {9e558626-cf49-4cff-a178-e12c186758ac} AlbaranesProveedor_view.dpk @@ -41,7 +42,7 @@ Delphi.Personality Package -FalseTrueFalseTrueFalseFalseTrueFalse1000FalseFalseFalseFalseFalse308212521.0.0.01.0.0.0AlbaranesProveedor_view.dpk +FalseTrueFalseFalseFalseFalseTrueFalse1000FalseFalseFalseFalseFalse308212521.0.0.01.0.0.0AlbaranesProveedor_view.dpk @@ -50,6 +51,7 @@ + @@ -117,10 +119,9 @@ - diff --git a/Source/Modulos/Relaciones/Albaranes de proveedor - Facturas de proveedor/AlbProv_FacProv_relation.rc b/Source/Modulos/Relaciones/Albaranes de proveedor - Facturas de proveedor/AlbProv_FacProv_relation.rc index e69de29b..153736af 100644 --- a/Source/Modulos/Relaciones/Albaranes de proveedor - Facturas de proveedor/AlbProv_FacProv_relation.rc +++ b/Source/Modulos/Relaciones/Albaranes de proveedor - Facturas de proveedor/AlbProv_FacProv_relation.rc @@ -0,0 +1,22 @@ +1 VERSIONINFO +FILEVERSION 1,0,0,0 +PRODUCTVERSION 1,0,0,0 +FILEFLAGSMASK 0x3FL +FILEFLAGS 0x00L +FILEOS 0x40004L +FILETYPE 0x1L +FILESUBTYPE 0x0L +BEGIN + BLOCK "StringFileInfo" + BEGIN + BLOCK "0C0A04E4" + BEGIN + VALUE "FileVersion", "1.0.0.0\0" + VALUE "ProductVersion", "1.0.0.0\0" + END + END + BLOCK "VarFileInfo" + BEGIN + VALUE "Translation", 0x0C0A, 1252 + END +END diff --git a/Source/Modulos/Relaciones/Albaranes de proveedor - Facturas de proveedor/AlbProv_FacProv_relation.res b/Source/Modulos/Relaciones/Albaranes de proveedor - Facturas de proveedor/AlbProv_FacProv_relation.res index 86c94e6ada7b3c85f6761b1ee234a9f34ef3c861..8b251f312bcccec5485024f6fe8d80e1cdf25746 100644 GIT binary patch delta 89 zcmX@0-oQLTLCJxUfkAA@>-7}euyEfF+`%$mH-*3IwZ-y~5+miKtn3_w^Pn$V^ zQ861nx4C)wN(Q~H#+K|o*@m~&(3=1I%Llk7>S*pvE7;Yjz^+ljNYba;|&8!P>=GYp<9J^QiRC`-*du(Wb zBJI+RemE@Tm2dSSKL$269_p-ia&WJ{$B|EYy#Bt1`fm?B(CB-l8nlXqgY!6fUOzP@ zr|Te|e4cZxgJWuLF8<`}dughP69?9a%ha4}r`jtX-7UCl^he&nV;_S<)Ya!2FlEJu zrr{t12%dXkNqpywX{@?Eb_MKs@29XRNI;2D%DxW zo|xv^jnf#kFIDZr^e=W==PW{#^6Ao{deqzuxId;ujOZ~3;otiwSzBXu3^t3 z&$C~D3=Umz@OQRR9+}nP>x>=u115dAI{rd2#Mbgv81-@e%IA6)a8SDwHm3Di`~F1x z)jhG~04Fd5o4f^Iah!WFIS0|E#)aohzS6onIG_;>-~Ytz3J0A}=DenTZ*cIo-Ves9 zp>qHmo5lV+rntk2He9_1!t%2yZsF;l)>iGc4jkU$0bBWEPmBKKP>uSjxhXIDsSodT z@EG|gFZa>|hHF!PaN};FzIxxlpPKT;87{i(!eu7T%H?}r^yeP=K2c}If`cyKd-3DW z_4ib`jDt-MZ?C~;z1O=EKN(!YbpFJR_c`u>(C=ph9O_Y*Jz5Z>`Zs7T9Mn$y@ay$^ z{gulxYxXwGq@TIGbG$~Hi*qk8?9|WMkNweF@MU18F;AQKZ>jcWAL86`f59r^Yh;+XfGU10gV*5=*FT)q#qz2B_Ik28(#vUlW{{>1m(1wXK3zHQ3+RoHfz^$cuqg(^F;eqz6WUMUE^m$ z9R1u2H_t9ue%}<_JcD5KB$svgjBysd-ql#|toxF$&>h1Qc)Vw6j~u{SeHg>my$i{SJtD^MnJV!{AK!ZgN9Q4bN2bs7?m1Qo zsLwc-c&GZ4_%7jWppm+9C(?(bpCye?f6Mv)ml~{r9)<=EoH5SYSxm8xsWZv%2MjL$ zd)R%{gxqI&lEaJ6!*jggJMcIz?<5?~hn@VA1Kzcrp$;C`m0CzQdy{!G?|FT$$5W3N zaydTsdE#>2dGSt*&wOX~r{!54?~lxS4gM|rOZH6mRCZMCP#!z)bEv-^up_gJ*i*BY zl>1d-%!E}5v+s{C_OF@Qj;!xrv5)P2yJ4TmKCqke`Aq-U;NJ}WpRu*&|7!3r$c7zU zF#m_6?>Cia!E%D)b;IaF{ zzPG~QEyw>z^LKm}whzS>Dx3Ct`1w98?Y5 0 then + ADestino.ID_ARTICULO := AOrigen.ID_ARTICULO; + ADestino.CONCEPTO := AOrigen.CONCEPTO; + ADestino.CANTIDAD := AOrigen.CANTIDAD; + ADestino.IMPORTE_UNIDAD := AOrigen.IMPORTE_UNIDAD; + ADestino.IMPORTE_TOTAL := AOrigen.IMPORTE_TOTAL; + ADestino.DESCUENTO := AOrigen.DESCUENTO; + ADestino.IMPORTE_PORTE := AOrigen.IMPORTE_PORTE; + ADestino.VISIBLE := AOrigen.VISIBLE; + ADestino.REFERENCIA_PROVEEDOR := AOrigen.REFERENCIA_PROVEEDOR; + ADestino.Post; + AOrigen.Next; + end; + finally + ADetallesController.EndUpdate(ADestino); + ADetallesController := NIL; + end; +end; + + + procedure Inicializar; begin dmGenerarFacturasProv := TdmGenerarFacturasProv.Create(nil); @@ -194,9 +257,8 @@ begin AAlbaran.DataTable.Active := True; try - AFacturasNuevas := AFacturasProveedorController.Nuevo(False); - if AFacturasProveedorController.Anadir(AFacturasNuevas, AAlbaran) then + if GenerarFacturas(AFacturasNuevas, AAlbaran) then begin if AFacturasNuevas.DataTable.RecordCount = 1 then begin @@ -249,4 +311,148 @@ begin end; end; + +function GenerarFacturas(AFacturas: IBizFacturaProveedor; AListaAlbaranes: IBizAlbaranProveedor): Boolean; +var + AFacturaActual : IBizFacturaProveedor; + AAlbaranesController : IAlbaranesProveedorController; + I: Integer; + bEnEdicion : Boolean; +begin + + // ATENCIÓN!!! AFacturas tiene que estar vacio para no pisar facturas + // ya generadas. + if not Assigned(AFacturas) then + raise Exception.Create ('Factura no asignada (Anadir)'); + + if not Assigned(AListaAlbaranes) then + raise Exception.Create ('Albaranes no asignados (Anadir)'); + + + + if not AFacturas.DataTable.Active then + AFacturas.DataTable.Active := True; + + if not AListaAlbaranes.DataTable.Active then + AListaAlbaranes.DataTable.Active := True; + + // ShowHourglassCursor; + // Application.ProcessMessages; + + AAlbaranesController := TAlbaranesProveedorController.Create; + try + // Ordenar por fecha de albaran + AListaAlbaranes.DataTable.Sort([fld_AlbaranesProveedorFECHA_ALBARAN], [uDADataTable.sdAscending]); + AListaAlbaranes.First; + for I := 0 to AListaAlbaranes.DataTable.RecordCount - 1 do + begin + AListaAlbaranes._Proveedor := NIL; + AFacturaActual := NIL; + + // Busco si hay alguna factura ya hecha de ese Proveedor + AFacturas.DataTable.First; + if AFacturas.DataTable.Locate(fld_FacturasProveedorID_Proveedor, AListaAlbaranes.ID_Proveedor, []) then + begin + AFacturaActual := AFacturas; + AFacturasProveedorController.RecuperarProveedor(AFacturaActual); + AFacturaActual.Proveedor.DataTable.Active := True; + end + else begin + // No hay factura de ese Proveedor. Creo una nueva + AFacturasProveedorController.Anadir(AFacturas); + AAlbaranesController.RecuperarProveedor(AListaAlbaranes); + AFacturas.Proveedor := AListaAlbaranes.Proveedor; + + //Siempre asignaremos por defecto la referencia de factura de proveedor que tenga el primer albaran del proveedor + bEnEdicion := (AFacturas.DataTable.State in dsEditModes); + if not bEnEdicion then + AFacturas.Edit; + AFacturas.REFERENCIA_PROVEEDOR := AListaAlbaranes.REF_FACTURA_PROV; + AFacturas.Post; + if bEnEdicion then + AFacturas.Edit; + + //Si el albaran es de tipo devolución hacemos la factura de tipo abono + if (AListaAlbaranes.TIPO = CTE_TIPO_ALBARAN_DEV) then + begin + bEnEdicion := (AFacturas.DataTable.State in dsEditModes); + if not bEnEdicion then + AFacturas.Edit; + AFacturas.TIPO := CTE_TIPO_ABONO; + AFacturas.Post; + if bEnEdicion then + AFacturas.Edit; + end; + + AFacturaActual := AFacturas; + end; + + // Ya tengo la factura. Le añado los conceptos del albarán + AFacturaActual.Detalles.DataTable.Last; + // Añado el título + AFacturasProveedorController.DetallesController.Add(AFacturaActual.Detalles, TIPO_DETALLE_TITULO); + // Self.DetallesController.Add(AFacturaActual.Detalles, TIPO_DETALLE_TITULO); + with AFacturaActual.Detalles do + begin + Edit; + CONCEPTO := 'Albarán ' + AListaAlbaranes.REFERENCIA + ' del ' + DateToStr(AListaAlbaranes.FECHA_ALBARAN); + Post; + end; + // Añado el contenido del albarán + CopiarArticulosAlbaran(AListaAlbaranes.Detalles, AFacturaActual.Detalles); + + {En los albaranes a proveedor el porte es a nivel del artículo + Self.DetallesController.Add(AFacturaActual.Detalles, TIPO_DETALLE_CONCEPTO); + with AFacturaActual.Detalles do + begin + Edit; + CONCEPTO := 'Porte del albarán'; + CANTIDAD := 1; + IMPORTE_UNIDAD := AListaAlbaranes.IMPORTE_PORTE; + Post; + end; + } + + // Añado el resumen + AFacturasProveedorController.DetallesController.Add(AFacturaActual.Detalles, TIPO_DETALLE_SUBTOTAL); + //Self.DetallesController.Add(AFacturaActual.Detalles, TIPO_DETALLE_SUBTOTAL); + with AFacturaActual.Detalles do + begin + Edit; + CONCEPTO := 'Total del albarán ' + AListaAlbaranes.REFERENCIA; + Post; + end; + + // Añado una línea en blanco + AFacturasProveedorController.DetallesController.Add(AFacturaActual.Detalles, TIPO_DETALLE_CONCEPTO); + // Self.DetallesController.Add(AFacturaActual.Detalles, TIPO_DETALLE_CONCEPTO); + with AFacturaActual.Detalles do + begin + Edit; + CONCEPTO := ''; + Post; + end; + + // Guardo la factura que acabo de generar o editar + AFacturaActual.CalcularImporteTotal; + AFacturasProveedorController.Guardar(AFacturaActual); + // Self.Guardar(AFacturaActual); + // Asocio la factura con el albarán + AListaAlbaranes.Edit; + AListaAlbaranes.ID_FACTURA := AFacturaActual.ID; + AListaAlbaranes.Post; + AAlbaranesController.Guardar(AListaAlbaranes); + + AListaAlbaranes.Next; + end; + Result := True; + finally + AAlbaranesController := NIL; +// HideHourglassCursor + end; + + +end; + + end. diff --git a/Source/Modulos/Relaciones/Pedidos de proveedor - Facturas de proveedor/uGenerarFacturasProvUtils.pas b/Source/Modulos/Relaciones/Pedidos de proveedor - Facturas de proveedor/uGenerarFacturasProvUtils.pas index effafd7f..b8c39e33 100644 --- a/Source/Modulos/Relaciones/Pedidos de proveedor - Facturas de proveedor/uGenerarFacturasProvUtils.pas +++ b/Source/Modulos/Relaciones/Pedidos de proveedor - Facturas de proveedor/uGenerarFacturasProvUtils.pas @@ -174,6 +174,7 @@ var // AArticulos: IBizPedidoClienteArticulosPend; i: Integer; begin +{ Result := False; if not Assigned(AAlbaranesProveedorController) then Inicializar; @@ -209,6 +210,7 @@ begin finally AFacturasNuevas := NIL; end; +} end; function GenerarFacturaProv : Boolean; overload; diff --git a/Source/Modulos/Relaciones/Presupuestos de cliente - Albaranes de cliente/PreCli_AlbCli_relation.dpk b/Source/Modulos/Relaciones/Presupuestos de cliente - Albaranes de cliente/PreCli_AlbCli_relation.dpk new file mode 100644 index 00000000..1550d276 --- /dev/null +++ b/Source/Modulos/Relaciones/Presupuestos de cliente - Albaranes de cliente/PreCli_AlbCli_relation.dpk @@ -0,0 +1,38 @@ +package PreCli_AlbCli_relation; + +{$R *.res} +{$ALIGN 8} +{$ASSERTIONS ON} +{$BOOLEVAL OFF} +{$DEBUGINFO ON} +{$EXTENDEDSYNTAX ON} +{$IMPORTEDDATA ON} +{$IOCHECKS ON} +{$LOCALSYMBOLS ON} +{$LONGSTRINGS ON} +{$OPENSTRINGS ON} +{$OPTIMIZATION ON} +{$OVERFLOWCHECKS OFF} +{$RANGECHECKS OFF} +{$REFERENCEINFO ON} +{$SAFEDIVIDE OFF} +{$STACKFRAMES OFF} +{$TYPEDADDRESS OFF} +{$VARSTRINGCHECKS ON} +{$WRITEABLECONST OFF} +{$MINENUMSIZE 1} +{$IMAGEBASE $400000} +{$IMPLICITBUILD OFF} + +requires + Contactos_controller, + Contactos_model, + PresupuestosCliente_controller, + PresupuestosCliente_model, + AlbaranesCliente_controller, + AlbaranesCliente_model; + +contains + uGenerarAlbaranesCliUtils in 'uGenerarAlbaranesCliUtils.pas'; + +end. diff --git a/Source/Modulos/Relaciones/Presupuestos de cliente - Albaranes de cliente/PreCli_AlbCli_relation.dproj b/Source/Modulos/Relaciones/Presupuestos de cliente - Albaranes de cliente/PreCli_AlbCli_relation.dproj new file mode 100644 index 00000000..d9590a37 --- /dev/null +++ b/Source/Modulos/Relaciones/Presupuestos de cliente - Albaranes de cliente/PreCli_AlbCli_relation.dproj @@ -0,0 +1,764 @@ + + + {69494a8c-0a35-41ea-b8ec-ea790bfc0662} + PreCli_AlbCli_relation.dpk + Debug + AnyCPU + DCC32 + ..\..\..\..\Output\Debug\Cliente\PreCli_AlbCli_relation.bpl + + + 7.0 + False + False + 0 + .\ + .\ + .\ + ..\..\..\..\Output\Debug\Cliente + ..\..\Lib + ..\..\..\Lib;..\..\Lib + ..\..\..\Lib;..\..\Lib + ..\..\..\Lib;..\..\Lib + ..\..\..\Lib;..\..\Lib + RELEASE + + + 7.0 + .\ + .\ + .\ + ..\..\..\..\Output\Debug\Cliente + ..\..\Lib + ..\..\..\Lib;..\..\Lib + ..\..\..\Lib;..\..\Lib + ..\..\..\Lib;..\..\Lib + ..\..\..\Lib;..\..\Lib + + + Delphi.Personality + Package + + + False + True + False + + + False + False + False + + + True + False + 1 + 0 + 0 + 0 + False + False + False + False + False + 3082 + 1252 + + + + + 1.0.0.0 + + + + + + 1.0.0.0 + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + Borland Sample Components + Delphi 1.0 Compatibility Components + Borland MyBase DataAccess Components + TeeChart Components + Borland SimpleDataset Component (DBX) + ExpressBars extended items by Developer Express Inc. + ExpressBars by Developer Express Inc. + ExpressScheduler 2 by Developer Express Inc. + ExpressVerticalGrid by Developer Express Inc. + ExpressBars DBNavigator by Developer Express Inc. + ExpressBars extended DB items by Developer Express Inc. + ExpressSideBar by Developer Express Inc. + JVCL Band Objects + JVCL Non-Visual Components + JVCL Encryption and Compression Components + JVCL Dialog Components + JVCL Docking Components + JVCL DotNet Controls + JVCL EDI Components Designtime Package + JVCL HMI Controls design time unit + JVCL Interpreter Components + JVCL Jans Components + JVCL Managed Threads + JVCL Multimedia and Image Components + JVCL Network Components + JVCL Page Style Components + JVCL Plugin Components + JVCL Print Preview Components + JVCL Runtime Design Components + JVCL Time Framework + JVCL Unified Interbase Components + JVCL Validators and Error Provider Components + SMImport suite: data importing into dataset. Scalabium/Mike Shkolnik, 2000-2005 + SMExport suite: data export from dataset. Written by Mike Shkolnik/Scalabium, 1998-2004. + Intraweb 8.0 Design Package for Borland Development Studio 2006 + Internet Explorer Components + + + PreCli_AlbCli_relation.dpk + + + + + + + MainSource + + + + + + + + + + + + + diff --git a/Source/Modulos/Relaciones/Presupuestos de cliente - Albaranes de cliente/PreCli_AlbCli_relation.rc b/Source/Modulos/Relaciones/Presupuestos de cliente - Albaranes de cliente/PreCli_AlbCli_relation.rc new file mode 100644 index 00000000..e69de29b diff --git a/Source/Modulos/Relaciones/Presupuestos de cliente - Albaranes de cliente/PreCli_AlbCli_relation.res b/Source/Modulos/Relaciones/Presupuestos de cliente - Albaranes de cliente/PreCli_AlbCli_relation.res new file mode 100644 index 0000000000000000000000000000000000000000..36f26e234a8ac66a47e95cec6d496cf2f1442471 GIT binary patch literal 32 UcmZQzU|>)H;{X347|28c09i@|9RL6T literal 0 HcmV?d00001 diff --git a/Source/Modulos/Relaciones/Presupuestos de cliente - Albaranes de cliente/uGenerarAlbaranesCliUtils.dfm b/Source/Modulos/Relaciones/Presupuestos de cliente - Albaranes de cliente/uGenerarAlbaranesCliUtils.dfm new file mode 100644 index 00000000..95561c15 --- /dev/null +++ b/Source/Modulos/Relaciones/Presupuestos de cliente - Albaranes de cliente/uGenerarAlbaranesCliUtils.dfm @@ -0,0 +1,313 @@ +object dmGenerarAlbaranesCli: TdmGenerarAlbaranesCli + OldCreateOrder = False + Height = 176 + Width = 254 + object JsListaAlbaranesGenerados: TJSDialog + DialogOptions = [doCommandLinks, doModal] + Glyph.Data = { + 0A54504E474F626A65637489504E470D0A1A0A0000000D494844520000001C00 + 00001C0806000000720DDF940000000970485973000017120000171201679FD2 + 520000000467414D410000B18E7CFB5193000003104944415478DAAD96FB4B14 + 5114C7CFE463DC1E606444BFF54424D3DC55CA52B1CCD7165A219905054182FD + 1452FD5810FD100406610A669A998FC4F5BDB6266265DAB60F5DD15E58FE03B2 + 3F99D29ABBA7B9779C71C61D9D6177CFCE70CFDCB97B3EF7DCF3BD33C38082FD + B502B2B300CC656020048688A24F036233A0671F40D43160BA87BF62AEEE1010 + 60D7AE293AD8B835815E9B625C80DC8F1E88D4A7C1E8C1FB8F9FD6C3C44035B3 + 21500A65F6D700FE2EA580A5EC551F4A50359316B31D76EFDC0EE5F72A645045 + A067AE0623074B8140891108F1057064CC0D556053DF173812B707E6DCF332A8 + 225080D201DB4AF99BF335B4D502F371415BCC364833C4C29F458F0C2A031281 + 081734AB0B3C88403C1E6E3E2E7960F6A8FFD27A7D3EF07A11DA2C76C84A8D87 + A57FCB32E8B8A54A4C8C21B59365C9015996EF2240B6634DF435B51460A46D1F + 70C093AA46BF09C980C12CA914E6F371ADD707EF1DB3B0B0B8006EB79B8EA96B + EA5106121851245129118FD8BFA2DC5C53C6BAF5EBBBBA97C2D64EC064195B1F + 286C76E956A0EA5C51AEB4764A9929F5750D5A9581D2274B9B651C0BA2F514A8 + 6F28E36B70AD9A4253EF97A9AA55B0CEBA87D03B645B3F43C1DE589C58186D10 + 81150FCAC57B11E161B04517099BB953C78643141B01BA28EEE4DAB0B04DE2B8 + CA460B9C399902E661BB3AB0F5AD038BF30CD4D7E7DD14815A61023027DD00EF + 469C1A80FD1C307F1578FD4A81E665945AD68924181A9D5007B6F4DBF1527E32 + F5C9D3632351F8F549AEE916B14EAA039BCD362C31A6040D23E7887D4A03B0CF + 86C5C6641A24BB7646D3F2D51A77F8C1BCDCFFC79CD3EAC0D7BD56AE86294165 + 4660CB5C6B737DD3062CCA31D00069E76E05241862CF1EDD05E7D40F756063CF + 673C7F5A4F679A59541EF03E4C8C3B0893DF67D481AFBAC7B0F05412CD30EBE2 + ED80F7617CEC0198FEF94B1BF06C6622AD4B4EC99D80F7A1666043D7281A3312 + FD84C20B8417C3AA789405239826E0CBCE4F98979E10344C33B0BE630473D312 + 82866906D6993E62F6F1C3F45D160A5305BE68FF8095CF5B4302134CFE1185EA + 1FB8A1B4FF4FE32FF6FADB8B5E0000000049454E44AE426082} + Instruction.Text = 'Se ha generado el albar'#225'n de cliente' + Instruction.Glyph.Data = { + 0A54504E474F626A65637489504E470D0A1A0A0000000D494844520000001C00 + 00001C0806000000720DDF940000000970485973000017120000171201679FD2 + 520000000467414D410000B18E7CFB5193000003104944415478DAAD96FB4B14 + 5114C7CFE463DC1E606444BFF54424D3DC55CA52B1CCD7165A219905054182FD + 1452FD5810FD100406610A669A998FC4F5BDB6266265DAB60F5DD15E58FE03B2 + 3F99D29ABBA7B9779C71C61D9D6177CFCE70CFDCB97B3EF7DCF3BD33C38082FD + B502B2B300CC656020048688A24F036233A0671F40D43160BA87BF62AEEE1010 + 60D7AE293AD8B835815E9B625C80DC8F1E88D4A7C1E8C1FB8F9FD6C3C44035B3 + 21500A65F6D700FE2EA580A5EC551F4A50359316B31D76EFDC0EE5F72A645045 + A067AE0623074B8140891108F1057064CC0D556053DF173812B707E6DCF332A8 + 225080D201DB4AF99BF335B4D502F371415BCC364833C4C29F458F0C2A031281 + 081734AB0B3C88403C1E6E3E2E7960F6A8FFD27A7D3EF07A11DA2C76C84A8D87 + A57FCB32E8B8A54A4C8C21B59365C9015996EF2240B6634DF435B51460A46D1F + 70C093AA46BF09C980C12CA914E6F371ADD707EF1DB3B0B0B8006EB79B8EA96B + EA5106121851245129118FD8BFA2DC5C53C6BAF5EBBBBA97C2D64EC064195B1F + 286C76E956A0EA5C51AEB4764A9929F5750D5A9581D2274B9B651C0BA2F514A8 + 6F28E36B70AD9A4253EF97A9AA55B0CEBA87D03B645B3F43C1DE589C58186D10 + 81150FCAC57B11E161B04517099BB953C78643141B01BA28EEE4DAB0B04DE2B8 + CA460B9C399902E661BB3AB0F5AD038BF30CD4D7E7DD14815A61023027DD00EF + 469C1A80FD1C307F1578FD4A81E665945AD68924181A9D5007B6F4DBF1527E32 + F5C9D3632351F8F549AEE916B14EAA039BCD362C31A6040D23E7887D4A03B0CF + 86C5C6641A24BB7646D3F2D51A77F8C1BCDCFFC79CD3EAC0D7BD56AE86294165 + 4660CB5C6B737DD3062CCA31D00069E76E05241862CF1EDD05E7D40F756063CF + 673C7F5A4F679A59541EF03E4C8C3B0893DF67D481AFBAC7B0F05412CD30EBE2 + ED80F7617CEC0198FEF94B1BF06C6622AD4B4EC99D80F7A1666043D7281A3312 + FD84C20B8417C3AA789405239826E0CBCE4F98979E10344C33B0BE630473D312 + 82866906D6993E62F6F1C3F45D160A5305BE68FF8095CF5B4302134CFE1185EA + 1FB8A1B4FF4FE32FF6FADB8B5E0000000049454E44AE426082} + Instruction.Icon = tdiCustom + CustomButtons = < + item + Caption = 'Ver el albar'#225'n' + Value = 100 + Info.Strings = ( + 'Mostrar el albar'#225'n que se ha creado') + end> + ButtonBar.Buttons = [cbOK] + ButtonBar.Cancel = cbOK + ButtonBar.UseCancel = False + MainIcon = tdiCustom + Title = 'FactuGES' + Position = dpMainFormCenter + Icon.Data = { + 0000010003002020100001000400E8020000360000002020000001000800A808 + 00001E0300002020000001002000A8100000C60B000028000000200000004000 + 0000010004000000000000020000000000000000000000000000000000000000 + 000000008000008000000080800080000000800080008080000080808000C0C0 + C0000000FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF000000 + 0000000000000000000000000000000008777777777777777777777700000000 + 0877767777677776777767760000000008F88888888888888888888700000000 + 08F8FF8F8F888888888888860000000008FF8F8F88F8F8888888888C00000000 + 08F88888F8888888888888860000000008F8688878E8888E88E8788700000000 + 08F8688888F8F8FFFFFF88760000000008FF4888888F8FFFFFFF788700000000 + 08F8676767677677677658E50000000008FF8888888887878787888700000000 + 08FF8887887E8888888888860000000008FFE8E8E788C8E8FF8F8F8600000000 + 08FFF8F8F8F8FF8F88F8F8870000000008FFFFFF8FF8F8F8F88F888600000000 + 0FF8477878787878788788860000000008FF68888888F8FF8F8F788700000000 + 08B7588888FF8FFFFFFF78860000083008BB47887776777777776F86000000B7 + 8B9B73BB88788787E87878870000008BB8B9BB78888888EFF8F8FF8600000087 + B8BB8B888E8E8E88FFF8F886000000088BBB888FFFFFFFFFF8F877770000B9BB + B8FFBB9B9BFFFFFFF87466460000BBB9BB8FBBBBB8FFFFFFF88F888700000008 + B8BB88888FFFFFFFF88F8F7700000008BBBBBB8FFFFFFFFFFF8887700000007B + B7B98BB8FFFFFFFFF8887700000000B78B9B87B888F88F88F8877000000007B0 + 08BB883B78888788787700000000000000B9000000000000000000000000FFFF + FFFFF800000FF800000FF800000FF800000FF800000FF800000FF800000FF800 + 000FF800000FF800000FF800000FF800000FF800000FF800000FF800000FF800 + 000FF800000FF800000F9800000FC000000FC000000FC000000FE000000F0000 + 000F0000000FE000000FE000001FC000003FC000007F980000FFFCFFFFFF2800 + 0000200000004000000001000800000000000004000000000000000000000001 + 00000001000000000000694731007C5D49007E604C0081635000826451008567 + 540085685500886B5900896D5B008A6E5D008B705F008E715F008B7260008C72 + 61008E74640084766C00957A6900977D6D00887B72009A8171009D8272009C84 + 76009D8778009F897B00A28A7900A08B7D00A18C7E00E1B06E00E1B67D003E7A + 970073A0A5007AA2B70074AFBD007BB2BB003CAACE0028A5DB0020ADDF000D9A + E500209EE3000DA6E2001AA4EF0000A6FF000CABFE0009ACFE0010A4F10015AC + FA0000B5FB0000B0FD000CB6FC0000BFF90000BAFD0004BAFD0009BBFB0013B6 + F40015BFFA001CBDFB0026B7FD00589EC50040A4CD0040ABCC0050A2C7005DAE + C00060A3C20062A4C60060B7CB006AB0CD007BB6C80077BAC80061BADD0044AD + E50000C3F80007C6FB0000CAF80000CFFB0000D4F90026C8FA0026CDF8002BCC + F90039C4FB0039C2FC0039CAFA003FCFFB0024D6F80030D2F80039D5F80000F8 + F8001FF8F8002CF6F8003EF4F8005AC6DC0070CDDF0052C0E40054C9E3004DCE + FA005FC7FF004FD2FB004DD9F8005FD9FB006ED3E70063CDFE0060D1FB0060D8 + F90060DDF80046F8F90056F0F8005FFAFA0073E3F80073E4F90073EEF80060F1 + F800958A84009A918C0081999500A68F8200AD968500A3968C00AE988900AD9A + 8D00B19A8B00AF9C9000B09E9200B59F9200B7A29300B2A19600B5A19400B7A4 + 9700BDA79700B4A39800B1A59D00B4A79F00BAA69800BCA79900B4A89F00BCA8 + 9900BAA89C00BDAA9D00BEAC9E0083ADBD00B5A9A100BDABA000BEADA100BFAF + A500A0BABE00C0AB9E00C1AC9E00C6AE9F00E2B98100E4BA8300E4BB8400E5BC + 8500E1BD8E00E3BF9000C0ADA000C2B0A300C2B1A500C4B2A600C1B2A800C3B5 + AB00C8B4A800CCB9AD00CEBCB100D0BEB200D1BFB400E4C19300E5C29400E6C4 + 9600E8C69900D0C9A300CFC1B800D2C1B600D3C3B800D5C4B900D6C6BC00D8C6 + BC00D6C8BE00DAC9BF00ECD3B000EDD4B200EFD6B500E7D1B800E7D3BD00F0D8 + B6008CB7C40080BEC70097C3C70099C3C900ABD7CF00AFD9DD0086E3F90086E7 + F90086ECF8009EE5FB0090E8F900ACEDFC00BCEAFD00BCF1FB00BFF1FD00D7C9 + C000D9CAC100DCCBC200DACCC200DDCCC300DACCC400DDCEC400DED0C600DED1 + C900DED3CC00DFD4CD00E1D1C900E2D5CD00F0DCC200E3D8D200E5D9D200E2DA + D500E6DBD400E5DCD500E8DDD600E6DDD800E9DFD900E6E0DB00EAE0DA00EAE2 + DD00ECE3DE00EBE4DE00ECE4DE00F3E7D900C6E1EF00C9EFFD00D7F6FD00DFF3 + FF00DFFEFE00EBE7E300EDE6E100EFE7E400EEE8E400F0EAE600F2EDE900F2EE + EC00F4EFEC00F5F0EE00F9F4ED00E7FAFD00EBF8FF00F6F2F000F7F4F100F8F4 + F200F9F7F500FAF8F600FBF9F900FCFBFA00FCFCFB00FEFEFE00000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 00000000000000000000007D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D + 0D0D0000000000000000009C9C19191919191919191919191919191919191919 + 1903000000000000000000ABDECBCBC7C7AFABABABABAAA3A2A2A0A0A0A0A0A0 + 8607000000000000000000ABECEAE9DEDEDEDED7D5D2D2D2CBCBCBCBB0CBB0CB + 9007000000000000000000ABEDECEAE9DEDEDBD7D7D5D2D2D2CDCDCBB0B0B0B0 + 9007000000000000000000AFEDE9A9CFD2CFD2CDCBCBCBB0B0ABACA3A3A3A3B0 + 9007000000000000000000AFF0D5017783838386868686869099909999907BB0 + 9007000000000000000000B0F4D501A0B0CBD2D5DEECEDF7FAFAFAFAFAF77BAA + 9007000000000000000000CBF4DC01A0B0B0B0D2D5DBEAEDF7FAFAFAFAF47BB0 + 9007000000000000000000CBF8DC010404070604090909090D0D110D110D02A3 + 9007000000000000000000CBFAED9E9E9E9C999E8C8C8C868683837E7D7D7ACB + 9007000000000000000000CBFAF1A7A7A6A6A6A69898989898B5DBDBD5D5D2D2 + 9907000000000000000000CDFAF796969696961D961D931D1DB4DEDBD7D5D5D2 + 9C07000000000000000000CFFAFAFAFAF8F7F0F0EDEDEDECE9E9DEDEDED7D5D5 + 9907000000000000000000CDFAFAEAF0EDEDECEAEAE9DEDEDBDCD5D5D5D5D2D5 + 9C07000000000000000000D2FAEC01737D7D7B7D7D7B7D7B7D7B7B7B7D7B7DD2 + 9907000000000000000000CFFAEC019EABB0CBD2D5DCDEECEDF4F4F4F4EA7BD2 + 9C07000000000000000000B9524601A0B0B0CBB5D5DEEAEDF7FAFAFAFAF47DD5 + 9C070000000000213F0000B83226010C3F5C1F111214141616191B1B1B1807D2 + 9C07000000000000253D8A5B322D711E2860BA7E7E7A7E797A797979767676D5 + 9E0700000000000041375E662F2B65314EBBB6B6B6B6B4B4B1E2F4EDEDEDECEA + 9C070000000000008F5D66663232394EC1A81C1C1C1C1C1C1CD3F7F4EDDED7D5 + 9C0700000000000000B7BE6E5758BEBDE4E6E6F3FAFAFAFAFAFAF7F4D5928675 + 7304000000002A2A2A2A4A6AFAE7562F2A2A2A5FFAFAFAFAFAFAF8D577010101 + 0101000000004747472F4A59C5E7564A32474766FAFAFAFAFAFAFADCA0D2CFB0 + A20C00000000000000436C6958686D6BC2C5C5E7FAFAFAFAFAFAFADEAADEDBCB + 1470000000000000004551534A4A5250C0E7FAFAFAFAFAFAFAFAFADEAAD7B514 + 700000000000000042384C54472B613550C3FAFAFAFAFAFAFAFAFADEA1B0196F + 000000000000000024234463322EBC5A3664E3ECE9E9E9E9E9E9E9CF90731300 + 000000000000003A3C00002232298B8B3E3B207E8B7E8B7E827E817E74100000 + 0000000000000000000000003227000000000000000000000000000000000000 + 000000000000FFFFFFFFF800000FF800000FF800000FF800000FF800000FF800 + 000FF800000FF800000FF800000FF800000FF800000FF800000FF800000FF800 + 000FF800000FF800000FF800000FF800000F9800000FC000000FC000000FC000 + 000FE000000F0000000F0000000FE000000FE000001FC000003FC000007F9800 + 00FFFCFFFFFF2800000020000000400000000100200000000000801000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000007067 + 5F70AA9382E570513CE3735540E3735540E3735540E3735540E3735540E37355 + 40E3735540E3735540E3735540E3735540E3735540E3735540E3735540E37355 + 40E3735540E3735540E3735540E3735540E3735540E3735540E372533EE5BAAB + A070000000000000000000000000000000000000000000000000000000005E54 + 4C7FCAB7ABFFC5B5AAFFA18877FFA28A78FFA28A79FFA28A79FFA28A79FFA28A + 79FFA28A79FFA28A79FFA28A79FFA28A79FFA28A79FFA28A79FFA28A79FFA28A + 79FFA28A79FFA28A79FFA28A79FFA28A79FFA28A79FFA58D7CFF7A5B46FFB2A1 + 967F000000000000000000000000000000000000000000000000000000006055 + 4D7ED7C6BBFFEDE4E0FFD9CCC4FFD9CCC4FFD9CBC3FFD8CAC1FFD7C9BFFFD6C7 + BDFFD5C6BBFFD4C4BAFFD3C3B8FFD2C1B7FFD1C0B5FFD0BEB3FFCFBDB2FFCEBC + B0FFCEBBAFFFCEBBAFFFCEBBAFFFCEBBAFFFCEBCB0FFBEAA9CFF82644FFFB2A1 + 967E000000000000000000000000000000000000000000000000000000006056 + 4D7ED7C8BCFFF2EBE8FFEFE9E5FFEEE7E2FFECE5E0FFEBE2DEFFEAE0DBFFE9DE + D8FFE7DBD4FFE5D9D1FFE3D7CFFFE2D4CCFFE1D2C9FFDFD0C7FFDDCDC4FFDCCB + C2FFDBC9BFFFDBC9BFFFDBC9BFFFDBC9BFFFDCCAC1FFC1AC9FFF81634FFFB2A1 + 967E000000000000000000000000000000000000000000000000000000006155 + 4E7ED8C9BDFFF3EDE9FFF1EAE6FFF0E9E6FFEEE6E1FFECE4DFFFEBE2DDFFEAE0 + DAFFE9DED7FFE7DBD4FFE5D9D1FFE3D7CFFFE2D4CCFFE1D2C9FFDFD0C7FFDDCD + C4FFDCCBC2FFDBC9BFFFDBC9BFFFDBC9BFFFDCCAC0FFC1AC9FFF81634FFFB2A1 + 967E000000000000000000000000000000000000000000000000000000006157 + 4E7ED9C9BFFFF4EFEDFFEFE8E3FFD0C2B9FFDFD5CEFFE0D5CEFFE0D4CCFFDED3 + CBFFDDD1C8FFDCCFC6FFDACCC4FFD9CBC1FFD8C9BFFFD7C7BDFFD6C5BBFFD5C4 + B9FFD3C2B7FFD2C0B5FFD2BFB4FFD2BFB4FFDAC8BEFFC1AC9FFF81634FFFB2A1 + 967E000000000000000000000000000000000000000000000000000000006256 + 4F7EDACCC0FFF5F2EFFFE5DDD9FF5C3821FFB0998AFFB8A394FFB8A394FFB9A3 + 94FFB8A495FFB9A597FFB9A698FFBAA698FFBBA799FFBBA89AFFBBA89BFFBCA8 + 9BFFBCA89BFFBCA89BFFBBA89AFFB49E8FFFD8C6BBFFC1AC9FFF81634FFFB2A1 + 967E000000000000000000000000000000000000000000000000000000006256 + 4F7EDBCBC1FFF8F4F3FFE7E0DBFF5F3C24FFD0BDB2FFDCCBC1FFDDCCC3FFE2D2 + CBFFE7DBD4FFEDE2DEFFF0E8E6FFF5F0EDFFF9F7F4FFFDFDFDFFFFFFFFFFFFFF + FFFFFFFFFFFFFFFFFFFFFAF8F7FFB39D8DFFD8C6BBFFC1AC9FFF81634FFFB2A1 + 967E000000000000000000000000000000000000000000000000000000006256 + 4F7EDCCEC3FFFAF6F5FFE9E2DDFF5F3C24FFD2BFB5FFDFCDC4FFDECCC3FFE0CE + C6FFE4D4CDFFE9DDD6FFEFE4E0FFF1EAE8FFF7F1EFFFFBF8F6FFFFFEFFFFFFFF + FFFFFFFFFFFFFFFFFFFFFCFBFAFFB5A090FFD9C7BEFFC1AD9FFF81634FFFB2A1 + 967E000000000000000000000000000000000000000000000000000000006257 + 4F7EDDCFC4FFFCF9F9FFE9E4E0FF5F3A23FF7C5D49FF7F5F4CFF7E5F4CFF7E60 + 4DFF7F614DFF816350FF826552FF836654FF846856FF856A57FF866B59FF876C + 5BFF876D5BFF876D5BFF866B59FF72523DFFD5C3B9FFC1AFA1FF81634FFFB2A1 + 967E000000000000000000000000000000000000000000000000000000006357 + 507EDECFC6FFFCFCFBFFF4F1F0FFC3B6AEFFC3B5ADFFC1B4ACFFC0B3AAFFBFB1 + A9FFBEB0A6FFBDAEA5FFBDACA3FFBCABA2FFBBAAA0FFBAA99FFFB8A69AFFB8A4 + 98FFB6A396FFB5A194FFB49F93FFB39D90FFDCCDC4FFC2AEA1FF81634FFFB2A1 + 967E000000000000000000000000000000000000000000000000000000006357 + 507EDFD2C7FFFEFEFDFFF9F5EFFFE8C696FFE9C799FFE8C697FFE7C596FFE7C4 + 95FFE6C394FFE5C293FFE4C091FFE4C090FFE3BF8FFFE2BD8CFFE9D5BFFFEBE1 + DCFFEADFD8FFE7DCD5FFE5DAD3FFE4D8D0FFE3D4CCFFC2AFA2FF81634FFFB2A1 + 967E000000000000000000000000000000000000000000000000000000006458 + 517EE0D3C8FFFFFFFFFFFAF5EFFFE3B77CFFE4B97FFFE2B87EFFE3B77DFFE2B7 + 7CFFE2B67BFFE1B57AFFE1B479FFE0B478FFE0B377FFDFB174FFE6D0B7FFEBE1 + DCFFE8DFD9FFE8DDD6FFE6D9D2FFE3D8D1FFE4D7CFFFC3AFA2FF81634FFFB2A1 + 967E000000000000000000000000000000000000000000000000000000006458 + 517EE1D2C9FFFFFFFFFFFEFEFDFFFEFFFFFFFCFDFEFFFBFBFBFFF9F7F8FFF8F5 + F6FFF7F3F2FFF5F1F0FFF4EFEEFFF1EDEBFFF0EBE9FFEEE9E6FFEDE6E2FFECE3 + DEFFEBE1DBFFE9DFD9FFE8DDD6FFE6DAD3FFE5D9D2FFC3B0A3FF81634FFFB2A1 + 967E000000000000000000000000000000000000000000000000000000006459 + 517EE1D4CAFFFFFFFFFFFDFDFCFFEEEBE8FFF5F2F0FFF4F0EFFFF3EFECFFF2ED + EAFFF1EBE8FFEEE9E5FFEFE7E3FFECE5E1FFEAE4DEFFEAE1DCFFE8E0DAFFE7DE + D8FFE6DDD6FFE5DBD4FFE4D8D1FFE2D6CEFFE6DBD4FFC3B1A4FF81634EFFB2A1 + 967E000000000000000000000000000000000000000000000000000000006559 + 527EE2D4CAFFFFFFFFFFF0ECEAFF5B361EFFAB9383FFB39D8EFFB39D8DFFB39D + 8DFFB29D8DFFB29C8DFFB29C8CFFB29C8CFFB29C8CFFB29C8CFFB29C8CFFB29C + 8CFFB29C8CFFB29C8CFFB29C8DFFB39D8EFFE3D8D0FFC4B1A4FF81634EFFB2A1 + 967E000000000000000000000000000000000000000000000000000000006559 + 527EE5D4CAFFFFFFFFFFF7F0EBFF5F3B24FFCCB8ADFFD7C5BAFFD9C7BDFFDCCC + C3FFE1D4CCFFE5DAD4FFE8E0DBFFEDE5E1FFF1EBE9FFF5F2EFFFF7F5F3FFF8F6 + F4FFF8F5F4FFF8F6F4FFF1EEEAFFB29C8DFFE6DAD3FFC4B2A5FF81634EFFB2A1 + 967E00000000000000000000000000000000000000000000000000000000685A + 527E9AC6C9FF35CFFEFF3DAEEBFF663E24FFD2BFB4FFE0CBBFFFE0C9BDFFE1CD + C4FFE4D5CDFFE9DED7FFEEE5E0FFF2EBE8FFF6F2F0FFFCF8F8FFFFFFFEFFFFFF + FFFFFFFFFFFFFFFFFFFFFCFAF9FFB49E8FFFE7DED7FFC5B3A6FF81634EFFB2A1 + 967E00000000000000000000000000000000007792910072A7A3001E33366957 + 4C7C86C1C8FF00BFFBFF079AEBFF6A3E23FF926D57FF5FA3C8FF4AC1E8FF6C9C + A2FF917260FF927767FF947A69FF957C6CFF977E6FFF998171FF9A8374FF9B85 + 76FF9C8678FF9C8678FF998274FF7D5E49FFE3D9D4FFC5B3A7FF81634EFFB2A1 + 967E00000000000000000000000000000000005A6F7000A9E5E40075AEAE5C90 + A5BD75D0E0FF00BFFAFF0CA3F4FF8A9A91FF3C7492FF03A4E4FF4AD5FFFF98C4 + CBFFB3A196FFB1A197FFB0A096FFB09F95FFAF9D92FFAF9C91FFAD9A8EFFAC99 + 8CFFAB988AFFAB9789FFAA9688FFA99386FFE8E0DAFFC5B4A7FF81634EFFB2A1 + 967E00000000000000000000000000000000000000002DA5BFC110C2FFFF4DD0 + FDFF64DBF9FF00B3FAFF09A8FEFF68D7FFFF04B5FFFF24CCFBFFAFD8CEFFF7DA + B8FFF3DBBBFFF3DBBAFFF2D9B9FFF1D8B7FFF0D7B4FFEED5B2FFF6EADDFFF9F6 + F4FFF7F3F1FFF5F1EEFFF5EFECFFF4EDEAFFF1EBE7FFC6B4A8FF81634EFFB2A1 + 967E00000000000000000000000000000000000000005F8A909142C7E4E960DE + F8FF64D7FAFF00B6FDFF00B8FDFF21B2FDFF1ECCF7FF93EBFCFFD2C69BFFE1AB + 63FFDFAC66FFDFAC66FFDFAC66FFDFAC66FFDFAC66FFDEA961FFEFDBC0FFF8F6 + F5FFF6F2F0FFF3EDEBFFECE2DCFFE9DFD9FFE5DBD6FFC2B1A4FF81634FFFB2A1 + 967E000000000000000000000000000E171A000E171A00040B145994A4A990EB + FCFF61F1F7FF13FAF7FF23F9F7FF93EDF7FF8CE5F8FFD5F2FDFFE9F8FFFFE7F8 + FFFFF0FCFFFFFFFFFFFFFFFFFFFFFFFFFFFFFEFFFFFFFDFEFFFFFAFAF9FFF9F7 + F5FFF7F2F0FFE8DFD8FFC7AE9FFFBEA998FFAF9888FFB09A8AFF7F604DFFB2A1 + 967E00000000000000000000000000AAFFFF00AAFFFF00AAFFFF00A4FFFF00CD + FAFF5DFCF9FFFFFFFFFFEEFEFEFF00FBF7FF00AAFEFF00A1FFFF00A1FFFF00A0 + FFFF56C3FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFCFDFBFFFCFBFAFFFBFA + F8FFE6DDD6FFAA9180FF5D3922FF603D26FF613E27FF613E28FF634029FFB4A3 + 987E00000000000000000000000000CAFFFF00CAFFFF00CBFFFF00B0FFFF00CD + FBFF38F5F7FFC3EFFAFFF0FFFEFF00FAF7FF00C8F7FF00C2F7FF00C2F7FF00C1 + F7FF57D7FAFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFEFEFEFFFDFDFCFFFCFC + FBFFE7DED8FFCCB9ACFFE6DBD5FFE2D7D0FFDCCFC5FFD7C5BBFF8E705DFFB4A2 + 9680000000000000000000000000002E383C002E383C00252F364C99B0B57DE8 + FBFF59F1F7FF25F7F7FF41FAF8FF7CEEF7FF77E4F7FFB5EFFCFFC6F2FDFFC3F2 + FDFFD9F6FCFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFDFEFEFFFEFE + FEFFE9E1DAFFCEBCAFFFF1E9E3FFEADFD8FFE4D5CCFF9D816FFF3A291F868985 + 831C00000000000000000000000000000000000000004E7073774AB0DADC37C9 + FBFF22D5F7FF00D3F9FF02C3FBFF37D5F7FF34BEFCFFA2E6FAFFECFBFDFFFFFF + FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFEFF + FFFFEAE2DCFFCDBBADFFEADFD8FFE3D5CBFF9F8271FF3E2D2386050100200000 + 000000000000000000000000000000000000000000003E9CC4C219C0FFFF23C9 + FCFF30D3F8FF00BEF8FF06A8FEFF4FDCF8FF00B8FCFF32C2FBFFC0EBFCFFFFFF + FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FFFFEAE3DEFFCDB9ABFFDDCEC4FFA58979FF3E2C1F8F0905041B000000000000 + 000000000000000000000000000000000000003451510099DDDB0091C0C35DAD + BCCF76D7E9FF00BEF9FF10A9FBFFBDDEDEFF5AC8DDFF0AB5F7FF62CEFFFFCBE4 + F1FFF1E7E0FFEFE7E1FFEEE6E1FFEEE6E1FFEEE6E0FFEDE6E0FFEDE5E0FFEEE6 + E1FFE1D4CCFFC5AE9FFFA68D7FF53E2718A10402000E00000000000000000000 + 0000000000000000000000000000000000000075B7AF0099C7C500323E425442 + 3B5C6BA8B1DA00C1FCFF0EA1F3F8A98E80C0AB9081C12698B1C10088C4C14C85 + A3C1A18D80C19E8D81C19E8B81C19D8C80C19B8C7FC19B8A7FC19C897FC19A89 + 7EC19B8B7EC1897769C2432B1BAC000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 00000045565A00C5FFFF0094E6E2000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000FFFFFFFFF0000007F0000007F0000007F000 + 0007F0000007F0000007F0000007F0000007F0000007F0000007F0000007F000 + 0007F0000007F0000007F0000007F0000007F0000007F0000007800000078000 + 0007C0000007C000000700000007000000070000000700000007C000000FC000 + 001F8000003F800000FFF8FFFFFF} + Width = 450 + Left = 72 + Top = 16 + end +end diff --git a/Source/Modulos/Relaciones/Presupuestos de cliente - Albaranes de cliente/uGenerarAlbaranesCliUtils.pas b/Source/Modulos/Relaciones/Presupuestos de cliente - Albaranes de cliente/uGenerarAlbaranesCliUtils.pas new file mode 100644 index 00000000..4651c06e --- /dev/null +++ b/Source/Modulos/Relaciones/Presupuestos de cliente - Albaranes de cliente/uGenerarAlbaranesCliUtils.pas @@ -0,0 +1,289 @@ +unit uGenerarAlbaranesCliUtils; + +interface + +uses + Windows, SysUtils, Classes, pngimage, JSDialog, + uBizPresupuestosCliente, uBizAlbaranesCliente; + +type + TdmGenerarAlbaranesCli = class(TDataModule) + JsListaAlbaranesGenerados: TJSDialog; + end; + + function GenerarAlbaranCli(const IDPresupuesto : Integer; var IDAlbaran: Integer) : Boolean; overload; + function GenerarAlbaranCli(APresupuesto : IBizPresupuestoCliente) : Boolean; overload; +// function ElegirPedidoYGenerarAlbaranCli(var IDAlbaran: Integer) : Boolean; + +implementation + +{$R *.dfm} + +uses + uDialogUtils, uBizDetallesPresupuestoCliente, uBizDetallesAlbaranCliente, + uPresupuestosClienteController, uAlbaranesClienteController, uClientesController, + uDetallesAlbaranClienteController, uControllerDetallesBase, + uBizContactos, schPresupuestosClienteClient_Intf, + schAlbaranesClienteClient_Intf; + +var + dmGenerarAlbaranesCli: TdmGenerarAlbaranesCli; + APresupuestosClienteController : IPresupuestosClienteController; + AAlbaranesClienteController : IAlbaranesClienteController; + ADetallesAlbaranesCliController : IDetallesAlbaranClienteController; + AClientesController : IClientesController; + +{ Métodos auxiliares } +procedure CopiarPresupuestoAAlbaran(APresupuesto: IBizPresupuestoCliente; AAlbaran : IBizAlbaranCliente); +begin + if not Assigned(AAlbaran) then + raise Exception.Create ('Albarán no asignado (CopiarPresupuestoAAlbaran)'); + + if not Assigned(APresupuesto) then + raise Exception.Create ('Pedido no asignado (CopiarPresupuestoAAlbaran)'); + + if not APresupuesto.DataTable.Active then + APresupuesto.DataTable.Active := True; + + // El albarán tiene que venir ya abierto y posicionado donde hay que copiar + AAlbaran.ID_CLIENTE := APresupuesto.ID_CLIENTE; + AAlbaran.ID_PEDIDO := APresupuesto.ID; + AAlbaran.REFERENCIA_CLIENTE := APresupuesto.REFERENCIA_CLIENTE; +// AAlbaran.CALLE := APresupuesto.CALLE; +// AAlbaran.CODIGO_POSTAL := APresupuesto.CODIGO_POSTAL; +// AAlbaran.POBLACION := APresupuesto.POBLACION; +// AAlbaran.PROVINCIA := APresupuesto.PROVINCIA; +// AAlbaran.PERSONA_CONTACTO := APresupuesto.PERSONA_CONTACTO; +// AAlbaran.TELEFONO := APresupuesto.TELEFONO; + AAlbaran.IMPORTE_NETO := APresupuesto.IMPORTE_NETO; + AAlbaran.IMPORTE_PORTE := APresupuesto.IMPORTE_PORTE; + AAlbaran.DESCUENTO := APresupuesto.DESCUENTO; + AAlbaran.IMPORTE_DESCUENTO := APresupuesto.IMPORTE_DESCUENTO; + AAlbaran.BASE_IMPONIBLE := APresupuesto.BASE_IMPONIBLE; + AAlbaran.IVA := APresupuesto.IVA; + AAlbaran.IMPORTE_IVA := APresupuesto.IMPORTE_IVA; + AAlbaran.IMPORTE_TOTAL := APresupuesto.IMPORTE_TOTAL; + AAlbaran.DataTable.FieldByName(fld_AlbaranesClienteOBSERVACIONES).AsVariant := APresupuesto.DataTable.FieldByName(fld_PresupuestosClienteOBSERVACIONES).AsVariant; + AAlbaran.ID_FORMA_PAGO := APresupuesto.ID_FORMA_PAGO; +// AAlbaran.FECHA_PREVISTA_ENVIO := APresupuesto.FECHA_PREVISTA_ENVIO; +end; + +{ +procedure CopiarArticulosPendAAlbaran( + APedido: IBizPedidoCliente; + AAlbaran: IBizAlbaranCliente; + AArticulosPendientes: IBizPedidoClienteArticulosPend); +var + i : integer; + ADetalles : IBizDetallesAlbaranCliente; + ADetallesController : IDetallesAlbaranClienteController; +begin + if not Assigned(AAlbaran) then + raise Exception.Create ('Albarán no asignado (CopiarArticulosPendAAlbaran)'); + + if not Assigned(APedido) then + raise Exception.Create ('Pedido no asignado (CopiarArticulosPendAAlbaran)'); + + if not Assigned(AArticulosPendientes) then + raise Exception.Create ('Artículos pendientes no asignado (CopiarArticulosPendAAlbaran)'); + + if not AArticulosPendientes.DataTable.Active then + AArticulosPendientes.DataTable.Active := True; + + // El albarán tiene que venir ya abierto y posicionado donde hay que copiar + + ADetalles := AAlbaran.Detalles; + ADetallesController := TDetallesAlbaranClienteController.Create; + try + AArticulosPendientes.DataTable.First; + for i := 0 to AArticulosPendientes.DataTable.RecordCount - 1 do + begin + //OJO IMPORTANTE + //Siempre que vayamos a trabajar con los detalles debemos hacer un beginupdate de los mismos y un endupdate para + //obligarle siempre a recalcular los detalles una sola vez + ADetallesController.BeginUpdate(ADetalles); + + APedido.Detalles.First; + if (APedido.Detalles.Locate('ID_ARTICULO', AArticulosPendientes.ID_ARTICULO, [])) then + if (AArticulosPendientes.CANTIDAD_PENDIENTE > 0) then + begin + ADetallesController.Add(ADetalles, TIPO_DETALLE_CONCEPTO); + ADetalles.Edit; + ADetalles.ID_PEDIDO := APedido.Detalles.ID_PEDIDO; + ADetalles.REFERENCIA := APedido.Detalles.REFERENCIA; + ADetalles.ID_ARTICULO := APedido.Detalles.ID_ARTICULO; + ADetalles.CONCEPTO := APedido.Detalles.CONCEPTO; + ADetalles.CANTIDAD := AArticulosPendientes.CANTIDAD_PENDIENTE; + ADetalles.IMPORTE_UNIDAD := APedido.Detalles.IMPORTE_UNIDAD; + ADetalles.IMPORTE_TOTAL := APedido.Detalles.IMPORTE_TOTAL; + ADetalles.DESCUENTO := APedido.Detalles.DESCUENTO; + ADetalles.IMPORTE_PORTE := APedido.Detalles.IMPORTE_PORTE; + ADetalles.VISIBLE := APedido.Detalles.VISIBLE; + ADetalles.REFERENCIA_PROVEEDOR := APedido.Detalles.REFERENCIA_PROVEEDOR; + ADetalles.Post; + AArticulosPendientes.Next; + end; + end; + finally + ADetallesController.EndUpdate(ADetalles); + ADetallesController := NIL; + end; +end; +} + +procedure Inicializar; +begin + dmGenerarAlbaranesCli := TdmGenerarAlbaranesCli.Create(nil); + APresupuestosClienteController := TPresupuestosClienteController.Create; + AAlbaranesClienteController := TAlbaranesClienteController.Create; + ADetallesAlbaranesCliController := TDetallesAlbaranClienteController.Create; + AClientesController := TClientesController.Create; +end; + +procedure Finalizar; +begin + FreeAndNIL(dmGenerarAlbaranesCli); + APresupuestosClienteController := nil; + AAlbaranesClienteController := nil; + ADetallesAlbaranesCliController := nil; + AClientesController := nil; +end; + + +function GenerarAlbaranCli(const IDPresupuesto : Integer; var IDAlbaran: Integer) : Boolean; overload; +var + APresupuesto : IBizPresupuestoCliente; + AAlbaran : IBizAlbaranCliente; +begin + Result := False; + IDAlbaran := -1; + + try + if not Assigned(APresupuestosClienteController) then + Inicializar; + + APresupuesto := APresupuestosClienteController.Buscar(IDPresupuesto); + if Assigned(APresupuesto) then + begin + Result := GenerarAlbaranCli(APresupuesto); + if Result then + IDAlbaran := AAlbaran.ID; + end; + finally + if Assigned(APresupuestosClienteController) then + Finalizar; + end; +end; + + +function GenerarAlbaranCli(APresupuesto : IBizPresupuestoCliente) : Boolean; overload; +var + i: Integer; + AlbaranesNuevos: IBizAlbaranCliente; + +begin + Result := False; + + if not Assigned(APresupuestosClienteController) then + Inicializar; + + if not Assigned(APresupuesto) then + raise Exception.Create('Presupuesto de cliente no asignado (GenerarAlbaranCli)'); + + if not APresupuesto.DataTable.Active then + APresupuesto.DataTable.Active := True; + + try +// AlbaranesNuevos := AAlbaranesClienteController.Nuevo(False); +{ if AAlbaranesClienteController.Anadir(AlbaranesNuevos, APresupuesto) then + begin + if AlbaranesNuevos.DataTable.RecordCount = 1 then + ShowInfoMessage('El albarán se ha dado de alta con el código ' + AlbaranesNuevos.REFERENCIA) + else begin + with dmGenerarAlbaranesCli.JsListaAlbaranesGenerados.Content do + begin + Clear; + AlbaranesNuevos.DataTable.Last; + for i := 0 to AlbaranesNuevos.DataTable.RecordCount - 1 do + begin + if Length(AlbaranesNuevos.REFERENCIA) > 0 then + Add(AlbaranesNuevos.REFERENCIA + ': ' + AlbaranesNuevos.NOMBRE); + AlbaranesNuevos.DataTable.Prior; + end; + end; + dmGenerarAlbaranesCli.JsListaAlbaranesGenerados.Execute; + end; + end; +} + finally + AlbaranesNuevos := NIL; + end; + +// AuxAlbaran := AAlbaranesClienteController.Nuevo; +// CopiarPedidoAAlbaran(APedido, AuxAlbaran); +// CopiarArticulosPendAAlbaran(APedido, AuxAlbaran, AArticulosPendientes); + + //Sustituir por if de guardar +{ if AAlbaranesClienteController.Guardar(AuxAlbaran) then + begin + AAlbaran := AuxAlbaran; + with dmGenerarAlbaranesCli.JsListaAlbaranesGenerados do + begin + Instruction.Text := 'Se ha generado el albarán'; + + Content.Clear; + Content.Add(Format('Se ha generado correctamente el albarán %s a partir del pedido de cliente' + #10#13, [AuxAlbaran.REFERENCIA])); + Execute; + + ARespuesta := CustomButtonResult; + case ARespuesta of + 100 : begin + // Ver el albarán + AAlbaranesClienteController.Ver(AuxAlbaran); + end; + 200 : // Continuar; + end; + end; + end; + + Result := True; + finally + AArticulosPendientes := NIL; + if Assigned(APedidosClienteController) then + Finalizar; + end; +} +end; + +{ +function ElegirPedidoYGenerarAlbaranCli(var IDAlbaran: Integer) : Boolean; overload; +var + APedido : IBizPedidoCliente; + AAlbaran : IBizAlbaranCliente; +begin + Result := False; + IDAlbaran := -1; + + AAlbaran := NIL; + try + if not Assigned(APedidosClienteController) then + Inicializar; + + APedido := APedidosClienteController.ElegirPedidos(APedidosClienteController.BuscarPendientes, + 'Elija el pedido de cliente que desea utilizar para dar de alta el albarán de cliente.' + , False); + + if Assigned(APedido) then + begin + Result := GenerarAlbaranCli(APedido, AAlbaran); + if Result then + IDAlbaran := AAlbaran.ID; + end; + finally + if Assigned(APedidosClienteController) then + Finalizar; + end; +end; +} + +end. diff --git a/Source/Servidor/FactuGES_Server.RES b/Source/Servidor/FactuGES_Server.RES index feeac77f722ac7ec153030bc0dcd7f1ec180908e..762c6e51bee37dc692c4dd1c19a460f5e7faaeaf 100644 GIT binary patch literal 5156 zcmbW5&x;&Y5XWnifD(f4Atx`hh=?o_HX1Z|X~h@_s1bE?ZGwq0m~284g`9f-lgU9u z`hSq#v+Oa49E8omyE%Fg+wZ69RrkzfHtyO`Q}0K;`hLIlUcVW}%xpu}_hD)-Jin~x z{Bgys`P};Y$x|8hmKqzf4`plKQbTM0?=!8ZwzIQiZPU1?o%YkCM>egdMojq4x%T{c z&X4}T_<)hv=^0BN?X30rUcB07YOOfToAc=&+myJOib=ccqp#S5p2V1zyyQtPZQWRm zM=jt5Hg#CwpfSe>yJ^k#g}t8~)K<<_4>(vm8*A;g6%ONp7aaNy{f%Syil5is)|(z1 z+8;~1bfX^*GkN7(e#no3O^t^-tDPL&tM75-Qy#Csuc7{%0}nL%9;pVcV&ULC_Mg{J zP08sxh$o-t9P8kinwyG0`TAa(YU0F!HR3XF&b3qR6_4%~+!gvGZ{V?y!6EAEa}AiX z;zLt#m^NjfrPcA$Q-9joFW%ayK&J?*6{(@#t@x*89}k8tnryHQ31k zUvL+&#eu%&5+AMP#ygL$XeXz}rgiA{m@dZPK%f10?3u79@RYCRC#(zo*34@MU&dU+ zo=2W%zx^B>y5QjNY@<9ftHIY9+v^8R`fzppnPP~o<*P92$CR# zzV@qoY{>ymU{dY`phZAkMdJTl-XHne3(?6)K+G`y+yu$;w^2MGO{mG#k^;2_GUi4ER z-s#{m@=spwr3Vbxru^W>-9ml!zJWh)$`@z2=&lQwi8w2l?|IRmd*u5>ofQiXx_s}& zk2}}jQ{gfWHaWb#0-yC>?@Ih+a0%1-6F1)HxC27JpAB%RM_u-4MvUs;ptW#NJMqJ> z*6;OKF2}6d+c1-U=JL+*8fh-hy}YnfKW9JoM{B{CftkiUZQj3y+LwKZbI1J!$H+xK z^!xs+jb5))t^A5(-g9<=6nG`h>)kze`~-*XrIz>fL0Dd$&t zqyFNivBbjj8v&n2&gB~T9?Z)9hK7P4^;cheYsNd8wTX9a*dMr6iql%(A9+8Ib$KVn zA-~&MvyAV3-F5!mkrX^jEAe#};$B0) z^azLip)t-6`uGjRd+y`vb59LtQ@n@)pF5E6Dsm+s717(QUB%%!{hZHz?N|98pq+P( zp9yjFb1&RHyI}c!Q*iSPg3Xg$R^chdzSXd0j%YRF>KYlket{fV*H+|5^wbJy;pE_9`bi&`aJKR zW0`>ZjAMy+px=-063zx1sT+49eK`7A()j#uIp6hVG@dwV`lT&_DR-a+x1@38)$Jj>(#u34|azh!^Pp2?odc8l%EV@G{<^tS`HYjzxa zYW9+HzbcH0uqt8p{qFJpw3%(m`u-LB%s#S9_POk1yDXp2{QnyKo1y&&}W%FyE96P76EB2Mu`uxPcRO^x>)Q)#iZJu9G{P_?0!cGjnVp30z zL@z$i3)__Mf!(v4wrw};qWmqpuFTu^t=-Y=X^+{Gsx2wpvUB19qt}JCrqMfg+wR&` z#XpqltLj}RsXv<@lQ}PF=DvO7Sa*eaQ){;~RGD8^bjDs$>^((~F=y?JV$KK~pZM^6 z;IZ4nzO}^QO~?OK^EZ4Jws*x7wKwcLt&Aslj&WZr;;LQKy4&*i?0YfECt@#`98?Y5 z7)VXtKs_tK%tb1Bh1K$QzFR&g} z8C`{HO{-0wJ=>G#a4%{xx+S?zXiMF?b)z0VdQh)ky(lQSH}xFcoBBqC(y)jKiin7$ zpmF`ESA0M6pB+XKGh=9EbTq||9!+CMkEO9=$5MRUL>fOKp5o)RU* z=`&`~tXZ>Y){JDDGiMG}$*fMb_BJA?%^uYFpes42nP~Do7fplD&!s*; zB+;N-3uxZFc{D$D0WF-rh!!naLQ57crKL+=rRB?3(25mEudSq&>8ohfs@3%R>uc!E zH`mg-b?a&UhPP<*hD_SNX&Yr_ZK1dKy-oYyKR`zg9-*Tj9i`7c`J9e@c8t#c{VZL) zSU{HxuF$=^_vzlf2gZr{-~a!Oz<*){T&i1GRCH|U7^XUNsa(m@+PadHi;IhMLn6m& zRbHx5v-aSipe_zAohYPw^(s{=*9eLX3UP69bEbN=)C1gyy12Qt2(Q=HRvv^54;qMj z=U$DyY~?}7h(6&#L2gb?ojcX5hX-LJL&AgHf}EYZ`ZuVD5(9^YMmRaTIQMT7=-;V* zJ=^e+(fvb0oSn$AM_@oFJKLeLv7?3$b#fyo-=2X1-8y#g89K1u2(O_c#Hr2ot@mm)!jo&q5^!%LrOIzWTmcD zJV}MT%#(yVx2q66wkH}}k;nn>m_-g-;1lHTQ{}LOdhd%m&$?>Ws^!+CNs|o?8#eq0 zWHUoXbB!7`esVMz4nltN$mmhr%Ecwku0ex7ty;ALMaIk8+PaFtU|0kB&5+{^na+^c z47trs+caayRfg>3*|TS>G;v}ALnh;tA+oWtv4oueE95;x_Op|_6GP53WIRKzGh`V< z4ypth%8=a**~}9sPE_^Vv}v=fOP4N;Hdt#z=)gIl>Ok(P9J15gztAD|n>A}@zB>Zh+*RjNMDrZk*0jB|i-_LOP^GMgcDIc?qohKw#&KOSQ+aNxjPoJoxH zfSuI6*6&+)5E zmNCu+RTt-%YG-m{5)U6f{1VP2#u>yoCrh<~Glg+}FwPpr8Ny@7jbogbjPsBalahGU zs8I)Tjxx?H#u>)mhe8==pqY*h==1EEvy5|waaOU+!D}nh8D}cvoaNx);OS_Caqg)$ za0asX;ZVl8t=h=ivW0OjG0rE(ImI};80Q+}yk_TCtv1-%+116lU5N9Pab}v^z`4pe ze;H>nn|iEBnfRW&f`*T;7n(n?~Jpaapp604sDHX zkh7;{8jdgR#(eSbQH>X$e7B!$lO9-VOe9cPGzmj ze$ncb%w;@GV|q~LR@R5CFz(l zNjW6%eUUVMFjX&yAlL9hU63>M^2;w%ojP@>UcGwMs8J(oLbWD{;fcD?PWR#+{vjk2YN18|Ha5LF*ponDH4iK>pP zN|cE1rlP|cL_PsN)IQ9MnkPAvPk&$X^Yf#CfB@>*D~N*n1XJI>eJNmYAoU9CO~L&_ zsBcIpg@%UG!0>RwxI(9lq{zrf@*mfWx=-mt-I9Bge{wMO=`)w2p;wNIiJ{ooSQ-@% z{SvxmT-*eL%%Oydi8N}|97=?4ISsnytfZ*~c|^&{$y9BAHKH{{78@+7X4=bCZR0ES zQkE52XV+Hxru}LsYP!aiTEEtTIxp%>EjM^l{hiII{(H@-@c~zI&FoA~k91JFXs5+J zsM9h(>XOli+HLoz4!eWMb-y2VekYXt7WAQ@v~cQ{9zuR=LMU)O^1loszx{)$$D!dA zkv4`#txlvtTjMC`qgV?0AdaH;Orz+xlga(dp48#O&EnK*emMmF9%a<>w)vH%i#v5ajv%^RY>uA`0XH`1oJHc{rA9aCIZB^?^eKIwXViC(fAKY)ICg^a^YiJ%-@c)f ze>+LvoIFY2etU{eeRGP=o<2tx&Rw7j-xbi6g74}3%U9{@m7nORA0=I-7XkX*fbRa~k-MT6H;yvJoO;v%mrzg(|jg9f&* z7*-ixGrsqoYiz>N+PXS)##(h7Hf&JGuxh1YrNOsHk9O@$?;UL*wN(d|8wBI^O0?kX z8}8fL_}&|GSrtGZ^$ja=8P@3AcXTW&V0yn^_ukpjrg2dLLx$AP)V()2I`l4T!7(EP z^ko&j_cR##^loA-045A;GBQ>gwidm2Zsru$*U?nKy1HRK3K+6=@15NT^mjBDFsxs@ zCd07P{C=^s^YFOA26F*J=K8g34SNibTXTKE|7@35(eXnJ<^qN+6u^6ozW40eOXU5i zgkjCh1q@rWcC9zOV@RHZ>b`UE-et_>XlHW)L-wAuOw@Pr^iG~LXPF_{(`9Vpq)2BR zVTuOBj=5=BhE1E2J)NChy)l2DuA`F@Cr=zUXkc@k6^#sg=4S6-;oPe0vdq;}U9dzv zJ!7VzKtg<+o3voa*|UF7_SRMNI=MJ^n72vZyG}C}h!7$TIs4zv*^`~McGc2(sa>%= zlD#~~%}@m#TbT(vP+g!OU2nk;%vw9MPn3j;NJ?3hs_hev=- zN1HBMWn=E^<>l!C3(dv3l{1KUF8)^TFi@VJQoz~StMpsrljP*tvlkb8$+xY1IF+i1 z)O?Ke5J_~C0#nLEE-6))@UhgDiYKO20eOWyW3ntDl2iq4+MsQF^x>l*t~^WT$M(Fl zre2S!NOC=0k8x1%Q&HzduO>~J*x1|KM?uHg44o|>`VK?y5uKE4)~qQu*Ci_}tK4eU zswH4kPVO1ho1w3;VTV#YAe{$l-WbV#nJrL3M| z6WT*x%op1dG$`F)XlUG_F+*qMmttOG=z~mCkrI&-h@nTScE$FS_TSy}?o<008Zt66 z7?`87NA)yx?AXz*ef##e#4ZI5%D&ZTfL_bcRT=sz(=7B08Z4(-GW1q+-&+6Bam@Wg zCuB*`GgW$8|6RLwwdvHU(=E`zph4L!C27#+qLD`{j}Wu0|!WvwFnv*b`8U3 zDEBx>|InL@(IC&xojG6b{$V#=5-dV!fStmySJXI^XD+0#&tc;q)zKi&E?&6&%>JcZ z|Ni~mU`I1(VAyR8TZmyJu{IaaqCwg?{@HPc&7g1_nG1P#<@+DY)jw?Qgs`wM78+m^ zD%&46nVO68&>(%uS`*Ai#sT(=>KFD$x%wY8Xiz$6V4(rF9m7^**nVm*WIa5K2I*hc zTK=(oj00%EILNbKuHR7kqD6~XOR(L{dr|M1Uv^DvA;~;%q zJbyu9X0Z3vILI^Dd8&QbtSm{-yU3yR^mO$em`g5bV4(qaGs7lk*wku0$eMf>4bs;Y z;9NIv++^6n{B8cXs$Gr$0pWufxPrniHCiNxeXPoj962&KDk_SF2H5Njdz@jLGi?2G z(IEZ9-sP3R4Pk@x*;8j#yC?F$Vc5;QXz^km6&uUILKv6`M?^+)T-*dT9#R+BRSIZe zp#j)|!sCPn83$kmYA%3BFt7;*wo+^;595L0U2sF#{|uX* zVe2z62H?n%47^6s3A`mr@H3$S7zP7}C`N;<2U(M{FM!*W+85G4?0H3l^nLBxFAN-j zzdLtqE?K0&C&NkJ0~wLdc(+d=dSBgZ@83|I()O=}GxwqOrO$yc7SrWKuh#mOJT5NI2Q;uo18}qFqXC#R zFg=Ak1N&oOfDBBKfekV+!jigNy1sAiGiXTvvuOY($-rFo`eeSlyStiqtzUf(8glhC z08=d2dN9w0ZXAHqmeiv}uP!$3`o85e`nN%Prx*=bld>;`lRU9 zZYBGB+I`8n(By;2D3OyQtL40qGfU1*V6qH6x!B&+otwF$+dr+Zr#%M^vL=i6g-K3o z=Y@7|YWjnwN9oQi(P60m#f~aSV4n8-Zl@$H3)azDoFGBt}R4F|`}iruy~kE1!&2XDh1d zT$5^d#54E$WY^J-fF%(8OXS$vQTb?K<5E+PrsU`izl~2bYT33WwdmS{;J*UY=1J|k zw4)AQ9SD1fI(GF^{u_z$u?n!F8a-=}b(A&P_OPXTed{TIPVE7;sm|a!WEWc zSD;GcDpB?5>IA!ytVdc?g~SSG-ww?osywSQRZXf&wW4cLt?{+Up^pQ#>d}f?`@2xH z@Mh!^;YyzV9^~!oO&!BKQM1WT)MAPYwVLiut!K3(kEtHyp4@@jrgWmt(MA3toRt*Z z7e1ljVEBfDs8?i93LV_f=o<>@Pgpm~KNK-^7)3-4Q$C{6Lxz*zm>v`u(}%i`??wH_ z_M>jIgQ#D0e~O5WpvalAgf&Q`M~+rLqp{I36dyB&qQ}S3*!VGsMH)vFCXA=}@y6Js z#4+)d7#B}d;u2`m!~~j&e8kKVG;zuV8kI7ECQX_|(P&eqvDw6&74gY=3~;A6IDyYLU7rv*4WWTC8 zIlk^ptTJt4 zQ)tBA8Pxjo?$qX3kcyY;cru*2oE}Dg=SNZhPbX2Ie@v#q7gDHaLA>%kg*;3ok(}Df((}(XLqz?`rqK^)IKp!6ZfbtH0NO>O~q0e$Zp}&4|l)gIp z86E%hb2|RnSM>E)$LQqO`Skxzd_#Xf1)tWb({%Ri8T#(bS-NokJ1V$vfv$Z2Jze|p zN4oygHM(*ApLFNeZNz`wrH2m+>0#kR`t7kGu%)h?;JTK$DhI}tdR6*CU}d?adBgIt(sbN{UuAN9T(*G9G9#2Id8TrFC(bbcjn z{JWFGB8Nvt#ze-%#MtE&^$-AnR4UYH+O*YdRiUMGoue1?-<=#eJZ88m9vP5iE+1g0 zimM)MY??@gmUYhjbn(oQSz*$+`YS3Q2yecr1L47{I?8v*|K;k{e|&tnjPj8{aZMF$ z;fq2I*V(RNr+&G1t>EYfrOST_XSb<>t*s4esPZv)Zrr$W_1KZp7nB@VTeKeA! zg6d<^qx<*o-_)14vy<{U0Vu!7*G!VFiHAwQ78VxXK66ahzS0`deBi+4C|^X9YCq|> z|Nrpezs?^oDsN{a1O*2N2EMwyo5qBZ2h^Ctzdm|&|9t+iC~d;*Y|udt$_J&d@DB)- z9*m=eLAABX;m5!JdcWXASd3O7K*Be0cmxkwnZ8ttn@N&kMfu+z7Z#ifi%LquYC|V> zT6y>cSIH=uYABLyb6~Bh@?kOqlTgRbrgAWaq5U_qSFV=w#YmF!T=>J^(RNg1q;MTz zQ#p{rLPCOfWM@lxa|ddsP36x=Mnxt~5`w}|-jagDg2Q&~$X+Yui)w%*DgUJKhw~u_ zjgS$_F_sTQ`CU79tdn6aMiRj=WtXQIFKt)+K2KNylw z_2Y+QP)BP&ENtJdU2n;_N)P55(_lju=H&c*>iEw$?-pJ=^>IvqHQJ913k%t^Z{Mzs zL$&gzQA*-RA0NJZ|6ezMK6C7YsmHI~y=H4wxh@Xzu&~{4qlX=9Hmn;oXrQ@+sgJ)r z{OHlc`?r6&dgj=X2?ILSu&Rvl2OnWs??{E67}k|5HInRdPJQ{9A3rL*bK~l{{LhBh zau(5qKn7HZc&Dg>Dla63{qRI)_|d%^KVLlAvw2%*D^wslE+e&9D(u@SJp^eT)UO*5 zdHCmlJ$P{Emt)>8ZCo9#DqEpE#i0C_{pJco`bq^gO4y+u?Yw%&hBRw4d-fb`Q!EF_ zO<8;U_wUzw$Ou>ErAEipl(}*tU}bhQh#6z_w=C7ID6cADX=JZ_{dIr;#fuiE&7YT& zA~mGEEy~-XdFcQZ{$i?tr6Hq~zGC_EWeao_JY|on;@|)k5)K?R_E5TlP~;&}puVYm zj#S7zcyRyzw=qhkE2PYwgAHe^H7^~g3c~b0R4`7Qj-)yDMUWY#mGp5Q6=I^K2jj$* z;33r;fXi*adaJ-j+lWJZ9UOlc)&bFMsCj9y+@Y!jyE%g1VLuVL>IBDtE7e%6|h4? zL~5uFhdmb%_@%Ct{-db}+0rO4HDoCjor?Oh>hpO>F;fr54uXSqXKtzD^5DcIbA^y+ z7A~`eVh@!u1w)RJ`bjP-Q3`SxUW63`JC6ur9Cnv6M<(}T_eriaDCA-T%Dq(6=LM#F zEzdLEs~qaMmZ!>d+!xF7NZtQgxvu>@v?=|m9CR1Ry_Q!o@uB4y2gRS3+nf0IF^z+a zm(<5U8K(-87oa)GQPD)I6*|84leJbkwJ1+RP zZQzUU*PuazblAYT*wmLGH@J4~+R9&#m_>$^x&@zoE&_lyBcLMz$sO2KB_tap2P9V{ zPb3#4d!*V()<`cQNjVE7jQpQ-;rlc;z+|JEG-;AAK7R0E_Va@W<<~ER2Z=ji#2skq zGI-pAV2%XPwhC!AQVLQGQV^0iQfnmPuQrkulJHXz$>K#gY1y)+jgym83gQE9fd`2# zFvlsBmj}#+%!itrMhzQr2aopb+1~Rp{Qv)Qb9MU;c;%;{?`@GBNNZ zt~9n1TSZwhFe{!uX$k{h;j}ra_?*O%@G*@UF@{G+kLH-z7zS>r=ocRcuo)J787CG1A_;%KcXxiO0Ff_?zSq{M8(`-9xM_q)OS6A%W?MRtqgpF55niSduuiWmtkO4 zX8QFsm;5aBBi`hh^rMU$;^A+B2lbti7vTYzr+FSMk}MdwB5%fc1B>A!2M)tWcbI|e zFt8*}!yIViUy^41eR=5j^YgR8e#w`(8t@?N?S*;J){^BEO9oEK+cUEmI1&R_QVAFo z1NUO!WXjL0r?srl<)I%wlyr%~01wKS^GA4~x!4QX4-zvqdVDOOJ9Qc{3tySjM+Xk^ zTKHy{Encep;bqaRfA%c;p%DA%d@z5Q2PknYJXp@KWMI5p@ZAMIc_N>I->G!;NG`v% zZao8wd>;CrJZ=Bt`y;vFp;!#apD_=>{TbLa|9JTd;ss8d(-)t9##x&-GceQVp_6)rK56^>~)xgmC27LVz`*HF7cPf2->=EtIdzKnBGzLg_JH^X^?S9f&!+vW^e))aa)zn%3x3Q5@F3qcGxGqyh5B9>{5yYm zKj3?iJZ-W*tYy`S-?O=oi}p zJaiJZLHxMjLB$^l4}P(O-x)^gzBZc<&y*FL;^ZL*cDi zS?c^1y5SdNi5nArM|3vfL!PTx75KyDT$TL<8&Be}r-z4!`)K}fjR*L%82%{5gV%y? z#rE`zo(~d3CfBczens5PLxvv)F^AtX{6D-6G6+6t9x-BsiYpogI^nx!e8-IOI|V8h zOz4+b6ODd}<%SKkfAHYJ{q+8H;Q@X)hA&O=&}nf1YkL})%nPq2`A(@^_}&v@hJNKo zj~?;Wt5^Bp`|mS+UTTbmW^K%chbY8|2~Wa@HvZ6WSoB4)QDImA6?~_F2Nln!%>(>@ zEZ?gX9^hXz?`gekecpM{(+|8}Fn<0K^dA8I`}XWr>tCZ$zBerENbZFn$z=^m{Di;1 zzp|fz6$t$d`zA%^PR|2;m#pysKWH(z^rAcfS~ZS8WRN!gSFT)9^zQ}z(!Vz5l51lw z<3C}-1fB}{C7(6=CH7vvivYQs0v^=*(|GVbH#SLFQe~6MR2H+0c+%DWZGpdFXy&3~M|DtR7&N zOZxNSdFP?H{JF<>@7(2oLZ289+i)`0%JtAFjVj5CpUFms%zn=9x!1vFHgZM-9 zAm{HBtbI9m;jhQ{?dLQ6-b#-i0h5`(w>Z%k8+(4 z)22+}Ld1QhuUNqgu{N&#{IlW(etN_`e#hUQ_=dmufqpD z#wx)>y66u$qc7=sK&%Xh{c~=)c_@!uLaYuW#scSVp^~H8KhY(wLl;H-1b_X-SDbg~ zBSxGCBesJP1H_0=V#FA6ji?%BVUZ!H45=_E_Lv(X|+{T8tPgMr;!!&WaHOrs%GiT9Ga0Td?IE z%d+s+d>MP~f^KxH7!PqVjCi1O^U!%?Fe7%WT)GD0${6ueOzU9ZBVL!@K*~T`g_Mr; z8qzYPrAUj35!a@49zA9(*u6%(s70t-fLUrEeZuzR(3G#;QQ*@K5$C3!$> z)(i0n+AZ$^=GC*?)zHS`%t< z8F;JsABv5=#sl;X8}M+cBoBzS$=0&ulHh!TRXzpx79YxU(XR1h;-Tz$ z5SaFptnUeOhChCG>lBcD)qXz$^YQ~mM$;AXSoX0e^a~^KIfV4 zQ=gHWUjJ!Xnf+;TTqScYo=eNii04xLW96tEGos?!QcUB8!IJnlEuO22++(2ZB}Yn8 zc|jHVJQN(dBQe*YVDh70)ECL0`XSdYcirz+O7K}_d}B%SdL+L#T%qW$B9R3-I2hl_ zFV9&P-JwQBaz|HEPre0Jspt-IVG;OmMnP7-MxO{6i@1Nj7s zMavUuwERq+X)U>9blfpg?&JX)gd%tRj&cQa`Eb-pMA*tW)S0L{XhW_jH?-gC8{+g;h68$7$bfo_xKC4;% HQ1Sl&@MbJG diff --git a/Source/Servidor/FactuGES_Server.dproj b/Source/Servidor/FactuGES_Server.dproj index 04b077f5..d30f24a7 100644 --- a/Source/Servidor/FactuGES_Server.dproj +++ b/Source/Servidor/FactuGES_Server.dproj @@ -1,275 +1,275 @@ - + - - {ebdcd25d-40d7-4146-91ec-a0ea4aa1dcd1} - FactuGES_Server.dpr - Debug - AnyCPU - DCC32 - ..\..\Output\Debug\Servidor\FactuGES_Server.exe - vcl;rtl;vclx;vclactnband;dbrtl;vcldb;vcldbx;bdertl;dsnap;dsnapcon;teeUI;teedb;tee;adortl;vclib;ibxpress;dbxcds;dbexpress;DbxCommonDriver;IndyCore;IndySystem;IndyProtocols;VclSmp;vclie;webdsnap;xmlrtl;inet;inetdbbde;inetdbxpress;RemObjects_BPDX_D11;RemObjects_RODX_D11;RemObjects_Indy_D11;RemObjects_Synapse_D11;RemObjects_WebBroker_D11;DataAbstract_Core_D11;DataAbstract_DBXDriver_D11;DataAbstract_IDE_D11;DataAbstract_Scripting_D11;DataAbstract_SDACDriver_D11;sdac105;dac105;DataAbstract_SQLiteDriver_D11;cxEditorsD10;cxLibraryD10;dxThemeD10;cxDataD10;cxExtEditorsD10;cxGridD10;cxPageControlD10;cxSchedulerD10;cxTreeListD10;cxVerticalGridD10;dxBarD10;dxComnD10;dxBarDBNavD10;dxBarExtDBItemsD10;dxBarExtItemsD10;dxDockingD10;dxLayoutControlD10;dxNavBarD10;dxPSCoreD10;dxsbD10;dxPScxCommonD10;dxPSLnksD10;vclshlctrls;dxPScxExtCommonD10;dxPScxGridLnkD10;dxPScxPCProdD10;dxPScxScheduler2LnkD10;dxPScxTLLnkD10;dxPSdxLCLnkD10;dxPsPrVwAdvD10;pckMD5;pckUCDataConnector;pckUserControl_RT;PluginSDK_D10R;PNG_D10;PngComponentsD10;tb2k_d10;tbx_d10;JclVcl;Jcl;JvXPCtrlsD11R;JvCoreD11R;JvSystemD11R;JvStdCtrlsD11R;JvAppFrmD11R;JvBandsD11R;JvDBD11R;JvDlgsD11R;JvBDED11R;JvCmpD11R;JvCryptD11R;JvCtrlsD11R;JvCustomD11R;JvDockingD11R;JvDotNetCtrlsD11R;JvEDID11R;JvGlobusD11R;JvHMID11R;JvInterpreterD11R;JvJansD11R;JvManagedThreadsD11R;JvMMD11R;JvNetD11R;JvPageCompsD11R;JvPluginD11R;JvPrintPreviewD11R;JvRuntimeDesignD11R;JvTimeFrameworkD11R;JvUIBD11R;JvValidatorsD11R;JvWizardD11R;pckUCADOConn;pckUCBDEConn;pckUCIBXConn;pckUCMidasConn;cxIntlPrintSys3D10;cxExportD10;cxIntl5D10;GUISDK_D11;ccpackD11;JSDialog100;fsTee11;fs11;frx11;frxADO11;frxBDE11;frxDB11;frxDBX11;frxe11;frxIBX11;frxTee11;fsADO11;fsBDE11;fsDB11;fsIBX11;websnap;soaprtl;IntrawebDB_90_100;Intraweb_90_100 - - - 7.0 - False - False - 0 - 3 - ..\..\Output\Release\Servidor - RELEASE - - - 7.0 - 3 - ..\..\Output\Debug\Servidor - DEBUG; - True - True - True - $(BDS)\lib\Debug;$(BDS)\Lib\Debug\Indy10 - $(BDS)\lib\Debug;$(BDS)\Lib\Debug\Indy10 - $(BDS)\lib\Debug;$(BDS)\Lib\Debug\Indy10 - $(BDS)\lib\Debug;$(BDS)\Lib\Debug\Indy10 - - - Delphi.Personality - - - FalseTrueFalse/standaloneTrueFalse1040FalseFalseFalseFalseFalse308212521.0.4.01.0.4.0viernes, 16 de mayo de 2008 18:37FactuGES_Server.dpr - - - - - MainSource - - - - -
srvEmpresas
- TDARemoteService - - - - - - - - - - - -
RptAlbaranesCliente
- TDataModule - - -
RptWordAlbaranCliente
- TDataModule - - -
srvAlbaranesCliente
- TDataAbstractService - - - - - -
srvAlbaranesProveedor
- TDataAbstractService - - - - -
srvAlmacenes
- TDARemoteService - - - - - - - - - - - -
RptEtiquetasContacto
- TDataModule - - -
RptFichasEmpleado
- TDataModule - - -
srvContactos
- TDARemoteService - - - - -
srvFabricantes
- TDataAbstractService - - - - - -
RptFacturasCliente
- TDataModule - - -
RptWordFacturaCliente
- TDataModule - - -
srvFacturasCliente
- TDataAbstractService - - - - - -
srvFacturasProveedor
- TDataAbstractService - - - - - - - - - - - -
srvHistoricoMovimientos
- TDataAbstractService - - - - -
srvInventario
- TDataAbstractService - - - - - - - - - -
RptPedidosProveedor
- TDataModule - - -
RptWordPedidoProveedor
- TDataModule - - -
srvPedidosProveedor
- TDataAbstractService - - - - - -
RptPresupuestosCliente
- - -
RptWordPresupuestoCliente
- TDataModule - - -
srvPresupuestosCliente
- TDataAbstractService - - - - -
srvRecibosCliente
- TDataAbstractService - - - - -
srvRecibosProveedor
- TDataAbstractService - - - - -
srvReferencias
- TDataAbstractService - - - - - -
srvRemesasCliente
- TDataAbstractService - - - - - -
srvRemesasProveedor
- TDataAbstractService - - - - - - - -
srvUnidadesMedida
- TDataAbstractService - - - - -
srvConfiguracion
- TDataAbstractService - - -
frConexionBD
- TFrame - - -
frConfGeneral
- TFrame - - -
fConfiguracion
- TForm - - -
FrameConfiguracion
- TFrame - - -
srvLogin
- TDARemoteService - - -
fAcercaDe
- - -
dmServer
- TDataModule - - -
fServerForm
- - - - - - - - - - - + + {ebdcd25d-40d7-4146-91ec-a0ea4aa1dcd1} + FactuGES_Server.dpr + Debug + AnyCPU + DCC32 + ..\..\Output\Debug\Servidor\FactuGES_Server.exe + vcl;rtl;vclx;vclactnband;dbrtl;vcldb;vcldbx;bdertl;dsnap;dsnapcon;teeUI;teedb;tee;adortl;vclib;ibxpress;dbxcds;dbexpress;DbxCommonDriver;IndyCore;IndySystem;IndyProtocols;VclSmp;vclie;webdsnap;xmlrtl;inet;inetdbbde;inetdbxpress;RemObjects_BPDX_D11;RemObjects_RODX_D11;RemObjects_Indy_D11;RemObjects_Synapse_D11;RemObjects_WebBroker_D11;DataAbstract_Core_D11;DataAbstract_DBXDriver_D11;DataAbstract_IDE_D11;DataAbstract_Scripting_D11;DataAbstract_SDACDriver_D11;sdac105;dac105;DataAbstract_SQLiteDriver_D11;cxEditorsD10;cxLibraryD10;dxThemeD10;cxDataD10;cxExtEditorsD10;cxGridD10;cxPageControlD10;cxSchedulerD10;cxTreeListD10;cxVerticalGridD10;dxBarD10;dxComnD10;dxBarDBNavD10;dxBarExtDBItemsD10;dxBarExtItemsD10;dxDockingD10;dxLayoutControlD10;dxNavBarD10;dxPSCoreD10;dxsbD10;dxPScxCommonD10;dxPSLnksD10;vclshlctrls;dxPScxExtCommonD10;dxPScxGridLnkD10;dxPScxPCProdD10;dxPScxScheduler2LnkD10;dxPScxTLLnkD10;dxPSdxLCLnkD10;dxPsPrVwAdvD10;pckMD5;pckUCDataConnector;pckUserControl_RT;PluginSDK_D10R;PNG_D10;PngComponentsD10;tb2k_d10;tbx_d10;JclVcl;Jcl;JvXPCtrlsD11R;JvCoreD11R;JvSystemD11R;JvStdCtrlsD11R;JvAppFrmD11R;JvBandsD11R;JvDBD11R;JvDlgsD11R;JvBDED11R;JvCmpD11R;JvCryptD11R;JvCtrlsD11R;JvCustomD11R;JvDockingD11R;JvDotNetCtrlsD11R;JvEDID11R;JvGlobusD11R;JvHMID11R;JvInterpreterD11R;JvJansD11R;JvManagedThreadsD11R;JvMMD11R;JvNetD11R;JvPageCompsD11R;JvPluginD11R;JvPrintPreviewD11R;JvRuntimeDesignD11R;JvTimeFrameworkD11R;JvUIBD11R;JvValidatorsD11R;JvWizardD11R;pckUCADOConn;pckUCBDEConn;pckUCIBXConn;pckUCMidasConn;cxIntlPrintSys3D10;cxExportD10;cxIntl5D10;GUISDK_D11;ccpackD11;JSDialog100;fsTee11;fs11;frx11;frxADO11;frxBDE11;frxDB11;frxDBX11;frxe11;frxIBX11;frxTee11;fsADO11;fsBDE11;fsDB11;fsIBX11;websnap;soaprtl;IntrawebDB_90_100;Intraweb_90_100 + + + 7.0 + False + False + 0 + 3 + ..\..\Output\Release\Servidor + RELEASE + + + 7.0 + 3 + ..\..\Output\Debug\Servidor + DEBUG; + True + True + True + $(BDS)\lib\Debug;$(BDS)\Lib\Debug\Indy10 + $(BDS)\lib\Debug;$(BDS)\Lib\Debug\Indy10 + $(BDS)\lib\Debug;$(BDS)\Lib\Debug\Indy10 + $(BDS)\lib\Debug;$(BDS)\Lib\Debug\Indy10 + + + Delphi.Personality + + +FalseTrueFalse/standaloneTrueFalse1040FalseFalseFalseFalseFalse308212521.0.4.01.0.4.0viernes, 16 de mayo de 2008 18:37FactuGES_Server.dpr + + + + + MainSource + + + + +
srvEmpresas
+ TDARemoteService + + + + + + + + + + + +
RptAlbaranesCliente
+ TDataModule + + +
RptWordAlbaranCliente
+ TDataModule + + +
srvAlbaranesCliente
+ TDataAbstractService + + + + + +
srvAlbaranesProveedor
+ TDataAbstractService + + + + +
srvAlmacenes
+ TDARemoteService + + + + + + + + + + + +
RptEtiquetasContacto
+ TDataModule + + +
RptFichasEmpleado
+ TDataModule + + +
srvContactos
+ TDARemoteService + + + + +
srvFabricantes
+ TDataAbstractService + + + + + +
RptFacturasCliente
+ TDataModule + + +
RptWordFacturaCliente
+ TDataModule + + +
srvFacturasCliente
+ TDataAbstractService + + + + + +
srvFacturasProveedor
+ TDataAbstractService + + + + + + + + + + + +
srvHistoricoMovimientos
+ TDataAbstractService + + + + +
srvInventario
+ TDataAbstractService + + + + + + + + + +
RptPedidosProveedor
+ TDataModule + + +
RptWordPedidoProveedor
+ TDataModule + + +
srvPedidosProveedor
+ TDataAbstractService + + + + + +
RptPresupuestosCliente
+ + +
RptWordPresupuestoCliente
+ TDataModule + + +
srvPresupuestosCliente
+ TDataAbstractService + + + + +
srvRecibosCliente
+ TDataAbstractService + + + + +
srvRecibosProveedor
+ TDataAbstractService + + + + +
srvReferencias
+ TDataAbstractService + + + + + +
srvRemesasCliente
+ TDataAbstractService + + + + + +
srvRemesasProveedor
+ TDataAbstractService + + + + + + + +
srvUnidadesMedida
+ TDataAbstractService + + + + +
srvConfiguracion
+ TDataAbstractService + + +
frConexionBD
+ TFrame + + +
frConfGeneral
+ TFrame + + +
fConfiguracion
+ TForm + + +
FrameConfiguracion
+ TFrame + + +
srvLogin
+ TDARemoteService + + +
fAcercaDe
+ + +
dmServer
+ TDataModule + + +
fServerForm
+ + + + + + + + + + +