<?xml version="1.0" encoding="utf-8"?>
<TfrxReport Version="3.24.6" DotMatrixReport="False" IniFile="\Software\Fast Reports" PreviewOptions.Buttons="1776" PreviewOptions.Zoom="1" PrintOptions.Printer="Default" ReportOptions.CreateDate="39057,5968601852" ReportOptions.Description.Text="" ReportOptions.LastChange="40143,6460551157" ScriptLanguage="PascalScript" ScriptText.Text="procedure cbxRangeOnChange(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  SesBeg.Visible := cbxRange.ItemIndex = 1;&#13;&#10;  SesEnd.Visible := cbxRange.ItemIndex = 1;&#13;&#10;  DateBeg.Visible := cbxRange.ItemIndex = 0;&#13;&#10;  DateEnd.Visible := cbxRange.ItemIndex = 0;&#13;&#10;  TimeBeg.Visible := cbxRange.ItemIndex = 0;&#13;&#10;  TimeEnd.Visible := cbxRange.ItemIndex = 0;&#13;&#10;  pnl.Visible := cbxRange.ItemIndex &#60;&#62; 2;&#13;&#10;  Label2.Visible := cbxRange.ItemIndex &#60;&#62; 2;&#13;&#10;  Label3.Visible := cbxRange.ItemIndex &#60;&#62; 2;&#13;&#10;end;&#13;&#10;&#13;&#10;procedure frxReportOnStartReport(Sender: TfrxComponent);&#13;&#10;var&#13;&#10;  wc: string;&#13;&#10;  i: integer;&#13;&#10;begin&#13;&#10;  wc := '';&#13;&#10;  if dlgMain.ShowModal = mrOk then&#13;&#10;  begin&#13;&#10;    if cbxRM.Items.Objects[cbxRM.ItemIndex] = TObject(0) then&#13;&#10;    begin&#13;&#10;      for i := 0 to cbxRM.Items.Count - 2 do&#13;&#10;        wc := wc + VarToStr(cbxRM.Items.Objects[i]) + ',';&#13;&#10;      wc := 'RMKID IN (' + Copy(wc, 1, Length(wc) - 1)  + ')';&#13;&#10;    end&#13;&#10;    else&#13;&#10;      wc := 'RMKID = ' + VarToStr(cbxRM.Items.Objects[cbxRM.ItemIndex]);&#13;&#10;    if cbxRange.ItemIndex = 0 then&#13;&#10;    begin&#13;&#10;      wc := wc + ' AND (CLOSEDATE + CLOSETIME BETWEEN ''' + DateToStr(DateBeg.Date)+ ' ' + TimeToStr(TimeBeg.Time) + ''' AND ''' + DateToStr(DateEnd.Date)+ ' ' + TimeToStr(TimeEnd.Time) + ''')';&#13;&#10;      Memo9.Text := cbxRange.Text + ' C: ' + DateToStr(DateBeg.Date)+ ' ' + TimeToStr(TimeBeg.Time) + ' : ' + DateToStr(DateEnd.Date)+ ' ' + TimeToStr(TimeEnd.Time);&#13;&#10;    end&#13;&#10;    else&#13;&#10;      if cbxRange.ItemIndex = 1 then&#13;&#10;      begin&#13;&#10;        wc := wc + ' AND (ECRSESSION BETWEEN ' + SesBeg.Text + ' AND ' + SesEnd.Text + ')';&#13;&#10;        Memo9.Text := cbxRange.Text + ' : ' + SesBeg.Text + ' : ' + SesEnd.Text;&#13;&#10;      end&#13;&#10;      else&#13;&#10;        Memo9.Text := cbxRange.Text;&#13;&#10;&#13;&#10;    QueryRange.SQL.Add('WHERE ' + wc);&#13;&#10;    QueryRange.Open;&#13;&#10;    Memo18.Text := ' : ' + QueryRange.FieldByName('MIN').AsString;&#13;&#10;    Memo23.Text := ' : ' + QueryRange.FieldByName('MAX').AsString;&#13;&#10;&#13;&#10;    wc := wc + ' AND ';&#13;&#10;    TableTranzt.SQL.Strings[5] := wc;&#13;&#10;    TableTranzt.SQL.Strings[13] := wc;&#13;&#10;    TableTranzt.SQL.Strings[21] := wc;&#13;&#10;    TableTranzt.SQL.Strings[29] := wc;&#13;&#10;  end&#13;&#10;  else&#13;&#10;    StopReport ;&#13;&#10;end;&#13;&#10;&#13;&#10;procedure dlgMainOnShow(Sender: TfrxComponent);&#13;&#10;var&#13;&#10;  i: integer;&#13;&#10;begin&#13;&#10;  with TableRMK do&#13;&#10;  begin&#13;&#10;    Open;&#13;&#10;    First;&#13;&#10;    while not EOF do&#13;&#10;    begin&#13;&#10;      cbxRM.Items.AddObject(FieldByName('CODE').AsString, TObject(FieldByName('ID').AsInteger));&#13;&#10;      Next;&#13;&#10;    end;&#13;&#10;    if cbxRM.Items.Count &#62; 1 then&#13;&#10;      cbxRM.Items.AddObject('', TObject(0));&#13;&#10;    cbxRM.ItemIndex := 0;&#13;&#10;  end;&#13;&#10;  with TableSession do&#13;&#10;  begin&#13;&#10;    Open;&#13;&#10;    First;&#13;&#10;    while not EOF do&#13;&#10;    begin&#13;&#10;      SesBeg.Items.Add(FieldByName('ECRSESSION').AsString);&#13;&#10;      SesEnd.Items.Add(FieldByName('ECRSESSION').AsString);&#13;&#10;      Next;&#13;&#10;    end;&#13;&#10;    SesBeg.ItemIndex := 0;&#13;&#10;    SesEnd.ItemIndex := SesEnd.Items.Count - 1;&#13;&#10;  end;&#13;&#10;  DateBeg.Date := Date;&#13;&#10;  DateEnd.Date := Date;&#13;&#10;end;&#13;&#10;&#13;&#10;begin&#13;&#10;&#13;&#10;end." OnStartReport="frxReportOnStartReport" PropData="044C656674023403546F70026C08446174617365747301010C3700000020446174615365743D22667278446174614865616465722220446174615365744E616D653D22C7E0E3EEEBEEE2EEEA20EEF2F7E5F2E02200010C3B00000020446174615365743D225461626C655472616E7A742220446174615365744E616D653D22D2F0E0EDE7E0EAF6E8E820EFEE20EAE0F1F1E8F0E0EC2200010C2500000020446174615365743D225461626C65524D4B2220446174615365744E616D653D22D0CCCA2200010C2B00000020446174615365743D225461626C6553657373696F6E2220446174615365744E616D653D22D1ECE5EDFB2200010C2C00000020446174615365743D22517565727952616E67652220446174615365744E616D653D22C4E8E0EFE0E7EEED220000095661726961626C65730100055374796C650100">
  <TfrxReportPage Name="Page1" PaperWidth="210" PaperHeight="297" PaperSize="9" LeftMargin="10" RightMargin="10" TopMargin="10" BottomMargin="10" ColumnWidth="0" ColumnPositions.Text="" HGuides.Text="" VGuides.Text="">
    <TfrxReportTitle Name="ReportTitle1" Height="56,69295" Left="0" Top="18,89765" Width="718,1107">
      <TfrxMemoView Name="Memo17" Left="0" Top="0" Width="718,1107" Height="18,89765" Font.Charset="1" Font.Color="-16777208" Font.Height="-16" Font.Name="Arial" Font.Style="1" HAlign="haCenter" ParentFont="False" Text="[Заголовок отчета.&#34;Наименование отчета&#34;]"/>
      <TfrxMemoView Name="Memo9" Left="0" Top="18,89765" Width="718,1107" Height="18,89765" Font.Charset="1" Font.Color="-16777208" Font.Height="-13" Font.Name="Arial" Font.Style="0" HAlign="haCenter" ParentFont="False" Text=""/>
      <TfrxMemoView Name="Memo18" Left="0" Top="37,7953" Width="347,71676" Height="18,89765" Font.Charset="1" Font.Color="-16777208" Font.Height="-13" Font.Name="Arial" Font.Style="0" ParentFont="False" Text=""/>
      <TfrxMemoView Name="Memo23" Left="347,71676" Top="37,7953" Width="370,39394" Height="18,89765" Font.Charset="1" Font.Color="-16777208" Font.Height="-13" Font.Name="Arial" Font.Style="0" ParentFont="False" Text=""/>
    </TfrxReportTitle>
    <TfrxPageHeader Name="PageHeader1" Height="52,91342" Left="0" Top="98,26778" Width="718,1107">
      <TfrxMemoView Name="Memo2" Left="0" Top="0" Width="264,5671" Height="52,91342" Font.Charset="1" Font.Color="-16777208" Font.Height="-15" Font.Name="Arial" Font.Style="1" Frame.Typ="5" HAlign="haCenter" ParentFont="False" VAlign="vaCenter" Text="Кассир"/>
      <TfrxMemoView Name="Memo3" Left="264,5671" Top="0" Width="113,38582677" Height="52,91342" Font.Charset="1" Font.Color="-16777208" Font.Height="-15" Font.Name="Arial" Font.Style="1" Frame.Typ="5" HAlign="haCenter" ParentFont="False" VAlign="vaCenter" Text="Количество сторно"/>
      <TfrxMemoView Name="Memo4" Left="377,953" Top="0" Width="113,38582677" Height="52,91342" Font.Charset="1" Font.Color="-16777208" Font.Height="-15" Font.Name="Arial" Font.Style="1" Frame.Typ="5" HAlign="haCenter" ParentFont="False" VAlign="vaCenter" Text="Количество продаж"/>
      <TfrxMemoView Name="Memo5" Left="491,3389" Top="0" Width="113,38582677" Height="52,91342" Font.Charset="1" Font.Color="-16777208" Font.Height="-15" Font.Name="Arial" Font.Style="1" Frame.Typ="5" HAlign="haCenter" ParentFont="False" VAlign="vaCenter" Text="Количество отмененных чеков"/>
      <TfrxMemoView Name="Memo6" Left="604,7248" Top="0" Width="113,38582677" Height="52,91342" Font.Charset="1" Font.Color="-16777208" Font.Height="-15" Font.Name="Arial" Font.Style="1" Frame.Typ="7" HAlign="haCenter" ParentFont="False" VAlign="vaCenter" Text="Количество закрытых чеков"/>
      <TfrxLineView Name="Line1" Left="0" Top="0" Width="718,1107" Height="0" Frame.Typ="4" Frame.Width="2"/>
      <TfrxLineView Name="Line2" Left="0" Top="0" Width="0" Height="52,91342" Frame.Typ="1" Frame.Width="2"/>
      <TfrxLineView Name="Line6" Left="718,1107" Top="0" Width="0" Height="52,91342" Frame.Typ="1" Frame.Width="2"/>
      <TfrxLineView Name="Line9" Left="0" Top="52,91342" Width="718,1107" Height="0" Frame.Typ="4" Frame.Width="2"/>
    </TfrxPageHeader>
    <TfrxMasterData Name="MasterData1" Height="18,89765" Left="0" Top="211,65368" Width="718,1107" ColumnWidth="0" ColumnGap="0" DataSet="TableTranzt" DataSetName="  " RowCount="0">
      <TfrxMemoView Name="Memo8" Left="0" Top="0" Width="264,5671" Height="18,89765" Font.Charset="1" Font.Color="-16777208" Font.Height="-13" Font.Name="Arial" Font.Style="0" Frame.Typ="13" ParentFont="False" Text="[Транзакции по кассирам.&#34;NAME&#34;]"/>
      <TfrxMemoView Name="Memo10" Left="264,5671" Top="0" Width="113,38582677" Height="18,89765" Font.Charset="1" Font.Color="-16777208" Font.Height="-13" Font.Name="Arial" Font.Style="0" Frame.Typ="13" HAlign="haCenter" ParentFont="False" Text="[Транзакции по кассирам.&#34;STORNO&#34;]"/>
      <TfrxMemoView Name="Memo11" Left="377,953" Top="0" Width="113,38582677" Height="18,89765" Font.Charset="1" Font.Color="-16777208" Font.Height="-13" Font.Name="Arial" Font.Style="0" Frame.Typ="13" HAlign="haCenter" ParentFont="False" Text="[Транзакции по кассирам.&#34;REGISTRATION&#34;]"/>
      <TfrxMemoView Name="Memo12" Left="491,3389" Top="0" Width="113,38582677" Height="18,89765" Font.Charset="1" Font.Color="-16777208" Font.Height="-13" Font.Name="Arial" Font.Style="0" Frame.Typ="13" HAlign="haCenter" ParentFont="False" Text="[Транзакции по кассирам.&#34;CANCELCHECK&#34;]"/>
      <TfrxMemoView Name="Memo13" Left="604,7248" Top="0" Width="113,38582677" Height="18,89765" Font.Charset="1" Font.Color="-16777208" Font.Height="-13" Font.Name="Arial" Font.Style="0" Frame.Typ="15" HAlign="haCenter" ParentFont="False" Text="[Транзакции по кассирам.&#34;CLOSECHECK&#34;]"/>
      <TfrxLineView Name="Line3" Left="0" Top="0" Width="0" Height="18,89765" Frame.Typ="1" Frame.Width="2"/>
      <TfrxLineView Name="Line7" Left="718,1107" Top="0" Width="0" Height="18,89765" Frame.Typ="1" Frame.Width="2"/>
    </TfrxMasterData>
    <TfrxIBXQuery Name="TableTranzt" UserName="  " CloseDataSource="True" FieldAliases.Text="" SQL.Text="SELECT  U.NAME,&#13;&#10;       (SELECT COUNT(*)&#13;&#10;             FROM DOCUMENT D LEFT JOIN TRANZT T ON&#13;&#10;                             D.ID = T.DOCUMENTID&#13;&#10;             WHERE&#13;&#10;&#13;&#10;                    D.STATE = 1 AND (D.ISFISCAL = 1) AND&#13;&#10;                    T.TRANZTYPE IN (1,11) AND&#13;&#10;                    T.SELLER = U.code) AS REGISTRATION,&#13;&#10;       (SELECT COUNT(*)&#13;&#10;             FROM DOCUMENT D LEFT JOIN TRANZT T ON&#13;&#10;                             D.ID = T.DOCUMENTID&#13;&#10;             WHERE&#13;&#10;&#13;&#10;                    D.STATE = 1 AND (D.ISFISCAL = 1) AND&#13;&#10;                    T.TRANZTYPE IN (2,12) AND&#13;&#10;                    T.SELLER = U.code) AS STORNO,&#13;&#10;       (SELECT COUNT(*)&#13;&#10;             FROM DOCUMENT D LEFT JOIN TRANZT T ON&#13;&#10;                             D.ID = T.DOCUMENTID&#13;&#10;             WHERE&#13;&#10;&#13;&#10;                    D.STATE IN (2,3) AND (D.ISFISCAL = 1) AND&#13;&#10;                    T.TRANZTYPE IN (54, 56) AND&#13;&#10;                    T.SELLER = U.code) AS CANCELCHECK,&#13;&#10;        (SELECT COUNT(*)&#13;&#10;             FROM DOCUMENT D LEFT JOIN TRANZT T ON&#13;&#10;                             D.ID = T.DOCUMENTID&#13;&#10;             WHERE&#13;&#10;&#13;&#10;                    D.STATE = 1 AND (D.ISFISCAL = 1) AND&#13;&#10;                    T.TRANZTYPE IN (50,51,55) AND&#13;&#10;                    T.SELLER = U.code) AS CLOSECHECK&#13;&#10;FROM  &#34;USER&#34; U" PropData="0A506172616D65746572730100"/>
    <TfrxFooter Name="Footer1" Height="18,89765" Left="0" Top="253,22851" Width="718,1107">
      <TfrxMemoView Name="Memo1" Left="0" Top="0" Width="264,5671" Height="18,89765" Font.Charset="1" Font.Color="-16777208" Font.Height="-16" Font.Name="Arial" Font.Style="1" Frame.Typ="13" ParentFont="False" Text="Итого:"/>
      <TfrxMemoView Name="Memo7" Left="264,5671" Top="0" Width="113,38582677" Height="18,89765" Font.Charset="1" Font.Color="-16777208" Font.Height="-13" Font.Name="Arial" Font.Style="0" Frame.Typ="13" HAlign="haCenter" ParentFont="False" Text="[SUM(&#60;Транзакции по кассирам.&#34;STORNO&#34;&#62;,MasterData1)]"/>
      <TfrxMemoView Name="Memo14" Left="377,953" Top="0" Width="113,38582677" Height="18,89765" Font.Charset="1" Font.Color="-16777208" Font.Height="-13" Font.Name="Arial" Font.Style="0" Frame.Typ="13" HAlign="haCenter" ParentFont="False" Text="[SUM(&#60;Транзакции по кассирам.&#34;REGISTRATION&#34;&#62;,MasterData1)]"/>
      <TfrxMemoView Name="Memo15" Left="491,3389" Top="0" Width="113,38582677" Height="18,89765" Font.Charset="1" Font.Color="-16777208" Font.Height="-13" Font.Name="Arial" Font.Style="0" Frame.Typ="13" HAlign="haCenter" ParentFont="False" Text="[SUM(&#60;Транзакции по кассирам.&#34;CANCELCHECK&#34;&#62;,MasterData1)]"/>
      <TfrxMemoView Name="Memo16" Left="604,7248" Top="0" Width="113,38582677" Height="18,89765" Font.Charset="1" Font.Color="-16777208" Font.Height="-13" Font.Name="Arial" Font.Style="0" Frame.Typ="15" HAlign="haCenter" ParentFont="False" Text="[SUM(&#60;Транзакции по кассирам.&#34;CLOSECHECK&#34;&#62;,MasterData1)]"/>
      <TfrxLineView Name="Line4" Left="0" Top="0" Width="0" Height="18,89765" Frame.Typ="1" Frame.Width="2"/>
      <TfrxLineView Name="Line5" Left="0" Top="18,89765" Width="718,1107" Height="0" Frame.Typ="4" Frame.Width="2"/>
      <TfrxLineView Name="Line8" Left="718,1107" Top="0" Width="0" Height="18,89765" Frame.Typ="1" Frame.Width="2"/>
      <TfrxLineView Name="Line10" Left="0" Top="0" Width="718,1107" Height="0" Frame.Typ="4" Frame.Width="2"/>
    </TfrxFooter>
  </TfrxReportPage>
  <TfrxDialogPage Name="dlgMain" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="0" Visible="False" Height="177" Left="358" Top="188" Width="375" OnShow="dlgMainOnShow">
    <TfrxComboBoxControl Name="cbxRM" Left="120" Top="8" Width="133" Height="21" Color="-16777211" Items.Text="" Style="csDropDownList" ItemIndex="-1"/>
    <TfrxLabelControl Name="Label1" Left="92" Top="12" Width="18" Height="13" Caption=":" Color="-16777201"/>
    <TfrxComboBoxControl Name="cbxRange" Left="120" Top="36" Width="133" Height="21" Color="-16777211" Items.Text="&#13;&#10;&#13;&#10;" Style="csDropDownList" Text="" ItemIndex="0" OnChange="cbxRangeOnChange"/>
    <TfrxLabelControl Name="Label2" Left="88" Top="64" Width="11" Height="13" Caption=":" Color="-16777201"/>
    <TfrxLabelControl Name="Label3" Left="276" Top="64" Width="17" Height="13" Caption=":" Color="-16777201"/>
    <TfrxPanelControl Name="pnl" Left="4" Top="84" Width="357" Height="29" BevelOuter="bvNone" Color="-16777201">
      <TfrxComboBoxControl Name="SesEnd" Left="244" Top="4" Width="77" Height="21" Visible="False" Color="-16777211" Items.Text="" Style="csDropDownList" ItemIndex="-1"/>
      <TfrxComboBoxControl Name="SesBeg" Left="52" Top="4" Width="77" Height="21" Visible="False" Color="-16777211" Items.Text="" Style="csDropDownList" ItemIndex="-1"/>
      <TfrxDateEditControl Name="DateBeg" Left="4" Top="4" Width="81" Height="21" Color="-16777211" Date="39322,6497198843" Time="39322,6497198843"/>
      <TfrxDateEditControl Name="TimeBeg" Left="92" Top="4" Width="69" Height="21" Color="-16777211" Date="39322" Kind="dtkTime" Time="39322"/>
      <TfrxDateEditControl Name="DateEnd" Left="196" Top="4" Width="81" Height="21" Color="-16777211" Date="39322,6499647106" Time="39322,6499647106"/>
      <TfrxDateEditControl Name="TimeEnd" Left="284" Top="4" Width="69" Height="21" Color="-16777211" Date="39322,9999884259" Kind="dtkTime" Time="39322,9999884259"/>
    </TfrxPanelControl>
    <TfrxLabelControl Name="Label4" Left="56" Top="40" Width="53" Height="13" Caption=":" Color="-16777201"/>
    <TfrxButtonControl Name="btnOK" Left="96" Top="120" Width="63" Height="25" Caption="OK" Default="True" ModalResult="1"/>
    <TfrxButtonControl Name="btnCancel" Left="200" Top="120" Width="63" Height="25" Cancel="True" Caption="" ModalResult="2"/>
    <TfrxIBXQuery Name="TableRMK" UserName="" CloseDataSource="True" FieldAliases.Text="" SQL.Text="SELECT CODE, ID FROM RMK&#13;&#10;ORDER BY CODE" PropData="0A506172616D65746572730100"/>
    <TfrxIBXQuery Name="TableSession" UserName="" CloseDataSource="True" FieldAliases.Text="" SQL.Text="SELECT DISTINCT ECRSESSION&#13;&#10;FROM DOCUMENT&#13;&#10;ORDER BY ECRSESSION" PropData="0A506172616D65746572730100"/>
    <TfrxIBXQuery Name="QueryRange" UserName="" CloseDataSource="True" FieldAliases.Text="" SQL.Text="SELECT MIN(D.CLOSEDATE + D.CLOSETIME),&#13;&#10;       MAX(D.CLOSEDATE + D.CLOSETIME)&#13;&#10;FROM DOCUMENT D" PropData="0A506172616D65746572730100"/>
  </TfrxDialogPage>
</TfrxReport>
