<?xml version="1.0" encoding="utf-8" standalone="no"?>
<TfrxReport Version="4.8.27" DotMatrixReport="False" EngineOptions.MaxMemSize="20" EngineOptions.SilentMode="True" EngineOptions.NewSilentMode="simSilent" IniFile="\Software\Fast Reports" PreviewOptions.Buttons="4095" PreviewOptions.Zoom="1" PrintOptions.Printer="Default" PrintOptions.PrintOnSheet="0" ReportOptions.CreateDate="40602,6690597801" ReportOptions.Description.Text="" ReportOptions.LastChange="42558,7489729977" ScriptLanguage="PascalScript" ScriptText.Text="{&#13;&#10;========================================================================                                                                          &#13;&#10;Relatório Padrão Simples&#13;&#10;&#13;&#10;  Não exclua os Objetos das Bands: &#34;TituloRelatorio&#34; (Filtros = opcional),   &#13;&#10;  &#34;Rodape Pagina&#34; e nem os bjs &#34;QPrincipal&#34; e &#34;QEmpresa&#34;.&#13;&#10;  Use a QPrincipal para o SQL principal, pois a checagem abaixo é para&#13;&#10;  verificar se há registros na mesma.&#13;&#10;  O cabeçalho já esta pronto, não esqueça de alterar o objeto &#34;Título&#34; &#13;&#10;  e/ou &#34;Referencia&#34; (opcional) e de alimentar a variavel  &#34;CodEmpresa&#34; &#13;&#10;  (pelo programa) para que o nome da empresa seja mostrado e tbm a &#13;&#10;  variável &#34;Filtros&#34; (opcional, mas lembre-se de passar por aspas os &#13;&#10;  valores do filtro)&#13;&#10;  Procure passar todos os valores para o filtros do SQL (cláusula WHERE)&#13;&#10;  por variavéis (componente TfrxVariables) pelo programa.&#13;&#10;  Mantenha os objetos alinhados sem deixar espeços entre eles (sujestão.:&#13;&#10;  use propriedade Align)                                                            &#13;&#10;&#13;&#10;&#13;&#10;  por Jaime P.Jr em 15/04/2013&#13;&#10;========================================================================}&#13;&#10;begin&#13;&#10;  //Teste - Descomente as linhas  abaixo para teste e acrescente suas variáveis&#13;&#10;  //Não esqueça de comentar ao término do relatório                                                                                                                                      &#13;&#10;{&#13;&#10;  Set('CodEmpresa','1');&#13;&#10;  Set('RelReferencia','''????''');&#13;&#10;  Set('Filtros','''????''');      &#13;&#10;&#13;&#10;  &#13;&#10;Checagem de dados - Não remova as linhas abaixo                                                &#13;&#10;  QPrincipal.Open;                 &#13;&#10;  if QPrincipal.IsEmpty then&#13;&#10;  begin              &#13;&#10;    CreateError('Não exitem registros para os filtros selecionados.');&#13;&#10;  end;&#13;&#10;fim  &#13;&#10;&#13;&#10;  Set('Cliente',&#60;Cliente&#62;);&#13;&#10;  Set('ValorBaixa',&#60;ValorBaixa&#62;);&#13;&#10;  Set('RefDoc',&#60;RefDoc&#62;);&#13;&#10;  Set('Operador',&#60;Operador&#62;);}&#13;&#10;&#13;&#10;&#13;&#10;                                                   &#13;&#10;end." StoreInDFM="False" PropData="044C65667403D80203546F7002100844617461736574730101062A20446174615365743D2251456D70726573612220446174615365744E616D653D2251456D7072657361220001062E20446174615365743D22515072696E636970616C2220446174615365744E616D653D22515072696E636970616C220000095661726961626C65730100055374796C650100">
  <TfrxDataPage Name="Data" Height="1000" Left="0" Top="0" Width="1000">
    <TfrxADOQuery Name="QPrincipal" UserName="QPrincipal" CloseDataSource="True" FieldAliases.Text="" BCDToCurrency="False" IgnoreDupParams="False" SQL.Text="    " CommandTimeout="1800" LockType="ltReadOnly" PropData="05704C65667402200470546F70021C0A506172616D65746572730100"/>
    <TfrxADOQuery Name="QEmpresa" UserName="QEmpresa" CloseDataSource="True" FieldAliases.Text="" BCDToCurrency="False" IgnoreDupParams="False" SQL.Text="select emp_nomemp &#13;&#10;from cademp &#13;&#10;where EMP_CODIGO=:CodEmpresa" CommandTimeout="1800" LockType="ltReadOnly" PropData="05704C656674025C0470546F70021C0A506172616D657465727301010649204E616D653D22436F64456D7072657361222044617461547970653D226674496E7465676572222045787072657373696F6E3D22262336303B436F64456D7072657361262336323B220000"/>
  </TfrxDataPage>
  <TfrxReportPage Name="Pag_Relatorio" PaperWidth="210" PaperHeight="297" PaperSize="9" LeftMargin="10" RightMargin="10" TopMargin="10" BottomMargin="10" ColumnWidth="0" ColumnPositions.Text="" HGuides.Text="" VGuides.Text="" OnBeforePrint="Relatorio1OnBeforePrint">
    <TfrxReportTitle Name="TituloRelatorio" Height="61,35436" Left="0" Top="16" Width="718,1107" Stretched="True">
      <TfrxMemoView Name="Titulo" Align="baWidth" Left="0" Top="18,8976378" Width="718,1107" Height="18,89765" ShowHint="False" Font.Charset="1" Font.Color="0" Font.Height="-15" Font.Name="Courier New" Font.Style="1" ParentFont="False" VAlign="vaCenter" Text="Comprovante de Pagamento"/>
      <TfrxMemoView Name="NomeEmpresa" Align="baWidth" Left="0" Top="0" Width="517,79561" Height="18,89765" ShowHint="False" DataField="EMP_NOMEMP" DataSet="QEmpresa" DataSetName="QEmpresa" Font.Charset="0" Font.Color="0" Font.Height="-13" Font.Name="Courier New" Font.Style="0" ParentFont="False" Text="[QEmpresa.&#34;EMP_NOMEMP&#34;]"/>
      <TfrxMemoView Name="Emissao" Align="baRight" Left="517,79561" Top="0" Width="200,31509" Height="15,11812" ShowHint="False" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Courier New" Font.Style="0" HAlign="haRight" ParentFont="False" Text="Emissão: [DATE] [Time]"/>
      <TfrxLineView Name="Line1" Left="0" Top="41,57483" Width="718,1107" Height="0" ShowHint="False" Frame.Typ="4"/>
    </TfrxReportTitle>
    <TfrxMasterData Name="MDPrincipal" Height="143,6221278" Left="0" Top="96" Width="718,1107" ColumnWidth="0" ColumnGap="0" RowCount="1" Stretched="True">
      <TfrxMemoView Name="Memo3" Left="0" Top="14" Width="188,9765" Height="18,89765" ShowHint="False" DataSet="QPrincipal" DataSetName="QPrincipal" Font.Charset="1" Font.Color="0" Font.Height="-13" Font.Name="Courier New" Font.Style="1" ParentFont="False" Text="Cliente...............:"/>
      <TfrxMemoView Name="Memo1" Left="0" Top="42,89765" Width="188,9765" Height="18,89765" ShowHint="False" DataSet="QPrincipal" DataSetName="QPrincipal" Font.Charset="1" Font.Color="0" Font.Height="-13" Font.Name="Courier New" Font.Style="1" ParentFont="False" Text="Valor Recebido........:"/>
      <TfrxMemoView Name="Memo2" Left="0" Top="83,7953" Width="188,9765" Height="18,89765" ShowHint="False" DataSet="QPrincipal" DataSetName="QPrincipal" Font.Charset="1" Font.Color="0" Font.Height="-13" Font.Name="Courier New" Font.Style="1" ParentFont="False" Text="Referente ao Documento:"/>
      <TfrxMemoView Name="Memo4" Left="0" Top="115,69295" Width="188,9765" Height="18,89765" ShowHint="False" DataSet="QPrincipal" DataSetName="QPrincipal" Font.Charset="1" Font.Color="0" Font.Height="-13" Font.Name="Courier New" Font.Style="1" ParentFont="False" Text="Operador..............:"/>
      <TfrxMemoView Name="Memo5" Left="186,9765" Top="14" Width="529,1342" Height="18,89765" ShowHint="False" StretchMode="smMaxHeight" DataSet="QPrincipal" DataSetName="QPrincipal" Font.Charset="1" Font.Color="0" Font.Height="-13" Font.Name="Courier New" Font.Style="0" ParentFont="False" Text="[&#60;Cliente&#62;]"/>
      <TfrxMemoView Name="Memo6" Left="186,9765" Top="42,89765" Width="529,1342" Height="18,89765" ShowHint="False" StretchMode="smMaxHeight" DataSet="QPrincipal" DataSetName="QPrincipal" Font.Charset="1" Font.Color="0" Font.Height="-13" Font.Name="Courier New" Font.Style="0" ParentFont="False" Text="[&#60;ValorBaixa&#62;]"/>
      <TfrxMemoView Name="Memo7" Left="186,9765" Top="83,7953" Width="529,1342" Height="18,89765" ShowHint="False" StretchMode="smMaxHeight" DataSet="QPrincipal" DataSetName="QPrincipal" Font.Charset="1" Font.Color="0" Font.Height="-13" Font.Name="Courier New" Font.Style="0" ParentFont="False" Text="[&#60;RefDoc&#62;]"/>
      <TfrxMemoView Name="Memo8" Left="186,9765" Top="115,69295" Width="529,1342" Height="18,89765" ShowHint="False" StretchMode="smMaxHeight" DataSet="QPrincipal" DataSetName="QPrincipal" Font.Charset="1" Font.Color="0" Font.Height="-13" Font.Name="Courier New" Font.Style="0" ParentFont="False" Text="[&#60;Operador&#62;]"/>
      <TfrxLineView Name="Line2" Left="0" Top="73,81107" Width="718,1107" Height="0" ShowHint="False" Frame.Typ="4"/>
    </TfrxMasterData>
  </TfrxReportPage>
</TfrxReport>
