<?xml version="1.0" encoding="utf-8" standalone="no"?>
<TfrxReport Version="6.9.2" DotMatrixReport="False" EngineOptions.SilentMode="True" EngineOptions.NewSilentMode="simSilent" IniFile="\Software\Fast Reports" PreviewOptions.Buttons="12287" PreviewOptions.Modal="False" PreviewOptions.Zoom="1" PrintOptions.Printer="Default" PrintOptions.PrintOnSheet="0" ReportOptions.CreateDate="41546.6611873611" ReportOptions.Description.Text="" ReportOptions.LastChange="45687.5855256944" ScriptLanguage="PascalScript" ScriptText.Text="var&#13;&#10;  m0,y0,m_1,ym0,ym1 ,: string ;&#13;&#10;  Line_no: integer ;&#13;&#10;&#13;&#10;procedure DialogPage1OnActivate(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;&#13;&#10;  qry_stock.close ;&#13;&#10;  qry_stock.open ;&#13;&#10;&#13;&#10;&#13;&#10;  cbb_stock.keyvalue:= &#60;MY_STOCK_CODE&#62; ;&#13;&#10;&#13;&#10;  m1.Text:=COPY( DATEtoYMD(&#60;Date&#62;),5,2) ;&#13;&#10;    y1.Text:=COPY( DATEtoYMD(&#60;Date&#62;),1,4) ;&#13;&#10;&#13;&#10;&#13;&#10;end;&#13;&#10;&#13;&#10;procedure DialogPage1OnShow(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;&#13;&#10;end;&#13;&#10;&#13;&#10;&#13;&#10;&#13;&#10;&#13;&#10;&#13;&#10;procedure OnClick(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;&#13;&#10;  if   inttostr(strtoint(m1.text)) = '1' then&#13;&#10;  begin&#13;&#10;&#13;&#10;     m0:='12' ;&#13;&#10;     y0:=inttostr(strtoint(y1.text)-1-543) ;&#13;&#10;     m_1:='01' ;&#13;&#10;&#13;&#10;&#13;&#10;&#13;&#10;  end&#13;&#10;  else&#13;&#10;  begin&#13;&#10;&#13;&#10;    if   length(inttostr(strtoint(m1.text)-1)) = 1 then&#13;&#10;    begin&#13;&#10;      m0:= '0'+inttostr(strtoint(m1.text)-1);&#13;&#10;&#13;&#10;        if   length(inttostr(strtoint(m1.text))) = 1 then  m_1:= '0'+inttostr(strtoint(m1.text))&#13;&#10;        else m_1:= m1.text;&#13;&#10;&#13;&#10;    end&#13;&#10;    else&#13;&#10;    begin&#13;&#10;      m0:= inttostr(strtoint(m1.text)-1);&#13;&#10;      m_1:= m1.text;&#13;&#10;    end;&#13;&#10;&#13;&#10;   y0:=inttostr(strtoint(y1.text)-543) ;&#13;&#10;&#13;&#10;  end;&#13;&#10;&#13;&#10;  ym0:= y0 + m0 ;&#13;&#10;  ym1:=inttostr(strtoint(y1.text)-543)+m_1 ;&#13;&#10;&#13;&#10;&#13;&#10;&#13;&#10; end ;&#13;&#10;&#13;&#10;&#13;&#10;&#13;&#10;&#13;&#10;&#13;&#10;&#13;&#10;&#13;&#10;procedure MasterData1OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;&#13;&#10;  if (&#60;qry_sum_inv.&#34;FW_VALUE&#34;&#62; &#60;0.1) and (&#60;qry_sum_inv.&#34;RCV_VALUE&#34;&#62;&#60;0.1) and (&#60;qry_sum_inv.&#34;DIS_VALUE&#34;&#62;&#60;0.1) and (&#60;qry_sum_inv.&#34;RM_VALUE&#34;&#62;&#60;0.1)&#13;&#10;  then   MasterData1.visible:=False else  MasterData1.visible:=True ;&#13;&#10;&#13;&#10; if   MasterData1.visible then Line_no:=Line_no+1 ;&#13;&#10;&#13;&#10;end;&#13;&#10;&#13;&#10;&#13;&#10;&#13;&#10;procedure qry_sum_invVALUE_ON_HANDOnAfterPrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;    if round(&#60;qry_sum_inv.&#34;FW_VALUE&#34;&#62;+&#60;qry_sum_inv.&#34;RCV_VALUE&#34;&#62;-&#60;qry_sum_inv.&#34;DIS_VALUE&#34;&#62;)&#60;&#62;round(&#60;qry_sum_inv.&#34;RM_VALUE&#34;&#62;)&#13;&#10;     then qry_sum_invVALUE_ON_HAND.font.color:=clRed else   qry_sum_invVALUE_ON_HAND.font.color:=clBlack ;&#13;&#10;end;&#13;&#10;&#13;&#10;begin&#13;&#10;&#13;&#10;end." OnReportPrint="DialogPage1OnActivate">
  <Datasets>
    <item DataSet="qry_sum_inv" DataSetName="qry_sum_inv"/>
    <item DataSet="qry_stock" DataSetName="stock"/>
  </Datasets>
  <Variables>
    <item Name="MY_STOCK_CODE"/>
    <item Name="MY_STOCK_NAME"/>
  </Variables>
  <TfrxDataPage Name="Data" HGuides.Text="" VGuides.Text="" Height="1000" Left="0" Top="0" Width="1000">
    <TfrxUniDACQuery Name="qry_sum_inv" UserName="qry_sum_inv" CloseDataSource="True" FieldAliases.Text="" BCDToCurrency="False" IgnoreDupParams="False" SQL.Text="{IF SQLSERVER}                             &#13;&#10;SELECT T.IS_ED,T.NLEM,SUM(FW_VALUE) as FW_VALUE,SUM(RCV_VALUE) as RCV_VALUE,SUM(DIS_VALUE) as DIS_VALUE,SUM(RM_VALUE) as RM_VALUE&#13;&#10;from (  &#13;&#10;select i.WORKING_CODE,dbo.NLEM(g.IS_ED) as NLEM, g.IS_ED,    &#13;&#10;&#13;&#10;(select top 1 c.REMAIN_VALUE from  CARD c  &#13;&#10;        where &#13;&#10;        /*left(c.R_S_DATE,6)*/ left(dbo.ce2cymd(c.OPERATE_DATE),6) between  left(dbo.ce2cymd(GETDATE()-900),6) and   :ym_fw                         &#13;&#10;        and c.WORKING_CODE=i.WORKING_CODE  and  c.REMAIN_VALUE &#62;=0                                    &#13;&#10;        and c.STOCK_ID=i.DEPT_ID order by c.OPERATE_DATE DESC,c.RECORD_NUMBER DESC ) as FW_VALUE,&#13;&#10;          &#13;&#10;Cx.RCV_VALUE,Cx.DIS_VALUE ,&#13;&#10;      &#13;&#10;(select top 1 c.REMAIN_VALUE from  CARD c  &#13;&#10;        where &#13;&#10;        /*left(c.R_S_DATE,6)*/ left(dbo.ce2cymd(c.OPERATE_DATE),6)  between  left(dbo.ce2cymd(GETDATE()-900),6)   and   :ym1                &#13;&#10;        and c.WORKING_CODE=i.WORKING_CODE   and  c.REMAIN_VALUE &#62;=0           &#13;&#10;        and c.STOCK_ID=i.DEPT_ID order by c.OPERATE_DATE DESC,c.RECORD_NUMBER DESC ) as RM_VALUE,i.TOTAL_VALUE&#13;&#10;          &#13;&#10;from INV_MD i&#13;&#10;left join DRUG_GN g on (i.WORKING_CODE=g.WORKING_CODE)&#13;&#10;left join  (&#13;&#10;   select c1.WORKING_CODE,c1.STOCK_ID,&#13;&#10;          						SUM(CASE when c1.R_S_STATUS in ('R','A','N','O','I','G') then c1.[VALUE]&#13;&#10;                   when c1.R_S_STATUS in ('M','E','B') then c1.[VALUE]*-1        &#13;&#10;                   else NULL end) as RCV_VALUE,&#13;&#10;            						SUM(CASE when c1.R_S_STATUS in ('S','P','D')  then c1.[VALUE] &#13;&#10;	                     									 when (c1.R_S_STATUS in ('C','Z','U')) then c1.[VALUE]*-1 else NULL end) as DIS_VALUE&#13;&#10;            						from CARD c1&#13;&#10;            where c1.STOCK_ID=:dept0     &#13;&#10;            /*and left(c1.R_S_DATE,6)*/ and left(dbo.ce2cymd(c1.OPERATE_DATE),6) = :ym2  &#13;&#10;            group by c1.WORKING_CODE,c1.STOCK_ID ) as Cx on (Cx.WORKING_CODE = i.WORKING_CODE  and Cx.STOCK_ID=i.DEPT_ID)    &#13;&#10;where i.DEPT_ID=:dept  and   g.WORKING_CODE is not null                                                                      &#13;&#10;)  as T&#13;&#10;/*where T.TOTAL_VALUE  &#62; 0.99 */&#13;&#10;/*where   FW_VALUE &#62; 0 and   RCV_VALUE &#62; 0 and   DIS_VALUE &#62; 0 and   RM_VALUE &#62; 0   */                                                                              &#13;&#10;group by T.IS_ED,T.NLEM&#13;&#10;order by T.IS_ED&#13;&#10;&#13;&#10;{ELSE}&#13;&#10;&#13;&#10;&#13;&#10;SELECT T.NLEM,SUM(FW_VALUE) as FW_VALUE,SUM(RCV_VALUE) as RCV_VALUE,SUM(DIS_VALUE) as DIS_VALUE,SUM(RM_VALUE) as RM_VALUE&#13;&#10;from (  &#13;&#10;select i.WORKING_CODE,NLEM(g.IS_ED) as NLEM,&#13;&#10;&#13;&#10;(select  c.REMAIN_VALUE from  CARD c  &#13;&#10;        where &#13;&#10;        left(c.R_S_DATE,6) &#60;=   :ym_fw                         &#13;&#10;        and c.WORKING_CODE=i.WORKING_CODE  and  c.REMAIN_VALUE &#62;=0                                    &#13;&#10;        and c.STOCK_ID=i.DEPT_ID order by c.OPERATE_DATE DESC,c.RECORD_NUMBER DESC limit 1 ) as FW_VALUE,&#13;&#10;          &#13;&#10;Cx.RCV_VALUE,Cx.DIS_VALUE ,&#13;&#10;      &#13;&#10;(select  c.REMAIN_VALUE from  CARD c  &#13;&#10;        where &#13;&#10;        left(c.R_S_DATE,6)  &#60;=   :ym1                &#13;&#10;        and c.WORKING_CODE=i.WORKING_CODE   and  c.REMAIN_VALUE &#62;=0           &#13;&#10;        and c.STOCK_ID=i.DEPT_ID order by c.OPERATE_DATE DESC,c.RECORD_NUMBER DESC limit 1 ) as RM_VALUE,i.TOTAL_VALUE&#13;&#10;          &#13;&#10;from INV_MD i&#13;&#10;left join DRUG_GN g on (i.WORKING_CODE=g.WORKING_CODE)&#13;&#10;left join  (&#13;&#10;   select c1.WORKING_CODE,c1.STOCK_ID,&#13;&#10;          						SUM(CASE when c1.R_S_STATUS in ('R','A','N','O','I','G') then c1.VALUE&#13;&#10;                   when c1.R_S_STATUS in ('M','E','B') then c1.VALUE*-1    &#13;&#10;                   else NULL end) as RCV_VALUE,&#13;&#10;            						SUM(CASE when c1.R_S_STATUS in ('S','P','D')  then c1.VALUE &#13;&#10;	                     									 when (c1.R_S_STATUS in ('C','Z','U')) then c1.VALUE*-1 else NULL end) as DIS_VALUE&#13;&#10;            						from CARD c1&#13;&#10;            where c1.STOCK_ID=:dept0     &#13;&#10;            and left(c1.R_S_DATE,6) = :ym2  &#13;&#10;            group by c1.WORKING_CODE,c1.STOCK_ID ) as Cx on (Cx.WORKING_CODE = i.WORKING_CODE  and Cx.STOCK_ID=i.DEPT_ID)    &#13;&#10;where i.DEPT_ID=:dept  and   g.WORKING_CODE is not null                                                                      &#13;&#10;)  as T&#13;&#10;/*where T.TOTAL_VALUE  &#62; 0.99 */&#13;&#10;/*where   FW_VALUE &#62; 0 and   RCV_VALUE &#62; 0 and   DIS_VALUE &#62; 0 and   RM_VALUE &#62; 0   */                                                                              &#13;&#10;group by T.NLEM  &#13;&#10;&#13;&#10;&#13;&#10;&#13;&#10;{ENDIF}                " SpecificOptions.Text="" PropData="05704C65667402640470546F7002700A506172616D657465727301010632204E616D653D22796D5F6677222044617461547970653D226674537472696E67222045787072657373696F6E3D22796D302200010630204E616D653D22796D31222044617461547970653D226674537472696E67222045787072657373696F6E3D22796D312200010641204E616D653D226465707430222044617461547970653D226674537472696E67222045787072657373696F6E3D226362625F73746F636B2E6B657976616C75652200010630204E616D653D22796D32222044617461547970653D226674537472696E67222045787072657373696F6E3D22796D312200010640204E616D653D2264657074222044617461547970653D226674537472696E67222045787072657373696F6E3D226362625F73746F636B2E6B657976616C75652200010632204E616D653D22796D5F6677222044617461547970653D226674537472696E67222045787072657373696F6E3D22796D302200010630204E616D653D22796D31222044617461547970653D226674537472696E67222045787072657373696F6E3D22796D312200010641204E616D653D226465707430222044617461547970653D226674537472696E67222045787072657373696F6E3D226362625F73746F636B2E6B657976616C75652200010630204E616D653D22796D32222044617461547970653D226674537472696E67222045787072657373696F6E3D22796D312200010640204E616D653D2264657074222044617461547970653D226674537472696E67222045787072657373696F6E3D226362625F73746F636B2E6B657976616C7565220000"/>
    <TfrxUniDACQuery Name="qry_stock" UserName="stock" CloseDataSource="True" FieldAliases.Text="" BCDToCurrency="False" IgnoreDupParams="False" SQL.Text="{IF SQLSERVER}&#13;&#10;  &#13;&#10;select * from DEPT_ID (NOLOCK) where (HIDE='' or HIDE is null or HIDE='N')&#13;&#10;order by DEPT_NAME&#13;&#10;&#13;&#10;{ELSE}&#13;&#10;&#13;&#10;select * from DEPT_ID  where (HIDE='' or HIDE is null or HIDE='N')&#13;&#10;order by DEPT_NAME&#13;&#10;&#13;&#10;{ENDIF}                " SpecificOptions.Text="" PropData="05704C65667402640470546F7003EC000A506172616D65746572730100"/>
  </TfrxDataPage>
  <TfrxReportPage Name="Page1" HGuides.Text="" VGuides.Text="" PaperWidth="210" PaperHeight="297" PaperSize="9" LeftMargin="10" RightMargin="10" TopMargin="10" BottomMargin="10" ColumnWidth="0" ColumnPositions.Text="" Frame.Typ="0" MirrorMode="0" OnBeforePrint="Page1OnBeforePrint">
    <TfrxMasterData Name="MasterData1" FillType="ftBrush" FillGap.Top="0" FillGap.Left="0" FillGap.Bottom="0" FillGap.Right="0" Frame.Typ="0" Height="31.76470588" Left="0" Top="249.44898" Width="718.1107" OnBeforePrint="MasterData1OnBeforePrint" ColumnWidth="0" ColumnGap="0" DataSet="qry_sum_inv" DataSetName="qry_sum_inv" RowCount="0" Stretched="True">
      <TfrxMemoView Name="qry_sum_invIS_ED" AllowVectorExport="True" Left="7.23624" Top="0.67576117" Width="260.01860765" Height="26.45671" DataSet="qry_sum_inv" DataSetName="qry_sum_inv" Font.Charset="1" Font.Color="-16777208" Font.Height="-21" Font.Name="AngsanaUPC" Font.Style="0" Frame.Typ="0" ParentFont="False" Text="[Line_no]. [qry_sum_inv.&#34;NLEM&#34;]">
        <Formats>
          <item/>
          <item/>
        </Formats>
      </TfrxMemoView>
      <TfrxMemoView Name="qry_sum_invVALUE_BFW" AllowVectorExport="True" Left="280.07601235" Top="1.02870235" Width="98.19365942" Height="26.45671" DataSet="qry_sum_inv" DataSetName="qry_sum_inv" DisplayFormat.FormatStr="%2.2n" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="-16777208" Font.Height="-21" Font.Name="AngsanaUPC" Font.Style="0" Frame.Typ="0" HAlign="haRight" ParentFont="False" Text="[qry_sum_inv.&#34;FW_VALUE&#34;]"/>
      <TfrxMemoView Name="qry_sum_invRCV_VALUE" AllowVectorExport="True" Left="393.37013" Top="1" Width="90.70872" Height="26.45671" DataSet="qry_sum_inv" DataSetName="qry_sum_inv" DisplayFormat.FormatStr="%2.2n" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="-16777208" Font.Height="-21" Font.Name="AngsanaUPC" Font.Style="0" Frame.Typ="0" HAlign="haRight" ParentFont="False" Text="[qry_sum_inv.&#34;RCV_VALUE&#34;]"/>
      <TfrxMemoView Name="qry_sum_invSALE_VALUE" AllowVectorExport="True" Left="484.50212824" Top="1" Width="101.29695529" Height="26.45671" DataSet="qry_sum_inv" DataSetName="qry_sum_inv" DisplayFormat.FormatStr="%2.2n" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="-16777208" Font.Height="-21" Font.Name="AngsanaUPC" Font.Style="0" Frame.Typ="0" HAlign="haRight" ParentFont="False" Text="[qry_sum_inv.&#34;DIS_VALUE&#34;]"/>
      <TfrxMemoView Name="qry_sum_invVALUE_ON_HAND" AllowVectorExport="True" Left="594.66424765" Top="1" Width="113.48777706" Height="26.45671" OnAfterPrint="qry_sum_invVALUE_ON_HANDOnAfterPrint" DataSet="qry_sum_inv" DataSetName="qry_sum_inv" DisplayFormat.FormatStr="%2.2n" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="-16777208" Font.Height="-21" Font.Name="AngsanaUPC" Font.Style="0" Frame.Typ="0" HAlign="haRight" ParentFont="False" Text="[qry_sum_inv.&#34;RM_VALUE&#34;]"/>
      <TfrxMemoView Name="Memo12" AllowVectorExport="True" Left="200.31509" Top="1" Width="116.39646765" Height="26.45671" Visible="False" DataSet="qry_sum_inv" DataSetName="qry_sum_inv" DisplayFormat.FormatStr="%2.2n" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="-16777208" Font.Height="-21" Font.Name="AngsanaUPC" Font.Style="0" Frame.Typ="0" ParentFont="False" Text="[&#60;qry_sum_inv.&#34;FW_VALUE&#34;&#62;+&#60;qry_sum_inv.&#34;RCV_VALUE&#34;&#62;-&#60;qry_sum_inv.&#34;DIS_VALUE&#34;&#62;]"/>
    </TfrxMasterData>
    <TfrxPageFooter Name="PageFooter1" FillType="ftBrush" FillGap.Top="0" FillGap.Left="0" FillGap.Bottom="0" FillGap.Right="0" Frame.Typ="0" Height="37.70671" Left="0" Top="778.58318" Width="718.1107"/>
    <TfrxPageHeader Name="PageHeader1" FillType="ftBrush" FillGap.Top="0" FillGap.Left="0" FillGap.Bottom="0" FillGap.Right="0" Frame.Typ="0" Height="147.40167" Left="0" Top="18.89765" Width="718.1107">
      <TfrxMemoView Name="Memo2" AllowVectorExport="True" Left="7.55906" Top="1.22047" Width="699.21305" Height="75.5906" Font.Charset="1" Font.Color="0" Font.Height="-21" Font.Name="AngsanaUPC" Font.Style="1" Frame.Typ="0" HAlign="haCenter" ParentFont="False" Text="สรุปมูลค่าเบิก-จ่ายเวชภัณฑ์ยาตามประเภทบัญชียาหลักแห่งชาติ&#13;&#10;เดือน [MonthThai(strtoint(m1.text),True)]  [y1.text]&#13;&#10;คลัง:  [TRIM(cbb_stock.text)]"/>
      <TfrxMemoView Name="Memo1" AllowVectorExport="True" Left="642.5201" Top="1" Width="75.5906" Height="22.67718" Font.Charset="1" Font.Color="0" Font.Height="-19" Font.Name="AngsanaUPC" Font.Style="0" Frame.Typ="0" HAlign="haRight" ParentFont="False" Text="หน้า [Page#]"/>
      <TfrxLineView Name="Line1" AllowVectorExport="True" Left="1.77953" Top="84.47248" Width="714.33117" Height="0" Color="0" Frame.Color="12632256" Frame.Typ="0" Diagonal="True"/>
      <TfrxLineView Name="Line2" AllowVectorExport="True" Left="2.77953" Top="144.14966" Width="714.33117" Height="0" Color="0" Frame.Color="12632256" Frame.Typ="0" Diagonal="True"/>
      <TfrxMemoView Name="Memo4" AllowVectorExport="True" Left="73.5906" Top="99.91342" Width="105.82684" Height="30.23624" Font.Charset="1" Font.Color="0" Font.Height="-21" Font.Name="AngsanaUPC" Font.Style="1" Frame.Typ="0" HAlign="haCenter" ParentFont="False" Text="ประเภทบัญชียา"/>
      <TfrxMemoView Name="Memo7" AllowVectorExport="True" Left="302.5671" Top="112.47248" Width="83.14966" Height="30.23624" Font.Charset="1" Font.Color="0" Font.Height="-21" Font.Name="AngsanaUPC" Font.Style="0" Frame.Typ="0" HAlign="haCenter" ParentFont="False" VAlign="vaCenter" Text="ยอดยกมา"/>
      <TfrxLineView Name="Line3" AllowVectorExport="True" Left="297.21274" Top="113.26778" Width="419.52783" Height="0" Color="0" Frame.Color="12632256" Frame.Typ="0" Diagonal="True"/>
      <TfrxMemoView Name="Memo11" AllowVectorExport="True" Left="392.49629" Top="112.25201" Width="90.70872" Height="30.23624" Font.Charset="1" Font.Color="0" Font.Height="-21" Font.Name="AngsanaUPC" Font.Style="0" Frame.Typ="0" HAlign="haCenter" ParentFont="False" VAlign="vaCenter" Text="รับเข้าคลัง"/>
      <TfrxMemoView Name="Memo17" AllowVectorExport="True" Left="587.99258" Top="112.47248" Width="120.94496" Height="30.23624" Font.Charset="1" Font.Color="0" Font.Height="-21" Font.Name="AngsanaUPC" Font.Style="0" Frame.Typ="0" HAlign="haCenter" ParentFont="False" VAlign="vaCenter" Text="คงเหลือ ณ สิ้นเดือน"/>
      <TfrxMemoView Name="Memo8" AllowVectorExport="True" Left="487.22078" Top="112.94496" Width="98.26778" Height="30.23624" Font.Charset="1" Font.Color="0" Font.Height="-21" Font.Name="AngsanaUPC" Font.Style="0" Frame.Typ="0" HAlign="haCenter" ParentFont="False" VAlign="vaCenter" Text="จ่ายออกจากคลัง"/>
      <TfrxMemoView Name="Memo9" AllowVectorExport="True" Left="469.66172" Top="79.70872" Width="60.47248" Height="30.23624" Font.Charset="1" Font.Color="0" Font.Height="-21" Font.Name="AngsanaUPC" Font.Style="0" Frame.Typ="0" HAlign="haCenter" ParentFont="False" VAlign="vaCenter" Text="มูลค่า"/>
    </TfrxPageHeader>
    <TfrxHeader Name="Header1" FillType="ftBrush" FillGap.Top="0" FillGap.Left="0" FillGap.Bottom="0" FillGap.Right="0" Frame.Typ="0" Height="0" Left="0" Top="226.7718" Width="718.1107"/>
    <TfrxReportSummary Name="ReportSummary1" FillType="ftBrush" FillGap.Top="0" FillGap.Left="0" FillGap.Bottom="0" FillGap.Right="0" Frame.Typ="0" Height="415.7483" Left="0" Top="340.1577" Width="718.1107">
      <TfrxLineView Name="Line4" AllowVectorExport="True" Left="0" Top="10.77953" Width="718.1107" Height="0" Color="0" Frame.Color="12632256" Frame.Typ="0" Diagonal="True"/>
      <TfrxLineView Name="Line5" AllowVectorExport="True" Left="0" Top="44.7953" Width="718.1107" Height="0" Color="0" Frame.Color="12632256" Frame.Typ="0" Diagonal="True"/>
      <TfrxMemoView Name="Memo21" AllowVectorExport="True" Left="68.03154" Top="10.77953" Width="105.82684" Height="30.23624" Font.Charset="1" Font.Color="0" Font.Height="-21" Font.Name="AngsanaUPC" Font.Style="1" Frame.Typ="0" HAlign="haCenter" ParentFont="False" Text="รวม"/>
      <TfrxMemoView Name="Memo3" AllowVectorExport="True" Left="278.82352941" Top="11.60700588" Width="98.19365942" Height="26.45671" DataSet="qry_sum_inv" DataSetName="qry_sum_inv" DisplayFormat.FormatStr="%2.2n" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="-16777208" Font.Height="-21" Font.Name="AngsanaUPC" Font.Style="0" Frame.Typ="0" HAlign="haRight" ParentFont="False" Text="[SUM(&#60;qry_sum_inv.&#34;FW_VALUE&#34;&#62;,MasterData1)]"/>
      <TfrxMemoView Name="Memo5" AllowVectorExport="True" Left="384.20564588" Top="11.2540647" Width="98.26778" Height="26.45671" DataSet="qry_sum_inv" DataSetName="qry_sum_inv" DisplayFormat.FormatStr="%2.2n" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="-16777208" Font.Height="-21" Font.Name="AngsanaUPC" Font.Style="0" Frame.Typ="0" HAlign="haRight" ParentFont="False" Text="[SUM(&#60;qry_sum_inv.&#34;RCV_VALUE&#34;&#62;,MasterData1)]"/>
      <TfrxMemoView Name="Memo6" AllowVectorExport="True" Left="485.13199824" Top="11.60700588" Width="101.29695529" Height="26.45671" DataSet="qry_sum_inv" DataSetName="qry_sum_inv" DisplayFormat.FormatStr="%2.2n" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="-16777208" Font.Height="-21" Font.Name="AngsanaUPC" Font.Style="0" Frame.Typ="0" HAlign="haRight" ParentFont="False" Text="[SUM(&#60;qry_sum_inv.&#34;DIS_VALUE&#34;&#62;,MasterData1)]"/>
      <TfrxMemoView Name="Memo10" AllowVectorExport="True" Left="595.29411765" Top="11.60700588" Width="113.48777706" Height="26.45671" DataSet="qry_sum_inv" DataSetName="qry_sum_inv" DisplayFormat.FormatStr="%2.2n" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="-16777208" Font.Height="-21" Font.Name="AngsanaUPC" Font.Style="0" Frame.Typ="0" HAlign="haRight" ParentFont="False" Text="[SUM(&#60;qry_sum_inv.&#34;RM_VALUE&#34;&#62;,MasterData1)]"/>
      <TfrxMemoView Name="Memo13" AllowVectorExport="True" Left="268.34663" Top="200.31509" Width="389.29159" Height="177.63791" Font.Charset="1" Font.Color="0" Font.Height="-21" Font.Name="AngsanaUPC" Font.Style="0" Frame.Typ="0" HAlign="haCenter" ParentFont="False" VAlign="vaCenter" Text="&#13;&#10;&#13;&#10;          ลงชื่อ .......................................................ผู้รายงาน&#13;&#10;        (............................................................)&#13;&#10;       ตำแหน่ง................................................&#13;&#10;       วันที่รายงาน........................................."/>
      <TfrxMemoView Name="Memo15" AllowVectorExport="True" Left="34.01577" Top="102.04731" Width="374.17347" Height="94.48825" Font.Charset="1" Font.Color="0" Font.Height="-21" Font.Name="AngsanaUPC" Font.Style="1" Frame.Typ="0" ParentFont="False" Text="สรุปอัตราคงคลัง (ยา)  = ........................ เดือน&#13;&#10;&#13;&#10;สรุปอัตราคงคลัง (วัสดุเภสัชกรรม)  = ........................ เดือน"/>
      <TfrxMemoView Name="Memo14" AllowVectorExport="True" Left="268.34663" Top="377.953" Width="423.30736" Height="177.63791" Font.Charset="1" Font.Color="0" Font.Height="-21" Font.Name="AngsanaUPC" Font.Style="0" Frame.Typ="0" HAlign="haCenter" ParentFont="False" VAlign="vaCenter" Text="&#13;&#10;             ลงชื่อ ......................................................หัวหน้างาน&#13;&#10;        (............................................................)&#13;&#10;       ตำแหน่ง................................................&#13;&#10;       วันที่ตรวจสอบข้อมูล........................................."/>
    </TfrxReportSummary>
  </TfrxReportPage>
  <TfrxDialogPage Name="DialogPage1" Font.Charset="1" Font.Color="-16777208" Font.Height="-13" Font.Name="Arial" Font.Style="0" HGuides.Text="" VGuides.Text="" Caption="สรุปบริหารคลัง (ยกมา รับ จ่าย คงเหลือ)" DoubleBuffered="False" Height="300" ClientHeight="268" Left="487" Top="191" Width="521" Scaled="True" ClientWidth="515" OnActivate="DialogPage1OnActivate">
    <TfrxDBLookupComboBox Name="cbb_stock" Left="130" Top="97" Width="333" Height="37" Font.Charset="0" Font.Color="-16777208" Font.Height="-21" Font.Name="AngsanaUPC" Font.Style="0" ParentFont="False" ShowHint="True" DataSet="qry_stock" DataSetName="stock" ListField="DEPT_NAME" KeyField="DEPT_ID" DropDownWidth="0" DropDownRows="7"/>
    <TfrxBitBtnControl Name="" Left="216" Top="172" Width="87" Height="33" Font.Charset="0" Font.Color="-16777208" Font.Height="-21" Font.Name="AngsanaUPC" Font.Style="0" ParentFont="False" ShowHint="True" Glyph.PropData="04446174610AE2010000DE010000424DDE01000000000000760000002800000024000000120000000100040000000000680100000000000000000000100000000000000000000000000080000080000000808000800000008000800080800000C0C0C000808080000000FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF003333333333333333333333333333333333330000333333333333333333333333F3333333333300003333344333333333333333388F3333333333000033334224333333333333338338F3333333330000333422224333333333333833338F3333333300003342222224333333333383333338F3333333000034222A22224333333338F338F3338F33333300003222A3A2224333333338F3838F338F33333300003A2A333A222433333338F83338F338F33333000033A33333A222433333338333338F338F33330000333333333A222433333333333338F338F33300003333333333A222433333333333338F338F33000033333333333A222433333333333338F338F30000333333333333A222433333333333338F338F00003333333333333A224333333333333338F38F000033333333333333A223333333333333338F830000333333333333333A3333333333333333383300003333333333333333333333333333333333330000" Kind="bkOK" Caption="OK" ModalResult="1" NumGlyphs="2" OnClick="OnClick"/>
    <TfrxLabelControl Name="Label3" Left="70" Top="100" Width="51" Height="29" Font.Charset="0" Font.Color="-16777208" Font.Height="-21" Font.Name="AngsanaUPC" Font.Style="0" ParentFont="False" ShowHint="True" Caption="เลือกคลัง" Color="16768462"/>
    <TfrxEditControl Name="m1" Left="130" Top="60" Width="61" Height="25" ShowHint="True" Color="-16777211" MaxLength="0" PasswordChar="0" Text="02"/>
    <TfrxLabelControl Name="Label2" Left="91" Top="57" Width="30" Height="29" Font.Charset="0" Font.Color="-16777208" Font.Height="-21" Font.Name="AngsanaUPC" Font.Style="0" ParentFont="False" ShowHint="True" Caption="เดือน" Color="16768462"/>
    <TfrxLabelControl Name="Label6" Left="214" Top="56" Width="9" Height="29" Font.Charset="0" Font.Color="-16777208" Font.Height="-21" Font.Name="AngsanaUPC" Font.Style="0" ParentFont="False" ShowHint="True" Caption="ปี" Color="16768462"/>
    <TfrxEditControl Name="y1" Left="234" Top="60" Width="81" Height="25" ShowHint="True" Color="-16777211" MaxLength="0" PasswordChar="0" Text="2557"/>
  </TfrxDialogPage>
</TfrxReport>
