SPPIJ03302_DRG진단별중증도점수관리.xfdl 11 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251
  1. <?xml version="1.0" encoding="utf-8"?>
  2. <FDL version="1.5">
  3. <TypeDefinition url="..\..\..\default_typedef.xml"/>
  4. <Form id="SPPIJ03302" position="absolute 0 0 951 595" titletext="DRG 진단별 중증도 점수 기준자료 관리" oninit="SPPIJ03302_oninit" onload="SPPIJ03302_onload">
  5. <Layouts>
  6. <Layout>
  7. <Div position="absolute 0 19 942 577" id="grp_biz" scrollbars="autoboth" anchor="all">
  8. <Layouts>
  9. <Layout>
  10. <Grid position="absolute 0 77 935 548" id="grd_dpcdlist" class="datagrid3" binddataset="ds_grd_dpcdlist" anchor="all" scrollbars="autoboth" cellsizingtype="col" selecttype="multirow">
  11. <Formats>
  12. <Format id="default">
  13. <Columns>
  14. <Column size="25"/>
  15. <Column size="66"/>
  16. <Column size="271"/>
  17. <Column size="82"/>
  18. <Column size="78"/>
  19. <Column size="75"/>
  20. <Column size="68"/>
  21. <Column size="151"/>
  22. <Column size="69"/>
  23. <Column size="112"/>
  24. </Columns>
  25. <Rows>
  26. <Row size="32" band="head"/>
  27. <Row size="24"/>
  28. </Rows>
  29. <Band id="head">
  30. <Cell/>
  31. <Cell col="1" text="진단코드"/>
  32. <Cell col="2" text="진단명"/>
  33. <Cell col="3" text="중증도점수"/>
  34. <Cell col="4" text="시작일자"/>
  35. <Cell col="5" text="종료일자"/>
  36. <Cell col="6" style="align:center middle;" text="등록자"/>
  37. <Cell col="7" text="등록일자"/>
  38. <Cell col="8" text="수정자"/>
  39. <Cell col="9" text="수정일자"/>
  40. </Band>
  41. <Band id="body">
  42. <Cell celltype="head"/>
  43. <Cell col="1" displaytype="text" edittype="text" style="align:center middle;" text="bind:diagcd" enable="false"/>
  44. <Cell col="2" style="align:left middle;" text="bind:diagnm"/>
  45. <Cell col="3" displaytype="text" edittype="text" text="bind:spoint" enable="true"/>
  46. <Cell col="4" displaytype="date" edittype="date" style="align:center middle;" text="bind:fromdd" mask="yyyy-MM-dd"/>
  47. <Cell col="5" displaytype="date" edittype="date" style="align:center middle;" text="bind:todd" mask="yyyy-MM-dd"/>
  48. <Cell col="6" displaytype="text" edittype="text" style="align:center middle;" text="bind:fstrgstrid"/>
  49. <Cell col="7" displaytype="date" edittype="date" style="align:center middle;" text="bind:fstrgstdt" mask="yyyy-MM-dd hh:mm"/>
  50. <Cell col="8" style="align:center middle;" text="bind:lastupdtrid"/>
  51. <Cell col="9" displaytype="date" edittype="date" style="align:center middle;" text="bind:lastupdtdt" mask="yyyy-MM-dd hh:mm"/>
  52. </Band>
  53. </Format>
  54. </Formats>
  55. </Grid>
  56. <Static text="DRG 진단별 중증도 점수 기준자료 리스트" position="absolute 0 56 298 79" id="cap_judgtrgtman" class="tit_2" anchor="default"/>
  57. <Shape position="absolute 0 68 935 82" linetype="horizontal" id="line1" class="line_10" style="strokepen:3 solid #33bbbbff;" anchor="left top right"/>
  58. <Div position="absolute 0 5 940 45" align="align:center top;" id="group1" class="div_SA" anchor="left top right">
  59. <Layouts>
  60. <Layout width="940" height="40">
  61. <Button position="absolute 875 10 931 32" id="btn_select" class="btn1" taborder="32" text="조회" anchor="top right" onclick="grp_biz_group1_btn_select_onclick"/>
  62. <Shape position="absolute 857 5 863 38" linetype="vertical" id="line3" class="line_4" anchor="default"/>
  63. <Static text="진단코드 :" position="absolute 8 11 95 28" id="caption30" class="search_name" anchor="default"/>
  64. <Edit position="absolute 100 10 200 29" id="ipt_diagcd" anchor="default" onkeyup="grp_biz_group1_ipt_diagcd_onkeyup"/>
  65. </Layout>
  66. </Layouts>
  67. </Div>
  68. <Button position="absolute 704 52 784 71" id="btn_excelsave" class="btn7" text="엑셀저장" anchor="top right" usebitmapcache="false" onclick="grp_biz_btn_excelsave_onclick"/>
  69. <Button position="absolute 893 52 935 71" id="button1" class="btn5" text="저장" anchor="top right" usebitmapcache="false" onclick="grp_biz_button1_onclick"/>
  70. <Button position="absolute 785 52 838 71" id="button2" class="btn2" text="행종료" anchor="top right" usebitmapcache="false" onclick="grp_biz_button2_onclick"/>
  71. <Button position="absolute 839 52 892 71" id="button3" class="btn2" text="행추가" anchor="top right" usebitmapcache="false" onclick="grp_biz_button3_onclick"/>
  72. </Layout>
  73. </Layouts>
  74. </Div>
  75. <Button position="absolute 880 569 936 589" id="btn_cancel" class="btn4" text="종료" anchor="right bottom" onclick="btn_cancel_onclick"/>
  76. <Static id="cap_title" text="DRG 진단별 중증도 점수 기준자료 관리" class="tit_1" position="absolute 0 0 272 23"/>
  77. </Layout>
  78. </Layouts>
  79. <Objects>
  80. <Dataset id="ds_grd_dpcdlist" firefirstcount="0" firenextcount="0" useclientlayout="true" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
  81. <ColumnInfo>
  82. <Column id="diagcd" type="STRING"/>
  83. <Column id="diagnm" type="STRING"/>
  84. <Column id="spoint" type="STRING"/>
  85. <Column id="fromdd" type="STRING"/>
  86. <Column id="todd" type="STRING"/>
  87. <Column id="fstrgstrid" type="STRING"/>
  88. <Column id="fstrgstdt" type="STRING"/>
  89. <Column id="lastupdtrid" type="STRING"/>
  90. <Column id="lastupdtdt" type="STRING"/>
  91. </ColumnInfo>
  92. </Dataset>
  93. </Objects>
  94. <Bind/>
  95. <Script type="xscript4.0"><![CDATA[/***************************************************************************************
  96. * System Name :
  97. * Job Name :
  98. * Creator :
  99. * Make Date : 2016-05-24
  100. * Description :
  101. *---------------------------------------------------------------------------------------
  102. * Modify Date Modifier Modify Description
  103. *---------------------------------------------------------------------------------------
  104. * 2016-05-24 Live Converter TF->XP
  105. *
  106. *---------------------------------------------------------------------------------------
  107. ****************************************************************************************/
  108. include "com_commonxp::comm_main.xjs";
  109. include "pam_pamcomnxp::PAM001.xjs";
  110. function SPPIJ03302_oninit(obj:Form, e:InitEventInfo)
  111. {
  112. frmf_initForm(obj);
  113. }
  114. function SPPIJ03302_onload(obj:Form, e:LoadEventInfo)
  115. {
  116. grdf_initGrid(grp_biz.grd_dpcdlist);
  117. grdf_setRowTypeIcon(grp_biz.grd_dpcdlist, 0);
  118. grdf_setToolTipBind(grp_biz.grd_dpcdlist)
  119. grp_biz.group1.btn_select.click();
  120. }
  121. function fGetDocuList(){
  122. dsf_createDsRow("ds_send", [{col:"instcd", type:"STRING", size:256, val: sysf_getUserInfo("dutplceinstcd")}
  123. , {col:"diagcd", type:"STRING", size:256 ,val :grp_biz.group1.ipt_diagcd.text}]);
  124. var oParam = {};
  125. oParam.id = "TRPIJ03302";
  126. oParam.service = "bfjudgapp.DRGCdIF";
  127. oParam.method = "reqGetDrgPointCode";
  128. oParam.inds = "req=ds_send";
  129. oParam.outds = "ds_grd_dpcdlist=rslt";
  130. oParam.async = false;
  131. //oParam.callback = "cf_TRPIJ03302";
  132. tranf_submit(oParam);
  133. }
  134. function grp_biz_group1_btn_select_onclick(obj:Button, e:ClickEventInfo)
  135. {
  136. fGetDocuList();
  137. }
  138. function grp_biz_group1_ipt_diagcd_onkeyup(obj:Edit, e:KeyEventInfo)
  139. {
  140. if(e.keycode == 13)
  141. {
  142. fGetDocuList();
  143. }
  144. }
  145. function grp_biz_btn_excelsave_onclick(obj:Button, e:ClickEventInfo)
  146. {
  147. if (ds_grd_dpcdlist.rowcount > 0) {
  148. grdf_exportExcel(grp_biz.grd_dpcdlist, "exportExcel", "see");
  149. } else {
  150. sysf_messageBox("엑셀저장할 내역이", "I004"); ///엑셀저장할 내역이 없습니다.
  151. }
  152. }
  153. function grp_biz_button2_onclick(obj:Button, e:ClickEventInfo)
  154. {
  155. fSpclGridDeleteRow();
  156. }
  157. function fSpclGridDeleteRow()
  158. {
  159. var SelectedRows = grdf_getSelectedRows(grp_biz.grd_dpcdlist);
  160. for(var i = 0; i < SelectedRows.length; i++)
  161. {
  162. var sel = SelectedRows[i];
  163. var arrRow = new Array();
  164. arrRow[0] = sel;
  165. grdf_setStatus(grp_biz.grd_dpcdlist, "D", arrRow);
  166. }
  167. }
  168. function grp_biz_button3_onclick(obj:Button, e:ClickEventInfo)
  169. {
  170. fSpclGridInsertRow();
  171. }
  172. function fSpclGridInsertRow()
  173. {
  174. var addRw = ds_grd_dpcdlist.addRow();
  175. }
  176. function grp_biz_button1_onclick(obj:Button, e:ClickEventInfo)
  177. {
  178. var updtdata = grdf_getGridUpdateData(grp_biz.grd_dpcdlist, "all");
  179. if ( updtdata.rowcount == 0)
  180. {
  181. sysf_messageBox("변경된 데이터가","I004");
  182. return;
  183. }
  184. // 저장 버튼 예외 처리
  185. for (var i=0; i < ds_grd_dpcdlist.rowcount; i++)
  186. {
  187. if (ds_grd_dpcdlist.getRowType(i) == 2 || ds_grd_dpcdlist.getRowType(i) == 4 )
  188. {
  189. var diagcd = grp_biz.grd_dpcdlist.getBindCellIndex("body","diagcd");
  190. var spoint = grp_biz.grd_dpcdlist.getBindCellIndex("body","spoint");
  191. var fromdd = grp_biz.grd_dpcdlist.getBindCellIndex("body","fromdd");
  192. var todd = grp_biz.grd_dpcdlist.getBindCellIndex("body","todd");
  193. if(!frmf_chkMdtGrid(grp_biz.grd_dpcdlist,[diagcd,spoint,fromdd,todd],["진단코드","중증도점수","시작일자","종료일자"]))
  194. {
  195. return;
  196. }
  197. }
  198. }
  199. if (sysf_messageBox("저장", "S001") == 6)
  200. {
  201. var Ids = dsf_createDsRow("ds_send", [{col:"instcd", type:"STRING", size:256, val :sysf_getUserInfo("dutplceinstcd") }
  202. , {col:"ipt_diagcd", type:"STRING", size:256, val :grp_biz.group1.ipt_diagcd.value}]);
  203. var oParam = {};
  204. oParam.id = "TXPIJ03301";
  205. oParam.service = "bfjudgapp.DRGCdIF";
  206. oParam.method = "reqExeDrgPointCode";
  207. oParam.inds = "srch="+Ids+" req=ds_grd_dpcdlist:U";
  208. oParam.outds = "ds_grd_dpcdlist=rslt";
  209. oParam.async = false;
  210. oParam.callback = "cf_TXPIJ03301";
  211. tranf_submit(oParam);
  212. }
  213. }
  214. function cf_TXPIJ03301(sSvcId, nErrorCode, sErrorMsg) {
  215. if(nErrorCode < 0) return;
  216. sysf_messageBox("저장이","I002");
  217. }
  218. function btn_cancel_onclick(obj:Button, e:ClickEventInfo)
  219. {
  220. this.close();
  221. }
  222. ]]></Script>
  223. </Form>
  224. </FDL>