FrmLabDateParm.xml 79 KB

12345678910111213141516171819202122232425262728293031323334353637383940414243444546474849505152535455565758596061626364656667686970717273747576777879808182838485868788899091929394959697989910010110210310410510610710810911011111211311411511611711811912012112212312412512612712812913013113213313413513613713813914014114214314414514614714814915015115215315415515615715815916016116216316416516616716816917017117217317417517617717817918018118218318418518618718818919019119219319419519619719819920020120220320420520620720820921021121221321421521621721821922022122222322422522622722822923023123223323423523623723823924024124224324424524624724824925025125225325425525625725825926026126226326426526626726826927027127227327427527627727827928028128228328428528628728828929029129229329429529629729829930030130230330430530630730830931031131231331431531631731831932032132232332432532632732832933033133233333433533633733833934034134234334434534634734834935035135235335435535635735835936036136236336436536636736836937037137237337437537637737837938038138238338438538638738838939039139239339439539639739839940040140240340440540640740840941041141241341441541641741841942042142242342442542642742842943043143243343443543643743843944044144244344444544644744844945045145245345445545645745845946046146246346446546646746846947047147247347447547647747847948048148248348448548648748848949049149249349449549649749849950050150250350450550650750850951051151251351451551651751851952052152252352452552652752852953053153253353453553653753853954054154254354454554654754854955055155255355455555655755855956056156256356456556656756856957057157257357457557657757857958058158258358458558658758858959059159259359459559659759859960060160260360460560660760860961061161261361461561661761861962062162262362462562662762862963063163263363463563663763863964064164264364464564664764864965065165265365465565665765865966066166266366466566666766866967067167267367467567667767867968068168268368468568668768868969069169269369469569669769869970070170270370470570670770870971071171271371471571671771871972072172272372472572672772872973073173273373473573673773873974074174274374474574674774874975075175275375475575675775875976076176276376476576676776876977077177277377477577677777877978078178278378478578678778878979079179279379479579679779879980080180280380480580680780880981081181281381481581681781881982082182282382482582682782882983083183283383483583683783883984084184284384484584684784884985085185285385485585685785885986086186286386486586686786886987087187287387487587687787887988088188288388488588688788888989089189289389489589689789889990090190290390490590690790890991091191291391491591691791891992092192292392492592692792892993093193293393493593693793893994094194294394494594694794894995095195295395495595695795895996096196296396496596696796896997097197297397497597697797897998098198298398498598698798898999099199299399499599699799899910001001100210031004100510061007100810091010101110121013101410151016101710181019102010211022102310241025102610271028102910301031103210331034103510361037103810391040104110421043104410451046104710481049105010511052105310541055105610571058105910601061106210631064106510661067106810691070107110721073107410751076107710781079108010811082108310841085108610871088108910901091109210931094109510961097109810991100110111021103110411051106110711081109111011111112111311141115111611171118111911201121112211231124112511261127112811291130113111321133113411351136113711381139114011411142114311441145114611471148114911501151115211531154115511561157115811591160116111621163116411651166116711681169117011711172117311741175117611771178117911801181118211831184118511861187118811891190119111921193119411951196119711981199120012011202120312041205120612071208120912101211121212131214121512161217121812191220122112221223122412251226122712281229123012311232123312341235123612371238123912401241124212431244124512461247124812491250125112521253125412551256125712581259126012611262126312641265126612671268126912701271127212731274127512761277127812791280128112821283128412851286128712881289129012911292129312941295129612971298129913001301130213031304130513061307130813091310131113121313131413151316131713181319132013211322132313241325132613271328132913301331133213331334133513361337133813391340134113421343134413451346134713481349135013511352135313541355135613571358135913601361136213631364136513661367136813691370137113721373137413751376137713781379138013811382138313841385138613871388138913901391139213931394139513961397139813991400140114021403140414051406140714081409141014111412141314141415141614171418141914201421142214231424142514261427142814291430143114321433143414351436143714381439144014411442144314441445144614471448144914501451145214531454145514561457145814591460146114621463146414651466146714681469147014711472147314741475147614771478147914801481148214831484148514861487148814891490149114921493149414951496149714981499150015011502150315041505150615071508150915101511151215131514151515161517151815191520152115221523152415251526152715281529153015311532153315341535153615371538153915401541154215431544154515461547154815491550155115521553155415551556155715581559156015611562156315641565156615671568156915701571157215731574157515761577157815791580158115821583158415851586158715881589159015911592159315941595159615971598159916001601160216031604160516061607160816091610161116121613161416151616161716181619162016211622162316241625162616271628162916301631163216331634163516361637163816391640164116421643164416451646164716481649165016511652165316541655165616571658165916601661166216631664166516661667166816691670167116721673167416751676167716781679168016811682168316841685168616871688168916901691169216931694169516961697169816991700170117021703170417051706170717081709171017111712171317141715171617171718171917201721172217231724172517261727172817291730173117321733173417351736173717381739174017411742174317441745174617471748174917501751175217531754175517561757175817591760176117621763176417651766176717681769177017711772177317741775177617771778177917801781178217831784178517861787178817891790179117921793179417951796179717981799180018011802180318041805180618071808180918101811181218131814181518161817181818191820182118221823182418251826182718281829183018311832183318341835183618371838183918401841184218431844184518461847184818491850185118521853185418551856185718581859186018611862186318641865186618671868186918701871187218731874187518761877187818791880188118821883188418851886188718881889189018911892189318941895189618971898189919001901190219031904190519061907190819091910191119121913191419151916191719181919192019211922192319241925192619271928192919301931193219331934193519361937193819391940194119421943194419451946194719481949195019511952195319541955195619571958195919601961196219631964196519661967196819691970197119721973197419751976197719781979198019811982198319841985198619871988198919901991199219931994199519961997199819992000200120022003200420052006200720082009201020112012201320142015201620172018201920202021202220232024202520262027202820292030203120322033203420352036203720382039204020412042204320442045204620472048204920502051205220532054205520562057205820592060206120622063206420652066206720682069207020712072207320742075207620772078207920802081208220832084208520862087208820892090209120922093209420952096209720982099210021012102210321042105210621072108210921102111211221132114211521162117211821192120212121222123212421252126212721282129213021312132213321342135213621372138213921402141214221432144214521462147214821492150215121522153215421552156215721582159216021612162216321642165216621672168216921702171217221732174217521762177217821792180218121822183218421852186218721882189219021912192219321942195219621972198219922002201220222032204220522062207220822092210221122122213221422152216221722182219222022212222222322242225222622272228222922302231223222332234223522362237223822392240224122422243224422452246224722482249225022512252225322542255225622572258225922602261226222632264226522662267226822692270227122722273227422752276227722782279228022812282228322842285228622872288228922902291229222932294229522962297229822992300230123022303230423052306230723082309231023112312
  1. <?xml version="1.0" encoding="UTF-8"?>
  2. <queryMap desc="试验条件">
  3. <query id="FrmLabDateParm.QueryOutdecCheckconsignDetail" desc="查询委托明细信息表">
  4. <![CDATA[
  5. SELECT T.CHECK_NO,
  6. T.SAMPLE_NO,
  7. T1.HEAT_NO,
  8. T1.LOT_NO,
  9. T1.STEEL_GRADE,
  10. T1.STEEL_NO,
  11. T.BATCH_NO,
  12. T.SIZE_DESC,
  13. T1.DIMATER || '*' || T1.HEIGHT PIPE_SIZE,
  14. T.PHY_CODE_MAX,
  15. T.PHY_NAME_MAX,
  16. NVL(T3.SPLINE_COUNT, T.SAMPLE_COUNT) SAMPLE_COUNT,
  17. T.DEPT_ID,
  18. T.JG_SEND_NAME,
  19. TO_CHAR(T.JG_SEND_TIME, 'YYYY-MM-DD HH24:MI:SS') JG_SEND_TIME,
  20. T.LAB_RECEIVE_NAME,
  21. TO_CHAR(T.LAB_RECEIVE_TIME, 'YYYY-MM-DD HH24:MI:SS') LAB_RECEIVE_TIME,
  22. T.CHECK_NAME,
  23. TO_CHAR(T.CHECK_TIME, 'YYYY-MM-DD HH24:MI:SS') CHECK_TIME,
  24. T.CHECK_SHIFT,
  25. T.CHECK_CLASS,
  26. T.CHECK_TEMP,
  27. T.DEVICE_NO,
  28. T.DEVICE_NAME,
  29. T.AUDIT_NAME,
  30. TO_CHAR(T.AUDIT_TIME, 'YYYY-MM-DD HH24:MI:SS') AUDIT_TIME,
  31. T.ISRCL,
  32. T.FLAG,
  33. T.SAMPLE_REMARK,
  34. T.REMARK,
  35. T.FILE_PATH1,
  36. T.FILE_PATH2,
  37. T.FILE_PATH3,
  38. T.FILE_PATH4,
  39. DECODE(T2.STANDARD, '', T.CHECK_STD, T2.STANDARD) STANDARD,
  40. TO_CHAR(T2.TEST_DATE, 'YYYY-MM-DD HH24:MI:SS') TEST_DATE,
  41. TO_CHAR(T2.REPORTED_DATE, 'YYYY-MM-DD HH24:MI:SS') REPORTED_DATE,
  42. T2.REPORTED_NAME,
  43. T2.APPROVED_NAME,
  44. NVL(T2.SAMPLE_NO1, T.SAMPLE_NO || '-1') SAMPLE_NO1,
  45. NVL(T2.SAMPLE_NO2, T.SAMPLE_NO || '-2') SAMPLE_NO2,
  46. NVL(T2.SAMPLE_NO3, T.SAMPLE_NO || '-3') SAMPLE_NO3,
  47. T2.SPECIMEN_SIZE1,
  48. T2.SPECIMEN_SIZE2,
  49. T2.SPECIMEN_SIZE3,
  50. T2.NACE_PH_S1,
  51. T2.NACE_PH_S2,
  52. T2.NACE_PH_S3,
  53. T2.NACE_PH_F1,
  54. T2.NACE_PH_F2,
  55. T2.NACE_PH_F3,
  56. T2.NACE_SOLUTION_S1,
  57. T2.NACE_SOLUTION_S2,
  58. T2.NACE_SOLUTION_S3,
  59. T2.NACE_SOLUTION_F1,
  60. T2.NACE_SOLUTION_F2,
  61. T2.NACE_SOLUTION_F3,
  62. T2.PSEUDO_STRESS,
  63. T2.SECTION_NO11,
  64. T2.SECTION_NO12,
  65. T2.SECTION_NO21,
  66. T2.SECTION_NO22,
  67. NVL(T2.TEST_TIME,
  68. CASE
  69. WHEN INSTR(T.PHY_NAME_MAX, '氢致开裂试验HIC') > 0 THEN
  70. '96'
  71. WHEN INSTR(T.PHY_NAME_MAX, 'SSC-B法试验') > 0 THEN
  72. '720'
  73. WHEN INSTR(T.PHY_NAME_MAX, 'SSC-D法试验') > 0 THEN
  74. '336'
  75. WHEN INSTR(T.PHY_NAME_MAX, '三点弯曲') > 0 THEN
  76. '720'
  77. ELSE
  78. ''
  79. END) TEST_TIME,
  80. NVL(T2.TEST_TEMP1,
  81. CASE
  82. WHEN INSTR(T.PHY_NAME_MAX, '氢致开裂试验HIC') > 0 THEN
  83. '23-26'
  84. WHEN INSTR(T.PHY_NAME_MAX, 'SSC-A法试验') > 0 THEN
  85. '22-26'
  86. WHEN INSTR(T.PHY_NAME_MAX, 'SSC-B法试验') > 0 THEN
  87. '23-26'
  88. WHEN INSTR(T.PHY_NAME_MAX, 'SSC-D法试验') > 0 THEN
  89. '23-25'
  90. WHEN INSTR(T.PHY_NAME_MAX, '三点弯曲') > 0 THEN
  91. '22-26'
  92. ELSE
  93. ''
  94. END) TEST_TEMP1,
  95. NVL(T2.TEST_TEMP2,
  96. CASE
  97. WHEN INSTR(T.PHY_NAME_MAX, '氢致开裂试验HIC') > 0 THEN
  98. '23-26'
  99. WHEN INSTR(T.PHY_NAME_MAX, 'SSC-A法试验') > 0 THEN
  100. '22-26'
  101. WHEN INSTR(T.PHY_NAME_MAX, 'SSC-B法试验') > 0 THEN
  102. '23-26'
  103. WHEN INSTR(T.PHY_NAME_MAX, 'SSC-D法试验') > 0 THEN
  104. '23-25'
  105. ELSE
  106. ''
  107. END) TEST_TEMP2,
  108. NVL(T2.TEST_TEMP3,
  109. CASE
  110. WHEN INSTR(T.PHY_NAME_MAX, '氢致开裂试验HIC') > 0 THEN
  111. '23-26'
  112. WHEN INSTR(T.PHY_NAME_MAX, 'SSC-A法试验') > 0 THEN
  113. '22-26'
  114. WHEN INSTR(T.PHY_NAME_MAX, 'SSC-B法试验') > 0 THEN
  115. '23-26'
  116. WHEN INSTR(T.PHY_NAME_MAX, 'SSC-D法试验') > 0 THEN
  117. '23-25'
  118. ELSE
  119. ''
  120. END) TEST_TEMP3,
  121. T2.NOTE,
  122. NVL(T2.NACE_PH_NAME, 'NACE-A') NACE_PH_NAME,
  123. NVL(T2.YSMIN_NAME, '名义最小') YSMIN_NAME,
  124. NVL(T2.YSMIN1,
  125. DECODE(T.PHY_CODE_MAX,
  126. 'C0031',
  127. (SELECT MAX(A.VALUE1)
  128. FROM PIPE_CHECKCONSIGN_PHYDETAIL A
  129. WHERE A.CHECK_NO = T.CHECK_NO
  130. AND A.SAMPLE_NO = T.SAMPLE_NO
  131. AND A.PHY_CODE IN ('P0003',
  132. 'P0016',
  133. 'P0017',
  134. 'P0018',
  135. 'P0019',
  136. 'P0445',
  137. 'P0349',
  138. 'P0446')),
  139. '')) YSMIN1,
  140. NVL(T2.YSMIN2,
  141. DECODE(T.PHY_CODE_MAX,
  142. 'C0031',
  143. (SELECT MAX(A.VALUE1)
  144. FROM PIPE_CHECKCONSIGN_PHYDETAIL A
  145. WHERE A.CHECK_NO = T.CHECK_NO
  146. AND A.SAMPLE_NO = T.SAMPLE_NO
  147. AND A.PHY_CODE IN ('P0003',
  148. 'P0016',
  149. 'P0017',
  150. 'P0018',
  151. 'P0019',
  152. 'P0445',
  153. 'P0349',
  154. 'P0446')),
  155. '')) YSMIN2,
  156. NVL(T2.YSMIN3,
  157. DECODE(T.PHY_CODE_MAX,
  158. 'C0031',
  159. (SELECT MAX(A.VALUE1)
  160. FROM PIPE_CHECKCONSIGN_PHYDETAIL A
  161. WHERE A.CHECK_NO = T.CHECK_NO
  162. AND A.SAMPLE_NO = T.SAMPLE_NO
  163. AND A.PHY_CODE IN ('P0003',
  164. 'P0016',
  165. 'P0017',
  166. 'P0018',
  167. 'P0019',
  168. 'P0445',
  169. 'P0349',
  170. 'P0446')),
  171. '')) YSMIN3,
  172. T2.ACTUAL_S_YSMIN1,
  173. T2.ACTUAL_S_YSMIN2,
  174. T2.ACTUAL_S_YSMIN3,
  175. TO_CHAR(ACTUAL_LOAD1, 'FM99990.99') ACTUAL_LOAD1,
  176. TO_CHAR(ACTUAL_LOAD2, 'FM99990.99') ACTUAL_LOAD2,
  177. TO_CHAR(ACTUAL_LOAD3, 'FM99990.99') ACTUAL_LOAD3,
  178. TO_CHAR(CRACK_LENGTH1, 'FM99990.99') CRACK_LENGTH1,
  179. TO_CHAR(CRACK_LENGTH2, 'FM99990.99') CRACK_LENGTH2,
  180. TO_CHAR(CRACK_LENGTH3, 'FM99990.99') CRACK_LENGTH3,
  181. T2.PRESET_LOAD1,
  182. T2.PRESET_LOAD2,
  183. T2.PRESET_LOAD3,
  184. NVL(T2.NACE_H2S_NAME, 'NACE-A') NACE_H2S_NAME,
  185. NVL(T2.TEST_SOLUTION,
  186. CASE
  187. WHEN INSTR(T.PHY_NAME_MAX, '氢致开裂试验HIC') > 0 THEN
  188. '(质量分数)5.0 %氯化钠+0.5%冰醋酸+94.5%去离子水。Solution A:5.0%wt NaCl+0.5%wt Acetic Acid in deionized water'
  189. WHEN INSTR(T.PHY_NAME_MAX, '三点弯曲') > 0 THEN
  190. '0.5%(重量)冰醋酸加去离子水 5.0%wt Acetic Acid in deionized water'
  191. WHEN INSTR(T.PHY_NAME_MAX, 'SSC') > 0 THEN
  192. 'NACE-A 5.0%(重量)的氯化钠和0.5%(重量)的冰醋酸,溶解在蒸馏水或去离子水中。5.0 wt% sodium chloride and 0.5 wt% glacial acetic acid dissolved in distilled or deionized water'
  193. ELSE
  194. ''
  195. END) TEST_SOLUTION,
  196. T2.SURFACE_AREA1,
  197. T2.SURFACE_AREA2,
  198. T2.SURFACE_AREA3,
  199. T2.WEIGHT_BEFORE_TEST1,
  200. T2.WEIGHT_BEFORE_TEST2,
  201. T2.WEIGHT_BEFORE_TEST3,
  202. T2.WEIGHT_AFTER_TEST1,
  203. T2.WEIGHT_AFTER_TEST2,
  204. T2.WEIGHT_AFTER_TEST3,
  205. T2.LOSS_OF_WEIGHT1,
  206. T2.LOSS_OF_WEIGHT2,
  207. T2.LOSS_OF_WEIGHT3,
  208. T2.MASS_LOSS1,
  209. T2.MASS_LOSS2,
  210. T2.MASS_LOSS3,
  211. T2.PITTING_DENSITY1,
  212. T2.PITTING_DENSITY2,
  213. T2.PITTING_DENSITY3,
  214. T2.PITTING_COUNT1,
  215. T2.PITTING_COUNT2,
  216. T2.PITTING_COUNT3,
  217. NVL(T2.NACE_PH, '2.7') NACE_PH,
  218. T2.CLEANING_SAMPLE,
  219. T2.COLLECTION_RATE,
  220. T2.SPRAY_TYPE,
  221. T2.ANGLE,
  222. T2.SAMPLE_TYPE,
  223. T2.CONCENTRATION,
  224. DECODE(T2.TEST_ITEM, '', T.PHY_NAME_MAX, T2.TEST_ITEM) TEST_ITEM,
  225. T2.CONNECTION,
  226. T2.PROOF_RING_NO1,
  227. T2.PROOF_RING_NO2,
  228. T2.PROOF_RING_NO3,
  229. T2.PRESSURE_MEDIUM,
  230. T2.WEIGHT,
  231. T2.TEST_RESULT,
  232. T2.LOAD_LEVEL,
  233. T2.LOAD_LEVEL2,
  234. T2.LOAD_LEVEL3,
  235. T2.YING_ACTUAL_LOAD1,
  236. T2.YING_ACTUAL_LOAD2,
  237. T2.YING_ACTUAL_LOAD3,
  238. NVL(T2.REPORT_NO,
  239. CASE
  240. WHEN INSTR(T.PHY_NAME_MAX, '氢致开裂试验HIC') > 0 THEN
  241. 'FM-16-10-8.6-06-1'
  242. WHEN INSTR(T.PHY_NAME_MAX, 'SSC-A法试验') > 0 THEN
  243. 'FM-16-10-8.6-02-1'
  244. WHEN INSTR(T.PHY_NAME_MAX, 'SSC-B法试验') > 0 THEN
  245. 'FM-16-10-8.6-07-1'
  246. WHEN INSTR(T.PHY_NAME_MAX, 'SSC-D法试验') > 0 THEN
  247. 'FM-16-10-8.6-09-1'
  248. WHEN INSTR(T.PHY_NAME_MAX, '三点弯曲') > 0 THEN
  249. 'FM-16-10-8.6-13-1'
  250. ELSE
  251. ''
  252. END) REPORT_NO,
  253. NVL(T2.YING_ADD1, DECODE(T2.PHY_CODE_MAX, 'C0033', '', '0.01')) YING_ADD1,
  254. NVL(T2.YING_ADD2, DECODE(T2.PHY_CODE_MAX, 'C0033', '', '0.01')) YING_ADD2,
  255. NVL(T2.YING_ADD3, DECODE(T2.PHY_CODE_MAX, 'C0033', '', '0.01')) YING_ADD3,
  256. T2.TEST_RESULT2,
  257. T2.TEST_SPECIMENS1,
  258. T2.TEST_SPECIMENS2,
  259. NVL(T2.TEST_GAS, '≥99.5% H2S') TEST_GAS,
  260. NVL(T2.SAMPLING_ORIENTATION,
  261. CASE
  262. WHEN INSTR(T.PHY_NAME_MAX, 'SSC') > 0 THEN
  263. (SELECT MAX(P.SPLINE_ITEM_NAME_F)
  264. FROM PIPE_CHECKCONSIGN_PHYDETAIL P
  265. WHERE P.CHECK_NO = T.CHECK_NO
  266. AND P.PHY_CODE_MAX = T.PHY_CODE_MAX)
  267. ELSE
  268. '纵向 Longitudinal'
  269. END) SAMPLING_ORIENTATION,
  270. NVL(T2.DMTS,
  271. '碱性溶液脱脂,丙酮清洗 Degreased in alkaline solution and rinsed in acetone') DMTS,
  272. NVL(T2.SAMPLING_LOCATION,
  273. CASE
  274. WHEN INSTR(T.PHY_NAME_MAX, 'SSC-A') > 0 THEN
  275. '壁厚中心'
  276. WHEN INSTR(T.PHY_NAME_MAX, 'SSC-D') > 0 THEN
  277. '壁厚中心'
  278. ELSE
  279. '周向间隔120°120 degrees apart around the circumference'
  280. END) SAMPLING_LOCATION,
  281. NVL(T2.TEST_DURATION1,
  282. CASE
  283. WHEN INSTR(T.PHY_NAME_MAX, 'SSC-A') > 0 THEN
  284. '720'
  285. ELSE
  286. ''
  287. END) TEST_DURATION1,
  288. NVL(T2.TEST_DURATION2,
  289. CASE
  290. WHEN INSTR(T.PHY_NAME_MAX, 'SSC-A') > 0 THEN
  291. '720'
  292. ELSE
  293. ''
  294. END) TEST_DURATION2,
  295. NVL(T2.TEST_DURATION3,
  296. CASE
  297. WHEN INSTR(T.PHY_NAME_MAX, 'SSC-A') > 0 THEN
  298. '720'
  299. ELSE
  300. ''
  301. END) TEST_DURATION3,
  302. NVL(T2.LOAD_STERSS1, T2.YSMIN1 * T2.LOAD_LEVEL/100) LOAD_STERSS1,
  303. NVL(T2.LOAD_STERSS2, T2.YSMIN2 * T2.LOAD_LEVEL2/100) LOAD_STERSS2,
  304. NVL(T2.LOAD_STERSS3, T2.YSMIN3 * T2.LOAD_LEVEL3/100) LOAD_STERSS3,
  305. case
  306. when T2.YSMIN1 != 0 then
  307. NVL(T2.ACTUAL_LOAD_STERSS1,
  308. ROUND(NVL(T2.LOAD_STERSS1, T2.YSMIN1 * T2.LOAD_LEVEL) /
  309. T2.YSMIN1,
  310. 1))
  311. else
  312. '0'
  313. end ACTUAL_LOAD_STERSS1,
  314. case
  315. when T2.YSMIN2 != 0 then
  316. NVL(T2.ACTUAL_LOAD_STERSS2,
  317. ROUND(NVL(T2.LOAD_STERSS2, T2.YSMIN2 * T2.LOAD_LEVEL2) /
  318. T2.YSMIN2,
  319. 1))
  320. else
  321. '0'
  322. end ACTUAL_LOAD_STERSS2,
  323. case
  324. when T2.YSMIN3 != 0 then
  325. NVL(T2.ACTUAL_LOAD_STERSS3,
  326. ROUND(NVL(T2.LOAD_STERSS3, T2.YSMIN3 * T2.LOAD_LEVEL3) /
  327. T2.YSMIN3,
  328. 1))
  329. else
  330. '0'
  331. end ACTUAL_LOAD_STERSS3
  332. FROM PIPE_CHECKCONSIGN_DETAIL T,
  333. PIPE_CHECKCONSIGN_BASEINFO T1,
  334. PIPE_CHECKCONSIGN_LAB_RESULT T2,
  335. COM_BASE_PHY_C T3
  336. WHERE T.CHECK_NO = T1.CHECK_NO
  337. AND T.CHECK_NO = T2.CHECK_NO(+)
  338. AND T.SAMPLE_NO = T2.SAMPLE_NO(+)
  339. AND T.PHY_CODE_MAX = T2.PHY_CODE_MAX(+)
  340. AND T.PHY_CODE_MAX = T3.PHY_CODE(+)
  341. AND T.CHECK_NO = ?
  342. AND T.SAMPLE_NO = ?
  343. AND T.PHY_CODE_MAX = ?
  344. ]]>
  345. </query>
  346. <query id="FrmLabDateParm.QueryPipeCheckconsignDetailParm" desc="查询工程试验参数">
  347. <![CDATA[
  348. SELECT
  349. T.CHECK_NO,
  350. T.SAMPLE_NO,
  351. T.PHY_CODE_MAX,
  352. T.STEP,
  353. T.LOAD,
  354. T.PRESSURE_MEDIUM,
  355. T.INTERNAL_PRESSURE,
  356. T.DOGLEG_DEGREE,
  357. T.HOLD_TIME,
  358. T.TEST_RESULT,
  359. T.PIN,
  360. T.BOX,
  361. T.COMPOUND_TYPE,
  362. T.COMPOUND_WEIGHT,
  363. T.MAKEUP_TORQUE,
  364. T.TOTAL_TORQUE,
  365. T.BREAKOUT_TORQUE,
  366. T.OBSERVED_THREAD_RESULT,
  367. T.SHOULDER_TORQUE,
  368. '删除' AS BTN_DELETE
  369. FROM PIPE_CHECKCONSIGN_DTL_PARM T
  370. WHERE T.CHECK_NO = ?
  371. AND T.SAMPLE_NO = ?
  372. AND T.PHY_CODE_MAX = ?
  373. ]]>
  374. </query>
  375. <query id="FrmLabDateParm.QueryProofRingNo" desc="加载应力环号">
  376. <![CDATA[
  377. select PROOF_RING_NO
  378. from (select distinct t.PROOF_RING_NO1 PROOF_RING_NO
  379. from PIPE_CHECKCONSIGN_LAB_RESULT t
  380. union
  381. select distinct t.PROOF_RING_NO2 PROOF_RING_NO
  382. from PIPE_CHECKCONSIGN_LAB_RESULT t
  383. union
  384. select distinct t.PROOF_RING_NO3 PROOF_RING_NO
  385. from PIPE_CHECKCONSIGN_LAB_RESULT t)
  386. order by PROOF_RING_NO
  387. ]]>
  388. </query>
  389. <query id="FrmLabDateParm.initStressRingNo" desc="加载应力环号">
  390. <![CDATA[
  391. select T.STRESSRING_NO from PIPE_STRESSRING_PARM t
  392. ]]>
  393. </query>
  394. <query id="FrmLabDateParm.selectYsMin" desc="查询屈服强度">
  395. <![CDATA[
  396. SELECT NVL(B.YSMIN1, A.VALUE1) VALUE1, NVL(B.YSMIN1, A.STDMIN) STDMIN
  397. FROM PIPE_CHECKCONSIGN_PHYDETAIL A, PIPE_CHECKCONSIGN_LAB_RESULT B
  398. WHERE A.CHECK_NO = ?
  399. AND A.SAMPLE_NO = ?
  400. AND A.CHECK_NO = B.CHECK_NO
  401. AND A.SAMPLE_NO = B.SAMPLE_NO
  402. AND (INSTR(A.PHY_NAME, '屈服强度') > 0 OR INSTR(A.PHY_NAME, '延伸强度') > 0)
  403. ]]>
  404. </query>
  405. <query id="FrmLabDateParm.getAuditName" desc="查询审核人">
  406. <![CDATA[
  407. select t.*
  408. from PIPE_CHECKCONSIGN_DETAIL t
  409. WHERE T.CHECK_NO = ?
  410. AND T.SAMPLE_NO = ?
  411. AND T.PHY_CODE_MAX = ?
  412. ]]>
  413. </query>
  414. <query id="FrmLabDateParm.getFileFlag" desc="查询是否上传图片">
  415. <![CDATA[
  416. select LENGTH(T.FILE_PATH1) fileFlag
  417. from PIPE_CHECKCONSIGN_DETAIL t
  418. WHERE T.CHECK_NO = ?
  419. AND T.SAMPLE_NO = ?
  420. AND T.PHY_CODE_MAX = ?
  421. ]]>
  422. </query>
  423. <query id="FrmLabDateParm.SaveCheckconsignLabResult" desc="保存实验原始记录">
  424. <![CDATA[
  425. UPDATE PIPE_CHECKCONSIGN_LAB_RESULT T
  426. SET T.STANDARD = '#STANDARD#',
  427. T.TEST_DATE = TO_DATE('#TEST_DATE#',
  428. 'yyyy-MM-dd HH24:mi:ss'),
  429. T.REPORTED_DATE = TO_DATE('#REPORTED_DATE#',
  430. 'yyyy-MM-dd HH24:mi:ss'),
  431. T.REPORTED_NAME = '#REPORTED_NAME#',
  432. T.APPROVED_NAME = '#APPROVED_NAME#',
  433. T.SAMPLE_NO1 = '#SAMPLE_NO1#',
  434. T.SAMPLE_NO2 = '#SAMPLE_NO2#',
  435. T.SAMPLE_NO3 = '#SAMPLE_NO3#',
  436. T.SPECIMEN_SIZE1 = '#SPECIMEN_SIZE1#',
  437. T.SPECIMEN_SIZE2 = '#SPECIMEN_SIZE2#',
  438. T.SPECIMEN_SIZE3 = '#SPECIMEN_SIZE3#',
  439. T.NACE_PH_S1 = '#NACE_PH_S1#',
  440. T.NACE_PH_F1 = '#NACE_PH_F1#',
  441. T.NACE_PH_S2 = '#NACE_PH_S2#',
  442. T.NACE_PH_F2 = '#NACE_PH_F2#',
  443. T.NACE_PH_S3 = '#NACE_PH_S3#',
  444. T.NACE_PH_F3 = '#NACE_PH_F3#',
  445. T.NACE_SOLUTION_S1 = '#NACE_SOLUTION_S1#',
  446. T.NACE_SOLUTION_F1 = '#NACE_SOLUTION_F1#',
  447. T.NACE_SOLUTION_S2 = '#NACE_SOLUTION_S2#',
  448. T.NACE_SOLUTION_F2 = '#NACE_SOLUTION_F2#',
  449. T.NACE_SOLUTION_S3 = '#NACE_SOLUTION_S3#',
  450. T.NACE_SOLUTION_F3 = '#NACE_SOLUTION_F3#',
  451. T.PSEUDO_STRESS = '#PSEUDO_STRESS#',
  452. T.SECTION_NO11 = '#SECTION_NO11#',
  453. T.SECTION_NO12 = '#SECTION_NO12#',
  454. T.SECTION_NO21 = '#SECTION_NO21#',
  455. T.SECTION_NO22 = '#SECTION_NO22#',
  456. T.TEST_TIME = '#TEST_TIME#',
  457. T.TEST_TEMP1 = '#TEST_TEMP1#',
  458. T.TEST_TEMP2 = '#TEST_TEMP2#',
  459. T.TEST_TEMP3 = '#TEST_TEMP3#',
  460. T.NOTE = '#NOTE#',
  461. T.NACE_PH_NAME = '#NACE_PH_NAME#',
  462. T.YSMIN_NAME = '#YSMIN_NAME#',
  463. T.YSMIN1 = '#YSMIN1#',
  464. T.YSMIN2 = '#YSMIN2#',
  465. T.YSMIN3 = '#YSMIN3#',
  466. T.ACTUAL_S_YSMIN1 = '#ACTUAL_S_YSMIN1#',
  467. T.ACTUAL_S_YSMIN2 = '#ACTUAL_S_YSMIN2#',
  468. T.ACTUAL_S_YSMIN3 = '#ACTUAL_S_YSMIN3#',
  469. T.ACTUAL_LOAD1 = '#ACTUAL_LOAD1#',
  470. T.ACTUAL_LOAD2 = '#ACTUAL_LOAD2#',
  471. T.ACTUAL_LOAD3 = '#ACTUAL_LOAD3#',
  472. T.CRACK_LENGTH1 = '#CRACK_LENGTH1#',
  473. T.CRACK_LENGTH2 = '#CRACK_LENGTH2#',
  474. T.CRACK_LENGTH3 = '#CRACK_LENGTH3#',
  475. T.PRESET_LOAD1 = '#PRESET_LOAD1#',
  476. T.PRESET_LOAD2 = '#PRESET_LOAD2#',
  477. T.PRESET_LOAD3 = '#PRESET_LOAD3#',
  478. T.NACE_H2S_NAME = '#NACE_H2S_NAME#',
  479. T.TEST_SOLUTION = '#TEST_SOLUTION#',
  480. T.SURFACE_AREA1 = '#SURFACE_AREA1#',
  481. T.SURFACE_AREA2 = '#SURFACE_AREA2#',
  482. T.SURFACE_AREA3 = '#SURFACE_AREA3#',
  483. T.WEIGHT_BEFORE_TEST1 = '#WEIGHT_BEFORE_TEST1#',
  484. T.WEIGHT_BEFORE_TEST2 = '#WEIGHT_BEFORE_TEST2#',
  485. T.WEIGHT_BEFORE_TEST3 = '#WEIGHT_BEFORE_TEST3#',
  486. T.WEIGHT_AFTER_TEST1 = '#WEIGHT_AFTER_TEST1#',
  487. T.WEIGHT_AFTER_TEST2 = '#WEIGHT_AFTER_TEST2#',
  488. T.WEIGHT_AFTER_TEST3 = '#WEIGHT_AFTER_TEST3#',
  489. T.LOSS_OF_WEIGHT1 = '#LOSS_OF_WEIGHT1#',
  490. T.LOSS_OF_WEIGHT2 = '#LOSS_OF_WEIGHT2#',
  491. T.LOSS_OF_WEIGHT3 = '#LOSS_OF_WEIGHT3#',
  492. T.MASS_LOSS1 = '#MASS_LOSS1#',
  493. T.MASS_LOSS2 = '#MASS_LOSS2#',
  494. T.MASS_LOSS3 = '#MASS_LOSS3#',
  495. T.PITTING_DENSITY1 = '#PITTING_DENSITY1#',
  496. T.PITTING_DENSITY2 = '#PITTING_DENSITY2#',
  497. T.PITTING_DENSITY3 = '#PITTING_DENSITY3#',
  498. T.PITTING_COUNT1 = '#PITTING_COUNT1#',
  499. T.PITTING_COUNT2 = '#PITTING_COUNT2#',
  500. T.PITTING_COUNT3 = '#PITTING_COUNT3#',
  501. T.NACE_PH = '#NACE_PH#',
  502. T.CLEANING_SAMPLE = '#CLEANING_SAMPLE#',
  503. T.COLLECTION_RATE = '#COLLECTION_RATE#',
  504. T.SPRAY_TYPE = '#SPRAY_TYPE#',
  505. T.ANGLE = '#ANGLE#',
  506. T.SAMPLE_TYPE = '#SAMPLE_TYPE#',
  507. T.CONCENTRATION = '#CONCENTRATION#',
  508. T.TEST_ITEM = '#TEST_ITEM#',
  509. T.CONNECTION = '#CONNECTION#',
  510. T.PROOF_RING_NO1 = '#PROOF_RING_NO1#',
  511. T.PROOF_RING_NO2 = '#PROOF_RING_NO2#',
  512. T.PROOF_RING_NO3 = '#PROOF_RING_NO3#',
  513. T.PRESSURE_MEDIUM = '#PRESSURE_MEDIUM#',
  514. T.WEIGHT = '#WEIGHT#',
  515. T.TEST_RESULT = '#TEST_RESULT#',
  516. T.LOAD_LEVEL = '#LOAD_LEVEL#',
  517. T.LOAD_LEVEL2 = '#LOAD_LEVEL2#',
  518. T.LOAD_LEVEL3 = '#LOAD_LEVEL3#',
  519. T.YING_ACTUAL_LOAD1 = '#YING_ACTUAL_LOAD1#',
  520. T.YING_ACTUAL_LOAD2 = '#YING_ACTUAL_LOAD2#',
  521. T.YING_ACTUAL_LOAD3 = '#YING_ACTUAL_LOAD3#',
  522. T.REPORT_NO = '#REPORT_NO#',
  523. T.YING_ADD1 = '#YING_ADD1#',
  524. T.YING_ADD2 = '#YING_ADD2#',
  525. T.YING_ADD3 = '#YING_ADD3#',
  526. T.TEST_RESULT2 = '#TEST_RESULT2#',
  527. T.TEST_SPECIMENS1 = '#TEST_SPECIMENS1#',
  528. T.TEST_SPECIMENS2 = '#TEST_SPECIMENS2#',
  529. T.TEST_GAS = '#TEST_GAS#',
  530. T.SAMPLING_ORIENTATION = '#SAMPLING_ORIENTATION#',
  531. T.DMTS = '#DMTS#',
  532. T.SAMPLING_LOCATION = '#SAMPLING_LOCATION#',
  533. T.TEST_DURATION1 = '#TEST_DURATION1#',
  534. T.TEST_DURATION2 = '#TEST_DURATION2#',
  535. T.TEST_DURATION3 = '#TEST_DURATION3#',
  536. T.LOAD_STERSS1 = '#LOAD_STERSS1#',
  537. T.LOAD_STERSS2 = '#LOAD_STERSS2#',
  538. T.LOAD_STERSS3 = '#LOAD_STERSS3#',
  539. T.ACTUAL_LOAD_STERSS1 = '#ACTUAL_LOAD_STERSS1#',
  540. T.ACTUAL_LOAD_STERSS2 = '#ACTUAL_LOAD_STERSS2#',
  541. T.ACTUAL_LOAD_STERSS3 = '#ACTUAL_LOAD_STERSS3#'
  542. WHERE T.CHECK_NO = '#CHECK_NO#'
  543. AND T.SAMPLE_NO = '#SAMPLE_NO#'
  544. AND T.PHY_CODE_MAX = '#PHY_CODE_MAX#'
  545. ]]>
  546. </query>
  547. <query id="FrmLabDateParm.InsertCheckconsignLabResult" desc="新增实验原始记录">
  548. <![CDATA[
  549. INSERT INTO PIPE_CHECKCONSIGN_LAB_RESULT
  550. (CHECK_NO,
  551. SAMPLE_NO,
  552. PHY_CODE_MAX,
  553. STANDARD,
  554. TEST_DATE,
  555. REPORTED_DATE,
  556. REPORTED_NAME,
  557. APPROVED_NAME,
  558. SAMPLE_NO1,
  559. SAMPLE_NO2,
  560. SAMPLE_NO3,
  561. SPECIMEN_SIZE1,
  562. SPECIMEN_SIZE2,
  563. SPECIMEN_SIZE3,
  564. NACE_PH_S1,
  565. NACE_PH_F1,
  566. NACE_PH_S2,
  567. NACE_PH_F2,
  568. NACE_PH_S3,
  569. NACE_PH_F3,
  570. NACE_SOLUTION_S1,
  571. NACE_SOLUTION_F1,
  572. NACE_SOLUTION_S2,
  573. NACE_SOLUTION_F2,
  574. NACE_SOLUTION_S3,
  575. NACE_SOLUTION_F3,
  576. PSEUDO_STRESS,
  577. SECTION_NO11,
  578. SECTION_NO12,
  579. SECTION_NO21,
  580. SECTION_NO22,
  581. TEST_TIME,
  582. TEST_TEMP1,
  583. TEST_TEMP2,
  584. TEST_TEMP3,
  585. NOTE,
  586. NACE_PH_NAME,
  587. YSMIN_NAME,
  588. YSMIN1,
  589. YSMIN2,
  590. YSMIN3,
  591. ACTUAL_S_YSMIN1,
  592. ACTUAL_S_YSMIN2,
  593. ACTUAL_S_YSMIN3,
  594. ACTUAL_LOAD1,
  595. ACTUAL_LOAD2,
  596. ACTUAL_LOAD3,
  597. CRACK_LENGTH1,
  598. CRACK_LENGTH2,
  599. CRACK_LENGTH3,
  600. PRESET_LOAD1,
  601. PRESET_LOAD2,
  602. PRESET_LOAD3,
  603. NACE_H2S_NAME,
  604. TEST_SOLUTION,
  605. SURFACE_AREA1,
  606. SURFACE_AREA2,
  607. SURFACE_AREA3,
  608. WEIGHT_BEFORE_TEST1,
  609. WEIGHT_BEFORE_TEST2,
  610. WEIGHT_BEFORE_TEST3,
  611. WEIGHT_AFTER_TEST1,
  612. WEIGHT_AFTER_TEST2,
  613. WEIGHT_AFTER_TEST3,
  614. LOSS_OF_WEIGHT1,
  615. LOSS_OF_WEIGHT2,
  616. LOSS_OF_WEIGHT3,
  617. MASS_LOSS1,
  618. MASS_LOSS2,
  619. MASS_LOSS3,
  620. PITTING_DENSITY1,
  621. PITTING_DENSITY2,
  622. PITTING_DENSITY3,
  623. PITTING_COUNT1,
  624. PITTING_COUNT2,
  625. PITTING_COUNT3,
  626. NACE_PH,
  627. CLEANING_SAMPLE,
  628. COLLECTION_RATE,
  629. SPRAY_TYPE,
  630. ANGLE,
  631. SAMPLE_TYPE,
  632. CONCENTRATION,
  633. TEST_ITEM,
  634. CONNECTION,
  635. PROOF_RING_NO1,
  636. PROOF_RING_NO2,
  637. PROOF_RING_NO3,
  638. PRESSURE_MEDIUM,
  639. WEIGHT,
  640. TEST_RESULT,
  641. LOAD_LEVEL,
  642. LOAD_LEVEL2,
  643. LOAD_LEVEL3,
  644. YING_ACTUAL_LOAD1,
  645. YING_ACTUAL_LOAD2,
  646. YING_ACTUAL_LOAD3,
  647. REPORT_NO,
  648. YING_ADD1,
  649. YING_ADD2,
  650. YING_ADD3,
  651. TEST_RESULT2,
  652. TEST_SPECIMENS1,
  653. TEST_SPECIMENS2,
  654. TEST_GAS,
  655. SAMPLING_ORIENTATION,
  656. DMTS,
  657. SAMPLING_LOCATION,
  658. TEST_DURATION1,
  659. TEST_DURATION2,
  660. TEST_DURATION3,
  661. LOAD_STERSS1,
  662. LOAD_STERSS2,
  663. LOAD_STERSS3,
  664. ACTUAL_LOAD_STERSS1,
  665. ACTUAL_LOAD_STERSS2,
  666. ACTUAL_LOAD_STERSS3)
  667. VALUES
  668. ('#CHECK_NO#',
  669. '#SAMPLE_NO#',
  670. '#PHY_CODE_MAX#',
  671. '#STANDARD#',
  672. DECODE('#TEST_DATE#',
  673. '',
  674. '',
  675. TO_DATE('#TEST_DATE#', 'yyyy-MM-dd HH24:mi:ss')),
  676. DECODE('#REPORTED_DATE#',
  677. '',
  678. '',
  679. TO_DATE('#REPORTED_DATE#', 'yyyy-MM-dd HH24:mi:ss')),
  680. '#REPORTED_NAME#',
  681. '#APPROVED_NAME#',
  682. '#SAMPLE_NO1#',
  683. '#SAMPLE_NO2#',
  684. '#SAMPLE_NO3#',
  685. '#SPECIMEN_SIZE1#',
  686. '#SPECIMEN_SIZE2#',
  687. '#SPECIMEN_SIZE3#',
  688. '#NACE_PH_S1#',
  689. '#NACE_PH_F1#',
  690. '#NACE_PH_S2#',
  691. '#NACE_PH_F2#',
  692. '#NACE_PH_S3#',
  693. '#NACE_PH_F3#',
  694. '#NACE_SOLUTION_S1#',
  695. '#NACE_SOLUTION_F1#',
  696. '#NACE_SOLUTION_S2#',
  697. '#NACE_SOLUTION_F2#',
  698. '#NACE_SOLUTION_S3#',
  699. '#NACE_SOLUTION_F3#',
  700. '#PSEUDO_STRESS#',
  701. '#SECTION_NO11#',
  702. '#SECTION_NO12#',
  703. '#SECTION_NO21#',
  704. '#SECTION_NO22#',
  705. '#TEST_TIME#',
  706. '#TEST_TEMP1#',
  707. '#TEST_TEMP2#',
  708. '#TEST_TEMP3#',
  709. '#NOTE#',
  710. '#NACE_PH_NAME#',
  711. '#YSMIN_NAME#',
  712. '#YSMIN1#',
  713. '#YSMIN2#',
  714. '#YSMIN3#',
  715. '#ACTUAL_S_YSMIN1#',
  716. '#ACTUAL_S_YSMIN2#',
  717. '#ACTUAL_S_YSMIN3#',
  718. '#ACTUAL_LOAD1#',
  719. '#ACTUAL_LOAD2#',
  720. '#ACTUAL_LOAD3#',
  721. '#CRACK_LENGTH1#',
  722. '#CRACK_LENGTH2#',
  723. '#CRACK_LENGTH3#',
  724. '#PRESET_LOAD1#',
  725. '#PRESET_LOAD2#',
  726. '#PRESET_LOAD3#',
  727. '#NACE_H2S_NAME#',
  728. '#TEST_SOLUTION#',
  729. '#SURFACE_AREA1#',
  730. '#SURFACE_AREA2#',
  731. '#SURFACE_AREA3#',
  732. '#WEIGHT_BEFORE_TEST1#',
  733. '#WEIGHT_BEFORE_TEST2#',
  734. '#WEIGHT_BEFORE_TEST3#',
  735. '#WEIGHT_AFTER_TEST1#',
  736. '#WEIGHT_AFTER_TEST2#',
  737. '#WEIGHT_AFTER_TEST3#',
  738. '#LOSS_OF_WEIGHT1#',
  739. '#LOSS_OF_WEIGHT2#',
  740. '#LOSS_OF_WEIGHT3#',
  741. '#MASS_LOSS1#',
  742. '#MASS_LOSS2#',
  743. '#MASS_LOSS3#',
  744. '#PITTING_DENSITY1#',
  745. '#PITTING_DENSITY2#',
  746. '#PITTING_DENSITY3#',
  747. '#PITTING_COUNT1#',
  748. '#PITTING_COUNT2#',
  749. '#PITTING_COUNT3#',
  750. '#NACE_PH#',
  751. '#CLEANING_SAMPLE#',
  752. '#COLLECTION_RATE#',
  753. '#SPRAY_TYPE#',
  754. '#ANGLE#',
  755. '#SAMPLE_TYPE#',
  756. '#CONCENTRATION#',
  757. '#TEST_ITEM#',
  758. '#CONNECTION#',
  759. '#PROOF_RING_NO1#',
  760. '#PROOF_RING_NO2#',
  761. '#PROOF_RING_NO3#',
  762. '#PRESSURE_MEDIUM#',
  763. '#WEIGHT#',
  764. '#TEST_RESULT#',
  765. '#LOAD_LEVEL#',
  766. '#LOAD_LEVEL2#',
  767. '#LOAD_LEVEL3#',
  768. '#YING_ACTUAL_LOAD1#',
  769. '#YING_ACTUAL_LOAD2#',
  770. '#YING_ACTUAL_LOAD3#',
  771. '#REPORT_NO#',
  772. '#YING_ADD1#',
  773. '#YING_ADD2#',
  774. '#YING_ADD3#',
  775. '#TEST_RESULT2#',
  776. '#TEST_SPECIMENS1#',
  777. '#TEST_SPECIMENS2#',
  778. '#TEST_GAS#',
  779. '#SAMPLING_ORIENTATION#',
  780. '#DMTS#',
  781. '#SAMPLING_LOCATION#',
  782. '#TEST_DURATION1#',
  783. '#TEST_DURATION2#',
  784. '#TEST_DURATION3#',
  785. '#LOAD_STERSS1#',
  786. '#LOAD_STERSS2#',
  787. '#LOAD_STERSS3#',
  788. '#ACTUAL_LOAD_STERSS1#',
  789. '#ACTUAL_LOAD_STERSS2#',
  790. '#ACTUAL_LOAD_STERSS3#')
  791. ]]>
  792. </query>
  793. <query id="FrmLabDateParm.SaveHIC" desc="保存HIC/SOHIC实验条件">
  794. <![CDATA[
  795. UPDATE PIPE_CHECKCONSIGN_DETAIL T
  796. SET T.STANDARD = ?,
  797. T.TEST_DATE = TO_DATE(?, 'yyyy-MM-dd HH24:mi:ss'),
  798. T.REPORTED_DATE = TO_DATE(?, 'yyyy-MM-dd HH24:mi:ss'),
  799. T.REPORTED_NAME = ?,
  800. T.APPROVED_NAME = ?,
  801. T.TEST_TIME = ?,
  802. T.TEST_TEMP1 = ?,
  803. T.SAMPLE_NO1 = ?,
  804. T.SAMPLE_NO2 = ?,
  805. T.SAMPLE_NO3 = ?,
  806. T.SPECIMEN_SIZE1 = ?,
  807. T.SPECIMEN_SIZE2 = ?,
  808. T.SPECIMEN_SIZE3 = ?,
  809. T.NACE_SOLUTION_S1 = ?,
  810. T.NACE_SOLUTION_S2 = ?,
  811. T.NACE_SOLUTION_S3 = ?,
  812. T.NACE_SOLUTION_F1 = ?,
  813. T.NACE_SOLUTION_F2 = ?,
  814. T.NACE_SOLUTION_F3 = ?,
  815. T.NACE_PH_S1 = ?,
  816. T.NACE_PH_S2 = ?,
  817. T.NACE_PH_S3 = ?,
  818. T.NACE_PH_F1 = ?,
  819. T.NACE_PH_F2 = ?,
  820. T.NACE_PH_F3 = ?,
  821. T.SECTION_NO11 = ?,
  822. T.SECTION_NO12 = ?,
  823. T.SECTION_NO21 = ?,
  824. T.SECTION_NO22 = ?,
  825. T.PSEUDO_STRESS = ?,
  826. T.NOTE = ?
  827. WHERE T.CHECK_NO = ?
  828. AND T.SAMPLE_NO = ?
  829. AND T.PHY_CODE_MAX = ?
  830. ]]>
  831. </query>
  832. <query id="FrmLabDateParm.SaveSSC" desc="保存SSC实验条件 ">
  833. <![CDATA[
  834. UPDATE OUTDEC_CHECKCONSIGN_DETAIL T
  835. SET T.TECHNICAL_STANDARD = ?,
  836. T.DEGREASING_METHOD = ?,
  837. T.NACE_PH = ?,
  838. T.NACE_PH_S = ?,
  839. T.NACE_PH_F = ?,
  840. T.NACE_SOLUTION_S = ?,
  841. T.NACE_SOLUTION_F = ?,
  842. T.TEST_TEMP = ?,
  843. T.SAMPLE_NO1 = ?,
  844. T.SAMPLE_NO2 = ?,
  845. T.SAMPLE_NO3 = ?,
  846. T.SPECIMEN_SIZE1 = ?,
  847. T.SPECIMEN_SIZE2 = ?,
  848. T.SPECIMEN_SIZE3 = ?,
  849. T.PROOF_RING_NO1 = ?,
  850. T.PROOF_RING_NO2 = ?,
  851. T.PROOF_RING_NO3 = ?,
  852. T.YSMIN1 = ?,
  853. T.YSMIN2 = ?,
  854. T.YSMIN3 = ?,
  855. T.ACTUAL_LOAD1 = ?,
  856. T.ACTUAL_LOAD2 = ?,
  857. T.ACTUAL_LOAD3 = ?,
  858. T.ACTUAL_S_YSMIN1 = ?,
  859. T.ACTUAL_S_YSMIN2 = ?,
  860. T.ACTUAL_S_YSMIN3 = ?,
  861. T.TEST_DURATION1 = ?,
  862. T.TEST_DURATION2 = ?,
  863. T.TEST_DURATION3 = ?,
  864. T.ACTUAL_LOAD_D1 = ?,
  865. T.ACTUAL_LOAD_D2 = ?,
  866. T.ACTUAL_LOAD_D3 = ?,
  867. T.ARM_DISPLACEMENT1 = ?,
  868. T.ARM_DISPLACEMENT2 = ?,
  869. T.ARM_DISPLACEMENT3 = ?,
  870. T.CRACK_LENGTH1 = ?,
  871. T.CRACK_LENGTH2 = ?,
  872. T.CRACK_LENGTH3 = ?,
  873. T.NOTE = ?
  874. WHERE T.CHECK_NO = ?
  875. AND T.SAMPLE_NO = ?
  876. AND T.PHY_CODE_MAX = ?
  877. ]]>
  878. </query>
  879. <query id="FrmLabDateParm.SavePittingTest" desc="保存点蚀实验条件">
  880. <![CDATA[
  881. UPDATE OUTDEC_CHECKCONSIGN_DETAIL T
  882. SET T.TEST_SOLUTION = ?,
  883. T.TEST_TEMP = ?,
  884. T.CLEANING_SAMPLE = ?,
  885. T.TEST_DURATION1 = ?,
  886. T.SAMPLE_NO1 = ?,
  887. T.SAMPLE_NO2 = ?,
  888. T.SAMPLE_NO3 = ?,
  889. T.SPECIMEN_SIZE1 = ?,
  890. T.SPECIMEN_SIZE2 = ?,
  891. T.SPECIMEN_SIZE3 = ?,
  892. T.SURFACE_AREA1 = ?,
  893. T.SURFACE_AREA2 = ?,
  894. T.SURFACE_AREA3 = ?,
  895. T.WEIGHT_BEFORE_TEST1 = ?,
  896. T.WEIGHT_BEFORE_TEST2 = ?,
  897. T.WEIGHT_BEFORE_TEST3 = ?,
  898. T.WEIGHT_AFTER_TEST1 = ?,
  899. T.WEIGHT_AFTER_TEST2 = ?,
  900. T.WEIGHT_AFTER_TEST3 = ?,
  901. T.LOSS_OF_WEIGHT1 = ?,
  902. T.LOSS_OF_WEIGHT2 = ?,
  903. T.LOSS_OF_WEIGHT3 = ?,
  904. T.MASS_LOSS1 = ?,
  905. T.MASS_LOSS2 = ?,
  906. T.MASS_LOSS3 = ?,
  907. T.PITTING_DENSITY1 = ?,
  908. T.PITTING_DENSITY2 = ?,
  909. T.PITTING_DENSITY3 = ?,
  910. T.TECHNICAL_STANDARD = ?,
  911. T.NOTE = ?
  912. WHERE T.CHECK_NO = ?
  913. AND T.SAMPLE_NO = ?
  914. AND T.PHY_CODE_MAX = ?
  915. ]]>
  916. </query>
  917. <query id="FrmLabDateParm.SaveImpactTest" desc="保存冲击实验条件">
  918. <![CDATA[
  919. UPDATE OUTDEC_CHECKCONSIGN_DETAIL T
  920. SET T.TECHNICAL_STANDARD = ?,
  921. T.TEST_TEMP = ?,
  922. T.SPECIMEN_ORIENTATION = ?,
  923. T.SPECIMEN_WIDTH = ?,
  924. T.SPECIMEN_DEPTH = ?,
  925. T.SHAPE_OF_NOTCH = ?,
  926. T.NOTCH_DEPTH = ?,
  927. T.NOTE = ?,
  928. T.NOTE2 = ?,
  929. T.NOTE3 = ?
  930. WHERE T.CHECK_NO = ?
  931. AND T.SAMPLE_NO = ?
  932. AND T.PHY_CODE_MAX = ?
  933. ]]>
  934. </query>
  935. <query id="FrmLabDateParm.SaveTensionTest" desc="保存拉伸实验条件">
  936. <![CDATA[
  937. UPDATE OUTDEC_CHECKCONSIGN_DETAIL T
  938. SET T.TECHNICAL_STANDARD = ?,
  939. T.TEST_CONDITIONS1 = ?,
  940. T.SPECIMEN_ORIENTATION = ?,
  941. T.SPECIMEN_TYPE = ?,
  942. T.TEST_TEMP = ?,
  943. T.NOTE = ?
  944. WHERE T.CHECK_NO = ?
  945. AND T.SAMPLE_NO = ?
  946. AND T.PHY_CODE_MAX = ?
  947. ]]>
  948. </query>
  949. <query id="FrmLabDateParm.SaveEriftExpandingTest" desc="保存扩口实验条件">
  950. <![CDATA[
  951. UPDATE OUTDEC_CHECKCONSIGN_DETAIL T
  952. SET T.TECHNICAL_STANDARD = ?,
  953. T.SPECIMEN_SIZE1 = ?,
  954. T.TEST_CONDITIONS1 = ?,
  955. T.TEST_CONDITIONS2 = ?,
  956. T.NOTE = ?
  957. WHERE T.CHECK_NO = ?
  958. AND T.SAMPLE_NO = ?
  959. AND T.PHY_CODE_MAX = ?
  960. ]]>
  961. </query>
  962. <query id="FrmLabDateParm.SaveBendingTest" desc="保存弯曲实验条件">
  963. <![CDATA[
  964. UPDATE OUTDEC_CHECKCONSIGN_DETAIL T
  965. SET T.TECHNICAL_STANDARD = ?,
  966. T.SPECIMEN_SIZE1 = ?,
  967. T.SPECIMEN_SIZE2 = ?,
  968. T.SPECIMEN_SIZE3 = ?,
  969. T.TEST_CONDITIONS1 = ?,
  970. T.TEST_CONDITIONS2 = ?,
  971. T.NOTE = ?
  972. WHERE T.CHECK_NO = ?
  973. AND T.SAMPLE_NO = ?
  974. AND T.PHY_CODE_MAX = ?
  975. ]]>
  976. </query>
  977. <query id="FrmLabDateParm.SaveFlatteningTest" desc="保存压扁实验条件">
  978. <![CDATA[
  979. UPDATE OUTDEC_CHECKCONSIGN_DETAIL T
  980. SET T.TECHNICAL_STANDARD = ?,
  981. T.SPECIMEN_SIZE1 = ?,
  982. T.TEST_CONDITIONS1 = ?,
  983. T.TEST_CONDITIONS2 = ?,
  984. T.TEST_CONDITIONS3 = ?,
  985. T.NOTE = ?
  986. WHERE T.CHECK_NO = ?
  987. AND T.SAMPLE_NO = ?
  988. AND T.PHY_CODE_MAX = ?
  989. ]]>
  990. </query>
  991. <query id="FrmLabDateParm.SaveHardnessTest" desc="保存硬度实验条件">
  992. <![CDATA[
  993. UPDATE OUTDEC_CHECKCONSIGN_DETAIL T
  994. SET T.TECHNICAL_STANDARD = ?, T.HARDNESS_TYPE = ?, T.NOTE = ?
  995. WHERE T.CHECK_NO = ?
  996. AND T.SAMPLE_NO = ?
  997. AND T.PHY_CODE_MAX = ?
  998. ]]>
  999. </query>
  1000. <query id="FrmLabDateParm.SaveMetallographicTest" desc="保存金物试验条件">
  1001. <![CDATA[
  1002. UPDATE OUTDEC_CHECKCONSIGN_DETAIL T
  1003. SET T.TECHNICAL_STANDARD = ?, T.NOTE = ?,T.NOTE2 = ?, T.NOTE3 = ?
  1004. WHERE T.CHECK_NO = ?
  1005. AND T.SAMPLE_NO = ?
  1006. AND T.PHY_CODE_MAX = ?
  1007. ]]>
  1008. </query>
  1009. <query id="FrmLabDateParm.insertDtlParmEntity" desc="新增工程试验条件">
  1010. <![CDATA[
  1011. INSERT INTO PIPE_CHECKCONSIGN_DTL_PARM(
  1012. CHECK_NO,
  1013. SAMPLE_NO,
  1014. PHY_CODE_MAX,
  1015. STEP,
  1016. LOAD,
  1017. PRESSURE_MEDIUM,
  1018. INTERNAL_PRESSURE,
  1019. DOGLEG_DEGREE,
  1020. HOLD_TIME,
  1021. TEST_RESULT,
  1022. PIN,
  1023. BOX,
  1024. COMPOUND_TYPE,
  1025. COMPOUND_WEIGHT,
  1026. MAKEUP_TORQUE,
  1027. TOTAL_TORQUE,
  1028. BREAKOUT_TORQUE,
  1029. OBSERVED_THREAD_RESULT,
  1030. SHOULDER_TORQUE
  1031. )
  1032. VALUES(
  1033. '#CHECK_NO#',
  1034. '#SAMPLE_NO#',
  1035. '#PHY_CODE_MAX#',
  1036. '#STEP#',
  1037. '#LOAD#',
  1038. '#PRESSURE_MEDIUM#',
  1039. '#INTERNAL_PRESSURE#',
  1040. '#DOGLEG_DEGREE#',
  1041. '#HOLD_TIME#',
  1042. '#TEST_RESULT#',
  1043. '#PIN#',
  1044. '#BOX#',
  1045. '#COMPOUND_TYPE#',
  1046. '#COMPOUND_WEIGHT#',
  1047. '#MAKEUP_TORQUE#',
  1048. '#TOTAL_TORQUE#',
  1049. '#BREAKOUT_TORQUE#',
  1050. '#OBSERVED_THREAD_RESULT#',
  1051. '#SHOULDER_TORQUE#'
  1052. )
  1053. ]]>
  1054. </query>
  1055. <query id="FrmLabDateParm.updadtePhyDtlEntity" desc="更新">
  1056. <![CDATA[
  1057. UPDATE PIPE_CHECKCONSIGN_PHYDETAIL T
  1058. SET T.VALUE1 = DECODE(T.PHY_UNIT,
  1059. 'N.m',
  1060. TO_CHAR(1.3558 * '#VALUE2#', 'FM99990.00'),
  1061. 'KN',
  1062. TO_CHAR(4.448 * '#VALUE2#', 'FM99990.00'),
  1063. 'MPa',
  1064. TO_CHAR('#VALUE2#' / 145.038, 'FM99990.00'),
  1065. '#VALUE2#'),
  1066. T.VALUE2 = '#VALUE2#'
  1067. WHERE T.CHECK_NO = '#CHECK_NO#'
  1068. AND T.SAMPLE_NO = '#SAMPLE_NO#'
  1069. AND T.PHY_CODE = '#PHY_CODE#'
  1070. ]]>
  1071. </query>
  1072. <query id="FrmLabDateParm.updatePipeReport" desc="上传图片">
  1073. <![CDATA[
  1074. UPDATE PIPE_CHECKCONSIGN_BASEINFO
  1075. SET #PATH# = ?
  1076. WHERE CHECK_NO = ?
  1077. AND VALIDFLAG = '1'
  1078. ]]>
  1079. </query>
  1080. <query id="FrmLabDateParm.updateFlagSql" desc="修改标识">
  1081. <![CDATA[
  1082. UPDATE PIPE_CHECKCONSIGN_DETAIL T
  1083. SET T.FLAG = '4'
  1084. WHERE T.FLAG = '5'
  1085. AND T.CHECK_NO = ?
  1086. ]]>
  1087. </query>
  1088. <query id="FrmLabDateParm.updateMetallographicTestFile" desc="金属上传多张图片">
  1089. <![CDATA[
  1090. UPDATE OUTDEC_CHECKCONSIGN_DETAIL T
  1091. SET T.FILE_PATH1 = {0}
  1092. WHERE T.CHECK_NO = {1}
  1093. AND T.SAMPLE_NO = {2}
  1094. AND T.PHY_CODE_MAX = {3}
  1095. ]]>
  1096. </query>
  1097. <query id="FrmLabDateParm.selectCount" desc="查询PIPE_CHECKCONSIGN_LAB_RESULT是否有数据">
  1098. <![CDATA[
  1099. select count(1) ACOUNT
  1100. from PIPE_CHECKCONSIGN_LAB_RESULT t
  1101. where t.check_no = ?
  1102. and t.sample_no = ?
  1103. and t.phy_code_max = ?
  1104. ]]>
  1105. </query>
  1106. <query id="FrmLabDateParm.insertHicParm" desc="新增腐蚀HIC实验参数表">
  1107. <![CDATA[
  1108. DECLARE
  1109. V_CHECK_NO PIPE_CHECKCONSIGN_HIC_PARM.CHECK_NO%type := ?;
  1110. V_SAMPLE_NO PIPE_CHECKCONSIGN_HIC_PARM.SAMPLE_NO%type := ?;
  1111. V_PHY_CODE_MAX PIPE_CHECKCONSIGN_HIC_PARM.PHY_CODE_MAX%type := ?;
  1112. V_REULST_NO PIPE_CHECKCONSIGN_HIC_PARM.REULST_NO%type := NULL;
  1113. acout int := 0;
  1114. j int := 0;
  1115. BEGIN
  1116. --生成 编号
  1117. SELECT TO_CHAR(SYSDATE, 'YYMMDD') ||
  1118. LPAD(NVL(MAX(SUBSTR(T.REULST_NO, 7)), 0) + 1, 6, 0) DI
  1119. INTO V_REULST_NO
  1120. FROM PIPE_CHECKCONSIGN_HIC_PARM T
  1121. WHERE TO_CHAR(T.CREATE_TIME, 'YYYY-MM-DD') =
  1122. TO_CHAR(SYSDATE, 'YYYY-MM-DD');
  1123. --判断表中是否已有数据
  1124. select count(1)
  1125. into acout
  1126. from PIPE_CHECKCONSIGN_HIC_PARM t
  1127. where t.check_no = V_CHECK_NO
  1128. and t.sample_no = V_SAMPLE_NO
  1129. and t.phy_code_max = V_PHY_CODE_MAX;
  1130. if acout = 0 then
  1131. for i in 1 .. 9 loop
  1132. INSERT INTO PIPE_CHECKCONSIGN_HIC_PARM
  1133. (REULST_NO, CHECK_NO, SAMPLE_NO, PHY_CODE_MAX, SEQ, CREATE_TIME)
  1134. VALUES
  1135. (V_REULST_NO + j,
  1136. V_CHECK_NO,
  1137. V_SAMPLE_NO,
  1138. V_PHY_CODE_MAX,
  1139. i,
  1140. SYSDATE);
  1141. j := j + 1;
  1142. end loop;
  1143. end if;
  1144. END;
  1145. ]]>
  1146. </query>
  1147. <query id="FrmLabDateParm.selectHicParm" desc="查询腐蚀HIC实验参数表">
  1148. <![CDATA[
  1149. SELECT T.REULST_NO,
  1150. T.CHECK_NO,
  1151. T.SAMPLE_NO,
  1152. T.PHY_CODE_MAX,
  1153. DECODE(T.SEQ,
  1154. '1',
  1155. B.LOT_NO || '-1',
  1156. '2',
  1157. B.LOT_NO || '-1',
  1158. '3',
  1159. B.LOT_NO || '-1',
  1160. '4',
  1161. B.LOT_NO || '-2',
  1162. '5',
  1163. B.LOT_NO || '-2',
  1164. '6',
  1165. B.LOT_NO || '-2',
  1166. '7',
  1167. B.LOT_NO || '-3',
  1168. '8',
  1169. B.LOT_NO || '-3',
  1170. '9',
  1171. B.LOT_NO || '-3') SAMPLE_NO_S,
  1172. DECODE(T.SEQ,
  1173. '1',
  1174. '1-1',
  1175. '2',
  1176. '1-2',
  1177. '3',
  1178. '1-3',
  1179. '4',
  1180. '2-1',
  1181. '5',
  1182. '2-2',
  1183. '6',
  1184. '2-3',
  1185. '7',
  1186. '3-1',
  1187. '8',
  1188. '3-2',
  1189. '9',
  1190. '3-3') SECTION_NO,
  1191. T.CRACK_LENGTH1,
  1192. T.CRACK_WIDTH1,
  1193. T.CRACK_LENGTH2,
  1194. T.CRACK_WIDTH2,
  1195. T.CRACK_LENGTH3,
  1196. T.CRACK_WIDTH3,
  1197. T.CRACK_LENGTH4,
  1198. T.CRACK_WIDTH4,
  1199. T.CRACK_LENGTH5,
  1200. T.CRACK_WIDTH5,
  1201. T.CRACK_LENGTH6,
  1202. T.CRACK_WIDTH6,
  1203. T.CRACK_LENGTH7,
  1204. T.CRACK_WIDTH7,
  1205. T.CRACK_LENGTH8,
  1206. T.CRACK_WIDTH8,
  1207. T.CRACK_LENGTH9,
  1208. T.CRACK_WIDTH9,
  1209. T.SAMPLE_THICKNESS,
  1210. T.SAMPLE_WIDTH,
  1211. T.CLR1,
  1212. T.CTR1,
  1213. T.CSR1,
  1214. T.CLR2,
  1215. T.CTR2,
  1216. T.CSR2,
  1217. T.CLR3,
  1218. T.CTR3,
  1219. T.CSR3,
  1220. T.SEQ,
  1221. T.CREATE_TIME
  1222. FROM PIPE_CHECKCONSIGN_HIC_PARM T, PIPE_CHECKCONSIGN_BASEINFO B
  1223. WHERE T.CHECK_NO = B.CHECK_NO
  1224. AND T.CHECK_NO = ?
  1225. AND T.SAMPLE_NO = ?
  1226. AND T.PHY_CODE_MAX = ?
  1227. ]]>
  1228. </query>
  1229. <query id="FrmLabDateParm.saveHicParm" desc="保存腐蚀HIC实验参数表">
  1230. <![CDATA[
  1231. UPDATE PIPE_CHECKCONSIGN_HIC_PARM T
  1232. SET
  1233. T.REULST_NO = '#REULST_NO#',
  1234. T.CHECK_NO = '#CHECK_NO#',
  1235. T.SAMPLE_NO = '#SAMPLE_NO#',
  1236. T.PHY_CODE_MAX = '#PHY_CODE_MAX#',
  1237. T.SAMPLE_NO_S = '#SAMPLE_NO_S#',
  1238. T.SECTION_NO = '#SECTION_NO#',
  1239. T.CRACK_LENGTH1 = '#CRACK_LENGTH1#',
  1240. T.CRACK_WIDTH1 = '#CRACK_WIDTH1#',
  1241. T.CRACK_LENGTH2 = '#CRACK_LENGTH2#',
  1242. T.CRACK_WIDTH2 = '#CRACK_WIDTH2#',
  1243. T.CRACK_LENGTH3 = '#CRACK_LENGTH3#',
  1244. T.CRACK_WIDTH3 = '#CRACK_WIDTH3#',
  1245. T.CRACK_LENGTH4 = '#CRACK_LENGTH4#',
  1246. T.CRACK_WIDTH4 = '#CRACK_WIDTH4#',
  1247. T.CRACK_LENGTH5 = '#CRACK_LENGTH5#',
  1248. T.CRACK_WIDTH5 = '#CRACK_WIDTH5#',
  1249. T.CRACK_LENGTH6 = '#CRACK_LENGTH6#',
  1250. T.CRACK_WIDTH6 = '#CRACK_WIDTH6#',
  1251. T.CRACK_LENGTH7 = '#CRACK_LENGTH7#',
  1252. T.CRACK_WIDTH7 = '#CRACK_WIDTH7#',
  1253. T.CRACK_LENGTH8 = '#CRACK_LENGTH8#',
  1254. T.CRACK_WIDTH8 = '#CRACK_WIDTH8#',
  1255. T.CRACK_LENGTH9 = '#CRACK_LENGTH9#',
  1256. T.CRACK_WIDTH9 = '#CRACK_WIDTH9#',
  1257. T.SAMPLE_THICKNESS = '#SAMPLE_THICKNESS#',
  1258. T.SAMPLE_WIDTH = '#SAMPLE_WIDTH#',
  1259. T.CLR1 = '#CLR1#',
  1260. T.CTR1 = '#CTR1#',
  1261. T.CSR1 = '#CSR1#',
  1262. T.CLR2 = '#CLR2#',
  1263. T.CTR2 = '#CTR2#',
  1264. T.CSR2 = '#CSR2#',
  1265. T.CLR3 = '#CLR3#',
  1266. T.CTR3 = '#CTR3#',
  1267. T.CSR3 = '#CSR3#',
  1268. T.SEQ = '#SEQ#',
  1269. T.CREATE_TIME = SYSDATE
  1270. WHERE
  1271. T.REULST_NO = '#REULST_NO#'
  1272. ]]>
  1273. </query>
  1274. <query id="FrmLabDateParm.saveHicParmCLR" desc="腐蚀HIC实验:计算平均值">
  1275. <![CDATA[
  1276. DECLARE
  1277. V_CHECK_NO PIPE_CHECKCONSIGN_HIC_PARM.CHECK_NO%type := ?;
  1278. V_SAMPLE_NO PIPE_CHECKCONSIGN_HIC_PARM.SAMPLE_NO%type := ?;
  1279. V_PHY_CODE_MAX PIPE_CHECKCONSIGN_HIC_PARM.PHY_CODE_MAX%type := ?;
  1280. N1 NUMBER;
  1281. N2 NUMBER;
  1282. N3 NUMBER;
  1283. N4 NUMBER;
  1284. N5 NUMBER;
  1285. N6 NUMBER;
  1286. N7 NUMBER;
  1287. N8 NUMBER;
  1288. N9 NUMBER;
  1289. BEGIN
  1290. UPDATE PIPE_CHECKCONSIGN_HIC_PARM T
  1291. SET T.CLR1 = 100 * (NVL(T.CRACK_LENGTH1, 0) + NVL(T.CRACK_LENGTH2, 0) +
  1292. NVL(T.CRACK_LENGTH3, 0) + NVL(T.CRACK_LENGTH4, 0) +
  1293. NVL(T.CRACK_LENGTH5, 0) + NVL(T.CRACK_LENGTH6, 0) +
  1294. NVL(T.CRACK_LENGTH7, 0) + NVL(T.CRACK_LENGTH8, 0) +
  1295. NVL(T.CRACK_LENGTH9, 0)) / NVL(T.SAMPLE_WIDTH, 0),
  1296. T.CTR1 = 100 * (NVL(T.CRACK_WIDTH1, 0) + NVL(T.CRACK_WIDTH2, 0) +
  1297. NVL(T.CRACK_WIDTH3, 0) + NVL(T.CRACK_WIDTH4, 0) +
  1298. NVL(T.CRACK_WIDTH5, 0) + NVL(T.CRACK_WIDTH6, 0) +
  1299. NVL(T.CRACK_WIDTH7, 0) + NVL(T.CRACK_WIDTH8, 0) +
  1300. NVL(T.CRACK_WIDTH9, 0)) / NVL(T.SAMPLE_THICKNESS, 0),
  1301. T.CSR1 = 100 * (NVL(T.CRACK_LENGTH1, 0) * NVL(T.CRACK_WIDTH1, 0) +
  1302. NVL(T.CRACK_LENGTH2, 0) * NVL(T.CRACK_WIDTH2, 0) +
  1303. NVL(T.CRACK_LENGTH3, 0) * NVL(T.CRACK_WIDTH3, 0) +
  1304. NVL(T.CRACK_LENGTH4, 0) * NVL(T.CRACK_WIDTH4, 0) +
  1305. NVL(T.CRACK_LENGTH5, 0) * NVL(T.CRACK_WIDTH5, 0) +
  1306. NVL(T.CRACK_LENGTH6, 0) * NVL(T.CRACK_WIDTH6, 0) +
  1307. NVL(T.CRACK_LENGTH7, 0) * NVL(T.CRACK_WIDTH7, 0) +
  1308. NVL(T.CRACK_LENGTH8, 0) * NVL(T.CRACK_WIDTH8, 0) +
  1309. NVL(T.CRACK_LENGTH9, 0) * NVL(T.CRACK_WIDTH9, 0)) /
  1310. (NVL(T.SAMPLE_WIDTH, 0) * NVL(T.SAMPLE_THICKNESS, 0))
  1311. WHERE T.CHECK_NO = V_CHECK_NO
  1312. AND T.SAMPLE_NO = V_SAMPLE_NO
  1313. AND T.PHY_CODE_MAX = V_PHY_CODE_MAX;
  1314. FOR MYROW IN (select avg(T.CLR1) CLR1, avg(T.CTR1) CTR1, avg(T.CSR1) CSR1
  1315. from PIPE_CHECKCONSIGN_HIC_PARM t
  1316. WHERE T.CHECK_NO = V_CHECK_NO
  1317. AND T.SAMPLE_NO = V_SAMPLE_NO
  1318. AND T.PHY_CODE_MAX = V_PHY_CODE_MAX
  1319. AND T.SEQ BETWEEN 1 AND 3) LOOP
  1320. UPDATE PIPE_CHECKCONSIGN_HIC_PARM T
  1321. SET T.CLR2 = MYROW.CLR1, T.CTR2 = MYROW.CTR1, T.CSR2 = MYROW.CSR1
  1322. WHERE T.CHECK_NO = V_CHECK_NO
  1323. AND T.SAMPLE_NO = V_SAMPLE_NO
  1324. AND T.PHY_CODE_MAX = V_PHY_CODE_MAX
  1325. AND T.SEQ BETWEEN 1 AND 3;
  1326. END LOOP;
  1327. FOR MYROW2 IN (select avg(T.CLR1) CLR1, avg(T.CTR1) CTR1, avg(T.CSR1) CSR1
  1328. from PIPE_CHECKCONSIGN_HIC_PARM t
  1329. WHERE T.CHECK_NO = V_CHECK_NO
  1330. AND T.SAMPLE_NO = V_SAMPLE_NO
  1331. AND T.PHY_CODE_MAX = V_PHY_CODE_MAX
  1332. AND T.SEQ BETWEEN 4 AND 6) LOOP
  1333. UPDATE PIPE_CHECKCONSIGN_HIC_PARM T
  1334. SET T.CLR2 = MYROW2.CLR1, T.CTR2 = MYROW2.CTR1, T.CSR2 = MYROW2.CSR1
  1335. WHERE T.CHECK_NO = V_CHECK_NO
  1336. AND T.SAMPLE_NO = V_SAMPLE_NO
  1337. AND T.PHY_CODE_MAX = V_PHY_CODE_MAX
  1338. AND T.SEQ BETWEEN 4 AND 6;
  1339. END LOOP;
  1340. FOR MYROW3 IN (select avg(T.CLR1) CLR1, avg(T.CTR1) CTR1, avg(T.CSR1) CSR1
  1341. from PIPE_CHECKCONSIGN_HIC_PARM t
  1342. WHERE T.CHECK_NO = V_CHECK_NO
  1343. AND T.SAMPLE_NO = V_SAMPLE_NO
  1344. AND T.PHY_CODE_MAX = V_PHY_CODE_MAX
  1345. AND T.SEQ BETWEEN 7 AND 9) LOOP
  1346. UPDATE PIPE_CHECKCONSIGN_HIC_PARM T
  1347. SET T.CLR2 = MYROW3.CLR1, T.CTR2 = MYROW3.CTR1, T.CSR2 = MYROW3.CSR1
  1348. WHERE T.CHECK_NO = V_CHECK_NO
  1349. AND T.SAMPLE_NO = V_SAMPLE_NO
  1350. AND T.PHY_CODE_MAX = V_PHY_CODE_MAX
  1351. AND T.SEQ BETWEEN 7 AND 9;
  1352. END LOOP;
  1353. FOR MYROW4 IN (select avg(T.CLR2) CLR1, avg(T.CTR2) CTR1, avg(T.CSR2) CSR1
  1354. from PIPE_CHECKCONSIGN_HIC_PARM t
  1355. WHERE T.CHECK_NO = V_CHECK_NO
  1356. AND T.SAMPLE_NO = V_SAMPLE_NO
  1357. AND T.PHY_CODE_MAX = V_PHY_CODE_MAX) LOOP
  1358. UPDATE PIPE_CHECKCONSIGN_HIC_PARM T
  1359. SET T.CLR3 = MYROW4.CLR1, T.CTR3 = MYROW4.CTR1, T.CSR3 = MYROW4.CSR1
  1360. WHERE T.CHECK_NO = V_CHECK_NO
  1361. AND T.SAMPLE_NO = V_SAMPLE_NO
  1362. AND T.PHY_CODE_MAX = V_PHY_CODE_MAX;
  1363. END LOOP;
  1364. --裂纹长度率(CLR)
  1365. SELECT *
  1366. INTO N1, N2, N3, N4, N5, N6, N7, N8, N9
  1367. FROM (select Clr1, seq
  1368. from PIPE_CHECKCONSIGN_HIC_PARM t
  1369. WHERE T.CHECK_NO = V_CHECK_NO
  1370. AND T.SAMPLE_NO = V_SAMPLE_NO
  1371. AND T.PHY_CODE_MAX = V_PHY_CODE_MAX) PIVOT(MAX(Clr1) FOR seq IN(1,
  1372. 2,
  1373. 3,
  1374. 4,
  1375. 5,
  1376. 6,
  1377. 7,
  1378. 8,
  1379. 9));
  1380. UPDATE PIPE_CHECKCONSIGN_PHYDETAIL P
  1381. SET P.VALUE1 = TO_CHAR(N1, 'FM99990.000'),
  1382. P.VALUE2 = TO_CHAR(N2, 'FM99990.000'),
  1383. P.VALUE3 = TO_CHAR(N3, 'FM99990.000'),
  1384. P.VALUE5 = TO_CHAR(N4, 'FM99990.000'),
  1385. P.VALUE6 = TO_CHAR(N5, 'FM99990.000'),
  1386. P.VALUE7 = TO_CHAR(N6, 'FM99990.000'),
  1387. P.VALUE9 = TO_CHAR(N7, 'FM99990.000'),
  1388. P.VALUE10 = TO_CHAR(N8, 'FM99990.000'),
  1389. P.VALUE11 = TO_CHAR(N9, 'FM99990.000')
  1390. WHERE P.CHECK_NO = V_CHECK_NO
  1391. AND P.SAMPLE_NO = V_SAMPLE_NO
  1392. AND P.PHY_CODE_MAX = V_PHY_CODE_MAX
  1393. AND P.PHY_NAME LIKE '%CLR%';
  1394. --裂纹厚度率(CTR)
  1395. SELECT *
  1396. INTO N1, N2, N3, N4, N5, N6, N7, N8, N9
  1397. FROM (select CTR1, seq
  1398. from PIPE_CHECKCONSIGN_HIC_PARM t
  1399. WHERE T.CHECK_NO = V_CHECK_NO
  1400. AND T.SAMPLE_NO = V_SAMPLE_NO
  1401. AND T.PHY_CODE_MAX = V_PHY_CODE_MAX) PIVOT(MAX(CTR1) FOR seq IN(1,
  1402. 2,
  1403. 3,
  1404. 4,
  1405. 5,
  1406. 6,
  1407. 7,
  1408. 8,
  1409. 9));
  1410. UPDATE PIPE_CHECKCONSIGN_PHYDETAIL P
  1411. SET P.VALUE1 = TO_CHAR(N1, 'FM99990.000'),
  1412. P.VALUE2 = TO_CHAR(N2, 'FM99990.000'),
  1413. P.VALUE3 = TO_CHAR(N3, 'FM99990.000'),
  1414. P.VALUE5 = TO_CHAR(N4, 'FM99990.000'),
  1415. P.VALUE6 = TO_CHAR(N5, 'FM99990.000'),
  1416. P.VALUE7 = TO_CHAR(N6, 'FM99990.000'),
  1417. P.VALUE9 = TO_CHAR(N7, 'FM99990.000'),
  1418. P.VALUE10 = TO_CHAR(N8, 'FM99990.000'),
  1419. P.VALUE11 = TO_CHAR(N9, 'FM99990.000')
  1420. WHERE P.CHECK_NO = V_CHECK_NO
  1421. AND P.SAMPLE_NO = V_SAMPLE_NO
  1422. AND P.PHY_CODE_MAX = V_PHY_CODE_MAX
  1423. AND P.PHY_NAME LIKE '%CTR%';
  1424. --裂纹敏感率(CSR)
  1425. SELECT *
  1426. INTO N1, N2, N3, N4, N5, N6, N7, N8, N9
  1427. FROM (select CSR1, seq
  1428. from PIPE_CHECKCONSIGN_HIC_PARM t
  1429. WHERE T.CHECK_NO = V_CHECK_NO
  1430. AND T.SAMPLE_NO = V_SAMPLE_NO
  1431. AND T.PHY_CODE_MAX = V_PHY_CODE_MAX) PIVOT(MAX(CSR1) FOR seq IN(1,
  1432. 2,
  1433. 3,
  1434. 4,
  1435. 5,
  1436. 6,
  1437. 7,
  1438. 8,
  1439. 9));
  1440. UPDATE PIPE_CHECKCONSIGN_PHYDETAIL P
  1441. SET P.VALUE1 = TO_CHAR(N1, 'FM99990.000'),
  1442. P.VALUE2 = TO_CHAR(N2, 'FM99990.000'),
  1443. P.VALUE3 = TO_CHAR(N3, 'FM99990.000'),
  1444. P.VALUE5 = TO_CHAR(N4, 'FM99990.000'),
  1445. P.VALUE6 = TO_CHAR(N5, 'FM99990.000'),
  1446. P.VALUE7 = TO_CHAR(N6, 'FM99990.000'),
  1447. P.VALUE9 = TO_CHAR(N7, 'FM99990.000'),
  1448. P.VALUE10 = TO_CHAR(N8, 'FM99990.000'),
  1449. P.VALUE11 = TO_CHAR(N9, 'FM99990.000')
  1450. WHERE P.CHECK_NO = V_CHECK_NO
  1451. AND P.SAMPLE_NO = V_SAMPLE_NO
  1452. AND P.PHY_CODE_MAX = V_PHY_CODE_MAX
  1453. AND P.PHY_NAME LIKE '%CSR%';
  1454. UPDATE PIPE_CHECKCONSIGN_PHYDETAIL P
  1455. SET P.VALUE4 = TO_CHAR(ROUND((P.VALUE1 + P.VALUE2 + P.VALUE3) / 3,
  1456. 3),
  1457. 'FM99990.000'),
  1458. P.VALUE8 = TO_CHAR(ROUND((P.VALUE5 + P.VALUE6 + P.VALUE7) / 3,
  1459. 3),
  1460. 'FM99990.000'),
  1461. P.VALUE12 = TO_CHAR(ROUND((P.VALUE9 + P.VALUE10 + P.VALUE11) / 3,
  1462. 3),
  1463. 'FM99990.000'),
  1464. P.AVERAGE_VALUE = TO_CHAR(ROUND((P.VALUE1 + P.VALUE2 + P.VALUE3 +
  1465. P.VALUE5 + P.VALUE6 + P.VALUE7 +
  1466. P.VALUE9 + P.VALUE10 + P.VALUE11) / 9,
  1467. 3),
  1468. 'FM99990.000')
  1469. WHERE P.CHECK_NO = V_CHECK_NO
  1470. AND P.SAMPLE_NO = V_SAMPLE_NO
  1471. AND P.PHY_CODE_MAX = V_PHY_CODE_MAX;
  1472. END;
  1473. ]]>
  1474. </query>
  1475. <query id="FrmLabDateParm.selectSscdParm" desc="查询腐蚀SSC-D实验参数表">
  1476. <![CDATA[
  1477. select t.*
  1478. from PIPE_CHECKCONSIGN_SSCD_PARM t
  1479. WHERE T.CHECK_NO = ?
  1480. AND T.SAMPLE_NO = ?
  1481. AND T.PHY_CODE_MAX = ?
  1482. ]]>
  1483. </query>
  1484. <query id="FrmLabDateParm.selectSsc3Parm" desc="查询SSC-B法试验(三点弯曲)实验参数表">
  1485. <![CDATA[
  1486. select T.CHECK_NO,
  1487. T.SAMPLE_NO,
  1488. T.PHY_CODE_MAX,
  1489. T.SEQ,
  1490. T.SPECIMEN_SIZE,
  1491. T.PSEUDO_STRESS,
  1492. T.LOAD_DEFLECTION,
  1493. DECODE(T.TEST_RESULTS, '-1', '破坏', '未破坏') TEST_RESULTS,
  1494. T.SAMPLE_NO2,
  1495. T.SC_VALUE1,
  1496. T.SC_VALUE2,
  1497. DECODE(T.IS_OK, '1', '有效', '0', '无效') IS_OK,
  1498. '删除' BTN_DELETE
  1499. from PIPE_CHECKCONSIGN_SSC3_PARM t
  1500. WHERE T.CHECK_NO = ?
  1501. AND T.SAMPLE_NO = ?
  1502. AND T.PHY_CODE_MAX = ?
  1503. ORDER BY T.SEQ
  1504. ]]>
  1505. </query>
  1506. <query id="FrmLabDateParm.selectPhydetail" desc="查询PIPE_CHECKCONSIGN_PHYDETAIL表信息">
  1507. <![CDATA[
  1508. SELECT T.PHYDETAIL_ID,
  1509. T.CHECK_NO,
  1510. T.BATCH_NO,
  1511. T.SAMPLE_NO,
  1512. T.INDEX_SEQ,
  1513. T.DEPT_ID,
  1514. T.PHY_CODE_MAX,
  1515. T.PHY_NAME_MAX,
  1516. T.PHY_CODE_MIN,
  1517. T.PHY_NAME_MIN,
  1518. T.PHY_CODE,
  1519. T.PHY_NAME,
  1520. T.PHY_UNIT,
  1521. T.ITEM_CODE_F,
  1522. T.ITEM_NAME_F,
  1523. T.ITEM_CODE_W,
  1524. T.ITEM_NAME_W,
  1525. T.ITEM_CODE_S,
  1526. T.ITEM_NAME_S,
  1527. T.GROUP_SEQ,
  1528. T.RESULT_COUNT,
  1529. T.ISCHECK,
  1530. T.ISJUDGE,
  1531. T.ISQUOTE,
  1532. T.PHY_TYPE,
  1533. T.PHY_FORMULA,
  1534. T.STDMIN_SIGN,
  1535. T.STDMIN,
  1536. T.STDMAX_SIGN,
  1537. T.STDMAX,
  1538. T.JUDGE_BASIS,
  1539. T.STDMIN_SIGN2,
  1540. T.STDMIN2,
  1541. T.STDMAX_SIGN2,
  1542. T.STDMAX2,
  1543. T.STD_CHOOSE,
  1544. T.STDMEMO,
  1545. T.ADDCONDITION,
  1546. T.ADDSTDCON_CODE,
  1547. T.ADDSTD_MIN_SIGN,
  1548. T.ADDSTD_MIN,
  1549. T.ADDSTD_MAX_SIGN,
  1550. T.ADDSTD_MAX,
  1551. T.ADDPERCENT,
  1552. T.BILLET_SAMPLE,
  1553. T.REMARK,
  1554. NVL(T.VALUE1,
  1555. CASE
  1556. WHEN T.PHY_CODE_MAX IN ('C0030','C0031','C0133') THEN
  1557. '符合 Passed'
  1558. ELSE
  1559. ''
  1560. END) VALUE1,
  1561. NVL(T.VALUE2,
  1562. CASE
  1563. WHEN T.PHY_CODE_MAX IN ('C0030','C0031','C0133') THEN
  1564. '符合 Passed'
  1565. ELSE
  1566. ''
  1567. END) VALUE2,
  1568. NVL(T.VALUE3,
  1569. CASE
  1570. WHEN T.PHY_CODE_MAX IN ('C0030','C0031','C0133') THEN
  1571. '符合 Passed'
  1572. ELSE
  1573. ''
  1574. END) VALUE3,
  1575. T.VALUE4,
  1576. T.VALUE5,
  1577. T.VALUE6,
  1578. T.VALUE7,
  1579. T.VALUE8,
  1580. T.VALUE9,
  1581. T.VALUE10,
  1582. T.VALUE11,
  1583. T.VALUE12,
  1584. T.VALUE13,
  1585. T.VALUE14,
  1586. T.VALUE15,
  1587. T.AVERAGE_VALUE,
  1588. T.IS_GOOD,
  1589. T.IS_DEFECT,
  1590. T.CALCULATION_FORMULA,
  1591. T.SEQ,
  1592. T.PHY_CODE_DIR,
  1593. T.PHY_NAME_DIR,
  1594. CASE
  1595. WHEN INSTR(T.ITEM_NAME_W, '%') > 0 THEN
  1596. TO_CHAR(SUBSTR(T.ITEM_NAME_W, INSTR(T.ITEM_NAME_W, '%') - 2, 2),
  1597. 'FM999.0')
  1598. ELSE
  1599. ''
  1600. END LOAD_LEVEL
  1601. FROM PIPE_CHECKCONSIGN_PHYDETAIL T
  1602. WHERE T.CHECK_NO = ?
  1603. AND T.SAMPLE_NO = ?
  1604. AND T.PHY_CODE_MAX = ?
  1605. ]]>
  1606. </query>
  1607. <query id="FrmLabDateParm.insertSscdParm" desc="新增腐蚀SSC-D实验参数表">
  1608. <![CDATA[
  1609. DECLARE
  1610. V_CHECK_NO PIPE_CHECKCONSIGN_SSCD_PARM.CHECK_NO%type := ?;
  1611. V_SAMPLE_NO PIPE_CHECKCONSIGN_SSCD_PARM.SAMPLE_NO%type := ?;
  1612. V_PHY_CODE_MAX PIPE_CHECKCONSIGN_SSCD_PARM.PHY_CODE_MAX%type := ?;
  1613. V_REULST_NO PIPE_CHECKCONSIGN_SSCD_PARM.REULST_NO%type := NULL;
  1614. acout int := 0;
  1615. j int := 0;
  1616. BEGIN
  1617. --生成 编号
  1618. SELECT TO_CHAR(SYSDATE, 'YYMMDD') ||
  1619. LPAD(NVL(MAX(SUBSTR(T.REULST_NO, 7)), 0) + 1, 6, 0) DI
  1620. INTO V_REULST_NO
  1621. FROM PIPE_CHECKCONSIGN_SSCD_PARM T
  1622. WHERE TO_CHAR(T.CREATE_TIME, 'YYYY-MM-DD') =
  1623. TO_CHAR(SYSDATE, 'YYYY-MM-DD');
  1624. for i in 1 .. 3 loop
  1625. INSERT INTO PIPE_CHECKCONSIGN_SSCD_PARM
  1626. (REULST_NO, CHECK_NO, SAMPLE_NO, PHY_CODE_MAX, SEQ, CREATE_TIME)
  1627. VALUES
  1628. (V_REULST_NO + j,
  1629. V_CHECK_NO,
  1630. V_SAMPLE_NO,
  1631. V_PHY_CODE_MAX,
  1632. i,
  1633. SYSDATE);
  1634. j := j + 1;
  1635. end loop;
  1636. END;
  1637. ]]>
  1638. </query>
  1639. <query id="FrmLabDateParm.saveSscdParm" desc="保存腐蚀SSC-D实验参数表">
  1640. <![CDATA[
  1641. UPDATE PIPE_CHECKCONSIGN_SSCD_PARM T
  1642. SET T.HRC1 = '#HRC1#',
  1643. T.HRC2 = '#HRC2#',
  1644. T.HRC3 = '#HRC3#',
  1645. T.SAMPLE_LENGTH = '#SAMPLE_LENGTH#',
  1646. T.SAMPLE_THICKNESS = '#SAMPLE_THICKNESS#',
  1647. T.ABDOMINAL_WALL_THICKNESS = '#ABDOMINAL_WALL_THICKNESS#',
  1648. T.EDGE_PITCH = '#EDGE_PITCH#',
  1649. T.INITIAL_CRACK_LENGTH = '#INITIAL_CRACK_LENGTH#',
  1650. T.SAMPLE_WIDTH = '#SAMPLE_WIDTH#',
  1651. T.WIDTH_AFTER_LOAD = '#WIDTH_AFTER_LOAD#',
  1652. T.CRACK_LENGTH_AFTER_TEST1 = '#CRACK_LENGTH_AFTER_TEST1#',
  1653. T.CRACK_LENGTH_AFTER_TEST2 = '#CRACK_LENGTH_AFTER_TEST2#',
  1654. T.CRACK_LENGTH_AFTER_TEST3 = '#CRACK_LENGTH_AFTER_TEST3#',
  1655. T.CRACK_LENGTH_AFTER_TEST4 = '#CRACK_LENGTH_AFTER_TEST4#',
  1656. T.CRACK_LENGTH_AFTER_TEST5 = '#CRACK_LENGTH_AFTER_TEST5#',
  1657. T.INTEGER1 = '#INTEGER1#',
  1658. T.CREATE_TIME = SYSDATE
  1659. WHERE T.REULST_NO = '#REULST_NO#'
  1660. ]]>
  1661. </query>
  1662. <query id="FrmLabDateParm.savePhydetail" desc="保存腐蚀SSC实验结果">
  1663. <![CDATA[
  1664. UPDATE PIPE_CHECKCONSIGN_PHYDETAIL T
  1665. SET T.VALUE1 = '#VALUE1#', T.VALUE2 = '#VALUE2#', T.VALUE3 = '#VALUE3#'
  1666. WHERE T.PHYDETAIL_ID = '#PHYDETAIL_ID#'
  1667. ]]>
  1668. </query>
  1669. <query id="FrmLabDateParm.savePhydetailSsc" desc="保存腐蚀SSC实验结果">
  1670. <![CDATA[
  1671. UPDATE PIPE_CHECKCONSIGN_PHYDETAIL T
  1672. SET T.VALUE1 = ?, T.VALUE2 = ?, T.VALUE3 = ?
  1673. WHERE T.CHECK_NO = ?
  1674. AND T.SAMPLE_NO = ?
  1675. AND T.PHY_CODE_MAX = ?
  1676. ]]>
  1677. </query>
  1678. <query id="FrmLabDateParm.saveSscdParmKISCC" desc="腐蚀SSC-D实验:计算平均值">
  1679. <![CDATA[
  1680. DECLARE
  1681. V_CHECK_NO PIPE_CHECKCONSIGN_SSCD_PARM.CHECK_NO%type := ?;
  1682. V_SAMPLE_NO PIPE_CHECKCONSIGN_SSCD_PARM.SAMPLE_NO%type := ?;
  1683. V_PHY_CODE_MAX PIPE_CHECKCONSIGN_SSCD_PARM.PHY_CODE_MAX%type := ?;
  1684. N1 NUMBER;
  1685. N2 NUMBER;
  1686. N3 NUMBER;
  1687. BEGIN
  1688. FOR MYROW IN (select T.REULST_NO,
  1689. (T.HRC1 + T.HRC2 + T.HRC3) / 3 HRC_AV,
  1690. ((T.CRACK_LENGTH_AFTER_TEST1 +
  1691. T.CRACK_LENGTH_AFTER_TEST2 +
  1692. T.CRACK_LENGTH_AFTER_TEST3) / 3 +
  1693. (T.CRACK_LENGTH_AFTER_TEST4 +
  1694. T.CRACK_LENGTH_AFTER_TEST5) / 2) / 2 - T.EDGE_PITCH A,
  1695. T.SAMPLE_WIDTH / 2 H
  1696. from PIPE_CHECKCONSIGN_SSCD_PARM t
  1697. WHERE T.CHECK_NO = V_CHECK_NO
  1698. AND T.SAMPLE_NO = V_SAMPLE_NO
  1699. AND T.PHY_CODE_MAX = V_PHY_CODE_MAX) LOOP
  1700. UPDATE PIPE_CHECKCONSIGN_SSCD_PARM T
  1701. SET T.KISCC = T.INTEGER1 * MYROW.A / 1000 *
  1702. (2 * sqrt(3) + 2.38 * MYROW.H / MYROW.A) *
  1703. power(T.SAMPLE_THICKNESS /
  1704. T.ABDOMINAL_WALL_THICKNESS,
  1705. 1 / sqrt(3)) / T.SAMPLE_THICKNESS / 1000 /
  1706. power(MYROW.H / 1000, 1.5),
  1707. T.CRACK_LENGTH = MYROW.A,
  1708. T.HRC_AV = MYROW.HRC_AV
  1709. WHERE T.CHECK_NO = V_CHECK_NO
  1710. AND T.SAMPLE_NO = V_SAMPLE_NO
  1711. AND T.PHY_CODE_MAX = V_PHY_CODE_MAX
  1712. AND T.REULST_NO = MYROW.REULST_NO;
  1713. END LOOP;
  1714. FOR MYROW IN (select avg(T.KISCC) KISCC
  1715. from PIPE_CHECKCONSIGN_SSCD_PARM t
  1716. WHERE T.CHECK_NO = V_CHECK_NO
  1717. AND T.SAMPLE_NO = V_SAMPLE_NO
  1718. AND T.PHY_CODE_MAX = V_PHY_CODE_MAX) LOOP
  1719. UPDATE PIPE_CHECKCONSIGN_SSCD_PARM T
  1720. SET T.KISCC_AVG = MYROW.KISCC
  1721. WHERE T.CHECK_NO = V_CHECK_NO
  1722. AND T.SAMPLE_NO = V_SAMPLE_NO
  1723. AND T.PHY_CODE_MAX = V_PHY_CODE_MAX;
  1724. END LOOP;
  1725. SELECT *
  1726. INTO N1, N2, N3
  1727. FROM (select KISCC, seq
  1728. from PIPE_CHECKCONSIGN_SSCD_PARM t
  1729. WHERE T.CHECK_NO = V_CHECK_NO
  1730. AND T.SAMPLE_NO = V_SAMPLE_NO
  1731. AND T.PHY_CODE_MAX = V_PHY_CODE_MAX) PIVOT(MAX(KISCC) FOR seq IN(1,
  1732. 2,
  1733. 3));
  1734. UPDATE PIPE_CHECKCONSIGN_PHYDETAIL P
  1735. SET P.VALUE1 = TO_CHAR(N1, 'FM99990.00'),
  1736. P.VALUE2 = TO_CHAR(N2, 'FM99990.00'),
  1737. P.VALUE3 = TO_CHAR(N3, 'FM99990.00'),
  1738. P.AVERAGE_VALUE = ROUND((N1 + N2 + N3) / 3, 1)
  1739. WHERE P.CHECK_NO = V_CHECK_NO
  1740. AND P.SAMPLE_NO = V_SAMPLE_NO
  1741. AND P.PHY_CODE_MAX = V_PHY_CODE_MAX;
  1742. END;
  1743. ]]>
  1744. </query>
  1745. <query id="FrmLabDateParm.saveLabDateParmSqlD" desc="D法赋值">
  1746. <![CDATA[
  1747. DECLARE
  1748. V_CHECK_NO PIPE_CHECKCONSIGN_SSCD_PARM.CHECK_NO%type := ?;
  1749. V_SAMPLE_NO PIPE_CHECKCONSIGN_SSCD_PARM.SAMPLE_NO%type := ?;
  1750. V_PHY_CODE_MAX PIPE_CHECKCONSIGN_SSCD_PARM.PHY_CODE_MAX%type := ?;
  1751. N1 NUMBER;
  1752. N2 NUMBER;
  1753. N3 NUMBER;
  1754. C1 NUMBER;
  1755. C2 NUMBER;
  1756. C3 NUMBER;
  1757. A1 NUMBER;
  1758. A2 NUMBER;
  1759. A3 NUMBER;
  1760. B1 NUMBER;
  1761. B2 NUMBER;
  1762. B3 NUMBER;
  1763. BEGIN
  1764. SELECT *
  1765. INTO N1, N2, N3
  1766. FROM (select INTEGER1, seq
  1767. from PIPE_CHECKCONSIGN_SSCD_PARM t
  1768. WHERE T.CHECK_NO = V_CHECK_NO
  1769. AND T.SAMPLE_NO = V_SAMPLE_NO
  1770. AND T.PHY_CODE_MAX = V_PHY_CODE_MAX) PIVOT(MAX(INTEGER1) FOR seq IN(1,
  1771. 2,
  1772. 3));
  1773. SELECT *
  1774. INTO C1, C2, C3
  1775. FROM (select CRACK_LENGTH, seq
  1776. from PIPE_CHECKCONSIGN_SSCD_PARM t
  1777. WHERE T.CHECK_NO = V_CHECK_NO
  1778. AND T.SAMPLE_NO = V_SAMPLE_NO
  1779. AND T.PHY_CODE_MAX = V_PHY_CODE_MAX) PIVOT(MAX(CRACK_LENGTH) FOR seq IN(1,
  1780. 2,
  1781. 3));
  1782. SELECT *
  1783. INTO A1, A2, A3
  1784. FROM (select WIDTH_AFTER_LOAD, seq
  1785. from PIPE_CHECKCONSIGN_SSCD_PARM t
  1786. WHERE T.CHECK_NO = V_CHECK_NO
  1787. AND T.SAMPLE_NO = V_SAMPLE_NO
  1788. AND T.PHY_CODE_MAX = V_PHY_CODE_MAX) PIVOT(MAX(WIDTH_AFTER_LOAD) FOR seq IN(1,
  1789. 2,
  1790. 3));
  1791. SELECT *
  1792. INTO B1, B2, B3
  1793. FROM (select SAMPLE_WIDTH, seq
  1794. from PIPE_CHECKCONSIGN_SSCD_PARM t
  1795. WHERE T.CHECK_NO = V_CHECK_NO
  1796. AND T.SAMPLE_NO = V_SAMPLE_NO
  1797. AND T.PHY_CODE_MAX = V_PHY_CODE_MAX) PIVOT(MAX(SAMPLE_WIDTH) FOR seq IN(1,
  1798. 2,
  1799. 3));
  1800. UPDATE PIPE_CHECKCONSIGN_LAB_RESULT P
  1801. SET P.PRESET_LOAD1 = N1,
  1802. P.PRESET_LOAD2 = N2,
  1803. P.PRESET_LOAD3 = N3,
  1804. P.CRACK_LENGTH1 = TO_CHAR(C1, 'FM99990.00'),
  1805. P.CRACK_LENGTH2 = TO_CHAR(C2, 'FM99990.00'),
  1806. P.CRACK_LENGTH3 = TO_CHAR(C3, 'FM99990.00'),
  1807. P.ACTUAL_LOAD1 = TO_CHAR(A1 - B1, 'FM99990.00'),
  1808. P.ACTUAL_LOAD2 = TO_CHAR(A2 - B2, 'FM99990.00'),
  1809. P.ACTUAL_LOAD3 = TO_CHAR(A3 - B3, 'FM99990.00')
  1810. WHERE P.CHECK_NO = V_CHECK_NO
  1811. AND P.SAMPLE_NO = V_SAMPLE_NO
  1812. AND P.PHY_CODE_MAX = V_PHY_CODE_MAX;
  1813. END;
  1814. ]]>
  1815. </query>
  1816. <query id="FrmLabDateParm.selectCount" desc="查询PIPE_CHECKCONSIGN_LAB_RESULT是否有数据">
  1817. <![CDATA[
  1818. select count(1) ACOUNT
  1819. from PIPE_CHECKCONSIGN_LAB_RESULT t
  1820. where t.check_no = ?
  1821. and t.sample_no = ?
  1822. and t.phy_code_max = ?
  1823. ]]>
  1824. </query>
  1825. <query id="FrmLabDateParm.UpdateFilePath" desc="上传图片">
  1826. <![CDATA[
  1827. UPDATE PIPE_CHECKCONSIGN_DETAIL T
  1828. SET #FILE_PATH# = ?
  1829. WHERE T.CHECK_NO = ?
  1830. AND T.SAMPLE_NO = ?
  1831. AND T.PHY_CODE_MAX = ?
  1832. ]]>
  1833. </query>
  1834. <query id="FrmLabDateParm.saveSscbParm" desc="计算 腐蚀SSC-b实验参数">
  1835. <![CDATA[
  1836. UPDATE PIPE_CHECKCONSIGN_LAB_RESULT T
  1837. SET T.ACTUAL_LOAD1 = CEIL(100 * NVL(T.YSMIN1, 0) *
  1838. NVL(T.LOAD_LEVEL, 0) / 100 *
  1839. (3 * 100 * 100 - 4 * 25 * 25) /
  1840. (12 * 206000 *
  1841. SUBSTR(T.SPECIMEN_SIZE1,
  1842. INSTR(REPLACE(T.SPECIMEN_SIZE1,
  1843. '×',
  1844. '*'),
  1845. '*',
  1846. 1,
  1847. 2) + 1))) / 100,
  1848. T.ACTUAL_LOAD2 = CEIL(100 * NVL(T.YSMIN2, 0) *
  1849. NVL(T.LOAD_LEVEL, 0) / 100 *
  1850. (3 * 100 * 100 - 4 * 25 * 25) /
  1851. (12 * 206000 *
  1852. SUBSTR(T.SPECIMEN_SIZE2,
  1853. INSTR(REPLACE(T.SPECIMEN_SIZE2,
  1854. '×',
  1855. '*'),
  1856. '*',
  1857. 1,
  1858. 2) + 1))) / 100,
  1859. T.ACTUAL_LOAD3 = CEIL(100 * NVL(T.YSMIN3, 0) *
  1860. NVL(T.LOAD_LEVEL, 0) / 100 *
  1861. (3 * 100 * 100 - 4 * 25 * 25) /
  1862. (12 * 206000 *
  1863. SUBSTR(T.SPECIMEN_SIZE3,
  1864. INSTR(REPLACE(T.SPECIMEN_SIZE3,
  1865. '×',
  1866. '*'),
  1867. '*',
  1868. 1,
  1869. 2) + 1))) / 100,
  1870. T.ACTUAL_S_YSMIN1 = ROUND(CEIL(100 * NVL(T.YSMIN1, 0) *
  1871. NVL(T.LOAD_LEVEL, 0) / 100 *
  1872. (3 * 100 * 100 - 4 * 25 * 25) /
  1873. (12 * 206000 *
  1874. SUBSTR(T.SPECIMEN_SIZE1,
  1875. INSTR(REPLACE(T.SPECIMEN_SIZE1,
  1876. '×',
  1877. '*'),
  1878. '*',
  1879. 1,
  1880. 2) + 1))) /
  1881. (NVL(T.YSMIN1, 0) *
  1882. (3 * 100 * 100 - 4 * 25 * 25) /
  1883. (12 * 206000 *
  1884. SUBSTR(T.SPECIMEN_SIZE1,
  1885. INSTR(REPLACE(T.SPECIMEN_SIZE1,
  1886. '×',
  1887. '*'),
  1888. '*',
  1889. 1,
  1890. 2) + 1))),
  1891. 1),
  1892. T.ACTUAL_S_YSMIN2 = ROUND(CEIL(100 * NVL(T.YSMIN2, 0) *
  1893. NVL(T.LOAD_LEVEL, 0) / 100 *
  1894. (3 * 100 * 100 - 4 * 25 * 25) /
  1895. (12 * 206000 *
  1896. SUBSTR(T.SPECIMEN_SIZE2,
  1897. INSTR(REPLACE(T.SPECIMEN_SIZE2,
  1898. '×',
  1899. '*'),
  1900. '*',
  1901. 1,
  1902. 2) + 1))) /
  1903. (NVL(T.YSMIN2, 0) *
  1904. (3 * 100 * 100 - 4 * 25 * 25) /
  1905. (12 * 206000 *
  1906. SUBSTR(T.SPECIMEN_SIZE2,
  1907. INSTR(REPLACE(T.SPECIMEN_SIZE2,
  1908. '×',
  1909. '*'),
  1910. '*',
  1911. 1,
  1912. 2) + 1))),
  1913. 1),
  1914. T.ACTUAL_S_YSMIN3 = ROUND(CEIL(100 * NVL(T.YSMIN3, 0) *
  1915. NVL(T.LOAD_LEVEL, 0) / 100 *
  1916. (3 * 100 * 100 - 4 * 25 * 25) /
  1917. (12 * 206000 *
  1918. SUBSTR(T.SPECIMEN_SIZE3,
  1919. INSTR(REPLACE(T.SPECIMEN_SIZE3,
  1920. '×',
  1921. '*'),
  1922. '*',
  1923. 1,
  1924. 2) + 1))) /
  1925. (NVL(T.YSMIN3, 0) *
  1926. (3 * 100 * 100 - 4 * 25 * 25) /
  1927. (12 * 206000 *
  1928. SUBSTR(T.SPECIMEN_SIZE3,
  1929. INSTR(REPLACE(T.SPECIMEN_SIZE3,
  1930. '×',
  1931. '*'),
  1932. '*',
  1933. 1,
  1934. 2) + 1))),
  1935. 1)
  1936. WHERE T.CHECK_NO = ?
  1937. AND T.SAMPLE_NO = ?
  1938. AND T.PHY_CODE_MAX = ?
  1939. ]]>
  1940. </query>
  1941. <query id="FrmLabDateParm.saveSscAParm" desc="计算 腐蚀SSC-A实验参数">
  1942. <![CDATA[
  1943. DECLARE
  1944. V_CHECK_NO PIPE_CHECKCONSIGN_LAB_RESULT.CHECK_NO%type := ?;
  1945. V_SAMPLE_NO PIPE_CHECKCONSIGN_LAB_RESULT.SAMPLE_NO%type := ?;
  1946. V_PHY_CODE_MAX PIPE_CHECKCONSIGN_LAB_RESULT.PHY_CODE_MAX%type := ?;
  1947. BEGIN
  1948. FOR MYROW1 IN (SELECT T.*,
  1949. T1.*,
  1950. T.YSMIN1 * T.SPECIMEN_SIZE1 * T.SPECIMEN_SIZE1 *
  1951. 3.1415926 / 4 ZHL,
  1952. T.YSMIN1 * T.SPECIMEN_SIZE1 * T.SPECIMEN_SIZE1 *
  1953. 3.1415926 / 4 / 9.806655 ZHL2
  1954. FROM PIPE_CHECKCONSIGN_LAB_RESULT T,
  1955. PIPE_STRESSRING_PARM T1
  1956. WHERE T.CHECK_NO = V_CHECK_NO
  1957. AND T.SAMPLE_NO = V_SAMPLE_NO
  1958. AND T.PHY_CODE_MAX = V_PHY_CODE_MAX
  1959. AND T.PROOF_RING_NO1 = T1.STRESSRING_NO) LOOP
  1960. UPDATE PIPE_CHECKCONSIGN_LAB_RESULT T
  1961. SET T.YING_ACTUAL_LOAD1 = TO_CHAR(DECODE(MYROW1.STRESSRING_TYPE,
  1962. 'A',
  1963. (MYROW1.V6 * MYROW1.ZHL +
  1964. MYROW1.V7) * MYROW1.LOAD_LEVEL / 100,
  1965. 'B',
  1966. (MYROW1.ZHL2 * MYROW1.ZHL2 *
  1967. MYROW1.ZHL2 * MYROW1.V5 +
  1968. MYROW1.ZHL2 * MYROW1.ZHL2 *
  1969. MYROW1.V6 +
  1970. MYROW1.ZHL2 * MYROW1.V7 +
  1971. MYROW1.V8) * MYROW1.LOAD_LEVEL / 100),
  1972. 'FM99990.00')
  1973. WHERE T.CHECK_NO = V_CHECK_NO
  1974. AND T.SAMPLE_NO = V_SAMPLE_NO
  1975. AND T.PHY_CODE_MAX = V_PHY_CODE_MAX;
  1976. UPDATE PIPE_CHECKCONSIGN_LAB_RESULT T
  1977. SET T.ACTUAL_LOAD1 = T.YING_ACTUAL_LOAD1 + T.YING_ADD1,
  1978. T.ACTUAL_S_YSMIN1 = ROUND(DECODE(MYROW1.STRESSRING_TYPE,
  1979. 'A',
  1980. 100 * (T.YING_ACTUAL_LOAD1 +T.YING_ADD1) /
  1981. (MYROW1.V6 * MYROW1.ZHL +
  1982. MYROW1.V7),
  1983. 'B',
  1984. 100 * (T.YING_ACTUAL_LOAD1 + T.YING_ADD1) /
  1985. (MYROW1.ZHL2 * MYROW1.ZHL2 *
  1986. MYROW1.ZHL2 * MYROW1.V5 +
  1987. MYROW1.ZHL2 * MYROW1.ZHL2 *
  1988. MYROW1.V6 +
  1989. MYROW1.ZHL2 * MYROW1.V7 +
  1990. MYROW1.V8)),
  1991. 1)
  1992. WHERE T.CHECK_NO = V_CHECK_NO
  1993. AND T.SAMPLE_NO = V_SAMPLE_NO
  1994. AND T.PHY_CODE_MAX = V_PHY_CODE_MAX;
  1995. END LOOP;
  1996. FOR MYROW2 IN (SELECT T.*,
  1997. T1.*,
  1998. T.YSMIN2 * T.SPECIMEN_SIZE2 * T.SPECIMEN_SIZE2 *
  1999. 3.1415926 / 4 ZHL,
  2000. T.YSMIN2 * T.SPECIMEN_SIZE2 * T.SPECIMEN_SIZE2 *
  2001. 3.1415926 / 4 / 9.806655 ZHL2
  2002. FROM PIPE_CHECKCONSIGN_LAB_RESULT T,
  2003. PIPE_STRESSRING_PARM T1
  2004. WHERE T.CHECK_NO = V_CHECK_NO
  2005. AND T.SAMPLE_NO = V_SAMPLE_NO
  2006. AND T.PHY_CODE_MAX = V_PHY_CODE_MAX
  2007. AND T.PROOF_RING_NO2 = T1.STRESSRING_NO) LOOP
  2008. UPDATE PIPE_CHECKCONSIGN_LAB_RESULT T
  2009. SET T.YING_ACTUAL_LOAD2 = TO_CHAR(DECODE(MYROW2.STRESSRING_TYPE,
  2010. 'A',
  2011. (MYROW2.V6 * MYROW2.ZHL +
  2012. MYROW2.V7) * MYROW2.LOAD_LEVEL2 / 100,
  2013. 'B',
  2014. (MYROW2.ZHL2 * MYROW2.ZHL2 *
  2015. MYROW2.ZHL2 * MYROW2.V5 +
  2016. MYROW2.ZHL2 * MYROW2.ZHL2 *
  2017. MYROW2.V6 +
  2018. MYROW2.ZHL2 * MYROW2.V7 +
  2019. MYROW2.V8) * MYROW2.LOAD_LEVEL2 / 100),
  2020. 'FM99990.00')
  2021. WHERE T.CHECK_NO = V_CHECK_NO
  2022. AND T.SAMPLE_NO = V_SAMPLE_NO
  2023. AND T.PHY_CODE_MAX = V_PHY_CODE_MAX;
  2024. UPDATE PIPE_CHECKCONSIGN_LAB_RESULT T
  2025. SET T.ACTUAL_LOAD2 = T.YING_ACTUAL_LOAD2 +T.YING_ADD2,
  2026. T.ACTUAL_S_YSMIN2 = ROUND(DECODE(MYROW2.STRESSRING_TYPE,
  2027. 'A',
  2028. 100 * (T.YING_ACTUAL_LOAD2 + T.YING_ADD2) /
  2029. (MYROW2.V6 * MYROW2.ZHL +
  2030. MYROW2.V7),
  2031. 'B',
  2032. 100 * (T.YING_ACTUAL_LOAD2 + T.YING_ADD2) /
  2033. (MYROW2.ZHL2 * MYROW2.ZHL2 *
  2034. MYROW2.ZHL2 * MYROW2.V5 +
  2035. MYROW2.ZHL2 * MYROW2.ZHL2 *
  2036. MYROW2.V6 +
  2037. MYROW2.ZHL2 * MYROW2.V7 +
  2038. MYROW2.V8)),
  2039. 1)
  2040. WHERE T.CHECK_NO = V_CHECK_NO
  2041. AND T.SAMPLE_NO = V_SAMPLE_NO
  2042. AND T.PHY_CODE_MAX = V_PHY_CODE_MAX;
  2043. END LOOP;
  2044. FOR MYROW3 IN (SELECT T.*,
  2045. T1.*,
  2046. T.YSMIN3 * T.SPECIMEN_SIZE3 * T.SPECIMEN_SIZE3 *
  2047. 3.1415926 / 4 ZHL,
  2048. T.YSMIN3 * T.SPECIMEN_SIZE3 * T.SPECIMEN_SIZE3 *
  2049. 3.1415926 / 4 / 9.806655 ZHL2
  2050. FROM PIPE_CHECKCONSIGN_LAB_RESULT T,
  2051. PIPE_STRESSRING_PARM T1
  2052. WHERE T.CHECK_NO = V_CHECK_NO
  2053. AND T.SAMPLE_NO = V_SAMPLE_NO
  2054. AND T.PHY_CODE_MAX = V_PHY_CODE_MAX
  2055. AND T.PROOF_RING_NO3 = T1.STRESSRING_NO) LOOP
  2056. UPDATE PIPE_CHECKCONSIGN_LAB_RESULT T
  2057. SET T.YING_ACTUAL_LOAD3 = TO_CHAR(DECODE(MYROW3.STRESSRING_TYPE,
  2058. 'A',
  2059. (MYROW3.V6 * MYROW3.ZHL +
  2060. MYROW3.V7) * MYROW3.LOAD_LEVEL3 / 100,
  2061. 'B',
  2062. (MYROW3.ZHL2 * MYROW3.ZHL2 *
  2063. MYROW3.ZHL2 * MYROW3.V5 +
  2064. MYROW3.ZHL2 * MYROW3.ZHL2 *
  2065. MYROW3.V6 +
  2066. MYROW3.ZHL2 * MYROW3.V7 +
  2067. MYROW3.V8) * MYROW3.LOAD_LEVEL3 / 100),
  2068. 'FM99990.00')
  2069. WHERE T.CHECK_NO = V_CHECK_NO
  2070. AND T.SAMPLE_NO = V_SAMPLE_NO
  2071. AND T.PHY_CODE_MAX = V_PHY_CODE_MAX;
  2072. UPDATE PIPE_CHECKCONSIGN_LAB_RESULT T
  2073. SET T.ACTUAL_LOAD3 = T.YING_ACTUAL_LOAD3 + T.YING_ADD3,
  2074. T.ACTUAL_S_YSMIN3 = ROUND(DECODE(MYROW3.STRESSRING_TYPE,
  2075. 'A',
  2076. 100 * (T.YING_ACTUAL_LOAD3 + T.YING_ADD3) /
  2077. (MYROW3.V6 * MYROW3.ZHL +
  2078. MYROW3.V7),
  2079. 'B',
  2080. 100 * (T.YING_ACTUAL_LOAD3 + T.YING_ADD3) /
  2081. (MYROW3.ZHL2 * MYROW3.ZHL2 *
  2082. MYROW3.ZHL2 * MYROW3.V5 +
  2083. MYROW3.ZHL2 * MYROW3.ZHL2 *
  2084. MYROW3.V6 +
  2085. MYROW3.ZHL2 * MYROW3.V7 +
  2086. MYROW3.V8)),
  2087. 1)
  2088. WHERE T.CHECK_NO = V_CHECK_NO
  2089. AND T.SAMPLE_NO = V_SAMPLE_NO
  2090. AND T.PHY_CODE_MAX = V_PHY_CODE_MAX;
  2091. END LOOP;
  2092. END;
  2093. ]]>
  2094. </query>
  2095. <query id="FrmLabDateParm.deleteSsc3" desc="删除SSC-B法试验(三点弯曲)实验参数表">
  2096. <![CDATA[
  2097. DELETE FROM PIPE_CHECKCONSIGN_SSC3_PARM T
  2098. WHERE T.CHECK_NO = ?
  2099. AND T.SAMPLE_NO = ?
  2100. AND T.PHY_CODE_MAX = ?
  2101. ]]>
  2102. </query>
  2103. <query id="FrmLabDateParm.addSsc3" desc="新增SSC-B法试验(三点弯曲)实验参数表">
  2104. <![CDATA[
  2105. INSERT INTO PIPE_CHECKCONSIGN_SSC3_PARM
  2106. (CHECK_NO,
  2107. SAMPLE_NO,
  2108. PHY_CODE_MAX,
  2109. SEQ,
  2110. SPECIMEN_SIZE,
  2111. PSEUDO_STRESS,
  2112. LOAD_DEFLECTION,
  2113. TEST_RESULTS,
  2114. SAMPLE_NO2)
  2115. VALUES
  2116. ('#CHECK_NO#',
  2117. '#SAMPLE_NO#',
  2118. '#PHY_CODE_MAX#',
  2119. '#SEQ#',
  2120. '#SPECIMEN_SIZE#',
  2121. '#PSEUDO_STRESS#',
  2122. '#LOAD_DEFLECTION#',
  2123. '#TEST_RESULTS#',
  2124. '#SAMPLE_NO2#')
  2125. ]]>
  2126. </query>
  2127. <query id="FrmLabDateParm.saveSsc3" desc="计算SSC-B法试验(三点弯曲)实验参数表">
  2128. <![CDATA[
  2129. DECLARE
  2130. V_CHECK_NO PIPE_CHECKCONSIGN_SSC3_PARM.CHECK_NO%type := ?;
  2131. V_SAMPLE_NO PIPE_CHECKCONSIGN_SSC3_PARM.SAMPLE_NO%type := ?;
  2132. V_PHY_CODE_MAX PIPE_CHECKCONSIGN_SSC3_PARM.PHY_CODE_MAX%type := ?;
  2133. V_SC_VALUE1 PIPE_CHECKCONSIGN_SSC3_PARM.SC_VALUE1%type := null;
  2134. V_SC_VALUE2 PIPE_CHECKCONSIGN_SSC3_PARM.SC_VALUE2%type := null;
  2135. BEGIN
  2136. SELECT TO_CHAR((SUM(T.PSEUDO_STRESS) / 68.95 + 2 * SUM(T.TEST_RESULTS)) /
  2137. COUNT(1),
  2138. 'FM99990.00')
  2139. INTO V_SC_VALUE1
  2140. FROM PIPE_CHECKCONSIGN_SSC3_PARM T
  2141. WHERE T.CHECK_NO = V_CHECK_NO
  2142. AND T.SAMPLE_NO = V_SAMPLE_NO
  2143. AND T.PHY_CODE_MAX = V_PHY_CODE_MAX;
  2144. FOR MYROW IN (SELECT *
  2145. FROM PIPE_CHECKCONSIGN_SSC3_PARM T
  2146. WHERE T.CHECK_NO = V_CHECK_NO
  2147. AND T.SAMPLE_NO = V_SAMPLE_NO
  2148. AND T.PHY_CODE_MAX = V_PHY_CODE_MAX) LOOP
  2149. UPDATE PIPE_CHECKCONSIGN_SSC3_PARM T
  2150. SET T.SC_VALUE1 = V_SC_VALUE1,
  2151. T.IS_OK = CASE
  2152. WHEN to_number(68.95 * V_SC_VALUE1 + 210) >
  2153. to_number(T.PSEUDO_STRESS) AND
  2154. to_number(68.95 * V_SC_VALUE1 - 210) <
  2155. to_number(T.PSEUDO_STRESS) THEN
  2156. '1'
  2157. ELSE
  2158. '0'
  2159. END
  2160. WHERE T.CHECK_NO = V_CHECK_NO
  2161. AND T.SAMPLE_NO = V_SAMPLE_NO
  2162. AND T.PHY_CODE_MAX = V_PHY_CODE_MAX
  2163. AND T.SEQ = MYROW.SEQ;
  2164. END LOOP;
  2165. SELECT TO_CHAR((SUM(T.PSEUDO_STRESS) / 68.95 + 2 * SUM(T.TEST_RESULTS)) /
  2166. COUNT(1),
  2167. 'FM99990.00')
  2168. INTO V_SC_VALUE2
  2169. FROM PIPE_CHECKCONSIGN_SSC3_PARM T
  2170. WHERE T.CHECK_NO = V_CHECK_NO
  2171. AND T.SAMPLE_NO = V_SAMPLE_NO
  2172. AND T.PHY_CODE_MAX = V_PHY_CODE_MAX
  2173. AND T.IS_OK = '1';
  2174. UPDATE PIPE_CHECKCONSIGN_SSC3_PARM T
  2175. SET T.SC_VALUE2 = V_SC_VALUE2
  2176. WHERE T.CHECK_NO = V_CHECK_NO
  2177. AND T.SAMPLE_NO = V_SAMPLE_NO
  2178. AND T.PHY_CODE_MAX = V_PHY_CODE_MAX;
  2179. UPDATE PIPE_CHECKCONSIGN_PHYDETAIL T
  2180. SET T.VALUE1 = V_SC_VALUE2
  2181. WHERE T.CHECK_NO = V_CHECK_NO
  2182. AND T.SAMPLE_NO = V_SAMPLE_NO
  2183. AND T.PHY_CODE_MAX = V_PHY_CODE_MAX;
  2184. END;
  2185. ]]>
  2186. </query>
  2187. </queryMap>