<?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="42123,4816244792" 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="044C65667403D80203546F7002100844617461736574730101062A20446174615365743D2251456D70726573612220446174615365744E616D653D2251456D7072657361220001062E20446174615365743D22515072696E636970616C2220446174615365744E616D653D22515072696E636970616C220000095661726961626C65730101061C204E616D653D22436F64456D7072657361222056616C75653D2231220001061A204E616D653D2246696C74726F73222056616C75653D2227272200010633204E616D653D2252656C5265666572656E636961222056616C75653D222752656C5F43726974696361735F436164697465272200010619204E616D653D22524547454D50222056616C75653D224C50220000055374796C650100">
  <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="SELECT ITE_CODIGO, Critica&#13;&#10;FROM (SELECT ITE_CODIGO,&#13;&#10;             CASE &#13;&#10;               WHEN LEN(ITE_NFENCM) &#60;&#62; 8 THEN&#13;&#10;                  'NCM inválido.'&#13;&#10;               WHEN COALESCE(ITE_CSTRIB, '') = '' THEN&#13;&#10;                  'CST de ICMS em branco.'&#13;&#10;               WHEN ITE_ALQICM = 0 THEN&#13;&#10;                  'Alíquota de ICMS obrigatória.'&#13;&#10;               WHEN dbo.FN_VALIDA_IMPOSTO_SAIDA(:REGEMP, 'ICM', ITE_CSTRIB, ITE_ALQICM, ITE_ALQCUP) = 0 THEN&#13;&#10;                  'Alíquota de ICMS inválida.'&#13;&#10;               WHEN COALESCE(ITE_CSTPIS, '') = '' THEN&#13;&#10;                  'CST de PIS em branco.'&#13;&#10;               WHEN ITE_ALQPIS = 0 THEN&#13;&#10;                  'Alíquota de PIS inválida.'&#13;&#10;               WHEN COALESCE(ITE_CSTCOF, '') = '' THEN&#13;&#10;                  'CST de COFINS em branco.'&#13;&#10;               WHEN ITE_ALQCOF = 0 THEN&#13;&#10;                  'Alíquota de COFINS inválida.'&#13;&#10;            END AS Critica&#13;&#10;      FROM cadite) AS Criticas&#13;&#10;WHERE Critica IS NOT NULL      " CommandTimeout="1800" LockType="ltReadOnly" PropData="05704C65667402200470546F70021C0A506172616D657465727301010640204E616D653D22524547454D50222044617461547970653D226674537472696E67222045787072657373696F6E3D22262336303B524547454D50262336323B220000"/>
    <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="16" Width="718,1107" Stretched="True">
      <TfrxMemoView Name="Titulo" Align="baWidth" Left="0" Top="18,8976377952756" Width="517,79561" 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="Título do Relatório"/>
      <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="Filtros" Align="baWidth" Left="56,69295" Top="38,67718" Width="661,41775" Height="30,23624" ShowHint="False" StretchMode="smMaxHeight" Font.Charset="0" Font.Color="0" Font.Height="-11" Font.Name="Courier New" Font.Style="0" ParentFont="False" Text="[&#60;Filtros&#62;]"/>
      <TfrxMemoView Name="LblFiltros" Align="baLeft" Left="0" Top="38,67718" Width="56,69295" Height="30,23624" ShowHint="False" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Courier New" Font.Style="0" ParentFont="False" Text="Filtros:"/>
      <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]"/>
    </TfrxReportTitle>
    <TfrxPageHeader Name="CabecalhoPagina" Height="18,8976378" Left="0" Top="104" Width="718,1107"/>
    <TfrxReportSummary Name="ResumoRelatorio" Height="18,89765" Left="0" Top="268" Width="718,1107"/>
    <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="308" 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="18,8976378" Left="0" Top="184" Width="718,1107" ColumnWidth="0" ColumnGap="0" DataSet="QPrincipal" DataSetName="QPrincipal" RowCount="0">
      <TfrxMemoView Name="mem_ITE_CODIGO" Left="0" Top="0" Width="188,976377952756" Height="18,89765" ShowHint="False" DataField="ITE_CODIGO" DataSet="QPrincipal" DataSetName="QPrincipal" Font.Charset="1" Font.Color="0" Font.Height="-13" Font.Name="Courier New" Font.Style="0" ParentFont="False" Text="[QPrincipal.&#34;ITE_CODIGO&#34;]"/>
      <TfrxMemoView Name="mem_Critica" Left="196,66945" Top="0" Width="491,33858268" Height="18,89765" ShowHint="False" DataField="Critica" DataSet="QPrincipal" DataSetName="QPrincipal" Font.Charset="1" Font.Color="0" Font.Height="-13" Font.Name="Courier New" Font.Style="0" ParentFont="False" Text="[QPrincipal.&#34;Critica&#34;]"/>
    </TfrxMasterData>
    <TfrxHeader Name="CabecalhoMD" Height="18,89765" Left="0" Top="144" Width="718,1107">
      <TfrxMemoView Name="lbl_ITE_CODIGO" Left="0" Top="0" Width="188,97637795" Height="18,8976378" ShowHint="False" Font.Charset="1" Font.Color="0" Font.Height="-12" Font.Name="Courier New" Font.Style="0" Frame.Typ="12" HAlign="haCenter" ParentFont="False" VAlign="vaCenter" Text="Código interno"/>
      <TfrxMemoView Name="lbl_Critica" Left="196,53543307" Top="0" Width="491,338582677165" Height="18,8976378" ShowHint="False" Font.Charset="1" Font.Color="0" Font.Height="-12" Font.Name="Courier New" Font.Style="0" Frame.Typ="12" HAlign="haCenter" ParentFont="False" VAlign="vaCenter" Text="Crítica"/>
    </TfrxHeader>
    <TfrxFooter Name="RodapeMD" Height="22,67718" Left="0" Top="224" Width="718,1107"/>
  </TfrxReportPage>
</TfrxReport>
