SPPIZ01800_수혈심사.xfdl 52 KB

1234567891011121314151617181920212223242526272829303132333435363738394041424344454647484950515253545556575859606162636465666768697071727374757677787980818283848586878889909192939495969798991001011021031041051061071081091101111121131141151161171181191201211221231241251261271281291301311321331341351361371381391401411421431441451461471481491501511521531541551561571581591601611621631641651661671681691701711721731741751761771781791801811821831841851861871881891901911921931941951961971981992002012022032042052062072082092102112122132142152162172182192202212222232242252262272282292302312322332342352362372382392402412422432442452462472482492502512522532542552562572582592602612622632642652662672682692702712722732742752762772782792802812822832842852862872882892902912922932942952962972982993003013023033043053063073083093103113123133143153163173183193203213223233243253263273283293303313323333343353363373383393403413423433443453463473483493503513523533543553563573583593603613623633643653663673683693703713723733743753763773783793803813823833843853863873883893903913923933943953963973983994004014024034044054064074084094104114124134144154164174184194204214224234244254264274284294304314324334344354364374384394404414424434444454464474484494504514524534544554564574584594604614624634644654664674684694704714724734744754764774784794804814824834844854864874884894904914924934944954964974984995005015025035045055065075085095105115125135145155165175185195205215225235245255265275285295305315325335345355365375385395405415425435445455465475485495505515525535545555565575585595605615625635645655665675685695705715725735745755765775785795805815825835845855865875885895905915925935945955965975985996006016026036046056066076086096106116126136146156166176186196206216226236246256266276286296306316326336346356366376386396406416426436446456466476486496506516526536546556566576586596606616626636646656666676686696706716726736746756766776786796806816826836846856866876886896906916926936946956966976986997007017027037047057067077087097107117127137147157167177187197207217227237247257267277287297307317327337347357367377387397407417427437447457467477487497507517527537547557567577587597607617627637647657667677687697707717727737747757767777787797807817827837847857867877887897907917927937947957967977987998008018028038048058068078088098108118128138148158168178188198208218228238248258268278288298308318328338348358368378388398408418428438448458468478488498508518528538548558568578588598608618628638648658668678688698708718728738748758768778788798808818828838848858868878888898908918928938948958968978988999009019029039049059069079089099109119129139149159169179189199209219229239249259269279289299309319329339349359369379389399409419429439449459469479489499509519529539549559569579589599609619629639649659669679689699709719729739749759769779789799809819829839849859869879889899909919929939949959969979989991000100110021003100410051006100710081009101010111012101310141015101610171018101910201021102210231024102510261027102810291030103110321033103410351036103710381039104010411042104310441045104610471048104910501051105210531054105510561057105810591060106110621063106410651066106710681069
  1. <?xml version="1.0" encoding="utf-8"?>
  2. <FDL version="1.5">
  3. <TypeDefinition url="..\..\..\default_typedef.xml"/>
  4. <Form id="SPPIZ01800" position="absolute 0 0 1200 761" titletext="수혈심사" oninit="SPPIZ01800_oninit" onload="SPPIZ01800_onload">
  5. <Layouts>
  6. <Layout>
  7. <Static text="수혈심사" position="absolute 1 0 217 23" align="align:center middle;" id="caption11" class="tit_1"/>
  8. <ActiveX position="absolute 950 55 1130 90" id="tfexcel" progid="{fe8d1001-6a9d-424d-ae2a-301493bb12da}" visible="false"/>
  9. <Div id="group2" taborder="1" position="absolute 1 24 1195 83" anchor="left top right" class="div_SA">
  10. <Layouts>
  11. <Layout>
  12. <Shape id="line13" linetype="vertical" position="absolute 1110 31 1116 53" anchor="top right"/>
  13. <Static id="caption1" text="진료과 :" class="search_name" position="absolute 700 9 786 26"/>
  14. <Static id="caption3" text="불출일자 :" class="search_name" position="absolute 15 9 111 26"/>
  15. <Static id="caption4" text="병동 :" class="search_name" position="absolute 500 33 586 50"/>
  16. <Static id="caption9" text="심사자 :" class="search_name" position="absolute 314 9 400 26"/>
  17. <Static id="caption14" text="혈액성분 :" class="search_name" position="absolute 920 33 1006 50"/>
  18. <Button id="btn_search" taborder="1" text="조회" class="btn1" position="absolute 1128 31 1184 53" onclick="group2_btn_search_onclick" anchor="top right"/>
  19. <Static id="caption2" text="환자번호 : " class="search_name" position="absolute 15 33 111 50" onclick="group2_caption2_onclick"/>
  20. <Edit id="ipt_pid" taborder="2" class="input_default" position="absolute 104 32 189 51" onkeydown="group2_ipt_pid_onkeydown"/>
  21. <Static id="caption5" text="진료의사 :" class="search_name" position="absolute 920 10 1006 27"/>
  22. <Edit id="opt_sexage" taborder="3" readonly="true" class="output_search" position="absolute 259 32 309 51"/>
  23. <Calendar id="ipt_fromdd" taborder="4" class="input_search" position="absolute 104 8 189 27" mask="yyyy-mm-dd" dateformat="yyyy-MM-dd dd" value="null" usebitmapcache="false"/>
  24. <Calendar id="ipt_todd" taborder="5" class="input_search" position="absolute 192 8 277 27" mask="yyyy-mm-dd"/>
  25. <Combo id="cmb_judgrid" taborder="6" innerdataset="ds_init_cmb_judgrid" codecolumn="judgrid" datacolumn="judgrnm" class="combo_search" position="absolute 391 8 481 27"/>
  26. <Combo id="cmb_wardcd" taborder="7" innerdataset="ds_init_cmb_wardcd" codecolumn="cd" datacolumn="nm" class="combo_search" position="absolute 564 32 688 51"/>
  27. <Combo id="cmb_orddeptcd" taborder="8" innerdataset="ds_init_cmb_orddeptcd" codecolumn="cd" datacolumn="nm" class="combo_search" position="absolute 777 8 897 27" onitemchanged="group2_cmb_orddeptcd_onitemchanged"/>
  28. <Combo id="cmb_orddrid" taborder="9" innerdataset="ds_init_cmb_orddrid" codecolumn="cd" datacolumn="nm" class="combo_search" position="absolute 1010 8 1100 27"/>
  29. <Edit id="opt_patnm" taborder="10" readonly="true" class="output_search" position="absolute 192 32 257 51"/>
  30. <Button id="btn_srchpid" taborder="11" class="icon_search" position="absolute 314 32 330 48" onclick="group2_btn_srchpid_onclick"/>
  31. <CheckBox id="chk_termflag" taborder="12" position="absolute 342 33 472 48" text="재원기간 전체"/>
  32. <Static id="caption8" text="외래입원구분 :" class="search_name" position="absolute 500 9 612 26"/>
  33. <Combo id="combo1" taborder="13" codecolumn="codecolumn" datacolumn="datacolumn" class="combo_search" position="absolute 616 8 688 27" onitemchanged="group2_combo1_onitemchanged">
  34. <Dataset id="innerdataset">
  35. <ColumnInfo>
  36. <Column id="codecolumn"/>
  37. <Column id="datacolumn"/>
  38. </ColumnInfo>
  39. <Rows>
  40. <Row>
  41. <Col id="codecolumn"/>
  42. <Col id="datacolumn"/>
  43. </Row>
  44. <Row>
  45. <Col id="codecolumn">O</Col>
  46. <Col id="datacolumn">외래</Col>
  47. </Row>
  48. <Row>
  49. <Col id="codecolumn">I</Col>
  50. <Col id="datacolumn">입원</Col>
  51. </Row>
  52. </Rows>
  53. </Dataset>
  54. </Combo>
  55. <Combo id="cmb_bloodgb" taborder="14" class="combo_search" position="absolute 1010 32 1100 51" innerdataset="ds_P0470list" datacolumn="cdnm" codecolumn="cdid"/>
  56. </Layout>
  57. </Layouts>
  58. <InitValue>
  59. <Combo id="cmb_bloodgb" innerdataset="@ds_P0470list" datacolumn="cdnm" codecolumn="cdid"/>
  60. </InitValue>
  61. </Div>
  62. <Static id="caption32" text="수혈대상자" class="tit_2" position="absolute 3 92 108 114"/>
  63. <Grid id="grd_bloodpat" class="datagrid2" taborder="2" binddataset="ds_grd_bloodpat" useinputpanel="false" position="absolute 1 114 676 294" autofittype="col" oncelldblclick="grd_bloodpat_oncelldblclick" cellsizingtype="col">
  64. <Formats>
  65. <Format id="default">
  66. <Columns>
  67. <Column size="26"/>
  68. <Column size="90"/>
  69. <Column size="60"/>
  70. <Column size="80"/>
  71. <Column size="80"/>
  72. <Column size="90"/>
  73. <Column size="90"/>
  74. <Column size="153"/>
  75. <Column size="0"/>
  76. <Column size="0"/>
  77. <Column size="0"/>
  78. <Column size="0"/>
  79. <Column size="0"/>
  80. </Columns>
  81. <Rows>
  82. <Row size="24" band="head"/>
  83. <Row size="24"/>
  84. </Rows>
  85. <Band id="head">
  86. <Cell/>
  87. <Cell col="1" text="과"/>
  88. <Cell col="2" text="병실"/>
  89. <Cell col="3" text="등록번호"/>
  90. <Cell col="4" text="환자명"/>
  91. <Cell col="5" text="입원일"/>
  92. <Cell col="6" text="퇴원일"/>
  93. <Cell col="7" text="주상병"/>
  94. <Cell col="8" text="외래입원구분"/>
  95. <Cell col="9" text="생성번호"/>
  96. <Cell col="10" text="진료과"/>
  97. <Cell col="11" text="진료의"/>
  98. <Cell col="12" text="주부유형"/>
  99. </Band>
  100. <Band id="body">
  101. <Cell celltype="head" expr="currow+1"/>
  102. <Cell col="1" text="bind:orddeptnm"/>
  103. <Cell col="2" text="bind:roomcd"/>
  104. <Cell col="3" text="bind:pid"/>
  105. <Cell col="4" text="bind:pnm"/>
  106. <Cell col="5" displaytype="date" text="bind:indd" mask="yyyy-MM-dd"/>
  107. <Cell col="6" displaytype="expr:dschdd == '-' ? 'normal' : 'date'" text="bind:dschdd" mask="expr:dschdd == '-' ? '' : 'yyyy-MM-dd'" calendardisplaynulltype="nulltext"/>
  108. <Cell col="7" style="align:left middle;" text="bind:diagcd"/>
  109. <Cell col="8" text="bind:ioflag"/>
  110. <Cell col="9" text="bind:cretno"/>
  111. <Cell col="10" text="bind:orddeptcd"/>
  112. <Cell col="11" text="bind:orddrid"/>
  113. <Cell col="12" text="bind:mskind"/>
  114. </Band>
  115. </Format>
  116. </Formats>
  117. </Grid>
  118. <Static id="caption6" text="SUMMARY" class="tit_2" position="absolute 692 92 797 113"/>
  119. <Grid id="grd_summary" class="datagrid2" taborder="3" binddataset="ds_bloodlist_summary2" useinputpanel="false" position="absolute 691 114 1195 294" autofittype="col" anchor="left top right" cellsizingtype="col">
  120. <Formats>
  121. <Format id="default">
  122. <Columns>
  123. <Column size="27"/>
  124. <Column size="98"/>
  125. <Column size="300"/>
  126. <Column size="70"/>
  127. </Columns>
  128. <Rows>
  129. <Row size="24" band="head"/>
  130. <Row size="24"/>
  131. </Rows>
  132. <Band id="head">
  133. <Cell/>
  134. <Cell col="1" text="처방코드"/>
  135. <Cell col="2" text="처방명칭"/>
  136. <Cell col="3" text="수량 소계"/>
  137. </Band>
  138. <Band id="body">
  139. <Cell celltype="head" expr="currow+1"/>
  140. <Cell col="1" text="bind:prcpcd"/>
  141. <Cell col="2" style="align:left middle;" text="bind:prcpnm"/>
  142. <Cell col="3" text="bind:cnt"/>
  143. </Band>
  144. </Format>
  145. </Formats>
  146. </Grid>
  147. <Button id="button2" taborder="4" text="엑셀저장" class="btn7" position="absolute 827 303 907 322" onclick="button2_onclick" anchor="top right"/>
  148. <Button id="button1" taborder="5" text="통합결과조회" class="btn2" position="absolute 908 303 994 322" onclick="button1_onclick" anchor="top right"/>
  149. <Button id="btn_EnvSetup" taborder="6" text="상세정보확인" class="btn2" position="absolute 996 303 1082 322" onclick="btn_EnvSetup_onclick" anchor="top right"/>
  150. <Button id="button3" taborder="7" text="출 력" class="btn6" position="absolute 1084 303 1137 322" onclick="button3_onclick" anchor="top right"/>
  151. <Button id="btn_save" taborder="8" text="저 장" class="btn5" position="absolute 1139 303 1192 322" onclick="btn_save_onclick" anchor="top right"/>
  152. <Shape id="line1" linetype="horizontal" class="line_1" position="absolute 691 109 1195 115" style="strokepen:3 solid #33bbbbff;" anchor="left top right"/>
  153. <Shape id="line12" linetype="horizontal" class="line_1" position="absolute 1 109 676 115" onclick="line12_onclick" style="strokepen:3 solid #33bbbbff;"/>
  154. <Static id="caption7" text="수혈내역" class="tit_2" position="absolute 3 309 108 330"/>
  155. <Grid id="grd_blooddetail" taborder="9" binddataset="ds_grd_summary" useinputpanel="false" position="absolute 1 331 1196 756" autofittype="col" onkeydown="grd_blooddetail_onkeydown" anchor="all" cellsizingtype="col">
  156. <Formats>
  157. <Format id="default">
  158. <Columns>
  159. <Column size="21"/>
  160. <Column size="120"/>
  161. <Column size="105"/>
  162. <Column size="70"/>
  163. <Column size="170"/>
  164. <Column size="40"/>
  165. <Column size="40"/>
  166. <Column size="40"/>
  167. <Column size="59"/>
  168. <Column size="54"/>
  169. <Column size="45"/>
  170. <Column size="45"/>
  171. <Column size="0"/>
  172. <Column size="60"/>
  173. <Column size="120"/>
  174. <Column size="172"/>
  175. </Columns>
  176. <Rows>
  177. <Row size="24" band="head"/>
  178. <Row size="24" band="head"/>
  179. <Row size="5" band="head"/>
  180. <Row size="24"/>
  181. </Rows>
  182. <Band id="head">
  183. <Cell rowspan="3" taborder="undefined"/>
  184. <Cell col="1" rowspan="3" text="불출일시" taborder="undefined"/>
  185. <Cell col="2" rowspan="3" text="투여일시" taborder="undefined"/>
  186. <Cell col="3" rowspan="3" text="처방코드" taborder="undefined"/>
  187. <Cell col="4" rowspan="3" text="처방명칭" taborder="undefined"/>
  188. <Cell col="5" rowspan="3" text="수량" taborder="undefined"/>
  189. <Cell col="6" rowspan="3" text="Filter" taborder="undefined"/>
  190. <Cell col="7" rowspan="3" text="Irr" taborder="undefined"/>
  191. <Cell col="8" colspan="5" text="관련 검사 결과" taborder="undefined"/>
  192. <Cell col="13" rowspan="3" text="심사여부" taborder="undefined"/>
  193. <Cell col="14" rowspan="3" text="수혈사유확인" taborder="undefined"/>
  194. <Cell col="15" rowspan="3" text="비고/출혈양상입력" taborder="undefined"/>
  195. <Cell row="1" col="8" rowspan="2" text="Hb&#10;(g/dl)" taborder="undefined"/>
  196. <Cell row="1" col="9" rowspan="2" text="Hct&#10;(%)" taborder="undefined"/>
  197. <Cell row="1" col="10" rowspan="2" text="PLT&#10;" taborder="undefined"/>
  198. <Cell row="1" col="11" rowspan="2" text="PT&#10;(%)" taborder="undefined"/>
  199. <Cell row="1" col="12" text="PTT&#10;(sec)"/>
  200. <Cell row="2" col="12" text="PTT&#10;(sec)"/>
  201. </Band>
  202. <Band id="body">
  203. <Cell celltype="head"/>
  204. <Cell col="1" displaytype="date" text="bind:execdt" mask="yyyy-MM-dd hh:mm"/>
  205. <Cell col="2" displaytype="date" text="bind:tnsstrdt" mask="yyyy-MM-dd hh:mm"/>
  206. <Cell col="3" text="bind:prcpcd"/>
  207. <Cell col="4" style="align:left middle;" text="bind:prcpnm"/>
  208. <Cell col="5" displaytype="number" text="bind:cnt"/>
  209. <Cell col="6" displaytype="combo" edittype="combo" style="align:center middle;" text="bind:filter" combodataset="ds_cmb_filter" combocodecol="label" combodatacol="value"/>
  210. <Cell col="7" displaytype="combo" edittype="combo" style="align:center middle;" text="bind:irr" combodataset="ds_cmb_irr" combocodecol="label" combodatacol="value"/>
  211. <Cell col="8" text="bind:hb"/>
  212. <Cell col="9" text="bind:hct"/>
  213. <Cell col="10" text="bind:plt"/>
  214. <Cell col="11" text="bind:pt"/>
  215. <Cell col="12" text="bind:ptt"/>
  216. <Cell col="13" displaytype="combo" edittype="combo" style="align:center middle;" text="bind:judgeyn" combodataset="ds_cmb_judgeyn" combocodecol="label" combodatacol="value"/>
  217. <Cell col="14" displaytype="combo" edittype="combo" text="bind:transresn" combodataset="ds_P0479list" combocodecol="cdid" combodatacol="cdnm"/>
  218. <Cell col="15" displaytype="text" edittype="text" text="bind:rem"/>
  219. </Band>
  220. </Format>
  221. </Formats>
  222. </Grid>
  223. <CheckBox id="checkbox1" taborder="10" position="absolute 757 305 830 320" text="결과조회" onlbuttondown="checkbox1_onlbuttondown" onclick="checkbox1_onclick" truevalue="01" anchor="top right"/>
  224. <Shape id="line02" class="line_1" position="absolute 1 326 1195 332" style="strokepen:3 solid #33bbbbff;" anchor="left top right"/>
  225. </Layout>
  226. </Layouts>
  227. <Objects>
  228. <Dataset id="ds_init_cmb_judgrid" firefirstcount="0" firenextcount="0" useclientlayout="true" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
  229. <ColumnInfo>
  230. <Column id="judgrid" type="STRING"/>
  231. <Column id="judgrnm" type="STRING"/>
  232. </ColumnInfo>
  233. <Rows>
  234. <Row/>
  235. </Rows>
  236. </Dataset>
  237. <Dataset id="ds_init_cmb_wardcd" firefirstcount="0" firenextcount="0" useclientlayout="true" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
  238. <ColumnInfo>
  239. <Column id="nm" type="STRING"/>
  240. <Column id="cd" type="STRING"/>
  241. </ColumnInfo>
  242. </Dataset>
  243. <Dataset id="ds_init_cmb_orddeptcd" firefirstcount="0" firenextcount="0" useclientlayout="true" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
  244. <ColumnInfo>
  245. <Column id="nm" type="STRING"/>
  246. <Column id="cd" type="STRING"/>
  247. </ColumnInfo>
  248. </Dataset>
  249. <Dataset id="ds_init_cmb_orddrid" firefirstcount="0" firenextcount="0" useclientlayout="true" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
  250. <ColumnInfo>
  251. <Column id="nm" type="STRING"/>
  252. <Column id="cd" type="STRING"/>
  253. </ColumnInfo>
  254. </Dataset>
  255. <Dataset id="ds_init_cmb_bloodgb" firefirstcount="0" firenextcount="0" useclientlayout="true" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
  256. <ColumnInfo>
  257. <Column id="cdnm" type="STRING"/>
  258. <Column id="cdid" type="STRING"/>
  259. </ColumnInfo>
  260. </Dataset>
  261. <Dataset id="ds_grd_bloodpat" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
  262. <ColumnInfo>
  263. <Column id="orddeptnm" type="STRING"/>
  264. <Column id="roomcd" type="STRING"/>
  265. <Column id="pid" type="STRING"/>
  266. <Column id="pnm" type="STRING"/>
  267. <Column id="indd" type="STRING"/>
  268. <Column id="dschdd" type="STRING"/>
  269. <Column id="diagcd" type="STRING"/>
  270. <Column id="ioflag" type="STRING"/>
  271. <Column id="cretno" type="STRING"/>
  272. <Column id="orddeptcd" type="STRING"/>
  273. <Column id="orddrid" type="STRING"/>
  274. <Column id="mskind" type="STRING"/>
  275. <Column id="sex" type="STRING" size="256"/>
  276. <Column id="age" type="STRING" size="256"/>
  277. <Column id="prsnno" type="STRING" size="256"/>
  278. </ColumnInfo>
  279. </Dataset>
  280. <Dataset id="ds_grd_blooddetail" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
  281. <ColumnInfo>
  282. <Column id="execdt" type="STRING" size="256" sumtext="불출일시"/>
  283. <Column id="prcpcd" type="STRING" size="256" sumtext="처방코드"/>
  284. <Column id="prcpnm" type="STRING" size="256" sumtext="처방명칭"/>
  285. <Column id="blodno" type="STRING" size="256" sumtext="혈액번호"/>
  286. <Column id="blodbarcd" type="STRING" size="256" sumtext="혈액바코드번호"/>
  287. <Column id="resn" type="STRING" size="256" sumtext=" 폐기사유"/>
  288. </ColumnInfo>
  289. </Dataset>
  290. <Dataset id="ds_grd_summary" firefirstcount="0" firenextcount="0" useclientlayout="true" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
  291. <ColumnInfo>
  292. <Column id="execdt" type="STRING" size="256" sumtext="불출일시"/>
  293. <Column id="tnsstrdt" type="STRING" size="256" sumtext="투여일시"/>
  294. <Column id="prcpcd" type="STRING" size="256" sumtext="처방코드"/>
  295. <Column id="prcpnm" type="STRING" size="256" sumtext="처방명칭"/>
  296. <Column id="cnt" type="STRING" size="256" sumtext="수량"/>
  297. <Column id="filter" type="STRING" size="256" sumtext="Filter"/>
  298. <Column id="irr" type="STRING" size="256" sumtext="Irr"/>
  299. <Column id="hb" type="STRING" size="256" sumtext="Hb"/>
  300. <Column id="hct" type="STRING" size="256" sumtext="Hct"/>
  301. <Column id="plt" type="STRING" size="256" sumtext="PLT"/>
  302. <Column id="pt" type="STRING" size="256" sumtext="PT"/>
  303. <Column id="ptt" type="STRING" size="256" sumtext="PTT"/>
  304. <Column id="judgeyn" type="STRING" size="256" sumtext="심사여부"/>
  305. <Column id="transresn" type="STRING" size="256" sumtext="수혈사유"/>
  306. <Column id="transresntext" type="STRING" size="256" sumtext="수혈사유"/>
  307. <Column id="rem" type="STRING" size="256" sumtext="비고"/>
  308. <Column id="blodno" type="STRING" size="256" sumtext="혈액번호"/>
  309. <Column id="blodbarcd" type="STRING" size="256" sumtext="혈액바코드번호"/>
  310. </ColumnInfo>
  311. </Dataset>
  312. <Dataset id="ds_send_opener" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  313. <ColumnInfo>
  314. <Column id="pid" type="STRING" size="256"/>
  315. <Column id="pnm" type="STRING" size="256"/>
  316. <Column id="sex" type="STRING" size="256"/>
  317. <Column id="age" type="STRING" size="256"/>
  318. </ColumnInfo>
  319. </Dataset>
  320. <Dataset id="ds_main_send" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  321. <ColumnInfo>
  322. <Column id="fromdd" type="STRING" size="256"/>
  323. <Column id="todd" type="STRING" size="256"/>
  324. <Column id="judqrid" type="STRING" size="256"/>
  325. <Column id="wardcd" type="STRING" size="256"/>
  326. <Column id="orddeptcd" type="STRING" size="256"/>
  327. <Column id="orddrid" type="STRING" size="256"/>
  328. <Column id="pid" type="STRING" size="256"/>
  329. <Column id="pnm" type="STRING" size="256"/>
  330. <Column id="sexage" type="STRING" size="256"/>
  331. <Column id="blood" type="STRING" size="256"/>
  332. <Column id="termflag" type="STRING" size="256"/>
  333. <Column id="ioflag" type="STRING" size="256"/>
  334. <Column id="bloodgb" type="STRING" size="256"/>
  335. <Column id="labrsltflag" type="STRING" size="256"/>
  336. </ColumnInfo>
  337. <Rows>
  338. <Row/>
  339. </Rows>
  340. </Dataset>
  341. <Dataset id="ds_cmb_ioflag" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  342. <ColumnInfo>
  343. <Column id="label" type="STRING" size="256"/>
  344. <Column id="value" type="STRING" size="256"/>
  345. </ColumnInfo>
  346. <Rows>
  347. <Row/>
  348. <Row>
  349. <Col id="label">외래</Col>
  350. <Col id="value">O</Col>
  351. </Row>
  352. <Row>
  353. <Col id="label">입원</Col>
  354. <Col id="value">I</Col>
  355. </Row>
  356. </Rows>
  357. </Dataset>
  358. <Dataset id="ds_P0470list" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  359. <ColumnInfo>
  360. <Column id="cdnm" type="STRING" size="256"/>
  361. <Column id="cdid" type="STRING" size="256"/>
  362. </ColumnInfo>
  363. <Rows>
  364. <Row/>
  365. </Rows>
  366. </Dataset>
  367. <Dataset id="ds_P0479list" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  368. <ColumnInfo>
  369. <Column id="cdid" type="STRING" size="256"/>
  370. <Column id="cdnm" type="STRING" size="256"/>
  371. </ColumnInfo>
  372. <Rows>
  373. <Row/>
  374. </Rows>
  375. </Dataset>
  376. <Dataset id="ds_main_patinfolist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  377. <ColumnInfo>
  378. <Column id="instcd" type="STRING" size="256" sumtext="기관기호"/>
  379. <Column id="pid" type="STRING" size="256" sumtext="환자등록번호"/>
  380. <Column id="bindyn" type="STRING" size="256" sumtext="환자등록번호"/>
  381. <Column id="hngnm" type="STRING" size="256" sumtext="한글이름"/>
  382. <Column id="hngnm2" type="STRING" size="256" sumtext="표시이름"/>
  383. <Column id="engnm" type="STRING" size="256" sumtext="영문이름"/>
  384. <Column id="chinm" type="STRING" size="256" sumtext="영문이름"/>
  385. <Column id="rrgstno1" type="STRING" size="256" sumtext="주민번호앞6자리"/>
  386. <Column id="rrgstno2" type="STRING" size="256" sumtext="주민번호뒤7자리"/>
  387. <Column id="rrgstno3" type="STRING" size="256" sumtext="주민번호뒤4자리와별표3자리"/>
  388. <Column id="lastinsukind" type="STRING" size="256" sumtext="최근보험유형"/>
  389. <Column id="brthdd" type="STRING" size="256" sumtext="생년월일"/>
  390. <Column id="sex" type="STRING" size="256" sumtext="성별"/>
  391. <Column id="age" type="STRING" size="256" sumtext="나이"/>
  392. <Column id="bindpid" type="STRING" size="256" sumtext="합본등록번호"/>
  393. <Column id="hometel" type="STRING" size="256" sumtext="집전화번호"/>
  394. <Column id="mpphontel" type="STRING" size="256" sumtext="휴대전화번호"/>
  395. <Column id="etctel1" type="STRING" size="256" sumtext="기타전화번호1"/>
  396. <Column id="etctel2" type="STRING" size="256" sumtext="기타전화번호2"/>
  397. <Column id="smsaprvyn" type="STRING" size="256" sumtext="SMS전송 승인 여부"/>
  398. <Column id="email" type="STRING" size="256" sumtext="이메일 게정"/>
  399. <Column id="zipcd1" type="STRING" size="256" sumtext="우편번호 앞 3자리"/>
  400. <Column id="zipcd2" type="STRING" size="256" sumtext="우편번호 뒤 3자리"/>
  401. <Column id="zipcdseq" type="STRING" size="256" sumtext="우편일련번호"/>
  402. <Column id="addr" type="STRING" size="256" sumtext="기본주소"/>
  403. <Column id="detladdr" type="STRING" size="256" sumtext="상세주소"/>
  404. <Column id="btype" type="STRING" size="256" sumtext="혈액형"/>
  405. <Column id="rh" type="STRING" size="256" sumtext="RH혈액형"/>
  406. <Column id="forgeryn" type="STRING" size="256" sumtext="외국인여부"/>
  407. <Column id="nati" type="STRING" size="256" sumtext="국적"/>
  408. <Column id="psptno" type="STRING" size="256" sumtext="여권번호"/>
  409. <Column id="recmyn" type="STRING" size="256" sumtext="추천여부"/>
  410. <Column id="recmerid" type="STRING" size="256" sumtext="추천인ID"/>
  411. <Column id="recmernm" type="STRING" size="256" sumtext="추천인명"/>
  412. <Column id="recmerrela" type="STRING" size="256" sumtext="추천인과의 관계"/>
  413. <Column id="vipyn" type="STRING" size="256" sumtext="VIP여부"/>
  414. <Column id="viprem" type="STRING" size="256" sumtext="VIP비고"/>
  415. <Column id="religncd" type="STRING" size="256" sumtext="종교코드"/>
  416. <Column id="baptnm" type="STRING" size="256" sumtext="세례명"/>
  417. <Column id="chchnm" type="STRING" size="256" sumtext="성당명"/>
  418. <Column id="dethyn" type="STRING" size="256" sumtext="사망여부"/>
  419. <Column id="dethdt" type="STRING" size="256" sumtext="사망일시"/>
  420. <Column id="dethdd" type="STRING" size="256" sumtext="사망일자"/>
  421. <Column id="dethtm" type="STRING" size="256" sumtext="사망시간"/>
  422. <Column id="chosresn" type="STRING" size="256" sumtext="내원사유"/>
  423. <Column id="animyn" type="STRING" size="256" sumtext="동물여부"/>
  424. <Column id="exptresncd" type="STRING" size="256" sumtext="원외예외사유코드"/>
  425. <Column id="inhospyn" type="STRING" size="256" sumtext="재원여부"/>
  426. <Column id="handicapryn" type="STRING" size="256" sumtext="장애인여부"/>
  427. <Column id="pidflag" type="STRING" size="256" sumtext="등록번호구분"/>
  428. <Column id="remfact" type="STRING" size="256" sumtext="참고사항"/>
  429. <Column id="ptunyn" type="STRING" size="256" sumtext="미수안내"/>
  430. <Column id="lastorddd" type="STRING" size="256" sumtext="최근내원일"/>
  431. <Column id="lastorddeptcd" type="STRING" size="256" sumtext="최근내원과"/>
  432. <Column id="outuncoamt" type="STRING" size="256" sumtext="외래미수금"/>
  433. <Column id="dschuncoamt" type="STRING" size="256" sumtext="입원미수금"/>
  434. <Column id="kioskrcptnoyn" type="STRING" size="256" sumtext="무인수납불가여부"/>
  435. <Column id="carnum" type="STRING" size="256" sumtext="차량번호"/>
  436. <Column id="acptdd" type="STRING" size="256" sumtext="가예약 접수일자"/>
  437. <Column id="acptno" type="STRING" size="256" sumtext="가예약 접수일련번호"/>
  438. <Column id="patspcfyn" type="STRING" size="256" sumtext="특이환자여부"/>
  439. <Column id="tdaydsch" type="STRING" size="256" sumtext="특이환자여부"/>
  440. <Column id="mig" type="STRING" size="256" sumtext="마이그레이션여부"/>
  441. <Column id="scanyn" type="STRING" size="256" sumtext="동의서출력여부"/>
  442. <Column id="spifscanyn" type="STRING" size="256" sumtext="선택진료신청서스캔여부"/>
  443. <Column id="isolinfo" type="STRING" size="256" sumtext="격리환자정보"/>
  444. <Column id="builno" type="STRING" size="256" sumtext="도로명주소 코드"/>
  445. <Column id="gugang_ptbs_scanyn" type="STRING" size="256" sumtext="장애인구강센터동의서여부"/>
  446. </ColumnInfo>
  447. <Rows>
  448. <Row/>
  449. </Rows>
  450. </Dataset>
  451. <Dataset id="ds_sppmc02500_cond" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  452. <ColumnInfo>
  453. <Column id="srchcond" type="STRING" size="256"/>
  454. <Column id="pid" type="STRING" size="256"/>
  455. </ColumnInfo>
  456. <Rows>
  457. <Row/>
  458. </Rows>
  459. </Dataset>
  460. <Dataset id="ds_temp_sendtochild" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  461. <ColumnInfo>
  462. <Column id="prcpcd" type="STRING" size="256"/>
  463. <Column id="prcpnm" type="STRING" size="256"/>
  464. <Column id="blodno" type="STRING" size="256"/>
  465. <Column id="resn" type="STRING" size="256"/>
  466. </ColumnInfo>
  467. </Dataset>
  468. <Dataset id="ds_temp_sendsummary" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  469. <ColumnInfo>
  470. <Column id="pid" type="STRING" size="256"/>
  471. <Column id="pnm" type="STRING" size="256"/>
  472. <Column id="orddd" type="STRING" size="256"/>
  473. <Column id="cretno" type="STRING" size="256"/>
  474. <Column id="ioflag" type="STRING" size="256"/>
  475. <Column id="fromdd" type="STRING" size="256"/>
  476. <Column id="todd" type="STRING" size="256"/>
  477. <Column id="termflag" type="STRING" size="256"/>
  478. <Column id="mskind" type="STRING" size="256"/>
  479. <Column id="sex" type="STRING" size="256"/>
  480. <Column id="age" type="STRING" size="256"/>
  481. <Column id="prsnno" type="STRING" size="256"/>
  482. <Column id="labrsltflag" type="STRING" size="256"/>
  483. <Column id="bloodgb" type="STRING" size="256"/>
  484. </ColumnInfo>
  485. <Rows>
  486. <Row/>
  487. </Rows>
  488. </Dataset>
  489. <Dataset id="ds_bloodlist_summary2" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  490. <ColumnInfo>
  491. <Column id="prcpcd" type="STRING" size="256"/>
  492. <Column id="prcpnm" type="STRING" size="256"/>
  493. <Column id="cnt" type="STRING" size="256"/>
  494. </ColumnInfo>
  495. </Dataset>
  496. <Dataset id="ds_bloodlist_summary" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  497. <ColumnInfo>
  498. <Column id="execdt" type="STRING" size="256"/>
  499. <Column id="tnsstrdt" type="STRING" size="256"/>
  500. <Column id="prcpcd" type="STRING" size="256"/>
  501. <Column id="prcpnm" type="STRING" size="256"/>
  502. <Column id="cnt" type="STRING" size="256"/>
  503. <Column id="filter" type="STRING" size="256"/>
  504. <Column id="irr" type="STRING" size="256"/>
  505. <Column id="hb" type="STRING" size="256"/>
  506. <Column id="hct" type="STRING" size="256"/>
  507. <Column id="plt" type="STRING" size="256"/>
  508. <Column id="pt" type="STRING" size="256"/>
  509. <Column id="ptt" type="STRING" size="256"/>
  510. <Column id="judgeyn" type="STRING" size="256"/>
  511. <Column id="transresn" type="STRING" size="256"/>
  512. <Column id="transresntext" type="STRING" size="256"/>
  513. <Column id="rem" type="STRING" size="256"/>
  514. <Column id="blodno" type="STRING" size="256"/>
  515. <Column id="blodbarcd" type="STRING" size="256"/>
  516. </ColumnInfo>
  517. </Dataset>
  518. <Dataset id="ds_cmb_judgeyn" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  519. <ColumnInfo>
  520. <Column id="label" type="STRING" size="256"/>
  521. <Column id="value" type="STRING" size="256"/>
  522. </ColumnInfo>
  523. <Rows>
  524. <Row>
  525. <Col id="value">-</Col>
  526. </Row>
  527. <Row>
  528. <Col id="label">Y</Col>
  529. <Col id="value">Y</Col>
  530. </Row>
  531. </Rows>
  532. </Dataset>
  533. <Dataset id="ds_cmb_filter" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  534. <ColumnInfo>
  535. <Column id="label" type="STRING" size="256"/>
  536. <Column id="value" type="STRING" size="256"/>
  537. </ColumnInfo>
  538. <Rows>
  539. <Row/>
  540. <Row>
  541. <Col id="label">Y</Col>
  542. <Col id="value">Y</Col>
  543. </Row>
  544. </Rows>
  545. </Dataset>
  546. <Dataset id="ds_cmb_irr" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  547. <ColumnInfo>
  548. <Column id="label" type="STRING" size="256"/>
  549. <Column id="value" type="STRING" size="256"/>
  550. </ColumnInfo>
  551. <Rows>
  552. <Row/>
  553. <Row>
  554. <Col id="label">Y</Col>
  555. <Col id="value">Y</Col>
  556. </Row>
  557. </Rows>
  558. </Dataset>
  559. <Dataset id="ds_senditem_list" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  560. <ColumnInfo>
  561. <Column id="pid" type="STRING" size="256" sumtext="등록번호"/>
  562. <Column id="blodno" type="STRING" size="256" sumtext="혈액번호"/>
  563. <Column id="blodbarcd" type="STRING" size="256" sumtext="혈액바코드번호"/>
  564. <Column id="execdt" type="STRING" size="256" sumtext="불출일시"/>
  565. <Column id="prcpcd" type="STRING" size="256" sumtext="처방코드"/>
  566. <Column id="prcpnm" type="STRING" size="256" sumtext="처방명"/>
  567. <Column id="judgeyn" type="STRING" size="256" sumtext="심사여부"/>
  568. <Column id="transresn" type="STRING" size="256" sumtext="수혈사유"/>
  569. <Column id="rem" type="STRING" size="256" sumtext="비고"/>
  570. <Column id="iud" type="STRING" size="256" sumtext="종료일자"/>
  571. </ColumnInfo>
  572. </Dataset>
  573. </Objects>
  574. <Bind>
  575. <BindItem id="item0" compid="group2.ipt_fromdd" propid="value" datasetid="ds_main_send" columnid="fromdd"/>
  576. <BindItem id="item1" compid="group2.ipt_todd" propid="value" datasetid="ds_main_send" columnid="todd"/>
  577. <BindItem id="item2" compid="group2.cmb_judgrid" propid="value" datasetid="ds_main_send" columnid="judqrid"/>
  578. <BindItem id="item3" compid="group2.combo1" propid="value" datasetid="ds_main_send" columnid="ioflag"/>
  579. <BindItem id="item5" compid="group2.cmb_bloodgb" propid="value" datasetid="ds_main_send" columnid="blood"/>
  580. <BindItem id="item4" compid="group2.chk_termflag" propid="value" datasetid="ds_main_send" columnid="termflag"/>
  581. <BindItem id="item6" compid="group2.cmb_wardcd" propid="value" datasetid="ds_main_send" columnid="wardcd"/>
  582. <BindItem id="item7" compid="group2.cmb_orddeptcd" propid="value" datasetid="ds_main_send" columnid="orddeptcd"/>
  583. <BindItem id="item8" compid="group2.cmb_orddrid" propid="value" datasetid="ds_main_send" columnid="orddrid"/>
  584. <BindItem id="item9" compid="group2.ipt_pid" propid="value" datasetid="ds_main_send" columnid="pid"/>
  585. <BindItem id="item10" compid="group2.opt_patnm" propid="value" datasetid="ds_main_send" columnid="pnm"/>
  586. <BindItem id="item11" compid="group2.opt_sexage" propid="value" datasetid="ds_main_send" columnid="sexage"/>
  587. </Bind>
  588. <Script type="xscript4.0"><![CDATA[/***************************************************************************************
  589. * System Name :
  590. * Job Name :
  591. * Creator :
  592. * Make Date : 2016-05-24
  593. * Description :
  594. *---------------------------------------------------------------------------------------
  595. * Modify Date Modifier Modify Description
  596. *---------------------------------------------------------------------------------------
  597. * 2016-05-24 Live Converter TF->XP
  598. *
  599. *---------------------------------------------------------------------------------------
  600. ****************************************************************************************/
  601. include "com_commonxp::comm_main.xjs";
  602. include "pam_pamcomnxp::PAM001.xjs";
  603. function SPPIZ01800_oninit(obj:Form, e:InitEventInfo)
  604. {
  605. frmf_initForm(obj);
  606. }
  607. function SPPIZ01800_onload(obj:Form, e:LoadEventInfo)
  608. {
  609. grdf_initGrid(grd_blooddetail);
  610. grdf_setRowTypeIcon(grd_blooddetail, 0);
  611. var curDate = utlf_getCurrentDate();
  612. var fromDate = curDate.toDate().getAddDate(-7, "D").getDateFormat();
  613. ds_main_send.setColumn(0, "fromdd", fromDate);
  614. ds_main_send.setColumn(0, "todd", curDate);
  615. group2.opt_patnm.enable = false;
  616. group2.opt_sexage.enable = false;
  617. dsf_createDsRow("ds_send", [{col:"fromdd", type:"STRING", size:256, val: fromDate}
  618. , {col:"todd", type:"STRING", size:256 ,val : curDate}
  619. , {col:"orddeptcd", type:"STRING", size:256 ,val :""}]);
  620. var oParam = {};
  621. oParam.id = "TRPIZ01801";
  622. oParam.service = "insucomapp.BloodJudge";
  623. oParam.method = "reqGetInitComCd";
  624. oParam.inds = "req=ds_send";
  625. oParam.outds = "ds_init_cmb_judgrid=judgrid ds_init_cmb_orddrid=orddrid ds_init_cmb_orddeptcd=orddeptcd ds_init_cmb_wardcd=wardcd";
  626. oParam.async = false;
  627. //oParam.callback = "cf_TRPIZ01801";
  628. tranf_submit(oParam);
  629. var arrParam = [{dsNm: "ds_P0470list", cdGrpId: "P0470"}
  630. ,{dsNm: "ds_P0479list", cdGrpId: "P0479"}]
  631. appf_getCodeList(arrParam);
  632. ds_P0470list.insertRow(0);
  633. if(frmf_checkOpener())
  634. {
  635. var pid = ds_send_opener.getColumn(0, "pid");
  636. }
  637. if(!utlf_isNull(pid))
  638. {
  639. ds_main_send.setColumn(0, "pid", ds_send_opener.getColumn(0, "pid"));
  640. ds_main_send.setColumn(0, "pnm", ds_send_opener.getColumn(0, "pnm"));
  641. ds_main_send.setColumn(0, "sexage", ds_send_opener.getColumn(0, "sex") + "/" + ds_send_opener.getColumn(0, "age"));
  642. group2_btn_search_onclick();
  643. }
  644. }
  645. function group2_btn_search_onclick(obj:Button, e:ClickEventInfo)
  646. {
  647. if(!utlf_isNull(ds_main_send.getColumn(0, "blood")))
  648. {
  649. ds_main_send.setColumn(0, "bloodgb", group2.cmb_bloodgb.value);
  650. }
  651. else
  652. {
  653. ds_main_send.setColumn(0, "bloodgb", "");
  654. }
  655. if(group2.chk_termflag.value == true)
  656. {
  657. ds_main_send.setColumn(0, "termflag", "01");
  658. }
  659. else
  660. {
  661. ds_main_send.setColumn(0, "termflag", "");
  662. }
  663. var oParam = {};
  664. oParam.id = "TRPIZ01802";
  665. oParam.service = "insucomapp.BloodJudge";
  666. oParam.method = "reqGetBloodTransPat";
  667. oParam.inds = "req=ds_main_send";
  668. oParam.outds = "ds_grd_bloodpat=gridbloodpat";
  669. oParam.async = false;
  670. //oParam.callback = "cf_TRPIZ01802";
  671. tranf_submit(oParam);
  672. }
  673. function group2_combo1_onitemchanged(obj:Combo, e:ItemChangeEventInfo)
  674. {
  675. if(ds_main_send.getColumn(0, "ioflag") == "I")
  676. {
  677. group2.cmb_wardcd.enable = true;
  678. }
  679. else
  680. {
  681. group2.cmb_wardcd.enable = false;
  682. }
  683. }
  684. function group2_ipt_pid_onkeydown(obj:Edit, e:KeyEventInfo)
  685. {
  686. if(e.keycode == 13)
  687. {
  688. var vcheck_pid = group2.ipt_pid.value;
  689. ds_main_send.setColumn(0, "pid", "");
  690. ds_main_send.setColumn(0, "pnm", "");
  691. ds_main_send.setColumn(0, "sexage", "");
  692. if(utlf_isNull(vcheck_pid) || vcheck_pid == "-")
  693. {
  694. sysf_messageBox("환자등록번호가 입력되지","E007");
  695. return;
  696. }
  697. dsf_createDsRow("ds_send_source", [{col:"srchcond", type:"STRING", size:256, val: "1"}
  698. , {col:"checkfnexam", type:"STRING", size:256 ,val :""}
  699. , {col:"pid", type:"STRING", size:256 ,val : vcheck_pid}
  700. , {col:"hngnm", type:"STRING", size:256 ,val : ""}
  701. , {col:"rrgstno1", type:"STRING", size:256 ,val :""}
  702. , {col:"rrgstno2", type:"STRING", size:256 ,val :""}
  703. , {col:"acptdd", type:"STRING", size:256 ,val :""}
  704. , {col:"instcd", type:"STRING", size:256 ,val :""}
  705. , {col:"insukind", type:"STRING", size:256 ,val :""}
  706. , {col:"inhospyn", type:"STRING", size:256 ,val :""}
  707. , {col:"sex", type:"STRING", size:256 ,val :""}
  708. , {col:"hiddenflag", type:"STRING", size:256 ,val :""}]);
  709. var oParam = {};
  710. oParam.id = "TRPMC02500";
  711. oParam.service = "patinfomngtapp.PatBaseInfo";
  712. oParam.method = "reqGetPatInfo";
  713. oParam.inds = "req=ds_send_source";
  714. oParam.outds = "ds_main_patinfolist=patinfolist";
  715. oParam.async = false;
  716. oParam.callback = "cf_TRPMC02500";
  717. tranf_submit(oParam);
  718. }
  719. }
  720. function cf_TRPMC02500(sSvcId, nErrorCode, sErrorMsg)
  721. {
  722. if(nErrorCode < 0)
  723. {
  724. sysf_messageBox("존재하지 않는 등록번호","E008");//E008=입니다
  725. group2.ipt_pid.setFocus();
  726. return;
  727. }
  728. else
  729. {
  730. var vcheck_pid = ds_main_patinfolist.getColumn(0, "pid");
  731. if(utlf_isNull(vcheck_pid)|| vcheck_pid == " " || vcheck_pid == "-")
  732. {
  733. sysf_messageBox("존재하지 않는 등록번호","E008");//E008=입니다.
  734. group2.ipt_pid.setFocus();
  735. return;
  736. }
  737. else
  738. {
  739. var srch_pid = ds_main_patinfolist.getColumn(0, "pid");
  740. var srch_hngnm = ds_main_patinfolist.getColumn(0, "hngnm");
  741. var srcn_sex = ds_main_patinfolist.getColumn(0, "sex");
  742. var srcn_age = ds_main_patinfolist.getColumn(0, "age");
  743. ds_main_send.setColumn(0, "pid", srch_pid);
  744. ds_main_send.setColumn(0, "pnm", srch_hngnm);
  745. ds_main_send.setColumn(0, "sexage", srcn_sex + "/" + srcn_age);
  746. return;
  747. }
  748. }
  749. }
  750. function group2_cmb_orddeptcd_onitemchanged(obj:Combo, e:ItemChangeEventInfo)
  751. {
  752. ds_send.clearData();
  753. dsf_createDsRow("ds_send", [{col:"fromdd", type:"STRING", size:256, val: group2.ipt_fromdd.value}
  754. , {col:"todd", type:"STRING", size:256 ,val : group2.ipt_todd.value}
  755. , {col:"orddeptcd", type:"STRING", size:256 ,val : group2.cmb_orddeptcd.value}]);
  756. var oParam = {};
  757. oParam.id = "TRPIZ01804";
  758. oParam.service = "insucomapp.BloodJudge";
  759. oParam.method = "reqGetInitOrdDoctor";
  760. oParam.inds = "req=ds_send";
  761. oParam.outds = "ds_init_cmb_orddrid=orddridlist";
  762. oParam.async = false;
  763. //oParam.callback = "cf_TRPIZ01804";
  764. tranf_submit(oParam);
  765. }
  766. function group2_btn_srchpid_onclick(obj:Button, e:ClickEventInfo)
  767. {
  768. var ipt_pid = group2.ipt_pid.value;
  769. if(!utlf_isNull(ipt_pid))
  770. {
  771. ds_sppmc02500_cond.setColumn(0, "srchcond", "1");
  772. ds_sppmc02500_cond.setColumn(0, "pid", ipt_pid);
  773. }
  774. else
  775. {
  776. }
  777. var objArgs = new Object();
  778. objArgs.arg_ds_send = ds_sppmc02500_cond;
  779. frmf_modal("SPPMC02500", "SPPMC02500", objArgs, "", "", "", "", "", "", "", "", "", "M");
  780. var srch_pid = ds_patinfolist.getColumn(0, "pid");
  781. var srch_hngnm = ds_patinfolist.getColumn(0, "hngnm");
  782. var srcn_sex = ds_patinfolist.getColumn(0, "sex");
  783. if(srcn_sex == "M")
  784. {
  785. srcn_sex = "남";
  786. }
  787. else
  788. {
  789. srcn_sex = "여";
  790. }
  791. var srcn_age = ds_patinfolist.getColumn(0, "age");
  792. if(!utlf_isNull(srch_pid))
  793. {
  794. ds_main_patinfolist.clearData();
  795. ds_main_send.setColumn(0, "pid", srch_pid);
  796. ds_main_send.setColumn(0, "pnm", srch_hngnm);
  797. ds_main_send.setColumn(0, "sexage", srcn_sex + "/" + srcn_age);
  798. }
  799. }
  800. //상세정보확인
  801. function btn_EnvSetup_onclick(obj:Button, e:ClickEventInfo)
  802. {
  803. var position = ds_grd_summary.rowposition;
  804. var execdt = ds_grd_summary.getColumn(position, "execdt");
  805. var prcpcd = ds_grd_summary.getColumn(position, "prcpcd");
  806. var getCount = ds_grd_blooddetail.rowcount;
  807. ds_temp_sendtochild.clearData();
  808. for(var i = 0; i < getCount; i++)
  809. {
  810. var loop_execdt = ds_grd_blooddetail.getColumn(i, "execdt");
  811. var loop_prcpcd = ds_grd_blooddetail.getColumn(i, "prcpcd");
  812. if(execdt == loop_execdt && prcpcd == loop_prcpcd)
  813. {
  814. var nRow = ds_temp_sendtochild.addRow();
  815. ds_temp_sendtochild.setColumn(nRow, "prcpcd", ds_grd_blooddetail.getColumn(i, "prcpcd"));
  816. ds_temp_sendtochild.setColumn(nRow, "prcpnm", ds_grd_blooddetail.getColumn(i, "prcpnm"));
  817. ds_temp_sendtochild.setColumn(nRow, "blodno", ds_grd_blooddetail.getColumn(i, "blodno"));
  818. ds_temp_sendtochild.setColumn(nRow, "resn", ds_grd_blooddetail.getColumn(i, "resn"));
  819. }
  820. }
  821. var objArg = new Object();
  822. objArg.arg_ds_temp = ds_temp_sendtochild;
  823. frmf_open("SPPIZ01801_수혈상세조회", "SPPIZ01801", objArg, null, null, null, null, null, null, null, null, null, "M");
  824. }
  825. function button1_onclick(obj:Button, e:ClickEventInfo)
  826. {
  827. var patid = ds_temp_sendsummary.getColumn(0, "pid");
  828. var row = ds_grd_bloodpat.rowposition;
  829. if(!utlf_isNull(patid))
  830. {
  831. var objArgs = new Object();
  832. dsf_createDsRow("ds_temp_SMAER00800", [{col:"srchdate1", type:"string", size:256, val: ds_grd_bloodpat.getColumn(row, "orddd")}
  833. , {col:"srchdate2", type:"string", size:256, val: utlf_getCurrentDate()}
  834. , {col:"srchpid", type:"string", size:256, val: ds_grd_bloodpat.getColumn(row, "pid")}
  835. , {col:"wardcd", type:"string", size:256, val: ""}
  836. , {col:"roomcd", type:"string", size:256, val: ""}
  837. , {col:"listflag", type:"string", size:256, val: "P"}
  838. , {col:"deptcd", type:"string", size:256, val: ds_grd_bloodpat.getColumn(row, "orddeptcd")}
  839. , {col:"chkcheck", type:"string", size:256, val: ds_grd_bloodpat.getColumn(row, "orddrid")}
  840. , {col:"chkcheck1", type:"string", size:256, val: "A"}
  841. , {col:"chkcheck2", type:"string", size:256, val: "B"}
  842. , {col:"chkcheck3", type:"string", size:256, val: "C"}
  843. , {col:"chkcheck4", type:"string", size:256, val: "D"}
  844. , {col:"chkcheck5", type:"string", size:256, val: "E"}
  845. , {col:"chkcheck6", type:"string", size:256, val: "F"}
  846. , {col:"chkcheck7", type:"string", size:256, val: "G"}
  847. , {col:"chkcheck8", type:"string", size:256, val: ""}
  848. , {col:"tabflag", type:"string", size:256, val: ""}
  849. , {col:"mdlcd", type:"string", size:256, val: ""}
  850. , {col:"examgubun", type:"string", size:256, val: ""}]);
  851. objArgs.arg_ds_send_singdata = ds_temp_SMAER00800;
  852. frmf_open("SMAER00800", "SMAER00800", objArgs, null, null, null, null, null, null, null, null, null, "M");
  853. }
  854. }
  855. //dbclick
  856. function grd_bloodpat_oncelldblclick(obj:Grid, e:GridClickEventInfo)
  857. {
  858. var cur_row = ds_grd_bloodpat.rowposition;
  859. var pid = ds_grd_bloodpat.getColumn(cur_row, "pid");
  860. var pnm = ds_grd_bloodpat.getColumn(cur_row, "pnm");
  861. var orddd = ds_grd_bloodpat.getColumn(cur_row, "indd");
  862. var cretno = ds_grd_bloodpat.getColumn(cur_row, "cretno");
  863. var ioflag = ds_grd_bloodpat.getColumn(cur_row, "ioflag");
  864. var mskind = ds_grd_bloodpat.getColumn(cur_row, "mskind");
  865. ds_temp_sendsummary.setColumn(0, "pid", pid);
  866. ds_temp_sendsummary.setColumn(0, "pnm", pnm);
  867. ds_temp_sendsummary.setColumn(0, "orddd", orddd);
  868. ds_temp_sendsummary.setColumn(0, "cretno", cretno);
  869. ds_temp_sendsummary.setColumn(0, "ioflag", ioflag);
  870. ds_temp_sendsummary.setColumn(0, "mskind", mskind);
  871. ds_temp_sendsummary.setColumn(0, "sex", ds_grd_bloodpat.getColumn(cur_row, "sex"));
  872. ds_temp_sendsummary.setColumn(0, "age", ds_grd_bloodpat.getColumn(cur_row, "age"));
  873. ds_temp_sendsummary.setColumn(0, "prsnno", ds_grd_bloodpat.getColumn(cur_row, "prsnno"));
  874. ds_temp_sendsummary.setColumn(0, "fromdd", ds_main_send.getColumn(0, "fromdd"));
  875. ds_temp_sendsummary.setColumn(0, "todd", ds_main_send.getColumn(0, "todd"));
  876. ds_temp_sendsummary.setColumn(0, "labrsltflag", checkbox1.value != "01" ? "": "01");
  877. ds_temp_sendsummary.setColumn(0, "termflag", group2.chk_termflag.value != "01" ? "" : "01");
  878. ds_temp_sendsummary.setColumn(0, "bloodgb", ds_main_send.getColumn(0, "bloodgb"));
  879. var oParam = {};
  880. oParam.id = "TRPIZ01803";
  881. oParam.service = "insucomapp.BloodJudge";
  882. oParam.method = "reqGetBloodTransDetails";
  883. oParam.inds = "req=ds_temp_sendsummary";
  884. oParam.outds = "ds_grd_summary=bloodsummary ds_grd_blooddetail=blooddetail";
  885. oParam.async = false;
  886. oParam.callback = "cf_TRPIZ01803";
  887. tranf_submit(oParam);
  888. }
  889. function cf_TRPIZ01803()
  890. {
  891. var getCount = ds_grd_blooddetail.rowcount;
  892. var bloodCnt = 0;
  893. var pre_prcpcd = "";
  894. ds_bloodlist_summary2.clearData();
  895. for(var i = 0; i < getCount; i++)
  896. {
  897. var prcpcd = ds_grd_blooddetail.getColumn(i, "prcpcd");
  898. ds_bloodlist_summary2.setColumn(i, "prcpcd", ds_grd_blooddetail.getColumn(i, "prcpcd"));
  899. ds_bloodlist_summary2.setColumn(i, "prcpnm", ds_grd_blooddetail.getColumn(i, "prcpnm"));
  900. if(prcpcd == pre_prcpcd)
  901. {
  902. bloodCnt ++;
  903. }
  904. else
  905. {
  906. bloodCnt = 0;
  907. bloodCnt ++;
  908. var nRow = ds_bloodlist_summary2.addRow();
  909. ds_bloodlist_summary2.setColumn(nRow, "prcpcd", ds_grd_blooddetail.getColumn(i, "prcpcd"));
  910. ds_bloodlist_summary2.setColumn(nRow, "prcpnm", ds_grd_blooddetail.getColumn(i, "prcpnm"));
  911. }
  912. ds_bloodlist_summary2.setColumn(nRow, "cnt", bloodCnt);
  913. pre_prcpcd = prcpcd;
  914. }
  915. }
  916. function button2_onclick(obj:Button, e:ClickEventInfo)
  917. {
  918. if (grd_blooddetail.rowcount > 0)
  919. {
  920. grdf_exportExcel(grd_blooddetail, "exportExcel", "see");
  921. }
  922. else
  923. {
  924. sysf_messageBox("엑셀저장할 수혈내역이", "I004"); ///엑셀저장할 내역이 없습니다.
  925. }
  926. }
  927. function btn_save_onclick(obj:Button, e:ClickEventInfo)
  928. {
  929. var row = ds_grd_bloodpat.rowposition;
  930. var updtdata = grdf_getGridUpdateData(grd_blooddetail);
  931. if ( updtdata.rowcount == 0)
  932. {
  933. sysf_messageBox("변경된 데이터가","I004");
  934. return;
  935. }
  936. else
  937. {
  938. for(var i = 0; i < ds_grd_summary.rowcount; i++)
  939. {
  940. if(ds_grd_summary.getRowType(i) == 4)
  941. {
  942. var execdt = ds_grd_summary.getColumn(i, "execdt");
  943. var prcpcd = ds_grd_summary.getColumn(i, "prcpcd");
  944. for(var j = 0; j < ds_grd_blooddetail.rowcount; j++)
  945. {
  946. var loop_execdt = ds_grd_blooddetail.getColumn(j, "execdt");
  947. var loop_prcpcd = ds_grd_blooddetail.getColumn(j, "prcpcd");
  948. if(loop_execdt == execdt && loop_prcpcd == prcpcd)
  949. {
  950. var blodno = ds_grd_blooddetail.getColumn(j, "blodno");
  951. var blodbarcd = ds_grd_blooddetail.getColumn(j, "blodbarcd");
  952. var nRow = ds_senditem_list.addRow();
  953. ds_senditem_list.setColumn(nRow, "pid", ds_temp_sendsummary.getColumn(0, "pid"));
  954. ds_senditem_list.setColumn(nRow, "blodno", blodno);
  955. ds_senditem_list.setColumn(nRow, "blodbarcd", blodbarcd);
  956. ds_senditem_list.setColumn(nRow, "execdt", loop_execdt);
  957. ds_senditem_list.setColumn(nRow, "prcpcd", loop_prcpcd);
  958. ds_senditem_list.setColumn(nRow, "prcpnm", ds_grd_blooddetail.getColumn(j, "prcpnm"));
  959. ds_senditem_list.setColumn(nRow, "judgeyn", ds_grd_summary.getColumn(i, "judgeyn"));
  960. ds_senditem_list.setColumn(nRow, "transresn", ds_grd_summary.getColumn(i, "transresn"));
  961. ds_senditem_list.setColumn(nRow, "rem", ds_grd_summary.getColumn(i, "rem"));
  962. ds_senditem_list.setColumn(nRow, "iud", "");
  963. }
  964. }
  965. }
  966. }
  967. var oParam = {};
  968. oParam.id = "TXPIZ01803";
  969. oParam.service = "insucomapp.BloodJudge";
  970. oParam.method = "reqSetBloodTransJudge";
  971. oParam.inds = "req=ds_senditem_list";
  972. oParam.outds = "";
  973. oParam.async = false;
  974. oParam.callback = "cf_TXPIZ01803";
  975. tranf_submit(oParam);
  976. }
  977. }
  978. function cf_TXPIZ01803()
  979. {
  980. grd_bloodpat_oncelldblclick();
  981. }
  982. function checkbox1_onclick(obj:CheckBox, e:ClickEventInfo)
  983. {
  984. grd_bloodpat_oncelldblclick();
  985. }
  986. function button3_onclick(obj:Button, e:ClickEventInfo)
  987. {
  988. var objDOM = rptf_createDOM();
  989. rptf_setNodeListToDOM(objDOM, "/root/sendsummary", ds_temp_sendsummary);
  990. rptf_setNodeListToDOM(objDOM, "/root/main/bloodlist/bloodsummary/gridbloodsummary", ds_grd_summary);
  991. var objParam = new Object();
  992. objParam.xml_data_XML1 = objDOM.documentElement.source;
  993. var option = "open=1;save=1;directprint=0;printdialog=0;print=1;zoom=0";
  994. rptf_exeReportPreview30(["RPPIZ01801"],[objParam], option);
  995. }
  996. ]]></Script>
  997. </Form>
  998. </FDL>