YNU_JEUS/app_home/himed/xpapps/emr/ercarexp/xp/SMMNE01700_전원전입환자 일지.xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SMMNE01700" position="absolute 0 0 1198 781" titletext="전원전입 환자일지" oninit="SMMNE01700_oninit" onload="SMMNE01700_onload" ontimer="SMMNE01700_ontimer">
    <Layouts>
      <Layout>
        <Grid id="grd_outpat" taborder="0" binddataset="ds_main_chnghosplist" useinputpanel="false" visible="false" position="absolute 0 96 1194 765" cellsizingtype="col" cellsizebandtype="allband" scrollpixel="all" anchor="all" ontextchanged="grd_outpat_ontextchanged" autoenter="select">
          <Formats>
            <Format id="default">
              <Columns>
                <Column size="25" band="left"/>
                <Column size="60"/>
                <Column size="80"/>
                <Column size="90"/>
                <Column size="65"/>
                <Column size="65"/>
                <Column size="74"/>
                <Column size="120"/>
                <Column size="190"/>
                <Column size="120"/>
                <Column size="140"/>
                <Column size="140"/>
                <Column size="194"/>
                <Column size="120"/>
                <Column size="0"/>
                <Column size="0"/>
                <Column size="0"/>
                <Column size="0"/>
                <Column size="0"/>
                <Column size="115"/>
                <Column size="139"/>
                <Column size="149"/>
                <Column size="118"/>
                <Column size="130"/>
              </Columns>
              <Rows>
                <Row size="24" band="head"/>
                <Row size="24"/>
              </Rows>
              <Band id="head">
                <Cell/>
                <Cell col="1" text="BedNo."/>
                <Cell col="2" text="등록번호"/>
                <Cell col="3" text="환자명"/>
                <Cell col="4" text="최초KTAS"/>
                <Cell col="5" text="변경KTAS"/>
                <Cell col="6" text="진료과"/>
                <Cell col="7" text="입실일시"/>
                <Cell col="8" text="진단명"/>
                <Cell col="9" text="진단코드"/>
                <Cell col="10" text="주호소"/>
                <Cell col="11" text="대상 병원명"/>
                <Cell col="12" text="퇴실종류"/>
                <Cell col="13" text="퇴실일시"/>
                <Cell col="14" text="indd"/>
                <Cell col="15" text="cretno"/>
                <Cell col="16" text="instcd"/>
                <Cell col="17" text="visitno"/>
                <Cell col="18"/>
                <Cell col="19" text="응급의료책임자"/>
                <Cell col="20" text="구급차 번호"/>
                <Cell col="21" text="동승 인력"/>
                <Cell col="22" displaytype="normal" edittype="none" text="이송병원선정방법"/>
                <Cell col="23" text="전원병원 수용결정자"/>
              </Band>
              <Band id="body">
                <Cell celltype="head" text="expr:currow + 1"/>
                <Cell col="1" text="bind:bedposcnts"/>
                <Cell col="2" text="bind:pid"/>
                <Cell col="3" text="bind:patnm"/>
                <Cell col="4" text="bind:erptkts1"/>
                <Cell col="5" text="bind:erptkts2"/>
                <Cell col="6" text="bind:orddeptnm"/>
                <Cell col="7" text="bind:inddtm" mask="expr:utlf_isNull(inddtm) ? '' : '####-##-## ##:##'"/>
                <Cell col="8" style="align:left middle;padding:0 0 0 5;" text="bind:diagnm"/>
                <Cell col="9" style="align:left middle;" text="bind:diagcd"/>
                <Cell col="10" style="align:left middle;padding:0 0 0 5;" text="bind:cc"/>
                <Cell col="11" displaytype="text" edittype="text" style="align:left middle;padding:0 0 0 5;" text="bind:hospnm"/>
                <Cell col="12" displaytype="normal" edittype="normal" style="align:left middle;padding:0 0 0 5;" text="bind:outrmcd" combodataset="ds_init_outrminfo" combocodecol="basetypecd" combodatacol="typenm" enable="false"/>
                <Cell col="13" text="bind:outrmddtm" mask="expr:utlf_isNull(outrmddtm) ? '' : '####-##-## ##:##'"/>
                <Cell col="14" text="bind:indd"/>
                <Cell col="15" text="bind:cretno"/>
                <Cell col="16" text="bind:instcd"/>
                <Cell col="17" text="bind:visitno"/>
                <Cell col="18" text="bind:chngcellyn"/>
                <Cell col="19" displaytype="normal" edittype="none" text="bind:inpermitdrnm"/>
                <Cell col="20" displaytype="text" edittype="text" text="bind:ambno" editautoselect="false"/>
                <Cell col="21" displaytype="text" edittype="text" text="bind:thp0" editautoselect="false"/>
                <Cell col="22" displaytype="combo" edittype="combo" text="bind:chnghospthdp" combodataset="ds_cd_chnghospthdp" combocodecol="cdid" combodatacol="cdnm" combodisplayrowcount="10"/>
                <Cell col="23" displaytype="combo" edittype="combo" text="bind:chnghospdeci" combodataset="ds_cd_chnghospdeci" combocodecol="cdid" combodatacol="cdnm" combodisplayrowcount="10"/>
              </Band>
            </Format>
          </Formats>
        </Grid>
        <Shape id="line8" linetype="horizontal" class="line_10" position="absolute 0 91 1194 97" anchor="left top right" onclick="line8_onclick"/>
        <Div id="group2" taborder="1" class="div_SA" position="absolute 0 25 1194 65" anchor="left top right">
          <Layouts>
            <Layout>
              <Button id="btn_search" taborder="1" text="조회" class="btn1" position="absolute 952 9 1008 31" onclick="group2_btn_search_onclick" anchor="top right"/>
              <Shape id="line13" linetype="vertical" position="absolute 930 9 936 31" anchor="right"/>
              <Static id="caption2" text="검색일자 :" class="search_name" position="absolute 208 14 279 31" anchor="default"/>
              <Calendar id="input_refFrDT" taborder="2" class="input_s_essential" position="absolute 285 10 385 32" anchor="default" dateformat="yyyy-MM-dd" value="null" autoselect="true" autoskip="true"/>
              <Static id="caption5" text="~" position="absolute 387 14 402 27" anchor="default"/>
              <Calendar id="input_refToDT" taborder="3" class="input_s_essential" position="absolute 401 10 501 32" anchor="default" dateformat="yyyy-MM-dd" autoselect="true"/>
              <Radio id="rdo_searchflag" taborder="4" columncount="2" rowcount="0" codecolumn="codecolumn" datacolumn="datacolumn" class="radio_search" position="absolute 77 11 177 31" anchor="default" onitemchanged="group2_rdo_searchflag_onitemchanged">
                <Dataset id="innerdataset">
                  <ColumnInfo>
                    <Column id="codecolumn"/>
                    <Column id="datacolumn"/>
                  </ColumnInfo>
                  <Rows>
                    <Row>
                      <Col id="codecolumn">1</Col>
                      <Col id="datacolumn">전원</Col>
                    </Row>
                    <Row>
                      <Col id="codecolumn">2</Col>
                      <Col id="datacolumn">전입</Col>
                    </Row>
                  </Rows>
                </Dataset>
              </Radio>
              <Static id="caption8" text="구 분 :" class="search_name" position="absolute 20 14 70 31" anchor="default"/>
              <Button id="btn_updaddInfo" taborder="5" text="저장" class="btn3" position="absolute 1127 9 1183 31" anchor="top right" onclick="group2_btn_updaddInfo_onclick"/>
              <Static id="caption00" text="구 역 :" class="search_name" position="absolute 521 12 576 29"/>
              <Radio id="Radio00" taborder="6" columncount="3" rowcount="0" position="absolute 592 10 768 31" codecolumn="codecolumn" datacolumn="datacolumn" index="2" value="-">
                <Dataset id="innerdataset">
                  <ColumnInfo>
                    <Column id="codecolumn" size="256"/>
                    <Column id="datacolumn" size="256"/>
                  </ColumnInfo>
                  <Rows>
                    <Row>
                      <Col id="codecolumn">E</Col>
                      <Col id="datacolumn">ER</Col>
                    </Row>
                    <Row>
                      <Col id="codecolumn">T</Col>
                      <Col id="datacolumn">TR</Col>
                    </Row>
                    <Row>
                      <Col id="codecolumn">-</Col>
                      <Col id="datacolumn">전체</Col>
                    </Row>
                  </Rows>
                </Dataset>
              </Radio>
            </Layout>
          </Layouts>
        </Div>
        <Static id="caption6" text="응급실 전원전입환자 일지" class="tit_1" position="absolute 0 0 188 25"/>
        <Button id="button1" taborder="4" text="엑셀" class="btn7" position="absolute 1010 34 1066 56" onclick="button1_onclick" anchor="top right"/>
        <Button id="btn_excelprint" taborder="5" text="출력" class="btn6" position="absolute 1068 34 1124 56" onclick="btn_excelprint_onclick" anchor="top right"/>
        <Static id="caption1" text="[표]" position="absolute 1172 768 1197 780" anchor="right"/>
        <Button id="btn_updhosp" taborder="6" text="저장" class="btn3" position="absolute 932 2 988 24" onclick="btn_updhosp_onclick" anchor="top right" visible="false"/>
        <Grid id="grd_inpat" taborder="7" binddataset="ds_main_inhosplist" scrollpixel="all" useinputpanel="false" cellsizingtype="col" cellsizebandtype="allband" position="absolute 0 96 1194 765" oncellclick="grd_inpat_oncellclick" oncloseup="grd_inpat_oncloseup" onlbuttonup="grd_inpat_onlbuttonup" autoenter="key" anchor="all">
          <Formats>
            <Format id="default">
              <Columns>
                <Column size="25" band="left"/>
                <Column size="55"/>
                <Column size="80"/>
                <Column size="90"/>
                <Column size="65"/>
                <Column size="65"/>
                <Column size="74"/>
                <Column size="120"/>
                <Column size="180"/>
                <Column size="120"/>
                <Column size="140"/>
                <Column size="140"/>
                <Column size="194"/>
                <Column size="120"/>
              </Columns>
              <Rows>
                <Row size="24" band="head"/>
                <Row size="24"/>
              </Rows>
              <Band id="head">
                <Cell/>
                <Cell col="1" text="SrNo."/>
                <Cell col="2" text="등록번호"/>
                <Cell col="3" text="환자명"/>
                <Cell col="4" text="최초KTAS"/>
                <Cell col="5" text="변경 KTAS"/>
                <Cell col="6" text="진료과"/>
                <Cell col="7" text="입실일시"/>
                <Cell col="8" text="진단명"/>
                <Cell col="9" text="진단코드"/>
                <Cell col="10" text="주호소"/>
                <Cell col="11" text=" 병원명"/>
                <Cell col="12" text="처리결과"/>
                <Cell col="13" text="퇴실일시"/>
              </Band>
              <Band id="body">
                <Cell celltype="head" expr="expr:currow + 1"/>
                <Cell col="1" text="bind:srno"/>
                <Cell col="2" text="bind:pid"/>
                <Cell col="3" text="bind:patnm"/>
                <Cell col="4" text="bind:erptkts1"/>
                <Cell col="5" text="bind:erptkts2"/>
                <Cell col="6" text="bind:orddeptnm"/>
                <Cell col="7" text="bind:inddtm" mask="expr:utlf_isNull(inddtm) ? '' : '####-##-## ##:##'" edittrimtype="both"/>
                <Cell col="8" style="align:left middle;padding:0 0 0 5;" text="bind:diagnm"/>
                <Cell col="9" style="align:left middle;" text="bind:diagcd"/>
                <Cell col="10" style="align:left middle;padding:0 0 0 5;" text="bind:cc"/>
                <Cell col="11" style="align:left middle;padding:0 0 0 5;" text="bind:hospnm"/>
                <Cell col="12" displaytype="combo" edittype="combo" style="align:left middle;padding:0 0 0 5;" text="bind:outrmcd" combodataset="ds_init_outrmcdsupcd" combocodecol="basetypecd" combodatacol="typenm" enable="false"/>
                <Cell col="13" text="bind:outrmddtm" mask="expr:utlf_isNull(outrmddtm) ? '' : '####-##-## ##:##'" maskchar=" " edittrimtype="both"/>
              </Band>
            </Format>
          </Formats>
        </Grid>
      </Layout>
    </Layouts>
    <Objects>
      <Dataset id="ds_main_inhosplist" firefirstcount="0" firenextcount="0" useclientlayout="true" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="srno" type="STRING" size="256"/>
          <Column id="pid" type="STRING" size="256"/>
          <Column id="patnm" type="STRING" size="256"/>
          <Column id="gndrage" type="STRING" size="256"/>
          <Column id="orddeptnm" type="STRING" size="256"/>
          <Column id="inddtm" type="STRING" size="256"/>
          <Column id="diagnm" type="STRING" size="256"/>
          <Column id="cc" type="STRING" size="256"/>
          <Column id="hospnm" type="STRING" size="256"/>
          <Column id="outrmcd" type="STRING" size="256"/>
          <Column id="outrmddtm" type="STRING" size="256"/>
          <Column id="outrmname" type="STRING" size="256"/>
          <Column id="diagcd" type="STRING" size="256"/>
          <Column id="erptkts1" type="STRING" size="256"/>
          <Column id="erptkts2" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="srno"/>
            <Col id="pid"/>
            <Col id="patnm"/>
            <Col id="gndrage"/>
            <Col id="orddeptnm"/>
            <Col id="inddtm"/>
            <Col id="diagnm"/>
            <Col id="cc"/>
            <Col id="hospnm"/>
            <Col id="outrmcd"/>
            <Col id="outrmddtm"/>
            <Col id="outrmname"/>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_main_chnghosplist" firefirstcount="0" firenextcount="0" useclientlayout="true" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="bedposcnts" type="STRING" size="256"/>
          <Column id="srno" type="STRING" size="256"/>
          <Column id="pid" type="STRING" size="256"/>
          <Column id="patnm" type="STRING" size="256"/>
          <Column id="gndrage" type="STRING" size="256"/>
          <Column id="orddeptnm" type="STRING" size="256"/>
          <Column id="inddtm" type="STRING" size="256"/>
          <Column id="diagnm" type="STRING" size="256"/>
          <Column id="cc" type="STRING" size="256"/>
          <Column id="hospnm" type="STRING" size="256"/>
          <Column id="outrmcd" type="STRING" size="256"/>
          <Column id="outrmddtm" type="STRING" size="256"/>
          <Column id="indd" type="STRING" size="256"/>
          <Column id="cretno" type="STRING" size="256"/>
          <Column id="instcd" type="STRING" size="256"/>
          <Column id="visitno" type="STRING" size="256"/>
          <Column id="chngcellyn" type="STRING" size="256"/>
          <Column id="hospnm1" type="STRING" size="256"/>
          <Column id="diagcd" type="STRING" size="256"/>
          <Column id="inpermitdrnm" type="STRING" size="256"/>
          <Column id="ambno" type="STRING" size="256"/>
          <Column id="thp0" type="STRING" size="256"/>
          <Column id="chnghospthdp" type="STRING" size="256"/>
          <Column id="chnghospdeci" type="STRING" size="256"/>
          <Column id="erptkts1" type="STRING" size="256"/>
          <Column id="erptkts2" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="bedposcnts"/>
            <Col id="srno"/>
            <Col id="pid"/>
            <Col id="patnm"/>
            <Col id="gndrage"/>
            <Col id="orddeptnm"/>
            <Col id="inddtm"/>
            <Col id="diagnm"/>
            <Col id="cc"/>
            <Col id="hospnm"/>
            <Col id="outrmcd"/>
            <Col id="outrmddtm"/>
            <Col id="indd"/>
            <Col id="cretno"/>
            <Col id="instcd"/>
            <Col id="visitno"/>
            <Col id="chngcellyn"/>
            <Col id="hospnm1"/>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_cond" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="fromdate" type="STRING" size="256"/>
          <Column id="todate" type="STRING" size="256"/>
          <Column id="inouttp" type="STRING" size="256"/>
          <Column id="printdd" type="STRING" size="256"/>
          <Column id="bedposcntscd" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="inouttp">1</Col>
            <Col id="bedposcntscd">-</Col>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_send_setcond" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_init_bedinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="bedcd" type="STRING" size="256"/>
          <Column id="bednm" type="STRING" size="256"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_init_outrmcdsupcd" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="basetypecd" type="STRING" size="256"/>
          <Column id="typenm" type="STRING" size="256"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_init_bedlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_init_outrminfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="basetypecd" type="STRING" size="256"/>
          <Column id="typenm" type="STRING" size="256"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_send_updinfo" 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="indd" type="STRING" size="256"/>
          <Column id="cretno" type="STRING" size="256"/>
          <Column id="visitno" type="STRING" size="256"/>
          <Column id="ambno" type="STRING" size="256"/>
          <Column id="thp0" type="STRING" size="256"/>
          <Column id="chnghospthdp" type="STRING" size="256"/>
          <Column id="chnghospdeci" type="STRING" size="256"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_cd_chnghospthdp" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_cd_chnghospdeci" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
    </Objects>
    <Bind>
      <BindItem id="item0" compid="group2.rdo_searchflag" propid="value" datasetid="ds_cond" columnid="inouttp"/>
      <BindItem id="item1" compid="group2.input_refFrDT" propid="value" datasetid="ds_cond" columnid="fromdate"/>
      <BindItem id="item2" compid="group2.input_refToDT" propid="value" datasetid="ds_cond" columnid="todate"/>
      <BindItem id="item3" compid="group2.Radio00" propid="value" datasetid="ds_cond" columnid="bedposcntscd"/>
    </Bind>
    <Script type="xscript4.0"><![CDATA[/***************************************************************************************  
 * System Name		:	
 * Job Name 		:	
 * Creator 	    :	
 * Make Date 		:	2015-11-13
 * Description  	:	                                                                   
 *--------------------------------------------------------------------------------------- 
 * Modify Date     	Modifier  	  Modify Description                                   
 *--------------------------------------------------------------------------------------- 
 * 2015-11-13      Live Converter   TF->XP                                           
 *                                                                                        
 *--------------------------------------------------------------------------------------- 
 ****************************************************************************************/
include "com_commonxp::comm_main.xjs";
include "emr_carecomxp::CareCom.xjs";

/******************************************************************
 * Argument          : 
 * Description       : 초기화
 ******************************************************************/
function SMMNE01700_oninit(obj:Form, e:InitEventInfo)
{
	frmf_initForm(obj);
}

function SMMNE01700_onload(obj:Form, e:LoadEventInfo)
{
	ds_main_inhosplist.clearData();
	ds_main_chnghosplist.clearData();
        
	var toDate = utlf_getCurrentDate();
	ds_cond.setColumn(0, "fromdate", toDate);
	ds_cond.setColumn(0, "todate"  , toDate);
	ds_cond.setColumn(0, "printdd" , toDate);

	dsf_createDsRow("ds_send", [{col:"searchitem", type:"string", size:256, val:"outrmcd"}]);

	//속도개선
	this.setTimer(0, 100);
// 	var oParam = {};
// 		oParam.id          = "TRMNE00203";
// 		oParam.service     = "ercareapp.ERPatMngt";
// 		oParam.method      = "reqGetERBasetList";
// 		oParam.inds        = "req=ds_send";
// 		oParam.outds       = "ds_init_outrminfo=outrminfo ds_init_bedinfo=bedinfo ds_init_bedlist=bedlist ds_=outrmcdsupcd";
// 		oParam.async       = false;
// 		//oParam.callback    = "cf_TRMNE00203";
// 
// 	tranf_submit(oParam);
// 
// 	frmf_inputEnterKey("group2.rdo_searchflag", "onitemchanged", new ItemChangeEventInfo);
// 	frmf_inputEnterKey("group2.btn_search", "onclick", new ClickEventInfo);
}

/******************************************************************
 * Argument          : 
 * Description       : 조회 button event
 ******************************************************************/
function group2_btn_search_onclick(obj:Button,  e:ClickEventInfo)
{
	dsf_createDsRow("ds_send", [{col:"test", type:"string", size:256, val:""}]);
	var oParam = {};
		oParam.id          = "TXMNE01701";
		oParam.service     = "ercareapp.ERPatMngt";
		oParam.method      = "reqGetChngInHospPatInfo";
		oParam.inds        = "cond=ds_cond setcond=ds_send";
		oParam.outds       = "ds_main_chnghosplist=chnghosplist ds_main_inhosplist=inhosplist";
		oParam.async       = false;
		oParam.callback    = "cf_TXMNE01701";

	tranf_submit(oParam);
	
	ds_main_chnghosplist.rowposition = -1;
	ds_main_inhosplist.rowposition = -1;
}

function cf_TXMNE01701(sSvcId, nErrorCode, sErrorMsg) {
    if(nErrorCode < 0) return;
    for( var i = 0; i < ds_main_chnghosplist.rowcount; i++ ){
		ds_main_chnghosplist.setColumn(i, "hospnm1", ds_main_chnghosplist.getColumn(i, "hospnm"));
    }
    
    // 20190814 김현석, 구급차 번호, 동승 인력 컬럼 추가, 요청번호:20190808019
    // 변경된 내역 적용    
    ds_main_chnghosplist.applyChange();
}

/******************************************************************
 * Argument          : 
 * Description       : 구분 radio event
 ******************************************************************/
function group2_rdo_searchflag_onitemchanged(obj:Radio, e:ItemChangeEventInfo)
{
	if( ds_cond.getColumn(0, "inouttp") == 1 ){
		grd_outpat.visible = true;
		grd_inpat.visible = false;
		//btn_updhosp.visible = true;
		ds_main_inhosplist.clearData();
	} else {
		grd_outpat.visible = false;
		grd_inpat.visible = true;
		//btn_updhosp.visible = false;
		ds_main_chnghosplist.clearData();
	}
}

/******************************************************************
 * Argument          : 
 * Description       : Excel button event
 ******************************************************************/
function button1_onclick(obj:Button,  e:ClickEventInfo)
{
	var fromdd = ds_cond.getColumn(0, "fromdate");
	var todd = ds_cond.getColumn(0, "todate");
	var srchDate = "";
	
	if( fromdd == todd ) srchDate = fromdd;
	else srchDate = fromdd + "~" + todd;
	
	if( ds_cond.getColumn(0, "inouttp") == 1 ){
sysf_trace(ds_main_inhosplist.rowcount)		
sysf_trace("ds_main_chnghosplist : " + ds_main_chnghosplist.rowcount)
		if( ds_main_chnghosplist.rowcount > 0 ){
			grdf_exportExcel(grd_outpat, "전원 환자현황(" + srchDate + ")", "전원 환자현황(" + srchDate + ")", false, "", "", false);
		} else {
			sysf_messageBox("조회된 데이터가 ", "I004");
		}
	} else {
		if( ds_main_inhosplist.rowcount > 0 ){
			grdf_exportExcel(grd_inpat, "전입 환자현황(" + srchDate + ")", "전입 환자현황(" + srchDate + ")", false, "", "", false);
		} else {
			sysf_messageBox("조회된 데이터가 ", "I004");
		}
	}
}

/******************************************************************
 * Argument          : 
 * Description       : 저장 button event
 ******************************************************************/
function btn_updhosp_onclick(obj:Button,  e:ClickEventInfo)
{
	var chngcellyncheck = "";
	ds_send_setcond.clear();
	ds_send_setcond.addColumn("pid", "string", 256);
	ds_send_setcond.addColumn("indd", "string", 256);
	ds_send_setcond.addColumn("cretno", "string", 256);
	ds_send_setcond.addColumn("instcd", "string", 256);
	ds_send_setcond.addColumn("visitno", "string", 256);
	ds_send_setcond.addColumn("chnghospnm", "string", 256);
	
	for( i= 0; i < ds_main_chnghosplist.rowcount; i++ ) {
		chngcellyncheck = ds_main_chnghosplist.getColumn(i, "chngcellyn")
		
		if( chngcellyncheck == "Y" ){
			if( ds_main_chnghosplist.getColumn(i, "hospnm") != ds_main_chnghosplist.getColumn(i, "hospnm1")){
				var iRow = ds_send_setcond.addRow();
				ds_send_setcond.setColumn(iRow, "pid", ds_main_chnghosplist.getColumn(i, "pid"));
				ds_send_setcond.setColumn(iRow, "indd", ds_main_chnghosplist.getColumn(i, "indd"));
				ds_send_setcond.setColumn(iRow, "cretno", ds_main_chnghosplist.getColumn(i, "cretno"));
				ds_send_setcond.setColumn(iRow, "instcd", ds_main_chnghosplist.getColumn(i, "instcd"));
				ds_send_setcond.setColumn(iRow, "visitno", ds_main_chnghosplist.getColumn(i, "visitno"));
				ds_send_setcond.setColumn(iRow, "chnghospnm", ds_main_chnghosplist.getColumn(i, "hospnm"));
			}
		}
	}
// 	var oParam = {};
// 		oParam.id          = "TXMNE01701";
// 		oParam.service     = "ercareapp.ERPatMngt";
// 		oParam.method      = "reqGetChngInHospPatInfo";
// 		oParam.inds        = "cond=ds_ setcond=ds_";
// 		oParam.outds       = "ds_=chnghosplist ds_=inhosplist";
// 		oParam.async       = false;
// 		oParam.callback    = "cf_TXMNE01701";
// 
// 	tranf_submit(oParam);
}

/******************************************************************
 * Argument          : 
 * Description       : 저장 button event
 ******************************************************************/
function btn_excelprint_onclick(obj:Button,  e:ClickEventInfo)
{
	if( ds_cond.getColumn(0, "inouttp") == 1 ){
		var objDOM = rptf_createDOM();											// DOM 객체 설정
		rptf_setNodeListToDOM(objDOM, "/root/main/inchnghostlist/chnghosplist", ds_main_chnghosplist);	// 데이터셋 1
		rptf_setNodeListToDOM(objDOM, "/root/main/cond", ds_cond);										// 데이터셋 3
		rptf_setNodeListToDOM(objDOM, "/root/init/erbaselist/outrminfo", ds_init_outrminfo);			// 데이터셋 2
		
		//sysf_trace(objDOM.documentElement.source);	// XML 내용출력
		
		var objParam = new Object();
		objParam.xml_data_XML1 = objDOM.documentElement.source;					// 최상의노드 XML 스트링 추출
		
		var option = "open=1;save=1;directprint=0;print=1;zoom=0;excel=1;";	
		rptf_exeReportPreview30(["RPMNE01700"],[objParam], option, null, null);
	} else {
		var objDOM = rptf_createDOM();											// DOM 객체 설정
		rptf_setNodeListToDOM(objDOM, "/root/main/inchnghostlist/inhosplist", ds_main_inhosplist);	// 데이터셋 1
		rptf_setNodeListToDOM(objDOM, "/root/main/cond", ds_cond);										// 데이터셋 3
		rptf_setNodeListToDOM(objDOM, "/root/init/erbaselist/outrminfo", ds_init_outrminfo);			// 데이터셋 2
		//sysf_trace(objDOM.documentElement.source);	// XML 내용출력
		
		var objParam = new Object();
		objParam.xml_data_XML1 = objDOM.documentElement.source;					// 최상의노드 XML 스트링 추출
		
		var option = "open=1;save=1;directprint=0;print=1;zoom=0;excel=1;";	
		rptf_exeReportPreview30(["RPMNE01701"],[objParam], option, null, null);
	}
}

function SMMNE01700_ontimer(obj:Form, e:TimerEventInfo)
{
	if (e.timerid == 0) {
		this.killTimer(0);
		
		// 20191204, 김현석, 이송병원선정방법, 전원병원 수용결정자 항목 추가에 따른 공통코드 조회. 요청번호:20191204004		
		dsf_createDs("ds_send");
		dsf_createDs("ds_codelist");
		var pCdrupid  = "'E52','E53'";
		var pFromDate = utlf_getCurrentDate(); //조회기준일자
		
		// 간호 하드코드 가져오기.
		fGetNursHardCdInfo(pCdrupid, pFromDate);	
		
		// 이송병원 선정방법 기준 정보
		ds_codelist.filter("cdgrupid == 'E52'");
		ds_cd_chnghospthdp.copyData(ds_codelist, true);
		// null 항목 추가
		var nRow = ds_cd_chnghospthdp.addRow();
		ds_cd_chnghospthdp.setColumn(nRow, "cdid", "");
		ds_cd_chnghospthdp.setColumn(nRow, "cdnm", "");
		
		// 전원병원 수용결정자 기준 정보
		ds_codelist.filter("cdgrupid == 'E53'");
		ds_cd_chnghospdeci.copyData(ds_codelist, true);		
		// null 항목 추가
		nRow = ds_cd_chnghospdeci.addRow();
		ds_cd_chnghospdeci.setColumn(nRow, "cdid", "");
		ds_cd_chnghospdeci.setColumn(nRow, "cdnm", "");
		
		
		var oParam = {};
			oParam.id          = "TRMNE00203";
			oParam.service     = "ercareapp.ERPatMngt";
			oParam.method      = "reqGetERBasetList";
			oParam.inds        = "req=ds_send";
			oParam.outds       = "ds_init_outrminfo=outrminfo ds_init_bedinfo=bedinfo ds_init_bedlist=bedlist ds_init_outrmcdsupcd=outrmcdsupcd";
			oParam.async       = false;
			//oParam.callback    = "cf_TRMNE00203";
	
		tranf_submit(oParam);
	
		frmf_inputEnterKey("group2.rdo_searchflag", "onitemchanged", new ItemChangeEventInfo);
		frmf_inputEnterKey("group2.btn_search", "onclick", new ClickEventInfo);			
	}
}

var lastrow1 = -1;
var lastcol1 = -1;
var bDrop1 = false;

function grd_inpat_oncellclick(obj:Grid, e:GridClickEventInfo)
{
	lastrow1 = -1;
	lastcol1 = -1;
}

function grd_inpat_oncloseup(obj:Grid, e:GridEditEventInfo)
{
	var dsGridBind = eval(obj.binddataset);
	var preVal = utlf_transNullToEmpty(dsGridBind.getColumn(e.row, e.col));
	var posVal = utlf_transNullToEmpty(e.value);
	
	if( bDrop1 == true && (!utlf_isNull(posVal) || preVal != posVal) ){				
 		obj.showEditor(false);
	}
	
	bDrop1 = false;
	lastrow1 = e.row;
 	lastcol1 = e.col;
}

function grd_inpat_onlbuttonup(obj:Grid, e:GridMouseEventInfo)
{
	grdf_setSelectedCell(obj, e);
	
	var dsGridBind = eval(obj.binddataset);
	
	// Combo DropDown Click 처리	
	obj.autoenter = "key";		
	
	if( e.fromreferenceobject.name == "dropbutton" ){
		bDrop1 = true;
	}
	if( e.row > -1 && obj.getCellProperty("body", e.col, "edittype") == "combo" ){		
		// Combo 선택시 활성화 및  combodatacol 변경
		if( grdf_getSelectedCols(obj).length == 0 && grdf_getSelectedRows(obj).length == 0 && obj.getEditText() == undefined ){			
			obj.showEditor(true);
		}else{
			if(!obj.isDropdownCombo() && (lastrow1 != e.row || lastcol1 != e.col)) {
				obj.setCellPos(e.col);
				dsGridBind.rowposition = e.row;				
				obj.showEditor(true);				
				if(bDrop1) {					
					obj.dropdownCombo();
				}
			}
		}
	}else{
		obj.autoenter = "key";
	}
}


// 20190814 김현석, 구급차 번호, 동승 인력 컬럼 추가, 요청번호:20190808019
function group2_btn_updaddInfo_onclick(obj:Button,  e:ClickEventInfo)
{
	var rowsArray = grdf_getUpdateRows("grd_outpat", "update");
	var nRow = -1;
	
	if ( !utlf_isNull(rowsArray))
	{
		ds_send_updinfo.clearData();
		for (var i = 0; i < rowsArray.length; i++)
		{
			nRow = ds_send_updinfo.addRow();
					
			ds_send_updinfo.setColumn(nRow, "pid", ds_main_chnghosplist.getColumn(rowsArray[i], "pid"));
			ds_send_updinfo.setColumn(nRow, "indd", ds_main_chnghosplist.getColumn(rowsArray[i], "indd"));
			ds_send_updinfo.setColumn(nRow, "cretno", ds_main_chnghosplist.getColumn(rowsArray[i], "cretno"));
			ds_send_updinfo.setColumn(nRow, "visitno", ds_main_chnghosplist.getColumn(rowsArray[i], "visitno"));
			ds_send_updinfo.setColumn(nRow, "ambno", ds_main_chnghosplist.getColumn(rowsArray[i], "ambno"));
			ds_send_updinfo.setColumn(nRow, "thp0", ds_main_chnghosplist.getColumn(rowsArray[i], "thp0"));
			
			// 20191204 김현석, 이송병원 선정방법, 전원병원 수용결정자 항목 추가, 요청번호:20191204004
			ds_send_updinfo.setColumn(nRow, "chnghospthdp", ds_main_chnghosplist.getColumn(rowsArray[i], "chnghospthdp"));
			ds_send_updinfo.setColumn(nRow, "chnghospdeci", ds_main_chnghosplist.getColumn(rowsArray[i], "chnghospdeci"));
		}
		var oParam = {};
			oParam.id          = "TRMNE017001";
			oParam.service     = "ercareapp.ERPatMngt";
			oParam.method      = "reqSetErvdAddInfo";
			oParam.inds        = "req=ds_send_updinfo";
			oParam.outds       = "";
			oParam.async       = false;
			//oParam.callback    = "cf_TRMNE00203";
			tranf_submit(oParam);
			
		ds_main_chnghosplist.applyChange();
		
	}
}]]></Script>
  </Form>
</FDL>