Archivado/LuisLeon_FactuGES2
Archived
0
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Tareas #655:Cuando un cliente tiene varias cuentas bancarias se debe establecer predeterminada sino duplica recibos en la vista,

Browse Source 
Además de otros cambios varios.
Fin Version 4.2.3

git-svn-id: https://192.168.0.254/svn/Proyectos.LuisLeon_FactuGES2/trunk@159 b2cfbe5a-eba1-4a0c-8b32-7feea0a119f2
This commit is contained in:
roberto 2012-04-10 16:16:29 +00:00
parent e9b52a06ef
commit 8826b215bf
22 changed files with 658 additions and 621 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
Source/Cliente/FactuGES.dproj
View File

@ -53,7 +53,7 @@
<Borland.Personality>Delphi.Personality</Borland.Personality> <Borland.Personality>Delphi.Personality</Borland.Personality>
<Borland.ProjectType>VCLApplication</Borland.ProjectType> <Borland.ProjectType>VCLApplication</Borland.ProjectType>
<BorlandProject> <BorlandProject>
<BorlandProject><Delphi.Personality><Parameters><Parameters Name="UseLauncher">False</Parameters><Parameters Name="LoadAllSymbols">True</Parameters><Parameters Name="LoadUnspecifiedSymbols">False</Parameters></Parameters><Language><Language Name="RootDir">C:\Archivos de programa\Borland\Delphi7\Bin\</Language></Language><VersionInfo><VersionInfo Name="IncludeVerInfo">True</VersionInfo><VersionInfo Name="AutoIncBuild">False</VersionInfo><VersionInfo Name="MajorVer">4</VersionInfo><VersionInfo Name="MinorVer">2</VersionInfo><VersionInfo Name="Release">2</VersionInfo><VersionInfo Name="Build">0</VersionInfo><VersionInfo Name="Debug">False</VersionInfo><VersionInfo Name="PreRelease">False</VersionInfo><VersionInfo Name="Special">False</VersionInfo><VersionInfo Name="Private">False</VersionInfo><VersionInfo Name="DLL">False</VersionInfo><VersionInfo Name="Locale">3082</VersionInfo><VersionInfo Name="CodePage">1252</VersionInfo></VersionInfo><VersionInfoKeys><VersionInfoKeys Name="CompanyName">Rodax Software S.L.</VersionInfoKeys><VersionInfoKeys Name="FileDescription"></VersionInfoKeys><VersionInfoKeys Name="FileVersion">4.2.2.0</VersionInfoKeys><VersionInfoKeys Name="InternalName">FactuGES</VersionInfoKeys><VersionInfoKeys Name="LegalCopyright"></VersionInfoKeys><VersionInfoKeys Name="LegalTrademarks"></VersionInfoKeys><VersionInfoKeys Name="OriginalFilename"></VersionInfoKeys><VersionInfoKeys Name="ProductName">FactuGES</VersionInfoKeys><VersionInfoKeys Name="ProductVersion">4.2.2.0</VersionInfoKeys><VersionInfoKeys Name="Comments"></VersionInfoKeys></VersionInfoKeys><Excluded_Packages></Excluded_Packages><Source><Source Name="MainSource">FactuGES.dpr</Source></Source></Delphi.Personality><ModelSupport>False</ModelSupport></BorlandProject></BorlandProject> <BorlandProject><Delphi.Personality><Parameters><Parameters Name="UseLauncher">False</Parameters><Parameters Name="LoadAllSymbols">True</Parameters><Parameters Name="LoadUnspecifiedSymbols">False</Parameters></Parameters><Language><Language Name="RootDir">C:\Archivos de programa\Borland\Delphi7\Bin\</Language></Language><VersionInfo><VersionInfo Name="IncludeVerInfo">True</VersionInfo><VersionInfo Name="AutoIncBuild">False</VersionInfo><VersionInfo Name="MajorVer">4</VersionInfo><VersionInfo Name="MinorVer">2</VersionInfo><VersionInfo Name="Release">3</VersionInfo><VersionInfo Name="Build">0</VersionInfo><VersionInfo Name="Debug">False</VersionInfo><VersionInfo Name="PreRelease">False</VersionInfo><VersionInfo Name="Special">False</VersionInfo><VersionInfo Name="Private">False</VersionInfo><VersionInfo Name="DLL">False</VersionInfo><VersionInfo Name="Locale">3082</VersionInfo><VersionInfo Name="CodePage">1252</VersionInfo></VersionInfo><VersionInfoKeys><VersionInfoKeys Name="CompanyName">Rodax Software S.L.</VersionInfoKeys><VersionInfoKeys Name="FileDescription"></VersionInfoKeys><VersionInfoKeys Name="FileVersion">4.2.3.0</VersionInfoKeys><VersionInfoKeys Name="InternalName">FactuGES</VersionInfoKeys><VersionInfoKeys Name="LegalCopyright"></VersionInfoKeys><VersionInfoKeys Name="LegalTrademarks"></VersionInfoKeys><VersionInfoKeys Name="OriginalFilename"></VersionInfoKeys><VersionInfoKeys Name="ProductName">FactuGES</VersionInfoKeys><VersionInfoKeys Name="ProductVersion">4.2.3.0</VersionInfoKeys><VersionInfoKeys Name="Comments"></VersionInfoKeys></VersionInfoKeys><Excluded_Packages></Excluded_Packages><Source><Source Name="MainSource">FactuGES.dpr</Source></Source></Delphi.Personality><ModelSupport>False</ModelSupport></BorlandProject></BorlandProject>
</ProjectExtensions> </ProjectExtensions>
<Import Project="$(MSBuildBinPath)\Borland.Delphi.Targets" /> <Import Project="$(MSBuildBinPath)\Borland.Delphi.Targets" />
<ItemGroup> <ItemGroup>

BIN
Source/Cliente/FactuGES.res
View File

Binary file not shown.

73
Source/Modulos/Contactos/Views/uEditorAgente.dfm
View File

@ -132,12 +132,9 @@ inherited fEditorAgente: TfEditorAgente
inherited pgPaginas: TPageControl inherited pgPaginas: TPageControl
Width = 864 Width = 864
Height = 614 Height = 614
ActivePage = ObjetivosAlbaranes
ExplicitWidth = 864 ExplicitWidth = 864
ExplicitHeight = 614 ExplicitHeight = 614
inherited pagGeneral: TTabSheet inherited pagGeneral: TTabSheet
ExplicitLeft = 4
ExplicitTop = 24
ExplicitWidth = 856 ExplicitWidth = 856
ExplicitHeight = 586 ExplicitHeight = 586
inline frViewAgente1: TfrViewAgente inline frViewAgente1: TfrViewAgente
@ -309,31 +306,33 @@ inherited fEditorAgente: TfEditorAgente
inherited pagDatosBancarios: TTabSheet inherited pagDatosBancarios: TTabSheet
ExplicitWidth = 856 ExplicitWidth = 856
ExplicitHeight = 586 ExplicitHeight = 586
inherited frViewListaDatosBancarios: TfrViewListaDatosBancarios inherited frViewClienteDatosBancarios1: TfrViewClienteDatosBancarios
Width = 856 Width = 856
Height = 586 Height = 586
ExplicitLeft = 0
ExplicitTop = 0
ExplicitWidth = 856 ExplicitWidth = 856
ExplicitHeight = 586 ExplicitHeight = 586
inherited cxGrid: TcxGrid inherited dxLayoutControl1: TdxLayoutControl
Width = 856
Height = 561
ExplicitWidth = 856
ExplicitHeight = 561
end
inherited ToolBar1: TToolBar
Width = 856 Width = 856
ExplicitWidth = 856 ExplicitWidth = 856
inherited ToolButton1: TToolButton inherited eEntidad: TcxDBTextEdit
ExplicitWidth = 62 ExplicitWidth = 114
Width = 114
end end
inherited ToolButton4: TToolButton inherited eSucursal: TcxDBTextEdit
ExplicitWidth = 74 Left = 528
ExplicitLeft = 528
ExplicitWidth = 112
Width = 112
end end
inherited ToolButton2: TToolButton inherited eCuenta: TcxDBTextEdit
ExplicitWidth = 67 ExplicitWidth = 194
Width = 194
end end
inherited ToolButton7: TToolButton inherited eTitular: TcxDBTextEdit
ExplicitWidth = 117 ExplicitWidth = 194
Width = 194
end end
end end
end end
@ -366,6 +365,18 @@ inherited fEditorAgente: TfEditorAgente
inherited ToolBar1: TToolBar inherited ToolBar1: TToolBar
Width = 856 Width = 856
ExplicitWidth = 856 ExplicitWidth = 856
inherited ToolButton1: TToolButton
ExplicitWidth = 113
end
inherited ToolButton4: TToolButton
ExplicitWidth = 113
end
inherited ToolButton2: TToolButton
ExplicitWidth = 113
end
inherited ToolButton7: TToolButton
ExplicitWidth = 113
end
end end
end end
end end
@ -387,18 +398,6 @@ inherited fEditorAgente: TfEditorAgente
inherited ToolBar1: TToolBar inherited ToolBar1: TToolBar
Width = 856 Width = 856
ExplicitWidth = 856 ExplicitWidth = 856
inherited ToolButton1: TToolButton
ExplicitWidth = 62
end
inherited ToolButton4: TToolButton
ExplicitWidth = 74
end
inherited ToolButton2: TToolButton
ExplicitWidth = 67
end
inherited ToolButton7: TToolButton
ExplicitWidth = 117
end
end end
end end
end end
@ -501,6 +500,18 @@ inherited fEditorAgente: TfEditorAgente
inherited ToolBar1: TToolBar inherited ToolBar1: TToolBar
Width = 856 Width = 856
ExplicitWidth = 856 ExplicitWidth = 856
inherited ToolButton1: TToolButton
ExplicitWidth = 113
end
inherited ToolButton4: TToolButton
ExplicitWidth = 113
end
inherited ToolButton2: TToolButton
ExplicitWidth = 113
end
inherited ToolButton7: TToolButton
ExplicitWidth = 113
end
end end
inherited tbxFiltro: TTBXToolbar inherited tbxFiltro: TTBXToolbar
Width = 856 Width = 856

61
Source/Modulos/Contactos/Views/uEditorCliente.dfm
View File

@ -122,12 +122,9 @@ inherited fEditorCliente: TfEditorCliente
inherited pgPaginas: TPageControl inherited pgPaginas: TPageControl
Width = 864 Width = 864
Height = 614 Height = 614
ActivePage = pagDescuentos
ExplicitWidth = 864 ExplicitWidth = 864
ExplicitHeight = 614 ExplicitHeight = 614
inherited pagGeneral: TTabSheet inherited pagGeneral: TTabSheet
ExplicitLeft = 4
ExplicitTop = 24
ExplicitWidth = 856 ExplicitWidth = 856
ExplicitHeight = 586 ExplicitHeight = 586
inline frViewCliente1: TfrViewCliente inline frViewCliente1: TfrViewCliente
@ -462,31 +459,33 @@ inherited fEditorCliente: TfEditorCliente
inherited pagDatosBancarios: TTabSheet inherited pagDatosBancarios: TTabSheet
ExplicitWidth = 856 ExplicitWidth = 856
ExplicitHeight = 586 ExplicitHeight = 586
inherited frViewListaDatosBancarios: TfrViewListaDatosBancarios inherited frViewClienteDatosBancarios1: TfrViewClienteDatosBancarios
Width = 856 Width = 856
Height = 586 Height = 586
ExplicitLeft = 0
ExplicitTop = 0
ExplicitWidth = 856 ExplicitWidth = 856
ExplicitHeight = 586 ExplicitHeight = 586
inherited cxGrid: TcxGrid inherited dxLayoutControl1: TdxLayoutControl
Width = 856
Height = 561
ExplicitWidth = 856
ExplicitHeight = 561
end
inherited ToolBar1: TToolBar
Width = 856 Width = 856
ExplicitWidth = 856 ExplicitWidth = 856
inherited ToolButton1: TToolButton inherited eEntidad: TcxDBTextEdit
ExplicitWidth = 62 ExplicitWidth = 114
Width = 114
end end
inherited ToolButton4: TToolButton inherited eSucursal: TcxDBTextEdit
ExplicitWidth = 74 Left = 528
ExplicitLeft = 528
ExplicitWidth = 112
Width = 112
end end
inherited ToolButton2: TToolButton inherited eCuenta: TcxDBTextEdit
ExplicitWidth = 67 ExplicitWidth = 194
Width = 194
end end
inherited ToolButton7: TToolButton inherited eTitular: TcxDBTextEdit
ExplicitWidth = 117 ExplicitWidth = 194
Width = 194
end end
end end
end end
@ -661,6 +660,18 @@ inherited fEditorCliente: TfEditorCliente
inherited ToolBar1: TToolBar inherited ToolBar1: TToolBar
Width = 856 Width = 856
ExplicitWidth = 856 ExplicitWidth = 856
inherited ToolButton1: TToolButton
ExplicitWidth = 113
end
inherited ToolButton4: TToolButton
ExplicitWidth = 113
end
inherited ToolButton2: TToolButton
ExplicitWidth = 113
end
inherited ToolButton7: TToolButton
ExplicitWidth = 113
end
end end
end end
end end
@ -743,18 +754,6 @@ inherited fEditorCliente: TfEditorCliente
inherited ToolBar1: TToolBar inherited ToolBar1: TToolBar
Width = 856 Width = 856
ExplicitWidth = 856 ExplicitWidth = 856
inherited ToolButton1: TToolButton
ExplicitWidth = 62
end
inherited ToolButton4: TToolButton
ExplicitWidth = 74
end
inherited ToolButton2: TToolButton
ExplicitWidth = 67
end
inherited ToolButton7: TToolButton
ExplicitWidth = 117
end
end end
end end
end end

53
Source/Modulos/Contactos/Views/uEditorContacto.dfm
View File

@ -7,7 +7,6 @@ inherited fEditorContacto: TfEditorContacto
ClientWidth = 632 ClientWidth = 632
Scaled = False Scaled = False
ExplicitWidth = 640 ExplicitWidth = 640
ExplicitHeight = 240
PixelsPerInch = 96 PixelsPerInch = 96
TextHeight = 13 TextHeight = 13
inherited JvNavPanelHeader: TJvNavPanelHeader inherited JvNavPanelHeader: TJvNavPanelHeader
@ -78,12 +77,15 @@ inherited fEditorContacto: TfEditorContacto
ActivePage = pagDatosBancarios ActivePage = pagDatosBancarios
ExplicitWidth = 626 ExplicitWidth = 626
inherited pagGeneral: TTabSheet inherited pagGeneral: TTabSheet
ExplicitLeft = 4
ExplicitTop = 24
ExplicitWidth = 618 ExplicitWidth = 618
ExplicitHeight = 332
end end
object pagDatosBancarios: TTabSheet object pagDatosBancarios: TTabSheet
Caption = 'Datos bancarios' Caption = 'Datos bancarios'
ImageIndex = 1 ImageIndex = 1
inline frViewListaDatosBancarios: TfrViewListaDatosBancarios inline frViewClienteDatosBancarios1: TfrViewClienteDatosBancarios
Left = 0 Left = 0
Top = 0 Top = 0
Width = 618 Width = 618
@ -97,28 +99,27 @@ inherited fEditorContacto: TfEditorContacto
ParentFont = False ParentFont = False
TabOrder = 0 TabOrder = 0
ReadOnly = False ReadOnly = False
ExplicitWidth = 618 ExplicitLeft = 117
ExplicitHeight = 332 ExplicitTop = 176
inherited cxGrid: TcxGrid inherited dxLayoutControl1: TdxLayoutControl
Width = 618 Width = 618
Height = 307 inherited eEntidad: TcxDBTextEdit
ExplicitWidth = 618 ExplicitWidth = 114
ExplicitHeight = 307 Width = 114
end
inherited ToolBar1: TToolBar
Width = 618
ExplicitWidth = 618
inherited ToolButton1: TToolButton
ExplicitWidth = 113
end end
inherited ToolButton4: TToolButton inherited eSucursal: TcxDBTextEdit
ExplicitWidth = 113 Left = 403
ExplicitLeft = 403
ExplicitWidth = 112
Width = 112
end end
inherited ToolButton2: TToolButton inherited eCuenta: TcxDBTextEdit
ExplicitWidth = 113 ExplicitWidth = 194
Width = 194
end end
inherited ToolButton7: TToolButton inherited eTitular: TcxDBTextEdit
ExplicitWidth = 113 ExplicitWidth = 194
Width = 194
end end
end end
end end
@ -151,18 +152,6 @@ inherited fEditorContacto: TfEditorContacto
inherited ToolBar1: TToolBar inherited ToolBar1: TToolBar
Width = 618 Width = 618
ExplicitWidth = 618 ExplicitWidth = 618
inherited ToolButton1: TToolButton
ExplicitWidth = 113
end
inherited ToolButton4: TToolButton
ExplicitWidth = 113
end
inherited ToolButton2: TToolButton
ExplicitWidth = 113
end
inherited ToolButton7: TToolButton
ExplicitWidth = 113
end
end end
end end
end end

8
Source/Modulos/Contactos/Views/uEditorContacto.pas
View File

