<?xml version="1.0" encoding="utf-8"?>
<TfrxReport Name="" Version="3.21" DotMatrixReport="False" EngineOptions.MaxMemSize="10000000" IniFile="\Software\Fast Reports" PreviewOptions.Buttons="2047" PreviewOptions.Zoom="1" PrintOptions.Printer="Ïî óìîë÷àíèþ" ReportOptions.Compressed="True" ReportOptions.CreateDate="38426,6281785301" ReportOptions.Description.Text="" ReportOptions.LastChange="38897,8389539699" ScriptLanguage="PascalScript" ScriptText.Text="function GetProducerCountry(ProducerID :integer) :string;&#13;&#10;var Query :TQuery;&#13;&#10;begin&#13;&#10;  Result := '';&#13;&#10;  query := TQuery.create(nil);&#13;&#10;  try&#13;&#10;    Query.databasename := 'dbkassa';&#13;&#10;    Query.sql.text := 'select a.name from country a join producer b on a.id=b.country where b.id='+inttostr(producerid);&#13;&#10;    Query.open;&#13;&#10;    if not Query.isEmpty&#13;&#10;    then begin&#13;&#10;      Query.first;&#13;&#10;      result := Query.fields[0].asstring;&#13;&#10;    end;&#13;&#10;  finally&#13;&#10;    Query.free&#13;&#10;  end;&#13;&#10;end;&#13;&#10;&#13;&#10;begin&#13;&#10;&#13;&#10;end." PropData="044C65667403C80003546F70024008446174617365747301010C2200000020446174615365743D22667244532220446174615365744E616D653D2266724453220000095661726961626C65730100055374796C650100">
  <TfrxReportPage Name="Page1" PaperWidth="100,6" PaperHeight="21,3" PaperSize="256" LeftMargin="36" RightMargin="0" TopMargin="0" BottomMargin="0" ColumnWidth="0" ColumnPositions.Text="" PrintIfEmpty="False" TitleBeforeHeader="False" HGuides.Text="" VGuides.Text="">
    <TfrxMasterData Name="MasterData1" Height="98,26778" Left="0" Top="18,89765" Width="244,157638" ColumnWidth="0" ColumnGap="0" DataSet="frDS" DataSetName="frDS" RowCount="0" Stretched="True">
      <TfrxMemoView Name="Memo1" Left="0" Top="11,33859" Width="113,38565591" Height="37,7953" DataField="NAME" DataSet="frDS" DataSetName="frDS" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Arial" Font.Style="1" HAlign="haCenter" LineSpacing="0" ParentFont="False" WordBreak="True" Text="[frDS.&#34;NAME&#34;]"/>
      <TfrxMemoView Name="Memo2" Left="0" Top="49,13389" Width="113,3859" Height="26,45671" AutoWidth="True" DataField="CENA" DataSet="frDS" DataSetName="frDS" DisplayFormat.DecimalSeparator="." DisplayFormat.FormatStr="### ###.00" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-24" Font.Name="Arial" Font.Style="1" HAlign="haRight" ParentFont="False" Text="[frDS.&#34;CENA&#34;]"/>
      <TfrxMemoView Name="Memo3" Left="0" Top="45,35436" Width="113,3859" Height="18,89765" AutoWidth="True" Font.Charset="1" Font.Color="-16777208" Font.Height="-8" Font.Name="Arial" Font.Style="0" ParentFont="False" Text="[getproducercountry(&#60;frDS.&#34;Producer&#34;&#62;)]"/>
      <TfrxMemoView Name="Memo4" Left="45,35436" Top="0" Width="68,03154" Height="15,11812" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="dd.mm.yy" DisplayFormat.Kind="fkDateTime" Font.Charset="1" Font.Color="-16777208" Font.Height="-8" Font.Name="Arial" Font.Style="0" HAlign="haRight" ParentFont="False" Text="[frDS.&#34;DataPrih&#34;]"/>
      <TfrxMemoView Name="Memo5" Left="0" Top="0" Width="94,48825" Height="18,89765" Font.Charset="1" Font.Color="-16777208" Font.Height="-8" Font.Name="Times New Roman" Font.Style="0" ParentFont="False" Text="ÐžÐžÐž &#34;Ð¤Ðš Ð­Ñ„ÐµÐ´Ñ€Ð°&#34;"/>
    </TfrxMasterData>
  </TfrxReportPage>
</TfrxReport>
