YNU_JEUS/app_home/himed/xpapps/com/tblchartxp/xp/SPZER00100_ER체류현황대시보드.xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SPZER00100" classname="SPSTS00100_스마트앱통계" inheritanceid="" position="absolute 0 0 1235 944" titletext="응급실체류현황대시보드" ontimer="SPZMI02000_ontimer" oninit="SPZER00100_oninit" onload="SPZER00100_onload">
    <Layouts>
      <Layout>
        <WebBrowser id="web_tableau" position="absolute -2 53 1233 940" anchor="all" taborder="0" url="about:blank" useautobitmapcache="1"/>
        <Grid id="grd_Excel" taborder="2" useinputpanel="false" position="absolute 9 65 1219 404" binddataset="ds_erstlist" visible="false">
          <Formats>
            <Format id="default">
              <Columns>
                <Column size="70"/>
                <Column size="70"/>
                <Column size="40"/>
                <Column size="40"/>
                <Column size="70"/>
                <Column size="100"/>
                <Column size="80"/>
                <Column size="40"/>
                <Column size="80"/>
                <Column size="40"/>
                <Column size="100"/>
                <Column size="100"/>
                <Column size="100"/>
                <Column size="100"/>
                <Column size="88"/>
                <Column size="162"/>
                <Column size="60"/>
                <Column size="60"/>
                <Column size="150"/>
                <Column size="40"/>
              </Columns>
              <Rows>
                <Row size="49" 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" colspan="2" text="내원일시" taborder="undefined"/>
                <Cell col="8" colspan="2" text="퇴실일시" taborder="undefined"/>
                <Cell col="10" text="내원에서 &#13;&#10;입원예약까지 &#13;&#10;소요시간(분)"/>
                <Cell col="11" text="입원예약에서&#13;&#10;입원결정까지&#13;&#10;소요시간(분)"/>
                <Cell col="12" text="의사결정에서 &#13;&#10;입원수속까지 &#13;&#10;소요시간(분)"/>
                <Cell col="13" text="입원수속에서 &#13;&#10;퇴실까지&#13;&#10;소요시간(분)"/>
                <Cell col="14" text="응급실&#13;&#10;재실시간(분)"/>
                <Cell col="15" text="퇴실종류"/>
                <Cell col="16" text="진단구분"/>
                <Cell col="17" text="진단코드"/>
                <Cell col="18" text="질환군명"/>
                <Cell col="19" text="주/&#13;&#10;부/&#13;&#10;의증"/>
              </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" style="align:left middle;padding:2 2 2 2;" text="bind:chospath"/>
                <Cell col="5" style="align:left middle;padding:2 2 2 2;" text="bind:orddeptnm"/>
                <Cell col="6" displaytype="date" text="bind:chosdd" calendardisplaynulltype="nulltext"/>
                <Cell col="7" displaytype="date" text="bind:chostm" mask="hh:mm" maskchar=" " calendardisplaynulltype="nulltext"/>
                <Cell col="8" displaytype="date" text="bind:outrmdd" calendardisplaynulltype="nulltext"/>
                <Cell col="9" displaytype="date" text="bind:outrmtm" mask="hh:mm" maskchar=" " calendardisplaynulltype="nulltext"/>
                <Cell col="10" text="bind:hrtime"/>
                <Cell col="11" text="bind:rdtime"/>
                <Cell col="12" text="bind:ditime"/>
                <Cell col="13" text="bind:iotime"/>
                <Cell col="14" text="bind:erdt"/>
                <Cell col="15" style="align:left middle;" text="bind:outrmcd"/>
                <Cell col="16" text="bind:gubun"/>
                <Cell col="17" text="bind:erdddiag"/>
                <Cell col="18" style="align:left middle;padding:2 2 2 2;" text="bind:erdddiagnm"/>
                <Cell col="19" text="bind:erdtdggb"/>
              </Band>
            </Format>
          </Formats>
        </Grid>
        <ImageViewer id="KULogo" taborder="4" position="absolute 860 1 1233 49" stretch="fit" style="border:0 none #e5e5e5ff ;" anchor="top right" image="URL('IMG::com\Kulogo_h.png')"/>
        <Static id="caption6" text="[ 중증상병군별 응급실 체류현황 ]" position="absolute 0 2 371 51" style="color:#e15759ff;font:맑은 고딕,18,bold antialias;"/>
        <Calendar id="ipt_fromdd" taborder="5" autoselect="true" autoskip="true" position="absolute 430 16 534 42"/>
        <Static id="Static00" text="~" position="absolute 542 20 556 38"/>
        <Calendar id="ipt_todd" taborder="6" autoselect="true" position="absolute 561 16 665 42"/>
        <Button id="btn_search" taborder="7" text="조회" onclick="group1_btn_search_onclick" class="btn1" position="absolute 672 16 728 43"/>
        <Button id="btn_excel" taborder="8" text="Excel" onclick="group1_btn_excel_onclick" class="btn7" position="absolute 732 15 794 43"/>
      </Layout>
    </Layouts>
    <Objects>
      <Dataset id="ds_send" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="scrncd" type="STRING" size="256"/>
          <Column id="userid" type="STRING" size="256"/>
          <Column id="targetid" type="STRING" size="256"/>
          <Column id="fromdd" type="STRING" size="256"/>
          <Column id="todd" type="STRING" size="256"/>
          <Column id="tableauURL" type="STRING" size="256"/>
          <Column id="instcd" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_tableauinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="tableauURL" type="STRING" size="256"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_erstlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
    </Objects>
    <Bind>
      <BindItem id="item0" compid="ipt_fromdd" propid="value" datasetid="ds_send" columnid="fromdd"/>
      <BindItem id="item1" compid="ipt_todd" propid="value" datasetid="ds_send" columnid="todd"/>
    </Bind>
    <Script type="xscript4.0"><![CDATA[include "com_commonxp::comm_main.xjs";
var menuparam
function SPZER00100_oninit(obj:Form, e:InitEventInfo)
{
	frmf_initForm(obj);
}

function SPZER00100_onload(obj:Form, e:LoadEventInfo)
{
	menuparam = frmf_getMenuParam();
	
	if(menuparam == "TBLER00001")
	{
		caption6.text = "[ 응급실 체류현황 ]";
	}
	else if(menuparam == "TBLER00002")
	{
		caption6.text = "[ 중증상병군별 응급실 체류현황 ]";
	}
	else if(menuparam == "TBLER00003")
	{
		caption6.text = "[ 내과 응급실 체류현황 ]";
	}
	
	var instcd = sysf_getUserInfo("dutplceinstcd");
	ds_send.setColumn(0, "instcd", instcd);
	
	if(instcd == "031")
	{
		KULogo.image = "IMG::com/Kulogo_h.png";
	}
	else
	{
		KULogo.image = "IMG::com/Kulogo_h2.png";
	}
	
	var CurrentDate = utlf_getCurrentDate();
	var Fromdd = ((CurrentDate.toDate()).getAddDate(-3,"M")).getDateFormat();
	
	ds_send.setColumn(0, "fromdd", Fromdd);
	ds_send.setColumn(0, "todd", CurrentDate);
	
	ds_send.setColumn(0, "scrncd",   menuparam);
	ds_send.setColumn(0, "userid",   "ER01");
	ds_send.setColumn(0, "targetid", "erst");
}

function group1_btn_search_onclick(obj:Button,  e:ClickEventInfo)
{	
	var oParam = {};
		oParam.id          = "getUrl";
		oParam.service     = "authinfoapp.TableauInfo";
		oParam.method      = "reqGetTableauTicket";
		oParam.inds        = "req=ds_send";
		oParam.outds       = "ds_tableauinfo=tableauinfo";
		oParam.async       = true;
		oParam.callback    = "cf_getUrl";

	tranf_submit(oParam);
}

function cf_getUrl(sSvcId, nErrorCode, sErrorMsg) 
{
    if(nErrorCode < 0) return;

	var tableauURL = ds_tableauinfo.getColumn(0, "tableauURL");
	var pFromdd = ds_send.getColumn(0, "fromdd");
	var pTodd = ds_send.getColumn(0, "todd");
	tableauURL += "&FROMDD="+pFromdd+"&TODD="+pTodd;
	ds_send.setColumn(0, "tableauURL", tableauURL);
	
	web_tableau.url = tableauURL;
}

function group1_btn_excel_onclick(obj:Button,  e:ClickEventInfo)
{

	var oParam = {};
		oParam.id          = "getStsErstList";
		oParam.service     = "stscomapp.StsCom";
		oParam.method      = "reqGetStsErstList";
		oParam.inds        = "req=ds_send";
		oParam.outds       = "ds_erstlist=erstlist";
		oParam.async       = false;
		oParam.callback    = "cf_saveExcel";

	tranf_submit(oParam);
}
var ExTitle = "";
function cf_saveExcel(sSvcId, nErrorCode, sErrorMsg) 
{
    if(nErrorCode < 0) return;
    
    if(menuparam == "TBLER00001")
	{
		ExTitle = "응급실현황";
		grd_Excel.setFormatColProperty(10, "size", 0);
		grd_Excel.setFormatColProperty(11, "size", 0);
		grd_Excel.setFormatColProperty(12, "size", 0);
		grd_Excel.setFormatColProperty(13, "size", 0);
		
		grd_Excel.setFormatColProperty(16, "size", 0);
		grd_Excel.setFormatColProperty(17, "size", 0);
		grd_Excel.setFormatColProperty(18, "size", 0);
		grd_Excel.setFormatColProperty(19, "size", 0);
	}
	else if(menuparam == "TBLER00002")
	{
		ExTitle = "중증상병군별 응급실현황";
		grd_Excel.setFormatColProperty(10, "size", 100);
		grd_Excel.setFormatColProperty(11, "size", 100);
		grd_Excel.setFormatColProperty(12, "size", 100);
		grd_Excel.setFormatColProperty(13, "size", 100);
		
		grd_Excel.setFormatColProperty(16, "size", 60);
		grd_Excel.setFormatColProperty(17, "size", 60);
		grd_Excel.setFormatColProperty(18, "size", 150);
		grd_Excel.setFormatColProperty(19, "size", 40);
		
	}
	else if(menuparam == "TBLER00003")
	{
		ExTitle = "내과 응급실현황";
		
		grd_Excel.setFormatColProperty(16, "size", 0);
		grd_Excel.setFormatColProperty(17, "size", 0);
		grd_Excel.setFormatColProperty(18, "size", 0);
		grd_Excel.setFormatColProperty(19, "size", 0);
	}
	
	grdf_exportExcel(grd_Excel, ExTitle, ExTitle, true, "", "open", false, "", true)
}
]]></Script>
  </Form>
</FDL>