@ -22,9 +22,9 @@ type
pagDatosBancarios: TTabSheet; pagDatosBancarios: TTabSheet;
dxLayoutLookAndFeel: TdxLayoutLookAndFeelList; dxLayoutLookAndFeel: TdxLayoutLookAndFeelList;
dxLayoutOfficeLookAndFeel: TdxLayoutOfficeLookAndFeel; dxLayoutOfficeLookAndFeel: TdxLayoutOfficeLookAndFeel;
frViewListaDatosBancarios: TfrViewListaDatosBancarios;
pagPersonal: TTabSheet; pagPersonal: TTabSheet;
frViewPersonalContacto1: TfrViewPersonalContacto; frViewPersonalContacto1: TfrViewPersonalContacto;
frViewClienteDatosBancarios1: TfrViewClienteDatosBancarios;
procedure FormShow(Sender: TObject); procedure FormShow(Sender: TObject);
procedure dsDataTableDataChange(Sender: TObject; Field: TField); procedure dsDataTableDataChange(Sender: TObject; Field: TField);
protected protected
@ -117,7 +117,8 @@ begin
if Assigned(FViewContacto) and Assigned(Contacto) then if Assigned(FViewContacto) and Assigned(Contacto) then
begin begin
FViewContacto.Contacto := Contacto; FViewContacto.Contacto := Contacto;
frViewListaDatosBancarios.dsDetalles.DataTable := FContacto.DatosBancarios.DataTable; frViewClienteDatosBancarios1.dsDatosBancarios.DataTable := FContacto.DatosBancarios.DataTable;
// frViewListaDatosBancarios.dsDetalles.DataTable := FContacto.DatosBancarios.DataTable;
if Assigned(FContacto.Personal) then if Assigned(FContacto.Personal) then
frViewPersonalContacto1.dsDetalles.DataTable := FContacto.Personal.DataTable frViewPersonalContacto1.dsDetalles.DataTable := FContacto.Personal.DataTable
@ -125,7 +126,8 @@ begin
frViewPersonalContacto1.dsDetalles.DataTable := NIL; frViewPersonalContacto1.dsDetalles.DataTable := NIL;
end end
else begin else begin
frViewListaDatosBancarios.dsDetalles.DataTable := NIL; frViewClienteDatosBancarios1.dsDatosBancarios.DataTable := NIL;
// frViewListaDatosBancarios.dsDetalles.DataTable := NIL;
frViewPersonalContacto1.dsDetalles.DataTable := NIL; frViewPersonalContacto1.dsDetalles.DataTable := NIL;
end; end;
end; end;

143
Source/Modulos/Contactos/Views/uEditorProveedor.dfm
View File

@ -116,7 +116,6 @@ inherited fEditorProveedor: TfEditorProveedor
inherited pgPaginas: TPageControl inherited pgPaginas: TPageControl
Width = 824 Width = 824
Height = 519 Height = 519
ActivePage = pagDatosComerciales
ExplicitWidth = 824 ExplicitWidth = 824
ExplicitHeight = 519 ExplicitHeight = 519
inherited pagGeneral: TTabSheet inherited pagGeneral: TTabSheet
@ -163,24 +162,24 @@ inherited fEditorProveedor: TfEditorProveedor
ExplicitTop = 162 ExplicitTop = 162
end end
inherited Label1: TLabel inherited Label1: TLabel
Left = 475 Left = 484
Top = 251 Top = 251
Width = 342 Width = 342
ExplicitLeft = 475 ExplicitLeft = 484
ExplicitTop = 251 ExplicitTop = 251
ExplicitWidth = 342 ExplicitWidth = 342
end end
inherited Label2: TLabel inherited Label2: TLabel
Top = 399 Top = 426
Width = 324 Width = 324
ExplicitTop = 399 ExplicitTop = 426
ExplicitWidth = 324 ExplicitWidth = 324
end end
inherited PngSpeedButton4: TPngSpeedButton inherited PngSpeedButton4: TPngSpeedButton
Left = 435 Left = 444
Top = 444 Top = 471
ExplicitLeft = 435 ExplicitLeft = 444
ExplicitTop = 444 ExplicitTop = 471
end end
inherited eCalle: TcxDBTextEdit inherited eCalle: TcxDBTextEdit
Top = 267 Top = 267
@ -253,9 +252,9 @@ inherited fEditorProveedor: TfEditorProveedor
Width = 366 Width = 366
end end
inherited eMailAdministracion: TcxDBHyperLinkEdit inherited eMailAdministracion: TcxDBHyperLinkEdit
Top = 444 Top = 471
Properties.Prefix = 'mailto:' Properties.Prefix = 'mailto:'
ExplicitTop = 444 ExplicitTop = 471
ExplicitWidth = 186 ExplicitWidth = 186
Width = 186 Width = 186
end end
@ -270,93 +269,93 @@ inherited fEditorProveedor: TfEditorProveedor
Width = 366 Width = 366
end end
inherited eCodigoPostal: TcxDBTextEdit inherited eCodigoPostal: TcxDBTextEdit
Left = 393 Left = 402
Top = 294 Top = 294
Style.LookAndFeel.SkinName = '' Style.LookAndFeel.SkinName = ''
StyleDisabled.LookAndFeel.SkinName = '' StyleDisabled.LookAndFeel.SkinName = ''
StyleFocused.LookAndFeel.SkinName = '' StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.SkinName = '' StyleHot.LookAndFeel.SkinName = ''
ExplicitLeft = 393 ExplicitLeft = 402
ExplicitTop = 294 ExplicitTop = 294
end end
inherited eObservaciones: TcxDBMemo inherited eObservaciones: TcxDBMemo
Top = 496 Top = 523
Style.LookAndFeel.SkinName = '' Style.LookAndFeel.SkinName = ''
StyleDisabled.LookAndFeel.SkinName = '' StyleDisabled.LookAndFeel.SkinName = ''
StyleFocused.LookAndFeel.SkinName = '' StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.SkinName = '' StyleHot.LookAndFeel.SkinName = ''
ExplicitTop = 496 ExplicitTop = 523
ExplicitWidth = 772 ExplicitWidth = 772
ExplicitHeight = 76 ExplicitHeight = 76
Height = 76 Height = 76
Width = 772 Width = 772
end end
inherited cxDBCheckBox3: TcxDBCheckBox inherited cxDBCheckBox3: TcxDBCheckBox
Left = 375 Left = 384
Top = 138 Top = 138
Style.LookAndFeel.SkinName = '' Style.LookAndFeel.SkinName = ''
StyleDisabled.LookAndFeel.SkinName = '' StyleDisabled.LookAndFeel.SkinName = ''
StyleFocused.LookAndFeel.SkinName = '' StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.SkinName = '' StyleHot.LookAndFeel.SkinName = ''
ExplicitLeft = 375 ExplicitLeft = 384
ExplicitTop = 138 ExplicitTop = 138
end end
inherited cxDBCheckBox1: TcxDBCheckBox inherited cxDBCheckBox1: TcxDBCheckBox
Left = 475 Left = 484
Top = 283 Top = 283
Style.LookAndFeel.SkinName = '' Style.LookAndFeel.SkinName = ''
StyleDisabled.LookAndFeel.SkinName = '' StyleDisabled.LookAndFeel.SkinName = ''
StyleFocused.LookAndFeel.SkinName = '' StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.SkinName = '' StyleHot.LookAndFeel.SkinName = ''
ExplicitLeft = 475 ExplicitLeft = 484
ExplicitTop = 283 ExplicitTop = 283
ExplicitWidth = 236 ExplicitWidth = 236
Width = 236 Width = 236
end end
inherited eTlfParticular: TcxDBTextEdit inherited eTlfParticular: TcxDBTextEdit
Left = 581 Left = 590
Top = 57 Top = 57
Style.LookAndFeel.SkinName = '' Style.LookAndFeel.SkinName = ''
StyleDisabled.LookAndFeel.SkinName = '' StyleDisabled.LookAndFeel.SkinName = ''
StyleFocused.LookAndFeel.SkinName = '' StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.SkinName = '' StyleHot.LookAndFeel.SkinName = ''
ExplicitLeft = 581 ExplicitLeft = 590
ExplicitTop = 57 ExplicitTop = 57
ExplicitWidth = 171 ExplicitWidth = 171
Width = 171 Width = 171
end end
inherited eTlfTrabajo: TcxDBTextEdit inherited eTlfTrabajo: TcxDBTextEdit
Left = 581 Left = 590
Top = 30 Top = 30
Style.LookAndFeel.SkinName = '' Style.LookAndFeel.SkinName = ''
StyleDisabled.LookAndFeel.SkinName = '' StyleDisabled.LookAndFeel.SkinName = ''
StyleFocused.LookAndFeel.SkinName = '' StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.SkinName = '' StyleHot.LookAndFeel.SkinName = ''
ExplicitLeft = 581 ExplicitLeft = 590
ExplicitTop = 30 ExplicitTop = 30
ExplicitWidth = 171 ExplicitWidth = 171
Width = 171 Width = 171
end end
inherited eTlfMovil: TcxDBTextEdit inherited eTlfMovil: TcxDBTextEdit
Left = 581 Left = 590
Top = 84 Top = 84
Style.LookAndFeel.SkinName = '' Style.LookAndFeel.SkinName = ''
StyleDisabled.LookAndFeel.SkinName = '' StyleDisabled.LookAndFeel.SkinName = ''
StyleFocused.LookAndFeel.SkinName = '' StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.SkinName = '' StyleHot.LookAndFeel.SkinName = ''
ExplicitLeft = 581 ExplicitLeft = 590
ExplicitTop = 84 ExplicitTop = 84
ExplicitWidth = 171 ExplicitWidth = 171
Width = 171 Width = 171
end end
inherited eFax: TcxDBTextEdit inherited eFax: TcxDBTextEdit
Left = 581 Left = 590
Top = 111 Top = 111
Style.LookAndFeel.SkinName = '' Style.LookAndFeel.SkinName = ''
StyleDisabled.LookAndFeel.SkinName = '' StyleDisabled.LookAndFeel.SkinName = ''
StyleFocused.LookAndFeel.SkinName = '' StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.SkinName = '' StyleHot.LookAndFeel.SkinName = ''
ExplicitLeft = 581 ExplicitLeft = 590
ExplicitTop = 111 ExplicitTop = 111
ExplicitWidth = 171 ExplicitWidth = 171
Width = 171 Width = 171
@ -372,51 +371,61 @@ inherited fEditorProveedor: TfEditorProveedor
Width = 366 Width = 366
end end
inherited eNIFCIF: TcxDBTextEdit inherited eNIFCIF: TcxDBTextEdit
Left = 254 Left = 257
Top = 30 Top = 30
Style.LookAndFeel.SkinName = '' Style.LookAndFeel.SkinName = ''
StyleDisabled.LookAndFeel.SkinName = '' StyleDisabled.LookAndFeel.SkinName = ''
StyleFocused.LookAndFeel.SkinName = '' StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.SkinName = '' StyleHot.LookAndFeel.SkinName = ''
ExplicitLeft = 254 ExplicitLeft = 257
ExplicitTop = 30 ExplicitTop = 30
ExplicitWidth = 229 ExplicitWidth = 229
Width = 229 Width = 229
end end
inherited eMailTrabajo: TcxDBHyperLinkEdit inherited eMailTrabajo: TcxDBHyperLinkEdit
Left = 581 Left = 590
Top = 162 Top = 162
Properties.Prefix = 'mailto:' Properties.Prefix = 'mailto:'
Style.LookAndFeel.SkinName = '' Style.LookAndFeel.SkinName = ''
StyleDisabled.LookAndFeel.SkinName = '' StyleDisabled.LookAndFeel.SkinName = ''
StyleFocused.LookAndFeel.SkinName = '' StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.SkinName = '' StyleHot.LookAndFeel.SkinName = ''
ExplicitLeft = 581 ExplicitLeft = 590
ExplicitTop = 162 ExplicitTop = 162
ExplicitWidth = 142 ExplicitWidth = 142
Width = 142 Width = 142
end end
inherited eMailParticular: TcxDBHyperLinkEdit inherited eMailParticular: TcxDBHyperLinkEdit
Left = 581 Left = 590
Top = 190 Top = 190
Properties.Prefix = 'mailto:' Properties.Prefix = 'mailto:'
Style.LookAndFeel.SkinName = '' Style.LookAndFeel.SkinName = ''
StyleDisabled.LookAndFeel.SkinName = '' StyleDisabled.LookAndFeel.SkinName = ''
StyleFocused.LookAndFeel.SkinName = '' StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.SkinName = '' StyleHot.LookAndFeel.SkinName = ''
ExplicitLeft = 581 ExplicitLeft = 590
ExplicitTop = 190 ExplicitTop = 190
ExplicitWidth = 142 ExplicitWidth = 142
Width = 142 Width = 142
end end
inherited ePais: TcxDBTextEdit
Top = 348
Style.LookAndFeel.SkinName = ''
StyleDisabled.LookAndFeel.SkinName = ''
StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.SkinName = ''
ExplicitTop = 348
ExplicitWidth = 391
Width = 391
end
inherited ePaginaWeb: TcxDBHyperLinkEdit inherited ePaginaWeb: TcxDBHyperLinkEdit
Left = 581 Left = 590
Top = 217 Top = 217
Style.LookAndFeel.SkinName = '' Style.LookAndFeel.SkinName = ''
StyleDisabled.LookAndFeel.SkinName = '' StyleDisabled.LookAndFeel.SkinName = ''
StyleFocused.LookAndFeel.SkinName = '' StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.SkinName = '' StyleHot.LookAndFeel.SkinName = ''
ExplicitLeft = 581 ExplicitLeft = 590
ExplicitTop = 217 ExplicitTop = 217
ExplicitWidth = 142 ExplicitWidth = 142
Width = 142 Width = 142
@ -428,16 +437,14 @@ inherited fEditorProveedor: TfEditorProveedor
StyleFocused.LookAndFeel.SkinName = '' StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.SkinName = '' StyleHot.LookAndFeel.SkinName = ''
ExplicitTop = 30 ExplicitTop = 30
ExplicitWidth = 84
Width = 84
end end
inherited ePersonaContacto: TcxDBTextEdit inherited ePersonaContacto: TcxDBTextEdit
Top = 348 Top = 375
Style.LookAndFeel.SkinName = '' Style.LookAndFeel.SkinName = ''
StyleDisabled.LookAndFeel.SkinName = '' StyleDisabled.LookAndFeel.SkinName = ''
StyleFocused.LookAndFeel.SkinName = '' StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.SkinName = '' StyleHot.LookAndFeel.SkinName = ''
ExplicitTop = 348 ExplicitTop = 375
ExplicitWidth = 366 ExplicitWidth = 366
Width = 366 Width = 366
end end
@ -447,31 +454,33 @@ inherited fEditorProveedor: TfEditorProveedor
inherited pagDatosBancarios: TTabSheet inherited pagDatosBancarios: TTabSheet
ExplicitWidth = 816 ExplicitWidth = 816
ExplicitHeight = 491 ExplicitHeight = 491
inherited frViewListaDatosBancarios: TfrViewListaDatosBancarios inherited frViewClienteDatosBancarios1: TfrViewClienteDatosBancarios
Width = 816 Width = 816
Height = 491 Height = 491
ExplicitLeft = 0
ExplicitTop = 0
ExplicitWidth = 816 ExplicitWidth = 816
ExplicitHeight = 491 ExplicitHeight = 491
inherited cxGrid: TcxGrid inherited dxLayoutControl1: TdxLayoutControl
Width = 816
Height = 466
ExplicitWidth = 816
ExplicitHeight = 466
end
inherited ToolBar1: TToolBar
Width = 816 Width = 816
ExplicitWidth = 816 ExplicitWidth = 816
inherited ToolButton1: TToolButton inherited eEntidad: TcxDBTextEdit
ExplicitWidth = 62 ExplicitWidth = 114
Width = 114
end end
inherited ToolButton4: TToolButton inherited eSucursal: TcxDBTextEdit
ExplicitWidth = 74 Left = 507
ExplicitLeft = 507
ExplicitWidth = 112
Width = 112
end end
inherited ToolButton2: TToolButton inherited eCuenta: TcxDBTextEdit
ExplicitWidth = 67 ExplicitWidth = 194
Width = 194
end end
inherited ToolButton7: TToolButton inherited eTitular: TcxDBTextEdit
ExplicitWidth = 117 ExplicitWidth = 194
Width = 194
end end
end end
end end
@ -634,6 +643,18 @@ inherited fEditorProveedor: TfEditorProveedor
inherited ToolBar1: TToolBar inherited ToolBar1: TToolBar
Width = 816 Width = 816
ExplicitWidth = 816 ExplicitWidth = 816
inherited ToolButton1: TToolButton
ExplicitWidth = 113
end
inherited ToolButton4: TToolButton
ExplicitWidth = 113
end
inherited ToolButton2: TToolButton
ExplicitWidth = 113
end
inherited ToolButton7: TToolButton
ExplicitWidth = 113
end
end end
end end
end end
@ -655,18 +676,6 @@ inherited fEditorProveedor: TfEditorProveedor
inherited ToolBar1: TToolBar inherited ToolBar1: TToolBar
Width = 816 Width = 816
ExplicitWidth = 816 ExplicitWidth = 816
inherited ToolButton1: TToolButton
ExplicitWidth = 62
end
inherited ToolButton4: TToolButton
ExplicitWidth = 74
end
inherited ToolButton2: TToolButton
ExplicitWidth = 67
end
inherited ToolButton7: TToolButton
ExplicitWidth = 117
end
end end
end end
end end

2
Source/Modulos/Informe margen por articulo/Views/InfMargenArticulo_view.drc
View File

