<?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="41822,7045792593" 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;&#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;        &#13;&#10;end." StoreInDFM="False" PropData="044C65667403D80203546F7002100844617461736574730101062A20446174615365743D2251456D70726573612220446174615365744E616D653D2251456D7072657361220001062E20446174615365743D22515072696E636970616C2220446174615365744E616D653D22515072696E636970616C220000095661726961626C65730101061C204E616D653D22436F64456D7072657361222056616C75653D2231220001061A204E616D653D2246696C74726F73222056616C75653D2227272200010624204E616D653D2252656C5265666572656E636961222056616C75653D222735313041272200010619204E616D653D224E756D54726F222056616C75653D223330220000055374796C650100">
  <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="declare&#13;&#10;       @NumTro Int = :NumTro;                        &#13;&#10;         &#13;&#10;select TRD_CODFOR, FOR_NOMFOR, TRD_NUMTRO, TRD_CODBAR,&#13;&#10;       ITE_DESCRI, TRD_QTDITE, TRD_UNITAR, ITE_UNIDAD, &#13;&#10;       ITE_REFERE, (TRD_QTDITE * TRD_UNITAR) as TRD_TOTITE                     &#13;&#10;from TROMER_DETALHE&#13;&#10;left join cadite on ITE_CODIGO = TRD_CODITE&#13;&#10;left outer join cadfor on FOR_CODIGO = TRD_CODFOR&#13;&#10;where TRD_NUMTRO = @NumTro and&#13;&#10;      round(TRD_QTDITE, 3) &#62; 0                                                           " CommandTimeout="1800" LockType="ltReadOnly" PropData="05704C65667402200470546F70021C0A506172616D657465727301010641204E616D653D224E756D54726F222044617461547970653D226674496E7465676572222045787072657373696F6E3D22262336303B4E756D54726F262336323B220000"/>
    <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="Relatorio1" PaperWidth="210" PaperHeight="297" PaperSize="9" LeftMargin="10" RightMargin="10" TopMargin="10" BottomMargin="10" ColumnWidth="0" ColumnPositions.Text="" HGuides.Text="" VGuides.Text="">
    <TfrxReportTitle Name="TituloRelatorio" Height="68,91342" Left="0" Top="18,89765" Width="718,1107" Stretched="True">
      <TfrxMemoView Name="Titulo" Left="0" Top="18,8976378" Width="249,44898" Height="18,89765" ShowHint="False" Font.Charset="1" Font.Color="0" Font.Height="-19" Font.Name="Courier New" Font.Style="1" ParentFont="False" Text="Troca de Mercadoria"/>
      <TfrxMemoView Name="RelReferencia" Align="baRight" Left="517,79561" Top="19" Width="200,31509" Height="18,89765" ShowHint="False" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Courier New" Font.Style="0" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="[IIF(&#60;RelReferencia&#62;='','','(Ref.:'+&#60;RelReferencia&#62;+')')]"/>
      <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]"/>
      <TfrxMemoView Name="Memo4" Left="249,44898" Top="18,89765" Width="26,45671" Height="18,89765" ShowHint="False" Font.Charset="1" Font.Color="0" Font.Height="-19" Font.Name="Courier New" Font.Style="1" ParentFont="False" Text="N°"/>
      <TfrxMemoView Name="QPrincipalTRD_NUMTRO" Left="275,90569" Top="18,89765" Width="79,37013" Height="18,89765" ShowHint="False" DataField="TRD_NUMTRO" DataSet="QPrincipal" DataSetName="QPrincipal" Font.Charset="1" Font.Color="-16777208" Font.Height="-19" Font.Name="Courier New" Font.Style="1" ParentFont="False" Text="[QPrincipal.&#34;TRD_NUMTRO&#34;]"/>
      <TfrxMemoView Name="Memo6" Align="baLeft" Left="0" Top="45,35436" Width="83,14966" Height="18,8976378" ShowHint="False" Font.Charset="1" Font.Color="0" Font.Height="-12" Font.Name="Courier New" Font.Style="0" ParentFont="False" Text="Fornecedor:"/>
      <TfrxMemoView Name="QPrincipalFOR_NOMFOR" Left="83,14966" Top="45,35436" Width="634,96104" Height="18,89765" ShowHint="False" DataField="FOR_NOMFOR" DataSet="QPrincipal" DataSetName="QPrincipal" Font.Charset="1" Font.Color="0" Font.Height="-12" Font.Name="Courier New" Font.Style="0" ParentFont="False" Text="[QPrincipal.&#34;FOR_NOMFOR&#34;]"/>
    </TfrxReportTitle>
    <TfrxReportSummary Name="ResumoRelatorio" Height="18,89765" Left="0" Top="321,26005" Width="718,1107">
      <TfrxMemoView Name="Memo15" Left="230,55133" Top="0" Width="381,73253" Height="18,89765" ShowHint="False" Font.Charset="1" Font.Color="0" Font.Height="-12" Font.Name="Courier New" Font.Style="1" Frame.Typ="4" HAlign="haRight" ParentFont="False" Text="Total da Troca:"/>
      <TfrxMemoView Name="Memo19" Left="612,28346457" Top="0" Width="105,82684" Height="18,89765" ShowHint="False" DataSetName="QTotais" DisplayFormat.FormatStr="%2.2f" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-12" Font.Name="Courier New" Font.Style="1" Frame.Typ="4" HAlign="haRight" ParentFont="False" Text="R$ [SUM(&#60;QPrincipal.&#34;TRD_TOTITE&#34;&#62;,MDPrincipal)]"/>
      <TfrxMemoView Name="Memo1" Left="0" Top="0" Width="147,40167" Height="22,67718" ShowHint="False" Font.Charset="1" Font.Color="0" Font.Height="-12" Font.Name="Courier New" Font.Style="1" Frame.Typ="4" ParentFont="False" Text="Produtos Impressos:"/>
      <TfrxMemoView Name="Memo2" Left="146,84261" Top="0" Width="83,14966" Height="18,89765" ShowHint="False" DataSetName="QTotais" DisplayFormat.FormatStr="%g" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-12" Font.Name="Courier New" Font.Style="1" Frame.Typ="4" ParentFont="False" Text="[COUNT(MDPrincipal)]"/>
    </TfrxReportSummary>
    <TfrxPageFooter Name="RodapePagina" Font.Charset="1" Font.Color="0" Font.Height="-12" Font.Name="Arial" Font.Style="0" Height="15,11812" Left="0" ParentFont="False" Top="362,83488" Width="718,1107">
      <TfrxSysMemoView Name="TotalPaginas" Align="baRight" Left="612,28386" Top="0,13385827" Width="105,82684" Height="15,11812" ShowHint="False" Font.Charset="0" Font.Color="0" Font.Height="-12" Font.Name="Courier New" Font.Style="0" HAlign="haRight" ParentFont="False" Text="[PAGE#]/[TOTALPAGES#]"/>
    </TfrxPageFooter>
    <TfrxMasterData Name="MDPrincipal" Height="20,89765" Left="0" Top="192,75603" Width="718,1107" OnBeforePrint="MDPrincipalOnBeforePrint" ColumnWidth="0" ColumnGap="0" DataSet="QPrincipal" DataSetName="QPrincipal" RowCount="0">
      <TfrxMemoView Name="QPrincipalTRD_CODFOR" Align="baLeft" Left="0" Top="1,77953" Width="336,37817" Height="15,11812" ShowHint="False" DataSet="QPrincipal" DataSetName="QPrincipal" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Courier New" Font.Style="0" ParentFont="False" Text="[QPrincipal.&#34;TRD_CODBAR&#34;] - [QPrincipal.&#34;ITE_DESCRI&#34;]"/>
      <TfrxMemoView Name="QPrincipalITE_REFERE" Align="baLeft" Left="336,37817" Top="1,77953" Width="105,82684" Height="15,11811024" ShowHint="False" DataSet="QPrincipal" DataSetName="QPrincipal" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Courier New" Font.Style="0" HAlign="haCenter" ParentFont="False" Text="[QPrincipal.&#34;ITE_REFERE&#34;]"/>
      <TfrxMemoView Name="QPrincipalITE_UNIDAD" Align="baRight" Left="442,20501" Top="2" Width="26,45671" Height="15,11811024" ShowHint="False" DataField="ITE_UNIDAD" DataSet="QPrincipal" DataSetName="QPrincipal" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Courier New" Font.Style="0" HAlign="haCenter" ParentFont="False" Text="[QPrincipal.&#34;ITE_UNIDAD&#34;]"/>
      <TfrxMemoView Name="QPrincipalTRD_QTDITE" Align="baRight" Left="468,66172" Top="2" Width="83,14966" Height="15,11812" ShowHint="False" DataSet="QPrincipal" DataSetName="QPrincipal" DisplayFormat.FormatStr="%2.3n" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Courier New" Font.Style="0" HAlign="haRight" ParentFont="False" Text="[QPrincipal.&#34;TRD_QTDITE&#34;]"/>
      <TfrxMemoView Name="QPrincipalTRD_UNITAR" Align="baRight" Left="551,81138" Top="1,77953" Width="83,14966" Height="15,11812" ShowHint="False" DataSet="QPrincipal" DataSetName="QPrincipal" DisplayFormat.FormatStr="%2.2f" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Courier New" Font.Style="0" HAlign="haRight" ParentFont="False" Text="[QPrincipal.&#34;TRD_UNITAR&#34;]"/>
      <TfrxMemoView Name="QPrincipalTRD_TOTITE" Align="baRight" Left="634,96104" Top="2" Width="83,14966" Height="15,11812" ShowHint="False" DataSet="QPrincipal" DataSetName="QPrincipal" DisplayFormat.FormatStr="%2.2f" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="-16777208" Font.Height="-11" Font.Name="Courier New" Font.Style="0" HAlign="haRight" ParentFont="False" Text="$ [QPrincipal.&#34;TRD_TOTITE&#34;]"/>
    </TfrxMasterData>
    <TfrxFooter Name="RodapeMD" Height="22,67718" Left="0" Top="238,11039" Width="718,1107"/>
    <TfrxPageHeader Name="PageHeader1" Height="22,67718" Left="0" Top="109,60637" Width="718,1107">
      <TfrxMemoView Name="Memo3" Align="baLeft" Left="0" Top="0" Width="336,37817" Height="18,8976378" ShowHint="False" Font.Charset="1" Font.Color="0" Font.Height="-12" Font.Name="Courier New" Font.Style="1" Frame.Typ="12" ParentFont="False" VAlign="vaCenter" Text="Cód./Descrição do Produto"/>
      <TfrxMemoView Name="Memo9" Align="baRight" Left="442,20501" Top="0" Width="26,45671" Height="18,8976378" ShowHint="False" Font.Charset="1" Font.Color="0" Font.Height="-12" Font.Name="Courier New" Font.Style="1" Frame.Typ="12" HAlign="haCenter" ParentFont="False" VAlign="vaCenter" Text="Un."/>
      <TfrxMemoView Name="Memo10" Align="baRight" Left="468,66172" Top="0" Width="83,14966" Height="18,8976378" ShowHint="False" Font.Charset="1" Font.Color="0" Font.Height="-12" Font.Name="Courier New" Font.Style="1" Frame.Typ="12" HAlign="haCenter" ParentFont="False" VAlign="vaCenter" Text="Qtde."/>
      <TfrxMemoView Name="Memo11" Align="baRight" Left="551,81138" Top="0" Width="83,14966" Height="18,8976378" ShowHint="False" Font.Charset="1" Font.Color="0" Font.Height="-12" Font.Name="Courier New" Font.Style="1" Frame.Typ="12" HAlign="haCenter" ParentFont="False" VAlign="vaCenter" Text="Unitário"/>
      <TfrxMemoView Name="Memo12" Align="baRight" Left="634,96104" Top="0" Width="83,14966" Height="18,8976378" ShowHint="False" Font.Charset="1" Font.Color="0" Font.Height="-12" Font.Name="Courier New" Font.Style="1" Frame.Typ="12" HAlign="haCenter" ParentFont="False" VAlign="vaCenter" Text="Total"/>
      <TfrxMemoView Name="Memo5" Align="baLeft" Left="336,37817" Top="0" Width="105,82684" Height="18,8976378" ShowHint="False" Font.Charset="1" Font.Color="0" Font.Height="-12" Font.Name="Courier New" Font.Style="1" Frame.Typ="12" HAlign="haCenter" ParentFont="False" VAlign="vaCenter" Text="Referência"/>
    </TfrxPageHeader>
  </TfrxReportPage>
</TfrxReport>
