YNU_JEUS/app_home/himed/xpapps/pam/patinfomngtxp/xp/SPPMC07300_동명이인환자관리.xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SPPMC07300" position="absolute 0 0 580 370" titletext="동명이인환자관리" onload="SPPMC07300_onload">
    <Layouts>
      <Layout>
        <Grid position="absolute 5 110 555 359" id="datagrid1" binddataset="ds_main_patlist">
          <Formats>
            <Format id="default">
              <Columns>
                <Column size="80"/>
                <Column size="80"/>
                <Column size="80"/>
                <Column size="80"/>
                <Column size="40"/>
                <Column size="120"/>
                <Column size="52"/>
              </Columns>
              <Rows>
                <Row size="24" band="head"/>
                <Row size="24"/>
              </Rows>
              <Band id="head">
                <Cell text="환자번호"/>
                <Cell col="1" text="성명"/>
                <Cell col="2" text="표시명"/>
                <Cell col="3" text="입원일자"/>
                <Cell col="4" text="상태"/>
                <Cell col="5" text="병동"/>
                <Cell col="6" text="병실"/>
              </Band>
              <Band id="body">
                <Cell style="align:left middle;padding:0 0 0 4;" text="bind:pid"/>
                <Cell col="1" style="align:left middle;padding:0 0 0 4;" text="bind:hngnm"/>
                <Cell col="2" style="align:left middle;padding:0 0 0 4;" text="bind:hngnm2"/>
                <Cell col="3" style="align:left middle;padding:0 0 0 4;" text="bind:indd"/>
                <Cell col="4" style="align:left middle;padding:0 0 0 4;" text="bind:indschacptstat"/>
                <Cell col="5" style="align:left middle;padding:0 0 0 4;" text="bind:wardnm"/>
                <Cell col="6" style="align:left middle;padding:0 0 0 4;" text="bind:roomcd"/>
              </Band>
            </Format>
          </Formats>
        </Grid>
        <Edit position="absolute 109 33 202 52" id="input1" taborder="1" onkeydown="input1_onkeydown"/>
        <Button position="absolute 209 34 225 50" id="button1" class="icon_search" taborder="2" text="" onclick="button1_onclick"/>
        <Static text="수정표시명" position="absolute 308 54 390 74" id="caption2" class="cell_1"/>
        <Edit position="absolute 392 54 490 73" id="input2" taborder="3"/>
        <Button position="absolute 499 53 555 75" align="align:left middle;" id="button2" class="btn4" taborder="4" text="수정" onclick="button2_onclick"/>
        <Static text="성명/현표시명" position="absolute 6 54 107 74" id="caption4" class="cell_1" visible="true"/>
        <Edit position="absolute 109 54 202 73" id="input3" enable="false"/>
        <Edit position="absolute 201 54 299 73" id="input4" enable="false"/>
        <Static text="환자정보" position="absolute 6 9 92 27" id="caption5" class="tit_2"/>
        <Static text="동명이인환자 리스트" position="absolute 5 88 149 104" id="caption6" class="tit_2"/>
        <Shape position="absolute 5 27 555 33" linetype="horizontal" id="line1" class="line_1" style="strokepen:3 solid #33bbbbff;"/>
        <Shape position="absolute 5 106 555 112" linetype="horizontal" id="line2" class="line_1" style="strokepen:3 solid #33bbbbff;"/>
        <Static text="환자번호" position="absolute 6 32 107 52" id="caption7" class="cell_1" visible="true"/>
        <ListBox id="ListBox00" taborder="5" position="absolute 300 35 558 50" style="color:red;background:#00000000;border:0 solid #9ebed4ff ;align:center middle;" codecolumn="codecolumn" datacolumn="datacolumn" scrollbars="none" onitemdblclick="ListBox00_onitemdblclick">
          <Dataset id="innerdataset">
            <ColumnInfo>
              <Column id="codecolumn" size="256"/>
              <Column id="datacolumn" size="256"/>
            </ColumnInfo>
            <Rows>
              <Row>
                <Col id="codecolumn"/>
                <Col id="datacolumn">* 동명이인환자 리스트를 참고하여 수정 *</Col>
              </Row>
            </Rows>
          </Dataset>
        </ListBox>
      </Layout>
    </Layouts>
    <Objects>
      <Dataset id="ds_main_patlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="pid" type="STRING" size="256" sumtext="등록번호"/>
          <Column id="hngnm" type="STRING" size="256" sumtext="환자명"/>
          <Column id="hngnm2" type="STRING" size="256" sumtext="환자명2"/>
          <Column id="indd" type="STRING" size="256" sumtext="입원일자"/>
          <Column id="indschacptstat" type="STRING" size="256" sumtext="상태"/>
          <Column id="wardnm" type="STRING" size="256" sumtext="병동명"/>
          <Column id="roomcd" type="STRING" size="256" sumtext="병실코드"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_send" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="pid" type="STRING" size="256"/>
          <Column id="hngnm2" type="STRING" size="256"/>
          <Column id="autoyn" type="STRING" size="256"/>
          <Column id="hngnm" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="pid"/>
            <Col id="hngnm2"/>
            <Col id="autoyn"/>
            <Col id="hngnm"/>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_main_patinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="hngnm" type="STRING" size="256"/>
          <Column id="hngnm2" type="STRING" size="256"/>
          <Column id="newhngnm2" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="hngnm"/>
            <Col id="hngnm2"/>
            <Col id="newhngnm2"/>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_resultlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="hngnm" type="STRING" size="256" sumtext="환자명"/>
          <Column id="hngnm2" type="STRING" size="256" sumtext="표시명"/>
        </ColumnInfo>
      </Dataset>
    </Objects>
    <Bind>
      <BindItem id="item0" compid="input1" propid="value" datasetid="ds_send" columnid="pid"/>
      <BindItem id="item1" compid="input3" propid="value" datasetid="ds_main_patinfo" columnid="hngnm"/>
      <BindItem id="item2" compid="input4" propid="value" datasetid="ds_main_patinfo" columnid="hngnm2"/>
      <BindItem id="item3" compid="input2" propid="value" datasetid="ds_send" columnid="hngnm2"/>
    </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                                           
 *                                                                                        
 *--------------------------------------------------------------------------------------- 
 ****************************************************************************************/
