tijian_jichuang/Code/SOH.JianYan.DEC_RT6100/bin/Debug/Report/hyxmzyd.frx
2025-02-20 11:54:48 +08:00

289 lines
15 KiB
XML
Raw Blame History

This file contains ambiguous Unicode characters

This file contains Unicode characters that might be confused with other characters. If you think that this is intentional, you can safely ignore this warning. Use the Escape button to reveal them.

<?xml version="1.0" encoding="utf-8"?>
<Report ReportInfo.Created="03/08/2013 08:26:41" ReportInfo.Modified="07/06/2016 15:58:06" ReportInfo.CreatorVersion="1.2.47.0">
<ScriptText>using System;
using System.Collections;
using System.Collections.Generic;
using System.ComponentModel;
using System.Windows.Forms;
using System.Drawing;
using System.Data;
using FastReport;
using FastReport.Data;
using FastReport.Dialog;
using FastReport.Barcode;
using FastReport.Table;
using FastReport.Utils;
namespace FastReport
{
public class ReportScript
{
int rowN=1;
string tjksid=&quot;&quot;;
string lj = &quot;&quot;;
string zysx = &quot;&quot;;
string tjbh = &quot;&quot;;
private void Table1_AfterData(object sender, EventArgs e)
{
if(rowN&gt;=2)
{
Table1.Visible = false;
}
}
private void Text18_AfterData(object sender, EventArgs e)
{
Text18.Text = &quot;&quot;+ rowN+&quot;&quot;;
rowN++;
}
private void Text19_AfterData(object sender, EventArgs e)
{
tjksid = Text19.Text;
}
private void Text20_AfterData(object sender, EventArgs e)
{
zysx = Text20.Text;
}
private void Text21_AfterData(object sender, EventArgs e)
{
lj = Text21.Text;
}
private void Data2_AfterData(object sender, EventArgs e)
{
if(!tjksid.Equals(&quot;6&quot;))
{
Text27.Text =zysx;
Text28.Text = lj;
}
if(tjksid.Equals(&quot;6&quot;))
{
string[] tsxx;
bool numbers = false;
for(int i=0;i&lt;zysx.Length;i++)
{
if(zysx[i].Equals('#'))
{
numbers = true;
}
}
if(numbers)
{
tsxx = zysx.Split('#');
Text27.Text =tsxx[0];
Text28.Text = tsxx[1];
}
else
{
Text27.Text = zysx;
Text28.Text =&quot;&quot;;
}
zysx = &quot;&quot;;
lj = &quot;&quot;;
}
}
private void Text7_AfterData(object sender, EventArgs e)
{
tjbh = Text7.Text;
}
private void PageHeader1_AfterData(object sender, EventArgs e)
{
Barcode1.Text = tjbh;
}
private void Text11_AfterData(object sender, EventArgs e)
{
switch(Text11.Text)
{
case &quot;0&quot;:
Text11.Text = &quot;未知&quot;;
break;
case &quot;1&quot;:
Text11.Text = &quot;&quot;;
break;
case &quot;2&quot;:
Text11.Text = &quot;&quot;;
break;
}
}
private void Barcode1_AfterData(object sender, EventArgs e)
{
//Barcode1.Text = &quot;123&quot;;
}
}
}
</ScriptText>
<Dictionary>
<MsSqlDataConnection Name="Connection" ConnectionString="rijcmlqHwzMSgwTFaHpjtG3vsOj8fkPNZ3saJNAjKJwgJ5IWOIe133m1Y6UVSk6uLsfTjfHp7TuW5H/7S9zCu1R9NQa9sugMmtCP+IoKkaKOAPaAXr4Yn3N96Ji/mjTlDOGKJz2v5/VnPIujB+sZZFo/WTLLr6ETR5/pSuch0hzrqOR/K5E8cBMRh9UOasHMOVxpQvqNUEEeJNpLHDQ+jo6KUyhAg==">
<TableDataSource Name="dyGrtjdj" DataType="System.Int32" Enabled="true" TableName="dyGrtjdj">
<Column Name="dyGrtjdjId" DataType="System.Int32"/>
<Column Name="dyTIId" DataType="System.Int32"/>
<Column Name="tjdjywbh" DataType="System.String"/>
<Column Name="djrq" DataType="System.String"/>
<Column Name="ydtjrq" DataType="System.String"/>
<Column Name="xm" DataType="System.String"/>
<Column Name="xb" DataType="System.String"/>
<Column Name="nl" DataType="System.String"/>
<Column Name="tjcs" DataType="System.String"/>
<Column Name="lxdh" DataType="System.String"/>
<Column Name="lxdz" DataType="System.String"/>
<Column Name="sfzh" DataType="System.String"/>
<Column Name="tjlb" DataType="System.String"/>
<Column Name="gzdw" DataType="System.String"/>
<Column Name="gzbm" DataType="System.String"/>
<Column Name="tclx" DataType="System.String"/>
<Column Name="fzmc" DataType="System.String"/>
<Column Name="dwmc" DataType="System.String"/>
<Column Name="yyId" DataType="System.String"/>
<Column Name="sfzc" DataType="System.String"/>
<Column Name="djry" DataType="System.String"/>
</TableDataSource>
<TableDataSource Name="dyTjdjbhIp" DataType="System.Int32" Enabled="true" TableName="dyTjdjbhIp">
<Column Name="dyTIId" DataType="System.Int32"/>
<Column Name="tidjbh" DataType="System.Int32"/>
<Column Name="ip" DataType="System.String"/>
</TableDataSource>
<TableDataSource Name="dyTjjl" DataType="System.Int32" Enabled="true" TableName="dyTjjl">
<Column Name="dyTjjlId" DataType="System.Int32"/>
<Column Name="dyGrtjdjId" DataType="System.Int32"/>
<Column Name="kslxmc" DataType="System.String"/>
<Column Name="tjksId" DataType="System.Int32"/>
<Column Name="tjksmc" DataType="System.String"/>
<Column Name="tjxmmc" DataType="System.String"/>
<Column Name="tsxx" DataType="System.String"/>
<Column Name="cqorch" DataType="System.String"/>
</TableDataSource>
</MsSqlDataConnection>
<Parameter Name="dyry" DataType="System.String"/>
<Parameter Name="dwmc" DataType="System.String"/>
<Parameter Name="tmh" DataType="System.String"/>
<Parameter Name="xm" DataType="System.String"/>
<Parameter Name="xb" DataType="System.String"/>
<Parameter Name="nl" DataType="System.String"/>
<Parameter Name="hyh" DataType="System.String"/>
</Dictionary>
<ReportPage Name="Page1" PaperHeight="150" FirstPageSource="15" OtherPagesSource="15">
<ReportTitleBand Name="ReportTitle1" Width="718.2" Height="37.8">
<TextObject Name="Text1" Width="718.2" Height="37.8" Text="天瑞体检中心检验科报告单" HorzAlign="Center" VertAlign="Bottom" Font="宋体, 22pt, style=Bold"/>
</ReportTitleBand>
<PageHeaderBand Name="PageHeader1" Top="41.8" Width="718.2" Height="94.5" AfterDataEvent="PageHeader1_AfterData">
<TextObject Name="Text2" Left="37.8" Top="12.9" Width="85.05" Height="28.35" Text="打印日期:" VertAlign="Bottom" Font="宋体, 11pt"/>
<TextObject Name="Text3" Left="122.85" Top="22.35" Width="170.1" Height="18.9" Text="[Date]" Format="Custom" Format.Format="yyyy-MM-dd hh:mm:ss" Font="宋体, 11pt"/>
<TextObject Name="Text4" Left="292.95" Top="12.9" Width="56.7" Height="28.35" Text="单位:" VertAlign="Bottom" Font="宋体, 11pt"/>
<TextObject Name="Text5" Left="349.65" Top="12.9" Width="56.7" Height="28.35" Text="[dwmc]" VertAlign="Bottom" Font="宋体, 11pt"/>
<LineObject Name="Line1" Left="33.55" Top="43.75" Width="661.5" Border.Width="2"/>
<TextObject Name="Text6" Left="28.35" Top="47.7" Width="85.05" Height="18.9" Text="体检编号:" VertAlign="Bottom" Font="宋体, 11pt"/>
<TextObject Name="Text7" Left="113.4" Top="47.7" Width="85.05" Height="18.9" AfterDataEvent="Text7_AfterData" Text="[tmh]" Font="宋体, 11pt"/>
<TextObject Name="Text8" Left="198.45" Top="47.7" Width="56.7" Height="18.9" Text="姓名:" VertAlign="Bottom" Font="宋体, 11pt"/>
<TextObject Name="Text9" Left="255.15" Top="47.7" Width="56.7" Height="18.9" Text="[xm]" Font="宋体, 11pt"/>
<TextObject Name="Text10" Left="311.85" Top="47.7" Width="56.7" Height="18.9" Text="性别:" VertAlign="Bottom" Font="宋体, 11pt"/>
<TextObject Name="Text11" Left="368.55" Top="47.7" Width="56.7" Height="18.9" AfterDataEvent="Text11_AfterData" Text="[xb]" Font="宋体, 11pt"/>
<TextObject Name="Text12" Left="434.7" Top="47.7" Width="56.7" Height="18.9" Text="年龄:" VertAlign="Bottom" Font="宋体, 11pt"/>
<TextObject Name="Text13" Left="491.4" Top="47.7" Width="28.35" Height="18.9" Text="[nl]" Font="宋体, 11pt"/>
<TextObject Name="Text14" Left="529.2" Top="47.7" Width="75.6" Height="18.9" Text="档案号:" VertAlign="Bottom" Font="宋体, 11pt"/>
<TextObject Name="Text15" Left="595.35" Top="47.7" Width="94.5" Height="18.9" Text="[hyh]" Font="宋体, 11pt"/>
<TableObject Name="Table11" Left="28.35" Top="66.15" Width="311.85" Height="28.35">
<TableColumn Name="Column32" Width="126"/>
<TableColumn Name="Column33" Width="116.55"/>
<TableColumn Name="Column34" Width="69.3"/>
<TableRow Name="Row21" Height="28.35">
<TableCell Name="Cell77" Border.Lines="Bottom" Text="项目名称" HorzAlign="Center" VertAlign="Bottom" Font="宋体, 11pt, style=Bold">
<LineObject Name="Line2" Width="672.46" Border.Width="2"/>
</TableCell>
<TableCell Name="Cell78" Border.Lines="Bottom" Text="注意事项" HorzAlign="Center" VertAlign="Bottom" Font="宋体, 11pt, style=Bold"/>
<TableCell Name="Cell79" Border.Lines="Bottom" Text="路径" VertAlign="Bottom" Font="宋体, 11pt, style=Bold"/>
</TableRow>
</TableObject>
<TableObject Name="Table1" Left="349.65" Top="66.15" Width="349.65" Height="28.34" AfterDataEvent="Table1_AfterData">
<TableColumn Name="Column35" Width="349.65"/>
<TableRow Name="Row29" Height="14.17">
<TableCell Name="Cell80" Text="体检注意事项:" VertAlign="Bottom" Font="宋体, 10pt" RowSpan="2"/>
</TableRow>
<TableRow Name="Row30" Height="14.17">
<TableCell Name="Cell85"/>
</TableRow>
</TableObject>
<TextObject Name="Text35" Left="529.2" Width="179.55" Height="28.35" Text="质评合格 省内参考" VertAlign="Bottom" Font="宋体, 11pt, style=Bold"/>
</PageHeaderBand>
<DataBand Name="Data1" Top="140.3" Width="718.2" Height="18.9" CanGrow="true" CanShrink="true" CanBreak="true">
<SubreportObject Name="Subreport1" Left="28.35" Width="94.5" Height="18.9" ReportPage="Page2"/>
<SubreportObject Name="Subreport2" Left="349.65" Width="94.5" Height="18.9" ReportPage="Page3"/>
</DataBand>
<PageFooterBand Name="PageFooter1" Top="163.2" Width="718.2" Height="56.7">
<TextObject Name="Text17" Left="567" Width="85.05" Height="18.9" Text="打印人员:" VertAlign="Bottom" Font="宋体, 9pt"/>
<TextObject Name="Text16" Left="28.35" Width="510.3" Height="28.35" Text="【结果仅对此标本负责。如有疑问,请于当天反馈。】" VertAlign="Center" Font="宋体, 12pt"/>
<TextObject Name="Text29" Left="633.15" Width="85.05" Height="18.9" Text="[dyry]" VertAlign="Bottom" Font="宋体, 9pt"/>
<TextObject Name="Text30" Left="28.35" Top="28.35" Width="614.25" Height="28.35" Text="地址龙口市环城北路277号 电话0535-8276002" VertAlign="Center" Font="宋体, 12pt"/>
<LineObject Name="Line3" Left="28.35" Width="670.95" Border.Width="2"/>
<TextObject Name="Text18" Left="642.6" Top="37.8" Width="56.7" Height="18.9" AfterDataEvent="Text18_AfterData" Text="[Row#]" VertAlign="Center" Font="宋体, 10pt"/>
</PageFooterBand>
</ReportPage>
<ReportPage Name="Page2">
<DataBand Name="Data2" Width="718.2" Height="24.57" AfterDataEvent="Data2_AfterData" CanBreak="true" DataSource="dyTjjl" KeepTogether="true" KeepDetail="true">
<TableObject Name="Table9" Width="311.85" Height="24.57">
<TableColumn Name="Column26" Width="126"/>
<TableColumn Name="Column27" Width="116.55"/>
<TableColumn Name="Column28" Width="69.3"/>
<TableRow Name="Row19" Height="24.57">
<TableCell Name="Cell71" HorzAlign="Center" VertAlign="Center" Font="宋体, 11pt">
<TextObject Name="Text26" Left="28.35" Width="113.4" Height="22.68" Text="[dyTjjl.tjxmmc]" VertAlign="Bottom" Font="宋体, 10pt"/>
<ShapeObject Name="Shape4" Top="3" Width="22.68" Height="22.68" Border.Width="2"/>
<TextObject Name="Text27" Left="122.85" Width="113.4" Height="22.68" HorzAlign="Center" VertAlign="Bottom" Font="宋体, 10pt"/>
</TableCell>
<TableCell Name="Cell72" HorzAlign="Center" VertAlign="Center" Font="宋体, 11pt">
<TextObject Name="Text28" Left="113.4" Width="85.05" Height="22.68" VertAlign="Bottom" Font="宋体, 10pt"/>
</TableCell>
<TableCell Name="Cell73" HorzAlign="Center" VertAlign="Center" Font="宋体, 11pt"/>
</TableRow>
</TableObject>
<TextObject Name="Text20" Left="340.2" Width="103.95" Height="18.9" Visible="false" AfterDataEvent="Text20_AfterData" Text="[dyTjjl.tsxx]" VertAlign="Center" Font="宋体, 10pt"/>
<TextObject Name="Text21" Left="444.15" Width="94.5" Height="18.9" Visible="false" AfterDataEvent="Text21_AfterData" Text="[dyTjjl.tjksmc]" VertAlign="Center" Font="宋体, 10pt"/>
<TextObject Name="Text19" Left="548.1" Width="28.35" Height="18.9" Visible="false" AfterDataEvent="Text19_AfterData" Text="[dyTjjl.tjksId]" VertAlign="Center" Font="宋体, 10pt"/>
</DataBand>
</ReportPage>
<ReportPage Name="Page3">
<DataBand Name="Data3" Width="718.2" Height="264.6">
<TableObject Name="Table13" Width="349.65" Height="204.03">
<TableColumn Name="Column37" Width="349.65"/>
<TableRow Name="Row42" Height="22.67">
<TableCell Name="Cell98" Text="1、检查前一天请勿饮酒、吃油腻的食物注意休息。" Font="宋体, 10pt"/>
</TableRow>
<TableRow Name="Row43" Height="22.67">
<TableCell Name="Cell99" Text="2、抽血前8小时禁水禁食各项检查截止到9:30。" Font="宋体, 10pt"/>
</TableRow>
<TableRow Name="Row44" Height="22.67">
<TableCell Name="Cell100" Text="3、请保留晨尿保留尿标本中段尿。" Font="宋体, 10pt"/>
</TableRow>
<TableRow Name="Row45" Height="22.67">
<TableCell Name="Cell101" Text="4、月经期间请勿做妇检和尿检。" Font="宋体, 10pt"/>
</TableRow>
<TableRow Name="Row46" Height="22.67">
<TableCell Name="Cell102" Text="5、怀孕期间请勿做X线检查。" Font="宋体, 10pt"/>
</TableRow>
<TableRow Name="Row47" Height="22.67">
<TableCell Name="Cell103" Text="6、测血压前请休息10--15分钟。" Font="宋体, 10pt"/>
</TableRow>
<TableRow Name="Row48" Height="22.67">
<TableCell Name="Cell104" Text="7、需做膀胱前列腺子宫附件彩超者应在憋尿状态下检" Font="宋体, 10pt"/>
</TableRow>
<TableRow Name="Row49" Height="22.67">
<TableCell Name="Cell105" Text=" 查,查后再留尿标本。" Font="宋体, 10pt"/>
</TableRow>
<TableRow Name="Row50" Height="22.67">
<TableCell Name="Cell106" Text="8、团体查体报告由单位统一领取。" Font="宋体, 10pt"/>
</TableRow>
</TableObject>
<ShapeObject Name="Shape6" Top="207.9" Width="349.65" Height="56.7" Border.Width="0.25"/>
<TextObject Name="Text33" Top="207.9" Width="349.65" Height="28.35" Text=" * 体检时请务必携带指引单" VertAlign="Bottom" Font="宋体, 14pt, style=Bold"/>
<TextObject Name="Text34" Top="236.25" Width="349.65" Height="28.35" Text=" * 结束后请将该单交回基础检查室" VertAlign="Bottom" Font="宋体, 14pt, style=Bold"/>
</DataBand>
</ReportPage>
</Report>