Se mete columna referencia del cliente en el listado de beneficios de contrato
git-svn-id: https://192.168.0.254/svn/Proyectos.AbetoDesign_FactuGES/trunk@119 93f398dd-4eb6-7a46-baf6-13f46f578da2
This commit is contained in:
parent
7fd0b6f385
commit
6d9cdf76e1
@ -4293,6 +4293,7 @@ CREATE VIEW V_CONTRATOS_BENEFICIOS(
|
||||
ID,
|
||||
REFERENCIA,
|
||||
FECHA_CONTRATO,
|
||||
REFERENCIA_CLIENTE,
|
||||
NOMBRE,
|
||||
NIF_CIF,
|
||||
IMPORTE_NETO,
|
||||
@ -4308,6 +4309,7 @@ AS
|
||||
select
|
||||
contratos_cliente.ID,
|
||||
contratos_cliente.referencia, contratos_cliente.fecha_contrato,
|
||||
CONTRATOS_CLIENTE.REFERENCIA_CLIENTE,
|
||||
contratos_cliente.nombre, contratos_cliente.nif_cif,
|
||||
contratos_cliente.importe_neto, contratos_cliente.importe_descuento,
|
||||
contratos_cliente.base_imponible,
|
||||
|
||||
@ -51,13 +51,6 @@
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
<Excluded_Packages Name="$(BDS)\Bin\dclintraweb_90_100.bpl">VCL for the Web Design Package for CodeGear RAD Studio</Excluded_Packages>
|
||||
<Excluded_Packages Name="$(BDS)\bin\dclwebsnap100.bpl">CodeGear WebSnap Components</Excluded_Packages>
|
||||
<Excluded_Packages Name="$(BDS)\bin\dclsoap100.bpl">CodeGear SOAP Components</Excluded_Packages>
|
||||
@ -72,55 +65,55 @@
|
||||
<DelphiCompile Include="Base.dpk">
|
||||
<MainSource>MainSource</MainSource>
|
||||
</DelphiCompile>
|
||||
<DCCReference Include="..\Modulos\Recibos de cliente\adortl.dcp" />
|
||||
<DCCReference Include="..\Modulos\Recibos de cliente\cxDataD11.dcp" />
|
||||
<DCCReference Include="..\Modulos\Recibos de cliente\cxEditorsD11.dcp" />
|
||||
<DCCReference Include="..\Modulos\Recibos de cliente\cxExtEditorsD11.dcp" />
|
||||
<DCCReference Include="..\Modulos\Recibos de cliente\cxGridD11.dcp" />
|
||||
<DCCReference Include="..\Modulos\Recibos de cliente\cxLibraryD11.dcp" />
|
||||
<DCCReference Include="..\Modulos\Recibos de cliente\cxPageControlD11.dcp" />
|
||||
<DCCReference Include="..\Modulos\Recibos de cliente\DataAbstract_Core_D11.dcp" />
|
||||
<DCCReference Include="..\Modulos\Recibos de cliente\dbrtl.dcp" />
|
||||
<DCCReference Include="..\Modulos\Recibos de cliente\dclIndyCore.dcp" />
|
||||
<DCCReference Include="..\Modulos\Recibos de cliente\designide.dcp" />
|
||||
<DCCReference Include="..\Modulos\Recibos de cliente\dsnap.dcp" />
|
||||
<DCCReference Include="..\Modulos\Recibos de cliente\dxGDIPlusD11.dcp" />
|
||||
<DCCReference Include="..\Modulos\Recibos de cliente\dxPSCoreD11.dcp" />
|
||||
<DCCReference Include="..\Modulos\Recibos de cliente\dxThemeD11.dcp" />
|
||||
<DCCReference Include="..\Modulos\Recibos de cliente\GUISDK_D11R.dcp" />
|
||||
<DCCReference Include="..\Modulos\Recibos de cliente\IndyCore.dcp" />
|
||||
<DCCReference Include="..\Modulos\Recibos de cliente\IndyProtocols.dcp" />
|
||||
<DCCReference Include="..\Modulos\Recibos de cliente\IndySystem.dcp" />
|
||||
<DCCReference Include="..\Modulos\Recibos de cliente\Jcl.dcp" />
|
||||
<DCCReference Include="..\Modulos\Recibos de cliente\JclVcl.dcp" />
|
||||
<DCCReference Include="..\Modulos\Recibos de cliente\JSDialog100.dcp" />
|
||||
<DCCReference Include="..\Modulos\Recibos de cliente\JvCmpD11R.dcp" />
|
||||
<DCCReference Include="..\Modulos\Recibos de cliente\JvCoreD11R.dcp" />
|
||||
<DCCReference Include="..\Modulos\Recibos de cliente\JvCtrlsD11R.dcp" />
|
||||
<DCCReference Include="..\Modulos\Recibos de cliente\JvDlgsD11R.dcp" />
|
||||
<DCCReference Include="..\Modulos\Recibos de cliente\JvMMD11R.dcp" />
|
||||
<DCCReference Include="..\Modulos\Recibos de cliente\JvNetD11R.dcp" />
|
||||
<DCCReference Include="..\Modulos\Recibos de cliente\JvPageCompsD11R.dcp" />
|
||||
<DCCReference Include="..\Modulos\Recibos de cliente\JvStdCtrlsD11R.dcp" />
|
||||
<DCCReference Include="..\Modulos\Recibos de cliente\JvSystemD11R.dcp" />
|
||||
<DCCReference Include="..\Modulos\Recibos de cliente\pckMD5.dcp" />
|
||||
<DCCReference Include="..\Modulos\Recibos de cliente\pckUCDataConnector.dcp" />
|
||||
<DCCReference Include="..\Modulos\Recibos de cliente\pckUserControl_RT.dcp" />
|
||||
<DCCReference Include="..\Modulos\Recibos de cliente\PluginSDK_D11R.dcp" />
|
||||
<DCCReference Include="..\Modulos\Recibos de cliente\PngComponentsD10.dcp" />
|
||||
<DCCReference Include="..\Modulos\Recibos de cliente\PNG_D10.dcp" />
|
||||
<DCCReference Include="..\Modulos\Recibos de cliente\RemObjects_Core_D11.dcp" />
|
||||
<DCCReference Include="..\Modulos\Recibos de cliente\rtl.dcp" />
|
||||
<DCCReference Include="..\Modulos\Recibos de cliente\TB2k_D10.dcp" />
|
||||
<DCCReference Include="..\Modulos\Recibos de cliente\tbx_d10.dcp" />
|
||||
<DCCReference Include="..\Modulos\Recibos de cliente\vcl.dcp" />
|
||||
<DCCReference Include="..\Modulos\Recibos de cliente\vclactnband.dcp" />
|
||||
<DCCReference Include="..\Modulos\Recibos de cliente\vcldb.dcp" />
|
||||
<DCCReference Include="..\Modulos\Recibos de cliente\vcljpg.dcp" />
|
||||
<DCCReference Include="..\Modulos\Recibos de cliente\VclSmp.dcp" />
|
||||
<DCCReference Include="..\Modulos\Recibos de cliente\vclx.dcp" />
|
||||
<DCCReference Include="..\Modulos\Recibos de cliente\xmlrtl.dcp" />
|
||||
<DCCReference Include="..\Servicios\FactuGES_Intf.pas" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\adortl.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\cxDataD11.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\cxEditorsD11.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\cxExtEditorsD11.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\cxGridD11.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\cxLibraryD11.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\cxPageControlD11.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\DataAbstract_Core_D11.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\dbrtl.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\dclIndyCore.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\designide.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\dsnap.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\dxGDIPlusD11.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\dxPSCoreD11.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\dxThemeD11.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\GUISDK_D11R.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\IndyCore.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\IndyProtocols.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\IndySystem.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\Jcl.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\JclVcl.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\JSDialog100.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\JvCmpD11R.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\JvCoreD11R.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\JvCtrlsD11R.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\JvDlgsD11R.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\JvMMD11R.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\JvNetD11R.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\JvPageCompsD11R.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\JvStdCtrlsD11R.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\JvSystemD11R.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\pckMD5.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\pckUCDataConnector.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\pckUserControl_RT.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\PluginSDK_D11R.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\PngComponentsD10.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\PNG_D10.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\RemObjects_Core_D11.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\rtl.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\TB2k_D10.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\tbx_d10.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\vcl.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\vclactnband.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\vcldb.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\vcljpg.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\VclSmp.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\vclx.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\xmlrtl.dcp" />
|
||||
<DCCReference Include="Conexion\uConfigurarConexion.pas">
|
||||
<Form>fConfigurarConexion</Form>
|
||||
<DesignClass>TForm</DesignClass>
|
||||
|
||||
Binary file not shown.
@ -49,18 +49,18 @@
|
||||
<DelphiCompile Include="ContratosCliente_data.dpk">
|
||||
<MainSource>MainSource</MainSource>
|
||||
</DelphiCompile>
|
||||
<DCCReference Include="..\adortl.dcp" />
|
||||
<DCCReference Include="..\ContratosCliente_model.dcp" />
|
||||
<DCCReference Include="..\cxLibraryD11.dcp" />
|
||||
<DCCReference Include="..\DataAbstract_Core_D11.dcp" />
|
||||
<DCCReference Include="..\dbrtl.dcp" />
|
||||
<DCCReference Include="..\dsnap.dcp" />
|
||||
<DCCReference Include="..\dxGDIPlusD11.dcp" />
|
||||
<DCCReference Include="..\dxThemeD11.dcp" />
|
||||
<DCCReference Include="..\RemObjects_Core_D11.dcp" />
|
||||
<DCCReference Include="..\rtl.dcp" />
|
||||
<DCCReference Include="..\vcl.dcp" />
|
||||
<DCCReference Include="..\vcldb.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\adortl.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\ContratosCliente_model.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\cxLibraryD11.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\DataAbstract_Core_D11.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\dbrtl.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\dsnap.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\dxGDIPlusD11.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\dxThemeD11.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\RemObjects_Core_D11.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\rtl.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\vcl.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\vcldb.dcp" />
|
||||
<DCCReference Include="uDataModuleContratosCliente.pas" />
|
||||
</ItemGroup>
|
||||
</Project>
|
||||
|
||||
@ -532,6 +532,11 @@ inherited DataModuleContratosCliente: TDataModuleContratosCliente
|
||||
Name = 'FECHA_CONTRATO'
|
||||
DataType = datDateTime
|
||||
end
|
||||
item
|
||||
Name = 'REFERENCIA_CLIENTE'
|
||||
DataType = datString
|
||||
Size = 255
|
||||
end
|
||||
item
|
||||
Name = 'NOMBRE'
|
||||
DataType = datString
|
||||
|
||||
@ -3,19 +3,19 @@ unit schContratosClienteClient_Intf;
|
||||
interface
|
||||
|
||||
uses
|
||||
Classes, DB, schBase_Intf, SysUtils, uROClasses, uDAInterfaces, uDADataTable, FmtBCD, uROXMLIntf;
|
||||
Classes, DB, SysUtils, uROClasses, uDAInterfaces, uDADataTable, FmtBCD, uROXMLIntf;
|
||||
|
||||
const
|
||||
{ Data table rules ids
|
||||
Feel free to change them to something more human readable
|
||||
but make sure they are unique in the context of your application }
|
||||
RID_Valores = '{F8BEAEBD-B764-475D-AAC0-BDE37787074F}';
|
||||
RID_Propiedades = '{C20A8F74-2A21-4468-BE12-33F78435D1C9}';
|
||||
RID_ListaAnosContratos = '{DC2AD3BB-AF55-46C9-9D92-22A69E3595BA}';
|
||||
RID_ContratosClienteBeneficios = '{39274DD9-6C7F-4D63-B46F-0D91784A5BDD}';
|
||||
RID_ContratosCliente = '{BBB0D52D-EF28-471F-9E8A-EF6650935779}';
|
||||
RID_TiposCapitulos = '{0004836D-B859-4F01-88B4-152E7DE8EE12}';
|
||||
RID_ContratosCliente_Detalles = '{7FAF4020-9A11-43F8-9EC3-50D2C51F5511}';
|
||||
RID_Valores = '{EFD1F7C2-8E8E-4AAE-B2C5-7B343C56CABC}';
|
||||
RID_Propiedades = '{4820AA98-F3FF-4077-9FEB-C2E4736BB23B}';
|
||||
RID_ListaAnosContratos = '{3D3572A5-2C27-483B-AA9B-3143CB5C9BA1}';
|
||||
RID_ContratosClienteBeneficios = '{329FBEE1-47CA-4E16-BA30-0FE155B5FDA5}';
|
||||
RID_ContratosCliente = '{3EBF8421-AFE3-42F9-9B07-525AEE7A2348}';
|
||||
RID_TiposCapitulos = '{342EFE89-C164-4DF7-8324-ADBB8C121644}';
|
||||
RID_ContratosCliente_Detalles = '{A2EF3306-B4B6-4109-96EF-20C9F6D82300}';
|
||||
|
||||
{ Data table names }
|
||||
nme_Valores = 'Valores';
|
||||
@ -56,6 +56,7 @@ const
|
||||
fld_ContratosClienteBeneficiosID = 'ID';
|
||||
fld_ContratosClienteBeneficiosREFERENCIA = 'REFERENCIA';
|
||||
fld_ContratosClienteBeneficiosFECHA_CONTRATO = 'FECHA_CONTRATO';
|
||||
fld_ContratosClienteBeneficiosREFERENCIA_CLIENTE = 'REFERENCIA_CLIENTE';
|
||||
fld_ContratosClienteBeneficiosNOMBRE = 'NOMBRE';
|
||||
fld_ContratosClienteBeneficiosNIF_CIF = 'NIF_CIF';
|
||||
fld_ContratosClienteBeneficiosIMPORTE_NETO = 'IMPORTE_NETO';
|
||||
@ -72,17 +73,18 @@ const
|
||||
idx_ContratosClienteBeneficiosID = 0;
|
||||
idx_ContratosClienteBeneficiosREFERENCIA = 1;
|
||||
idx_ContratosClienteBeneficiosFECHA_CONTRATO = 2;
|
||||
idx_ContratosClienteBeneficiosNOMBRE = 3;
|
||||
idx_ContratosClienteBeneficiosNIF_CIF = 4;
|
||||
idx_ContratosClienteBeneficiosIMPORTE_NETO = 5;
|
||||
idx_ContratosClienteBeneficiosIMPORTE_DESCUENTO = 6;
|
||||
idx_ContratosClienteBeneficiosBASE_IMPONIBLE = 7;
|
||||
idx_ContratosClienteBeneficiosIMPORTE_FACTURAS_PROVEEDOR = 8;
|
||||
idx_ContratosClienteBeneficiosIMPORTE_BENEFICIO = 9;
|
||||
idx_ContratosClienteBeneficiosPORCENTAJE_BENEFICIO = 10;
|
||||
idx_ContratosClienteBeneficiosIMPORTE_FACTURAS_CLIENTE = 11;
|
||||
idx_ContratosClienteBeneficiosIMPORTE_BENEFICIO_REAL = 12;
|
||||
idx_ContratosClienteBeneficiosPORCENTAJE_BENEFICIO_REAL = 13;
|
||||
idx_ContratosClienteBeneficiosREFERENCIA_CLIENTE = 3;
|
||||
idx_ContratosClienteBeneficiosNOMBRE = 4;
|
||||
idx_ContratosClienteBeneficiosNIF_CIF = 5;
|
||||
idx_ContratosClienteBeneficiosIMPORTE_NETO = 6;
|
||||
idx_ContratosClienteBeneficiosIMPORTE_DESCUENTO = 7;
|
||||
idx_ContratosClienteBeneficiosBASE_IMPONIBLE = 8;
|
||||
idx_ContratosClienteBeneficiosIMPORTE_FACTURAS_PROVEEDOR = 9;
|
||||
idx_ContratosClienteBeneficiosIMPORTE_BENEFICIO = 10;
|
||||
idx_ContratosClienteBeneficiosPORCENTAJE_BENEFICIO = 11;
|
||||
idx_ContratosClienteBeneficiosIMPORTE_FACTURAS_CLIENTE = 12;
|
||||
idx_ContratosClienteBeneficiosIMPORTE_BENEFICIO_REAL = 13;
|
||||
idx_ContratosClienteBeneficiosPORCENTAJE_BENEFICIO_REAL = 14;
|
||||
|
||||
{ ContratosCliente fields }
|
||||
fld_ContratosClienteID = 'ID';
|
||||
@ -239,7 +241,7 @@ const
|
||||
type
|
||||
{ IValores }
|
||||
IValores = interface(IDAStronglyTypedDataTable)
|
||||
['{93B5E16D-D83A-44D5-9A72-73F5C06B4DB6}']
|
||||
['{F9BF1948-763A-4CB4-9DF1-35E6C948DDB4}']
|
||||
{ Property getters and setters }
|
||||
function GetIDValue: Integer;
|
||||
procedure SetIDValue(const aValue: Integer);
|
||||
@ -265,7 +267,7 @@ type
|
||||
end;
|
||||
|
||||
{ TValoresDataTableRules }
|
||||
TValoresDataTableRules = class(TIntfObjectDADataTableRules, IValores)
|
||||
TValoresDataTableRules = class(TDADataTableRules, IValores)
|
||||
private
|
||||
protected
|
||||
{ Property getters and setters }
|
||||
@ -298,7 +300,7 @@ type
|
||||
|
||||
{ IPropiedades }
|
||||
IPropiedades = interface(IDAStronglyTypedDataTable)
|
||||
['{D3ECB8CA-7CD6-4072-81D7-4199649CD877}']
|
||||
['{AC649959-C638-4C8A-8B1D-764BB1751371}']
|
||||
{ Property getters and setters }
|
||||
function GetIDValue: Integer;
|
||||
procedure SetIDValue(const aValue: Integer);
|
||||
@ -324,7 +326,7 @@ type
|
||||
end;
|
||||
|
||||
{ TPropiedadesDataTableRules }
|
||||
TPropiedadesDataTableRules = class(TIntfObjectDADataTableRules, IPropiedades)
|
||||
TPropiedadesDataTableRules = class(TDADataTableRules, IPropiedades)
|
||||
private
|
||||
protected
|
||||
{ Property getters and setters }
|
||||
@ -357,7 +359,7 @@ type
|
||||
|
||||
{ IListaAnosContratos }
|
||||
IListaAnosContratos = interface(IDAStronglyTypedDataTable)
|
||||
['{D92E481B-B83E-4A7D-A894-82D9AC8611F2}']
|
||||
['{A739B752-2CAA-42C8-A07D-BD0A28068E5E}']
|
||||
{ Property getters and setters }
|
||||
function GetANOValue: String;
|
||||
procedure SetANOValue(const aValue: String);
|
||||
@ -371,7 +373,7 @@ type
|
||||
end;
|
||||
|
||||
{ TListaAnosContratosDataTableRules }
|
||||
TListaAnosContratosDataTableRules = class(TIntfObjectDADataTableRules, IListaAnosContratos)
|
||||
TListaAnosContratosDataTableRules = class(TDADataTableRules, IListaAnosContratos)
|
||||
private
|
||||
protected
|
||||
{ Property getters and setters }
|
||||
@ -392,7 +394,7 @@ type
|
||||
|
||||
{ IContratosClienteBeneficios }
|
||||
IContratosClienteBeneficios = interface(IDAStronglyTypedDataTable)
|
||||
['{79AF05E5-1F98-494B-AA3C-701988FC5D95}']
|
||||
['{E7667437-590B-4D1C-9762-7242E8107E1A}']
|
||||
{ Property getters and setters }
|
||||
function GetIDValue: Integer;
|
||||
procedure SetIDValue(const aValue: Integer);
|
||||
@ -406,6 +408,10 @@ type
|
||||
procedure SetFECHA_CONTRATOValue(const aValue: DateTime);
|
||||
function GetFECHA_CONTRATOIsNull: Boolean;
|
||||
procedure SetFECHA_CONTRATOIsNull(const aValue: Boolean);
|
||||
function GetREFERENCIA_CLIENTEValue: String;
|
||||
procedure SetREFERENCIA_CLIENTEValue(const aValue: String);
|
||||
function GetREFERENCIA_CLIENTEIsNull: Boolean;
|
||||
procedure SetREFERENCIA_CLIENTEIsNull(const aValue: Boolean);
|
||||
function GetNOMBREValue: String;
|
||||
procedure SetNOMBREValue(const aValue: String);
|
||||
function GetNOMBREIsNull: Boolean;
|
||||
@ -459,6 +465,8 @@ type
|
||||
property REFERENCIAIsNull: Boolean read GetREFERENCIAIsNull write SetREFERENCIAIsNull;
|
||||
property FECHA_CONTRATO: DateTime read GetFECHA_CONTRATOValue write SetFECHA_CONTRATOValue;
|
||||
property FECHA_CONTRATOIsNull: Boolean read GetFECHA_CONTRATOIsNull write SetFECHA_CONTRATOIsNull;
|
||||
property REFERENCIA_CLIENTE: String read GetREFERENCIA_CLIENTEValue write SetREFERENCIA_CLIENTEValue;
|
||||
property REFERENCIA_CLIENTEIsNull: Boolean read GetREFERENCIA_CLIENTEIsNull write SetREFERENCIA_CLIENTEIsNull;
|
||||
property NOMBRE: String read GetNOMBREValue write SetNOMBREValue;
|
||||
property NOMBREIsNull: Boolean read GetNOMBREIsNull write SetNOMBREIsNull;
|
||||
property NIF_CIF: String read GetNIF_CIFValue write SetNIF_CIFValue;
|
||||
@ -484,7 +492,7 @@ type
|
||||
end;
|
||||
|
||||
{ TContratosClienteBeneficiosDataTableRules }
|
||||
TContratosClienteBeneficiosDataTableRules = class(TIntfObjectDADataTableRules, IContratosClienteBeneficios)
|
||||
TContratosClienteBeneficiosDataTableRules = class(TDADataTableRules, IContratosClienteBeneficios)
|
||||
private
|
||||
protected
|
||||
{ Property getters and setters }
|
||||
@ -500,6 +508,10 @@ type
|
||||
procedure SetFECHA_CONTRATOValue(const aValue: DateTime); virtual;
|
||||
function GetFECHA_CONTRATOIsNull: Boolean; virtual;
|
||||
procedure SetFECHA_CONTRATOIsNull(const aValue: Boolean); virtual;
|
||||
function GetREFERENCIA_CLIENTEValue: String; virtual;
|
||||
procedure SetREFERENCIA_CLIENTEValue(const aValue: String); virtual;
|
||||
function GetREFERENCIA_CLIENTEIsNull: Boolean; virtual;
|
||||
procedure SetREFERENCIA_CLIENTEIsNull(const aValue: Boolean); virtual;
|
||||
function GetNOMBREValue: String; virtual;
|
||||
procedure SetNOMBREValue(const aValue: String); virtual;
|
||||
function GetNOMBREIsNull: Boolean; virtual;
|
||||
@ -552,6 +564,8 @@ type
|
||||
property REFERENCIAIsNull: Boolean read GetREFERENCIAIsNull write SetREFERENCIAIsNull;
|
||||
property FECHA_CONTRATO: DateTime read GetFECHA_CONTRATOValue write SetFECHA_CONTRATOValue;
|
||||
property FECHA_CONTRATOIsNull: Boolean read GetFECHA_CONTRATOIsNull write SetFECHA_CONTRATOIsNull;
|
||||
property REFERENCIA_CLIENTE: String read GetREFERENCIA_CLIENTEValue write SetREFERENCIA_CLIENTEValue;
|
||||
property REFERENCIA_CLIENTEIsNull: Boolean read GetREFERENCIA_CLIENTEIsNull write SetREFERENCIA_CLIENTEIsNull;
|
||||
property NOMBRE: String read GetNOMBREValue write SetNOMBREValue;
|
||||
property NOMBREIsNull: Boolean read GetNOMBREIsNull write SetNOMBREIsNull;
|
||||
property NIF_CIF: String read GetNIF_CIFValue write SetNIF_CIFValue;
|
||||
@ -583,7 +597,7 @@ type
|
||||
|
||||
{ IContratosCliente }
|
||||
IContratosCliente = interface(IDAStronglyTypedDataTable)
|
||||
['{FBF1D4A1-5EC3-4737-94F2-4D2E02961885}']
|
||||
['{A6237FAB-2A10-4BBF-B5A6-CF29A326D98F}']
|
||||
{ Property getters and setters }
|
||||
function GetIDValue: Integer;
|
||||
procedure SetIDValue(const aValue: Integer);
|
||||
@ -869,7 +883,7 @@ type
|
||||
end;
|
||||
|
||||
{ TContratosClienteDataTableRules }
|
||||
TContratosClienteDataTableRules = class(TIntfObjectDADataTableRules, IContratosCliente)
|
||||
TContratosClienteDataTableRules = class(TDADataTableRules, IContratosCliente)
|
||||
private
|
||||
f_FORMA_PAGO: IROStrings;
|
||||
f_PLAZO_ENTREGA: IROStrings;
|
||||
@ -1173,7 +1187,7 @@ type
|
||||
}
|
||||
{ ITiposCapitulos }
|
||||
ITiposCapitulos = interface(IDAStronglyTypedDataTable)
|
||||
['{4FAEAA24-0C3E-4102-9245-1268C047848E}']
|
||||
['{5AE90EC7-AD94-4636-A2B9-44465BB62E8D}']
|
||||
{ Property getters and setters }
|
||||
function GetIDValue: Integer;
|
||||
procedure SetIDValue(const aValue: Integer);
|
||||
@ -1217,7 +1231,7 @@ type
|
||||
end;
|
||||
|
||||
{ TTiposCapitulosDataTableRules }
|
||||
TTiposCapitulosDataTableRules = class(TIntfObjectDADataTableRules, ITiposCapitulos)
|
||||
TTiposCapitulosDataTableRules = class(TDADataTableRules, ITiposCapitulos)
|
||||
private
|
||||
protected
|
||||
{ Property getters and setters }
|
||||
@ -1268,7 +1282,7 @@ type
|
||||
|
||||
{ IContratosCliente_Detalles }
|
||||
IContratosCliente_Detalles = interface(IDAStronglyTypedDataTable)
|
||||
['{E1402F62-24C6-4568-B3B3-5D84C8E7072D}']
|
||||
['{D463BB1A-F962-4B97-AE5E-FDBB7D58439E}']
|
||||
{ Property getters and setters }
|
||||
function GetIDValue: Integer;
|
||||
procedure SetIDValue(const aValue: Integer);
|
||||
@ -1378,7 +1392,7 @@ type
|
||||
end;
|
||||
|
||||
{ TContratosCliente_DetallesDataTableRules }
|
||||
TContratosCliente_DetallesDataTableRules = class(TIntfObjectDADataTableRules, IContratosCliente_Detalles)
|
||||
TContratosCliente_DetallesDataTableRules = class(TDADataTableRules, IContratosCliente_Detalles)
|
||||
private
|
||||
protected
|
||||
{ Property getters and setters }
|
||||
@ -1754,6 +1768,27 @@ begin
|
||||
DataTable.Fields[idx_ContratosClienteBeneficiosFECHA_CONTRATO].AsVariant := Null;
|
||||
end;
|
||||
|
||||
function TContratosClienteBeneficiosDataTableRules.GetREFERENCIA_CLIENTEValue: String;
|
||||
begin
|
||||
result := DataTable.Fields[idx_ContratosClienteBeneficiosREFERENCIA_CLIENTE].AsString;
|
||||
end;
|
||||
|
||||
procedure TContratosClienteBeneficiosDataTableRules.SetREFERENCIA_CLIENTEValue(const aValue: String);
|
||||
begin
|
||||
DataTable.Fields[idx_ContratosClienteBeneficiosREFERENCIA_CLIENTE].AsString := aValue;
|
||||
end;
|
||||
|
||||
function TContratosClienteBeneficiosDataTableRules.GetREFERENCIA_CLIENTEIsNull: boolean;
|
||||
begin
|
||||
result := DataTable.Fields[idx_ContratosClienteBeneficiosREFERENCIA_CLIENTE].IsNull;
|
||||
end;
|
||||
|
||||
procedure TContratosClienteBeneficiosDataTableRules.SetREFERENCIA_CLIENTEIsNull(const aValue: Boolean);
|
||||
begin
|
||||
if aValue then
|
||||
DataTable.Fields[idx_ContratosClienteBeneficiosREFERENCIA_CLIENTE].AsVariant := Null;
|
||||
end;
|
||||
|
||||
function TContratosClienteBeneficiosDataTableRules.GetNOMBREValue: String;
|
||||
begin
|
||||
result := DataTable.Fields[idx_ContratosClienteBeneficiosNOMBRE].AsString;
|
||||
|
||||
@ -9,18 +9,18 @@ const
|
||||
{ Delta rules ids
|
||||
Feel free to change them to something more human readable
|
||||
but make sure they are unique in the context of your application }
|
||||
RID_ValoresDelta = '{AFA3E014-9771-46CA-AD58-BB178DE03490}';
|
||||
RID_PropiedadesDelta = '{F2BDFF90-4F7C-49F9-9A3D-8C5D3FE5F537}';
|
||||
RID_ListaAnosContratosDelta = '{5DBDFDE8-A17E-4EC5-87F7-C17E6D4ECF66}';
|
||||
RID_ContratosClienteBeneficiosDelta = '{4932E674-FD06-4DFB-B2C2-9F8CF8625791}';
|
||||
RID_ContratosClienteDelta = '{55AD4AA0-BD11-4F4E-ADA3-CD019CB2E92B}';
|
||||
RID_TiposCapitulosDelta = '{DA81420C-1A5E-47F3-8FAC-14ACDBAD9749}';
|
||||
RID_ContratosCliente_DetallesDelta = '{2F500632-2D38-4B7A-AB5F-4AB42F4D4D83}';
|
||||
RID_ValoresDelta = '{6D64F831-7B58-4A9E-9180-0CE187DC1F33}';
|
||||
RID_PropiedadesDelta = '{00F00B68-D182-4416-83C1-3850142A5B63}';
|
||||
RID_ListaAnosContratosDelta = '{7E698FA6-63C1-49A6-BAF4-5958D8B922E1}';
|
||||
RID_ContratosClienteBeneficiosDelta = '{ACA5ABBD-4284-4E2B-AE63-9F9DACC26E93}';
|
||||
RID_ContratosClienteDelta = '{E74263B4-9F80-48FF-8228-19422AFDBA51}';
|
||||
RID_TiposCapitulosDelta = '{82C3C976-5C8E-41F2-A0A9-B8028E119613}';
|
||||
RID_ContratosCliente_DetallesDelta = '{55A68F42-1449-47F7-BCD9-E5613C7AED8B}';
|
||||
|
||||
type
|
||||
{ IValoresDelta }
|
||||
IValoresDelta = interface(IValores)
|
||||
['{AFA3E014-9771-46CA-AD58-BB178DE03490}']
|
||||
['{6D64F831-7B58-4A9E-9180-0CE187DC1F33}']
|
||||
{ Property getters and setters }
|
||||
function GetOldIDValue : Integer;
|
||||
function GetOldID_PROPIEDADValue : Integer;
|
||||
@ -78,7 +78,7 @@ type
|
||||
|
||||
{ IPropiedadesDelta }
|
||||
IPropiedadesDelta = interface(IPropiedades)
|
||||
['{F2BDFF90-4F7C-49F9-9A3D-8C5D3FE5F537}']
|
||||
['{00F00B68-D182-4416-83C1-3850142A5B63}']
|
||||
{ Property getters and setters }
|
||||
function GetOldIDValue : Integer;
|
||||
function GetOldDESCRIPCIONValue : String;
|
||||
@ -136,7 +136,7 @@ type
|
||||
|
||||
{ IListaAnosContratosDelta }
|
||||
IListaAnosContratosDelta = interface(IListaAnosContratos)
|
||||
['{5DBDFDE8-A17E-4EC5-87F7-C17E6D4ECF66}']
|
||||
['{7E698FA6-63C1-49A6-BAF4-5958D8B922E1}']
|
||||
{ Property getters and setters }
|
||||
function GetOldANOValue : String;
|
||||
|
||||
@ -170,11 +170,12 @@ type
|
||||
|
||||
{ IContratosClienteBeneficiosDelta }
|
||||
IContratosClienteBeneficiosDelta = interface(IContratosClienteBeneficios)
|
||||
['{4932E674-FD06-4DFB-B2C2-9F8CF8625791}']
|
||||
['{ACA5ABBD-4284-4E2B-AE63-9F9DACC26E93}']
|
||||
{ Property getters and setters }
|
||||
function GetOldIDValue : Integer;
|
||||
function GetOldREFERENCIAValue : String;
|
||||
function GetOldFECHA_CONTRATOValue : DateTime;
|
||||
function GetOldREFERENCIA_CLIENTEValue : String;
|
||||
function GetOldNOMBREValue : String;
|
||||
function GetOldNIF_CIFValue : String;
|
||||
function GetOldIMPORTE_NETOValue : Currency;
|
||||
@ -191,6 +192,7 @@ type
|
||||
property OldID : Integer read GetOldIDValue;
|
||||
property OldREFERENCIA : String read GetOldREFERENCIAValue;
|
||||
property OldFECHA_CONTRATO : DateTime read GetOldFECHA_CONTRATOValue;
|
||||
property OldREFERENCIA_CLIENTE : String read GetOldREFERENCIA_CLIENTEValue;
|
||||
property OldNOMBRE : String read GetOldNOMBREValue;
|
||||
property OldNIF_CIF : String read GetOldNIF_CIFValue;
|
||||
property OldIMPORTE_NETO : Currency read GetOldIMPORTE_NETOValue;
|
||||
@ -227,6 +229,12 @@ type
|
||||
function GetOldFECHA_CONTRATOIsNull: Boolean; virtual;
|
||||
procedure SetFECHA_CONTRATOValue(const aValue: DateTime); virtual;
|
||||
procedure SetFECHA_CONTRATOIsNull(const aValue: Boolean); virtual;
|
||||
function GetREFERENCIA_CLIENTEValue: String; virtual;
|
||||
function GetREFERENCIA_CLIENTEIsNull: Boolean; virtual;
|
||||
function GetOldREFERENCIA_CLIENTEValue: String; virtual;
|
||||
function GetOldREFERENCIA_CLIENTEIsNull: Boolean; virtual;
|
||||
procedure SetREFERENCIA_CLIENTEValue(const aValue: String); virtual;
|
||||
procedure SetREFERENCIA_CLIENTEIsNull(const aValue: Boolean); virtual;
|
||||
function GetNOMBREValue: String; virtual;
|
||||
function GetNOMBREIsNull: Boolean; virtual;
|
||||
function GetOldNOMBREValue: String; virtual;
|
||||
@ -307,6 +315,10 @@ type
|
||||
property FECHA_CONTRATOIsNull : Boolean read GetFECHA_CONTRATOIsNull write SetFECHA_CONTRATOIsNull;
|
||||
property OldFECHA_CONTRATO : DateTime read GetOldFECHA_CONTRATOValue;
|
||||
property OldFECHA_CONTRATOIsNull : Boolean read GetOldFECHA_CONTRATOIsNull;
|
||||
property REFERENCIA_CLIENTE : String read GetREFERENCIA_CLIENTEValue write SetREFERENCIA_CLIENTEValue;
|
||||
property REFERENCIA_CLIENTEIsNull : Boolean read GetREFERENCIA_CLIENTEIsNull write SetREFERENCIA_CLIENTEIsNull;
|
||||
property OldREFERENCIA_CLIENTE : String read GetOldREFERENCIA_CLIENTEValue;
|
||||
property OldREFERENCIA_CLIENTEIsNull : Boolean read GetOldREFERENCIA_CLIENTEIsNull;
|
||||
property NOMBRE : String read GetNOMBREValue write SetNOMBREValue;
|
||||
property NOMBREIsNull : Boolean read GetNOMBREIsNull write SetNOMBREIsNull;
|
||||
property OldNOMBRE : String read GetOldNOMBREValue;
|
||||
@ -360,7 +372,7 @@ type
|
||||
|
||||
{ IContratosClienteDelta }
|
||||
IContratosClienteDelta = interface(IContratosCliente)
|
||||
['{55AD4AA0-BD11-4F4E-ADA3-CD019CB2E92B}']
|
||||
['{E74263B4-9F80-48FF-8228-19422AFDBA51}']
|
||||
{ Property getters and setters }
|
||||
function GetOldIDValue : Integer;
|
||||
function GetOldID_EMPRESAValue : Integer;
|
||||
@ -950,7 +962,7 @@ type
|
||||
|
||||
{ ITiposCapitulosDelta }
|
||||
ITiposCapitulosDelta = interface(ITiposCapitulos)
|
||||
['{DA81420C-1A5E-47F3-8FAC-14ACDBAD9749}']
|
||||
['{82C3C976-5C8E-41F2-A0A9-B8028E119613}']
|
||||
{ Property getters and setters }
|
||||
function GetOldIDValue : Integer;
|
||||
function GetOldPOSICIONValue : Integer;
|
||||
@ -1044,7 +1056,7 @@ type
|
||||
|
||||
{ IContratosCliente_DetallesDelta }
|
||||
IContratosCliente_DetallesDelta = interface(IContratosCliente_Detalles)
|
||||
['{2F500632-2D38-4B7A-AB5F-4AB42F4D4D83}']
|
||||
['{55A68F42-1449-47F7-BCD9-E5613C7AED8B}']
|
||||
{ Property getters and setters }
|
||||
function GetOldIDValue : Integer;
|
||||
function GetOldID_CONTRATOValue : Integer;
|
||||
@ -1630,6 +1642,37 @@ begin
|
||||
BusinessProcessor.CurrentChange.NewValueByName[fld_ContratosClienteBeneficiosFECHA_CONTRATO] := Null;
|
||||
end;
|
||||
|
||||
function TContratosClienteBeneficiosBusinessProcessorRules.GetREFERENCIA_CLIENTEValue: String;
|
||||
begin
|
||||
result := BusinessProcessor.CurrentChange.NewValueByName[fld_ContratosClienteBeneficiosREFERENCIA_CLIENTE];
|
||||
end;
|
||||
|
||||
function TContratosClienteBeneficiosBusinessProcessorRules.GetREFERENCIA_CLIENTEIsNull: Boolean;
|
||||
begin
|
||||
result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_ContratosClienteBeneficiosREFERENCIA_CLIENTE]);
|
||||
end;
|
||||
|
||||
function TContratosClienteBeneficiosBusinessProcessorRules.GetOldREFERENCIA_CLIENTEValue: String;
|
||||
begin
|
||||
result := BusinessProcessor.CurrentChange.OldValueByName[fld_ContratosClienteBeneficiosREFERENCIA_CLIENTE];
|
||||
end;
|
||||
|
||||
function TContratosClienteBeneficiosBusinessProcessorRules.GetOldREFERENCIA_CLIENTEIsNull: Boolean;
|
||||
begin
|
||||
result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_ContratosClienteBeneficiosREFERENCIA_CLIENTE]);
|
||||
end;
|
||||
|
||||
procedure TContratosClienteBeneficiosBusinessProcessorRules.SetREFERENCIA_CLIENTEValue(const aValue: String);
|
||||
begin
|
||||
BusinessProcessor.CurrentChange.NewValueByName[fld_ContratosClienteBeneficiosREFERENCIA_CLIENTE] := aValue;
|
||||
end;
|
||||
|
||||
procedure TContratosClienteBeneficiosBusinessProcessorRules.SetREFERENCIA_CLIENTEIsNull(const aValue: Boolean);
|
||||
begin
|
||||
if aValue then
|
||||
BusinessProcessor.CurrentChange.NewValueByName[fld_ContratosClienteBeneficiosREFERENCIA_CLIENTE] := Null;
|
||||
end;
|
||||
|
||||
function TContratosClienteBeneficiosBusinessProcessorRules.GetNOMBREValue: String;
|
||||
begin
|
||||
result := BusinessProcessor.CurrentChange.NewValueByName[fld_ContratosClienteBeneficiosNOMBRE];
|
||||
|
||||
@ -137,11 +137,12 @@ object srvContratosCliente: TsrvContratosCliente
|
||||
TargetTable = 'V_CONTRATOS_BENEFICIOS'
|
||||
Name = 'IBX'
|
||||
SQL =
|
||||
'SELECT '#10' ID, REFERENCIA, FECHA_CONTRATO, NOMBRE, NIF_CIF, IMP' +
|
||||
'ORTE_NETO, '#10' IMPORTE_DESCUENTO, BASE_IMPONIBLE, IMPORTE_FACTU' +
|
||||
'RAS_PROVEEDOR, '#10' IMPORTE_BENEFICIO, PORCENTAJE_BENEFICIO, IMP' +
|
||||
'ORTE_FACTURAS_CLIENTE,'#10' IMPORTE_BENEFICIO_REAL, PORCENTAJE_BE' +
|
||||
'NEFICIO_REAL'#10' FROM'#10' V_CONTRATOS_BENEFICIOS'#10' WHERE {Where}'#10
|
||||
'SELECT '#10' ID, REFERENCIA, FECHA_CONTRATO, REFERENCIA_CLIENTE, ' +
|
||||
'NOMBRE, NIF_CIF, IMPORTE_NETO,'#10' IMPORTE_DESCUENTO, BASE_IMPON' +
|
||||
'IBLE, IMPORTE_FACTURAS_PROVEEDOR, '#10' IMPORTE_BENEFICIO, PORCEN' +
|
||||
'TAJE_BENEFICIO, IMPORTE_FACTURAS_CLIENTE,'#10' IMPORTE_BENEFICIO_' +
|
||||
'REAL, PORCENTAJE_BENEFICIO_REAL'#10' FROM'#10' V_CONTRATOS_BENEFICIO' +
|
||||
'S'#10' WHERE {Where}'#10
|
||||
StatementType = stSQL
|
||||
ColumnMappings = <
|
||||
item
|
||||
@ -156,6 +157,10 @@ object srvContratosCliente: TsrvContratosCliente
|
||||
DatasetField = 'FECHA_CONTRATO'
|
||||
TableField = 'FECHA_CONTRATO'
|
||||
end
|
||||
item
|
||||
DatasetField = 'REFERENCIA_CLIENTE'
|
||||
TableField = 'REFERENCIA_CLIENTE'
|
||||
end
|
||||
item
|
||||
DatasetField = 'NOMBRE'
|
||||
TableField = 'NOMBRE'
|
||||
@ -216,6 +221,11 @@ object srvContratosCliente: TsrvContratosCliente
|
||||
Name = 'FECHA_CONTRATO'
|
||||
DataType = datDateTime
|
||||
end
|
||||
item
|
||||
Name = 'REFERENCIA_CLIENTE'
|
||||
DataType = datString
|
||||
Size = 255
|
||||
end
|
||||
item
|
||||
Name = 'NOMBRE'
|
||||
DataType = datString
|
||||
|
||||
Binary file not shown.
@ -49,57 +49,57 @@
|
||||
<DelphiCompile Include="ContratosCliente_view.dpk">
|
||||
<MainSource>MainSource</MainSource>
|
||||
</DelphiCompile>
|
||||
<DCCReference Include="..\..\..\Servidor\adortl.dcp" />
|
||||
<DCCReference Include="..\..\..\Servidor\Articulos_view.dcp" />
|
||||
<DCCReference Include="..\..\..\Servidor\Base.dcp" />
|
||||
<DCCReference Include="..\..\..\Servidor\ConCli_AlbCli_relation.dcp" />
|
||||
<DCCReference Include="..\..\..\Servidor\ConCli_FacCli_relation.dcp" />
|
||||
<DCCReference Include="..\..\..\Servidor\ContratosCliente_controller.dcp" />
|
||||
<DCCReference Include="..\..\..\Servidor\ContratosCliente_model.dcp" />
|
||||
<DCCReference Include="..\..\..\Servidor\cxDataD11.dcp" />
|
||||
<DCCReference Include="..\..\..\Servidor\cxEditorsD11.dcp" />
|
||||
<DCCReference Include="..\..\..\Servidor\cxExportD11.dcp" />
|
||||
<DCCReference Include="..\..\..\Servidor\cxExtEditorsD11.dcp" />
|
||||
<DCCReference Include="..\..\..\Servidor\cxGridD11.dcp" />
|
||||
<DCCReference Include="..\..\..\Servidor\cxLibraryD11.dcp" />
|
||||
<DCCReference Include="..\..\..\Servidor\cxPageControlD11.dcp" />
|
||||
<DCCReference Include="..\..\..\Servidor\DataAbstract_Core_D11.dcp" />
|
||||
<DCCReference Include="..\..\..\Servidor\dbrtl.dcp" />
|
||||
<DCCReference Include="..\..\..\Servidor\dclcxLibraryD11.dcp" />
|
||||
<DCCReference Include="..\..\..\Servidor\dcldxCoreD11.dcp" />
|
||||
<DCCReference Include="..\..\..\Servidor\designide.dcp" />
|
||||
<DCCReference Include="..\..\..\Servidor\dsnap.dcp" />
|
||||
<DCCReference Include="..\..\..\Servidor\dxComnD11.dcp" />
|
||||
<DCCReference Include="..\..\..\Servidor\dxCoreD11.dcp" />
|
||||
<DCCReference Include="..\..\..\Servidor\dxGDIPlusD11.dcp" />
|
||||
<DCCReference Include="..\..\..\Servidor\dxLayoutControlD11.dcp" />
|
||||
<DCCReference Include="..\..\..\Servidor\dxPSCoreD11.dcp" />
|
||||
<DCCReference Include="..\..\..\Servidor\dxPScxCommonD11.dcp" />
|
||||
<DCCReference Include="..\..\..\Servidor\dxPScxGrid6LnkD11.dcp" />
|
||||
<DCCReference Include="..\..\..\Servidor\dxPSLnksD11.dcp" />
|
||||
<DCCReference Include="..\..\..\Servidor\dxThemeD11.dcp" />
|
||||
<DCCReference Include="..\..\..\Servidor\GestorInformes_controller.dcp" />
|
||||
<DCCReference Include="..\..\..\Servidor\GUIBase.dcp" />
|
||||
<DCCReference Include="..\..\..\Servidor\GUISDK_D11R.dcp" />
|
||||
<DCCReference Include="..\..\..\Servidor\Jcl.dcp" />
|
||||
<DCCReference Include="..\..\..\Servidor\JclVcl.dcp" />
|
||||
<DCCReference Include="..\..\..\Servidor\JvCoreD11R.dcp" />
|
||||
<DCCReference Include="..\..\..\Servidor\JvPageCompsD11R.dcp" />
|
||||
<DCCReference Include="..\..\..\Servidor\JvStdCtrlsD11R.dcp" />
|
||||
<DCCReference Include="..\..\..\Servidor\JvSystemD11R.dcp" />
|
||||
<DCCReference Include="..\..\..\Servidor\PngComponentsD10.dcp" />
|
||||
<DCCReference Include="..\..\..\Servidor\PNG_D10.dcp" />
|
||||
<DCCReference Include="..\..\..\Servidor\RemObjects_Core_D11.dcp" />
|
||||
<DCCReference Include="..\..\..\Servidor\rtl.dcp" />
|
||||
<DCCReference Include="..\..\..\Servidor\tb2k_d10.dcp" />
|
||||
<DCCReference Include="..\..\..\Servidor\tbx_d10.dcp" />
|
||||
<DCCReference Include="..\..\..\Servidor\vcl.dcp" />
|
||||
<DCCReference Include="..\..\..\Servidor\vclactnband.dcp" />
|
||||
<DCCReference Include="..\..\..\Servidor\vcldb.dcp" />
|
||||
<DCCReference Include="..\..\..\Servidor\vcljpg.dcp" />
|
||||
<DCCReference Include="..\..\..\Servidor\vclshlctrls.dcp" />
|
||||
<DCCReference Include="..\..\..\Servidor\vclx.dcp" />
|
||||
<DCCReference Include="..\..\..\Servidor\xmlrtl.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\adortl.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\Articulos_view.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\Base.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\ConCli_AlbCli_relation.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\ConCli_FacCli_relation.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\ContratosCliente_controller.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\ContratosCliente_model.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\cxDataD11.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\cxEditorsD11.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\cxExportD11.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\cxExtEditorsD11.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\cxGridD11.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\cxLibraryD11.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\cxPageControlD11.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\DataAbstract_Core_D11.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\dbrtl.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\dclcxLibraryD11.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\dcldxCoreD11.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\designide.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\dsnap.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\dxComnD11.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\dxCoreD11.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\dxGDIPlusD11.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\dxLayoutControlD11.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\dxPSCoreD11.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\dxPScxCommonD11.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\dxPScxGrid6LnkD11.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\dxPSLnksD11.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\dxThemeD11.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\GestorInformes_controller.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\GUIBase.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\GUISDK_D11R.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\Jcl.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\JclVcl.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\JvCoreD11R.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\JvPageCompsD11R.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\JvStdCtrlsD11R.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\JvSystemD11R.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\PngComponentsD10.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\PNG_D10.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\RemObjects_Core_D11.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\rtl.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\tb2k_d10.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\tbx_d10.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\vcl.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\vclactnband.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\vcldb.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\vcljpg.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\vclshlctrls.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\vclx.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\xmlrtl.dcp" />
|
||||
<DCCReference Include="uContratosClienteViewRegister.pas" />
|
||||
<DCCReference Include="uDialogOpcionesImpresionContratosCliente.pas">
|
||||
<Form>fDialogOpcionesImpresionContratosCliente</Form>
|
||||
|
||||
@ -16,6 +16,10 @@ inherited frViewContratosClienteBeneficios: TfrViewContratosClienteBeneficios
|
||||
DataBinding.FieldName = 'FECHA_CONTRATO'
|
||||
PropertiesClassName = 'TcxDateEditProperties'
|
||||
end
|
||||
object cxGridViewREFERENCIA_CLIENTE: TcxGridDBColumn
|
||||
Caption = 'Ref. Cliente'
|
||||
DataBinding.FieldName = 'REFERENCIA_CLIENTE'
|
||||
end
|
||||
object cxGridViewNOMBRE: TcxGridDBColumn
|
||||
Caption = 'Cliente'
|
||||
DataBinding.FieldName = 'NOMBRE'
|
||||
@ -107,9 +111,6 @@ inherited frViewContratosClienteBeneficios: TfrViewContratosClienteBeneficios
|
||||
end
|
||||
end
|
||||
end
|
||||
inherited pnlAgrupaciones: TTBXDockablePanel
|
||||
ExplicitWidth = 554
|
||||
end
|
||||
inherited dxComponentPrinter: TdxComponentPrinter
|
||||
inherited dxComponentPrinterLink: TdxGridReportLink
|
||||
ReportDocument.CreationDate = 40415.784062094910000000
|
||||
|
||||
@ -30,6 +30,7 @@ type
|
||||
cxGridViewIMPORTE_FACTURAS_CLIENTE: TcxGridDBColumn;
|
||||
cxGridViewIMPORTE_BENEFICIO_REAL: TcxGridDBColumn;
|
||||
cxGridViewPORCENTAJE_BENEFICIO_REAL: TcxGridDBColumn;
|
||||
cxGridViewREFERENCIA_CLIENTE: TcxGridDBColumn;
|
||||
procedure CustomViewDestroy(Sender: TObject);
|
||||
private
|
||||
FContratos: IBizContratosClienteBeneficios;
|
||||
|
||||
@ -134,15 +134,15 @@ uses
|
||||
schEmpresasServer_Intf in '..\ApplicationBase\Empresas\Model\schEmpresasServer_Intf.pas',
|
||||
schAlbaranesClienteClient_Intf in '..\Modulos\Albaranes de cliente\Model\schAlbaranesClienteClient_Intf.pas',
|
||||
schAlbaranesClienteServer_Intf in '..\Modulos\Albaranes de cliente\Model\schAlbaranesClienteServer_Intf.pas',
|
||||
schContratosClienteClient_Intf in '..\Modulos\Contratos de cliente\Model\schContratosClienteClient_Intf.pas',
|
||||
schContratosClienteServer_Intf in '..\Modulos\Contratos de cliente\Model\schContratosClienteServer_Intf.pas',
|
||||
uNumUtils in '..\Base\Utiles\uNumUtils.pas',
|
||||
schFacturasClienteClient_Intf in '..\Modulos\Facturas de cliente\Model\schFacturasClienteClient_Intf.pas',
|
||||
schFacturasClienteServer_Intf in '..\Modulos\Facturas de cliente\Model\schFacturasClienteServer_Intf.pas',
|
||||
schContactosClient_Intf in '..\Modulos\Contactos\Model\schContactosClient_Intf.pas',
|
||||
schContactosServer_Intf in '..\Modulos\Contactos\Model\schContactosServer_Intf.pas',
|
||||
schPresupuestosClienteClient_Intf in '..\Modulos\Presupuestos de cliente\Model\schPresupuestosClienteClient_Intf.pas',
|
||||
schPresupuestosClienteServer_Intf in '..\Modulos\Presupuestos de cliente\Model\schPresupuestosClienteServer_Intf.pas';
|
||||
schPresupuestosClienteServer_Intf in '..\Modulos\Presupuestos de cliente\Model\schPresupuestosClienteServer_Intf.pas',
|
||||
schContratosClienteClient_Intf in '..\Modulos\Contratos de cliente\Model\schContratosClienteClient_Intf.pas',
|
||||
schContratosClienteServer_Intf in '..\Modulos\Contratos de cliente\Model\schContratosClienteServer_Intf.pas';
|
||||
|
||||
{$R *.res}
|
||||
{$R ..\Servicios\RODLFile.res}
|
||||
|
||||
@ -29,6 +29,7 @@
|
||||
<Borland.ProjectType />
|
||||
<BorlandProject>
|
||||
<BorlandProject><Delphi.Personality><Parameters><Parameters Name="UseLauncher">False</Parameters><Parameters Name="LoadAllSymbols">True</Parameters><Parameters Name="LoadUnspecifiedSymbols">False</Parameters></Parameters><VersionInfo><VersionInfo Name="IncludeVerInfo">True</VersionInfo><VersionInfo Name="AutoIncBuild">False</VersionInfo><VersionInfo Name="MajorVer">2</VersionInfo><VersionInfo Name="MinorVer">6</VersionInfo><VersionInfo Name="Release">8</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">2.6.8.0</VersionInfoKeys><VersionInfoKeys Name="InternalName"></VersionInfoKeys><VersionInfoKeys Name="LegalCopyright"></VersionInfoKeys><VersionInfoKeys Name="LegalTrademarks"></VersionInfoKeys><VersionInfoKeys Name="OriginalFilename"></VersionInfoKeys><VersionInfoKeys Name="ProductName">FactuGES (Servidor)</VersionInfoKeys><VersionInfoKeys Name="ProductVersion">2.6.8.0</VersionInfoKeys><VersionInfoKeys Name="Comments"></VersionInfoKeys><VersionInfoKeys Name="CompileDate">lunes, 11 de abril de 2016 13:37</VersionInfoKeys></VersionInfoKeys><Excluded_Packages>
|
||||
|
||||
<Excluded_Packages Name="C:\Documents and Settings\All Users\Documentos\RAD Studio\5.0\Bpl\dxPScxScheduler2LnkD11.bpl">File C:\Documents and Settings\All Users\Documentos\RAD Studio\5.0\Bpl\dxPScxScheduler2LnkD11.bpl not found</Excluded_Packages>
|
||||
</Excluded_Packages><Source><Source Name="MainSource">FactuGES_Server.dpr</Source></Source></Delphi.Personality></BorlandProject></BorlandProject>
|
||||
</ProjectExtensions>
|
||||
|
||||
Loading…
Reference in New Issue
Block a user