SMLPP00500_결과조회.xfdl 49 KB

12345678910111213141516171819202122232425262728293031323334353637383940414243444546474849505152535455565758596061626364656667686970717273747576777879808182838485868788899091929394959697989910010110210310410510610710810911011111211311411511611711811912012112212312412512612712812913013113213313413513613713813914014114214314414514614714814915015115215315415515615715815916016116216316416516616716816917017117217317417517617717817918018118218318418518618718818919019119219319419519619719819920020120220320420520620720820921021121221321421521621721821922022122222322422522622722822923023123223323423523623723823924024124224324424524624724824925025125225325425525625725825926026126226326426526626726826927027127227327427527627727827928028128228328428528628728828929029129229329429529629729829930030130230330430530630730830931031131231331431531631731831932032132232332432532632732832933033133233333433533633733833934034134234334434534634734834935035135235335435535635735835936036136236336436536636736836937037137237337437537637737837938038138238338438538638738838939039139239339439539639739839940040140240340440540640740840941041141241341441541641741841942042142242342442542642742842943043143243343443543643743843944044144244344444544644744844945045145245345445545645745845946046146246346446546646746846947047147247347447547647747847948048148248348448548648748848949049149249349449549649749849950050150250350450550650750850951051151251351451551651751851952052152252352452552652752852953053153253353453553653753853954054154254354454554654754854955055155255355455555655755855956056156256356456556656756856957057157257357457557657757857958058158258358458558658758858959059159259359459559659759859960060160260360460560660760860961061161261361461561661761861962062162262362462562662762862963063163263363463563663763863964064164264364464564664764864965065165265365465565665765865966066166266366466566666766866967067167267367467567667767867968068168268368468568668768868969069169269369469569669769869970070170270370470570670770870971071171271371471571671771871972072172272372472572672772872973073173273373473573673773873974074174274374474574674774874975075175275375475575675775875976076176276376476576676776876977077177277377477577677777877978078178278378478578678778878979079179279379479579679779879980080180280380480580680780880981081181281381481581681781881982082182282382482582682782882983083183283383483583683783883984084184284384484584684784884985085185285385485585685785885986086186286386486586686786886987087187287387487587687787887988088188288388488588688788888989089189289389489589689789889990090190290390490590690790890991091191291391491591691791891992092192292392492592692792892993093193293393493593693793893994094194294394494594694794894995095195295395495595695795895996096196296396496596696796896997097197297397497597697797897998098198298398498598698798898999099199299399499599699799899910001001100210031004100510061007100810091010101110121013101410151016101710181019102010211022102310241025102610271028102910301031103210331034103510361037103810391040104110421043104410451046104710481049105010511052105310541055105610571058105910601061106210631064106510661067106810691070107110721073107410751076107710781079108010811082108310841085108610871088108910901091109210931094109510961097109810991100110111021103110411051106110711081109111011111112111311141115111611171118111911201121
  1. <?xml version="1.0" encoding="utf-8"?>
  2. <FDL version="1.5">
  3. <TypeDefinition url="..\..\..\default_typedef.xml"/>
  4. <Form id="SMLPP00500" position="absolute 0 0 1196 790" titletext="결과조회" oninit="SMLPP00500_oninit" onload="SMLPP00500_onload">
  5. <Layouts>
  6. <Layout>
  7. <Grid position="absolute 510 480 860 630" id="datagrid5" visible="false" binddataset="ds_datagrid5">
  8. <Formats>
  9. <Format id="default">
  10. <Columns>
  11. <Column size="100"/>
  12. <Column size="100"/>
  13. <Column size="100"/>
  14. </Columns>
  15. <Rows>
  16. <Row size="24" band="head"/>
  17. <Row size="24"/>
  18. </Rows>
  19. <Band id="head">
  20. <Cell text="caption1"/>
  21. <Cell col="1" text="caption3"/>
  22. <Cell col="2" text="caption2"/>
  23. </Band>
  24. <Band id="body">
  25. <Cell text="bind:row"/>
  26. <Cell col="1" text="bind:col"/>
  27. <Cell col="2" text="bind:value"/>
  28. </Band>
  29. </Format>
  30. </Formats>
  31. </Grid>
  32. <Static id="caption6" text="결과조회" class="tit_1" position="absolute 0 0 88 25"/>
  33. <Button id="button13" taborder="1" text="EXCEL저장" class="btn7" position="absolute 1 27 93 49" onclick="button13_onclick"/>
  34. <Button id="btn_sytsrsltref" taborder="2" text="통합결과조회" class="btn3" position="absolute 96 27 196 49" onclick="btn_sytsrsltref_onclick"/>
  35. <Button id="btn_prt" taborder="3" text="출력" class="btn6" position="absolute 203 27 259 49" onclick="btn_prt_onclick"/>
  36. <Div id="group2" taborder="4" position="absolute 0 53 448 115" class="div_SA">
  37. <Layouts>
  38. <Layout>
  39. <Static id="caption1" text="등록번호 :" class="search_name" position="absolute 15 10 105 27"/>
  40. <Shape id="line1" linetype="vertical" class="line_4" position="absolute 359 33 365 52"/>
  41. <Static id="caption11" text="~" class="search_n_b" position="absolute 211 35 223 52"/>
  42. <Edit id="ipt_refval" taborder="8" class="input_search" position="absolute 108 9 208 28" onkeyup="group2_ipt_refval_onkeyup"/>
  43. <Calendar id="ipt_acptfromdd" taborder="9" class="input_s_essential" position="absolute 108 33 208 52" mask="yyyy-mm-dd"/>
  44. <Calendar id="ipt_acpttodd" taborder="10" class="input_s_essential" position="absolute 225 33 325 52" mask="yyyy-mm-dd"/>
  45. <Button id="btn_sea" taborder="11" text="조회" class="btn1" position="absolute 377 33 433 55" onclick="group2_btn_sea_onclick"/>
  46. <Combo id="cbo_ptnocd" taborder="12" innerdataset="ds_init_cbo_ptnocd" codecolumn="ptnocd" datacolumn="ptnonm" position="absolute 225 9 349 28"/>
  47. <Edit id="ipt_fromptno" taborder="13" class="text_center" position="absolute 382 9 432 28"/>
  48. <Edit id="ipt_fromyear" taborder="14" class="text_center" position="absolute 352 9 379 28"/>
  49. <Combo id="cmb_srchmthd" taborder="15" codecolumn="codecolumn" datacolumn="datacolumn" class="combo_search" position="absolute 15 33 100 52">
  50. <Dataset id="innerdataset">
  51. <ColumnInfo>
  52. <Column id="codecolumn"/>
  53. <Column id="datacolumn"/>
  54. </ColumnInfo>
  55. <Rows>
  56. <Row>
  57. <Col id="codecolumn">1</Col>
  58. <Col id="datacolumn">접수일자</Col>
  59. </Row>
  60. <Row>
  61. <Col id="codecolumn">2</Col>
  62. <Col id="datacolumn">보고일자</Col>
  63. </Row>
  64. </Rows>
  65. </Dataset>
  66. </Combo>
  67. </Layout>
  68. </Layouts>
  69. </Div>
  70. <Static id="caption3" text="검사결과" class="tit_2" position="absolute 455 51 534 67"/>
  71. <Shape id="line2" linetype="horizontal" class="line_1" position="absolute 452 68 1193 74" style="strokepen:3 solid #33bbbbff;"/>
  72. <Grid id="grd_testrsltlist" class="datagrid2" taborder="5" binddataset="ds_grd_testrsltlist" useinputpanel="false" position="absolute 0 377 448 785" oncellclick="grd_testrsltlist_oncellclick" autofittype="none" cellsizingtype="col">
  73. <Formats>
  74. <Format id="default">
  75. <Columns>
  76. <Column size="0"/>
  77. <Column size="0"/>
  78. <Column size="26"/>
  79. <Column size="80"/>
  80. <Column size="70"/>
  81. <Column size="0"/>
  82. <Column size="0"/>
  83. <Column size="120"/>
  84. <Column size="0"/>
  85. <Column size="60"/>
  86. <Column size="0"/>
  87. <Column size="0"/>
  88. <Column size="0"/>
  89. <Column size="0"/>
  90. <Column size="0"/>
  91. <Column size="0"/>
  92. <Column size="0"/>
  93. <Column size="0"/>
  94. <Column size="0"/>
  95. <Column size="70"/>
  96. <Column size="0"/>
  97. <Column size="0"/>
  98. <Column size="200"/>
  99. </Columns>
  100. <Rows>
  101. <Row size="24" band="head"/>
  102. <Row size="24"/>
  103. </Rows>
  104. <Band id="head">
  105. <Cell text="기관코드"/>
  106. <Cell col="1" text="ptno"/>
  107. <Cell col="2"/>
  108. <Cell col="3" text="병리번호"/>
  109. <Cell col="4" text="처방일자"/>
  110. <Cell col="5" text="접수일자"/>
  111. <Cell col="6" text="검사코드"/>
  112. <Cell col="7" text="처방명"/>
  113. <Cell col="8" text="검사그룹코드"/>
  114. <Cell col="9" text="상태"/>
  115. <Cell col="10" text="pid"/>
  116. <Cell col="11" text="환자명"/>
  117. <Cell col="12" text="의뢰서&#10;번호"/>
  118. <Cell col="13" text="의뢰지구분코드"/>
  119. <Cell col="14" text="성별/나이"/>
  120. <Cell col="15" text="판독일자"/>
  121. <Cell col="16" text="진료과"/>
  122. <Cell col="17" text="진료의사"/>
  123. <Cell col="18" text="판독의사"/>
  124. <Cell col="19" text="육안검사의"/>
  125. <Cell col="20" text="처방발생구분"/>
  126. <Cell col="21" text="작업구분코드"/>
  127. <Cell col="22" text="진 단"/>
  128. </Band>
  129. <Band id="body">
  130. <Cell text="bind:instcd"/>
  131. <Cell col="1" text="bind:ptno"/>
  132. <Cell col="2" celltype="head" text="expr:currow + 1"/>
  133. <Cell col="3" edittype="text" text="bind:dispptno"/>
  134. <Cell col="4" displaytype="date" edittype="date" text="bind:prcpdd" mask="yyyy-MM-dd"/>
  135. <Cell col="5" text="bind:acptdd" mask="yyyy-mm-dd"/>
  136. <Cell col="6" text="bind:testcd"/>
  137. <Cell col="7" displaytype="normal" edittype="none" style="align:left middle;" text="bind:testnm"/>
  138. <Cell col="8" displaytype="none" edittype="none" text="bind:tgrupcd"/>
  139. <Cell col="9" displaytype="normal" edittype="none" text="bind:acptstatcd"/>
  140. <Cell col="10" text="bind:pid"/>
  141. <Cell col="11" text="bind:patnm"/>
  142. <Cell col="12" displaytype="none" edittype="none" text="bind:reqfrmno"/>
  143. <Cell col="13" text="bind:reqfrmflagcd"/>
  144. <Cell col="14" text="bind:sexage"/>
  145. <Cell col="15" text="bind:readdd" mask="yyyy-mm-dd"/>
  146. <Cell col="16" text="bind:orddeptnm"/>
  147. <Cell col="17" text="bind:orddrnm"/>
  148. <Cell col="18" text="bind:readdrnm"/>
  149. <Cell col="19" text="bind:grosdrnm"/>
  150. <Cell col="20" text="bind:prcpgenrflag"/>
  151. <Cell col="21" text="bind:ptnoworkflagcd"/>
  152. <Cell col="22" style="align:left middle;" text="bind:diagcnts"/>
  153. </Band>
  154. </Format>
  155. </Formats>
  156. </Grid>
  157. <Static id="caption2" text="검사결과 목록" class="tit_2" position="absolute 1 356 109 373"/>
  158. <Shape id="line3" linetype="horizontal" class="line_1" position="absolute 0 373 448 379" style="strokepen:3 solid #33bbbbff;"/>
  159. <Grid id="grd_testrsltref" taborder="6" binddataset="ds_grd_testrsltref" useinputpanel="false" position="absolute 452 72 1193 785" autofittype="col" autosizingtype="row" cellsizingtype="row" onrbuttondown="grd_testrsltref_onrbuttondown" autoenter="select" extendsizetype="row" selecttype="multirow">
  160. <Formats>
  161. <Format id="default">
  162. <Columns>
  163. <Column size="719"/>
  164. <Column size="0"/>
  165. <Column size="0"/>
  166. <Column size="0"/>
  167. <Column size="0"/>
  168. <Column size="0"/>
  169. <Column size="0"/>
  170. <Column size="0"/>
  171. </Columns>
  172. <Rows>
  173. <Row size="24" band="head"/>
  174. <Row size="27"/>
  175. </Rows>
  176. <Band id="head">
  177. <Cell text="검 사 결 과 내 용"/>
  178. <Cell col="1" text="caption2"/>
  179. <Cell col="2" text="caption3"/>
  180. <Cell col="3" text="caption4"/>
  181. <Cell col="4" text="caption5"/>
  182. <Cell col="5" text="caption6"/>
  183. <Cell col="6" text="caption7"/>
  184. <Cell col="7" text="caption8"/>
  185. </Band>
  186. <Band id="body">
  187. <Cell style="align:left middle;font:dotumche,9;" text="bind:reptrslt" wordwrap="both" autosizerow="limitmin"/>
  188. <Cell col="1" text="bind:level"/>
  189. <Cell col="2" text="bind:judgmark"/>
  190. <Cell col="3" text="bind:tkdt"/>
  191. <Cell col="4" text="bind:rsltdd"/>
  192. <Cell col="5" text="bind:suppdept"/>
  193. <Cell col="6" text="bind:pacsno"/>
  194. <Cell col="7" text="bind:spcno"/>
  195. </Band>
  196. </Format>
  197. </Formats>
  198. </Grid>
  199. <Tab id="switch1" taborder="7" tabindex="0" position="absolute 0 240 450 356">
  200. <Tabpages>
  201. <Tabpage id="case1" text="T/P/M">
  202. <Layouts>
  203. <Layout>
  204. <Shape id="roundrect2" type="roundrectangle" class="roundrect_search" position="absolute 0 0 448 82"/>
  205. <Static id="caption12" text="채취방법(P) :" class="search_name" position="absolute 15 33 107 50"/>
  206. <Static id="caption4" text="채취부위(T) :" class="search_name" position="absolute 15 10 106 27"/>
  207. <Edit id="input2" taborder="12" class="input_search" position="absolute 130 9 322 28"/>
  208. <Edit id="input3" taborder="13" class="input_search" position="absolute 130 55 322 74"/>
  209. <Static id="caption9" text="진 단(M) :" class="search_name" position="absolute 15 56 109 73"/>
  210. <Edit id="input4" taborder="14" class="input_search" position="absolute 130 32 322 51"/>
  211. <Shape id="line7" linetype="vertical" class="line_4" position="absolute 334 8 340 75"/>
  212. <Button id="btn_detlsea" taborder="15" text="상세조회" class="btn1" position="absolute 353 30 433 52" onclick="switch1_case1_btn_detlsea_onclick"/>
  213. </Layout>
  214. </Layouts>
  215. </Tabpage>
  216. <Tabpage id="case2" text="결과조회">
  217. <Layouts>
  218. <Layout>
  219. <Shape id="roundrect3" type="roundrectangle" class="roundrect_search" position="absolute 0 0 448 82"/>
  220. <Button id="button3" taborder="14" text="상세조회" class="btn1" position="absolute 353 30 433 52" onclick="switch1_case2_button3_onclick"/>
  221. <Static id="caption5" text="Microscopic :" class="search_name" position="absolute 15 56 116 73"/>
  222. <Static id="caption8" text="Gross :" class="search_name" position="absolute 15 10 82 27"/>
  223. <Edit id="input1" taborder="15" class="input_search" position="absolute 130 9 322 28"/>
  224. <Edit id="input5" taborder="16" class="input_search" position="absolute 130 32 322 51"/>
  225. <Edit id="input6" taborder="17" class="input_search" position="absolute 130 55 322 74"/>
  226. <Static id="caption15" text="Diagnosis :" class="search_name" position="absolute 15 33 102 50"/>
  227. <Shape id="line4" linetype="vertical" class="line_4" position="absolute 334 8 340 75"/>
  228. </Layout>
  229. </Layouts>
  230. </Tabpage>
  231. </Tabpages>
  232. </Tab>
  233. <Div id="grp_patinfo" taborder="8" position="absolute 0 119 448 244">
  234. <Layouts>
  235. <Layout>
  236. <Static id="caption7" text="인적사항" class="tit_2" position="absolute 3 0 81 17" anchor="default"/>
  237. <Shape id="line9" linetype="horizontal" class="line_1" position="absolute 0 16 448 22" anchor="default" style="strokepen:3 solid #33bbbbff;"/>
  238. <Edit id="opt_pid" taborder="1" readonly="true" visible="false" position="absolute 185 45 267 64" anchor="default"/>
  239. <Edit id="output1" taborder="2" readonly="true" position="absolute 63 45 145 64" anchor="default"/>
  240. <Edit id="output2" taborder="3" readonly="true" position="absolute 63 69 145 88" anchor="default"/>
  241. <MaskEdit id="output3" taborder="4" readonly="true" mask="####-##-##" position="absolute 63 93 145 112" anchor="default" type="string"/>
  242. <MaskEdit id="output4" taborder="5" readonly="true" mask="####-##-##" position="absolute 368 93 446 112" anchor="default" type="string"/>
  243. <Edit id="output5" taborder="6" readonly="true" position="absolute 220 21 302 40" anchor="default"/>
  244. <Edit id="output6" taborder="7" readonly="true" position="absolute 368 21 446 40" anchor="default"/>
  245. <Edit id="output7" taborder="8" readonly="true" position="absolute 220 69 302 88" anchor="default"/>
  246. <MaskEdit id="output8" taborder="9" readonly="true" mask="####-##-##" position="absolute 220 93 302 112" anchor="default" type="string"/>
  247. <Edit id="output9" taborder="10" readonly="true" position="absolute 368 69 446 88" anchor="default"/>
  248. <Static id="caption20" text="성별나이" class="cell_1" position="absolute 305 20 365 43" anchor="default"/>
  249. <Static id="caption21" text="진료의사" class="cell_1" position="absolute 148 68 217 91" anchor="default"/>
  250. <Static id="caption22" text="접 수 일" class="cell_1" position="absolute 148 92 217 115" anchor="default"/>
  251. <Static id="caption23" text="판독의사" class="cell_1" position="absolute 305 68 365 91" anchor="default"/>
  252. <Static id="caption13" text="등록번호" class="cell_1" position="absolute 0 20 60 43" anchor="default"/>
  253. <Static id="caption14" text="병리번호" class="cell_1" position="absolute 0 44 60 67" anchor="default"/>
  254. <Static id="caption16" text="진 료 과" class="cell_1" position="absolute 0 68 60 91" anchor="default"/>
  255. <Static id="caption17" text="처 방 일" class="cell_1" position="absolute 0 92 60 115" anchor="default"/>
  256. <Static id="caption18" text="보 고 일" class="cell_1" position="absolute 305 92 365 115" anchor="default"/>
  257. <Static id="caption19" text="환 자 명" class="cell_1" position="absolute 148 20 217 43" anchor="default"/>
  258. <Edit id="input7" taborder="11" position="absolute 63 21 145 40" anchor="default"/>
  259. </Layout>
  260. </Layouts>
  261. </Div>
  262. <Button id="btn_rsltexcel" taborder="9" text="EXCEL저장" class="btn7" position="absolute 1101 47 1192 66" onclick="btn_rsltexcel_onclick"/>
  263. <Button id="btn_imgview" taborder="10" text="이미지보기" class="btn2" position="absolute 1019 47 1094 66" onclick="btn_imgview_onclick"/>
  264. <Button id="button1" taborder="11" text="임상정보조회" class="btn2" position="absolute 925 47 1011 66" onclick="button1_onclick"/>
  265. </Layout>
  266. </Layouts>
  267. <Objects>
  268. <Dataset id="ds_datagrid5" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
  269. <ColumnInfo>
  270. <Column id="row" type="STRING"/>
  271. <Column id="col" type="STRING"/>
  272. <Column id="value" type="STRING"/>
  273. </ColumnInfo>
  274. </Dataset>
  275. <Dataset id="ds_init_cbo_ptnocd" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
  276. <ColumnInfo>
  277. <Column id="ptnonm" type="STRING"/>
  278. <Column id="ptnocd" type="STRING"/>
  279. </ColumnInfo>
  280. </Dataset>
  281. <Dataset id="ds_grd_testrsltlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
  282. <ColumnInfo>
  283. <Column id="instcd" type="STRING"/>
  284. <Column id="ptno" type="STRING"/>
  285. <Column id="dispptno" type="STRING"/>
  286. <Column id="prcpdd" type="STRING"/>
  287. <Column id="acptdd" type="STRING"/>
  288. <Column id="testcd" type="STRING"/>
  289. <Column id="testnm" type="STRING"/>
  290. <Column id="tgrupcd" type="STRING"/>
  291. <Column id="acptstatcd" type="STRING"/>
  292. <Column id="pid" type="STRING"/>
  293. <Column id="patnm" type="STRING"/>
  294. <Column id="reqfrmno" type="STRING"/>
  295. <Column id="reqfrmflagcd" type="STRING"/>
  296. <Column id="sexage" type="STRING"/>
  297. <Column id="readdd" type="STRING"/>
  298. <Column id="orddeptnm" type="STRING"/>
  299. <Column id="orddrnm" type="STRING"/>
  300. <Column id="readdrnm" type="STRING"/>
  301. <Column id="grosdrnm" type="STRING"/>
  302. <Column id="prcpgenrflag" type="STRING"/>
  303. <Column id="ptnoworkflagcd" type="STRING"/>
  304. <Column id="diagcnts" type="STRING"/>
  305. </ColumnInfo>
  306. </Dataset>
  307. <Dataset id="ds_grd_testrsltref" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
  308. <ColumnInfo>
  309. <Column id="reptrslt" type="STRING"/>
  310. <Column id="level" type="STRING"/>
  311. <Column id="judgmark" type="STRING"/>
  312. <Column id="tkdt" type="STRING"/>
  313. <Column id="rsltdd" type="STRING"/>
  314. <Column id="suppdept" type="STRING"/>
  315. <Column id="pacsno" type="STRING"/>
  316. <Column id="spcno" type="STRING"/>
  317. </ColumnInfo>
  318. </Dataset>
  319. <Dataset id="ds_hosoenvinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  320. <ColumnInfo>
  321. <Column id="instcd" type="STRING" size="256"/>
  322. <Column id="lendrtnterm" type="STRING" size="256"/>
  323. <Column id="recvqualmthdcd" type="STRING" size="256"/>
  324. <Column id="plgydeptcd" type="STRING" size="256"/>
  325. <Column id="plgyteamcd" type="STRING" size="256"/>
  326. <Column id="doctjobgradcd" type="STRING" size="256"/>
  327. <Column id="teamjobgradcd" type="STRING" size="256"/>
  328. </ColumnInfo>
  329. <Rows>
  330. <Row/>
  331. </Rows>
  332. </Dataset>
  333. <Dataset id="ds_data_sysdtinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  334. <ColumnInfo>
  335. <Column id="sysdd" type="STRING" size="256"/>
  336. <Column id="systm" type="STRING" size="256"/>
  337. </ColumnInfo>
  338. </Dataset>
  339. <Dataset id="ds_init" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  340. <ColumnInfo>
  341. <Column id="refcrite" type="STRING" size="256"/>
  342. <Column id="refval" type="STRING" size="256"/>
  343. <Column id="acptfromdd" type="STRING" size="256"/>
  344. <Column id="acpttodd" type="STRING" size="256"/>
  345. <Column id="refdr" type="STRING" size="256"/>
  346. <Column id="ptnocode" type="STRING" size="256"/>
  347. <Column id="fromyear" type="STRING" size="256"/>
  348. <Column id="fromptno" type="STRING" size="256"/>
  349. <Column id="toptno" type="STRING" size="256"/>
  350. <Column id="sysdt" type="STRING" size="256"/>
  351. <Column id="hospenv" type="STRING" size="256"/>
  352. <Column id="ptnocd" type="STRING" size="256"/>
  353. <Column id="srchmthd" type="STRING" size="256"/>
  354. </ColumnInfo>
  355. <Rows>
  356. <Row>
  357. <Col id="srchmthd">1</Col>
  358. </Row>
  359. </Rows>
  360. </Dataset>
  361. <Dataset id="ds_hidden" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  362. <ColumnInfo>
  363. <Column id="detlrefcrite" type="STRING" size="256"/>
  364. <Column id="userdeptcd" type="STRING" size="256"/>
  365. </ColumnInfo>
  366. <Rows>
  367. <Row/>
  368. </Rows>
  369. </Dataset>
  370. <Dataset id="ds_send" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  371. <ColumnInfo>
  372. <Column id="instcd" type="STRING" size="256" sumtext="기관코드"/>
  373. <Column id="refcrite" type="STRING" size="256" sumtext="검색조건"/>
  374. <Column id="refval" type="STRING" size="256" sumtext="검색값"/>
  375. <Column id="acptfromdd" type="STRING" size="256" sumtext="접수시작일자"/>
  376. <Column id="acpttodd" type="STRING" size="256" sumtext="접수종료일자"/>
  377. <Column id="userdeptcd" type="STRING" size="256" sumtext="병리과코드"/>
  378. <Column id="extrpart" type="STRING" size="256" sumtext="채취내용"/>
  379. <Column id="diag" type="STRING" size="256" sumtext="진단내용"/>
  380. <Column id="extrmthd" type="STRING" size="256" sumtext="채취방법"/>
  381. <Column id="refflagcd" type="STRING" size="256" sumtext="조회구분코드"/>
  382. <Column id="ptnocode" type="STRING" size="256" sumtext="병리번호코드"/>
  383. <Column id="fromyear" type="STRING" size="256" sumtext="시작년도"/>
  384. <Column id="fromptno" type="STRING" size="256" sumtext="시작병리번호"/>
  385. <Column id="toptno" type="STRING" size="256" sumtext="종료병리번호"/>
  386. <Column id="srchmthd" type="STRING" size="256" sumtext="조회날자구분"/>
  387. <Column id="workflaglist" type="STRING" size="256" sumtext="작업구분"/>
  388. <Column id="scrnid" type="STRING" size="256" sumtext="화면ID"/>
  389. <Column id="toyear" type="STRING" size="256" sumtext="종료년도"/>
  390. <Column id="orddeptid" type="STRING" size="256" sumtext="진료과"/>
  391. <Column id="sreadId" type="STRING" size="256" sumtext="판독의"/>
  392. <Column id="diagchk" type="STRING" size="256" sumtext="진단내용검색방법"/>
  393. <Column id="sGrossId" type="STRING" size="256" sumtext="sGrossId"/>
  394. <Column id="ptno" type="STRING" size="256"/>
  395. <Column id="pid" type="STRING" size="256"/>
  396. <Column id="workflagcd" type="STRING" size="256"/>
  397. <Column id="prcpgenrflag" type="STRING" size="256"/>
  398. <Column id="scrno" type="STRING" size="256"/>
  399. </ColumnInfo>
  400. <Rows>
  401. <Row/>
  402. </Rows>
  403. </Dataset>
  404. <Dataset id="ds_hidden_detlrefcrite" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  405. <ColumnInfo>
  406. <Column id="extrpart" type="STRING" size="256"/>
  407. <Column id="diag" type="STRING" size="256"/>
  408. <Column id="extrmthd" type="STRING" size="256"/>
  409. </ColumnInfo>
  410. <Rows>
  411. <Row/>
  412. </Rows>
  413. </Dataset>
  414. <Dataset id="ds_patinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  415. <ColumnInfo>
  416. <Column id="pid" type="STRING" size="256"/>
  417. <Column id="patnm" type="STRING" size="256"/>
  418. <Column id="dispptno" type="STRING" size="256"/>
  419. <Column id="sexage" type="STRING" size="256"/>
  420. <Column id="orddeptnm" type="STRING" size="256"/>
  421. <Column id="orddrnm" type="STRING" size="256"/>
  422. <Column id="prcpdd" type="STRING" size="256"/>
  423. <Column id="acptdd" type="STRING" size="256"/>
  424. <Column id="readdd" type="STRING" size="256"/>
  425. <Column id="readdrnm" type="STRING" size="256"/>
  426. </ColumnInfo>
  427. <Rows>
  428. <Row/>
  429. </Rows>
  430. </Dataset>
  431. <Dataset id="ds_prntinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  432. <ColumnInfo>
  433. <Column id="ptno" type="STRING" size="256"/>
  434. <Column id="pid" type="STRING" size="256"/>
  435. <Column id="acptdd" type="STRING" size="256"/>
  436. <Column id="prcpgenrflag" type="STRING" size="256"/>
  437. <Column id="reptflagcd" type="STRING" size="256"/>
  438. <Column id="adddiagprtn" type="STRING" size="256"/>
  439. <Column id="adddiaglist" type="STRING" size="256"/>
  440. <Column id="addrsltlist" type="STRING" size="256"/>
  441. <Column id="prntflagcd" type="STRING" size="256"/>
  442. <Column id="copyflagcd" type="STRING" size="256"/>
  443. </ColumnInfo>
  444. <Rows>
  445. <Row/>
  446. </Rows>
  447. </Dataset>
  448. <Dataset id="ds_popupmenu" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  449. <ColumnInfo>
  450. <Column id="name" type="STRING" size="256"/>
  451. <Column id="func" type="STRING" size="256"/>
  452. </ColumnInfo>
  453. <Rows>
  454. <Row>
  455. <Col id="name">▶ 병리 이미지 보기</Col>
  456. <Col id="func">fExeImgView2</Col>
  457. </Row>
  458. <Row>
  459. <Col id="name">▶ 복사하기</Col>
  460. <Col id="func">astgrid_liscopy</Col>
  461. </Row>
  462. </Rows>
  463. </Dataset>
  464. <Dataset id="ds_popupmenu2" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  465. <ColumnInfo>
  466. <Column id="name" type="STRING" size="256"/>
  467. <Column id="func" type="STRING" size="256"/>
  468. </ColumnInfo>
  469. <Rows>
  470. <Row>
  471. <Col id="name">▶ 복사하기</Col>
  472. <Col id="func">astgrid_liscopy</Col>
  473. </Row>
  474. </Rows>
  475. </Dataset>
  476. </Objects>
  477. <Bind>
  478. <BindItem id="item0" compid="group2.cmb_srchmthd" propid="value" datasetid="ds_init" columnid="srchmthd"/>
  479. <BindItem id="item1" compid="group2.ipt_refval" propid="value" datasetid="ds_init" columnid="refval"/>
  480. <BindItem id="item2" compid="group2.cbo_ptnocd" propid="value" datasetid="ds_init" columnid="ptnocode"/>
  481. <BindItem id="item3" compid="group2.ipt_acpttodd" propid="value" datasetid="ds_init" columnid="acpttodd"/>
  482. <BindItem id="item4" compid="group2.ipt_acptfromdd" propid="value" datasetid="ds_init" columnid="acptfromdd"/>
  483. <BindItem id="item5" compid="group2.ipt_fromyear" propid="value" datasetid="ds_init" columnid="fromyear"/>
  484. <BindItem id="item6" compid="group2.ipt_fromptno" propid="value" datasetid="ds_init" columnid="fromptno"/>
  485. <BindItem id="item7" compid="grp_patinfo.input7" propid="value" datasetid="ds_patinfo" columnid="pid"/>
  486. <BindItem id="item8" compid="grp_patinfo.output5" propid="value" datasetid="ds_patinfo" columnid="patnm"/>
  487. <BindItem id="item9" compid="grp_patinfo.output6" propid="value" datasetid="ds_patinfo" columnid="sexage"/>
  488. <BindItem id="item10" compid="grp_patinfo.opt_pid" propid="value" datasetid="ds_patinfo" columnid="pid"/>
  489. <BindItem id="item11" compid="grp_patinfo.output1" propid="value" datasetid="ds_patinfo" columnid="dispptno"/>
  490. <BindItem id="item12" compid="grp_patinfo.output2" propid="value" datasetid="ds_patinfo" columnid="orddeptnm"/>
  491. <BindItem id="item13" compid="grp_patinfo.output3" propid="value" datasetid="ds_patinfo" columnid="prcpdd"/>
  492. <BindItem id="item14" compid="grp_patinfo.output8" propid="value" datasetid="ds_patinfo" columnid="acptdd"/>
  493. <BindItem id="item15" compid="grp_patinfo.output7" propid="value" datasetid="ds_patinfo" columnid="orddrnm"/>
  494. <BindItem id="item16" compid="grp_patinfo.output9" propid="value" datasetid="ds_patinfo" columnid="readdrnm"/>
  495. <BindItem id="item17" compid="grp_patinfo.output4" propid="value" datasetid="ds_patinfo" columnid="readdd"/>
  496. </Bind>
  497. <Script type="xscript4.0"><![CDATA[/***************************************************************************************
  498. * System Name :
  499. * Job Name :
  500. * Creator :
  501. * Make Date : 2015-11-13
  502. * Description :
  503. *---------------------------------------------------------------------------------------
  504. * Modify Date Modifier Modify Description
  505. *---------------------------------------------------------------------------------------
  506. * 2015-11-13 Live Converter TF->XP
  507. *
  508. *---------------------------------------------------------------------------------------
  509. ****************************************************************************************/
  510. include "com_commonxp::comm_main.xjs";
  511. include "lis_commonxp::LZZ001.xjs";
  512. include "lis_commonxp::LPZ001.xjs";
  513. function SMLPP00500_oninit(obj:Form, e:InitEventInfo)
  514. {
  515. frmf_initForm(obj);
  516. }
  517. function SMLPP00500_onload(obj:Form, e:LoadEventInfo)
  518. {
  519. grdf_initGrid(grd_testrsltlist);
  520. grdf_initGrid(grd_testrsltref);
  521. frmf_createPopupMenu("pmn_popupMenu", "pmn_popupMenu_onmenuclick");
  522. fExeInitialize();
  523. }
  524. function fExeInitialize()
  525. {
  526. //----------------
  527. // 시스템일시 조회
  528. ds_send.setColumn(0, "instcd", sysf_getUserInfo("dutplceinstcd"));
  529. var oParam = {};
  530. oParam.id = "TRLPZ00101";
  531. oParam.service = "plgycomnusemngtapp.BaseInfoCode";
  532. oParam.method = "reqGetHospitalEnvironmentSetInfo";
  533. oParam.inds = "refData=ds_send";
  534. oParam.outds = "ds_hosoenvinfo=hospenvinfo";
  535. oParam.async = false;
  536. //oParam.callback = "cf_TRLPZ00101";
  537. tranf_submit(oParam);
  538. var oParam = {};
  539. oParam.id = "TRLPZ00102";
  540. oParam.service = "plgycomnusemngtapp.BaseInfoCode";
  541. oParam.method = "reqGetSystemDateTimeInformation";
  542. oParam.inds = "refData=ds_send";
  543. oParam.outds = "ds_data_sysdtinfo=sysdtinfo";
  544. oParam.async = false;
  545. //oParam.callback = "cf_TRLPZ00102";
  546. tranf_submit(oParam);
  547. ds_send.setColumn(0, "refflagcd", "0");
  548. var oParam = {};
  549. oParam.id = "TRLPZ00109";
  550. oParam.service = "plgycomnusemngtapp.BaseInfoCode";
  551. oParam.method = "reqGetPtNoCdList";
  552. oParam.inds = "refdata=ds_send";
  553. oParam.outds = "ds_init_cbo_ptnocd=rsltlist";
  554. oParam.async = false;
  555. //oParam.callback = "cf_TRLPZ00109";
  556. tranf_submit(oParam);
  557. //---------------------------------------------------------
  558. // 병원환경정보를 취득하여 병리과와 병리팀 코드를 편집한다.
  559. lpzfUserDeptCd(ds_hosoenvinfo, ds_hidden);
  560. //--------------------------------------------
  561. ds_init.setColumn(0, "refcrite", "-");
  562. ds_init.setColumn(0, "acptfromdd", ds_data_sysdtinfo.getColumn(0, "sysdd"));
  563. ds_init.setColumn(0, "acpttodd", ds_data_sysdtinfo.getColumn(0, "sysdd"));
  564. ds_init.setColumn(0, "refdr", "-");
  565. ds_init.setColumn(0, "refcrite", "2");
  566. ds_init.setColumn(0, "refval", "");
  567. //-----------------------------------------------------------------
  568. var sCurDate = ds_data_sysdtinfo.getColumn(0, "sysdd");
  569. ds_init.setColumn(0, "ptnocode", "");
  570. ds_init.setColumn(0, "fromyear", sCurDate.substr(2,2));
  571. ds_init.setColumn(0, "fromptno", "");
  572. ds_init.setColumn(0, "toptno", "");
  573. //---------------------------
  574. if( utlf_isNull(this.parent))
  575. {
  576. // Continue
  577. }
  578. else
  579. {
  580. if( !utlf_isNull(opener.frmf_getParameter("SMLPP00500_scrno")))
  581. {
  582. ds_init.setColumn(0, "ptnocode", opener.frmf_getParameter("SMLPP00500_ptnocd"));
  583. ds_init.setColumn(0, "fromyear", opener.frmf_getParameter("SMLPP00500_year"));
  584. ds_init.setColumn(0, "fromptno", opener.frmf_getParameter("SMLPP00500_no"));
  585. ds_init.setColumn(0, "acptfromdd", opener.frmf_getParameter("SMLPP00500_acptdd"));
  586. ds_init.setColumn(0, "acpttodd", opener.frmf_getParameter("SMLPP00500_acptdd"));
  587. ds_init.setColumn(0, "refcrite", "0");
  588. ds_init.setColumn(0, "refval", opener.frmf_getParameter("SMLPP00500_pid"));
  589. // //--------------------
  590. fGetTestRsltList("1");
  591. }
  592. if( !utlf_isNull(opener.frmf_getParameter("SMLPP00500_pid")))
  593. {
  594. ds_init.setColumn(0, "refval", opener.frmf_getParameter("SMLPP00500_pid"));
  595. if( !utlf_isNull(opener.frmf_getParameter("SMLPP00500_ptnocd")))
  596. {
  597. ds_init.setColumn(0, "ptnocode", opener.frmf_getParameter("SMLPP00500_ptnocd"));
  598. ds_init.setColumn(0, "fromyear", opener.frmf_getParameter("SMLPP00500_year"));
  599. ds_init.setColumn(0, "fromptno", opener.frmf_getParameter("SMLPP00500_no"));
  600. }
  601. //--------------------
  602. fGetTestRsltList("1");
  603. }
  604. }
  605. group2.ipt_refval.setFocus();
  606. }
  607. //검사결과 목록 조회 함수
  608. function fGetTestRsltList(pFlagCd)
  609. {
  610. var sTemp = "";
  611. var sFromDD = ds_init.getColumn(0, "acptfromdd");
  612. var sRefVal = ds_init.getColumn(0, "refval");
  613. //--------------------------------------------------------
  614. // 등록번호 조회 시 최소 4자리 이상 입력하도록 메세지 표시
  615. if(ds_init.getColumn(0, "refcrite") == "2")
  616. {
  617. if(!utlf_isNull(sRefVal))
  618. {
  619. if (sRefVal.length < 3)
  620. {
  621. sysf_messageBox("등록번호를 4자리 이상 ", "C001");
  622. return false;
  623. }
  624. }
  625. }
  626. //------------------------------------------------
  627. if( !utlf_isNull(ds_init.getColumn(0, "ptnocode")))
  628. {
  629. //------------------------------------------------
  630. if( utlf_isNull(ds_init.getColumn(0, "fromyear")))
  631. {
  632. ds_init.setColumn(0, "fromyear", sFromDD.substr(2,2));
  633. }
  634. else
  635. {
  636. sTemp = ds_init.getColumn(0, "fromyear");
  637. ds_init.setColumn(0, "fromyear", sTemp.getLeftPad(2, "0"));
  638. }
  639. //------------------------------------------------
  640. if( utlf_isNull(ds_init.getColumn(0, "fromptno")))
  641. {
  642. ds_init.setColumn(0, "toptno", "zzzzzz");
  643. }
  644. else
  645. {
  646. sTemp = ds_init.getColumn(0, "fromptno");
  647. ds_init.setColumn(0, "fromptno", sTemp.getLeftPad(6, "0"));
  648. ds_init.setColumn(0, "toptno", sTemp.getLeftPad(6, "0"));
  649. }
  650. }
  651. //--------------------------------------------
  652. sTemp = ds_init.getColumn(0, "ptnocode");
  653. ds_send.setColumn(0, "instcd", sysf_getUserInfo("dutplceinstcd"));
  654. ds_send.setColumn(0, "refcrite", ds_init.getColumn(0, "refcrite"));
  655. ds_send.setColumn(0, "refval", ds_init.getColumn(0, "refval"));
  656. ds_send.setColumn(0, "acptfromdd", ds_init.getColumn(0, "acptfromdd"));
  657. ds_send.setColumn(0, "acpttodd", ds_init.getColumn(0, "acpttodd"));
  658. ds_send.setColumn(0, "userdeptcd", ds_hidden.getColumn(0, "userdeptcd"));
  659. ds_send.setColumn(0, "refflagcd", pFlagCd);
  660. ds_send.setColumn(0, "ptnocode", sTemp.replace("-", ""));
  661. ds_send.setColumn(0, "fromyear", ds_init.getColumn(0, "fromyear"));
  662. ds_send.setColumn(0, "fromptno", ds_init.getColumn(0, "fromptno"));
  663. ds_send.setColumn(0, "toptno", ds_init.getColumn(0, "toptno"));
  664. ds_send.setColumn(0, "srchmthd", ds_init.getColumn(0, "srchmthd"));
  665. //-----------------------------------------------
  666. // 일반조회(1), 상세(TPM)조회(2), 결과상세조회(3)
  667. if (pFlagCd == "1")
  668. {
  669. ds_send.setColumn(0, "extrpart", "");
  670. ds_send.setColumn(0, "diag", "");
  671. ds_send.setColumn(0, "extrmthd", "");
  672. }
  673. else
  674. {
  675. ds_send.setColumn(0, "extrpart", ds_hidden_detlrefcrite.getColumn(0, "extrpart"));
  676. ds_send.setColumn(0, "diag", ds_hidden_detlrefcrite.getColumn(0, "diag"));
  677. ds_send.setColumn(0, "extrmthd", ds_hidden_detlrefcrite.getColumn(0, "extrmthd"));
  678. }
  679. //-------------------
  680. var oParam = {};
  681. oParam.id = "TRLPP00501";
  682. oParam.service = "plgyrefmngtapp.TestRsltRef";
  683. oParam.method = "reqGetTestRsltList";
  684. oParam.inds = "refData=ds_send";
  685. oParam.outds = "ds_grd_testrsltlist=refrslt";
  686. oParam.async = false;
  687. //oParam.callback = "cf_TRLPP00501";
  688. tranf_submit(oParam);
  689. //-------------------------------------------------------------
  690. if(ds_grd_testrsltlist.rowcount == 1)
  691. {
  692. fGetTestRslt();
  693. }
  694. }
  695. //검사결과 조회 함수
  696. function fGetTestRslt()
  697. {
  698. var iRowNo = -1;
  699. var sScrNode = ds_grd_testrsltlist;
  700. var sDescNode = ds_patinfo;
  701. //------------------------------------------
  702. if(ds_grd_testrsltlist.rowposition < 0)
  703. {
  704. return false;
  705. }
  706. //----------------------------
  707. iRowNo = ds_grd_testrsltlist.rowposition;
  708. ds_patinfo.setColumn(0, "pid", ds_grd_testrsltlist.getColumn(iRowNo, "pid"));
  709. ds_patinfo.setColumn(0, "patnm", ds_grd_testrsltlist.getColumn(iRowNo, "patnm"));
  710. ds_patinfo.setColumn(0, "dispptno", ds_grd_testrsltlist.getColumn(iRowNo, "dispptno"));
  711. ds_patinfo.setColumn(0, "sexage", ds_grd_testrsltlist.getColumn(iRowNo, "sexage"));
  712. ds_patinfo.setColumn(0, "orddeptnm", ds_grd_testrsltlist.getColumn(iRowNo, "orddeptnm"));
  713. ds_patinfo.setColumn(0, "orddrnm", ds_grd_testrsltlist.getColumn(iRowNo, "orddrnm"));
  714. ds_patinfo.setColumn(0, "prcpdd", ds_grd_testrsltlist.getColumn(iRowNo, "prcpdd"));
  715. ds_patinfo.setColumn(0, "acptdd", ds_grd_testrsltlist.getColumn(iRowNo, "acptdd"));
  716. ds_patinfo.setColumn(0, "readdd", ds_grd_testrsltlist.getColumn(iRowNo, "readdd"));
  717. ds_patinfo.setColumn(0, "readdrnm", ds_grd_testrsltlist.getColumn(iRowNo, "readdrnm"));
  718. //----------------------------------
  719. lpzfTopInfo(); // 상단정보 호출
  720. //---------------------------------------------------------------------------------------------
  721. if(appf_getPatientInfoDetail("pid") != ds_grd_testrsltlist.getColumn(iRowNo, "pid"))
  722. {
  723. //--------------
  724. // 상단정보 표시
  725. lpzfExeTopInfoDisp(ds_grd_testrsltlist.getColumn(iRowNo, "prcpdd"),
  726. ds_grd_testrsltlist.getColumn(iRowNo, "execprcpuniqno"),
  727. ds_grd_testrsltlist.getColumn(iRowNo, "instcd"));
  728. }
  729. //---------------
  730. // 검사결과 조회
  731. ds_send.setColumn(0, "instcd", sysf_getUserInfo("dutplceinstcd"));
  732. ds_send.setColumn(0, "ptno", ds_grd_testrsltlist.getColumn(iRowNo, "ptno"));
  733. ds_send.setColumn(0, "pid", ds_grd_testrsltlist.getColumn(iRowNo, "pid"));
  734. ds_send.setColumn(0, "workflagcd", ds_grd_testrsltlist.getColumn(iRowNo, "ptnoworkflagcd"));
  735. ds_send.setColumn(0, "prcpgenrflag", ds_grd_testrsltlist.getColumn(iRowNo, "prcpgenrflag"));
  736. ds_send.setColumn(0, "scrno", "10");
  737. var oParam = {};
  738. oParam.id = "TRLPZ00107";
  739. oParam.service = "plgyrefmngtapp.TestRsltRef";
  740. oParam.method = "reqGetTestRsltInfo";
  741. oParam.inds = "refData=ds_send";
  742. oParam.outds = "ds_grd_testrsltref=refrslt";
  743. oParam.async = false;
  744. //oParam.callback = "cf_TRLPZ00107";
  745. tranf_submit(oParam);
  746. }
  747. //통합결과조회 화면호출
  748. function fExePopupCallSytsRslt()
  749. {
  750. if( utlf_isNull(ds_patinfo.getColumn))
  751. {
  752. frmf_modal("SMAER00800", "SMAER00800", "", null, null, null, null, null, null, null, null, null, "M");
  753. }
  754. else
  755. {
  756. var objArg = new Object();
  757. objArg.arg_ds_send_singdata = ds_patinfo;
  758. frmf_modal("SMAER00800", "SMAER00800", "", null, null, null, null, null, null, null, null, null, "M");
  759. }
  760. }
  761. //임상정보조회ss
  762. function fGetIMSInfo()
  763. {
  764. var iRowNo = -1;
  765. var sScrNode = ds_data_sysdtinfo;
  766. if(ds_grd_testrsltlist.rowposition < 0)
  767. {
  768. return false;
  769. }
  770. iRowNo = ds_grd_testrsltlist.rowposition;
  771. var instcd = sysf_getUserInfo("dutplceinstcd")
  772. var ptno = ds_grd_testrsltlist.getColumn(iRowNo, "ptno");
  773. var pid = ds_grd_testrsltlist.getColumn(iRowNo, "pid");
  774. var workflagcd = ds_grd_testrsltlist.getColumn(iRowNo, "ptnoworkflagcd");
  775. var prcpgenrflag = ds_grd_testrsltlist.getColumn(iRowNo, "prcpgenrflag");
  776. var scrno = "SPLPP02500";
  777. var sflag = instcd + "▦" + ptno + "▦" + pid + "▦" + workflagcd + "▦" + prcpgenrflag + "▦" + scrno;
  778. frmf_setParameter("opener_parameter_id", sflag);
  779. frmf_modal("SPLPP02500", "SPLPP02500", "", null, null, null, null, null, null, null, null, null, "M");
  780. }
  781. //이미지 표시 처리
  782. function fExeImgView()
  783. {
  784. var sPtNo = "";
  785. var aPtNo = "";
  786. var sNode = ds_grd_testrsltlist;
  787. var iRowNo = ds_grd_testrsltlist.rowposition;
  788. //----------------
  789. if (iRowNo >= 0)
  790. {
  791. sPtNo = ds_grd_testrsltlist.getColumn(iRowNo, "dispptno");
  792. aPtNo = sPtNo.split("-");
  793. //----------------------------------------------
  794. frmf_setParameter("SMLPP02000_scrno", "SMLPP00500");
  795. frmf_setParameter("SMLPP02000_pid", ds_grd_testrsltlist.getColumn(iRowNo, "pid"));
  796. frmf_setParameter("SMLPP02000_rgstdd", utlf_getCurrentDate());
  797. frmf_setParameter("SMLPP02000_no", "");
  798. frmf_setParameter("SMLPP02000_ptnocd", "");
  799. frmf_setParameter("SMLPP02000_year", "");
  800. //------------------
  801. frmf_modal("SMLPP02000", "SMLPP02000", "", null, null, null, null, null, null, null, null, null, "M");
  802. }
  803. }
  804. function fExeReptPrnt()
  805. {
  806. //-------------------------------
  807. if(ds_grd_testrsltlist.rowposition < 0)
  808. {
  809. sysf_messageBox("처방을 선택하여 주십시오!", "I007");
  810. return false;
  811. }
  812. ds_prntinfo.setColumn(0, "ptno", ds_patinfo.getColumn(0, "dispptno"));
  813. ds_prntinfo.setColumn(0, "pid", ds_patinfo.getColumn(0, "pid"));
  814. ds_prntinfo.setColumn(0, "acptdd", ds_patinfo.getColumn(0, "acptdd"));
  815. ds_prntinfo.setColumn(0, "reptflagcd", "1");
  816. ds_prntinfo.setColumn(0, "prntflagcd", "0");
  817. ds_prntinfo.setColumn(0, "copyflagcd", "1");
  818. ds_prntinfo.setColumn(0, "prcpgenrflag", ds_grd_testrsltlist.getColumn(ds_grd_testrsltlist.rowposition, "prcpgenrflag"));
  819. ds_prntinfo.setColumn(0, "acptdd", ds_grd_testrsltlist.getColumn(ds_grd_testrsltlist.rowposition, "acptdd"));
  820. ds_prntinfo.setColumn(0, "ptno", ds_grd_testrsltlist.getColumn(ds_grd_testrsltlist.rowposition, "ptno"));
  821. ds_prntinfo.setColumn(0, "pid", ds_grd_testrsltlist.getColumn(ds_grd_testrsltlist.rowposition, "pid"));
  822. lpzfExeFrmPrnt1(ds_prntinfo, ds_prntinfo.rowposition);
  823. }
  824. function fExePtNoClick()
  825. {
  826. if(ds_grd_testrsltlist.rowposition > -1 && grd_testrsltlist.setCellProperty)
  827. {
  828. fGetTestRslt();
  829. }
  830. }
  831. //조회
  832. function group2_btn_sea_onclick(obj:Button, e:ClickEventInfo)
  833. {
  834. fGetTestRsltList("1");
  835. }
  836. function switch1_case1_btn_detlsea_onclick(obj:Button, e:ClickEventInfo)
  837. {
  838. fGetTestRsltList("2");
  839. }
  840. function switch1_case2_button3_onclick(obj:Button, e:ClickEventInfo)
  841. {
  842. fGetTestRsltList("3");
  843. }
  844. //임상정보조회
  845. function button1_onclick(obj:Button, e:ClickEventInfo)
  846. {
  847. fGetIMSInfo();
  848. }
  849. //이미지보기
  850. function btn_imgview_onclick(obj:Button, e:ClickEventInfo)
  851. {
  852. fExeImgView();
  853. }
  854. //통합결과조회
  855. function btn_sytsrsltref_onclick(obj:Button, e:ClickEventInfo)
  856. {
  857. fExePopupCallSytsRslt();
  858. }
  859. function grd_testrsltlist_oncellclick(obj:Grid, e:GridClickEventInfo)
  860. {
  861. fExePtNoClick();
  862. }
  863. function button13_onclick(obj:Button, e:ClickEventInfo)
  864. {
  865. grdf_exportExcel(grd_testrsltlist, "결과조회");
  866. }
  867. function btn_rsltexcel_onclick(obj:Button, e:ClickEventInfo)
  868. {
  869. grdf_exportExcel(grd_testrsltref, "검사결과내용");
  870. }
  871. function btn_prt_onclick(obj:Button, e:ClickEventInfo)
  872. {
  873. fExeReptPrnt();
  874. }
  875. function group2_ipt_refval_onkeyup(obj:Edit, e:KeyEventInfo)
  876. {
  877. if(e.keycode == 13)
  878. {
  879. ds_init.setColumn(0, "refval", group2.ipt_refval.text);
  880. fGetTestRsltList("1");
  881. }
  882. }
  883. function lpzfExeFrmPrnt1(pDs, iRowNo)
  884. {
  885. var sProp = "top:0px;left:0px;width:0;height:0;";
  886. //var sProp = "left:0; top:0; width:100; height:100; sysmenu:hidden; min:visible; max:hidden; :hidden; resize:true; caption:visible;";
  887. var pDsRow = pDs.rowcount;
  888. trace("pDsRow="+pDsRow);
  889. //오브잭트 선언 후 부모창에서 데이터셋에 담아 보내준 값 담기
  890. var objRetVal= new Object();
  891. objRetVal.instcd = sysf_getUserInfo("dutplceinstcd"); //기관코드
  892. objRetVal.ptno = pDs.getColumn(iRowNo,"ptno"); //병리번호
  893. objRetVal.pid = pDs.getColumn(iRowNo,"pid");
  894. objRetVal.acptdd = pDs.getColumn(iRowNo,"acptdd");
  895. objRetVal.prcpgenrflag = pDs.getColumn(iRowNo,"prcpgenrflag");
  896. objRetVal.reptflagcd = pDs.getColumn(iRowNo,"reptflagcd"); //출력구분코드 (0:의뢰지, 1:보고서) --
  897. objRetVal.adddiagprtn = pDs.getColumn(iRowNo,"adddiagprtn");
  898. objRetVal.adddiaglist = pDs.getColumn(iRowNo,"adddiaglist");
  899. objRetVal.addrsltlist = pDs.getColumn(iRowNo,"addrsltlist");
  900. objRetVal.prntflagcd = pDs.getColumn(iRowNo,"prntflagcd"); // 출력(0), 미리보기(1)
  901. objRetVal.copyflagcd = pDs.getColumn(iRowNo,"copyflagcd"); // 의뢰지/보고서(0), 복사본(1)
  902. trace("====================================================");
  903. //출력 및 미리보기 여부 수정해야함
  904. if(pDs.getColumn(iRowNo,"prntflagcd")=="0")
  905. {
  906. frmf_modal("SPLPP01600","SPLPP01600",objRetVal, null, null, null, null, null, null, null,null, null, "P");
  907. }
  908. else
  909. {
  910. frmf_modal("SPLPP01600","SPLPP01600",objRetVal, null, null, null, null, null, null, null,null, null, "P");
  911. }
  912. }
  913. function grd_testrsltref_onrbuttondown(obj:Grid, e:GridMouseEventInfo)
  914. {
  915. if(ds_grd_testrsltref.getColumn(ds_grd_testrsltref.rowposition, "judgmark") == "IMP")
  916. {
  917. frmf_setPopupMenuDs( "pmn_popupMenu", [{id: "fExeImgView2", level: "0", title: "▶ 병리 이미지 보기"},
  918. {id: "astgrid_liscopy", level: "0", title: "▶ 복사하기"}]);
  919. pmn_popupMenu.trackPopup(e.screenX,e.screenY);
  920. }
  921. else
  922. {
  923. frmf_setPopupMenuDs( "pmn_popupMenu", [{id: "astgrid_liscopy", level: "0", title: "▶ 복사하기"}]);
  924. pmn_popupMenu.trackPopup(e.screenX,e.screenY);
  925. }
  926. }
  927. function pmn_popupMenu_onmenuclick(obj:PopupMenu, e:MenuClickEventInfo)
  928. {
  929. if(e.id == "fExeImgView2")
  930. {
  931. fExeImgView2();
  932. }
  933. else if(e.id == "astgrid_liscopy")
  934. {
  935. astgrid_liscopy();
  936. }
  937. }
  938. function fExeImgView2()
  939. {
  940. var sPtNo = "";
  941. var aPtNo = "";
  942. //var sNode = "/root/main/testrslt/testrsltinfo";
  943. var sNode = ds_grd_testrsltref;
  944. if(ds_grd_testrsltref.rowcount <= 0) return;
  945. //sPtNo = model.getValue(sNode+ "["+ grd_testrsltref.row +"]/spcno");
  946. sPtNo = ds_grd_testrsltref.getColumn(ds_grd_testrsltref.rowposition, "spcno");
  947. sPtNo = sPtNo.substr(0, sPtNo.length -6) + "-" + sPtNo.substr(sPtNo.length -6, 6);
  948. aPtNo = sPtNo.split("-");
  949. //----------------------------------------------
  950. frmf_setParameter("SMLPP02000_scrno", "SMLPR00100");
  951. //setParameter("SMLPP02000_pid", model.getValue(sNode+"/pid"));
  952. frmf_setParameter("SMLPP02000_pid", "");
  953. frmf_setParameter("SMLPP02000_rgstdd", utlf_getCurrentDate());
  954. frmf_setParameter("SMLPP02000_no", aPtNo[1]);
  955. frmf_setParameter("SMLPP02000_ptnocd", aPtNo[0].substr(0, (aPtNo[0].length-2)));
  956. frmf_setParameter("SMLPP02000_year", aPtNo[0].substr(aPtNo[0].length-2, 2));
  957. //------------------
  958. //modal("SMLPP02000");
  959. frmf_modal("SMLPP02000", "SMLPP02000", "", "", "", "", "", "", "", "", "", "", "M")
  960. }
  961. function astgrid_liscopy()
  962. {
  963. var grd_testrsltref:Grid = this.grd_testrsltref;
  964. var cellValue;
  965. var rClipBoardValue = "";
  966. var row = -1;
  967. var col = 0;
  968. var selrow = 0;
  969. var cnt =0;
  970. var colcnt = grd_testrsltref.getCellCount("Head");
  971. trace("colcnt =" + colcnt);
  972. ds_datagrid5.clearData();
  973. trace("start row = " + grd_testrsltref.selectstartrow);
  974. trace("end row = " + grd_testrsltref.selectendrow);
  975. for(var i = grd_testrsltref.selectstartrow; i <= grd_testrsltref.selectendrow; i++)
  976. {
  977. if(this.ds_grd_testrsltref.getSelect(i) == true)
  978. {
  979. trace("true???");
  980. trace("start col = " + grd_testrsltref.selectstartcol);
  981. trace("end col = " + grd_testrsltref.selectendcol);
  982. for(var j = grd_testrsltref.selectstartcol; j <= grd_testrsltref.selectendcol; j++)
  983. {
  984. trace("i = " + i);
  985. trace("j = " + j);
  986. //if(grd_testrsltref.isSelectedCell(i * colcnt + j) == true)
  987. //{
  988. trace("??????????????????????????");
  989. dsf_makeValue(ds_datagrid5,"row","string", i, cnt);
  990. dsf_makeValue(ds_datagrid5,"col","string", i, cnt);
  991. dsf_makeValue(ds_datagrid5,"value","string",grd_testrsltref.getCellValue(i, i * colcnt + j), cnt);//(i,i * colcnt + j), cnt);
  992. cnt++;
  993. //}
  994. }
  995. }
  996. }
  997. this.datagrid5.redraw();
  998. ds_datagrid5.keystring = "S:row+col";
  999. row = -1;
  1000. //rClipBoardValue = this.ds_init_baseinfo.getColumn(0,"tclsnm");
  1001. for (var i=0; i < ds_datagrid5.rowcount;i++)
  1002. {
  1003. selrow = ds_datagrid5.getColumn(i, "row");
  1004. cellValue = ds_datagrid5.getColumn(i, "value");
  1005. trace("cellValue = " + cellValue);
  1006. if (row != selrow)
  1007. {
  1008. rClipBoardValue += "\r\n";
  1009. rClipBoardValue += cellValue;
  1010. row = selrow;
  1011. }
  1012. else
  1013. {
  1014. rClipBoardValue += "\t";
  1015. rClipBoardValue += cellValue;
  1016. }
  1017. }
  1018. trace("rClipBoardValue = " + rClipBoardValue);
  1019. if(!utlf_isNull(rClipBoardValue))
  1020. {
  1021. //this.clipBoardData = rClipBoardValue;
  1022. system.setClipboard("CF_TEXT", rClipBoardValue);
  1023. }
  1024. ds_datagrid5.clear();
  1025. } ]]></Script>
  1026. </Form>
  1027. </FDL>