SPASI04000_진단코드조회.xfdl 8.4 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218
  1. <?xml version="1.0" encoding="utf-8"?>
  2. <FDL version="1.5">
  3. <TypeDefinition url="..\..\..\default_typedef.xml"/>
  4. <Form id="SPASI04000" position="absolute 0 0 579 349" titletext="결핵 진단코드 조회" onload="SPASI04000_onload">
  5. <Layouts>
  6. <Layout>
  7. <Grid position="absolute 1 78 577 314" id="grd_diagcdlist" binddataset="ds_grid_grd_diagcdlist" positiontype="position" oncelldblclick="grd_diagcdlist_oncelldblclick" autofittype="col" cellsizingtype="col">
  8. <Formats>
  9. <Format id="default">
  10. <Columns>
  11. <Column size="30"/>
  12. <Column size="100"/>
  13. <Column size="222"/>
  14. <Column size="222"/>
  15. <Column size="0"/>
  16. </Columns>
  17. <Rows>
  18. <Row size="24" band="head"/>
  19. <Row size="24"/>
  20. </Rows>
  21. <Band id="head">
  22. <Cell/>
  23. <Cell col="1" text="진단코드"/>
  24. <Cell col="2" text="영문명"/>
  25. <Cell col="3" text="한글명"/>
  26. <Cell col="4" text="caption1"/>
  27. </Band>
  28. <Band id="body">
  29. <Cell celltype="head" expr="expr:currow+1"/>
  30. <Cell col="1" style="align:left;" text="bind:dispdiagcd"/>
  31. <Cell col="2" style="align:left;" text="bind:engnm"/>
  32. <Cell col="3" style="align:left;" text="bind:hngnm"/>
  33. <Cell col="4" text="bind:termcd"/>
  34. </Band>
  35. </Format>
  36. </Formats>
  37. </Grid>
  38. <Static text="결핵진단코드 [A150~A199 , U880(다제내성결핵)]" position="absolute -1 319 332 336" id="caption24" class="tit_2" positiontype="position" style="color:#003366ff;"/>
  39. <Static id="stt_titleText" class="tit_1" position="absolute 1 1 129 26" text="진단코드조회"/>
  40. <Div id="group2" taborder="2" style="align:center top;" class="div_SA" position="absolute 1 26 577 68">
  41. <Layouts>
  42. <Layout width="576" height="42">
  43. <Button id="btn_search" taborder="6" text="조회" onclick="group2_btn_search_onclick" class="btn1" position="absolute 508 12 564 32" anchor="default"/>
  44. <Edit id="ipt_search" taborder="7" imemode="hangul" class="input_search" position="absolute 173 12 483 32" anchor="default" onkeydown="group2_ipt_search_onkeydown"/>
  45. <Radio id="radio1" taborder="9" columncount="3" rowcount="0" codecolumn="codecolumn" datacolumn="datacolumn" position="absolute 8 12 172 32" anchor="default" index="0" value="A" onitemchanged="group2_radio1_onitemchanged">
  46. <Dataset id="innerdataset">
  47. <ColumnInfo>
  48. <Column id="codecolumn"/>
  49. <Column id="datacolumn"/>
  50. </ColumnInfo>
  51. <Rows>
  52. <Row>
  53. <Col id="codecolumn">A</Col>
  54. <Col id="datacolumn">전체</Col>
  55. </Row>
  56. <Row>
  57. <Col id="codecolumn">C</Col>
  58. <Col id="datacolumn">코드</Col>
  59. </Row>
  60. <Row>
  61. <Col id="codecolumn">W</Col>
  62. <Col id="datacolumn">단어</Col>
  63. </Row>
  64. </Rows>
  65. </Dataset>
  66. </Radio>
  67. </Layout>
  68. </Layouts>
  69. </Div>
  70. <Button id="button10" taborder="3" text="선택" onclick="button10_onclick" class="btn4" position="absolute 461 319 517 339"/>
  71. <Button id="button9" taborder="4" text="닫기" class="btn4" position="absolute 520 319 576 339" onclick="Button00_onclick"/>
  72. </Layout>
  73. </Layouts>
  74. <Objects>
  75. <Dataset id="ds_grid_grd_diagcdlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
  76. <ColumnInfo>
  77. <Column id="dispdiagcd" type="STRING"/>
  78. <Column id="engnm" type="STRING"/>
  79. <Column id="hngnm" type="STRING"/>
  80. <Column id="termcd" type="STRING"/>
  81. </ColumnInfo>
  82. <Rows>
  83. <Row/>
  84. </Rows>
  85. </Dataset>
  86. <Dataset id="ds_cond_req" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
  87. <ColumnInfo>
  88. <Column id="reqflag" type="STRING" size="256"/>
  89. <Column id="reqdata" type="STRING" size="256"/>
  90. <Column id="srchflag" type="STRING" size="256"/>
  91. <Column id="wordflag" type="STRING" size="256"/>
  92. </ColumnInfo>
  93. </Dataset>
  94. </Objects>
  95. <Bind/>
  96. <Script type="xscript4.0"><![CDATA[/***************************************************************************************
  97. * System Name :
  98. * Job Name :
  99. * Creator :
  100. * Make Date : 2015-06-04
  101. * Description :
  102. *---------------------------------------------------------------------------------------
  103. * Modify Date Modifier Modify Description
  104. *---------------------------------------------------------------------------------------
  105. * 2015-06-04 Live Converter TF->XP
  106. *
  107. *---------------------------------------------------------------------------------------
  108. ****************************************************************************************/
  109. include "com_commonxp::comm_main.xjs";
  110. //=======================================================================================
  111. // Function
  112. //---------------------------------------------------------------------------------------
  113. /********************************************************************************
  114. * 설 명 : 조회
  115. * argument :
  116. ********************************************************************************/
  117. function lf_fReqDiagCD(){
  118. ds_cond_req.clearData();
  119. ds_cond_req.addRow();
  120. var reqdata = group2.ipt_search.value; // 검색어
  121. if(!utlf_isNull(reqdata)){ // 검색어가 있는 경우
  122. if(reqdata.charCodeAt(0) > 255){
  123. ds_cond_req.setColumn(0, "wordflag", "H"); // 단어 조회시 한글 모드
  124. }else{
  125. ds_cond_req.setColumn(0, "wordflag", "E"); // 단어 조회시 영어 모드
  126. reqdata = reqdata.toUpperCase();
  127. }
  128. }
  129. ds_cond_req.setColumn(0, "reqdata", reqdata);
  130. ds_cond_req.setColumn(0, "reqflag", "");
  131. ds_cond_req.setColumn(0, "srchflag", group2.radio1.value);
  132. var objParam = new Object();
  133. objParam.id = "TRASI04001";
  134. objParam.service = "infcmngtapp.LglyDisMngt";
  135. objParam.method = "reqGetTbLglyDiag";
  136. objParam.inds = "req=ds_cond_req";
  137. objParam.outds ="ds_grid_grd_diagcdlist=info";
  138. objParam.callback = "cbf_TRASI04001";
  139. tranf_submit(objParam);
  140. }
  141. function cbf_TRASI04001(strSvcID, nErrorCode, strErrorMsg){
  142. //에러 처리
  143. if(nErrorCode != 0){
  144. sysf_messageBox("ID: " + strSvcID + " Error: " + strErrorMag, "E009", "");
  145. }else{
  146. ds_grid_grd_diagcdlist.rowposition = -1 ;
  147. }
  148. }
  149. function SPASI04000_onload(obj:Form, e:LoadEventInfo)
  150. {
  151. frmf_initForm(obj); // 화면공통
  152. lf_fReqDiagCD(); // 조회
  153. }
  154. function group2_btn_search_onclick(obj:Button, e:ClickEventInfo)
  155. {
  156. var srchStr = group2.ipt_search.value; // 검색어
  157. if(utlf_isNull(srchStr) ){
  158. sysf_messageBox("검색어를 ", "C001");
  159. return;
  160. }else if(utlf_getStringLength(srchStr) < 3 ){
  161. sysf_messageBox("2글자 이상 ", "C001");
  162. return;
  163. }else{
  164. lf_fReqDiagCD(); // 조회
  165. }
  166. }
  167. function button10_onclick(obj:Button, e:ClickEventInfo)
  168. {
  169. var iRow = ds_grid_grd_diagcdlist.rowposition;
  170. var cd = ds_grid_grd_diagcdlist.getColumn(iRow, "termcd"); // 진단코드
  171. var nm = ds_grid_grd_diagcdlist.getColumn(iRow, "hngnm"); // 진단명
  172. opener.frmf_setParameter("SPASI01800_diagcd", cd); //진단코드
  173. opener.frmf_setParameter("SPASI01800_diagnm", nm); //진단명
  174. close();
  175. }
  176. function grd_diagcdlist_oncelldblclick(obj:Grid, e:GridClickEventInfo)
  177. {
  178. button10.click();
  179. }
  180. function Button00_onclick(obj:Button, e:ClickEventInfo)
  181. {
  182. close();
  183. }
  184. function group2_ipt_search_onkeydown(obj:Edit, e:KeyEventInfo)
  185. {
  186. if(e.keycode == '13'){
  187. group2.btn_search.click();
  188. }
  189. }
  190. function group2_radio1_onitemchanged(obj:Radio, e:ItemChangeEventInfo)
  191. {
  192. group2.ipt_search.setFocus();
  193. }
  194. ]]></Script>
  195. </Form>
  196. </FDL>