YNU_JEUS/app_home/himed/xpapps/emr/ercarexp/xp/SPMNE11000_EICU 응급입원실 입실현황.xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SPMNE11000" position="absolute 0 0 1169 734" titletext="EICU/응급입원실 입실현황" oninit="SPMNE11000_oninit" onload="SPMNE11000_onload">
    <Layouts>
      <Layout>
        <Div id="grp_sea" taborder="0" class="div_SA" position="absolute 0 25 1168 65" anchor="left top right">
          <Layouts>
            <Layout>
              <Static id="caption3" text="기 간 :" class="search_name" position="absolute 20 12 70 29" anchor="default"/>
              <Calendar id="ipt_fromdd" taborder="3" class="input_s_essential" position="absolute 77 9 172 30" anchor="default" dateformat="yyyy-MM-dd" value="null" autoselect="true"/>
              <Calendar id="ipt_todd" taborder="4" class="input_s_essential" position="absolute 192 9 287 30" anchor="default" dateformat="yyyy-MM-dd" value="null" autoselect="true"/>
              <Static id="caption4" text="~" position="absolute 177 13 188 28" anchor="default"/>
              <Radio id="radio1" taborder="5" columncount="3" rowcount="0" codecolumn="codecolumn" datacolumn="datacolumn" position="absolute 381 11 686 31" anchor="default">
                <Dataset id="innerdataset">
                  <ColumnInfo>
                    <Column id="codecolumn"/>
                    <Column id="datacolumn"/>
                  </ColumnInfo>
                  <Rows>
                    <Row>
                      <Col id="codecolumn">01</Col>
                      <Col id="datacolumn">EICU</Col>
                    </Row>
                    <Row>
                      <Col id="codecolumn">02</Col>
                      <Col id="datacolumn">응급입원실</Col>
                    </Row>
                    <Row>
                      <Col id="codecolumn">03</Col>
                      <Col id="datacolumn">508응급병동</Col>
                    </Row>
                  </Rows>
                </Dataset>
              </Radio>
              <Button id="button5" taborder="6" text="조회" class="btn1" position="absolute 1096 9 1152 31" anchor="top right" onclick="grp_sea_button5_onclick"/>
              <Static id="caption25" class="search_name" position="absolute 369 16 374 26" anchor="default"/>
              <Shape id="line3" linetype="vertical" class="line_4" position="absolute 1079 7 1085 34" anchor="top right"/>
            </Layout>
          </Layouts>
        </Div>
        <Tab id="switch1" taborder="2" tabindex="0" position="absolute 0 73 1168 733" anchor="all" onchanged="switch1_onchanged">
          <Tabpages>
            <Tabpage id="case_inroomnm" text="입실 환자 명단" style="anchor:default;margin:0 0 0 0;">
              <Layouts>
                <Layout>
                  <Grid id="grd_inroomnmlist" taborder="1" binddataset="ds_main_inroomnmlist" useinputpanel="false" position="absolute 0 0 1168 635" anchor="all" cellsizingtype="col">
                    <Formats>
                      <Format id="default">
                        <Columns>
                          <Column size="100"/>
                          <Column size="100"/>
                          <Column size="70"/>
                          <Column size="70"/>
                          <Column size="110"/>
                          <Column size="145"/>
                          <Column size="145"/>
                        </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="EICU/응급병동 입실일시"/>
                        </Band>
                        <Band id="body">
                          <Cell text="bind:pid"/>
                          <Cell col="1" text="bind:hngnm"/>
                          <Cell col="2" text="bind:sex"/>
                          <Cell col="3" text="bind:age"/>
                          <Cell col="4" displaytype="expr:utlf_isNull(indd) ? 'normal' : 'date'" text="bind:indd"/>
                          <Cell col="5" text="bind:chosdt" mask="expr:utlf_isNull(chosdt) ? '' : '####-##-## ##:##'"/>
                          <Cell col="6" text="bind:inroomdt" mask="expr:utlf_isNull(inroomdt) ? '' : '####-##-## ##:##'"/>
                        </Band>
                      </Format>
                    </Formats>
                  </Grid>
                  <Shape id="line4" linetype="horizontal" class="line_1" position="absolute 5 -14 1160 -8" style="strokepen:3 solid #33bbbbff;"/>
                </Layout>
              </Layouts>
            </Tabpage>
            <Tabpage id="case_deptcnt" text="기간내 월별 과별 환자수" style="anchor:default;margin:0 0 0 0;">
              <Layouts>
                <Layout>
                  <Grid id="grd_deptcntlist" taborder="1" binddataset="ds_main_deptcntlist" useinputpanel="false" position="absolute 0 0 1168 635" cellsizingtype="col">
                    <Formats>
                      <Format id="default">
                        <Columns>
                          <Column size="100"/>
                          <Column size="134"/>
                          <Column size="89"/>
                        </Columns>
                        <Rows>
                          <Row size="24" band="head"/>
                          <Row size="24"/>
                        </Rows>
                        <Band id="head">
                          <Cell text="구분(월)"/>
                          <Cell col="1" text="진료과"/>
                          <Cell col="2" text="환자수"/>
                        </Band>
                        <Band id="body">
                          <Cell text="bind:deptcntym"/>
                          <Cell col="1" text="bind:inorddeptnm"/>
                          <Cell col="2" text="bind:patcnt"/>
                        </Band>
                      </Format>
                    </Formats>
                  </Grid>
                </Layout>
              </Layouts>
            </Tabpage>
            <Tabpage id="case_avgkeepcnt" text="기간내 월별 평균 재원일수" style="anchor:default;margin:0 0 0 0;">
              <Layouts>
                <Layout>
                  <Grid id="grd_avgkeepcntlist" taborder="1" binddataset="ds_main_avgkeepcntlist" useinputpanel="false" position="absolute 0 0 1168 635" anchor="all" cellsizingtype="col">
                    <Formats>
                      <Format id="default">
                        <Columns>
                          <Column size="100"/>
                          <Column size="133"/>
                        </Columns>
                        <Rows>
                          <Row size="24" band="head"/>
                          <Row size="24"/>
                        </Rows>
                        <Band id="head">
                          <Cell text="구분(월)"/>
                          <Cell col="1" text="평균재원일수(일)"/>
                        </Band>
                        <Band id="body">
                          <Cell text="bind:avgkeepcntym"/>
                          <Cell col="1" text="bind:avgkeepcnt"/>
                        </Band>
                      </Format>
                    </Formats>
                  </Grid>
                </Layout>
              </Layouts>
            </Tabpage>
          </Tabpages>
        </Tab>
        <Static id="cpt_title" text="EICU/응급입원실 입실현황" class="tit_1" position="absolute 0 0 195 25"/>
        <Button id="button1" taborder="3" text="엑셀" class="btn7" position="absolute 1112 70 1168 92" anchor="top right" onclick="button1_onclick"/>
      </Layout>
    </Layouts>
    <Objects>
      <Dataset id="ds_main_inroomnmlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="pid" type="STRING"/>
          <Column id="hngnm" type="STRING"/>
          <Column id="sex" type="STRING"/>
          <Column id="age" type="STRING"/>
          <Column id="indd" type="STRING"/>
          <Column id="chosdt" type="STRING"/>
          <Column id="inroomdt" type="STRING"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_main_deptcntlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="deptcntym" type="STRING"/>
          <Column id="inorddeptnm" type="STRING"/>
          <Column id="patcnt" type="STRING"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_main_avgkeepcntlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="avgkeepcntym" type="STRING"/>
          <Column id="avgkeepcnt" type="STRING"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_main_cond" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="gubun" type="STRING" size="256"/>
          <Column id="fromdd" type="STRING" size="256"/>
          <Column id="todd" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="gubun">01</Col>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_send_reqdata" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
    </Objects>
    <Bind>
      <BindItem id="item0" compid="grp_sea.ipt_fromdd" propid="value" datasetid="ds_main_cond" columnid="fromdd"/>
      <BindItem id="item1" compid="grp_sea.ipt_todd" propid="value" datasetid="ds_main_cond" columnid="todd"/>
      <BindItem id="item2" compid="grp_sea.radio1" propid="value" datasetid="ds_main_cond" columnid="gubun"/>
    </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";

