roberto
f6a83992cc
git-svn-id: https://192.168.0.254/svn/Proyectos.EstudioCarnicero_ProGestion/trunk@18 1b8572a8-2d6b-b84e-8c90-20ed86fa4eca
56 lines
15 KiB
XML
56 lines
15 KiB
XML
<?xml version="1.0" encoding="utf-8"?>
|
||
<TfrxReport Version="3.23.7" DotMatrixReport="False" EngineOptions.DoublePass="True" IniFile="\Software\Fast Reports" PreviewOptions.Buttons="2047" PreviewOptions.OutlineWidth="180" PreviewOptions.Zoom="1" PrintOptions.Printer="Default" ReportOptions.CreateDate="37871,9953986921" ReportOptions.Description.Text="Demonstrates how to create simple list report." ReportOptions.LastChange="42039,4643316319" ReportOptions.VersionBuild="1" ReportOptions.VersionMajor="12" ReportOptions.VersionMinor="13" ReportOptions.VersionRelease="1" ScriptLanguage="PascalScript" ScriptText.Text="procedure DatosClienteOnBeforePrint(Sender: TfrxComponent); begin DatosCliente.Lines.Clear; DatosCliente.Lines.Add(<frxDBCabecera."CALLE">); if (<frxDBCabecera."CODIGOPOSTAL"> <> '') or (<frxDBCabecera."POBLACION"> <> '') then DatosCliente.Lines.Add(<frxDBCabecera."CODIGOPOSTAL"> + <frxDBCabecera."POBLACION">); end; procedure BandaDetallesOnBeforePrint(Sender: TfrxComponent); begin case <frxDBDetalles."TIPO"> of 'C': begin MemoCampo12.Style := 'Concepto normal'; MemoCampo4.Style := 'Concepto normal'; end; 'S': begin MemoCampo12.Style := 'Concepto subtotal'; MemoCampo4.Style := 'Concepto subtotal'; end; 'T': begin MemoCampo12.Style := 'Concepto titulo'; MemoCampo4.Style := 'Concepto titulo'; end; end; end; procedure ReportSummary1OnBeforePrint(Sender: TfrxComponent); begin Engine.CurY := Engine.CurY + Engine.FreeSpace - ReportSummary1.Height - 1; end; procedure mTextoOnBeforePrint(Sender: TfrxComponent); begin mTexto.Lines.Clear; if (<frxDBCabecera."CLASEFACTURA"> = 'N') then mTexto.Lines.Add('FACTURA'); if (<frxDBCabecera."CLASEFACTURA"> = 'A') then mTexto.Lines.Add('ABONO'); if (<frxDBCabecera."CLASEFACTURA"> = 'P') then mTexto.Lines.Add('PROFORMA'); end; begin end." StoreInDFM="False" PropData="044C656674022803546F7003800008446174617365747301010C3400000020446174615365743D22667278444243616265636572612220446174615365744E616D653D22667278444243616265636572612200010C3400000020446174615365743D226672784442446574616C6C65732220446174615365744E616D653D226672784442446574616C6C6573220000095661726961626C65730100055374796C6501010C85000000204E616D653D22436F6E636570746F206E6F726D616C2220436F6C6F723D223533363837303931312220466F6E742E436861727365743D22302220466F6E742E436F6C6F723D222D31363737373230382220466F6E742E4865696768743D222D31332220466F6E742E4E616D653D225461686F6D612220466F6E742E5374796C653D22302200010C86000000204E616D653D22436F6E636570746F20737562746F74616C2220436F6C6F723D2231353739303332302220466F6E742E436861727365743D22302220466F6E742E436F6C6F723D222D31363737373230382220466F6E742E4865696768743D222D31332220466F6E742E4E616D653D225461686F6D612220466F6E742E5374796C653D22312200010C97000000204E616D653D22436162656365726120646520636F6C756D6E612220436F6C6F723D2231353739303332302220466F6E742E436861727365743D22302220466F6E742E436F6C6F723D222D31363737373230382220466F6E742E4865696768743D222D31322220466F6E742E4E616D653D225461686F6D612220466F6E742E5374796C653D223122204672616D652E5479703D2231352200010C85000000204E616D653D22436F6E636570746F20746974756C6F2220436F6C6F723D223533363837303931312220466F6E742E436861727365743D22302220466F6E742E436F6C6F723D222D31363737373230382220466F6E742E4865696768743D222D31332220466F6E742E4E616D653D225461686F6D612220466F6E742E5374796C653D2231220000">
|
||
<TfrxReportPage Name="Page1" Font.Charset="1" Font.Color="0" Font.Height="-13" Font.Name="Arial" Font.Style="1" PaperWidth="210" PaperHeight="297" PaperSize="9" LeftMargin="10" RightMargin="10" TopMargin="10" BottomMargin="10" Columns="1" ColumnWidth="210" ColumnPositions.Text="0" PrintOnPreviousPage="True" HGuides.Text="" VGuides.Text="">
|
||
<TfrxPageHeader Name="Band2" Height="258,70866142" Left="0" Top="18,89765" Width="718,1107">
|
||
<TfrxMemoView Name="Memo23" Left="3,77953" Top="228,5671" Width="621,35467" Height="26,45669291" Color="15790320" Font.Charset="0" Font.Color="-16777208" Font.Height="-12" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haCenter" ParentFont="False" Style="Cabecera de columna" VAlign="vaCenter" Text="Concepto"/>
|
||
<TfrxMemoView Name="Memo24" Left="625,16574" Top="228,5671" Width="92,94496" Height="26,45669291" Color="15790320" Font.Charset="0" Font.Color="-16777208" Font.Height="-12" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" Style="Cabecera de columna" VAlign="vaCenter" Text="Importe total"/>
|
||
<TfrxMemoView Name="Memo11" Left="7,55906" Top="44,47248" Width="257,00804" Height="59,11812" Font.Charset="1" Font.Color="0" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" HAlign="haCenter" ParentFont="False" Text="CIF: B-82530098 C/ Claudio Coello, 52. 28001 Madrid Tlf: 91-431-75-20 Fax: 91-431-75-20"/>
|
||
<TfrxShapeView Name="Shape1" Left="3,77953" Top="128,50402" Width="714,33117" Height="71,81107" Color="16250871"/>
|
||
<TfrxShapeView Name="Shape2" Left="325,03937007874" Top="18,89765" Width="393,07112" Height="98,26778" Color="16250871"/>
|
||
<TfrxMemoView Name="mTexto" Left="393,07112" Top="136,06308" Width="313,70099" Height="52,91342" OnBeforePrint="mTextoOnBeforePrint" Font.Charset="1" Font.Color="12632256" Font.Height="-37" Font.Name="Tahoma" Font.Style="1" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="FACTURA"/>
|
||
<TfrxMemoView Name="Memo16" Left="15,11812" Top="135,84261" Width="65,13389" Height="18,89765" Font.Charset="1" Font.Color="0" Font.Height="-12" Font.Name="Arial" Font.Style="0" ParentFont="False" Text="Nº Factura:"/>
|
||
<TfrxMemoView Name="Memo17" Left="15,11812" Top="154,74026" Width="45,35436" Height="18,89765" Font.Charset="1" Font.Color="0" Font.Height="-12" Font.Name="Arial" Font.Style="0" ParentFont="False" Text="Fecha:"/>
|
||
<TfrxMemoView Name="Memo18" Left="15,11812" Top="173,63791" Width="60,47248" Height="18,89765" Font.Charset="1" Font.Color="0" Font.Height="-12" Font.Name="Arial" Font.Style="0" ParentFont="False" Text="Página nº:"/>
|
||
<TfrxMemoView Name="Memo19" Left="340,81911" Top="18,89765" Width="366,17347" Height="37,7953" Font.Charset="1" Font.Color="0" Font.Height="-15" Font.Name="Tahoma" Font.Style="1" HAlign="haRight" ParentFont="False" Text="[frxDBCabecera."NOMBRE"] [frxDBCabecera."NIFCIF"]"/>
|
||
<TfrxMemoView Name="DatosCliente" Left="340,81911" Top="56,69295" Width="366,17347" Height="56,47248" OnBeforePrint="DatosClienteOnBeforePrint" Font.Charset="1" Font.Color="0" Font.Height="-15" Font.Name="Tahoma" Font.Style="0" HAlign="haRight" ParentFont="False" Text=""/>
|
||
<TfrxMemoView Name="Memo5" Left="80,03154" Top="135,84261" Width="176,9765" Height="18,89765" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" Text="[frxDBCabecera."REFERENCIA"]"/>
|
||
<TfrxMemoView Name="Memo6" Left="60,25201" Top="154,74026" Width="94,70872" Height="18,89765" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" Text="[frxDBCabecera."FECHAFACTURA"]"/>
|
||
<TfrxMemoView Name="Memo7" Left="75,37013" Top="173,63791" Width="181,63791" Height="18,89765" Text="[<Page#>] / [<TotalPages#>]"/>
|
||
<TfrxLineView Name="Line1" Left="718" Top="229,54329" Width="0" Height="636,850393700787" Frame.Typ="1"/>
|
||
<TfrxLineView Name="Line2" Left="4" Top="229,54329" Width="0" Height="636,850393700787" Frame.Typ="1"/>
|
||
<TfrxLineView Name="Line3" Left="625" Top="229,54329" Width="0" Height="636,850393700787" Frame.Typ="1"/>
|
||
<TfrxMemoView Name="Memo1" Left="7,55906" Top="18,89765" Width="306,14193" Height="18,89765" Font.Charset="1" Font.Color="0" Font.Height="-16" Font.Name="Tahoma" Font.Style="1" ParentFont="False" Text="CARNICERO - GARCÍA DE LA HOZ S.L"/>
|
||
<TfrxMemoView Name="Memo12" Left="147,40167" Top="154,96073" Width="79,37013" Height="18,89765" Font.Charset="1" Font.Color="0" Font.Height="-12" Font.Name="Arial" Font.Style="0" ParentFont="False" Text="Vencimiento:"/>
|
||
<TfrxMemoView Name="Memo14" Left="226,55133" Top="154,96073" Width="109,82684" Height="18,89765" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" HideZeros="True" Text="[frxDBCabecera."FECHAVENCIMIENTO"]"/>
|
||
</TfrxPageHeader>
|
||
<TfrxPageFooter Name="Band3" Height="132,28355" Left="0" Top="506,45702" Width="718,1107">
|
||
<TfrxShapeView Name="Shape4" Left="372" Top="8,44094000000001" Width="345" Height="98,26778" Visible="False" Color="16250871" Shape="skRoundRectangle"/>
|
||
<TfrxMemoView Name="Memo31" Left="379,7483" Top="30,4882499999999" Width="331,24428" Height="69,83" Visible="False" StretchMode="smActualHeight" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" Font.Charset="1" Font.Color="0" Font.Height="-9" Font.Name="Tahoma" Font.Style="0" ParentFont="False" Text="[frxDBCabecera."OBSERVACIONES"]"/>
|
||
<TfrxShapeView Name="Shape3" Left="8" Top="8,44094000000001" Width="345" Height="98,26778" Visible="False" Color="16250871" Shape="skRoundRectangle"/>
|
||
<TfrxMemoView Name="Memo26" Left="17,57483" Top="15,81107" Width="113,3859" Height="14,89765" Visible="False" Font.Charset="1" Font.Color="0" Font.Height="-9" Font.Name="Tahoma" Font.Style="1" ParentFont="False" Text="FORMA DE PAGO"/>
|
||
<TfrxMemoView Name="Memo27" Left="17,57483" Top="30,4882499999999" Width="328,59864" Height="69,82684" Visible="False" StretchMode="smActualHeight" DataField="FORMAPAGO" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" Font.Charset="1" Font.Color="0" Font.Height="-9" Font.Name="Tahoma" Font.Style="0" ParentFont="False" Text="[frxDBCabecera."FORMAPAGO"]"/>
|
||
<TfrxMemoView Name="Memo30" Left="379,7483" Top="15,81107" Width="113,3859" Height="14,89765" Visible="False" Font.Charset="1" Font.Color="0" Font.Height="-9" Font.Name="Tahoma" Font.Style="1" ParentFont="False" Text="OBSERVACIONES"/>
|
||
<TfrxLineView Name="Line6" Left="4" Top="0" Width="715" Height="0" Frame.Typ="4"/>
|
||
<TfrxMemoView Name="Memo34" Left="75,5906" Top="109,60637" Width="612,28386" Height="18,89765" Visible="False" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Arial" Font.Style="1" ParentFont="False" Text="Insc. en el Reg. Merc. de Madrid, Tomo 9.193, Libro 0, Folio 10, Sección 4, Hoja 13445/1 CIF: B78971132"/>
|
||
</TfrxPageFooter>
|
||
<TfrxMasterData Name="BandaDetalles" Height="26,88188" Left="0" Top="340,1577" Width="718,1107" OnBeforePrint="BandaDetallesOnBeforePrint" Columns="1" ColumnWidth="200" ColumnGap="20" DataSet="frxDBDetalles" DataSetName="frxDBDetalles" RowCount="0" Stretched="True">
|
||
<TfrxMemoView Name="MemoCampo12" Left="6" Top="0" Width="616,68251234" Height="22" StretchMode="smActualHeight" DataSet="frxDBDetalles" DataSetName="frxDBDetalles" Font.Charset="0" Font.Color="-16777208" Font.Height="-13" Font.Name="Tahoma" Font.Style="0" GapX="10" GapY="10" LineSpacing="4" ParentFont="False" Style="Concepto normal" WordBreak="True" Text="[frxDBDetalles."DESCRIPCION"]"/>
|
||
<TfrxMemoView Name="MemoCampo4" Left="627,05511811" Top="0" Width="89,16535189" Height="18" StretchMode="smMaxHeight" DataSet="frxDBDetalles" DataSetName="frxDBDetalles" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="#,0.00 <20> " DisplayFormat.Kind="fkNumeric" Font.Charset="0" Font.Color="-16777208" Font.Height="-13" Font.Name="Tahoma" Font.Style="0" GapX="10" GapY="10" HAlign="haRight" HideZeros="True" LineSpacing="4" ParentFont="False" Style="Concepto normal" Text="[frxDBDetalles."IMPORTETOTAL"]"/>
|
||
<TfrxMemoView Name="Memo2" Left="208" Top="0" Width="178,48825" Height="18,89765" Visible="False" DataField="TIPO" DataSet="frxDBDetalles" DataSetName="frxDBDetalles" Text="[frxDBDetalles."TIPO"]"/>
|
||
</TfrxMasterData>
|
||
<TfrxReportSummary Name="ReportSummary1" Height="56" Left="0" Top="427,08689" Width="718,1107" OnBeforePrint="ReportSummary1OnBeforePrint">
|
||
<TfrxShapeView Name="Shape5" Left="4" Top="8" Width="714" Height="48" Color="15790320"/>
|
||
<TfrxMemoView Name="Memo9" Left="584" Top="28" Width="132,75603" Height="22,89765" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="#,0.00 <20>" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-13" Font.Name="Tahoma" Font.Style="1" HAlign="haCenter" ParentFont="False" VAlign="vaCenter" Text="[frxDBCabecera."IMPORTETOTAL"]"/>
|
||
<TfrxMemoView Name="Memo10" Left="584" Top="12" Width="132" Height="16" Font.Charset="1" Font.Color="0" Font.Height="-13" Font.Name="Tahoma" Font.Style="1" HAlign="haCenter" ParentFont="False" VAlign="vaCenter" Text="Total factura"/>
|
||
<TfrxMemoView Name="Memo8" Left="234,55133" Top="28" Width="116,75603" Height="22,89765" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="#,0.00 <20>" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-13" Font.Name="Tahoma" Font.Style="0" HAlign="haCenter" HideZeros="True" ParentFont="False" VAlign="vaCenter" Text="[frxDBCabecera."BASEIMPONIBLE"]"/>
|
||
<TfrxMemoView Name="Memo13" Left="234,55133" Top="12" Width="116" Height="16" Font.Charset="1" Font.Color="0" Font.Height="-13" Font.Name="Tahoma" Font.Style="1" HAlign="haCenter" ParentFont="False" VAlign="vaCenter" Text="Base imponible"/>
|
||
<TfrxMemoView Name="Memo22" Left="352" Top="12" Width="116" Height="16" Font.Charset="1" Font.Color="0" Font.Height="-13" Font.Name="Tahoma" Font.Style="1" HAlign="haCenter" ParentFont="False" VAlign="vaCenter" Text="IVA"/>
|
||
<TfrxMemoView Name="Memo25" Left="468" Top="12" Width="116" Height="16" Font.Charset="1" Font.Color="0" Font.Height="-13" Font.Name="Tahoma" Font.Style="1" HAlign="haCenter" ParentFont="False" VAlign="vaCenter" Text="Total IVA"/>
|
||
<TfrxMemoView Name="Memo32" Left="352" Top="28" Width="116,75603" Height="22,89765" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="#,0.00 %" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-13" Font.Name="Tahoma" Font.Style="0" HAlign="haCenter" HideZeros="True" ParentFont="False" VAlign="vaCenter" Text=" [frxDBCabecera."IVA"]"/>
|
||
<TfrxMemoView Name="Memo33" Left="468" Top="28" Width="116,75603" Height="22,89765" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="#,0.00 <20>" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-13" Font.Name="Tahoma" Font.Style="0" HAlign="haCenter" HideZeros="True" ParentFont="False" VAlign="vaCenter" Text="[frxDBCabecera."IMPORTEIVA"]"/>
|
||
<TfrxLineView Name="Line7" Align="baWidth" Left="0" Top="4" Width="718,1107" Height="0" Frame.Color="16777215" Frame.Typ="4" Frame.Width="8"/>
|
||
<TfrxLineView Name="Line8" Left="5" Top="0" Width="714,1107" Height="0" Frame.Typ="4"/>
|
||
</TfrxReportSummary>
|
||
</TfrxReportPage>
|
||
</TfrxReport>
|