Cambio de logica al generar los recibos de las facturas, ahora la fecha de emisión de los recibos será la misma que la fecha de la factura

git-svn-id: https://192.168.0.254/svn/Proyectos.LuisLeon_FactuGES/trunk@197 c93665c3-c93d-084d-9b98-7d5f4a9c3376
This commit is contained in:
roberto 2007-12-11 15:15:55 +00:00
parent 2abdf5a54f
commit 72510f75e7
6 changed files with 6 additions and 4 deletions

View File

@ -149,7 +149,7 @@
<VersionInfo Name="AutoIncBuild">False</VersionInfo>
<VersionInfo Name="MajorVer">2</VersionInfo>
<VersionInfo Name="MinorVer">3</VersionInfo>
<VersionInfo Name="Release">6</VersionInfo>
<VersionInfo Name="Release">7</VersionInfo>
<VersionInfo Name="Build">0</VersionInfo>
<VersionInfo Name="Debug">False</VersionInfo>
<VersionInfo Name="PreRelease">False</VersionInfo>
@ -162,13 +162,13 @@
<VersionInfoKeys>
<VersionInfoKeys Name="CompanyName">Rodax Software S.L.</VersionInfoKeys>
<VersionInfoKeys Name="FileDescription"></VersionInfoKeys>
<VersionInfoKeys Name="FileVersion">2.3.6.0</VersionInfoKeys>
<VersionInfoKeys Name="FileVersion">2.3.7.0</VersionInfoKeys>
<VersionInfoKeys Name="InternalName">FactuGES</VersionInfoKeys>
<VersionInfoKeys Name="LegalCopyright"></VersionInfoKeys>
<VersionInfoKeys Name="LegalTrademarks"></VersionInfoKeys>
<VersionInfoKeys Name="OriginalFilename"></VersionInfoKeys>
<VersionInfoKeys Name="ProductName"></VersionInfoKeys>
<VersionInfoKeys Name="ProductVersion"></VersionInfoKeys>
<VersionInfoKeys Name="ProductVersion">2.3.6.0</VersionInfoKeys>
<VersionInfoKeys Name="Comments"></VersionInfoKeys>
</VersionInfoKeys> <Excluded_Packages>
<Excluded_Packages Name="C:\Documents and Settings\Usuario\Mis documentos\Borland Studio Projects\Bpl\EasyListviewD10.bpl">Muststang Peak EasyListview Runtime Package</Excluded_Packages>

Binary file not shown.

View File

@ -1054,6 +1054,7 @@ begin
ARecibos := ARecibosClienteController.Nuevo;
ARecibos.Edit;
ARecibos.ID_FACTURA := AFactura.ID;
ARecibos.FECHA_EMISION := AFactura.FECHA_FACTURA;
ARecibos.REFERENCIA := AFactura.REFERENCIA + ' - ' + IntToStr(i);
AFechaVencimiento := AFactura.FECHA_FACTURA + AFormaPago.Plazos.NUM_DIAS;

View File

@ -1060,6 +1060,7 @@ begin
ARecibos := ARecibosProveedorController.Nuevo;
ARecibos.Edit;
ARecibos.ID_FACTURA := AFactura.ID;
ARecibos.FECHA_EMISION := AFactura.FECHA_FACTURA;
ARecibos.REFERENCIA := AFactura.REFERENCIA + ' - ' + IntToStr(i);
ARecibos.FECHA_VENCIMIENTO := AFactura.FECHA_FACTURA + AFormaPago.Plazos.NUM_DIAS;
ARecibos.IMPORTE := AFactura.IMPORTE_TOTAL * (AFormaPago.Plazos.PORCENTAJE / 100);

View File

@ -14,7 +14,7 @@ BEGIN
BEGIN
VALUE "FileVersion", "2.3.6.0\0"
VALUE "ProductVersion", "2.3.6.0\0"
VALUE "CompileDate", "lunes, 10 de diciembre de 2007 19:43\0"
VALUE "CompileDate", "martes, 11 de diciembre de 2007 16:01\0"
END
END
BLOCK "VarFileInfo"

Binary file not shown.