var flag="1";
/******************************************************************
 * Argument          : 
 * Description       : 초기화
 ******************************************************************/
function SPMNE11000_oninit(obj:Form, e:InitEventInfo)
{
	frmf_initForm(obj);
}

function SPMNE11000_onload(obj:Form, e:LoadEventInfo)
{
	var dt = utlf_getCurrentDate();
					
	ds_main_cond.setColumn(0, "fromdd", dt);
	ds_main_cond.setColumn(0, "todd", dt);
	
	switch1.tabindex = 0;

	fSearch();
}

/******************************************************************
 * Argument          : 
 * Description       : 조회 button event
 ******************************************************************/
function grp_sea_button5_onclick(obj:Button,  e:ClickEventInfo)
{
	fSearch();
}

/******************************************************************
 * Argument          : fSearch()
 * Description       : 조회
 ******************************************************************/
function fSearch(){
	ds_send_reqdata.copyData(ds_main_cond);
	
	var oParam = {};
		oParam.id          = "TRMNE10600";
		oParam.service     = "ercareapp.ERPatMngt";
		oParam.method      = "reqGetInroomInfo";
		oParam.inds        = "req=ds_send_reqdata";
		oParam.outds       = "ds_main_inroomnmlist=inroomnmlist ds_main_deptcntlist=deptcntlist ds_main_avgkeepcntlist=avgkeepcntlist";
		oParam.async       = false;
		//oParam.callback    = "cf_TRMNE10600";

	tranf_submit(oParam);
	
	ds_main_inroomnmlist.rowposition = -1;
	ds_main_deptcntlist.rowposition = -1;
	ds_main_avgkeepcntlist.rowposition = -1;
}

