<?xml version="1.0" encoding="UTF-8"?>
<ActiveReportsLayout Version="3.1" PrintWidth="6122.268" DocumentName="ARNet Document" ScriptLang="VB.NET" MasterReport="0">
  <StyleSheet>
    <Style Name="Normal" Value="font-family: Arial; font-style: normal; text-decoration: none; font-weight: normal; font-size: 10pt; color: Black" />
    <Style Name="Heading1" Value="font-size: 16pt; font-weight: bold" />
    <Style Name="Heading2" Value="font-family: Times New Roman; font-size: 14pt; font-weight: bold; font-style: italic" />
    <Style Name="Heading3" Value="font-size: 13pt; font-weight: bold" />
  </StyleSheet>
  <Sections>
    <Section Type="Detail" Name="Detail" Height="10786.39" BackColor="16777215">
      <Control Type="AR.Image" Name="Picture1" Visible="0" Left="103.1811" Top="0" Width="6089.952" Height="10453.61" LineWeight="0">[encoded data, 58196 characters]</Control>
      <Control Type="AR.Field" Name="TextBox11" BorderLeftStyle="1" BorderTopStyle="1" BorderRightStyle="1" BorderBottomStyle="1" Left="311.811" Top="6678.992" Width="4348.347" Height="725.1028" Text="" />
      <Control Type="AR.Field" Name="Ryuchi" Left="4071.686" Top="9234.709" Width="894.0471" Height="260.2205" Text="留置&#xD;&#xA;" Multiline="0" CanGrow="0" Style="color: Black; font-family: ＭＳ ゴシック; font-size: 7pt; font-weight: bold; text-align: center; text-justify: auto; vertical-align: middle; white-space: nowrap; ddo-char-set: 1; ddo-font-vertical: none" />
      <Control Type="AR.Field" Name="Ryuchi_Kikan" Left="4071.686" Top="9494.93" Width="894.0471" Height="255.6859" Text="7日間" Multiline="0" CanGrow="0" Style="color: Black; font-family: ＭＳ ゴシック; font-size: 7pt; font-weight: bold; text-align: center; text-justify: auto; vertical-align: middle; white-space: nowrap; ddo-char-set: 1; ddo-font-vertical: none" />
      <Control Type="AR.Shape" Name="Ryuchi_Shape" Left="4071.685" Top="9234.709" Width="894.0475" Height="515.9057" BackColor="16777215" RoundingRadius="9.999999" />
      <Control Type="AR.Field" Name="Daikin_Matome3" Left="876.4724" Top="9841.323" Width="3134.552" Height="515.9057" Text="代金引換まとめ送金" Multiline="0" CanGrow="0" Style="background-color: Black; color: White; font-family: ＭＳ ゴシック; font-size: 12pt; font-weight: bold; text-align: center; vertical-align: middle; ddo-char-set: 1" />
      <Control Type="AR.Field" Name="Kyokumado3" Left="876.4724" Top="9234.709" Width="3141.354" Height="515.9057" Text="郵便局窓口受取サービス" Multiline="0" CanGrow="0" Style="background-color: Black; color: White; font-family: ＭＳ ゴシック; font-size: 12pt; font-weight: bold; text-align: center; vertical-align: middle; ddo-char-set: 1" />
      <Control Type="AR.Shape" Name="Shape1" BorderLeftStyle="1" BorderTopStyle="1" BorderRightStyle="1" BorderBottomStyle="1" Left="3075.024" Top="7467.589" Width="1585.134" Height="792.5681" BackColor="16777215" RoundingRadius="9.999999" />
      <Control Type="AR.Barcode" Name="KokyakuQRCode" DataField="kokyaku_qr_value" Left="3935.056" Top="5636.977" Width="850.3936" Height="850.3936" BarStyle="24" Text="YPH:01,609448540352,1410022,20121211,54,145,,;" AutoSize="0" Font="ＭＳ ゴシック" FontSize="8" QRCode="Err=M" CODE128="0;0;0" />
      <Control Type="AR.Field" Name="KokyakuQRCodeLabel" Left="4779.213" Top="5695.937" Width="170.0788" Height="737.0079" Text="↓顧客コード↓" Style="font-family: MS Gothic; font-size: 5pt; text-align: left; vertical-align: middle; white-space: inherit; ddo-char-set: 1; ddo-font-vertical: true" />
      <Control Type="AR.Field" Name="TextBox60" BorderLeftStyle="1" BorderTopStyle="1" BorderRightStyle="1" BorderBottomStyle="1" Left="178.0158" Top="332.2195" Width="4628.41" Height="1387.843" Text="" />
      <Control Type="AR.Field" Name="TextBox62" BorderLeftStyle="1" BorderTopStyle="1" BorderRightStyle="1" BorderBottomStyle="1" Left="311.811" Top="5625.638" Width="5715.213" Height="1052.22" Text="" Style="font-size: 6pt" />
      <Control Type="AR.Field" Name="Kyokumado1" Left="1138.394" Top="3.352761E-07" Width="3384.567" Height="270" Text="郵便局窓口受取サービス" CanGrow="0" Style="background-color: Black; color: White; font-family: ＭＳ ゴシック; font-size: 9pt; font-weight: bold; text-align: center; vertical-align: middle; white-space: nowrap; ddo-char-set: 128" />
      <Control Type="AR.Field" Name="TextBox64" BorderLeftStyle="1" BorderTopStyle="1" BorderRightStyle="1" BorderBottomStyle="1" Left="178.0158" Top="332.2195" Width="266.4567" Height="1387.843" Text="お届け先" Style="font-family: ＭＳ ゴシック; font-size: 8.25pt; text-align: center; vertical-align: middle; ddo-char-set: 128" />
      <Control Type="AR.Field" Name="TextBox61" BorderLeftStyle="1" BorderTopStyle="1" BorderRightStyle="1" BorderBottomStyle="1" Left="178.0157" Top="1720.063" Width="4628.41" Height="878.741" Text="" />
      <Control Type="AR.Field" Name="TextBox65" BorderLeftStyle="1" BorderTopStyle="1" BorderRightStyle="1" BorderBottomStyle="1" Left="178.0157" Top="1720.063" Width="266.4567" Height="878.741" Text="ご依頼主" Style="font-family: ＭＳ ゴシック; font-size: 8.25pt; text-align: center; vertical-align: middle; ddo-char-set: 128" />
      <Control Type="AR.Field" Name="TextBox22" BorderLeftStyle="1" BorderTopStyle="1" BorderRightStyle="1" BorderBottomStyle="1" Left="3096.567" Top="2594.834" Width="1522.205" Height="226.7717" Text="お客さま専用番号" CanGrow="0" Style="font-family: ＭＳ ゴシック; font-size: 7pt; text-align: left; vertical-align: middle; white-space: nowrap; ddo-char-set: 1" PaddingTop="1" />
      <Control Type="AR.Field" Name="TextBox23" BorderLeftStyle="1" BorderTopStyle="1" BorderRightStyle="1" BorderBottomStyle="1" Left="178.0153" Top="2600.505" Width="1522.205" Height="226.7717" Text="お問合せ番号" CanGrow="0" Style="font-family: ＭＳ ゴシック; font-size: 7pt; text-align: left; vertical-align: middle; white-space: nowrap; ddo-char-set: 1" PaddingTop="1" />
      <Control Type="AR.Field" Name="kokyaku_senyo_no_1" DataField="kokyaku_senyo_no" BorderLeftStyle="1" BorderTopStyle="1" BorderRightStyle="1" BorderBottomStyle="1" Left="4618.771" Top="2594.834" Width="1392.946" Height="226.7717" Text="123456789012345" CanGrow="0" Style="font-family: ＭＳ ゴシック; font-size: 7pt; text-align: left; vertical-align: middle; white-space: nowrap; ddo-char-set: 1" />
      <Control Type="AR.Field" Name="tracking_no_fmt_1" DataField="tracking_no_fmt" BorderLeftStyle="1" BorderTopStyle="1" BorderRightStyle="1" BorderBottomStyle="1" Left="1700.22" Top="2600.505" Width="1392.946" Height="226.7717" Text="XXXX-XXXX-XXXX" CanGrow="0" Style="font-family: ＭＳ ゴシック; font-size: 7pt; text-align: left; vertical-align: middle; white-space: nowrap; ddo-char-set: 1" />
      <Control Type="AR.Field" Name="TextBox39" BorderLeftStyle="1" BorderTopStyle="1" BorderRightStyle="1" BorderBottomStyle="1" Left="178.0153" Top="2827.276" Width="730.2048" Height="226.7717" Text="品名" CanGrow="0" Style="font-family: ＭＳ ゴシック; font-size: 7pt; text-align: center; vertical-align: middle; white-space: nowrap; ddo-char-set: 1; ddo-font-vertical: true" />
      <Control Type="AR.Field" Name="TextBox20" BorderLeftStyle="1" BorderTopStyle="1" BorderRightStyle="1" BorderBottomStyle="1" Left="178.0153" Top="3054.048" Width="730.2048" Height="453.5437" Text="発送元" CanGrow="0" Style="font-family: ＭＳ ゴシック; font-size: 7pt; text-align: center; vertical-align: middle; white-space: nowrap; ddo-char-set: 1; ddo-font-vertical: true" />
      <Control Type="AR.Field" Name="Daikin_Matome1" Left="293.1024" Top="4280.315" Width="2851.655" Height="227.3385" Text="代金引換まとめ送金" CanGrow="0" Style="background-color: Black; color: White; font-family: ＭＳ ゴシック; font-size: 8.25pt; font-weight: bold; text-align: center; vertical-align: middle; white-space: nowrap; ddo-char-set: 128" />
      <Control Type="AR.Field" Name="Kyokumado2" Left="278.3622" Top="4622.173" Width="2444.599" Height="270" Text="郵便局窓口受取サービス" CanGrow="0" Style="background-color: Black; color: White; font-family: ＭＳ ゴシック; font-size: 8.5pt; font-weight: bold; text-align: center; vertical-align: middle; white-space: nowrap; ddo-char-set: 1" />
      <Control Type="AR.Field" Name="shohin_nm001_1" DataField="shohin_nm001" BorderLeftStyle="1" BorderTopStyle="1" BorderRightStyle="1" BorderBottomStyle="1" Left="908.2202" Top="2827.276" Width="5103.497" Height="226.7717" Text="商品名１" CanGrow="0" Style="font-family: ＭＳ ゴシック; font-size: 7.5pt; text-align: left; vertical-align: middle; white-space: nowrap; ddo-char-set: 1" />
      <Control Type="AR.Field" Name="TextBox50" Left="2777.386" Top="4622.173" Width="1065.827" Height="269.8583" Text="ゆうパック" CanGrow="0" Style="font-family: ＭＳ ゴシック; font-size: 9pt; font-weight: bold; text-align: center; vertical-align: middle; white-space: nowrap; ddo-char-set: 128" />
      <Control Type="AR.Barcode" Name="barOkurijoNO11" DataField="tracking_no_barcode" Left="310.1102" Top="3640.252" Width="2834.646" Height="595.2756" BarStyle="16" Text="A999999999999A" CaptionPos="2" Checksum="0" Font="ＭＳ ゴシック" FontSize="5" CODE128="0;0;0" />
      <Control Type="AR.Field" Name="shiwake_no_fmt" DataField="shiwake_no_fmt" Left="1841.953" Top="5060.977" Width="1927.559" Height="453.5437" Text="99-99-99" CanGrow="0" Style="font-family: ＭＳ ゴシック; font-size: 19.5pt; font-weight: bold; text-align: left; vertical-align: top; white-space: nowrap; ddo-char-set: 1" PaddingLeft="3" />
      <Control Type="AR.Barcode" Name="BarSivakeNO11" DataField="shiwake_no_barcode" Left="293.1022" Top="5060.977" Width="1417.323" Height="453.5433" BarStyle="11" Text="999999" Font="ＭＳ ゴシック" FontSize="6" CODE128="0;0;0" />
      <Control Type="AR.Field" Name="yoyakuBox" BorderLeftStyle="7" BorderTopStyle="7" BorderRightStyle="7" BorderBottomStyle="7" Left="5691.97" Top="5625.638" Width="335.0549" Height="350.3622" Text=" " />
      <Control Type="AR.Field" Name="TextBox14" Left="5691.97" Top="5625.638" Width="335.0549" Height="350.3622" Text="Y" Style="font-family: ＭＳ ゴシック; font-size: 9.75pt; font-weight: bold; text-align: center; vertical-align: middle; ddo-char-set: 128" />
      <Control Type="AR.Field" Name="TextBox40" BorderLeftStyle="1" BorderTopStyle="1" BorderRightStyle="1" BorderBottomStyle="1" Left="4918.112" Top="5625.638" Width="221.6679" Height="1052.22" Text="受領印" Style="font-family: ＭＳ ゴシック; font-size: 7pt; font-weight: normal; vertical-align: middle; ddo-char-set: 1" />
      <Control Type="AR.Field" Name="TextBox73" BorderLeftStyle="1" BorderTopStyle="1" BorderRightStyle="1" BorderBottomStyle="1" Left="311.811" Top="5625.638" Width="296.504" Height="1052.22" Text="お届け先" Style="font-family: ＭＳ ゴシック; font-size: 7pt; text-align: center; vertical-align: middle; ddo-char-set: 1" />
      <Control Type="AR.Field" Name="TextBox72" BorderLeftStyle="1" BorderTopStyle="1" BorderRightStyle="1" BorderBottomStyle="1" Left="311.811" Top="6678.992" Width="296.504" Height="725.1027" Text="ご依頼主" Style="font-family: ＭＳ ゴシック; font-size: 7pt; text-align: center; vertical-align: middle; ddo-char-set: 1" />
      <Control Type="AR.Barcode" Name="Barcode1" DataField="tracking_no_barcode" Left="311.811" Top="7467.589" Width="2551.181" Height="566.9291" BarStyle="16" Text="D202905385701D" CaptionPos="2" Checksum="0" Font="ＭＳ ゴシック" FontSize="7" CODE128="0;0;0" />
      <Control Type="AR.Field" Name="receiver_adr_2_1" DataField="receiver_adr_2" Left="444.96" Top="807.8401" Width="3683.339" Height="187.0866" Text="お届先住所２" CanGrow="0" Style="font-family: ＭＳ ゴシック; font-size: 7.2pt; vertical-align: middle; white-space: nowrap; ddo-char-set: 1" />
      <Control Type="AR.Field" Name="zip_Label_1" Left="443.5201" Top="347.04" Width="223.937" Height="274.8813" Text="〒" CanGrow="0" Style="font-family: ＭＳ ゴシック; font-size: 10pt; text-align: center; vertical-align: middle; white-space: nowrap; ddo-char-set: 1" />
      <Control Type="AR.Field" Name="receiver_nm_2_1" DataField="receiver_nm_2" Left="444.96" Top="1533.6" Width="3685.606" Height="187.0866" Text="お届先名称２" Multiline="0" CanGrow="0" Style="font-family: ＭＳ ゴシック; font-size: 7.2pt; vertical-align: middle; white-space: nowrap; ddo-char-set: 1; ddo-font-vertical: none" />
      <Control Type="AR.Field" Name="receiver_nm_1_1" DataField="receiver_nm_1" Left="444.96" Top="1346.4" Width="3685.606" Height="187.0866" Text="お届先名称１" CanGrow="0" Style="font-family: ＭＳ ゴシック; font-size: 7.2pt; vertical-align: middle; white-space: nowrap; ddo-char-set: 1" />
      <Control Type="AR.Field" Name="receiver_adr_3_1" DataField="receiver_adr_3" Left="444.96" Top="995.04" Width="3685.606" Height="187.0866" Text="お届先住所３" CanGrow="0" Style="font-family: ＭＳ ゴシック; font-size: 7.2pt; vertical-align: middle; white-space: nowrap; ddo-char-set: 1" />
      <Control Type="AR.Field" Name="receiver_zip_1" DataField="receiver_zip" Left="668.4095" Top="346.9606" Width="875.9056" Height="288.0794" Text="999-9999" OutputFormat="000-0000" CanGrow="0" Style="font-family: ＭＳ ゴシック; font-size: 10pt; text-align: left; vertical-align: middle; white-space: nowrap; ddo-char-set: 1" />
      <Control Type="AR.Field" Name="kokyaku_zip_1" DataField="kokyaku_zip" Left="668.4095" Top="1704.756" Width="885.6342" Height="243.3602" Text="999-9999" OutputFormat="000-0000" CanGrow="0" Style="font-family: ＭＳ ゴシック; font-size: 10pt; text-align: left; vertical-align: middle; white-space: nowrap; ddo-char-set: 1" />
      <Control Type="AR.Field" Name="zip_Label_2" Left="443.3386" Top="1689.449" Width="223.937" Height="274.9607" Text="〒" CanGrow="0" Style="font-family: ＭＳ ゴシック; font-size: 10pt; vertical-align: middle; white-space: nowrap; ddo-char-set: 1" />
      <Control Type="AR.Field" Name="kokyaku_adr_1_1" DataField="kokyaku_adr_1" Left="444.96" Top="1899.36" Width="3325.04" Height="171.2127" Text="依頼主住所1" CanGrow="0" Style="font-family: ＭＳ ゴシック; font-size: 6pt; vertical-align: middle; white-space: nowrap; ddo-char-set: 1" />
      <Control Type="AR.Field" Name="zip_Label_3" Left="608.3149" Top="5625.638" Width="202.3938" Height="175.7477" Text="〒" CanGrow="0" Style="font-family: ＭＳ ゴシック; font-size: 6pt; text-align: center; vertical-align: middle; white-space: nowrap; ddo-char-set: 1" />
      <Control Type="AR.Field" Name="receiver_zip_2" DataField="receiver_zip" Left="811.2756" Top="5610.331" Width="767.645" Height="220.7624" Text="999-9999" OutputFormat="000-0000" CanGrow="0" Style="font-family: ＭＳ ゴシック; font-size: 8pt; text-align: left; vertical-align: middle; white-space: nowrap; ddo-char-set: 1" />
      <Control Type="AR.Field" Name="zip_Label_4" Left="608.3149" Top="6677.857" Width="180.2835" Height="150.8021" Text="〒" CanGrow="0" Style="font-family: ＭＳ ゴシック; font-size: 6pt; text-align: center; vertical-align: middle; ddo-char-set: 1" />
      <Control Type="AR.Field" Name="todoke_keisho_kbn_nm_1" DataField="todoke_keisho_kbn_nm" Left="4130.079" Top="1518.236" Width="379.843" Height="187.0866" Text="御中" CanGrow="0" Style="font-family: ＭＳ ゴシック; font-size: 7pt; text-align: right; vertical-align: middle; white-space: nowrap; ddo-char-set: 1" />
      <Control Type="AR.Field" Name="goirai_keisho_kbn_nm_1" DataField="goirai_keisho_kbn_nm" Left="3800.693" Top="2427.591" Width="329.3856" Height="171.2126" Text="御中" CanGrow="0" Style="font-family: ＭＳ ゴシック; font-size: 6pt; text-align: right; vertical-align: middle; white-space: nowrap; ddo-char-set: 1" />
      <Control Type="AR.Field" Name="todoke_keisho_kbn_nm_2" DataField="todoke_keisho_kbn_nm" Left="3600" Top="6515.717" Width="328.8194" Height="175.7477" Text="御中" CanGrow="0" Style="font-family: ＭＳ ゴシック; font-size: 6pt; text-align: right; vertical-align: middle; white-space: nowrap; ddo-char-set: 1" />
      <Control Type="AR.Field" Name="goirai_keisho_kbn_nm_2" DataField="goirai_keisho_kbn_nm" Left="3306.898" Top="7268.031" Width="272.1259" Height="150.8042" Text="御中" CanGrow="0" Style="font-family: ＭＳ ゴシック; font-size: 4.7pt; text-align: right; vertical-align: middle; white-space: nowrap; ddo-char-set: 1" />
      <Control Type="AR.Label" Name="Label4" Left="4937.954" Top="372.4724" Width="1108.914" Height="1961.008" Caption="* * * * *&#xD;&#xA;* * * * *&#xD;&#xA;* * * * *&#xD;&#xA;* * * * *&#xD;&#xA;* * * * *&#xD;&#xA;* * * * *&#xD;&#xA;* * * * *" Style="font-family: ＭＳ ゴシック; font-size: 11.25pt; text-align: center; text-justify: auto; vertical-align: top; ddo-char-set: 128; ddo-font-vertical: none" LineSpacing="3" />
      <Control Type="AR.Label" Name="Label1" Left="4937.954" Top="6742.488" Width="1108.914" Height="1961.008" Caption="* * * * *&#xD;&#xA;* * * * *&#xD;&#xA;* * * * *&#xD;&#xA;* * * * *&#xD;&#xA;* * * * *&#xD;&#xA;* * * * *&#xD;&#xA;* * * * *" Style="font-family: ＭＳ ゴシック; font-size: 11.25pt; text-align: center; text-justify: auto; vertical-align: top; ddo-char-set: 128; ddo-font-vertical: none" LineSpacing="2.5" />
      <Control Type="AR.Field" Name="TextBox25" BorderLeftStyle="1" BorderTopStyle="1" BorderRightStyle="1" BorderBottomStyle="1" Left="908.2202" Top="3054.048" Width="5103.497" Height="453.5436" Text="" CanGrow="0" Style="font-family: ＭＳ ゴシック; font-size: 7pt; text-align: left; vertical-align: middle; white-space: nowrap; ddo-char-set: 1" />
      <Control Type="AR.Field" Name="TextBox21" DataField="hassomoto2" Left="908.2202" Top="3280.819" Width="5103.497" Height="226.7717" Text="発送元２" CanGrow="0" Style="font-family: ＭＳ ゴシック; font-size: 7pt; text-align: left; vertical-align: middle; white-space: nowrap; ddo-char-set: 1" />
      <Control Type="AR.Field" Name="TextBox8" DataField="hassomoto1" Left="908.2202" Top="3054.048" Width="5103.497" Height="226.7717" Text="〒１００－０００１　東京都千代田区千代田０－０－０" CanGrow="0" Style="font-family: ＭＳ ゴシック; font-size: 7pt; text-align: left; vertical-align: middle; white-space: nowrap; ddo-char-set: 1" />
      <Control Type="AR.Field" Name="kokyaku_zip_2" DataField="kokyaku_zip" Left="789.1653" Top="6652.913" Width="767.6221" Height="220.5354" Text="000-0000" OutputFormat="000-0000" CanGrow="0" Style="font-family: ＭＳ ゴシック; font-size: 8pt; text-align: left; vertical-align: middle; white-space: nowrap" />
      <Control Type="AR.Field" Name="leteral1" DataField="leteral1" Left="1536.945" Top="8140.536" Width="367.3705" Height="198.4251" Text="YR01" CanGrow="0" Style="font-family: MS Gothic; font-size: 6pt; text-align: center; vertical-align: middle; white-space: nowrap; ddo-char-set: 1" />
      <Control Type="AR.Field" Name="TextBox28" Left="1904.315" Top="8140.536" Width="809.0078" Height="198.4251" Text="（10年保存）" CanGrow="0" Style="font-family: MS Gothic; font-size: 6pt; text-align: center; vertical-align: middle; white-space: nowrap; ddo-char-set: 1" />
      <Control Type="AR.Field" Name="TODSHITEINM_KNJ14" Left="444.4725" Top="8140.536" Width="1092.473" Height="198.4252" Text="日本郵便株式会社" Multiline="0" CanGrow="0" Style="font-family: ＭＳ ゴシック; font-size: 6pt; text-align: center; vertical-align: middle; ddo-char-set: 1" />
      <Control Type="AR.Field" Name="receiver_adr_1_1" DataField="receiver_adr_1" Left="444.96" Top="635.04" Width="3685.606" Height="187.0866" Text="お届先住所１" CanGrow="0" Style="font-family: ＭＳ ゴシック; font-size: 7.2pt; vertical-align: middle; white-space: nowrap; ddo-char-set: 1" />
      <Control Type="AR.Field" Name="kokyaku_adr_1_2" DataField="kokyaku_adr_1" Left="607.748" Top="6798.047" Width="2698.583" Height="150.8028" Text="依頼主住所1" CanGrow="0" Style="font-family: ＭＳ ゴシック; font-size: 4.7pt; vertical-align: middle; white-space: nowrap; ddo-char-set: 1" />
      <Control Type="AR.Field" Name="kokyaku_adr_2_2" DataField="kokyaku_adr_2" Left="607.6801" Top="6912" Width="2698.583" Height="150.8028" Text="依頼主住所2" CanGrow="0" Style="font-family: ＭＳ ゴシック; font-size: 4.7pt; vertical-align: middle; white-space: nowrap; ddo-char-set: 1" />
      <Control Type="AR.Field" Name="kokyaku_adr_3_2" DataField="kokyaku_adr_3" Left="607.6801" Top="7011.361" Width="2698.583" Height="150.8028" Text="依頼主住所3" CanGrow="0" Style="font-family: ＭＳ ゴシック; font-size: 4.7pt; vertical-align: middle; white-space: nowrap; ddo-char-set: 1" />
      <Control Type="AR.Field" Name="kokyaku_nm_1_2" DataField="kokyaku_nm_1" Left="608.3149" Top="7138.772" Width="2698.583" Height="150.8035" Text="依頼主名称1" CanGrow="0" Style="font-family: ＭＳ ゴシック; font-size: 4.7pt; vertical-align: middle; white-space: nowrap; ddo-char-set: 1" />
      <Control Type="AR.Field" Name="kokyaku_nm_2_2" DataField="kokyaku_nm_2" Left="608.3149" Top="7252.158" Width="2698.583" Height="150.8028" Text="依頼主名称2" Multiline="0" CanGrow="0" Style="font-family: ＭＳ ゴシック; font-size: 4.7pt; vertical-align: middle; white-space: nowrap; ddo-char-set: 1" />
      <Control Type="AR.Field" Name="receiver_nm_2_2" DataField="receiver_nm_2" Left="608.3149" Top="6500.977" Width="3118.11" Height="175.748" Text="お届先名称２" Multiline="0" CanGrow="0" Style="font-family: ＭＳ ゴシック; font-size: 6pt; vertical-align: middle; white-space: nowrap; ddo-char-set: 1" />
      <Control Type="AR.Field" Name="receiver_nm_1_2" DataField="receiver_nm_1" Left="608.3149" Top="6347.904" Width="3118.11" Height="175.748" Text="お届先名称１" CanGrow="0" Style="font-family: ＭＳ ゴシック; font-size: 6pt; vertical-align: middle; white-space: nowrap; ddo-char-set: 1" />
      <Control Type="AR.Field" Name="receiver_adr_3_2" DataField="receiver_adr_3" Left="608.315" Top="6048" Width="3118.11" Height="175.748" Text="お届先住所３" CanGrow="0" Style="font-family: ＭＳ ゴシック; font-size: 6pt; vertical-align: middle; white-space: nowrap; ddo-char-set: 1" />
      <Control Type="AR.Field" Name="receiver_adr_2_2" DataField="receiver_adr_2" Left="608.315" Top="5909.669" Width="3118.11" Height="175.748" Text="お届先住所２" CanGrow="0" Style="font-family: ＭＳ ゴシック; font-size: 6pt; vertical-align: middle; white-space: nowrap; ddo-char-set: 1" />
      <Control Type="AR.Field" Name="receiver_adr_1_2" DataField="receiver_adr_1" Left="608.3149" Top="5771.338" Width="3118.11" Height="175.748" Text="お届先住所１" CanGrow="0" Style="font-family: ＭＳ ゴシック; font-size: 6pt; vertical-align: middle; white-space: nowrap; ddo-char-set: 1" />
      <Control Type="AR.Field" Name="kokyaku_adr_2_1" DataField="kokyaku_adr_2" Left="444.4724" Top="2019.968" Width="3325.04" Height="171.2126" Text="依頼主住所2" CanGrow="0" Style="font-family: ＭＳ ゴシック; font-size: 6pt; vertical-align: middle; white-space: nowrap; ddo-char-set: 1" />
      <Control Type="AR.Field" Name="kokyaku_adr_3_1" DataField="kokyaku_adr_3" Left="444.4724" Top="2156.031" Width="3325.04" Height="189.9213" Text="依頼主住所3" CanGrow="0" Style="font-family: ＭＳ ゴシック; font-size: 6pt; vertical-align: middle; white-space: nowrap; ddo-char-set: 1" />
      <Control Type="AR.Field" Name="kokyaku_nm_1_1" DataField="kokyaku_nm_1" Left="444.4724" Top="2306.268" Width="3325.04" Height="171.2126" Text="依頼主名称1" CanGrow="0" Style="font-family: ＭＳ ゴシック; font-size: 6pt; vertical-align: middle; white-space: nowrap; ddo-char-set: 1" />
      <Control Type="AR.Field" Name="kokyaku_nm_2_1" DataField="kokyaku_nm_2" Left="444.4722" Top="2442.331" Width="3325.04" Height="171.2126" Text="依頼主名称2" Multiline="0" CanGrow="0" Style="font-family: ＭＳ ゴシック; font-size: 6pt; vertical-align: middle; white-space: nowrap; ddo-char-set: 1" />
      <Control Type="AR.Field" Name="TextBox9" BorderLeftStyle="1" BorderTopStyle="1" BorderRightStyle="1" BorderBottomStyle="1" Left="5691.97" Top="5625.638" Width="335.0549" Height="350.3622" Text=" " Style="font-size: 1pt" />
      <Control Type="AR.Field" Name="Daikin_Matome2" Left="293.1024" Top="8443.843" Width="2569.89" Height="227.3385" Text="代金引換まとめ送金" CanGrow="0" Style="background-color: Black; color: White; font-family: ＭＳ ゴシック; font-size: 8.25pt; font-weight: bold; text-align: center; vertical-align: middle; white-space: nowrap; ddo-char-set: 128" />
      <Control Type="AR.Shape" Name="Shape21" BorderLeftStyle="1" BorderTopStyle="1" BorderRightStyle="1" BorderBottomStyle="1" Left="3769.512" Top="3640.252" Width="1796.598" Height="867.4015" BackColor="16777215" RoundingRadius="9.999999" />
      <Control Type="AR.Field" Name="TextBox13" Left="3769.512" Top="3640.252" Width="1796.598" Height="213.7325" Text="代金引換金額" Multiline="0" CanGrow="0" Style="background-color: Black; color: White; font-family: ＭＳ ゴシック; font-size: 7.2pt; font-weight: bold; text-align: center; vertical-align: middle; ddo-char-set: 1" />
      <Control Type="AR.Field" Name="TextBox82" Left="4910.173" Top="3952.063" Width="247.7482" Height="199.5592" Text="円" Multiline="0" CanGrow="0" Style="color: Black; font-family: ＭＳ ゴシック; font-size: 7.2pt; font-weight: normal; text-align: left; vertical-align: bottom; ddo-char-set: 1" />
      <Control Type="AR.Field" Name="TextBox83" DataField="payment_amt" Left="4011.024" Top="3937.323" Width="899.1496" Height="209.7638" Text="9,999,999" OutputFormat="#,##0" Multiline="0" CanGrow="0" Style="color: Black; font-family: ＭＳ ゴシック; font-size: 8pt; font-weight: normal; text-align: right; vertical-align: bottom; ddo-char-set: 1" />
      <Control Type="AR.Field" Name="TextBox19" Left="5249.197" Top="4235.528" Width="276.0943" Height="197.2911" Text="円）" Multiline="0" CanGrow="0" Style="font-family: ＭＳ ゴシック; font-size: 7.2pt; text-align: left; vertical-align: middle; white-space: nowrap; ddo-char-set: 1" />
      <Control Type="AR.Field" Name="TextBox15" DataField="payment_tax" Left="4619.339" Top="4235.528" Width="629.8599" Height="197.2914" Text="999,999" OutputFormat="#,##0" Multiline="0" CanGrow="0" Style="color: Black; font-family: ＭＳ ゴシック; font-size: 7.2pt; font-weight: normal; text-align: right; vertical-align: middle; ddo-char-set: 1" />
      <Control Type="AR.Field" Name="TextBox16" Left="3739.465" Top="4235.528" Width="913.8899" Height="197.2914" Text="（内消費税額" Multiline="0" CanGrow="0" Style="font-family: ＭＳ ゴシック; font-size: 7.2pt; text-align: left; vertical-align: middle; white-space: nowrap; ddo-char-set: 1" />
      <Control Type="AR.Field" Name="TextBox17" DataField="payment_amt" Left="3253.606" Top="7747.653" Width="899.1496" Height="209.7638" Text="9,999,999" OutputFormat="#,##0" Multiline="0" CanGrow="0" Style="color: Black; font-family: ＭＳ ゴシック; font-size: 8pt; font-weight: normal; text-align: right; vertical-align: bottom; ddo-char-set: 1" />
      <Control Type="AR.Field" Name="TextBox18" Left="4419.78" Top="8008.44" Width="276.0943" Height="197.2911" Text="円）" Multiline="0" CanGrow="0" Style="font-family: ＭＳ ゴシック; font-size: 7.2pt; text-align: left; vertical-align: middle; white-space: nowrap; ddo-char-set: 1" />
      <Control Type="AR.Field" Name="TextBox24" Left="3075.024" Top="7467.589" Width="1585.134" Height="213.7328" Text="代金引換金額" Multiline="0" CanGrow="0" Style="background-color: Black; color: White; font-family: ＭＳ ゴシック; font-size: 7.2pt; font-weight: bold; text-align: center; vertical-align: middle; ddo-char-set: 1" />
      <Control Type="AR.Field" Name="TextBox26" DataField="payment_tax" Left="3724.725" Top="8008.44" Width="712.063" Height="197.2911" Text="999,999" OutputFormat="#,##0" Multiline="0" CanGrow="0" Style="color: Black; font-family: ＭＳ ゴシック; font-size: 7.2pt; font-weight: normal; text-align: right; vertical-align: middle; ddo-char-set: 1" />
      <Control Type="AR.Field" Name="TextBox27" Left="3006.426" Top="8008.44" Width="913.8898" Height="197.2911" Text="（内消費税額" Multiline="0" CanGrow="0" Style="font-family: ＭＳ ゴシック; font-size: 7.2pt; text-align: left; vertical-align: middle; white-space: nowrap; ddo-char-set: 1" />
      <Control Type="AR.Field" Name="TextBox29" Left="4152.756" Top="7762.394" Width="247.7482" Height="199.5591" Text="円" Multiline="0" CanGrow="0" Style="color: Black; font-family: ＭＳ ゴシック; font-size: 7.2pt; font-weight: normal; text-align: left; vertical-align: bottom; ddo-char-set: 1" />
      <Control Type="AR.Field" Name="TxtTel03" Left="1675.276" Top="1734.803" Width="405.9213" Height="170.0788" Text="TEL:" CanGrow="0" Style="font-family: ＭＳ ゴシック; font-size: 6.5pt; vertical-align: middle; white-space: nowrap; ddo-char-set: 1" />
      <Control Type="AR.Field" Name="kokyaku_tel_2" DataField="kokyaku_tel" Left="1882.205" Top="6677.292" Width="1704.189" Height="149.6694" Text="電話番号" CanGrow="0" Style="font-family: ＭＳ ゴシック; font-size: 5pt; vertical-align: middle; white-space: nowrap; ddo-char-set: 1" />
      <Control Type="AR.Field" Name="TxtTel04" Left="1641.725" Top="6677.292" Width="299.9055" Height="149.6695" Text="TEL:" CanGrow="0" Style="font-family: ＭＳ ゴシック; font-size: 5pt; vertical-align: middle; ddo-char-set: 1" />
      <Control Type="AR.Field" Name="kokyaku_tel_1" DataField="kokyaku_tel" Left="2010.898" Top="1734.803" Width="1823.244" Height="170.0788" Text="電話番号" CanGrow="0" Style="font-family: ＭＳ ゴシック; font-size: 6.5pt; vertical-align: middle; white-space: nowrap; ddo-char-set: 1" />
      <Control Type="AR.Label" Name="yuukou_Label_2" Left="4526.93" Top="5330.835" Width="200.1263" Height="183.6852" Caption="年" Style="font-family: ＭＳ ゴシック; font-size: 8pt; font-weight: normal; text-align: left; vertical-align: top; ddo-char-set: 1; ddo-font-vertical: none" />
      <Control Type="AR.Field" Name="label_yuukou_ymd_year" DataField="label_yuukou_ymd_year" Left="4022.359" Top="5330.835" Width="450.7059" Height="183.6845" Text="9999" CanGrow="0" Style="font-family: ＭＳ ゴシック; font-size: 8pt; font-weight: normal; text-align: right; vertical-align: top; white-space: nowrap; ddo-char-set: 1" />
      <Control Type="AR.Label" Name="yuukou_Label_4" Left="5663.619" Top="5330.835" Width="200.1263" Height="183.6852" Caption="日" Style="font-family: ＭＳ ゴシック; font-size: 8pt; font-weight: normal; text-align: left; vertical-align: top; ddo-char-set: 1; ddo-font-vertical: none" />
      <Control Type="AR.Field" Name="label_yuukou_ymd_month" DataField="label_yuukou_ymd_month" Left="4797.918" Top="5330.835" Width="237.5464" Height="183.6845" Text="99" CanGrow="0" Style="font-family: ＭＳ ゴシック; font-size: 8pt; font-weight: normal; text-align: right; vertical-align: top; white-space: nowrap; ddo-char-set: 1" />
      <Control Type="AR.Label" Name="yuukou_Label_1" Left="4346.079" Top="5147.149" Width="1179.213" Height="183.6852" Caption="ラベル有効期限" Style="font-family: ＭＳ ゴシック; font-size: 8pt; font-weight: normal; text-align: right; vertical-align: top; ddo-char-set: 1; ddo-font-vertical: none" />
      <Control Type="AR.Label" Name="yuukou_Label_3" Left="5100.09" Top="5330.835" Width="200.1263" Height="183.6852" Caption="月" Style="font-family: ＭＳ ゴシック; font-size: 8pt; font-weight: normal; text-align: left; vertical-align: top; ddo-char-set: 1; ddo-font-vertical: none" />
      <Control Type="AR.Field" Name="label_yuukou_ymd_day" DataField="label_yuukou_ymd_day" Left="5372.779" Top="5330.835" Width="237.543" Height="183.6845" Text="99" CanGrow="0" Style="font-family: ＭＳ ゴシック; font-size: 8pt; font-weight: normal; text-align: right; vertical-align: top; white-space: nowrap; ddo-char-set: 1" />
      <Control Type="AR.Field" Name="Chuui_mongon" Left="263.622" Top="8977.323" Width="5666.457" Height="257.3854" Text="【窓口交付を担当する郵便局の方へ】荷物到着時に必ず「保管・局留」を入力" Multiline="0" CanGrow="0" Style="font-family: ＭＳ ゴシック; font-size: 8pt; text-align: center; vertical-align: middle; ddo-char-set: 128" />
      <Control Type="AR.Field" Name="convenience_information_1" DataField="convenience_information" Left="452.16" Top="1167.84" Width="4326.803" Height="187.0866" Text="郵便局名【局窓口受取】" CanGrow="0" Style="font-family: ＭＳ ゴシック; font-size: 7pt; vertical-align: middle; white-space: nowrap; ddo-char-set: 1" />
      <Control Type="AR.Field" Name="convenience_information_2" DataField="convenience_information" Left="606.6142" Top="6201.638" Width="3313.701" Height="175.748" Text="郵便局名【局窓口受取】" CanGrow="0" Style="font-family: ＭＳ ゴシック; font-size: 6pt; vertical-align: middle; white-space: nowrap; ddo-char-set: 1" />
      <Control Type="AR.Field" Name="weight_nm" DataField="weight_nm" Left="414.4252" Top="0" Width="723.9686" Height="269.8583" Text="代引重量" OutputFormat="000-0000" CanGrow="0" Style="font-family: ＭＳ ゴシック; font-size: 7.2pt; text-align: left; vertical-align: middle; white-space: nowrap; ddo-char-set: 1" />
      <Control Type="AR.Field" Name="weight_nm2" DataField="weight_nm" Left="4055.244" Top="9841.323" Width="723.9686" Height="269.8583" Text="代引重量" OutputFormat="000-0000" CanGrow="0" Style="font-family: ＭＳ ゴシック; font-size: 7.2pt; text-align: left; vertical-align: middle; white-space: nowrap; ddo-char-set: 1" />
      <Control Type="AR.Field" Name="weight_nm1" DataField="weight_nm" Left="3843.213" Top="4622.173" Width="723.9686" Height="269.8583" Text="代引重量" OutputFormat="000-0000" CanGrow="0" Style="font-family: ＭＳ ゴシック; font-size: 7.2pt; text-align: left; vertical-align: middle; white-space: nowrap; ddo-char-set: 1" />
      <Control Type="AR.Field" Name="TextBox10" Left="4738.394" Top="179.7165" Width="1275.024" Height="128.126" Text="　　　　　年　　月　　日" CanGrow="0" Style="font-family: BIZ UDゴシック; font-size: 5.25pt; text-align: left; text-justify: auto; vertical-align: top; white-space: nowrap; ddo-char-set: 128; ddo-font-vertical: none" />
    </Section>
  </Sections>
  <ReportComponentTray />
  <Script><![CDATA['---フォントサイズ切替境界 変数宣言---
'名称，住所（MAX:50Byte）
const FONT_SMALL as integer = 40 
const FONT_MID as integer = 25 
	
'商品名（MAX:50Byte）
const HIN_SMALL as integer = 40
const HIN_MID as integer = 25

'2017/10/16 paku 課題番号1176_拠点受取ラベル店舗情報文字切れ不具合↓
'コンビニ店舗情報
const CONVENI_SMALL as integer = 60
const CONVENI_MID as integer = 25

'配達局控え
const HAITATSU_CONVENI_SMALL as integer = 55
const HAITATSU_CONVENI_MID as integer = 25
'2017/10/16 paku 課題番号1176_拠点受取ラベル店舗情報文字切れ不具合↑

'業者名（MAX:8Byte）
const GYOSYAM_SMALL as integer = 9
const GYOSYAM_MID as integer = 7

'お届先住所フォント定義
const TODOKEADR_LARGE as Double = 7.2
const TODOKEADR_MID as Double = 7.2
const TODOKEADR_SMALL as Double = 6.7
	
'お届先名称フォント定義
const TODOKENM_LARGE as Double = 7.2
const TODOKENM_MID as Double = 7.2
const TODOKENM_SMALL as Double = 6.7

'ご依頼主住所フォント定義
const NIOKURIADR_LARGE as Double = 6
const NIOKURIADR_MID as Double = 6
const NIOKURIADR_SMALL as Double = 5.5

'ご依頼主名称フォント定義
const NIOKURINM_LARGE as Double = 6
const NIOKURINM_MID as Double = 6
Const NIOKURINM_SMALL As Double = 5.5

'配達局控えお届先住所フォント定義
const HAITATSUTODOKEADR_LARGE as Double = 6
const HAITATSUTODOKEADR_MID as Double = 6
const HAITATSUTODOKEADR_SMALL as Double = 5.5
	
'配達局控えお届先名称フォント定義
const HAITATSUTODOKENM_LARGE as Double = 6
const HAITATSUTODOKENM_MID as Double = 6
const HAITATSUTODOKENM_SMALL as Double = 5.5

'配達局控えご依頼主住所フォント定義
const HAITATSUNIOKURIADR_LARGE as Double = 4.7
const HAITATSUNIOKURIADR_MID as Double = 4.7
const HAITATSUNIOKURIADR_SMALL as Double = 4.2

'配達局控えご依頼主名称フォント定義
const HAITATSUNIOKURINM_LARGE as Double = 4.7
const HAITATSUNIOKURINM_MID as Double = 4.7
Const HAITATSUNIOKURINM_SMALL As Double = 4.2

'商品名フォント定義
Const SHOHIN_LARGE As Double = 7.5
Const SHOHIN_MID As Double = 7.5
const SHOHIN_SMALL as Double = 7.5

'2017/10/16 paku 課題番号1176_拠点受取ラベル店舗情報文字切れ不具合↓
'コンビニ店舗情報フォント定義
Const CONVENIINFOR_LARGE As Double = 7.2
Const CONVENIINFOR_MID As Double = 7.2
Const CONVENIINFOR_SMALL as Double = 6.7

'配達局控え コンビニ店舗情報フォント定義
Const HAITATSU_CONVENIINFOR_LARGE As Double = 6
Const HAITATSU_CONVENIINFOR_MID As Double = 6
Const HAITATSU_CONVENIINFOR_SMALL as Double = 5.2
'2017/10/16 paku 課題番号1176_拠点受取ラベル店舗情報文字切れ不具合↑

'文字列カウント用変数
dim len as integer

'デフォルトのフォントサイズ
'お届先住所のデフォルトサイズ定義
Const TODOKEADR_DEF As Double = 7.2

'お届先名称デフォルトサイズ定義
Const TODOKENM_DEF As Double = 7.2

'ご依頼主住所デフォルトサイズ定義
Const NIOKURIADR_DEF As Double = 6

'ご依頼主名称デフォルトサイズ定義
Const NIOKURINM_DEF As Double = 6

'商品名デフォルトサイズ定義
Const SHOHIN_DEF As Double = 7.5

'配達局控えお届先住所のデフォルトサイズ定義
Const HAITATSUTODOKEADR_DEF As Double = 6

'配達局控えお届先名称デフォルトサイズ定義
Const HAITATSUTODOKENM_DEF As Double = 6

'配達局控えご依頼主住所デフォルトサイズ定義
Const HAITATSUNIOKURIADR_DEF As Double = 4.7

'配達局控えご依頼主名称デフォルトサイズ定義
Const HAITATSUNIOKURINM_DEF As Double = 4.7

'2017/10/16 paku 課題番号1176_拠点受取ラベル店舗情報文字切れ不具合↓
'コンビニ店舗情報デフォルトサイズ定義
Const CONVENI_DEF As Double = 7

'配達局控え コンビニ店舗情報デフォルトサイズ定義
Const HAITATSU_CONVENI_DEF As Double = 6
'2017/10/16 paku 課題番号1176_拠点受取ラベル店舗情報文字切れ不具合↑

'現在のRPXの設定サイズを格納する変数
'お届先住所フォント定義
Dim receiver_adr_1_1_Size As Double
Dim receiver_adr_1_2_Size As Double
Dim receiver_adr_2_1_Size As Double
Dim receiver_adr_2_2_Size As Double
Dim receiver_adr_3_1_Size As Double
Dim receiver_adr_3_2_Size As Double

'2017/7/14 paku 課題番号1126 コンビニ受取 お届け先住所3の格納仕様変更↓
'コンビニ情報フォント定義
Dim convenience_information_1_Size As Double
Dim convenience_information_2_Size As Double
'2017/7/14 paku 課題番号1126 コンビニ受取 お届け先住所3の格納仕様変更↑

'お届先名称フォント定義
Dim receiver_nm_1_1_Size As Double
Dim receiver_nm_1_2_Size As Double
Dim receiver_nm_2_1_Size As Double
Dim receiver_nm_2_2_Size As Double

'ご依頼主住所フォント定義
Dim kokyaku_adr_1_1_Size As Double
Dim kokyaku_adr_1_2_Size As Double
Dim kokyaku_adr_2_1_Size As Double
Dim kokyaku_adr_2_2_Size As Double
Dim kokyaku_adr_3_1_Size As Double
Dim kokyaku_adr_3_2_Size As Double

'ご依頼主名称フォント定義
Dim kokyaku_nm_1_1_Size As Double
Dim kokyaku_nm_1_2_Size As Double
Dim kokyaku_nm_2_1_Size As Double
Dim kokyaku_nm_2_2_Size As Double

'商品名フォント定義
Dim shohin_nm001_1_Size As Double

'スクリプトで設定するフォントサイズを格納するための変数
Dim Font_Size As Double

'スタート時に現在のRPXの設定サイズを取得する
Sub ActiveReport_ReportStart()
	
    'お届先住所フォント定義
    Try
        receiver_adr_1_1_Size = CType(Me.Detail.Controls("receiver_adr_1_1"), DataDynamics.ActiveReports.TextBox).Font.Size
Catch ex As exception
    End Try
    Try
        receiver_adr_1_2_Size = CType(Me.Detail.Controls("receiver_adr_1_2"), DataDynamics.ActiveReports.TextBox).Font.Size
    Catch ex As exception
    End Try
    Try
        receiver_adr_2_1_Size = CType(Me.Detail.Controls("receiver_adr_2_1"), DataDynamics.ActiveReports.TextBox).Font.Size
    Catch ex As exception
    End Try
    Try
        receiver_adr_2_2_Size = CType(Me.Detail.Controls("receiver_adr_2_2"), DataDynamics.ActiveReports.TextBox).Font.Size
    Catch ex As exception
    End Try
    Try
        receiver_adr_3_1_Size = CType(Me.Detail.Controls("receiver_adr_3_1"), DataDynamics.ActiveReports.TextBox).Font.Size
    Catch ex As exception
    End Try
    Try
        receiver_adr_3_2_Size = CType(Me.Detail.Controls("receiver_adr_3_2"), DataDynamics.ActiveReports.TextBox).Font.Size
    Catch ex As exception
    End Try

    'お届先名称フォント定義
    Try
        receiver_nm_1_1_Size = CType(Me.Detail.Controls("receiver_nm_1_1"), DataDynamics.ActiveReports.TextBox).Font.Size
    Catch ex As exception
    End Try
    Try
        receiver_nm_1_2_Size = CType(Me.Detail.Controls("receiver_nm_1_2"), DataDynamics.ActiveReports.TextBox).Font.Size
    Catch ex As exception
    End Try
    Try
        receiver_nm_2_1_Size = CType(Me.Detail.Controls("receiver_nm_2_1"), DataDynamics.ActiveReports.TextBox).Font.Size
    Catch ex As exception
    End Try
    Try
        receiver_nm_2_2_Size = CType(Me.Detail.Controls("receiver_nm_2_2"), DataDynamics.ActiveReports.TextBox).Font.Size
    Catch ex As exception
    End Try

    'ご依頼主住所フォント定義
    Try
        kokyaku_adr_1_1_Size = CType(Me.Detail.Controls("kokyaku_adr_1_1"), DataDynamics.ActiveReports.TextBox).Font.Size
    Catch ex As exception
    End Try
    Try
        kokyaku_adr_1_2_Size = CType(Me.Detail.Controls("kokyaku_adr_1_2"), DataDynamics.ActiveReports.TextBox).Font.Size
    Catch ex As exception
    End Try
    Try
        kokyaku_adr_2_1_Size = CType(Me.Detail.Controls("kokyaku_adr_2_1"), DataDynamics.ActiveReports.TextBox).Font.Size
    Catch ex As exception
    End Try
    Try
        kokyaku_adr_2_2_Size = CType(Me.Detail.Controls("kokyaku_adr_2_2"), DataDynamics.ActiveReports.TextBox).Font.Size
    Catch ex As exception
    End Try
    Try
        kokyaku_adr_3_1_Size = CType(Me.Detail.Controls("kokyaku_adr_3_1"), DataDynamics.ActiveReports.TextBox).Font.Size
    Catch ex As exception
    End Try
    Try
        kokyaku_adr_3_2_Size = CType(Me.Detail.Controls("kokyaku_adr_3_2"), DataDynamics.ActiveReports.TextBox).Font.Size
    Catch ex As exception
    End Try

    'ご依頼主名称フォント定義
    Try
        kokyaku_nm_1_1_Size = CType(Me.Detail.Controls("kokyaku_nm_1_1"), DataDynamics.ActiveReports.TextBox).Font.Size
    Catch ex As exception
    End Try
    Try
        kokyaku_nm_1_2_Size = CType(Me.Detail.Controls("kokyaku_nm_1_2"), DataDynamics.ActiveReports.TextBox).Font.Size
    Catch ex As exception
    End Try
    Try
        kokyaku_nm_2_1_Size = CType(Me.Detail.Controls("kokyaku_nm_2_1"), DataDynamics.ActiveReports.TextBox).Font.Size
    Catch ex As exception
    End Try
    Try
        kokyaku_nm_2_2_Size = CType(Me.Detail.Controls("kokyaku_nm_2_2"), DataDynamics.ActiveReports.TextBox).Font.Size
    Catch ex As exception
    End Try

    '商品名フォント定義
    Try
        shohin_nm001_1_Size = CType(Me.Detail.Controls("shohin_nm001_1"), DataDynamics.ActiveReports.TextBox).Font.Size
    Catch ex As exception
    End Try

	'2017/7/14 paku 課題番号1126 コンビニ受取 お届け先住所3の格納仕様変更↓
	'コンビニ情報定義
	Try
		convenience_information_1_Size = CType(Me.Detail.Controls("convenience_information_1"), DataDynamics.ActiveReports.TextBox).Font.Size
	Catch ex As exception
	End Try
	Try
		convenience_information_2_Size = CType(Me.Detail.Controls("convenience_information_2"), DataDynamics.ActiveReports.TextBox).Font.Size
	Catch ex As exception
	End Try
	'2017/7/14 paku 課題番号1126 コンビニ受取 お届け先住所3の格納仕様変更↑

End Sub

Sub Detail_Format()

	'初期化
	Try
		CType(Me.Detail.Controls("KokyakuQRCodeLabel"), DataDynamics.ActiveReports.TextBox).Visible = False   '顧客QRの文言
	Catch ex As exception
	End Try
	Try
		CType(Me.Detail.Controls("KokyakuQRCode"), DataDynamics.ActiveReports.Barcode).Visible = False   '顧客QRコード
	Catch ex As exception
	End Try
	Try
		CType(Me.Detail.Controls("yoyakuBox"), DataDynamics.ActiveReports.TextBox).Visible = False           '「Y」の太枠
	Catch ex As exception
	End Try

	Try
		CType(Me.Detail.Controls("Kyokumado1"), DataDynamics.ActiveReports.TextBox).Visible = False   '局窓口受取サービス
	Catch ex As exception
	End Try
	Try
		CType(Me.Detail.Controls("Kyokumado2"), DataDynamics.ActiveReports.TextBox).Visible = False   '局窓口受取サービス
	Catch ex As exception
	End Try
	Try
		CType(Me.Detail.Controls("Kyokumado3"), DataDynamics.ActiveReports.TextBox).Visible = False   '局窓口受取サービス
	Catch ex As exception
	End Try
	Try
		CType(Me.Detail.Controls("Daikin_Matome1"), DataDynamics.ActiveReports.TextBox).Visible = False   '代金引換まとめ送金
	Catch ex As exception
	End Try
	Try
		CType(Me.Detail.Controls("Daikin_Matome2"), DataDynamics.ActiveReports.TextBox).Visible = False   '代金引換まとめ送金
	Catch ex As exception
	End Try
	Try
		CType(Me.Detail.Controls("Daikin_Matome3"), DataDynamics.ActiveReports.TextBox).Visible = False   '代金引換まとめ送金
	Catch ex As exception
	End Try
	Try
		CType(Me.Detail.Controls("Ryuchi_Shape"), DataDynamics.ActiveReports.Shape).Visible = False   '背景色
	Catch ex As exception
	End Try
	Try
		CType(Me.Detail.Controls("Ryuchi"), DataDynamics.ActiveReports.TextBox).Visible = False   '留置
	Catch ex As exception
	End Try
	Try
		CType(Me.Detail.Controls("Ryuchi_Kikan"), DataDynamics.ActiveReports.TextBox).Visible = False   '留置期間
	Catch ex As exception
	End Try
	'2017/7/14 paku 課題番号1126 コンビニ受取 お届け先住所3の格納仕様変更↓
	Try
		CType(Me.Detail.Controls("Chuui_mongon"), DataDynamics.ActiveReports.TextBox).Visible = False   '注意文言
	Catch ex As exception
	End Try	
	'2017/7/14 paku 課題番号1126 コンビニ受取 お届け先住所3の格納仕様変更↑	
	'QRコードの制御
	If rpt.Fields("shiharai_houhou_kbn").Value.tostring() = "2" Then
		'後納の場合
		'顧客QRコードを印字する
		Try
			CType(Me.Detail.Controls("KokyakuQRCodeLabel"), DataDynamics.ActiveReports.TextBox).Visible = True
		Catch ex As exception
		End Try
		Try
			CType(Me.Detail.Controls("KokyakuQRCode"), DataDynamics.ActiveReports.Barcode).Visible = True
		Catch ex As exception
		End Try

		'「Ｙ」の枠線制御
		If rpt.Fields("is_yoyaku_trans").Value.ToString() = "True" Then
			'予約送信時、太枠に設定
			Try
				CType(Me.Detail.Controls("yoyakuBox"), DataDynamics.ActiveReports.TextBox).Visible = True
			Catch ex As exception
			End Try
		Else
			'予約送信以外、細枠に設定
			Try
				CType(Me.Detail.Controls("yoyakuBox"), DataDynamics.ActiveReports.TextBox).Visible = False
			Catch ex As exception
			End Try
		End If
	Else
		'別納の場合

		'顧客QRは印字しない
		Try
			CType(Me.Detail.Controls("KokyakuQRCodeLabel"), DataDynamics.ActiveReports.TextBox).Visible = False
		Catch ex As exception
		End Try
		Try
			CType(Me.Detail.Controls("KokyakuQRCode"), DataDynamics.ActiveReports.Barcode).Visible = False
		Catch ex As exception
		End Try

		'「Ｙ」の枠線制御
		If rpt.Fields("is_yoyaku_trans").Value.ToString() = "True" Then
			'予約送信時、太枠に設定
			Try
				CType(Me.Detail.Controls("yoyakuBox"), DataDynamics.ActiveReports.TextBox).Visible = True
			Catch ex As exception
			End Try
		Else
			'予約送信以外、細枠に設定
			Try
				CType(Me.Detail.Controls("yoyakuBox"), DataDynamics.ActiveReports.TextBox).Visible = False
			Catch ex As exception
			End Try
		End If
	End If
	
	'局窓、代引表記
	If rpt.Fields("cvs_hanbetsu_cd").Value.ToString() = "3" Then
		Try
			CType(Me.Detail.Controls("Kyokumado1"), DataDynamics.ActiveReports.TextBox).Visible = True
		Catch ex As exception
		End Try
		Try
			CType(Me.Detail.Controls("Kyokumado2"), DataDynamics.ActiveReports.TextBox).Visible = True
		Catch ex As exception
		End Try
		Try
			CType(Me.Detail.Controls("Kyokumado3"), DataDynamics.ActiveReports.TextBox).Visible = True
		Catch ex As exception
		End Try
		Try
			CType(Me.Detail.Controls("Daikin_Matome1"), DataDynamics.ActiveReports.TextBox).Visible = True
		Catch ex As exception
		End Try	
		Try
			CType(Me.Detail.Controls("Daikin_Matome2"), DataDynamics.ActiveReports.TextBox).Visible = True
		Catch ex As exception
		End Try	
		Try
			CType(Me.Detail.Controls("Daikin_Matome3"), DataDynamics.ActiveReports.TextBox).Visible = True
		Catch ex As exception
		End Try	
		Try
			CType(Me.Detail.Controls("Ryuchi_Shape"), DataDynamics.ActiveReports.Shape).Visible = True
		Catch ex As exception
		End Try	
		Try
			CType(Me.Detail.Controls("Ryuchi"), DataDynamics.ActiveReports.TextBox).Visible = True
		Catch ex As exception
		End Try
		Try
			CType(Me.Detail.Controls("Ryuchi_Kikan"), DataDynamics.ActiveReports.TextBox).Visible = True
		Catch ex As exception
		End Try	
		'2017/7/14 paku 課題番号1126 コンビニ受取 お届け先住所3の格納仕様変更↓
		Try
			CType(Me.Detail.Controls("Chuui_mongon"), DataDynamics.ActiveReports.TextBox).Visible = True
		Catch ex As exception
		End Try	
		'2017/7/14 paku 課題番号1126 コンビニ受取 お届け先住所3の格納仕様変更↑
	Else
		Try
			CType(Me.Detail.Controls("Kyokumado1"), DataDynamics.ActiveReports.TextBox).Visible = False
		Catch ex As exception
		End Try
		Try
			CType(Me.Detail.Controls("Kyokumado2"), DataDynamics.ActiveReports.TextBox).Visible = False
		Catch ex As exception
		End Try
		Try
			CType(Me.Detail.Controls("Kyokumado3"), DataDynamics.ActiveReports.TextBox).Visible = False
		Catch ex As exception
		End Try
		Try
			CType(Me.Detail.Controls("Daikin_Matome1"), DataDynamics.ActiveReports.TextBox).Visible = False
		Catch ex As exception
		End Try	
		Try
			CType(Me.Detail.Controls("Daikin_Matome2"), DataDynamics.ActiveReports.TextBox).Visible = False
		Catch ex As exception
		End Try	
		Try
			CType(Me.Detail.Controls("Daikin_Matome3"), DataDynamics.ActiveReports.TextBox).Visible = False
		Catch ex As exception
		End Try	
		Try
			CType(Me.Detail.Controls("Ryuchi_Shape"), DataDynamics.ActiveReports.Shape).Visible = False
		Catch ex As exception
		End Try	
		Try
			CType(Me.Detail.Controls("Ryuchi"), DataDynamics.ActiveReports.TextBox).Visible = False
		Catch ex As exception
		End Try
		Try
			CType(Me.Detail.Controls("Ryuchi_Kikan"), DataDynamics.ActiveReports.TextBox).Visible = False
		Catch ex As exception
		End Try
		'2017/7/14 paku 課題番号1126 コンビニ受取 お届け先住所3の格納仕様変更↓
		Try
			CType(Me.Detail.Controls("Chuui_mongon"), DataDynamics.ActiveReports.TextBox).Visible = False
		Catch ex As exception
		End Try	
		'2017/7/14 paku 課題番号1126 コンビニ受取 お届け先住所3の格納仕様変更↑
	End if
	
	'////フォント制御
	'お届け先住所
	len = 0
	len = getByteCount("receiver_adr_1_1")

	If len < getByteCount("receiver_adr_2_1") Then
		len = getByteCount("receiver_adr_2_1")
	End If

	If len < getByteCount("receiver_adr_3_1") Then
		len = getByteCount("receiver_adr_3_1")
	End If

	If len >= FONT_SMALL Then
		Font_Size = TODOKEADR_SMALL
	ElseIf len >= FONT_MID And len < FONT_SMALL Then
		Font_Size = TODOKEADR_MID
	Else
		Font_Size = TODOKEADR_LARGE
	End If

	FontSize_Set("receiver_adr_1_1", receiver_adr_1_1_Size, TODOKEADR_DEF, Font_Size)
	FontSize_Set("receiver_adr_2_1", receiver_adr_2_1_Size, TODOKEADR_DEF, Font_Size)
	FontSize_Set("receiver_adr_3_1", receiver_adr_3_1_Size, TODOKEADR_DEF, Font_Size)

    '2017/10/16 paku 課題番号1176_拠点受取ラベル店舗情報文字切れ不具合↓
    ''2017/7/14 paku 課題番号1126 コンビニ受取 お届け先住所3の格納仕様変更↓
    'FontSize_Set("convenience_information_1", convenience_information_1_Size, TODOKEADR_DEF, Font_Size)
    ''2017/7/14 paku 課題番号1126 コンビニ受取 お届け先住所3の格納仕様変更↑
    '2017/10/16 paku 課題番号1176_拠点受取ラベル店舗情報文字切れ不具合↑

    '2017/10/16 paku 課題番号1176_拠点受取ラベル店舗情報文字切れ不具合↓
    'コンビニ店舗情報
    len = 0
    len = getByteCount("convenience_information_1")
    if len >= CONVENI_SMALL Then
        Font_Size = CONVENIINFOR_SMALL
    Elseif len >= CONVENI_MID And len < CONVENI_SMALL Then
        Font_Size = CONVENIINFOR_MID
    Else
        Font_Size = CONVENIINFOR_LARGE
    End if

    FontSize_Set("convenience_information_1", convenience_information_1_Size, CONVENI_DEF, Font_Size)
    '2017/10/16 paku 課題番号1176_拠点受取ラベル店舗情報文字切れ不具合↑

	'お届け先名称
	len = 0
	len = getByteCount("receiver_nm_1_1")

	If len < getByteCount("receiver_nm_2_1") Then
		len = getByteCount("receiver_nm_2_1")
	End If

	If len >= FONT_SMALL Then
		Font_Size = TODOKENM_SMALL
	ElseIf len >= FONT_MID And len < FONT_SMALL Then
		Font_Size = TODOKENM_MID
	Else
		Font_Size = TODOKENM_LARGE
	End If

	FontSize_Set("receiver_nm_1_1", receiver_nm_1_1_Size, TODOKENM_DEF, Font_Size)
	FontSize_Set("receiver_nm_2_1", receiver_nm_2_1_Size, TODOKENM_DEF, Font_Size)

	'ご依頼主住所
	len = 0
	len = getByteCount("kokyaku_adr_1_1")

	If len < getByteCount("kokyaku_adr_2_1") Then
		len = getByteCount("kokyaku_adr_2_1")
	End If

	If len < getByteCount("kokyaku_adr_3_1") Then
		len = getByteCount("kokyaku_adr_3_1")
	End If

	If len >= FONT_SMALL Then
		Font_Size = NIOKURIADR_SMALL
	ElseIf len >= FONT_MID And len < FONT_SMALL Then
		Font_Size = NIOKURIADR_MID
	Else
		Font_Size = NIOKURIADR_LARGE
	End If

	FontSize_Set("kokyaku_adr_1_1", kokyaku_adr_1_1_Size, NIOKURIADR_DEF, Font_Size)
	FontSize_Set("kokyaku_adr_2_1", kokyaku_adr_2_1_Size, NIOKURIADR_DEF, Font_Size)
	FontSize_Set("kokyaku_adr_3_1", kokyaku_adr_3_1_Size, NIOKURIADR_DEF, Font_Size)
	
	'ご依頼主名称
	len = 0
	len = getByteCount("kokyaku_nm_1_1")

	If len < getByteCount("kokyaku_nm_2_1") Then
		len = getByteCount("kokyaku_nm_2_1")
	End If

	If len >= FONT_SMALL Then
		Font_Size = NIOKURINM_SMALL
	ElseIf len >= FONT_MID And len < FONT_SMALL Then
		Font_Size = NIOKURINM_MID
	Else
		Font_Size = NIOKURINM_LARGE
	End If

	FontSize_Set("kokyaku_nm_1_1", kokyaku_nm_1_1_Size, NIOKURINM_DEF, Font_Size)
	FontSize_Set("kokyaku_nm_2_1", kokyaku_nm_2_1_Size, NIOKURINM_DEF, Font_Size)

	'配達局控えお届け先住所
	len = 0
	len = getByteCount("receiver_adr_1_1")

	If len < getByteCount("receiver_adr_2_1") Then
		len = getByteCount("receiver_adr_2_1")
	End If

	If len < getByteCount("receiver_adr_3_1") Then
		len = getByteCount("receiver_adr_3_1")
	End If

	If len >= FONT_SMALL Then
		Font_Size = HAITATSUTODOKEADR_SMALL
	ElseIf len >= FONT_MID And len < FONT_SMALL Then
		Font_Size = HAITATSUTODOKEADR_MID
	Else
		Font_Size = HAITATSUTODOKEADR_LARGE
	End If

	FontSize_Set("receiver_adr_1_2", receiver_adr_1_2_Size, HAITATSUTODOKEADR_DEF, Font_Size)
	FontSize_Set("receiver_adr_2_2", receiver_adr_2_2_Size, HAITATSUTODOKEADR_DEF, Font_Size)
	FontSize_Set("receiver_adr_3_2", receiver_adr_3_2_Size, HAITATSUTODOKEADR_DEF, Font_Size)

    '2017/10/16 paku 課題番号1176_拠点受取ラベル店舗情報文字切れ不具合↓
    ''2017/7/14 paku 課題番号1126 コンビニ受取 お届け先住所3の格納仕様変更↓
    'FontSize_Set("convenience_information_2", convenience_information_2_Size, HAITATSUTODOKEADR_DEF, Font_Size)
    ''2017/7/14 paku 課題番号1126 コンビニ受取 お届け先住所3の格納仕様変更↑
    '2017/10/16 paku 課題番号1176_拠点受取ラベル店舗情報文字切れ不具合↑

    '2017/10/16 paku 課題番号1176_拠点受取ラベル店舗情報文字切れ不具合↓
    len = 0
    len = getByteCount("convenience_information_2")
    if len >= HAITATSU_CONVENI_SMALL Then
        Font_Size = HAITATSU_CONVENIINFOR_SMALL
    Elseif len >= HAITATSU_CONVENI_MID And len < HAITATSU_CONVENI_SMALL Then
        Font_Size = HAITATSU_CONVENIINFOR_MID
    Else
        Font_Size = HAITATSU_CONVENIINFOR_LARGE
    End if

    FontSize_Set("convenience_information_2", convenience_information_2_Size, HAITATSU_CONVENI_DEF, Font_Size)
    '2017/10/16 paku 課題番号1176_拠点受取ラベル店舗情報文字切れ不具合↑

	'配達局控えお届け先名称
	len = 0
	len = getByteCount("receiver_nm_1_1")

	If len < getByteCount("receiver_nm_2_1") Then
		len = getByteCount("receiver_nm_2_1")
	End If

	If len >= FONT_SMALL Then
		Font_Size = HAITATSUTODOKENM_SMALL
	ElseIf len >= FONT_MID And len < FONT_SMALL Then
		Font_Size = HAITATSUTODOKENM_MID
	Else
		Font_Size = HAITATSUTODOKENM_LARGE
	End If

	FontSize_Set("receiver_nm_1_2", receiver_nm_1_2_Size, HAITATSUTODOKENM_DEF, Font_Size)
	FontSize_Set("receiver_nm_2_2", receiver_nm_2_2_Size, HAITATSUTODOKENM_DEF, Font_Size)

	'配達局控えご依頼主住所
	len = 0
	len = getByteCount("kokyaku_adr_1_1")

	If len < getByteCount("kokyaku_adr_2_1") Then
		len = getByteCount("kokyaku_adr_2_1")
	End If

	If len < getByteCount("kokyaku_adr_3_1") Then
		len = getByteCount("kokyaku_adr_3_1")
	End If

	If len >= FONT_SMALL Then
		Font_Size = HAITATSUNIOKURIADR_SMALL
	ElseIf len >= FONT_MID And len < FONT_SMALL Then
		Font_Size = HAITATSUNIOKURIADR_MID
	Else
		Font_Size = HAITATSUNIOKURIADR_LARGE
	End If

	FontSize_Set("kokyaku_adr_1_2", kokyaku_adr_1_2_Size, HAITATSUNIOKURIADR_DEF, Font_Size)
	FontSize_Set("kokyaku_adr_2_2", kokyaku_adr_2_2_Size, HAITATSUNIOKURIADR_DEF, Font_Size)
	FontSize_Set("kokyaku_adr_3_2", kokyaku_adr_3_2_Size, HAITATSUNIOKURIADR_DEF, Font_Size)
	
	'配達局控えご依頼主名称
	len = 0
	len = getByteCount("kokyaku_nm_1_1")

	If len < getByteCount("kokyaku_nm_2_1") Then
		len = getByteCount("kokyaku_nm_2_1")
	End If

	If len >= FONT_SMALL Then
		Font_Size = HAITATSUNIOKURINM_SMALL
	ElseIf len >= FONT_MID And len < FONT_SMALL Then
		Font_Size = HAITATSUNIOKURINM_MID
	Else
		Font_Size = HAITATSUNIOKURINM_LARGE
	End If

	FontSize_Set("kokyaku_nm_1_2", kokyaku_nm_1_2_Size, HAITATSUNIOKURINM_DEF, Font_Size)
	FontSize_Set("kokyaku_nm_2_2", kokyaku_nm_2_2_Size, HAITATSUNIOKURINM_DEF, Font_Size)
	
	'商品名
	len = 0
	len = getByteCount("shohin_nm001_1")

	If len >= HIN_SMALL Then
		Font_Size = SHOHIN_SMALL
	ElseIf len >= HIN_MID And len < HIN_SMALL Then
		Font_Size = SHOHIN_MID
	Else
		Font_Size = SHOHIN_LARGE
	End If

	FontSize_Set("shohin_nm001_1", shohin_nm001_1_Size, SHOHIN_DEF, Font_Size)
	
End Sub

Private Function getByteCount(ByVal ObjectNM As String) As Integer

	'サロゲート文字で文字数判定ＯＫ
	Dim dt As System.Globalization.StringInfo
	Dim num As Integer
	Dim dispnum As Integer
	Dim str As String

	Try
		str = CType(Me.Detail.Controls(ObjectNM), DataDynamics.ActiveReports.TextBox).text.Trim()

		dt = New System.Globalization.StringInfo(str)
		num = dt.LengthInTextElements

		Dim by As Byte()

		Dim hatena As String
		Dim hatena_sjis As Byte()

		's-jisに変換すると、変換出来ない場合があり、?になる
		hatena = "?"
		hatena_sjis = System.Text.Encoding.GetEncoding(932).GetBytes(hatena)

		dispnum = 0

		'一文字ずつ取り出す
		For i As Integer = 0 To num - 1

			by = System.Text.Encoding.GetEncoding(932).GetBytes(dt.SubstringByTextElements(i, 1))

			If (Char.IsSurrogate(dt.SubstringByTextElements(i, 1))) Then
				dispnum += 2
			Else
				If (dt.SubstringByTextElements(i, 1) <> hatena And hatena_sjis(0) = by(0)) Then
					'?はこっちを通る
					dispnum += 2
				Else
					dispnum += by.GetLength(0)
				End If
			End If

		Next

	Catch ex As exception
		dispnum = 0
	End Try

	Return dispnum

End Function


'フォントサイズをセットする
Private Sub FontSize_Set(ByVal ObjectNM As String, ByVal RPXSize As Double, ByVal DefSize As Double, ByVal ScrSize As Double)

	Try
		'指定した小数桁までで比較する
		Dim RPXSize_Kirisute As Double = ShosuKirisute(RPXSize)
		Dim DefSize_Kirisute As Double = ShosuKirisute(DefSize)

		'Doubleのままだと下のIF文が正常に動作しないのでStringで比較する
		Dim RPXSize_Str As String = CType(RPXSize_Kirisute, String)
		Dim DefSize_Str As String = CType(DefSize_Kirisute, String)

		'デザイナで設定されたサイズとデフォルトサイズが一致の場合はスクリプトで変更する
		'デザイナで設定されたサイズとデフォルトサイズが不一致の場合はデザイナで設定されたサイズのままとする
		If RPXSize_Str = DefSize_Str Then
			Dim Text_Buf As DataDynamics.ActiveReports.TextBox
			Text_Buf = CType(Me.Detail.Controls(ObjectNM), DataDynamics.ActiveReports.TextBox)
			Text_Buf.Font = New System.Drawing.Font(Text_Buf.Font.FontFamily, ScrSize)
		End If
	Catch ex As exception
	End Try

End Sub

'引数の小数第４位以降を切り捨てて返却する
'引数が負の値の場合は考慮しない
'例）引数：12.3456　／　返却値：12.345
Private Function ShosuKirisute(ByVal Value As Double) As Double

	Dim ReValue As Double

	'残す小数の位数を指定する
	Dim Keta As Integer = 3

	Try
		'(1)指定された位数分だけ10の累乗する
		Dim KetaJou As Double = System.Math.Pow(10, Keta)

		'(2)(1)と引数の積から小数部分を切り捨て、小数点の位置を元に戻す
		ReValue = System.Math.Floor(Value * KetaJou) / KetaJou

	Catch ex As Exception
		ReValue = Value
	End Try

	Return ReValue

End Function]]></Script>
  <PageSettings LeftMargin="0" RightMargin="0" TopMargin="0" BottomMargin="0" Orientation="1" />
  <Parameters />
</ActiveReportsLayout>