YNU_JEUS/app_home/himed/xpapps/crm/crmxp/xp/SPCCM00100_환자검색.xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SPCCM00100" position="absolute 0 0 598 350" titletext="환자 조회" oninit="SPCCM00100_oninit" onload="SPCCM00100_onload">
    <Layouts>
      <Layout>
        <Div id="group2" taborder="0" class="div_SA2" position="absolute 0 0 589 40">
          <Layouts>
            <Layout>
              <Static id="caption1" text="검색조건" class="search_name" position="absolute 11 10 128 27"/>
              <Shape id="line1" linetype="vertical" position="absolute 500 8 506 30"/>
              <Button id="btn_search" taborder="1" text="조회" class="btn1" position="absolute 518 8 574 30" onclick="group2_btn_search_onclick"/>
              <Edit id="ipt_search_item" taborder="2" class="input_s_essential" position="absolute 321 9 443 28" autoselect="true" onkeyup="group2_ipt_search_item_onkeyup"/>
              <Combo id="combo1" taborder="3" codecolumn="codecolumn" datacolumn="datacolumn" class="combo_search" position="absolute 169 9 299 28" index="0" value="pid" text="등록번호">
                <Dataset id="innerdataset">
                  <ColumnInfo>
                    <Column id="codecolumn"/>
                    <Column id="datacolumn"/>
                  </ColumnInfo>
                  <Rows>
                    <Row>
                      <Col id="codecolumn">pid</Col>
                      <Col id="datacolumn">등록번호</Col>
                    </Row>
                    <Row>
                      <Col id="codecolumn">patnm</Col>
                      <Col id="datacolumn">환자명</Col>
                    </Row>
                    <Row>
                      <Col id="codecolumn">resdnrgstno</Col>
                      <Col id="datacolumn">주민번호 앞 6자리</Col>
                    </Row>
                    <Row>
                      <Col id="codecolumn">mpphonno</Col>
                      <Col id="datacolumn">휴대폰번호</Col>
                    </Row>
                    <Row>
                      <Col id="codecolumn">hometelno</Col>
                      <Col id="datacolumn">집 전화번호</Col>
                    </Row>
                  </Rows>
                </Dataset>
              </Combo>
            </Layout>
          </Layouts>
        </Div>
        <Static id="caption9" text="환자 조회" class="tit_2" position="absolute 0 47 111 69"/>
        <Shape id="line12" class="line_10" position="absolute 0 63 589 69"/>
        <Grid id="grd_patlist" taborder="1" binddataset="ds_main_list_patlist" useinputpanel="false" position="absolute 0 68 589 311" autoenter="select" cellsizingtype="col" oncelldblclick="grd_patlist_oncelldblclick">
          <Formats>
            <Format id="default">
              <Columns>
                <Column size="21"/>
                <Column size="100"/>
                <Column size="130"/>
                <Column size="130"/>
                <Column size="100"/>
                <Column size="100"/>
                <Column size="100"/>
                <Column size="100"/>
                <Column size="0"/>
                <Column size="0"/>
                <Column size="0"/>
                <Column size="0"/>
                <Column size="0"/>
                <Column size="0"/>
                <Column size="0"/>
                <Column size="0"/>
                <Column size="0"/>
              </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="주민번호"/>
                <Cell col="4" text="휴대폰번호"/>
                <Cell col="5" text="집 전화번호"/>
                <Cell col="6" text="이메일"/>
                <Cell col="7" text="최종내원일시"/>
                <Cell col="8" text="주민번호1"/>
                <Cell col="9" text="주민번호2"/>
                <Cell col="10" text="성별"/>
                <Cell col="11" text="우편번호1"/>
                <Cell col="12" text="우편번호2"/>
                <Cell col="13" text="우편번호일련번호"/>
                <Cell col="14" text="우편번호주소"/>
                <Cell col="15" text="상세주소"/>
                <Cell col="16" text="기타전화번호"/>
              </Band>
              <Band id="body">
                <Cell celltype="head" expr="currow+1"/>
                <Cell col="1" text="bind:pid"/>
                <Cell col="2" text="bind:hngnm"/>
                <Cell col="3" text="bind:rrgstno"/>
                <Cell col="4" text="bind:mpphontel"/>
                <Cell col="5" text="bind:hometel"/>
                <Cell col="6" text="bind:email"/>
                <Cell col="7" text="bind:lastchosdt"/>
                <Cell col="8" text="bind:rrgstno1"/>
                <Cell col="9" text="bind:rrgstno2"/>
                <Cell col="10" text="bind:sex"/>
                <Cell col="11" text="bind:zipcd1"/>
                <Cell col="12" text="bind:zipcd2"/>
                <Cell col="13" text="bind:zipcdseq"/>
                <Cell col="14" text="bind:zipcdaddr"/>
                <Cell col="15" text="bind:detladdr"/>
                <Cell col="16" text="bind:etctelno1"/>
              </Band>
            </Format>
          </Formats>
        </Grid>
        <Button id="button2" taborder="2" text="확인" class="btn4" position="absolute 473 317 529 339" onclick="button2_onclick"/>
        <Button id="button3" taborder="3" text="닫기" class="btn4" position="absolute 532 317 588 339" onclick="button3_onclick"/>
      </Layout>
    </Layouts>
    <Objects>
      <Dataset id="ds_main_search" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="searchcondition" type="STRING" size="256"/>
          <Column id="searchterm" type="STRING" size="256"/>
          <Column id="instcd" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="searchcondition">cintnm</Col>
            <Col id="searchterm"/>
            <Col id="instcd"/>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_main_list_patlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="pid" type="STRING" size="256" sumtext="등록번호"/>
          <Column id="hngnm" type="STRING" size="256" sumtext="환자명"/>
          <Column id="rrgstno" type="STRING" size="256" sumtext="주민번호"/>
          <Column id="mpphontel" type="STRING" size="256" sumtext="휴대폰"/>
          <Column id="hometel" type="STRING" size="256" sumtext="집전화"/>
          <Column id="email" type="STRING" size="256" sumtext="이메일"/>
          <Column id="lastchosdd" type="STRING" size="256" sumtext="최종내원일"/>
          <Column id="rrgstno1" type="STRING" size="256" sumtext="주민번호1"/>
          <Column id="rrgstno2" type="STRING" size="256" sumtext="주민번호2"/>
          <Column id="sex" type="STRING" size="256" sumtext="성별"/>
          <Column id="zipcd1" type="STRING" size="256" sumtext="우편번호1"/>
          <Column id="zipcd2" type="STRING" size="256" sumtext="우편번호2"/>
          <Column id="zipcdseq" type="STRING" size="256" sumtext="일련번호"/>
          <Column id="zipcdaddr" type="STRING" size="256" sumtext="우편번호주소"/>
          <Column id="detladdr" type="STRING" size="256" sumtext="상세주소"/>
          <Column id="etctelno1" type="STRING" size="256" sumtext="기타 번호"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_send_data" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
    </Objects>
    <Bind>
      <BindItem id="item0" compid="group2.ipt_search_item" propid="value" datasetid="ds_main_search" columnid="searchterm"/>
      <BindItem id="item1" compid="group2.combo1" propid="value" datasetid="ds_main_search" columnid="searchcondition"/>
    </Bind>
    <Script type="xscript4.0"><![CDATA[/***************************************************************************************  
 * System Name		:	
 * Job Name 		:	
 * Creator 	    :	
 * Make Date 		:	2016-05-24
 * Description  	:	                                                                   
 *--------------------------------------------------------------------------------------- 
 * Modify Date     	Modifier  	  Modify Description                                   
 *--------------------------------------------------------------------------------------- 
 * 2016-05-24      Live Converter   TF->XP                                           
 *                                                                                        
 *--------------------------------------------------------------------------------------- 
 ****************************************************************************************/
include "com_commonxp::comm_main.xjs";
function SPCCM00100_oninit(obj:Form, e:InitEventInfo)
{
	frmf_initForm(obj);
}

function SPCCM00100_onload(obj:Form, e:LoadEventInfo)
{
	grdf_initGrid(grd_patlist);
	
	/*  
		오브젝트로 return 하는 방식으로 수정함.
		불필요한 파라미터 제거함.
		부모창에서 해당 파라미터에 맞게 데이터셋에 저장하도록 구현.
	*/
	var search_condition = opener.frmf_getParameter("search_condition");
	var search_term 	 = opener.frmf_getParameter("search_term");
	var receive_path	 = opener.frmf_getParameter("receive_path");
	
	// 두번째 검색시 첫번째 검색내용을 초기화시킴.
	ds_main_list_patlist.clearData();
	
	ds_main_search.setColumn(0, "searchcondition", search_condition);
	ds_main_search.setColumn(0, "searchterm", search_term);

	dsf_makeValue(ds_send_data, "insttype", "string", "dutplceinstcd");
	dsf_makeValue(ds_send_data, "searchcondition", "string", search_condition);
	dsf_makeValue(ds_send_data, "searchterm", "string", search_term);
	
	
	// 처음 검색 팝업을 띄울 때에는 기본 정보를 안 보여주고, 한번 검색 한 이후에는 최종선택한 정보를 기본적으로 가져옴..
	if ( utlf_isNull(search_term))
	{
		group2.ipt_search_item.setFocus();
	} 
	else if ((search_condition == "patnm") && (String(group2.ipt_search_item.value).length < 2))
	{
		sysf_messageBox("환자 이름 검색은 최소 2글자 이상 ", "C001");
		group2.ipt_search_item.setFocus();
	}
	else 
	{
		var oParam = {};
			oParam.id          = "TRCCM00101";
			oParam.service     = "crmapp.Common";
			oParam.method      = "reqGetPatCodeList";
			oParam.inds        = "req=ds_send_data";
			oParam.outds       = "ds_main_list_patlist=patlist";
			oParam.async       = false;
			//oParam.callback    = "cf_TRCCM00101";

		tranf_submit(oParam);

		grd_patlist.setFocus();
	}
	
	if (ds_main_list_patlist.rowcount == 2)
	{
		fGetOneRow();
	}
}

function fGetOneRow()
{
	var receive_path = opener.frmf_getParameter("receive_path");
	
	var row 			= 0;
	var pid 			= ds_main_list_patlist.getColumn(row, "pid");
	var patnm 			= ds_main_list_patlist.getColumn(row, "hngnm");
	var mpphontel 		= ds_main_list_patlist.getColumn(row, "mpphontel");
	var email 			= ds_main_list_patlist.getColumn(row, "email");
	var resdnrgstno1 	= ds_main_list_patlist.getColumn(row, "rrgstno1");
	var resdnrgstno2 	= ds_main_list_patlist.getColumn(row, "rrgstno2");
	var gndr 			= ds_main_list_patlist.getColumn(row, "sex");
	var zipcd1 			= ds_main_list_patlist.getColumn(row, "zipcd1");
	var zipcd2 			= ds_main_list_patlist.getColumn(row, "zipcd2");
	var zipcdseq 		= ds_main_list_patlist.getColumn(row, "zipcdseq");
	var zipcdaddr		= ds_main_list_patlist.getColumn(row, "zipcdaddr");
	var detladdr 		= ds_main_list_patlist.getColumn(row, "detladdr");
	var etctelno1 		= ds_main_list_patlist.getColumn(row, "etctelno1");
	
	// frmf_getParameter로 노드 받아와서 데이터셋에 입력하는 방식을 오브젝트형식으로 변경함.
	var objParam = new Object();
		objParam.pid				 = pid;
		objParam.hngnm			 	 = patnm;
		objParam.mpphontel			 = mpphontel;
		objParam.email			   	 = email;
		objParam.rrgstno1			 = resdnrgstno1;
		objParam.rrgstno2			 = resdnrgstno2;
		objParam.sex		   		 = gndr;
		objParam.zipcd1		   		 = zipcd1;
		objParam.zipcd2		   		 = zipcd2;
		objParam.zipcdseq		   	 = zipcdseq;
		objParam.zipcdaddr		   	 = zipcdaddr;
		objParam.detladdr		   	 = detladdr;
		objParam.etctelno1		   	 = etctelno1;
			
	if (!utlf_isNull(receive_path) && receive_path == "voc")
	{
		opener.ds_temp_piddata.copyData(ds_main_list_patlist);
		opener.ds_temp_piddata.clearData();
		opener.ds_temp_piddata.addRow();
		opener.ds_temp_piddata.copyRow(0, ds_main_list_patlist, ds_main_list_patlist.rowposition);
		
		opener.ds_main_vocdata_customer.setColumn(0, "patrela", "");
		opener.frmf_getComponents("cmb_PatRela").setFocus();
	}
	
	if (!utlf_isNull(receive_path) && receive_path == "crmpid")
	{	
		objParam.arg_ds_temp_key = ds_temp_key;
		opener.frmf_openForm("SMCMS00400", "", objParam);
		this.close();
		return false;
	}
	this.close(objParam);
}	

function group2_ipt_search_item_onkeyup(obj:Edit, e:KeyEventInfo)
{
	if(e.keycode == 13)
	{
		obj.updateToDataset();
		group2.btn_search.click();
	}
}

function group2_btn_search_onclick(obj:Button,  e:ClickEventInfo)
{
	var search_condition = ds_main_search.getColumn(0, "searchcondition");
	var search_term = ds_main_search.getColumn(0, "searchterm");
	
	arrCompId = new Array("group2.ipt_search_item");
	if(frmf_isRequiredControls(arrCompId))
	{
		if (search_condition == "patnm" && String(group2.ipt_search_item.value).length < 2)
		{
			sysf_messageBox("환자 이름 검색은 최소 2글자 이상 ", "C001");
			group2.ipt_search_item.setFocus();
		}
		else 
		{
			ds_main_list_patlist.clearData();
			
			dsf_makeValue(ds_send_data, "searchcondition", "string", search_condition);
			dsf_makeValue(ds_send_data, "searchterm", "string", search_term);
			dsf_makeValue(ds_send_data, "insttype", "string", "dutplceinstcd");
			
			var oParam = {};
				oParam.id          = "TRCCM00101";
				oParam.service     = "crmapp.Common";
				oParam.method      = "reqGetPatCodeList";
				oParam.inds        = "req=ds_send_data";
				oParam.outds       = "ds_main_list_patlist=patlist";
				oParam.async       = false;
				//oParam.callback    = "cf_TRCCM00101";

			tranf_submit(oParam);
			
			grd_patlist.setFocus();
		}
	}
}

function grd_patlist_oncelldblclick(obj:Grid, e:GridClickEventInfo)
{
	// 불필요한 파라미터는 제거함
	var receive_path 	= opener.frmf_getParameter("receive_path");
	
	var row 			= ds_main_list_patlist.rowposition;
	var pid 			= ds_main_list_patlist.getColumn(row, "pid");
	var patnm 			= ds_main_list_patlist.getColumn(row, "hngnm");
	var mpphontel		= ds_main_list_patlist.getColumn(row, "mpphontel");
	var email 			= ds_main_list_patlist.getColumn(row, "email");
	var resdnrgstno1 	= ds_main_list_patlist.getColumn(row, "rrgstno1");
	var resdnrgstno2 	= ds_main_list_patlist.getColumn(row, "rrgstno2");
	var gndr 			= ds_main_list_patlist.getColumn(row, "sex");
	var zipcd1 			= ds_main_list_patlist.getColumn(row, "zipcd1");
	var zipcd2 			= ds_main_list_patlist.getColumn(row, "zipcd2");
	var zipcdseq 		= ds_main_list_patlist.getColumn(row, "zipcdseq");
	var zipcdaddr 		= ds_main_list_patlist.getColumn(row, "zipcdaddr");
	var detladdr 		= ds_main_list_patlist.getColumn(row, "detladdr");
	var etctelno1 		= ds_main_list_patlist.getColumn(row, "etctelno1");
	
	if (ds_main_list_patlist.rowposition >= 0)
	{
		var objParam = new Object();	// frmf_getParameter로 노드 받아와서 데이터셋에 입력하는 방식을 오브젝트형식으로 변경함.
			objParam.pid				 = pid;
			objParam.hngnm			 	 = patnm;
			objParam.mpphontel			 = mpphontel;
			objParam.email			   	 = email;
			objParam.rrgstno1			 = resdnrgstno1;
			objParam.rrgstno2			 = resdnrgstno2;
			objParam.sex		   		 = gndr;
			objParam.zipcd1		   		 = zipcd1;
			objParam.zipcd2		   		 = zipcd2;
			objParam.zipcdseq		   	 = zipcdseq;
			objParam.zipcdaddr		   	 = zipcdaddr;
			objParam.detladdr		   	 = detladdr;
			objParam.etctelno1		   	 = etctelno1;
		
			
		if (!utlf_isNull(receive_path) && receive_path == "voc")
		{
			opener.ds_temp_piddata.copyData(ds_main_list_patlist);
			opener.ds_temp_piddata.clearData();
			opener.ds_temp_piddata.addRow();
			opener.ds_temp_piddata.copyRow(0, ds_main_list_patlist, ds_main_list_patlist.rowposition);
			
			opener.ds_main_vocdata_customer.setColumn(0, "patrela", "");
			opener.frmf_getComponents("cmb_PatRela").setFocus();
		}
		
		if (!utlf_isNull(receive_path) && receive_path == "crmpid")
		{	// ds_temp_key 데이터셋이 없으므로 1.0 에 오류나는 부분 제거함
			opener.frmf_openForm("SMCMS00400", "", objParam);
			this.close();
			return false;
		}
		this.close(objParam);
	}	
}

function button2_onclick(obj:Button,  e:ClickEventInfo)
{
	var receive_path 	= opener.frmf_getParameter("receive_path");
	
	var row 			= ds_main_list_patlist.rowposition;
	var pid 			= ds_main_list_patlist.getColumn(row, "pid");
	var patnm 			= ds_main_list_patlist.getColumn(row, "hngnm");
	var mpphontel 		= ds_main_list_patlist.getColumn(row, "mpphontel");
	var email 			= ds_main_list_patlist.getColumn(row, "email");
	var resdnrgstno1 	= ds_main_list_patlist.getColumn(row, "rrgstno1");
	var resdnrgstno2 	= ds_main_list_patlist.getColumn(row, "rrgstno2");
	var gndr 			= ds_main_list_patlist.getColumn(row, "sex");
	var zipcd1 			= ds_main_list_patlist.getColumn(row, "zipcd1");
	var zipcd2 			= ds_main_list_patlist.getColumn(row, "zipcd2");
	var zipcdseq 		= ds_main_list_patlist.getColumn(row, "zipcdseq");
	var zipcdaddr 		= ds_main_list_patlist.getColumn(row, "zipcdaddr");
	var detladdr 		= ds_main_list_patlist.getColumn(row, "detladdr");
	var etctelno1 		= ds_main_list_patlist.getColumn(row, "etctelno1");	
	
	if (ds_main_list_patlist.rowposition >= 0)
	{
		var objParam = new Object();	// frmf_getParameter로 노드 받아와서 데이터셋에 입력하는 방식을 오브젝트형식으로 변경함.
			objParam.pid				 = pid;
			objParam.hngnm			 	 = patnm;
			objParam.mpphontel			 = mpphontel;
			objParam.email			   	 = email;
			objParam.rrgstno1			 = resdnrgstno1;
			objParam.rrgstno2			 = resdnrgstno2;
			objParam.sex		   		 = gndr;
			objParam.zipcd1		   		 = zipcd1;
			objParam.zipcd2		   		 = zipcd2;
			objParam.zipcdseq		   	 = zipcdseq;
			objParam.zipcdaddr		   	 = zipcdaddr;
			objParam.detladdr		   	 = detladdr;
			objParam.etctelno1		   	 = etctelno1;
			
		if (!utlf_isNull(receive_path) && receive_path == "voc")
		{
			opener.ds_temp_piddata.copyData(ds_main_list_patlist);
			opener.ds_temp_piddata.clearData();
			opener.ds_temp_piddata.addRow();
			opener.ds_temp_piddata.copyRow(0, ds_main_list_patlist, ds_main_list_patlist.rowposition);
			
			opener.ds_main_vocdata_customer.setColumn(0, "patrela", "");
			opener.frmf_getComponents("cmb_PatRela").setFocus();
		}
		
		if (!utlf_isNull(receive_path) && receive_path == "crmpid")
		{	// ds_temp_key 데이터셋이 없으므로 1.0 에 오류나는 부분 제거함
			opener.frmf_openForm("SMCMS00400", "", objParam);
			this.close();
			return false;
		}
		this.close(objParam);
	}
	else
	{
		sysf_messageBox("조회하신 후 목록을 ","C002");
		grd_patlist.setFocus();
	}
}

function button3_onclick(obj:Button,  e:ClickEventInfo)
{
	this.close();
}
]]></Script>
  </Form>
</FDL>