SMLBP00530_혈액준비후취소내역조회.xfdl 14 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429
  1. <?xml version="1.0" encoding="utf-8"?>
  2. <FDL version="1.5">
  3. <TypeDefinition url="..\..\..\default_typedef.xml"/>
  4. <Form id="workform" position="absolute 0 0 1256 805" titletext="혈액준비후 취소내역조회" oninit="model1_oninit" onload="workform_onload">
  5. <Layouts>
  6. <Layout>
  7. <Static id="caption6" text="혈액준비후 취소내역조회" class="tit_1" position="absolute 0 0 208 25"/>
  8. <Button id="btn_excel" taborder="11" text="엑셀" onlbuttonup="btn_excel_onlbuttonup" class="btn7" position="absolute 1204 99 1254 119" anchor="top right"/>
  9. <Grid id="grd_tnslist" class="datagrid2" taborder="12" useinputpanel="false" position="absolute 0 122 1256 805" anchor="all" treeinitstatus="collapse,null" binddataset="ds_grid_grd_tnslist" treeuseexpandkey="false" treeuseimage="false" treeuseline="false" treeusecheckbox="false" cellsizingtype="none" autofittype="col">
  10. <Formats>
  11. <Format id="default">
  12. <Columns>
  13. <Column size="30"/>
  14. <Column size="69"/>
  15. <Column size="79"/>
  16. <Column size="0"/>
  17. <Column size="0"/>
  18. <Column size="228"/>
  19. <Column size="70"/>
  20. <Column size="81"/>
  21. <Column size="57"/>
  22. <Column size="83"/>
  23. <Column size="57"/>
  24. <Column size="106"/>
  25. <Column size="64"/>
  26. <Column size="124"/>
  27. <Column size="67"/>
  28. <Column size="126"/>
  29. </Columns>
  30. <Rows>
  31. <Row size="35" band="head"/>
  32. <Row size="32"/>
  33. </Rows>
  34. <Band id="head">
  35. <Cell text="No."/>
  36. <Cell col="1" text="등록번호"/>
  37. <Cell col="2" text="환자명"/>
  38. <Cell col="3" text="수혈희망일"/>
  39. <Cell col="4" text="수혈구분"/>
  40. <Cell col="5" text="성분제제"/>
  41. <Cell col="6" text="제제코드"/>
  42. <Cell col="7" text="처방과"/>
  43. <Cell col="8" text="처방의"/>
  44. <Cell col="9" text="병동"/>
  45. <Cell col="10" text="HB"/>
  46. <Cell col="11" text="혈액번호"/>
  47. <Cell col="12" text="실시자"/>
  48. <Cell col="13" text="실시일시"/>
  49. <Cell col="14" text="취소자"/>
  50. <Cell col="15" text="취소일자"/>
  51. </Band>
  52. <Band id="body">
  53. <Cell celltype="head" expr="expr:currow+1"/>
  54. <Cell col="1" displaytype="text" edittype="none" style="align:center;" text="bind:pid"/>
  55. <Cell col="2" text="bind:patnm"/>
  56. <Cell col="3" text="bind:prcphopedd" mask="expr:prcphopedd==null?'':'####-##-##'"/>
  57. <Cell col="4" text="bind:tnsreqacptflag"/>
  58. <Cell col="5" style="align:left;" text="bind:blodcomnm"/>
  59. <Cell col="6" text="bind:blodcomcd"/>
  60. <Cell col="7" text="bind:orddeptnm"/>
  61. <Cell col="8" text="bind:orddrnm"/>
  62. <Cell col="9" text="bind:wardnm"/>
  63. <Cell col="10" text="bind:hb"/>
  64. <Cell col="11" displaytype="normal" style="align:center middle;" text="bind:blodno" calendardisplaynulltype="nulltext"/>
  65. <Cell col="12" displaytype="normal" edittype="none" style="align:center middle;" text="bind:execnm" calendardisplaynulltype="nulltext"/>
  66. <Cell col="13" displaytype="date" style="align:center middle;" text="bind:execdt" mask="yyyy-MM-dd HH:mm"/>
  67. <Cell col="14" text="bind:cancelnm"/>
  68. <Cell col="15" displaytype="date" text="bind:lastupdtdt" mask="yyyy-MM-dd HH:mm"/>
  69. </Band>
  70. </Format>
  71. </Formats>
  72. </Grid>
  73. <Static id="caption1" text="혈액취소현황 목록" class="tit_2" position="absolute 0 102 145 122"/>
  74. <Div id="Div00" anchor="left top right" taborder="13" text="Div00" scrollbars="none" position="absolute 0 25 1256 92" class="div_SA">
  75. <Layouts>
  76. <Layout>
  77. <Button id="button1" taborder="60" text="조회" class="btn1" position="absolute 658 22 722 43" anchor="top right" onlbuttonup="btn_ref_onlbuttonup" onclick="Div00_button1_onclick"/>
  78. <Shape id="line13" linetype="vertical" class="line_4" position="absolute 1118 21 1118 70" anchor="default"/>
  79. <Static id="caption4" text="등록번호" class="search_name" position="absolute 308 23 382 43" style="align:left;" anchor="default"/>
  80. <Edit id="ipt_pid" taborder="62" class="input_s_essential" position="absolute 371 23 471 43" anchor="default" onkeydown="Div00_ipt_pid_onkeydown"/>
  81. <Static id="caption11" text="취소일자" class="search_name" position="absolute 23 24 101 44" style="align:left;" anchor="default" visible="true"/>
  82. <Calendar id="ipt_fromdd" taborder="70" dateformat="yyyy-MM-dd" class="input_s_essential" position="absolute 92 23 179 43" visible="true"/>
  83. <Calendar id="ipt_todd" taborder="71" dateformat="yyyy-MM-dd" class="input_s_essential" position="absolute 203 23 290 43" visible="true" usebitmapcache="true"/>
  84. <Static id="caption00" text="~" position="absolute 189 25 201 42"/>
  85. <CheckBox id="hb" taborder="72" text="HB 추가" position="absolute 505 24 568 48" value="false" falsevalue="0" truevalue="1"/>
  86. </Layout>
  87. </Layouts>
  88. </Div>
  89. <Button id="btn_reset" taborder="14" text="초기화" onclick="btn_reset_onclick" class="btn4" position="absolute 1187 1 1256 21" anchor="top right"/>
  90. </Layout>
  91. </Layouts>
  92. <Objects>
  93. <Dataset id="ds_grid_grd_tnslist" firefirstcount="0" firenextcount="0" useclientlayout="true" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  94. <ColumnInfo>
  95. <column id="pid" type="STRING" size="256"/>
  96. <Column id="prcpdd" type="STRING" size="256"/>
  97. <column id="patnm" type="STRING" size="256"/>
  98. <Column id="execnm" type="STRING" size="256"/>
  99. <Column id="execdt" type="STRING" size="256"/>
  100. <Column id="blodcomcd" type="STRING" size="256"/>
  101. <Column id="blodcomnm" type="STRING" size="256"/>
  102. <Column id="blodno" type="STRING" size="256"/>
  103. <Column id="hb" type="STRING" size="256"/>
  104. <column id="lastupdtdt" type="STRING" size="256"/>
  105. <Column id="cancelnm" type="STRING" size="256"/>
  106. <Column id="orddeptnm" type="STRING" size="256"/>
  107. <Column id="orddrnm" type="STRING" size="256"/>
  108. <Column id="wardnm" type="STRING" size="256"/>
  109. </ColumnInfo>
  110. </Dataset>
  111. </Objects>
  112. <Script type="xscript4.0"><![CDATA[/***************************************************************************************
  113. * System Name :
  114. * Job Name :
  115. * Creator :
  116. * Make Date : 2015-05-01
  117. * Description :
  118. *---------------------------------------------------------------------------------------
  119. * Modify Date Modifier Modify Description
  120. *---------------------------------------------------------------------------------------
  121. * 2015-05-01 Live Converter TF->XP
  122. *
  123. *---------------------------------------------------------------------------------------
  124. ****************************************************************************************/
  125. include "com_commonxp::comm_main.xjs";
  126. include "lis_commonxp::LZZ001.xjs";
  127. include "lis_commonxp::LLZ001.xjs";
  128. var tnsstatValue = "";
  129. function lf_setInit() {
  130. var toDay = utlf_getCurrentDate().toDate("YYYYMMDD").getAddDate(-1);
  131. // var todd = utlf_getCurrentDate().toDate("YYYYMMDD").getAddDate(10);
  132. var todd = utlf_getCurrentDate().toDate("YYYYMMDD");
  133. Div00.ipt_fromdd.value = toDay.getDateFormat("YYYYMMDD");
  134. Div00.ipt_todd.value = todd.getDateFormat("YYYYMMDD") ;
  135. }
  136. // 키이벤트 엔터키 입력시
  137. function lf_keyEvent() {
  138. Div00.ipt_pid.setSelect();
  139. lf_getTnsReqList();
  140. }
  141. function lf_getTnsReqList() {
  142. var pid = Div00.ipt_pid.value; // 등록번호
  143. var fromdd = Div00.ipt_fromdd.value; // 시작일
  144. var todd = Div00.ipt_todd.value; // 종료일
  145. var hb = Div00.hb.value; // 종료일
  146. trace("tttttttttttttt"+ hb);
  147. var sInDsName = dsf_createDsRow("ds_temp_search"
  148. , [{col: "pid", val:pid }
  149. , {col: "hopefromdd", val:fromdd }
  150. , {col: "hopetodd", val:todd }
  151. , {col: "hb", val:hb }
  152. ]);
  153. var oParam = {};
  154. oParam.id = "TRLBP00503";
  155. oParam.service = "refprintmngtapp.BloodBankRefPrintMngt";
  156. oParam.method = "reqGetTnsRetList3";
  157. oParam.inds = "cond="+sInDsName;
  158. oParam.outds = "ds_grid_grd_tnslist=getTnsReqList";
  159. oParam.async = false;
  160. oParam.callback = "cbf_SMLBP00500";
  161. tranf_submit(oParam);
  162. /*
  163. if(ds_grid_grd_tnslist.rowcount > 0){
  164. ds_grid_grd_tnslist.addColumn("backgroundcolor","string");
  165. for(i=0; i <ds_grid_grd_tnslist.rowcount; i++){
  166. if(ds_grid_grd_tnslist.getColumn(i, "day") == "0"){
  167. ds_grid_grd_tnslist.setColumn(i,"backgroundcolor","#f7a08b");
  168. }else if(ds_grid_grd_tnslist.getColumn(i, "day") == "1"){
  169. ds_grid_grd_tnslist.setColumn(i,"backgroundcolor","#ffe79d");
  170. }else {
  171. ds_grid_grd_tnslist.setColumn(i,"backgroundcolor","#FFFFFF");
  172. }
  173. }
  174. var sExpr = "EXPR(backgroundcolor)";
  175. for(var i=0; i< grd_tnslist.getCellCount("Head"); i++){
  176. grd_tnslist.setCellProperty("body", i, "background", sExpr);
  177. grd_tnslist.setCellProperty("body", i, "background2", sExpr);
  178. }
  179. }
  180. */
  181. }
  182. // 수혈상태 변경
  183. function lf_setTnsStat(Ref) {
  184. tnsstatValue = "";
  185. if(Ref == "all"){
  186. if(Div00.chk_all.value == "1"){
  187. Div00.chk_a.value = "1";
  188. Div00.chk_b.value = "1";
  189. Div00.chk_c.value = "1";
  190. Div00.chk_d.value = "1";
  191. Div00.chk_e.value = "1";
  192. Div00.chk_f.value = "1";
  193. Div00.chk_g.value = "1";
  194. tnsstatValue = "'1','2','3','4','5','6','7','8'";
  195. }else{
  196. Div00.chk_a.value = "0";
  197. Div00.chk_b.value = "0";
  198. Div00.chk_c.value = "0";
  199. Div00.chk_d.value = "0";
  200. Div00.chk_e.value = "0";
  201. Div00.chk_f.value = "0";
  202. Div00.chk_g.value = "0";
  203. tnsstatValue = "";
  204. }
  205. }else{
  206. Div00.chk_all.value = "0";
  207. //접수
  208. if(Div00.chk_a.value == "1"){
  209. if(tnsstatValue == ""){
  210. tnsstatValue = "'1'";
  211. }else{
  212. tnsstatValue += ",'1'";
  213. }
  214. }
  215. //준비중
  216. if(Div00.chk_b.value == "1"){
  217. if(tnsstatValue == ""){
  218. tnsstatValue = "'2'";
  219. }else{
  220. tnsstatValue += ",'2'";
  221. }
  222. }
  223. //준비완료
  224. if(Div00.chk_c.value == "1"){
  225. if(tnsstatValue == ""){
  226. tnsstatValue = "'3'";
  227. }else{
  228. tnsstatValue += ",'3'";
  229. }
  230. }
  231. //불출완료
  232. if(Div00.chk_d.value == "1"){
  233. if(tnsstatValue == ""){
  234. tnsstatValue = "'4'";
  235. }else{
  236. tnsstatValue += ",'4'";
  237. }
  238. }
  239. //반납
  240. if(Div00.chk_e.value == "1"){
  241. if(tnsstatValue == ""){
  242. tnsstatValue = "'5'";
  243. }else{
  244. tnsstatValue += ",'5'";
  245. }
  246. }
  247. //폐기
  248. if(Div00.chk_f.value == "1"){
  249. if(tnsstatValue == ""){
  250. tnsstatValue = "'6'";
  251. }else{
  252. tnsstatValue += ",'6'";
  253. }
  254. }
  255. //잔량폐기
  256. if(Div00.chk_g.value == "1"){
  257. if(tnsstatValue == ""){
  258. tnsstatValue = "'7'";
  259. }else{
  260. tnsstatValue += ",'7'";
  261. }
  262. }
  263. }
  264. }
  265. // 엑셀 저장
  266. function lf_exeExcel(pGridId) {
  267. grdf_exportExcel(grd_tnslist, lf_lisGetTitle(this), "sheet1");
  268. }
  269. // callback 함수
  270. function cbf_SMLBP00500(strSvcID, nErrorCode, strErrorMag) {
  271. if(nErrorCode != 0) {
  272. sysf_messageBox("ID: "+ strSvcID + " Error: " + strErrorMag, "E009", "");
  273. }else{
  274. switch(strSvcID) {
  275. case "TRLBP00501":
  276. break;
  277. default:
  278. break;
  279. }
  280. }
  281. }
  282. function model1_oninit(obj:Form, e:InitEventInfo)
  283. {
  284. //폼 초기화 함수
  285. frmf_initForm(obj);
  286. grdf_initGrid(grd_tnslist);
  287. lf_setInit();
  288. }
  289. function btn_excel_onlbuttonup(obj:Button, e:MouseEventInfo)
  290. {
  291. lf_exeExcel(grd_tnslist);
  292. }
  293. function btn_ref_onlbuttonup(obj:Button, e:MouseEventInfo)
  294. {
  295. lf_getTnsReqList();
  296. }
  297. function Div00_chk_a_onchanged(obj:CheckBox, e:CheckBoxChangeEventInfo)
  298. {
  299. lf_setTnsStat("a");
  300. }
  301. function Div00_chk_b_onchanged(obj:CheckBox, e:CheckBoxChangeEventInfo)
  302. {
  303. lf_setTnsStat("b");
  304. }
  305. function Div00_chk_c_onchanged(obj:CheckBox, e:CheckBoxChangeEventInfo)
  306. {
  307. lf_setTnsStat("c");
  308. }
  309. function Div00_chk_d_onchanged(obj:CheckBox, e:CheckBoxChangeEventInfo)
  310. {
  311. lf_setTnsStat("d");
  312. }
  313. function Div00_chk_e_onchanged(obj:CheckBox, e:CheckBoxChangeEventInfo)
  314. {
  315. lf_setTnsStat("e");
  316. }
  317. function Div00_chk_f_onchanged(obj:CheckBox, e:CheckBoxChangeEventInfo)
  318. {
  319. lf_setTnsStat("f");
  320. }
  321. function Div00_chk_g_onchanged(obj:CheckBox, e:CheckBoxChangeEventInfo)
  322. {
  323. lf_setTnsStat("g");
  324. }
  325. function Div00_ipt_pid_onkeydown(obj:Edit, e:KeyEventInfo)
  326. {
  327. if(e.keycode==13) {
  328. lf_keyEvent();
  329. }
  330. }
  331. function btn_reset_onclick(obj:Button, e:ClickEventInfo)
  332. {
  333. this.reload();
  334. }
  335. //수혈상태 All 체크박스
  336. function Div00_chk_all_onchanged(obj:CheckBox, e:CheckBoxChangeEventInfo)
  337. {
  338. lf_setTnsStat("all");
  339. }
  340. function Div00_chk_all_onclick(obj:CheckBox, e:ClickEventInfo)
  341. {
  342. lf_setTnsStat("all");
  343. }
  344. function Div00_chk_a_onclick(obj:CheckBox, e:ClickEventInfo)
  345. {
  346. lf_setTnsStat("a");
  347. }
  348. function Div00_chk_b_onclick(obj:CheckBox, e:ClickEventInfo)
  349. {
  350. lf_setTnsStat("b");
  351. }
  352. function Div00_chk_c_onclick(obj:CheckBox, e:ClickEventInfo)
  353. {
  354. lf_setTnsStat("c");
  355. }
  356. function Div00_chk_d_onclick(obj:CheckBox, e:ClickEventInfo)
  357. {
  358. lf_setTnsStat("d");
  359. }
  360. function Div00_chk_e_onclick(obj:CheckBox, e:ClickEventInfo)
  361. {
  362. lf_setTnsStat("e");
  363. }
  364. function Div00_chk_f_onclick(obj:CheckBox, e:ClickEventInfo)
  365. {
  366. lf_setTnsStat("f");
  367. }
  368. function Div00_chk_g_onclick(obj:CheckBox, e:ClickEventInfo)
  369. {
  370. lf_setTnsStat("g");
  371. }
  372. function workform_onload(obj:Form, e:LoadEventInfo)
  373. {
  374. lf_getTnsReqList();
  375. }
  376. ]]></Script>
  377. </Form>
  378. </FDL>