SMLBP00540_과별성분제제별취소건수.xfdl 11 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361
  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="none">
  10. <Formats>
  11. <Format id="default">
  12. <Columns>
  13. <Column size="30"/>
  14. <Column size="0"/>
  15. <Column size="0"/>
  16. <Column size="75"/>
  17. <Column size="248"/>
  18. <Column size="139"/>
  19. <Column size="122"/>
  20. </Columns>
  21. <Rows>
  22. <Row size="35" band="head"/>
  23. <Row size="32"/>
  24. </Rows>
  25. <Band id="head">
  26. <Cell text="No."/>
  27. <Cell col="1" text="수혈희망일"/>
  28. <Cell col="2" text="수혈구분"/>
  29. <Cell col="3" text="처방과"/>
  30. <Cell col="4" text="성분제제"/>
  31. <Cell col="5" text="제제코드"/>
  32. <Cell col="6" text="취소건수"/>
  33. </Band>
  34. <Band id="body">
  35. <Cell celltype="head" expr="expr:currow+1"/>
  36. <Cell col="1" text="bind:prcphopedd" mask="expr:prcphopedd==null?'':'####-##-##'"/>
  37. <Cell col="2" text="bind:tnsreqacptflag"/>
  38. <Cell col="3" text="bind:orddeptnm"/>
  39. <Cell col="4" style="align:left;" text="bind:blodcomnm"/>
  40. <Cell col="5" text="bind:blodcomcd"/>
  41. <Cell col="6" text="bind:cnt"/>
  42. </Band>
  43. </Format>
  44. </Formats>
  45. </Grid>
  46. <Static id="caption1" text="과별 성분제제별 혈액취소목록" class="tit_2" position="absolute 0 102 229 122"/>
  47. <Div id="Div00" anchor="left top right" taborder="13" text="Div00" scrollbars="none" position="absolute 0 25 1256 92" class="div_SA">
  48. <Layouts>
  49. <Layout>
  50. <Button id="button1" taborder="60" text="조회" class="btn1" position="absolute 346 22 410 43" anchor="top right" onlbuttonup="btn_ref_onlbuttonup" onclick="Div00_button1_onclick"/>
  51. <Shape id="line13" linetype="vertical" class="line_4" position="absolute 1118 21 1118 70" anchor="default"/>
  52. <Static id="caption11" text="취소일" class="search_name" position="absolute 23 24 101 44" style="align:left;" anchor="default" visible="true"/>
  53. <Calendar id="ipt_fromdd" taborder="70" dateformat="yyyy-MM-dd" class="input_s_essential" position="absolute 84 23 171 43" visible="true"/>
  54. <Calendar id="ipt_todd" taborder="71" dateformat="yyyy-MM-dd" class="input_s_essential" position="absolute 195 23 282 43" visible="true" usebitmapcache="true"/>
  55. <Static id="caption00" text="~" position="absolute 181 25 193 42"/>
  56. </Layout>
  57. </Layouts>
  58. </Div>
  59. <Button id="btn_reset" taborder="14" text="초기화" onclick="btn_reset_onclick" class="btn4" position="absolute 1187 1 1256 21" anchor="top right"/>
  60. </Layout>
  61. </Layouts>
  62. <Objects>
  63. <Dataset id="ds_grid_grd_tnslist" firefirstcount="0" firenextcount="0" useclientlayout="true" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  64. <ColumnInfo>
  65. <Column id="orddeptnm" type="STRING" size="256"/>
  66. <Column id="blodcomnm" type="STRING" size="256"/>
  67. <Column id="blodcomcd" type="STRING" size="256"/>
  68. <Column id="cnt" type="STRING" size="256"/>
  69. </ColumnInfo>
  70. </Dataset>
  71. </Objects>
  72. <Script type="xscript4.0"><![CDATA[/***************************************************************************************
  73. * System Name :
  74. * Job Name :
  75. * Creator :
  76. * Make Date : 2015-05-01
  77. * Description :
  78. *---------------------------------------------------------------------------------------
  79. * Modify Date Modifier Modify Description
  80. *---------------------------------------------------------------------------------------
  81. * 2015-05-01 Live Converter TF->XP
  82. *
  83. *---------------------------------------------------------------------------------------
  84. ****************************************************************************************/
  85. include "com_commonxp::comm_main.xjs";
  86. include "lis_commonxp::LZZ001.xjs";
  87. include "lis_commonxp::LLZ001.xjs";
  88. var tnsstatValue = "";
  89. function lf_setInit() {
  90. var toDay = utlf_getCurrentDate().toDate("YYYYMMDD").getAddDate(-1);
  91. // var todd = utlf_getCurrentDate().toDate("YYYYMMDD").getAddDate(10);
  92. var todd = utlf_getCurrentDate().toDate("YYYYMMDD");
  93. Div00.ipt_fromdd.value = toDay.getDateFormat("YYYYMMDD");
  94. Div00.ipt_todd.value = todd.getDateFormat("YYYYMMDD") ;
  95. }
  96. // 키이벤트 엔터키 입력시
  97. function lf_keyEvent() {
  98. Div00.ipt_pid.setSelect();
  99. lf_getTnsReqList();
  100. }
  101. function lf_getTnsReqList() {
  102. var fromdd = Div00.ipt_fromdd.value; // 시작일
  103. var todd = Div00.ipt_todd.value; // 종료일
  104. var sInDsName = dsf_createDsRow("ds_temp_search"
  105. , [{col: "hopefromdd", val:fromdd }
  106. , {col: "hopetodd", val:todd }
  107. ]);
  108. var oParam = {};
  109. oParam.id = "TRLBP00504";
  110. oParam.service = "refprintmngtapp.BloodBankRefPrintMngt";
  111. oParam.method = "reqGetTnsRetList4";
  112. oParam.inds = "cond="+sInDsName;
  113. oParam.outds = "ds_grid_grd_tnslist=getTnsReqList";
  114. oParam.async = false;
  115. oParam.callback = "cbf_SMLBP00500";
  116. tranf_submit(oParam);
  117. }
  118. // 수혈상태 변경
  119. function lf_setTnsStat(Ref) {
  120. tnsstatValue = "";
  121. if(Ref == "all"){
  122. if(Div00.chk_all.value == "1"){
  123. Div00.chk_a.value = "1";
  124. Div00.chk_b.value = "1";
  125. Div00.chk_c.value = "1";
  126. Div00.chk_d.value = "1";
  127. Div00.chk_e.value = "1";
  128. Div00.chk_f.value = "1";
  129. Div00.chk_g.value = "1";
  130. tnsstatValue = "'1','2','3','4','5','6','7','8'";
  131. }else{
  132. Div00.chk_a.value = "0";
  133. Div00.chk_b.value = "0";
  134. Div00.chk_c.value = "0";
  135. Div00.chk_d.value = "0";
  136. Div00.chk_e.value = "0";
  137. Div00.chk_f.value = "0";
  138. Div00.chk_g.value = "0";
  139. tnsstatValue = "";
  140. }
  141. }else{
  142. Div00.chk_all.value = "0";
  143. //접수
  144. if(Div00.chk_a.value == "1"){
  145. if(tnsstatValue == ""){
  146. tnsstatValue = "'1'";
  147. }else{
  148. tnsstatValue += ",'1'";
  149. }
  150. }
  151. //준비중
  152. if(Div00.chk_b.value == "1"){
  153. if(tnsstatValue == ""){
  154. tnsstatValue = "'2'";
  155. }else{
  156. tnsstatValue += ",'2'";
  157. }
  158. }
  159. //준비완료
  160. if(Div00.chk_c.value == "1"){
  161. if(tnsstatValue == ""){
  162. tnsstatValue = "'3'";
  163. }else{
  164. tnsstatValue += ",'3'";
  165. }
  166. }
  167. //불출완료
  168. if(Div00.chk_d.value == "1"){
  169. if(tnsstatValue == ""){
  170. tnsstatValue = "'4'";
  171. }else{
  172. tnsstatValue += ",'4'";
  173. }
  174. }
  175. //반납
  176. if(Div00.chk_e.value == "1"){
  177. if(tnsstatValue == ""){
  178. tnsstatValue = "'5'";
  179. }else{
  180. tnsstatValue += ",'5'";
  181. }
  182. }
  183. //폐기
  184. if(Div00.chk_f.value == "1"){
  185. if(tnsstatValue == ""){
  186. tnsstatValue = "'6'";
  187. }else{
  188. tnsstatValue += ",'6'";
  189. }
  190. }
  191. //잔량폐기
  192. if(Div00.chk_g.value == "1"){
  193. if(tnsstatValue == ""){
  194. tnsstatValue = "'7'";
  195. }else{
  196. tnsstatValue += ",'7'";
  197. }
  198. }
  199. }
  200. }
  201. // 엑셀 저장
  202. function lf_exeExcel(pGridId) {
  203. grdf_exportExcel(grd_tnslist, lf_lisGetTitle(this), "sheet1");
  204. }
  205. // callback 함수
  206. function cbf_SMLBP00500(strSvcID, nErrorCode, strErrorMag) {
  207. if(nErrorCode != 0) {
  208. sysf_messageBox("ID: "+ strSvcID + " Error: " + strErrorMag, "E009", "");
  209. }else{
  210. switch(strSvcID) {
  211. case "TRLBP00501":
  212. break;
  213. default:
  214. break;
  215. }
  216. }
  217. }
  218. function model1_oninit(obj:Form, e:InitEventInfo)
  219. {
  220. //폼 초기화 함수
  221. frmf_initForm(obj);
  222. grdf_initGrid(grd_tnslist);
  223. lf_setInit();
  224. }
  225. function btn_excel_onlbuttonup(obj:Button, e:MouseEventInfo)
  226. {
  227. lf_exeExcel(grd_tnslist);
  228. }
  229. function btn_ref_onlbuttonup(obj:Button, e:MouseEventInfo)
  230. {
  231. lf_getTnsReqList();
  232. }
  233. function Div00_chk_a_onchanged(obj:CheckBox, e:CheckBoxChangeEventInfo)
  234. {
  235. lf_setTnsStat("a");
  236. }
  237. function Div00_chk_b_onchanged(obj:CheckBox, e:CheckBoxChangeEventInfo)
  238. {
  239. lf_setTnsStat("b");
  240. }
  241. function Div00_chk_c_onchanged(obj:CheckBox, e:CheckBoxChangeEventInfo)
  242. {
  243. lf_setTnsStat("c");
  244. }
  245. function Div00_chk_d_onchanged(obj:CheckBox, e:CheckBoxChangeEventInfo)
  246. {
  247. lf_setTnsStat("d");
  248. }
  249. function Div00_chk_e_onchanged(obj:CheckBox, e:CheckBoxChangeEventInfo)
  250. {
  251. lf_setTnsStat("e");
  252. }
  253. function Div00_chk_f_onchanged(obj:CheckBox, e:CheckBoxChangeEventInfo)
  254. {
  255. lf_setTnsStat("f");
  256. }
  257. function Div00_chk_g_onchanged(obj:CheckBox, e:CheckBoxChangeEventInfo)
  258. {
  259. lf_setTnsStat("g");
  260. }
  261. function Div00_ipt_pid_onkeydown(obj:Edit, e:KeyEventInfo)
  262. {
  263. if(e.keycode==13) {
  264. lf_keyEvent();
  265. }
  266. }
  267. function btn_reset_onclick(obj:Button, e:ClickEventInfo)
  268. {
  269. this.reload();
  270. }
  271. //수혈상태 All 체크박스
  272. function Div00_chk_all_onchanged(obj:CheckBox, e:CheckBoxChangeEventInfo)
  273. {
  274. lf_setTnsStat("all");
  275. }
  276. function Div00_chk_all_onclick(obj:CheckBox, e:ClickEventInfo)
  277. {
  278. lf_setTnsStat("all");
  279. }
  280. function Div00_chk_a_onclick(obj:CheckBox, e:ClickEventInfo)
  281. {
  282. lf_setTnsStat("a");
  283. }
  284. function Div00_chk_b_onclick(obj:CheckBox, e:ClickEventInfo)
  285. {
  286. lf_setTnsStat("b");
  287. }
  288. function Div00_chk_c_onclick(obj:CheckBox, e:ClickEventInfo)
  289. {
  290. lf_setTnsStat("c");
  291. }
  292. function Div00_chk_d_onclick(obj:CheckBox, e:ClickEventInfo)
  293. {
  294. lf_setTnsStat("d");
  295. }
  296. function Div00_chk_e_onclick(obj:CheckBox, e:ClickEventInfo)
  297. {
  298. lf_setTnsStat("e");
  299. }
  300. function Div00_chk_f_onclick(obj:CheckBox, e:ClickEventInfo)
  301. {
  302. lf_setTnsStat("f");
  303. }
  304. function Div00_chk_g_onclick(obj:CheckBox, e:ClickEventInfo)
  305. {
  306. lf_setTnsStat("g");
  307. }
  308. function workform_onload(obj:Form, e:LoadEventInfo)
  309. {
  310. lf_getTnsReqList();
  311. }
  312. ]]></Script>
  313. </Form>
  314. </FDL>