//=======================================================================================
// Lib Include
//---------------------------------------------------------------------------------------
include 'com_commonxp::comm_main.xjs';

//=======================================================================================
// Local Methods
//---------------------------------------------------------------------------------------
/****************************************************************************************
 * Argument			: 
 * Description		: fSearch
 ****************************************************************************************/
function fSearch(pid){
	ds_main_patinfo.setColumn(0, 'hngnm', '');
	ds_main_patinfo.setColumn(0, 'hngnm2', '');
	
	dsf_createDsRow('ds_req', [{ col: 'pid', type: 'string', size: 256, val: pid }], false);
	
	ds_resultlist.clearData();
	
	var oParam = {};
		oParam.id          = "TRPMC07302";
		oParam.service     = "patinfomngtapp.PatBaseInfo";
		oParam.method      = "reqGetHngNm";
		oParam.inds        = "req=ds_req";
		oParam.outds       = "ds_resultlist=resultlist";
		oParam.async       = false;
		//oParam.callback    = "cf_TRPMC07302";

	tranf_submit(oParam);
	
	ds_main_patinfo.copyData(ds_resultlist);
	
	ds_main_patlist.clearData();
	ds_main_patlist.addRow();
	
	oParam = {};
    oParam.id          = "TRPMC07300";
    oParam.service     = "patinfomngtapp.PatBaseInfo";
    oParam.method      = "reqGetNameConflictList";
    oParam.inds        = "req=ds_req";
    oParam.outds       = "ds_main_patlist=resultlist";
    oParam.async       = false;
    //oParam.callback    = "cf_TRPMC07300";

	tranf_submit(oParam);
	
	if(ds_main_patlist.rowcount < 1){
		sysf_messageBox('동명이인 환자가 존재하지 않습니다.', 'I000');
	}
}

/****************************************************************************************
 * Argument			: 
 * Description		: fSave
 ****************************************************************************************/
