SPPIJ03303_DRGzero중증도관리.xfdl 11 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265
  1. <?xml version="1.0" encoding="utf-8"?>
  2. <FDL version="1.5">
  3. <TypeDefinition url="..\..\..\default_typedef.xml"/>
  4. <Form id="SPPIJ03303" position="absolute 0 0 944 590" titletext="DRG 0포인트 주진단코드 기준자료 관리" oninit="SPPIJ03303_oninit" onload="SPPIJ03303_onload">
  5. <Layouts>
  6. <Layout>
  7. <Button position="absolute 885 564 941 586" id="btn_cancel" class="btn4" text="종료" anchor="right bottom" onclick="btn_cancel_onclick"/>
  8. <Static id="cap_title" text="DRG 0포인트 주진단코드 기준자료 관리" class="tit_1" position="absolute 0 0 264 23"/>
  9. <Div id="group1" anchor="left top right" taborder="1" onkeydown="grp_biz_group1_onkeydown" class="div_SA" position="absolute 0 24 940 64">
  10. <Layouts>
  11. <Layout>
  12. <Button id="btn_select" taborder="1" text="조회" onclick="grp_biz_group1_btn_select_onclick" class="btn1" position="absolute 875 10 931 32" anchor="top right"/>
  13. <Shape id="line3" linetype="vertical" class="line_4" position="absolute 857 5 863 38" anchor="top right"/>
  14. <Edit id="ipt_diagcd" taborder="2" position="absolute 100 10 200 29"/>
  15. <Static id="caption30" text="진단코드 :" class="search_name" position="absolute 8 11 95 28"/>
  16. <Edit id="ipt_mdiagcd" taborder="3" position="absolute 330 10 430 29"/>
  17. <Static id="caption1" text="주진단코드 :" class="search_name" position="absolute 223 11 322 28"/>
  18. </Layout>
  19. </Layouts>
  20. </Div>
  21. <Static id="cap_judgtrgtman" text="DRG 0포인트 주진단코드 기준자료 리스트" class="tit_2" position="absolute 0 75 290 98"/>
  22. <Shape id="line1" class="line_10" position="absolute 0 87 940 101" anchor="left top right" style="strokepen:3 solid #33bbbbff;"/>
  23. <Grid id="grd_zpcdlist" class="datagrid3" taborder="2" binddataset="ds_grd_zpcdlist" useinputpanel="false" autosizemergetype="rowmerge" position="absolute 0 96 941 561" anchor="all">
  24. <Formats>
  25. <Format id="default">
  26. <Columns>
  27. <Column size="25"/>
  28. <Column size="61"/>
  29. <Column size="153"/>
  30. <Column size="92"/>
  31. <Column size="223"/>
  32. <Column size="85"/>
  33. <Column size="85"/>
  34. <Column size="60"/>
  35. <Column size="100"/>
  36. <Column size="60"/>
  37. <Column size="100"/>
  38. </Columns>
  39. <Rows>
  40. <Row size="24" band="head"/>
  41. <Row size="24"/>
  42. </Rows>
  43. <Band id="head">
  44. <Cell/>
  45. <Cell col="1" text="진단코드"/>
  46. <Cell col="2" text="진단코드명"/>
  47. <Cell col="3" text="주진단코드"/>
  48. <Cell col="4" text="주진단코드명"/>
  49. <Cell col="5" text="시작일자"/>
  50. <Cell col="6" text="종료일자"/>
  51. <Cell col="7" text="등록자"/>
  52. <Cell col="8" text="등록일자"/>
  53. <Cell col="9" text="수정자"/>
  54. <Cell col="10" text="수정일자"/>
  55. </Band>
  56. <Band id="body">
  57. <Cell celltype="head"/>
  58. <Cell col="1" displaytype="text" edittype="text" style="align:center;" text="bind:diagcd" suppress="1" suppressalign="middle" enable="false"/>
  59. <Cell col="2" style="align:left middle;" text="bind:diagnm" suppress="1" suppressalign="middle"/>
  60. <Cell col="3" displaytype="text" edittype="text" text="bind:mdiagcd" enable="false"/>
  61. <Cell col="4" style="align:left middle;" text="bind:mdiagnm"/>
  62. <Cell col="5" displaytype="date" edittype="date" style="align:left middle;" text="bind:fromdd" mask="yyyy-MM-dd"/>
  63. <Cell col="6" displaytype="date" edittype="date" style="align:left middle;" text="bind:todd" mask="yyyy-MM-dd" enable="false"/>
  64. <Cell col="7" displaytype="text" edittype="text" style="align:center middle;" text="bind:fstrgstrid"/>
  65. <Cell col="8" displaytype="date" edittype="date" style="align:center middle;" text="bind:fstrgstdt" mask="yyyy-MM-dd hh:mm"/>
  66. <Cell col="9" style="align:center middle;" text="bind:lastupdtrid"/>
  67. <Cell col="10" displaytype="date" edittype="date" style="align:center middle;" text="bind:lastupdtdt" mask="yyyy-MM-dd hh:mm"/>
  68. </Band>
  69. </Format>
  70. </Formats>
  71. </Grid>
  72. <Button id="btn_excelsave" taborder="3" text="엑셀저장" onclick="grp_biz_btn_excelsave_onclick" class="btn7" position="absolute 717 71 789 90" anchor="top right"/>
  73. <Button id="button2" taborder="4" text="행종료" onclick="grp_biz_button2_onclick" class="btn2" position="absolute 790 71 843 90" anchor="top right"/>
  74. <Button id="button3" taborder="5" text="행추가" onclick="grp_biz_button3_onclick" class="btn2" position="absolute 844 71 897 90" anchor="top right"/>
  75. <Button id="button1" taborder="6" text="저장" onclick="grp_biz_button1_onclick" class="btn5" position="absolute 898 71 940 90" anchor="top right"/>
  76. </Layout>
  77. </Layouts>
  78. <Objects>
  79. <Dataset id="ds_grd_zpcdlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
  80. <ColumnInfo>
  81. <Column id="diagcd" type="STRING"/>
  82. <Column id="diagnm" type="STRING"/>
  83. <Column id="mdiagcd" type="STRING"/>
  84. <Column id="mdiagnm" 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. <Script type="xscript4.0"><![CDATA[/***************************************************************************************
  95. * System Name :
  96. * Job Name :
  97. * Creator :
  98. * Make Date : 2016-05-24
  99. * Description :
  100. *---------------------------------------------------------------------------------------
  101. * Modify Date Modifier Modify Description
  102. *---------------------------------------------------------------------------------------
  103. * 2016-05-24 Live Converter TF->XP
  104. *
  105. *---------------------------------------------------------------------------------------
  106. ****************************************************************************************/
  107. include "com_commonxp::comm_main.xjs";
  108. include "pam_pamcomnxp::PAM001.xjs";
  109. function SPPIJ03303_oninit(obj:Form, e:InitEventInfo)
  110. {
  111. frmf_initForm(obj);
  112. }
  113. function SPPIJ03303_onload(obj:Form, e:LoadEventInfo)
  114. {
  115. grdf_initGrid(grd_zpcdlist);
  116. grdf_setRowTypeIcon(grd_zpcdlist, 0);
  117. fInitialize();
  118. }
  119. function fInitialize()
  120. {
  121. }
  122. function fGetDocuList(){
  123. var chk = true;
  124. if (utlf_isNull(group1.ipt_diagcd.value) && utlf_isNull(group1.ipt_mdiagcd.value))
  125. {
  126. chk = false;
  127. sysf_messageBox("조회조건 1개이상은", "I003"); //I003=필수입력입니다.
  128. group1.ipt_diagcd.setFocus();
  129. return false;
  130. }
  131. dsf_createDsRow("ds_send", [{col:"instcd", type:"STRING", size:256, val: sysf_getUserInfo("dutplceinstcd")}
  132. , {col:"diagcd", type:"STRING", size:256 ,val :group1.ipt_diagcd.value}
  133. , {col:"diagnm", type:"STRING", size:256 ,val :group1.ipt_mdiagcd.value}]);
  134. var oParam = {};
  135. oParam.id = "TRPIJ03303";
  136. oParam.service = "bfjudgapp.DRGCdIF";
  137. oParam.method = "reqGetDrgZeroPointCode";
  138. oParam.inds = "req=ds_send";
  139. oParam.outds = "ds_grd_zpcdlist=rslt";
  140. oParam.async = false;
  141. //oParam.callback = "cf_TRPIJ03303";
  142. tranf_submit(oParam);
  143. }
  144. function grp_biz_group1_btn_select_onclick(obj:Button, e:ClickEventInfo)
  145. {
  146. fGetDocuList();
  147. }
  148. function grp_biz_btn_excelsave_onclick(obj:Button, e:ClickEventInfo)
  149. {
  150. if (ds_grd_zpcdlist.rowcount > 0)
  151. {
  152. grdf_exportExcel(grd_zpcdlist, "exportExcel", "see");
  153. }
  154. else
  155. {
  156. sysf_messageBox("엑셀저장할 내역이", "I004"); ///엑셀저장할 내역이 없습니다.
  157. }
  158. }
  159. function grp_biz_button2_onclick(obj:Button, e:ClickEventInfo)
  160. {
  161. fSpclGridDeleteRow();
  162. }
  163. function fSpclGridDeleteRow()
  164. {
  165. var SelectedRows = grdf_getSelectedRows(grd_zpcdlist);
  166. for(var i = 0; i < SelectedRows.length; i++)
  167. {
  168. var sel = SelectedRows[i];
  169. var arrRow = new Array();
  170. arrRow[0] = sel;
  171. grdf_setStatus(grd_zpcdlist, "D", arrRow);
  172. }
  173. }
  174. function grp_biz_button3_onclick(obj:Button, e:ClickEventInfo)
  175. {
  176. fSpclGridInsertRow();
  177. }
  178. function fSpclGridInsertRow()
  179. {
  180. var addRw = ds_grd_zpcdlist.addRow();
  181. }
  182. function grp_biz_button1_onclick(obj:Button, e:ClickEventInfo)
  183. {
  184. var updtdata = grdf_getGridUpdateData(grd_zpcdlist, "all");
  185. if ( updtdata.rowcount == 0)
  186. {
  187. sysf_messageBox("변경된 데이터가","I004");
  188. return;
  189. }
  190. for (var i=0; i < ds_grd_zpcdlist.rowcount; i++)
  191. {
  192. if (ds_grd_zpcdlist.getRowType(i) == 2 || ds_grd_zpcdlist.getRowType(i) == 4 )
  193. {
  194. var diagcd = grd_zpcdlist.getBindCellIndex("body","diagcd");
  195. var spoint = grd_zpcdlist.getBindCellIndex("body","mdiagcd");
  196. var fromdd = grd_zpcdlist.getBindCellIndex("body","fromdd");
  197. var todd = grd_zpcdlist.getBindCellIndex("body","todd");
  198. if(!frmf_chkMdtGrid(grd_zpcdlist,[diagcd,spoint,fromdd,todd],["진단코드","진단코드명","시작일자","종료일자"]))
  199. {
  200. return;
  201. }
  202. }
  203. }
  204. if (sysf_messageBox("저장", "S001") == 6)
  205. {
  206. var Ids = dsf_createDsRow("ds_send", [{col:"instcd", type:"STRING", size:256, val :sysf_getUserInfo("dutplceinstcd") }
  207. , {col:"diagcd", type:"STRING", size:256, val :group1.ipt_diagcd.value}
  208. , {col:"diagnm", type:"STRING", size:256, val :group1.ipt_mdiagcd.value}]);
  209. var oParam = {};
  210. oParam.id = "TXPIJ03303";
  211. oParam.service = "bfjudgapp.DRGCdIF";
  212. oParam.method = "reqExeDrgZeroPointCode";
  213. oParam.inds = "srch="+Ids+" req=ds_grd_zpcdlist:U";
  214. oParam.outds = "ds_grd_zpcdlist=rslt";
  215. oParam.async = false;
  216. oParam.callback = "cf_TXPIJ03303";
  217. tranf_submit(oParam);
  218. }
  219. }
  220. function cf_TXPIJ03301(sSvcId, nErrorCode, sErrorMsg) {
  221. if(nErrorCode < 0) return;
  222. sysf_messageBox("저장이","I002");
  223. }
  224. function btn_cancel_onclick(obj:Button, e:ClickEventInfo)
  225. {
  226. this.close();
  227. }
  228. function grp_biz_group1_onkeydown(obj:Div, e:KeyEventInfo)
  229. {
  230. if(e.keycode == 13)
  231. {
  232. fGetDocuList();
  233. }
  234. }
  235. ]]></Script>
  236. </Form>
  237. </FDL>