YNU_JEUS/app_home/himed/xpapps/ast/pharmacyxp/xp/SPADB61700_진단검색.xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SPADB61700" position="absolute 0 0 642 377" titletext="진단" oninit="SPADB61700_oninit">
    <Layouts>
      <Layout>
        <Div id="group1" type="roundrectangle" position="absolute 0 17 639 57" class="div_SA" anchor="left top right">
          <Layouts>
            <Layout>
              <Static id="caption3" text="검색어 :" class="search_name" position="absolute 22 13 80 30" anchor="default"/>
              <Shape id="line1" linetype="vertical" position="absolute 552 10 558 32" anchor="top right"/>
              <Edit id="input1" taborder="1" onkeydown="input1_onkeydown" class="input_search" position="absolute 85 10 294 31" anchor="default"/>
              <Button id="btn_req" taborder="2" text="조회" onclick="btn_req_onclick" class="btn1" position="absolute 567 10 623 32" anchor="top right"/>
              <Combo id="combo1" taborder="3" codecolumn="codecolumn" datacolumn="datacolumn" class="combo_search" position="absolute 302 10 382 31" anchor="default">
                <Dataset id="innerdataset">
                  <ColumnInfo>
                    <Column id="codecolumn" size="256"/>
                    <Column id="datacolumn" size="256"/>
                  </ColumnInfo>
                  <Rows>
                    <Row>
                      <Col id="codecolumn">engnm</Col>
                      <Col id="datacolumn">영문명</Col>
                    </Row>
                    <Row>
                      <Col id="codecolumn">hngnm</Col>
                      <Col id="datacolumn">한글명</Col>
                    </Row>
                  </Rows>
                </Dataset>
              </Combo>
            </Layout>
          </Layouts>
          <InitValue>
            <Combo id="combo1" codecolumn="codecolumn" datacolumn="datacolumn" innerdataset="innerdataset"/>
          </InitValue>
        </Div>
        <Static text="진단" position="absolute 0 0 72 22" align="align:center middle;" id="caption2" class="tit_2"/>
        <Shape position="absolute 0 63 639 69" linetype="horizontal" id="line3" class="line_1" anchor="left top right"/>
        <Button position="absolute 526 352 582 374" id="btn_cfm" class="btn4" text="확인" onclick="btn_cfm_onclick" anchor="right bottom"/>
        <Button position="absolute 583 352 639 374" id="btn_can" class="btn4" text="취소" anchor="right bottom"/>
        <Grid position="absolute 0 67 639 351" id="grd_diaglist" binddataset="ds_grd_diaglist" autofittype="col" oncelldblclick="grd_diaglist_oncelldblclick" oncellclick="grd_diaglist_oncellclick" cellsizingtype="col" anchor="all">
          <Formats>
            <Format id="default">
              <Columns>
                <Column size="22"/>
                <Column size="100"/>
                <Column size="248"/>
                <Column size="230"/>
              </Columns>
              <Rows>
                <Row size="24" band="head"/>
                <Row size="24"/>
              </Rows>
              <Band id="head">
                <Cell/>
                <Cell col="1" text="진단코드"/>
                <Cell col="2" text="영문명"/>
                <Cell col="3" text="한글명"/>
              </Band>
              <Band id="body">
                <Cell celltype="head"/>
                <Cell col="1" style="align:left middle;padding:0 0 0 5;" text="bind:icd10cd"/>
                <Cell col="2" style="align:left middle;padding:0 0 0 5;" text="bind:icd10engnm"/>
                <Cell col="3" style="align:left middle;padding:0 0 0 5;" text="bind:icd10hngnm"/>
              </Band>
            </Format>
          </Formats>
        </Grid>
      </Layout>
    </Layouts>
    <Objects>
      <Dataset id="ds_grd_diaglist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="icd10cd" type="STRING"/>
          <Column id="icd10engnm" type="STRING"/>
          <Column id="icd10hngnm" type="STRING"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_send_srchdata" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="srchterm" type="STRING" size="256"/>
          <Column id="srchflag" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="srchflag">engnm</Col>
          </Row>
        </Rows>
      </Dataset>
    </Objects>
    <Bind>
      <BindItem id="item0" compid="group1.input1" propid="value" datasetid="ds_send_srchdata" columnid="srchterm"/>
      <BindItem id="item1" compid="group1.combo1" propid="visible" datasetid="ds_send_srchdata" columnid="srchflag"/>
    </Bind>
    <InitValue/>
    <Script type="xscript4.0"><![CDATA[/***************************************************************************************  
 * System Name		:	
 * Job Name 		:	
 * Creator 	    :	
 * Make Date 		:	2015-06-15
 * Description  	:	                                                                   
 *--------------------------------------------------------------------------------------- 
 * Modify Date     	Modifier  	  Modify Description                                   
 *--------------------------------------------------------------------------------------- 
 * 2015-06-15      Live Converter   TF->XP                                           
 *                                                                                        
 *--------------------------------------------------------------------------------------- 
 ****************************************************************************************/

//=======================================================================================
// Lib Include
//---------------------------------------------------------------------------------------
include "com_commonxp::comm_main.xjs"
include "ast_commonxp::AST.xjs"

// 폼 초기화
	function SPADB61700_oninit(obj:Form, e:InitEventInfo)
	{
		frmf_initForm(obj);
		grdf_setGridSort(grd_diaglist);
		grdf_setToolTipBind(grd_diaglist);
		group1.combo1.index = 0;
	}


// 진단 검색어
	function input1_onkeydown(obj:Edit, e:KeyEventInfo)
	{
		if(e.keycode == 13){
			var ev = new ClickEventInfo;
			group1.btn_req.setFocus();
			frmf_inputEnterKey("group1.btn_req", "onclick", ev );
		}
	}

//조회
	function btn_req_onclick(obj:Button,  e:ClickEventInfo)
	{
		
		//sysf_trace(ds_send_srchdata.saveXML());
		ds_send_srchdata.setColumn(0, "srchterm", group1.input1.value);
		ds_send_srchdata.setColumn(0, "srchflag", group1.combo1.value);
		
		//submit("TRADB61701");
		var oParam = {};
		oParam.id          = "TRADB61701";
		oParam.service     = "pharmacyprotocolapp.AnticancerProtocol"; //"pharmacybaseapp.AnticancerProtocol";
		oParam.method      = "reqGetDiagCodeList";
		oParam.inds        = "req=ds_send_srchdata";
		oParam.outds       = "ds_grd_diaglist=item";
		oParam.async       = false;
		//oParam.callback    = "cf_TRADB61701";

		tranf_submit(oParam);
		
	}

// 질병정보 Row 보내기
	function grd_diaglist_oncelldblclick(obj:Grid, e:GridClickEventInfo)
	{
		if ( frmf_checkOpener() ) {
		
			var row = ds_grd_diaglist.rowposition;
			if( row > 0 ){
				
					opener.ds_grd_sickclsdetaillist.copyRow(opener.ds_grd_sickclsdetaillist.addRow(),ds_grd_diaglist,ds_grd_diaglist.rowposition);
					this.close();

			} else {
				sysf_messageBox("행이 정확히 선택되지", "E007");
			}
		
		} else {
		
			alert("상위화면이 변경되어 데이터를 전달할 수 없습니다.");
			
		}
	}

// 취소
function btn_can_onclick(obj:Button,  e:ClickEventInfo)
{
	this.close();
}

function btn_cfm_onclick(obj:Button,  e:ClickEventInfo)
{
		if ( frmf_checkOpener() ) {
		
			var row = ds_grd_diaglist.rowposition;
			if( row > 0 ){
				
					opener.ds_grd_sickclsdetaillist.copyRow(opener.ds_grd_sickclsdetaillist.addRow(),ds_grd_diaglist,ds_grd_diaglist.rowposition);

			} else {
				sysf_messageBox("행이 정확히 선택되지", "E007");
			}
		
		} else {
		
			alert("상위화면이 변경되어 데이터를 전달할 수 없습니다.");
			
		}
		this.close();
}
]]></Script>
  </Form>
</FDL>