@ -16,4 +16,4 @@ END
/* C:\Codigo\Source\Modulos\Informe margen por articulo\Views\uViewInfMargenArticulo.dfm */ /* C:\Codigo\Source\Modulos\Informe margen por articulo\Views\uViewInfMargenArticulo.dfm */
/* C:\Codigo\Source\Modulos\Informe margen por articulo\Views\uEditorInfMargenArticulo.dfm */ /* C:\Codigo\Source\Modulos\Informe margen por articulo\Views\uEditorInfMargenArticulo.dfm */
/* C:\Codigo\Source\Modulos\Informe margen por articulo\Views\InfMargenArticulo_view.res */ /* C:\Codigo\Source\Modulos\Informe margen por articulo\Views\InfMargenArticulo_view.res */
/* c:\temp\dtf1D6.tmp */ /* C:\Codigo\Source\Modulos\Informe margen por articulo\Views\InfMargenArticulo_view.drf */

24
Source/Modulos/Informe margen por articulo/Views/uViewInfMargenArticuloGrid.dfm
View File

@ -262,11 +262,12 @@ inherited frViewInfMargenArticuloGrid: TfrViewInfMargenArticuloGrid
object cxGridViewPOR_MARGEN_ULT_VENT_COMPRA: TcxGridDBColumn object cxGridViewPOR_MARGEN_ULT_VENT_COMPRA: TcxGridDBColumn
Caption = '% margen ult. venta - compra' Caption = '% margen ult. venta - compra'
DataBinding.FieldName = 'POR_MARGEN_ULT_VENT_COMPRA' DataBinding.FieldName = 'POR_MARGEN_ULT_VENT_COMPRA'
PropertiesClassName = 'TcxSpinEditProperties' PropertiesClassName = 'TcxCurrencyEditProperties'
Properties.Alignment.Horz = taRightJustify Properties.Alignment.Horz = taRightJustify
Properties.DisplayFormat = ',0.00 %;-,0.00 %' Properties.DisplayFormat = ',0.00 %;-,0.00 %'
Properties.EditFormat = ',0.00 %;-,0.00 %' Properties.EditFormat = ',0.00 %;-,0.00 %'
FooterAlignmentHorz = taRightJustify FooterAlignmentHorz = taRightJustify
GroupSummaryAlignment = taRightJustify
HeaderAlignmentHorz = taRightJustify HeaderAlignmentHorz = taRightJustify
end end
object cxGridViewIMP_MARGEN_ULT_VENT_ULT_COMP: TcxGridDBColumn object cxGridViewIMP_MARGEN_ULT_VENT_ULT_COMP: TcxGridDBColumn
@ -280,11 +281,12 @@ inherited frViewInfMargenArticuloGrid: TfrViewInfMargenArticuloGrid
object cxGridViewPOR_MARGEN_ULT_VENT_ULT_COMP: TcxGridDBColumn object cxGridViewPOR_MARGEN_ULT_VENT_ULT_COMP: TcxGridDBColumn
Caption = '% margen ult. venta - ult. compra' Caption = '% margen ult. venta - ult. compra'
DataBinding.FieldName = 'POR_MARGEN_ULT_VENT_ULT_COMP' DataBinding.FieldName = 'POR_MARGEN_ULT_VENT_ULT_COMP'
PropertiesClassName = 'TcxSpinEditProperties' PropertiesClassName = 'TcxCurrencyEditProperties'
Properties.Alignment.Horz = taRightJustify Properties.Alignment.Horz = taRightJustify
Properties.DisplayFormat = ',0.00 %;-,0.00 %' Properties.DisplayFormat = ',0.00 %;-,0.00 %'
Properties.EditFormat = ',0.00 %;-,0.00 %' Properties.EditFormat = ',0.00 %;-,0.00 %'
FooterAlignmentHorz = taRightJustify FooterAlignmentHorz = taRightJustify
GroupSummaryAlignment = taRightJustify
HeaderAlignmentHorz = taRightJustify HeaderAlignmentHorz = taRightJustify
end end
object cxGridViewIMP_MARGEN_ULT_VENT_PRO_COMP: TcxGridDBColumn object cxGridViewIMP_MARGEN_ULT_VENT_PRO_COMP: TcxGridDBColumn
@ -298,11 +300,12 @@ inherited frViewInfMargenArticuloGrid: TfrViewInfMargenArticuloGrid
object cxGridViewPOR_MARGEN_ULT_VENT_PRO_COMP: TcxGridDBColumn object cxGridViewPOR_MARGEN_ULT_VENT_PRO_COMP: TcxGridDBColumn
Caption = '% margen ult. venta - compra pro.' Caption = '% margen ult. venta - compra pro.'
DataBinding.FieldName = 'POR_MARGEN_ULT_VENT_PRO_COMP' DataBinding.FieldName = 'POR_MARGEN_ULT_VENT_PRO_COMP'
PropertiesClassName = 'TcxSpinEditProperties' PropertiesClassName = 'TcxCurrencyEditProperties'
Properties.Alignment.Horz = taRightJustify Properties.Alignment.Horz = taRightJustify
Properties.DisplayFormat = ',0.00 %;-,0.00 %' Properties.DisplayFormat = ',0.00 %;-,0.00 %'
Properties.EditFormat = ',0.00 %;-,0.00 %' Properties.EditFormat = ',0.00 %;-,0.00 %'
FooterAlignmentHorz = taRightJustify FooterAlignmentHorz = taRightJustify
GroupSummaryAlignment = taRightJustify
HeaderAlignmentHorz = taRightJustify HeaderAlignmentHorz = taRightJustify
end end
object cxGridViewIMP_MARGEN_PRO_VENT_COMPRA: TcxGridDBColumn object cxGridViewIMP_MARGEN_PRO_VENT_COMPRA: TcxGridDBColumn
@ -352,7 +355,7 @@ inherited frViewInfMargenArticuloGrid: TfrViewInfMargenArticuloGrid
object cxGridViewPOR_MARGEN_PRO_VENT_PRO_COMP: TcxGridDBColumn object cxGridViewPOR_MARGEN_PRO_VENT_PRO_COMP: TcxGridDBColumn
Caption = '% margen venta pro. - compra pro.' Caption = '% margen venta pro. - compra pro.'
DataBinding.FieldName = 'POR_MARGEN_PRO_VENT_PRO_COMP' DataBinding.FieldName = 'POR_MARGEN_PRO_VENT_PRO_COMP'
PropertiesClassName = 'TcxSpinEditProperties' PropertiesClassName = 'TcxCurrencyEditProperties'
Properties.Alignment.Horz = taRightJustify Properties.Alignment.Horz = taRightJustify
Properties.DisplayFormat = ',0.00 %;-,0.00 %' Properties.DisplayFormat = ',0.00 %;-,0.00 %'
Properties.EditFormat = ',0.00 %;-,0.00 %' Properties.EditFormat = ',0.00 %;-,0.00 %'
@ -370,9 +373,12 @@ inherited frViewInfMargenArticuloGrid: TfrViewInfMargenArticuloGrid
object cxGridViewPOR_MARGEN_ULT_COMP: TcxGridDBColumn object cxGridViewPOR_MARGEN_ULT_COMP: TcxGridDBColumn
Caption = '% margen venta - ult. compra' Caption = '% margen venta - ult. compra'
DataBinding.FieldName = 'POR_MARGEN_ULT_COMP' DataBinding.FieldName = 'POR_MARGEN_ULT_COMP'
PropertiesClassName = 'TcxCalcEditProperties' PropertiesClassName = 'TcxCurrencyEditProperties'
Properties.Alignment.Horz = taRightJustify
Properties.DisplayFormat = ',0.00 %;-,0.00 %' Properties.DisplayFormat = ',0.00 %;-,0.00 %'
Properties.EditFormat = ',0.00 %;-,0.00 %'
FooterAlignmentHorz = taRightJustify FooterAlignmentHorz = taRightJustify
GroupSummaryAlignment = taRightJustify
HeaderAlignmentHorz = taRightJustify HeaderAlignmentHorz = taRightJustify
end end
object cxGridViewIMP_MARGEN_PRO_COMP: TcxGridDBColumn object cxGridViewIMP_MARGEN_PRO_COMP: TcxGridDBColumn
@ -387,7 +393,11 @@ inherited frViewInfMargenArticuloGrid: TfrViewInfMargenArticuloGrid
Caption = '% margen venta - compra pro.' Caption = '% margen venta - compra pro.'
DataBinding.FieldName = 'POR_MARGEN_PRO_COMP' DataBinding.FieldName = 'POR_MARGEN_PRO_COMP'
PropertiesClassName = 'TcxCurrencyEditProperties' PropertiesClassName = 'TcxCurrencyEditProperties'
Properties.Alignment.Horz = taRightJustify
Properties.DisplayFormat = ',0.00 %;-,0.00 %'
Properties.EditFormat = ',0.00 %;-,0.00 %'
FooterAlignmentHorz = taRightJustify FooterAlignmentHorz = taRightJustify
GroupSummaryAlignment = taRightJustify
HeaderAlignmentHorz = taRightJustify HeaderAlignmentHorz = taRightJustify
end end
object cxGridViewID_DETALLE: TcxGridDBColumn object cxGridViewID_DETALLE: TcxGridDBColumn
@ -422,9 +432,11 @@ inherited frViewInfMargenArticuloGrid: TfrViewInfMargenArticuloGrid
object cxGridViewCANTIDAD: TcxGridDBColumn object cxGridViewCANTIDAD: TcxGridDBColumn
Caption = 'Cantidad' Caption = 'Cantidad'
DataBinding.FieldName = 'CANTIDAD' DataBinding.FieldName = 'CANTIDAD'
PropertiesClassName = 'TcxTextEditProperties' PropertiesClassName = 'TcxCurrencyEditProperties'
Properties.Alignment.Horz = taRightJustify Properties.Alignment.Horz = taRightJustify
Properties.DisplayFormat = '#,##0;-#,##0'
FooterAlignmentHorz = taRightJustify FooterAlignmentHorz = taRightJustify
GroupSummaryAlignment = taRightJustify
HeaderAlignmentHorz = taRightJustify HeaderAlignmentHorz = taRightJustify
end end
object cxGridViewIMP_TOTAL: TcxGridDBColumn object cxGridViewIMP_TOTAL: TcxGridDBColumn

4
Source/Modulos/Informe ventas por articulo/Data/InfVentasArticulo_data.drc
View File

@ -12,6 +12,6 @@ STRINGTABLE
BEGIN BEGIN
END END
/* C:\Codigo\Source\Modulos\Informe ventas por articulo\Data\uDataModuleInfVentasArticulo.dfm */ /* C:\Codigo\Source\Modulos\Informe ventas por articulo\Data\uDataModuleInfVentasArticulo.DFM */
/* C:\Codigo\Source\Modulos\Informe ventas por articulo\Data\InfVentasArticulo_data.res */ /* C:\Codigo\Source\Modulos\Informe ventas por articulo\Data\InfVentasArticulo_data.res */
/* c:\temp\dtf1C8.tmp */ /* C:\Codigo\Source\Modulos\Informe ventas por articulo\Data\InfVentasArticulo_data.drf */

3
Source/Modulos/Informe ventas por articulo/Data/uDataModuleInfVentasArticulo.dfm
View File

@ -440,7 +440,8 @@ inherited dmInfVentasArticulo: TdmInfVentasArticulo
end end
item item
Name = 'CANTIDAD' Name = 'CANTIDAD'
DataType = datCurrency DataType = datFloat
DisplayFormat = '#,##0'
end end
item item
Name = 'IMPORTE_UNIDAD_VENTA' Name = 'IMPORTE_UNIDAD_VENTA'

2
Source/Modulos/Informe ventas por articulo/Model/InfVentasArticulo_model.drc
View File

@ -13,4 +13,4 @@ BEGIN
END END
/* C:\Codigo\Source\Modulos\Informe ventas por articulo\Model\InfVentasArticulo_model.res */ /* C:\Codigo\Source\Modulos\Informe ventas por articulo\Model\InfVentasArticulo_model.res */
/* c:\temp\dtf1C6.tmp */ /* C:\Codigo\Source\Modulos\Informe ventas por articulo\Model\InfVentasArticulo_model.drf */

40
Source/Modulos/Informe ventas por articulo/Model/schInfVentasArticuloClient_Intf.pas
View File

