SMMND05000_혈액투석적정성평가.xfdl 46 KB

12345678910111213141516171819202122232425262728293031323334353637383940414243444546474849505152535455565758596061626364656667686970717273747576777879808182838485868788899091929394959697989910010110210310410510610710810911011111211311411511611711811912012112212312412512612712812913013113213313413513613713813914014114214314414514614714814915015115215315415515615715815916016116216316416516616716816917017117217317417517617717817918018118218318418518618718818919019119219319419519619719819920020120220320420520620720820921021121221321421521621721821922022122222322422522622722822923023123223323423523623723823924024124224324424524624724824925025125225325425525625725825926026126226326426526626726826927027127227327427527627727827928028128228328428528628728828929029129229329429529629729829930030130230330430530630730830931031131231331431531631731831932032132232332432532632732832933033133233333433533633733833934034134234334434534634734834935035135235335435535635735835936036136236336436536636736836937037137237337437537637737837938038138238338438538638738838939039139239339439539639739839940040140240340440540640740840941041141241341441541641741841942042142242342442542642742842943043143243343443543643743843944044144244344444544644744844945045145245345445545645745845946046146246346446546646746846947047147247347447547647747847948048148248348448548648748848949049149249349449549649749849950050150250350450550650750850951051151251351451551651751851952052152252352452552652752852953053153253353453553653753853954054154254354454554654754854955055155255355455555655755855956056156256356456556656756856957057157257357457557657757857958058158258358458558658758858959059159259359459559659759859960060160260360460560660760860961061161261361461561661761861962062162262362462562662762862963063163263363463563663763863964064164264364464564664764864965065165265365465565665765865966066166266366466566666766866967067167267367467567667767867968068168268368468568668768868969069169269369469569669769869970070170270370470570670770870971071171271371471571671771871972072172272372472572672772872973073173273373473573673773873974074174274374474574674774874975075175275375475575675775875976076176276376476576676776876977077177277377477577677777877978078178278378478578678778878979079179279379479579679779879980080180280380480580680780880981081181281381481581681781881982082182282382482582682782882983083183283383483583683783883984084184284384484584684784884985085185285385485585685785885986086186286386486586686786886987087187287387487587687787887988088188288388488588688788888989089189289389489589689789889990090190290390490590690790890991091191291391491591691791891992092192292392492592692792892993093193293393493593693793893994094194294394494594694794894995095195295395495595695795895996096196296396496596696796896997097197297397497597697797897998098198298398498598698798898999099199299399499599699799899910001001100210031004100510061007100810091010101110121013101410151016101710181019102010211022102310241025102610271028102910301031103210331034103510361037103810391040104110421043104410451046104710481049105010511052105310541055105610571058105910601061106210631064106510661067106810691070107110721073107410751076107710781079
  1. <?xml version="1.0" encoding="utf-8"?>
  2. <FDL version="1.5">
  3. <TypeDefinition url="..\..\..\default_typedef.xml"/>
  4. <Form id="SMMND05000" position="absolute 0 0 1206 785" titletext="혈액투석 적성성평가" oninit="SMMND05000_oninit" onload="SMMND05000_onload">
  5. <Layouts>
  6. <Layout>
  7. <Static id="caption6" text="혈액투석 적정성평가 조사표" class="tit_1" position="absolute 0 0 213 25"/>
  8. <Div id="group4" taborder="2" class="div_SA2" position="absolute 281 24 1201 104" anchor="left top right">
  9. <Layouts>
  10. <Layout>
  11. <Button id="btn_save" taborder="10" text="저장" class="btn1" position="absolute 836 14 892 36" anchor="top right" onclick="group4_btn_save_onclick"/>
  12. <Shape id="line4" linetype="vertical" class="line_4" position="absolute 827 5 833 77" anchor="top right"/>
  13. <Static id="caption15" text="LAB 조회기간:" class="search_name" position="absolute 245 57 352 74" anchor="default"/>
  14. <MaskEdit id="input1" taborder="11" type="string" mask="####-##-##" maskchar=" " trimtype="both" autoselect="true" autoskip="true" class="input_default" position="absolute 120 54 220 73" style="align:center middle;" anchor="default"/>
  15. <Static id="caption11" text="최초투석일자:" class="search_name" position="absolute 10 56 115 73" anchor="default"/>
  16. <Static id="caption3" text="등록번호:" class="search_name" position="absolute 11 6 96 23" anchor="default"/>
  17. <Static id="caption9" text="원인질환:" class="search_name" position="absolute 11 31 92 48" anchor="default"/>
  18. <Edit id="input3" taborder="12" class="input_default" position="absolute 96 6 176 25" anchor="default" autoselect="true" autoskip="true"/>
  19. <Combo id="cmb_diagnm" taborder="13" innerdataset="@ds_init_mlist_M0079" codecolumn="cdid" datacolumn="cdnm" position="absolute 96 30 221 49" anchor="default"/>
  20. <Static id="caption7" text="환자명:" class="search_name" position="absolute 246 8 316 25" anchor="default"/>
  21. <Static id="caption14" text="당뇨유무:" class="search_name" position="absolute 246 33 327 50" anchor="default"/>
  22. <Combo id="cmb_dmyn" taborder="14" codecolumn="codecolumn" datacolumn="datacolumn" position="absolute 331 31 381 50" anchor="default">
  23. <Dataset id="innerdataset">
  24. <ColumnInfo>
  25. <Column id="codecolumn"/>
  26. <Column id="datacolumn"/>
  27. </ColumnInfo>
  28. <Rows>
  29. <Row>
  30. <Col id="codecolumn">유</Col>
  31. <Col id="datacolumn">유</Col>
  32. </Row>
  33. <Row>
  34. <Col id="codecolumn">무</Col>
  35. <Col id="datacolumn">무</Col>
  36. </Row>
  37. </Rows>
  38. </Dataset>
  39. </Combo>
  40. <Edit id="input5" taborder="15" class="input_default" position="absolute 316 7 401 26" anchor="default" autoselect="true" autoskip="true" onkeyup="group4_input5_onkeyup"/>
  41. <Static id="caption2" text="기준년:" class="search_name" position="absolute 418 8 493 25" anchor="default"/>
  42. <Calendar id="ipt_srchdate" taborder="16" autoselect="true" autoskip="true" dateformat="yyyy" editformat="yyyy" class="input_default" position="absolute 484 7 549 26" style="align:center middle;font:Dotum,9,bold;" mask="yyyy" anchor="default" onchanged="group4_ipt_srchdate_onchanged"/>
  43. <Static id="caption10" text="기준월:" class="search_name" position="absolute 566 11 641 28" anchor="default"/>
  44. <cp_checkboxList id="chk_mons" taborder="17" scrollbars="none" position="absolute 628 6 817 44" style="background:transparent; " col="1" row="1" cellspacing="2" vcellspacing="0" itemWidth="100" itemHeight="20" overflow="visible" anchor="default"/>
  45. <Button id="button2" taborder="18" text="엑셀저장" class="btn7" position="absolute 835 40 915 59" anchor="top right" onclick="group4_button2_onclick"/>
  46. <Calendar id="ipt_date2" taborder="19" autoselect="true" autoskip="true" class="input_s_essential" position="absolute 472 54 575 73"/>
  47. <Static id="caption12" text="~" position="absolute 457 55 472 72"/>
  48. <Calendar id="ipt_date1" taborder="20" autoselect="true" autoskip="true" class="input_s_essential" position="absolute 351 54 454 73"/>
  49. <Static id="caption00" text="입/외 구분:" class="search_name" position="absolute 418 32 503 49"/>
  50. <Edit id="ipt_ordtype" taborder="21" autoselect="true" autoskip="true" class="input_default" position="absolute 504 30 544 49"/>
  51. </Layout>
  52. </Layouts>
  53. </Div>
  54. <Shape id="line1" class="line_10" position="absolute 0 109 269 115"/>
  55. <Static id="caption1" text="혈액투석 유지환자리스트" class="tit_2" position="absolute 0 93 170 114"/>
  56. <Div id="group2" taborder="4" class="div_SA" position="absolute 0 25 273 85">
  57. <Layouts>
  58. <Layout>
  59. <Static id="caption5" text="등록번호:" class="search_name" position="absolute 16 9 100 26"/>
  60. <Button id="btn_srchhdmatnpat" taborder="1" text="조회" class="btn1" position="absolute 205 21 261 43" onclick="group2_btn_srchhdmatnpat_onclick"/>
  61. <Shape id="line5" linetype="vertical" class="line_4" position="absolute 191 9 197 53"/>
  62. <Edit id="input2" taborder="2" autoselect="true" autoskip="true" class="input_default" position="absolute 100 8 185 27" onkeyup="group2_input2_onkeyup"/>
  63. <Combo id="combo2" taborder="3" innerdataset="@ds_init_settingrn_settingrnlist" codecolumn="settingrnid" datacolumn="settingrnnm" class="combo_search" position="absolute 100 33 160 52" onitemchanged="group2_combo2_onitemchanged"/>
  64. <Static id="caption37" text="내환자 :" class="search_name" position="absolute 16 35 93 52"/>
  65. </Layout>
  66. </Layouts>
  67. </Div>
  68. <Static id="caption8" text="도관기록 리스트" class="tit_2" position="absolute 5 422 130 435"/>
  69. <Shape id="line6" linetype="vertical" class="line_1" position="absolute 5 434 270 440"/>
  70. <Button id="button9" taborder="5" text="신규등록" class="btn2" position="absolute 205 415 269 434"/>
  71. <Grid id="grd_hdmatnpatinfo" taborder="6" binddataset="ds_main_hdmatnpatlist_hdmatnpatinfo" useinputpanel="false" position="absolute 0 114 269 777" autoenter="select" autofittype="col" cellsizingtype="col" anchor="left top bottom" oncelldblclick="grd_hdmatnpatinfo_oncelldblclick">
  72. <Formats>
  73. <Format id="default">
  74. <Columns>
  75. <Column size="22"/>
  76. <Column size="80"/>
  77. <Column size="65"/>
  78. <Column size="44"/>
  79. <Column size="57"/>
  80. <Column size="0"/>
  81. </Columns>
  82. <Rows>
  83. <Row size="24" band="head"/>
  84. <Row size="24"/>
  85. </Rows>
  86. <Band id="head">
  87. <Cell/>
  88. <Cell col="1" text="등록번호"/>
  89. <Cell col="2" text="환자명"/>
  90. <Cell col="3" text="구분"/>
  91. <Cell col="4" text="S/A"/>
  92. <Cell col="5" text="유지환자등록일자"/>
  93. </Band>
  94. <Band id="body">
  95. <Cell celltype="head" expr="currow+1"/>
  96. <Cell col="1" style="selectbackground:#ffd9ffff;" text="bind:pid"/>
  97. <Cell col="2" style="selectbackground:#ffd9ffff;" text="bind:hngnm"/>
  98. <Cell col="3" text="bind:histstat"/>
  99. <Cell col="4" style="selectbackground:#ffd9ffff;" text="bind:sexage"/>
  100. <Cell col="5" text="bind:maintepatrgstdd"/>
  101. </Band>
  102. </Format>
  103. </Formats>
  104. </Grid>
  105. <Grid id="grd_coduitrecinfo" taborder="7" binddataset="ds_grd_coduitrecinfo" useinputpanel="false" visible="false" position="absolute 30 215 130 315">
  106. <Formats>
  107. <Format id="default">
  108. <Columns>
  109. <Column size="23"/>
  110. <Column size="103"/>
  111. <Column size="58"/>
  112. <Column size="73"/>
  113. <Column size="0"/>
  114. <Column size="0"/>
  115. </Columns>
  116. <Rows>
  117. <Row size="24" band="head"/>
  118. <Row size="24"/>
  119. </Rows>
  120. <Band id="head">
  121. <Cell/>
  122. <Cell col="1" text="기록일자"/>
  123. <Cell col="2" text="기록시간"/>
  124. <Cell col="3" text="기록자"/>
  125. <Cell col="4" text="pid"/>
  126. <Cell col="5" text="유지환자등록일자"/>
  127. </Band>
  128. <Band id="body">
  129. <Cell celltype="head" expr="currow+1"/>
  130. <Cell col="1" displaytype="date" text="bind:recdd" calendardisplaynulltype="nulltext"/>
  131. <Cell col="2" style="align:center middle;" text="bind:rectm" mask="##:##" maskchar=" "/>
  132. <Cell col="3" text="bind:recnm"/>
  133. <Cell col="4" text="bind:pid"/>
  134. <Cell col="5" text="bind:maintepatrgstdd"/>
  135. </Band>
  136. </Format>
  137. </Formats>
  138. </Grid>
  139. <Shape id="line3" linetype="horizontal" class="line_10" position="absolute 281 108 1201 114"/>
  140. <Static id="caption13" text="혈액투석적성성평가" class="tit_1" position="absolute 0 0 210 25"/>
  141. <Button id="button1" taborder="8" text="내환자세팅" class="btn2" position="absolute 195 90 270 109" onclick="button1_onclick"/>
  142. <Button id="btn_getdata" taborder="10" text="자료수집" class="btn2" position="absolute 925 79 989 98" onclick="btn_getdata_onclick"/>
  143. <Grid id="grd_monthlist" taborder="13" binddataset="ds_main_list_item" useinputpanel="false" position="absolute 281 113 1201 593" autoenter="select" cellsizingtype="col" anchor="all" onexpanddown="grd_monthlist_onexpanddown" onvscroll="grd_monthlist_onvscroll" onhscroll="grd_monthlist_onhscroll" selecttype="multirow">
  144. <Formats>
  145. <Format id="default">
  146. <Columns>
  147. <Column size="23" band="left"/>
  148. <Column size="211" band="left"/>
  149. <Column size="16" band="left"/>
  150. <Column size="70" band="left"/>
  151. <Column size="70"/>
  152. <Column size="70"/>
  153. <Column size="70"/>
  154. <Column size="70"/>
  155. <Column size="70"/>
  156. <Column size="70"/>
  157. <Column size="70"/>
  158. <Column size="70"/>
  159. <Column size="70"/>
  160. <Column size="70"/>
  161. <Column size="70"/>
  162. <Column size="70"/>
  163. <Column size="0"/>
  164. <Column size="0"/>
  165. <Column size="0"/>
  166. <Column size="0"/>
  167. <Column size="0"/>
  168. <Column size="0"/>
  169. </Columns>
  170. <Rows>
  171. <Row size="24" band="head"/>
  172. <Row size="24"/>
  173. </Rows>
  174. <Band id="head">
  175. <Cell/>
  176. <Cell col="1" colspan="2" text="평가항목" taborder="undefined"/>
  177. <Cell col="3" text="방법"/>
  178. <Cell col="4" text="1월"/>
  179. <Cell col="5" text="2월"/>
  180. <Cell col="6" text="3월"/>
  181. <Cell col="7" text="4월"/>
  182. <Cell col="8" text="5월"/>
  183. <Cell col="9" text="6월"/>
  184. <Cell col="10" text="7월"/>
  185. <Cell col="11" text="8월"/>
  186. <Cell col="12" text="9월"/>
  187. <Cell col="13" text="10월"/>
  188. <Cell col="14" text="11월"/>
  189. <Cell col="15" text="12월"/>
  190. <Cell col="16" text="pid"/>
  191. <Cell col="17" text="yyyy"/>
  192. <Cell col="18" text="diagnm"/>
  193. <Cell col="19" text="dmyn"/>
  194. <Cell col="20" text="itemid"/>
  195. <Cell col="21" text="methodid"/>
  196. </Band>
  197. <Band id="body">
  198. <Cell celltype="head"/>
  199. <Cell col="1" style="align:left middle;" text="bind:itemnm"/>
  200. <Cell col="2" displaytype="text" edittype="text" text="bind:rsltbtn" expandshow="show"/>
  201. <Cell col="3" text="bind:methodnm"/>
  202. <Cell col="4" displaytype="text" edittype="text" style="align:center;color:BIND(month01_C);color2:BIND(month01_C);" text="bind:month01"/>
  203. <Cell col="5" displaytype="text" edittype="text" style="align:center;color:BIND(month02_C);color2:BIND(month02_C);" text="bind:month02"/>
  204. <Cell col="6" displaytype="text" edittype="text" style="align:center;color:BIND(month03_C);color2:BIND(month03_C);" text="bind:month03"/>
  205. <Cell col="7" displaytype="text" edittype="text" style="align:center;color:BIND(month04_C);color2:BIND(month04_C);" text="bind:month04"/>
  206. <Cell col="8" displaytype="text" edittype="text" style="align:center;color:BIND(month05_C);color2:BIND(month05_C);" text="bind:month05"/>
  207. <Cell col="9" displaytype="text" edittype="text" style="align:center;color:BIND(month06_C);color2:BIND(month06_C);" text="bind:month06"/>
  208. <Cell col="10" displaytype="text" edittype="text" style="align:center;color:BIND(month07_C);color2:BIND(month07_C);" text="bind:month07"/>
  209. <Cell col="11" displaytype="text" edittype="text" style="align:center;color:BIND(month08_C);color2:BIND(month08_C);" text="bind:month08"/>
  210. <Cell col="12" displaytype="text" edittype="text" style="align:center;color:BIND(month09_C);color2:BIND(month09_C);" text="bind:month09"/>
  211. <Cell col="13" displaytype="text" edittype="text" style="align:center;color:BIND(month10_C);color2:BIND(month10_C);" text="bind:month10"/>
  212. <Cell col="14" displaytype="text" edittype="text" style="align:center;color:BIND(month11_C);color2:BIND(month11_C);" text="bind:month11"/>
  213. <Cell col="15" displaytype="text" edittype="text" style="align:center;color:BIND(month12_C);color2:BIND(month12_C);" text="bind:month12"/>
  214. <Cell col="16" text="bind:pid"/>
  215. <Cell col="17" text="bind:yyyy"/>
  216. <Cell col="18" text="bind:diagnm"/>
  217. <Cell col="19" text="bind:dmyn"/>
  218. <Cell col="20" text="bind:itemid"/>
  219. <Cell col="21" text="bind:methodid"/>
  220. </Band>
  221. </Format>
  222. </Formats>
  223. </Grid>
  224. <Shape id="line2" linetype="horizontal" class="line_10" position="absolute 282 598 1202 604" anchor="left right bottom"/>
  225. <Grid id="datagrid5" taborder="1" binddataset="ds_datagrid5" useinputpanel="false" visible="false" position="absolute 10 384 360 534">
  226. <Formats>
  227. <Format id="default">
  228. <Columns>
  229. <Column size="100"/>
  230. <Column size="100"/>
  231. <Column size="100"/>
  232. </Columns>
  233. <Rows>
  234. <Row size="24" band="head"/>
  235. <Row size="24"/>
  236. </Rows>
  237. <Band id="head">
  238. <Cell text="caption1"/>
  239. <Cell col="1" text="caption3"/>
  240. <Cell col="2" text="caption2"/>
  241. </Band>
  242. <Band id="body">
  243. <Cell text="bind:row"/>
  244. <Cell col="1" text="bind:col"/>
  245. <Cell col="2" text="bind:value"/>
  246. </Band>
  247. </Format>
  248. </Formats>
  249. </Grid>
  250. <Grid id="datagrid2" taborder="14" useinputpanel="false" position="absolute 281 603 1202 778" autoenter="select" cellsizingtype="col" binddataset="ds_main_rsltlist_row" oncellclick="datagrid2_oncellclick" selecttype="multiarea">
  251. <Formats>
  252. <Format id="default">
  253. <Columns>
  254. <Column size="29"/>
  255. </Columns>
  256. <Rows>
  257. <Row size="24" band="head"/>
  258. <Row size="24"/>
  259. </Rows>
  260. <Band id="head">
  261. <Cell/>
  262. </Band>
  263. <Band id="body">
  264. <Cell celltype="head" expr="currow+1"/>
  265. </Band>
  266. </Format>
  267. </Formats>
  268. </Grid>
  269. </Layout>
  270. </Layouts>
  271. <Objects>
  272. <Dataset id="ds_main_condition" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false" oncolumnchanged="ds_main_condition_oncolumnchanged">
  273. <ColumnInfo>
  274. <Column id="pid" type="STRING" size="256"/>
  275. <Column id="statusflag" type="STRING" size="256"/>
  276. <Column id="mypid" type="STRING" size="256"/>
  277. <Column id="bvipvalue" type="STRING" size="256"/>
  278. <Column id="mons" type="STRING" size="256"/>
  279. <Column id="wardcd" type="STRING" size="256"/>
  280. </ColumnInfo>
  281. <Rows>
  282. <Row>
  283. <Col id="pid"/>
  284. <Col id="statusflag">Access Flow(ml/min) :</Col>
  285. <Col id="mypid"/>
  286. <Col id="bvipvalue">Access Flow(ml/min) :</Col>
  287. <Col id="mons"/>
  288. <Col id="wardcd">2010702020</Col>
  289. </Row>
  290. </Rows>
  291. </Dataset>
  292. <Dataset id="ds_init_settingrn_settingrnlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  293. <Dataset id="ds_main_hdmatnpatlist_hdmatnpatinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  294. <ColumnInfo>
  295. <Column id="pid" type="STRING" size="256" sumtext="등록번호"/>
  296. <Column id="hngnm" type="STRING" size="256" sumtext="환자명"/>
  297. <Column id="sexage" type="STRING" size="256" sumtext="성별/나이"/>
  298. <Column id="maintepatrgstdd" type="STRING" size="256" sumtext="유지환자등록일자"/>
  299. <Column id="histstat" type="STRING" size="256" sumtext="입원외래구분"/>
  300. <Column id="orddd" type="STRING" size="256" sumtext="진료(입원)일자"/>
  301. <Column id="cretno" type="STRING" size="256" sumtext="생성번호"/>
  302. <Column id="orddeptcd" type="STRING" size="256" sumtext="진료과코드"/>
  303. <Column id="orddrid" type="STRING" size="256" sumtext="진료의(전문의)ID"/>
  304. <Column id="cassickkind" type="STRING" size="256" sumtext="원인질환"/>
  305. </ColumnInfo>
  306. </Dataset>
  307. <Dataset id="ds_main_condition2" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  308. <ColumnInfo>
  309. <Column id="pid" type="STRING" size="256"/>
  310. <Column id="srchdate" type="STRING" size="256"/>
  311. <Column id="hngnm" type="STRING" size="256"/>
  312. <Column id="diagnm" type="STRING" size="256"/>
  313. <Column id="srchmon" type="STRING" size="256"/>
  314. <Column id="startdd" type="STRING" size="256"/>
  315. <Column id="enddd" type="STRING" size="256"/>
  316. <Column id="dmyn" type="STRING" size="256"/>
  317. <Column id="fstdialdd" type="STRING" size="256"/>
  318. <Column id="ordtype" type="STRING" size="256"/>
  319. </ColumnInfo>
  320. <Rows>
  321. <Row>
  322. <Col id="pid"/>
  323. <Col id="srchdate"/>
  324. <Col id="hngnm"/>
  325. <Col id="diagnm"/>
  326. <Col id="srchmon"/>
  327. <Col id="startdd"/>
  328. <Col id="enddd"/>
  329. <Col id="dmyn"/>
  330. <Col id="fstdialdd"/>
  331. </Row>
  332. </Rows>
  333. </Dataset>
  334. <Dataset id="ds_chk_mons" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  335. <ColumnInfo>
  336. <Column id="label" type="STRING" size="256"/>
  337. <Column id="value" type="STRING" size="256"/>
  338. </ColumnInfo>
  339. <Rows>
  340. <Row>
  341. <Col id="label">1</Col>
  342. <Col id="value">01</Col>
  343. </Row>
  344. <Row>
  345. <Col id="label">2</Col>
  346. <Col id="value">02</Col>
  347. </Row>
  348. <Row>
  349. <Col id="label">3</Col>
  350. <Col id="value">03</Col>
  351. </Row>
  352. <Row>
  353. <Col id="label">4</Col>
  354. <Col id="value">04</Col>
  355. </Row>
  356. <Row>
  357. <Col id="label">5</Col>
  358. <Col id="value">05</Col>
  359. </Row>
  360. <Row>
  361. <Col id="label">6</Col>
  362. <Col id="value">06</Col>
  363. </Row>
  364. <Row>
  365. <Col id="label">7</Col>
  366. <Col id="value">07</Col>
  367. </Row>
  368. <Row>
  369. <Col id="label">8</Col>
  370. <Col id="value">08</Col>
  371. </Row>
  372. <Row>
  373. <Col id="label">9</Col>
  374. <Col id="value">09</Col>
  375. </Row>
  376. <Row>
  377. <Col id="label">10</Col>
  378. <Col id="value">10</Col>
  379. </Row>
  380. <Row>
  381. <Col id="label">11</Col>
  382. <Col id="value">11</Col>
  383. </Row>
  384. <Row>
  385. <Col id="label">12</Col>
  386. <Col id="value">12</Col>
  387. </Row>
  388. </Rows>
  389. </Dataset>
  390. <Dataset id="ds_main_list_item" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  391. <ColumnInfo>
  392. <Column id="pid" type="STRING" size="256" sumtext="환자번호"/>
  393. <Column id="yyyy" type="STRING" size="256" sumtext="평가년도"/>
  394. <Column id="diagnm" type="STRING" size="256" sumtext="기저질환"/>
  395. <Column id="dmyn" type="STRING" size="256" sumtext="당뇨유무"/>
  396. <Column id="itemid" type="STRING" size="256" sumtext="평가항목코드"/>
  397. <Column id="itemnm" type="STRING" size="256" sumtext="평가항목명"/>
  398. <Column id="methodid" type="STRING" size="256" sumtext="평가방법코드"/>
  399. <Column id="methodnm" type="STRING" size="256" sumtext="평가방법명"/>
  400. <Column id="month01" type="STRING" size="256" sumtext="1월값"/>
  401. <Column id="month02" type="STRING" size="256" sumtext="2월값"/>
  402. <Column id="month03" type="STRING" size="256" sumtext="3월값"/>
  403. <Column id="month04" type="STRING" size="256" sumtext="4월값"/>
  404. <Column id="month05" type="STRING" size="256" sumtext="5월값"/>
  405. <Column id="month06" type="STRING" size="256" sumtext="6월값"/>
  406. <Column id="month07" type="STRING" size="256" sumtext="7월값"/>
  407. <Column id="month08" type="STRING" size="256" sumtext="8월값"/>
  408. <Column id="month09" type="STRING" size="256" sumtext="9월값"/>
  409. <Column id="month10" type="STRING" size="256" sumtext="10월값"/>
  410. <Column id="month11" type="STRING" size="256" sumtext="11월값"/>
  411. <Column id="month12" type="STRING" size="256" sumtext="12월값"/>
  412. <Column id="fstdialdd" type="STRING" size="256" sumtext="최초투석일자"/>
  413. </ColumnInfo>
  414. </Dataset>
  415. <Dataset id="ds_send" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  416. <Dataset id="ds_init_mlist_M0079" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  417. <Dataset id="ds_temp_paminfo_list" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  418. <Dataset id="ds_send_reqdata" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  419. <Dataset id="ds_hidden" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  420. <ColumnInfo>
  421. <Column id="count" type="STRING" size="256"/>
  422. <Column id="gRow" type="STRING" size="256"/>
  423. <Column id="testmdllist" type="STRING" size="256"/>
  424. </ColumnInfo>
  425. <Rows>
  426. <Row>
  427. <Col id="count"/>
  428. <Col id="gRow"/>
  429. </Row>
  430. </Rows>
  431. </Dataset>
  432. <Dataset id="ds_main_rsltlist_row" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  433. <Dataset id="ds_hidden_ref" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  434. <ColumnInfo>
  435. <Column id="testgrupseqno" type="STRING" size="256"/>
  436. <Column id="startdd" type="STRING" size="256"/>
  437. <Column id="enddd" type="STRING" size="256"/>
  438. <Column id="pid" type="STRING" size="256"/>
  439. <Column id="refgbn" type="STRING" size="256"/>
  440. <Column id="acptdd" type="STRING" size="256"/>
  441. <Column id="acptdde" type="STRING" size="256"/>
  442. <Column id="testmdllist" type="STRING" size="256"/>
  443. <Column id="tclscdlist" type="STRING" size="256"/>
  444. </ColumnInfo>
  445. <Rows>
  446. <Row>
  447. <Col id="testgrupseqno"/>
  448. <Col id="startdd"/>
  449. <Col id="enddd"/>
  450. <Col id="pid"/>
  451. <Col id="refgbn">1</Col>
  452. <Col id="acptdd"/>
  453. <Col id="acptdde"/>
  454. <Col id="testmdllist"/>
  455. <Col id="tclscdlist"/>
  456. </Row>
  457. </Rows>
  458. </Dataset>
  459. <Dataset id="ds_send_data1" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  460. <Dataset id="ds_send_setdata" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  461. <Dataset id="ds_hidden_temp_rsltlist_row" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  462. <Dataset id="ds_hidden_temp_rsltlist_header" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  463. <Dataset id="ds_hidden_temp_rsltlist_patinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  464. <Dataset id="ds_receive_item" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  465. </Objects>
  466. <Bind>
  467. <BindItem id="item0" compid="group2.input2" propid="value" datasetid="ds_main_condition" columnid="pid"/>
  468. <BindItem id="item1" compid="group2.combo2" propid="value" datasetid="ds_main_condition" columnid="mypid"/>
  469. <BindItem id="item2" compid="group4.input3" propid="value" datasetid="ds_main_condition2" columnid="pid"/>
  470. <BindItem id="item3" compid="group4.input5" propid="value" datasetid="ds_main_condition2" columnid="hngnm"/>
  471. <BindItem id="item4" compid="group4.ipt_srchdate" propid="value" datasetid="ds_main_condition2" columnid="srchdate"/>
  472. <BindItem id="item5" compid="group4.cmb_diagnm" propid="value" datasetid="ds_main_condition2" columnid="diagnm"/>
  473. <BindItem id="item6" compid="group4.cmb_dmyn" propid="value" datasetid="ds_main_condition2" columnid="dmyn"/>
  474. <BindItem id="item7" compid="group4.input1" propid="value" datasetid="ds_main_condition2" columnid="fstdialdd"/>
  475. <BindItem id="item8" compid="group4.ipt_date1" propid="value" datasetid="ds_main_condition2" columnid="startdd"/>
  476. <BindItem id="item9" compid="group4.ipt_date2" propid="value" datasetid="ds_main_condition2" columnid="enddd"/>
  477. <BindItem id="item10" compid="group4.ipt_ordtype" propid="value" datasetid="ds_main_condition2" columnid="ordtype"/>
  478. </Bind>
  479. <Script type="xscript4.0"><![CDATA[/***************************************************************************************
  480. * System Name :
  481. * Job Name :
  482. * Creator :
  483. * Make Date : 2015-11-13
  484. * Description :
  485. *---------------------------------------------------------------------------------------
  486. * Modify Date Modifier Modify Description
  487. *---------------------------------------------------------------------------------------
  488. * 2015-11-13 Live Converter TF->XP
  489. *
  490. *---------------------------------------------------------------------------------------
  491. ****************************************************************************************/
  492. include "com_commonxp::comm_main.xjs";
  493. include "emr_dialroomxp::SMMND01300.xjs";
  494. var arErrorCode = new HashArray();
  495. var hPos = null;
  496. function SMMND05000_oninit(obj:Form, e:InitEventInfo)
  497. {
  498. frmf_initForm(obj);
  499. }
  500. function SMMND05000_onload(obj:Form, e:LoadEventInfo)
  501. {
  502. grdf_initGrid(grd_hdmatnpatinfo);
  503. grdf_initGrid(grd_monthlist);
  504. grdf_setRowTypeIcon(grd_monthlist, 0);
  505. fInitialize();
  506. }
  507. function fInitialize()
  508. {
  509. var sProp_6_2 = "col=6,row=2,cellspacing=4,vcellspacing=0,itemWidth=-1,itemHeight=24,overflow='visible'";
  510. group4.chk_mons.setInitComp(sProp_6_2,ds_chk_mons,"value","label","fn_chkMons");
  511. ds_send.clearData();
  512. dsf_makeValue(ds_send, "wardcd", "string", "2010702020", 0);
  513. var oParam = {};
  514. oParam.id = "TRMND03402";
  515. oParam.service = "dialapp.DialPatMngt";
  516. oParam.method = "reqGetWMInitData";
  517. oParam.inds = "reqcond=ds_send";
  518. oParam.outds = "ds_init_settingrn_settingrnlist=settingrnlist";
  519. oParam.async = false;
  520. oParam.callback = "cf_TRMND03402";
  521. tranf_submit(oParam);
  522. group2.combo2.index = 0;
  523. var arrParam = [{dsNm : "ds_init_mlist_M0079", cdGrpId: "M0079" }]; //원인질환
  524. appf_getCodeList(arrParam);
  525. ds_init_mlist_M0079.insertRow(0);
  526. ds_main_condition2.setColumn(0, "dmyn", "");
  527. ds_main_condition.setColumn(0, "mons", "");
  528. var node = sysf_getGlobalVariable("paminfo");
  529. dsf_setCSVToDs("ds_temp_paminfo_list", node);
  530. if(ds_temp_paminfo_list.rowcount > 0)
  531. {
  532. var sSelPid = ds_temp_paminfo_list.getColumn(0, "pid");
  533. var sMaintePatRgstDD = ds_temp_paminfo_list.getColumn(0, "maintepatrgstdd");
  534. hdmatnpatRow = 0;
  535. ds_main_condition.setColumn(0, "pid", sSelPid);
  536. fSrchHDMatnPatList();
  537. }
  538. else
  539. {
  540. fSrchHDMatnPatList();
  541. }
  542. var iRow = ds_main_hdmatnpatlist_hdmatnpatinfo.rowposition;
  543. if (iRow > -1)
  544. {
  545. fSrchHDSAQNInfo(iRow);
  546. }
  547. ds_main_condition2.setColumn(0, "srchdate", String(utlf_getCurrentDate()).substr(0,4));
  548. ds_main_condition2.setColumn(0, "startdd", utlf_getCurrentDate().toDate().getAddDate(-2,"Y").getDateFormat("YYYYMMDD"));
  549. ds_main_condition2.setColumn(0, "enddd", utlf_getCurrentDate());
  550. }
  551. function cf_TRMND03402(sSvcId, nErrorCode, sErrorMsg)
  552. {
  553. if(nErrorCode < 0)
  554. {
  555. sysf_messageBox('조회를 실패하였습니다.', 'E999');
  556. return;
  557. }
  558. }
  559. function fn_chkMons()
  560. {
  561. ds_main_condition.setColumn(0, "mons", String(group4.chk_mons.getData()).replace(",","|"));
  562. }
  563. function fSrchHDSAQNInfo(curRow)
  564. {
  565. ds_main_condition2.setColumn(0, "pid", ds_main_hdmatnpatlist_hdmatnpatinfo.getColumn(curRow, "pid"));
  566. ds_main_condition2.setColumn(0, "hngnm", ds_main_hdmatnpatlist_hdmatnpatinfo.getColumn(curRow, "hngnm"));
  567. ds_main_condition2.setColumn(0, "ordtype", ds_main_hdmatnpatlist_hdmatnpatinfo.getColumn(curRow, "histstat")); //20200305 추가
  568. //fsetcolortext(grd_hdmatnpatinfo, curRow);
  569. ds_main_list_item.clearData();
  570. if(utlf_isNull(ds_main_condition2.getColumn(0, "pid")))
  571. {
  572. sysf_messageBox("유지환자를 선택 후 작업하십시오.", "E", "");
  573. return;
  574. }
  575. var pid = ds_main_condition2.getColumn(0, "pid");
  576. var srchdate = ds_main_condition2.getColumn(0, "srchdate");
  577. dsf_makeValue(ds_send_reqdata, "pid", "string", pid, 0);
  578. dsf_makeValue(ds_send_reqdata, "srchdate", "string", srchdate, 0);
  579. var oParam = {};
  580. oParam.id = "TRMND05001";
  581. oParam.service = "dialapp.DialRec";
  582. oParam.method = "reqGetHDSAQNInfo";
  583. oParam.inds = "req=ds_send_reqdata";
  584. oParam.outds = "ds_main_list_item=item";
  585. oParam.async = false;
  586. //oParam.callback = "cf_TRMND05001";
  587. tranf_submit(oParam);
  588. ds_main_list_item.rowposition = -1;
  589. var diagnm = ds_main_list_item.getColumn(0, "diagnm");
  590. if (utlf_isNull(diagnm)) {
  591. //20180327 원인질환가져오기
  592. ds_main_condition2.setColumn(0, "diagnm", ds_main_hdmatnpatlist_hdmatnpatinfo.getColumn(curRow, "cassickkind"));
  593. } else {
  594. ds_main_condition2.setColumn(0, "diagnm", diagnm);
  595. }
  596. var dmyn = ds_main_list_item.getColumn(0, "dmyn");
  597. ds_main_condition2.setColumn(0, "dmyn", dmyn);
  598. var fstdialdd = ds_main_list_item.getColumn(0, "fstdialdd");
  599. ds_main_condition2.setColumn(0, "fstdialdd", fstdialdd);
  600. fsetColorHLValue();
  601. }
  602. function fsetColorHLValue()
  603. {
  604. var xx, yy;
  605. for(var i = 0; i < ds_main_list_item.rowcount; i++)
  606. {
  607. var vItem = ds_main_list_item.getColumn(i, "itemid");
  608. for(var yy = 1; yy < 13; yy++)
  609. {
  610. if(String(yy).length == 1)
  611. {
  612. yy = "0" + yy;
  613. }
  614. var vJudg = ds_main_list_item.getColumn(i, "month" + yy);
  615. ds_main_list_item.updatecontrol = false;
  616. if ( vItem == "06")
  617. {
  618. if ( vJudg > 55 )
  619. {
  620. dsf_makeValue(ds_main_list_item, "month"+yy+"_C", "string", "red", i);
  621. }
  622. else
  623. {
  624. dsf_makeValue(ds_main_list_item, "month"+yy+"_C", "string", "black", i);
  625. }
  626. }
  627. else if ( vItem == "11")
  628. {
  629. if ( vJudg < 1.2 )
  630. {
  631. dsf_makeValue(ds_main_list_item, "month"+yy+"_C", "string", "red", i);
  632. }
  633. else
  634. {
  635. dsf_makeValue(ds_main_list_item, "month"+yy+"_C", "string", "black", i);
  636. }
  637. }
  638. else if ( vItem == "12")
  639. {
  640. if ( vJudg < 65 )
  641. {
  642. dsf_makeValue(ds_main_list_item, "month"+yy+"_C", "string", "red", i);
  643. }
  644. else
  645. {
  646. dsf_makeValue(ds_main_list_item, "month"+yy+"_C", "string", "black", i);
  647. }
  648. }
  649. ds_main_list_item.updatecontrol = true;
  650. }
  651. }
  652. }
  653. function group2_input2_onkeyup(obj:Edit, e:KeyEventInfo)
  654. {
  655. if(e.keycode == 13)
  656. {
  657. obj.updateToDataset();
  658. group2.btn_srchhdmatnpat.click();
  659. }
  660. }
  661. function ds_main_condition_oncolumnchanged(obj:Dataset, e:DSColChangeEventInfo)
  662. {
  663. if(e.columnid == "pid")
  664. {
  665. ds_main_condition2.setColumn(0, "pid", "");
  666. ds_main_condition2.setColumn(0, "hngnm", "");
  667. }
  668. }
  669. function group2_combo2_onitemchanged(obj:Combo, e:ItemChangeEventInfo)
  670. {
  671. fSrchHDMatnPatList();
  672. }
  673. function group2_btn_srchhdmatnpat_onclick(obj:Button, e:ClickEventInfo)
  674. {
  675. fSrchHDMatnPatList();
  676. }
  677. function grd_hdmatnpatinfo_oncelldblclick(obj:Grid, e:GridClickEventInfo)
  678. {
  679. var iRow = ds_main_hdmatnpatlist_hdmatnpatinfo.rowposition;
  680. ds_hidden.setColumn(0, "gRow", iRow);
  681. if (iRow > -1)
  682. {
  683. fSrchHDSAQNInfo(iRow);
  684. ds_main_rsltlist_row.clearData();
  685. }
  686. }
  687. function button1_onclick(obj:Button, e:ClickEventInfo)
  688. {
  689. frmf_modal("SMMND05100", "SMMND05100", "", "", "", "", "", "", "", "", "", "", "M");
  690. }
  691. function grd_monthlist_onexpanddown(obj:Grid, e:GridMouseEventInfo)
  692. {
  693. rowidx = e.row;
  694. var setno;
  695. if( e.cell == obj.getBindCellIndex("Body", "rsltbtn"))
  696. {
  697. if (rowidx == 3)
  698. {
  699. setno = 582;
  700. fGetPDResultRef(setno);
  701. }
  702. else if(rowidx == 8)
  703. {
  704. setno = 581;
  705. fGetPDResultRef(setno);
  706. }
  707. else if(rowidx == 16)
  708. {
  709. setno = 580;
  710. fGetPDResultRef(setno);
  711. }
  712. else if(rowidx == 18)
  713. {
  714. setno = 583;
  715. fGetPDResultRef(setno);
  716. }
  717. }
  718. }
  719. function fGetPDResultRef(pSetno)
  720. {
  721. if(utlf_isNull(ds_main_condition2.getColumn(0, "pid")))
  722. {
  723. sysf_messageBox("등록번호를","C001","") ;
  724. return;
  725. }
  726. fInitDatagrid2();
  727. var vSelSlipcd = ds_hidden.getColumn(0, "testmdllist");
  728. if(!utlf_isNull(vSelSlipcd))
  729. {
  730. ds_hidden_ref.setColumn(0, "testmdllist", String(vSelSlipcd).substr(0, String(vSelSlipcd).length -1));
  731. }
  732. else
  733. {
  734. ds_hidden_ref.setColumn(0, "testmdllist", "");
  735. }
  736. ds_send_data1.copyData(ds_hidden_ref);
  737. dsf_makeValue(ds_send_setdata, "setno", "string", pSetno, 0);
  738. dsf_makeValue(ds_send_setdata, "workflag", "string", "", 0);
  739. dsf_makeValue(ds_send_setdata, "tclscdlist", "string", "", 0);
  740. var startdd = group4.ipt_date1.value ;
  741. var enddd = group4.ipt_date2.value ;
  742. dsf_makeValue(ds_send_setdata, "startdd", "string", startdd, 0);
  743. dsf_makeValue(ds_send_setdata, "enddd", "string", enddd, 0);
  744. dsf_makeValue(ds_send_setdata, "pid", "string", ds_main_condition2.getColumn(0, "pid"), 0);
  745. dsf_setTypeFormat(ds_send_setdata, "setno:INT");
  746. var oParam = {};
  747. oParam.id = "TRLLP01201";
  748. oParam.service = "refprintmngtapp.GeneralRefPrintMngt";
  749. oParam.method = "reqGetAcmlTestList2";
  750. oParam.inds = "cond=ds_send_setdata cond2=ds_send_setdata";
  751. oParam.outds = "ds_hidden_temp_rsltlist_row=row ds_hidden_temp_rsltlist_header=header ds_hidden_temp_rsltlist_patinfo=patinfo";
  752. oParam.async = false;
  753. //oParam.callback = "cf_TRLLP01201";
  754. tranf_submit(oParam);
  755. var gridCaption = ds_hidden_temp_rsltlist_header.getColumn(0, "caption");
  756. var gridCaptionArray = String(gridCaption).split("^");
  757. if(utlf_isNull(gridCaption))
  758. {
  759. return;
  760. }
  761. var gridColRef = ds_hidden_temp_rsltlist_header.getColumn(0, "colref");
  762. var gridColRefArray = String(gridColRef).split("^");
  763. var gridColType = ds_hidden_temp_rsltlist_header.getColumn(0, "type");
  764. var gridColTypeArray = String(gridColType).split("^");
  765. for (var i = 0; i < gridColRefArray.length; i++ )
  766. {
  767. if (gridColRefArray[i].substr(0, 4) == "rslt")
  768. {
  769. var tmpstr = "rsltORD".concat(gridColRefArray[i].substr(4));
  770. gridColRefArray[i] = tmpstr
  771. }
  772. }
  773. for( var i = 0; i < gridColRefArray.length; i++ )
  774. {
  775. datagrid2.appendContentsCol();
  776. datagrid2.setCellProperty("Head", parseInt(i+1), "text", gridCaptionArray[i]);
  777. datagrid2.setCellProperty("Body", parseInt(i+1), "text", "bind:"+gridColRefArray[i]);
  778. if(gridColTypeArray[i] != "output")
  779. {
  780. datagrid2.setCellProperty("Head", parseInt(i+1), "displaytype", gridColTypeArray[i]);
  781. datagrid2.setCellProperty("Body", parseInt(i+1), "displaytype", gridColTypeArray[i]);
  782. datagrid2.setCellProperty("Body", parseInt(i+1), "edittype", gridColTypeArray[i]);
  783. }
  784. }
  785. datagrid2.setFormatColProperty(1, "size", 22);
  786. datagrid2.setFormatColProperty(2, "size", 100);
  787. datagrid2.setFormatColProperty(3, "size", 100);
  788. datagrid2.setFormatColProperty(4, "size", 100);
  789. datagrid2.setFormatRowProperty(0, "size", 35);
  790. for(var j = 0; j < 5; j++)
  791. {
  792. datagrid2.setFormatColProperty(j, "band", "left");
  793. }
  794. for(var i = 5; i < datagrid2.getFormatColCount(); i++ )
  795. {
  796. datagrid2.setFormatColProperty(i, "size", 80);
  797. datagrid2.setCellProperty("Body", i, "align", "right middle");
  798. }
  799. ds_main_rsltlist_row.copyData(ds_hidden_temp_rsltlist_row);
  800. fReMake();
  801. }
  802. function fReMake()
  803. {
  804. xx = 0;
  805. for(var i = 0; i < ds_main_rsltlist_row.rowcount; i++)
  806. {
  807. for(var j = 5; j < datagrid2.getFormatColCount(); j++)
  808. {
  809. var vJudg = ds_main_rsltlist_row.getColumn(i, "judg" + xx);
  810. if(vJudg == "H")
  811. {
  812. dsf_makeValue(ds_main_rsltlist_row, j+"_color", "string", "red", i);
  813. }
  814. else if(vJudg == "L")
  815. {
  816. dsf_makeValue(ds_main_rsltlist_row, j+"_color", "string", "blue", i);
  817. }
  818. datagrid2.setCellProperty("Body", j, "color", "BIND("+j+"_color)");
  819. xx ++;
  820. }
  821. xx = 0;
  822. }
  823. }
  824. function fInitDatagrid2()
  825. {
  826. var cols = datagrid2.getFormatColCount();
  827. var rows = this.objects[datagrid2.binddataset].rowcount;
  828. if(ds_main_rsltlist_row.rowcount > 0)
  829. {
  830. for(var l = 4; l > -1; l--)
  831. {
  832. datagrid2.setFormatColProperty(l, "band", "body");
  833. }
  834. for( var i = cols; i > 0; i-- )
  835. {
  836. datagrid2.deleteContentsCol(i);
  837. }
  838. ds_main_rsltlist_row.clearData();
  839. }
  840. }
  841. function btn_getdata_onclick(obj:Button, e:ClickEventInfo)
  842. {
  843. var mitem, yyyymm;
  844. mitem = String(ds_main_condition.getColumn(0, "mons")).split("|");
  845. for (var i = 0; i < mitem.length; i++)
  846. {
  847. yyyymm = ds_main_condition2.getColumn(0, "srchdate") + mitem[i] ;
  848. dsf_makeValue(ds_send_reqdata, "yyyymm", "string", yyyymm, 0);
  849. if (utlf_isNull(yyyymm))
  850. {
  851. sysf_messageBox("자료수집하기 위해 기준월을 선택 후 작업하십시오.", "E", "");
  852. return;
  853. }
  854. fGetData(yyyymm); // 혈액투석 유지환자 리스트 자료수집
  855. }
  856. fsetColorHLValue();
  857. }
  858. function fGetData(srchdate)
  859. {
  860. var oParam = {};
  861. oParam.id = "TRMND05002";
  862. oParam.service = "dialapp.DialRec";
  863. oParam.method = "reqGetHDSAQNItemResult";
  864. oParam.inds = "req=ds_send_reqdata";
  865. oParam.outds = "ds_receive_item=item";
  866. oParam.async = false;
  867. //oParam.callback = "cf_TRMND05002";
  868. tranf_submit(oParam);
  869. var srchmon = String(srchdate).substring(4,6);
  870. ds_main_list_item.updatecontrol = false;
  871. dsf_makeValue(ds_main_list_item, "month"+srchmon, "string", ds_receive_item.getColumn(0, "rslt1"), 0);
  872. dsf_makeValue(ds_main_list_item, "month"+srchmon, "string", ds_receive_item.getColumn(0, "rslt2"), 1);
  873. dsf_makeValue(ds_main_list_item, "month"+srchmon, "string", ds_receive_item.getColumn(0, "rslt3"), 2);
  874. dsf_makeValue(ds_main_list_item, "month"+srchmon, "string", ds_receive_item.getColumn(0, "rslt4"), 3);
  875. dsf_makeValue(ds_main_list_item, "month"+srchmon, "string", ds_receive_item.getColumn(0, "rslt5"), 4);
  876. dsf_makeValue(ds_main_list_item, "month"+srchmon, "string", ds_receive_item.getColumn(0, "rslt6"), 5);
  877. dsf_makeValue(ds_main_list_item, "month"+srchmon, "string", ds_receive_item.getColumn(0, "rslt7"), 6);
  878. dsf_makeValue(ds_main_list_item, "month"+srchmon, "string", ds_receive_item.getColumn(0, "rslt8"), 7);
  879. dsf_makeValue(ds_main_list_item, "month"+srchmon, "string", ds_receive_item.getColumn(0, "rslt9"), 8);
  880. dsf_makeValue(ds_main_list_item, "month"+srchmon, "string", ds_receive_item.getColumn(0, "rslt10"), 9);
  881. dsf_makeValue(ds_main_list_item, "month"+srchmon, "string", ds_receive_item.getColumn(0, "rslt19"), 10);
  882. dsf_makeValue(ds_main_list_item, "month"+srchmon, "string", ds_receive_item.getColumn(0, "rslt11"), 11);
  883. dsf_makeValue(ds_main_list_item, "month"+srchmon, "string", ds_receive_item.getColumn(0, "rslt12"), 12);
  884. dsf_makeValue(ds_main_list_item, "month"+srchmon, "string", ds_receive_item.getColumn(0, "rslt13"), 13);
  885. dsf_makeValue(ds_main_list_item, "month"+srchmon, "string", ds_receive_item.getColumn(0, "rslt14"), 14);
  886. dsf_makeValue(ds_main_list_item, "month"+srchmon, "string", ds_receive_item.getColumn(0, "rslt15"), 15);
  887. dsf_makeValue(ds_main_list_item, "month"+srchmon, "string", ds_receive_item.getColumn(0, "rslt16"), 16);
  888. dsf_makeValue(ds_main_list_item, "month"+srchmon, "string", ds_receive_item.getColumn(0, "rslt17"), 17);
  889. dsf_makeValue(ds_main_list_item, "month"+srchmon, "string", ds_receive_item.getColumn(0, "rslt18"), 18);
  890. ds_main_list_item.updatecontrol = true;
  891. }
  892. function group4_button2_onclick(obj:Button, e:ClickEventInfo)
  893. {
  894. fSaveExcel();
  895. }
  896. function fSaveExcel()
  897. {
  898. grdf_exportExcel(grd_monthlist, "excel", "SheetName", "true", "", "");
  899. }
  900. function group4_input5_onkeyup(obj:Edit, e:KeyEventInfo)
  901. {
  902. if(e.keycode == 13)
  903. {
  904. obj.updateToDataset();
  905. group2.btn_srchhdmatnpat.click();
  906. }
  907. }
  908. function group4_ipt_srchdate_onchanged(obj:Calendar, e:ChangeEventInfo)
  909. {
  910. ds_main_condition2.setColumn(0, "srchdate", String(obj.value).substr(0,4));
  911. fSrchHDSAQNInfo(ds_main_hdmatnpatlist_hdmatnpatinfo.rowposition);
  912. ds_main_rsltlist_row.clearData();
  913. }
  914. function group4_btn_save_onclick(obj:Button, e:ClickEventInfo)
  915. {
  916. fSaveHDSAQNInfo();
  917. }
  918. function fSaveHDSAQNInfo()
  919. {
  920. ds_send_data1.clearData();
  921. var pid = ds_main_condition2.getColumn(0, "pid");
  922. var srchdate = ds_main_condition2.getColumn(0, "srchdate");
  923. var diagnm = ds_main_condition2.getColumn(0, "diagnm");
  924. var dmyn = ds_main_condition2.getColumn(0, "dmyn");
  925. var ordtype = ds_main_condition2.getColumn(0, "ordtype"); //20200305 추가
  926. if(utlf_isNull(diagnm))
  927. {
  928. sysf_messageBox("기저질환을 입력 후 작업하십시오.", "E", "");
  929. return;
  930. }
  931. dsf_makeValue(ds_send_reqdata, "pid", "string", pid, 0);
  932. dsf_makeValue(ds_send_reqdata, "srchdate", "string", srchdate, 0);
  933. dsf_makeValue(ds_send_reqdata, "diagnm", "string", diagnm, 0);
  934. dsf_makeValue(ds_send_reqdata, "ordtype", "string", ordtype, 0);
  935. var lstcnt = ds_main_list_item.rowcount;
  936. for(var i = 0; i < lstcnt; i++ )
  937. {
  938. dsf_makeValue(ds_main_list_item, "pid", "string", pid, i);
  939. dsf_makeValue(ds_main_list_item, "yyyy", "string", srchdate, i);
  940. dsf_makeValue(ds_main_list_item, "diagnm", "string", diagnm, i);
  941. dsf_makeValue(ds_main_list_item, "dmyn", "string", dmyn, i);
  942. dsf_makeValue(ds_main_list_item, "ordtype", "string", ordtype, i);
  943. ds_main_list_item.updatecontrol = false;
  944. ds_main_list_item.setRowType(i, "u");
  945. ds_main_list_item.updatecontrol = true;
  946. }
  947. ds_send_data1.copyData(grdf_getGridUpdateData(grd_monthlist));
  948. var oParam = {};
  949. oParam.id = "TXMND05001";
  950. oParam.service = "dialapp.DialRec";
  951. oParam.method = "reqExeHDSAQNInfo";
  952. oParam.inds = "req=ds_send_data1";
  953. oParam.outds = "ds_=item";
  954. oParam.async = false;
  955. oParam.callback = "cf_TXMND05001";
  956. tranf_submit(oParam);
  957. }
  958. function cf_TXMND05001(sSvcId, nErrorCode, sErrorMsg)
  959. {
  960. if(nErrorCode < 0) return;
  961. else
  962. {
  963. sysf_messageBox("저장","I002");
  964. var iRow = ds_hidden.getColumn(0, "gRow");
  965. fSrchHDSAQNInfo(iRow);
  966. grd_monthlist.hscrollbar.pos = hPos;
  967. }
  968. }
  969. function grd_monthlist_onhscroll(obj:Grid, e:ScrollEventInfo)
  970. {
  971. hPos = e.pos;
  972. }
  973. ]]></Script>
  974. </Form>
  975. </FDL>