SPMMR05700_환자수진이력.xfdl 9.6 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219
  1. <?xml version="1.0" encoding="utf-8"?>
  2. <FDL version="1.5">
  3. <TypeDefinition url="..\..\..\default_typedef.xml"/>
  4. <Form id="SPMMR05700" position="absolute 0 0 590 360" titletext="환자수진이력" onload="SPMMR05700_onload" oninit="SPMMR05700_oninit">
  5. <Layouts>
  6. <Layout>
  7. <Static text="환자수진이력" position="absolute 0 4 114 20" id="caption1" class="tit_2"/>
  8. <Shape position="absolute 5 24 590 30" linetype="vertical" id="line1" class="line_1"/>
  9. <Button position="absolute 477 336 533 358" id="button3" class="btn4" text="확인" onclick="button3_onclick"/>
  10. <Button position="absolute 534 336 590 358" id="button4" class="btn4" text="취소" onclick="button4_onclick"/>
  11. <Grid position="absolute 0 24 590 332" id="grd_pathistlist" binddataset="ds_main_result_pathistlist" oncelldblclick="grd_pathistlist_oncelldblclick" onkeydown="grd_pathistlist_onkeydown" scrollbars="autovert" cellsizingtype="col" autofittype="col">
  12. <Formats>
  13. <Format id="default">
  14. <Columns>
  15. <Column size="55"/>
  16. <Column size="55"/>
  17. <Column size="75"/>
  18. <Column size="87"/>
  19. <Column size="77"/>
  20. <Column size="66"/>
  21. <Column size="100"/>
  22. <Column size="62"/>
  23. </Columns>
  24. <Rows>
  25. <Row size="24" band="head"/>
  26. <Row size="24"/>
  27. </Rows>
  28. <Band id="head">
  29. <Cell text="주유형"/>
  30. <Cell col="1" text="보조유형"/>
  31. <Cell col="2" text="등록번호"/>
  32. <Cell col="3" text="환자명"/>
  33. <Cell col="4" text="진료일"/>
  34. <Cell col="5" text="구분"/>
  35. <Cell col="6" text="진료과"/>
  36. <Cell col="7" text="주치의"/>
  37. </Band>
  38. <Band id="body">
  39. <Cell displaytype="combo" edittype="none" style="align:left top;padding:2 0 0 2;" text="bind:insukind" combodataset="ds_init_P0008" combocodecol="cdid" combodatacol="cdnm"/>
  40. <Cell col="1" displaytype="combo" edittype="none" style="align:left top;padding:2 0 0 2;" text="bind:suppkind" wordwrap="word" combodataset="ds_init_P0010" combocodecol="cdid" combodatacol="cdnm"/>
  41. <Cell col="2" style="align:center middle;" text="bind:pid"/>
  42. <Cell col="3" style="align:center middle;" text="bind:hngnm"/>
  43. <Cell col="4" style="align:center middle;" text="bind:orddd" mask="####-##-##"/>
  44. <Cell col="5" style="align:center middle;" text="bind:ordtypenm"/>
  45. <Cell col="6" style="align:left middle;" text="bind:orddeptnm" wordwrap="word"/>
  46. <Cell col="7" style="align:center middle;" text="bind:orddrnm" wordwrap="word"/>
  47. </Band>
  48. </Format>
  49. </Formats>
  50. </Grid>
  51. <CheckBox position="absolute 110 1 130 21" id="bool1" onchanged="bool1_onchanged"/>
  52. <Static text="진단 가접수" position="absolute 128 2 208 22" id="caption2"/>
  53. <CheckBox id="bool2" taborder="1" position="absolute 198 1 274 21" falsevalue="N" truevalue="Y" text="건진제외" onchanged="bool2_onchanged"/>
  54. </Layout>
  55. </Layouts>
  56. <Objects>
  57. <Dataset id="ds_main_result_pathistlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  58. <Dataset id="ds_main_cond" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  59. <ColumnInfo>
  60. <Column id="rsrvflag" type="STRING" size="256"/>
  61. <Column id="exceptordtype" type="STRING" size="256"/>
  62. </ColumnInfo>
  63. <Rows>
  64. <Row>
  65. <Col id="exceptordtype">N</Col>
  66. </Row>
  67. </Rows>
  68. </Dataset>
  69. <Dataset id="ds_send_reqdata" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  70. <Dataset id="ds_send_savedata" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  71. <Dataset id="ds_init_P0008" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  72. <Dataset id="ds_init_P0010" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
  73. </Objects>
  74. <Bind>
  75. <BindItem id="item0" compid="bool1" propid="value" datasetid="ds_main_cond" columnid="rsrvflag"/>
  76. <BindItem id="item1" compid="bool2" propid="value" datasetid="ds_main_cond" columnid="exceptordtype"/>
  77. </Bind>
  78. <Script type="xscript4.0"><![CDATA[/***************************************************************************************
  79. * System Name :
  80. * Job Name :
  81. * Creator :
  82. * Make Date : 2014-10-15
  83. * Description :
  84. *---------------------------------------------------------------------------------------
  85. * Modify Date Modifier Modify Description
  86. *---------------------------------------------------------------------------------------
  87. * 2014-10-15 Live Converter TF->XP
  88. *
  89. *---------------------------------------------------------------------------------------
  90. ****************************************************************************************/
  91. include "com_commonxp::comm_main.xjs";
  92. include "emr_prcpmngtxp::MMOCommon.xjs";
  93. include "emr_prcpmngtxp::MMO001.xjs";
  94. //include "emr_medirecxp::SPMMR05500.xjs";
  95. function SPMMR05700_oninit(obj:Form, e:InitEventInfo)
  96. {
  97. frmf_initForm(obj);
  98. }
  99. function SPMMR05700_onload(obj:Form, e:LoadEventInfo)
  100. {
  101. try{
  102. ds_main_result_pathistlist.copyData(arg_ds_main_result_pathistlist);
  103. }catch(e){
  104. sysf_catchTrace(e);
  105. }
  106. var oOpener = frmf_getoOpener();
  107. if( !utlf_isNull(oOpener) && oOpener.frmf_getScreenID() == "SMMMR02900"){
  108. ds_main_cond.setColumn(0, "exceptordtype", "Y");
  109. }
  110. grd_pathistlist.setFocus();
  111. ds_main_result_pathistlist.rowposition = 0;
  112. //zbcfGetCodeList(new Array("P0008"), new Array("/root/init/item")); //공통코드 보험유형(건강보험,의료급여,산재,자보 등)
  113. //zbcfGetCodeList(new Array("P0010"), new Array("/root/init/item")); //공통코드 보조유형(정상급여,본인부담100% 등)
  114. var arrParam = [{dsNm: "ds_init_P0008", cdGrpId: "P0008"},
  115. {dsNm: "ds_init_P0010", cdGrpId: "P0010"}
  116. ]
  117. appf_getCodeList(arrParam); //공통코드 보험유형 조회
  118. }
  119. function fReqGetPatHistList(pid, rsrvflag, exceptordtype){
  120. ds_send_reqdata.clear();
  121. dsf_makeValue(ds_send_reqdata,"pid" ,"string" , pid);
  122. dsf_makeValue(ds_send_reqdata,"orddeptcd" ,"string" , "-");
  123. dsf_makeValue(ds_send_reqdata,"orddrid" ,"string" , "-");
  124. if( utlf_isNull(rsrvflag) ){
  125. rsrvflag = ds_main_cond.getColumn(0, "rsrvflag");
  126. }
  127. if(rsrvflag == "Y"){
  128. dsf_makeValue(ds_send_reqdata,"rsrvflag" ,"string", "Y");
  129. }
  130. if( utlf_isNull(exceptordtype) ){
  131. exceptordtype = ds_main_cond.getColumn(0, "exceptordtype");
  132. }
  133. if(exceptordtype == "Y"){
  134. dsf_makeValue(ds_send_reqdata,"exceptordtype" ,"string", "Y");
  135. }
  136. var oParam = {};
  137. oParam.id = "TRMMR05501";
  138. oParam.service = "medirecapp.ExtnMediRec";
  139. oParam.method = "reqGetPatHistList";
  140. oParam.inds = "req=ds_send_reqdata";
  141. oParam.outds = "ds_main_result_pathistlist=pathistlist";
  142. oParam.async = true;
  143. tranf_submit(oParam);
  144. }
  145. function button3_onclick(obj:Button, e:ClickEventInfo)
  146. {
  147. opener.frmf_setParameter("SPMMR05700_useyn", "Y");
  148. opener.ds_main_result_pathistlist.clearData();
  149. var newrow = opener.ds_main_result_pathistlist.addRow();
  150. opener.ds_main_result_pathistlist.copyRow(newrow,ds_main_result_pathistlist,ds_main_result_pathistlist.rowposition);
  151. close();
  152. }
  153. function button4_onclick(obj:Button, e:ClickEventInfo)
  154. {
  155. opener.frmf_setParameter("SPMMR05700_useyn", "N");
  156. close();
  157. }
  158. function grd_pathistlist_oncelldblclick(obj:Grid, e:GridClickEventInfo)
  159. {
  160. opener.frmf_setParameter("SPMMR05700_useyn", "Y");
  161. opener.ds_main_result_pathistlist.clearData();
  162. var newrow = opener.ds_main_result_pathistlist.addRow();
  163. opener.ds_main_result_pathistlist.copyRow(newrow,ds_main_result_pathistlist,ds_main_result_pathistlist.rowposition);
  164. close();
  165. }
  166. function grd_pathistlist_onkeydown(obj:Grid, e:KeyEventInfo)
  167. {
  168. if(e.keycode == "13"){
  169. opener.frmf_setParameter("SPMMR05700_useyn", "Y");
  170. opener.ds_main_result_pathistlist.clearData();
  171. var newrow = opener.ds_main_result_pathistlist.addRow();
  172. opener.ds_main_result_pathistlist.copyRow(newrow,ds_main_result_pathistlist,ds_main_result_pathistlist.rowposition);
  173. close();
  174. }
  175. }
  176. function bool1_onchanged(obj:CheckBox, e:CheckBoxChangeEventInfo)
  177. {
  178. var pid = ds_main_result_pathistlist.getColumn(0,"pid");
  179. if(bool1.value == true){
  180. fReqGetPatHistList(pid, "Y");
  181. }else{
  182. fReqGetPatHistList(pid, "N");
  183. }
  184. }
  185. function bool2_onchanged(obj:CheckBox, e:CheckBoxChangeEventInfo)
  186. {
  187. var pid = ds_main_result_pathistlist.getColumn(0,"pid");
  188. if(bool2.value == "Y"){
  189. fReqGetPatHistList(pid, null, "Y");
  190. }else{
  191. fReqGetPatHistList(pid, null, "N");
  192. }
  193. }
  194. ]]></Script>
  195. </Form>
  196. </FDL>