SMLBP01000_혈액이력조회2.xfdl 29 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616617618619620621622623624625626627628
  1. <?xml version="1.0" encoding="utf-8"?>
  2. <FDL version="1.5">
  3. <TypeDefinition url="..\..\..\default_typedef.xml"/>
  4. <Form id="SMLBP01000" position="absolute 0 0 1260 805" titletext="혈액이력조회" oninit="model1_oninit">
  5. <Layouts>
  6. <Layout>
  7. <Div id="group1" position="absolute 0 0 1195 13" anchor="default" positiontype="position"/>
  8. <Static id="caption6" text="혈액이력조회" class="tit_1" position="absolute 0 0 189 25"/>
  9. <Div id="group2" taborder="2" style="align:center top;" position="absolute 0 26 1255 68" anchor="left top right" class="div_SA">
  10. <Layouts>
  11. <Layout>
  12. <Static id="caption2" text="혈액번호 :" class="search_name" position="absolute 8 10 82 30" anchor="default"/>
  13. <Button id="button1" taborder="1" text="조회" onclick="button1_onclick" class="btn1" position="absolute 1116 10 1172 30" anchor="top right"/>
  14. <Edit id="ipt_blodno" taborder="2" class="input_s_button" position="absolute 82 10 202 30" onkeydown="group2_ipt_blodno_onkeydown" anchor="default" autoselect="true"/>
  15. <CheckBox id="checkbox1" taborder="3" text="관공서" truevalue="Y" position="absolute 205 10 266 30" onchanged="group2_checkbox1_onchanged" anchor="default"/>
  16. <Button id="button5" taborder="4" text="초기화" onclick="button5_onclick" class="btn4" position="absolute 1177 10 1246 30" anchor="right bottom"/>
  17. <Button id="btn_search" taborder="5" position="absolute 184 12 200 28" style="background:skyblue;" onclick="group2_btn_search_onclick" anchor="default"/>
  18. </Layout>
  19. </Layouts>
  20. </Div>
  21. <Static id="caption26" text="성분제제 리스트" class="tit_2" position="absolute 0 76 131 96"/>
  22. <Grid id="grd_blodcomlist" taborder="3" useinputpanel="false" position="absolute 0 97 1256 250" style="align:center middle;" onclick="datagrid3_onclick" anchor="left top right" autofittype="col" binddataset="ds_grid_grd_blodcomlist" oncellclick="grd_blodcomlist_oncellclick" oncelldblclick="grd_blodcomlist_oncelldblclick">
  23. <Formats>
  24. <Format id="default">
  25. <Columns>
  26. <Column size="24"/>
  27. <Column size="80"/>
  28. <Column size="100"/>
  29. <Column size="70"/>
  30. <Column size="150"/>
  31. <Column size="100"/>
  32. <Column size="120"/>
  33. <Column size="120"/>
  34. <Column size="120"/>
  35. <Column size="90"/>
  36. <Column size="80"/>
  37. <Column size="90"/>
  38. </Columns>
  39. <Rows>
  40. <Row size="22" band="head"/>
  41. <Row size="24"/>
  42. </Rows>
  43. <Band id="head">
  44. <Cell/>
  45. <Cell col="1" text="구분"/>
  46. <Cell col="2" text="혈액번호"/>
  47. <Cell col="3" text="용량"/>
  48. <Cell col="4" text="성분제제"/>
  49. <Cell col="5" text="혈액형"/>
  50. <Cell col="6" text="입고일시"/>
  51. <Cell col="7" text="유효일시"/>
  52. <Cell col="8" text="헌혈일시"/>
  53. <Cell col="9" text="성분제제코드"/>
  54. <Cell col="10" text="혈액바코드"/>
  55. <Cell col="11" text="입고기관"/>
  56. </Band>
  57. <Band id="body">
  58. <Cell celltype="head" expr="expr:currow+1"/>
  59. <Cell col="1" text="bind:blodkind"/>
  60. <Cell col="2" text="bind:blodno"/>
  61. <Cell col="3" text="bind:blodbasevol"/>
  62. <Cell col="4" style="align:left middle;" text="bind:blodcomnm"/>
  63. <Cell col="5" text="bind:aborh"/>
  64. <Cell col="6" style="align:center middle;" text="bind:windt" mask="expr:windt==null?'':'####-##-## ##:##'"/>
  65. <Cell col="7" style="align:center middle;" text="bind:validt" mask="expr:validt==null?'':'####-##-## ##:##'"/>
  66. <Cell col="8" style="align:center middle;" text="bind:dondt" mask="expr:dondt==null?'':'####-##-## ##:##'"/>
  67. <Cell col="9" text="bind:blodcomcd"/>
  68. <Cell col="10" text="bind:blodbarcd"/>
  69. <Cell col="11" displaytype="combo" edittype="combo" style="align:left middle;" text="bind:wininstcd" combodataset="ds_init_lb0121" combocodecol="cd" combodatacol="nm" combodisplayrowcount="26"/>
  70. </Band>
  71. </Format>
  72. </Formats>
  73. </Grid>
  74. <Static id="caption5" text="헌혈자 정보" class="tit_2" position="absolute 0 260 131 280"/>
  75. <Edit id="output4" taborder="4" readonly="true" position="absolute 204 283 509 303" anchor="left top"/>
  76. <Edit id="output1" taborder="5" readonly="true" position="absolute 204 308 509 328" anchor="left top"/>
  77. <Edit id="output2" taborder="6" readonly="true" position="absolute 204 333 509 353" anchor="left top"/>
  78. <Edit id="output19" taborder="7" readonly="true" position="absolute 687 283 886 303" anchor="top right"/>
  79. <Static id="caption27" text="수혈자 정보" class="tit_2" position="absolute 523 260 654 280" anchor="left top right"/>
  80. <Edit id="output20" taborder="8" readonly="true" position="absolute 687 308 886 328" anchor="top right"/>
  81. <Edit id="output21" taborder="9" readonly="true" position="absolute 687 333 886 353" anchor="top right"/>
  82. <Edit id="output3" taborder="10" readonly="true" position="absolute 1053 308 1252 328" anchor="top right"/>
  83. <Edit id="output5" taborder="11" readonly="true" position="absolute 1053 333 1252 353" mask="yyyy-mm-dd hh:nn:ss" anchor="top right"/>
  84. <Edit id="output6" taborder="12" readonly="true" position="absolute 1053 283 1252 303" anchor="top right"/>
  85. <Static id="caption30" text="성명" class="cell_1" position="absolute 524 281 684 305" style="align:left middle;" anchor="left top right"/>
  86. <Static id="caption10" text="병동병실" class="cell_1" position="absolute 890 306 1050 330" style="align:left middle;" anchor="top right"/>
  87. <Static id="caption11" text="수혈희망일시" class="cell_1" position="absolute 890 331 1050 355" style="align:left middle;" anchor="top right"/>
  88. <Static id="caption28" text="Sex/Age" class="cell_1" position="absolute 524 306 684 330" style="align:left middle;" anchor="left top right"/>
  89. <Static id="caption9" text="의뢰의사" class="cell_1" position="absolute 890 281 1050 305" style="align:left middle;" anchor="top right"/>
  90. <Static id="caption29" text="진료과" class="cell_1" position="absolute 524 331 684 355" style="align:left middle;" anchor="left top right"/>
  91. <Static id="caption7" text="성명" class="cell_1" position="absolute 1 306 201 330" style="align:left middle;" anchor="left top"/>
  92. <Static id="caption8" text="Sex/Age" class="cell_1" position="absolute 1 331 201 355" style="align:left middle;" anchor="left top"/>
  93. <Static id="caption18" text="주민등록번호" class="cell_1" position="absolute 1 281 201 305" style="align:left middle;" anchor="left top"/>
  94. <Static id="caption4" text="혈액 이력 리스트" class="tit_2" position="absolute 0 365 131 385"/>
  95. <Button id="btn_excel" taborder="13" text="엑셀" class="btn7" position="absolute 1197 361 1254 381" anchor="top right" onclick="btn_excel_onclick"/>
  96. <Grid id="grd_blodhistlist2" taborder="16" useinputpanel="false" position="absolute 1 386 1256 804" anchor="all" autofittype="none" binddataset="ds_grid_grd_blodhistlist2" onrbuttondown="grd_blodhistlist2_onrbuttondown" cellsizingtype="both">
  97. <Formats>
  98. <Format id="default">
  99. <Columns>
  100. <Column size="24"/>
  101. <Column size="80"/>
  102. <Column size="80"/>
  103. <Column size="90"/>
  104. <Column size="110"/>
  105. <Column size="110"/>
  106. <Column size="65"/>
  107. <Column size="100"/>
  108. <Column size="170"/>
  109. <Column size="170"/>
  110. <Column size="90"/>
  111. <Column size="85"/>
  112. </Columns>
  113. <Rows>
  114. <Row size="22" band="head"/>
  115. <Row size="24"/>
  116. </Rows>
  117. <Band id="head">
  118. <Cell/>
  119. <Cell col="1" text="혈액번호"/>
  120. <Cell col="2" text="상태"/>
  121. <Cell col="3" text="제제명"/>
  122. <Cell col="4" text="입고일시"/>
  123. <Cell col="5" text="수혈일시"/>
  124. <Cell col="6" text="성명"/>
  125. <Cell col="7" text="주민등록번호"/>
  126. <Cell col="8" text="주소"/>
  127. <Cell col="9" text="진단명"/>
  128. <Cell col="10" text="핸드폰번호"/>
  129. <Cell col="11" text="집전화"/>
  130. </Band>
  131. <Band id="body">
  132. <Cell celltype="head" expr="expr:currow+1"/>
  133. <Cell col="1" text="bind:blodno"/>
  134. <Cell col="2" text="bind:blodcomstat"/>
  135. <Cell col="3" text="bind:blodcomnm"/>
  136. <Cell col="4" text="bind:windt" mask="expr:windt==null?'':'####-##-## ##:##'"/>
  137. <Cell col="5" text="bind:tnsstrddtm" mask="expr:tnsstrddtm==null?'':'####-##-## ##:##'"/>
  138. <Cell col="6" text="bind:patnm"/>
  139. <Cell col="7" text="bind:rrgstno"/>
  140. <Cell col="8" style="align:left;" text="bind:addr"/>
  141. <Cell col="9" style="align:left;" text="bind:termhngnm"/>
  142. <Cell col="10" style="align:left middle;" text="bind:mpphontel"/>
  143. <Cell col="11" text="bind:hometel"/>
  144. </Band>
  145. </Format>
  146. </Formats>
  147. </Grid>
  148. <Grid id="grd_blodhistlist" taborder="18" useinputpanel="false" autofittype="col" position="absolute 1 386 1256 803" anchor="all" binddataset="ds_grid_grd_blodhistlist" onrbuttondown="grd_blodhistlist_onrbuttondown" selecttype="row" autosizingtype="none" cellsizingtype="col">
  149. <Formats>
  150. <Format id="default">
  151. <Columns>
  152. <Column size="24"/>
  153. <Column size="80"/>
  154. <Column size="90"/>
  155. <Column size="117"/>
  156. <Column size="110"/>
  157. <Column size="62"/>
  158. <Column size="74"/>
  159. <Column size="62"/>
  160. <Column size="40"/>
  161. <Column size="74"/>
  162. <Column size="62"/>
  163. <Column size="110"/>
  164. <Column size="50"/>
  165. <Column size="40"/>
  166. <Column size="120"/>
  167. <Column size="80"/>
  168. </Columns>
  169. <Rows>
  170. <Row size="24" band="head"/>
  171. <Row size="24"/>
  172. </Rows>
  173. <Band id="head">
  174. <Cell/>
  175. <Cell col="1" text="혈액번호"/>
  176. <Cell col="2" text="성분제제"/>
  177. <Cell col="3" text="작업구분"/>
  178. <Cell col="4" text="작업일시"/>
  179. <Cell col="5" text="작업자"/>
  180. <Cell col="6" text="수령자ID"/>
  181. <Cell col="7" text="수령자"/>
  182. <Cell col="8" text="구분"/>
  183. <Cell col="9" text="등록번호"/>
  184. <Cell col="10" text="성명"/>
  185. <Cell col="11" text="수혈희망일시"/>
  186. <Cell col="12" text="ABO"/>
  187. <Cell col="13" text="Rh"/>
  188. <Cell col="14" text="반납/폐기사유"/>
  189. <Cell col="15" text="출고구분"/>
  190. </Band>
  191. <Band id="body">
  192. <Cell celltype="head" expr="expr:currow+1"/>
  193. <Cell col="1" displaytype="text" text="bind:blodno"/>
  194. <Cell col="2" style="align:left middle;" text="bind:blodcomnm"/>
  195. <Cell col="3" style="align:left middle;" text="bind:state"/>
  196. <Cell col="4" style="align:left middle;" text="bind:execdt" mask="expr:execdt==null?'':'####-##-## ##:##'"/>
  197. <Cell col="5" text="bind:execnm"/>
  198. <Cell col="6" text="bind:acptid"/>
  199. <Cell col="7" text="bind:acptnm"/>
  200. <Cell col="8" text="bind:gbn"/>
  201. <Cell col="9" displaytype="text" text="bind:pid"/>
  202. <Cell col="10" text="bind:patnm"/>
  203. <Cell col="11" text="bind:prcphopedt" mask="expr:prcphopedt==null?'':'####-##-## ##:##'"/>
  204. <Cell col="12" style="align:right middle;" text="bind:abo"/>
  205. <Cell col="13" style="align:left middle;" text="bind:rh"/>
  206. <Cell col="14" style="align:left;" text="bind:rtnabnresn"/>
  207. <Cell col="15" text="bind:iokind"/>
  208. </Band>
  209. </Format>
  210. </Formats>
  211. </Grid>
  212. <PopupMenu id="pMenu" innerdataset="ds_popupmenu" idcolumn="idx" captioncolumn="name" levelcolumn="idx" enablecolumn="enable" hotkeycolumn="hotkey" userdatacolumn="func" class="pmenu_TF_members" position="absolute 235 588 357 616" onmenuclick="pMenu_onmenuclick"/>
  213. <Shape id="line12" class="line_1" position="absolute -1 92 1255 98" style="strokepen:3 solid #33bbbbff;" anchor="left top right"/>
  214. <Shape id="line00" class="line_1" position="absolute 0 276 511 282" style="strokepen:3 solid #33bbbbff;" anchor="left top"/>
  215. <Shape id="line01" class="line_1" position="absolute 0 381 1255 387" style="strokepen:3 solid #33bbbbff;" anchor="left top right"/>
  216. <Shape id="line02" class="line_1" position="absolute 523 276 1250 282" style="strokepen:3 solid #33bbbbff;" anchor="left top right"/>
  217. </Layout>
  218. </Layouts>
  219. <Objects>
  220. <Dataset id="ds_grid_grd_blodcomlist" firefirstcount="0" firenextcount="0" useclientlayout="true" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false" onrowposchanged="ds_grid_grd_rslt_onrowposchanged">
  221. <ColumnInfo>
  222. <column id="blodkind" type="STRING" size="256"/>
  223. <column id="blodno" type="STRING" size="256"/>
  224. <column id="blodbasevol" type="STRING" size="256"/>
  225. <column id="blodcomnm" type="STRING" size="256"/>
  226. <column id="aborh" type="STRING" size="256"/>
  227. <column id="windt" type="STRING" size="256"/>
  228. <column id="validt" type="STRING" size="256"/>
  229. <column id="dondt" type="STRING" size="256"/>
  230. <column id="blodcomcd" type="STRING" size="256"/>
  231. <column id="blodbarcd" type="STRING" size="256"/>
  232. <column id="wininstcd" type="STRING" size="256"/>
  233. </ColumnInfo>
  234. </Dataset>
  235. <Dataset id="ds_grid_grd_blodhistlist" firefirstcount="0" firenextcount="0" useclientlayout="true" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false" onrowposchanged="ds_grid_grd_rslt_onrowposchanged">
  236. <ColumnInfo>
  237. <column id="blodno" type="STRING" size="256"/>
  238. <column id="blodcomnm" type="STRING" size="256"/>
  239. <column id="state" type="STRING" size="256"/>
  240. <column id="execdt" type="STRING" size="256"/>
  241. <column id="execnm" type="STRING" size="256"/>
  242. <column id="acptid" type="STRING" size="256"/>
  243. <column id="acptnm" type="STRING" size="256"/>
  244. <column id="gbn" type="STRING" size="256"/>
  245. <column id="pid" type="STRING" size="256"/>
  246. <column id="patnm" type="STRING" size="256"/>
  247. <column id="prcphopedt" type="STRING" size="256"/>
  248. <column id="abo" type="STRING" size="256"/>
  249. <column id="rh" type="STRING" size="256"/>
  250. <column id="rtnabnresn" type="STRING" size="256"/>
  251. <column id="iokind" type="STRING" size="256"/>
  252. </ColumnInfo>
  253. </Dataset>
  254. <Dataset id="ds_init_lb0121" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  255. <ColumnInfo>
  256. <Column id="cd" type="STRING" size="256"/>
  257. <Column id="nm" type="STRING" size="256"/>
  258. <Column id="etc01" type="STRING" size="256"/>
  259. </ColumnInfo>
  260. </Dataset>
  261. <Dataset id="ds_grid_grd_blodhistlist2" firefirstcount="0" firenextcount="0" useclientlayout="true" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false" onrowposchanged="ds_grid_grd_rslt_onrowposchanged">
  262. <ColumnInfo>
  263. <column id="blodno" type="STRING" size="256"/>
  264. <column id="blodcomnm" type="STRING" size="256"/>
  265. <column id="windt" type="STRING" size="256"/>
  266. <column id="tnsstrddtm" type="STRING" size="256"/>
  267. <column id="patnm" type="STRING" size="256"/>
  268. <column id="rrgstno" type="STRING" size="256"/>
  269. <column id="addr" type="STRING" size="256"/>
  270. <column id="termhngnm" type="STRING" size="256"/>
  271. <column id="mpphontel" type="STRING" size="256"/>
  272. <column id="hometel" type="STRING" size="256"/>
  273. <column id="blodcomstat" type="STRING" size="256"/>
  274. </ColumnInfo>
  275. </Dataset>
  276. <Dataset id="ds_data_doninfo" firefirstcount="0" firenextcount="0" useclientlayout="true" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false" onrowposchanged="ds_grid_grd_rslt_onrowposchanged">
  277. <ColumnInfo>
  278. <column id="rrgstno" type="STRING" size="256"/>
  279. <column id="patnm" type="STRING" size="256"/>
  280. <column id="sexage" type="STRING" size="256"/>
  281. </ColumnInfo>
  282. </Dataset>
  283. <Dataset id="ds_data_tnsinfo" firefirstcount="0" firenextcount="0" useclientlayout="true" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false" onrowposchanged="ds_grid_grd_rslt_onrowposchanged">
  284. <ColumnInfo>
  285. <column id="patnm" type="STRING" size="256"/>
  286. <column id="sexage" type="STRING" size="256"/>
  287. <column id="orddeptnm" type="STRING" size="256"/>
  288. <column id="orddrnm" type="STRING" size="256"/>
  289. <column id="wardroom" type="STRING" size="256"/>
  290. <column id="prcphopedt" type="STRING" size="256"/>
  291. </ColumnInfo>
  292. </Dataset>
  293. <Dataset id="ds_popupmenu" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  294. <ColumnInfo>
  295. <Column id="idx" type="STRING" size="256"/>
  296. <Column id="name" type="STRING" size="256"/>
  297. <Column id="func" type="STRING" size="256"/>
  298. </ColumnInfo>
  299. <Rows>
  300. <Row>
  301. <Col id="name">삭제</Col>
  302. <Col id="func">lf_mouseDown</Col>
  303. <Col id="idx">1</Col>
  304. </Row>
  305. </Rows>
  306. </Dataset>
  307. <Dataset id="ds_copy_grd_blodhistlist2" firefirstcount="0" firenextcount="0" useclientlayout="true" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false" onrowposchanged="ds_grid_grd_rslt_onrowposchanged">
  308. <ColumnInfo>
  309. <column id="blodno" type="STRING" size="256"/>
  310. <column id="blodcomnm" type="STRING" size="256"/>
  311. <column id="windt" type="STRING" size="256"/>
  312. <column id="tnsstrddtm" type="STRING" size="256"/>
  313. <column id="patnm" type="STRING" size="256"/>
  314. <column id="rrgstno" type="STRING" size="256"/>
  315. <column id="addr" type="STRING" size="256"/>
  316. <column id="termhngnm" type="STRING" size="256"/>
  317. <column id="mpphontel" type="STRING" size="256"/>
  318. <column id="hometel" type="STRING" size="256"/>
  319. <column id="blodcomstat" type="STRING" size="256"/>
  320. </ColumnInfo>
  321. </Dataset>
  322. </Objects>
  323. <Bind>
  324. <BindItem id="item0" compid="output19" propid="value" datasetid="ds_data_tnsinfo" columnid="patnm"/>
  325. <BindItem id="item1" compid="output6" propid="value" datasetid="ds_data_tnsinfo" columnid="orddrnm"/>
  326. <BindItem id="item2" compid="output20" propid="value" datasetid="ds_data_tnsinfo" columnid="sexage"/>
  327. <BindItem id="item3" compid="output3" propid="value" datasetid="ds_data_tnsinfo" columnid="wardroom"/>
  328. <BindItem id="item4" compid="output21" propid="value" datasetid="ds_data_tnsinfo" columnid="orddeptnm"/>
  329. <BindItem id="item5" compid="output5" propid="value" datasetid="ds_data_tnsinfo" columnid="prcphopedt"/>
  330. </Bind>
  331. <Script type="xscript4.0"><![CDATA[/***************************************************************************************
  332. * System Name :
  333. * Job Name :
  334. * Creator :
  335. * Make Date : 2015-05-01
  336. * Description :
  337. *---------------------------------------------------------------------------------------
  338. * Modify Date Modifier Modify Description
  339. *---------------------------------------------------------------------------------------
  340. * 2015-05-01 Live Converter TF->XP
  341. *
  342. *---------------------------------------------------------------------------------------
  343. ****************************************************************************************/
  344. include "com_commonxp::comm_main.xjs";
  345. include "lis_commonxp::LZZ001.xjs";
  346. include "lis_commonxp::LLZ001.xjs";
  347. function model1_oninit(obj:Form, e:InitEventInfo)
  348. {
  349. //폼 초기화 함수
  350. frmf_initForm(obj);
  351. grdf_setToolTipBind(grd_blodcomlist);
  352. grdf_setToolTipBind(grd_blodhistlist);
  353. grdf_setToolTipBind(grd_blodhistlist2);
  354. lf_setInit();
  355. }
  356. function lf_setInit() {
  357. //0121 혈액원기관코드
  358. lf_getDbDeptcd("0000|0121|","cbf_SMLBP01000");
  359. }
  360. function lf_bloodHistRef() {
  361. ds_grid_grd_blodhistlist.clearData();
  362. var blodno = group2.ipt_blodno.value;
  363. var sInDsName = dsf_createDsRow("ds_temp_search"
  364. , [{col: "blodno", val:blodno }
  365. ]);
  366. var oParam = {};
  367. oParam.id = "TRLBP01001";
  368. oParam.service = "refprintmngtapp.BloodBankRefPrintMngt";
  369. oParam.method = "reqGetBlodInfoRefGGS";
  370. oParam.inds = "cond="+sInDsName;
  371. oParam.outds = "ds_grid_grd_blodcomlist=blodcomlist";
  372. oParam.async = false;
  373. oParam.callback = "cbf_SMLBP01000";
  374. tranf_submit(oParam);
  375. }
  376. function lf_blodHistList(gbn) {
  377. var row = 0;
  378. if(group2.checkbox1.value <> "Y") {
  379. if(gbn == "1") {
  380. row = 0;
  381. }else {
  382. row = ds_grid_grd_blodcomlist.rowposition;
  383. }
  384. var blodno = ds_grid_grd_blodcomlist.getColumn(ds_grid_grd_blodcomlist.rowposition, "blodno");
  385. var blodcomcd = ds_grid_grd_blodcomlist.getColumn(ds_grid_grd_blodcomlist.rowposition, "blodcomcd");
  386. var blodbarcd = ds_grid_grd_blodcomlist.getColumn(ds_grid_grd_blodcomlist.rowposition, "blodbarcd");
  387. var sInDsName = dsf_createDsRow("ds_temp_search"
  388. , [{col: "blodcomcd", val:blodcomcd }
  389. , {col: "blodno" , val:blodno }
  390. , {col: "blodbarcd", val:blodbarcd }
  391. ]);
  392. var oParam = {};
  393. oParam.id = "TRLBP01002";
  394. oParam.service = "refprintmngtapp.BloodBankRefPrintMngt";
  395. oParam.method = "reqGetBlodHistInfoRefGGS";
  396. oParam.inds = "cond="+sInDsName;
  397. oParam.outds = "ds_grid_grd_blodhistlist=blodhistlist ds_data_tnsinfo=tnsinfo ds_data_doninfo=doninfo";
  398. oParam.async = false;
  399. oParam.callback = "cbf_SMLBP01000";
  400. tranf_submit(oParam);
  401. }
  402. }
  403. // 관공서용 조회
  404. function lf_blodHistList2(gbn)
  405. {
  406. // 관공서 체크된것만 갑니다.
  407. var blodno = ds_grid_grd_blodcomlist.getColumn(ds_grid_grd_blodcomlist.rowposition, "blodno");
  408. var blodcomcd = ds_grid_grd_blodcomlist.getColumn(ds_grid_grd_blodcomlist.rowposition, "blodcomcd");
  409. var blodbarcd = ds_grid_grd_blodcomlist.getColumn(ds_grid_grd_blodcomlist.rowposition, "blodbarcd");
  410. var GGSgbn = group2.checkbox1.truevalue;
  411. var sInDsName = dsf_createDsRow("ds_temp_search"
  412. , [{col: "blodcomcd", val:blodcomcd }
  413. , {col: "blodno", val:blodno }
  414. , {col: "blodbarcd", val:blodbarcd }
  415. , {col: "GGSgbn", val:GGSgbn }]);
  416. var oParam = {};
  417. oParam.id = "TRLBP01003";
  418. oParam.service = "refprintmngtapp.BloodBankRefPrintMngt";
  419. oParam.method = "reqGetBlodHistInfoRefGGS";
  420. oParam.inds = "cond="+sInDsName;
  421. oParam.outds = "ds_copy_grd_blodhistlist2=blodhistlist ds_data_tnsinfo=tnsinfo ds_data_doninfo=doninfo";
  422. oParam.async = false;
  423. oParam.callback = "cbf_SMLBP01000";
  424. tranf_submit(oParam);
  425. }
  426. //혈액이력리스트 그리드
  427. function lf_gridViewblodlist() {
  428. if(group2.checkbox1.value == "Y") {
  429. grd_blodhistlist.visible = false; // 일반혈액이력리스트
  430. grd_blodhistlist2.visible = true; // 관공서용 이력리스트
  431. }else{
  432. grd_blodhistlist.visible = true;
  433. grd_blodhistlist2.visible = false;
  434. }
  435. }
  436. // 혈액번호 enter key 입력 처리
  437. function lf_keyEvent()
  438. {
  439. var blodno = group2.ipt_blodno.value;
  440. group2.ipt_blodno.value = utlf_transNullToEmpty(blodno).substr(0,10);
  441. lf_bloodHistRef();
  442. group2.ipt_blodno.setSelect();
  443. }
  444. // 관공서 클릭하면 노드 초기화
  445. function lf_sethistnodeclear(){
  446. lf_gridViewblodlist();
  447. ds_grid_grd_blodcomlist.clearData();
  448. ds_grid_grd_blodhistlist.clearData();
  449. ds_grid_grd_blodhistlist2.clearData();
  450. ds_data_doninfo.clearData();
  451. ds_data_tnsinfo.clearData();
  452. }
  453. // 엑셀 저장
  454. function lf_saveExcel(pGridId) {
  455. grdf_exportExcel(pGridId, lf_lisGetTitle(this), "sheet1", false);
  456. }
  457. // 혈액이력리스트에서 삭제
  458. function lf_delblodhistory(num) {
  459. if(num==1) {
  460. ds_grid_grd_blodhistlist.deleteRow(ds_grid_grd_blodhistlist.rowposition);
  461. }else{
  462. ds_grid_grd_blodhistlist2.deleteRow(ds_grid_grd_blodhistlist2.rowposition);
  463. }
  464. }
  465. // callback 함수
  466. function cbf_SMLBP01000(strSvcID, nErrorCode, strErrorMag) {
  467. if(nErrorCode != 0) {
  468. sysf_messageBox("ID: "+ strSvcID + " Error: " + strErrorMag, "E009", "");
  469. }else{
  470. switch(strSvcID) {
  471. case "TRLZZ00101":
  472. lf_gridViewblodlist(); // 혈액이력리스트 그리드 보여주기 *** 이력리스트그리드 2개입니다
  473. ds_grid_grd_blodcomlist.clearData();
  474. ds_grid_grd_blodhistlist.clearData();
  475. ds_grid_grd_blodhistlist2.clearData();
  476. ds_data_doninfo.clearData();
  477. ds_data_tnsinfo.clearData();
  478. group2.ipt_blodno.setFocus();
  479. group2.checkbox1.value = "";
  480. break;
  481. case "TRLBP01001":
  482. // 성분제제리스트 있으면 첫번째성분으로 혈액이력조회
  483. if(ds_grid_grd_blodcomlist.rowcount > 0)
  484. {
  485. // 관공서 체크돼있으면 이력조회 안되게
  486. if(group2.checkbox1.value == "Y")
  487. {
  488. // 성분제제리스트가 하나면 혈액이력리스트에 보여주기
  489. if(ds_grid_grd_blodcomlist.rowcount == 1)
  490. {
  491. lf_blodHistList2("1");
  492. }
  493. }
  494. else
  495. {
  496. lf_blodHistList("1");
  497. }
  498. ds_grid_grd_blodcomlist.rowposition = 0;
  499. }
  500. break;
  501. case "TRLBP01002":
  502. break;
  503. case "TRLBP01003":
  504. ds_grid_grd_blodhistlist2.appendData(ds_copy_grd_blodhistlist2, true)
  505. break;
  506. default:
  507. break;
  508. }
  509. }
  510. }
  511. function grd_blodhistlist_onrbuttondown(obj:Grid, e:GridMouseEventInfo)
  512. {
  513. pMenu.trackPopup(e.screenX, e.screenY);
  514. }
  515. function datagrid1_onmouseleave(obj:Grid, e:MouseEventInfo)
  516. {
  517. }
  518. function grd_blodhistlist2_onrbuttondown(obj:Grid, e:GridMouseEventInfo)
  519. {
  520. pMenu.trackPopup(e.screenX, e.screenY);
  521. }
  522. function datagrid2_onmouseleave(obj:Grid, e:MouseEventInfo)
  523. {
  524. }
  525. function pMenu_onmenuclick(obj:PopupMenu, e:MenuClickEventInfo)
  526. {
  527. if(e.userdata == "lf_mouseDown"){
  528. if(grd_blodhistlist.visible) {
  529. lf_delblodhistory(1);
  530. }else {
  531. lf_delblodhistory(2);
  532. }
  533. }
  534. }
  535. function button1_onclick(obj:Button, e:ClickEventInfo)
  536. {
  537. lf_bloodHistRef();
  538. }
  539. function group2_ipt_blodno_onkeydown(obj:Edit, e:KeyEventInfo)
  540. {
  541. if(e.keycode==13) {
  542. lf_keyEvent();
  543. }
  544. }
  545. function group2_checkbox1_onchanged(obj:CheckBox, e:CheckBoxChangeEventInfo)
  546. {
  547. // 관공서 선택하면 노드 초기화
  548. lf_sethistnodeclear();
  549. }
  550. function grd_blodcomlist_oncellclick(obj:Grid, e:GridClickEventInfo)
  551. {
  552. // 혈액번호 입력했을때 , 관공서 아니고
  553. lf_blodHistList();
  554. }
  555. function grd_blodcomlist_oncelldblclick(obj:Grid, e:GridClickEventInfo)
  556. {
  557. // 관공서용 더블클릭
  558. lf_blodHistList2();
  559. }
  560. // 엑셀 저장
  561. function lf_exeExcel(pGridId,pGridNm)
  562. {
  563. grdf_exportExcel(pGridId, lf_lisGetTitle(this), false);
  564. }
  565. function button5_onclick(obj:Button, e:ClickEventInfo)
  566. {
  567. lf_setInit();
  568. }
  569. function group2_btn_search_onclick(obj:Button, e:ClickEventInfo)
  570. {
  571. lf_keyEvent();
  572. }
  573. function btn_excel_onclick(obj:Button, e:ClickEventInfo)
  574. {
  575. if(group2.checkbox1.value == "Y")
  576. {
  577. lf_exeExcel(grd_blodhistlist2, "혈액이력조회");
  578. }
  579. else
  580. {
  581. lf_exeExcel(grd_blodhistlist, "혈액이력조회");
  582. }
  583. }
  584. ]]></Script>
  585. </Form>
  586. </FDL>