SMLBP01600_환자별불출내역조회.xfdl 25 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567
  1. <?xml version="1.0" encoding="utf-8"?>
  2. <FDL version="1.5">
  3. <TypeDefinition url="..\..\..\default_typedef.xml"/>
  4. <Form id="SMLBP01600" position="absolute 0 0 1256 805" titletext="환자별불출내역조회" onload="SMLBP01600_onload">
  5. <Layouts>
  6. <Layout>
  7. <Static id="caption5" text="환자별 불출 내역 조회" class="tit_1" position="absolute 0 0 160 25"/>
  8. <Div id="group2" taborder="4" position="absolute 0 25 1017 92" anchor="left top right" class="div_SA">
  9. <Layouts>
  10. <Layout>
  11. <Calendar id="input1" taborder="1" class="input_s_essential" position="absolute 168 10 258 30" mask="####-##-##" anchor="default" dateformat="yyyy-MM-dd" value="null"/>
  12. <Button id="btn_sea" taborder="2" text="조회" onlbuttonup="btn_sea_onlbuttonup" class="btn1" position="absolute 941 10 997 30" anchor="top right" onclick="group2_btn_sea_onclick"/>
  13. <Static id="caption9" text="조회일자" class="search_name" position="absolute 8 10 82 30" anchor="default"/>
  14. <Calendar id="input2" taborder="3" class="input_s_essential" position="absolute 317 10 407 30" anchor="default" dateformat="yyyy-MM-dd" value="null"/>
  15. <Static id="caption13" text="~" class="search_no_b" position="absolute 301 10 317 30" anchor="default" style="align:center;"/>
  16. <Edit id="ipt_blodno" taborder="4" class="input_s_button" position="absolute 82 35 192 55" anchor="default" onkeydown="group2_ipt_blodno_onkeydown" maxlength="9" inputtype="digit"/>
  17. <Static id="caption18" text="등록번호" class="search_name" position="absolute 8 35 82 55" anchor="default"/>
  18. <Static id="caption20" text="혈액성분" class="search_name" position="absolute 474 10 548 30" anchor="default"/>
  19. <Combo id="combo1" taborder="5" position="absolute 548 10 668 30" anchor="default" innerdataset="@ds_init_lb0606" codecolumn="cd" datacolumn="nm"/>
  20. <Static id="caption21" text="혈액형" class="search_name" position="absolute 692 10 753 30" anchor="default"/>
  21. <Combo id="combo2" taborder="6" position="absolute 753 10 863 30" anchor="default" innerdataset="@ds_cond_btype" codecolumn="value" datacolumn="label" index="0" value="00" text="-전체-"/>
  22. <Static id="caption22" text="반환" class="search_name" position="absolute 692 35 740 55" anchor="default"/>
  23. <Edit id="out_return" taborder="7" readonly="true" class="output_search" position="absolute 753 35 868 55" style="color:#cc0000ff;align:right middle;font:arial,12,bold;" anchor="default" value="0"/>
  24. <MaskEdit id="input6" taborder="8" mask="##:##" position="absolute 410 10 450 30" style="align:center middle;" anchor="default" type="string"/>
  25. <Edit id="opt_patnm" taborder="9" readonly="true" class="output_search" position="absolute 195 35 310 55" anchor="default"/>
  26. <Static id="caption23" text="혈액번호" class="search_name" position="absolute 474 35 548 55" anchor="default"/>
  27. <Edit id="ipt_blodno2" taborder="10" class="input_s_button" position="absolute 548 35 668 55" anchor="default" onkeydown="group2_ipt_blodno2_onkeydown" maxlength="10" inputtype="digit"/>
  28. <MaskEdit id="input3" taborder="12" mask="##:##" position="absolute 261 10 301 30" style="align:center middle;" anchor="default" type="string"/>
  29. <Combo id="combo3" taborder="14" position="absolute 82 10 165 30" anchor="default" innerdataset="@ds_cond_refgbn" codecolumn="value" datacolumn="label" index="0" value="1" text="준비일자"/>
  30. <Button id="btn_reftext" taborder="15" onclick="group3_btn_reftext_onclick" position="absolute 173 37 189 52"/>
  31. <Button id="btn_reftext00" taborder="16" position="absolute 648 37 664 52" onclick="group2_btn_reftext00_onclick"/>
  32. </Layout>
  33. </Layouts>
  34. </Div>
  35. <Button id="button2" taborder="6" text="BISS출고" onlbuttonup="button2_onlbuttonup" class="btn2" position="absolute 1125 99 1193 119" anchor="top right" onclick="button2_onclick"/>
  36. <Button id="button51" taborder="7" text="엑셀" onlbuttonup="button51_onlbuttonup" class="btn7" position="absolute 1196 99 1252 119" anchor="top right" onclick="button51_onclick"/>
  37. <Div id="group00" taborder="8" position="absolute 1021 25 1256 92" anchor="top right" class="div_SA">
  38. <Layouts>
  39. <Layout>
  40. <Button id="button1" taborder="25" text="조회" onlbuttonup="button1_onlbuttonup" class="btn1" position="absolute 167 10 223 30" anchor="top right"/>
  41. <Static id="caption19" text="PRC 동시 출고" class="search_name" position="absolute 8 10 123 30" anchor="default"/>
  42. <Static id="caption25" text="이상" position="absolute 46 28 77 48" anchor="default"/>
  43. <MaskEdit id="input5" taborder="27" mask="#,###" position="absolute 8 27 43 47" style="align:right middle;" anchor="default" value="3"/>
  44. </Layout>
  45. </Layouts>
  46. </Div>
  47. <Static id="caption3" text="불출 내역" class="tit_2" position="absolute 0 102 117 122"/>
  48. <Button id="button42" taborder="25" text="저장" class="btn4" visible="false" position="absolute 1069 0 1125 20" anchor="top right"/>
  49. <Button id="button46" taborder="26" text="출력" class="btn4" visible="false" position="absolute 1128 0 1184 20" anchor="top right"/>
  50. <Button id="btn_cle" taborder="27" text="초기화" onlbuttonup="btn_cle_onlbuttonup" class="btn4" position="absolute 1187 0 1256 20" anchor="top right"/>
  51. <Grid id="grd_delive" taborder="29" binddataset="ds_grid_grd_delive" useinputpanel="false" oncellclick="grd_delive_oncellclick" position="absolute 0 122 1256 805" anchor="all" onclick="grd_delive_onclick" selecttype="cell" autoenter="select" onheadclick="grd_delive_onheadclick">
  52. <Formats>
  53. <Format id="default">
  54. <Columns>
  55. <Column size="30"/>
  56. <Column size="60"/>
  57. <Column size="80"/>
  58. <Column size="46"/>
  59. <Column size="66"/>
  60. <Column size="112"/>
  61. <Column size="30"/>
  62. <Column size="80"/>
  63. <Column size="74"/>
  64. <Column size="90"/>
  65. <Column size="60"/>
  66. <Column size="60"/>
  67. <Column size="60"/>
  68. <Column size="60"/>
  69. <Column size="66"/>
  70. <Column size="66"/>
  71. <Column size="66"/>
  72. <Column size="66"/>
  73. <Column size="66"/>
  74. <Column size="66"/>
  75. <Column size="66"/>
  76. <Column size="106"/>
  77. <Column size="106"/>
  78. <Column size="106"/>
  79. <Column size="106"/>
  80. <Column size="100"/>
  81. <Column size="106"/>
  82. <Column size="70"/>
  83. <Column size="70"/>
  84. <Column size="40"/>
  85. <Column size="100"/>
  86. <Column size="114"/>
  87. <Column size="100"/>
  88. <Column size="500"/>
  89. <Column size="0"/>
  90. </Columns>
  91. <Rows>
  92. <Row size="24" band="head"/>
  93. <Row size="24"/>
  94. </Rows>
  95. <Band id="head">
  96. <Cell/>
  97. <Cell col="1" text="상태"/>
  98. <Cell col="2" text="혈액번호"/>
  99. <Cell col="3" text="seq"/>
  100. <Cell col="4" text="혈액형"/>
  101. <Cell col="5" text="성분제제"/>
  102. <Cell col="6" text="Irr"/>
  103. <Cell col="7" text="환자명"/>
  104. <Cell col="8" text="등록번호"/>
  105. <Cell col="9" text="병동/병실"/>
  106. <Cell col="10" text="접수자"/>
  107. <Cell col="11" text="검사자"/>
  108. <Cell col="12" text="불출자"/>
  109. <Cell col="13" text="수령자"/>
  110. <Cell col="14" text="검사결과"/>
  111. <Cell col="15" text="실온 Saline"/>
  112. <Cell col="16" text="37˚c ALB/LISS"/>
  113. <Cell col="17" text="Coombs"/>
  114. <Cell col="18" text="Special"/>
  115. <Cell col="19" text="4˚c Saline"/>
  116. <Cell col="20" text="Enzyme"/>
  117. <Cell col="21" text="불출일자"/>
  118. <Cell col="22" text="준비일자"/>
  119. <Cell col="23" text="검사일자"/>
  120. <Cell col="24" text="유효일자"/>
  121. <Cell col="25" text="반환,폐기"/>
  122. <Cell col="26" text="반환,폐기일"/>
  123. <Cell col="27" text="지정Donor"/>
  124. <Cell col="28" text="처방의"/>
  125. <Cell col="29" text="Filter"/>
  126. <Cell col="30" text="수혈시작시간"/>
  127. <Cell col="31" text="수혈부작용"/>
  128. <Cell col="32" text="수혈부서"/>
  129. <Cell col="33" text="Comment"/>
  130. <Cell col="34" text="caption2"/>
  131. </Band>
  132. <Band id="body">
  133. <Cell celltype="head" expr="expr:currow+1"/>
  134. <Cell col="1" text="bind:blodcomstat"/>
  135. <Cell col="2" displaytype="text" edittype="text" text="bind:blodno" editautoselect="true"/>
  136. <Cell col="3" text="bind:prepblodseqno"/>
  137. <Cell col="4" text="bind:btype"/>
  138. <Cell col="5" style="align:left middle;" text="bind:blodcomnm"/>
  139. <Cell col="6" style="align:center middle;" text="bind:iryn"/>
  140. <Cell col="7" style="align:center middle;" text="bind:patnm"/>
  141. <Cell col="8" displaytype="text" edittype="text" text="bind:pid" editautoselect="true"/>
  142. <Cell col="9" text="bind:wardroom"/>
  143. <Cell col="10" style="align:center middle;" text="bind:prepid"/>
  144. <Cell col="11" style="align:center middle;" text="bind:cmid"/>
  145. <Cell col="12" displaytype="normal" style="align:center middle;" text="bind:deliveid"/>
  146. <Cell col="13" style="align:center middle;" text="bind:acptid"/>
  147. <Cell col="14" displaytype="combo" text="bind:cmrslt" combodataset="ds_rslt" combocodecol="value" combodatacol="label"/>
  148. <Cell col="15" text="bind:cmrslt01"/>
  149. <Cell col="16" text="bind:cmrslt02"/>
  150. <Cell col="17" text="bind:cmrslt03"/>
  151. <Cell col="18" text="bind:cmrslt04"/>
  152. <Cell col="19" text="bind:cmrslt05"/>
  153. <Cell col="20" text="bind:cmrslt06"/>
  154. <Cell col="21" text="bind:delivedt" mask="expr:delivedt==null?'':'####-##-## ##:##'"/>
  155. <Cell col="22" text="bind:prepdt" mask="expr:prepdt==null?'':'####-##-## ##:##'"/>
  156. <Cell col="23" text="bind:testdt" mask="expr:testdt==null?'':'####-##-## ##:##'"/>
  157. <Cell col="24" text="bind:validt" mask="expr:validt==null?'':'####-##-## ##:##'"/>
  158. <Cell col="25" text="bind:rtnabn"/>
  159. <Cell col="26" text="bind:rtnabndt" mask="expr:rtnabndt==null?'':'####-##-## ##:##'"/>
  160. <Cell col="27" style="align:center middle;" text="bind:dnornm"/>
  161. <Cell col="28" style="align:center middle;" text="bind:orddrnm"/>
  162. <Cell col="29" style="align:center middle;" text="bind:filteryn"/>
  163. <Cell col="30" text="bind:tnsstrddtm" mask="expr:tnsstrddtm==null?'':'####-##-## ##:##'"/>
  164. <Cell col="31" text="bind:tnssideeffect"/>
  165. <Cell col="32" text="bind:dept"/>
  166. <Cell col="33" style="align:left;" text="bind:cmt"/>
  167. <Cell col="34"/>
  168. </Band>
  169. </Format>
  170. </Formats>
  171. </Grid>
  172. </Layout>
  173. </Layouts>
  174. <Objects>
  175. <Dataset id="ds_cond_refgbn" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  176. <ColumnInfo>
  177. <Column id="label" type="STRING" size="256"/>
  178. <Column id="value" type="STRING" size="256"/>
  179. </ColumnInfo>
  180. <Rows>
  181. <Row>
  182. <Col id="label">준비일자</Col>
  183. <Col id="value">1</Col>
  184. </Row>
  185. <Row>
  186. <Col id="label">불출일자</Col>
  187. <Col id="value">2</Col>
  188. </Row>
  189. </Rows>
  190. </Dataset>
  191. <Dataset id="ds_init_lb0606" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  192. <ColumnInfo>
  193. <Column id="cd" type="STRING" size="256"/>
  194. <Column id="nm" type="STRING" size="256"/>
  195. <Column id="etc01" type="STRING" size="256"/>
  196. </ColumnInfo>
  197. </Dataset>
  198. <Dataset id="ds_cond_btype" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  199. <ColumnInfo>
  200. <Column id="label" type="STRING" size="256"/>
  201. <Column id="value" type="STRING" size="256"/>
  202. </ColumnInfo>
  203. <Rows>
  204. <Row>
  205. <Col id="label">-전체-</Col>
  206. <Col id="value">00</Col>
  207. </Row>
  208. <Row>
  209. <Col id="label">A+</Col>
  210. <Col id="value">A+</Col>
  211. </Row>
  212. <Row>
  213. <Col id="label">B+</Col>
  214. <Col id="value">B+</Col>
  215. </Row>
  216. <Row>
  217. <Col id="label">O+</Col>
  218. <Col id="value">O+</Col>
  219. </Row>
  220. <Row>
  221. <Col id="label">AB+</Col>
  222. <Col id="value">AB+</Col>
  223. </Row>
  224. <Row>
  225. <Col id="label">other</Col>
  226. <Col id="value">E</Col>
  227. </Row>
  228. </Rows>
  229. </Dataset>
  230. <Dataset id="ds_grid_grd_delive" firefirstcount="0" firenextcount="0" useclientlayout="true" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false" onrowposchanged="ds_grid_grd_rslt_onrowposchanged">
  231. <ColumnInfo>
  232. <column id="blodcomstat" type="STRING" size="256"/>
  233. <column id="blodno" type="STRING" size="256"/>
  234. <column id="prepblodseqno" type="STRING" size="256"/>
  235. <column id="btype" type="STRING" size="256"/>
  236. <column id="blodcomnm" type="STRING" size="256"/>
  237. <column id="iryn" type="STRING" size="256"/>
  238. <column id="patnm" type="STRING" size="256"/>
  239. <column id="pid" type="STRING" size="256"/>
  240. <column id="wardroom" type="STRING" size="256"/>
  241. <column id="dept" type="STRING" size="256"/>
  242. <column id="prepid" type="STRING" size="256"/>
  243. <column id="cmid" type="STRING" size="256"/>
  244. <column id="deliveid" type="STRING" size="256"/>
  245. <column id="acptid" type="STRING" size="256"/>
  246. <column id="cmrslt" type="STRING" size="256"/>
  247. <column id="cmrslt01" type="STRING" size="256"/>
  248. <column id="cmrslt02" type="STRING" size="256"/>
  249. <column id="cmrslt03" type="STRING" size="256"/>
  250. <column id="cmrslt04" type="STRING" size="256"/>
  251. <column id="cmrslt05" type="STRING" size="256"/>
  252. <column id="cmrslt06" type="STRING" size="256"/>
  253. <column id="delivedt" type="STRING" size="256"/>
  254. <column id="prepdt" type="STRING" size="256"/>
  255. <column id="testdt" type="STRING" size="256"/>
  256. <column id="validt" type="STRING" size="256"/>
  257. <column id="rtnabn" type="STRING" size="256"/>
  258. <column id="rtnabndt" type="STRING" size="256"/>
  259. <column id="tnsstrddtm" type="STRING" size="256"/>
  260. <column id="tnssideeffect" type="STRING" size="256"/>
  261. <column id="orddrnm" type="STRING" size="256"/>
  262. <column id="filteryn" type="STRING" size="256"/>
  263. <column id="cmt" type="STRING" size="256"/>
  264. <column id="returncnt" type="BIGDECIMAL" size="256"/>
  265. <column id="dnornm" type="STRING" size="256"/>
  266. <column id="patcmt" type="STRING" size="256"/>
  267. </ColumnInfo>
  268. </Dataset>
  269. <Dataset id="ds_rslt" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  270. <ColumnInfo>
  271. <Column id="label" type="STRING" size="256"/>
  272. <Column id="value" type="STRING" size="256"/>
  273. </ColumnInfo>
  274. <Rows>
  275. <Row>
  276. <Col id="label">적합</Col>
  277. <Col id="value">1</Col>
  278. </Row>
  279. <Row>
  280. <Col id="label">부적합</Col>
  281. <Col id="value">2</Col>
  282. </Row>
  283. <Row>
  284. <Col id="label">적합(응급)</Col>
  285. <Col id="value">3</Col>
  286. </Row>
  287. <Row>
  288. <Col id="label">준비</Col>
  289. <Col id="value">4</Col>
  290. </Row>
  291. <Row>
  292. <Col id="label">검사중</Col>
  293. <Col id="value">5</Col>
  294. </Row>
  295. <Row>
  296. <Col id="label">보류</Col>
  297. <Col id="value">6</Col>
  298. </Row>
  299. <Row>
  300. <Col id="label">최소적합</Col>
  301. <Col id="value">7</Col>
  302. </Row>
  303. </Rows>
  304. </Dataset>
  305. </Objects>
  306. <Script type="xscript4.0"><![CDATA[/***************************************************************************************
  307. * System Name :
  308. * Job Name :
  309. * Creator :
  310. * Make Date : 2015-05-01
  311. * Description :
  312. *---------------------------------------------------------------------------------------
  313. * Modify Date Modifier Modify Description
  314. *---------------------------------------------------------------------------------------
  315. * 2015-05-01 Live Converter TF->XP
  316. *
  317. *---------------------------------------------------------------------------------------
  318. ****************************************************************************************/
  319. include "com_commonxp::comm_main.xjs";
  320. include "lis_commonxp::LZZ001.xjs";
  321. include "lis_commonxp::LLZ001.xjs";
  322. function SMLBP01600_onload(obj:Form, e:LoadEventInfo)
  323. {
  324. //폼 초기화 함수
  325. frmf_initForm(obj);
  326. lf_setInit();
  327. }
  328. function lf_setInit() {
  329. //0121 혈액원기관코드
  330. lf_getDbDeptcd("0000|0606|");
  331. var toDay = utlf_getCurrentDate();
  332. var mDate = utlf_addDate(toDay, 1);
  333. group2.input1.value = toDay;
  334. group2.input2.value = mDate;
  335. group2.input3.value = "0800";
  336. group2.input6.value = "0759";
  337. group2.combo1.value = "00";
  338. group2.combo2.value = "00";
  339. group00.input5.value = "3";
  340. group2.combo3.value = "1";
  341. group2.ipt_blodno.value = "";
  342. group2.ipt_blodno2.value = "";
  343. }
  344. function lf_getPidDelive(cnt) {
  345. var fromdd = group2.input1.value;
  346. var todd = group2.input2.value;
  347. var fromtm = group2.input3.value;
  348. var totm = group2.input6.value;
  349. var refgbn = group2.combo3.value;
  350. var blodcomcd = group2.combo1.value;
  351. var btype = group2.combo2.value;
  352. var pid = group2.ipt_blodno.value;
  353. var blodno = group2.ipt_blodno2.value;
  354. if(utlf_isNull(cnt)) { cnt = 0; }
  355. var cnt = cnt;
  356. var sInDsName = dsf_createDsRow("ds_temp_search"
  357. , [{col: "fromdd", val:fromdd }
  358. , {col: "todd", val:todd }
  359. , {col: "fromtm", val:fromtm }
  360. , {col: "totm", val:totm }
  361. , {col: "blodcomcd", val:blodcomcd }
  362. , {col: "btype", val:btype }
  363. , {col: "pid", val:pid }
  364. , {col: "blodno", val:blodno }
  365. , {col: "cnt", val:cnt }
  366. , {col: "refgbn", val:refgbn }
  367. ]);
  368. var oParam = {};
  369. oParam.id = "TRLBP01601";
  370. oParam.service = "refprintmngtapp.BloodBankRefPrintMngt";
  371. oParam.method = "reqGetPidDeliveList";
  372. oParam.inds = "cond="+sInDsName;
  373. oParam.outds = "ds_grid_grd_delive=getPidDeliveList";
  374. oParam.async = false;
  375. oParam.callback = "cbf_SMLBP01600";
  376. tranf_submit(oParam);
  377. }
  378. //키이벤트 엔터키 입력시
  379. function lf_keyEvent(target) {
  380. // 등록번호 바코드 리딩시
  381. if(target == "ipt_blodno") {
  382. if(utlf_isNull(group2.ipt_blodno.value)) {
  383. sysf_messageBox("등록번호를 입력하십시오","E");
  384. return;
  385. }
  386. group2.ipt_blodno.value = frmf_setInputNodeCurPid_Change(group2.ipt_blodno.value); //등록번호 9자리로 변경
  387. var val = group2.ipt_blodno.value;
  388. group2.ipt_blodno.value = val.toUpperCase();
  389. lf_getPidDelive();
  390. group2.ipt_blodno.setSelect();
  391. }
  392. // 혈액번호 바코드 리딩시
  393. if(target == "ipt_blodno2"){
  394. if(utlf_isNull(group2.ipt_blodno2.value)) {
  395. sysf_messageBox("혈액번호를 입력하십시오","E");
  396. return;
  397. }
  398. var val = group2.ipt_blodno2.value;
  399. val = val.toUpperCase();
  400. group2.ipt_blodno2.value = val.substr(0, 10);
  401. lf_getPidDelive();
  402. group2.ipt_blodno2.setSelect();
  403. }
  404. }
  405. //환자코멘트 가져오기
  406. function lf_getpatCMT() {
  407. var row = ds_grid_grd_delive.rowposition;
  408. if(!utlf_isNull(ds_grid_grd_delive.getColumn(row, "patcmt"))) {
  409. var cmt = ds_grid_grd_delive.getColumn(row, "patcmt");
  410. sysf_messageBox("* 환자별 코멘트 \n" + cmt, "I");
  411. }
  412. }
  413. // 엑셀 저장
  414. function lf_saveExcel(pGridId) {
  415. grdf_exportExcel(pGridId, lf_lisGetTitle(this), "sheet1", false);
  416. }
  417. // callback 함수
  418. function cbf_SMLBP01600(strSvcID, nErrorCode, strErrorMag) {
  419. if(nErrorCode != 0) {
  420. sysf_messageBox("ID: "+ strSvcID + " Error: " + strErrorMag, "E009", "");
  421. }else{
  422. switch(strSvcID) {
  423. case "TRLZZ00101":
  424. var toDay = utlf_getCurrentDate();
  425. var mDate = utlf_addDate(toDay, 1);
  426. group2.input1.value = toDay;
  427. group2.input2.value = mDate;
  428. group2.input3.value = "0800";
  429. group2.input6.value = "0759";
  430. group2.combo1.value = "00";
  431. group2.combo2.value = "00";
  432. group00.input5.value = "3";
  433. group2.combo3.value = "1";
  434. group2.ipt_blodno.value = "";
  435. group2.ipt_blodno2.value = "";
  436. break;
  437. case "TRLBP01601":
  438. // 환자명 보이기
  439. if(!utlf_isNull(group2.ipt_blodno.value)){
  440. if(ds_grid_grd_delive.rowcount > 1){
  441. ds_grid_grd_delive.rowposition = 0;
  442. group2.opt_patnm.value = ds_grid_grd_delive.getColumn(ds_grid_grd_delive.rowposition, "patnm");
  443. }
  444. }else{
  445. group2.opt_patnm.value = "";
  446. }
  447. // 반환 노란색으로
  448. if(ds_grid_grd_delive.rowcount > 1) {
  449. grdf_setRowStyle( grd_delive , "6" , "혈액반환" , "blodcomstat" , "equal"); // 7 - 주황색
  450. grdf_setRowStyle( grd_delive , "0" , "수혈접수" , "blodcomstat" , "equal");
  451. grdf_setRowStyle( grd_delive , "0" , "혈액준비" , "blodcomstat" , "equal");
  452. grdf_setRowStyle( grd_delive , "0" , "매칭검사" , "blodcomstat" , "equal");
  453. grdf_setRowStyle( grd_delive , "0" , "불출대기" , "blodcomstat" , "equal");
  454. }
  455. group2.out_return.value = ds_grid_grd_delive.getSum("returncnt");
  456. break;
  457. default:
  458. break;
  459. }
  460. }
  461. }
  462. function btn_sea_onlbuttonup(obj:Button, e:MouseEventInfo)
  463. {
  464. lf_getPidDelive();
  465. }
  466. function group2_ipt_blodno_onkeydown(obj:Edit, e:KeyEventInfo)
  467. {
  468. if(e.keycode==13) {
  469. lf_keyEvent(obj.name);
  470. }
  471. }
  472. function group2_ipt_blodno2_onkeydown(obj:Edit, e:KeyEventInfo)
  473. {
  474. if(e.keycode==13) {
  475. lf_keyEvent(obj.name);
  476. }
  477. }
  478. function button1_onlbuttonup(obj:Button, e:MouseEventInfo)
  479. {
  480. lf_getPidDelive(group00.input5.value);
  481. }
  482. function button51_onlbuttonup(obj:Button, e:MouseEventInfo)
  483. {
  484. lf_saveExcel(grd_delive);
  485. }
  486. function grd_delive_oncellclick(obj:Grid, e:GridClickEventInfo)
  487. {
  488. lf_getpatCMT(); // 환자별 코멘트 가져오기
  489. }
  490. function button2_onlbuttonup(obj:Button, e:MouseEventInfo)
  491. {
  492. var objArg = new Object();
  493. var rtn = frmf_modal("SMLBP02900", "SMLBP02900", objArg, "", "", 0, 0, "", "", "title=true,status=true close=true", "", "", "M");
  494. }
  495. function btn_cle_onlbuttonup(obj:Button, e:MouseEventInfo)
  496. {
  497. this.reload();
  498. }
  499. function button51_onclick(obj:Button, e:ClickEventInfo)
  500. {
  501. }
  502. function group3_btn_reftext_onclick(obj:Button, e:ClickEventInfo)
  503. {
  504. if( utlf_isNull(group2.ipt_blodno.value))
  505. {
  506. alert("등록번호를 입력하십시오");
  507. }else{
  508. lf_getPidDelive();
  509. }
  510. }
  511. function group2_btn_reftext00_onclick(obj:Button, e:ClickEventInfo)
  512. {
  513. if( utlf_isNull(group2.ipt_blodno2.value))
  514. {
  515. alert("혈액번호를 입력하십시오");
  516. }else{
  517. lf_getPidDelive();
  518. }
  519. }
  520. function grd_delive_onheadclick(obj:Grid, e:GridClickEventInfo)
  521. {
  522. if (e.col != e.oldcol)
  523. {
  524. var pos = grd_delive.hscrollbar.pos;
  525. grdf_clearSort(obj);
  526. grdf_gridSort(grd_delive,e);
  527. grd_delive.hscrollbar.pos = pos;
  528. }
  529. }
  530. ]]></Script>
  531. </Form>
  532. </FDL>