You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.

166 lines
19 KiB

1 month ago
  1. <?xml version="1.0" encoding="utf-8"?>
  2. <Report ScriptLanguage="CSharp" ReportInfo.Created="08/18/2023 17:01:03" ReportInfo.Modified="08/03/2024 09:46:47" ReportInfo.CreatorVersion="2018.3.13.0">
  3. <ScriptText>using System;
  4. using System.Collections;
  5. using System.Collections.Generic;
  6. using System.ComponentModel;
  7. using System.Windows.Forms;
  8. using System.Drawing;
  9. using System.Data;
  10. using FastReport;
  11. using FastReport.Data;
  12. using FastReport.Dialog;
  13. using FastReport.Barcode;
  14. using FastReport.Table;
  15. using FastReport.Utils;
  16. using System.IO;
  17. namespace FastReport
  18. {
  19. public class ReportScript
  20. {
  21. }
  22. }
  23. </ScriptText>
  24. <Dictionary>
  25. <TableDataSource Name="summary" ReferenceName="Data.summary" DataType="System.Int32" Enabled="true">
  26. <Column Name="customerOrgName" DataType="System.String"/>
  27. <Column Name="certificateNo" DataType="System.String"/>
  28. <Column Name="medicalTypeName" DataType="System.String"/>
  29. <Column Name="medicalStartDate" DataType="System.String"/>
  30. <Column Name="recordNumber" DataType="System.String"/>
  31. <Column Name="medicalCenterName" DataType="System.String"/>
  32. <Column Name="medicalCenterAddress" DataType="System.String"/>
  33. <Column Name="reportDate" DataType="System.String"/>
  34. <Column Name="medicalSumCount" DataType="System.String"/>
  35. <Column Name="whenLeavingWorkCount" DataType="System.String"/>
  36. <Column Name="onDutyCount" DataType="System.String"/>
  37. <Column Name="poisonNames" DataType="System.String"/>
  38. <Column Name="conclusions" DataType="System.String"/>
  39. <Column Name="jobTypes" DataType="System.String"/>
  40. </TableDataSource>
  41. <TableDataSource Name="cdetail" ReferenceName="Data.cdetail" DataType="System.Int32" Enabled="true">
  42. <Column Name="conclusionName" DataType="System.String"/>
  43. <Column Name="conclusionCount" DataType="System.Int64"/>
  44. <Column Name="conclusionRatio" DataType="System.Double"/>
  45. <Column Name="displayOrder" DataType="System.Int64"/>
  46. </TableDataSource>
  47. <TableDataSource Name="asbitem" ReferenceName="Data.asbitem" DataType="System.Int32" Enabled="true">
  48. <Column Name="abnormalAsbitemName" DataType="System.String"/>
  49. <Column Name="abnormalCount" DataType="System.Int64"/>
  50. <Column Name="abnormalRatio" DataType="System.Double"/>
  51. <Column Name="displayOrder" DataType="System.Int64"/>
  52. </TableDataSource>
  53. <Parameter Name="printer" DataType="System.String"/>
  54. <Parameter Name="hisLog" DataType="System.String"/>
  55. <Parameter Name="pageFooter" DataType="System.String"/>
  56. </Dictionary>
  57. <ReportPage Name="Page1" RawPaperSize="9" FirstPageSource="15" OtherPagesSource="15">
  58. <ColumnHeaderBand Name="ColumnHeader1" Width="718.2" Height="1020.6" Guides="198.45">
  59. <TextObject Name="Text1" Top="9.45" Width="718.2" Height="47.25" Text="[summary.medicalCenterName]" HorzAlign="Center" VertAlign="Bottom" Font="宋体, 28pt"/>
  60. <TextObject Name="Text2" Top="66.15" Width="718.2" Height="37.8" Text="职业健康检查总结报告" HorzAlign="Center" VertAlign="Bottom" Font="宋体, 22pt"/>
  61. <TextObject Name="Text3" Left="236.25" Top="103.95" Width="236.25" Height="18.9" Border.Lines="Bottom" Text="[summary.recordNumber]" HorzAlign="Center" Font="宋体, 12pt"/>
  62. <TextObject Name="Text4" Left="141.75" Top="264.6" Width="122.85" Height="28.35" Text="受检单位:" HorzAlign="Center" VertAlign="Bottom" Font="宋体, 16pt"/>
  63. <TextObject Name="Text6" Left="141.75" Top="322.88" Width="122.85" Height="28.35" Text="承检单位:" HorzAlign="Center" VertAlign="Bottom" Font="宋体, 16pt"/>
  64. <TextObject Name="Text7" Left="141.75" Top="381.16" Width="170.1" Height="28.35" Text="资格证书编号:" VertAlign="Bottom" Font="宋体, 16pt"/>
  65. <TextObject Name="Text8" Left="141.75" Top="439.44" Width="132.3" Height="28.35" Text="体检类别:" VertAlign="Bottom" Font="宋体, 16pt"/>
  66. <TextObject Name="Text9" Left="141.75" Top="497.72" Width="132.3" Height="28.35" Text="体检日期:" VertAlign="Bottom" Font="宋体, 16pt"/>
  67. <TextObject Name="Text10" Left="141.75" Top="555.99" Width="132.3" Height="28.35" Text="体检地点:" VertAlign="Bottom" Font="宋体, 16pt"/>
  68. <TextObject Name="Text11" Left="141.75" Top="614.25" Width="132.3" Height="28.35" Text="报告日期:" VertAlign="Bottom" Font="宋体, 16pt"/>
  69. <TextObject Name="Text12" Left="132.3" Top="699.3" Width="132.3" Height="28.35" Text="报告:" VertAlign="Bottom" Font="宋体, 16pt"/>
  70. <TextObject Name="Text13" Left="132.3" Top="749.7" Width="132.3" Height="28.35" Text="审核:" VertAlign="Bottom" Font="宋体, 16pt"/>
  71. <TextObject Name="Text14" Left="132.3" Top="800.1" Width="132.3" Height="28.35" Text="签发:" VertAlign="Bottom" Font="宋体, 16pt"/>
  72. <TextObject Name="Text15" Left="132.3" Top="850.5" Width="132.3" Height="28.35" Text="档案整理:" VertAlign="Bottom" Font="宋体, 16pt"/>
  73. <TextObject Name="Text16" Left="359.1" Top="888.3" Width="283.5" Height="28.35" Text="[summary.medicalCenterName]" HorzAlign="Center" VertAlign="Bottom" Font="宋体, 14pt"/>
  74. <TextObject Name="Text17" Left="434.7" Top="926.1" Width="189" Height="28.35" Border.Lines="Bottom" Text="[summary.reportDate]" AutoWidth="true" HorzAlign="Center" VertAlign="Bottom" Font="黑体, 12pt, style=Bold"/>
  75. <TextObject Name="Text18" Left="481.95" Top="963.9" Width="94.5" Height="18.9" Text="(公章)" HorzAlign="Center" VertAlign="Bottom" Font="宋体, 10pt"/>
  76. <TextObject Name="Text20" Left="245.7" Top="245.7" Width="396.9" Height="47.25" Text="[summary.customerOrgName]" VertAlign="Bottom" Font="宋体, 16pt"/>
  77. <TextObject Name="Text21" Left="245.7" Top="303.98" Width="396.9" Height="47.25" Text="[summary.medicalCenterName]" VertAlign="Bottom" Font="宋体, 16pt"/>
  78. <TextObject Name="Text22" Left="283.5" Top="362.26" Width="359.1" Height="47.25" Text="[summary.certificateNo]" VertAlign="Bottom" Font="宋体, 16pt"/>
  79. <TextObject Name="Text23" Left="245.7" Top="420.54" Width="359.1" Height="47.25" Border.Lines="Bottom" Text="[summary.medicalTypeName]" VertAlign="Bottom" Font="宋体, 16pt"/>
  80. <TextObject Name="Text24" Left="245.7" Top="478.82" Width="359.1" Height="47.25" Border.Lines="Bottom" Text="[summary.medicalStartDate]" VertAlign="Bottom" Font="宋体, 16pt"/>
  81. <TextObject Name="Text25" Left="245.7" Top="537.09" Width="359.1" Height="47.25" Text="[summary.medicalCenterAddress]" VertAlign="Center" Font="宋体, 12pt"/>
  82. <TextObject Name="Text26" Left="245.7" Top="595.35" Width="359.1" Height="47.25" Border.Lines="Bottom" Text="[summary.reportDate]" VertAlign="Bottom" Font="宋体, 16pt"/>
  83. </ColumnHeaderBand>
  84. <PageFooterBand Name="PageFooter1" Top="1024.6" Width="718.2" Height="37.8">
  85. <TextObject Name="Text19" Left="434.7" Top="9.45" Width="94.5" Height="18.9" Text="第[Page#]页/共[TotalPages#]页" HorzAlign="Center" VertAlign="Bottom" Font="宋体, 10pt"/>
  86. </PageFooterBand>
  87. </ReportPage>
  88. <ReportPage Name="Page2">
  89. <DataBand Name="Data1" Top="637.15" Width="718.2" Height="56.7" DataSource="cdetail">
  90. <TextObject Name="Text64" Left="132.3" Width="340.2" Height="56.7" CanBreak="false" Text="[cdetail.conclusionName]" VertAlign="Bottom" Font="宋体, 16pt"/>
  91. <TextObject Name="Text65" Left="472.5" Width="56.7" Height="56.7" Border.Lines="Bottom" CanBreak="false" Text="[cdetail.conclusionCount]" HorzAlign="Right" VertAlign="Bottom" Font="宋体, 16pt"/>
  92. <TextObject Name="Text66" Left="529.2" Width="28.35" Height="56.7" CanBreak="false" Text="人" HorzAlign="Right" VertAlign="Bottom" Font="宋体, 16pt"/>
  93. <TextObject Name="Text67" Left="557.55" Width="56.7" Height="56.7" Border.Lines="Bottom" CanBreak="false" Text="[cdetail.conclusionRatio]" HorzAlign="Right" VertAlign="Bottom" Font="宋体, 16pt"/>
  94. <TextObject Name="Text68" Left="614.25" Width="28.35" Height="56.7" CanBreak="false" Text="%" HorzAlign="Right" VertAlign="Bottom" Font="宋体, 16pt"/>
  95. <TextObject Name="Text69" Left="66.15" Width="94.5" Height="56.7" CanBreak="false" Text="([Row#])" HorzAlign="Center" VertAlign="Bottom" Font="宋体, 16pt"/>
  96. <DataHeaderBand Name="DataHeader2" Width="718.2" Height="633.15">
  97. <TextObject Name="Text27" Left="9.45" Top="75.1" Width="425.2" Height="37.8" Border.Lines="Bottom" Text="[summary.customerOrgName]" VertAlign="Bottom" Font="宋体, 12pt"/>
  98. <TextObject Name="Text28" Left="435.05" Top="75.1" Width="128.75" Height="37.8" Text="的委托,于" VertAlign="Bottom" Font="宋体, 16pt"/>
  99. <TextObject Name="Text29" Left="548.1" Top="75.1" Width="170.1" Height="37.8" Border.Lines="Bottom" Text="[summary.medicalStartDate]" VertAlign="Bottom" Font="宋体, 16pt"/>
  100. <TextObject Name="Text30" Left="9.45" Top="113.4" Width="708.75" Height="37.8" Text="对该公司接触有毒有害的员工进行职业健康检查,现将检查情况如下:" AutoWidth="true" VertAlign="Bottom" WordWrap="false" Font="宋体, 16pt"/>
  101. <TextObject Name="Text31" Left="9.45" Top="151.2" Width="708.75" Height="37.8" Text="一、 小结" AutoWidth="true" VertAlign="Bottom" WordWrap="false" Font="宋体, 16pt"/>
  102. <TextObject Name="Text32" Left="113.4" Top="189" Width="567" Height="37.8" Text="根据该公司提供《职业健康检查委托协议书》及相关资料," AutoWidth="true" VertAlign="Bottom" WordWrap="false" Font="宋体, 16pt"/>
  103. <TextObject Name="Text33" Left="661.5" Top="189" Width="56.7" Height="37.8" Border.Lines="Bottom" Text="[summary.medicalSumCount]" HorzAlign="Right" VertAlign="Bottom" Font="宋体, 16pt"/>
  104. <TextObject Name="Text34" Left="9.45" Top="226.8" Width="311.85" Height="37.8" Text="名员工进行职业健康检查,其中" AutoWidth="true" VertAlign="Bottom" WordWrap="false" Font="宋体, 16pt"/>
  105. <TextObject Name="Text35" Left="321.3" Top="226.8" Width="56.7" Height="37.8" Border.Lines="Bottom" Text="[summary.whenLeavingWorkCount]" HorzAlign="Right" VertAlign="Bottom" Font="宋体, 16pt"/>
  106. <TextObject Name="Text36" Left="378" Top="226.8" Width="170.1" Height="37.8" Text="人为离岗时体检," AutoWidth="true" VertAlign="Bottom" WordWrap="false" Font="宋体, 16pt"/>
  107. <TextObject Name="Text37" Left="548.1" Top="226.8" Width="56.7" Height="37.8" Border.Lines="Bottom" Text="[summary.onDutyCount]" HorzAlign="Right" VertAlign="Bottom" Font="宋体, 16pt"/>
  108. <TextObject Name="Text38" Left="604.8" Top="226.8" Width="113.4" Height="37.8" Text="人为在岗期" AutoWidth="true" VertAlign="Bottom" WordWrap="false" Font="宋体, 16pt"/>
  109. <TextObject Name="Text39" Left="9.45" Top="274.05" Width="255.15" Height="37.8" Text="间体检,拟接触危害因素:" AutoWidth="true" VertAlign="Bottom" WordWrap="false" Font="宋体, 16pt"/>
  110. <TextObject Name="Text40" Left="9.45" Top="321.3" Width="708.75" Height="37.8" Border.Lines="Bottom" Text="[summary.poisonNames]" VertAlign="Bottom" Font="宋体, 16pt"/>
  111. <TextObject Name="Text41" Left="9.45" Top="368.55" Width="113.4" Height="37.8" Text="等,部分有" AutoWidth="true" VertAlign="Bottom" WordWrap="false" Font="宋体, 16pt"/>
  112. <TextObject Name="Text42" Left="122.85" Top="368.55" Width="595.35" Height="37.8" Border.Lines="Bottom" Text="[summary.conclusions]" VertAlign="Bottom" Font="宋体, 16pt"/>
  113. <TextObject Name="Text43" Left="9.45" Top="415.8" Width="75.6" Height="37.8" Text="工种为" AutoWidth="true" VertAlign="Bottom" WordWrap="false" Font="宋体, 16pt"/>
  114. <TextObject Name="Text44" Left="85.05" Top="415.8" Width="595.35" Height="37.8" Border.Lines="Bottom" Text="[summary.jobTypes]" VertAlign="Bottom" Font="宋体, 16pt"/>
  115. <TextObject Name="Text46" Left="9.45" Top="463.05" Width="708.75" Height="37.8" Text="二、 检查项目" AutoWidth="true" VertAlign="Bottom" WordWrap="false" Font="宋体, 16pt"/>
  116. <TextObject Name="Text47" Left="9.45" Top="500.85" Width="708.75" Height="37.8" Text="职业健康检查项目按照卫生部《职业健康监护技术规范》GZB188进行。" AutoWidth="true" HorzAlign="Right" VertAlign="Bottom" WordWrap="false" Font="宋体, 16pt"/>
  117. <TextObject Name="Text48" Left="9.45" Top="548.1" Width="708.75" Height="37.8" Text="三、 检查结果" AutoWidth="true" VertAlign="Bottom" WordWrap="false" Font="宋体, 16pt"/>
  118. <TextObject Name="Text49" Left="9.45" Top="585.9" Width="708.75" Height="37.8" Text=" 1、目标疾病检出情况" AutoWidth="true" VertAlign="Bottom" WordWrap="false" Font="宋体, 16pt"/>
  119. <TextObject Name="Text5" Left="85.05" Top="18.9" Width="633.15" Height="37.8" Text="为贯彻落实 《中华人民共和国职业病防治法》,现受于" AutoWidth="true" HorzAlign="Right" VertAlign="Bottom" WordWrap="false" Font="宋体, 16pt"/>
  120. <TextObject Name="Text45" Left="680.4" Top="415.8" Width="37.8" Height="37.8" Text="等。" AutoWidth="true" VertAlign="Bottom" WordWrap="false" Font="宋体, 16pt"/>
  121. </DataHeaderBand>
  122. <Sort>
  123. <Sort Expression="[cdetail.displayOrder]"/>
  124. </Sort>
  125. </DataBand>
  126. <DataBand Name="Data2" Top="739.65" Width="718.2" Height="56.7" DataSource="asbitem">
  127. <TextObject Name="Text71" Left="132.3" Width="340.2" Height="56.7" CanBreak="false" Text="[asbitem.abnormalAsbitemName] 检查异常" VertAlign="Bottom" Font="宋体, 16pt"/>
  128. <TextObject Name="Text72" Left="472.5" Width="56.7" Height="56.7" Border.Lines="Bottom" CanBreak="false" Text="[asbitem.abnormalCount]" HorzAlign="Right" VertAlign="Bottom" Font="宋体, 16pt"/>
  129. <TextObject Name="Text73" Left="529.2" Width="28.35" Height="56.7" CanBreak="false" Text="人" HorzAlign="Right" VertAlign="Bottom" Font="宋体, 16pt"/>
  130. <TextObject Name="Text74" Left="557.55" Width="56.7" Height="56.7" Border.Lines="Bottom" CanBreak="false" Text="[asbitem.abnormalRatio]" HorzAlign="Right" VertAlign="Bottom" Font="宋体, 16pt"/>
  131. <TextObject Name="Text75" Left="614.25" Width="28.35" Height="56.7" CanBreak="false" Text="%" HorzAlign="Right" VertAlign="Bottom" Font="宋体, 16pt"/>
  132. <TextObject Name="Text76" Left="66.15" Width="94.5" Height="56.7" CanBreak="false" Text="([Row#])" HorzAlign="Center" VertAlign="Bottom" Font="宋体, 16pt"/>
  133. <DataHeaderBand Name="DataHeader1" Top="697.85" Width="718.2" Height="37.8">
  134. <TextObject Name="Text70" Left="9.45" Width="708.75" Height="37.8" Text=" 2、相关检查情况" AutoWidth="true" VertAlign="Bottom" WordWrap="false" Font="宋体, 16pt"/>
  135. </DataHeaderBand>
  136. <Sort>
  137. <Sort Expression="[asbitem.displayOrder]"/>
  138. </Sort>
  139. </DataBand>
  140. <PageFooterBand Name="PageFooter2" Top="800.35" Width="718.2" Height="37.8">
  141. <TextObject Name="Text62" Left="425.25" Top="9.45" Width="94.5" Height="18.9" Text="第[Page#]页/共[TotalPages#]页" HorzAlign="Center" VertAlign="Bottom" Font="宋体, 10pt"/>
  142. </PageFooterBand>
  143. </ReportPage>
  144. <ReportPage Name="Page3">
  145. <ColumnHeaderBand Name="ColumnHeader3" Width="718.2" Height="923.45">
  146. <TextObject Name="Text50" Left="9.45" Width="708.75" Height="37.8" Text=" 3、主检医师审核后的结论和建议详见表3和个人体检报告" VertAlign="Bottom" WordWrap="false" Font="宋体, 16pt"/>
  147. <TextObject Name="Text51" Left="9" Top="48" Width="708.75" Height="37.8" Text="四、 建议" VertAlign="Bottom" WordWrap="false" Font="宋体, 16pt"/>
  148. <TextObject Name="Text52" Left="8" Top="93" Width="708.75" Height="37.8" Text=" 1、&quot;职业禁忌证”的处理建议" VertAlign="Bottom" WordWrap="false" Font="宋体, 16pt"/>
  149. <TextObject Name="Text53" Left="8" Top="136.55" Width="708.75" Height="174.8" Text=" 根据&lt;中华人民共和国职业病防治法&gt;&gt;第三十六条第二款:&quot;用人单位不得安排未经上岗前职业健康检查的劳动者从事接触职业病危害的作业;不得安排有职业禁忌的劳动者从事其禁忌的作业;对在职业健康检查中发现有与所从事的职业相关的健康损害的劳动者,应当调离原工作岗位,并妥善安置;对未进行离岗前职业健康检查的劳动者不得解除或者终止与其订立的劳动合同&quot;的规定,原则上对有职业禁忌证的劳动者不应该从事该工种作业。" VertAlign="Bottom" Font="宋体, 16pt"/>
  150. <TextObject Name="Text54" Left="8" Top="315" Width="708.75" Height="37.8" Text=" 2、“疑似职业病”的处理建议" VertAlign="Bottom" WordWrap="false" Font="宋体, 16pt"/>
  151. <TextObject Name="Text55" Left="10" Top="360" Width="708.75" Height="195.8" Text=" 根据&lt;中华人民共和国职业病防治法&gt;&gt;第五十一条:&quot;用人单位和医疗卫生机构发现职业病病人或者疑似职业病病人时,应当及时向所在地卫生行政部门和安全生产监督管理部门报告。确诊为职业病的,用人单位还应当向所在地劳动保障行政部门报告。第五十六条:&quot;医疗卫生机构发现疑似职业病病人时,应当告知劳动者本人并及时通知用人单位。用人单位应当及时安排对疑似职业病病人进行诊断;在疑似职业病病人诊断或者医学观察期间,不得解除或者终止与其订立的劳动合同。疑似职业病病人在诊断、医学观察期间的费用,由用人单位承担。" VertAlign="Bottom" Font="宋体, 16pt"/>
  152. <TextObject Name="Text56" Left="9.45" Top="557.55" Width="708.75" Height="37.8" Text=" 3、&quot;复查&quot;的处理建议" VertAlign="Bottom" WordWrap="false" Font="宋体, 16pt"/>
  153. <TextObject Name="Text57" Left="9.45" Top="604.8" Width="708.75" Height="82.4" Text=" 体检总报告目标疾病检出中的&quot;复查&quot;主要是指:怀疑跟所从事的职业接触有毒有害因素造成的靶细胞器官有关,需要进一步复查确认的项目,复查项目以最后复查结果为准。" VertAlign="Bottom" Font="宋体, 16pt"/>
  154. <TextObject Name="Text58" Left="9.45" Top="699.3" Width="708.75" Height="37.8" Text=" 4、&quot;其它疾病或异常&quot;的处理建议" VertAlign="Bottom" WordWrap="false" Font="宋体, 16pt"/>
  155. <TextObject Name="Text59" Left="9.45" Top="746.55" Width="708.75" Height="37.8" Text=" 详见总结报告相关附表或个人体检表。" VertAlign="Bottom" WordWrap="false" Font="宋体, 16pt"/>
  156. <TextObject Name="Text60" Left="9.45" Top="793.8" Width="708.75" Height="37.8" Text="五、 告知申明" VertAlign="Bottom" WordWrap="false" Font="宋体, 16pt"/>
  157. <TextObject Name="Text61" Left="9.45" Top="841.05" Width="708.75" Height="82.4" Text=" 按照《中华人民共和国职业病防治法》、《用人单位职业健康监护监督管理办法》等相关法律法规,职业健康检查结果应如实告知劳动者,请及时告知,并做好后续处理工作。" VertAlign="Bottom" Font="宋体, 16pt"/>
  158. </ColumnHeaderBand>
  159. <PageFooterBand Name="PageFooter3" Top="927.45" Width="718.2" Height="37.8">
  160. <TextObject Name="Text63" Left="425.25" Top="9.45" Width="94.5" Height="18.9" Text="第[Page#]页/共[TotalPages#]页" HorzAlign="Center" VertAlign="Bottom" Font="宋体, 10pt"/>
  161. </PageFooterBand>
  162. </ReportPage>
  163. </Report>