<?xml version="1.0" encoding="utf-8" standalone="no"?>
<TfrxReport Version="2025.1.4" DotMatrixReport="False" EngineOptions.IgnoreDevByZero="True" EngineOptions.IgnoreExprError="True" IniFile="\Software\Fast Reports" PreviewOptions.AllowEdit="False" PreviewOptions.Buttons="4095" PreviewOptions.Zoom="1" PrintOptions.Printer="Varsayılan" PrintOptions.PrintOnSheet="0" ReportOptions.ConnectionName="mytemp" ReportOptions.CreateDate="39603,7392302431" ReportOptions.Description.Text="" ReportOptions.Name="Tarih ve Silo Seçimli Günün En Yüksek Isı Ölçüm Raporu (Sıkışık)" ReportOptions.LastChange="46097,4216982755" ScriptLanguage="PascalScript" ScriptText.Text="procedure Button1OnClick(Sender: TfrxComponent);&#13;&#10;var&#13;&#10;Sql :string;&#13;&#10;i :integer;&#13;&#10;begin&#13;&#10;&#13;&#10;Sql :='';&#13;&#10;for i:=0 to  SILOSLIST.Items.Count -1 do&#13;&#10;if SILOSLIST.Checked[i] then&#13;&#10;  begin&#13;&#10;      if (Sql&#60;&#62;'') then&#13;&#10;       Sql := Sql+ ' OR '&#13;&#10;       else&#13;&#10;       Sql  := ' ( ';&#13;&#10;       Sql  := Sql+ ' SILONO = '+SILOSLIST.Items[i]+'';&#13;&#10;    end;&#13;&#10;    Sql := Sql +' ) ';&#13;&#10;&#13;&#10;SILOS.SQL.Text := 'SELECT * FROM C_SILOS WHERE '+Sql;&#13;&#10;TEMPLOG.Filter := Sql;&#13;&#10;TEMPLOG.Filtered :=True;&#13;&#10;end;&#13;&#10;&#13;&#10;&#13;&#10;var&#13;&#10;i :integer ;&#13;&#10;&#13;&#10;&#13;&#10;procedure Button3OnClick(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  for  i:=0 to SILOSLIST.Items.Count-1 do&#13;&#10;begin&#13;&#10;SILOSLIST.Checked(i):=true;&#13;&#10;end;&#13;&#10;&#13;&#10;end;&#13;&#10;&#13;&#10;procedure Button4OnClick(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  for  i:=0 to SILOSLIST.Items.Count-1 do&#13;&#10;begin&#13;&#10;SILOSLIST.Checked(i):=false;&#13;&#10;end;&#13;&#10;&#13;&#10;end;&#13;&#10;&#13;&#10;begin&#13;&#10;SILOS.First;&#13;&#10;for  i:=0 to SILOS.RecordCount-1 do&#13;&#10;begin&#13;&#10;SILOSLIST.Items.Add(SILOS.FieldByName('SILONO').AsString);&#13;&#10;SILOS.Next;&#13;&#10;end;&#13;&#10;&#13;&#10;&#13;&#10;&#13;&#10;DATEEDIT.Date := Date();&#13;&#10;SecimDlg.Caption := &#60;DLG2&#62;;&#13;&#10;Label1.Caption := &#60;DATELABEL&#62;;&#13;&#10;Label2.Caption := &#60;SILOSLABEL&#62;;&#13;&#10;Button1.Caption := &#60;BTNOK&#62;;&#13;&#10;Button2.Caption := &#60;BTNCANCEL&#62;;&#13;&#10;Button3.Caption := &#60;BTNSELECTALL&#62;;&#13;&#10;Button4.Caption := &#60;BTNUNSELECTALL&#62;;&#13;&#10;&#13;&#10;&#13;&#10;C_TEMPLOGSILONO_.Text:= &#60;HDR4&#62;+'[TEMPLOG.&#34;SILONO&#34;]';&#13;&#10;C_TEMPLOGCABLENO_.Text:= &#60;HDR12&#62;+'[TEMPLOG.&#34;CABLENO&#34;]';&#13;&#10;&#13;&#10;Memo8.Text := &#60;HDR1&#62;;&#13;&#10;Memo10.Text := &#60;HDR2&#62;;&#13;&#10;Memo12.Text := &#60;HDR3&#62;;&#13;&#10;Memo13.Text := &#60;COMPANY&#62;;&#13;&#10;end." StoreInDFM="False">
  <Datasets>
    <item DataSet="TEMPLOG" DataSetName="TEMPLOG"/>
    <item DataSet="SILOS" DataSetName="SILOS"/>
  </Datasets>
  <Variables>
    <item Name=" APP"/>
    <item Name="DLG1" Value="'Tarih Seçiniz'"/>
    <item Name="DLG2" Value="'Lütfen Tarih ve Silo Seçiniz'"/>
    <item Name="DATELABEL" Value="'Tarih'"/>
    <item Name="SILOSLABEL" Value="'Silolar'"/>
    <item Name="READLABEL" Value="'Okuma Saatleri'"/>
    <item Name="BTNOK" Value="'Tamam'"/>
    <item Name="BTNCANCEL" Value="'İptal'"/>
    <item Name="BTNSELECTALL" Value="'Tümünü Seç'"/>
    <item Name="BTNUNSELECTALL" Value="'Tümünü Bırak'"/>
    <item Name="HDR1" Value="'Isı Ölçümleri Raporu'"/>
    <item Name="HDR2" Value="'Seçilen Tarih:'"/>
    <item Name="HDR3" Value="'Rapor Tarihi:'"/>
    <item Name="HDR4" Value="'Silo No:'"/>
    <item Name="HDR5" Value="'Tanımı:'"/>
    <item Name="HDR6" Value="'Çap:'"/>
    <item Name="HDR7" Value="'Kablo Sayısı'"/>
    <item Name="HDR8" Value="'Uyarı Isısı'"/>
    <item Name="HDR9" Value="'Alarm Isısı'"/>
    <item Name="HDR10" Value="'Alarm Isısı'"/>
    <item Name="HDR11" Value="'Sensör No'"/>
    <item Name="HDR12" Value="'Kablo No'"/>
    <item Name="HDR13" Value="'Hata Raporu'"/>
    <item Name="HDR14" Value="'Hata Kodu'"/>
    <item Name="HDR15" Value="'Hata Açıklaması'"/>
    <item Name="HDR16" Value="'Sıcaklık'"/>
    <item Name="HDR17" Value="'Nem'"/>
    <item Name="COMPANY" Value="'MYSİLO TARIM ÜRÜNLERİ LİSANSLI DEPOCULUK A.Ş. KIRKLARELİ ŞUBESİ'"/>
  </Variables>
  <TfrxDataPage Name="Data" HGuides.Text="" VGuides.Text="" Height="1000" Left="0" Top="0" Width="1000">
    <TfrxADOQuery Name="TEMPLOG" UserName="TEMPLOG" CloseDataSource="False" BCDToCurrency="False" DataSetOptions="0" Left="136" Top="92" IgnoreDupParams="False" SQL.Text="SELECT     SILONO AS SILONO, CABLENO AS CABLENO, SENSORNO AS SENSORNO, DATE_ AS DATE_, MAX(TEMP_) AS TEMP_,MAX(HUMIDITY) AS HUMIDITY_,&#13;&#10;MAX(NORMAL)AS NORMAL,MAX(WARNA)AS WARNA,MAX(ALARM)AS ALARM                                    &#13;&#10;FROM         C_TEMPLOG&#13;&#10;WHERE DATE_=:DATES AND SENSORNO &#60;&#62; - 1                                                                     &#13;&#10;GROUP BY SILONO, CABLENO, SENSORNO, DATE_&#13;&#10;ORDER BY SILONO, CABLENO, SENSORNO                                      " CommandTimeout="30" LockType="ltReadOnly">
      <FieldDefs>
        <item FieldName="SILONO" FieldAlias="SILONO"/>
        <item FieldName="CABLENO" FieldAlias="CABLENO"/>
        <item FieldName="SENSORNO" FieldAlias="SENSORNO"/>
        <item FieldName="DATE_" FieldAlias="DATE_" FieldType="fftDateTime"/>
        <item FieldName="TEMP_" FieldAlias="TEMP_"/>
        <item FieldName="NORMAL" FieldAlias="NORMAL"/>
        <item FieldName="WARNA" FieldAlias="WARNA"/>
        <item FieldName="ALARM" FieldAlias="ALARM"/>
        <item FieldName="HUMIDITY_"/>
      </FieldDefs>
      <Parameters>
        <item Name="DATES" DataType="ftDateTime" Expression="DateToStr(DATEEDIT.Date)"/>
      </Parameters>
    </TfrxADOQuery>
    <TfrxADOQuery Name="SILOS" UserName="SILOS" CloseDataSource="False" BCDToCurrency="False" DataSetOptions="0" Left="48" Top="92" IgnoreDupParams="False" SQL.Text="SELECT * FROM C_SILOS&#13;&#10;                                    " CommandTimeout="30" LockType="ltReadOnly">
      <FieldDefs>
        <item FieldName="LOGICALREF" FieldAlias="LOGICALREF"/>
        <item FieldName="SILONO" FieldAlias="SILONO"/>
        <item FieldName="SILODESC" FieldAlias="SILODESC" FieldType="fftString" Size="20"/>
        <item FieldName="SILORADIUS" FieldAlias="SILORADIUS"/>
        <item FieldName="CARDREF" FieldAlias="CARDREF"/>
        <item FieldName="CABLECOUNT" FieldAlias="CABLECOUNT"/>
        <item FieldName="MIN_TEMP" FieldAlias="MIN_TEMP"/>
        <item FieldName="WARNING_TEMPA" FieldAlias="WARNING_TEMPA"/>
        <item FieldName="WARNING_TEMPB" FieldAlias="WARNING_TEMPB"/>
        <item FieldName="ALARM_TEMP" FieldAlias="ALARM_TEMP"/>
        <item FieldName="REGCODE" FieldAlias="REGCODE" FieldType="fftString"/>
      </FieldDefs>
    </TfrxADOQuery>
  </TfrxDataPage>
  <TfrxReportPage Name="Page1" HGuides.Text="" VGuides.Text="" PaperWidth="210" PaperHeight="297" PaperSize="9" LeftMargin="10" RightMargin="10" TopMargin="10" BottomMargin="10" Columns="6" ColumnWidth="31,7" ColumnPositions.Text="0&#13;&#10;31,70&#13;&#10;63,30&#13;&#10;95&#13;&#10;126,70&#13;&#10;158,30" Duplex="dmVertical" Frame.Typ="0" MirrorMode="0">
    <TfrxPageFooter Name="PageFooter1" FillType="ftBrush" FillGap.Top="0" FillGap.Left="0" FillGap.Bottom="0" FillGap.Right="0" Frame.Typ="0" Height="22,67718" Left="0" Top="287,24428" Width="718,1107">
      <TfrxSysMemoView Name="SysMemo3" AllowVectorExport="True" Left="574,48856" Top="0" Width="136,06308" Height="18,89765" Font.Charset="162" Font.Color="-16777208" Font.Height="-9" Font.Name="Tahoma" Font.Style="1" Frame.Typ="0" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="[PAGE#] / [TOTALPAGES#]"/>
    </TfrxPageFooter>
    <TfrxPageHeader Name="PageHeader1" FillType="ftBrush" FillGap.Top="0" FillGap.Left="0" FillGap.Bottom="0" FillGap.Right="0" Frame.Typ="0" Height="86,92919" Left="0" Top="18,89765" Width="718,1107">
      <TfrxMemoView Name="Memo8" AllowVectorExport="True" Left="3,77953" Top="50,77953" Width="291,02381" Height="18,89765" DisplayFormat.DecimalSeparator="." Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="0" HAlign="haCenter" ParentFont="False" WordWrap="False" VAlign="vaCenter" Text="Isı Ölçümleri Raporu"/>
      <TfrxSysMemoView Name="SysMemo1" AllowVectorExport="True" Left="631,18151" Top="50,77953" Width="83,14966" Height="18,89765" AutoWidth="True" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="0" Frame.Typ="0" HAlign="haCenter" ParentFont="False" VAlign="vaCenter" Text="[DATE] [TIME]"/>
      <TfrxMemoView Name="Memo10" AllowVectorExport="True" Left="340,1577" Top="50,77953" Width="86,92919" Height="18,89765" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="-16777208" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="0" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="Seçilen Tarih:"/>
      <TfrxMemoView Name="Memo11" AllowVectorExport="True" Left="434,64595" Top="50,77953" Width="83,14966" Height="18,89765" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="-16777208" Font.Height="-11" Font.Name="Tahoma" Font.Style="0" Frame.Typ="0" HAlign="haCenter" ParentFont="False" VAlign="vaCenter" Text="[DateToStr(DATEEDIT.Date)]"/>
      <TfrxMemoView Name="Memo12" AllowVectorExport="True" Left="540,47279" Top="50,77953" Width="83,14966" Height="18,89765" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="-16777208" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="0" HAlign="haCenter" ParentFont="False" VAlign="vaCenter" Text="Rapor Tarihi :"/>
      <TfrxMemoView Name="Memo13" Align="baWidth" AllowVectorExport="True" Left="0" Top="11,33859" Width="718,110717773438" Height="18,89765" ContentScaleOptions.Constraints.MaxIterationValue="0" ContentScaleOptions.Constraints.MinIterationValue="0" Font.Charset="1" Font.Color="-16777208" Font.Height="-16" Font.Name="Arial" Font.Style="1" Frame.Typ="0" HAlign="haCenter" ParentFont="False" RTLReading="True" VAlign="vaCenter" Text="[&#60;COMPANY&#62;]"/>
    </TfrxPageHeader>
    <TfrxGroupHeader Name="GroupHeader1" FillType="ftBrush" FillGap.Top="0" FillGap.Left="0" FillGap.Bottom="0" FillGap.Right="0" Frame.Typ="0" Height="18,89765" Left="0" Top="166,29932" Width="119,811101" AllowSplit="True" Condition="&#60;TEMPLOG.&#34;SILONO&#34;&#62;+&#60;TEMPLOG.&#34;CABLENO&#34;&#62;" KeepTogether="True" ReprintOnNewPage="True">
      <TfrxMemoView Name="C_TEMPLOGSILONO_" AllowVectorExport="True" Left="0" Top="0" Width="34,01574803" Height="18,89765" ContentScaleOptions.Constraints.MaxIterationValue="0" ContentScaleOptions.Constraints.MinIterationValue="0" DataSetName="C_TEMPLOG" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-8" Font.Name="tahoma" Font.Style="0" Frame.Typ="15" Fill.BackColor="14211288" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="Silo:[TEMPLOG.&#34;SILONO&#34;]"/>
      <TfrxMemoView Name="C_TEMPLOGCABLENO_" AllowVectorExport="True" Left="35,1496063" Top="0" Width="71,81101874" Height="18,89765" ContentScaleOptions.Constraints.MaxIterationValue="0" ContentScaleOptions.Constraints.MinIterationValue="0" DataSetName="C_TEMPLOG" Font.Charset="1" Font.Color="0" Font.Height="-8" Font.Name="tahoma" Font.Style="0" Frame.Typ="14" Fill.BackColor="14211288" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="Kablo[TEMPLOG.&#34;CABLENO&#34;]"/>
    </TfrxGroupHeader>
    <TfrxMasterData Name="MasterData1" FillType="ftBrush" FillGap.Top="0" FillGap.Left="0" FillGap.Bottom="0" FillGap.Right="0" Frame.Typ="0" Height="18,89765" Left="0" Top="207,87415" Width="119,811101" AllowSplit="True" ColumnWidth="0" ColumnGap="0" DataSet="TEMPLOG" DataSetName="TEMPLOG" KeepChild="True" KeepFooter="True" KeepHeader="True" RowCount="0" Stretched="True">
      <TfrxMemoView Name="C_TEMPLOGSENSORNO" AllowVectorExport="True" Left="0" Top="0" Width="34,01574803" Height="18,89765" ContentScaleOptions.Constraints.MaxIterationValue="0" ContentScaleOptions.Constraints.MinIterationValue="0" DataSetName="C_TEMPLOG" Font.Charset="1" Font.Color="0" Font.Height="-9" Font.Name="tahoma" Font.Style="0" Frame.Typ="15" Fill.BackColor="14211288" HAlign="haRight" ParentFont="False" SuppressRepeated="True" VAlign="vaCenter" Text="S[TEMPLOG.&#34;SENSORNO&#34;]"/>
      <TfrxMemoView Name="C_TEMPLOGTEMP_" AllowVectorExport="True" Left="35,1496063" Top="0" Width="39,68503937" Height="18,89765" ContentScaleOptions.Constraints.MaxIterationValue="0" ContentScaleOptions.Constraints.MinIterationValue="0" DataField="TEMP_" DataSet="TEMPLOG" DataSetName="TEMPLOG" Font.Charset="1" Font.Color="0" Font.Height="-9" Font.Name="tahoma" Font.Style="0" Frame.Typ="14" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="[TEMPLOG.&#34;TEMP_&#34;]">
        <Highlights>
          <item Font.Charset="1" Font.Color="16777215" Font.Height="-9" Font.Name="Arial" Font.Style="0" Condition="Value&#62;=StrToFloat(&#60;TEMPLOG.&#34;ALARM&#34;&#62;)" FillType="ftBrush" Fill.BackColor="255" Frame.Typ="0" uin="1"/>
          <item Font.Charset="1" Font.Color="0" Font.Height="-9" Font.Name="Arial" Font.Style="0" Condition="Value&#62;=StrToFloat(&#60;TEMPLOG.&#34;WARNA&#34;&#62;)" FillType="ftBrush" Fill.BackColor="65535" Frame.Typ="0" uin="2"/>
          <item Font.Charset="1" Font.Color="0" Font.Height="-9" Font.Name="Arial" Font.Style="0" Condition="Value&#60;=StrToFloat(&#60;TEMPLOG.&#34;NORMAL&#34;&#62;)" FillType="ftBrush" Fill.BackColor="16629143" Frame.Typ="0" uin="3"/>
        </Highlights>
      </TfrxMemoView>
      <TfrxMemoView Name="Memo1" AllowVectorExport="True" Left="74,45669291" Top="0" Width="32,12597937" Height="18,89765" ContentScaleOptions.Constraints.MaxIterationValue="0" ContentScaleOptions.Constraints.MinIterationValue="0" DataField="HUMIDITY_" DataSet="TEMPLOG" DataSetName="TEMPLOG" DisplayFormat.FormatStr="%g" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-9" Font.Name="tahoma" Font.Style="0" Frame.Typ="14" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="[TEMPLOG.&#34;HUMIDITY_&#34;]"/>
    </TfrxMasterData>
  </TfrxReportPage>
  <TfrxDialogPage Name="SecimDlg" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="0" HGuides.Text="" VGuides.Text="" Caption="Seçimlerinizi Yapınızı" DoubleBuffered="False" Height="501" ClientHeight="462" Left="412" Top="141" Width="250" Scaled="True" ClientWidth="234">
    <TfrxDateEditControl Name="DATEEDIT" Left="88" Top="8" Width="145" Height="21" ShowHint="True" Color="-2147483643" Date="39613" Time="0,643507175896957" WeekNumbers="False" OnChange="DATEEDITOnChange"/>
    <TfrxButtonControl Name="Button1" Left="4" Top="432" Width="75" Height="25" ShowHint="True" Caption="Tamam" ModalResult="1" OnClick="Button1OnClick"/>
    <TfrxLabelControl Name="Label1" Left="48" Top="12" Width="24" Height="13" ShowHint="True" Caption="Tarih" Color="-16777201"/>
    <TfrxButtonControl Name="Button2" Left="160" Top="432" Width="75" Height="25" ShowHint="True" Caption="İptal" ModalResult="2"/>
    <TfrxCheckListBoxControl Name="SILOSLIST" Left="4" Top="52" Width="229" Height="325" ShowHint="True" Color="-16777211" Items.Text=""/>
    <TfrxLabelControl Name="Label2" Left="8" Top="32" Width="28" Height="13" ShowHint="True" Caption="Silolar" Color="-16777201" OnClick="Label2OnClick"/>
    <TfrxButtonControl Name="Button3" Left="8" Top="380" Width="75" Height="25" ShowHint="True" Caption="Tümünü Seç" OnClick="Button3OnClick"/>
    <TfrxButtonControl Name="Button4" Left="156" Top="380" Width="75" Height="25" ShowHint="True" Caption="Tümünü Bırak" OnClick="Button4OnClick"/>
  </TfrxDialogPage>
</TfrxReport>