@ -3,15 +3,15 @@ unit schInfVentasArticuloClient_Intf;
interface interface
uses uses
Classes, DB, schBase_Intf, SysUtils, uROClasses, uDAInterfaces, uDADataTable, FmtBCD, uROXMLIntf; Classes, DB, SysUtils, uROClasses, uDAInterfaces, uDADataTable, FmtBCD, uROXMLIntf;
const const
{ Data table rules ids { Data table rules ids
Feel free to change them to something more human readable Feel free to change them to something more human readable
but make sure they are unique in the context of your application } but make sure they are unique in the context of your application }
RID_InfVentasArticulo = '{7CC515C6-D346-4DAD-AB07-4331002BFA39}'; RID_InfVentasArticulo = '{3237260C-2F98-4E32-900B-5E8E95BF4BA2}';
RID_TablaVacia = '{7DCC4ABB-5070-4D20-8B87-4B887CC84D94}'; RID_TablaVacia = '{03EC1F6A-B248-4B64-9821-167F27870FEB}';
RID_InfVentasAlbArticulo = '{32940B83-836B-424C-B365-9747E0A8E076}'; RID_InfVentasAlbArticulo = '{25AD2608-9AFB-454F-B58E-23ACF44807F9}';
{ Data table names } { Data table names }
nme_InfVentasArticulo = 'InfVentasArticulo'; nme_InfVentasArticulo = 'InfVentasArticulo';
@ -195,7 +195,7 @@ const
type type
{ IInfVentasArticulo } { IInfVentasArticulo }
IInfVentasArticulo = interface(IDAStronglyTypedDataTable) IInfVentasArticulo = interface(IDAStronglyTypedDataTable)
['{B8E2CE74-5892-4A40-82EB-8F21DBEA58EE}'] ['{77E216E3-A203-4498-905F-3113F6CA1DC9}']
{ Property getters and setters } { Property getters and setters }
function GetID_FACTURAValue: Integer; function GetID_FACTURAValue: Integer;
procedure SetID_FACTURAValue(const aValue: Integer); procedure SetID_FACTURAValue(const aValue: Integer);
@ -449,7 +449,7 @@ type
end; end;
{ TInfVentasArticuloDataTableRules } { TInfVentasArticuloDataTableRules }
TInfVentasArticuloDataTableRules = class(TIntfObjectDADataTableRules, IInfVentasArticulo) TInfVentasArticuloDataTableRules = class(TDADataTableRules, IInfVentasArticulo)
private private
protected protected
{ Property getters and setters } { Property getters and setters }
@ -710,7 +710,7 @@ type
{ ITablaVacia } { ITablaVacia }
ITablaVacia = interface(IDAStronglyTypedDataTable) ITablaVacia = interface(IDAStronglyTypedDataTable)
['{20AF542A-D8B1-4055-8B62-C01D55420E90}'] ['{BEF757FC-41F6-4F33-9EF5-FEDED66870B6}']
{ Property getters and setters } { Property getters and setters }
@ -718,7 +718,7 @@ type
end; end;
{ TTablaVaciaDataTableRules } { TTablaVaciaDataTableRules }
TTablaVaciaDataTableRules = class(TIntfObjectDADataTableRules, ITablaVacia) TTablaVaciaDataTableRules = class(TDADataTableRules, ITablaVacia)
private private
protected protected
{ Property getters and setters } { Property getters and setters }
@ -733,7 +733,7 @@ type
{ IInfVentasAlbArticulo } { IInfVentasAlbArticulo }
IInfVentasAlbArticulo = interface(IDAStronglyTypedDataTable) IInfVentasAlbArticulo = interface(IDAStronglyTypedDataTable)
['{B4818DB8-0075-4D21-BCDC-42A6A4C00609}'] ['{FCEE02B2-84CF-4757-ABA1-76857DBA4DAE}']
{ Property getters and setters } { Property getters and setters }
function GetID_ALBARANValue: Integer; function GetID_ALBARANValue: Integer;
procedure SetID_ALBARANValue(const aValue: Integer); procedure SetID_ALBARANValue(const aValue: Integer);
@ -799,8 +799,8 @@ type
procedure SetIMPORTE_PORTE_COSTEValue(const aValue: Currency); procedure SetIMPORTE_PORTE_COSTEValue(const aValue: Currency);
function GetIMPORTE_PORTE_COSTEIsNull: Boolean; function GetIMPORTE_PORTE_COSTEIsNull: Boolean;
procedure SetIMPORTE_PORTE_COSTEIsNull(const aValue: Boolean); procedure SetIMPORTE_PORTE_COSTEIsNull(const aValue: Boolean);
function GetCANTIDADValue: Currency; function GetCANTIDADValue: Float;
procedure SetCANTIDADValue(const aValue: Currency); procedure SetCANTIDADValue(const aValue: Float);
function GetCANTIDADIsNull: Boolean; function GetCANTIDADIsNull: Boolean;
procedure SetCANTIDADIsNull(const aValue: Boolean); procedure SetCANTIDADIsNull(const aValue: Boolean);
function GetIMPORTE_UNIDAD_VENTAValue: Currency; function GetIMPORTE_UNIDAD_VENTAValue: Currency;
@ -930,7 +930,7 @@ type
property IMPORTE_NETO_COSTEIsNull: Boolean read GetIMPORTE_NETO_COSTEIsNull write SetIMPORTE_NETO_COSTEIsNull; property IMPORTE_NETO_COSTEIsNull: Boolean read GetIMPORTE_NETO_COSTEIsNull write SetIMPORTE_NETO_COSTEIsNull;
property IMPORTE_PORTE_COSTE: Currency read GetIMPORTE_PORTE_COSTEValue write SetIMPORTE_PORTE_COSTEValue; property IMPORTE_PORTE_COSTE: Currency read GetIMPORTE_PORTE_COSTEValue write SetIMPORTE_PORTE_COSTEValue;
property IMPORTE_PORTE_COSTEIsNull: Boolean read GetIMPORTE_PORTE_COSTEIsNull write SetIMPORTE_PORTE_COSTEIsNull; property IMPORTE_PORTE_COSTEIsNull: Boolean read GetIMPORTE_PORTE_COSTEIsNull write SetIMPORTE_PORTE_COSTEIsNull;
property CANTIDAD: Currency read GetCANTIDADValue write SetCANTIDADValue; property CANTIDAD: Float read GetCANTIDADValue write SetCANTIDADValue;
property CANTIDADIsNull: Boolean read GetCANTIDADIsNull write SetCANTIDADIsNull; property CANTIDADIsNull: Boolean read GetCANTIDADIsNull write SetCANTIDADIsNull;
property IMPORTE_UNIDAD_VENTA: Currency read GetIMPORTE_UNIDAD_VENTAValue write SetIMPORTE_UNIDAD_VENTAValue; property IMPORTE_UNIDAD_VENTA: Currency read GetIMPORTE_UNIDAD_VENTAValue write SetIMPORTE_UNIDAD_VENTAValue;
property IMPORTE_UNIDAD_VENTAIsNull: Boolean read GetIMPORTE_UNIDAD_VENTAIsNull write SetIMPORTE_UNIDAD_VENTAIsNull; property IMPORTE_UNIDAD_VENTAIsNull: Boolean read GetIMPORTE_UNIDAD_VENTAIsNull write SetIMPORTE_UNIDAD_VENTAIsNull;
@ -981,7 +981,7 @@ type
end; end;
{ TInfVentasAlbArticuloDataTableRules } { TInfVentasAlbArticuloDataTableRules }
TInfVentasAlbArticuloDataTableRules = class(TIntfObjectDADataTableRules, IInfVentasAlbArticulo) TInfVentasAlbArticuloDataTableRules = class(TDADataTableRules, IInfVentasAlbArticulo)
private private
protected protected
{ Property getters and setters } { Property getters and setters }
@ -1049,8 +1049,8 @@ type
procedure SetIMPORTE_PORTE_COSTEValue(const aValue: Currency); virtual; procedure SetIMPORTE_PORTE_COSTEValue(const aValue: Currency); virtual;
function GetIMPORTE_PORTE_COSTEIsNull: Boolean; virtual; function GetIMPORTE_PORTE_COSTEIsNull: Boolean; virtual;
procedure SetIMPORTE_PORTE_COSTEIsNull(const aValue: Boolean); virtual; procedure SetIMPORTE_PORTE_COSTEIsNull(const aValue: Boolean); virtual;
function GetCANTIDADValue: Currency; virtual; function GetCANTIDADValue: Float; virtual;
procedure SetCANTIDADValue(const aValue: Currency); virtual; procedure SetCANTIDADValue(const aValue: Float); virtual;
function GetCANTIDADIsNull: Boolean; virtual; function GetCANTIDADIsNull: Boolean; virtual;
procedure SetCANTIDADIsNull(const aValue: Boolean); virtual; procedure SetCANTIDADIsNull(const aValue: Boolean); virtual;
function GetIMPORTE_UNIDAD_VENTAValue: Currency; virtual; function GetIMPORTE_UNIDAD_VENTAValue: Currency; virtual;
@ -1179,7 +1179,7 @@ type
property IMPORTE_NETO_COSTEIsNull: Boolean read GetIMPORTE_NETO_COSTEIsNull write SetIMPORTE_NETO_COSTEIsNull; property IMPORTE_NETO_COSTEIsNull: Boolean read GetIMPORTE_NETO_COSTEIsNull write SetIMPORTE_NETO_COSTEIsNull;
property IMPORTE_PORTE_COSTE: Currency read GetIMPORTE_PORTE_COSTEValue write SetIMPORTE_PORTE_COSTEValue; property IMPORTE_PORTE_COSTE: Currency read GetIMPORTE_PORTE_COSTEValue write SetIMPORTE_PORTE_COSTEValue;
property IMPORTE_PORTE_COSTEIsNull: Boolean read GetIMPORTE_PORTE_COSTEIsNull write SetIMPORTE_PORTE_COSTEIsNull; property IMPORTE_PORTE_COSTEIsNull: Boolean read GetIMPORTE_PORTE_COSTEIsNull write SetIMPORTE_PORTE_COSTEIsNull;
property CANTIDAD: Currency read GetCANTIDADValue write SetCANTIDADValue; property CANTIDAD: Float read GetCANTIDADValue write SetCANTIDADValue;
property CANTIDADIsNull: Boolean read GetCANTIDADIsNull write SetCANTIDADIsNull; property CANTIDADIsNull: Boolean read GetCANTIDADIsNull write SetCANTIDADIsNull;
property IMPORTE_UNIDAD_VENTA: Currency read GetIMPORTE_UNIDAD_VENTAValue write SetIMPORTE_UNIDAD_VENTAValue; property IMPORTE_UNIDAD_VENTA: Currency read GetIMPORTE_UNIDAD_VENTAValue write SetIMPORTE_UNIDAD_VENTAValue;
property IMPORTE_UNIDAD_VENTAIsNull: Boolean read GetIMPORTE_UNIDAD_VENTAIsNull write SetIMPORTE_UNIDAD_VENTAIsNull; property IMPORTE_UNIDAD_VENTAIsNull: Boolean read GetIMPORTE_UNIDAD_VENTAIsNull write SetIMPORTE_UNIDAD_VENTAIsNull;
@ -2470,14 +2470,14 @@ begin
DataTable.Fields[idx_InfVentasAlbArticuloIMPORTE_PORTE_COSTE].AsVariant := Null; DataTable.Fields[idx_InfVentasAlbArticuloIMPORTE_PORTE_COSTE].AsVariant := Null;
end; end;
function TInfVentasAlbArticuloDataTableRules.GetCANTIDADValue: Currency; function TInfVentasAlbArticuloDataTableRules.GetCANTIDADValue: Float;
begin begin
result := DataTable.Fields[idx_InfVentasAlbArticuloCANTIDAD].AsCurrency; result := DataTable.Fields[idx_InfVentasAlbArticuloCANTIDAD].AsFloat;
end; end;
procedure TInfVentasAlbArticuloDataTableRules.SetCANTIDADValue(const aValue: Currency); procedure TInfVentasAlbArticuloDataTableRules.SetCANTIDADValue(const aValue: Float);
begin begin
DataTable.Fields[idx_InfVentasAlbArticuloCANTIDAD].AsCurrency := aValue; DataTable.Fields[idx_InfVentasAlbArticuloCANTIDAD].AsFloat := aValue;
end; end;
function TInfVentasAlbArticuloDataTableRules.GetCANTIDADIsNull: boolean; function TInfVentasAlbArticuloDataTableRules.GetCANTIDADIsNull: boolean;

32
Source/Modulos/Informe ventas por articulo/Model/schInfVentasArticuloServer_Intf.pas
View File

@ -9,14 +9,14 @@ const
{ Delta rules ids { Delta rules ids
Feel free to change them to something more human readable Feel free to change them to something more human readable
but make sure they are unique in the context of your application } but make sure they are unique in the context of your application }
RID_InfVentasArticuloDelta = '{3F5E554C-CDAD-4F0C-B179-FEA811CB32B9}'; RID_InfVentasArticuloDelta = '{C3B56BBE-2A68-4751-BFDB-D7CFDC2D3D13}';
RID_TablaVaciaDelta = '{28BB0A71-A847-4434-8B08-BD59D8251C55}'; RID_TablaVaciaDelta = '{9D87C0DE-4AA3-4C8C-8820-97BD0D2FFDB8}';
RID_InfVentasAlbArticuloDelta = '{FAD814C2-7B05-4C19-BECF-CED46F0CF599}'; RID_InfVentasAlbArticuloDelta = '{8D648387-0F24-46BD-959E-4AA0E074B55D}';
type type
{ IInfVentasArticuloDelta } { IInfVentasArticuloDelta }
IInfVentasArticuloDelta = interface(IInfVentasArticulo) IInfVentasArticuloDelta = interface(IInfVentasArticulo)
['{3F5E554C-CDAD-4F0C-B179-FEA811CB32B9}'] ['{C3B56BBE-2A68-4751-BFDB-D7CFDC2D3D13}']
{ Property getters and setters } { Property getters and setters }
function GetOldID_FACTURAValue : Integer; function GetOldID_FACTURAValue : Integer;
function GetOldID_EMPRESAValue : Integer; function GetOldID_EMPRESAValue : Integer;
@ -530,7 +530,7 @@ type
{ ITablaVaciaDelta } { ITablaVaciaDelta }
ITablaVaciaDelta = interface(ITablaVacia) ITablaVaciaDelta = interface(ITablaVacia)
['{28BB0A71-A847-4434-8B08-BD59D8251C55}'] ['{9D87C0DE-4AA3-4C8C-8820-97BD0D2FFDB8}']
{ Property getters and setters } { Property getters and setters }
{ Properties } { Properties }
@ -552,7 +552,7 @@ type
{ IInfVentasAlbArticuloDelta } { IInfVentasAlbArticuloDelta }
IInfVentasAlbArticuloDelta = interface(IInfVentasAlbArticulo) IInfVentasAlbArticuloDelta = interface(IInfVentasAlbArticulo)
['{FAD814C2-7B05-4C19-BECF-CED46F0CF599}'] ['{8D648387-0F24-46BD-959E-4AA0E074B55D}']
{ Property getters and setters } { Property getters and setters }
function GetOldID_ALBARANValue : Integer; function GetOldID_ALBARANValue : Integer;
function GetOldID_EMPRESAValue : Integer; function GetOldID_EMPRESAValue : Integer;
@ -570,7 +570,7 @@ type
function GetOldDESCUENTO_PROVEEDOR_COSTEValue : Float; function GetOldDESCUENTO_PROVEEDOR_COSTEValue : Float;
function GetOldIMPORTE_NETO_COSTEValue : Currency; function GetOldIMPORTE_NETO_COSTEValue : Currency;
function GetOldIMPORTE_PORTE_COSTEValue : Currency; function GetOldIMPORTE_PORTE_COSTEValue : Currency;
function GetOldCANTIDADValue : Currency; function GetOldCANTIDADValue : Float;
function GetOldIMPORTE_UNIDAD_VENTAValue : Currency; function GetOldIMPORTE_UNIDAD_VENTAValue : Currency;
function GetOldDESCUENTO_CLIENTE_VENTAValue : Float; function GetOldDESCUENTO_CLIENTE_VENTAValue : Float;
function GetOldIMPORTE_NETO_VENTAValue : Float; function GetOldIMPORTE_NETO_VENTAValue : Float;
@ -612,7 +612,7 @@ type
property OldDESCUENTO_PROVEEDOR_COSTE : Float read GetOldDESCUENTO_PROVEEDOR_COSTEValue; property OldDESCUENTO_PROVEEDOR_COSTE : Float read GetOldDESCUENTO_PROVEEDOR_COSTEValue;
property OldIMPORTE_NETO_COSTE : Currency read GetOldIMPORTE_NETO_COSTEValue; property OldIMPORTE_NETO_COSTE : Currency read GetOldIMPORTE_NETO_COSTEValue;
property OldIMPORTE_PORTE_COSTE : Currency read GetOldIMPORTE_PORTE_COSTEValue; property OldIMPORTE_PORTE_COSTE : Currency read GetOldIMPORTE_PORTE_COSTEValue;
property OldCANTIDAD : Currency read GetOldCANTIDADValue; property OldCANTIDAD : Float read GetOldCANTIDADValue;
property OldIMPORTE_UNIDAD_VENTA : Currency read GetOldIMPORTE_UNIDAD_VENTAValue; property OldIMPORTE_UNIDAD_VENTA : Currency read GetOldIMPORTE_UNIDAD_VENTAValue;
property OldDESCUENTO_CLIENTE_VENTA : Float read GetOldDESCUENTO_CLIENTE_VENTAValue; property OldDESCUENTO_CLIENTE_VENTA : Float read GetOldDESCUENTO_CLIENTE_VENTAValue;
property OldIMPORTE_NETO_VENTA : Float read GetOldIMPORTE_NETO_VENTAValue; property OldIMPORTE_NETO_VENTA : Float read GetOldIMPORTE_NETO_VENTAValue;
@ -739,11 +739,11 @@ type
function GetOldIMPORTE_PORTE_COSTEIsNull: Boolean; virtual; function GetOldIMPORTE_PORTE_COSTEIsNull: Boolean; virtual;
procedure SetIMPORTE_PORTE_COSTEValue(const aValue: Currency); virtual; procedure SetIMPORTE_PORTE_COSTEValue(const aValue: Currency); virtual;
procedure SetIMPORTE_PORTE_COSTEIsNull(const aValue: Boolean); virtual; procedure SetIMPORTE_PORTE_COSTEIsNull(const aValue: Boolean); virtual;
function GetCANTIDADValue: Currency; virtual; function GetCANTIDADValue: Float; virtual;
function GetCANTIDADIsNull: Boolean; virtual; function GetCANTIDADIsNull: Boolean; virtual;
function GetOldCANTIDADValue: Currency; virtual; function GetOldCANTIDADValue: Float; virtual;
function GetOldCANTIDADIsNull: Boolean; virtual; function GetOldCANTIDADIsNull: Boolean; virtual;
procedure SetCANTIDADValue(const aValue: Currency); virtual; procedure SetCANTIDADValue(const aValue: Float); virtual;
procedure SetCANTIDADIsNull(const aValue: Boolean); virtual; procedure SetCANTIDADIsNull(const aValue: Boolean); virtual;
function GetIMPORTE_UNIDAD_VENTAValue: Currency; virtual; function GetIMPORTE_UNIDAD_VENTAValue: Currency; virtual;
function GetIMPORTE_UNIDAD_VENTAIsNull: Boolean; virtual; function GetIMPORTE_UNIDAD_VENTAIsNull: Boolean; virtual;
@ -949,9 +949,9 @@ type
property IMPORTE_PORTE_COSTEIsNull : Boolean read GetIMPORTE_PORTE_COSTEIsNull write SetIMPORTE_PORTE_COSTEIsNull; property IMPORTE_PORTE_COSTEIsNull : Boolean read GetIMPORTE_PORTE_COSTEIsNull write SetIMPORTE_PORTE_COSTEIsNull;
property OldIMPORTE_PORTE_COSTE : Currency read GetOldIMPORTE_PORTE_COSTEValue; property OldIMPORTE_PORTE_COSTE : Currency read GetOldIMPORTE_PORTE_COSTEValue;
property OldIMPORTE_PORTE_COSTEIsNull : Boolean read GetOldIMPORTE_PORTE_COSTEIsNull; property OldIMPORTE_PORTE_COSTEIsNull : Boolean read GetOldIMPORTE_PORTE_COSTEIsNull;
property CANTIDAD : Currency read GetCANTIDADValue write SetCANTIDADValue; property CANTIDAD : Float read GetCANTIDADValue write SetCANTIDADValue;
property CANTIDADIsNull : Boolean read GetCANTIDADIsNull write SetCANTIDADIsNull; property CANTIDADIsNull : Boolean read GetCANTIDADIsNull write SetCANTIDADIsNull;
property OldCANTIDAD : Currency read GetOldCANTIDADValue; property OldCANTIDAD : Float read GetOldCANTIDADValue;
property OldCANTIDADIsNull : Boolean read GetOldCANTIDADIsNull; property OldCANTIDADIsNull : Boolean read GetOldCANTIDADIsNull;
property IMPORTE_UNIDAD_VENTA : Currency read GetIMPORTE_UNIDAD_VENTAValue write SetIMPORTE_UNIDAD_VENTAValue; property IMPORTE_UNIDAD_VENTA : Currency read GetIMPORTE_UNIDAD_VENTAValue write SetIMPORTE_UNIDAD_VENTAValue;
property IMPORTE_UNIDAD_VENTAIsNull : Boolean read GetIMPORTE_UNIDAD_VENTAIsNull write SetIMPORTE_UNIDAD_VENTAIsNull; property IMPORTE_UNIDAD_VENTAIsNull : Boolean read GetIMPORTE_UNIDAD_VENTAIsNull write SetIMPORTE_UNIDAD_VENTAIsNull;
@ -2859,7 +2859,7 @@ begin
BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasAlbArticuloIMPORTE_PORTE_COSTE] := Null; BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasAlbArticuloIMPORTE_PORTE_COSTE] := Null;
end; end;
function TInfVentasAlbArticuloBusinessProcessorRules.GetCANTIDADValue: Currency; function TInfVentasAlbArticuloBusinessProcessorRules.GetCANTIDADValue: Float;
begin begin
result := BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasAlbArticuloCANTIDAD]; result := BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasAlbArticuloCANTIDAD];
end; end;
@ -2869,7 +2869,7 @@ begin
result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasAlbArticuloCANTIDAD]); result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasAlbArticuloCANTIDAD]);
end; end;
function TInfVentasAlbArticuloBusinessProcessorRules.GetOldCANTIDADValue: Currency; function TInfVentasAlbArticuloBusinessProcessorRules.GetOldCANTIDADValue: Float;
begin begin
result := BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasAlbArticuloCANTIDAD]; result := BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasAlbArticuloCANTIDAD];
end; end;
@ -2879,7 +2879,7 @@ begin
result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasAlbArticuloCANTIDAD]); result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_InfVentasAlbArticuloCANTIDAD]);
end; end;
procedure TInfVentasAlbArticuloBusinessProcessorRules.SetCANTIDADValue(const aValue: Currency); procedure TInfVentasAlbArticuloBusinessProcessorRules.SetCANTIDADValue(const aValue: Float);
begin begin
BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasAlbArticuloCANTIDAD] := aValue; BusinessProcessor.CurrentChange.NewValueByName[fld_InfVentasAlbArticuloCANTIDAD] := aValue;
end; end;

