Se adaptan los informes estadísticos para que los descuentos de los resumenes tengan en cuenta los descuentos a nivel de detalles de las facturas
git-svn-id: https://192.168.0.254/svn/Proyectos.LuisLeon_FactuGES2/trunk@114 b2cfbe5a-eba1-4a0c-8b32-7feea0a119f2
This commit is contained in:
parent
20952bff3c
commit
f79ef97767
@ -4204,6 +4204,97 @@ inner join V_INF_FAC_PROVEEDOR_TOTAL_ANO v on ((v.id_empresa = f.id_empresa) and
|
||||
order by 1,2,3,4,5 asc
|
||||
;
|
||||
|
||||
CREATE VIEW V_INF_FAC_DET_PROVEEDOR(
|
||||
ID,
|
||||
ID_EMPRESA,
|
||||
ANO,
|
||||
SEMESTRE,
|
||||
TRIMESTRE,
|
||||
MES,
|
||||
FECHA_FACTURA,
|
||||
ID_FACTURA,
|
||||
ID_PROVEEDOR,
|
||||
NOMBRE,
|
||||
ID_ARTICULO,
|
||||
CONCEPTO,
|
||||
CANTIDAD,
|
||||
IMPORTE_UNIDAD,
|
||||
IMPORTE_NETO,
|
||||
DESCUENTO,
|
||||
IMPORTE_PORTE,
|
||||
IMPORTE_DESCUENTO,
|
||||
IMPORTE_TOTAL,
|
||||
IMPORTE_TOTAL_ANO)
|
||||
AS
|
||||
select FD.ID,
|
||||
F.ID_EMPRESA,
|
||||
EXTRACT(YEAR FROM f.FECHA_FACTURA) as ANO,
|
||||
CAST((DIV(EXTRACT(MONTH FROM f.FECHA_FACTURA),8)+1) AS SMALLINT) as SEMESTRE,
|
||||
CAST((DIV(EXTRACT(MONTH FROM f.FECHA_FACTURA),4)+1) AS SMALLINT) as TRIMESTRE,
|
||||
EXTRACT(MONTH FROM f.FECHA_FACTURA) as MES,
|
||||
f.FECHA_FACTURA,
|
||||
FD.ID_FACTURA, F.ID_PROVEEDOR, f.NOMBRE, FD.ID_ARTICULO, FD.CONCEPTO, FD.CANTIDAD, FD.IMPORTE_UNIDAD, (FD.CANTIDAD * FD.IMPORTE_UNIDAD) as IMPORTE_NETO,
|
||||
FD.DESCUENTO, FD.IMPORTE_PORTE,
|
||||
CASE
|
||||
when FD.DESCUENTO = 0 then 0
|
||||
else ((FD.CANTIDAD * FD.IMPORTE_UNIDAD) - FD.IMPORTE_TOTAL)
|
||||
end as IMPORTE_DESCUENTO,
|
||||
FD.IMPORTE_TOTAL,
|
||||
v.importe_total as IMPORTE_TOTAL_ANO
|
||||
|
||||
|
||||
from facturas_proveedor_detalles FD
|
||||
left join facturas_proveedor F on (F.ID = FD.ID_FACTURA)
|
||||
inner join V_INF_FAC_PROVEEDOR_TOTAL_ANO v on ((v.id_empresa = f.id_empresa) and (v.Ano = EXTRACT(YEAR FROM f.FECHA_FACTURA)))
|
||||
where (FD.TIPO_DETALLE = 'Concepto')
|
||||
;
|
||||
|
||||
CREATE VIEW V_INF_FAC_DET_CLIENTE(
|
||||
ID,
|
||||
ID_EMPRESA,
|
||||
ANO,
|
||||
SEMESTRE,
|
||||
TRIMESTRE,
|
||||
MES,
|
||||
FECHA_FACTURA,
|
||||
ID_FACTURA,
|
||||
ID_CLIENTE,
|
||||
NOMBRE,
|
||||
ID_AGENTE,
|
||||
ID_ARTICULO,
|
||||
CONCEPTO,
|
||||
CANTIDAD,
|
||||
IMPORTE_UNIDAD,
|
||||
IMPORTE_NETO,
|
||||
DESCUENTO,
|
||||
IMPORTE_PORTE,
|
||||
IMPORTE_DESCUENTO,
|
||||
IMPORTE_TOTAL,
|
||||
IMPORTE_TOTAL_ANO)
|
||||
AS
|
||||
select FD.ID,
|
||||
F.ID_EMPRESA,
|
||||
EXTRACT(YEAR FROM f.FECHA_FACTURA) as ANO,
|
||||
CAST((DIV(EXTRACT(MONTH FROM f.FECHA_FACTURA),8)+1) AS SMALLINT) as SEMESTRE,
|
||||
CAST((DIV(EXTRACT(MONTH FROM f.FECHA_FACTURA),4)+1) AS SMALLINT) as TRIMESTRE,
|
||||
EXTRACT(MONTH FROM f.FECHA_FACTURA) as MES,
|
||||
f.FECHA_FACTURA,
|
||||
FD.ID_FACTURA, F.ID_CLIENTE, f.NOMBRE, CD.ID_AGENTE, FD.ID_ARTICULO, FD.CONCEPTO, FD.CANTIDAD, FD.IMPORTE_UNIDAD, (FD.CANTIDAD * FD.IMPORTE_UNIDAD) as IMPORTE_NETO,
|
||||
FD.DESCUENTO, FD.IMPORTE_PORTE,
|
||||
CASE
|
||||
when FD.DESCUENTO = 0 then 0
|
||||
else ((FD.CANTIDAD * FD.IMPORTE_UNIDAD) - FD.IMPORTE_TOTAL)
|
||||
end as IMPORTE_DESCUENTO,
|
||||
FD.IMPORTE_TOTAL,
|
||||
v.importe_total as IMPORTE_TOTAL_ANO
|
||||
|
||||
|
||||
from facturas_cliente_detalles FD
|
||||
left join facturas_cliente F on (F.ID = FD.ID_FACTURA)
|
||||
left join clientes_datos cd on (cd.ID_CLIENTE = F.ID_CLIENTE)
|
||||
inner join V_INF_FAC_CLIENTE_TOTAL_ANO v on ((v.id_empresa = f.id_empresa) and (v.Ano = EXTRACT(YEAR FROM f.FECHA_FACTURA)))
|
||||
where (FD.TIPO_DETALLE = 'Concepto')
|
||||
;
|
||||
/******************************************************************************/
|
||||
/**** Primary Keys ****/
|
||||
/******************************************************************************/
|
||||
|
||||
@ -53,7 +53,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">4</VersionInfo><VersionInfo Name="MinorVer">1</VersionInfo><VersionInfo Name="Release">2</VersionInfo><VersionInfo Name="Build">0</VersionInfo><VersionInfo Name="Debug">False</VersionInfo><VersionInfo Name="PreRelease">False</VersionInfo><VersionInfo Name="Special">False</VersionInfo><VersionInfo Name="Private">False</VersionInfo><VersionInfo Name="DLL">False</VersionInfo><VersionInfo Name="Locale">3082</VersionInfo><VersionInfo Name="CodePage">1252</VersionInfo></VersionInfo><VersionInfoKeys><VersionInfoKeys Name="CompanyName">Rodax Software S.L.</VersionInfoKeys><VersionInfoKeys Name="FileDescription"></VersionInfoKeys><VersionInfoKeys Name="FileVersion">4.1.2.0</VersionInfoKeys><VersionInfoKeys Name="InternalName">FactuGES</VersionInfoKeys><VersionInfoKeys Name="LegalCopyright"></VersionInfoKeys><VersionInfoKeys Name="LegalTrademarks"></VersionInfoKeys><VersionInfoKeys Name="OriginalFilename"></VersionInfoKeys><VersionInfoKeys Name="ProductName">FactuGES</VersionInfoKeys><VersionInfoKeys Name="ProductVersion">4.1.2.0</VersionInfoKeys><VersionInfoKeys Name="Comments"></VersionInfoKeys></VersionInfoKeys><Excluded_Packages></Excluded_Packages><Source><Source Name="MainSource">FactuGES.dpr</Source></Source></Delphi.Personality><ModelSupport>False</ModelSupport></BorlandProject></BorlandProject>
|
||||
<BorlandProject><Delphi.Personality><Parameters><Parameters Name="UseLauncher">False</Parameters><Parameters Name="LoadAllSymbols">True</Parameters><Parameters Name="LoadUnspecifiedSymbols">False</Parameters></Parameters><Language><Language Name="RootDir">C:\Archivos de programa\Borland\Delphi7\Bin\</Language></Language><VersionInfo><VersionInfo Name="IncludeVerInfo">True</VersionInfo><VersionInfo Name="AutoIncBuild">False</VersionInfo><VersionInfo Name="MajorVer">4</VersionInfo><VersionInfo Name="MinorVer">1</VersionInfo><VersionInfo Name="Release">3</VersionInfo><VersionInfo Name="Build">0</VersionInfo><VersionInfo Name="Debug">False</VersionInfo><VersionInfo Name="PreRelease">False</VersionInfo><VersionInfo Name="Special">False</VersionInfo><VersionInfo Name="Private">False</VersionInfo><VersionInfo Name="DLL">False</VersionInfo><VersionInfo Name="Locale">3082</VersionInfo><VersionInfo Name="CodePage">1252</VersionInfo></VersionInfo><VersionInfoKeys><VersionInfoKeys Name="CompanyName">Rodax Software S.L.</VersionInfoKeys><VersionInfoKeys Name="FileDescription"></VersionInfoKeys><VersionInfoKeys Name="FileVersion">4.1.3.0</VersionInfoKeys><VersionInfoKeys Name="InternalName">FactuGES</VersionInfoKeys><VersionInfoKeys Name="LegalCopyright"></VersionInfoKeys><VersionInfoKeys Name="LegalTrademarks"></VersionInfoKeys><VersionInfoKeys Name="OriginalFilename"></VersionInfoKeys><VersionInfoKeys Name="ProductName">FactuGES</VersionInfoKeys><VersionInfoKeys Name="ProductVersion">4.1.3.0</VersionInfoKeys><VersionInfoKeys Name="Comments"></VersionInfoKeys></VersionInfoKeys><Excluded_Packages></Excluded_Packages><Source><Source Name="MainSource">FactuGES.dpr</Source></Source></Delphi.Personality><ModelSupport>False</ModelSupport></BorlandProject></BorlandProject>
|
||||
</ProjectExtensions>
|
||||
<Import Project="$(MSBuildBinPath)\Borland.Delphi.Targets" />
|
||||
<ItemGroup>
|
||||
|
||||
Binary file not shown.
@ -1,5 +1,5 @@
|
||||
<?xml version="1.0" encoding="utf-8"?>
|
||||
<TfrxReport Version="4.7.71" DotMatrixReport="False" EngineOptions.DoublePass="True" IniFile="\Software\Fast Reports" PreviewOptions.Buttons="4095" PreviewOptions.Zoom="1" PrintOptions.Printer="Por defecto" PrintOptions.PrintOnSheet="0" ReportOptions.CreateDate="37800,8077143519" ReportOptions.Description.Text="" ReportOptions.LastChange="40582,5764922106" ScriptLanguage="PascalScript" ScriptText.Text="procedure Chart1OnBeforePrint(Sender: TfrxComponent); begin if (<frxDBInformeListadoFacturasGrafComp."ANO1"> <> 0) then TLineSeries(Chart1.Series[0]).Title := 'Total Facturado ' + IntToStr(<frxDBInformeListadoFacturasGrafComp."ANO1">); if (<frxDBInformeListadoFacturasGrafComp."ANO2"> <> 0) then TLineSeries(Chart1.Series[1]).Title := 'Total Facturado ' + IntToStr(<frxDBInformeListadoFacturasGrafComp."ANO2">) else Chart1.Series[1].Active := False; end; procedure Memo16OnBeforePrint(Sender: TfrxComponent); var Valor:Double; begin Valor := SUM(<frxDBInformeListadoFacturasGrafComp."IMPORTE_TOTAL1">) * 100; if (SUM(<frxDBInformeListadoFacturasGrafComp."IMPORTE_TOTAL">) = 0) then Valor := 100 - Valor else Valor := 100 - (Valor/SUM(<frxDBInformeListadoFacturasGrafComp."IMPORTE_TOTAL">)); memo16.lines.add(FormatFloat('#,##0.00 %',Valor)); end; begin end. " ShowProgress="False" StoreInDFM="False" OnStartReport="frxReportOnStartReport" PropData="044C65667403990003546F70021008446174617365747301010C8D00000020446174615365743D225270744661637475726173436C69656E74652E6672784442496E666F726D654C69737461646F436C69656E7465734D61796F724465736375656E746F526573756D656E2220446174615365744E616D653D226672784442496E666F726D654C69737461646F436C69656E7465734D61796F724465736375656E746F526573756D656E2200010C9100000020446174615365743D225270744661637475726173436C69656E74652E6672784442496E666F726D654C69737461646F436C69656E7465734D61796F724661637475726163696F6E526573756D656E2220446174615365744E616D653D226672784442496E666F726D654C69737461646F436C69656E7465734D61796F724661637475726163696F6E526573756D656E2200010C6000000020446174615365743D226672784442496E666F726D654C69737461646F466163747572617347726166436F6D702220446174615365744E616D653D226672784442496E666F726D654C69737461646F466163747572617347726166436F6D70220000095661726961626C65730100055374796C650100">
|
||||
<TfrxReport Version="4.7.71" DotMatrixReport="False" EngineOptions.DoublePass="True" IniFile="\Software\Fast Reports" PreviewOptions.Buttons="4095" PreviewOptions.Zoom="1" PrintOptions.Printer="Por defecto" PrintOptions.PrintOnSheet="0" ReportOptions.CreateDate="37800,8077143519" ReportOptions.Description.Text="" ReportOptions.LastChange="40603,5759461458" ScriptLanguage="PascalScript" ScriptText.Text="procedure Chart1OnBeforePrint(Sender: TfrxComponent); begin if (<frxDBInformeListadoFacturasGrafComp."ANO1"> <> 0) then TLineSeries(Chart1.Series[0]).Title := 'Total Facturado ' + IntToStr(<frxDBInformeListadoFacturasGrafComp."ANO1">); if (<frxDBInformeListadoFacturasGrafComp."ANO2"> <> 0) then TLineSeries(Chart1.Series[1]).Title := 'Total Facturado ' + IntToStr(<frxDBInformeListadoFacturasGrafComp."ANO2">) else Chart1.Series[1].Active := False; end; procedure Memo16OnBeforePrint(Sender: TfrxComponent); var Valor:Double; begin Valor := SUM(<frxDBInformeListadoFacturasGrafComp."IMPORTE_TOTAL1">) * 100; if (SUM(<frxDBInformeListadoFacturasGrafComp."IMPORTE_TOTAL">) = 0) then Valor := 100 - Valor else Valor := 100 - (Valor/SUM(<frxDBInformeListadoFacturasGrafComp."IMPORTE_TOTAL">)); memo16.lines.add(FormatFloat('#,##0.00 %',Valor)); end; begin end. " ShowProgress="False" StoreInDFM="False" OnStartReport="frxReportOnStartReport" PropData="044C65667403910003546F70021008446174617365747301010C7C00000020446174615365743D226672784442496E666F726D654C69737461646F4167656E7465734D61796F724661637475726163696F6E526573756D656E2220446174615365744E616D653D226672784442496E666F726D654C69737461646F4167656E7465734D61796F724661637475726163696F6E526573756D656E2200010C7A00000020446174615365743D226672784442496E666F726D654C69737461646F436C69656E7465734D61796F724465736375656E746F526573756D656E2220446174615365744E616D653D226672784442496E666F726D654C69737461646F436C69656E7465734D61796F724465736375656E746F526573756D656E2200010C7E00000020446174615365743D226672784442496E666F726D654C69737461646F436C69656E7465734D61796F724661637475726163696F6E526573756D656E2220446174615365744E616D653D226672784442496E666F726D654C69737461646F436C69656E7465734D61796F724661637475726163696F6E526573756D656E2200010C6000000020446174615365743D226672784442496E666F726D654C69737461646F466163747572617347726166436F6D702220446174615365744E616D653D226672784442496E666F726D654C69737461646F466163747572617347726166436F6D70220000095661726961626C65730100055374796C650100">
|
||||
<TfrxDataPage Name="Data" Height="1000" Left="0" Top="0" Width="1000"/>
|
||||
<TfrxReportPage Name="Page1" PaperWidth="210" PaperHeight="297" PaperSize="9" LeftMargin="10,00125" RightMargin="10,00125" TopMargin="10,00125" BottomMargin="10,00125" ColumnWidth="0" ColumnPositions.Text="" HGuides.Text="" VGuides.Text="">
|
||||
<TfrxMasterData Name="MasterData1" Height="15" Left="0" Top="294" Width="718,101251175" ColumnWidth="0" ColumnGap="0" DataSet="frxDBInformeListadoFacturasGrafComp" DataSetName="frxDBInformeListadoFacturasGrafComp" RowCount="0">
|
||||
@ -35,13 +35,13 @@
|
||||
<TfrxMemoView Name="Memo15" Left="452" Top="0" Width="131,66" Height="15" ShowHint="False" Color="13095676" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" HideZeros="True" ParentFont="False" Text="[SUM(<frxDBInformeListadoFacturasGrafComp."IMPORTE_TOTAL">) - SUM(<frxDBInformeListadoFacturasGrafComp."IMPORTE_TOTAL1">)]"/>
|
||||
<TfrxMemoView Name="Memo16" Left="605" Top="0" Width="111,66" Height="15" OnBeforePrint="Memo16OnBeforePrint" ShowHint="False" Color="13095676" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2n" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" HideZeros="True" ParentFont="False" Text=""/>
|
||||
</TfrxFooter>
|
||||
<TfrxMasterData Name="MasterData3" Height="15" Left="0" Top="750" Width="718,101251175" ColumnWidth="0" ColumnGap="0" DataSet="RptFacturasCliente.frxDBInformeListadoClientesMayorFacturacionResumen" DataSetName="frxDBInformeListadoClientesMayorFacturacionResumen" RowCount="0">
|
||||
<TfrxMasterData Name="MasterData3" Height="15" Left="0" Top="750" Width="718,101251175" ColumnWidth="0" ColumnGap="0" DataSet="frxDBInformeListadoClientesMayorFacturacionResumen" DataSetName="frxDBInformeListadoClientesMayorFacturacionResumen" RowCount="0">
|
||||
<TfrxMemoView Name="Memo23" Left="2" Top="0" Width="378" Height="15" ShowHint="False" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%g" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-9" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" HideZeros="True" ParentFont="False" Text=" [frxDBInformeListadoClientesMayorFacturacionResumen."NOMBRE"]"/>
|
||||
<TfrxMemoView Name="Memo24" Align="baLeft" Left="380" Top="0" Width="90" Height="15" ShowHint="False" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%g" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-9" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" HAlign="haRight" HideZeros="True" ParentFont="False" Text=" [frxDBInformeListadoClientesMayorFacturacionResumen."NUMFAC"] "/>
|
||||
<TfrxMemoView Name="Memo25" Align="baLeft" Left="470" Top="0" Width="150" Height="15" ShowHint="False" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-9" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" HAlign="haRight" HideZeros="True" ParentFont="False" Text=" [frxDBInformeListadoClientesMayorFacturacionResumen."IMPORTE_TOTAL"] "/>
|
||||
<TfrxMemoView Name="Memo26" Align="baLeft" Left="620" Top="0" Width="98" Height="15" ShowHint="False" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-9" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" HAlign="haRight" HideZeros="True" ParentFont="False" Text=" [frxDBInformeListadoClientesMayorFacturacionResumen."PORCENTAJE"] % "/>
|
||||
</TfrxMasterData>
|
||||
<TfrxMasterData Name="MasterData4" Height="15" Left="0" Top="850" Width="718,101251175" ColumnWidth="0" ColumnGap="0" DataSet="RptFacturasCliente.frxDBInformeListadoClientesMayorDescuentoResumen" DataSetName="frxDBInformeListadoClientesMayorDescuentoResumen" RowCount="0">
|
||||
<TfrxMasterData Name="MasterData4" Height="15" Left="0" Top="850" Width="718,101251175" ColumnWidth="0" ColumnGap="0" DataSet="frxDBInformeListadoClientesMayorDescuentoResumen" DataSetName="frxDBInformeListadoClientesMayorDescuentoResumen" RowCount="0">
|
||||
<TfrxMemoView Name="Memo34" Left="2" Top="0" Width="378" Height="15" ShowHint="False" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%g" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-9" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" HideZeros="True" ParentFont="False" Text=" [frxDBInformeListadoClientesMayorDescuentoResumen."NOMBRE"]"/>
|
||||
<TfrxMemoView Name="Memo35" Align="baLeft" Left="380" Top="0" Width="88" Height="15" ShowHint="False" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-9" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" HAlign="haRight" ParentFont="False" Text=" [frxDBInformeListadoClientesMayorDescuentoResumen."IMPORTE_DESCUENTO"] "/>
|
||||
<TfrxMemoView Name="Memo36" Align="baLeft" Left="468" Top="0" Width="90" Height="15" ShowHint="False" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-9" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" HAlign="haRight" HideZeros="True" ParentFont="False" Text=" [frxDBInformeListadoClientesMayorDescuentoResumen."IMPORTE_TOTAL"] "/>
|
||||
@ -63,5 +63,16 @@
|
||||
<TfrxMemoView Name="Memo32" Align="baLeft" Left="648" Top="30" Width="70" Height="15" ShowHint="False" Color="13095676" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="13056" Font.Height="-9" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" GapX="5" GapY="2" HAlign="haRight" ParentFont="False" Text="Medio (%)"/>
|
||||
<TfrxMemoView Name="Memo33" Align="baLeft" Left="558" Top="30" Width="90" Height="15" ShowHint="False" Color="13095676" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="13056" Font.Height="-9" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" GapX="5" GapY="2" HAlign="haRight" ParentFont="False" Text="Importe cobrado"/>
|
||||
</TfrxHeader>
|
||||
<TfrxMasterData Name="MasterData5" Height="15" Left="0" Top="945" Width="718,101251175" ColumnWidth="0" ColumnGap="0" DataSet="frxDBInformeListadoAgentesMayorFacturacionResumen" DataSetName="frxDBInformeListadoAgentesMayorFacturacionResumen" RowCount="0">
|
||||
<TfrxMemoView Name="Memo40" Left="3" Top="1" Width="466" Height="15" ShowHint="False" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%g" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-9" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" HideZeros="True" ParentFont="False" Text=" [frxDBInformeListadoAgentesMayorFacturacionResumen."NOMBRE"]"/>
|
||||
<TfrxMemoView Name="Memo44" Align="baLeft" Left="469" Top="1" Width="145" Height="15" ShowHint="False" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-9" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" HAlign="haRight" HideZeros="True" ParentFont="False" Text=" [frxDBInformeListadoAgentesMayorFacturacionResumen."IMPORTE_TOTAL"] "/>
|
||||
<TfrxMemoView Name="Memo45" Align="baLeft" Left="614" Top="1" Width="105" Height="15" ShowHint="False" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-9" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" HAlign="haRight" HideZeros="True" ParentFont="False" Text=" [frxDBInformeListadoAgentesMayorFacturacionResumen."PORCENTAJE"] % "/>
|
||||
</TfrxMasterData>
|
||||
<TfrxHeader Name="Header4" Height="40" Left="0" Top="885" Width="718,101251175">
|
||||
<TfrxMemoView Name="Memo39" Left="2" Top="25" Width="466" Height="15" ShowHint="False" Color="13095676" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="13056" Font.Height="-9" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" GapX="5" GapY="2" ParentFont="False" Text="Nombre"/>
|
||||
<TfrxMemoView Name="Memo41" Left="3" Top="4" Width="285,03927" Height="18,9" ShowHint="False" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%g" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-12" Font.Name="Tahoma" Font.Style="5" HideZeros="True" ParentFont="False" Text="Agentes con mayor capital facturado"/>
|
||||
<TfrxMemoView Name="Memo42" Align="baLeft" Left="468" Top="25" Width="145" Height="15" ShowHint="False" Color="13095676" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="13056" Font.Height="-9" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" GapX="5" GapY="2" HAlign="haRight" ParentFont="False" Text="Importe total"/>
|
||||
<TfrxMemoView Name="Memo43" Align="baLeft" Left="613" Top="25" Width="105" Height="15" ShowHint="False" Color="13095676" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="13056" Font.Height="-9" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" GapX="5" GapY="2" HAlign="haRight" ParentFont="False" Text="Porcentaje (%)"/>
|
||||
</TfrxHeader>
|
||||
</TfrxReportPage>
|
||||
</TfrxReport>
|
||||
|
||||
@ -1,5 +1,5 @@
|
||||
<?xml version="1.0" encoding="utf-8"?>
|
||||
<TfrxReport Version="4.7.71" DotMatrixReport="False" EngineOptions.DoublePass="True" IniFile="\Software\Fast Reports" PreviewOptions.Buttons="4095" PreviewOptions.Zoom="1" PrintOptions.Printer="Por defecto" PrintOptions.PrintOnSheet="0" ReportOptions.CreateDate="37800,8077143519" ReportOptions.Description.Text="" ReportOptions.LastChange="40585,5016549421" ScriptLanguage="PascalScript" ScriptText.Text="procedure Chart1OnBeforePrint(Sender: TfrxComponent); begin if (<frxDBInformeListadoFacturasGrafComp."ANO1"> <> 0) then TLineSeries(Chart1.Series[0]).Title := 'Total Facturado ' + IntToStr(<frxDBInformeListadoFacturasGrafComp."ANO1">); if (<frxDBInformeListadoFacturasGrafComp."ANO2"> <> 0) then TLineSeries(Chart1.Series[1]).Title := 'Total Facturado ' + IntToStr(<frxDBInformeListadoFacturasGrafComp."ANO2">) else Chart1.Series[1].Active := False; end; procedure Memo16OnBeforePrint(Sender: TfrxComponent); var Valor:Double; begin Valor := SUM(<frxDBInformeListadoFacturasGrafComp."IMPORTE_TOTAL1">) * 100; if (SUM(<frxDBInformeListadoFacturasGrafComp."IMPORTE_TOTAL">) = 0) then Valor := 100 - Valor else Valor := 100 - (Valor/SUM(<frxDBInformeListadoFacturasGrafComp."IMPORTE_TOTAL">)); memo16.lines.add(FormatFloat('#,##0.00 %',Valor)); end; begin end. " ShowProgress="False" StoreInDFM="False" OnStartReport="frxReportOnStartReport" PropData="044C65667403990003546F70021008446174617365747301010C3F00000020446174615365744E616D653D226672784442496E666F726D654C69737461646F436C69656E7465734D61796F724465736375656E746F526573756D656E2200010C4100000020446174615365744E616D653D226672784442496E666F726D654C69737461646F436C69656E7465734D61796F724661637475726163696F6E526573756D656E2200010C6000000020446174615365743D226672784442496E666F726D654C69737461646F466163747572617347726166436F6D702220446174615365744E616D653D226672784442496E666F726D654C69737461646F466163747572617347726166436F6D70220000095661726961626C65730100055374796C650100">
|
||||
<TfrxReport Version="4.7.71" DotMatrixReport="False" EngineOptions.DoublePass="True" IniFile="\Software\Fast Reports" PreviewOptions.Buttons="4095" PreviewOptions.Zoom="1" PrintOptions.Printer="Por defecto" PrintOptions.PrintOnSheet="0" ReportOptions.CreateDate="37800,8077143519" ReportOptions.Description.Text="" ReportOptions.LastChange="40603,7485632176" ScriptLanguage="PascalScript" ScriptText.Text="procedure Chart1OnBeforePrint(Sender: TfrxComponent); begin if (<frxDBInformeListadoFacturasGrafComp."ANO1"> <> 0) then TLineSeries(Chart1.Series[0]).Title := 'Total Facturado ' + IntToStr(<frxDBInformeListadoFacturasGrafComp."ANO1">); if (<frxDBInformeListadoFacturasGrafComp."ANO2"> <> 0) then TLineSeries(Chart1.Series[1]).Title := 'Total Facturado ' + IntToStr(<frxDBInformeListadoFacturasGrafComp."ANO2">) else Chart1.Series[1].Active := False; end; procedure Memo16OnBeforePrint(Sender: TfrxComponent); var Valor:Double; begin Valor := SUM(<frxDBInformeListadoFacturasGrafComp."IMPORTE_TOTAL1">) * 100; if (SUM(<frxDBInformeListadoFacturasGrafComp."IMPORTE_TOTAL">) = 0) then Valor := 100 - Valor else Valor := 100 - (Valor/SUM(<frxDBInformeListadoFacturasGrafComp."IMPORTE_TOTAL">)); memo16.lines.add(FormatFloat('#,##0.00 %',Valor)); end; begin end. " ShowProgress="False" StoreInDFM="False" OnStartReport="frxReportOnStartReport" PropData="044C65667403990003546F70021008446174617365747301010C8F00000020446174615365743D225270744661637475726173436C69656E74652E6672784442496E666F726D654C69737461646F4167656E7465734D61796F724661637475726163696F6E526573756D656E2220446174615365744E616D653D226672784442496E666F726D654C69737461646F4167656E7465734D61796F724661637475726163696F6E526573756D656E2200010C8D00000020446174615365743D225270744661637475726173436C69656E74652E6672784442496E666F726D654C69737461646F436C69656E7465734D61796F724465736375656E746F526573756D656E2220446174615365744E616D653D226672784442496E666F726D654C69737461646F436C69656E7465734D61796F724465736375656E746F526573756D656E2200010C9100000020446174615365743D225270744661637475726173436C69656E74652E6672784442496E666F726D654C69737461646F436C69656E7465734D61796F724661637475726163696F6E526573756D656E2220446174615365744E616D653D226672784442496E666F726D654C69737461646F436C69656E7465734D61796F724661637475726163696F6E526573756D656E2200010C6000000020446174615365743D226672784442496E666F726D654C69737461646F466163747572617347726166436F6D702220446174615365744E616D653D226672784442496E666F726D654C69737461646F466163747572617347726166436F6D70220000095661726961626C65730100055374796C650100">
|
||||
<TfrxDataPage Name="Data" Height="1000" Left="0" Top="0" Width="1000"/>
|
||||
<TfrxReportPage Name="Page1" PaperWidth="210" PaperHeight="297" PaperSize="9" LeftMargin="10,00125" RightMargin="10,00125" TopMargin="10,00125" BottomMargin="10,00125" ColumnWidth="0" ColumnPositions.Text="" HGuides.Text="" VGuides.Text="">
|
||||
<TfrxMasterData Name="MasterData1" Height="15" Left="0" Top="294" Width="718,101251175" ColumnWidth="0" ColumnGap="0" DataSet="frxDBInformeListadoFacturasGrafComp" DataSetName="frxDBInformeListadoFacturasGrafComp" RowCount="0">
|
||||
@ -18,7 +18,7 @@
|
||||
<TfrxMemoView Name="Memo7" Left="331" Top="33,10235" Width="378" Height="97" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" HAlign="haRight" ParentFont="False" Text="Fecha del listado: [<Date>] - Página [Page#] de [TotalPages#]"/>
|
||||
<TfrxLineView Name="Line1" Align="baLeft" Left="0" Top="129,10235" Width="312" Height="0" ShowHint="False" Frame.Color="5470709" Frame.Typ="4" Frame.Width="4"/>
|
||||
<TfrxPictureView Name="Picture1" Left="3" Top="43" Width="160,03598" Height="80,03154" OnBeforePrint="Picture1OnBeforePrint" ShowHint="False" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" HightQuality="False"/>
|
||||
<TfrxMemoView Name="Memo39" Left="4" Top="81" Width="160" Height="42" ShowHint="False" Font.Charset="1" Font.Color="0" Font.Height="-24" Font.Name="Arial" Font.Style="1" ParentFont="False" VAlign="vaBottom" Text="KEIBLER"/>
|
||||
<TfrxMemoView Name="Memo46" Left="3" Top="82" Width="160" Height="42" ShowHint="False" Font.Charset="1" Font.Color="0" Font.Height="-24" Font.Name="Arial" Font.Style="1" ParentFont="False" VAlign="vaBottom" Text="KEIBLER"/>
|
||||
</TfrxPageHeader>
|
||||
<TfrxHeader Name="Header1" Height="40" Left="0" Top="234" Width="718,101251175">
|
||||
<TfrxMemoView Name="Memo5" Left="2" Top="25" Width="93,55115913" Height="15" ShowHint="False" Color="13095676" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="13056" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" GapX="5" GapY="2" HAlign="haCenter" ParentFont="False" Text="Intervalo"/>
|
||||
@ -36,13 +36,13 @@
|
||||
<TfrxMemoView Name="Memo15" Left="452" Top="0" Width="131,66" Height="15" ShowHint="False" Color="13095676" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" HideZeros="True" ParentFont="False" Text="[SUM(<frxDBInformeListadoFacturasGrafComp."IMPORTE_TOTAL">) - SUM(<frxDBInformeListadoFacturasGrafComp."IMPORTE_TOTAL1">)]"/>
|
||||
<TfrxMemoView Name="Memo16" Left="605" Top="0" Width="111,66" Height="15" OnBeforePrint="Memo16OnBeforePrint" ShowHint="False" Color="13095676" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2n" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" HideZeros="True" ParentFont="False" Text=""/>
|
||||
</TfrxFooter>
|
||||
<TfrxMasterData Name="MasterData3" Height="15" Left="0" Top="750" Width="718,101251175" ColumnWidth="0" ColumnGap="0" DataSetName="frxDBInformeListadoClientesMayorFacturacionResumen" RowCount="0">
|
||||
<TfrxMasterData Name="MasterData3" Height="15" Left="0" Top="750" Width="718,101251175" ColumnWidth="0" ColumnGap="0" DataSet="RptFacturasCliente.frxDBInformeListadoClientesMayorFacturacionResumen" DataSetName="frxDBInformeListadoClientesMayorFacturacionResumen" RowCount="0">
|
||||
<TfrxMemoView Name="Memo23" Left="2" Top="0" Width="378" Height="15" ShowHint="False" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%g" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-9" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" HideZeros="True" ParentFont="False" Text=" [frxDBInformeListadoClientesMayorFacturacionResumen."NOMBRE"]"/>
|
||||
<TfrxMemoView Name="Memo24" Align="baLeft" Left="380" Top="0" Width="90" Height="15" ShowHint="False" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%g" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-9" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" HAlign="haRight" HideZeros="True" ParentFont="False" Text=" [frxDBInformeListadoClientesMayorFacturacionResumen."NUMFAC"] "/>
|
||||
<TfrxMemoView Name="Memo25" Align="baLeft" Left="470" Top="0" Width="150" Height="15" ShowHint="False" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-9" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" HAlign="haRight" HideZeros="True" ParentFont="False" Text=" [frxDBInformeListadoClientesMayorFacturacionResumen."IMPORTE_TOTAL"] "/>
|
||||
<TfrxMemoView Name="Memo26" Align="baLeft" Left="620" Top="0" Width="98" Height="15" ShowHint="False" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-9" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" HAlign="haRight" HideZeros="True" ParentFont="False" Text=" [frxDBInformeListadoClientesMayorFacturacionResumen."PORCENTAJE"] % "/>
|
||||
</TfrxMasterData>
|
||||
<TfrxMasterData Name="MasterData4" Height="15" Left="0" Top="850" Width="718,101251175" ColumnWidth="0" ColumnGap="0" DataSetName="frxDBInformeListadoClientesMayorDescuentoResumen" RowCount="0">
|
||||
<TfrxMasterData Name="MasterData4" Height="15" Left="0" Top="850" Width="718,101251175" ColumnWidth="0" ColumnGap="0" DataSet="RptFacturasCliente.frxDBInformeListadoClientesMayorDescuentoResumen" DataSetName="frxDBInformeListadoClientesMayorDescuentoResumen" RowCount="0">
|
||||
<TfrxMemoView Name="Memo34" Left="2" Top="0" Width="378" Height="15" ShowHint="False" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%g" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-9" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" HideZeros="True" ParentFont="False" Text=" [frxDBInformeListadoClientesMayorDescuentoResumen."NOMBRE"]"/>
|
||||
<TfrxMemoView Name="Memo35" Align="baLeft" Left="380" Top="0" Width="88" Height="15" ShowHint="False" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-9" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" HAlign="haRight" ParentFont="False" Text=" [frxDBInformeListadoClientesMayorDescuentoResumen."IMPORTE_DESCUENTO"] "/>
|
||||
<TfrxMemoView Name="Memo36" Align="baLeft" Left="468" Top="0" Width="90" Height="15" ShowHint="False" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-9" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" HAlign="haRight" HideZeros="True" ParentFont="False" Text=" [frxDBInformeListadoClientesMayorDescuentoResumen."IMPORTE_TOTAL"] "/>
|
||||
@ -64,5 +64,16 @@
|
||||
<TfrxMemoView Name="Memo32" Align="baLeft" Left="648" Top="30" Width="70" Height="15" ShowHint="False" Color="13095676" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="13056" Font.Height="-9" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" GapX="5" GapY="2" HAlign="haRight" ParentFont="False" Text="Medio (%)"/>
|
||||
<TfrxMemoView Name="Memo33" Align="baLeft" Left="558" Top="30" Width="90" Height="15" ShowHint="False" Color="13095676" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="13056" Font.Height="-9" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" GapX="5" GapY="2" HAlign="haRight" ParentFont="False" Text="Importe cobrado"/>
|
||||
</TfrxHeader>
|
||||
<TfrxMasterData Name="MasterData5" Height="15" Left="0" Top="945" Width="718,101251175" ColumnWidth="0" ColumnGap="0" DataSet="RptFacturasCliente.frxDBInformeListadoAgentesMayorFacturacionResumen" DataSetName="frxDBInformeListadoAgentesMayorFacturacionResumen" RowCount="0">
|
||||
<TfrxMemoView Name="Memo40" Left="3" Top="1" Width="466" Height="15" ShowHint="False" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%g" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-9" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" HideZeros="True" ParentFont="False" Text=" [frxDBInformeListadoAgentesMayorFacturacionResumen."NOMBRE"]"/>
|
||||
<TfrxMemoView Name="Memo44" Align="baLeft" Left="469" Top="1" Width="145" Height="15" ShowHint="False" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-9" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" HAlign="haRight" HideZeros="True" ParentFont="False" Text=" [frxDBInformeListadoAgentesMayorFacturacionResumen."IMPORTE_TOTAL"] "/>
|
||||
<TfrxMemoView Name="Memo45" Align="baLeft" Left="614" Top="1" Width="105" Height="15" ShowHint="False" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-9" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" HAlign="haRight" HideZeros="True" ParentFont="False" Text=" [frxDBInformeListadoAgentesMayorFacturacionResumen."PORCENTAJE"] % "/>
|
||||
</TfrxMasterData>
|
||||
<TfrxHeader Name="Header4" Height="40" Left="0" Top="885" Width="718,101251175">
|
||||
<TfrxMemoView Name="Memo39" Left="2" Top="25" Width="466" Height="15" ShowHint="False" Color="13095676" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="13056" Font.Height="-9" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" GapX="5" GapY="2" ParentFont="False" Text="Nombre"/>
|
||||
<TfrxMemoView Name="Memo41" Left="3" Top="4" Width="285,03927" Height="18,9" ShowHint="False" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%g" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-12" Font.Name="Tahoma" Font.Style="5" HideZeros="True" ParentFont="False" Text="Agentes con mayor capital facturado"/>
|
||||
<TfrxMemoView Name="Memo42" Align="baLeft" Left="468" Top="25" Width="145" Height="15" ShowHint="False" Color="13095676" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="13056" Font.Height="-9" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" GapX="5" GapY="2" HAlign="haRight" ParentFont="False" Text="Importe total"/>
|
||||
<TfrxMemoView Name="Memo43" Align="baLeft" Left="613" Top="25" Width="105" Height="15" ShowHint="False" Color="13095676" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="13056" Font.Height="-9" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" GapX="5" GapY="2" HAlign="haRight" ParentFont="False" Text="Porcentaje (%)"/>
|
||||
</TfrxHeader>
|
||||
</TfrxReportPage>
|
||||
</TfrxReport>
|
||||
|
||||
@ -2,7 +2,7 @@ object RptFacturasCliente: TRptFacturasCliente
|
||||
OldCreateOrder = True
|
||||
OnCreate = DataModuleCreate
|
||||
OnDestroy = DataModuleDestroy
|
||||
Height = 678
|
||||
Height = 715
|
||||
Width = 977
|
||||
object schReport: TDASchema
|
||||
ConnectionManager = dmServer.ConnectionManager
|
||||
@ -30,13 +30,12 @@ object RptFacturasCliente: TRptFacturasCliente
|
||||
SQL =
|
||||
'select P.ANO, C.REFERENCIA, COALESCE(C.NOMBRE, P.NOMBRE) as NOMB' +
|
||||
'RE,'#10'SUM(P.IMPORTE_DESCUENTO) as IMPORTE_DESCUENTO, SUM(P.IMPORTE' +
|
||||
'_TOTAL) as IMPORTE_TOTAL,'#10'(SUM(P.IMPORTE_TOTAL) - SUM(P.IMPORTE_' +
|
||||
'DESCUENTO)) as IMPORTE_COBRADO,'#10'case when SUM(P.IMPORTE_TOTAL) =' +
|
||||
' 0 then 0'#10'else ((SUM(P.IMPORTE_DESCUENTO) * 100) / SUM(P.IMPORTE' +
|
||||
'_TOTAL)) end as PORCENTAJE'#10#10'from V_INF_FAC_CLIENTE P'#10'left join C' +
|
||||
'ONTACTOS C on P.ID_CLIENTE = C.ID'#10#10'where p.ID_EMPRESA = :ID_EMPR' +
|
||||
'ESA'#10'and P.ANO = :ANO'#10'group by 1,2,3'#10'order by 1,5 desc'#10'rows 1 to ' +
|
||||
':NTOP'#10#10
|
||||
'_NETO) as IMPORTE_TOTAL,'#10'SUM(P.IMPORTE_TOTAL) as IMPORTE_COBRADO' +
|
||||
','#10'case when SUM(P.IMPORTE_NETO) = 0 then 0'#10'else ((SUM(P.IMPORTE_' +
|
||||
'DESCUENTO) * 100) / SUM(P.IMPORTE_NETO)) end as PORCENTAJE'#10#10'from' +
|
||||
' V_INF_FAC_DET_CLIENTE P'#10'left join CONTACTOS C on P.ID_CLIENTE =' +
|
||||
' C.ID'#10#10'where p.ID_EMPRESA = :ID_EMPRESA'#10'and P.ANO = :ANO'#10'group b' +
|
||||
'y 1,2,3'#10'order by 1,5 desc'#10'rows 1 to :NTOP'#10
|
||||
StatementType = stSQL
|
||||
ColumnMappings = <
|
||||
item
|
||||
@ -98,7 +97,7 @@ object RptFacturasCliente: TRptFacturasCliente
|
||||
end
|
||||
item
|
||||
Name = 'PORCENTAJE'
|
||||
DataType = datCurrency
|
||||
DataType = datDecimal
|
||||
end>
|
||||
end
|
||||
item
|
||||
@ -1524,6 +1523,88 @@ object RptFacturasCliente: TRptFacturasCliente
|
||||
Name = 'IMPORTE_TOTAL'
|
||||
DataType = datCurrency
|
||||
end>
|
||||
end
|
||||
item
|
||||
Params = <
|
||||
item
|
||||
Name = 'ID_EMPRESA'
|
||||
Value = ''
|
||||
end
|
||||
item
|
||||
Name = 'ANO'
|
||||
Value = ''
|
||||
end
|
||||
item
|
||||
Name = 'NTOP'
|
||||
Value = ''
|
||||
end>
|
||||
Statements = <
|
||||
item
|
||||
Connection = 'IBX'
|
||||
ConnectionType = 'Interbase'
|
||||
Default = True
|
||||
SQL =
|
||||
'select P.ANO, C.REFERENCIA, COALESCE(C.NOMBRE, '#39'Agente no asigna' +
|
||||
'do'#39') as NOMBRE, p.Importe_TOTAL_ANO,'#10'SUM(P.IMPORTE_TOTAL) as IMP' +
|
||||
'ORTE_TOTAL, ((SUM(P.IMPORTE_TOTAL)*100)/p.Importe_TOTAL_ANO) as ' +
|
||||
'PORCENTAJE'#10#10'from V_INF_FAC_DET_CLIENTE P'#10'left join CONTACTOS C o' +
|
||||
'n P.ID_AGENTE = C.ID'#10#10'where p.ID_EMPRESA = :ID_EMPRESA'#10'and P.ANO' +
|
||||
' = :ANO'#10'group by 1,2,3,4'#10'order by 1,6 desc'#10'rows 1 to :NTOP'#10
|
||||
StatementType = stSQL
|
||||
ColumnMappings = <
|
||||
item
|
||||
DatasetField = 'ANO'
|
||||
TableField = 'ANO'
|
||||
end
|
||||
item
|
||||
DatasetField = 'REFERENCIA'
|
||||
TableField = 'REFERENCIA'
|
||||
end
|
||||
item
|
||||
DatasetField = 'NOMBRE'
|
||||
TableField = 'NOMBRE'
|
||||
end
|
||||
item
|
||||
DatasetField = 'IMPORTE_TOTAL_ANO'
|
||||
TableField = 'IMPORTE_TOTAL_ANO'
|
||||
end
|
||||
item
|
||||
DatasetField = 'IMPORTE_TOTAL'
|
||||
TableField = 'IMPORTE_TOTAL'
|
||||
end
|
||||
item
|
||||
DatasetField = 'PORCENTAJE'
|
||||
TableField = 'PORCENTAJE'
|
||||
end>
|
||||
end>
|
||||
Name = 'InformeListadoAgentesMayorFacturacionResumen'
|
||||
Fields = <
|
||||
item
|
||||
Name = 'ANO'
|
||||
DataType = datSmallInt
|
||||
end
|
||||
item
|
||||
Name = 'REFERENCIA'
|
||||
DataType = datString
|
||||
Size = 255
|
||||
end
|
||||
item
|
||||
Name = 'NOMBRE'
|
||||
DataType = datString
|
||||
Size = 255
|
||||
end
|
||||
item
|
||||
Name = 'IMPORTE_TOTAL_ANO'
|
||||
DataType = datCurrency
|
||||
end
|
||||
item
|
||||
Name = 'IMPORTE_TOTAL'
|
||||
DataType = datCurrency
|
||||
end
|
||||
item
|
||||
Name = 'PORCENTAJE'
|
||||
DataType = datCurrency
|
||||
end>
|
||||
end>
|
||||
JoinDataTables = <>
|
||||
UnionDataTables = <>
|
||||
@ -3212,4 +3293,75 @@ object RptFacturasCliente: TRptFacturasCliente
|
||||
Left = 624
|
||||
Top = 600
|
||||
end
|
||||
object frxDBInformeListadoAgentesMayorFacturacionResumen: TfrxDBDataset
|
||||
UserName = 'frxDBInformeListadoAgentesMayorFacturacionResumen'
|
||||
CloseDataSource = False
|
||||
DataSource = DADInformeListadoAgentesMayorFacturacionResumen
|
||||
BCDToCurrency = False
|
||||
Left = 64
|
||||
Top = 488
|
||||
end
|
||||
object DADInformeListadoAgentesMayorFacturacionResumen: TDADataSource
|
||||
DataSet = tbl_InformeListadoAgentesMayorFacturacionResumen.Dataset
|
||||
DataTable = tbl_InformeListadoAgentesMayorFacturacionResumen
|
||||
Left = 64
|
||||
Top = 544
|
||||
end
|
||||
object tbl_InformeListadoAgentesMayorFacturacionResumen: TDAMemDataTable
|
||||
RemoteUpdatesOptions = []
|
||||
Fields = <
|
||||
item
|
||||
Name = 'ANO'
|
||||
DataType = datSmallInt
|
||||
end
|
||||
item
|
||||
Name = 'REFERENCIA'
|
||||
DataType = datString
|
||||
Size = 255
|
||||
end
|
||||
item
|
||||
Name = 'NOMBRE'
|
||||
DataType = datString
|
||||
Size = 255
|
||||
end
|
||||
item
|
||||
Name = 'IMPORTE_TOTAL_ANO'
|
||||
DataType = datCurrency
|
||||
end
|
||||
item
|
||||
Name = 'NUMFAC'
|
||||
DataType = datInteger
|
||||
end
|
||||
item
|
||||
Name = 'IMPORTE_TOTAL'
|
||||
DataType = datCurrency
|
||||
end
|
||||
item
|
||||
Name = 'PORCENTAJE'
|
||||
DataType = datCurrency
|
||||
end>
|
||||
Params = <
|
||||
item
|
||||
Name = 'ID_EMPRESA'
|
||||
Value = ''
|
||||
end
|
||||
item
|
||||
Name = 'ANO'
|
||||
Value = ''
|
||||
end
|
||||
item
|
||||
Name = 'NTOP'
|
||||
Value = ''
|
||||
end>
|
||||
MasterMappingMode = mmDataRequest
|
||||
LogChanges = False
|
||||
StreamingOptions = [soDisableEventsWhileStreaming]
|
||||
RemoteFetchEnabled = False
|
||||
LocalSchema = schReport
|
||||
LocalDataStreamer = Bin2DataStreamer
|
||||
LogicalName = 'InformeListadoAgentesMayorFacturacionResumen'
|
||||
IndexDefs = <>
|
||||
Left = 64
|
||||
Top = 600
|
||||
end
|
||||
end
|
||||
|
||||
@ -89,7 +89,6 @@ type
|
||||
DADSInformeListadoFacturasResumen: TDADataSource;
|
||||
tbl_InformeListadoFacturasResumen: TDAMemDataTable;
|
||||
Bin2DataStreamer: TDABin2DataStreamer;
|
||||
schReport: TDASchema;
|
||||
frxDBInformeListadoFacturasGrafComp: TfrxDBDataset;
|
||||
DASInformeListadoFacturasGrafComp: TDADataSource;
|
||||
tbl_InformeListadoFacturasGrafCompMensual: TDAMemDataTable;
|
||||
@ -101,6 +100,10 @@ type
|
||||
frxDBInformeListadoClientesMayorDescuentoResumen: TfrxDBDataset;
|
||||
DADSInformeListadoClientesMayorDescuentoResumen: TDADataSource;
|
||||
tbl_InformeListadoClientesMayorDescuentoResumen: TDAMemDataTable;
|
||||
schReport: TDASchema;
|
||||
frxDBInformeListadoAgentesMayorFacturacionResumen: TfrxDBDataset;
|
||||
DADInformeListadoAgentesMayorFacturacionResumen: TDADataSource;
|
||||
tbl_InformeListadoAgentesMayorFacturacionResumen: TDAMemDataTable;
|
||||
procedure DataModuleCreate(Sender: TObject);
|
||||
procedure DataModuleDestroy(Sender: TObject);
|
||||
procedure frxReportGetValue(const VarName: string; var Value: Variant);
|
||||
@ -268,6 +271,7 @@ begin
|
||||
//Se preparan las tablas del listado resumen del informe
|
||||
PrepararTablaResumenInformeGrafComp(tbl_InformeListadoClientesMayorFacturacionResumen);
|
||||
PrepararTablaResumenInformeGrafComp(tbl_InformeListadoClientesMayorDescuentoResumen);
|
||||
PrepararTablaResumenInformeGrafComp(tbl_InformeListadoAgentesMayorFacturacionResumen);
|
||||
|
||||
Result := Binary.Create;
|
||||
|
||||
|
||||
@ -161,13 +161,12 @@ object RptFacturasProveedor: TRptFacturasProveedor
|
||||
SQL =
|
||||
'select P.ANO, C.REFERENCIA, COALESCE(C.NOMBRE, P.NOMBRE) as NOMB' +
|
||||
'RE,'#10'SUM(P.IMPORTE_DESCUENTO) as IMPORTE_DESCUENTO, SUM(P.IMPORTE' +
|
||||
'_TOTAL) as IMPORTE_TOTAL,'#10'(SUM(P.IMPORTE_TOTAL) - SUM(P.IMPORTE_' +
|
||||
'DESCUENTO)) as IMPORTE_COBRADO,'#10'case when SUM(P.IMPORTE_TOTAL) =' +
|
||||
' 0 then 0'#10'else ((SUM(P.IMPORTE_DESCUENTO) * 100) / SUM(P.IMPORTE' +
|
||||
'_TOTAL)) end as PORCENTAJE'#10#10'from V_INF_FAC_PROVEEDOR P'#10'left join' +
|
||||
' CONTACTOS C on P.ID_PROVEEDOR = C.ID'#10#10'where p.ID_EMPRESA = :ID_' +
|
||||
'EMPRESA'#10'and P.ANO = :ANO'#10'group by 1,2,3'#10'order by 1,5 desc'#10'rows 1' +
|
||||
' to :NTOP'#10#10#10
|
||||
'_NETO) as IMPORTE_TOTAL,'#10'SUM(P.IMPORTE_TOTAL) as IMPORTE_COBRADO' +
|
||||
','#10'case when SUM(P.IMPORTE_NETO) = 0 then 0'#10'else ((SUM(P.IMPORTE_' +
|
||||
'DESCUENTO) * 100) / SUM(P.IMPORTE_NETO)) end as PORCENTAJE'#10#10'from' +
|
||||
' V_INF_FAC_DET_PROVEEDOR P'#10'left join CONTACTOS C on P.ID_PROVEED' +
|
||||
'OR = C.ID'#10#10'where p.ID_EMPRESA = :ID_EMPRESA'#10'and P.ANO = :ANO'#10'gro' +
|
||||
'up by 1,2,3'#10'order by 1,5 desc'#10'rows 1 to :NTOP'#10
|
||||
StatementType = stSQL
|
||||
ColumnMappings = <
|
||||
item
|
||||
@ -229,7 +228,7 @@ object RptFacturasProveedor: TRptFacturasProveedor
|
||||
end
|
||||
item
|
||||
Name = 'PORCENTAJE'
|
||||
DataType = datCurrency
|
||||
DataType = datDecimal
|
||||
end>
|
||||
end
|
||||
item
|
||||
|
||||
@ -46,7 +46,6 @@ type
|
||||
frxDBVencimientos: TfrxDBDataset;
|
||||
DADSVencimientos: TDADataSource;
|
||||
tbl_Vencimientos: TDAMemDataTable;
|
||||
schReport: TDASchema;
|
||||
frxDBInformeListadoFacturasGrafComp: TfrxDBDataset;
|
||||
DASInformeListadoFacturasGrafComp: TDADataSource;
|
||||
tbl_InformeListadoFacturasGrafCompMensual: TDAMemDataTable;
|
||||
@ -58,6 +57,7 @@ type
|
||||
frxDBInformeListadoProveedoresMayorDescuentoResumen: TfrxDBDataset;
|
||||
DADSInformeListadoProveedoresMayorDescuentoResumen: TDADataSource;
|
||||
tbl_InformeListadoProveedoresMayorDescuentoResumen: TDAMemDataTable;
|
||||
schReport: TDASchema;
|
||||
procedure DataModuleCreate(Sender: TObject);
|
||||
procedure DataModuleDestroy(Sender: TObject);
|
||||
private
|
||||
|
||||
@ -65,7 +65,6 @@ inherited fEditorInformeBase: TfEditorInformeBase
|
||||
FloatingHeight = 128
|
||||
SupportedDocks = [dkStandardDock, dkMultiDock]
|
||||
TabOrder = 0
|
||||
ExplicitWidth = 128
|
||||
object TBXButton1: TTBXButton
|
||||
Left = 16
|
||||
Top = 12
|
||||
|
||||
@ -75,7 +75,7 @@ inherited fEditorInformeFacturasClienteReportGrafComp: TfEditorInformeFacturasCl
|
||||
Left = 0
|
||||
Top = 0
|
||||
Width = 188
|
||||
Height = 182
|
||||
Height = 220
|
||||
Align = alTop
|
||||
Font.Charset = DEFAULT_CHARSET
|
||||
Font.Color = clWindowText
|
||||
@ -86,11 +86,12 @@ inherited fEditorInformeFacturasClienteReportGrafComp: TfEditorInformeFacturasCl
|
||||
TabOrder = 1
|
||||
ReadOnly = False
|
||||
ExplicitWidth = 188
|
||||
ExplicitHeight = 220
|
||||
inherited TBXAlignmentPanel2: TTBXAlignmentPanel
|
||||
Width = 182
|
||||
ExplicitWidth = 182
|
||||
inherited Label3: TLabel
|
||||
Width = 106
|
||||
Width = 172
|
||||
end
|
||||
inherited cbIntervalo: TcxComboBox
|
||||
Style.LookAndFeel.SkinName = ''
|
||||
@ -109,7 +110,7 @@ inherited fEditorInformeFacturasClienteReportGrafComp: TfEditorInformeFacturasCl
|
||||
Width = 182
|
||||
ExplicitWidth = 182
|
||||
inherited lis: TLabel
|
||||
Width = 19
|
||||
Width = 172
|
||||
end
|
||||
inherited cbAno1: TcxComboBox
|
||||
Style.LookAndFeel.SkinName = ''
|
||||
@ -124,7 +125,7 @@ inherited fEditorInformeFacturasClienteReportGrafComp: TfEditorInformeFacturasCl
|
||||
Width = 182
|
||||
ExplicitWidth = 182
|
||||
inherited Label1: TLabel
|
||||
Width = 88
|
||||
Width = 172
|
||||
end
|
||||
inherited cbAno2: TcxComboBox
|
||||
Style.LookAndFeel.SkinName = ''
|
||||
@ -135,10 +136,17 @@ inherited fEditorInformeFacturasClienteReportGrafComp: TfEditorInformeFacturasCl
|
||||
Width = 166
|
||||
end
|
||||
end
|
||||
inherited TBXAlignmentPanel4: TTBXAlignmentPanel
|
||||
Width = 182
|
||||
ExplicitWidth = 182
|
||||
inherited Label2: TLabel
|
||||
Width = 172
|
||||
end
|
||||
end
|
||||
end
|
||||
inline frViewFiltroClientes1: TfrViewFiltroClientes
|
||||
Left = 0
|
||||
Top = 182
|
||||
Top = 220
|
||||
Width = 188
|
||||
Height = 195
|
||||
Align = alTop
|
||||
|
||||
@ -108,7 +108,7 @@ end;
|
||||
|
||||
function TfEditorInformeFacturasClienteReportGrafComp.GetNTop: Variant;
|
||||
begin
|
||||
Result := 5;
|
||||
Result := frViewIntervaloComparativo1.stopN.Value;
|
||||
end;
|
||||
|
||||
procedure TfEditorInformeFacturasClienteReportGrafComp.RefrescarInforme;
|
||||
|
||||
@ -75,7 +75,7 @@ inherited fEditorInformeFacturasProveedorReportGrafComp: TfEditorInformeFacturas
|
||||
Left = 0
|
||||
Top = 0
|
||||
Width = 188
|
||||
Height = 182
|
||||
Height = 220
|
||||
Align = alTop
|
||||
Font.Charset = DEFAULT_CHARSET
|
||||
Font.Color = clWindowText
|
||||
@ -85,13 +85,13 @@ inherited fEditorInformeFacturasProveedorReportGrafComp: TfEditorInformeFacturas
|
||||
ParentFont = False
|
||||
TabOrder = 1
|
||||
ReadOnly = False
|
||||
ExplicitTop = 195
|
||||
ExplicitWidth = 188
|
||||
ExplicitHeight = 220
|
||||
inherited TBXAlignmentPanel2: TTBXAlignmentPanel
|
||||
Width = 182
|
||||
ExplicitWidth = 182
|
||||
inherited Label3: TLabel
|
||||
Width = 106
|
||||
Width = 172
|
||||
end
|
||||
inherited cbIntervalo: TcxComboBox
|
||||
Style.LookAndFeel.SkinName = ''
|
||||
@ -110,7 +110,7 @@ inherited fEditorInformeFacturasProveedorReportGrafComp: TfEditorInformeFacturas
|
||||
Width = 182
|
||||
ExplicitWidth = 182
|
||||
inherited lis: TLabel
|
||||
Width = 19
|
||||
Width = 172
|
||||
end
|
||||
inherited cbAno1: TcxComboBox
|
||||
Style.LookAndFeel.SkinName = ''
|
||||
@ -125,7 +125,7 @@ inherited fEditorInformeFacturasProveedorReportGrafComp: TfEditorInformeFacturas
|
||||
Width = 182
|
||||
ExplicitWidth = 182
|
||||
inherited Label1: TLabel
|
||||
Width = 88
|
||||
Width = 172
|
||||
end
|
||||
inherited cbAno2: TcxComboBox
|
||||
Style.LookAndFeel.SkinName = ''
|
||||
@ -136,10 +136,17 @@ inherited fEditorInformeFacturasProveedorReportGrafComp: TfEditorInformeFacturas
|
||||
Width = 166
|
||||
end
|
||||
end
|
||||
inherited TBXAlignmentPanel4: TTBXAlignmentPanel
|
||||
Width = 182
|
||||
ExplicitWidth = 182
|
||||
inherited Label2: TLabel
|
||||
Width = 172
|
||||
end
|
||||
end
|
||||
end
|
||||
inline frViewFiltroProveedores1: TfrViewFiltroProveedores
|
||||
Left = 0
|
||||
Top = 182
|
||||
Top = 220
|
||||
Width = 188
|
||||
Height = 195
|
||||
Align = alTop
|
||||
|
||||
@ -109,7 +109,7 @@ end;
|
||||
|
||||
function TfEditorInformeFacturasProveedorReportGrafComp.GetNTop: Variant;
|
||||
begin
|
||||
Result := 5;
|
||||
Result := frViewIntervaloComparativo1.stopN.Value;
|
||||
end;
|
||||
|
||||
procedure TfEditorInformeFacturasProveedorReportGrafComp.RefrescarInforme;
|
||||
|
||||
@ -1,9 +1,9 @@
|
||||
inherited frViewIntervaloComparativo: TfrViewIntervaloComparativo
|
||||
Width = 451
|
||||
Height = 182
|
||||
Height = 238
|
||||
Align = alTop
|
||||
ExplicitWidth = 451
|
||||
ExplicitHeight = 182
|
||||
ExplicitHeight = 238
|
||||
object TBXAlignmentPanel2: TTBXAlignmentPanel
|
||||
AlignWithMargins = True
|
||||
Left = 3
|
||||
@ -175,4 +175,34 @@ inherited frViewIntervaloComparativo: TfrViewIntervaloComparativo
|
||||
Width = 429
|
||||
end
|
||||
end
|
||||
object TBXAlignmentPanel4: TTBXAlignmentPanel
|
||||
AlignWithMargins = True
|
||||
Left = 3
|
||||
Top = 176
|
||||
Width = 445
|
||||
Height = 41
|
||||
Margins.Left = 5
|
||||
Margins.Top = 5
|
||||
Margins.Right = 5
|
||||
Align = alTop
|
||||
AutoSize = True
|
||||
TabOrder = 4
|
||||
object Label2: TLabel
|
||||
Left = 5
|
||||
Top = 5
|
||||
Width = 435
|
||||
Height = 13
|
||||
Align = alTop
|
||||
Caption = 'Top N'
|
||||
Transparent = True
|
||||
ExplicitWidth = 28
|
||||
end
|
||||
object stopN: TcxSpinEdit
|
||||
Left = 3
|
||||
Top = 20
|
||||
TabOrder = 0
|
||||
Value = 5
|
||||
Width = 121
|
||||
end
|
||||
end
|
||||
end
|
||||
|
||||
@ -7,7 +7,7 @@ uses
|
||||
Dialogs, cxGraphics, cxEdit, cxDropDownEdit, cxCalendar, StdCtrls,
|
||||
cxControls, cxContainer, cxTextEdit, cxMaskEdit, TBXDkPanels,
|
||||
cxEditRepositoryItems, dxLayoutControl, dxLayoutLookAndFeels, uViewBase,
|
||||
Mask, JvExMask, JvToolEdit, TB2Dock, uViewParametrosInforme;
|
||||
Mask, JvExMask, JvToolEdit, TB2Dock, uViewParametrosInforme, cxSpinEdit;
|
||||
|
||||
type
|
||||
IViewPeriodoFechas = interface(IViewParametrosInforme)
|
||||
@ -25,6 +25,9 @@ type
|
||||
TBXAlignmentPanel1: TTBXAlignmentPanel;
|
||||
Label1: TLabel;
|
||||
cbAno2: TcxComboBox;
|
||||
TBXAlignmentPanel4: TTBXAlignmentPanel;
|
||||
Label2: TLabel;
|
||||
stopN: TcxSpinEdit;
|
||||
|
||||
private
|
||||
function GetIntervalo: Variant;
|
||||
|
||||
Binary file not shown.
@ -1,4 +1,4 @@
|
||||
<?xml version="1.0" encoding="utf-8"?>
|
||||
<?xml version="1.0" encoding="utf-8"?>
|
||||
<Project xmlns="http://schemas.microsoft.com/developer/msbuild/2003">
|
||||
<PropertyGroup>
|
||||
<ProjectGuid>{ebdcd25d-40d7-4146-91ec-a0ea4aa1dcd1}</ProjectGuid>
|
||||
@ -35,7 +35,13 @@
|
||||
<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 Name="RunParams">/standalone</Parameters></Parameters><VersionInfo><VersionInfo Name="IncludeVerInfo">True</VersionInfo><VersionInfo Name="AutoIncBuild">False</VersionInfo><VersionInfo Name="MajorVer">4</VersionInfo><VersionInfo Name="MinorVer">1</VersionInfo><VersionInfo Name="Release">2</VersionInfo><VersionInfo Name="Build">0</VersionInfo><VersionInfo Name="Debug">False</VersionInfo><VersionInfo Name="PreRelease">False</VersionInfo><VersionInfo Name="Special">False</VersionInfo><VersionInfo Name="Private">False</VersionInfo><VersionInfo Name="DLL">False</VersionInfo><VersionInfo Name="Locale">3082</VersionInfo><VersionInfo Name="CodePage">1252</VersionInfo></VersionInfo><VersionInfoKeys><VersionInfoKeys Name="CompanyName"></VersionInfoKeys><VersionInfoKeys Name="FileDescription"></VersionInfoKeys><VersionInfoKeys Name="FileVersion">4.1.2.0</VersionInfoKeys><VersionInfoKeys Name="InternalName"></VersionInfoKeys><VersionInfoKeys Name="LegalCopyright"></VersionInfoKeys><VersionInfoKeys Name="LegalTrademarks"></VersionInfoKeys><VersionInfoKeys Name="OriginalFilename"></VersionInfoKeys><VersionInfoKeys Name="ProductName"></VersionInfoKeys><VersionInfoKeys Name="ProductVersion">4.1.2.0</VersionInfoKeys><VersionInfoKeys Name="Comments"></VersionInfoKeys><VersionInfoKeys Name="CompileDate">miércoles, 09 de febrero de 2011 19:22</VersionInfoKeys></VersionInfoKeys><Excluded_Packages>
|
||||
<BorlandProject><Delphi.Personality><Parameters><Parameters Name="UseLauncher">False</Parameters><Parameters Name="LoadAllSymbols">True</Parameters><Parameters Name="LoadUnspecifiedSymbols">False</Parameters><Parameters Name="RunParams">/standalone</Parameters></Parameters><VersionInfo><VersionInfo Name="IncludeVerInfo">True</VersionInfo><VersionInfo Name="AutoIncBuild">False</VersionInfo><VersionInfo Name="MajorVer">4</VersionInfo><VersionInfo Name="MinorVer">1</VersionInfo><VersionInfo Name="Release">3</VersionInfo><VersionInfo Name="Build">0</VersionInfo><VersionInfo Name="Debug">False</VersionInfo><VersionInfo Name="PreRelease">False</VersionInfo><VersionInfo Name="Special">False</VersionInfo><VersionInfo Name="Private">False</VersionInfo><VersionInfo Name="DLL">False</VersionInfo><VersionInfo Name="Locale">3082</VersionInfo><VersionInfo Name="CodePage">1252</VersionInfo></VersionInfo><VersionInfoKeys><VersionInfoKeys Name="CompanyName"></VersionInfoKeys><VersionInfoKeys Name="FileDescription"></VersionInfoKeys><VersionInfoKeys Name="FileVersion">4.1.3.0</VersionInfoKeys><VersionInfoKeys Name="InternalName"></VersionInfoKeys><VersionInfoKeys Name="LegalCopyright"></VersionInfoKeys><VersionInfoKeys Name="LegalTrademarks"></VersionInfoKeys><VersionInfoKeys Name="OriginalFilename"></VersionInfoKeys><VersionInfoKeys Name="ProductName"></VersionInfoKeys><VersionInfoKeys Name="ProductVersion">4.1.3.0</VersionInfoKeys><VersionInfoKeys Name="Comments"></VersionInfoKeys><VersionInfoKeys Name="CompileDate">viernes, 11 de febrero de 2011 13:14</VersionInfoKeys></VersionInfoKeys><Excluded_Packages>
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
<Excluded_Packages Name="C:\Documents and Settings\All Users\Documentos\RAD Studio\5.0\Bpl\dxPSCoreD11.bpl">ExpressPrinting System by Developer Express Inc.</Excluded_Packages>
|
||||
</Excluded_Packages><Source><Source Name="MainSource">FactuGES_Server.dpr</Source></Source></Delphi.Personality><ModelSupport>False</ModelSupport></BorlandProject></BorlandProject>
|
||||
</ProjectExtensions>
|
||||
|
||||
Reference in New Issue
Block a user