diff --git a/Source/Modulos/Tipos de venta/Controller/TiposVenta_controller.res b/Source/Modulos/Tipos de venta/Controller/TiposVenta_controller.res index 1641339f..8b251f31 100644 Binary files a/Source/Modulos/Tipos de venta/Controller/TiposVenta_controller.res and b/Source/Modulos/Tipos de venta/Controller/TiposVenta_controller.res differ diff --git a/Source/Modulos/Tipos de venta/Data/TiposVenta_data.res b/Source/Modulos/Tipos de venta/Data/TiposVenta_data.res index 1641339f..8b251f31 100644 Binary files a/Source/Modulos/Tipos de venta/Data/TiposVenta_data.res and b/Source/Modulos/Tipos de venta/Data/TiposVenta_data.res differ diff --git a/Source/Modulos/Tipos de venta/Model/TiposVenta_model.res b/Source/Modulos/Tipos de venta/Model/TiposVenta_model.res index 1641339f..8b251f31 100644 Binary files a/Source/Modulos/Tipos de venta/Model/TiposVenta_model.res and b/Source/Modulos/Tipos de venta/Model/TiposVenta_model.res differ diff --git a/Source/Modulos/Tipos de venta/Model/schTiposVentaClient_Intf.pas b/Source/Modulos/Tipos de venta/Model/schTiposVentaClient_Intf.pas index 6d99d812..ced563da 100644 --- a/Source/Modulos/Tipos de venta/Model/schTiposVentaClient_Intf.pas +++ b/Source/Modulos/Tipos de venta/Model/schTiposVentaClient_Intf.pas @@ -3,7 +3,7 @@ unit schTiposVentaClient_Intf; interface uses - Classes, DB, SysUtils, uROClasses, uDADataTable, FmtBCD, uROXMLIntf; + Classes, DB, schBase_Intf, SysUtils, uROClasses, uDADataTable, FmtBCD, uROXMLIntf; const { Data table rules ids @@ -53,7 +53,7 @@ type end; { TTiposVentaDataTableRules } - TTiposVentaDataTableRules = class(TDADataTableRules, ITiposVenta) + TTiposVentaDataTableRules = class(TIntfObjectDADataTableRules, ITiposVenta) private protected { Property getters and setters } diff --git a/Source/Modulos/Tipos de venta/Plugin/TiposVenta_plugin.res b/Source/Modulos/Tipos de venta/Plugin/TiposVenta_plugin.res index 1641339f..8b251f31 100644 Binary files a/Source/Modulos/Tipos de venta/Plugin/TiposVenta_plugin.res and b/Source/Modulos/Tipos de venta/Plugin/TiposVenta_plugin.res differ diff --git a/Source/Modulos/Tipos de venta/Views/TiposVenta_view.res b/Source/Modulos/Tipos de venta/Views/TiposVenta_view.res index 1641339f..8b251f31 100644 Binary files a/Source/Modulos/Tipos de venta/Views/TiposVenta_view.res and b/Source/Modulos/Tipos de venta/Views/TiposVenta_view.res differ diff --git a/Source/Modulos/Tipos de venta/Views/uEditorTiposVenta.dfm b/Source/Modulos/Tipos de venta/Views/uEditorTiposVenta.dfm index 4ef2bf2f..7ec436e1 100644 --- a/Source/Modulos/Tipos de venta/Views/uEditorTiposVenta.dfm +++ b/Source/Modulos/Tipos de venta/Views/uEditorTiposVenta.dfm @@ -62,7 +62,7 @@ object fEditorTiposVenta: TfEditorTiposVenta FilterBox.Visible = fvNever DataController.DataSource = dsTiposVenta DataController.Filter.Options = [fcoCaseInsensitive] - DataController.KeyFieldNames = 'CODIGO' + DataController.KeyFieldNames = 'ID' DataController.Options = [dcoAnsiSort, dcoAssignGroupingValues, dcoAssignMasterDetailKeys, dcoSaveExpanding, dcoFocusTopRowAfterSorting, dcoImmediatePost] DataController.Summary.DefaultGroupSummaryItems = <> DataController.Summary.FooterSummaryItems = <> @@ -90,6 +90,11 @@ object fEditorTiposVenta: TfEditorTiposVenta OptionsView.GroupByBox = False OptionsView.HeaderEndEllipsis = True OptionsView.Indicator = True + object ListaTiposVentaViewID: TcxGridDBColumn + DataBinding.FieldName = 'ID' + Visible = False + VisibleForCustomization = False + end object ListaTiposVentaViewDESCRIPCION: TcxGridDBColumn Caption = 'Tipo de venta' DataBinding.FieldName = 'DESCRIPCION' @@ -99,11 +104,19 @@ object fEditorTiposVenta: TfEditorTiposVenta Options.Focusing = False SortIndex = 0 SortOrder = soAscending - Width = 191 + Width = 287 end object ListaTiposVentaViewCODIGO: TcxGridDBColumn Caption = 'C'#243'digo contable' DataBinding.FieldName = 'CODIGO_CONTABLE' + PropertiesClassName = 'TcxSpinEditProperties' + Properties.Alignment.Horz = taRightJustify + Properties.ImmediatePost = True + Properties.SpinButtons.Visible = False + GroupSummaryAlignment = taRightJustify + HeaderAlignmentHorz = taRightJustify + HeaderGlyphAlignmentHorz = taRightJustify + Width = 141 end end object ListaTiposVentaLevel: TcxGridLevel diff --git a/Source/Modulos/Tipos de venta/Views/uEditorTiposVenta.pas b/Source/Modulos/Tipos de venta/Views/uEditorTiposVenta.pas index a99ec328..7f350df6 100644 --- a/Source/Modulos/Tipos de venta/Views/uEditorTiposVenta.pas +++ b/Source/Modulos/Tipos de venta/Views/uEditorTiposVenta.pas @@ -31,7 +31,7 @@ uses ActnList, Grids, DBGrids, StdCtrls, ComCtrls, cxStyles, cxCustomData, cxGraphics, cxFilter, cxData, cxDataStorage, cxEdit, cxDBData, cxGridLevel, cxGridCustomTableView, cxGridTableView, cxGridDBTableView, cxClasses, - cxControls, cxGridCustomView, cxGrid, cxTextEdit, uDAInterfaces; + cxControls, cxGridCustomView, cxGrid, cxTextEdit, uDAInterfaces, cxSpinEdit; type TfEditorTiposVenta = class(TForm, IEditorTiposVenta) @@ -50,6 +50,7 @@ type ListaTiposVentaViewCODIGO: TcxGridDBColumn; ListaTiposVentaViewDESCRIPCION: TcxGridDBColumn; ListaTiposVentaLevel: TcxGridLevel; + ListaTiposVentaViewID: TcxGridDBColumn; procedure FormShow(Sender: TObject); procedure actAceptarExecute(Sender: TObject); diff --git a/Source/Servidor/FactuGES_Server.RES b/Source/Servidor/FactuGES_Server.RES index 8fffc111..5a1caa8d 100644 Binary files a/Source/Servidor/FactuGES_Server.RES and b/Source/Servidor/FactuGES_Server.RES differ diff --git a/Source/Servidor/FactuGES_Server.dproj b/Source/Servidor/FactuGES_Server.dproj index 02485fc5..862a1106 100644 --- a/Source/Servidor/FactuGES_Server.dproj +++ b/Source/Servidor/FactuGES_Server.dproj @@ -1,254 +1,254 @@ - + - - {ebdcd25d-40d7-4146-91ec-a0ea4aa1dcd1} - FactuGES_Server.dpr - Debug - AnyCPU - DCC32 - ..\..\Output\Debug\Servidor\FactuGES_Server.exe - - - 7.0 - False - False - 0 - 3 - ..\..\Output\Release\Servidor - RELEASE - - - 7.0 - 3 - ..\..\Output\Debug\Servidor - DEBUG; - True - - - Delphi.Personality - - -FalseTrueFalseTrueFalse1000FalseFalseFalseFalseFalse308212521.0.0.03.0.0.0lunes, 19 de noviembre de 2007 18:58 - RemObjects Pascal Script - RemObjects SDK 3.0 Integration - FactuGES_Server.dpr - - - - - MainSource - - - - - -
srvEjercicios
- TDataAbstractService -
- - - -
srvEmpresas
- TDARemoteService -
- - - - - - - - -
srvAlbaranesCliente
- TDataAbstractService -
- - - - -
srvAlbaranesProveedor
- TDataAbstractService -
- - - -
srvAlmacenes
- TDARemoteService -
- - - - - - -
srvContabilidad
- TDataAbstractService -
- - - - - - - -
RptEtiquetasContacto
- TDataModule -
- -
RptFichasEmpleado
- TDataModule -
- -
srvContactos
- TDARemoteService -
- - - - -
RptFacturasCliente
- TDataModule -
- -
srvFacturasCliente
- TDataAbstractService -
- - - - -
srvFacturasProveedor
- TDataAbstractService -
- - - - - - - - - -
srvHistoricoMovimientos
- TDataAbstractService -
- - - -
srvInventario
- TDataAbstractService -
- - - - -
srvPedidosProveedor
- TDataAbstractService -
- - - - -
RptPresupuestosCliente
-
- -
srvPresupuestosCliente
- TDataAbstractService -
- - - - - -
RptRecibosCliente
- TDataModule -
- -
srvRecibosCliente
- TDataAbstractService -
- - - - -
srvRecibosProveedor
- TDataAbstractService -
- -
srvReferencias
- TDataAbstractService -
- - - - -
srvRemesasCliente
- TDataAbstractService -
- - - - -
srvRemesasProveedor
- TDataAbstractService -
- - - - -
srvTiposVenta
- TDataAbstractService -
- - - -
srvUnidadesMedida
- TDataAbstractService -
- - - -
srvConfiguracion
- TDataAbstractService -
- -
frConexionBD
- TFrame -
- -
frConfGeneral
- TFrame -
- -
fConfiguracion
- TForm -
- -
FrameConfiguracion
- TFrame -
- -
srvLogin
- TDARemoteService -
- -
fAcercaDe
-
- -
dmServer
- TDataModule -
- -
fServerForm
-
- - - - - - - - -
+ + {ebdcd25d-40d7-4146-91ec-a0ea4aa1dcd1} + FactuGES_Server.dpr + Debug + AnyCPU + DCC32 + ..\..\Output\Debug\Servidor\FactuGES_Server.exe + + + 7.0 + False + False + 0 + 3 + ..\..\Output\Release\Servidor + RELEASE + + + 7.0 + 3 + ..\..\Output\Debug\Servidor + DEBUG; + True + + + Delphi.Personality + + + FalseTrueFalseTrueFalse1000FalseFalseFalseFalseFalse308212521.0.0.03.0.0.0lunes, 19 de noviembre de 2007 18:58 + RemObjects Pascal Script - RemObjects SDK 3.0 Integration + FactuGES_Server.dpr + + + + + MainSource + + + + + +
srvEjercicios
+ TDataAbstractService +
+ + + +
srvEmpresas
+ TDARemoteService +
+ + + + + + + + +
srvAlbaranesCliente
+ TDataAbstractService +
+ + + + +
srvAlbaranesProveedor
+ TDataAbstractService +
+ + + +
srvAlmacenes
+ TDARemoteService +
+ + + + + + +
srvContabilidad
+ TDataAbstractService +
+ + + + + + + +
RptEtiquetasContacto
+ TDataModule +
+ +
RptFichasEmpleado
+ TDataModule +
+ +
srvContactos
+ TDARemoteService +
+ + + + +
RptFacturasCliente
+ TDataModule +
+ +
srvFacturasCliente
+ TDataAbstractService +
+ + + + +
srvFacturasProveedor
+ TDataAbstractService +
+ + + + + + + + + +
srvHistoricoMovimientos
+ TDataAbstractService +
+ + + +
srvInventario
+ TDataAbstractService +
+ + + + +
srvPedidosProveedor
+ TDataAbstractService +
+ + + + +
RptPresupuestosCliente
+
+ +
srvPresupuestosCliente
+ TDataAbstractService +
+ + + + + +
RptRecibosCliente
+ TDataModule +
+ +
srvRecibosCliente
+ TDataAbstractService +
+ + + + +
srvRecibosProveedor
+ TDataAbstractService +
+ +
srvReferencias
+ TDataAbstractService +
+ + + + +
srvRemesasCliente
+ TDataAbstractService +
+ + + + +
srvRemesasProveedor
+ TDataAbstractService +
+ + + + +
srvTiposVenta
+ TDataAbstractService +
+ + + +
srvUnidadesMedida
+ TDataAbstractService +
+ + + +
srvConfiguracion
+ TDataAbstractService +
+ +
frConexionBD
+ TFrame +
+ +
frConfGeneral
+ TFrame +
+ +
fConfiguracion
+ TForm +
+ +
FrameConfiguracion
+ TFrame +
+ +
srvLogin
+ TDARemoteService +
+ +
fAcercaDe
+
+ +
dmServer
+ TDataModule +
+ +
fServerForm
+
+ + + + + + + + +