3
Source/Modulos/Informe ventas por articulo/Servidor/srvInfVentasArticulo_Impl.dfm
View File

@ -628,7 +628,8 @@ object srvInfVentasArticulo: TsrvInfVentasArticulo
end end
item item
Name = 'CANTIDAD' Name = 'CANTIDAD'
DataType = datCurrency DataType = datFloat
DisplayFormat = '#,##0'
end end
item item
Name = 'IMPORTE_UNIDAD_VENTA' Name = 'IMPORTE_UNIDAD_VENTA'

2
Source/Modulos/Informe ventas por articulo/Views/InfVentasArticulo_view.drc
View File

@ -19,4 +19,4 @@ END
/* C:\Codigo\Source\Modulos\Informe ventas por articulo\Views\uViewInfVentasAlbArticulo.dfm */ /* C:\Codigo\Source\Modulos\Informe ventas por articulo\Views\uViewInfVentasAlbArticulo.dfm */
/* C:\Codigo\Source\Modulos\Informe ventas por articulo\Views\uEditorInfVentasAlbArticulo.dfm */ /* C:\Codigo\Source\Modulos\Informe ventas por articulo\Views\uEditorInfVentasAlbArticulo.dfm */
/* C:\Codigo\Source\Modulos\Informe ventas por articulo\Views\InfVentasArticulo_view.res */ /* C:\Codigo\Source\Modulos\Informe ventas por articulo\Views\InfVentasArticulo_view.res */
/* c:\temp\dtf1CC.tmp */ /* C:\Codigo\Source\Modulos\Informe ventas por articulo\Views\InfVentasArticulo_view.drf */

5
Source/Modulos/Informe ventas por articulo/Views/uViewInfVentasAlbArticuloGrid.dfm
View File

@ -139,6 +139,11 @@ inherited frViewInfVentasAlbArticuloGrid: TfrViewInfVentasAlbArticuloGrid
object cxGridViewCANTIDAD: TcxGridDBColumn object cxGridViewCANTIDAD: TcxGridDBColumn
Caption = 'Cantidad' Caption = 'Cantidad'
DataBinding.FieldName = 'CANTIDAD' DataBinding.FieldName = 'CANTIDAD'
PropertiesClassName = 'TcxCurrencyEditProperties'
Properties.Alignment.Horz = taRightJustify
Properties.DisplayFormat = '#,##0;-#,##0'
FooterAlignmentHorz = taRightJustify
GroupSummaryAlignment = taRightJustify
end end
object cxGridViewIMPORTE_UNIDAD_VENTA: TcxGridDBColumn object cxGridViewIMPORTE_UNIDAD_VENTA: TcxGridDBColumn
Caption = 'Precio uni. venta' Caption = 'Precio uni. venta'

2
Source/Modulos/Informe ventas por articulo/Views/uViewInfVentasAlbArticuloGrid.pas
View File

@ -11,7 +11,7 @@ uses
cxCurrencyEdit, cxCalendar, dxPSGlbl, dxPSUtl, dxPrnPg, dxBkgnd, dxWrap, cxCurrencyEdit, cxCalendar, dxPSGlbl, dxPSUtl, dxPrnPg, dxBkgnd, dxWrap,
dxPrnDev, dxPSEngn, dxPSCompsProvider, dxPSFillPatterns, dxPrnDev, dxPSEngn, dxPSCompsProvider, dxPSFillPatterns,
dxPSEdgePatterns, dxPSCore, dxPScxCommon, dxPScxGrid6Lnk, dxPgsDlg, dxPSEdgePatterns, dxPSCore, dxPScxCommon, dxPScxGrid6Lnk, dxPgsDlg,
cxDropDownEdit, StdCtrls, cxSpinEdit; cxDropDownEdit, StdCtrls, cxSpinEdit, cxCalc;
type type
IViewInfVentasAlbArticuloGrid = interface(IViewInformeBaseGrid) IViewInfVentasAlbArticuloGrid = interface(IViewInformeBaseGrid)

7
Source/Modulos/Informe ventas por articulo/Views/uViewInfVentasArticuloGrid.dfm
View File

@ -143,6 +143,12 @@ inherited frViewInfVentasArticuloGrid: TfrViewInfVentasArticuloGrid
object cxGridViewCANTIDAD: TcxGridDBColumn object cxGridViewCANTIDAD: TcxGridDBColumn
Caption = 'Cantidad' Caption = 'Cantidad'
DataBinding.FieldName = 'CANTIDAD' DataBinding.FieldName = 'CANTIDAD'
PropertiesClassName = 'TcxCurrencyEditProperties'
Properties.Alignment.Horz = taRightJustify
Properties.DisplayFormat = '#,##0;-#,##0'
FooterAlignmentHorz = taRightJustify
GroupSummaryAlignment = taRightJustify
HeaderAlignmentHorz = taRightJustify
end end
object cxGridViewIMPORTE_UNIDAD_VENTA: TcxGridDBColumn object cxGridViewIMPORTE_UNIDAD_VENTA: TcxGridDBColumn
Caption = 'Precio uni. venta' Caption = 'Precio uni. venta'
@ -241,6 +247,7 @@ inherited frViewInfVentasArticuloGrid: TfrViewInfVentasArticuloGrid
object cxStyleRepository1: TcxStyleRepository object cxStyleRepository1: TcxStyleRepository
Left = 16 Left = 16
Top = 48 Top = 48
PixelsPerInch = 96
object cxStyleRed: TcxStyle object cxStyleRed: TcxStyle
AssignedValues = [svTextColor] AssignedValues = [svTextColor]
TextColor = clRed TextColor = clRed

BIN
Source/Servidor/FactuGES_Server.RES
View File

Binary file not shown.

6
Source/Servidor/FactuGES_Server.dpr
View File

@ -164,12 +164,12 @@ uses
srvInfMargenArticulo_Impl in '..\Modulos\Informe margen por articulo\Servidor\srvInfMargenArticulo_Impl.pas' {srvInfMargenArticulo: TDARemoteService}, srvInfMargenArticulo_Impl in '..\Modulos\Informe margen por articulo\Servidor\srvInfMargenArticulo_Impl.pas' {srvInfMargenArticulo: TDARemoteService},
schInventarioClient_Intf in '..\Modulos\Inventario\Model\schInventarioClient_Intf.pas', schInventarioClient_Intf in '..\Modulos\Inventario\Model\schInventarioClient_Intf.pas',
schInventarioServer_Intf in '..\Modulos\Inventario\Model\schInventarioServer_Intf.pas', schInventarioServer_Intf in '..\Modulos\Inventario\Model\schInventarioServer_Intf.pas',
schInfVentasArticuloClient_Intf in '..\Modulos\Informe ventas por articulo\Model\schInfVentasArticuloClient_Intf.pas',
schInfVentasArticuloServer_Intf in '..\Modulos\Informe ventas por articulo\Model\schInfVentasArticuloServer_Intf.pas',
schAlbaranesProveedorClient_Intf in '..\Modulos\Albaranes de proveedor\Model\schAlbaranesProveedorClient_Intf.pas', schAlbaranesProveedorClient_Intf in '..\Modulos\Albaranes de proveedor\Model\schAlbaranesProveedorClient_Intf.pas',
schAlbaranesProveedorServer_Intf in '..\Modulos\Albaranes de proveedor\Model\schAlbaranesProveedorServer_Intf.pas', schAlbaranesProveedorServer_Intf in '..\Modulos\Albaranes de proveedor\Model\schAlbaranesProveedorServer_Intf.pas',
schContactosClient_Intf in '..\Modulos\Contactos\Model\schContactosClient_Intf.pas', schContactosClient_Intf in '..\Modulos\Contactos\Model\schContactosClient_Intf.pas',
schContactosServer_Intf in '..\Modulos\Contactos\Model\schContactosServer_Intf.pas'; schContactosServer_Intf in '..\Modulos\Contactos\Model\schContactosServer_Intf.pas',
schInfVentasArticuloClient_Intf in '..\Modulos\Informe ventas por articulo\Model\schInfVentasArticuloClient_Intf.pas',
schInfVentasArticuloServer_Intf in '..\Modulos\Informe ventas por articulo\Model\schInfVentasArticuloServer_Intf.pas';
{$R *.res} {$R *.res}
{$R ..\Servicios\RODLFile.res} {$R ..\Servicios\RODLFile.res}

807
Source/Servidor/FactuGES_Server.dproj
View File