function fSave(pid, hngnm2){

	//ds_send.setColumn(0, "pid", ds_main_patinfo.getColumn(0, "pid"));   // 화면상에 존재
	ds_send.setColumn(0, "hngnm", ds_main_patinfo.getColumn(0, "hngnm"));
	//ds_send.setColumn(0, "hngnm2", ds_main_patinfo.getColumn(0, "hngnm2"));  // 화면상에 존재
	ds_send.setColumn(0, 'autoyn', 'N');
	
	var oParam = {};
		oParam.id          = "TXPMC07301";
		oParam.service     = "patinfomngtapp.PatBaseInfo";
		oParam.method      = "reqSetHngnm2";
		oParam.inds        = "req=ds_send";
		oParam.outds       = "ds_resultlist=resultlist";
		oParam.async       = false;

	tranf_submit(oParam);
	
	if(ds_resultlist.rowcount > 0){
		ds_main_patinfo.setColumn(0, "hngnm2", ds_resultlist.getColumn(0, "hngnm2"));
		sysf_messageBox('저장되었습니다.', 'I000');
	}
	
	return hngnm2;
}

/**
 * 화면호출없이 자동으로 중복제거 후 등록
 * @param  {[type]} pid   [description]
 * @param  {[type]} hngnm [description]
 * @return {[type]}       [description]
 */
function fAutoSave(pid, hngnm) {
  ds_send.setColumn(0, "pid", pid);
  ds_send.setColumn(0, "hngnm", hngnm);
  ds_send.setColumn(0, "autoyn", "Y");

  dsf_createDs('ds_res');

  var oParam = {};
    oParam.id          = "TXPMC07301";
    oParam.service     = "patinfomngtapp.PatBaseInfo";
    oParam.method      = "reqSetHngnm2";
    oParam.inds        = "req=ds_send";
    oParam.outds       = "ds_res=resultlist";
    oParam.async       = false;

  tranf_submit(oParam);

  var hngnm2 = utlf_transNullToEmpty(ds_res.getColumn(0, "hngnm2"));

  return hngnm2;
}

 
//=======================================================================================
// Events
//---------------------------------------------------------------------------------------
/****************************************************************************************
 * Argument			: 
 * Description		: onload
 ****************************************************************************************/
function SPPMC07300_onload(obj:Form, e:LoadEventInfo){
	// 폼 초기화
	frmf_initForm(obj);
	
}

/****************************************************************************************
 * Argument			: 
 * Description		: 환자정보 환자번호 키보드 입력 이벤트
 ****************************************************************************************/
function input1_onkeydown(obj:Edit, e:KeyEventInfo){
	if(e.keycode == 13){
		obj.updateToDataset();
		button1.click();
	}
}

/****************************************************************************************
 * Argument			: 
 * Description		: 환자정보 환자번호 검색 아이콘 버튼 클릭 이벤트
 ****************************************************************************************/
function button1_onclick(obj:Button,  e:ClickEventInfo){
	var pid = ds_send.getColumn(0, 'pid');
	
	if(utlf_isNull(pid)){
		sysf_messageBox('환자번호는 필수입니다.', 'C000');
		return;
	}
	
	fSearch(pid);
}

/****************************************************************************************
 * Argument			: 
 * Description		: 수정 버튼 클릭 이벤트
 ****************************************************************************************/
function button2_onclick(obj:Button,  e:ClickEventInfo){
	var pid = ds_send.getColumn(0, 'pid');
	var hngnm2 = ds_send.getColumn(0, 'hngnm2');
	
	// 필수값 체크
	if(utlf_isNull(pid) || utlf_isNull(hngnm2)){
		sysf_messageBox('환자번호 및 표시명은 필수입니다.', 'C000');
		return;
	}
	
	// 중복체크
	for(var i = 0; i < ds_main_patlist.rowcount; i++){
		if(ds_main_patlist.getColumn(i, 'hngnm2') == hngnm2){
			// 동일한 이름이 존재
			sysf_messageBox('동일한 표시명이 존재합니다. 표시명을 수정하십시요.', 'C000');
			
			return;
		}
	}
	
	fSave(pid, hngnm2);
}

function ListBox00_onitemdblclick(obj:ListBox, e:ListBoxClickEventInfo)
{
	trace('dbclick');
}
]]></Script>
  </Form>
</FDL>