Tarea #1425 -> Añadir una columna en la lista de clientes para mostrar los nombres de la pestaña 'Direcciones'
git-svn-id: https://192.168.0.254/svn/Proyectos.Acana_FactuGES2/trunk@639 f4e31baf-9722-1c47-927c-6f952f962d4b
This commit is contained in:
parent
901997348a
commit
d722478085
@ -2065,6 +2065,13 @@ SELECT CONTACTOS.ID,
|
||||
LEFT JOIN TIENDAS ON (TIENDAS.ID = CONTACTOS.ID_TIENDA)
|
||||
;
|
||||
|
||||
create view V_CONTACTOS_NOMBRES_DIRECCIONES(
|
||||
ID,
|
||||
LISTA_NOMBRES)
|
||||
AS
|
||||
select contactos_direcciones.id_contacto, LIST(contactos_direcciones.nombre, ', ') AS lista_nombres_direcciones
|
||||
from contactos_direcciones
|
||||
group by id_contacto;
|
||||
|
||||
|
||||
/* View: V_CLIENTES */
|
||||
@ -2109,7 +2116,8 @@ CREATE VIEW V_CLIENTES(
|
||||
PROCEDENCIA_CLIENTE,
|
||||
VENCIMIENTO_FACTURAS_1,
|
||||
VENCIMIENTO_FACTURAS_2,
|
||||
VENCIMIENTO_FACTURAS_3)
|
||||
VENCIMIENTO_FACTURAS_3,
|
||||
LISTA_NOMBRES)
|
||||
AS
|
||||
SELECT
|
||||
V_CONTACTOS.ID,
|
||||
@ -2152,10 +2160,12 @@ SELECT
|
||||
CLIENTES_DATOS.PROCEDENCIA_CLIENTE,
|
||||
CLIENTES_DATOS.VENCIMIENTO_FACTURAS_1,
|
||||
CLIENTES_DATOS.VENCIMIENTO_FACTURAS_2,
|
||||
CLIENTES_DATOS.VENCIMIENTO_FACTURAS_3
|
||||
CLIENTES_DATOS.VENCIMIENTO_FACTURAS_3,
|
||||
V_CONTACTOS_NOMBRES_DIRECCIONES.LISTA_NOMBRES
|
||||
|
||||
FROM V_CONTACTOS
|
||||
LEFT OUTER JOIN CLIENTES_DATOS ON (V_CONTACTOS.ID = CLIENTES_DATOS.ID_CLIENTE)
|
||||
LEFT OUTER JOIN V_CONTACTOS_NOMBRES_DIRECCIONES ON (V_CONTACTOS.ID = V_CONTACTOS_NOMBRES_DIRECCIONES.ID)
|
||||
WHERE
|
||||
V_CONTACTOS.ID_CATEGORIA = 1
|
||||
;
|
||||
|
||||
@ -58,55 +58,55 @@
|
||||
<DelphiCompile Include="Base.dpk">
|
||||
<MainSource>MainSource</MainSource>
|
||||
</DelphiCompile>
|
||||
<DCCReference Include="..\Modulos\Contactos\adortl.dcp" />
|
||||
<DCCReference Include="..\Modulos\Contactos\cxDataD11.dcp" />
|
||||
<DCCReference Include="..\Modulos\Contactos\cxEditorsD11.dcp" />
|
||||
<DCCReference Include="..\Modulos\Contactos\cxExtEditorsD11.dcp" />
|
||||
<DCCReference Include="..\Modulos\Contactos\cxGridD11.dcp" />
|
||||
<DCCReference Include="..\Modulos\Contactos\cxLibraryD11.dcp" />
|
||||
<DCCReference Include="..\Modulos\Contactos\cxPageControlD11.dcp" />
|
||||
<DCCReference Include="..\Modulos\Contactos\DataAbstract_Core_D11.dcp" />
|
||||
<DCCReference Include="..\Modulos\Contactos\dbrtl.dcp" />
|
||||
<DCCReference Include="..\Modulos\Contactos\dclIndyCore.dcp" />
|
||||
<DCCReference Include="..\Modulos\Contactos\designide.dcp" />
|
||||
<DCCReference Include="..\Modulos\Contactos\dsnap.dcp" />
|
||||
<DCCReference Include="..\Modulos\Contactos\dxGDIPlusD11.dcp" />
|
||||
<DCCReference Include="..\Modulos\Contactos\dxPSCoreD11.dcp" />
|
||||
<DCCReference Include="..\Modulos\Contactos\dxThemeD11.dcp" />
|
||||
<DCCReference Include="..\Modulos\Contactos\GUISDK_D11R.dcp" />
|
||||
<DCCReference Include="..\Modulos\Contactos\IndyCore.dcp" />
|
||||
<DCCReference Include="..\Modulos\Contactos\IndyProtocols.dcp" />
|
||||
<DCCReference Include="..\Modulos\Contactos\IndySystem.dcp" />
|
||||
<DCCReference Include="..\Modulos\Contactos\Jcl.dcp" />
|
||||
<DCCReference Include="..\Modulos\Contactos\JclVcl.dcp" />
|
||||
<DCCReference Include="..\Modulos\Contactos\JSDialog100.dcp" />
|
||||
<DCCReference Include="..\Modulos\Contactos\JvCmpD11R.dcp" />
|
||||
<DCCReference Include="..\Modulos\Contactos\JvCoreD11R.dcp" />
|
||||
<DCCReference Include="..\Modulos\Contactos\JvCtrlsD11R.dcp" />
|
||||
<DCCReference Include="..\Modulos\Contactos\JvDlgsD11R.dcp" />
|
||||
<DCCReference Include="..\Modulos\Contactos\JvMMD11R.dcp" />
|
||||
<DCCReference Include="..\Modulos\Contactos\JvNetD11R.dcp" />
|
||||
<DCCReference Include="..\Modulos\Contactos\JvPageCompsD11R.dcp" />
|
||||
<DCCReference Include="..\Modulos\Contactos\JvStdCtrlsD11R.dcp" />
|
||||
<DCCReference Include="..\Modulos\Contactos\JvSystemD11R.dcp" />
|
||||
<DCCReference Include="..\Modulos\Contactos\pckMD5.dcp" />
|
||||
<DCCReference Include="..\Modulos\Contactos\pckUCDataConnector.dcp" />
|
||||
<DCCReference Include="..\Modulos\Contactos\pckUserControl_RT.dcp" />
|
||||
<DCCReference Include="..\Modulos\Contactos\PluginSDK_D11R.dcp" />
|
||||
<DCCReference Include="..\Modulos\Contactos\PngComponentsD10.dcp" />
|
||||
<DCCReference Include="..\Modulos\Contactos\PNG_D10.dcp" />
|
||||
<DCCReference Include="..\Modulos\Contactos\RemObjects_Core_D11.dcp" />
|
||||
<DCCReference Include="..\Modulos\Contactos\rtl.dcp" />
|
||||
<DCCReference Include="..\Modulos\Contactos\TB2k_D10.dcp" />
|
||||
<DCCReference Include="..\Modulos\Contactos\tbx_d10.dcp" />
|
||||
<DCCReference Include="..\Modulos\Contactos\vcl.dcp" />
|
||||
<DCCReference Include="..\Modulos\Contactos\vclactnband.dcp" />
|
||||
<DCCReference Include="..\Modulos\Contactos\vcldb.dcp" />
|
||||
<DCCReference Include="..\Modulos\Contactos\vcljpg.dcp" />
|
||||
<DCCReference Include="..\Modulos\Contactos\VclSmp.dcp" />
|
||||
<DCCReference Include="..\Modulos\Contactos\vclx.dcp" />
|
||||
<DCCReference Include="..\Modulos\Contactos\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>
|
||||
|
||||
@ -52,7 +52,7 @@
|
||||
<Borland.Personality>Delphi.Personality</Borland.Personality>
|
||||
<Borland.ProjectType>VCLApplication</Borland.ProjectType>
|
||||
<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">2</VersionInfo><VersionInfo Name="MinorVer">7</VersionInfo><VersionInfo Name="Release">1</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.7.1.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">2.7.1.0</VersionInfoKeys><VersionInfoKeys Name="Comments"></VersionInfoKeys></VersionInfoKeys><Excluded_Packages>
|
||||
<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">2</VersionInfo><VersionInfo Name="MinorVer">7</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">2.7.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">2.7.2.0</VersionInfoKeys><VersionInfoKeys Name="Comments"></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.dpr</Source></Source></Delphi.Personality><ModelSupport>False</ModelSupport></BorlandProject></BorlandProject>
|
||||
|
||||
@ -1,7 +1,7 @@
|
||||
MAINICON ICON "C:\Codigo Acana\Resources\Iconos\Factuges.ico"
|
||||
1 VERSIONINFO
|
||||
FILEVERSION 2,7,0,0
|
||||
PRODUCTVERSION 2,7,0,0
|
||||
FILEVERSION 2,7,2,0
|
||||
PRODUCTVERSION 2,7,2,0
|
||||
FILEFLAGSMASK 0x3FL
|
||||
FILEFLAGS 0x00L
|
||||
FILEOS 0x40004L
|
||||
@ -13,10 +13,10 @@ BEGIN
|
||||
BLOCK "0C0A04E4"
|
||||
BEGIN
|
||||
VALUE "CompanyName", "Rodax Software S.L.\0"
|
||||
VALUE "FileVersion", "2.7.0.0\0"
|
||||
VALUE "FileVersion", "2.7.2.0\0"
|
||||
VALUE "InternalName", "FactuGES\0"
|
||||
VALUE "ProductName", "FactuGES\0"
|
||||
VALUE "ProductVersion", "2.7.0.0\0"
|
||||
VALUE "ProductVersion", "2.7.2.0\0"
|
||||
END
|
||||
END
|
||||
BLOCK "VarFileInfo"
|
||||
|
||||
Binary file not shown.
@ -58,34 +58,34 @@
|
||||
<DelphiCompile Include="GUIBase.dpk">
|
||||
<MainSource>MainSource</MainSource>
|
||||
</DelphiCompile>
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\Base.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\ccpackD11.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\cxLibraryD11.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\dbrtl.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\dxPScxCommonD11.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\dxPScxGrid6LnkD11.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\dxThemeD11.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\frx11.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\frxe11.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\fs11.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\JvAppFrmD11R.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\JvCtrlsD11R.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\JvGlobusD11R.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\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\vclx.dcp" />
|
||||
<DCCReference Include="..\Modulos\Contactos\Base.dcp" />
|
||||
<DCCReference Include="..\Modulos\Contactos\ccpackD11.dcp" />
|
||||
<DCCReference Include="..\Modulos\Contactos\cxDataD11.dcp" />
|
||||
<DCCReference Include="..\Modulos\Contactos\cxEditorsD11.dcp" />
|
||||
<DCCReference Include="..\Modulos\Contactos\cxExportD11.dcp" />
|
||||
<DCCReference Include="..\Modulos\Contactos\cxLibraryD11.dcp" />
|
||||
<DCCReference Include="..\Modulos\Contactos\dbrtl.dcp" />
|
||||
<DCCReference Include="..\Modulos\Contactos\dxGDIPlusD11.dcp" />
|
||||
<DCCReference Include="..\Modulos\Contactos\dxLayoutControlD11.dcp" />
|
||||
<DCCReference Include="..\Modulos\Contactos\dxPScxCommonD11.dcp" />
|
||||
<DCCReference Include="..\Modulos\Contactos\dxPScxGrid6LnkD11.dcp" />
|
||||
<DCCReference Include="..\Modulos\Contactos\dxThemeD11.dcp" />
|
||||
<DCCReference Include="..\Modulos\Contactos\frx11.dcp" />
|
||||
<DCCReference Include="..\Modulos\Contactos\frxe11.dcp" />
|
||||
<DCCReference Include="..\Modulos\Contactos\fs11.dcp" />
|
||||
<DCCReference Include="..\Modulos\Contactos\JvAppFrmD11R.dcp" />
|
||||
<DCCReference Include="..\Modulos\Contactos\JvCtrlsD11R.dcp" />
|
||||
<DCCReference Include="..\Modulos\Contactos\JvGlobusD11R.dcp" />
|
||||
<DCCReference Include="..\Modulos\Contactos\PngComponentsD10.dcp" />
|
||||
<DCCReference Include="..\Modulos\Contactos\PNG_D10.dcp" />
|
||||
<DCCReference Include="..\Modulos\Contactos\rtl.dcp" />
|
||||
<DCCReference Include="..\Modulos\Contactos\tb2k_d10.dcp" />
|
||||
<DCCReference Include="..\Modulos\Contactos\tbx_d10.dcp" />
|
||||
<DCCReference Include="..\Modulos\Contactos\vcl.dcp" />
|
||||
<DCCReference Include="..\Modulos\Contactos\vclactnband.dcp" />
|
||||
<DCCReference Include="..\Modulos\Contactos\vcldb.dcp" />
|
||||
<DCCReference Include="..\Modulos\Contactos\vcljpg.dcp" />
|
||||
<DCCReference Include="..\Modulos\Contactos\vclx.dcp" />
|
||||
<DCCReference Include="uDialogBase.pas">
|
||||
<Form>fDialogBase</Form>
|
||||
</DCCReference>
|
||||
|
||||
@ -65,6 +65,6 @@ contains
|
||||
uEditorElegirSubCuentas in 'uEditorElegirSubCuentas.pas' {fEditorElegirSubCuentas: TfEditorEjercicios},
|
||||
uViewListaSubCuentas in 'uViewListaSubCuentas.pas' {frViewListaSubcuentas: TFrame},
|
||||
uViewExtractoMovimientos in 'uViewExtractoMovimientos.pas' {frViewExtractoMovimientos: TFrame},
|
||||
uEditorExtractoMovimientos in 'uEditorExtractoMovimientos.pas' {fEditorExtractoMovimientos: TfEditorExtractoMovimientos};
|
||||
uEditorExtractoMovimientos in 'uEditorExtractoMovimientos.pas' {fEditorExtractoMovimientos: TfEditorExtractoMovimientos} ;
|
||||
|
||||
end.
|
||||
|
||||
@ -48,11 +48,11 @@
|
||||
<DelphiCompile Include="Contabilidad_view.dpk">
|
||||
<MainSource>MainSource</MainSource>
|
||||
</DelphiCompile>
|
||||
<DCCReference Include="..\..\Recibos de cliente\ApplicationBase.dcp" />
|
||||
<DCCReference Include="..\..\Recibos de cliente\Base.dcp" />
|
||||
<DCCReference Include="..\..\Recibos de cliente\Contabilidad_controller.dcp" />
|
||||
<DCCReference Include="..\..\Recibos de cliente\Contabilidad_model.dcp" />
|
||||
<DCCReference Include="..\..\Recibos de cliente\GUIBase.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\ApplicationBase.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\Base.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\Contabilidad_controller.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\Contabilidad_model.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\GUIBase.dcp" />
|
||||
<DCCReference Include="uContabilidadViewRegister.pas">
|
||||
<Form>frViewEpigrafes</Form>
|
||||
<DesignClass>TFrame</DesignClass>
|
||||
|
||||
@ -281,6 +281,13 @@ inherited DataModuleClientes: TDataModuleClientes
|
||||
item
|
||||
Name = 'VENCIMIENTO_FACTURAS_3'
|
||||
DataType = datInteger
|
||||
end
|
||||
item
|
||||
Name = 'LISTA_NOMBRES'
|
||||
DataType = datString
|
||||
Size = 255
|
||||
DisplayLabel = 'Otros nombres'
|
||||
DictionaryEntry = 'Clientes_LISTA_NOMBRES'
|
||||
end>
|
||||
Params = <>
|
||||
StreamingOptions = [soDisableEventsWhileStreaming]
|
||||
|
||||
@ -3,28 +3,30 @@ unit schContactosClient_Intf;
|
||||
interface
|
||||
|
||||
uses
|
||||
Classes, DB, schBase_Intf, SysUtils, uROClasses, uDADataTable, FmtBCD, uROXMLIntf;
|
||||
Classes, DB, schBase_Intf, 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_PersonalContacto = '{10850DAC-8A04-46B8-882A-D9D05178F533}';
|
||||
RID_DarTiendaDeUsuario = '{4A3CFB9A-64F8-41D3-8B67-D3BD773EC6F0}';
|
||||
RID_SubCuentasContacto = '{98A05B2F-8C31-4012-A9C3-40E3FD982FEF}';
|
||||
RID_Contactos = '{EC034344-6F48-4962-B530-9C8590FFA881}';
|
||||
RID_GruposCliente = '{0C0F2DE5-1C7D-42ED-AF00-57BB3F081EEA}';
|
||||
RID_DatosBancarios = '{8120C3EA-4394-4FA5-AA19-9DE1AABDABD6}';
|
||||
RID_Clientes = '{D01FA8E7-3AEC-4B37-9F26-015F3CD695CA}';
|
||||
RID_Proveedores = '{510572A1-E390-401D-A8CE-007F4104350C}';
|
||||
RID_Vendedores = '{DEDAD190-7EF1-42A4-BAED-CFFD9D5CED4D}';
|
||||
RID_DireccionesContacto = '{58A83B78-7C3F-4742-87CD-CC211F2D553F}';
|
||||
RID_ClientesDescuentos = '{BFBA6A41-1628-4808-B100-11561E0ED847}';
|
||||
RID_ProcedenciasCliente = '{E65DD5CD-347E-4C08-BB87-DDF77C45AEE6}';
|
||||
RID_GruposProveedor = '{4A8B2052-F645-428F-92D7-E8897E201BEC}';
|
||||
RID_Contactos_Refresh = '{A7344712-243B-40A9-A854-7EB1096E03B0}';
|
||||
RID_DarEmpresasContacto = '{09803035-EC1E-47D5-A44A-009646FD810D}';
|
||||
RID_PersonalContacto = '{9189C512-E42F-4A70-8091-BCB24B5EBDB3}';
|
||||
RID_DarTiendaDeUsuario = '{205D95B2-634E-4887-85A6-48C018B77CA7}';
|
||||
RID_SubCuentasContacto = '{86A29408-F7FB-4C21-BEEA-95E6A6176398}';
|
||||
RID_Contactos = '{95D8B1E2-A325-44C9-A3DC-F05D03116753}';
|
||||
RID_GruposCliente = '{12CC2A2C-509B-4174-A817-B16E0B957461}';
|
||||
RID_DatosBancarios = '{048A41E8-4348-4713-B083-FE719C79C9F4}';
|
||||
RID_Clientes = '{1109FEE2-1CF8-43B7-9773-345F3C36E79F}';
|
||||
RID_Proveedores = '{AA7D0872-D624-4727-A3C5-E0F1241A2FD6}';
|
||||
RID_Vendedores = '{6A7D49D7-5C67-4FF9-B93D-EFB25F042DC3}';
|
||||
RID_DireccionesContacto = '{453DA476-B83F-4A42-B884-B7F8D4F60349}';
|
||||
RID_ClientesDescuentos = '{39BC1677-2432-4545-BF77-D0188412AA86}';
|
||||
RID_ProcedenciasCliente = '{DC1F0246-260A-407D-BA81-7AF544932A02}';
|
||||
RID_GruposProveedor = '{A887BBFA-2DFE-4770-9EB3-4681435D7634}';
|
||||
RID_Contactos_Refresh = '{FDA7E99C-3497-43F5-85A6-EAEE0F1D54DE}';
|
||||
|
||||
{ Data table names }
|
||||
nme_DarEmpresasContacto = 'DarEmpresasContacto';
|
||||
nme_PersonalContacto = 'PersonalContacto';
|
||||
nme_DarTiendaDeUsuario = 'DarTiendaDeUsuario';
|
||||
nme_SubCuentasContacto = 'SubCuentasContacto';
|
||||
@ -40,6 +42,12 @@ const
|
||||
nme_GruposProveedor = 'GruposProveedor';
|
||||
nme_Contactos_Refresh = 'Contactos_Refresh';
|
||||
|
||||
{ DarEmpresasContacto fields }
|
||||
fld_DarEmpresasContactoID_EMPRESA = 'ID_EMPRESA';
|
||||
|
||||
{ DarEmpresasContacto field indexes }
|
||||
idx_DarEmpresasContactoID_EMPRESA = 0;
|
||||
|
||||
{ PersonalContacto fields }
|
||||
fld_PersonalContactoID = 'ID';
|
||||
fld_PersonalContactoID_CONTACTO = 'ID_CONTACTO';
|
||||
@ -212,6 +220,7 @@ const
|
||||
fld_ClientesVENCIMIENTO_FACTURAS_1 = 'VENCIMIENTO_FACTURAS_1';
|
||||
fld_ClientesVENCIMIENTO_FACTURAS_2 = 'VENCIMIENTO_FACTURAS_2';
|
||||
fld_ClientesVENCIMIENTO_FACTURAS_3 = 'VENCIMIENTO_FACTURAS_3';
|
||||
fld_ClientesLISTA_NOMBRES = 'LISTA_NOMBRES';
|
||||
|
||||
{ Clientes field indexes }
|
||||
idx_ClientesID = 0;
|
||||
@ -255,6 +264,7 @@ const
|
||||
idx_ClientesVENCIMIENTO_FACTURAS_1 = 38;
|
||||
idx_ClientesVENCIMIENTO_FACTURAS_2 = 39;
|
||||
idx_ClientesVENCIMIENTO_FACTURAS_3 = 40;
|
||||
idx_ClientesLISTA_NOMBRES = 41;
|
||||
|
||||
{ Proveedores fields }
|
||||
fld_ProveedoresID = 'ID';
|
||||
@ -517,9 +527,44 @@ const
|
||||
idx_Contactos_RefreshPERSONA_CONTACTO = 20;
|
||||
|
||||
type
|
||||
{ IDarEmpresasContacto }
|
||||
IDarEmpresasContacto = interface(IDAStronglyTypedDataTable)
|
||||
['{15184075-B134-4220-9D05-92A49F766EEE}']
|
||||
{ Property getters and setters }
|
||||
function GetID_EMPRESAValue: Integer;
|
||||
procedure SetID_EMPRESAValue(const aValue: Integer);
|
||||
function GetID_EMPRESAIsNull: Boolean;
|
||||
procedure SetID_EMPRESAIsNull(const aValue: Boolean);
|
||||
|
||||
|
||||
{ Properties }
|
||||
property ID_EMPRESA: Integer read GetID_EMPRESAValue write SetID_EMPRESAValue;
|
||||
property ID_EMPRESAIsNull: Boolean read GetID_EMPRESAIsNull write SetID_EMPRESAIsNull;
|
||||
end;
|
||||
|
||||
{ TDarEmpresasContactoDataTableRules }
|
||||
TDarEmpresasContactoDataTableRules = class(TIntfObjectDADataTableRules, IDarEmpresasContacto)
|
||||
private
|
||||
protected
|
||||
{ Property getters and setters }
|
||||
function GetID_EMPRESAValue: Integer; virtual;
|
||||
procedure SetID_EMPRESAValue(const aValue: Integer); virtual;
|
||||
function GetID_EMPRESAIsNull: Boolean; virtual;
|
||||
procedure SetID_EMPRESAIsNull(const aValue: Boolean); virtual;
|
||||
|
||||
{ Properties }
|
||||
property ID_EMPRESA: Integer read GetID_EMPRESAValue write SetID_EMPRESAValue;
|
||||
property ID_EMPRESAIsNull: Boolean read GetID_EMPRESAIsNull write SetID_EMPRESAIsNull;
|
||||
|
||||
public
|
||||
constructor Create(aDataTable: TDADataTable); override;
|
||||
destructor Destroy; override;
|
||||
|
||||
end;
|
||||
|
||||
{ IPersonalContacto }
|
||||
IPersonalContacto = interface(IDAStronglyTypedDataTable)
|
||||
['{DEAA6039-614F-4B15-B4F2-F9C9B4DB3A15}']
|
||||
['{0859C40F-90F2-4929-8D50-2265CA86A830}']
|
||||
{ Property getters and setters }
|
||||
function GetIDValue: Integer;
|
||||
procedure SetIDValue(const aValue: Integer);
|
||||
@ -662,7 +707,7 @@ type
|
||||
|
||||
{ IDarTiendaDeUsuario }
|
||||
IDarTiendaDeUsuario = interface(IDAStronglyTypedDataTable)
|
||||
['{88F010C0-E12E-4427-8C13-90DCB2CBF53C}']
|
||||
['{22E99E1B-0398-4E25-A39B-2957E583DB52}']
|
||||
{ Property getters and setters }
|
||||
function GetID_TIENDAValue: Integer;
|
||||
procedure SetID_TIENDAValue(const aValue: Integer);
|
||||
@ -697,7 +742,7 @@ type
|
||||
|
||||
{ ISubCuentasContacto }
|
||||
ISubCuentasContacto = interface(IDAStronglyTypedDataTable)
|
||||
['{835A0070-997F-416F-9718-CB82124338A8}']
|
||||
['{63F82DF4-9976-41A1-8FF3-BAF5E027E3BF}']
|
||||
{ Property getters and setters }
|
||||
function GetIDValue: Integer;
|
||||
procedure SetIDValue(const aValue: Integer);
|
||||
@ -792,7 +837,7 @@ type
|
||||
|
||||
{ IContactos }
|
||||
IContactos = interface(IDAStronglyTypedDataTable)
|
||||
['{B479C112-135D-46D0-B72B-2A46C8D32A87}']
|
||||
['{B5B0B727-28C1-4323-836F-036FC3860F72}']
|
||||
{ Property getters and setters }
|
||||
function GetIDValue: Integer;
|
||||
procedure SetIDValue(const aValue: Integer);
|
||||
@ -1115,7 +1160,7 @@ type
|
||||
|
||||
{ IGruposCliente }
|
||||
IGruposCliente = interface(IDAStronglyTypedDataTable)
|
||||
['{F4F42BF3-C319-4CAC-A11E-435ACF830CC5}']
|
||||
['{03F52C3C-90E8-4BBD-9087-BB76E72521D3}']
|
||||
{ Property getters and setters }
|
||||
function GetIDValue: Integer;
|
||||
procedure SetIDValue(const aValue: Integer);
|
||||
@ -1162,7 +1207,7 @@ type
|
||||
|
||||
{ IDatosBancarios }
|
||||
IDatosBancarios = interface(IDAStronglyTypedDataTable)
|
||||
['{5BC08B80-5030-40F7-92FB-59256E2C0E75}']
|
||||
['{7B95F875-C61F-418B-B145-C0790E885DFF}']
|
||||
{ Property getters and setters }
|
||||
function GetIDValue: Integer;
|
||||
procedure SetIDValue(const aValue: Integer);
|
||||
@ -1293,7 +1338,7 @@ type
|
||||
|
||||
{ IClientes }
|
||||
IClientes = interface(IDAStronglyTypedDataTable)
|
||||
['{48D18C28-B5EE-4C37-B313-A8AF373F3D64}']
|
||||
['{907442E0-5E45-4C9E-8C47-A97FA8009258}']
|
||||
{ Property getters and setters }
|
||||
function GetIDValue: Integer;
|
||||
procedure SetIDValue(const aValue: Integer);
|
||||
@ -1458,6 +1503,10 @@ type
|
||||
procedure SetVENCIMIENTO_FACTURAS_3Value(const aValue: Integer);
|
||||
function GetVENCIMIENTO_FACTURAS_3IsNull: Boolean;
|
||||
procedure SetVENCIMIENTO_FACTURAS_3IsNull(const aValue: Boolean);
|
||||
function GetLISTA_NOMBRESValue: String;
|
||||
procedure SetLISTA_NOMBRESValue(const aValue: String);
|
||||
function GetLISTA_NOMBRESIsNull: Boolean;
|
||||
procedure SetLISTA_NOMBRESIsNull(const aValue: Boolean);
|
||||
|
||||
|
||||
{ Properties }
|
||||
@ -1543,6 +1592,8 @@ type
|
||||
property VENCIMIENTO_FACTURAS_2IsNull: Boolean read GetVENCIMIENTO_FACTURAS_2IsNull write SetVENCIMIENTO_FACTURAS_2IsNull;
|
||||
property VENCIMIENTO_FACTURAS_3: Integer read GetVENCIMIENTO_FACTURAS_3Value write SetVENCIMIENTO_FACTURAS_3Value;
|
||||
property VENCIMIENTO_FACTURAS_3IsNull: Boolean read GetVENCIMIENTO_FACTURAS_3IsNull write SetVENCIMIENTO_FACTURAS_3IsNull;
|
||||
property LISTA_NOMBRES: String read GetLISTA_NOMBRESValue write SetLISTA_NOMBRESValue;
|
||||
property LISTA_NOMBRESIsNull: Boolean read GetLISTA_NOMBRESIsNull write SetLISTA_NOMBRESIsNull;
|
||||
end;
|
||||
|
||||
{ TClientesDataTableRules }
|
||||
@ -1715,6 +1766,10 @@ type
|
||||
procedure SetVENCIMIENTO_FACTURAS_3Value(const aValue: Integer); virtual;
|
||||
function GetVENCIMIENTO_FACTURAS_3IsNull: Boolean; virtual;
|
||||
procedure SetVENCIMIENTO_FACTURAS_3IsNull(const aValue: Boolean); virtual;
|
||||
function GetLISTA_NOMBRESValue: String; virtual;
|
||||
procedure SetLISTA_NOMBRESValue(const aValue: String); virtual;
|
||||
function GetLISTA_NOMBRESIsNull: Boolean; virtual;
|
||||
procedure SetLISTA_NOMBRESIsNull(const aValue: Boolean); virtual;
|
||||
|
||||
{ Properties }
|
||||
property ID: Integer read GetIDValue write SetIDValue;
|
||||
@ -1799,6 +1854,8 @@ type
|
||||
property VENCIMIENTO_FACTURAS_2IsNull: Boolean read GetVENCIMIENTO_FACTURAS_2IsNull write SetVENCIMIENTO_FACTURAS_2IsNull;
|
||||
property VENCIMIENTO_FACTURAS_3: Integer read GetVENCIMIENTO_FACTURAS_3Value write SetVENCIMIENTO_FACTURAS_3Value;
|
||||
property VENCIMIENTO_FACTURAS_3IsNull: Boolean read GetVENCIMIENTO_FACTURAS_3IsNull write SetVENCIMIENTO_FACTURAS_3IsNull;
|
||||
property LISTA_NOMBRES: String read GetLISTA_NOMBRESValue write SetLISTA_NOMBRESValue;
|
||||
property LISTA_NOMBRESIsNull: Boolean read GetLISTA_NOMBRESIsNull write SetLISTA_NOMBRESIsNull;
|
||||
|
||||
public
|
||||
constructor Create(aDataTable: TDADataTable); override;
|
||||
@ -1808,7 +1865,7 @@ type
|
||||
|
||||
{ IProveedores }
|
||||
IProveedores = interface(IDAStronglyTypedDataTable)
|
||||
['{A92DE88A-7E08-4CD2-9E99-757ECD192475}']
|
||||
['{E1E5CFA4-89CC-438A-B220-4A140E5FE96D}']
|
||||
{ Property getters and setters }
|
||||
function GetIDValue: Integer;
|
||||
procedure SetIDValue(const aValue: Integer);
|
||||
@ -2335,7 +2392,7 @@ type
|
||||
|
||||
{ IVendedores }
|
||||
IVendedores = interface(IDAStronglyTypedDataTable)
|
||||
['{D1EF06EF-DA47-4324-AA3F-481CB71ACFDD}']
|
||||
['{DC80840F-D2B9-4F7A-9544-8A6903CAC9DC}']
|
||||
{ Property getters and setters }
|
||||
function GetIDValue: Integer;
|
||||
procedure SetIDValue(const aValue: Integer);
|
||||
@ -2682,7 +2739,7 @@ type
|
||||
|
||||
{ IDireccionesContacto }
|
||||
IDireccionesContacto = interface(IDAStronglyTypedDataTable)
|
||||
['{333D0482-701A-4BB6-AA51-1F1F34D6A8F1}']
|
||||
['{7D5F30E6-D2B7-4059-A9CC-9B91F1F8EC8F}']
|
||||
{ Property getters and setters }
|
||||
function GetIDValue: Integer;
|
||||
procedure SetIDValue(const aValue: Integer);
|
||||
@ -2909,7 +2966,7 @@ type
|
||||
|
||||
{ IClientesDescuentos }
|
||||
IClientesDescuentos = interface(IDAStronglyTypedDataTable)
|
||||
['{A1F86ADF-8673-4E8F-B3C4-F864F7A5FEBB}']
|
||||
['{3FB8ABE8-0F32-4524-8CBF-5DA9A4660799}']
|
||||
{ Property getters and setters }
|
||||
function GetIDValue: Integer;
|
||||
procedure SetIDValue(const aValue: Integer);
|
||||
@ -2992,7 +3049,7 @@ type
|
||||
|
||||
{ IProcedenciasCliente }
|
||||
IProcedenciasCliente = interface(IDAStronglyTypedDataTable)
|
||||
['{9789278E-8F6D-427E-82D1-6386D8AB21AE}']
|
||||
['{C22BEAD6-90E2-4476-84D8-5FC9FB8101CF}']
|
||||
{ Property getters and setters }
|
||||
function GetIDValue: Integer;
|
||||
procedure SetIDValue(const aValue: Integer);
|
||||
@ -3039,7 +3096,7 @@ type
|
||||
|
||||
{ IGruposProveedor }
|
||||
IGruposProveedor = interface(IDAStronglyTypedDataTable)
|
||||
['{F0DACCCA-7AB3-4862-BD6D-6D9C401378AA}']
|
||||
['{02C2EFE2-2CD9-421A-86AD-4CFC9ABA08CF}']
|
||||
{ Property getters and setters }
|
||||
function GetIDValue: Integer;
|
||||
procedure SetIDValue(const aValue: Integer);
|
||||
@ -3086,7 +3143,7 @@ type
|
||||
|
||||
{ IContactos_Refresh }
|
||||
IContactos_Refresh = interface(IDAStronglyTypedDataTable)
|
||||
['{6041072A-9CB7-4096-88CF-5069C7EA0833}']
|
||||
['{E63F3A20-96A8-466F-AF91-59759697CC5A}']
|
||||
{ Property getters and setters }
|
||||
function GetIDValue: Integer;
|
||||
procedure SetIDValue(const aValue: Integer);
|
||||
@ -3363,6 +3420,39 @@ implementation
|
||||
|
||||
uses Variants, uROBinaryHelpers;
|
||||
|
||||
{ TDarEmpresasContactoDataTableRules }
|
||||
constructor TDarEmpresasContactoDataTableRules.Create(aDataTable: TDADataTable);
|
||||
begin
|
||||
inherited;
|
||||
end;
|
||||
|
||||
destructor TDarEmpresasContactoDataTableRules.Destroy;
|
||||
begin
|
||||
inherited;
|
||||
end;
|
||||
|
||||
function TDarEmpresasContactoDataTableRules.GetID_EMPRESAValue: Integer;
|
||||
begin
|
||||
result := DataTable.Fields[idx_DarEmpresasContactoID_EMPRESA].AsInteger;
|
||||
end;
|
||||
|
||||
procedure TDarEmpresasContactoDataTableRules.SetID_EMPRESAValue(const aValue: Integer);
|
||||
begin
|
||||
DataTable.Fields[idx_DarEmpresasContactoID_EMPRESA].AsInteger := aValue;
|
||||
end;
|
||||
|
||||
function TDarEmpresasContactoDataTableRules.GetID_EMPRESAIsNull: boolean;
|
||||
begin
|
||||
result := DataTable.Fields[idx_DarEmpresasContactoID_EMPRESA].IsNull;
|
||||
end;
|
||||
|
||||
procedure TDarEmpresasContactoDataTableRules.SetID_EMPRESAIsNull(const aValue: Boolean);
|
||||
begin
|
||||
if aValue then
|
||||
DataTable.Fields[idx_DarEmpresasContactoID_EMPRESA].AsVariant := Null;
|
||||
end;
|
||||
|
||||
|
||||
{ TPersonalContactoDataTableRules }
|
||||
constructor TPersonalContactoDataTableRules.Create(aDataTable: TDADataTable);
|
||||
begin
|
||||
@ -5434,6 +5524,27 @@ begin
|
||||
DataTable.Fields[idx_ClientesVENCIMIENTO_FACTURAS_3].AsVariant := Null;
|
||||
end;
|
||||
|
||||
function TClientesDataTableRules.GetLISTA_NOMBRESValue: String;
|
||||
begin
|
||||
result := DataTable.Fields[idx_ClientesLISTA_NOMBRES].AsString;
|
||||
end;
|
||||
|
||||
procedure TClientesDataTableRules.SetLISTA_NOMBRESValue(const aValue: String);
|
||||
begin
|
||||
DataTable.Fields[idx_ClientesLISTA_NOMBRES].AsString := aValue;
|
||||
end;
|
||||
|
||||
function TClientesDataTableRules.GetLISTA_NOMBRESIsNull: boolean;
|
||||
begin
|
||||
result := DataTable.Fields[idx_ClientesLISTA_NOMBRES].IsNull;
|
||||
end;
|
||||
|
||||
procedure TClientesDataTableRules.SetLISTA_NOMBRESIsNull(const aValue: Boolean);
|
||||
begin
|
||||
if aValue then
|
||||
DataTable.Fields[idx_ClientesLISTA_NOMBRES].AsVariant := Null;
|
||||
end;
|
||||
|
||||
|
||||
{ TProveedoresDataTableRules }
|
||||
constructor TProveedoresDataTableRules.Create(aDataTable: TDADataTable);
|
||||
@ -7984,6 +8095,7 @@ end;
|
||||
|
||||
|
||||
initialization
|
||||
RegisterDataTableRules(RID_DarEmpresasContacto, TDarEmpresasContactoDataTableRules);
|
||||
RegisterDataTableRules(RID_PersonalContacto, TPersonalContactoDataTableRules);
|
||||
RegisterDataTableRules(RID_DarTiendaDeUsuario, TDarTiendaDeUsuarioDataTableRules);
|
||||
RegisterDataTableRules(RID_SubCuentasContacto, TSubCuentasContactoDataTableRules);
|
||||
|
||||
@ -9,25 +9,60 @@ 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_PersonalContactoDelta = '{5E077D9B-D4D9-4B7D-B1F4-8236A79DC607}';
|
||||
RID_DarTiendaDeUsuarioDelta = '{7AFE4420-13DD-420E-A8DE-93464EF93F59}';
|
||||
RID_SubCuentasContactoDelta = '{0FAD99B4-0F6F-43AB-A6A2-D05725700767}';
|
||||
RID_ContactosDelta = '{29E47B8B-30E6-4B4E-B218-6E3CB867BDC8}';
|
||||
RID_GruposClienteDelta = '{8B15524D-83C1-4F38-ACCE-2A0CA45DBFEF}';
|
||||
RID_DatosBancariosDelta = '{AE0DA606-F1FC-4725-94C3-F1F22858DF25}';
|
||||
RID_ClientesDelta = '{6CD74F52-43BA-4DDD-9626-374A140E486C}';
|
||||
RID_ProveedoresDelta = '{45BEDF42-D57A-4B27-9A39-DAA56D0EFDAA}';
|
||||
RID_VendedoresDelta = '{365B6366-050C-443E-8A11-66EB0D7F9E0B}';
|
||||
RID_DireccionesContactoDelta = '{BFBF154C-C62B-4DFC-B816-4C7649222909}';
|
||||
RID_ClientesDescuentosDelta = '{75E242C6-00BE-4179-AE7F-4393F5AE9B4A}';
|
||||
RID_ProcedenciasClienteDelta = '{1D54F076-4D87-414E-B567-2052949AF687}';
|
||||
RID_GruposProveedorDelta = '{C3A6BA6F-15EC-486F-8212-0CEB2A66D6A1}';
|
||||
RID_Contactos_RefreshDelta = '{F1DF7DB2-6FC0-43D6-B14B-E6E6DE744DE4}';
|
||||
RID_DarEmpresasContactoDelta = '{A6433122-90DA-40E1-A8E3-B5153BDF9037}';
|
||||
RID_PersonalContactoDelta = '{0F3905F8-664E-4284-A5FB-C7C298C4EE6D}';
|
||||
RID_DarTiendaDeUsuarioDelta = '{F78868ED-F8C1-43B2-8954-448FD9605F08}';
|
||||
RID_SubCuentasContactoDelta = '{68A1DB34-969D-4C55-BCF3-5BBDD649AE92}';
|
||||
RID_ContactosDelta = '{80C193EA-B4F4-4D86-B164-4DA3ACFDAB55}';
|
||||
RID_GruposClienteDelta = '{DDFB3C1B-E0C2-419C-8FC8-48D12D089F9E}';
|
||||
RID_DatosBancariosDelta = '{889D270E-ED85-4856-9C7E-C499F12F76F4}';
|
||||
RID_ClientesDelta = '{4DB9A1C2-1B72-4CE3-A940-46DCDE7F67E2}';
|
||||
RID_ProveedoresDelta = '{63D99AC7-1B5F-42AE-91EC-107B40310F49}';
|
||||
RID_VendedoresDelta = '{28D0D946-42EC-4A3F-9AFB-8C16BB22737E}';
|
||||
RID_DireccionesContactoDelta = '{D47CBF20-38AE-4F7E-A6C7-44CBA5444C2D}';
|
||||
RID_ClientesDescuentosDelta = '{475BA059-0898-4AC0-AAFD-5DEB00D99626}';
|
||||
RID_ProcedenciasClienteDelta = '{14F77428-ACCF-4AF1-86C3-88A977F1C5E6}';
|
||||
RID_GruposProveedorDelta = '{8B49F5CF-4C5A-4E6B-B66B-1A50F003E0CD}';
|
||||
RID_Contactos_RefreshDelta = '{332B4E11-5924-4DE0-B89C-937B51D7E7A9}';
|
||||
|
||||
type
|
||||
{ IDarEmpresasContactoDelta }
|
||||
IDarEmpresasContactoDelta = interface(IDarEmpresasContacto)
|
||||
['{A6433122-90DA-40E1-A8E3-B5153BDF9037}']
|
||||
{ Property getters and setters }
|
||||
function GetOldID_EMPRESAValue : Integer;
|
||||
|
||||
{ Properties }
|
||||
property OldID_EMPRESA : Integer read GetOldID_EMPRESAValue;
|
||||
end;
|
||||
|
||||
{ TDarEmpresasContactoBusinessProcessorRules }
|
||||
TDarEmpresasContactoBusinessProcessorRules = class(TDABusinessProcessorRules, IDarEmpresasContacto, IDarEmpresasContactoDelta)
|
||||
private
|
||||
protected
|
||||
{ Property getters and setters }
|
||||
function GetID_EMPRESAValue: Integer; virtual;
|
||||
function GetID_EMPRESAIsNull: Boolean; virtual;
|
||||
function GetOldID_EMPRESAValue: Integer; virtual;
|
||||
function GetOldID_EMPRESAIsNull: Boolean; virtual;
|
||||
procedure SetID_EMPRESAValue(const aValue: Integer); virtual;
|
||||
procedure SetID_EMPRESAIsNull(const aValue: Boolean); virtual;
|
||||
|
||||
{ Properties }
|
||||
property ID_EMPRESA : Integer read GetID_EMPRESAValue write SetID_EMPRESAValue;
|
||||
property ID_EMPRESAIsNull : Boolean read GetID_EMPRESAIsNull write SetID_EMPRESAIsNull;
|
||||
property OldID_EMPRESA : Integer read GetOldID_EMPRESAValue;
|
||||
property OldID_EMPRESAIsNull : Boolean read GetOldID_EMPRESAIsNull;
|
||||
|
||||
public
|
||||
constructor Create(aBusinessProcessor: TDABusinessProcessor); override;
|
||||
destructor Destroy; override;
|
||||
|
||||
end;
|
||||
|
||||
{ IPersonalContactoDelta }
|
||||
IPersonalContactoDelta = interface(IPersonalContacto)
|
||||
['{5E077D9B-D4D9-4B7D-B1F4-8236A79DC607}']
|
||||
['{0F3905F8-664E-4284-A5FB-C7C298C4EE6D}']
|
||||
{ Property getters and setters }
|
||||
function GetOldIDValue : Integer;
|
||||
function GetOldID_CONTACTOValue : Integer;
|
||||
@ -169,7 +204,7 @@ type
|
||||
|
||||
{ IDarTiendaDeUsuarioDelta }
|
||||
IDarTiendaDeUsuarioDelta = interface(IDarTiendaDeUsuario)
|
||||
['{7AFE4420-13DD-420E-A8DE-93464EF93F59}']
|
||||
['{F78868ED-F8C1-43B2-8954-448FD9605F08}']
|
||||
{ Property getters and setters }
|
||||
function GetOldID_TIENDAValue : Integer;
|
||||
|
||||
@ -203,7 +238,7 @@ type
|
||||
|
||||
{ ISubCuentasContactoDelta }
|
||||
ISubCuentasContactoDelta = interface(ISubCuentasContacto)
|
||||
['{0FAD99B4-0F6F-43AB-A6A2-D05725700767}']
|
||||
['{68A1DB34-969D-4C55-BCF3-5BBDD649AE92}']
|
||||
{ Property getters and setters }
|
||||
function GetOldIDValue : Integer;
|
||||
function GetOldREF_SUBCUENTAValue : String;
|
||||
@ -297,7 +332,7 @@ type
|
||||
|
||||
{ IContactosDelta }
|
||||
IContactosDelta = interface(IContactos)
|
||||
['{29E47B8B-30E6-4B4E-B218-6E3CB867BDC8}']
|
||||
['{80C193EA-B4F4-4D86-B164-4DA3ACFDAB55}']
|
||||
{ Property getters and setters }
|
||||
function GetOldIDValue : Integer;
|
||||
function GetOldID_CATEGORIAValue : Integer;
|
||||
@ -620,7 +655,7 @@ type
|
||||
|
||||
{ IGruposClienteDelta }
|
||||
IGruposClienteDelta = interface(IGruposCliente)
|
||||
['{8B15524D-83C1-4F38-ACCE-2A0CA45DBFEF}']
|
||||
['{DDFB3C1B-E0C2-419C-8FC8-48D12D089F9E}']
|
||||
{ Property getters and setters }
|
||||
function GetOldIDValue : Integer;
|
||||
function GetOldDESCRIPCIONValue : String;
|
||||
@ -666,7 +701,7 @@ type
|
||||
|
||||
{ IDatosBancariosDelta }
|
||||
IDatosBancariosDelta = interface(IDatosBancarios)
|
||||
['{AE0DA606-F1FC-4725-94C3-F1F22858DF25}']
|
||||
['{889D270E-ED85-4856-9C7E-C499F12F76F4}']
|
||||
{ Property getters and setters }
|
||||
function GetOldIDValue : Integer;
|
||||
function GetOldID_CONTACTOValue : Integer;
|
||||
@ -796,7 +831,7 @@ type
|
||||
|
||||
{ IClientesDelta }
|
||||
IClientesDelta = interface(IClientes)
|
||||
['{6CD74F52-43BA-4DDD-9626-374A140E486C}']
|
||||
['{4DB9A1C2-1B72-4CE3-A940-46DCDE7F67E2}']
|
||||
{ Property getters and setters }
|
||||
function GetOldIDValue : Integer;
|
||||
function GetOldID_CATEGORIAValue : Integer;
|
||||
@ -839,6 +874,7 @@ type
|
||||
function GetOldVENCIMIENTO_FACTURAS_1Value : Integer;
|
||||
function GetOldVENCIMIENTO_FACTURAS_2Value : Integer;
|
||||
function GetOldVENCIMIENTO_FACTURAS_3Value : Integer;
|
||||
function GetOldLISTA_NOMBRESValue : String;
|
||||
|
||||
{ Properties }
|
||||
property OldID : Integer read GetOldIDValue;
|
||||
@ -882,6 +918,7 @@ type
|
||||
property OldVENCIMIENTO_FACTURAS_1 : Integer read GetOldVENCIMIENTO_FACTURAS_1Value;
|
||||
property OldVENCIMIENTO_FACTURAS_2 : Integer read GetOldVENCIMIENTO_FACTURAS_2Value;
|
||||
property OldVENCIMIENTO_FACTURAS_3 : Integer read GetOldVENCIMIENTO_FACTURAS_3Value;
|
||||
property OldLISTA_NOMBRES : String read GetOldLISTA_NOMBRESValue;
|
||||
end;
|
||||
|
||||
{ TClientesBusinessProcessorRules }
|
||||
@ -1136,6 +1173,12 @@ type
|
||||
function GetOldVENCIMIENTO_FACTURAS_3IsNull: Boolean; virtual;
|
||||
procedure SetVENCIMIENTO_FACTURAS_3Value(const aValue: Integer); virtual;
|
||||
procedure SetVENCIMIENTO_FACTURAS_3IsNull(const aValue: Boolean); virtual;
|
||||
function GetLISTA_NOMBRESValue: String; virtual;
|
||||
function GetLISTA_NOMBRESIsNull: Boolean; virtual;
|
||||
function GetOldLISTA_NOMBRESValue: String; virtual;
|
||||
function GetOldLISTA_NOMBRESIsNull: Boolean; virtual;
|
||||
procedure SetLISTA_NOMBRESValue(const aValue: String); virtual;
|
||||
procedure SetLISTA_NOMBRESIsNull(const aValue: Boolean); virtual;
|
||||
|
||||
{ Properties }
|
||||
property ID : Integer read GetIDValue write SetIDValue;
|
||||
@ -1302,6 +1345,10 @@ type
|
||||
property VENCIMIENTO_FACTURAS_3IsNull : Boolean read GetVENCIMIENTO_FACTURAS_3IsNull write SetVENCIMIENTO_FACTURAS_3IsNull;
|
||||
property OldVENCIMIENTO_FACTURAS_3 : Integer read GetOldVENCIMIENTO_FACTURAS_3Value;
|
||||
property OldVENCIMIENTO_FACTURAS_3IsNull : Boolean read GetOldVENCIMIENTO_FACTURAS_3IsNull;
|
||||
property LISTA_NOMBRES : String read GetLISTA_NOMBRESValue write SetLISTA_NOMBRESValue;
|
||||
property LISTA_NOMBRESIsNull : Boolean read GetLISTA_NOMBRESIsNull write SetLISTA_NOMBRESIsNull;
|
||||
property OldLISTA_NOMBRES : String read GetOldLISTA_NOMBRESValue;
|
||||
property OldLISTA_NOMBRESIsNull : Boolean read GetOldLISTA_NOMBRESIsNull;
|
||||
|
||||
public
|
||||
constructor Create(aBusinessProcessor: TDABusinessProcessor); override;
|
||||
@ -1311,7 +1358,7 @@ type
|
||||
|
||||
{ IProveedoresDelta }
|
||||
IProveedoresDelta = interface(IProveedores)
|
||||
['{45BEDF42-D57A-4B27-9A39-DAA56D0EFDAA}']
|
||||
['{63D99AC7-1B5F-42AE-91EC-107B40310F49}']
|
||||
{ Property getters and setters }
|
||||
function GetOldIDValue : Integer;
|
||||
function GetOldID_CATEGORIAValue : Integer;
|
||||
@ -1838,7 +1885,7 @@ type
|
||||
|
||||
{ IVendedoresDelta }
|
||||
IVendedoresDelta = interface(IVendedores)
|
||||
['{365B6366-050C-443E-8A11-66EB0D7F9E0B}']
|
||||
['{28D0D946-42EC-4A3F-9AFB-8C16BB22737E}']
|
||||
{ Property getters and setters }
|
||||
function GetOldIDValue : Integer;
|
||||
function GetOldID_CATEGORIAValue : Integer;
|
||||
@ -2185,7 +2232,7 @@ type
|
||||
|
||||
{ IDireccionesContactoDelta }
|
||||
IDireccionesContactoDelta = interface(IDireccionesContacto)
|
||||
['{BFBF154C-C62B-4DFC-B816-4C7649222909}']
|
||||
['{D47CBF20-38AE-4F7E-A6C7-44CBA5444C2D}']
|
||||
{ Property getters and setters }
|
||||
function GetOldIDValue : Integer;
|
||||
function GetOldID_CONTACTOValue : Integer;
|
||||
@ -2412,7 +2459,7 @@ type
|
||||
|
||||
{ IClientesDescuentosDelta }
|
||||
IClientesDescuentosDelta = interface(IClientesDescuentos)
|
||||
['{75E242C6-00BE-4179-AE7F-4393F5AE9B4A}']
|
||||
['{475BA059-0898-4AC0-AAFD-5DEB00D99626}']
|
||||
{ Property getters and setters }
|
||||
function GetOldIDValue : Integer;
|
||||
function GetOldID_CLIENTEValue : Integer;
|
||||
@ -2494,7 +2541,7 @@ type
|
||||
|
||||
{ IProcedenciasClienteDelta }
|
||||
IProcedenciasClienteDelta = interface(IProcedenciasCliente)
|
||||
['{1D54F076-4D87-414E-B567-2052949AF687}']
|
||||
['{14F77428-ACCF-4AF1-86C3-88A977F1C5E6}']
|
||||
{ Property getters and setters }
|
||||
function GetOldIDValue : Integer;
|
||||
function GetOldDESCRIPCIONValue : String;
|
||||
@ -2540,7 +2587,7 @@ type
|
||||
|
||||
{ IGruposProveedorDelta }
|
||||
IGruposProveedorDelta = interface(IGruposProveedor)
|
||||
['{C3A6BA6F-15EC-486F-8212-0CEB2A66D6A1}']
|
||||
['{8B49F5CF-4C5A-4E6B-B66B-1A50F003E0CD}']
|
||||
{ Property getters and setters }
|
||||
function GetOldIDValue : Integer;
|
||||
function GetOldDESCRIPCIONValue : String;
|
||||
@ -2586,7 +2633,7 @@ type
|
||||
|
||||
{ IContactos_RefreshDelta }
|
||||
IContactos_RefreshDelta = interface(IContactos_Refresh)
|
||||
['{F1DF7DB2-6FC0-43D6-B14B-E6E6DE744DE4}']
|
||||
['{332B4E11-5924-4DE0-B89C-937B51D7E7A9}']
|
||||
{ Property getters and setters }
|
||||
function GetOldIDValue : Integer;
|
||||
function GetOldNIF_CIFValue : String;
|
||||
@ -2864,6 +2911,49 @@ implementation
|
||||
uses
|
||||
Variants, uROBinaryHelpers, uDAInterfaces;
|
||||
|
||||
{ TDarEmpresasContactoBusinessProcessorRules }
|
||||
constructor TDarEmpresasContactoBusinessProcessorRules.Create(aBusinessProcessor: TDABusinessProcessor);
|
||||
begin
|
||||
inherited;
|
||||
end;
|
||||
|
||||
destructor TDarEmpresasContactoBusinessProcessorRules.Destroy;
|
||||
begin
|
||||
inherited;
|
||||
end;
|
||||
|
||||
function TDarEmpresasContactoBusinessProcessorRules.GetID_EMPRESAValue: Integer;
|
||||
begin
|
||||
result := BusinessProcessor.CurrentChange.NewValueByName[fld_DarEmpresasContactoID_EMPRESA];
|
||||
end;
|
||||
|
||||
function TDarEmpresasContactoBusinessProcessorRules.GetID_EMPRESAIsNull: Boolean;
|
||||
begin
|
||||
result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_DarEmpresasContactoID_EMPRESA]);
|
||||
end;
|
||||
|
||||
function TDarEmpresasContactoBusinessProcessorRules.GetOldID_EMPRESAValue: Integer;
|
||||
begin
|
||||
result := BusinessProcessor.CurrentChange.OldValueByName[fld_DarEmpresasContactoID_EMPRESA];
|
||||
end;
|
||||
|
||||
function TDarEmpresasContactoBusinessProcessorRules.GetOldID_EMPRESAIsNull: Boolean;
|
||||
begin
|
||||
result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_DarEmpresasContactoID_EMPRESA]);
|
||||
end;
|
||||
|
||||
procedure TDarEmpresasContactoBusinessProcessorRules.SetID_EMPRESAValue(const aValue: Integer);
|
||||
begin
|
||||
BusinessProcessor.CurrentChange.NewValueByName[fld_DarEmpresasContactoID_EMPRESA] := aValue;
|
||||
end;
|
||||
|
||||
procedure TDarEmpresasContactoBusinessProcessorRules.SetID_EMPRESAIsNull(const aValue: Boolean);
|
||||
begin
|
||||
if aValue then
|
||||
BusinessProcessor.CurrentChange.NewValueByName[fld_DarEmpresasContactoID_EMPRESA] := Null;
|
||||
end;
|
||||
|
||||
|
||||
{ TPersonalContactoBusinessProcessorRules }
|
||||
constructor TPersonalContactoBusinessProcessorRules.Create(aBusinessProcessor: TDABusinessProcessor);
|
||||
begin
|
||||
@ -5877,6 +5967,37 @@ begin
|
||||
BusinessProcessor.CurrentChange.NewValueByName[fld_ClientesVENCIMIENTO_FACTURAS_3] := Null;
|
||||
end;
|
||||
|
||||
function TClientesBusinessProcessorRules.GetLISTA_NOMBRESValue: String;
|
||||
begin
|
||||
result := BusinessProcessor.CurrentChange.NewValueByName[fld_ClientesLISTA_NOMBRES];
|
||||
end;
|
||||
|
||||
function TClientesBusinessProcessorRules.GetLISTA_NOMBRESIsNull: Boolean;
|
||||
begin
|
||||
result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_ClientesLISTA_NOMBRES]);
|
||||
end;
|
||||
|
||||
function TClientesBusinessProcessorRules.GetOldLISTA_NOMBRESValue: String;
|
||||
begin
|
||||
result := BusinessProcessor.CurrentChange.OldValueByName[fld_ClientesLISTA_NOMBRES];
|
||||
end;
|
||||
|
||||
function TClientesBusinessProcessorRules.GetOldLISTA_NOMBRESIsNull: Boolean;
|
||||
begin
|
||||
result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_ClientesLISTA_NOMBRES]);
|
||||
end;
|
||||
|
||||
procedure TClientesBusinessProcessorRules.SetLISTA_NOMBRESValue(const aValue: String);
|
||||
begin
|
||||
BusinessProcessor.CurrentChange.NewValueByName[fld_ClientesLISTA_NOMBRES] := aValue;
|
||||
end;
|
||||
|
||||
procedure TClientesBusinessProcessorRules.SetLISTA_NOMBRESIsNull(const aValue: Boolean);
|
||||
begin
|
||||
if aValue then
|
||||
BusinessProcessor.CurrentChange.NewValueByName[fld_ClientesLISTA_NOMBRES] := Null;
|
||||
end;
|
||||
|
||||
|
||||
{ TProveedoresBusinessProcessorRules }
|
||||
constructor TProveedoresBusinessProcessorRules.Create(aBusinessProcessor: TDABusinessProcessor);
|
||||
@ -9591,6 +9712,7 @@ end;
|
||||
|
||||
|
||||
initialization
|
||||
RegisterBusinessProcessorRules(RID_DarEmpresasContactoDelta, TDarEmpresasContactoBusinessProcessorRules);
|
||||
RegisterBusinessProcessorRules(RID_PersonalContactoDelta, TPersonalContactoBusinessProcessorRules);
|
||||
RegisterBusinessProcessorRules(RID_DarTiendaDeUsuarioDelta, TDarTiendaDeUsuarioBusinessProcessorRules);
|
||||
RegisterBusinessProcessorRules(RID_SubCuentasContactoDelta, TSubCuentasContactoBusinessProcessorRules);
|
||||
|
||||
@ -826,6 +826,10 @@ object srvContactos: TsrvContactos
|
||||
item
|
||||
DatasetField = 'VENCIMIENTO_FACTURAS_3'
|
||||
TableField = 'VENCIMIENTO_FACTURAS_3'
|
||||
end
|
||||
item
|
||||
DatasetField = 'LISTA_NOMBRES'
|
||||
TableField = 'LISTA_NOMBRES'
|
||||
end>
|
||||
end>
|
||||
Name = 'Clientes'
|
||||
@ -1059,6 +1063,12 @@ object srvContactos: TsrvContactos
|
||||
item
|
||||
Name = 'VENCIMIENTO_FACTURAS_3'
|
||||
DataType = datInteger
|
||||
end
|
||||
item
|
||||
Name = 'LISTA_NOMBRES'
|
||||
DataType = datString
|
||||
Size = 255
|
||||
DictionaryEntry = 'Clientes_LISTA_NOMBRES'
|
||||
end>
|
||||
end
|
||||
item
|
||||
@ -4184,6 +4194,12 @@ object srvContactos: TsrvContactos
|
||||
end
|
||||
object DataDictionary: TDADataDictionary
|
||||
Fields = <
|
||||
item
|
||||
Name = 'Clientes_LISTA_NOMBRES'
|
||||
DataType = datString
|
||||
Size = 255
|
||||
DisplayLabel = 'Otros nombres'
|
||||
end
|
||||
item
|
||||
Name = 'DatosBancarios_ID'
|
||||
DataType = datAutoInc
|
||||
|
||||
@ -59,6 +59,11 @@ inherited frViewClientes: TfrViewClientes
|
||||
Caption = 'Persona contacto'
|
||||
DataBinding.FieldName = 'PERSONA_CONTACTO'
|
||||
end
|
||||
object cxGridViewLISTA_NOMBRES: TcxGridDBColumn
|
||||
DataBinding.FieldName = 'LISTA_NOMBRES'
|
||||
BestFitMaxWidth = 60
|
||||
Width = 90
|
||||
end
|
||||
end
|
||||
end
|
||||
inherited frViewFiltroBase1: TfrViewFiltroBase
|
||||
@ -70,27 +75,15 @@ inherited frViewClientes: TfrViewClientes
|
||||
Width = 633
|
||||
ExplicitWidth = 633
|
||||
inherited txtFiltroTodo: TcxTextEdit
|
||||
Style.LookAndFeel.SkinName = ''
|
||||
StyleDisabled.LookAndFeel.SkinName = ''
|
||||
StyleFocused.LookAndFeel.SkinName = ''
|
||||
StyleHot.LookAndFeel.SkinName = ''
|
||||
ExplicitWidth = 661
|
||||
Width = 661
|
||||
end
|
||||
inherited edtFechaIniFiltro: TcxDateEdit
|
||||
Style.LookAndFeel.SkinName = ''
|
||||
StyleDisabled.LookAndFeel.SkinName = ''
|
||||
StyleFocused.LookAndFeel.SkinName = ''
|
||||
StyleHot.LookAndFeel.SkinName = ''
|
||||
ExplicitWidth = 217
|
||||
Width = 217
|
||||
end
|
||||
inherited edtFechaFinFiltro: TcxDateEdit
|
||||
Left = 271
|
||||
Style.LookAndFeel.SkinName = ''
|
||||
StyleDisabled.LookAndFeel.SkinName = ''
|
||||
StyleFocused.LookAndFeel.SkinName = ''
|
||||
StyleHot.LookAndFeel.SkinName = ''
|
||||
ExplicitLeft = 271
|
||||
ExplicitWidth = 427
|
||||
Width = 427
|
||||
|
||||
@ -27,6 +27,7 @@ type
|
||||
cxGridViewTiendaWeb: TcxGridDBColumn;
|
||||
cxGridViewPERSONA_CONTACTO: TcxGridDBColumn;
|
||||
cxGridViewFECHA_ALTA: TcxGridDBColumn;
|
||||
cxGridViewLISTA_NOMBRES: TcxGridDBColumn;
|
||||
procedure cxGridViewCODIGOCustomDrawCell(Sender: TcxCustomGridTableView;
|
||||
ACanvas: TcxCanvas; AViewInfo: TcxGridTableDataCellViewInfo;
|
||||
var ADone: Boolean);
|
||||
|
||||
@ -28,7 +28,7 @@
|
||||
<Borland.Personality>Delphi.Personality</Borland.Personality>
|
||||
<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">9</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.9.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.9.0</VersionInfoKeys><VersionInfoKeys Name="Comments"></VersionInfoKeys><VersionInfoKeys Name="CompileDate">jueves, 22 de octubre de 2015 19:37</VersionInfoKeys></VersionInfoKeys><Excluded_Packages>
|
||||
<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">7</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">2.7.2.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.7.2.0</VersionInfoKeys><VersionInfoKeys Name="Comments"></VersionInfoKeys><VersionInfoKeys Name="CompileDate">lunes, 25 de enero de 2016 15:45</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>
|
||||
|
||||
@ -1,7 +1,7 @@
|
||||
MAINICON ICON "C:\Codigo Acana\Resources\Iconos\Servidor.ico"
|
||||
1 VERSIONINFO
|
||||
FILEVERSION 2,6,9,0
|
||||
PRODUCTVERSION 2,6,9,0
|
||||
FILEVERSION 2,7,2,0
|
||||
PRODUCTVERSION 2,7,2,0
|
||||
FILEFLAGSMASK 0x3FL
|
||||
FILEFLAGS 0x00L
|
||||
FILEOS 0x40004L
|
||||
@ -13,10 +13,10 @@ BEGIN
|
||||
BLOCK "0C0A04E4"
|
||||
BEGIN
|
||||
VALUE "CompanyName", "Rodax Software S.L.\0"
|
||||
VALUE "FileVersion", "2.6.9.0\0"
|
||||
VALUE "FileVersion", "2.7.2.0\0"
|
||||
VALUE "ProductName", "FactuGES (Servidor)\0"
|
||||
VALUE "ProductVersion", "2.6.9.0\0"
|
||||
VALUE "CompileDate", "martes, 27 de octubre de 2015 10:49\0"
|
||||
VALUE "ProductVersion", "2.7.2.0\0"
|
||||
VALUE "CompileDate", "lunes, 25 de enero de 2016 15:56\0"
|
||||
END
|
||||
END
|
||||
BLOCK "VarFileInfo"
|
||||
|
||||
Binary file not shown.
BIN
Tools/Firebird/Firebird-2.1.7.18553_0_Win32.exe
Normal file
BIN
Tools/Firebird/Firebird-2.1.7.18553_0_Win32.exe
Normal file
Binary file not shown.
Loading…
Reference in New Issue
Block a user