@ -1,407 +1,408 @@
<?xml version="1.0" encoding="utf-8"?> <?xml version="1.0" encoding="utf-8"?>
<Project xmlns="http://schemas.microsoft.com/developer/msbuild/2003"> <Project xmlns="http://schemas.microsoft.com/developer/msbuild/2003">
<PropertyGroup> <PropertyGroup>
<ProjectGuid>{ebdcd25d-40d7-4146-91ec-a0ea4aa1dcd1}</ProjectGuid> <ProjectGuid>{ebdcd25d-40d7-4146-91ec-a0ea4aa1dcd1}</ProjectGuid>
<MainSource>FactuGES_Server.dpr</MainSource> <MainSource>FactuGES_Server.dpr</MainSource>
<Configuration Condition=" '$(Configuration)' == '' ">Debug</Configuration> <Configuration Condition=" '$(Configuration)' == '' ">Debug</Configuration>
<Platform Condition=" '$(Platform)' == '' ">AnyCPU</Platform> <Platform Condition=" '$(Platform)' == '' ">AnyCPU</Platform>
<DCC_DCCCompiler>DCC32</DCC_DCCCompiler> <DCC_DCCCompiler>DCC32</DCC_DCCCompiler>
<DCC_DependencyCheckOutputName>..\..\Output\Debug\Servidor\FactuGES_Server.exe</DCC_DependencyCheckOutputName> <DCC_DependencyCheckOutputName>..\..\Output\Debug\Servidor\FactuGES_Server.exe</DCC_DependencyCheckOutputName>
<DCC_UsePackage>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_D11R;ccpackD11;JSDialog100;fsTee11;fs11;frx11;frxADO11;frxBDE11;frxDB11;frxDBX11;frxe11;frxIBX11;frxTee11;fsADO11;fsBDE11;fsDB11;fsIBX11;websnap;soaprtl;IntrawebDB_90_100;Intraweb_90_100</DCC_UsePackage> <DCC_UsePackage>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_D11R;ccpackD11;JSDialog100;fsTee11;fs11;frx11;frxADO11;frxBDE11;frxDB11;frxDBX11;frxe11;frxIBX11;frxTee11;fsADO11;fsBDE11;fsDB11;fsIBX11;websnap;soaprtl;IntrawebDB_90_100;Intraweb_90_100</DCC_UsePackage>
</PropertyGroup> </PropertyGroup>
<PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Release|AnyCPU' "> <PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Release|AnyCPU' ">
<Version>7.0</Version> <Version>7.0</Version>
<DCC_DebugInformation>False</DCC_DebugInformation> <DCC_DebugInformation>False</DCC_DebugInformation>
<DCC_LocalDebugSymbols>False</DCC_LocalDebugSymbols> <DCC_LocalDebugSymbols>False</DCC_LocalDebugSymbols>
<DCC_SymbolReferenceInfo>0</DCC_SymbolReferenceInfo> <DCC_SymbolReferenceInfo>0</DCC_SymbolReferenceInfo>
<DCC_MapFile>3</DCC_MapFile> <DCC_MapFile>3</DCC_MapFile>
<DCC_ExeOutput>..\..\Output\Release\Servidor</DCC_ExeOutput> <DCC_ExeOutput>..\..\Output\Release\Servidor</DCC_ExeOutput>
<DCC_Define>RELEASE</DCC_Define> <DCC_Define>RELEASE</DCC_Define>
</PropertyGroup> </PropertyGroup>
<PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Debug|AnyCPU' "> <PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Debug|AnyCPU' ">
<Version>7.0</Version> <Version>7.0</Version>
<DCC_MapFile>3</DCC_MapFile> <DCC_MapFile>3</DCC_MapFile>
<DCC_ExeOutput>..\..\Output\Debug\Servidor</DCC_ExeOutput> <DCC_ExeOutput>..\..\Output\Debug\Servidor</DCC_ExeOutput>
<DCC_Define>DEBUG;</DCC_Define> <DCC_Define>DEBUG;</DCC_Define>
<DCC_GenerateStackFrames>True</DCC_GenerateStackFrames> <DCC_GenerateStackFrames>True</DCC_GenerateStackFrames>
<DCC_DebugInfoInExe>True</DCC_DebugInfoInExe> <DCC_DebugInfoInExe>True</DCC_DebugInfoInExe>
<DCC_DebugVN>True</DCC_DebugVN> <DCC_DebugVN>True</DCC_DebugVN>
<DCC_UnitSearchPath>C:\jcl\lib\d11\debug;C:\JCL\lib\d11\debug;$(BDS)\lib\Debug;$(BDS)\Lib\Debug\Indy10</DCC_UnitSearchPath> <DCC_UnitSearchPath>C:\jcl\lib\d11\debug;C:\JCL\lib\d11\debug;$(BDS)\lib\Debug;$(BDS)\Lib\Debug\Indy10</DCC_UnitSearchPath>
<DCC_ResourcePath>C:\jcl\lib\d11\debug;C:\JCL\lib\d11\debug;$(BDS)\lib\Debug;$(BDS)\Lib\Debug\Indy10</DCC_ResourcePath> <DCC_ResourcePath>C:\jcl\lib\d11\debug;C:\JCL\lib\d11\debug;$(BDS)\lib\Debug;$(BDS)\Lib\Debug\Indy10</DCC_ResourcePath>
<DCC_ObjPath>C:\jcl\lib\d11\debug;C:\JCL\lib\d11\debug;$(BDS)\lib\Debug;$(BDS)\Lib\Debug\Indy10</DCC_ObjPath> <DCC_ObjPath>C:\jcl\lib\d11\debug;C:\JCL\lib\d11\debug;$(BDS)\lib\Debug;$(BDS)\Lib\Debug\Indy10</DCC_ObjPath>
<DCC_IncludePath>C:\jcl\lib\d11\debug;C:\JCL\lib\d11\debug;$(BDS)\lib\Debug;$(BDS)\Lib\Debug\Indy10</DCC_IncludePath> <DCC_IncludePath>C:\jcl\lib\d11\debug;C:\JCL\lib\d11\debug;$(BDS)\lib\Debug;$(BDS)\Lib\Debug\Indy10</DCC_IncludePath>
</PropertyGroup> </PropertyGroup>
<ProjectExtensions> <ProjectExtensions>
<Borland.Personality>Delphi.Personality</Borland.Personality> <Borland.Personality>Delphi.Personality</Borland.Personality>
<Borland.ProjectType/> <Borland.ProjectType />
<BorlandProject> <BorlandProject>
<BorlandProject><Delphi.Personality><Parameters><Parameters Name="UseLauncher">False</Parameters><Parameters Name="LoadAllSymbols">True</Parameters><Parameters Name="LoadUnspecifiedSymbols">False</Parameters><Parameters Name="RunParams">/standalone</Parameters></Parameters><VersionInfo><VersionInfo Name="IncludeVerInfo">True</VersionInfo><VersionInfo Name="AutoIncBuild">False</VersionInfo><VersionInfo Name="MajorVer">4</VersionInfo><VersionInfo Name="MinorVer">2</VersionInfo><VersionInfo Name="Release">2</VersionInfo><VersionInfo Name="Build">0</VersionInfo><VersionInfo Name="Debug">False</VersionInfo><VersionInfo Name="PreRelease">False</VersionInfo><VersionInfo Name="Special">False</VersionInfo><VersionInfo Name="Private">False</VersionInfo><VersionInfo Name="DLL">False</VersionInfo><VersionInfo Name="Locale">3082</VersionInfo><VersionInfo Name="CodePage">1252</VersionInfo></VersionInfo><VersionInfoKeys><VersionInfoKeys Name="CompanyName"></VersionInfoKeys><VersionInfoKeys Name="FileDescription"></VersionInfoKeys><VersionInfoKeys Name="FileVersion">4.2.2.0</VersionInfoKeys><VersionInfoKeys Name="InternalName"></VersionInfoKeys><VersionInfoKeys Name="LegalCopyright"></VersionInfoKeys><VersionInfoKeys Name="LegalTrademarks"></VersionInfoKeys><VersionInfoKeys Name="OriginalFilename"></VersionInfoKeys><VersionInfoKeys Name="ProductName"></VersionInfoKeys><VersionInfoKeys Name="ProductVersion">4.2.2.0</VersionInfoKeys><VersionInfoKeys Name="Comments"></VersionInfoKeys><VersionInfoKeys Name="CompileDate">martes, 14 de febrero de 2012 15:51</VersionInfoKeys></VersionInfoKeys><Excluded_Packages> <BorlandProject><Delphi.Personality><Parameters><Parameters Name="UseLauncher">False</Parameters><Parameters Name="LoadAllSymbols">True</Parameters><Parameters Name="LoadUnspecifiedSymbols">False</Parameters><Parameters Name="RunParams">/standalone</Parameters></Parameters><VersionInfo><VersionInfo Name="IncludeVerInfo">True</VersionInfo><VersionInfo Name="AutoIncBuild">False</VersionInfo><VersionInfo Name="MajorVer">4</VersionInfo><VersionInfo Name="MinorVer">2</VersionInfo><VersionInfo Name="Release">3</VersionInfo><VersionInfo Name="Build">0</VersionInfo><VersionInfo Name="Debug">False</VersionInfo><VersionInfo Name="PreRelease">False</VersionInfo><VersionInfo Name="Special">False</VersionInfo><VersionInfo Name="Private">False</VersionInfo><VersionInfo Name="DLL">False</VersionInfo><VersionInfo Name="Locale">3082</VersionInfo><VersionInfo Name="CodePage">1252</VersionInfo></VersionInfo><VersionInfoKeys><VersionInfoKeys Name="CompanyName"></VersionInfoKeys><VersionInfoKeys Name="FileDescription"></VersionInfoKeys><VersionInfoKeys Name="FileVersion">4.2.3.0</VersionInfoKeys><VersionInfoKeys Name="InternalName"></VersionInfoKeys><VersionInfoKeys Name="LegalCopyright"></VersionInfoKeys><VersionInfoKeys Name="LegalTrademarks"></VersionInfoKeys><VersionInfoKeys Name="OriginalFilename"></VersionInfoKeys><VersionInfoKeys Name="ProductName"></VersionInfoKeys><VersionInfoKeys Name="ProductVersion">4.2.3.0</VersionInfoKeys><VersionInfoKeys Name="Comments"></VersionInfoKeys><VersionInfoKeys Name="CompileDate">martes, 14 de febrero de 2012 16:03</VersionInfoKeys></VersionInfoKeys><Excluded_Packages>
<Excluded_Packages Name="C:\Documents and Settings\All Users\Documentos\RAD Studio\5.0\Bpl\dxPSCoreD11.bpl">ExpressPrinting System by Developer Express Inc.</Excluded_Packages>
</Excluded_Packages><Source><Source Name="MainSource">FactuGES_Server.dpr</Source></Source></Delphi.Personality><ModelSupport>False</ModelSupport></BorlandProject></BorlandProject> <Excluded_Packages Name="C:\Documents and Settings\All Users\Documentos\RAD Studio\5.0\Bpl\dxPSCoreD11.bpl">ExpressPrinting System by Developer Express Inc.</Excluded_Packages>
</ProjectExtensions> </Excluded_Packages><Source><Source Name="MainSource">FactuGES_Server.dpr</Source></Source></Delphi.Personality><ModelSupport>False</ModelSupport></BorlandProject></BorlandProject>
<Import Project="$(MSBuildBinPath)\Borland.Delphi.Targets"/> </ProjectExtensions>
<ItemGroup> <Import Project="$(MSBuildBinPath)\Borland.Delphi.Targets" />
<DelphiCompile Include="FactuGES_Server.dpr"> <ItemGroup>
<MainSource>MainSource</MainSource> <DelphiCompile Include="FactuGES_Server.dpr">
</DelphiCompile> <MainSource>MainSource</MainSource>
<DCCReference Include="..\ApplicationBase\Empresas\Model\schEmpresasClient_Intf.pas"/> </DelphiCompile>
<DCCReference Include="..\ApplicationBase\Empresas\Model\schEmpresasServer_Intf.pas"/> <DCCReference Include="..\ApplicationBase\Empresas\Model\schEmpresasClient_Intf.pas" />
<DCCReference Include="..\ApplicationBase\Empresas\Model\uBizEmpresasServer.pas"/> <DCCReference Include="..\ApplicationBase\Empresas\Model\schEmpresasServer_Intf.pas" />
<DCCReference Include="..\ApplicationBase\Empresas\Servidor\srvEmpresas_Impl.pas"> <DCCReference Include="..\ApplicationBase\Empresas\Model\uBizEmpresasServer.pas" />
<Form>srvEmpresas</Form> <DCCReference Include="..\ApplicationBase\Empresas\Servidor\srvEmpresas_Impl.pas">
<DesignClass>TDARemoteService</DesignClass> <Form>srvEmpresas</Form>
</DCCReference> <DesignClass>TDARemoteService</DesignClass>
<DCCReference Include="..\ApplicationBase\ProvinciasPoblaciones\Servidor\srvProvinciasPoblaciones_Impl.pas"> </DCCReference>
<Form>srvProvinciasPoblaciones_Impl</Form> <DCCReference Include="..\ApplicationBase\ProvinciasPoblaciones\Servidor\srvProvinciasPoblaciones_Impl.pas">
<DesignClass>TDataModule</DesignClass> <Form>srvProvinciasPoblaciones_Impl</Form>
</DCCReference> <DesignClass>TDataModule</DesignClass>
<DCCReference Include="..\ApplicationBase\Usuarios\Model\schUsuariosClient_Intf.pas"/> </DCCReference>
<DCCReference Include="..\ApplicationBase\Usuarios\Model\schUsuariosServer_Intf.pas"/> <DCCReference Include="..\ApplicationBase\Usuarios\Model\schUsuariosClient_Intf.pas" />
<DCCReference Include="..\ApplicationBase\Usuarios\Servidor\srvUsuarios_Impl.pas"> <DCCReference Include="..\ApplicationBase\Usuarios\Model\schUsuariosServer_Intf.pas" />
<Form>srvUsuarios</Form> <DCCReference Include="..\ApplicationBase\Usuarios\Servidor\srvUsuarios_Impl.pas">
<DesignClass>TDataAbstractService</DesignClass> <Form>srvUsuarios</Form>
</DCCReference> <DesignClass>TDataAbstractService</DesignClass>
<DCCReference Include="..\Base\schBase_Intf.pas"/> </DCCReference>
<DCCReference Include="..\Base\Utiles\uSistemaFunc.pas"/> <DCCReference Include="..\Base\schBase_Intf.pas" />
<DCCReference Include="..\Base\Utiles\uStringsUtils.pas"/> <DCCReference Include="..\Base\Utiles\uSistemaFunc.pas" />
<DCCReference Include="..\Modulos\Albaranes de cliente\Model\schAlbaranesClienteClient_Intf.pas"/> <DCCReference Include="..\Base\Utiles\uStringsUtils.pas" />
<DCCReference Include="..\Modulos\Albaranes de cliente\Model\schAlbaranesClienteServer_Intf.pas"/> <DCCReference Include="..\Modulos\Albaranes de cliente\Model\schAlbaranesClienteClient_Intf.pas" />
<DCCReference Include="..\Modulos\Albaranes de cliente\Model\uBizAlbaranClienteServer.pas"/> <DCCReference Include="..\Modulos\Albaranes de cliente\Model\schAlbaranesClienteServer_Intf.pas" />
<DCCReference Include="..\Modulos\Albaranes de cliente\Reports\uRptAlbaranesCliente_Server.pas"> <DCCReference Include="..\Modulos\Albaranes de cliente\Model\uBizAlbaranClienteServer.pas" />
<Form>RptAlbaranesCliente</Form> <DCCReference Include="..\Modulos\Albaranes de cliente\Reports\uRptAlbaranesCliente_Server.pas">
<DesignClass>TDataModule</DesignClass> <Form>RptAlbaranesCliente</Form>
</DCCReference> <DesignClass>TDataModule</DesignClass>
<DCCReference Include="..\Modulos\Albaranes de cliente\Reports\uRptWordAlbaranCliente.pas"> </DCCReference>
<Form>RptWordAlbaranCliente</Form> <DCCReference Include="..\Modulos\Albaranes de cliente\Reports\uRptWordAlbaranCliente.pas">
<DesignClass>TDataModule</DesignClass> <Form>RptWordAlbaranCliente</Form>
</DCCReference> <DesignClass>TDataModule</DesignClass>
<DCCReference Include="..\Modulos\Albaranes de cliente\Servidor\srvAlbaranesCliente_Impl.pas"> </DCCReference>
<Form>srvAlbaranesCliente</Form> <DCCReference Include="..\Modulos\Albaranes de cliente\Servidor\srvAlbaranesCliente_Impl.pas">
<DesignClass>TDataAbstractService</DesignClass> <Form>srvAlbaranesCliente</Form>
</DCCReference> <DesignClass>TDataAbstractService</DesignClass>
<DCCReference Include="..\Modulos\Albaranes de proveedor\Model\schAlbaranesProveedorClient_Intf.pas"/> </DCCReference>
<DCCReference Include="..\Modulos\Albaranes de proveedor\Model\schAlbaranesProveedorServer_Intf.pas"/> <DCCReference Include="..\Modulos\Albaranes de proveedor\Model\schAlbaranesProveedorClient_Intf.pas" />
<DCCReference Include="..\Modulos\Albaranes de proveedor\Model\uBizAlbaranProveedorServer.PAS"/> <DCCReference Include="..\Modulos\Albaranes de proveedor\Model\schAlbaranesProveedorServer_Intf.pas" />
<DCCReference Include="..\Modulos\Albaranes de proveedor\Reports\uRptAlbaranesProveedor_Server.pas"> <DCCReference Include="..\Modulos\Albaranes de proveedor\Model\uBizAlbaranProveedorServer.PAS" />
<Form>RptAlbaranesProveedor</Form> <DCCReference Include="..\Modulos\Albaranes de proveedor\Reports\uRptAlbaranesProveedor_Server.pas">
<DesignClass>TDataModule</DesignClass> <Form>RptAlbaranesProveedor</Form>
</DCCReference> <DesignClass>TDataModule</DesignClass>
<DCCReference Include="..\Modulos\Albaranes de proveedor\Reports\uRptWordAlbaranProveedor.pas"> </DCCReference>
<Form>RptWordAlbaranProveedor</Form> <DCCReference Include="..\Modulos\Albaranes de proveedor\Reports\uRptWordAlbaranProveedor.pas">
<DesignClass>TDataModule</DesignClass> <Form>RptWordAlbaranProveedor</Form>
</DCCReference> <DesignClass>TDataModule</DesignClass>
<DCCReference Include="..\Modulos\Albaranes de proveedor\Servidor\srvAlbaranesProveedor_Impl.pas"> </DCCReference>
<Form>srvAlbaranesProveedor</Form> <DCCReference Include="..\Modulos\Albaranes de proveedor\Servidor\srvAlbaranesProveedor_Impl.pas">
<DesignClass>TDataAbstractService</DesignClass> <Form>srvAlbaranesProveedor</Form>
</DCCReference> <DesignClass>TDataAbstractService</DesignClass>
<DCCReference Include="..\Modulos\Almacenes\Model\schAlmacenesClient_Intf.pas"/> </DCCReference>
<DCCReference Include="..\Modulos\Almacenes\Model\schAlmacenesServer_Intf.pas"/> <DCCReference Include="..\Modulos\Almacenes\Model\schAlmacenesClient_Intf.pas" />
<DCCReference Include="..\Modulos\Almacenes\Servidor\srvAlmacenes_Impl.pas"> <DCCReference Include="..\Modulos\Almacenes\Model\schAlmacenesServer_Intf.pas" />
<Form>srvAlmacenes</Form> <DCCReference Include="..\Modulos\Almacenes\Servidor\srvAlmacenes_Impl.pas">
<DesignClass>TDARemoteService</DesignClass> <Form>srvAlmacenes</Form>
</DCCReference> <DesignClass>TDARemoteService</DesignClass>
<DCCReference Include="..\Modulos\Articulos\Model\schArticulosClient_Intf.pas"/> </DCCReference>
<DCCReference Include="..\Modulos\Articulos\Model\schArticulosServer_Intf.pas"/> <DCCReference Include="..\Modulos\Articulos\Model\schArticulosClient_Intf.pas" />
<DCCReference Include="..\Modulos\Articulos\Model\uBizArticulosServer.pas"/> <DCCReference Include="..\Modulos\Articulos\Model\schArticulosServer_Intf.pas" />
<DCCReference Include="..\Modulos\Articulos\Servidor\srvArticulos_Impl.pas"> <DCCReference Include="..\Modulos\Articulos\Model\uBizArticulosServer.pas" />
<Form>srvArticulos</Form> <DCCReference Include="..\Modulos\Articulos\Servidor\srvArticulos_Impl.pas">
<DesignClass>TDARemoteService</DesignClass> <Form>srvArticulos</Form>
</DCCReference> <DesignClass>TDARemoteService</DesignClass>
<DCCReference Include="..\Modulos\Comisiones\Model\schComisionesClient_Intf.pas"/> </DCCReference>
<DCCReference Include="..\Modulos\Comisiones\Model\schComisionesServer_Intf.pas"/> <DCCReference Include="..\Modulos\Comisiones\Model\schComisionesClient_Intf.pas" />
<DCCReference Include="..\Modulos\Comisiones\Model\uBizComisionesServer.pas"/> <DCCReference Include="..\Modulos\Comisiones\Model\schComisionesServer_Intf.pas" />
<DCCReference Include="..\Modulos\Comisiones\Reports\uRptComisiones_Server.pas"> <DCCReference Include="..\Modulos\Comisiones\Model\uBizComisionesServer.pas" />
<Form>RptComisiones</Form> <DCCReference Include="..\Modulos\Comisiones\Reports\uRptComisiones_Server.pas">
<DesignClass>TDataModule</DesignClass> <Form>RptComisiones</Form>
</DCCReference> <DesignClass>TDataModule</DesignClass>
<DCCReference Include="..\Modulos\Comisiones\Servidor\srvComisiones_Impl.pas"> </DCCReference>
<Form>srvComisiones</Form> <DCCReference Include="..\Modulos\Comisiones\Servidor\srvComisiones_Impl.pas">
<DesignClass>TDataAbstractService</DesignClass> <Form>srvComisiones</Form>
</DCCReference> <DesignClass>TDataAbstractService</DesignClass>
<DCCReference Include="..\Modulos\Contactos\Model\schContactosClient_Intf.pas"/> </DCCReference>
<DCCReference Include="..\Modulos\Contactos\Model\schContactosServer_Intf.pas"/> <DCCReference Include="..\Modulos\Contactos\Model\schContactosClient_Intf.pas" />
<DCCReference Include="..\Modulos\Contactos\Model\uBizAgentesServer.pas"/> <DCCReference Include="..\Modulos\Contactos\Model\schContactosServer_Intf.pas" />
<DCCReference Include="..\Modulos\Contactos\Model\uBizClientesServer.pas"/> <DCCReference Include="..\Modulos\Contactos\Model\uBizAgentesServer.pas" />
<DCCReference Include="..\Modulos\Contactos\Model\uBizContactosServer.pas"/> <DCCReference Include="..\Modulos\Contactos\Model\uBizClientesServer.pas" />
<DCCReference Include="..\Modulos\Contactos\Model\uBizEmpleadosServer.pas"/> <DCCReference Include="..\Modulos\Contactos\Model\uBizContactosServer.pas" />
<DCCReference Include="..\Modulos\Contactos\Model\uBizProveedoresServer.pas"/> <DCCReference Include="..\Modulos\Contactos\Model\uBizEmpleadosServer.pas" />
<DCCReference Include="..\Modulos\Contactos\Reports\uRptEtiquetasContacto_Server.pas"> <DCCReference Include="..\Modulos\Contactos\Model\uBizProveedoresServer.pas" />
<Form>RptEtiquetasContacto</Form> <DCCReference Include="..\Modulos\Contactos\Reports\uRptEtiquetasContacto_Server.pas">
<DesignClass>TDataModule</DesignClass> <Form>RptEtiquetasContacto</Form>
</DCCReference> <DesignClass>TDataModule</DesignClass>
<DCCReference Include="..\Modulos\Contactos\Reports\uRptFichasEmpleado_Server.pas"> </DCCReference>
<Form>RptFichasEmpleado</Form> <DCCReference Include="..\Modulos\Contactos\Reports\uRptFichasEmpleado_Server.pas">
<DesignClass>TDataModule</DesignClass> <Form>RptFichasEmpleado</Form>
</DCCReference> <DesignClass>TDataModule</DesignClass>
<DCCReference Include="..\Modulos\Contactos\Servidor\srvContactos_Impl.pas"> </DCCReference>
<Form>srvContactos</Form> <DCCReference Include="..\Modulos\Contactos\Servidor\srvContactos_Impl.pas">
<DesignClass>TDARemoteService</DesignClass> <Form>srvContactos</Form>
</DCCReference> <DesignClass>TDARemoteService</DesignClass>
<DCCReference Include="..\Modulos\Fabricantes\Model\schFabricantesClient_Intf.pas"/> </DCCReference>
<DCCReference Include="..\Modulos\Fabricantes\Model\schFabricantesServer_Intf.pas"/> <DCCReference Include="..\Modulos\Fabricantes\Model\schFabricantesClient_Intf.pas" />
<DCCReference Include="..\Modulos\Fabricantes\Servidor\srvFabricantes_Impl.pas"> <DCCReference Include="..\Modulos\Fabricantes\Model\schFabricantesServer_Intf.pas" />
<Form>srvFabricantes</Form> <DCCReference Include="..\Modulos\Fabricantes\Servidor\srvFabricantes_Impl.pas">
<DesignClass>TDataAbstractService</DesignClass> <Form>srvFabricantes</Form>
</DCCReference> <DesignClass>TDataAbstractService</DesignClass>
<DCCReference Include="..\Modulos\Facturas de cliente\Model\schFacturasClienteClient_Intf.pas"/> </DCCReference>
<DCCReference Include="..\Modulos\Facturas de cliente\Model\schFacturasClienteServer_Intf.pas"/> <DCCReference Include="..\Modulos\Facturas de cliente\Model\schFacturasClienteClient_Intf.pas" />
<DCCReference Include="..\Modulos\Facturas de cliente\Model\uBizFacturasClienteServer.pas"/> <DCCReference Include="..\Modulos\Facturas de cliente\Model\schFacturasClienteServer_Intf.pas" />
<DCCReference Include="..\Modulos\Facturas de cliente\Reports\uRptFacturasCliente_Server.pas"> <DCCReference Include="..\Modulos\Facturas de cliente\Model\uBizFacturasClienteServer.pas" />
<Form>RptFacturasCliente</Form> <DCCReference Include="..\Modulos\Facturas de cliente\Reports\uRptFacturasCliente_Server.pas">
<DesignClass>TDataModule</DesignClass> <Form>RptFacturasCliente</Form>
</DCCReference> <DesignClass>TDataModule</DesignClass>
<DCCReference Include="..\Modulos\Facturas de cliente\Reports\uRptWordFacturaCliente.pas"> </DCCReference>
<Form>RptWordFacturaCliente</Form> <DCCReference Include="..\Modulos\Facturas de cliente\Reports\uRptWordFacturaCliente.pas">
<DesignClass>TDataModule</DesignClass> <Form>RptWordFacturaCliente</Form>
</DCCReference> <DesignClass>TDataModule</DesignClass>
<DCCReference Include="..\Modulos\Facturas de cliente\Servidor\srvFacturasCliente_Impl.pas"> </DCCReference>
<Form>srvFacturasCliente</Form> <DCCReference Include="..\Modulos\Facturas de cliente\Servidor\srvFacturasCliente_Impl.pas">
<DesignClass>TDataAbstractService</DesignClass> <Form>srvFacturasCliente</Form>
</DCCReference> <DesignClass>TDataAbstractService</DesignClass>
<DCCReference Include="..\Modulos\Facturas de proveedor\Model\schFacturasProveedorClient_Intf.pas"/> </DCCReference>
<DCCReference Include="..\Modulos\Facturas de proveedor\Model\schFacturasProveedorServer_Intf.pas"/> <DCCReference Include="..\Modulos\Facturas de proveedor\Model\schFacturasProveedorClient_Intf.pas" />
<DCCReference Include="..\Modulos\Facturas de proveedor\Model\uBizFacturasProveedorServer.pas"/> <DCCReference Include="..\Modulos\Facturas de proveedor\Model\schFacturasProveedorServer_Intf.pas" />
<DCCReference Include="..\Modulos\Facturas de proveedor\Reports\uRptFacturasProveedor_Server.pas"> <DCCReference Include="..\Modulos\Facturas de proveedor\Model\uBizFacturasProveedorServer.pas" />
<Form>RptFacturasProveedor</Form> <DCCReference Include="..\Modulos\Facturas de proveedor\Reports\uRptFacturasProveedor_Server.pas">
<DesignClass>TDataModule</DesignClass> <Form>RptFacturasProveedor</Form>
</DCCReference> <DesignClass>TDataModule</DesignClass>
<DCCReference Include="..\Modulos\Facturas de proveedor\Servidor\srvFacturasProveedor_Impl.pas"> </DCCReference>
<Form>srvFacturasProveedor</Form> <DCCReference Include="..\Modulos\Facturas de proveedor\Servidor\srvFacturasProveedor_Impl.pas">
<DesignClass>TDataAbstractService</DesignClass> <Form>srvFacturasProveedor</Form>
</DCCReference> <DesignClass>TDataAbstractService</DesignClass>
<DCCReference Include="..\Modulos\Familias\Model\schFamiliasClient_Intf.pas"/> </DCCReference>
<DCCReference Include="..\Modulos\Familias\Model\schFamiliasServer_Intf.pas"/> <DCCReference Include="..\Modulos\Familias\Model\schFamiliasClient_Intf.pas" />
<DCCReference Include="..\Modulos\Familias\Servidor\srvFamilias_Impl.pas"> <DCCReference Include="..\Modulos\Familias\Model\schFamiliasServer_Intf.pas" />
<Form>srvFamilias</Form> <DCCReference Include="..\Modulos\Familias\Servidor\srvFamilias_Impl.pas">
<DesignClass>TDataAbstractService</DesignClass> <Form>srvFamilias</Form>
</DCCReference> <DesignClass>TDataAbstractService</DesignClass>
<DCCReference Include="..\Modulos\Formas de pago\Model\schFormasPagoClient_Intf.pas"/> </DCCReference>
<DCCReference Include="..\Modulos\Formas de pago\Model\schFormasPagoServer_Intf.pas"/> <DCCReference Include="..\Modulos\Formas de pago\Model\schFormasPagoClient_Intf.pas" />
<DCCReference Include="..\Modulos\Formas de pago\Servidor\srvFormasPago_Impl.pas"> <DCCReference Include="..\Modulos\Formas de pago\Model\schFormasPagoServer_Intf.pas" />
<Form>srvFormasPago</Form> <DCCReference Include="..\Modulos\Formas de pago\Servidor\srvFormasPago_Impl.pas">
<DesignClass>TDataAbstractService</DesignClass> <Form>srvFormasPago</Form>
</DCCReference> <DesignClass>TDataAbstractService</DesignClass>
<DCCReference Include="..\Modulos\Gestion de documentos\Servidor\srvGestorDocumentos_Impl.pas"> </DCCReference>
<Form>srvGestorDocumentos</Form> <DCCReference Include="..\Modulos\Gestion de documentos\Servidor\srvGestorDocumentos_Impl.pas">
<DesignClass>TDataAbstractService</DesignClass> <Form>srvGestorDocumentos</Form>
</DCCReference> <DesignClass>TDataAbstractService</DesignClass>
<DCCReference Include="..\Modulos\Gestor de informes\Servidor\srvGestorInformes_Impl.pas"> </DCCReference>
<Form>srvGestorInformes</Form> <DCCReference Include="..\Modulos\Gestor de informes\Servidor\srvGestorInformes_Impl.pas">
<DesignClass>TDataAbstractService</DesignClass> <Form>srvGestorInformes</Form>
</DCCReference> <DesignClass>TDataAbstractService</DesignClass>
<DCCReference Include="..\Modulos\Historico de movimientos\Model\schHistoricoMovimientosClient_Intf.pas"/> </DCCReference>
<DCCReference Include="..\Modulos\Historico de movimientos\Model\schHistoricoMovimientosServer_Intf.pas"/> <DCCReference Include="..\Modulos\Historico de movimientos\Model\schHistoricoMovimientosClient_Intf.pas" />
<DCCReference Include="..\Modulos\Historico de movimientos\Servidor\srvHistoricoMovimientos_Impl.pas"> <DCCReference Include="..\Modulos\Historico de movimientos\Model\schHistoricoMovimientosServer_Intf.pas" />
<Form>srvHistoricoMovimientos</Form> <DCCReference Include="..\Modulos\Historico de movimientos\Servidor\srvHistoricoMovimientos_Impl.pas">
<DesignClass>TDataAbstractService</DesignClass> <Form>srvHistoricoMovimientos</Form>
</DCCReference> <DesignClass>TDataAbstractService</DesignClass>
<DCCReference Include="..\Modulos\Impresiones\Model\schImpresionesClient_Intf.pas"/> </DCCReference>
<DCCReference Include="..\Modulos\Impresiones\Model\schImpresionesServer_Intf.pas"/> <DCCReference Include="..\Modulos\Impresiones\Model\schImpresionesClient_Intf.pas" />
<DCCReference Include="..\Modulos\Impresiones\Servidor\srvImpresiones_Impl.pas"> <DCCReference Include="..\Modulos\Impresiones\Model\schImpresionesServer_Intf.pas" />
<Form>srvImpresiones</Form> <DCCReference Include="..\Modulos\Impresiones\Servidor\srvImpresiones_Impl.pas">
<DesignClass>TDARemoteService</DesignClass> <Form>srvImpresiones</Form>
</DCCReference> <DesignClass>TDARemoteService</DesignClass>
<DCCReference Include="..\Modulos\Informe margen por articulo\Servidor\srvInfMargenArticulo_Impl.pas"> </DCCReference>
<Form>srvInfMargenArticulo</Form> <DCCReference Include="..\Modulos\Informe margen por articulo\Servidor\srvInfMargenArticulo_Impl.pas">
<DesignClass>TDARemoteService</DesignClass> <Form>srvInfMargenArticulo</Form>
</DCCReference> <DesignClass>TDARemoteService</DesignClass>
<DCCReference Include="..\Modulos\Informe ventas por articulo\Model\schInfVentasArticuloClient_Intf.pas"/> </DCCReference>
<DCCReference Include="..\Modulos\Informe ventas por articulo\Model\schInfVentasArticuloServer_Intf.pas"/> <DCCReference Include="..\Modulos\Informe ventas por articulo\Model\schInfVentasArticuloClient_Intf.pas" />
<DCCReference Include="..\Modulos\Informe ventas por articulo\Servidor\srvInfVentasArticulo_Impl.pas"> <DCCReference Include="..\Modulos\Informe ventas por articulo\Model\schInfVentasArticuloServer_Intf.pas" />
<Form>srvInfVentasArticulo</Form> <DCCReference Include="..\Modulos\Informe ventas por articulo\Servidor\srvInfVentasArticulo_Impl.pas">
<DesignClass>TDataAbstractService</DesignClass> <Form>srvInfVentasArticulo</Form>
</DCCReference> <DesignClass>TDataAbstractService</DesignClass>
<DCCReference Include="..\Modulos\Informes base\Model\schInformesClient_Intf.pas"/> </DCCReference>
<DCCReference Include="..\Modulos\Informes base\Model\schInformesServer_Intf.pas"/> <DCCReference Include="..\Modulos\Informes base\Model\schInformesClient_Intf.pas" />
<DCCReference Include="..\Modulos\Informes base\Servidor\srvInformes_Impl.pas"> <DCCReference Include="..\Modulos\Informes base\Model\schInformesServer_Intf.pas" />
<Form>srvInformes</Form> <DCCReference Include="..\Modulos\Informes base\Servidor\srvInformes_Impl.pas">
<DesignClass>TDataAbstractService</DesignClass> <Form>srvInformes</Form>
</DCCReference> <DesignClass>TDataAbstractService</DesignClass>
<DCCReference Include="..\Modulos\Inventario\Model\schInventarioClient_Intf.pas"/> </DCCReference>
<DCCReference Include="..\Modulos\Inventario\Model\schInventarioServer_Intf.pas"/> <DCCReference Include="..\Modulos\Inventario\Model\schInventarioClient_Intf.pas" />
<DCCReference Include="..\Modulos\Inventario\Servidor\srvInventario_Impl.pas"> <DCCReference Include="..\Modulos\Inventario\Model\schInventarioServer_Intf.pas" />
<Form>srvInventario</Form> <DCCReference Include="..\Modulos\Inventario\Servidor\srvInventario_Impl.pas">
<DesignClass>TDataAbstractService</DesignClass> <Form>srvInventario</Form>
</DCCReference> <DesignClass>TDataAbstractService</DesignClass>
<DCCReference Include="..\Modulos\Obras\Model\schObrasClient_Intf.pas"/> </DCCReference>
<DCCReference Include="..\Modulos\Obras\Model\schObrasServer_Intf.pas"/> <DCCReference Include="..\Modulos\Obras\Model\schObrasClient_Intf.pas" />
<DCCReference Include="..\Modulos\Obras\Model\uBizObrasServer.pas"/> <DCCReference Include="..\Modulos\Obras\Model\schObrasServer_Intf.pas" />
<DCCReference Include="..\Modulos\Obras\Servidor\srvObras_Impl.pas"> <DCCReference Include="..\Modulos\Obras\Model\uBizObrasServer.pas" />
<Form>srvObras</Form> <DCCReference Include="..\Modulos\Obras\Servidor\srvObras_Impl.pas">
<DesignClass>TDataAbstractService</DesignClass> <Form>srvObras</Form>
</DCCReference> <DesignClass>TDataAbstractService</DesignClass>
<DCCReference Include="..\Modulos\Pedidos a proveedor\Model\schPedidosProveedorClient_Intf.pas"/> </DCCReference>
<DCCReference Include="..\Modulos\Pedidos a proveedor\Model\schPedidosProveedorServer_Intf.pas"/> <DCCReference Include="..\Modulos\Pedidos a proveedor\Model\schPedidosProveedorClient_Intf.pas" />
<DCCReference Include="..\Modulos\Pedidos a proveedor\Model\uBizPedidosProveedorServer.pas"/> <DCCReference Include="..\Modulos\Pedidos a proveedor\Model\schPedidosProveedorServer_Intf.pas" />
<DCCReference Include="..\Modulos\Pedidos a proveedor\Reports\uRptPedidosProveedor_Server.pas"> <DCCReference Include="..\Modulos\Pedidos a proveedor\Model\uBizPedidosProveedorServer.pas" />
<Form>RptPedidosProveedor</Form> <DCCReference Include="..\Modulos\Pedidos a proveedor\Reports\uRptPedidosProveedor_Server.pas">
<DesignClass>TDataModule</DesignClass> <Form>RptPedidosProveedor</Form>
</DCCReference> <DesignClass>TDataModule</DesignClass>
<DCCReference Include="..\Modulos\Pedidos a proveedor\Reports\uRptWordPedidoProveedor.pas"> </DCCReference>
<Form>RptWordPedidoProveedor</Form> <DCCReference Include="..\Modulos\Pedidos a proveedor\Reports\uRptWordPedidoProveedor.pas">
<DesignClass>TDataModule</DesignClass> <Form>RptWordPedidoProveedor</Form>
</DCCReference> <DesignClass>TDataModule</DesignClass>
<DCCReference Include="..\Modulos\Pedidos a proveedor\Servidor\srvPedidosProveedor_Impl.pas"> </DCCReference>
<Form>srvPedidosProveedor</Form> <DCCReference Include="..\Modulos\Pedidos a proveedor\Servidor\srvPedidosProveedor_Impl.pas">
<DesignClass>TDataAbstractService</DesignClass> <Form>srvPedidosProveedor</Form>
</DCCReference> <DesignClass>TDataAbstractService</DesignClass>
<DCCReference Include="..\Modulos\Pedidos de cliente\Model\schPedidosClienteClient_Intf.pas"/> </DCCReference>
<DCCReference Include="..\Modulos\Pedidos de cliente\Model\schPedidosClienteServer_Intf.pas"/> <DCCReference Include="..\Modulos\Pedidos de cliente\Model\schPedidosClienteClient_Intf.pas" />
<DCCReference Include="..\Modulos\Pedidos de cliente\Model\uBizPedidosClienteServer.pas"/> <DCCReference Include="..\Modulos\Pedidos de cliente\Model\schPedidosClienteServer_Intf.pas" />
<DCCReference Include="..\Modulos\Pedidos de cliente\Reports\uRptPedidosCliente_Server.pas"> <DCCReference Include="..\Modulos\Pedidos de cliente\Model\uBizPedidosClienteServer.pas" />
<Form>RptPedidosCliente</Form> <DCCReference Include="..\Modulos\Pedidos de cliente\Reports\uRptPedidosCliente_Server.pas">
<DesignClass>TDataModule</DesignClass> <Form>RptPedidosCliente</Form>
</DCCReference> <DesignClass>TDataModule</DesignClass>
<DCCReference Include="..\Modulos\Pedidos de cliente\Servidor\srvPedidosCliente_Impl.pas"> </DCCReference>
<Form>srvPedidosCliente</Form> <DCCReference Include="..\Modulos\Pedidos de cliente\Servidor\srvPedidosCliente_Impl.pas">
<DesignClass>TDataAbstractService</DesignClass> <Form>srvPedidosCliente</Form>
</DCCReference> <DesignClass>TDataAbstractService</DesignClass>
<DCCReference Include="..\Modulos\Presupuestos de cliente\Model\schPresupuestosClienteClient_Intf.pas"/> </DCCReference>
<DCCReference Include="..\Modulos\Presupuestos de cliente\Model\schPresupuestosClienteServer_Intf.pas"/> <DCCReference Include="..\Modulos\Presupuestos de cliente\Model\schPresupuestosClienteClient_Intf.pas" />
<DCCReference Include="..\Modulos\Presupuestos de cliente\Model\uBizPresupuestosClienteServer.pas"/> <DCCReference Include="..\Modulos\Presupuestos de cliente\Model\schPresupuestosClienteServer_Intf.pas" />
<DCCReference Include="..\Modulos\Presupuestos de cliente\Reports\uRptPresupuestosCliente_Server.pas"> <DCCReference Include="..\Modulos\Presupuestos de cliente\Model\uBizPresupuestosClienteServer.pas" />
<Form>RptPresupuestosCliente</Form> <DCCReference Include="..\Modulos\Presupuestos de cliente\Reports\uRptPresupuestosCliente_Server.pas">
<DesignClass>TDataModule</DesignClass> <Form>RptPresupuestosCliente</Form>
</DCCReference> <DesignClass>TDataModule</DesignClass>
<DCCReference Include="..\Modulos\Presupuestos de cliente\Reports\uRptWordCertificadoTrabajo_Server.pas"> </DCCReference>
<Form>RptWordCertificadoTrabajo</Form> <DCCReference Include="..\Modulos\Presupuestos de cliente\Reports\uRptWordCertificadoTrabajo_Server.pas">
<DesignClass>TDataModule</DesignClass> <Form>RptWordCertificadoTrabajo</Form>
</DCCReference> <DesignClass>TDataModule</DesignClass>
<DCCReference Include="..\Modulos\Presupuestos de cliente\Reports\uRptWordPresupuestoCliente.pas"> </DCCReference>
<Form>RptWordPresupuestoCliente</Form> <DCCReference Include="..\Modulos\Presupuestos de cliente\Reports\uRptWordPresupuestoCliente.pas">
<DesignClass>TDataModule</DesignClass> <Form>RptWordPresupuestoCliente</Form>
</DCCReference> <DesignClass>TDataModule</DesignClass>
<DCCReference Include="..\Modulos\Presupuestos de cliente\Servidor\srvPresupuestosCliente_Impl.pas"> </DCCReference>
<Form>srvPresupuestosCliente</Form> <DCCReference Include="..\Modulos\Presupuestos de cliente\Servidor\srvPresupuestosCliente_Impl.pas">
<DesignClass>TDataAbstractService</DesignClass> <Form>srvPresupuestosCliente</Form>
</DCCReference> <DesignClass>TDataAbstractService</DesignClass>
<DCCReference Include="..\Modulos\Recibos de cliente\Model\schRecibosClienteClient_Intf.pas"/> </DCCReference>
<DCCReference Include="..\Modulos\Recibos de cliente\Model\schRecibosClienteServer_Intf.pas"/> <DCCReference Include="..\Modulos\Recibos de cliente\Model\schRecibosClienteClient_Intf.pas" />
<DCCReference Include="..\Modulos\Recibos de cliente\Reports\uRptRecibosCliente_Server.pas"> <DCCReference Include="..\Modulos\Recibos de cliente\Model\schRecibosClienteServer_Intf.pas" />
<Form>RptRecibosCliente</Form> <DCCReference Include="..\Modulos\Recibos de cliente\Reports\uRptRecibosCliente_Server.pas">
<DesignClass>TDataModule</DesignClass> <Form>RptRecibosCliente</Form>
</DCCReference> <DesignClass>TDataModule</DesignClass>
<DCCReference Include="..\Modulos\Recibos de cliente\Servidor\srvRecibosCliente_Impl.pas"> </DCCReference>
<Form>srvRecibosCliente</Form> <DCCReference Include="..\Modulos\Recibos de cliente\Servidor\srvRecibosCliente_Impl.pas">
<DesignClass>TDataAbstractService</DesignClass> <Form>srvRecibosCliente</Form>
</DCCReference> <DesignClass>TDataAbstractService</DesignClass>
<DCCReference Include="..\Modulos\Recibos de proveedor\Model\schRecibosProveedorClient_Intf.pas"/> </DCCReference>
<DCCReference Include="..\Modulos\Recibos de proveedor\Model\schRecibosProveedorServer_Intf.pas"/> <DCCReference Include="..\Modulos\Recibos de proveedor\Model\schRecibosProveedorClient_Intf.pas" />
<DCCReference Include="..\Modulos\Recibos de proveedor\Reports\uRptRecibosProveedor_Server.pas"> <DCCReference Include="..\Modulos\Recibos de proveedor\Model\schRecibosProveedorServer_Intf.pas" />
<Form>RptRecibosProveedor</Form> <DCCReference Include="..\Modulos\Recibos de proveedor\Reports\uRptRecibosProveedor_Server.pas">
<DesignClass>TDataModule</DesignClass> <Form>RptRecibosProveedor</Form>
</DCCReference> <DesignClass>TDataModule</DesignClass>
<DCCReference Include="..\Modulos\Recibos de proveedor\Servidor\srvRecibosProveedor_Impl.pas"> </DCCReference>
<Form>srvRecibosProveedor</Form> <DCCReference Include="..\Modulos\Recibos de proveedor\Servidor\srvRecibosProveedor_Impl.pas">
<DesignClass>TDataAbstractService</DesignClass> <Form>srvRecibosProveedor</Form>
</DCCReference> <DesignClass>TDataAbstractService</DesignClass>
<DCCReference Include="..\Modulos\Referencias\Model\schReferenciasClient_Intf.pas"/> </DCCReference>
<DCCReference Include="..\Modulos\Referencias\Model\schReferenciasServer_Intf.pas"/> <DCCReference Include="..\Modulos\Referencias\Model\schReferenciasClient_Intf.pas" />
<DCCReference Include="..\Modulos\Referencias\Servidor\srvReferencias_Impl.pas"> <DCCReference Include="..\Modulos\Referencias\Model\schReferenciasServer_Intf.pas" />
<Form>srvReferencias</Form> <DCCReference Include="..\Modulos\Referencias\Servidor\srvReferencias_Impl.pas">
<DesignClass>TDataAbstractService</DesignClass> <Form>srvReferencias</Form>
</DCCReference> <DesignClass>TDataAbstractService</DesignClass>
<DCCReference Include="..\Modulos\Registro de correos\Servidor\srvRegistroCorreos_Impl.pas"> </DCCReference>
<Form>srvRegistroCorreos</Form> <DCCReference Include="..\Modulos\Registro de correos\Servidor\srvRegistroCorreos_Impl.pas">
<DesignClass>TDataAbstractService</DesignClass> <Form>srvRegistroCorreos</Form>
</DCCReference> <DesignClass>TDataAbstractService</DesignClass>
<DCCReference Include="..\Modulos\Remesas de cliente\Model\schRemesasClienteClient_Intf.pas"/> </DCCReference>
<DCCReference Include="..\Modulos\Remesas de cliente\Model\schRemesasClienteServer_Intf.pas"/> <DCCReference Include="..\Modulos\Remesas de cliente\Model\schRemesasClienteClient_Intf.pas" />
<DCCReference Include="..\Modulos\Remesas de cliente\Model\uBizRemesasClienteServer.pas"/> <DCCReference Include="..\Modulos\Remesas de cliente\Model\schRemesasClienteServer_Intf.pas" />
<DCCReference Include="..\Modulos\Remesas de cliente\Reports\uRptRemesasCliente_Server.pas"> <DCCReference Include="..\Modulos\Remesas de cliente\Model\uBizRemesasClienteServer.pas" />
<Form>RptRemesasCliente</Form> <DCCReference Include="..\Modulos\Remesas de cliente\Reports\uRptRemesasCliente_Server.pas">
<DesignClass>TDataModule</DesignClass> <Form>RptRemesasCliente</Form>
</DCCReference> <DesignClass>TDataModule</DesignClass>
<DCCReference Include="..\Modulos\Remesas de cliente\Servidor\srvRemesasCliente_Impl.pas"> </DCCReference>
<Form>srvRemesasCliente</Form> <DCCReference Include="..\Modulos\Remesas de cliente\Servidor\srvRemesasCliente_Impl.pas">
<DesignClass>TDataAbstractService</DesignClass> <Form>srvRemesasCliente</Form>
</DCCReference> <DesignClass>TDataAbstractService</DesignClass>
<DCCReference Include="..\Modulos\Remesas de proveedor\Model\schRemesasProveedorClient_Intf.pas"/> </DCCReference>
<DCCReference Include="..\Modulos\Remesas de proveedor\Model\schRemesasProveedorServer_Intf.pas"/> <DCCReference Include="..\Modulos\Remesas de proveedor\Model\schRemesasProveedorClient_Intf.pas" />
<DCCReference Include="..\Modulos\Remesas de proveedor\Model\uBizRemesasProveedorServer.pas"/> <DCCReference Include="..\Modulos\Remesas de proveedor\Model\schRemesasProveedorServer_Intf.pas" />
<DCCReference Include="..\Modulos\Remesas de proveedor\Reports\uRptRemesasProveedor_Server.pas"> <DCCReference Include="..\Modulos\Remesas de proveedor\Model\uBizRemesasProveedorServer.pas" />
<Form>RptRemesasProveedor</Form> <DCCReference Include="..\Modulos\Remesas de proveedor\Reports\uRptRemesasProveedor_Server.pas">
<DesignClass>TDataModule</DesignClass> <Form>RptRemesasProveedor</Form>
</DCCReference> <DesignClass>TDataModule</DesignClass>
<DCCReference Include="..\Modulos\Remesas de proveedor\Servidor\srvRemesasProveedor_Impl.pas"> </DCCReference>
<Form>srvRemesasProveedor</Form> <DCCReference Include="..\Modulos\Remesas de proveedor\Servidor\srvRemesasProveedor_Impl.pas">
<DesignClass>TDataAbstractService</DesignClass> <Form>srvRemesasProveedor</Form>
</DCCReference> <DesignClass>TDataAbstractService</DesignClass>
<DCCReference Include="..\Modulos\Tienda web\Model\schTiendaWebClient_Intf.pas"/> </DCCReference>
<DCCReference Include="..\Modulos\Tienda web\Model\schTiendaWebServer_Intf.pas"/> <DCCReference Include="..\Modulos\Tienda web\Model\schTiendaWebClient_Intf.pas" />
<DCCReference Include="..\Modulos\Tienda web\Model\uBizOscAddressBookServer.pas"/> <DCCReference Include="..\Modulos\Tienda web\Model\schTiendaWebServer_Intf.pas" />
<DCCReference Include="..\Modulos\Tienda web\Model\uBizOscCustomerServer.pas"/> <DCCReference Include="..\Modulos\Tienda web\Model\uBizOscAddressBookServer.pas" />
<DCCReference Include="..\Modulos\Tienda web\Model\uBizOscManufacturerServer.pas"/> <DCCReference Include="..\Modulos\Tienda web\Model\uBizOscCustomerServer.pas" />
<DCCReference Include="..\Modulos\Tienda web\Model\uBizOscOrderServer.pas"/> <DCCReference Include="..\Modulos\Tienda web\Model\uBizOscManufacturerServer.pas" />
<DCCReference Include="..\Modulos\Tienda web\Model\uBizOscProductServer.pas"/> <DCCReference Include="..\Modulos\Tienda web\Model\uBizOscOrderServer.pas" />
<DCCReference Include="..\Modulos\Tienda web\Model\uBizTiendaWebServer.pas"/> <DCCReference Include="..\Modulos\Tienda web\Model\uBizOscProductServer.pas" />
<DCCReference Include="..\Modulos\Tienda web\Servidor\srvTiendaWeb_Impl.pas"> <DCCReference Include="..\Modulos\Tienda web\Model\uBizTiendaWebServer.pas" />
<Form>srvTiendaWeb</Form> <DCCReference Include="..\Modulos\Tienda web\Servidor\srvTiendaWeb_Impl.pas">
<DesignClass>TDataAbstractService</DesignClass> <Form>srvTiendaWeb</Form>
</DCCReference> <DesignClass>TDataAbstractService</DesignClass>
<DCCReference Include="..\Modulos\Tipos de IVA\Model\schTiposIVAClient_Intf.pas"/> </DCCReference>
<DCCReference Include="..\Modulos\Tipos de IVA\Model\schTiposIVAServer_Intf.pas"/> <DCCReference Include="..\Modulos\Tipos de IVA\Model\schTiposIVAClient_Intf.pas" />
<DCCReference Include="..\Modulos\Tipos de IVA\Servidor\srvTiposIVA_Impl.pas"> <DCCReference Include="..\Modulos\Tipos de IVA\Model\schTiposIVAServer_Intf.pas" />
<Form>srvTiposIVA</Form> <DCCReference Include="..\Modulos\Tipos de IVA\Servidor\srvTiposIVA_Impl.pas">
<DesignClass>TDataAbstractService</DesignClass> <Form>srvTiposIVA</Form>
</DCCReference> <DesignClass>TDataAbstractService</DesignClass>
<DCCReference Include="..\Modulos\Unidades de medida\Model\schUnidadesMedidaClient_Intf.pas"/> </DCCReference>
<DCCReference Include="..\Modulos\Unidades de medida\Model\schUnidadesMedidaServer_Intf.pas"/> <DCCReference Include="..\Modulos\Unidades de medida\Model\schUnidadesMedidaClient_Intf.pas" />
<DCCReference Include="..\Modulos\Unidades de medida\Servidor\srvUnidadesMedida_Impl.pas"> <DCCReference Include="..\Modulos\Unidades de medida\Model\schUnidadesMedidaServer_Intf.pas" />
<Form>srvUnidadesMedida</Form> <DCCReference Include="..\Modulos\Unidades de medida\Servidor\srvUnidadesMedida_Impl.pas">
<DesignClass>TDataAbstractService</DesignClass> <Form>srvUnidadesMedida</Form>
</DCCReference> <DesignClass>TDataAbstractService</DesignClass>
<DCCReference Include="..\Servicios\FactuGES_Intf.pas"/> </DCCReference>
<DCCReference Include="..\Servicios\FactuGES_Invk.pas"/> <DCCReference Include="..\Servicios\FactuGES_Intf.pas" />
<DCCReference Include="Configuracion\srvConfiguracion_Impl.pas"> <DCCReference Include="..\Servicios\FactuGES_Invk.pas" />
<Form>srvConfiguracion</Form> <DCCReference Include="Configuracion\srvConfiguracion_Impl.pas">
<DesignClass>TDataAbstractService</DesignClass> <Form>srvConfiguracion</Form>
</DCCReference> <DesignClass>TDataAbstractService</DesignClass>
<DCCReference Include="Configuracion\uConexionBD.pas"> </DCCReference>
<Form>frConexionBD</Form> <DCCReference Include="Configuracion\uConexionBD.pas">
<DesignClass>TFrame</DesignClass> <Form>frConexionBD</Form>
</DCCReference> <DesignClass>TFrame</DesignClass>
<DCCReference Include="Configuracion\uConexionOSC.pas"> </DCCReference>
<Form>frConexionOSC</Form> <DCCReference Include="Configuracion\uConexionOSC.pas">
<DesignClass>TFrame</DesignClass> <Form>frConexionOSC</Form>
</DCCReference> <DesignClass>TFrame</DesignClass>
<DCCReference Include="Configuracion\uConfGeneral.pas"> </DCCReference>
<Form>frConfGeneral</Form> <DCCReference Include="Configuracion\uConfGeneral.pas">
<DesignClass>TFrame</DesignClass> <Form>frConfGeneral</Form>
</DCCReference> <DesignClass>TFrame</DesignClass>
<DCCReference Include="Configuracion\uConfiguracion.pas"> </DCCReference>
<Form>fConfiguracion</Form> <DCCReference Include="Configuracion\uConfiguracion.pas">
<DesignClass>TForm</DesignClass> <Form>fConfiguracion</Form>
</DCCReference> <DesignClass>TForm</DesignClass>
<DCCReference Include="Configuracion\uFrameConfiguracion.pas"> </DCCReference>
<Form>FrameConfiguracion</Form> <DCCReference Include="Configuracion\uFrameConfiguracion.pas">
<DesignClass>TFrame</DesignClass> <Form>FrameConfiguracion</Form>
</DCCReference> <DesignClass>TFrame</DesignClass>
<DCCReference Include="srvLogin_Impl.pas"> </DCCReference>
<Form>srvLogin</Form> <DCCReference Include="srvLogin_Impl.pas">
<DesignClass>TDARemoteService</DesignClass> <Form>srvLogin</Form>
</DCCReference> <DesignClass>TDARemoteService</DesignClass>
<DCCReference Include="uAcercaDe.pas"> </DCCReference>
<Form>fAcercaDe</Form> <DCCReference Include="uAcercaDe.pas">
</DCCReference> <Form>fAcercaDe</Form>
<DCCReference Include="uDataModuleServer.pas"> </DCCReference>
<Form>dmServer</Form> <DCCReference Include="uDataModuleServer.pas">
<DesignClass>TDataModule</DesignClass> <Form>dmServer</Form>
</DCCReference> <DesignClass>TDataModule</DesignClass>
<DCCReference Include="uServerMainForm.pas"> </DCCReference>
<Form>fServerForm</Form> <DCCReference Include="uServerMainForm.pas">
</DCCReference> <Form>fServerForm</Form>
<DCCReference Include="Utiles\AHWord97.pas"/> </DCCReference>
<DCCReference Include="Utiles\MidasSpeedFix.pas"/> <DCCReference Include="Utiles\AHWord97.pas" />
<DCCReference Include="Utiles\uBusinessUtils.pas"/> <DCCReference Include="Utiles\MidasSpeedFix.pas" />
<DCCReference Include="Utiles\uDatabaseUtils.pas"/> <DCCReference Include="Utiles\uBusinessUtils.pas" />
<DCCReference Include="Utiles\uReferenciasUtils.pas"/> <DCCReference Include="Utiles\uDatabaseUtils.pas" />
<DCCReference Include="Utiles\uRestriccionesUsuarioUtils.pas"/> <DCCReference Include="Utiles\uReferenciasUtils.pas" />
<DCCReference Include="Utiles\uSchemaUtilsServer.pas"/> <DCCReference Include="Utiles\uRestriccionesUsuarioUtils.pas" />
<DCCReference Include="Utiles\uServerAppUtils.pas"/> <DCCReference Include="Utiles\uSchemaUtilsServer.pas" />
<DCCReference Include="Utiles\uSesionesUtils.pas"/> <DCCReference Include="Utiles\uServerAppUtils.pas" />
<DCCReference Include="Utiles\uTiendaWebUtils.pas"/> <DCCReference Include="Utiles\uSesionesUtils.pas" />
</ItemGroup> <DCCReference Include="Utiles\uTiendaWebUtils.pas" />
</ItemGroup>
</Project> </Project>
<!-- EurekaLog First Line <!-- EurekaLog First Line
[Exception Log] [Exception Log]