Versión 1.9.8
git-svn-id: https://192.168.0.254/svn/Proyectos.Tecsitel_FactuGES2/trunk@1074 0c75b7a4-871f-7646-8a2f-f78d34cc349f
This commit is contained in:
parent
50420cf046
commit
d76477a818
Binary file not shown.
Binary file not shown.
@ -53,7 +53,7 @@
|
|||||||
<Borland.Personality>Delphi.Personality</Borland.Personality>
|
<Borland.Personality>Delphi.Personality</Borland.Personality>
|
||||||
<Borland.ProjectType>VCLApplication</Borland.ProjectType>
|
<Borland.ProjectType>VCLApplication</Borland.ProjectType>
|
||||||
<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">1</VersionInfo><VersionInfo Name="MinorVer">9</VersionInfo><VersionInfo Name="Release">7</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">1.9.7.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">1.9.7.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">1</VersionInfo><VersionInfo Name="MinorVer">9</VersionInfo><VersionInfo Name="Release">8</VersionInfo><VersionInfo Name="Build">0</VersionInfo><VersionInfo Name="Debug">False</VersionInfo><VersionInfo Name="PreRelease">False</VersionInfo><VersionInfo Name="Special">False</VersionInfo><VersionInfo Name="Private">False</VersionInfo><VersionInfo Name="DLL">False</VersionInfo><VersionInfo Name="Locale">3082</VersionInfo><VersionInfo Name="CodePage">1252</VersionInfo></VersionInfo><VersionInfoKeys><VersionInfoKeys Name="CompanyName">Rodax Software S.L.</VersionInfoKeys><VersionInfoKeys Name="FileDescription"></VersionInfoKeys><VersionInfoKeys Name="FileVersion">1.9.8.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">1.9.8.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>
|
</ProjectExtensions>
|
||||||
<Import Project="$(MSBuildBinPath)\Borland.Delphi.Targets" />
|
<Import Project="$(MSBuildBinPath)\Borland.Delphi.Targets" />
|
||||||
<ItemGroup>
|
<ItemGroup>
|
||||||
|
|||||||
Binary file not shown.
Binary file not shown.
File diff suppressed because one or more lines are too long
File diff suppressed because one or more lines are too long
File diff suppressed because one or more lines are too long
File diff suppressed because one or more lines are too long
@ -1,5 +1,5 @@
|
|||||||
<?xml version="1.0" encoding="utf-8"?>
|
<?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="41338,7566046644" ScriptLanguage="PascalScript" ScriptText.Text="procedure mContinuaOnBeforePrint(Sender: TfrxComponent); begin if Engine.FinalPass then begin if (<Page#> = <TotalPages#>) then begin mContinua.Visible := False; end else begin mContinua.Visible := True; end end; end; begin end." ShowProgress="False" StoreInDFM="False" OnStartReport="frxReportOnStartReport" PropData="044C65667403A90003546F70021008446174617365747301010C2A00000020446174615365744E616D653D226672784442496E666F726D654C69737461646F46616374757261732200010C3100000020446174615365744E616D653D226672784442496E666F726D654C69737461646F4661637475726173526573756D656E220000095661726961626C657301010C13000000204E616D653D2220506172616D6574726F732200010C17000000204E616D653D22546578746F506172616D6574726F73220000055374796C650100">
|
<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="41339,7499499537" ScriptLanguage="PascalScript" ScriptText.Text="procedure mContinuaOnBeforePrint(Sender: TfrxComponent); begin if Engine.FinalPass then begin if (<Page#> = <TotalPages#>) then begin mContinua.Visible := False; end else begin mContinua.Visible := True; end end; end; begin end." ShowProgress="False" StoreInDFM="False" OnStartReport="frxReportOnStartReport" PropData="044C65667403910003546F70021008446174617365747301010C5000000020446174615365743D226672784442496E666F726D654C69737461646F46616374757261732220446174615365744E616D653D226672784442496E666F726D654C69737461646F46616374757261732200010C5E00000020446174615365743D226672784442496E666F726D654C69737461646F4661637475726173526573756D656E2220446174615365744E616D653D226672784442496E666F726D654C69737461646F4661637475726173526573756D656E220000095661726961626C657301010C13000000204E616D653D2220506172616D6574726F732200010C17000000204E616D653D22546578746F506172616D6574726F73220000055374796C650100">
|
||||||
<TfrxDataPage Name="Data" Height="1000" Left="0" Top="0" Width="1000"/>
|
<TfrxDataPage Name="Data" Height="1000" Left="0" Top="0" Width="1000"/>
|
||||||
<TfrxReportPage Name="Page1" Orientation="poLandscape" PaperWidth="297" PaperHeight="210" PaperSize="9" LeftMargin="15" RightMargin="15" TopMargin="15" BottomMargin="20" ColumnWidth="0" ColumnPositions.Text="" HGuides.Text="" VGuides.Text="">
|
<TfrxReportPage Name="Page1" Orientation="poLandscape" PaperWidth="297" PaperHeight="210" PaperSize="9" LeftMargin="15" RightMargin="15" TopMargin="15" BottomMargin="20" ColumnWidth="0" ColumnPositions.Text="" HGuides.Text="" VGuides.Text="">
|
||||||
<TfrxPageHeader Name="Band1" Height="136,10235" Left="0" Top="16" Width="1009,13451" OnBeforePrint="Band1OnBeforePrint">
|
<TfrxPageHeader Name="Band1" Height="136,10235" Left="0" Top="16" Width="1009,13451" OnBeforePrint="Band1OnBeforePrint">
|
||||||
@ -7,7 +7,7 @@
|
|||||||
<TfrxShapeView Name="Shape5" Left="513" Top="4" Width="495" Height="129" ShowHint="False" Color="-16777211" Shape="skRoundRectangle"/>
|
<TfrxShapeView Name="Shape5" Left="513" Top="4" Width="495" Height="129" ShowHint="False" Color="-16777211" Shape="skRoundRectangle"/>
|
||||||
<TfrxMemoView Name="NombreCliente" Left="521,85807" Top="13" Width="478" Height="19" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="11763997" Font.Height="-13" Font.Name="Tahoma" Font.Style="1" HAlign="haRight" ParentFont="False" Text="LISTADO DE IVA DE FACTURAS DE CLIENTE"/>
|
<TfrxMemoView Name="NombreCliente" Left="521,85807" Top="13" Width="478" Height="19" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="11763997" Font.Height="-13" Font.Name="Tahoma" Font.Style="1" HAlign="haRight" ParentFont="False" Text="LISTADO DE IVA DE FACTURAS DE CLIENTE"/>
|
||||||
<TfrxMemoView Name="Memo3" Left="521,85807" Top="34,89765" Width="478" Height="91" 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#] [TextoParametros]"/>
|
<TfrxMemoView Name="Memo3" Left="521,85807" Top="34,89765" Width="478" Height="91" 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#] [TextoParametros]"/>
|
||||||
<TfrxMemoView Name="DatosEmpresa" Left="85" Top="37" Width="309" Height="88" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="0" ParentFont="False" Text="AZACAN FACILITIES SERVICIOS PROFESIONALES, S.L. CIF: B86610268 C/ BUENDIA 25, LOCAL 28053 MADRID"/>
|
<TfrxMemoView Name="DatosEmpresa" Left="85" Top="37" Width="309" Height="88" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="0" ParentFont="False" Text="AZACAN - GESTIÓN INTEGRAL DE SERVICIOS, S.L. CIF: B86610268 C/ BUENDIA 25, LOCAL 28053 MADRID"/>
|
||||||
</TfrxPageHeader>
|
</TfrxPageHeader>
|
||||||
<TfrxPageFooter Name="" Height="23,77953" Left="0" Top="552" Width="1009,13451" PrintOnLastPage="False">
|
<TfrxPageFooter Name="" Height="23,77953" Left="0" Top="552" Width="1009,13451" PrintOnLastPage="False">
|
||||||
<TfrxMemoView Name="mContinua" Left="925,98485" Top="4,77953" Width="81,08714" Height="16,77953" OnBeforePrint="mContinuaOnBeforePrint" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" HAlign="haRight" ParentFont="False" Text="Continúa ..."/>
|
<TfrxMemoView Name="mContinua" Left="925,98485" Top="4,77953" Width="81,08714" Height="16,77953" OnBeforePrint="mContinuaOnBeforePrint" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" HAlign="haRight" ParentFont="False" Text="Continúa ..."/>
|
||||||
@ -22,7 +22,7 @@
|
|||||||
<TfrxMemoView Name="Memo8" Left="633,8661515" Top="25" Width="92,67718" Height="15" ShowHint="False" Color="-16777211" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" ParentFont="False" VAlign="vaCenter" Text="Fecha"/>
|
<TfrxMemoView Name="Memo8" Left="633,8661515" Top="25" Width="92,67718" Height="15" ShowHint="False" Color="-16777211" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" ParentFont="False" VAlign="vaCenter" Text="Fecha"/>
|
||||||
<TfrxMemoView Name="Memo7" Left="0" Top="3,77953" Width="485,37013" Height="13" ShowHint="False" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="11763997" Font.Height="-12" Font.Name="Tahoma" Font.Style="1" Frame.Color="8421504" ParentFont="False" Text="[frxDBInformeListadoFacturas."TITULO"]"/>
|
<TfrxMemoView Name="Memo7" Left="0" Top="3,77953" Width="485,37013" Height="13" ShowHint="False" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="11763997" Font.Height="-12" Font.Name="Tahoma" Font.Style="1" Frame.Color="8421504" ParentFont="False" Text="[frxDBInformeListadoFacturas."TITULO"]"/>
|
||||||
</TfrxGroupHeader>
|
</TfrxGroupHeader>
|
||||||
<TfrxMasterData Name="DatosMaestros1" Height="17,00787402" Left="0" Top="272" Width="1009,13451" Columns="1" ColumnWidth="200" ColumnGap="20" DataSetName="frxDBInformeListadoFacturas" RowCount="0" Stretched="True">
|
<TfrxMasterData Name="DatosMaestros1" Height="17,00787402" Left="0" Top="272" Width="1009,13451" Columns="1" ColumnWidth="200" ColumnGap="20" DataSet="frxDBInformeListadoFacturas" DataSetName="frxDBInformeListadoFacturas" RowCount="0" Stretched="True">
|
||||||
<TfrxMemoView Name="Memo18" Left="0" Top="0" Width="88,78" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" ParentFont="False" Text=" [frxDBInformeListadoFacturas."REFERENCIA"]"/>
|
<TfrxMemoView Name="Memo18" Left="0" Top="0" Width="88,78" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" ParentFont="False" Text=" [frxDBInformeListadoFacturas."REFERENCIA"]"/>
|
||||||
<TfrxMemoView Name="Memo4" Left="88,78" Top="0" Width="463,75" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" ParentFont="False" Text=" [frxDBInformeListadoFacturas."NOMBRE"]"/>
|
<TfrxMemoView Name="Memo4" Left="88,78" Top="0" Width="463,75" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" ParentFont="False" Text=" [frxDBInformeListadoFacturas."NOMBRE"]"/>
|
||||||
<TfrxMemoView Name="Memo20" Left="552,53" Top="0" Width="81,34" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" ParentFont="False" Text=" [frxDBInformeListadoFacturas."NIF_CIF"]"/>
|
<TfrxMemoView Name="Memo20" Left="552,53" Top="0" Width="81,34" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" ParentFont="False" Text=" [frxDBInformeListadoFacturas."NIF_CIF"]"/>
|
||||||
@ -44,7 +44,7 @@
|
|||||||
<TfrxMemoView Name="Memo22" Left="573,62987" Top="60" Width="95" Height="15" ShowHint="False" Color="-16777211" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="Importe total"/>
|
<TfrxMemoView Name="Memo22" Left="573,62987" Top="60" Width="95" Height="15" ShowHint="False" Color="-16777211" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="Importe total"/>
|
||||||
<TfrxMemoView Name="Memo23" Left="0" Top="23" Width="485,37013" Height="15,11811024" ShowHint="False" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="11763997" Font.Height="-12" Font.Name="Tahoma" Font.Style="1" Frame.Color="8421504" ParentFont="False" Text="Resumen por meses de las facturas de cliente"/>
|
<TfrxMemoView Name="Memo23" Left="0" Top="23" Width="485,37013" Height="15,11811024" ShowHint="False" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="11763997" Font.Height="-12" Font.Name="Tahoma" Font.Style="1" Frame.Color="8421504" ParentFont="False" Text="Resumen por meses de las facturas de cliente"/>
|
||||||
</TfrxHeader>
|
</TfrxHeader>
|
||||||
<TfrxMasterData Name="DatosMAestros2" Height="17" Left="0" Top="440" Width="1009,13451" ColumnWidth="0" ColumnGap="0" DataSetName="frxDBInformeListadoFacturasResumen" RowCount="0">
|
<TfrxMasterData Name="DatosMAestros2" Height="17" Left="0" Top="440" Width="1009,13451" ColumnWidth="0" ColumnGap="0" DataSet="frxDBInformeListadoFacturasResumen" DataSetName="frxDBInformeListadoFacturasResumen" RowCount="0">
|
||||||
<TfrxMemoView Name="Memo9" Left="0" Top="0" Width="383,63" Height="17,00787402" ShowHint="False" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" ParentFont="False" Text="[frxDBInformeListadoFacturasResumen."TITULO"]"/>
|
<TfrxMemoView Name="Memo9" Left="0" Top="0" Width="383,63" Height="17,00787402" ShowHint="False" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" ParentFont="False" Text="[frxDBInformeListadoFacturasResumen."TITULO"]"/>
|
||||||
<TfrxMemoView Name="Memo10" Left="383,63" Top="0" Width="95" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" HAlign="haRight" ParentFont="False" Text="[frxDBInformeListadoFacturasResumen."BASE_IMPONIBLE"]"/>
|
<TfrxMemoView Name="Memo10" Left="383,63" Top="0" Width="95" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" HAlign="haRight" ParentFont="False" Text="[frxDBInformeListadoFacturasResumen."BASE_IMPONIBLE"]"/>
|
||||||
<TfrxMemoView Name="Memo11" Left="478,63" Top="0" Width="95" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" HAlign="haRight" ParentFont="False" Text="[frxDBInformeListadoFacturasResumen."IMPORTE_IVA"]"/>
|
<TfrxMemoView Name="Memo11" Left="478,63" Top="0" Width="95" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" HAlign="haRight" ParentFont="False" Text="[frxDBInformeListadoFacturasResumen."IMPORTE_IVA"]"/>
|
||||||
|
|||||||
@ -1,5 +1,5 @@
|
|||||||
<?xml version="1.0" encoding="utf-8"?>
|
<?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="41338,756680787" ScriptLanguage="PascalScript" ScriptText.Text="procedure mContinuaOnBeforePrint(Sender: TfrxComponent); begin if Engine.FinalPass then begin if (<Page#> = <TotalPages#>) then begin mContinua.Visible := False; end else begin mContinua.Visible := True; end end; end; begin end." ShowProgress="False" StoreInDFM="False" OnStartReport="frxReportOnStartReport" PropData="044C65667403A90003546F70021008446174617365747301010C2A00000020446174615365744E616D653D226672784442496E666F726D654C69737461646F46616374757261732200010C3100000020446174615365744E616D653D226672784442496E666F726D654C69737461646F4661637475726173526573756D656E220000095661726961626C657301010C13000000204E616D653D2220506172616D6574726F732200010C17000000204E616D653D22546578746F506172616D6574726F73220000055374796C650100">
|
<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="41339,7498428935" ScriptLanguage="PascalScript" ScriptText.Text="procedure mContinuaOnBeforePrint(Sender: TfrxComponent); begin if Engine.FinalPass then begin if (<Page#> = <TotalPages#>) then begin mContinua.Visible := False; end else begin mContinua.Visible := True; end end; end; begin end." ShowProgress="False" StoreInDFM="False" OnStartReport="frxReportOnStartReport" PropData="044C65667403910003546F70021008446174617365747301010C5000000020446174615365743D226672784442496E666F726D654C69737461646F46616374757261732220446174615365744E616D653D226672784442496E666F726D654C69737461646F46616374757261732200010C5E00000020446174615365743D226672784442496E666F726D654C69737461646F4661637475726173526573756D656E2220446174615365744E616D653D226672784442496E666F726D654C69737461646F4661637475726173526573756D656E220000095661726961626C657301010C13000000204E616D653D2220506172616D6574726F732200010C17000000204E616D653D22546578746F506172616D6574726F73220000055374796C650100">
|
||||||
<TfrxDataPage Name="Data" Height="1000" Left="0" Top="0" Width="1000"/>
|
<TfrxDataPage Name="Data" Height="1000" Left="0" Top="0" Width="1000"/>
|
||||||
<TfrxReportPage Name="Page1" Orientation="poLandscape" PaperWidth="297" PaperHeight="210" PaperSize="9" LeftMargin="15" RightMargin="15" TopMargin="15" BottomMargin="20" ColumnWidth="0" ColumnPositions.Text="" HGuides.Text="" VGuides.Text="">
|
<TfrxReportPage Name="Page1" Orientation="poLandscape" PaperWidth="297" PaperHeight="210" PaperSize="9" LeftMargin="15" RightMargin="15" TopMargin="15" BottomMargin="20" ColumnWidth="0" ColumnPositions.Text="" HGuides.Text="" VGuides.Text="">
|
||||||
<TfrxPageHeader Name="Band1" Height="136,10235" Left="0" Top="16" Width="1009,13451" OnBeforePrint="Band1OnBeforePrint">
|
<TfrxPageHeader Name="Band1" Height="136,10235" Left="0" Top="16" Width="1009,13451" OnBeforePrint="Band1OnBeforePrint">
|
||||||
@ -7,7 +7,7 @@
|
|||||||
<TfrxShapeView Name="Shape5" Left="512" Top="3" Width="495" Height="129" ShowHint="False" Color="-16777211" Shape="skRoundRectangle"/>
|
<TfrxShapeView Name="Shape5" Left="512" Top="3" Width="495" Height="129" ShowHint="False" Color="-16777211" Shape="skRoundRectangle"/>
|
||||||
<TfrxMemoView Name="NombreCliente" Left="520,85807" Top="12" Width="478" Height="19" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-13" Font.Name="Tahoma" Font.Style="1" HAlign="haRight" ParentFont="False" Text="LISTADO DE IVA DE FACTURAS DE CLIENTE"/>
|
<TfrxMemoView Name="NombreCliente" Left="520,85807" Top="12" Width="478" Height="19" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-13" Font.Name="Tahoma" Font.Style="1" HAlign="haRight" ParentFont="False" Text="LISTADO DE IVA DE FACTURAS DE CLIENTE"/>
|
||||||
<TfrxMemoView Name="Memo3" Left="520,85807" Top="33,89765" Width="478" Height="91" 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#] [TextoParametros]"/>
|
<TfrxMemoView Name="Memo3" Left="520,85807" Top="33,89765" Width="478" Height="91" 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#] [TextoParametros]"/>
|
||||||
<TfrxMemoView Name="DatosEmpresa" Left="84" Top="36" Width="331" Height="88" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="0" ParentFont="False" Text="AZACAN FACILITIES SERVICIOS PROFESIONALES, S.L. CIF: B86610268 C/ BUENDIA 25, LOCAL 28053 MADRID"/>
|
<TfrxMemoView Name="DatosEmpresa" Left="84" Top="36" Width="331" Height="88" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="0" ParentFont="False" Text="AZACAN - GESTIÓN INTEGRAL DE SERVICIOS, S.L. CIF: B86610268 C/ BUENDIA 25, LOCAL 28053 MADRID"/>
|
||||||
</TfrxPageHeader>
|
</TfrxPageHeader>
|
||||||
<TfrxPageFooter Name="" Height="23,77953" Left="0" Top="635" Width="1009,13451" PrintOnLastPage="False">
|
<TfrxPageFooter Name="" Height="23,77953" Left="0" Top="635" Width="1009,13451" PrintOnLastPage="False">
|
||||||
<TfrxMemoView Name="mContinua" Left="925,98485" Top="4,77953" Width="81,08714" Height="16,77953" OnBeforePrint="mContinuaOnBeforePrint" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" HAlign="haRight" ParentFont="False" Text="Continúa ..."/>
|
<TfrxMemoView Name="mContinua" Left="925,98485" Top="4,77953" Width="81,08714" Height="16,77953" OnBeforePrint="mContinuaOnBeforePrint" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" HAlign="haRight" ParentFont="False" Text="Continúa ..."/>
|
||||||
@ -22,7 +22,7 @@
|
|||||||
<TfrxMemoView Name="Memo8" Left="633,8661515" Top="25" Width="92,67718" Height="15" ShowHint="False" Color="-16777211" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" ParentFont="False" VAlign="vaCenter" Text="Fecha"/>
|
<TfrxMemoView Name="Memo8" Left="633,8661515" Top="25" Width="92,67718" Height="15" ShowHint="False" Color="-16777211" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" ParentFont="False" VAlign="vaCenter" Text="Fecha"/>
|
||||||
<TfrxMemoView Name="Memo7" Left="0" Top="2,77953" Width="485,37013" Height="20" ShowHint="False" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="1" Frame.Color="8421504" ParentFont="False" Text="[frxDBInformeListadoFacturas."NOMBRE"]"/>
|
<TfrxMemoView Name="Memo7" Left="0" Top="2,77953" Width="485,37013" Height="20" ShowHint="False" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="1" Frame.Color="8421504" ParentFont="False" Text="[frxDBInformeListadoFacturas."NOMBRE"]"/>
|
||||||
</TfrxGroupHeader>
|
</TfrxGroupHeader>
|
||||||
<TfrxMasterData Name="DatosMaestros1" Height="17,00787402" Left="0" Top="315" Width="1009,13451" Columns="1" ColumnWidth="200" ColumnGap="20" DataSetName="frxDBInformeListadoFacturas" RowCount="0" Stretched="True">
|
<TfrxMasterData Name="DatosMaestros1" Height="17,00787402" Left="0" Top="315" Width="1009,13451" Columns="1" ColumnWidth="200" ColumnGap="20" DataSet="frxDBInformeListadoFacturas" DataSetName="frxDBInformeListadoFacturas" RowCount="0" Stretched="True">
|
||||||
<TfrxMemoView Name="Memo18" Left="0" Top="0" Width="88,78" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" ParentFont="False" Text=" [frxDBInformeListadoFacturas."REFERENCIA"]"/>
|
<TfrxMemoView Name="Memo18" Left="0" Top="0" Width="88,78" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" ParentFont="False" Text=" [frxDBInformeListadoFacturas."REFERENCIA"]"/>
|
||||||
<TfrxMemoView Name="Memo4" Left="88,78" Top="0" Width="463,75" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" ParentFont="False" Text=" [frxDBInformeListadoFacturas."NOMBRE"]"/>
|
<TfrxMemoView Name="Memo4" Left="88,78" Top="0" Width="463,75" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" ParentFont="False" Text=" [frxDBInformeListadoFacturas."NOMBRE"]"/>
|
||||||
<TfrxMemoView Name="Memo20" Left="552,53" Top="0" Width="81,34" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" ParentFont="False" Text=" [frxDBInformeListadoFacturas."NIF_CIF"]"/>
|
<TfrxMemoView Name="Memo20" Left="552,53" Top="0" Width="81,34" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" ParentFont="False" Text=" [frxDBInformeListadoFacturas."NIF_CIF"]"/>
|
||||||
@ -44,7 +44,7 @@
|
|||||||
<TfrxMemoView Name="Memo22" Left="573,62987" Top="60" Width="95" Height="15" ShowHint="False" Color="-16777211" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="Importe total"/>
|
<TfrxMemoView Name="Memo22" Left="573,62987" Top="60" Width="95" Height="15" ShowHint="False" Color="-16777211" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="Importe total"/>
|
||||||
<TfrxMemoView Name="Memo23" Left="0" Top="23" Width="485,37013" Height="15,11811024" ShowHint="False" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="1" Frame.Color="8421504" ParentFont="False" Text="Resumen por meses de las facturas de cliente"/>
|
<TfrxMemoView Name="Memo23" Left="0" Top="23" Width="485,37013" Height="15,11811024" ShowHint="False" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="1" Frame.Color="8421504" ParentFont="False" Text="Resumen por meses de las facturas de cliente"/>
|
||||||
</TfrxHeader>
|
</TfrxHeader>
|
||||||
<TfrxMasterData Name="DatosMAestros2" Height="17" Left="0" Top="523" Width="1009,13451" ColumnWidth="0" ColumnGap="0" DataSetName="frxDBInformeListadoFacturasResumen" RowCount="0">
|
<TfrxMasterData Name="DatosMAestros2" Height="17" Left="0" Top="523" Width="1009,13451" ColumnWidth="0" ColumnGap="0" DataSet="frxDBInformeListadoFacturasResumen" DataSetName="frxDBInformeListadoFacturasResumen" RowCount="0">
|
||||||
<TfrxMemoView Name="Memo9" Left="0" Top="0" Width="383,63" Height="17,00787402" ShowHint="False" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" ParentFont="False" Text="[frxDBInformeListadoFacturasResumen."TITULO"]"/>
|
<TfrxMemoView Name="Memo9" Left="0" Top="0" Width="383,63" Height="17,00787402" ShowHint="False" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" ParentFont="False" Text="[frxDBInformeListadoFacturasResumen."TITULO"]"/>
|
||||||
<TfrxMemoView Name="Memo10" Left="383,63" Top="0" Width="95" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" HAlign="haRight" ParentFont="False" Text="[frxDBInformeListadoFacturasResumen."BASE_IMPONIBLE"]"/>
|
<TfrxMemoView Name="Memo10" Left="383,63" Top="0" Width="95" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" HAlign="haRight" ParentFont="False" Text="[frxDBInformeListadoFacturasResumen."BASE_IMPONIBLE"]"/>
|
||||||
<TfrxMemoView Name="Memo11" Left="478,63" Top="0" Width="95" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" HAlign="haRight" ParentFont="False" Text="[frxDBInformeListadoFacturasResumen."IMPORTE_IVA"]"/>
|
<TfrxMemoView Name="Memo11" Left="478,63" Top="0" Width="95" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" HAlign="haRight" ParentFont="False" Text="[frxDBInformeListadoFacturasResumen."IMPORTE_IVA"]"/>
|
||||||
|
|||||||
@ -1,5 +1,5 @@
|
|||||||
<?xml version="1.0" encoding="utf-8"?>
|
<?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="41338,7567592708" ScriptLanguage="PascalScript" ScriptText.Text="procedure mContinuaOnBeforePrint(Sender: TfrxComponent); begin if Engine.FinalPass then begin if (<Page#> = <TotalPages#>) then begin mContinua.Visible := False; end else begin mContinua.Visible := True; end end; end; begin end." ShowProgress="False" StoreInDFM="False" OnStartReport="frxReportOnStartReport" PropData="044C65667403A90003546F70021008446174617365747301010C3400000020446174615365744E616D653D226672784442496E666F726D65495641436F6D706172617469766F4661637475726173436C692200010C3400000020446174615365744E616D653D226672784442496E666F726D65495641436F6D706172617469766F466163747572617350726F220000095661726961626C657301010C13000000204E616D653D2220506172616D6574726F732200010C17000000204E616D653D22546578746F506172616D6574726F73220000055374796C650100">
|
<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="41339,7505091435" ScriptLanguage="PascalScript" ScriptText.Text="procedure mContinuaOnBeforePrint(Sender: TfrxComponent); begin if Engine.FinalPass then begin if (<Page#> = <TotalPages#>) then begin mContinua.Visible := False; end else begin mContinua.Visible := True; end end; end; begin end." ShowProgress="False" StoreInDFM="False" OnStartReport="frxReportOnStartReport" PropData="044C65667403910003546F70021008446174617365747301010C6500000020446174615365743D22667278444244496E666F726D65495641436F6D706172617469766F4661637475726173436C692220446174615365744E616D653D226672784442496E666F726D65495641436F6D706172617469766F4661637475726173436C692200010C6500000020446174615365743D22667278444244496E666F726D65495641436F6D706172617469766F466163747572617350726F2220446174615365744E616D653D226672784442496E666F726D65495641436F6D706172617469766F466163747572617350726F220000095661726961626C657301010C13000000204E616D653D2220506172616D6574726F732200010C17000000204E616D653D22546578746F506172616D6574726F73220000055374796C650100">
|
||||||
<TfrxDataPage Name="Data" Height="1000" Left="0" Top="0" Width="1000"/>
|
<TfrxDataPage Name="Data" Height="1000" Left="0" Top="0" Width="1000"/>
|
||||||
<TfrxReportPage Name="Page1" Orientation="poLandscape" PaperWidth="297" PaperHeight="210" PaperSize="9" LeftMargin="15" RightMargin="15" TopMargin="15" BottomMargin="20" ColumnWidth="0" ColumnPositions.Text="" HGuides.Text="" VGuides.Text="">
|
<TfrxReportPage Name="Page1" Orientation="poLandscape" PaperWidth="297" PaperHeight="210" PaperSize="9" LeftMargin="15" RightMargin="15" TopMargin="15" BottomMargin="20" ColumnWidth="0" ColumnPositions.Text="" HGuides.Text="" VGuides.Text="">
|
||||||
<TfrxPageHeader Name="Band1" Height="136,10235" Left="0" Top="16" Width="1009,13451" OnBeforePrint="Band1OnBeforePrint">
|
<TfrxPageHeader Name="Band1" Height="136,10235" Left="0" Top="16" Width="1009,13451" OnBeforePrint="Band1OnBeforePrint">
|
||||||
@ -7,12 +7,12 @@
|
|||||||
<TfrxShapeView Name="Shape5" Left="513" Top="4" Width="495" Height="129" ShowHint="False" Color="-16777211" Shape="skRoundRectangle"/>
|
<TfrxShapeView Name="Shape5" Left="513" Top="4" Width="495" Height="129" ShowHint="False" Color="-16777211" Shape="skRoundRectangle"/>
|
||||||
<TfrxMemoView Name="NombreCliente" Left="521,85807" Top="13" Width="478" Height="19" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="11763997" Font.Height="-13" Font.Name="Tahoma" Font.Style="1" HAlign="haRight" ParentFont="False" Text="LISTADO COMPARATIVO DE IVA REPERCUTIDO - SOPORTADO"/>
|
<TfrxMemoView Name="NombreCliente" Left="521,85807" Top="13" Width="478" Height="19" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="11763997" Font.Height="-13" Font.Name="Tahoma" Font.Style="1" HAlign="haRight" ParentFont="False" Text="LISTADO COMPARATIVO DE IVA REPERCUTIDO - SOPORTADO"/>
|
||||||
<TfrxMemoView Name="Memo3" Left="521,85807" Top="34,89765" Width="478" Height="91" 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#] [TextoParametros]"/>
|
<TfrxMemoView Name="Memo3" Left="521,85807" Top="34,89765" Width="478" Height="91" 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#] [TextoParametros]"/>
|
||||||
<TfrxMemoView Name="DatosEmpresa" Left="85" Top="37" Width="309" Height="88" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="0" ParentFont="False" Text="AZACAN FACILITIES SERVICIOS PROFESIONALES, S.L. CIF: B86610268 C/ BUENDIA 25, LOCAL 28053 MADRID"/>
|
<TfrxMemoView Name="DatosEmpresa" Left="85" Top="37" Width="309" Height="88" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="0" ParentFont="False" Text="AZACAN - GESTIÓN INTEGRAL DE SERVICIOS, S.L. CIF: B86610268 C/ BUENDIA 25, LOCAL 28053 MADRID"/>
|
||||||
</TfrxPageHeader>
|
</TfrxPageHeader>
|
||||||
<TfrxPageFooter Name="" Height="23,77953" Left="0" Top="664" Width="1009,13451" PrintOnLastPage="False">
|
<TfrxPageFooter Name="" Height="23,77953" Left="0" Top="664" Width="1009,13451" PrintOnLastPage="False">
|
||||||
<TfrxMemoView Name="mContinua" Left="925,98485" Top="4,77953" Width="81,08714" Height="16,77953" OnBeforePrint="mContinuaOnBeforePrint" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" HAlign="haRight" ParentFont="False" Text="Continúa ..."/>
|
<TfrxMemoView Name="mContinua" Left="925,98485" Top="4,77953" Width="81,08714" Height="16,77953" OnBeforePrint="mContinuaOnBeforePrint" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" HAlign="haRight" ParentFont="False" Text="Continúa ..."/>
|
||||||
</TfrxPageFooter>
|
</TfrxPageFooter>
|
||||||
<TfrxMasterData Name="DatosMaestros1" Height="16" Left="0" Top="307" Width="1009,13451" Columns="1" ColumnWidth="200" ColumnGap="20" DataSetName="frxDBInformeIVAComparativoFacturasCli" RowCount="0" Stretched="True">
|
<TfrxMasterData Name="DatosMaestros1" Height="16" Left="0" Top="307" Width="1009,13451" Columns="1" ColumnWidth="200" ColumnGap="20" DataSet="frxDBDInformeIVAComparativoFacturasCli" DataSetName="frxDBInformeIVAComparativoFacturasCli" RowCount="0" Stretched="True">
|
||||||
<TfrxMemoView Name="Memo4" Left="0" Top="0" Width="137" Height="16" ShowHint="False" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Arial" Font.Style="0" Frame.Typ="15" ParentFont="False" Text="[frxDBInformeIVAComparativoFacturasCli."DESCRIPCION"]"/>
|
<TfrxMemoView Name="Memo4" Left="0" Top="0" Width="137" Height="16" ShowHint="False" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Arial" Font.Style="0" Frame.Typ="15" ParentFont="False" Text="[frxDBInformeIVAComparativoFacturasCli."DESCRIPCION"]"/>
|
||||||
<TfrxMemoView Name="Memo6" Align="baLeft" Left="137" Top="0" Width="50" Height="16" ShowHint="False" DisplayFormat.FormatStr="#00 %" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Arial" Font.Style="0" Frame.Typ="15" HAlign="haRight" ParentFont="False" Text="[frxDBInformeIVAComparativoFacturasCli."IVA"]"/>
|
<TfrxMemoView Name="Memo6" Align="baLeft" Left="137" Top="0" Width="50" Height="16" ShowHint="False" DisplayFormat.FormatStr="#00 %" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Arial" Font.Style="0" Frame.Typ="15" HAlign="haRight" ParentFont="False" Text="[frxDBInformeIVAComparativoFacturasCli."IVA"]"/>
|
||||||
<TfrxMemoView Name="Memo7" Align="baLeft" Left="187" Top="0" Width="100" Height="16" ShowHint="False" DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Arial" Font.Style="0" Frame.Typ="15" HAlign="haRight" ParentFont="False" Text="[frxDBInformeIVAComparativoFacturasCli."IMPORTE_IVA"]"/>
|
<TfrxMemoView Name="Memo7" Align="baLeft" Left="187" Top="0" Width="100" Height="16" ShowHint="False" DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Arial" Font.Style="0" Frame.Typ="15" HAlign="haRight" ParentFont="False" Text="[frxDBInformeIVAComparativoFacturasCli."IMPORTE_IVA"]"/>
|
||||||
@ -31,7 +31,7 @@
|
|||||||
<TfrxMemoView Name="Memo2" Align="baLeft" Left="337" Top="60" Width="100" Height="15" ShowHint="False" Color="-16777211" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="Importe RE"/>
|
<TfrxMemoView Name="Memo2" Align="baLeft" Left="337" Top="60" Width="100" Height="15" ShowHint="False" Color="-16777211" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="Importe RE"/>
|
||||||
<TfrxMemoView Name="Memo5" Align="baLeft" Left="287" Top="60" Width="50" Height="15" ShowHint="False" Color="-16777211" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="RE"/>
|
<TfrxMemoView Name="Memo5" Align="baLeft" Left="287" Top="60" Width="50" Height="15" ShowHint="False" Color="-16777211" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="RE"/>
|
||||||
</TfrxHeader>
|
</TfrxHeader>
|
||||||
<TfrxMasterData Name="DatosMAestros2" Height="16" Left="0" Top="478" Width="1009,13451" ColumnWidth="0" ColumnGap="0" DataSetName="frxDBInformeIVAComparativoFacturasPro" RowCount="0">
|
<TfrxMasterData Name="DatosMAestros2" Height="16" Left="0" Top="478" Width="1009,13451" ColumnWidth="0" ColumnGap="0" DataSet="frxDBDInformeIVAComparativoFacturasPro" DataSetName="frxDBInformeIVAComparativoFacturasPro" RowCount="0">
|
||||||
<TfrxMemoView Name="Memo28" Left="0" Top="0" Width="137" Height="16" ShowHint="False" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Arial" Font.Style="0" Frame.Typ="15" ParentFont="False" Text="[frxDBInformeIVAComparativoFacturasPro."DESCRIPCION"]"/>
|
<TfrxMemoView Name="Memo28" Left="0" Top="0" Width="137" Height="16" ShowHint="False" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Arial" Font.Style="0" Frame.Typ="15" ParentFont="False" Text="[frxDBInformeIVAComparativoFacturasPro."DESCRIPCION"]"/>
|
||||||
<TfrxMemoView Name="Memo29" Align="baLeft" Left="137" Top="0" Width="50" Height="16" ShowHint="False" DisplayFormat.FormatStr="#00 %" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Arial" Font.Style="0" Frame.Typ="15" HAlign="haRight" ParentFont="False" Text="[frxDBInformeIVAComparativoFacturasPro."IVA"]"/>
|
<TfrxMemoView Name="Memo29" Align="baLeft" Left="137" Top="0" Width="50" Height="16" ShowHint="False" DisplayFormat.FormatStr="#00 %" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Arial" Font.Style="0" Frame.Typ="15" HAlign="haRight" ParentFont="False" Text="[frxDBInformeIVAComparativoFacturasPro."IVA"]"/>
|
||||||
<TfrxMemoView Name="Memo30" Align="baLeft" Left="187" Top="0" Width="100" Height="16" ShowHint="False" DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Arial" Font.Style="0" Frame.Typ="15" HAlign="haRight" ParentFont="False" Text="[frxDBInformeIVAComparativoFacturasPro."IMPORTE_IVA"]"/>
|
<TfrxMemoView Name="Memo30" Align="baLeft" Left="187" Top="0" Width="100" Height="16" ShowHint="False" DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Arial" Font.Style="0" Frame.Typ="15" HAlign="haRight" ParentFont="False" Text="[frxDBInformeIVAComparativoFacturasPro."IMPORTE_IVA"]"/>
|
||||||
|
|||||||
@ -1,5 +1,5 @@
|
|||||||
<?xml version="1.0" encoding="utf-8"?>
|
<?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="41338,756081875" ScriptLanguage="PascalScript" ScriptText.Text="procedure mContinuaOnBeforePrint(Sender: TfrxComponent); begin if Engine.FinalPass then begin if (<Page#> = <TotalPages#>) then begin mContinua.Visible := False; end else begin mContinua.Visible := True; end end; end; begin end." ShowProgress="False" StoreInDFM="False" OnStartReport="frxReportOnStartReport" PropData="044C65667403A90003546F70021008446174617365747301010C2A00000020446174615365744E616D653D226672784442496E666F726D654C69737461646F46616374757261732200010C3100000020446174615365744E616D653D226672784442496E666F726D654C69737461646F4661637475726173526573756D656E220000095661726961626C657301010C13000000204E616D653D2220506172616D6574726F732200010C35000000204E616D653D22546578746F506172616D6574726F73222056616C75653D22262336303B4665636861496E6963696F262336323B220000055374796C650100">
|
<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="41339,7506315857" ScriptLanguage="PascalScript" ScriptText.Text="procedure mContinuaOnBeforePrint(Sender: TfrxComponent); begin if Engine.FinalPass then begin if (<Page#> = <TotalPages#>) then begin mContinua.Visible := False; end else begin mContinua.Visible := True; end end; end; begin end." ShowProgress="False" StoreInDFM="False" OnStartReport="frxReportOnStartReport" PropData="044C65667403910003546F70021008446174617365747301010C5000000020446174615365743D226672784442496E666F726D654C69737461646F46616374757261732220446174615365744E616D653D226672784442496E666F726D654C69737461646F46616374757261732200010C5E00000020446174615365743D226672784442496E666F726D654C69737461646F4661637475726173526573756D656E2220446174615365744E616D653D226672784442496E666F726D654C69737461646F4661637475726173526573756D656E220000095661726961626C657301010C13000000204E616D653D2220506172616D6574726F732200010C35000000204E616D653D22546578746F506172616D6574726F73222056616C75653D22262336303B4665636861496E6963696F262336323B220000055374796C650100">
|
||||||
<TfrxDataPage Name="Data" Height="1000" Left="0" Top="0" Width="1000"/>
|
<TfrxDataPage Name="Data" Height="1000" Left="0" Top="0" Width="1000"/>
|
||||||
<TfrxReportPage Name="Page1" Orientation="poLandscape" PaperWidth="297" PaperHeight="210" PaperSize="9" LeftMargin="15" RightMargin="15" TopMargin="15" BottomMargin="20" ColumnWidth="0" ColumnPositions.Text="" HGuides.Text="" VGuides.Text="">
|
<TfrxReportPage Name="Page1" Orientation="poLandscape" PaperWidth="297" PaperHeight="210" PaperSize="9" LeftMargin="15" RightMargin="15" TopMargin="15" BottomMargin="20" ColumnWidth="0" ColumnPositions.Text="" HGuides.Text="" VGuides.Text="">
|
||||||
<TfrxPageHeader Name="Band1" Height="136,10235" Left="0" Top="16" Width="1009,13451" OnBeforePrint="Band1OnBeforePrint">
|
<TfrxPageHeader Name="Band1" Height="136,10235" Left="0" Top="16" Width="1009,13451" OnBeforePrint="Band1OnBeforePrint">
|
||||||
@ -7,7 +7,7 @@
|
|||||||
<TfrxShapeView Name="Shape5" Left="542" Top="9" Width="465" Height="122" ShowHint="False" Color="-16777211" Frame.Width="0,1" Shape="skRoundRectangle"/>
|
<TfrxShapeView Name="Shape5" Left="542" Top="9" Width="465" Height="122" ShowHint="False" Color="-16777211" Frame.Width="0,1" Shape="skRoundRectangle"/>
|
||||||
<TfrxMemoView Name="NombreCliente" Left="545,85807" Top="14" Width="452" Height="16,88188" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-13" Font.Name="Tahoma" Font.Style="1" HAlign="haRight" ParentFont="False" Text="LISTADO DE IVA FACTURAS DE PROVEEDOR"/>
|
<TfrxMemoView Name="NombreCliente" Left="545,85807" Top="14" Width="452" Height="16,88188" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-13" Font.Name="Tahoma" Font.Style="1" HAlign="haRight" ParentFont="False" Text="LISTADO DE IVA FACTURAS DE PROVEEDOR"/>
|
||||||
<TfrxMemoView Name="Memo3" Left="545,85807" Top="34" Width="452" Height="91" 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#] [TextoParametros]"/>
|
<TfrxMemoView Name="Memo3" Left="545,85807" Top="34" Width="452" Height="91" 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#] [TextoParametros]"/>
|
||||||
<TfrxMemoView Name="DatosEmpresa" Left="84" Top="37" Width="285" Height="88" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="0" ParentFont="False" Text="AZACAN FACILITIES SERVICIOS PROFESIONALES, S.L. CIF: B86610268 C/ BUENDIA 25, LOCAL 28053 MADRID"/>
|
<TfrxMemoView Name="DatosEmpresa" Left="84" Top="37" Width="285" Height="88" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="0" ParentFont="False" Text="AZACAN - GESTIÓN INTEGRAL DE SERVICIOS, S.L. CIF: B86610268 C/ BUENDIA 25, LOCAL 28053 MADRID"/>
|
||||||
</TfrxPageHeader>
|
</TfrxPageHeader>
|
||||||
<TfrxPageFooter Name="" Height="23,77953" Left="0" Top="558" Width="1009,13451" PrintOnLastPage="False">
|
<TfrxPageFooter Name="" Height="23,77953" Left="0" Top="558" Width="1009,13451" PrintOnLastPage="False">
|
||||||
<TfrxMemoView Name="mContinua" Left="925,98485" Top="4,77953" Width="81,08714" Height="16,77953" OnBeforePrint="mContinuaOnBeforePrint" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" HAlign="haRight" ParentFont="False" Text="Continúa ..."/>
|
<TfrxMemoView Name="mContinua" Left="925,98485" Top="4,77953" Width="81,08714" Height="16,77953" OnBeforePrint="mContinuaOnBeforePrint" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" HAlign="haRight" ParentFont="False" Text="Continúa ..."/>
|
||||||
@ -22,7 +22,7 @@
|
|||||||
<TfrxMemoView Name="Memo8" Left="632" Top="25" Width="92,67718" Height="15" ShowHint="False" Color="-16777211" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" ParentFont="False" VAlign="vaCenter" Text="Fecha"/>
|
<TfrxMemoView Name="Memo8" Left="632" Top="25" Width="92,67718" Height="15" ShowHint="False" Color="-16777211" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" ParentFont="False" VAlign="vaCenter" Text="Fecha"/>
|
||||||
<TfrxMemoView Name="Memo7" Left="0" Top="3,77953" Width="485,37013" Height="15,11811024" ShowHint="False" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="1" Frame.Color="8421504" ParentFont="False" Text="[frxDBInformeListadoFacturas."TITULO"]"/>
|
<TfrxMemoView Name="Memo7" Left="0" Top="3,77953" Width="485,37013" Height="15,11811024" ShowHint="False" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="1" Frame.Color="8421504" ParentFont="False" Text="[frxDBInformeListadoFacturas."TITULO"]"/>
|
||||||
</TfrxGroupHeader>
|
</TfrxGroupHeader>
|
||||||
<TfrxMasterData Name="DatosMaestros1" Height="17,00787402" Left="0" Top="272" Width="1009,13451" Columns="1" ColumnWidth="200" ColumnGap="20" DataSetName="frxDBInformeListadoFacturas" RowCount="0">
|
<TfrxMasterData Name="DatosMaestros1" Height="17,00787402" Left="0" Top="272" Width="1009,13451" Columns="1" ColumnWidth="200" ColumnGap="20" DataSet="frxDBInformeListadoFacturas" DataSetName="frxDBInformeListadoFacturas" RowCount="0">
|
||||||
<TfrxMemoView Name="Memo18" Left="0" Top="0" Width="86,95698" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="13" ParentFont="False" Text=" [frxDBInformeListadoFacturas."REFERENCIA"]"/>
|
<TfrxMemoView Name="Memo18" Left="0" Top="0" Width="86,95698" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="13" ParentFont="False" Text=" [frxDBInformeListadoFacturas."REFERENCIA"]"/>
|
||||||
<TfrxMemoView Name="Memo4" Left="87" Top="0" Width="463,75" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" ParentFont="False" Text=" [frxDBInformeListadoFacturas."NOMBRE"]"/>
|
<TfrxMemoView Name="Memo4" Left="87" Top="0" Width="463,75" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" ParentFont="False" Text=" [frxDBInformeListadoFacturas."NOMBRE"]"/>
|
||||||
<TfrxMemoView Name="Memo20" Left="550,81138" Top="0" Width="81,25984252" Height="17,007874015748" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" ParentFont="False" Text=" [frxDBInformeListadoFacturas."NIF_CIF"]"/>
|
<TfrxMemoView Name="Memo20" Left="550,81138" Top="0" Width="81,25984252" Height="17,007874015748" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" ParentFont="False" Text=" [frxDBInformeListadoFacturas."NIF_CIF"]"/>
|
||||||
@ -38,7 +38,7 @@
|
|||||||
<TfrxMemoView Name="Memo53" Left="0" Top="0,37774772" Width="723,57139" Height="16" ShowHint="False" StretchMode="smMaxHeight" Color="-16777211" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="13" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="TOTALES [frxDBInformeListadoFacturas."TITULO"]:"/>
|
<TfrxMemoView Name="Memo53" Left="0" Top="0,37774772" Width="723,57139" Height="16" ShowHint="False" StretchMode="smMaxHeight" Color="-16777211" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="13" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="TOTALES [frxDBInformeListadoFacturas."TITULO"]:"/>
|
||||||
</TfrxGroupFooter>
|
</TfrxGroupFooter>
|
||||||
<TfrxMemoView Name="Memo2" Align="baRight" Left="938,13451" Top="651" Width="71" Height="13" OnBeforePrint="Memo2OnBeforePrint" ShowHint="False" StretchMode="smMaxHeight" Font.Charset="1" Font.Color="0" Font.Height="-9" Font.Name="Tahoma" Font.Style="0" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text=""/>
|
<TfrxMemoView Name="Memo2" Align="baRight" Left="938,13451" Top="651" Width="71" Height="13" OnBeforePrint="Memo2OnBeforePrint" ShowHint="False" StretchMode="smMaxHeight" Font.Charset="1" Font.Color="0" Font.Height="-9" Font.Name="Tahoma" Font.Style="0" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text=""/>
|
||||||
<TfrxMasterData Name="DatosMaestros2" Height="17,007874015748" Left="0" Top="446" Width="1009,13451" ColumnWidth="0" ColumnGap="0" DataSetName="frxDBInformeListadoFacturasResumen" RowCount="0">
|
<TfrxMasterData Name="DatosMaestros2" Height="17,007874015748" Left="0" Top="446" Width="1009,13451" ColumnWidth="0" ColumnGap="0" DataSet="frxDBInformeListadoFacturasResumen" DataSetName="frxDBInformeListadoFacturasResumen" RowCount="0">
|
||||||
<TfrxMemoView Name="Memo9" Left="0" Top="0" Width="381,32282" Height="17,00787402" ShowHint="False" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="1" Frame.Typ="13" ParentFont="False" Text="[frxDBInformeListadoFacturasResumen."TITULO"]"/>
|
<TfrxMemoView Name="Memo9" Left="0" Top="0" Width="381,32282" Height="17,00787402" ShowHint="False" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="1" Frame.Typ="13" ParentFont="False" Text="[frxDBInformeListadoFacturasResumen."TITULO"]"/>
|
||||||
<TfrxMemoView Name="Memo10" Left="381,65368" Top="0" Width="94,48818898" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="13" HAlign="haRight" ParentFont="False" Text="[frxDBInformeListadoFacturasResumen."BASE_IMPONIBLE"]"/>
|
<TfrxMemoView Name="Memo10" Left="381,65368" Top="0" Width="94,48818898" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="13" HAlign="haRight" ParentFont="False" Text="[frxDBInformeListadoFacturasResumen."BASE_IMPONIBLE"]"/>
|
||||||
<TfrxMemoView Name="Memo11" Left="476,3624" Top="0" Width="95,24409449" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" HAlign="haRight" ParentFont="False" Text="[frxDBInformeListadoFacturasResumen."IMPORTE_IVA"]"/>
|
<TfrxMemoView Name="Memo11" Left="476,3624" Top="0" Width="95,24409449" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" HAlign="haRight" ParentFont="False" Text="[frxDBInformeListadoFacturasResumen."IMPORTE_IVA"]"/>
|
||||||
|
|||||||
@ -1,5 +1,5 @@
|
|||||||
<?xml version="1.0" encoding="utf-8"?>
|
<?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="41338,7570363194" ScriptLanguage="PascalScript" ScriptText.Text="procedure mContinuaOnBeforePrint(Sender: TfrxComponent); begin if Engine.FinalPass then begin if (<Page#> = <TotalPages#>) then begin mContinua.Visible := False; end else begin mContinua.Visible := True; end end; end; begin end." ShowProgress="False" StoreInDFM="False" OnStartReport="frxReportOnStartReport" PropData="044C65667403A90003546F70021008446174617365747301010C2A00000020446174615365744E616D653D226672784442496E666F726D654C69737461646F46616374757261732200010C3100000020446174615365744E616D653D226672784442496E666F726D654C69737461646F4661637475726173526573756D656E220000095661726961626C657301010C13000000204E616D653D2220506172616D6574726F732200010C35000000204E616D653D22546578746F506172616D6574726F73222056616C75653D22262336303B4665636861496E6963696F262336323B220000055374796C650100">
|
<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="41339,750762338" ScriptLanguage="PascalScript" ScriptText.Text="procedure mContinuaOnBeforePrint(Sender: TfrxComponent); begin if Engine.FinalPass then begin if (<Page#> = <TotalPages#>) then begin mContinua.Visible := False; end else begin mContinua.Visible := True; end end; end; begin end." ShowProgress="False" StoreInDFM="False" OnStartReport="frxReportOnStartReport" PropData="044C65667403910003546F70021008446174617365747301010C5000000020446174615365743D226672784442496E666F726D654C69737461646F46616374757261732220446174615365744E616D653D226672784442496E666F726D654C69737461646F46616374757261732200010C5E00000020446174615365743D226672784442496E666F726D654C69737461646F4661637475726173526573756D656E2220446174615365744E616D653D226672784442496E666F726D654C69737461646F4661637475726173526573756D656E220000095661726961626C657301010C13000000204E616D653D2220506172616D6574726F732200010C35000000204E616D653D22546578746F506172616D6574726F73222056616C75653D22262336303B4665636861496E6963696F262336323B220000055374796C650100">
|
||||||
<TfrxDataPage Name="Data" Height="1000" Left="0" Top="0" Width="1000"/>
|
<TfrxDataPage Name="Data" Height="1000" Left="0" Top="0" Width="1000"/>
|
||||||
<TfrxReportPage Name="Page1" Orientation="poLandscape" PaperWidth="297" PaperHeight="210" PaperSize="9" LeftMargin="15" RightMargin="15" TopMargin="15" BottomMargin="20" ColumnWidth="0" ColumnPositions.Text="" HGuides.Text="" VGuides.Text="">
|
<TfrxReportPage Name="Page1" Orientation="poLandscape" PaperWidth="297" PaperHeight="210" PaperSize="9" LeftMargin="15" RightMargin="15" TopMargin="15" BottomMargin="20" ColumnWidth="0" ColumnPositions.Text="" HGuides.Text="" VGuides.Text="">
|
||||||
<TfrxPageHeader Name="Band1" Height="136,10235" Left="0" Top="16" Width="1009,13451" OnBeforePrint="Band1OnBeforePrint">
|
<TfrxPageHeader Name="Band1" Height="136,10235" Left="0" Top="16" Width="1009,13451" OnBeforePrint="Band1OnBeforePrint">
|
||||||
@ -7,7 +7,7 @@
|
|||||||
<TfrxShapeView Name="Shape5" Left="541" Top="8" Width="465" Height="122" ShowHint="False" Color="-16777211" Frame.Width="0,1" Shape="skRoundRectangle"/>
|
<TfrxShapeView Name="Shape5" Left="541" Top="8" Width="465" Height="122" ShowHint="False" Color="-16777211" Frame.Width="0,1" Shape="skRoundRectangle"/>
|
||||||
<TfrxMemoView Name="NombreCliente" Left="544,85807" Top="13" Width="452" Height="16,88188" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-13" Font.Name="Tahoma" Font.Style="1" HAlign="haRight" ParentFont="False" Text="LISTADO DE IVA FACTURAS DE PROVEEDOR"/>
|
<TfrxMemoView Name="NombreCliente" Left="544,85807" Top="13" Width="452" Height="16,88188" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-13" Font.Name="Tahoma" Font.Style="1" HAlign="haRight" ParentFont="False" Text="LISTADO DE IVA FACTURAS DE PROVEEDOR"/>
|
||||||
<TfrxMemoView Name="Memo3" Left="544,85807" Top="33" Width="452" Height="91" 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#] [TextoParametros]"/>
|
<TfrxMemoView Name="Memo3" Left="544,85807" Top="33" Width="452" Height="91" 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#] [TextoParametros]"/>
|
||||||
<TfrxMemoView Name="DatosEmpresa" Left="85" Top="37" Width="351" Height="88" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="0" ParentFont="False" Text="AZACAN FACILITIES SERVICIOS PROFESIONALES, S.L. CIF: B86610268 C/ BUENDIA 25, LOCAL 28053 MADRID"/>
|
<TfrxMemoView Name="DatosEmpresa" Left="85" Top="37" Width="351" Height="88" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="0" ParentFont="False" Text="AZACAN - GESTIÓN INTEGRAL DE SERVICIOS, S.L. CIF: B86610268 C/ BUENDIA 25, LOCAL 28053 MADRID"/>
|
||||||
</TfrxPageHeader>
|
</TfrxPageHeader>
|
||||||
<TfrxPageFooter Name="" Height="23,77953" Left="0" Top="644" Width="1009,13451" PrintOnLastPage="False">
|
<TfrxPageFooter Name="" Height="23,77953" Left="0" Top="644" Width="1009,13451" PrintOnLastPage="False">
|
||||||
<TfrxMemoView Name="mContinua" Left="925,98485" Top="4,77953" Width="81,08714" Height="16,77953" OnBeforePrint="mContinuaOnBeforePrint" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" HAlign="haRight" ParentFont="False" Text="Continúa ..."/>
|
<TfrxMemoView Name="mContinua" Left="925,98485" Top="4,77953" Width="81,08714" Height="16,77953" OnBeforePrint="mContinuaOnBeforePrint" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" HAlign="haRight" ParentFont="False" Text="Continúa ..."/>
|
||||||
@ -23,7 +23,7 @@
|
|||||||
<TfrxMemoView Name="Memo8" Left="632" Top="25" Width="92,67718" Height="15" ShowHint="False" Color="-16777211" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" ParentFont="False" VAlign="vaCenter" Text="Fecha"/>
|
<TfrxMemoView Name="Memo8" Left="632" Top="25" Width="92,67718" Height="15" ShowHint="False" Color="-16777211" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" ParentFont="False" VAlign="vaCenter" Text="Fecha"/>
|
||||||
<TfrxMemoView Name="Memo7" Left="0" Top="3,77953" Width="485,37013" Height="15,11811024" ShowHint="False" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="1" Frame.Color="8421504" ParentFont="False" Text="[frxDBInformeListadoFacturas."NOMBRE"]"/>
|
<TfrxMemoView Name="Memo7" Left="0" Top="3,77953" Width="485,37013" Height="15,11811024" ShowHint="False" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="1" Frame.Color="8421504" ParentFont="False" Text="[frxDBInformeListadoFacturas."NOMBRE"]"/>
|
||||||
</TfrxGroupHeader>
|
</TfrxGroupHeader>
|
||||||
<TfrxMasterData Name="DatosMaestros1" Height="17,00787402" Left="0" Top="315" Width="1009,13451" Columns="1" ColumnWidth="200" ColumnGap="20" DataSetName="frxDBInformeListadoFacturas" RowCount="0">
|
<TfrxMasterData Name="DatosMaestros1" Height="17,00787402" Left="0" Top="315" Width="1009,13451" Columns="1" ColumnWidth="200" ColumnGap="20" DataSet="frxDBInformeListadoFacturas" DataSetName="frxDBInformeListadoFacturas" RowCount="0">
|
||||||
<TfrxMemoView Name="Memo18" Left="0" Top="0" Width="86,95698" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="13" ParentFont="False" Text=" [frxDBInformeListadoFacturas."REFERENCIA"]"/>
|
<TfrxMemoView Name="Memo18" Left="0" Top="0" Width="86,95698" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="13" ParentFont="False" Text=" [frxDBInformeListadoFacturas."REFERENCIA"]"/>
|
||||||
<TfrxMemoView Name="Memo4" Left="87" Top="0" Width="462,75" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="13" ParentFont="False" Text=" [frxDBInformeListadoFacturas."NOMBRE"]"/>
|
<TfrxMemoView Name="Memo4" Left="87" Top="0" Width="462,75" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="13" ParentFont="False" Text=" [frxDBInformeListadoFacturas."NOMBRE"]"/>
|
||||||
<TfrxMemoView Name="Memo20" Left="550,68" Top="0" Width="81,25984252" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" ParentFont="False" Text=" [frxDBInformeListadoFacturas."NIF_CIF"]"/>
|
<TfrxMemoView Name="Memo20" Left="550,68" Top="0" Width="81,25984252" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" ParentFont="False" Text=" [frxDBInformeListadoFacturas."NIF_CIF"]"/>
|
||||||
@ -38,7 +38,7 @@
|
|||||||
<TfrxMemoView Name="Memo15" Left="724,35436" Top="0,37774772" Width="94,48818898" Height="16" ShowHint="False" StretchMode="smMaxHeight" Color="-16777211" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="#,0.00 €" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="[SUM(<frxDBInformeListadoFacturas."BASE_IMPONIBLE">,DatosMaestros1)]"/>
|
<TfrxMemoView Name="Memo15" Left="724,35436" Top="0,37774772" Width="94,48818898" Height="16" ShowHint="False" StretchMode="smMaxHeight" Color="-16777211" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="#,0.00 €" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="[SUM(<frxDBInformeListadoFacturas."BASE_IMPONIBLE">,DatosMaestros1)]"/>
|
||||||
<TfrxMemoView Name="Memo53" Left="0" Top="0,37774772" Width="724,57139" Height="16" ShowHint="False" StretchMode="smMaxHeight" Color="-16777211" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="13" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="TOTALES [frxDBInformeListadoFacturas."TITULO"]:"/>
|
<TfrxMemoView Name="Memo53" Left="0" Top="0,37774772" Width="724,57139" Height="16" ShowHint="False" StretchMode="smMaxHeight" Color="-16777211" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="13" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="TOTALES [frxDBInformeListadoFacturas."TITULO"]:"/>
|
||||||
</TfrxGroupFooter>
|
</TfrxGroupFooter>
|
||||||
<TfrxMasterData Name="DatosMaestros2" Height="17,007874015748" Left="0" Top="532" Width="1009,13451" ColumnWidth="0" ColumnGap="0" DataSetName="frxDBInformeListadoFacturasResumen" RowCount="0">
|
<TfrxMasterData Name="DatosMaestros2" Height="17,007874015748" Left="0" Top="532" Width="1009,13451" ColumnWidth="0" ColumnGap="0" DataSet="frxDBInformeListadoFacturasResumen" DataSetName="frxDBInformeListadoFacturasResumen" RowCount="0">
|
||||||
<TfrxMemoView Name="Memo9" Left="0" Top="0" Width="382,32282" Height="17,00787402" ShowHint="False" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" ParentFont="False" Text="[frxDBInformeListadoFacturasResumen."TITULO"]"/>
|
<TfrxMemoView Name="Memo9" Left="0" Top="0" Width="382,32282" Height="17,00787402" ShowHint="False" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" ParentFont="False" Text="[frxDBInformeListadoFacturasResumen."TITULO"]"/>
|
||||||
<TfrxMemoView Name="Memo10" Left="381,65368" Top="0" Width="94,48818898" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="12" HAlign="haRight" ParentFont="False" Text="[frxDBInformeListadoFacturasResumen."BASE_IMPONIBLE"]"/>
|
<TfrxMemoView Name="Memo10" Left="381,65368" Top="0" Width="94,48818898" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="12" HAlign="haRight" ParentFont="False" Text="[frxDBInformeListadoFacturasResumen."BASE_IMPONIBLE"]"/>
|
||||||
<TfrxMemoView Name="Memo11" Left="476,3624" Top="0" Width="95,24409449" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" HAlign="haRight" ParentFont="False" Text="[frxDBInformeListadoFacturasResumen."IMPORTE_IVA"]"/>
|
<TfrxMemoView Name="Memo11" Left="476,3624" Top="0" Width="95,24409449" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" HAlign="haRight" ParentFont="False" Text="[frxDBInformeListadoFacturasResumen."IMPORTE_IVA"]"/>
|
||||||
|
|||||||
File diff suppressed because one or more lines are too long
File diff suppressed because one or more lines are too long
File diff suppressed because one or more lines are too long
File diff suppressed because one or more lines are too long
@ -1,5 +1,5 @@
|
|||||||
<?xml version="1.0" encoding="utf-8"?>
|
<?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="41338,7581018403" ScriptLanguage="PascalScript" ScriptText.Text="procedure mContinuaOnBeforePrint(Sender: TfrxComponent); begin if Engine.FinalPass then begin if (<Page#> = <TotalPages#>) then begin mContinua.Visible := False; end else begin mContinua.Visible := True; end end; end; begin end." ShowProgress="False" StoreInDFM="False" OnStartReport="frxReportOnStartReport" PropData="044C65667403A90003546F70021008446174617365747301010C3400000020446174615365744E616D653D226672784442496E666F726D654C69737461646F466163747572617350656E6469656E746573220000095661726961626C657301010C13000000204E616D653D2220506172616D6574726F732200010C17000000204E616D653D22546578746F506172616D6574726F73220000055374796C650100">
|
<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="41339,7522004745" ScriptLanguage="PascalScript" ScriptText.Text="procedure mContinuaOnBeforePrint(Sender: TfrxComponent); begin if Engine.FinalPass then begin if (<Page#> = <TotalPages#>) then begin mContinua.Visible := False; end else begin mContinua.Visible := True; end end; end; begin end." ShowProgress="False" StoreInDFM="False" OnStartReport="frxReportOnStartReport" PropData="044C65667403910003546F70021008446174617365747301010C6400000020446174615365743D226672784442496E666F726D654C69737461646F466163747572617350656E6469656E7465732220446174615365744E616D653D226672784442496E666F726D654C69737461646F466163747572617350656E6469656E746573220000095661726961626C657301010C13000000204E616D653D2220506172616D6574726F732200010C17000000204E616D653D22546578746F506172616D6574726F73220000055374796C650100">
|
||||||
<TfrxDataPage Name="Data" Height="1000" Left="0" Top="0" Width="1000"/>
|
<TfrxDataPage Name="Data" Height="1000" Left="0" Top="0" Width="1000"/>
|
||||||
<TfrxReportPage Name="Page1" Orientation="poLandscape" PaperWidth="297" PaperHeight="210" PaperSize="9" LeftMargin="15" RightMargin="15" TopMargin="15" BottomMargin="20" ColumnWidth="0" ColumnPositions.Text="" HGuides.Text="" VGuides.Text="">
|
<TfrxReportPage Name="Page1" Orientation="poLandscape" PaperWidth="297" PaperHeight="210" PaperSize="9" LeftMargin="15" RightMargin="15" TopMargin="15" BottomMargin="20" ColumnWidth="0" ColumnPositions.Text="" HGuides.Text="" VGuides.Text="">
|
||||||
<TfrxPageHeader Name="Band1" Height="140" Left="0" Top="16" Width="1009,13451" OnBeforePrint="Band1OnBeforePrint">
|
<TfrxPageHeader Name="Band1" Height="140" Left="0" Top="16" Width="1009,13451" OnBeforePrint="Band1OnBeforePrint">
|
||||||
@ -7,7 +7,7 @@
|
|||||||
<TfrxShapeView Name="Shape5" Left="513" Top="3" Width="495" Height="129" ShowHint="False" Color="-16777211" Shape="skRoundRectangle"/>
|
<TfrxShapeView Name="Shape5" Left="513" Top="3" Width="495" Height="129" ShowHint="False" Color="-16777211" Shape="skRoundRectangle"/>
|
||||||
<TfrxMemoView Name="NombreCliente" Left="521,85807" Top="12" Width="478" Height="19" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-13" Font.Name="Tahoma" Font.Style="1" HAlign="haRight" ParentFont="False" Text="LISTADO DE FACTURAS DE CLIENTE PENDIENTES"/>
|
<TfrxMemoView Name="NombreCliente" Left="521,85807" Top="12" Width="478" Height="19" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-13" Font.Name="Tahoma" Font.Style="1" HAlign="haRight" ParentFont="False" Text="LISTADO DE FACTURAS DE CLIENTE PENDIENTES"/>
|
||||||
<TfrxMemoView Name="Memo3" Left="521,85807" Top="33,89765" Width="478" Height="91" 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#] [TextoParametros]"/>
|
<TfrxMemoView Name="Memo3" Left="521,85807" Top="33,89765" Width="478" Height="91" 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#] [TextoParametros]"/>
|
||||||
<TfrxMemoView Name="DatosEmpresa" Left="84" Top="3" Width="331" Height="88" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="0" ParentFont="False" Text="AZACAN FACILITIES SERVICIOS PROFESIONALES, S.L. CIF: B86610268 C/ BUENDIA 25, LOCAL 28053 MADRID"/>
|
<TfrxMemoView Name="DatosEmpresa" Left="84" Top="3" Width="331" Height="88" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="0" ParentFont="False" Text="AZACAN - GESTIÓN INTEGRAL DE SERVICIOS, S.L. CIF: B86610268 C/ BUENDIA 25, LOCAL 28053 MADRID"/>
|
||||||
</TfrxPageHeader>
|
</TfrxPageHeader>
|
||||||
<TfrxPageFooter Name="" Height="23,77953" Left="0" Top="394" Width="1009,13451" PrintOnLastPage="False">
|
<TfrxPageFooter Name="" Height="23,77953" Left="0" Top="394" Width="1009,13451" PrintOnLastPage="False">
|
||||||
<TfrxMemoView Name="mContinua" Left="925,98485" Top="4,77953" Width="81,08714" Height="16,77953" OnBeforePrint="mContinuaOnBeforePrint" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" HAlign="haRight" ParentFont="False" Text="Continúa ..."/>
|
<TfrxMemoView Name="mContinua" Left="925,98485" Top="4,77953" Width="81,08714" Height="16,77953" OnBeforePrint="mContinuaOnBeforePrint" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" HAlign="haRight" ParentFont="False" Text="Continúa ..."/>
|
||||||
@ -21,7 +21,7 @@
|
|||||||
<TfrxMemoView Name="Memo7" Left="0" Top="2,77953" Width="485,37013" Height="15,11811024" ShowHint="False" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="1" Frame.Color="8421504" ParentFont="False" Text="[frxDBInformeListadoFacturasPendientes."TITULO"]"/>
|
<TfrxMemoView Name="Memo7" Left="0" Top="2,77953" Width="485,37013" Height="15,11811024" ShowHint="False" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="1" Frame.Color="8421504" ParentFont="False" Text="[frxDBInformeListadoFacturasPendientes."TITULO"]"/>
|
||||||
<TfrxMemoView Name="Memo1" Left="219,7718" Top="24,9448818897638" Width="85,03937008" Height="15" ShowHint="False" Color="-16777211" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" ParentFont="False" VAlign="vaCenter" Text="Fecha vto."/>
|
<TfrxMemoView Name="Memo1" Left="219,7718" Top="24,9448818897638" Width="85,03937008" Height="15" ShowHint="False" Color="-16777211" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" ParentFont="False" VAlign="vaCenter" Text="Fecha vto."/>
|
||||||
</TfrxGroupHeader>
|
</TfrxGroupHeader>
|
||||||
<TfrxMasterData Name="DatosMaestros1" Height="17,00787402" Left="0" Top="276" Width="1009,13451" Columns="1" ColumnWidth="200" ColumnGap="20" DataSetName="frxDBInformeListadoFacturasPendientes" RowCount="0" Stretched="True">
|
<TfrxMasterData Name="DatosMaestros1" Height="17,00787402" Left="0" Top="276" Width="1009,13451" Columns="1" ColumnWidth="200" ColumnGap="20" DataSet="frxDBInformeListadoFacturasPendientes" DataSetName="frxDBInformeListadoFacturasPendientes" RowCount="0" Stretched="True">
|
||||||
<TfrxMemoView Name="Memo31" Left="718,11023622" Top="0" Width="155,76377953" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" HAlign="haRight" ParentFont="False" Text="[frxDBInformeListadoFacturasPendientes."IMPORTE_TOTAL"] "/>
|
<TfrxMemoView Name="Memo31" Left="718,11023622" Top="0" Width="155,76377953" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" HAlign="haRight" ParentFont="False" Text="[frxDBInformeListadoFacturasPendientes."IMPORTE_TOTAL"] "/>
|
||||||
<TfrxMemoView Name="Memo4" Left="304,71" Top="0" Width="413,37004213" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" ParentFont="False" Text=" [frxDBInformeListadoFacturasPendientes."NOMBRE"]"/>
|
<TfrxMemoView Name="Memo4" Left="304,71" Top="0" Width="413,37004213" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" ParentFont="False" Text=" [frxDBInformeListadoFacturasPendientes."NOMBRE"]"/>
|
||||||
<TfrxMemoView Name="Memo20" Left="873,70903" Top="0" Width="135,5" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" ParentFont="False" Text=" [frxDBInformeListadoFacturasPendientes."SITUACION"]"/>
|
<TfrxMemoView Name="Memo20" Left="873,70903" Top="0" Width="135,5" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" ParentFont="False" Text=" [frxDBInformeListadoFacturasPendientes."SITUACION"]"/>
|
||||||
|
|||||||
@ -1,5 +1,5 @@
|
|||||||
<?xml version="1.0" encoding="utf-8"?>
|
<?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="41338,7584246759" ScriptLanguage="PascalScript" ScriptText.Text=" procedure mContinuaOnBeforePrint(Sender: TfrxComponent); begin if Engine.FinalPass then begin if (<Page#> = <TotalPages#>) then begin mContinua.Visible := False; end else begin mContinua.Visible := True; end end; end; begin end." ShowProgress="False" StoreInDFM="False" OnStartReport="frxReportOnStartReport" PropData="044C65667403A90003546F70021008446174617365747301010C3400000020446174615365744E616D653D226672784442496E666F726D654C69737461646F466163747572617350656E6469656E746573220000095661726961626C657301010C13000000204E616D653D2220506172616D6574726F732200010C17000000204E616D653D22546578746F506172616D6574726F73220000055374796C650100">
|
<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="41339,7523419097" ScriptLanguage="PascalScript" ScriptText.Text=" procedure mContinuaOnBeforePrint(Sender: TfrxComponent); begin if Engine.FinalPass then begin if (<Page#> = <TotalPages#>) then begin mContinua.Visible := False; end else begin mContinua.Visible := True; end end; end; begin end." ShowProgress="False" StoreInDFM="False" OnStartReport="frxReportOnStartReport" PropData="044C65667403910003546F70021008446174617365747301010C6400000020446174615365743D226672784442496E666F726D654C69737461646F466163747572617350656E6469656E7465732220446174615365744E616D653D226672784442496E666F726D654C69737461646F466163747572617350656E6469656E746573220000095661726961626C657301010C13000000204E616D653D2220506172616D6574726F732200010C17000000204E616D653D22546578746F506172616D6574726F73220000055374796C650100">
|
||||||
<TfrxDataPage Name="Data" Height="1000" Left="0" Top="0" Width="1000"/>
|
<TfrxDataPage Name="Data" Height="1000" Left="0" Top="0" Width="1000"/>
|
||||||
<TfrxReportPage Name="Page1" Orientation="poLandscape" PaperWidth="297" PaperHeight="210" PaperSize="9" LeftMargin="15" RightMargin="15" TopMargin="15" BottomMargin="20" ColumnWidth="0" ColumnPositions.Text="" HGuides.Text="" VGuides.Text="">
|
<TfrxReportPage Name="Page1" Orientation="poLandscape" PaperWidth="297" PaperHeight="210" PaperSize="9" LeftMargin="15" RightMargin="15" TopMargin="15" BottomMargin="20" ColumnWidth="0" ColumnPositions.Text="" HGuides.Text="" VGuides.Text="">
|
||||||
<TfrxPageHeader Name="Band1" Height="140" Left="0" Top="16" Width="1009,13451" OnBeforePrint="Band1OnBeforePrint">
|
<TfrxPageHeader Name="Band1" Height="140" Left="0" Top="16" Width="1009,13451" OnBeforePrint="Band1OnBeforePrint">
|
||||||
@ -7,7 +7,7 @@
|
|||||||
<TfrxShapeView Name="Shape5" Left="512" Top="6" Width="495" Height="129" ShowHint="False" Color="-16777211" Shape="skRoundRectangle"/>
|
<TfrxShapeView Name="Shape5" Left="512" Top="6" Width="495" Height="129" ShowHint="False" Color="-16777211" Shape="skRoundRectangle"/>
|
||||||
<TfrxMemoView Name="NombreCliente" Left="520,85807" Top="15" Width="478" Height="19" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-13" Font.Name="Tahoma" Font.Style="1" HAlign="haRight" ParentFont="False" Text="LISTADO DE FACTURAS DE CLIENTE PENDIENTES"/>
|
<TfrxMemoView Name="NombreCliente" Left="520,85807" Top="15" Width="478" Height="19" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-13" Font.Name="Tahoma" Font.Style="1" HAlign="haRight" ParentFont="False" Text="LISTADO DE FACTURAS DE CLIENTE PENDIENTES"/>
|
||||||
<TfrxMemoView Name="Memo3" Left="520,85807" Top="36,89765" Width="478" Height="91" 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#] [TextoParametros]"/>
|
<TfrxMemoView Name="Memo3" Left="520,85807" Top="36,89765" Width="478" Height="91" 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#] [TextoParametros]"/>
|
||||||
<TfrxMemoView Name="DatosEmpresa" Left="84" Top="3" Width="297" Height="88" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="0" ParentFont="False" Text="AZACAN FACILITIES SERVICIOS PROFESIONALES, S.L. CIF: B86610268 C/ BUENDIA 25, LOCAL 28053 MADRID"/>
|
<TfrxMemoView Name="DatosEmpresa" Left="84" Top="3" Width="297" Height="88" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="0" ParentFont="False" Text="AZACAN - GESTIÓN INTEGRAL DE SERVICIOS, S.L. CIF: B86610268 C/ BUENDIA 25, LOCAL 28053 MADRID"/>
|
||||||
</TfrxPageHeader>
|
</TfrxPageHeader>
|
||||||
<TfrxPageFooter Name="" Height="23,77953" Left="0" Top="474" Width="1009,13451" PrintOnLastPage="False">
|
<TfrxPageFooter Name="" Height="23,77953" Left="0" Top="474" Width="1009,13451" PrintOnLastPage="False">
|
||||||
<TfrxMemoView Name="mContinua" Left="925,98485" Top="4,77953" Width="81,08714" Height="16,77953" OnBeforePrint="mContinuaOnBeforePrint" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" HAlign="haRight" ParentFont="False" Text="Continúa ..."/>
|
<TfrxMemoView Name="mContinua" Left="925,98485" Top="4,77953" Width="81,08714" Height="16,77953" OnBeforePrint="mContinuaOnBeforePrint" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" HAlign="haRight" ParentFont="False" Text="Continúa ..."/>
|
||||||
@ -21,7 +21,7 @@
|
|||||||
<TfrxMemoView Name="Memo7" Left="0" Top="1,77953" Width="485,37013" Height="15,11811024" ShowHint="False" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="1" Frame.Color="8421504" ParentFont="False" Text="[frxDBInformeListadoFacturasPendientes."NOMBRE"]"/>
|
<TfrxMemoView Name="Memo7" Left="0" Top="1,77953" Width="485,37013" Height="15,11811024" ShowHint="False" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="1" Frame.Color="8421504" ParentFont="False" Text="[frxDBInformeListadoFacturasPendientes."NOMBRE"]"/>
|
||||||
<TfrxMemoView Name="Memo1" Left="219,7718" Top="24,9448818897638" Width="85,03937008" Height="15" ShowHint="False" Color="-16777211" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" ParentFont="False" VAlign="vaCenter" Text="Fecha vto."/>
|
<TfrxMemoView Name="Memo1" Left="219,7718" Top="24,9448818897638" Width="85,03937008" Height="15" ShowHint="False" Color="-16777211" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" ParentFont="False" VAlign="vaCenter" Text="Fecha vto."/>
|
||||||
</TfrxGroupHeader>
|
</TfrxGroupHeader>
|
||||||
<TfrxMasterData Name="DatosMaestros1" Height="17,00787402" Left="0" Top="316" Width="1009,13451" Columns="1" ColumnWidth="200" ColumnGap="20" DataSetName="frxDBInformeListadoFacturasPendientes" RowCount="0" Stretched="True">
|
<TfrxMasterData Name="DatosMaestros1" Height="17,00787402" Left="0" Top="316" Width="1009,13451" Columns="1" ColumnWidth="200" ColumnGap="20" DataSet="frxDBInformeListadoFacturasPendientes" DataSetName="frxDBInformeListadoFacturasPendientes" RowCount="0" Stretched="True">
|
||||||
<TfrxMemoView Name="Memo31" Left="718,11023622" Top="0" Width="155,76377953" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" HAlign="haRight" ParentFont="False" Text="[frxDBInformeListadoFacturasPendientes."IMPORTE_TOTAL"] "/>
|
<TfrxMemoView Name="Memo31" Left="718,11023622" Top="0" Width="155,76377953" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" HAlign="haRight" ParentFont="False" Text="[frxDBInformeListadoFacturasPendientes."IMPORTE_TOTAL"] "/>
|
||||||
<TfrxMemoView Name="Memo4" Left="304,71" Top="0" Width="413,37004213" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" ParentFont="False" Text=" [frxDBInformeListadoFacturasPendientes."NOMBRE"]"/>
|
<TfrxMemoView Name="Memo4" Left="304,71" Top="0" Width="413,37004213" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" ParentFont="False" Text=" [frxDBInformeListadoFacturasPendientes."NOMBRE"]"/>
|
||||||
<TfrxMemoView Name="Memo20" Left="873,70903" Top="0" Width="135,5" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" ParentFont="False" Text=" [frxDBInformeListadoFacturasPendientes."SITUACION"]"/>
|
<TfrxMemoView Name="Memo20" Left="873,70903" Top="0" Width="135,5" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" ParentFont="False" Text=" [frxDBInformeListadoFacturasPendientes."SITUACION"]"/>
|
||||||
|
|||||||
@ -1,5 +1,5 @@
|
|||||||
<?xml version="1.0" encoding="utf-8"?>
|
<?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="41338,7586048032" ScriptLanguage="PascalScript" ScriptText.Text="procedure mContinuaOnBeforePrint(Sender: TfrxComponent); begin if Engine.FinalPass then begin if (<Page#> = <TotalPages#>) then begin mContinua.Visible := False; end else begin mContinua.Visible := True; end end; end; begin end." ShowProgress="False" StoreInDFM="False" OnStartReport="frxReportOnStartReport" PropData="044C65667403A90003546F70021008446174617365747301010C2A00000020446174615365744E616D653D226672784442496E666F726D654C69737461646F46616374757261732200010C3100000020446174615365744E616D653D226672784442496E666F726D654C69737461646F4661637475726173526573756D656E220000095661726961626C657301010C13000000204E616D653D2220506172616D6574726F732200010C35000000204E616D653D22546578746F506172616D6574726F73222056616C75653D22262336303B4665636861496E6963696F262336323B220000055374796C650100">
|
<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="41339,7525012384" ScriptLanguage="PascalScript" ScriptText.Text="procedure mContinuaOnBeforePrint(Sender: TfrxComponent); begin if Engine.FinalPass then begin if (<Page#> = <TotalPages#>) then begin mContinua.Visible := False; end else begin mContinua.Visible := True; end end; end; begin end." ShowProgress="False" StoreInDFM="False" OnStartReport="frxReportOnStartReport" PropData="044C65667403910003546F70021008446174617365747301010C5000000020446174615365743D226672784442496E666F726D654C69737461646F46616374757261732220446174615365744E616D653D226672784442496E666F726D654C69737461646F46616374757261732200010C5E00000020446174615365743D226672784442496E666F726D654C69737461646F4661637475726173526573756D656E2220446174615365744E616D653D226672784442496E666F726D654C69737461646F4661637475726173526573756D656E220000095661726961626C657301010C13000000204E616D653D2220506172616D6574726F732200010C35000000204E616D653D22546578746F506172616D6574726F73222056616C75653D22262336303B4665636861496E6963696F262336323B220000055374796C650100">
|
||||||
<TfrxDataPage Name="Data" Height="1000" Left="0" Top="0" Width="1000"/>
|
<TfrxDataPage Name="Data" Height="1000" Left="0" Top="0" Width="1000"/>
|
||||||
<TfrxReportPage Name="Page1" Orientation="poLandscape" PaperWidth="297" PaperHeight="210" PaperSize="9" LeftMargin="15" RightMargin="15" TopMargin="15" BottomMargin="20" ColumnWidth="0" ColumnPositions.Text="" HGuides.Text="" VGuides.Text="">
|
<TfrxReportPage Name="Page1" Orientation="poLandscape" PaperWidth="297" PaperHeight="210" PaperSize="9" LeftMargin="15" RightMargin="15" TopMargin="15" BottomMargin="20" ColumnWidth="0" ColumnPositions.Text="" HGuides.Text="" VGuides.Text="">
|
||||||
<TfrxPageHeader Name="Band1" Height="136,10235" Left="0" Top="16" Width="1009,13451" OnBeforePrint="Band1OnBeforePrint">
|
<TfrxPageHeader Name="Band1" Height="136,10235" Left="0" Top="16" Width="1009,13451" OnBeforePrint="Band1OnBeforePrint">
|
||||||
@ -7,7 +7,7 @@
|
|||||||
<TfrxShapeView Name="Shape5" Left="541" Top="8" Width="465" Height="122" ShowHint="False" Color="-16777211" Frame.Width="0,1" Shape="skRoundRectangle"/>
|
<TfrxShapeView Name="Shape5" Left="541" Top="8" Width="465" Height="122" ShowHint="False" Color="-16777211" Frame.Width="0,1" Shape="skRoundRectangle"/>
|
||||||
<TfrxMemoView Name="NombreCliente" Left="544,85807" Top="13" Width="452" Height="16,88188" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-13" Font.Name="Tahoma" Font.Style="1" HAlign="haRight" ParentFont="False" Text="LISTADO DE FACTURAS DE PROVEEDOR"/>
|
<TfrxMemoView Name="NombreCliente" Left="544,85807" Top="13" Width="452" Height="16,88188" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-13" Font.Name="Tahoma" Font.Style="1" HAlign="haRight" ParentFont="False" Text="LISTADO DE FACTURAS DE PROVEEDOR"/>
|
||||||
<TfrxMemoView Name="Memo3" Left="544,85807" Top="33" Width="452" Height="91" 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#] [TextoParametros]"/>
|
<TfrxMemoView Name="Memo3" Left="544,85807" Top="33" Width="452" Height="91" 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#] [TextoParametros]"/>
|
||||||
<TfrxMemoView Name="DatosEmpresa" Left="84" Top="37" Width="315" Height="88" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="0" ParentFont="False" Text="AZACAN FACILITIES SERVICIOS PROFESIONALES, S.L. CIF: B86610268 C/ BUENDIA 25, LOCAL 28053 MADRID"/>
|
<TfrxMemoView Name="DatosEmpresa" Left="84" Top="37" Width="315" Height="88" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="0" ParentFont="False" Text="AZACAN - GESTIÓN INTEGRAL DE SERVICIOS, S.L. CIF: B86610268 C/ BUENDIA 25, LOCAL 28053 MADRID"/>
|
||||||
</TfrxPageHeader>
|
</TfrxPageHeader>
|
||||||
<TfrxPageFooter Name="" Height="23,77953" Left="0" Top="596" Width="1009,13451" PrintOnLastPage="False">
|
<TfrxPageFooter Name="" Height="23,77953" Left="0" Top="596" Width="1009,13451" PrintOnLastPage="False">
|
||||||
<TfrxMemoView Name="mContinua" Left="925,98485" Top="4,77953" Width="81,08714" Height="16,77953" OnBeforePrint="mContinuaOnBeforePrint" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" HAlign="haRight" ParentFont="False" Text="Continúa ..."/>
|
<TfrxMemoView Name="mContinua" Left="925,98485" Top="4,77953" Width="81,08714" Height="16,77953" OnBeforePrint="mContinuaOnBeforePrint" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" HAlign="haRight" ParentFont="False" Text="Continúa ..."/>
|
||||||
@ -23,7 +23,7 @@
|
|||||||
<TfrxMemoView Name="Memo7" Left="0" Top="2,77953" Width="485,37013" Height="15,11811024" ShowHint="False" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="1" Frame.Color="8421504" ParentFont="False" Text="[frxDBInformeListadoFacturas."TITULO"]"/>
|
<TfrxMemoView Name="Memo7" Left="0" Top="2,77953" Width="485,37013" Height="15,11811024" ShowHint="False" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="1" Frame.Color="8421504" ParentFont="False" Text="[frxDBInformeListadoFacturas."TITULO"]"/>
|
||||||
<TfrxMemoView Name="Memo1" Left="172,85838" Top="25" Width="85,03937008" Height="15" ShowHint="False" Color="-16777211" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" ParentFont="False" VAlign="vaCenter" Text="Fecha vto."/>
|
<TfrxMemoView Name="Memo1" Left="172,85838" Top="25" Width="85,03937008" Height="15" ShowHint="False" Color="-16777211" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" ParentFont="False" VAlign="vaCenter" Text="Fecha vto."/>
|
||||||
</TfrxGroupHeader>
|
</TfrxGroupHeader>
|
||||||
<TfrxMasterData Name="DatosMaestros1" Height="17,00787402" Left="0" Top="272" Width="1009,13451" Columns="1" ColumnWidth="200" ColumnGap="20" DataSetName="frxDBInformeListadoFacturas" RowCount="0">
|
<TfrxMasterData Name="DatosMaestros1" Height="17,00787402" Left="0" Top="272" Width="1009,13451" Columns="1" ColumnWidth="200" ColumnGap="20" DataSet="frxDBInformeListadoFacturas" DataSetName="frxDBInformeListadoFacturas" RowCount="0">
|
||||||
<TfrxMemoView Name="Memo4" Left="257,59060732" Top="0" Width="386,8188415" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="14" ParentFont="False" Text=" [frxDBInformeListadoFacturas."NOMBRE"]"/>
|
<TfrxMemoView Name="Memo4" Left="257,59060732" Top="0" Width="386,8188415" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="14" ParentFont="False" Text=" [frxDBInformeListadoFacturas."NOMBRE"]"/>
|
||||||
<TfrxMemoView Name="Memo20" Left="644,40944882" Top="0" Width="79,748031496063" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" ParentFont="False" Text="[frxDBInformeListadoFacturas."SITUACION"]"/>
|
<TfrxMemoView Name="Memo20" Left="644,40944882" Top="0" Width="79,748031496063" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" ParentFont="False" Text="[frxDBInformeListadoFacturas."SITUACION"]"/>
|
||||||
<TfrxMemoView Name="Memo21" Left="88,06299213" Top="0" Width="85,0393652" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" ParentFont="False" Text=" [frxDBInformeListadoFacturas."FECHA_FACTURA"]"/>
|
<TfrxMemoView Name="Memo21" Left="88,06299213" Top="0" Width="85,0393652" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" ParentFont="False" Text=" [frxDBInformeListadoFacturas."FECHA_FACTURA"]"/>
|
||||||
@ -39,7 +39,7 @@
|
|||||||
<TfrxMemoView Name="Memo14" Left="817,13385827" Top="0,37774772" Width="96,37795276" Height="16" ShowHint="False" StretchMode="smMaxHeight" Color="-16777211" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="#,0.00 €" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="[SUM(<frxDBInformeListadoFacturas."IMPORTE_IVA">,DatosMaestros1)]"/>
|
<TfrxMemoView Name="Memo14" Left="817,13385827" Top="0,37774772" Width="96,37795276" Height="16" ShowHint="False" StretchMode="smMaxHeight" Color="-16777211" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="#,0.00 €" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="[SUM(<frxDBInformeListadoFacturas."IMPORTE_IVA">,DatosMaestros1)]"/>
|
||||||
<TfrxMemoView Name="Memo15" Left="724,15748031" Top="0,37774772" Width="94,11023622" Height="16" ShowHint="False" StretchMode="smMaxHeight" Color="-16777211" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="#,0.00 €" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="[SUM(<frxDBInformeListadoFacturas."BASE_IMPONIBLE">,DatosMaestros1)]"/>
|
<TfrxMemoView Name="Memo15" Left="724,15748031" Top="0,37774772" Width="94,11023622" Height="16" ShowHint="False" StretchMode="smMaxHeight" Color="-16777211" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="#,0.00 €" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="[SUM(<frxDBInformeListadoFacturas."BASE_IMPONIBLE">,DatosMaestros1)]"/>
|
||||||
</TfrxGroupFooter>
|
</TfrxGroupFooter>
|
||||||
<TfrxMasterData Name="DatosMaestros2" Height="17,00787402" Left="0" Top="446" Width="1009,13451" ColumnWidth="0" ColumnGap="0" DataSetName="frxDBInformeListadoFacturasResumen" RowCount="0">
|
<TfrxMasterData Name="DatosMaestros2" Height="17,00787402" Left="0" Top="446" Width="1009,13451" ColumnWidth="0" ColumnGap="0" DataSet="frxDBInformeListadoFacturasResumen" DataSetName="frxDBInformeListadoFacturasResumen" RowCount="0">
|
||||||
<TfrxMemoView Name="Memo9" Left="0" Top="0" Width="381,63" Height="17,00787402" ShowHint="False" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="1" Frame.Typ="13" ParentFont="False" Text="[frxDBInformeListadoFacturasResumen."TITULO"]"/>
|
<TfrxMemoView Name="Memo9" Left="0" Top="0" Width="381,63" Height="17,00787402" ShowHint="False" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="1" Frame.Typ="13" ParentFont="False" Text="[frxDBInformeListadoFacturasResumen."TITULO"]"/>
|
||||||
<TfrxMemoView Name="Memo10" Left="381,65368" Top="0" Width="94,48818898" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" HAlign="haRight" ParentFont="False" Text="[frxDBInformeListadoFacturasResumen."BASE_IMPONIBLE"]"/>
|
<TfrxMemoView Name="Memo10" Left="381,65368" Top="0" Width="94,48818898" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" HAlign="haRight" ParentFont="False" Text="[frxDBInformeListadoFacturasResumen."BASE_IMPONIBLE"]"/>
|
||||||
<TfrxMemoView Name="Memo11" Left="476,3624" Top="0" Width="95,24409449" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" HAlign="haRight" ParentFont="False" Text="[frxDBInformeListadoFacturasResumen."IMPORTE_IVA"]"/>
|
<TfrxMemoView Name="Memo11" Left="476,3624" Top="0" Width="95,24409449" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" HAlign="haRight" ParentFont="False" Text="[frxDBInformeListadoFacturasResumen."IMPORTE_IVA"]"/>
|
||||||
|
|||||||
@ -1,5 +1,5 @@
|
|||||||
<?xml version="1.0" encoding="utf-8"?>
|
<?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="41338,7587746296" ScriptLanguage="PascalScript" ScriptText.Text="procedure frxReportOnStartReport(Sender: TfrxComponent); begin Set('Pagina', 0); Set('TotalPaginas', 0); end; procedure Band1OnBeforePrint(Sender: TfrxComponent); begin if not Engine.FinalPass then Set('TotalPaginas', (<TotalPaginas> + 1)); if Engine.FinalPass then Set('Pagina', (<Pagina> + 1)); end; procedure mContinuaOnBeforePrint(Sender: TfrxComponent); begin if Engine.FinalPass then begin //A la vez que salta este salta la asignacion de pagina por lo que no coincide nunca si no suponemos +1 if ((<Pagina> + 1) = <TotalPaginas>) then begin mContinua.Visible := True; end else begin mContinua.Visible := False; end end; end; begin end." ShowProgress="False" StoreInDFM="False" OnStartReport="frxReportOnStartReport" PropData="044C65667403A90003546F70021008446174617365747301010C2A00000020446174615365744E616D653D226672784442496E666F726D654C69737461646F46616374757261732200010C3100000020446174615365744E616D653D226672784442496E666F726D654C69737461646F4661637475726173526573756D656E220000095661726961626C657301010C13000000204E616D653D2220506172616D6574726F732200010C35000000204E616D653D22546578746F506172616D6574726F73222056616C75653D22262336303B4665636861496E6963696F262336323B220000055374796C650100">
|
<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="41339,7526739699" ScriptLanguage="PascalScript" ScriptText.Text="procedure frxReportOnStartReport(Sender: TfrxComponent); begin Set('Pagina', 0); Set('TotalPaginas', 0); end; procedure Band1OnBeforePrint(Sender: TfrxComponent); begin if not Engine.FinalPass then Set('TotalPaginas', (<TotalPaginas> + 1)); if Engine.FinalPass then Set('Pagina', (<Pagina> + 1)); end; procedure mContinuaOnBeforePrint(Sender: TfrxComponent); begin if Engine.FinalPass then begin //A la vez que salta este salta la asignacion de pagina por lo que no coincide nunca si no suponemos +1 if ((<Pagina> + 1) = <TotalPaginas>) then begin mContinua.Visible := True; end else begin mContinua.Visible := False; end end; end; begin end." ShowProgress="False" StoreInDFM="False" OnStartReport="frxReportOnStartReport" PropData="044C65667403910003546F70021008446174617365747301010C5000000020446174615365743D226672784442496E666F726D654C69737461646F46616374757261732220446174615365744E616D653D226672784442496E666F726D654C69737461646F46616374757261732200010C5E00000020446174615365743D226672784442496E666F726D654C69737461646F4661637475726173526573756D656E2220446174615365744E616D653D226672784442496E666F726D654C69737461646F4661637475726173526573756D656E220000095661726961626C657301010C13000000204E616D653D2220506172616D6574726F732200010C35000000204E616D653D22546578746F506172616D6574726F73222056616C75653D22262336303B4665636861496E6963696F262336323B220000055374796C650100">
|
||||||
<TfrxDataPage Name="Data" Height="1000" Left="0" Top="0" Width="1000"/>
|
<TfrxDataPage Name="Data" Height="1000" Left="0" Top="0" Width="1000"/>
|
||||||
<TfrxReportPage Name="Page1" Orientation="poLandscape" PaperWidth="297" PaperHeight="210" PaperSize="9" LeftMargin="15" RightMargin="15" TopMargin="15" BottomMargin="20" ColumnWidth="0" ColumnPositions.Text="" HGuides.Text="" VGuides.Text="">
|
<TfrxReportPage Name="Page1" Orientation="poLandscape" PaperWidth="297" PaperHeight="210" PaperSize="9" LeftMargin="15" RightMargin="15" TopMargin="15" BottomMargin="20" ColumnWidth="0" ColumnPositions.Text="" HGuides.Text="" VGuides.Text="">
|
||||||
<TfrxPageHeader Name="Band1" Height="136,10235" Left="0" Top="16" Width="1009,13451" OnBeforePrint="Band1OnBeforePrint">
|
<TfrxPageHeader Name="Band1" Height="136,10235" Left="0" Top="16" Width="1009,13451" OnBeforePrint="Band1OnBeforePrint">
|
||||||
@ -7,7 +7,7 @@
|
|||||||
<TfrxShapeView Name="Shape5" Left="543" Top="9" Width="465" Height="122" ShowHint="False" Color="-16777211" Frame.Width="0,1" Shape="skRoundRectangle"/>
|
<TfrxShapeView Name="Shape5" Left="543" Top="9" Width="465" Height="122" ShowHint="False" Color="-16777211" Frame.Width="0,1" Shape="skRoundRectangle"/>
|
||||||
<TfrxMemoView Name="NombreCliente" Left="546,85807" Top="14" Width="452" Height="16,88188" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-13" Font.Name="Tahoma" Font.Style="1" HAlign="haRight" ParentFont="False" Text="LISTADO DE FACTURAS DE PROVEEDOR"/>
|
<TfrxMemoView Name="NombreCliente" Left="546,85807" Top="14" Width="452" Height="16,88188" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-13" Font.Name="Tahoma" Font.Style="1" HAlign="haRight" ParentFont="False" Text="LISTADO DE FACTURAS DE PROVEEDOR"/>
|
||||||
<TfrxMemoView Name="Memo3" Left="546,85807" Top="34" Width="452" Height="91" 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#] [TextoParametros]"/>
|
<TfrxMemoView Name="Memo3" Left="546,85807" Top="34" Width="452" Height="91" 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#] [TextoParametros]"/>
|
||||||
<TfrxMemoView Name="DatosEmpresa" Left="84" Top="37" Width="373" Height="88" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="0" ParentFont="False" Text="AZACAN FACILITIES SERVICIOS PROFESIONALES, S.L. CIF: B86610268 C/ BUENDIA 25, LOCAL 28053 MADRID"/>
|
<TfrxMemoView Name="DatosEmpresa" Left="84" Top="37" Width="373" Height="88" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="0" ParentFont="False" Text="AZACAN - GESTIÓN INTEGRAL DE SERVICIOS, S.L. CIF: B86610268 C/ BUENDIA 25, LOCAL 28053 MADRID"/>
|
||||||
</TfrxPageHeader>
|
</TfrxPageHeader>
|
||||||
<TfrxPageFooter Name="" Height="23,77953" Left="0" Top="682" Width="1009,13451" PrintOnLastPage="False">
|
<TfrxPageFooter Name="" Height="23,77953" Left="0" Top="682" Width="1009,13451" PrintOnLastPage="False">
|
||||||
<TfrxMemoView Name="mContinua" Left="925,98485" Top="4,77953" Width="81,08714" Height="16,77953" OnBeforePrint="mContinuaOnBeforePrint" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" HAlign="haRight" ParentFont="False" Text="Continúa ..."/>
|
<TfrxMemoView Name="mContinua" Left="925,98485" Top="4,77953" Width="81,08714" Height="16,77953" OnBeforePrint="mContinuaOnBeforePrint" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" HAlign="haRight" ParentFont="False" Text="Continúa ..."/>
|
||||||
@ -23,7 +23,7 @@
|
|||||||
<TfrxMemoView Name="Memo7" Left="0" Top="2,77953" Width="485,37013" Height="15,11811024" ShowHint="False" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="1" Frame.Color="8421504" ParentFont="False" Text="[frxDBInformeListadoFacturas."NOMBRE"]"/>
|
<TfrxMemoView Name="Memo7" Left="0" Top="2,77953" Width="485,37013" Height="15,11811024" ShowHint="False" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="1" Frame.Color="8421504" ParentFont="False" Text="[frxDBInformeListadoFacturas."NOMBRE"]"/>
|
||||||
<TfrxMemoView Name="Memo1" Left="172,85838" Top="25" Width="85,03937008" Height="15" ShowHint="False" Color="-16777211" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" ParentFont="False" VAlign="vaCenter" Text="Fecha vto."/>
|
<TfrxMemoView Name="Memo1" Left="172,85838" Top="25" Width="85,03937008" Height="15" ShowHint="False" Color="-16777211" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" ParentFont="False" VAlign="vaCenter" Text="Fecha vto."/>
|
||||||
</TfrxGroupHeader>
|
</TfrxGroupHeader>
|
||||||
<TfrxMasterData Name="DatosMaestros1" Height="17,00787402" Left="0" Top="315" Width="1009,13451" Columns="1" ColumnWidth="200" ColumnGap="20" DataSetName="frxDBInformeListadoFacturas" RowCount="0">
|
<TfrxMasterData Name="DatosMaestros1" Height="17,00787402" Left="0" Top="315" Width="1009,13451" Columns="1" ColumnWidth="200" ColumnGap="20" DataSet="frxDBInformeListadoFacturas" DataSetName="frxDBInformeListadoFacturas" RowCount="0">
|
||||||
<TfrxMemoView Name="Memo4" Left="257,59060732" Top="0" Width="386,8188415" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="14" ParentFont="False" Text=" [frxDBInformeListadoFacturas."NOMBRE"]"/>
|
<TfrxMemoView Name="Memo4" Left="257,59060732" Top="0" Width="386,8188415" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="14" ParentFont="False" Text=" [frxDBInformeListadoFacturas."NOMBRE"]"/>
|
||||||
<TfrxMemoView Name="Memo20" Left="644,40944882" Top="0" Width="79,748031496063" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" ParentFont="False" Text="[frxDBInformeListadoFacturas."SITUACION"]"/>
|
<TfrxMemoView Name="Memo20" Left="644,40944882" Top="0" Width="79,748031496063" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" ParentFont="False" Text="[frxDBInformeListadoFacturas."SITUACION"]"/>
|
||||||
<TfrxMemoView Name="Memo21" Left="88,06299213" Top="0" Width="85,0393652" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" ParentFont="False" Text=" [frxDBInformeListadoFacturas."FECHA_FACTURA"]"/>
|
<TfrxMemoView Name="Memo21" Left="88,06299213" Top="0" Width="85,0393652" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" ParentFont="False" Text=" [frxDBInformeListadoFacturas."FECHA_FACTURA"]"/>
|
||||||
@ -39,7 +39,7 @@
|
|||||||
<TfrxMemoView Name="Memo14" Left="817,13385827" Top="0,37774772" Width="96,37795276" Height="16" ShowHint="False" StretchMode="smMaxHeight" Color="-16777211" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="#,0.00 €" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="[SUM(<frxDBInformeListadoFacturas."IMPORTE_IVA">,DatosMaestros1)]"/>
|
<TfrxMemoView Name="Memo14" Left="817,13385827" Top="0,37774772" Width="96,37795276" Height="16" ShowHint="False" StretchMode="smMaxHeight" Color="-16777211" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="#,0.00 €" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="[SUM(<frxDBInformeListadoFacturas."IMPORTE_IVA">,DatosMaestros1)]"/>
|
||||||
<TfrxMemoView Name="Memo15" Left="724,15748031" Top="0,37774772" Width="94,11023622" Height="16" ShowHint="False" StretchMode="smMaxHeight" Color="-16777211" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="#,0.00 €" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="[SUM(<frxDBInformeListadoFacturas."BASE_IMPONIBLE">,DatosMaestros1)]"/>
|
<TfrxMemoView Name="Memo15" Left="724,15748031" Top="0,37774772" Width="94,11023622" Height="16" ShowHint="False" StretchMode="smMaxHeight" Color="-16777211" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="#,0.00 €" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="[SUM(<frxDBInformeListadoFacturas."BASE_IMPONIBLE">,DatosMaestros1)]"/>
|
||||||
</TfrxGroupFooter>
|
</TfrxGroupFooter>
|
||||||
<TfrxMasterData Name="DatosMaestros2" Height="17,00787402" Left="0" Top="532" Width="1009,13451" ColumnWidth="0" ColumnGap="0" DataSetName="frxDBInformeListadoFacturasResumen" RowCount="0">
|
<TfrxMasterData Name="DatosMaestros2" Height="17,00787402" Left="0" Top="532" Width="1009,13451" ColumnWidth="0" ColumnGap="0" DataSet="frxDBInformeListadoFacturasResumen" DataSetName="frxDBInformeListadoFacturasResumen" RowCount="0">
|
||||||
<TfrxMemoView Name="Memo9" Left="0" Top="0" Width="381,63" Height="17,00787402" ShowHint="False" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" ParentFont="False" Text="[frxDBInformeListadoFacturasResumen."TITULO"]"/>
|
<TfrxMemoView Name="Memo9" Left="0" Top="0" Width="381,63" Height="17,00787402" ShowHint="False" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" ParentFont="False" Text="[frxDBInformeListadoFacturasResumen."TITULO"]"/>
|
||||||
<TfrxMemoView Name="Memo10" Left="381,65368" Top="0" Width="94,48818898" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="12" HAlign="haRight" ParentFont="False" Text="[frxDBInformeListadoFacturasResumen."BASE_IMPONIBLE"]"/>
|
<TfrxMemoView Name="Memo10" Left="381,65368" Top="0" Width="94,48818898" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="12" HAlign="haRight" ParentFont="False" Text="[frxDBInformeListadoFacturasResumen."BASE_IMPONIBLE"]"/>
|
||||||
<TfrxMemoView Name="Memo11" Left="476,3624" Top="0" Width="95,24409449" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="13" HAlign="haRight" ParentFont="False" Text="[frxDBInformeListadoFacturasResumen."IMPORTE_IVA"]"/>
|
<TfrxMemoView Name="Memo11" Left="476,3624" Top="0" Width="95,24409449" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="13" HAlign="haRight" ParentFont="False" Text="[frxDBInformeListadoFacturasResumen."IMPORTE_IVA"]"/>
|
||||||
|
|||||||
File diff suppressed because one or more lines are too long
File diff suppressed because one or more lines are too long
File diff suppressed because one or more lines are too long
File diff suppressed because one or more lines are too long
File diff suppressed because one or more lines are too long
File diff suppressed because one or more lines are too long
File diff suppressed because one or more lines are too long
File diff suppressed because one or more lines are too long
@ -1,5 +1,5 @@
|
|||||||
<?xml version="1.0" encoding="utf-8"?>
|
<?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="41338,760679838" ScriptLanguage="PascalScript" ScriptText.Text="procedure mContinuaOnBeforePrint(Sender: TfrxComponent); begin if Engine.FinalPass then begin if (<Page#> = <TotalPages#>) then begin mContinua.Visible := False; end else begin mContinua.Visible := True; end end; end; procedure Memo5OnBeforePrint(Sender: TfrxComponent); var ACadena : String; begin ACadena := <frxDBInformeListadoRecibosPendientes."DATOS_BANCARIOS">; if Pos('Nº de cuenta: ', ACadena) > 0 then begin Delete(ACadena, 1, 14); Memo5.Lines.Text := ' ' + ACadena; end; end; procedure Memo11OnBeforePrint(Sender: TfrxComponent); var ACadena : String; begin ACadena := <frxDBInformeListadoRecibosPendResumen."DATOS_BANCARIOS">; if Pos('Nº de cuenta: ', ACadena) > 0 then begin Delete(ACadena, 1, 14); Memo11.Lines.Text := ' ' + ACadena; end; end; begin end." ShowProgress="False" StoreInDFM="False" OnStartReport="frxReportOnStartReport" PropData="044C65667403A90003546F70021008446174617365747301010C3300000020446174615365744E616D653D226672784442496E666F726D654C69737461646F52656369626F7350656E6469656E7465732200010C3400000020446174615365744E616D653D226672784442496E666F726D654C69737461646F52656369626F7350656E64526573756D656E220000095661726961626C657301010C13000000204E616D653D2220506172616D6574726F732200010C17000000204E616D653D22546578746F506172616D6574726F73220000055374796C650100">
|
<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="41339,7547348264" ScriptLanguage="PascalScript" ScriptText.Text="procedure mContinuaOnBeforePrint(Sender: TfrxComponent); begin if Engine.FinalPass then begin if (<Page#> = <TotalPages#>) then begin mContinua.Visible := False; end else begin mContinua.Visible := True; end end; end; procedure Memo5OnBeforePrint(Sender: TfrxComponent); var ACadena : String; begin ACadena := <frxDBInformeListadoRecibosPendientes."DATOS_BANCARIOS">; if Pos('Nº de cuenta: ', ACadena) > 0 then begin Delete(ACadena, 1, 14); Memo5.Lines.Text := ' ' + ACadena; end; end; procedure Memo11OnBeforePrint(Sender: TfrxComponent); var ACadena : String; begin ACadena := <frxDBInformeListadoRecibosPendResumen."DATOS_BANCARIOS">; if Pos('Nº de cuenta: ', ACadena) > 0 then begin Delete(ACadena, 1, 14); Memo11.Lines.Text := ' ' + ACadena; end; end; begin end." ShowProgress="False" StoreInDFM="False" OnStartReport="frxReportOnStartReport" PropData="044C65667403910003546F70021008446174617365747301010C3300000020446174615365744E616D653D226672784442496E666F726D654C69737461646F52656369626F7350656E6469656E7465732200010C3400000020446174615365744E616D653D226672784442496E666F726D654C69737461646F52656369626F7350656E64526573756D656E220000095661726961626C657301010C13000000204E616D653D2220506172616D6574726F732200010C17000000204E616D653D22546578746F506172616D6574726F73220000055374796C650100">
|
||||||
<TfrxDataPage Name="Data" Height="1000" Left="0" Top="0" Width="1000"/>
|
<TfrxDataPage Name="Data" Height="1000" Left="0" Top="0" Width="1000"/>
|
||||||
<TfrxReportPage Name="Page1" Orientation="poLandscape" PaperWidth="297" PaperHeight="210" PaperSize="9" LeftMargin="15" RightMargin="15" TopMargin="15" BottomMargin="20" ColumnWidth="0" ColumnPositions.Text="" HGuides.Text="" VGuides.Text="">
|
<TfrxReportPage Name="Page1" Orientation="poLandscape" PaperWidth="297" PaperHeight="210" PaperSize="9" LeftMargin="15" RightMargin="15" TopMargin="15" BottomMargin="20" ColumnWidth="0" ColumnPositions.Text="" HGuides.Text="" VGuides.Text="">
|
||||||
<TfrxPageHeader Name="Band1" Height="136,10235" Left="0" Top="16" Width="1009,13451" OnBeforePrint="Band1OnBeforePrint">
|
<TfrxPageHeader Name="Band1" Height="136,10235" Left="0" Top="16" Width="1009,13451" OnBeforePrint="Band1OnBeforePrint">
|
||||||
@ -7,7 +7,7 @@
|
|||||||
<TfrxShapeView Name="Shape5" Left="542" Top="9" Width="465" Height="122" ShowHint="False" Color="-16777211" Frame.Width="0,1" Shape="skRoundRectangle"/>
|
<TfrxShapeView Name="Shape5" Left="542" Top="9" Width="465" Height="122" ShowHint="False" Color="-16777211" Frame.Width="0,1" Shape="skRoundRectangle"/>
|
||||||
<TfrxMemoView Name="NombreCliente" Left="545,85807" Top="14" Width="452" Height="16,88188" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-13" Font.Name="Tahoma" Font.Style="1" HAlign="haRight" ParentFont="False" Text="LISTADO DE RECIBOS A PROVEEDOR PENDIENTES"/>
|
<TfrxMemoView Name="NombreCliente" Left="545,85807" Top="14" Width="452" Height="16,88188" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-13" Font.Name="Tahoma" Font.Style="1" HAlign="haRight" ParentFont="False" Text="LISTADO DE RECIBOS A PROVEEDOR PENDIENTES"/>
|
||||||
<TfrxMemoView Name="Memo3" Left="545,85807" Top="34" Width="452" Height="91" 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#] [TextoParametros]"/>
|
<TfrxMemoView Name="Memo3" Left="545,85807" Top="34" Width="452" Height="91" 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#] [TextoParametros]"/>
|
||||||
<TfrxMemoView Name="DatosEmpresa" Left="82" Top="37" Width="335" Height="88" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="0" ParentFont="False" Text="AZACAN FACILITIES SERVICIOS PROFESIONALES, S.L. CIF: B86610268 C/ BUENDIA 25, LOCAL 28053 MADRID"/>
|
<TfrxMemoView Name="DatosEmpresa" Left="82" Top="37" Width="335" Height="88" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="0" ParentFont="False" Text="AZACAN - GESTIÓN INTEGRAL DE SERVICIOS, S.L. CIF: B86610268 C/ BUENDIA 25, LOCAL 28053 MADRID"/>
|
||||||
</TfrxPageHeader>
|
</TfrxPageHeader>
|
||||||
<TfrxPageFooter Name="" Height="23,77953" Left="0" Top="527" Width="1009,13451" PrintOnLastPage="False">
|
<TfrxPageFooter Name="" Height="23,77953" Left="0" Top="527" Width="1009,13451" PrintOnLastPage="False">
|
||||||
<TfrxMemoView Name="mContinua" Left="925,98485" Top="4,77953000000002" Width="81,08714" Height="16,77953" OnBeforePrint="mContinuaOnBeforePrint" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" HAlign="haRight" ParentFont="False" Text="Continúa ..."/>
|
<TfrxMemoView Name="mContinua" Left="925,98485" Top="4,77953000000002" Width="81,08714" Height="16,77953" OnBeforePrint="mContinuaOnBeforePrint" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" HAlign="haRight" ParentFont="False" Text="Continúa ..."/>
|
||||||
|
|||||||
@ -1,5 +1,5 @@
|
|||||||
<?xml version="1.0" encoding="utf-8"?>
|
<?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="41332,4383087731" ScriptLanguage="PascalScript" ScriptText.Text="procedure mContinuaOnBeforePrint(Sender: TfrxComponent); begin if Engine.FinalPass then begin if (<Page#> = <TotalPages#>) then begin mContinua.Visible := False; end else begin mContinua.Visible := True; end end; end; procedure Memo5OnBeforePrint(Sender: TfrxComponent); var ACadena : String; begin ACadena := <frxDBInformeListadoRecibosPendientes."DATOS_BANCARIOS">; if Pos('Nº de cuenta: ', ACadena) > 0 then begin Delete(ACadena, 1, 14); Memo5.Lines.Text := ' ' + ACadena; end; end; procedure Memo11OnBeforePrint(Sender: TfrxComponent); var ACadena : String; begin ACadena := <frxDBInformeListadoRecibosPendResumen."DATOS_BANCARIOS">; if Pos('Nº de cuenta: ', ACadena) > 0 then begin Delete(ACadena, 1, 14); Memo11.Lines.Text := ' ' + ACadena; end; end; begin end." ShowProgress="False" StoreInDFM="False" OnStartReport="frxReportOnStartReport" PropData="044C65667403910003546F70021008446174617365747301010C3300000020446174615365744E616D653D226672784442496E666F726D654C69737461646F52656369626F7350656E6469656E7465732200010C3400000020446174615365744E616D653D226672784442496E666F726D654C69737461646F52656369626F7350656E64526573756D656E220000095661726961626C657301010C13000000204E616D653D2220506172616D6574726F732200010C17000000204E616D653D22546578746F506172616D6574726F73220000055374796C650100">
|
<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="41339,7549688542" ScriptLanguage="PascalScript" ScriptText.Text="procedure mContinuaOnBeforePrint(Sender: TfrxComponent); begin if Engine.FinalPass then begin if (<Page#> = <TotalPages#>) then begin mContinua.Visible := False; end else begin mContinua.Visible := True; end end; end; procedure Memo5OnBeforePrint(Sender: TfrxComponent); var ACadena : String; begin ACadena := <frxDBInformeListadoRecibosPendientes."DATOS_BANCARIOS">; if Pos('Nº de cuenta: ', ACadena) > 0 then begin Delete(ACadena, 1, 14); Memo5.Lines.Text := ' ' + ACadena; end; end; procedure Memo11OnBeforePrint(Sender: TfrxComponent); var ACadena : String; begin ACadena := <frxDBInformeListadoRecibosPendResumen."DATOS_BANCARIOS">; if Pos('Nº de cuenta: ', ACadena) > 0 then begin Delete(ACadena, 1, 14); Memo11.Lines.Text := ' ' + ACadena; end; end; begin end." ShowProgress="False" StoreInDFM="False" OnStartReport="frxReportOnStartReport" PropData="044C65667403910003546F70021008446174617365747301010C3300000020446174615365744E616D653D226672784442496E666F726D654C69737461646F52656369626F7350656E6469656E7465732200010C3400000020446174615365744E616D653D226672784442496E666F726D654C69737461646F52656369626F7350656E64526573756D656E220000095661726961626C657301010C13000000204E616D653D2220506172616D6574726F732200010C17000000204E616D653D22546578746F506172616D6574726F73220000055374796C650100">
|
||||||
<TfrxDataPage Name="Data" Height="1000" Left="0" Top="0" Width="1000"/>
|
<TfrxDataPage Name="Data" Height="1000" Left="0" Top="0" Width="1000"/>
|
||||||
<TfrxReportPage Name="Page1" Orientation="poLandscape" PaperWidth="297" PaperHeight="210" PaperSize="9" LeftMargin="15" RightMargin="15" TopMargin="15" BottomMargin="20" ColumnWidth="0" ColumnPositions.Text="" HGuides.Text="" VGuides.Text="">
|
<TfrxReportPage Name="Page1" Orientation="poLandscape" PaperWidth="297" PaperHeight="210" PaperSize="9" LeftMargin="15" RightMargin="15" TopMargin="15" BottomMargin="20" ColumnWidth="0" ColumnPositions.Text="" HGuides.Text="" VGuides.Text="">
|
||||||
<TfrxPageHeader Name="Band1" Height="136,10235" Left="0" Top="16" Width="1009,13451">
|
<TfrxPageHeader Name="Band1" Height="136,10235" Left="0" Top="16" Width="1009,13451">
|
||||||
@ -7,7 +7,7 @@
|
|||||||
<TfrxShapeView Name="Shape5" Left="542" Top="11" Width="465" Height="122" ShowHint="False" Color="-16777211" Frame.Width="0,1" Shape="skRoundRectangle"/>
|
<TfrxShapeView Name="Shape5" Left="542" Top="11" Width="465" Height="122" ShowHint="False" Color="-16777211" Frame.Width="0,1" Shape="skRoundRectangle"/>
|
||||||
<TfrxMemoView Name="NombreCliente" Left="545,85807" Top="16" Width="452" Height="16,88188" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-13" Font.Name="Tahoma" Font.Style="1" HAlign="haRight" ParentFont="False" Text="LISTADO DE RECIBOS A PROVEEDOR PENDIENTES"/>
|
<TfrxMemoView Name="NombreCliente" Left="545,85807" Top="16" Width="452" Height="16,88188" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-13" Font.Name="Tahoma" Font.Style="1" HAlign="haRight" ParentFont="False" Text="LISTADO DE RECIBOS A PROVEEDOR PENDIENTES"/>
|
||||||
<TfrxMemoView Name="Memo3" Left="545,85807" Top="36" Width="452" Height="91" 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#] [TextoParametros]"/>
|
<TfrxMemoView Name="Memo3" Left="545,85807" Top="36" Width="452" Height="91" 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#] [TextoParametros]"/>
|
||||||
<TfrxMemoView Name="DatosEmpresa" Left="81" Top="37" Width="229" Height="88" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="0" ParentFont="False" Text="AZACAN - FACILITIS SERVICIOS PROFESIONALES S.L. CIF: B-86610268 C/ Plomo 3 B 28045 MADRID"/>
|
<TfrxMemoView Name="DatosEmpresa" Left="81" Top="37" Width="323" Height="88" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="0" ParentFont="False" Text="AZACAN - GESTIÓN INTEGRAL DE SERVICIOS, S.L. CIF: B86610268 C/ BUENDIA 25, LOCAL 28053 MADRID"/>
|
||||||
</TfrxPageHeader>
|
</TfrxPageHeader>
|
||||||
<TfrxPageFooter Name="" Height="23,77953" Left="0" Top="607" Width="1009,13451" PrintOnLastPage="False">
|
<TfrxPageFooter Name="" Height="23,77953" Left="0" Top="607" Width="1009,13451" PrintOnLastPage="False">
|
||||||
<TfrxMemoView Name="mContinua" Left="925,98485" Top="4,77953000000002" Width="81,08714" Height="16,77953" OnBeforePrint="mContinuaOnBeforePrint" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" HAlign="haRight" ParentFont="False" Text="Continúa ..."/>
|
<TfrxMemoView Name="mContinua" Left="925,98485" Top="4,77953000000002" Width="81,08714" Height="16,77953" OnBeforePrint="mContinuaOnBeforePrint" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" HAlign="haRight" ParentFont="False" Text="Continúa ..."/>
|
||||||
|
|||||||
@ -1,5 +1,5 @@
|
|||||||
<?xml version="1.0" encoding="utf-8"?>
|
<?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="41338,7603154398" ScriptLanguage="PascalScript" ScriptText.Text="procedure mContinuaOnBeforePrint(Sender: TfrxComponent); begin if Engine.FinalPass then begin if (<Page#> = <TotalPages#>) then begin mContinua.Visible := False; end else begin mContinua.Visible := True; end end; end; begin end." ShowProgress="False" StoreInDFM="False" OnStartReport="frxReportOnStartReport" PropData="044C65667403A90003546F70021008446174617365747301010C2900000020446174615365744E616D653D226672784442496E666F726D654C69737461646F52656369626F732200010C3000000020446174615365744E616D653D226672784442496E666F726D654C69737461646F52656369626F73526573756D656E220000095661726961626C657301010C13000000204E616D653D2220506172616D6574726F732200010C17000000204E616D653D22546578746F506172616D6574726F73220000055374796C650100">
|
<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="41339,7543570486" ScriptLanguage="PascalScript" ScriptText.Text="procedure mContinuaOnBeforePrint(Sender: TfrxComponent); begin if Engine.FinalPass then begin if (<Page#> = <TotalPages#>) then begin mContinua.Visible := False; end else begin mContinua.Visible := True; end end; end; begin end." ShowProgress="False" StoreInDFM="False" OnStartReport="frxReportOnStartReport" PropData="044C65667403910003546F70021008446174617365747301010C2900000020446174615365744E616D653D226672784442496E666F726D654C69737461646F52656369626F732200010C3000000020446174615365744E616D653D226672784442496E666F726D654C69737461646F52656369626F73526573756D656E220000095661726961626C657301010C13000000204E616D653D2220506172616D6574726F732200010C17000000204E616D653D22546578746F506172616D6574726F73220000055374796C650100">
|
||||||
<TfrxDataPage Name="Data" Height="1000" Left="0" Top="0" Width="1000"/>
|
<TfrxDataPage Name="Data" Height="1000" Left="0" Top="0" Width="1000"/>
|
||||||
<TfrxReportPage Name="Page1" Orientation="poLandscape" PaperWidth="297" PaperHeight="210" PaperSize="9" LeftMargin="15" RightMargin="15" TopMargin="15" BottomMargin="20" ColumnWidth="0" ColumnPositions.Text="" HGuides.Text="" VGuides.Text="">
|
<TfrxReportPage Name="Page1" Orientation="poLandscape" PaperWidth="297" PaperHeight="210" PaperSize="9" LeftMargin="15" RightMargin="15" TopMargin="15" BottomMargin="20" ColumnWidth="0" ColumnPositions.Text="" HGuides.Text="" VGuides.Text="">
|
||||||
<TfrxPageHeader Name="Band1" Height="136,10235" Left="0" Top="16" Width="1009,13451" OnBeforePrint="Band1OnBeforePrint">
|
<TfrxPageHeader Name="Band1" Height="136,10235" Left="0" Top="16" Width="1009,13451" OnBeforePrint="Band1OnBeforePrint">
|
||||||
@ -7,7 +7,7 @@
|
|||||||
<TfrxShapeView Name="Shape5" Left="543" Top="11" Width="465" Height="122" ShowHint="False" Color="-16777211" Frame.Width="0,1" Shape="skRoundRectangle"/>
|
<TfrxShapeView Name="Shape5" Left="543" Top="11" Width="465" Height="122" ShowHint="False" Color="-16777211" Frame.Width="0,1" Shape="skRoundRectangle"/>
|
||||||
<TfrxMemoView Name="NombreCliente" Left="546,85807" Top="16" Width="452" Height="16,88188" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-13" Font.Name="Tahoma" Font.Style="1" HAlign="haRight" ParentFont="False" Text="LISTADO DE RECIBOS A PROVEEDOR"/>
|
<TfrxMemoView Name="NombreCliente" Left="546,85807" Top="16" Width="452" Height="16,88188" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-13" Font.Name="Tahoma" Font.Style="1" HAlign="haRight" ParentFont="False" Text="LISTADO DE RECIBOS A PROVEEDOR"/>
|
||||||
<TfrxMemoView Name="Memo3" Left="546,85807" Top="36" Width="452" Height="91" 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#] [TextoParametros]"/>
|
<TfrxMemoView Name="Memo3" Left="546,85807" Top="36" Width="452" Height="91" 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#] [TextoParametros]"/>
|
||||||
<TfrxMemoView Name="DatosEmpresa" Left="83" Top="37" Width="334" Height="88" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="0" ParentFont="False" Text="AZACAN FACILITIES SERVICIOS PROFESIONALES, S.L. CIF: B86610268 C/ BUENDIA 25, LOCAL 28053 MADRID"/>
|
<TfrxMemoView Name="DatosEmpresa" Left="83" Top="37" Width="334" Height="88" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="0" ParentFont="False" Text="AZACAN - GESTIÓN INTEGRAL DE SERVICIOS, S.L. CIF: B86610268 C/ BUENDIA 25, LOCAL 28053 MADRID"/>
|
||||||
</TfrxPageHeader>
|
</TfrxPageHeader>
|
||||||
<TfrxPageFooter Name="" Height="23,77953" Left="0" Top="552" Width="1009,13451" PrintOnLastPage="False">
|
<TfrxPageFooter Name="" Height="23,77953" Left="0" Top="552" Width="1009,13451" PrintOnLastPage="False">
|
||||||
<TfrxMemoView Name="mContinua" Left="925,98485" Top="4,77953000000002" Width="81,08714" Height="16,77953" OnBeforePrint="mContinuaOnBeforePrint" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" HAlign="haRight" ParentFont="False" Text="Continúa ..."/>
|
<TfrxMemoView Name="mContinua" Left="925,98485" Top="4,77953000000002" Width="81,08714" Height="16,77953" OnBeforePrint="mContinuaOnBeforePrint" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" HAlign="haRight" ParentFont="False" Text="Continúa ..."/>
|
||||||
|
|||||||
@ -1,5 +1,5 @@
|
|||||||
<?xml version="1.0" encoding="utf-8"?>
|
<?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="41338,7604702431" ScriptLanguage="PascalScript" ScriptText.Text="procedure mContinuaOnBeforePrint(Sender: TfrxComponent); begin if Engine.FinalPass then begin if (<Page#> = <TotalPages#>) then begin mContinua.Visible := False; end else begin mContinua.Visible := True; end end; end; begin end." ShowProgress="False" StoreInDFM="False" OnStartReport="frxReportOnStartReport" PropData="044C65667403A90003546F70021008446174617365747301010C2900000020446174615365744E616D653D226672784442496E666F726D654C69737461646F52656369626F732200010C3000000020446174615365744E616D653D226672784442496E666F726D654C69737461646F52656369626F73526573756D656E220000095661726961626C657301010C13000000204E616D653D2220506172616D6574726F732200010C17000000204E616D653D22546578746F506172616D6574726F73220000055374796C650100">
|
<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="41339,754562662" ScriptLanguage="PascalScript" ScriptText.Text="procedure mContinuaOnBeforePrint(Sender: TfrxComponent); begin if Engine.FinalPass then begin if (<Page#> = <TotalPages#>) then begin mContinua.Visible := False; end else begin mContinua.Visible := True; end end; end; begin end." ShowProgress="False" StoreInDFM="False" OnStartReport="frxReportOnStartReport" PropData="044C65667403910003546F70021008446174617365747301010C2900000020446174615365744E616D653D226672784442496E666F726D654C69737461646F52656369626F732200010C3000000020446174615365744E616D653D226672784442496E666F726D654C69737461646F52656369626F73526573756D656E220000095661726961626C657301010C13000000204E616D653D2220506172616D6574726F732200010C17000000204E616D653D22546578746F506172616D6574726F73220000055374796C650100">
|
||||||
<TfrxDataPage Name="Data" Height="1000" Left="0" Top="0" Width="1000"/>
|
<TfrxDataPage Name="Data" Height="1000" Left="0" Top="0" Width="1000"/>
|
||||||
<TfrxReportPage Name="Page1" Orientation="poLandscape" PaperWidth="297" PaperHeight="210" PaperSize="9" LeftMargin="15" RightMargin="15" TopMargin="15" BottomMargin="20" ColumnWidth="0" ColumnPositions.Text="" HGuides.Text="" VGuides.Text="">
|
<TfrxReportPage Name="Page1" Orientation="poLandscape" PaperWidth="297" PaperHeight="210" PaperSize="9" LeftMargin="15" RightMargin="15" TopMargin="15" BottomMargin="20" ColumnWidth="0" ColumnPositions.Text="" HGuides.Text="" VGuides.Text="">
|
||||||
<TfrxPageHeader Name="Band1" Height="136,10235" Left="0" Top="16" Width="1009,13451" OnBeforePrint="Band1OnBeforePrint">
|
<TfrxPageHeader Name="Band1" Height="136,10235" Left="0" Top="16" Width="1009,13451" OnBeforePrint="Band1OnBeforePrint">
|
||||||
@ -7,7 +7,7 @@
|
|||||||
<TfrxShapeView Name="Shape5" Left="543" Top="11" Width="465" Height="122" ShowHint="False" Color="-16777211" Frame.Width="0,1" Shape="skRoundRectangle"/>
|
<TfrxShapeView Name="Shape5" Left="543" Top="11" Width="465" Height="122" ShowHint="False" Color="-16777211" Frame.Width="0,1" Shape="skRoundRectangle"/>
|
||||||
<TfrxMemoView Name="NombreCliente" Left="546,85807" Top="16" Width="452" Height="16,88188" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-13" Font.Name="Tahoma" Font.Style="1" HAlign="haRight" ParentFont="False" Text="LISTADO DE RECIBOS A PROVEEDOR"/>
|
<TfrxMemoView Name="NombreCliente" Left="546,85807" Top="16" Width="452" Height="16,88188" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-13" Font.Name="Tahoma" Font.Style="1" HAlign="haRight" ParentFont="False" Text="LISTADO DE RECIBOS A PROVEEDOR"/>
|
||||||
<TfrxMemoView Name="Memo3" Left="546,85807" Top="36" Width="452" Height="91" 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#] [TextoParametros]"/>
|
<TfrxMemoView Name="Memo3" Left="546,85807" Top="36" Width="452" Height="91" 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#] [TextoParametros]"/>
|
||||||
<TfrxMemoView Name="DatosEmpresa" Left="83" Top="38" Width="301" Height="88" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="0" ParentFont="False" Text="AZACAN FACILITIES SERVICIOS PROFESIONALES, S.L. CIF: B86610268 C/ BUENDIA 25, LOCAL 28053 MADRID"/>
|
<TfrxMemoView Name="DatosEmpresa" Left="83" Top="38" Width="301" Height="88" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="0" ParentFont="False" Text="AZACAN - GESTIÓN INTEGRAL DE SERVICIOS, S.L. CIF: B86610268 C/ BUENDIA 25, LOCAL 28053 MADRID"/>
|
||||||
</TfrxPageHeader>
|
</TfrxPageHeader>
|
||||||
<TfrxPageFooter Name="" Height="23,77953" Left="0" Top="632" Width="1009,13451" PrintOnLastPage="False">
|
<TfrxPageFooter Name="" Height="23,77953" Left="0" Top="632" Width="1009,13451" PrintOnLastPage="False">
|
||||||
<TfrxMemoView Name="mContinua" Left="925,98485" Top="4,77953" Width="81,08714" Height="16,77953" OnBeforePrint="mContinuaOnBeforePrint" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" HAlign="haRight" ParentFont="False" Text="Continúa ..."/>
|
<TfrxMemoView Name="mContinua" Left="925,98485" Top="4,77953" Width="81,08714" Height="16,77953" OnBeforePrint="mContinuaOnBeforePrint" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" HAlign="haRight" ParentFont="False" Text="Continúa ..."/>
|
||||||
|
|||||||
Binary file not shown.
@ -8,6 +8,13 @@ uses
|
|||||||
type
|
type
|
||||||
IEditorAlbaranesClientePreview = interface(IEditorPreview)
|
IEditorAlbaranesClientePreview = interface(IEditorPreview)
|
||||||
['{F58BF987-28EB-485A-B953-55BDEEBE2C91}']
|
['{F58BF987-28EB-485A-B953-55BDEEBE2C91}']
|
||||||
|
procedure SetVerPrecios(const Value: Boolean);
|
||||||
|
function GetVerPrecios: Boolean;
|
||||||
|
property VerPrecios : Boolean read GetVerPrecios write SetVerPrecios;
|
||||||
|
|
||||||
|
function GetVerRef: Boolean;
|
||||||
|
procedure SetVerRef(const Value: Boolean);
|
||||||
|
property VerRef : Boolean read GetVerRef write SetVerRef;
|
||||||
end;
|
end;
|
||||||
|
|
||||||
|
|
||||||
|
|||||||
@ -47,8 +47,10 @@ type
|
|||||||
function ExtraerSeleccionados(AAlbaran: IBizAlbaranCliente) : IBizAlbaranCliente;
|
function ExtraerSeleccionados(AAlbaran: IBizAlbaranCliente) : IBizAlbaranCliente;
|
||||||
function ElegirAlbaranes(AAlbaran: IBizAlbaranCliente; AMensaje: String; AMultiSelect: Boolean): IBizAlbaranCliente;
|
function ElegirAlbaranes(AAlbaran: IBizAlbaranCliente; AMensaje: String; AMultiSelect: Boolean): IBizAlbaranCliente;
|
||||||
|
|
||||||
procedure Preview(AAlbaran : IBizAlbaranCliente; AllItems: Boolean = false);
|
procedure Preview(AAlbaran : IBizAlbaranCliente; AllItems: Boolean = false;
|
||||||
procedure Print(AAlbaran : IBizAlbaranCliente; AllItems: Boolean = false);
|
const VerPrecios: Boolean = True; const VerRef: Boolean = True);
|
||||||
|
procedure Print(AAlbaran : IBizAlbaranCliente; AllItems: Boolean = false;
|
||||||
|
const VerPrecios: Boolean = True; const VerRef: Boolean = True);
|
||||||
procedure EtiquetasPreview(AAlbaran : IBizAlbaranCliente; Const withRefCliente: Boolean);
|
procedure EtiquetasPreview(AAlbaran : IBizAlbaranCliente; Const withRefCliente: Boolean);
|
||||||
procedure EtiquetasPrint(AAlbaran : IBizAlbaranCliente; Const withRefCliente: Boolean);
|
procedure EtiquetasPrint(AAlbaran : IBizAlbaranCliente; Const withRefCliente: Boolean);
|
||||||
|
|
||||||
@ -147,8 +149,10 @@ type
|
|||||||
AFechaRecibido : TDateTime = 0;
|
AFechaRecibido : TDateTime = 0;
|
||||||
DoPost: Boolean = True) : Boolean;
|
DoPost: Boolean = True) : Boolean;
|
||||||
|
|
||||||
procedure Preview(AAlbaran : IBizAlbaranCliente; AllItems: Boolean = false);
|
procedure Preview(AAlbaran : IBizAlbaranCliente; AllItems: Boolean = false;
|
||||||
procedure Print(AAlbaran : IBizAlbaranCliente; AllItems: Boolean = false);
|
const VerPrecios: Boolean = True; const VerRef: Boolean = True);
|
||||||
|
procedure Print(AAlbaran : IBizAlbaranCliente; AllItems: Boolean = false;
|
||||||
|
const VerPrecios: Boolean = True; const VerRef: Boolean = True);
|
||||||
procedure EtiquetasPreview(AAlbaran : IBizAlbaranCliente; Const withRefCliente: Boolean);
|
procedure EtiquetasPreview(AAlbaran : IBizAlbaranCliente; Const withRefCliente: Boolean);
|
||||||
procedure EtiquetasPrint(AAlbaran : IBizAlbaranCliente; Const withRefCliente: Boolean);
|
procedure EtiquetasPrint(AAlbaran : IBizAlbaranCliente; Const withRefCliente: Boolean);
|
||||||
|
|
||||||
@ -1054,7 +1058,8 @@ begin
|
|||||||
end;
|
end;
|
||||||
end;
|
end;
|
||||||
|
|
||||||
procedure TAlbaranesClienteController.Preview(AAlbaran: IBizAlbaranCliente; AllItems: Boolean = false);
|
procedure TAlbaranesClienteController.Preview(AAlbaran: IBizAlbaranCliente; AllItems: Boolean = false;
|
||||||
|
const VerPrecios: Boolean = True; const VerRef: Boolean = True);
|
||||||
var
|
var
|
||||||
AReportController : IAlbaranesClienteReportController;
|
AReportController : IAlbaranesClienteReportController;
|
||||||
ID_Albaranes: TIntegerList;
|
ID_Albaranes: TIntegerList;
|
||||||
@ -1082,7 +1087,7 @@ begin
|
|||||||
else
|
else
|
||||||
ID_Albaranes.Add(AAlbaran.ID);
|
ID_Albaranes.Add(AAlbaran.ID);
|
||||||
|
|
||||||
AReportController.Preview(ID_Albaranes);
|
AReportController.Preview(ID_Albaranes, VerPrecios, VerRef);
|
||||||
|
|
||||||
finally
|
finally
|
||||||
AReportController := NIL;
|
AReportController := NIL;
|
||||||
@ -1090,7 +1095,8 @@ begin
|
|||||||
end;
|
end;
|
||||||
end;
|
end;
|
||||||
|
|
||||||
procedure TAlbaranesClienteController.Print(AAlbaran: IBizAlbaranCliente; AllItems: Boolean = false);
|
procedure TAlbaranesClienteController.Print(AAlbaran: IBizAlbaranCliente; AllItems: Boolean = false;
|
||||||
|
const VerPrecios: Boolean = True; const VerRef: Boolean = True);
|
||||||
var
|
var
|
||||||
AReportController : IAlbaranesClienteReportController;
|
AReportController : IAlbaranesClienteReportController;
|
||||||
ID_Albaranes: TIntegerList;
|
ID_Albaranes: TIntegerList;
|
||||||
@ -1116,7 +1122,7 @@ begin
|
|||||||
else
|
else
|
||||||
ID_Albaranes.Add(AAlbaran.ID);
|
ID_Albaranes.Add(AAlbaran.ID);
|
||||||
|
|
||||||
AReportController.Print(ID_Albaranes);
|
AReportController.Print(ID_Albaranes, VerPrecios, VerRef);
|
||||||
|
|
||||||
finally
|
finally
|
||||||
AReportController := NIL;
|
AReportController := NIL;
|
||||||
|
|||||||
@ -10,12 +10,16 @@ uses
|
|||||||
type
|
type
|
||||||
IAlbaranesClienteReportController = interface(IControllerBase)
|
IAlbaranesClienteReportController = interface(IControllerBase)
|
||||||
['{4BCC7A93-3322-494C-A3FA-118F4B62CB15}']
|
['{4BCC7A93-3322-494C-A3FA-118F4B62CB15}']
|
||||||
procedure Preview(const AListaID : TIntegerList);
|
procedure Preview(const AListaID : TIntegerList;
|
||||||
procedure Print(const AListaID : TIntegerList);
|
const VerPrecios: Boolean = True; const VerRef: Boolean = True);
|
||||||
|
procedure Print(const AListaID : TIntegerList;
|
||||||
|
const VerPrecios: Boolean = True; const VerRef: Boolean = True);
|
||||||
procedure EtiquetasPreview(const AID : integer; Const withRefCliente: Boolean);
|
procedure EtiquetasPreview(const AID : integer; Const withRefCliente: Boolean);
|
||||||
procedure EtiquetasPrint(const AID : integer; Const withRefCliente: Boolean);
|
procedure EtiquetasPrint(const AID : integer; Const withRefCliente: Boolean);
|
||||||
function ExportToWord(const AID: Integer; const AFileName : String = ''): Boolean;
|
function ExportToWord(const AID: Integer; const AFileName : String = '';
|
||||||
function ExportToPDF(const AID: Integer; const AFileName : String = ''): Boolean;
|
const VerPrecios: Boolean = True; const VerRef: Boolean = True): Boolean;
|
||||||
|
function ExportToPDF(const AID: Integer; const AFileName : String = '';
|
||||||
|
const VerPrecios: Boolean = True; const VerRef: Boolean = True): Boolean;
|
||||||
end;
|
end;
|
||||||
|
|
||||||
TAlbaranesClienteReportController = class(TControllerBase, IAlbaranesClienteReportController)
|
TAlbaranesClienteReportController = class(TControllerBase, IAlbaranesClienteReportController)
|
||||||
@ -27,10 +31,14 @@ type
|
|||||||
constructor Create; override;
|
constructor Create; override;
|
||||||
destructor Destroy; override;
|
destructor Destroy; override;
|
||||||
|
|
||||||
procedure Preview(const AListaID : TIntegerList);
|
procedure Preview(const AListaID : TIntegerList;
|
||||||
procedure Print(const AListaID : TIntegerList);
|
const VerPrecios: Boolean = True; const VerRef: Boolean = True);
|
||||||
function ExportToWord(const AID: Integer; const AFileName : String = ''): Boolean;
|
procedure Print(const AListaID : TIntegerList;
|
||||||
function ExportToPDF(const AID: Integer; const AFileName : String = ''): Boolean;
|
const VerPrecios: Boolean = True; const VerRef: Boolean = True);
|
||||||
|
function ExportToWord(const AID: Integer; const AFileName : String = '';
|
||||||
|
const VerPrecios: Boolean = True; const VerRef: Boolean = True): Boolean;
|
||||||
|
function ExportToPDF(const AID: Integer; const AFileName : String = '';
|
||||||
|
const VerPrecios: Boolean = True; const VerRef: Boolean = True): Boolean;
|
||||||
procedure EtiquetasPreview(const AID : integer; const withRefCliente: Boolean);
|
procedure EtiquetasPreview(const AID : integer; const withRefCliente: Boolean);
|
||||||
procedure EtiquetasPrint(const AID : integer; const withRefCliente: Boolean);
|
procedure EtiquetasPrint(const AID : integer; const withRefCliente: Boolean);
|
||||||
end;
|
end;
|
||||||
@ -120,10 +128,12 @@ begin
|
|||||||
end;
|
end;
|
||||||
end;
|
end;
|
||||||
|
|
||||||
|
|
||||||
function TAlbaranesClienteReportController.ExportToPDF(const AID: Integer;
|
function TAlbaranesClienteReportController.ExportToPDF(const AID: Integer;
|
||||||
const AFileName: String): Boolean;
|
const AFileName: String; const VerPrecios, VerRef: Boolean): Boolean;
|
||||||
var
|
var
|
||||||
AStream: Binary;
|
AStream: Binary;
|
||||||
|
|
||||||
begin
|
begin
|
||||||
Result := False;
|
Result := False;
|
||||||
if EsCadenaVacia(AFileName) then
|
if EsCadenaVacia(AFileName) then
|
||||||
@ -131,7 +141,7 @@ begin
|
|||||||
|
|
||||||
ShowHourglassCursor;
|
ShowHourglassCursor;
|
||||||
try
|
try
|
||||||
AStream := FDataModule.GetRptPDFAlbaran(AID);
|
AStream := FDataModule.GetRptPDFAlbaran(AID, VerPrecios, VerRef);
|
||||||
try
|
try
|
||||||
AStream.SaveToFile(AFileName);
|
AStream.SaveToFile(AFileName);
|
||||||
Result := True;
|
Result := True;
|
||||||
@ -144,7 +154,7 @@ begin
|
|||||||
end;
|
end;
|
||||||
|
|
||||||
function TAlbaranesClienteReportController.ExportToWord(const AID: Integer;
|
function TAlbaranesClienteReportController.ExportToWord(const AID: Integer;
|
||||||
const AFileName: String): Boolean;
|
const AFileName: String; const VerPrecios, VerRef: Boolean): Boolean;
|
||||||
var
|
var
|
||||||
AStream: Binary;
|
AStream: Binary;
|
||||||
AFile : String;
|
AFile : String;
|
||||||
@ -156,7 +166,7 @@ begin
|
|||||||
|
|
||||||
ShowHourglassCursor;
|
ShowHourglassCursor;
|
||||||
try
|
try
|
||||||
AStream := FDataModule.GetRptWordAlbaran(AID);
|
AStream := FDataModule.GetRptWordAlbaran(AID, VerPrecios, VerRef);
|
||||||
try
|
try
|
||||||
AStream.SaveToFile(AFile);
|
AStream.SaveToFile(AFile);
|
||||||
Result := True;
|
Result := True;
|
||||||
@ -168,7 +178,8 @@ begin
|
|||||||
end;
|
end;
|
||||||
end;
|
end;
|
||||||
|
|
||||||
procedure TAlbaranesClienteReportController.Preview(const AListaID : TIntegerList);
|
procedure TAlbaranesClienteReportController.Preview(const AListaID : TIntegerList;
|
||||||
|
const VerPrecios: Boolean = True; const VerRef: Boolean = True);
|
||||||
var
|
var
|
||||||
AStream: Binary;
|
AStream: Binary;
|
||||||
AEditor : IEditorAlbaranesClientePreview;
|
AEditor : IEditorAlbaranesClientePreview;
|
||||||
@ -177,13 +188,15 @@ begin
|
|||||||
|
|
||||||
ShowHourglassCursor;
|
ShowHourglassCursor;
|
||||||
try
|
try
|
||||||
AStream := FDataModule.GetRptAlbaranes(AListaID);
|
AStream := FDataModule.GetRptAlbaranes(AListaID, VerPrecios, VerRef);
|
||||||
try
|
try
|
||||||
CreateEditor('EditorAlbaranesClientePreview', IEditorAlbaranesClientePreview, AEditor);
|
CreateEditor('EditorAlbaranesClientePreview', IEditorAlbaranesClientePreview, AEditor);
|
||||||
if Assigned(AEditor) then
|
if Assigned(AEditor) then
|
||||||
begin
|
begin
|
||||||
try
|
try
|
||||||
AEditor.Controller := Self;
|
AEditor.Controller := Self;
|
||||||
|
AEditor.VerPrecios := VerPrecios;
|
||||||
|
AEditor.VerRef := VerRef;
|
||||||
AEditor.ListaID := AListaID;
|
AEditor.ListaID := AListaID;
|
||||||
AEditor.Title := 'Albarán - ' + AppFactuGES.EmpresaActiva.NOMBRE;
|
AEditor.Title := 'Albarán - ' + AppFactuGES.EmpresaActiva.NOMBRE;
|
||||||
AEditor.LoadFromStream(AStream);
|
AEditor.LoadFromStream(AStream);
|
||||||
@ -201,7 +214,8 @@ begin
|
|||||||
end;
|
end;
|
||||||
end;
|
end;
|
||||||
|
|
||||||
procedure TAlbaranesClienteReportController.Print(const AListaID : TIntegerList);
|
procedure TAlbaranesClienteReportController.Print(const AListaID : TIntegerList;
|
||||||
|
const VerPrecios: Boolean = True; const VerRef: Boolean = True);
|
||||||
var
|
var
|
||||||
AStream: Binary;
|
AStream: Binary;
|
||||||
AEditor : IEditorAlbaranesClientePreview;
|
AEditor : IEditorAlbaranesClientePreview;
|
||||||
@ -210,13 +224,15 @@ begin
|
|||||||
|
|
||||||
ShowHourglassCursor;
|
ShowHourglassCursor;
|
||||||
try
|
try
|
||||||
AStream := FDataModule.GetRptAlbaranes(AListaID);
|
AStream := FDataModule.GetRptAlbaranes(AListaID, VerPrecios, VerRef);
|
||||||
try
|
try
|
||||||
CreateEditor('EditorAlbaranesClientePreview', IEditorAlbaranesClientePreview, AEditor);
|
CreateEditor('EditorAlbaranesClientePreview', IEditorAlbaranesClientePreview, AEditor);
|
||||||
if Assigned(AEditor) then
|
if Assigned(AEditor) then
|
||||||
begin
|
begin
|
||||||
try
|
try
|
||||||
AEditor.Controller := Self;
|
AEditor.Controller := Self;
|
||||||
|
AEditor.VerPrecios := VerPrecios;
|
||||||
|
AEditor.VerRef := VerRef;
|
||||||
AEditor.ListaID := AListaID;
|
AEditor.ListaID := AListaID;
|
||||||
AEditor.Title := 'Albarán - ' + AppFactuGES.EmpresaActiva.NOMBRE;
|
AEditor.Title := 'Albarán - ' + AppFactuGES.EmpresaActiva.NOMBRE;
|
||||||
AEditor.LoadFromStream(AStream);
|
AEditor.LoadFromStream(AStream);
|
||||||
|
|||||||
@ -10,12 +10,12 @@ inherited DataModuleAlbaranesCliente: TDataModuleAlbaranesCliente
|
|||||||
Top = 16
|
Top = 16
|
||||||
end
|
end
|
||||||
object rda_AlbaranesCliente: TDARemoteDataAdapter
|
object rda_AlbaranesCliente: TDARemoteDataAdapter
|
||||||
|
DataStreamer = Bin2DataStreamer
|
||||||
GetSchemaCall.RemoteService = RORemoteService
|
GetSchemaCall.RemoteService = RORemoteService
|
||||||
GetDataCall.RemoteService = RORemoteService
|
GetDataCall.RemoteService = RORemoteService
|
||||||
UpdateDataCall.RemoteService = RORemoteService
|
UpdateDataCall.RemoteService = RORemoteService
|
||||||
GetScriptsCall.RemoteService = RORemoteService
|
GetScriptsCall.RemoteService = RORemoteService
|
||||||
RemoteService = RORemoteService
|
RemoteService = RORemoteService
|
||||||
DataStreamer = Bin2DataStreamer
|
|
||||||
Left = 43
|
Left = 43
|
||||||
Top = 151
|
Top = 151
|
||||||
end
|
end
|
||||||
@ -289,8 +289,6 @@ inherited DataModuleAlbaranesCliente: TDataModuleAlbaranesCliente
|
|||||||
Params = <>
|
Params = <>
|
||||||
StreamingOptions = [soDisableEventsWhileStreaming]
|
StreamingOptions = [soDisableEventsWhileStreaming]
|
||||||
RemoteDataAdapter = rda_AlbaranesCliente
|
RemoteDataAdapter = rda_AlbaranesCliente
|
||||||
DetailOptions = [dtCascadeOpenClose, dtCascadeApplyUpdates, dtAutoFetch, dtCascadeDelete, dtCascadeUpdate, dtDisableLogOfCascadeDeletes, dtDisableLogOfCascadeUpdates, dtIncludeInAllInOneFetch]
|
|
||||||
MasterOptions = [moCascadeOpenClose, moCascadeApplyUpdates, moCascadeDelete, moCascadeUpdate, moDisableLogOfCascadeDeletes, moDisableLogOfCascadeUpdates]
|
|
||||||
LogicalName = 'AlbaranesCliente'
|
LogicalName = 'AlbaranesCliente'
|
||||||
IndexDefs = <>
|
IndexDefs = <>
|
||||||
Left = 232
|
Left = 232
|
||||||
@ -408,8 +406,6 @@ inherited DataModuleAlbaranesCliente: TDataModuleAlbaranesCliente
|
|||||||
MasterSource = ds_AlbaranesCliente
|
MasterSource = ds_AlbaranesCliente
|
||||||
MasterFields = 'ID'
|
MasterFields = 'ID'
|
||||||
DetailFields = 'ID_ALBARAN'
|
DetailFields = 'ID_ALBARAN'
|
||||||
DetailOptions = [dtCascadeOpenClose, dtCascadeApplyUpdates, dtAutoFetch, dtCascadeDelete, dtCascadeUpdate, dtDisableLogOfCascadeDeletes, dtDisableLogOfCascadeUpdates, dtIncludeInAllInOneFetch]
|
|
||||||
MasterOptions = [moCascadeOpenClose, moCascadeApplyUpdates, moCascadeDelete, moCascadeUpdate, moDisableLogOfCascadeDeletes, moDisableLogOfCascadeUpdates]
|
|
||||||
LogicalName = 'AlbaranesCliente_Detalles'
|
LogicalName = 'AlbaranesCliente_Detalles'
|
||||||
IndexDefs = <>
|
IndexDefs = <>
|
||||||
Left = 384
|
Left = 384
|
||||||
@ -432,8 +428,6 @@ inherited DataModuleAlbaranesCliente: TDataModuleAlbaranesCliente
|
|||||||
Params = <>
|
Params = <>
|
||||||
StreamingOptions = [soDisableEventsWhileStreaming]
|
StreamingOptions = [soDisableEventsWhileStreaming]
|
||||||
RemoteDataAdapter = rda_AlbaranesCliente
|
RemoteDataAdapter = rda_AlbaranesCliente
|
||||||
DetailOptions = [dtCascadeOpenClose, dtCascadeApplyUpdates, dtAutoFetch, dtCascadeDelete, dtCascadeUpdate, dtDisableLogOfCascadeDeletes, dtDisableLogOfCascadeUpdates, dtIncludeInAllInOneFetch]
|
|
||||||
MasterOptions = [moCascadeOpenClose, moCascadeApplyUpdates, moCascadeDelete, moCascadeUpdate, moDisableLogOfCascadeDeletes, moDisableLogOfCascadeUpdates]
|
|
||||||
LogicalName = 'ListaAnosAlbaranes'
|
LogicalName = 'ListaAnosAlbaranes'
|
||||||
IndexDefs = <>
|
IndexDefs = <>
|
||||||
Left = 232
|
Left = 232
|
||||||
|
|||||||
@ -36,11 +36,13 @@ type
|
|||||||
function NewItem : IBizAlbaranCliente;
|
function NewItem : IBizAlbaranCliente;
|
||||||
|
|
||||||
// Report
|
// Report
|
||||||
function GetRptAlbaranes(const ListaID: TIntegerList): Binary;
|
function GetRptAlbaranes(const AListaID: TIntegerList; const ImprimirPrecio: Boolean = True;
|
||||||
function GetRptWordAlbaran(const AID: Integer): Binary;
|
const ImprimirRef: Boolean = True): Binary;
|
||||||
|
function GetRptWordAlbaran(const AID: Integer; const ImprimirPrecio: Boolean = True;
|
||||||
|
const ImprimirRef: Boolean = True): Binary;
|
||||||
|
function GetRptPDFAlbaran(const AID: Integer; const ImprimirPrecio: Boolean = True;
|
||||||
|
const ImprimirRef: Boolean = True): Binary;
|
||||||
function GetEtiquetas(const AID: Integer; withRefCliente: Boolean): Binary;
|
function GetEtiquetas(const AID: Integer; withRefCliente: Boolean): Binary;
|
||||||
function GetRptPDFAlbaran(const AID: Integer): Binary;
|
|
||||||
|
|
||||||
function GetAnosItems : TStringList;
|
function GetAnosItems : TStringList;
|
||||||
end;
|
end;
|
||||||
|
|
||||||
@ -65,36 +67,38 @@ begin
|
|||||||
RORemoteService.Message := dmConexion.Message;
|
RORemoteService.Message := dmConexion.Message;
|
||||||
end;
|
end;
|
||||||
|
|
||||||
function TDataModuleAlbaranesCliente.GetRptAlbaranes(const ListaID: TIntegerList): Binary;
|
function TDataModuleAlbaranesCliente.GetRptAlbaranes(
|
||||||
|
const AListaID: TIntegerList; const ImprimirPrecio,
|
||||||
|
ImprimirRef: Boolean): Binary;
|
||||||
var
|
var
|
||||||
AParam : TIntegerArray;
|
AParam : TIntegerArray;
|
||||||
begin
|
begin
|
||||||
AParam := ListaID.ToIntegerArray;
|
AParam := AListaID.ToIntegerArray;
|
||||||
try
|
try
|
||||||
Result := (RORemoteService as IsrvAlbaranesCliente).GenerarInforme(AParam);
|
Result := (RORemoteService as IsrvAlbaranesCliente).GenerarInforme(AParam, ImprimirPrecio, ImprimirRef);
|
||||||
finally
|
finally
|
||||||
FreeAndNil(AParam);
|
FreeAndNil(AParam);
|
||||||
end;
|
end;
|
||||||
end;
|
end;
|
||||||
|
|
||||||
function TDataModuleAlbaranesCliente.GetRptPDFAlbaran(
|
function TDataModuleAlbaranesCliente.GetRptPDFAlbaran(const AID: Integer; const ImprimirPrecio: Boolean = True;
|
||||||
const AID: Integer): Binary;
|
const ImprimirRef: Boolean = True): Binary;
|
||||||
var
|
var
|
||||||
AParam : TIntegerArray;
|
AParam : TIntegerArray;
|
||||||
begin
|
begin
|
||||||
AParam := TIntegerArray.Create;
|
AParam := TIntegerArray.Create;
|
||||||
try
|
try
|
||||||
AParam.Add(AID);
|
AParam.Add(AID);
|
||||||
Result := (RORemoteService as IsrvAlbaranesCliente).GenerarInforme(AParam);
|
Result := (RORemoteService as IsrvAlbaranesCliente).GenerarInforme(AParam, ImprimirPrecio, ImprimirRef);
|
||||||
finally
|
finally
|
||||||
FreeAndNil(AParam);
|
FreeAndNil(AParam);
|
||||||
end;
|
end;
|
||||||
end;
|
end;
|
||||||
|
|
||||||
function TDataModuleAlbaranesCliente.GetRptWordAlbaran(
|
function TDataModuleAlbaranesCliente.GetRptWordAlbaran(const AID: Integer; const ImprimirPrecio: Boolean = True;
|
||||||
const AID: Integer): Binary;
|
const ImprimirRef: Boolean = True): Binary;
|
||||||
begin
|
begin
|
||||||
Result := (RORemoteService as IsrvAlbaranesCliente).GenerarInformeEnWord(AID)
|
Result := (RORemoteService as IsrvAlbaranesCliente).GenerarInformeEnWord(AID, ImprimirPrecio, ImprimirRef)
|
||||||
end;
|
end;
|
||||||
|
|
||||||
function TDataModuleAlbaranesCliente.NewItem: IBizAlbaranCliente;
|
function TDataModuleAlbaranesCliente.NewItem: IBizAlbaranCliente;
|
||||||
|
|||||||
@ -8,9 +8,12 @@ uses
|
|||||||
type
|
type
|
||||||
IDataModuleAlbaranesClienteReport = interface
|
IDataModuleAlbaranesClienteReport = interface
|
||||||
['{42C55204-5AB9-403E-8385-1A62B02D8234}']
|
['{42C55204-5AB9-403E-8385-1A62B02D8234}']
|
||||||
function GetRptAlbaranes(const AListaID: TIntegerList): Binary;
|
function GetRptAlbaranes(const AListaID: TIntegerList; const ImprimirPrecio: Boolean;
|
||||||
function GetRptWordAlbaran(const AID: Integer): Binary;
|
const ImprimirRef: Boolean): Binary;
|
||||||
function GetRptPDFAlbaran(const AID: Integer): Binary;
|
function GetRptWordAlbaran(const AID: Integer; const ImprimirPrecio: Boolean;
|
||||||
|
const ImprimirRef: Boolean): Binary;
|
||||||
|
function GetRptPDFAlbaran(const AID: Integer; const ImprimirPrecio: Boolean;
|
||||||
|
const ImprimirRef: Boolean): Binary;
|
||||||
function GetEtiquetas(const AID: Integer; withRefCliente: Boolean): Binary;
|
function GetEtiquetas(const AID: Integer; withRefCliente: Boolean): Binary;
|
||||||
end;
|
end;
|
||||||
|
|
||||||
|
|||||||
@ -556,6 +556,7 @@ object RptAlbaranesCliente: TRptAlbaranesCliente
|
|||||||
'end.')
|
'end.')
|
||||||
ShowProgress = False
|
ShowProgress = False
|
||||||
StoreInDFM = False
|
StoreInDFM = False
|
||||||
|
OnGetValue = frxReportGetValue
|
||||||
OnStartReport = 'frxReportOnStartReport'
|
OnStartReport = 'frxReportOnStartReport'
|
||||||
Left = 145
|
Left = 145
|
||||||
Top = 16
|
Top = 16
|
||||||
|
|||||||
@ -63,14 +63,22 @@ type
|
|||||||
DABin2DataStreamer1: TDABin2DataStreamer;
|
DABin2DataStreamer1: TDABin2DataStreamer;
|
||||||
procedure DataModuleCreate(Sender: TObject);
|
procedure DataModuleCreate(Sender: TObject);
|
||||||
procedure DataModuleDestroy(Sender: TObject);
|
procedure DataModuleDestroy(Sender: TObject);
|
||||||
|
procedure frxReportGetValue(const VarName: string; var Value: Variant);
|
||||||
private
|
private
|
||||||
FConnection: IDAConnection;
|
FConnection: IDAConnection;
|
||||||
|
FImprimirPrecio : Boolean;
|
||||||
|
FImprimirRef : Boolean;
|
||||||
|
|
||||||
//Genera cada uno de los albaranes a imprimir
|
//Genera cada uno de los albaranes a imprimir
|
||||||
procedure _GenerarAlbaran(const AID: Integer);
|
procedure _GenerarAlbaran(const AID: Integer);
|
||||||
public
|
public
|
||||||
function GenerarAlbaran(const AListaID : TIntegerArray): Binary;
|
function GenerarAlbaran(const AListaID : TIntegerArray;
|
||||||
|
const ImprimirPrecio: Boolean = True;
|
||||||
|
const ImprimirRef: Boolean = True): Binary;
|
||||||
function GenerarEtiquetas(const AID : Integer; withRefCliente: Boolean): Binary;
|
function GenerarEtiquetas(const AID : Integer; withRefCliente: Boolean): Binary;
|
||||||
function GenerarAlbaranEnPDF(const ListaID : TIntegerArray): Binary;
|
function GenerarAlbaranEnPDF(const ListaID : TIntegerArray;
|
||||||
|
const ImprimirPrecio: Boolean = True;
|
||||||
|
const ImprimirRef: Boolean = True): Binary;
|
||||||
end;
|
end;
|
||||||
|
|
||||||
implementation
|
implementation
|
||||||
@ -112,11 +120,25 @@ begin
|
|||||||
tbl_Detalles.Active := False;
|
tbl_Detalles.Active := False;
|
||||||
end;
|
end;
|
||||||
|
|
||||||
function TRptAlbaranesCliente.GenerarAlbaran(const AListaID : TIntegerArray): Binary;
|
procedure TRptAlbaranesCliente.frxReportGetValue(const VarName: string;
|
||||||
|
var Value: Variant);
|
||||||
|
begin
|
||||||
|
if VarName = 'ImprimirPrecio' then
|
||||||
|
Value := FImprimirPrecio;
|
||||||
|
if VarName = 'ImprimirRef' then
|
||||||
|
Value := FImprimirRef;
|
||||||
|
end;
|
||||||
|
|
||||||
|
function TRptAlbaranesCliente.GenerarAlbaran(const AListaID : TIntegerArray;
|
||||||
|
const ImprimirPrecio: Boolean = True;
|
||||||
|
const ImprimirRef: Boolean = True): Binary;
|
||||||
var
|
var
|
||||||
i: Integer;
|
i: Integer;
|
||||||
begin
|
begin
|
||||||
Result := Binary.Create;
|
Result := Binary.Create;
|
||||||
|
FImprimirPrecio := ImprimirPrecio;
|
||||||
|
FImprimirRef := ImprimirRef;
|
||||||
|
|
||||||
try
|
try
|
||||||
//Vamos generando todos y cada uno de los albaranes recibidos
|
//Vamos generando todos y cada uno de los albaranes recibidos
|
||||||
for i := 0 to AListaID.Count - 1 do
|
for i := 0 to AListaID.Count - 1 do
|
||||||
@ -126,12 +148,16 @@ begin
|
|||||||
end;
|
end;
|
||||||
end;
|
end;
|
||||||
|
|
||||||
function TRptAlbaranesCliente.GenerarAlbaranEnPDF(
|
function TRptAlbaranesCliente.GenerarAlbaranEnPDF(const ListaID: TIntegerArray;
|
||||||
const ListaID: TIntegerArray): Binary;
|
const ImprimirPrecio: Boolean = True;
|
||||||
|
const ImprimirRef: Boolean = True): Binary;
|
||||||
var
|
var
|
||||||
i: Integer;
|
i: Integer;
|
||||||
begin
|
begin
|
||||||
Result := Binary.Create;
|
Result := Binary.Create;
|
||||||
|
FImprimirPrecio := ImprimirPrecio;
|
||||||
|
FImprimirRef := ImprimirRef;
|
||||||
|
|
||||||
try
|
try
|
||||||
//Vamos generando todos y cada uno de los presupuestos recibidos
|
//Vamos generando todos y cada uno de los presupuestos recibidos
|
||||||
for i := 0 to ListaID.Count - 1 do
|
for i := 0 to ListaID.Count - 1 do
|
||||||
|
|||||||
@ -30,6 +30,8 @@ type
|
|||||||
function Generar: Boolean;
|
function Generar: Boolean;
|
||||||
procedure _GenerarAlbaran(const AID: String);
|
procedure _GenerarAlbaran(const AID: String);
|
||||||
public
|
public
|
||||||
|
ImprimirPrecio : Boolean;
|
||||||
|
ImprimirRef : Boolean;
|
||||||
function Exportar(Codigo, Fichero : String): Boolean;
|
function Exportar(Codigo, Fichero : String): Boolean;
|
||||||
constructor Create (AOwner : TComponent); override;
|
constructor Create (AOwner : TComponent); override;
|
||||||
destructor Destroy; override;
|
destructor Destroy; override;
|
||||||
@ -51,6 +53,8 @@ const
|
|||||||
constructor TRptWordAlbaranCliente.Create(AOwner: TComponent);
|
constructor TRptWordAlbaranCliente.Create(AOwner: TComponent);
|
||||||
begin
|
begin
|
||||||
inherited;
|
inherited;
|
||||||
|
ImprimirPrecio := False;
|
||||||
|
ImprimirRef := False;
|
||||||
FDocumento := NIL;
|
FDocumento := NIL;
|
||||||
end;
|
end;
|
||||||
|
|
||||||
@ -189,7 +193,11 @@ begin
|
|||||||
while not EOF do
|
while not EOF do
|
||||||
begin
|
begin
|
||||||
Rows.Item (iRowCount).Cells.Split (numRows, numCols, mergesplit);
|
Rows.Item (iRowCount).Cells.Split (numRows, numCols, mergesplit);
|
||||||
Cell(iRowCount, 1).Range.Text := FieldByName('REFERENCIA').AsString;
|
if ImprimirRef then
|
||||||
|
Cell(iRowCount, 1).Range.Text := FieldByName('REFERENCIA').AsString
|
||||||
|
else
|
||||||
|
Cell(iRowCount, 1).Range.Text := '';
|
||||||
|
|
||||||
Cell(iRowCount, 2).Range.Text := FieldByName('CONCEPTO').AsString;
|
Cell(iRowCount, 2).Range.Text := FieldByName('CONCEPTO').AsString;
|
||||||
|
|
||||||
ACantidad := FloatToStr(FieldByName('CANTIDAD').AsFloat);
|
ACantidad := FloatToStr(FieldByName('CANTIDAD').AsFloat);
|
||||||
@ -205,16 +213,18 @@ begin
|
|||||||
|
|
||||||
Cell(iRowCount, 3).Range.Text := AText + ' ' + FieldByName('UNIDAD_MEDIDA').AsString;
|
Cell(iRowCount, 3).Range.Text := AText + ' ' + FieldByName('UNIDAD_MEDIDA').AsString;
|
||||||
|
|
||||||
|
if ImprimirPrecio
|
||||||
if (FieldByName('IMPORTE_UNIDAD').AsFloat = 0) then
|
and (FieldByName('IMPORTE_UNIDAD').AsFloat <> 0) then
|
||||||
Cell(iRowCount, 4).Range.Text := ''
|
Cell(iRowCount, 4).Range.Text := FormatFloat(DISPLAY_EUROS4, FieldByName('IMPORTE_UNIDAD').AsFloat)
|
||||||
else
|
else
|
||||||
Cell(iRowCount, 4).Range.Text := FormatFloat(DISPLAY_EUROS4, FieldByName('IMPORTE_UNIDAD').AsFloat);
|
Cell(iRowCount, 4).Range.Text := '';
|
||||||
|
|
||||||
if (FieldByName('IMPORTE_TOTAL').AsFloat = 0) then
|
if ImprimirPrecio
|
||||||
Cell(iRowCount, 5).Range.Text := ''
|
and (FieldByName('IMPORTE_TOTAL').AsFloat <> 0) then
|
||||||
|
Cell(iRowCount, 5).Range.Text := FormatFloat(DISPLAY_EUROS4, FieldByName('IMPORTE_TOTAL').AsFloat)
|
||||||
else
|
else
|
||||||
Cell(iRowCount, 5).Range.Text := FormatFloat(DISPLAY_EUROS4, FieldByName('IMPORTE_TOTAL').AsFloat);
|
Cell(iRowCount, 5).Range.Text := '';
|
||||||
|
|
||||||
Next;
|
Next;
|
||||||
Inc (iRowCount);
|
Inc (iRowCount);
|
||||||
end;
|
end;
|
||||||
|
|||||||
@ -32,10 +32,13 @@ type
|
|||||||
procedure DARemoteServiceCreate(Sender: TObject);
|
procedure DARemoteServiceCreate(Sender: TObject);
|
||||||
protected
|
protected
|
||||||
{ IsrvAlbaranesCliente methods }
|
{ IsrvAlbaranesCliente methods }
|
||||||
function GenerarInforme(const ListaID: TIntegerArray): Binary;
|
function GenerarInforme(const ListaID: TIntegerArray;
|
||||||
|
const ImprimirPrecio: Boolean; const ImprimirRef: Boolean): Binary;
|
||||||
function GenerarInformeEtiquetas(const ID: Integer; const withRefCliente: Boolean): Binary;
|
function GenerarInformeEtiquetas(const ID: Integer; const withRefCliente: Boolean): Binary;
|
||||||
function GenerarInformeEnWord(const ID: Integer): Binary;
|
function GenerarInformeEnWord(const ID: Integer;
|
||||||
function GenerarInformeEnPDF(const ListaID: TIntegerArray): Binary;
|
const ImprimirPrecio: Boolean; const ImprimirRef: Boolean): Binary;
|
||||||
|
function GenerarInformeEnPDF(const ListaID: TIntegerArray;
|
||||||
|
const ImprimirPrecio: Boolean; const ImprimirRef: Boolean): Binary;
|
||||||
end;
|
end;
|
||||||
|
|
||||||
implementation
|
implementation
|
||||||
@ -78,14 +81,14 @@ begin
|
|||||||
ConnectionName := dmServer.ConnectionName;
|
ConnectionName := dmServer.ConnectionName;
|
||||||
end;
|
end;
|
||||||
|
|
||||||
function TsrvAlbaranesCliente.GenerarInformeEnPDF(
|
function TsrvAlbaranesCliente.GenerarInformeEnPDF(const ListaID: TIntegerArray;
|
||||||
const ListaID: TIntegerArray): Binary;
|
const ImprimirPrecio: Boolean; const ImprimirRef: Boolean): Binary;
|
||||||
var
|
var
|
||||||
AReportGenerator : TRptAlbaranesCliente;
|
AReportGenerator : TRptAlbaranesCliente;
|
||||||
begin
|
begin
|
||||||
AReportGenerator := TRptAlbaranesCliente.Create(nil);
|
AReportGenerator := TRptAlbaranesCliente.Create(nil);
|
||||||
try
|
try
|
||||||
Result := AReportGenerator.GenerarAlbaranEnPDF(ListaID);
|
Result := AReportGenerator.GenerarAlbaranEnPDF(ListaID, ImprimirPrecio, ImprimirRef);
|
||||||
finally
|
finally
|
||||||
FreeAndNIL(AReportGenerator);
|
FreeAndNIL(AReportGenerator);
|
||||||
end;
|
end;
|
||||||
@ -106,19 +109,21 @@ begin
|
|||||||
}
|
}
|
||||||
end;
|
end;
|
||||||
|
|
||||||
function TsrvAlbaranesCliente.GenerarInforme(const ListaID: TIntegerArray): Binary;
|
function TsrvAlbaranesCliente.GenerarInforme(const ListaID: TIntegerArray;
|
||||||
|
const ImprimirPrecio: Boolean; const ImprimirRef: Boolean): Binary;
|
||||||
var
|
var
|
||||||
AReportGenerator : TRptAlbaranesCliente;
|
AReportGenerator : TRptAlbaranesCliente;
|
||||||
begin
|
begin
|
||||||
AReportGenerator := TRptAlbaranesCliente.Create(nil);
|
AReportGenerator := TRptAlbaranesCliente.Create(nil);
|
||||||
try
|
try
|
||||||
Result := AReportGenerator.GenerarAlbaran(ListaID);
|
Result := AReportGenerator.GenerarAlbaran(ListaID, ImprimirPrecio, ImprimirRef);
|
||||||
finally
|
finally
|
||||||
FreeAndNIL(AReportGenerator);
|
FreeAndNIL(AReportGenerator);
|
||||||
end;
|
end;
|
||||||
end;
|
end;
|
||||||
|
|
||||||
function TsrvAlbaranesCliente.GenerarInformeEnWord(const ID: Integer): Binary;
|
function TsrvAlbaranesCliente.GenerarInformeEnWord(const ID: Integer;
|
||||||
|
const ImprimirPrecio: Boolean; const ImprimirRef: Boolean): Binary;
|
||||||
var
|
var
|
||||||
AReportGenerator : TRptWordAlbaranCliente;
|
AReportGenerator : TRptWordAlbaranCliente;
|
||||||
AFicheroTMP : TFileName;
|
AFicheroTMP : TFileName;
|
||||||
@ -127,6 +132,8 @@ begin
|
|||||||
AFicheroTMP := DarFicheroTemporal;
|
AFicheroTMP := DarFicheroTemporal;
|
||||||
AReportGenerator := TRptWordAlbaranCliente.Create(nil);
|
AReportGenerator := TRptWordAlbaranCliente.Create(nil);
|
||||||
try
|
try
|
||||||
|
AReportGenerator.ImprimirPrecio := ImprimirPrecio;
|
||||||
|
AReportGenerator.ImprimirRef := ImprimirRef;
|
||||||
if AReportGenerator.Exportar(IntToStr(ID), AFicheroTMP) then
|
if AReportGenerator.Exportar(IntToStr(ID), AFicheroTMP) then
|
||||||
begin
|
begin
|
||||||
Result := Binary.Create;
|
Result := Binary.Create;
|
||||||
|
|||||||
@ -32,7 +32,9 @@ requires
|
|||||||
AlbaranesCliente_controller,
|
AlbaranesCliente_controller,
|
||||||
Articulos_view,
|
Articulos_view,
|
||||||
Almacenes_controller,
|
Almacenes_controller,
|
||||||
AlbCli_FacCli_relation;
|
AlbCli_FacCli_relation,
|
||||||
|
rtl,
|
||||||
|
vcl;
|
||||||
|
|
||||||
contains
|
contains
|
||||||
uAlbaranesClienteViewRegister in 'uAlbaranesClienteViewRegister.pas',
|
uAlbaranesClienteViewRegister in 'uAlbaranesClienteViewRegister.pas',
|
||||||
@ -50,6 +52,7 @@ contains
|
|||||||
uViewAlbaranesDevCliente in 'uViewAlbaranesDevCliente.pas' {frViewAlbaranesDevCliente: TCustomView},
|
uViewAlbaranesDevCliente in 'uViewAlbaranesDevCliente.pas' {frViewAlbaranesDevCliente: TCustomView},
|
||||||
uEditorAlbaranDevCliente in 'uEditorAlbaranDevCliente.pas' {fEditorAlbaranDevCliente: TCustomEditor},
|
uEditorAlbaranDevCliente in 'uEditorAlbaranDevCliente.pas' {fEditorAlbaranDevCliente: TCustomEditor},
|
||||||
uViewAlbaranDevCliente in 'uViewAlbaranDevCliente.pas' {frViewAlbaranDevCliente: TCustomView},
|
uViewAlbaranDevCliente in 'uViewAlbaranDevCliente.pas' {frViewAlbaranDevCliente: TCustomView},
|
||||||
uViewDatosYSeleccionClienteAlbaran in 'uViewDatosYSeleccionClienteAlbaran.pas' {frViewDatosYSeleccionClienteAlbaran: TCustomView};
|
uViewDatosYSeleccionClienteAlbaran in 'uViewDatosYSeleccionClienteAlbaran.pas' {frViewDatosYSeleccionClienteAlbaran: TCustomView},
|
||||||
|
uDialogOpcionesImpresionAlbaranesCliente in 'uDialogOpcionesImpresionAlbaranesCliente.pas' {frDialogOpcionesImpresionAlbaranesCliente: TCustomEditor};
|
||||||
|
|
||||||
end.
|
end.
|
||||||
|
|||||||
@ -54,15 +54,20 @@
|
|||||||
<DelphiCompile Include="AlbaranesCliente_view.dpk">
|
<DelphiCompile Include="AlbaranesCliente_view.dpk">
|
||||||
<MainSource>MainSource</MainSource>
|
<MainSource>MainSource</MainSource>
|
||||||
</DelphiCompile>
|
</DelphiCompile>
|
||||||
<DCCReference Include="..\..\Albaranes de proveedor\AlbaranesCliente_controller.dcp" />
|
<DCCReference Include="AlbaranesCliente_controller.dcp" />
|
||||||
<DCCReference Include="..\..\Albaranes de proveedor\AlbaranesCliente_model.dcp" />
|
<DCCReference Include="AlbaranesCliente_model.dcp" />
|
||||||
<DCCReference Include="..\..\Albaranes de proveedor\AlbCli_FacCli_relation.dcp" />
|
<DCCReference Include="AlbCli_FacCli_relation.dcp" />
|
||||||
<DCCReference Include="..\..\Albaranes de proveedor\Almacenes_controller.dcp" />
|
<DCCReference Include="Almacenes_controller.dcp" />
|
||||||
<DCCReference Include="..\..\Albaranes de proveedor\ApplicationBase.dcp" />
|
<DCCReference Include="ApplicationBase.dcp" />
|
||||||
<DCCReference Include="..\..\Albaranes de proveedor\Articulos_view.dcp" />
|
<DCCReference Include="Articulos_view.dcp" />
|
||||||
<DCCReference Include="..\..\Albaranes de proveedor\Base.dcp" />
|
<DCCReference Include="Base.dcp" />
|
||||||
<DCCReference Include="..\..\Albaranes de proveedor\GUIBase.dcp" />
|
<DCCReference Include="GUIBase.dcp" />
|
||||||
|
<DCCReference Include="rtl.dcp" />
|
||||||
<DCCReference Include="uAlbaranesClienteViewRegister.pas" />
|
<DCCReference Include="uAlbaranesClienteViewRegister.pas" />
|
||||||
|
<DCCReference Include="uDialogOpcionesImpresionAlbaranesCliente.pas">
|
||||||
|
<Form>frViewDatosYSeleccionClienteAlbaran</Form>
|
||||||
|
<DesignClass>TCustomView</DesignClass>
|
||||||
|
</DCCReference>
|
||||||
<DCCReference Include="uEditorAlbaranCliente.pas">
|
<DCCReference Include="uEditorAlbaranCliente.pas">
|
||||||
<Form>fEditorAlbaranCliente</Form>
|
<Form>fEditorAlbaranCliente</Form>
|
||||||
<DesignClass>TfEditorAlbaranCliente</DesignClass>
|
<DesignClass>TfEditorAlbaranCliente</DesignClass>
|
||||||
@ -123,6 +128,7 @@
|
|||||||
<Form>frViewElegirArticulosAlbaranesCliente</Form>
|
<Form>frViewElegirArticulosAlbaranesCliente</Form>
|
||||||
<DesignClass>TFrame</DesignClass>
|
<DesignClass>TFrame</DesignClass>
|
||||||
</DCCReference>
|
</DCCReference>
|
||||||
|
<DCCReference Include="vcl.dcp" />
|
||||||
</ItemGroup>
|
</ItemGroup>
|
||||||
</Project>
|
</Project>
|
||||||
<!-- EurekaLog First Line
|
<!-- EurekaLog First Line
|
||||||
|
|||||||
Binary file not shown.
@ -0,0 +1,87 @@
|
|||||||
|
inherited fDialogOpcionesImpresionAlbaranesCliente: TfDialogOpcionesImpresionAlbaranesCliente
|
||||||
|
Caption = 'Opciones para albar'#225'n de cliente'
|
||||||
|
ClientHeight = 239
|
||||||
|
ClientWidth = 393
|
||||||
|
ExplicitWidth = 399
|
||||||
|
ExplicitHeight = 271
|
||||||
|
PixelsPerInch = 96
|
||||||
|
TextHeight = 13
|
||||||
|
inherited Bevel2: TBevel
|
||||||
|
Width = 393
|
||||||
|
ExplicitWidth = 393
|
||||||
|
end
|
||||||
|
inherited Bevel3: TBevel
|
||||||
|
Top = 195
|
||||||
|
Width = 393
|
||||||
|
ExplicitTop = 195
|
||||||
|
ExplicitWidth = 393
|
||||||
|
end
|
||||||
|
inherited pnlBotones: TPanel
|
||||||
|
Top = 197
|
||||||
|
Width = 393
|
||||||
|
ExplicitTop = 197
|
||||||
|
ExplicitWidth = 393
|
||||||
|
inherited btnAceptar: TButton
|
||||||
|
Left = 229
|
||||||
|
ExplicitLeft = 229
|
||||||
|
end
|
||||||
|
inherited btnCancelar: TButton
|
||||||
|
Left = 308
|
||||||
|
ExplicitLeft = 308
|
||||||
|
end
|
||||||
|
end
|
||||||
|
inherited pnlHeader: TPanel
|
||||||
|
Width = 393
|
||||||
|
ExplicitWidth = 393
|
||||||
|
inherited lblInstruccion: TLabel
|
||||||
|
Width = 343
|
||||||
|
Margins.Bottom = 10
|
||||||
|
Caption = 'Indique las siguiente opciones para el albar'#225'n de cliente:'
|
||||||
|
ExplicitWidth = 319
|
||||||
|
end
|
||||||
|
inherited Label2: TLabel
|
||||||
|
Top = 31
|
||||||
|
Width = 318
|
||||||
|
Height = 25
|
||||||
|
Visible = False
|
||||||
|
ExplicitTop = 31
|
||||||
|
end
|
||||||
|
end
|
||||||
|
inherited pnlCuerpo: TPanel
|
||||||
|
Width = 393
|
||||||
|
Height = 129
|
||||||
|
ExplicitWidth = 393
|
||||||
|
ExplicitHeight = 129
|
||||||
|
object cbVerPrecios: TCheckBox
|
||||||
|
AlignWithMargins = True
|
||||||
|
Left = 50
|
||||||
|
Top = 29
|
||||||
|
Width = 415
|
||||||
|
Height = 17
|
||||||
|
Caption = 'Mostrar los precios en los conceptos'
|
||||||
|
Checked = True
|
||||||
|
State = cbChecked
|
||||||
|
TabOrder = 0
|
||||||
|
end
|
||||||
|
object cbVerRef: TCheckBox
|
||||||
|
AlignWithMargins = True
|
||||||
|
Left = 50
|
||||||
|
Top = 52
|
||||||
|
Width = 441
|
||||||
|
Height = 17
|
||||||
|
Caption = 'Mostrar las referencias de los conceptos'
|
||||||
|
Checked = True
|
||||||
|
State = cbChecked
|
||||||
|
TabOrder = 1
|
||||||
|
end
|
||||||
|
end
|
||||||
|
inherited ActionList1: TActionList
|
||||||
|
Top = 16
|
||||||
|
inherited actAceptar: TAction
|
||||||
|
OnExecute = actAceptarExecute
|
||||||
|
end
|
||||||
|
inherited actCancelar: TAction
|
||||||
|
OnExecute = actCancelarExecute
|
||||||
|
end
|
||||||
|
end
|
||||||
|
end
|
||||||
@ -0,0 +1,59 @@
|
|||||||
|
unit uDialogOpcionesImpresionAlbaranesCliente;
|
||||||
|
|
||||||
|
interface
|
||||||
|
|
||||||
|
uses
|
||||||
|
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
|
||||||
|
Dialogs, uDialogBase, ActnList, StdCtrls, ExtCtrls;
|
||||||
|
|
||||||
|
type
|
||||||
|
TfDialogOpcionesImpresionAlbaranesCliente = class(TfDialogBase)
|
||||||
|
cbVerPrecios: TCheckBox;
|
||||||
|
cbVerRef: TCheckBox;
|
||||||
|
procedure actAceptarExecute(Sender: TObject);
|
||||||
|
procedure actCancelarExecute(Sender: TObject);
|
||||||
|
private
|
||||||
|
{ Private declarations }
|
||||||
|
public
|
||||||
|
{ Public declarations }
|
||||||
|
end;
|
||||||
|
|
||||||
|
function ElegirOpcionesImpresionAlbaranCliente(var AVerPrecios : Boolean; var AVerRef : Boolean): Boolean;
|
||||||
|
|
||||||
|
implementation
|
||||||
|
|
||||||
|
{$R *.dfm}
|
||||||
|
|
||||||
|
function ElegirOpcionesImpresionAlbaranCliente(var AVerPrecios : Boolean; var AVerRef : Boolean): Boolean;
|
||||||
|
var
|
||||||
|
AEditor : TfDialogOpcionesImpresionAlbaranesCliente;
|
||||||
|
begin
|
||||||
|
AEditor := TfDialogOpcionesImpresionAlbaranesCliente.Create(NIL);
|
||||||
|
try
|
||||||
|
AEditor.cbVerPrecios.Checked := AVerPrecios;
|
||||||
|
AEditor.cbVerRef.Checked := AVerRef;
|
||||||
|
|
||||||
|
Result := (AEditor.ShowModal = mrOk);
|
||||||
|
if Result then
|
||||||
|
begin
|
||||||
|
AVerPrecios := AEditor.cbVerPrecios.Checked;
|
||||||
|
AVerRef := AEditor.cbVerRef.Checked;
|
||||||
|
end;
|
||||||
|
finally
|
||||||
|
AEditor.Release;
|
||||||
|
end;
|
||||||
|
end;
|
||||||
|
|
||||||
|
procedure TfDialogOpcionesImpresionAlbaranesCliente.actAceptarExecute(Sender: TObject);
|
||||||
|
begin
|
||||||
|
inherited;
|
||||||
|
ModalResult := mrOk
|
||||||
|
end;
|
||||||
|
|
||||||
|
procedure TfDialogOpcionesImpresionAlbaranesCliente.actCancelarExecute(Sender: TObject);
|
||||||
|
begin
|
||||||
|
inherited;
|
||||||
|
ModalResult := mrCancel;
|
||||||
|
end;
|
||||||
|
|
||||||
|
end.
|
||||||
@ -231,7 +231,13 @@ inherited fEditorAlbaranCliente: TfEditorAlbaranCliente
|
|||||||
ExplicitTop = 0
|
ExplicitTop = 0
|
||||||
ExplicitWidth = 106
|
ExplicitWidth = 106
|
||||||
end
|
end
|
||||||
inherited ToolButton13: TToolButton [7]
|
inherited UpDown1: TUpDown
|
||||||
|
Left = 650
|
||||||
|
Top = 0
|
||||||
|
ExplicitLeft = 650
|
||||||
|
ExplicitTop = 0
|
||||||
|
end
|
||||||
|
inherited ToolButton13: TToolButton
|
||||||
Left = 0
|
Left = 0
|
||||||
Top = 0
|
Top = 0
|
||||||
Wrap = True
|
Wrap = True
|
||||||
@ -239,52 +245,46 @@ inherited fEditorAlbaranCliente: TfEditorAlbaranCliente
|
|||||||
ExplicitTop = 0
|
ExplicitTop = 0
|
||||||
ExplicitHeight = 27
|
ExplicitHeight = 27
|
||||||
end
|
end
|
||||||
inherited UpDown1: TUpDown [8]
|
inherited ToolButton6: TToolButton
|
||||||
Left = 0
|
Left = 0
|
||||||
Top = 27
|
Top = 27
|
||||||
ExplicitLeft = 0
|
ExplicitLeft = 0
|
||||||
ExplicitTop = 27
|
ExplicitTop = 27
|
||||||
end
|
end
|
||||||
inherited ToolButton6: TToolButton
|
|
||||||
Left = 17
|
|
||||||
Top = 27
|
|
||||||
ExplicitLeft = 17
|
|
||||||
ExplicitTop = 27
|
|
||||||
end
|
|
||||||
inherited ToolButton7: TToolButton
|
inherited ToolButton7: TToolButton
|
||||||
Left = 83
|
Left = 66
|
||||||
Top = 27
|
Top = 27
|
||||||
ExplicitLeft = 83
|
ExplicitLeft = 66
|
||||||
ExplicitTop = 27
|
ExplicitTop = 27
|
||||||
end
|
end
|
||||||
inherited ToolButton8: TToolButton
|
inherited ToolButton8: TToolButton
|
||||||
Left = 150
|
Left = 133
|
||||||
Top = 27
|
Top = 27
|
||||||
ExplicitLeft = 150
|
ExplicitLeft = 133
|
||||||
ExplicitTop = 27
|
ExplicitTop = 27
|
||||||
end
|
end
|
||||||
inherited ToolButton12: TToolButton
|
inherited ToolButton12: TToolButton
|
||||||
Left = 233
|
Left = 216
|
||||||
Top = 27
|
Top = 27
|
||||||
ExplicitLeft = 233
|
ExplicitLeft = 216
|
||||||
ExplicitTop = 27
|
ExplicitTop = 27
|
||||||
end
|
end
|
||||||
inherited ToolButton9: TToolButton
|
inherited ToolButton9: TToolButton
|
||||||
Left = 241
|
Left = 224
|
||||||
Top = 27
|
Top = 27
|
||||||
ExplicitLeft = 241
|
ExplicitLeft = 224
|
||||||
ExplicitTop = 27
|
ExplicitTop = 27
|
||||||
end
|
end
|
||||||
inherited ToolButton10: TToolButton
|
inherited ToolButton10: TToolButton
|
||||||
Left = 386
|
Left = 369
|
||||||
Top = 27
|
Top = 27
|
||||||
ExplicitLeft = 386
|
ExplicitLeft = 369
|
||||||
ExplicitTop = 27
|
ExplicitTop = 27
|
||||||
end
|
end
|
||||||
inherited ToolButton11: TToolButton
|
inherited ToolButton11: TToolButton
|
||||||
Left = 511
|
Left = 494
|
||||||
Top = 27
|
Top = 27
|
||||||
ExplicitLeft = 511
|
ExplicitLeft = 494
|
||||||
ExplicitTop = 27
|
ExplicitTop = 27
|
||||||
end
|
end
|
||||||
end
|
end
|
||||||
|
|||||||
@ -86,7 +86,7 @@ implementation
|
|||||||
uses
|
uses
|
||||||
uViewDatosYSeleccionCliente, uDataModuleUsuarios, uClientesController,
|
uViewDatosYSeleccionCliente, uDataModuleUsuarios, uClientesController,
|
||||||
uBizDireccionesContacto, schAlbaranesClienteClient_Intf, uDialogUtils,
|
uBizDireccionesContacto, schAlbaranesClienteClient_Intf, uDialogUtils,
|
||||||
uEditorDBBase, uDataTableUtils, uFactuGES_App;
|
uEditorDBBase, uDataTableUtils, uFactuGES_App, uDialogOpcionesImpresionAlbaranesCliente;
|
||||||
|
|
||||||
{$R *.dfm}
|
{$R *.dfm}
|
||||||
|
|
||||||
@ -241,9 +241,19 @@ begin
|
|||||||
end;
|
end;
|
||||||
|
|
||||||
procedure TfEditorAlbaranCliente.ImprimirInterno;
|
procedure TfEditorAlbaranCliente.ImprimirInterno;
|
||||||
|
var
|
||||||
|
AllItems: Boolean;
|
||||||
|
FImprimirPrecios : Boolean;
|
||||||
|
FImprimirRef : Boolean;
|
||||||
|
|
||||||
begin
|
begin
|
||||||
inherited;
|
inherited;
|
||||||
FController.Print(FAlbaran);
|
AllItems := False;
|
||||||
|
FImprimirPrecios := True;
|
||||||
|
FImprimirRef := True;
|
||||||
|
|
||||||
|
if ElegirOpcionesImpresionAlbaranCliente(FImprimirPrecios, FImprimirRef) then
|
||||||
|
FController.Print(FAlbaran, AllItems, FImprimirPrecios, FImprimirRef);
|
||||||
end;
|
end;
|
||||||
|
|
||||||
procedure TfEditorAlbaranCliente.OnClienteChanged(Sender: TObject);
|
procedure TfEditorAlbaranCliente.OnClienteChanged(Sender: TObject);
|
||||||
@ -323,9 +333,19 @@ begin
|
|||||||
end;
|
end;
|
||||||
|
|
||||||
procedure TfEditorAlbaranCliente.PrevisualizarInterno;
|
procedure TfEditorAlbaranCliente.PrevisualizarInterno;
|
||||||
|
var
|
||||||
|
AllItems: Boolean;
|
||||||
|
FImprimirPrecios : Boolean;
|
||||||
|
FImprimirRef : Boolean;
|
||||||
|
|
||||||
begin
|
begin
|
||||||
inherited;
|
inherited;
|
||||||
FController.Preview(FAlbaran);
|
AllItems := False;
|
||||||
|
FImprimirPrecios := True;
|
||||||
|
FImprimirRef := True;
|
||||||
|
|
||||||
|
if ElegirOpcionesImpresionAlbaranCliente(FImprimirPrecios, FImprimirRef) then
|
||||||
|
FController.Preview(FAlbaran, AllItems, FImprimirPrecios, FImprimirRef);
|
||||||
end;
|
end;
|
||||||
|
|
||||||
procedure TfEditorAlbaranCliente.RecalcularPortePorUnidad;
|
procedure TfEditorAlbaranCliente.RecalcularPortePorUnidad;
|
||||||
|
|||||||
@ -96,7 +96,7 @@ uses
|
|||||||
uDialogUtils, schAlbaranesClienteClient_Intf,
|
uDialogUtils, schAlbaranesClienteClient_Intf,
|
||||||
// uFacturasClienteController, uBizFacturasCliente,
|
// uFacturasClienteController, uBizFacturasCliente,
|
||||||
// uInventarioController, uGenerarAlbaranesCliUtils,
|
// uInventarioController, uGenerarAlbaranesCliUtils,
|
||||||
uEditorBase,
|
uEditorBase, uDialogOpcionesImpresionAlbaranesCliente,
|
||||||
cxCustomData, uGridStatusUtils, uDBSelectionListUtils;
|
cxCustomData, uGridStatusUtils, uDBSelectionListUtils;
|
||||||
|
|
||||||
{$R *.dfm}
|
{$R *.dfm}
|
||||||
@ -406,6 +406,8 @@ var
|
|||||||
Respuesta : Integer;
|
Respuesta : Integer;
|
||||||
AAlbaranes: IBizAlbaranCliente;
|
AAlbaranes: IBizAlbaranCliente;
|
||||||
AllItems: Boolean;
|
AllItems: Boolean;
|
||||||
|
FImprimirPrecios : Boolean;
|
||||||
|
FImprimirRef : Boolean;
|
||||||
|
|
||||||
begin
|
begin
|
||||||
|
|
||||||
@ -437,7 +439,8 @@ begin
|
|||||||
AAlbaranes := Albaranes;
|
AAlbaranes := Albaranes;
|
||||||
|
|
||||||
if Assigned(AAlbaranes) then
|
if Assigned(AAlbaranes) then
|
||||||
FController.Print(AAlbaranes, AllItems);
|
if ElegirOpcionesImpresionAlbaranCliente(FImprimirPrecios, FImprimirRef) then
|
||||||
|
FController.Print(AAlbaranes, AllItems, FImprimirPrecios, FImprimirRef);
|
||||||
end;
|
end;
|
||||||
end;
|
end;
|
||||||
end;
|
end;
|
||||||
@ -495,9 +498,14 @@ var
|
|||||||
Respuesta : Integer;
|
Respuesta : Integer;
|
||||||
AAlbaranes: IBizAlbaranCliente;
|
AAlbaranes: IBizAlbaranCliente;
|
||||||
AllItems: Boolean;
|
AllItems: Boolean;
|
||||||
|
FImprimirPrecios : Boolean;
|
||||||
|
FImprimirRef : Boolean;
|
||||||
|
|
||||||
begin
|
begin
|
||||||
AAlbaranes := Nil;
|
AAlbaranes := Nil;
|
||||||
AllItems := False;
|
AllItems := False;
|
||||||
|
FImprimirPrecios := True;
|
||||||
|
FImprimirRef := True;
|
||||||
|
|
||||||
if MultiSelect and Assigned(ViewGrid) then
|
if MultiSelect and Assigned(ViewGrid) then
|
||||||
AllItems := (ViewGrid.NumSeleccionados > 1);
|
AllItems := (ViewGrid.NumSeleccionados > 1);
|
||||||
@ -524,7 +532,8 @@ begin
|
|||||||
AAlbaranes := Albaranes;
|
AAlbaranes := Albaranes;
|
||||||
|
|
||||||
if Assigned(AAlbaranes) then
|
if Assigned(AAlbaranes) then
|
||||||
FController.Preview(AAlbaranes, AllItems);
|
if ElegirOpcionesImpresionAlbaranCliente(FImprimirPrecios, FImprimirRef) then
|
||||||
|
FController.Preview(AAlbaranes, AllItems, FImprimirPrecios, FImprimirRef);
|
||||||
end;
|
end;
|
||||||
end;
|
end;
|
||||||
end;
|
end;
|
||||||
|
|||||||
@ -1,7 +1,5 @@
|
|||||||
inherited fEditorAlbaranesClientePreview: TfEditorAlbaranesClientePreview
|
inherited fEditorAlbaranesClientePreview: TfEditorAlbaranesClientePreview
|
||||||
Caption = 'Previsualizar el albar'#225'n de cliente'
|
Caption = 'Previsualizar el albar'#225'n de cliente'
|
||||||
ExplicitWidth = 320
|
|
||||||
ExplicitHeight = 240
|
|
||||||
PixelsPerInch = 96
|
PixelsPerInch = 96
|
||||||
TextHeight = 13
|
TextHeight = 13
|
||||||
inherited TBXDock: TTBXDock
|
inherited TBXDock: TTBXDock
|
||||||
|
|||||||
@ -18,6 +18,18 @@ type
|
|||||||
TfEditorAlbaranesClientePreview = class(TfEditorPreview, IEditorAlbaranesClientePreview)
|
TfEditorAlbaranesClientePreview = class(TfEditorPreview, IEditorAlbaranesClientePreview)
|
||||||
TBXItem58: TTBXItem;
|
TBXItem58: TTBXItem;
|
||||||
procedure actExportarRTFExecute(Sender: TObject);
|
procedure actExportarRTFExecute(Sender: TObject);
|
||||||
|
private
|
||||||
|
FVerPrecios : Boolean;
|
||||||
|
FVerRef : Boolean;
|
||||||
|
function GetVerPrecios: Boolean;
|
||||||
|
function GetVerRef: Boolean;
|
||||||
|
procedure SetVerPrecios(const Value: Boolean);
|
||||||
|
procedure SetVerRef(const Value: Boolean);
|
||||||
|
published
|
||||||
|
public
|
||||||
|
property VerPrecios : Boolean read GetVerPrecios write SetVerPrecios;
|
||||||
|
property VerRef : Boolean read GetVerRef write SetVerRef;
|
||||||
|
|
||||||
end;
|
end;
|
||||||
|
|
||||||
|
|
||||||
@ -38,8 +50,28 @@ begin
|
|||||||
raise Exception.Create('No se ha asignado el controlador necesario');
|
raise Exception.Create('No se ha asignado el controlador necesario');
|
||||||
|
|
||||||
for I := 0 to ListaID.Count - 1 do
|
for I := 0 to ListaID.Count - 1 do
|
||||||
if (Controller as IAlbaranesClienteReportController).ExportToWord(ListaID[I]) then
|
if (Controller as IAlbaranesClienteReportController).ExportToWord(ListaID[I], '', FVerPrecios, FVerRef) then
|
||||||
ShowInfoMessage('El albarán se ha exportado correctamente.');
|
ShowInfoMessage('El albarán se ha exportado correctamente.');
|
||||||
end;
|
end;
|
||||||
|
|
||||||
|
function TfEditorAlbaranesClientePreview.GetVerPrecios: Boolean;
|
||||||
|
begin
|
||||||
|
Result := FVerPrecios;
|
||||||
|
end;
|
||||||
|
|
||||||
|
function TfEditorAlbaranesClientePreview.GetVerRef: Boolean;
|
||||||
|
begin
|
||||||
|
Result := FVerRef;
|
||||||
|
end;
|
||||||
|
|
||||||
|
procedure TfEditorAlbaranesClientePreview.SetVerPrecios(const Value: Boolean);
|
||||||
|
begin
|
||||||
|
FVerPrecios := Value;
|
||||||
|
end;
|
||||||
|
|
||||||
|
procedure TfEditorAlbaranesClientePreview.SetVerRef(const Value: Boolean);
|
||||||
|
begin
|
||||||
|
FVerRef := Value;
|
||||||
|
end;
|
||||||
|
|
||||||
end.
|
end.
|
||||||
|
|||||||
@ -236,7 +236,7 @@ begin
|
|||||||
FImprimirRefProveedor := True;
|
FImprimirRefProveedor := True;
|
||||||
|
|
||||||
if ElegirOpcionesImpresionAlbaranProveedor(FImprimirPrecios, FImprimirRefProveedor) then
|
if ElegirOpcionesImpresionAlbaranProveedor(FImprimirPrecios, FImprimirRefProveedor) then
|
||||||
FController.Preview(FAlbaran, AllItems, FImprimirPrecios, FImprimirRefProveedor);
|
FController.Print(FAlbaran, AllItems, FImprimirPrecios, FImprimirRefProveedor);
|
||||||
end;
|
end;
|
||||||
|
|
||||||
procedure TfEditorAlbaranProveedor.OnProveedorChanged(Sender: TObject);
|
procedure TfEditorAlbaranProveedor.OnProveedorChanged(Sender: TObject);
|
||||||
|
|||||||
@ -343,7 +343,6 @@ begin
|
|||||||
FImprimirPrecios := True;
|
FImprimirPrecios := True;
|
||||||
FImprimirRefProveedor := True;
|
FImprimirRefProveedor := True;
|
||||||
|
|
||||||
|
|
||||||
if MultiSelect and Assigned(ViewGrid) then
|
if MultiSelect and Assigned(ViewGrid) then
|
||||||
AllItems := (ViewGrid.NumSeleccionados > 1);
|
AllItems := (ViewGrid.NumSeleccionados > 1);
|
||||||
|
|
||||||
|
|||||||
Binary file not shown.
Binary file not shown.
@ -179,15 +179,23 @@ begin
|
|||||||
ASchema := BusinessProcessor.Schema;
|
ASchema := BusinessProcessor.Schema;
|
||||||
ACurrentConn := GetBusinessProcessorConnection(BusinessProcessor);
|
ACurrentConn := GetBusinessProcessorConnection(BusinessProcessor);
|
||||||
|
|
||||||
//En el caso de querer tener los contactos separados por empresas en lugar de tenerlos en común
|
//En el caso de empleados si estarán separados por empresas
|
||||||
// ACommand := ASchema.NewCommand(ACurrentConn, 'Insert_ContactoEmpresa');
|
if (aChange.NewValueByName[fld_ContactosID_CATEGORIA] = 3) then
|
||||||
//En el caso de querer tener los contactos en común para todas las empresas
|
//En el caso de querer tener los contactos separados por empresas en lugar de tenerlos en común
|
||||||
ACommand := ASchema.NewCommand(ACurrentConn, 'Insert_ContactoEmpresas');
|
ACommand := ASchema.NewCommand(ACurrentConn, 'Insert_ContactoEmpresa')
|
||||||
|
else
|
||||||
|
//En el caso de querer tener los contactos en común para todas las empresas
|
||||||
|
ACommand := ASchema.NewCommand(ACurrentConn, 'Insert_ContactoEmpresas');
|
||||||
|
|
||||||
try
|
try
|
||||||
with ACommand do
|
with ACommand do
|
||||||
begin
|
begin
|
||||||
ParamByName('ID_CONTACTO').Value := aChange.NewValueByName[fld_ContactosID];
|
ParamByName('ID_CONTACTO').Value := aChange.NewValueByName[fld_ContactosID];
|
||||||
// ParamByName('ID_EMPRESA').Value := aChange.NewValueByName[fld_ContactosID_EMPRESA];
|
|
||||||
|
//En el caso de empleados si estarán separados por empresas por lo que añadimos el ID_EMPRESA
|
||||||
|
if (aChange.NewValueByName[fld_ContactosID_CATEGORIA] = 3) then
|
||||||
|
ParamByName('ID_EMPRESA').Value := aChange.NewValueByName[fld_ContactosID_EMPRESA];
|
||||||
|
|
||||||
Execute;
|
Execute;
|
||||||
end;
|
end;
|
||||||
finally
|
finally
|
||||||
|
|||||||
@ -2760,45 +2760,6 @@ object srvContactos: TsrvContactos
|
|||||||
end>
|
end>
|
||||||
Name = 'Delete_ContactoEmpresas'
|
Name = 'Delete_ContactoEmpresas'
|
||||||
end
|
end
|
||||||
item
|
|
||||||
Params = <
|
|
||||||
item
|
|
||||||
Name = 'ID_EMPRESA'
|
|
||||||
DataType = datInteger
|
|
||||||
Value = ''
|
|
||||||
ParamType = daptInput
|
|
||||||
end
|
|
||||||
item
|
|
||||||
Name = 'ID_CONTACTO'
|
|
||||||
DataType = datInteger
|
|
||||||
Value = ''
|
|
||||||
ParamType = daptInput
|
|
||||||
end
|
|
||||||
item
|
|
||||||
Name = 'OLD_ID_EMPRESA'
|
|
||||||
DataType = datInteger
|
|
||||||
Value = ''
|
|
||||||
ParamType = daptInput
|
|
||||||
end
|
|
||||||
item
|
|
||||||
Name = 'OLD_ID_CONTACTO'
|
|
||||||
DataType = datInteger
|
|
||||||
Value = ''
|
|
||||||
ParamType = daptInput
|
|
||||||
end>
|
|
||||||
Statements = <
|
|
||||||
item
|
|
||||||
Connection = 'IBX'
|
|
||||||
TargetTable = 'EMPRESAS_CONTACTOS'
|
|
||||||
SQL =
|
|
||||||
'UPDATE EMPRESAS_CONTACTOS'#10' SET '#10' ID_EMPRESA = :ID_EMPRESA, '#10 +
|
|
||||||
' ID_CONTACTO = :ID_CONTACTO'#10' WHERE'#10' (ID_EMPRESA = :OLD_ID' +
|
|
||||||
'_EMPRESA) AND '#10' (ID_CONTACTO = :OLD_ID_CONTACTO)'
|
|
||||||
StatementType = stSQL
|
|
||||||
ColumnMappings = <>
|
|
||||||
end>
|
|
||||||
Name = 'Update_ContactoEmpresa'
|
|
||||||
end
|
|
||||||
item
|
item
|
||||||
Params = <
|
Params = <
|
||||||
item
|
item
|
||||||
@ -3779,18 +3740,14 @@ object srvContactos: TsrvContactos
|
|||||||
end
|
end
|
||||||
item
|
item
|
||||||
Params = <
|
Params = <
|
||||||
item
|
|
||||||
Name = 'ID'
|
|
||||||
DataType = datAutoInc
|
|
||||||
GeneratorName = 'GEN_EMPRESAS_CONTACTOS_ID'
|
|
||||||
Value = ''
|
|
||||||
end
|
|
||||||
item
|
item
|
||||||
Name = 'ID_EMPRESA'
|
Name = 'ID_EMPRESA'
|
||||||
|
DataType = datInteger
|
||||||
Value = ''
|
Value = ''
|
||||||
end
|
end
|
||||||
item
|
item
|
||||||
Name = 'ID_CONTACTO'
|
Name = 'ID_CONTACTO'
|
||||||
|
DataType = datInteger
|
||||||
Value = ''
|
Value = ''
|
||||||
end>
|
end>
|
||||||
Statements = <
|
Statements = <
|
||||||
@ -3799,7 +3756,8 @@ object srvContactos: TsrvContactos
|
|||||||
TargetTable = 'EMPRESAS_CONTACTOS'
|
TargetTable = 'EMPRESAS_CONTACTOS'
|
||||||
SQL =
|
SQL =
|
||||||
'INSERT'#10' INTO EMPRESAS_CONTACTOS'#10' (ID, ID_EMPRESA, ID_CONTACT' +
|
'INSERT'#10' INTO EMPRESAS_CONTACTOS'#10' (ID, ID_EMPRESA, ID_CONTACT' +
|
||||||
'O)'#10' VALUES'#10' (:ID, :ID_EMPRESA, :ID_CONTACTO)'#10
|
'O)'#10' VALUES'#10' ((SELECT GEN_ID(GEN_EMPRESAS_CONTACTOS_ID, 1) FR' +
|
||||||
|
'OM RDB$DATABASE), :ID_EMPRESA, :ID_CONTACTO)'#10
|
||||||
StatementType = stSQL
|
StatementType = stSQL
|
||||||
ColumnMappings = <>
|
ColumnMappings = <>
|
||||||
end>
|
end>
|
||||||
@ -3955,6 +3913,39 @@ object srvContactos: TsrvContactos
|
|||||||
ColumnMappings = <>
|
ColumnMappings = <>
|
||||||
end>
|
end>
|
||||||
Name = 'Update_PersonalContacto'
|
Name = 'Update_PersonalContacto'
|
||||||
|
end
|
||||||
|
item
|
||||||
|
Params = <
|
||||||
|
item
|
||||||
|
Name = 'ID_EMPRESA'
|
||||||
|
DataType = datInteger
|
||||||
|
Value = ''
|
||||||
|
end
|
||||||
|
item
|
||||||
|
Name = 'ID_CONTACTO'
|
||||||
|
DataType = datInteger
|
||||||
|
Value = ''
|
||||||
|
end
|
||||||
|
item
|
||||||
|
Name = 'OLD_ID_EMPRESA'
|
||||||
|
Value = ''
|
||||||
|
end
|
||||||
|
item
|
||||||
|
Name = 'OLD_ID_CONTACTO'
|
||||||
|
Value = ''
|
||||||
|
end>
|
||||||
|
Statements = <
|
||||||
|
item
|
||||||
|
Connection = 'IBX'
|
||||||
|
TargetTable = 'EMPRESAS_CONTACTOS'
|
||||||
|
SQL =
|
||||||
|
'UPDATE EMPRESAS_CONTACTOS'#10' SET'#10' ID_EMPRESA = :ID_EMPRESA,'#10' ' +
|
||||||
|
' ID_CONTACTO = :ID_CONTACTO'#10' WHERE'#10' (ID_EMPRESA = :OLD_ID_E' +
|
||||||
|
'MPRESA) AND'#10' (ID_CONTACTO = :OLD_ID_CONTACTO)'#10
|
||||||
|
StatementType = stSQL
|
||||||
|
ColumnMappings = <>
|
||||||
|
end>
|
||||||
|
Name = 'Update_ContactoEmpresa'
|
||||||
end>
|
end>
|
||||||
RelationShips = <
|
RelationShips = <
|
||||||
item
|
item
|
||||||
|
|||||||
@ -410,6 +410,10 @@
|
|||||||
</Parameter>
|
</Parameter>
|
||||||
<Parameter Name="ListaID" DataType="TIntegerArray" Flag="In" >
|
<Parameter Name="ListaID" DataType="TIntegerArray" Flag="In" >
|
||||||
</Parameter>
|
</Parameter>
|
||||||
|
<Parameter Name="ImprimirPrecio" DataType="Boolean" Flag="In" >
|
||||||
|
</Parameter>
|
||||||
|
<Parameter Name="ImprimirRef" DataType="Boolean" Flag="In" >
|
||||||
|
</Parameter>
|
||||||
</Parameters>
|
</Parameters>
|
||||||
</Operation>
|
</Operation>
|
||||||
<Operation Name="GenerarInformeEtiquetas" UID="{260CD213-F125-422B-9BD1-401729460DF0}">
|
<Operation Name="GenerarInformeEtiquetas" UID="{260CD213-F125-422B-9BD1-401729460DF0}">
|
||||||
@ -428,6 +432,10 @@
|
|||||||
</Parameter>
|
</Parameter>
|
||||||
<Parameter Name="ID" DataType="Integer" Flag="In" >
|
<Parameter Name="ID" DataType="Integer" Flag="In" >
|
||||||
</Parameter>
|
</Parameter>
|
||||||
|
<Parameter Name="ImprimirPrecio" DataType="Boolean" Flag="In" >
|
||||||
|
</Parameter>
|
||||||
|
<Parameter Name="ImprimirRef" DataType="Boolean" Flag="In" >
|
||||||
|
</Parameter>
|
||||||
</Parameters>
|
</Parameters>
|
||||||
</Operation>
|
</Operation>
|
||||||
<Operation Name="GenerarInformeEnPDF" UID="{83F24406-D1B9-43DE-97E9-42A899433DD4}">
|
<Operation Name="GenerarInformeEnPDF" UID="{83F24406-D1B9-43DE-97E9-42A899433DD4}">
|
||||||
@ -436,6 +444,10 @@
|
|||||||
</Parameter>
|
</Parameter>
|
||||||
<Parameter Name="ListaID" DataType="TIntegerArray" Flag="In" >
|
<Parameter Name="ListaID" DataType="TIntegerArray" Flag="In" >
|
||||||
</Parameter>
|
</Parameter>
|
||||||
|
<Parameter Name="ImprimirPrecio" DataType="Boolean" Flag="In" >
|
||||||
|
</Parameter>
|
||||||
|
<Parameter Name="ImprimirRef" DataType="Boolean" Flag="In" >
|
||||||
|
</Parameter>
|
||||||
</Parameters>
|
</Parameters>
|
||||||
</Operation>
|
</Operation>
|
||||||
</Operations>
|
</Operations>
|
||||||
|
|||||||
@ -594,10 +594,10 @@ type
|
|||||||
{ IsrvAlbaranesCliente }
|
{ IsrvAlbaranesCliente }
|
||||||
IsrvAlbaranesCliente = interface(IDataAbstractService)
|
IsrvAlbaranesCliente = interface(IDataAbstractService)
|
||||||
['{6E910718-9AB0-47BB-9875-B0DE66A68D7A}']
|
['{6E910718-9AB0-47BB-9875-B0DE66A68D7A}']
|
||||||
function GenerarInforme(const ListaID: TIntegerArray): Binary;
|
function GenerarInforme(const ListaID: TIntegerArray; const ImprimirPrecio: Boolean; const ImprimirRef: Boolean): Binary;
|
||||||
function GenerarInformeEtiquetas(const ID: Integer; const withRefCliente: Boolean): Binary;
|
function GenerarInformeEtiquetas(const ID: Integer; const withRefCliente: Boolean): Binary;
|
||||||
function GenerarInformeEnWord(const ID: Integer): Binary;
|
function GenerarInformeEnWord(const ID: Integer; const ImprimirPrecio: Boolean; const ImprimirRef: Boolean): Binary;
|
||||||
function GenerarInformeEnPDF(const ListaID: TIntegerArray): Binary;
|
function GenerarInformeEnPDF(const ListaID: TIntegerArray; const ImprimirPrecio: Boolean; const ImprimirRef: Boolean): Binary;
|
||||||
end;
|
end;
|
||||||
|
|
||||||
{ CosrvAlbaranesCliente }
|
{ CosrvAlbaranesCliente }
|
||||||
@ -610,10 +610,10 @@ type
|
|||||||
protected
|
protected
|
||||||
function __GetInterfaceName:string; override;
|
function __GetInterfaceName:string; override;
|
||||||
|
|
||||||
function GenerarInforme(const ListaID: TIntegerArray): Binary;
|
function GenerarInforme(const ListaID: TIntegerArray; const ImprimirPrecio: Boolean; const ImprimirRef: Boolean): Binary;
|
||||||
function GenerarInformeEtiquetas(const ID: Integer; const withRefCliente: Boolean): Binary;
|
function GenerarInformeEtiquetas(const ID: Integer; const withRefCliente: Boolean): Binary;
|
||||||
function GenerarInformeEnWord(const ID: Integer): Binary;
|
function GenerarInformeEnWord(const ID: Integer; const ImprimirPrecio: Boolean; const ImprimirRef: Boolean): Binary;
|
||||||
function GenerarInformeEnPDF(const ListaID: TIntegerArray): Binary;
|
function GenerarInformeEnPDF(const ListaID: TIntegerArray; const ImprimirPrecio: Boolean; const ImprimirRef: Boolean): Binary;
|
||||||
end;
|
end;
|
||||||
|
|
||||||
{ IsrvAlbaranesProveedor }
|
{ IsrvAlbaranesProveedor }
|
||||||
@ -1976,12 +1976,14 @@ begin
|
|||||||
result := 'srvAlbaranesCliente';
|
result := 'srvAlbaranesCliente';
|
||||||
end;
|
end;
|
||||||
|
|
||||||
function TsrvAlbaranesCliente_Proxy.GenerarInforme(const ListaID: TIntegerArray): Binary;
|
function TsrvAlbaranesCliente_Proxy.GenerarInforme(const ListaID: TIntegerArray; const ImprimirPrecio: Boolean; const ImprimirRef: Boolean): Binary;
|
||||||
begin
|
begin
|
||||||
try
|
try
|
||||||
result := nil;
|
result := nil;
|
||||||
__Message.InitializeRequestMessage(__TransportChannel, 'FactuGES', __InterfaceName, 'GenerarInforme');
|
__Message.InitializeRequestMessage(__TransportChannel, 'FactuGES', __InterfaceName, 'GenerarInforme');
|
||||||
__Message.Write('ListaID', TypeInfo(FactuGES_Intf.TIntegerArray), ListaID, []);
|
__Message.Write('ListaID', TypeInfo(FactuGES_Intf.TIntegerArray), ListaID, []);
|
||||||
|
__Message.Write('ImprimirPrecio', TypeInfo(Boolean), ImprimirPrecio, []);
|
||||||
|
__Message.Write('ImprimirRef', TypeInfo(Boolean), ImprimirRef, []);
|
||||||
__Message.Finalize;
|
__Message.Finalize;
|
||||||
|
|
||||||
__TransportChannel.Dispatch(__Message);
|
__TransportChannel.Dispatch(__Message);
|
||||||
@ -2011,12 +2013,14 @@ begin
|
|||||||
end
|
end
|
||||||
end;
|
end;
|
||||||
|
|
||||||
function TsrvAlbaranesCliente_Proxy.GenerarInformeEnWord(const ID: Integer): Binary;
|
function TsrvAlbaranesCliente_Proxy.GenerarInformeEnWord(const ID: Integer; const ImprimirPrecio: Boolean; const ImprimirRef: Boolean): Binary;
|
||||||
begin
|
begin
|
||||||
try
|
try
|
||||||
result := nil;
|
result := nil;
|
||||||
__Message.InitializeRequestMessage(__TransportChannel, 'FactuGES', __InterfaceName, 'GenerarInformeEnWord');
|
__Message.InitializeRequestMessage(__TransportChannel, 'FactuGES', __InterfaceName, 'GenerarInformeEnWord');
|
||||||
__Message.Write('ID', TypeInfo(Integer), ID, []);
|
__Message.Write('ID', TypeInfo(Integer), ID, []);
|
||||||
|
__Message.Write('ImprimirPrecio', TypeInfo(Boolean), ImprimirPrecio, []);
|
||||||
|
__Message.Write('ImprimirRef', TypeInfo(Boolean), ImprimirRef, []);
|
||||||
__Message.Finalize;
|
__Message.Finalize;
|
||||||
|
|
||||||
__TransportChannel.Dispatch(__Message);
|
__TransportChannel.Dispatch(__Message);
|
||||||
@ -2028,12 +2032,14 @@ begin
|
|||||||
end
|
end
|
||||||
end;
|
end;
|
||||||
|
|
||||||
function TsrvAlbaranesCliente_Proxy.GenerarInformeEnPDF(const ListaID: TIntegerArray): Binary;
|
function TsrvAlbaranesCliente_Proxy.GenerarInformeEnPDF(const ListaID: TIntegerArray; const ImprimirPrecio: Boolean; const ImprimirRef: Boolean): Binary;
|
||||||
begin
|
begin
|
||||||
try
|
try
|
||||||
result := nil;
|
result := nil;
|
||||||
__Message.InitializeRequestMessage(__TransportChannel, 'FactuGES', __InterfaceName, 'GenerarInformeEnPDF');
|
__Message.InitializeRequestMessage(__TransportChannel, 'FactuGES', __InterfaceName, 'GenerarInformeEnPDF');
|
||||||
__Message.Write('ListaID', TypeInfo(FactuGES_Intf.TIntegerArray), ListaID, []);
|
__Message.Write('ListaID', TypeInfo(FactuGES_Intf.TIntegerArray), ListaID, []);
|
||||||
|
__Message.Write('ImprimirPrecio', TypeInfo(Boolean), ImprimirPrecio, []);
|
||||||
|
__Message.Write('ImprimirRef', TypeInfo(Boolean), ImprimirRef, []);
|
||||||
__Message.Finalize;
|
__Message.Finalize;
|
||||||
|
|
||||||
__TransportChannel.Dispatch(__Message);
|
__TransportChannel.Dispatch(__Message);
|
||||||
|
|||||||
@ -1207,9 +1207,11 @@ begin
|
|||||||
end;
|
end;
|
||||||
|
|
||||||
procedure TsrvAlbaranesCliente_Invoker.Invoke_GenerarInforme(const __Instance:IInterface; const __Message:IROMessage; const __Transport:IROTransport; out __oResponseOptions:TROResponseOptions);
|
procedure TsrvAlbaranesCliente_Invoker.Invoke_GenerarInforme(const __Instance:IInterface; const __Message:IROMessage; const __Transport:IROTransport; out __oResponseOptions:TROResponseOptions);
|
||||||
{ function GenerarInforme(const ListaID: TIntegerArray): Binary; }
|
{ function GenerarInforme(const ListaID: TIntegerArray; const ImprimirPrecio: Boolean; const ImprimirRef: Boolean): Binary; }
|
||||||
var
|
var
|
||||||
ListaID: FactuGES_Intf.TIntegerArray;
|
ListaID: FactuGES_Intf.TIntegerArray;
|
||||||
|
ImprimirPrecio: Boolean;
|
||||||
|
ImprimirRef: Boolean;
|
||||||
lResult: Binary;
|
lResult: Binary;
|
||||||
__lObjectDisposer: TROObjectDisposer;
|
__lObjectDisposer: TROObjectDisposer;
|
||||||
begin
|
begin
|
||||||
@ -1217,8 +1219,10 @@ begin
|
|||||||
lResult := nil;
|
lResult := nil;
|
||||||
try
|
try
|
||||||
__Message.Read('ListaID', TypeInfo(FactuGES_Intf.TIntegerArray), ListaID, []);
|
__Message.Read('ListaID', TypeInfo(FactuGES_Intf.TIntegerArray), ListaID, []);
|
||||||
|
__Message.Read('ImprimirPrecio', TypeInfo(Boolean), ImprimirPrecio, []);
|
||||||
|
__Message.Read('ImprimirRef', TypeInfo(Boolean), ImprimirRef, []);
|
||||||
|
|
||||||
lResult := (__Instance as IsrvAlbaranesCliente).GenerarInforme(ListaID);
|
lResult := (__Instance as IsrvAlbaranesCliente).GenerarInforme(ListaID, ImprimirPrecio, ImprimirRef);
|
||||||
|
|
||||||
__Message.InitializeResponseMessage(__Transport, 'FactuGES', 'srvAlbaranesCliente', 'GenerarInformeResponse');
|
__Message.InitializeResponseMessage(__Transport, 'FactuGES', 'srvAlbaranesCliente', 'GenerarInformeResponse');
|
||||||
__Message.Write('Result', TypeInfo(Binary), lResult, []);
|
__Message.Write('Result', TypeInfo(Binary), lResult, []);
|
||||||
@ -1267,17 +1271,21 @@ begin
|
|||||||
end;
|
end;
|
||||||
|
|
||||||
procedure TsrvAlbaranesCliente_Invoker.Invoke_GenerarInformeEnWord(const __Instance:IInterface; const __Message:IROMessage; const __Transport:IROTransport; out __oResponseOptions:TROResponseOptions);
|
procedure TsrvAlbaranesCliente_Invoker.Invoke_GenerarInformeEnWord(const __Instance:IInterface; const __Message:IROMessage; const __Transport:IROTransport; out __oResponseOptions:TROResponseOptions);
|
||||||
{ function GenerarInformeEnWord(const ID: Integer): Binary; }
|
{ function GenerarInformeEnWord(const ID: Integer; const ImprimirPrecio: Boolean; const ImprimirRef: Boolean): Binary; }
|
||||||
var
|
var
|
||||||
ID: Integer;
|
ID: Integer;
|
||||||
|
ImprimirPrecio: Boolean;
|
||||||
|
ImprimirRef: Boolean;
|
||||||
lResult: Binary;
|
lResult: Binary;
|
||||||
__lObjectDisposer: TROObjectDisposer;
|
__lObjectDisposer: TROObjectDisposer;
|
||||||
begin
|
begin
|
||||||
lResult := nil;
|
lResult := nil;
|
||||||
try
|
try
|
||||||
__Message.Read('ID', TypeInfo(Integer), ID, []);
|
__Message.Read('ID', TypeInfo(Integer), ID, []);
|
||||||
|
__Message.Read('ImprimirPrecio', TypeInfo(Boolean), ImprimirPrecio, []);
|
||||||
|
__Message.Read('ImprimirRef', TypeInfo(Boolean), ImprimirRef, []);
|
||||||
|
|
||||||
lResult := (__Instance as IsrvAlbaranesCliente).GenerarInformeEnWord(ID);
|
lResult := (__Instance as IsrvAlbaranesCliente).GenerarInformeEnWord(ID, ImprimirPrecio, ImprimirRef);
|
||||||
|
|
||||||
__Message.InitializeResponseMessage(__Transport, 'FactuGES', 'srvAlbaranesCliente', 'GenerarInformeEnWordResponse');
|
__Message.InitializeResponseMessage(__Transport, 'FactuGES', 'srvAlbaranesCliente', 'GenerarInformeEnWordResponse');
|
||||||
__Message.Write('Result', TypeInfo(Binary), lResult, []);
|
__Message.Write('Result', TypeInfo(Binary), lResult, []);
|
||||||
@ -1295,9 +1303,11 @@ begin
|
|||||||
end;
|
end;
|
||||||
|
|
||||||
procedure TsrvAlbaranesCliente_Invoker.Invoke_GenerarInformeEnPDF(const __Instance:IInterface; const __Message:IROMessage; const __Transport:IROTransport; out __oResponseOptions:TROResponseOptions);
|
procedure TsrvAlbaranesCliente_Invoker.Invoke_GenerarInformeEnPDF(const __Instance:IInterface; const __Message:IROMessage; const __Transport:IROTransport; out __oResponseOptions:TROResponseOptions);
|
||||||
{ function GenerarInformeEnPDF(const ListaID: TIntegerArray): Binary; }
|
{ function GenerarInformeEnPDF(const ListaID: TIntegerArray; const ImprimirPrecio: Boolean; const ImprimirRef: Boolean): Binary; }
|
||||||
var
|
var
|
||||||
ListaID: FactuGES_Intf.TIntegerArray;
|
ListaID: FactuGES_Intf.TIntegerArray;
|
||||||
|
ImprimirPrecio: Boolean;
|
||||||
|
ImprimirRef: Boolean;
|
||||||
lResult: Binary;
|
lResult: Binary;
|
||||||
__lObjectDisposer: TROObjectDisposer;
|
__lObjectDisposer: TROObjectDisposer;
|
||||||
begin
|
begin
|
||||||
@ -1305,8 +1315,10 @@ begin
|
|||||||
lResult := nil;
|
lResult := nil;
|
||||||
try
|
try
|
||||||
__Message.Read('ListaID', TypeInfo(FactuGES_Intf.TIntegerArray), ListaID, []);
|
__Message.Read('ListaID', TypeInfo(FactuGES_Intf.TIntegerArray), ListaID, []);
|
||||||
|
__Message.Read('ImprimirPrecio', TypeInfo(Boolean), ImprimirPrecio, []);
|
||||||
|
__Message.Read('ImprimirRef', TypeInfo(Boolean), ImprimirRef, []);
|
||||||
|
|
||||||
lResult := (__Instance as IsrvAlbaranesCliente).GenerarInformeEnPDF(ListaID);
|
lResult := (__Instance as IsrvAlbaranesCliente).GenerarInformeEnPDF(ListaID, ImprimirPrecio, ImprimirRef);
|
||||||
|
|
||||||
__Message.InitializeResponseMessage(__Transport, 'FactuGES', 'srvAlbaranesCliente', 'GenerarInformeEnPDFResponse');
|
__Message.InitializeResponseMessage(__Transport, 'FactuGES', 'srvAlbaranesCliente', 'GenerarInformeEnPDFResponse');
|
||||||
__Message.Write('Result', TypeInfo(Binary), lResult, []);
|
__Message.Write('Result', TypeInfo(Binary), lResult, []);
|
||||||
|
|||||||
Binary file not shown.
Binary file not shown.
@ -1,334 +1,339 @@
|
|||||||
<?xml version="1.0" encoding="utf-8"?>
|
<?xml version="1.0" encoding="utf-8"?>
|
||||||
<Project xmlns="http://schemas.microsoft.com/developer/msbuild/2003">
|
<Project xmlns="http://schemas.microsoft.com/developer/msbuild/2003">
|
||||||
<PropertyGroup>
|
<PropertyGroup>
|
||||||
<ProjectGuid>{ebdcd25d-40d7-4146-91ec-a0ea4aa1dcd1}</ProjectGuid>
|
<ProjectGuid>{ebdcd25d-40d7-4146-91ec-a0ea4aa1dcd1}</ProjectGuid>
|
||||||
<MainSource>FactuGES_Server.dpr</MainSource>
|
<MainSource>FactuGES_Server.dpr</MainSource>
|
||||||
<Configuration Condition=" '$(Configuration)' == '' ">Debug</Configuration>
|
<Configuration Condition=" '$(Configuration)' == '' ">Debug</Configuration>
|
||||||
<Platform Condition=" '$(Platform)' == '' ">AnyCPU</Platform>
|
<Platform Condition=" '$(Platform)' == '' ">AnyCPU</Platform>
|
||||||
<DCC_DCCCompiler>DCC32</DCC_DCCCompiler>
|
<DCC_DCCCompiler>DCC32</DCC_DCCCompiler>
|
||||||
<DCC_DependencyCheckOutputName>..\..\Output\Debug\Servidor\FactuGES_Server.exe</DCC_DependencyCheckOutputName>
|
<DCC_DependencyCheckOutputName>..\..\Output\Debug\Servidor\FactuGES_Server.exe</DCC_DependencyCheckOutputName>
|
||||||
<DCC_UsePackage>vcl;rtl;vclx;vclactnband;dbrtl;vcldb;vcldbx;bdertl;dsnap;dsnapcon;teeUI;teedb;tee;adortl;vclib;ibxpress;dbxcds;dbexpress;DbxCommonDriver;IndyCore;IndySystem;IndyProtocols;VclSmp;vclie;webdsnap;xmlrtl;inet;inetdbbde;inetdbxpress;RemObjects_BPDX_D11;RemObjects_RODX_D11;RemObjects_Indy_D11;RemObjects_Synapse_D11;RemObjects_WebBroker_D11;DataAbstract_Core_D11;DataAbstract_DBXDriver_D11;DataAbstract_IDE_D11;DataAbstract_Scripting_D11;DataAbstract_SDACDriver_D11;sdac105;dac105;DataAbstract_SQLiteDriver_D11;cxEditorsD10;cxLibraryD10;dxThemeD10;cxDataD10;cxExtEditorsD10;cxGridD10;cxPageControlD10;cxSchedulerD10;cxTreeListD10;cxVerticalGridD10;dxBarD10;dxComnD10;dxBarDBNavD10;dxBarExtDBItemsD10;dxBarExtItemsD10;dxDockingD10;dxLayoutControlD10;dxNavBarD10;dxPSCoreD10;dxsbD10;dxPScxCommonD10;dxPSLnksD10;vclshlctrls;dxPScxExtCommonD10;dxPScxGridLnkD10;dxPScxPCProdD10;dxPScxScheduler2LnkD10;dxPScxTLLnkD10;dxPSdxLCLnkD10;dxPsPrVwAdvD10;pckMD5;pckUCDataConnector;pckUserControl_RT;PluginSDK_D10R;PNG_D10;PngComponentsD10;tb2k_d10;tbx_d10;JclVcl;Jcl;JvXPCtrlsD11R;JvCoreD11R;JvSystemD11R;JvStdCtrlsD11R;JvAppFrmD11R;JvBandsD11R;JvDBD11R;JvDlgsD11R;JvBDED11R;JvCmpD11R;JvCryptD11R;JvCtrlsD11R;JvCustomD11R;JvDockingD11R;JvDotNetCtrlsD11R;JvEDID11R;JvGlobusD11R;JvHMID11R;JvInterpreterD11R;JvJansD11R;JvManagedThreadsD11R;JvMMD11R;JvNetD11R;JvPageCompsD11R;JvPluginD11R;JvPrintPreviewD11R;JvRuntimeDesignD11R;JvTimeFrameworkD11R;JvUIBD11R;JvValidatorsD11R;JvWizardD11R;pckUCADOConn;pckUCBDEConn;pckUCIBXConn;pckUCMidasConn;cxIntlPrintSys3D10;cxExportD10;cxIntl5D10;GUISDK_D11R;ccpackD11;JSDialog100;fsTee11;fs11;frx11;frxADO11;frxBDE11;frxDB11;frxDBX11;frxe11;frxIBX11;frxTee11;fsADO11;fsBDE11;fsDB11;fsIBX11;websnap;soaprtl;IntrawebDB_90_100;Intraweb_90_100</DCC_UsePackage>
|
<DCC_UsePackage>vcl;rtl;vclx;vclactnband;dbrtl;vcldb;vcldbx;bdertl;dsnap;dsnapcon;teeUI;teedb;tee;adortl;vclib;ibxpress;dbxcds;dbexpress;DbxCommonDriver;IndyCore;IndySystem;IndyProtocols;VclSmp;vclie;webdsnap;xmlrtl;inet;inetdbbde;inetdbxpress;RemObjects_BPDX_D11;RemObjects_RODX_D11;RemObjects_Indy_D11;RemObjects_Synapse_D11;RemObjects_WebBroker_D11;DataAbstract_Core_D11;DataAbstract_DBXDriver_D11;DataAbstract_IDE_D11;DataAbstract_Scripting_D11;DataAbstract_SDACDriver_D11;sdac105;dac105;DataAbstract_SQLiteDriver_D11;cxEditorsD10;cxLibraryD10;dxThemeD10;cxDataD10;cxExtEditorsD10;cxGridD10;cxPageControlD10;cxSchedulerD10;cxTreeListD10;cxVerticalGridD10;dxBarD10;dxComnD10;dxBarDBNavD10;dxBarExtDBItemsD10;dxBarExtItemsD10;dxDockingD10;dxLayoutControlD10;dxNavBarD10;dxPSCoreD10;dxsbD10;dxPScxCommonD10;dxPSLnksD10;vclshlctrls;dxPScxExtCommonD10;dxPScxGridLnkD10;dxPScxPCProdD10;dxPScxScheduler2LnkD10;dxPScxTLLnkD10;dxPSdxLCLnkD10;dxPsPrVwAdvD10;pckMD5;pckUCDataConnector;pckUserControl_RT;PluginSDK_D10R;PNG_D10;PngComponentsD10;tb2k_d10;tbx_d10;JclVcl;Jcl;JvXPCtrlsD11R;JvCoreD11R;JvSystemD11R;JvStdCtrlsD11R;JvAppFrmD11R;JvBandsD11R;JvDBD11R;JvDlgsD11R;JvBDED11R;JvCmpD11R;JvCryptD11R;JvCtrlsD11R;JvCustomD11R;JvDockingD11R;JvDotNetCtrlsD11R;JvEDID11R;JvGlobusD11R;JvHMID11R;JvInterpreterD11R;JvJansD11R;JvManagedThreadsD11R;JvMMD11R;JvNetD11R;JvPageCompsD11R;JvPluginD11R;JvPrintPreviewD11R;JvRuntimeDesignD11R;JvTimeFrameworkD11R;JvUIBD11R;JvValidatorsD11R;JvWizardD11R;pckUCADOConn;pckUCBDEConn;pckUCIBXConn;pckUCMidasConn;cxIntlPrintSys3D10;cxExportD10;cxIntl5D10;GUISDK_D11R;ccpackD11;JSDialog100;fsTee11;fs11;frx11;frxADO11;frxBDE11;frxDB11;frxDBX11;frxe11;frxIBX11;frxTee11;fsADO11;fsBDE11;fsDB11;fsIBX11;websnap;soaprtl;IntrawebDB_90_100;Intraweb_90_100</DCC_UsePackage>
|
||||||
</PropertyGroup>
|
</PropertyGroup>
|
||||||
<PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Release|AnyCPU' ">
|
<PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Release|AnyCPU' ">
|
||||||
<Version>7.0</Version>
|
<Version>7.0</Version>
|
||||||
<DCC_DebugInformation>False</DCC_DebugInformation>
|
<DCC_DebugInformation>False</DCC_DebugInformation>
|
||||||
<DCC_LocalDebugSymbols>False</DCC_LocalDebugSymbols>
|
<DCC_LocalDebugSymbols>False</DCC_LocalDebugSymbols>
|
||||||
<DCC_SymbolReferenceInfo>0</DCC_SymbolReferenceInfo>
|
<DCC_SymbolReferenceInfo>0</DCC_SymbolReferenceInfo>
|
||||||
<DCC_MapFile>3</DCC_MapFile>
|
<DCC_MapFile>3</DCC_MapFile>
|
||||||
<DCC_ExeOutput>..\..\Output\Release\Servidor</DCC_ExeOutput>
|
<DCC_ExeOutput>..\..\Output\Release\Servidor</DCC_ExeOutput>
|
||||||
<DCC_Define>RELEASE</DCC_Define>
|
<DCC_Define>RELEASE</DCC_Define>
|
||||||
</PropertyGroup>
|
</PropertyGroup>
|
||||||
<PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Debug|AnyCPU' ">
|
<PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Debug|AnyCPU' ">
|
||||||
<Version>7.0</Version>
|
<Version>7.0</Version>
|
||||||
<DCC_MapFile>3</DCC_MapFile>
|
<DCC_MapFile>3</DCC_MapFile>
|
||||||
<DCC_ExeOutput>..\..\Output\Debug\Servidor</DCC_ExeOutput>
|
<DCC_ExeOutput>..\..\Output\Debug\Servidor</DCC_ExeOutput>
|
||||||
<DCC_Define>DEBUG;</DCC_Define>
|
<DCC_Define>DEBUG;</DCC_Define>
|
||||||
<DCC_GenerateStackFrames>True</DCC_GenerateStackFrames>
|
<DCC_GenerateStackFrames>True</DCC_GenerateStackFrames>
|
||||||
<DCC_DebugInfoInExe>True</DCC_DebugInfoInExe>
|
<DCC_DebugInfoInExe>True</DCC_DebugInfoInExe>
|
||||||
<DCC_DebugVN>True</DCC_DebugVN>
|
<DCC_DebugVN>True</DCC_DebugVN>
|
||||||
<DCC_UnitSearchPath>C:\jcl\lib\d11\debug;C:\JCL\lib\d11\debug;$(BDS)\lib\Debug;$(BDS)\Lib\Debug\Indy10</DCC_UnitSearchPath>
|
<DCC_UnitSearchPath>C:\jcl\lib\d11\debug;C:\JCL\lib\d11\debug;$(BDS)\lib\Debug;$(BDS)\Lib\Debug\Indy10</DCC_UnitSearchPath>
|
||||||
<DCC_ResourcePath>C:\jcl\lib\d11\debug;C:\JCL\lib\d11\debug;$(BDS)\lib\Debug;$(BDS)\Lib\Debug\Indy10</DCC_ResourcePath>
|
<DCC_ResourcePath>C:\jcl\lib\d11\debug;C:\JCL\lib\d11\debug;$(BDS)\lib\Debug;$(BDS)\Lib\Debug\Indy10</DCC_ResourcePath>
|
||||||
<DCC_ObjPath>C:\jcl\lib\d11\debug;C:\JCL\lib\d11\debug;$(BDS)\lib\Debug;$(BDS)\Lib\Debug\Indy10</DCC_ObjPath>
|
<DCC_ObjPath>C:\jcl\lib\d11\debug;C:\JCL\lib\d11\debug;$(BDS)\lib\Debug;$(BDS)\Lib\Debug\Indy10</DCC_ObjPath>
|
||||||
<DCC_IncludePath>C:\jcl\lib\d11\debug;C:\JCL\lib\d11\debug;$(BDS)\lib\Debug;$(BDS)\Lib\Debug\Indy10</DCC_IncludePath>
|
<DCC_IncludePath>C:\jcl\lib\d11\debug;C:\JCL\lib\d11\debug;$(BDS)\lib\Debug;$(BDS)\Lib\Debug\Indy10</DCC_IncludePath>
|
||||||
</PropertyGroup>
|
</PropertyGroup>
|
||||||
<ProjectExtensions>
|
<ProjectExtensions>
|
||||||
<Borland.Personality>Delphi.Personality</Borland.Personality>
|
<Borland.Personality>Delphi.Personality</Borland.Personality>
|
||||||
<Borland.ProjectType/>
|
<Borland.ProjectType />
|
||||||
<BorlandProject>
|
<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">1</VersionInfo><VersionInfo Name="MinorVer">9</VersionInfo><VersionInfo Name="Release">7</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">1.9.7.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">1.9.7.0</VersionInfoKeys><VersionInfoKeys Name="Comments"></VersionInfoKeys><VersionInfoKeys Name="CompileDate">lunes, 25 de febrero de 2013 12:25</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">1</VersionInfo><VersionInfo Name="MinorVer">9</VersionInfo><VersionInfo Name="Release">8</VersionInfo><VersionInfo Name="Build">0</VersionInfo><VersionInfo Name="Debug">False</VersionInfo><VersionInfo Name="PreRelease">False</VersionInfo><VersionInfo Name="Special">False</VersionInfo><VersionInfo Name="Private">False</VersionInfo><VersionInfo Name="DLL">False</VersionInfo><VersionInfo Name="Locale">3082</VersionInfo><VersionInfo Name="CodePage">1252</VersionInfo></VersionInfo><VersionInfoKeys><VersionInfoKeys Name="CompanyName"></VersionInfoKeys><VersionInfoKeys Name="FileDescription"></VersionInfoKeys><VersionInfoKeys Name="FileVersion">1.9.8.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">1.9.8.0</VersionInfoKeys><VersionInfoKeys Name="Comments"></VersionInfoKeys><VersionInfoKeys Name="CompileDate">viernes, 01 de marzo de 2013 12:41</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></BorlandProject></BorlandProject>
|
|
||||||
</ProjectExtensions>
|
|
||||||
<Import Project="$(MSBuildBinPath)\Borland.Delphi.Targets"/>
|
|
||||||
<ItemGroup>
|
|
||||||
<DelphiCompile Include="FactuGES_Server.dpr">
|
<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>
|
||||||
<MainSource>MainSource</MainSource>
|
</Excluded_Packages><Source><Source Name="MainSource">FactuGES_Server.dpr</Source></Source></Delphi.Personality></BorlandProject></BorlandProject>
|
||||||
</DelphiCompile>
|
</ProjectExtensions>
|
||||||
<DCCReference Include="..\ApplicationBase\Empresas\Model\schEmpresasClient_Intf.pas"/>
|
<Import Project="$(MSBuildBinPath)\Borland.Delphi.Targets" />
|
||||||
<DCCReference Include="..\ApplicationBase\Empresas\Model\schEmpresasServer_Intf.pas"/>
|
<ItemGroup>
|
||||||
<DCCReference Include="..\ApplicationBase\Empresas\Model\uBizEmpresasServer.pas"/>
|
<DelphiCompile Include="FactuGES_Server.dpr">
|
||||||
<DCCReference Include="..\ApplicationBase\Empresas\Servidor\srvEmpresas_Impl.pas">
|
<MainSource>MainSource</MainSource>
|
||||||
<Form>srvEmpresas</Form>
|
</DelphiCompile>
|
||||||
<DesignClass>TDARemoteService</DesignClass>
|
<DCCReference Include="..\ApplicationBase\Empresas\Model\schEmpresasClient_Intf.pas" />
|
||||||
</DCCReference>
|
<DCCReference Include="..\ApplicationBase\Empresas\Model\schEmpresasServer_Intf.pas" />
|
||||||
<DCCReference Include="..\ApplicationBase\ProvinciasPoblaciones\Servidor\srvProvinciasPoblaciones_Impl.pas">
|
<DCCReference Include="..\ApplicationBase\Empresas\Model\uBizEmpresasServer.pas" />
|
||||||
<Form>srvProvinciasPoblaciones_Impl</Form>
|
<DCCReference Include="..\ApplicationBase\Empresas\Servidor\srvEmpresas_Impl.pas">
|
||||||
<DesignClass>TDataModule</DesignClass>
|
<Form>srvEmpresas</Form>
|
||||||
</DCCReference>
|
<DesignClass>TDARemoteService</DesignClass>
|
||||||
<DCCReference Include="..\ApplicationBase\Usuarios\Model\schUsuariosClient_Intf.pas"/>
|
</DCCReference>
|
||||||
<DCCReference Include="..\ApplicationBase\Usuarios\Model\schUsuariosServer_Intf.pas"/>
|
<DCCReference Include="..\ApplicationBase\ProvinciasPoblaciones\Servidor\srvProvinciasPoblaciones_Impl.pas">
|
||||||
<DCCReference Include="..\ApplicationBase\Usuarios\Servidor\srvUsuarios_Impl.pas">
|
<Form>srvProvinciasPoblaciones_Impl</Form>
|
||||||
<Form>srvUsuarios</Form>
|
<DesignClass>TDataModule</DesignClass>
|
||||||
<DesignClass>TDataAbstractService</DesignClass>
|
</DCCReference>
|
||||||
</DCCReference>
|
<DCCReference Include="..\ApplicationBase\Usuarios\Model\schUsuariosClient_Intf.pas" />
|
||||||
<DCCReference Include="..\Base\schBase_Intf.pas"/>
|
<DCCReference Include="..\ApplicationBase\Usuarios\Model\schUsuariosServer_Intf.pas" />
|
||||||
<DCCReference Include="..\Base\Utiles\uSistemaFunc.pas"/>
|
<DCCReference Include="..\ApplicationBase\Usuarios\Servidor\srvUsuarios_Impl.pas">
|
||||||
<DCCReference Include="..\Base\Utiles\uStringsUtils.pas"/>
|
<Form>srvUsuarios</Form>
|
||||||
<DCCReference Include="..\Modulos\Albaranes de cliente\Model\schAlbaranesClienteClient_Intf.pas"/>
|
<DesignClass>TDataAbstractService</DesignClass>
|
||||||
<DCCReference Include="..\Modulos\Albaranes de cliente\Model\schAlbaranesClienteServer_Intf.pas"/>
|
</DCCReference>
|
||||||
<DCCReference Include="..\Modulos\Albaranes de cliente\Model\uBizAlbaranClienteServer.pas"/>
|
<DCCReference Include="..\Base\schBase_Intf.pas" />
|
||||||
<DCCReference Include="..\Modulos\Albaranes de cliente\Reports\uRptAlbaranesCliente_Server.pas">
|
<DCCReference Include="..\Base\Utiles\uSistemaFunc.pas" />
|
||||||
<Form>RptAlbaranesCliente</Form>
|
<DCCReference Include="..\Base\Utiles\uStringsUtils.pas" />
|
||||||
<DesignClass>TDataModule</DesignClass>
|
<DCCReference Include="..\Modulos\Albaranes de cliente\Model\schAlbaranesClienteClient_Intf.pas" />
|
||||||
</DCCReference>
|
<DCCReference Include="..\Modulos\Albaranes de cliente\Model\schAlbaranesClienteServer_Intf.pas" />
|
||||||
<DCCReference Include="..\Modulos\Albaranes de cliente\Reports\uRptWordAlbaranCliente.pas">
|
<DCCReference Include="..\Modulos\Albaranes de cliente\Model\uBizAlbaranClienteServer.pas" />
|
||||||
<Form>RptWordAlbaranCliente</Form>
|
<DCCReference Include="..\Modulos\Albaranes de cliente\Reports\uRptAlbaranesCliente_Server.pas">
|
||||||
<DesignClass>TDataModule</DesignClass>
|
<Form>RptAlbaranesCliente</Form>
|
||||||
</DCCReference>
|
<DesignClass>TDataModule</DesignClass>
|
||||||
<DCCReference Include="..\Modulos\Albaranes de cliente\Servidor\srvAlbaranesCliente_Impl.pas">
|
</DCCReference>
|
||||||
<Form>srvAlbaranesCliente</Form>
|
<DCCReference Include="..\Modulos\Albaranes de cliente\Reports\uRptWordAlbaranCliente.pas">
|
||||||
<DesignClass>TDataAbstractService</DesignClass>
|
<Form>RptWordAlbaranCliente</Form>
|
||||||
</DCCReference>
|
<DesignClass>TDataModule</DesignClass>
|
||||||
<DCCReference Include="..\Modulos\Albaranes de proveedor\Model\schAlbaranesProveedorClient_Intf.pas"/>
|
</DCCReference>
|
||||||
<DCCReference Include="..\Modulos\Albaranes de proveedor\Model\schAlbaranesProveedorServer_Intf.pas"/>
|
<DCCReference Include="..\Modulos\Albaranes de cliente\Servidor\srvAlbaranesCliente_Impl.pas">
|
||||||
<DCCReference Include="..\Modulos\Albaranes de proveedor\Model\uBizAlbaranProveedorServer.PAS"/>
|
<Form>srvAlbaranesCliente</Form>
|
||||||
<DCCReference Include="..\Modulos\Albaranes de proveedor\Reports\uRptAlbaranesProveedor_Server.pas">
|
<DesignClass>TDataAbstractService</DesignClass>
|
||||||
<Form>RptAlbaranesProveedor</Form>
|
</DCCReference>
|
||||||
<DesignClass>TDataModule</DesignClass>
|
<DCCReference Include="..\Modulos\Albaranes de proveedor\Model\schAlbaranesProveedorClient_Intf.pas" />
|
||||||
</DCCReference>
|
<DCCReference Include="..\Modulos\Albaranes de proveedor\Model\schAlbaranesProveedorServer_Intf.pas" />
|
||||||
<DCCReference Include="..\Modulos\Albaranes de proveedor\Reports\uRptWordAlbaranProveedor.pas">
|
<DCCReference Include="..\Modulos\Albaranes de proveedor\Model\uBizAlbaranProveedorServer.PAS" />
|
||||||
<Form>RptWordAlbaranProveedor</Form>
|
<DCCReference Include="..\Modulos\Albaranes de proveedor\Reports\uRptAlbaranesProveedor_Server.pas">
|
||||||
<DesignClass>TDataModule</DesignClass>
|
<Form>RptAlbaranesProveedor</Form>
|
||||||
</DCCReference>
|
<DesignClass>TDataModule</DesignClass>
|
||||||
<DCCReference Include="..\Modulos\Albaranes de proveedor\Servidor\srvAlbaranesProveedor_Impl.pas">
|
</DCCReference>
|
||||||
<Form>srvAlbaranesProveedor</Form>
|
<DCCReference Include="..\Modulos\Albaranes de proveedor\Reports\uRptWordAlbaranProveedor.pas">
|
||||||
<DesignClass>TDataAbstractService</DesignClass>
|
<Form>RptWordAlbaranProveedor</Form>
|
||||||
</DCCReference>
|
<DesignClass>TDataModule</DesignClass>
|
||||||
<DCCReference Include="..\Modulos\Almacenes\Model\schAlmacenesClient_Intf.pas"/>
|
</DCCReference>
|
||||||
<DCCReference Include="..\Modulos\Almacenes\Model\schAlmacenesServer_Intf.pas"/>
|
<DCCReference Include="..\Modulos\Albaranes de proveedor\Servidor\srvAlbaranesProveedor_Impl.pas">
|
||||||
<DCCReference Include="..\Modulos\Almacenes\Servidor\srvAlmacenes_Impl.pas">
|
<Form>srvAlbaranesProveedor</Form>
|
||||||
<Form>srvAlmacenes</Form>
|
<DesignClass>TDataAbstractService</DesignClass>
|
||||||
<DesignClass>TDARemoteService</DesignClass>
|
</DCCReference>
|
||||||
</DCCReference>
|
<DCCReference Include="..\Modulos\Almacenes\Model\schAlmacenesClient_Intf.pas" />
|
||||||
<DCCReference Include="..\Modulos\Articulos\Model\schArticulosClient_Intf.pas"/>
|
<DCCReference Include="..\Modulos\Almacenes\Model\schAlmacenesServer_Intf.pas" />
|
||||||
<DCCReference Include="..\Modulos\Articulos\Model\schArticulosServer_Intf.pas"/>
|
<DCCReference Include="..\Modulos\Almacenes\Servidor\srvAlmacenes_Impl.pas">
|
||||||
<DCCReference Include="..\Modulos\Articulos\Model\uBizArticulosServer.pas"/>
|
<Form>srvAlmacenes</Form>
|
||||||
<DCCReference Include="..\Modulos\Articulos\Servidor\srvArticulos_Impl.pas">
|
<DesignClass>TDARemoteService</DesignClass>
|
||||||
<Form>srvArticulos</Form>
|
</DCCReference>
|
||||||
<DesignClass>TDARemoteService</DesignClass>
|
<DCCReference Include="..\Modulos\Articulos\Model\schArticulosClient_Intf.pas" />
|
||||||
</DCCReference>
|
<DCCReference Include="..\Modulos\Articulos\Model\schArticulosServer_Intf.pas" />
|
||||||
<DCCReference Include="..\Modulos\Contactos\Model\schContactosClient_Intf.pas"/>
|
<DCCReference Include="..\Modulos\Articulos\Model\uBizArticulosServer.pas" />
|
||||||
<DCCReference Include="..\Modulos\Contactos\Model\schContactosServer_Intf.pas"/>
|
<DCCReference Include="..\Modulos\Articulos\Servidor\srvArticulos_Impl.pas">
|
||||||
<DCCReference Include="..\Modulos\Contactos\Model\uBizClientesServer.pas"/>
|
<Form>srvArticulos</Form>
|
||||||
<DCCReference Include="..\Modulos\Contactos\Model\uBizContactosServer.pas"/>
|
<DesignClass>TDARemoteService</DesignClass>
|
||||||
<DCCReference Include="..\Modulos\Contactos\Model\uBizEmpleadosServer.pas"/>
|
</DCCReference>
|
||||||
<DCCReference Include="..\Modulos\Contactos\Model\uBizProveedoresServer.pas"/>
|
<DCCReference Include="..\Modulos\Contactos\Model\schContactosClient_Intf.pas" />
|
||||||
<DCCReference Include="..\Modulos\Contactos\Reports\uRptEtiquetasContacto_Server.pas">
|
<DCCReference Include="..\Modulos\Contactos\Model\schContactosServer_Intf.pas" />
|
||||||
<Form>RptEtiquetasContacto</Form>
|
<DCCReference Include="..\Modulos\Contactos\Model\uBizClientesServer.pas" />
|
||||||
<DesignClass>TDataModule</DesignClass>
|
<DCCReference Include="..\Modulos\Contactos\Model\uBizContactosServer.pas" />
|
||||||
</DCCReference>
|
<DCCReference Include="..\Modulos\Contactos\Model\uBizEmpleadosServer.pas" />
|
||||||
<DCCReference Include="..\Modulos\Contactos\Reports\uRptFichasEmpleado_Server.pas">
|
<DCCReference Include="..\Modulos\Contactos\Model\uBizProveedoresServer.pas" />
|
||||||
<Form>RptFichasEmpleado</Form>
|
<DCCReference Include="..\Modulos\Contactos\Reports\uRptEtiquetasContacto_Server.pas">
|
||||||
<DesignClass>TDataModule</DesignClass>
|
<Form>RptEtiquetasContacto</Form>
|
||||||
</DCCReference>
|
<DesignClass>TDataModule</DesignClass>
|
||||||
<DCCReference Include="..\Modulos\Contactos\Servidor\srvContactos_Impl.pas">
|
</DCCReference>
|
||||||
<Form>srvContactos</Form>
|
<DCCReference Include="..\Modulos\Contactos\Reports\uRptFichasEmpleado_Server.pas">
|
||||||
<DesignClass>TDARemoteService</DesignClass>
|
<Form>RptFichasEmpleado</Form>
|
||||||
</DCCReference>
|
<DesignClass>TDataModule</DesignClass>
|
||||||
<DCCReference Include="..\Modulos\Fabricantes\Model\schFabricantesClient_Intf.pas"/>
|
</DCCReference>
|
||||||
<DCCReference Include="..\Modulos\Fabricantes\Model\schFabricantesServer_Intf.pas"/>
|
<DCCReference Include="..\Modulos\Contactos\Servidor\srvContactos_Impl.pas">
|
||||||
<DCCReference Include="..\Modulos\Fabricantes\Servidor\srvFabricantes_Impl.pas">
|
<Form>srvContactos</Form>
|
||||||
<Form>srvFabricantes</Form>
|
<DesignClass>TDARemoteService</DesignClass>
|
||||||
<DesignClass>TDataAbstractService</DesignClass>
|
</DCCReference>
|
||||||
</DCCReference>
|
<DCCReference Include="..\Modulos\Fabricantes\Model\schFabricantesClient_Intf.pas" />
|
||||||
<DCCReference Include="..\Modulos\Facturas de cliente\Model\schFacturasClienteClient_Intf.pas"/>
|
<DCCReference Include="..\Modulos\Fabricantes\Model\schFabricantesServer_Intf.pas" />
|
||||||
<DCCReference Include="..\Modulos\Facturas de cliente\Model\schFacturasClienteServer_Intf.pas"/>
|
<DCCReference Include="..\Modulos\Fabricantes\Servidor\srvFabricantes_Impl.pas">
|
||||||
<DCCReference Include="..\Modulos\Facturas de cliente\Model\uBizFacturasClienteServer.pas"/>
|
<Form>srvFabricantes</Form>
|
||||||
<DCCReference Include="..\Modulos\Facturas de cliente\Reports\uRptFacturasCliente_Server.pas">
|
<DesignClass>TDataAbstractService</DesignClass>
|
||||||
<Form>RptFacturasCliente</Form>
|
</DCCReference>
|
||||||
<DesignClass>TDataModule</DesignClass>
|
<DCCReference Include="..\Modulos\Facturas de cliente\Model\schFacturasClienteClient_Intf.pas" />
|
||||||
</DCCReference>
|
<DCCReference Include="..\Modulos\Facturas de cliente\Model\schFacturasClienteServer_Intf.pas" />
|
||||||
<DCCReference Include="..\Modulos\Facturas de cliente\Reports\uRptWordFacturaCliente.pas">
|
<DCCReference Include="..\Modulos\Facturas de cliente\Model\uBizFacturasClienteServer.pas" />
|
||||||
<Form>RptWordFacturaCliente</Form>
|
<DCCReference Include="..\Modulos\Facturas de cliente\Reports\uRptFacturasCliente_Server.pas">
|
||||||
<DesignClass>TDataModule</DesignClass>
|
<Form>RptFacturasCliente</Form>
|
||||||
</DCCReference>
|
<DesignClass>TDataModule</DesignClass>
|
||||||
<DCCReference Include="..\Modulos\Facturas de cliente\Servidor\srvFacturasCliente_Impl.pas">
|
</DCCReference>
|
||||||
<Form>srvFacturasCliente</Form>
|
<DCCReference Include="..\Modulos\Facturas de cliente\Reports\uRptWordFacturaCliente.pas">
|
||||||
<DesignClass>TDataAbstractService</DesignClass>
|
<Form>RptWordFacturaCliente</Form>
|
||||||
</DCCReference>
|
<DesignClass>TDataModule</DesignClass>
|
||||||
<DCCReference Include="..\Modulos\Facturas de proveedor\Model\schFacturasProveedorClient_Intf.pas"/>
|
</DCCReference>
|
||||||
<DCCReference Include="..\Modulos\Facturas de proveedor\Model\schFacturasProveedorServer_Intf.pas"/>
|
<DCCReference Include="..\Modulos\Facturas de cliente\Servidor\srvFacturasCliente_Impl.pas">
|
||||||
<DCCReference Include="..\Modulos\Facturas de proveedor\Model\uBizFacturasProveedorServer.pas"/>
|
<Form>srvFacturasCliente</Form>
|
||||||
<DCCReference Include="..\Modulos\Facturas de proveedor\Reports\uRptFacturasProveedor_Server.pas">
|
<DesignClass>TDataAbstractService</DesignClass>
|
||||||
<Form>RptFacturasProveedor</Form>
|
</DCCReference>
|
||||||
<DesignClass>TDataModule</DesignClass>
|
<DCCReference Include="..\Modulos\Facturas de proveedor\Model\schFacturasProveedorClient_Intf.pas" />
|
||||||
</DCCReference>
|
<DCCReference Include="..\Modulos\Facturas de proveedor\Model\schFacturasProveedorServer_Intf.pas" />
|
||||||
<DCCReference Include="..\Modulos\Facturas de proveedor\Servidor\srvFacturasProveedor_Impl.pas">
|
<DCCReference Include="..\Modulos\Facturas de proveedor\Model\uBizFacturasProveedorServer.pas" />
|
||||||
<Form>srvFacturasProveedor</Form>
|
<DCCReference Include="..\Modulos\Facturas de proveedor\Reports\uRptFacturasProveedor_Server.pas">
|
||||||
<DesignClass>TDataAbstractService</DesignClass>
|
<Form>RptFacturasProveedor</Form>
|
||||||
</DCCReference>
|
<DesignClass>TDataModule</DesignClass>
|
||||||
<DCCReference Include="..\Modulos\Familias\Model\schFamiliasClient_Intf.pas"/>
|
</DCCReference>
|
||||||
<DCCReference Include="..\Modulos\Familias\Model\schFamiliasServer_Intf.pas"/>
|
<DCCReference Include="..\Modulos\Facturas de proveedor\Servidor\srvFacturasProveedor_Impl.pas">
|
||||||
<DCCReference Include="..\Modulos\Familias\Servidor\srvFamilias_Impl.pas">
|
<Form>srvFacturasProveedor</Form>
|
||||||
<Form>srvFamilias</Form>
|
<DesignClass>TDataAbstractService</DesignClass>
|
||||||
<DesignClass>TDataAbstractService</DesignClass>
|
</DCCReference>
|
||||||
</DCCReference>
|
<DCCReference Include="..\Modulos\Familias\Model\schFamiliasClient_Intf.pas" />
|
||||||
<DCCReference Include="..\Modulos\Formas de pago\Model\schFormasPagoClient_Intf.pas"/>
|
<DCCReference Include="..\Modulos\Familias\Model\schFamiliasServer_Intf.pas" />
|
||||||
<DCCReference Include="..\Modulos\Formas de pago\Model\schFormasPagoServer_Intf.pas"/>
|
<DCCReference Include="..\Modulos\Familias\Servidor\srvFamilias_Impl.pas">
|
||||||
<DCCReference Include="..\Modulos\Formas de pago\Servidor\srvFormasPago_Impl.pas">
|
<Form>srvFamilias</Form>
|
||||||
<Form>srvFormasPago</Form>
|
<DesignClass>TDataAbstractService</DesignClass>
|
||||||
<DesignClass>TDataAbstractService</DesignClass>
|
</DCCReference>
|
||||||
</DCCReference>
|
<DCCReference Include="..\Modulos\Formas de pago\Model\schFormasPagoClient_Intf.pas" />
|
||||||
<DCCReference Include="..\Modulos\Gestion de documentos\Servidor\srvGestorDocumentos_Impl.pas">
|
<DCCReference Include="..\Modulos\Formas de pago\Model\schFormasPagoServer_Intf.pas" />
|
||||||
<Form>srvGestorDocumentos</Form>
|
<DCCReference Include="..\Modulos\Formas de pago\Servidor\srvFormasPago_Impl.pas">
|
||||||
<DesignClass>TDataAbstractService</DesignClass>
|
<Form>srvFormasPago</Form>
|
||||||
</DCCReference>
|
<DesignClass>TDataAbstractService</DesignClass>
|
||||||
<DCCReference Include="..\Modulos\Gestor de informes\Servidor\srvGestorInformes_Impl.pas">
|
</DCCReference>
|
||||||
<Form>srvGestorInformes</Form>
|
<DCCReference Include="..\Modulos\Gestion de documentos\Servidor\srvGestorDocumentos_Impl.pas">
|
||||||
<DesignClass>TDataAbstractService</DesignClass>
|
<Form>srvGestorDocumentos</Form>
|
||||||
</DCCReference>
|
<DesignClass>TDataAbstractService</DesignClass>
|
||||||
<DCCReference Include="..\Modulos\Historico de movimientos\Model\schHistoricoMovimientosClient_Intf.pas"/>
|
</DCCReference>
|
||||||
<DCCReference Include="..\Modulos\Historico de movimientos\Model\schHistoricoMovimientosServer_Intf.pas"/>
|
<DCCReference Include="..\Modulos\Gestor de informes\Servidor\srvGestorInformes_Impl.pas">
|
||||||
<DCCReference Include="..\Modulos\Historico de movimientos\Servidor\srvHistoricoMovimientos_Impl.pas">
|
<Form>srvGestorInformes</Form>
|
||||||
<Form>srvHistoricoMovimientos</Form>
|
<DesignClass>TDataAbstractService</DesignClass>
|
||||||
<DesignClass>TDataAbstractService</DesignClass>
|
</DCCReference>
|
||||||
</DCCReference>
|
<DCCReference Include="..\Modulos\Historico de movimientos\Model\schHistoricoMovimientosClient_Intf.pas" />
|
||||||
<DCCReference Include="..\Modulos\Inventario\Model\schInventarioClient_Intf.pas"/>
|
<DCCReference Include="..\Modulos\Historico de movimientos\Model\schHistoricoMovimientosServer_Intf.pas" />
|
||||||
<DCCReference Include="..\Modulos\Inventario\Model\schInventarioServer_Intf.pas"/>
|
<DCCReference Include="..\Modulos\Historico de movimientos\Servidor\srvHistoricoMovimientos_Impl.pas">
|
||||||
<DCCReference Include="..\Modulos\Inventario\Servidor\srvInventario_Impl.pas">
|
<Form>srvHistoricoMovimientos</Form>
|
||||||
<Form>srvInventario</Form>
|
<DesignClass>TDataAbstractService</DesignClass>
|
||||||
<DesignClass>TDataAbstractService</DesignClass>
|
</DCCReference>
|
||||||
</DCCReference>
|
<DCCReference Include="..\Modulos\Inventario\Model\schInventarioClient_Intf.pas" />
|
||||||
<DCCReference Include="..\Modulos\Obras\Model\schObrasClient_Intf.pas"/>
|
<DCCReference Include="..\Modulos\Inventario\Model\schInventarioServer_Intf.pas" />
|
||||||
<DCCReference Include="..\Modulos\Obras\Model\schObrasServer_Intf.pas"/>
|
<DCCReference Include="..\Modulos\Inventario\Servidor\srvInventario_Impl.pas">
|
||||||
<DCCReference Include="..\Modulos\Obras\Model\uBizObrasServer.pas"/>
|
<Form>srvInventario</Form>
|
||||||
<DCCReference Include="..\Modulos\Obras\Servidor\srvObras_Impl.pas">
|
<DesignClass>TDataAbstractService</DesignClass>
|
||||||
<Form>srvObras</Form>
|
</DCCReference>
|
||||||
<DesignClass>TDataAbstractService</DesignClass>
|
<DCCReference Include="..\Modulos\Obras\Model\schObrasClient_Intf.pas" />
|
||||||
</DCCReference>
|
<DCCReference Include="..\Modulos\Obras\Model\schObrasServer_Intf.pas" />
|
||||||
<DCCReference Include="..\Modulos\Pedidos a proveedor\Model\schPedidosProveedorClient_Intf.pas"/>
|
<DCCReference Include="..\Modulos\Obras\Model\uBizObrasServer.pas" />
|
||||||
<DCCReference Include="..\Modulos\Pedidos a proveedor\Model\schPedidosProveedorServer_Intf.pas"/>
|
<DCCReference Include="..\Modulos\Obras\Servidor\srvObras_Impl.pas">
|
||||||
<DCCReference Include="..\Modulos\Pedidos a proveedor\Model\uBizPedidosProveedorServer.pas"/>
|
<Form>srvObras</Form>
|
||||||
<DCCReference Include="..\Modulos\Pedidos a proveedor\Reports\uRptPedidosProveedor_Server.pas">
|
<DesignClass>TDataAbstractService</DesignClass>
|
||||||
<Form>RptPedidosProveedor</Form>
|
</DCCReference>
|
||||||
<DesignClass>TDataModule</DesignClass>
|
<DCCReference Include="..\Modulos\Pedidos a proveedor\Model\schPedidosProveedorClient_Intf.pas" />
|
||||||
</DCCReference>
|
<DCCReference Include="..\Modulos\Pedidos a proveedor\Model\schPedidosProveedorServer_Intf.pas" />
|
||||||
<DCCReference Include="..\Modulos\Pedidos a proveedor\Reports\uRptWordPedidoProveedor.pas">
|
<DCCReference Include="..\Modulos\Pedidos a proveedor\Model\uBizPedidosProveedorServer.pas" />
|
||||||
<Form>RptWordPedidoProveedor</Form>
|
<DCCReference Include="..\Modulos\Pedidos a proveedor\Reports\uRptPedidosProveedor_Server.pas">
|
||||||
<DesignClass>TDataModule</DesignClass>
|
<Form>RptPedidosProveedor</Form>
|
||||||
</DCCReference>
|
<DesignClass>TDataModule</DesignClass>
|
||||||
<DCCReference Include="..\Modulos\Pedidos a proveedor\Servidor\srvPedidosProveedor_Impl.pas">
|
</DCCReference>
|
||||||
<Form>srvPedidosProveedor</Form>
|
<DCCReference Include="..\Modulos\Pedidos a proveedor\Reports\uRptWordPedidoProveedor.pas">
|
||||||
<DesignClass>TDataAbstractService</DesignClass>
|
<Form>RptWordPedidoProveedor</Form>
|
||||||
</DCCReference>
|
<DesignClass>TDataModule</DesignClass>
|
||||||
<DCCReference Include="..\Modulos\Presupuestos de cliente\Model\schPresupuestosClienteClient_Intf.pas"/>
|
</DCCReference>
|
||||||
<DCCReference Include="..\Modulos\Presupuestos de cliente\Model\schPresupuestosClienteServer_Intf.pas"/>
|
<DCCReference Include="..\Modulos\Pedidos a proveedor\Servidor\srvPedidosProveedor_Impl.pas">
|
||||||
<DCCReference Include="..\Modulos\Presupuestos de cliente\Model\uBizPresupuestosClienteServer.pas"/>
|
<Form>srvPedidosProveedor</Form>
|
||||||
<DCCReference Include="..\Modulos\Presupuestos de cliente\Reports\uRptPresupuestosCliente_Server.pas">
|
<DesignClass>TDataAbstractService</DesignClass>
|
||||||
<Form>RptPresupuestosCliente</Form>
|
</DCCReference>
|
||||||
<DesignClass>TDataModule</DesignClass>
|
<DCCReference Include="..\Modulos\Presupuestos de cliente\Model\schPresupuestosClienteClient_Intf.pas" />
|
||||||
</DCCReference>
|
<DCCReference Include="..\Modulos\Presupuestos de cliente\Model\schPresupuestosClienteServer_Intf.pas" />
|
||||||
<DCCReference Include="..\Modulos\Presupuestos de cliente\Reports\uRptWordCertificadoTrabajo_Server.pas">
|
<DCCReference Include="..\Modulos\Presupuestos de cliente\Model\uBizPresupuestosClienteServer.pas" />
|
||||||
<Form>RptWordCertificadoTrabajo</Form>
|
<DCCReference Include="..\Modulos\Presupuestos de cliente\Reports\uRptPresupuestosCliente_Server.pas">
|
||||||
<DesignClass>TDataModule</DesignClass>
|
<Form>RptPresupuestosCliente</Form>
|
||||||
</DCCReference>
|
<DesignClass>TDataModule</DesignClass>
|
||||||
<DCCReference Include="..\Modulos\Presupuestos de cliente\Reports\uRptWordPresupuestoCliente.pas">
|
</DCCReference>
|
||||||
<Form>RptWordPresupuestoCliente</Form>
|
<DCCReference Include="..\Modulos\Presupuestos de cliente\Reports\uRptWordCertificadoTrabajo_Server.pas">
|
||||||
<DesignClass>TDataModule</DesignClass>
|
<Form>RptWordCertificadoTrabajo</Form>
|
||||||
</DCCReference>
|
<DesignClass>TDataModule</DesignClass>
|
||||||
<DCCReference Include="..\Modulos\Presupuestos de cliente\Servidor\srvPresupuestosCliente_Impl.pas">
|
</DCCReference>
|
||||||
<Form>srvPresupuestosCliente</Form>
|
<DCCReference Include="..\Modulos\Presupuestos de cliente\Reports\uRptWordPresupuestoCliente.pas">
|
||||||
<DesignClass>TDataAbstractService</DesignClass>
|
<Form>RptWordPresupuestoCliente</Form>
|
||||||
</DCCReference>
|
<DesignClass>TDataModule</DesignClass>
|
||||||
<DCCReference Include="..\Modulos\Recibos de cliente\Model\schRecibosClienteClient_Intf.pas"/>
|
</DCCReference>
|
||||||
<DCCReference Include="..\Modulos\Recibos de cliente\Model\schRecibosClienteServer_Intf.pas"/>
|
<DCCReference Include="..\Modulos\Presupuestos de cliente\Servidor\srvPresupuestosCliente_Impl.pas">
|
||||||
<DCCReference Include="..\Modulos\Recibos de cliente\Reports\uRptRecibosCliente_Server.pas">
|
<Form>srvPresupuestosCliente</Form>
|
||||||
<Form>RptRecibosCliente</Form>
|
<DesignClass>TDataAbstractService</DesignClass>
|
||||||
<DesignClass>TDataModule</DesignClass>
|
</DCCReference>
|
||||||
</DCCReference>
|
<DCCReference Include="..\Modulos\Recibos de cliente\Model\schRecibosClienteClient_Intf.pas" />
|
||||||
<DCCReference Include="..\Modulos\Recibos de cliente\Servidor\srvRecibosCliente_Impl.pas">
|
<DCCReference Include="..\Modulos\Recibos de cliente\Model\schRecibosClienteServer_Intf.pas" />
|
||||||
<Form>srvRecibosCliente</Form>
|
<DCCReference Include="..\Modulos\Recibos de cliente\Reports\uRptRecibosCliente_Server.pas">
|
||||||
<DesignClass>TDataAbstractService</DesignClass>
|
<Form>RptRecibosCliente</Form>
|
||||||
</DCCReference>
|
<DesignClass>TDataModule</DesignClass>
|
||||||
<DCCReference Include="..\Modulos\Recibos de proveedor\Model\schRecibosProveedorClient_Intf.pas"/>
|
</DCCReference>
|
||||||
<DCCReference Include="..\Modulos\Recibos de proveedor\Model\schRecibosProveedorServer_Intf.pas"/>
|
<DCCReference Include="..\Modulos\Recibos de cliente\Servidor\srvRecibosCliente_Impl.pas">
|
||||||
<DCCReference Include="..\Modulos\Recibos de proveedor\Reports\uRptRecibosProveedor_Server.pas">
|
<Form>srvRecibosCliente</Form>
|
||||||
<Form>RptRecibosProveedor</Form>
|
<DesignClass>TDataAbstractService</DesignClass>
|
||||||
<DesignClass>TDataModule</DesignClass>
|
</DCCReference>
|
||||||
</DCCReference>
|
<DCCReference Include="..\Modulos\Recibos de proveedor\Model\schRecibosProveedorClient_Intf.pas" />
|
||||||
<DCCReference Include="..\Modulos\Recibos de proveedor\Servidor\srvRecibosProveedor_Impl.pas">
|
<DCCReference Include="..\Modulos\Recibos de proveedor\Model\schRecibosProveedorServer_Intf.pas" />
|
||||||
<Form>srvRecibosProveedor</Form>
|
<DCCReference Include="..\Modulos\Recibos de proveedor\Reports\uRptRecibosProveedor_Server.pas">
|
||||||
<DesignClass>TDataAbstractService</DesignClass>
|
<Form>RptRecibosProveedor</Form>
|
||||||
</DCCReference>
|
<DesignClass>TDataModule</DesignClass>
|
||||||
<DCCReference Include="..\Modulos\Referencias\Model\schReferenciasClient_Intf.pas"/>
|
</DCCReference>
|
||||||
<DCCReference Include="..\Modulos\Referencias\Model\schReferenciasServer_Intf.pas"/>
|
<DCCReference Include="..\Modulos\Recibos de proveedor\Servidor\srvRecibosProveedor_Impl.pas">
|
||||||
<DCCReference Include="..\Modulos\Referencias\Servidor\srvReferencias_Impl.pas">
|
<Form>srvRecibosProveedor</Form>
|
||||||
<Form>srvReferencias</Form>
|
<DesignClass>TDataAbstractService</DesignClass>
|
||||||
<DesignClass>TDataAbstractService</DesignClass>
|
</DCCReference>
|
||||||
</DCCReference>
|
<DCCReference Include="..\Modulos\Referencias\Model\schReferenciasClient_Intf.pas" />
|
||||||
<DCCReference Include="..\Modulos\Remesas de cliente\Model\schRemesasClienteClient_Intf.pas"/>
|
<DCCReference Include="..\Modulos\Referencias\Model\schReferenciasServer_Intf.pas" />
|
||||||
<DCCReference Include="..\Modulos\Remesas de cliente\Model\schRemesasClienteServer_Intf.pas"/>
|
<DCCReference Include="..\Modulos\Referencias\Servidor\srvReferencias_Impl.pas">
|
||||||
<DCCReference Include="..\Modulos\Remesas de cliente\Model\uBizRemesasClienteServer.pas"/>
|
<Form>srvReferencias</Form>
|
||||||
<DCCReference Include="..\Modulos\Remesas de cliente\Servidor\srvRemesasCliente_Impl.pas">
|
<DesignClass>TDataAbstractService</DesignClass>
|
||||||
<Form>srvRemesasCliente</Form>
|
</DCCReference>
|
||||||
<DesignClass>TDataAbstractService</DesignClass>
|
<DCCReference Include="..\Modulos\Remesas de cliente\Model\schRemesasClienteClient_Intf.pas" />
|
||||||
</DCCReference>
|
<DCCReference Include="..\Modulos\Remesas de cliente\Model\schRemesasClienteServer_Intf.pas" />
|
||||||
<DCCReference Include="..\Modulos\Remesas de proveedor\Model\schRemesasProveedorClient_Intf.pas"/>
|
<DCCReference Include="..\Modulos\Remesas de cliente\Model\uBizRemesasClienteServer.pas" />
|
||||||
<DCCReference Include="..\Modulos\Remesas de proveedor\Model\schRemesasProveedorServer_Intf.pas"/>
|
<DCCReference Include="..\Modulos\Remesas de cliente\Servidor\srvRemesasCliente_Impl.pas">
|
||||||
<DCCReference Include="..\Modulos\Remesas de proveedor\Model\uBizRemesasProveedorServer.pas"/>
|
<Form>srvRemesasCliente</Form>
|
||||||
<DCCReference Include="..\Modulos\Remesas de proveedor\Servidor\srvRemesasProveedor_Impl.pas">
|
<DesignClass>TDataAbstractService</DesignClass>
|
||||||
<Form>srvRemesasProveedor</Form>
|
</DCCReference>
|
||||||
<DesignClass>TDataAbstractService</DesignClass>
|
<DCCReference Include="..\Modulos\Remesas de proveedor\Model\schRemesasProveedorClient_Intf.pas" />
|
||||||
</DCCReference>
|
<DCCReference Include="..\Modulos\Remesas de proveedor\Model\schRemesasProveedorServer_Intf.pas" />
|
||||||
<DCCReference Include="..\Modulos\Tipos de IVA\Model\schTiposIVAClient_Intf.pas"/>
|
<DCCReference Include="..\Modulos\Remesas de proveedor\Model\uBizRemesasProveedorServer.pas" />
|
||||||
<DCCReference Include="..\Modulos\Tipos de IVA\Model\schTiposIVAServer_Intf.pas"/>
|
<DCCReference Include="..\Modulos\Remesas de proveedor\Servidor\srvRemesasProveedor_Impl.pas">
|
||||||
<DCCReference Include="..\Modulos\Tipos de IVA\Servidor\srvTiposIVA_Impl.pas">
|
<Form>srvRemesasProveedor</Form>
|
||||||
<Form>srvTiposIVA</Form>
|
<DesignClass>TDataAbstractService</DesignClass>
|
||||||
<DesignClass>TDataAbstractService</DesignClass>
|
</DCCReference>
|
||||||
</DCCReference>
|
<DCCReference Include="..\Modulos\Tipos de IVA\Model\schTiposIVAClient_Intf.pas" />
|
||||||
<DCCReference Include="..\Modulos\Unidades de medida\Model\schUnidadesMedidaClient_Intf.pas"/>
|
<DCCReference Include="..\Modulos\Tipos de IVA\Model\schTiposIVAServer_Intf.pas" />
|
||||||
<DCCReference Include="..\Modulos\Unidades de medida\Model\schUnidadesMedidaServer_Intf.pas"/>
|
<DCCReference Include="..\Modulos\Tipos de IVA\Servidor\srvTiposIVA_Impl.pas">
|
||||||
<DCCReference Include="..\Modulos\Unidades de medida\Servidor\srvUnidadesMedida_Impl.pas">
|
<Form>srvTiposIVA</Form>
|
||||||
<Form>srvUnidadesMedida</Form>
|
<DesignClass>TDataAbstractService</DesignClass>
|
||||||
<DesignClass>TDataAbstractService</DesignClass>
|
</DCCReference>
|
||||||
</DCCReference>
|
<DCCReference Include="..\Modulos\Unidades de medida\Model\schUnidadesMedidaClient_Intf.pas" />
|
||||||
<DCCReference Include="..\Servicios\FactuGES_Intf.pas"/>
|
<DCCReference Include="..\Modulos\Unidades de medida\Model\schUnidadesMedidaServer_Intf.pas" />
|
||||||
<DCCReference Include="..\Servicios\FactuGES_Invk.pas"/>
|
<DCCReference Include="..\Modulos\Unidades de medida\Servidor\srvUnidadesMedida_Impl.pas">
|
||||||
<DCCReference Include="Configuracion\srvConfiguracion_Impl.pas">
|
<Form>srvUnidadesMedida</Form>
|
||||||
<Form>srvConfiguracion</Form>
|
<DesignClass>TDataAbstractService</DesignClass>
|
||||||
<DesignClass>TDataAbstractService</DesignClass>
|
</DCCReference>
|
||||||
</DCCReference>
|
<DCCReference Include="..\Servicios\FactuGES_Intf.pas" />
|
||||||
<DCCReference Include="Configuracion\uConexionBD.pas">
|
<DCCReference Include="..\Servicios\FactuGES_Invk.pas" />
|
||||||
<Form>frConexionBD</Form>
|
<DCCReference Include="Configuracion\srvConfiguracion_Impl.pas">
|
||||||
<DesignClass>TFrame</DesignClass>
|
<Form>srvConfiguracion</Form>
|
||||||
</DCCReference>
|
<DesignClass>TDataAbstractService</DesignClass>
|
||||||
<DCCReference Include="Configuracion\uConfGeneral.pas">
|
</DCCReference>
|
||||||
<Form>frConfGeneral</Form>
|
<DCCReference Include="Configuracion\uConexionBD.pas">
|
||||||
<DesignClass>TFrame</DesignClass>
|
<Form>frConexionBD</Form>
|
||||||
</DCCReference>
|
<DesignClass>TFrame</DesignClass>
|
||||||
<DCCReference Include="Configuracion\uConfiguracion.pas">
|
</DCCReference>
|
||||||
<Form>fConfiguracion</Form>
|
<DCCReference Include="Configuracion\uConfGeneral.pas">
|
||||||
<DesignClass>TForm</DesignClass>
|
<Form>frConfGeneral</Form>
|
||||||
</DCCReference>
|
<DesignClass>TFrame</DesignClass>
|
||||||
<DCCReference Include="Configuracion\uFrameConfiguracion.pas">
|
</DCCReference>
|
||||||
<Form>FrameConfiguracion</Form>
|
<DCCReference Include="Configuracion\uConfiguracion.pas">
|
||||||
<DesignClass>TFrame</DesignClass>
|
<Form>fConfiguracion</Form>
|
||||||
</DCCReference>
|
<DesignClass>TForm</DesignClass>
|
||||||
<DCCReference Include="srvLogin_Impl.pas">
|
</DCCReference>
|
||||||
<Form>srvLogin</Form>
|
<DCCReference Include="Configuracion\uFrameConfiguracion.pas">
|
||||||
<DesignClass>TDARemoteService</DesignClass>
|
<Form>FrameConfiguracion</Form>
|
||||||
</DCCReference>
|
<DesignClass>TFrame</DesignClass>
|
||||||
<DCCReference Include="uAcercaDe.pas">
|
</DCCReference>
|
||||||
<Form>fAcercaDe</Form>
|
<DCCReference Include="srvLogin_Impl.pas">
|
||||||
</DCCReference>
|
<Form>srvLogin</Form>
|
||||||
<DCCReference Include="uDataModuleServer.pas">
|
<DesignClass>TDARemoteService</DesignClass>
|
||||||
<Form>dmServer</Form>
|
</DCCReference>
|
||||||
<DesignClass>TDataModule</DesignClass>
|
<DCCReference Include="uAcercaDe.pas">
|
||||||
</DCCReference>
|
<Form>fAcercaDe</Form>
|
||||||
<DCCReference Include="uServerMainForm.pas">
|
</DCCReference>
|
||||||
<Form>fServerForm</Form>
|
<DCCReference Include="uDataModuleServer.pas">
|
||||||
</DCCReference>
|
<Form>dmServer</Form>
|
||||||
<DCCReference Include="Utiles\AHWord97.pas"/>
|
<DesignClass>TDataModule</DesignClass>
|
||||||
<DCCReference Include="Utiles\MidasSpeedFix.pas"/>
|
</DCCReference>
|
||||||
<DCCReference Include="Utiles\RegExpr.pas"/>
|
<DCCReference Include="uServerMainForm.pas">
|
||||||
<DCCReference Include="Utiles\uBusinessUtils.pas"/>
|
<Form>fServerForm</Form>
|
||||||
<DCCReference Include="Utiles\uDatabaseUtils.pas"/>
|
</DCCReference>
|
||||||
<DCCReference Include="Utiles\uReferenciasUtils.pas"/>
|
<DCCReference Include="Utiles\AHWord97.pas" />
|
||||||
<DCCReference Include="Utiles\uRestriccionesUsuarioUtils.pas"/>
|
<DCCReference Include="Utiles\MidasSpeedFix.pas" />
|
||||||
<DCCReference Include="Utiles\uSchemaUtilsServer.pas"/>
|
<DCCReference Include="Utiles\RegExpr.pas" />
|
||||||
<DCCReference Include="Utiles\uServerAppUtils.pas"/>
|
<DCCReference Include="Utiles\uBusinessUtils.pas" />
|
||||||
<DCCReference Include="Utiles\uSesionesUtils.pas"/>
|
<DCCReference Include="Utiles\uDatabaseUtils.pas" />
|
||||||
</ItemGroup>
|
<DCCReference Include="Utiles\uReferenciasUtils.pas" />
|
||||||
|
<DCCReference Include="Utiles\uRestriccionesUsuarioUtils.pas" />
|
||||||
|
<DCCReference Include="Utiles\uSchemaUtilsServer.pas" />
|
||||||
|
<DCCReference Include="Utiles\uServerAppUtils.pas" />
|
||||||
|
<DCCReference Include="Utiles\uSesionesUtils.pas" />
|
||||||
|
</ItemGroup>
|
||||||
</Project>
|
</Project>
|
||||||
<!-- EurekaLog First Line
|
<!-- EurekaLog First Line
|
||||||
[Exception Log]
|
[Exception Log]
|
||||||
|
|||||||
@ -14,7 +14,7 @@ BEGIN
|
|||||||
BEGIN
|
BEGIN
|
||||||
VALUE "FileVersion", "1.9.7.0\0"
|
VALUE "FileVersion", "1.9.7.0\0"
|
||||||
VALUE "ProductVersion", "1.9.7.0\0"
|
VALUE "ProductVersion", "1.9.7.0\0"
|
||||||
VALUE "CompileDate", "miércoles, 27 de febrero de 2013 13:41\0"
|
VALUE "CompileDate", "viernes, 01 de marzo de 2013 12:41\0"
|
||||||
END
|
END
|
||||||
END
|
END
|
||||||
BLOCK "VarFileInfo"
|
BLOCK "VarFileInfo"
|
||||||
|
|||||||
Loading…
Reference in New Issue
Block a user