/******************************************************************
 * Argument          : 
 * Description       : Tab button event
 ******************************************************************/
function switch1_onchanged(obj:Tab, e:TabIndexChangeEventInfo)
{
	var tabIdx = switch1.tabindex;
	
	if( tabIdx == 0 )	flag = "1";
	else if( tabIdx == 1 ) flag = "2";
	else flag = "3";
}

/******************************************************************
 * Argument          : 
 * Description       : Excel button event
 ******************************************************************/
function button1_onclick(obj:Button,  e:ClickEventInfo)
{
	if( flag == "1" ){
		if( ds_main_inroomnmlist.rowcount > 1 ){
			grdf_exportExcel(switch1.case_inroomnm.grd_inroomnmlist, grp_sea.radio1.text+"입실 환자 명단", "입실 환자 명단", false, "", "", false);
		} else {
			sysf_messageBox("조회된 데이터가 ", "I004");
		}
	} else if(flag == "2"){
		if( ds_main_deptcntlist.rowcount > 1 ){
			grdf_exportExcel(switch1.case_deptcnt.grd_deptcntlist, grp_sea.radio1.text+"기간내 월별 과별 환자수", "기간내 월별 과별 환자수율", false, "", "", false);
		} else {
			sysf_messageBox("조회된 데이터가 ", "I004");
		}
	} else {
		if( ds_main_avgkeepcntlist.rowcount > 1 ){
			grdf_exportExcel(switch1.case_avgkeepcnt.grd_avgkeepcntlist, grp_sea.radio1.text+"기간내 월별 평균 재원일수", "기간내 월별 평균 재원일수", false, "", "", false);
		} else {
			sysf_messageBox("조회된 데이터가 ", "I004");
		}
	}
}
]]></Script>
  </Form>
</FDL>