YNU_JEUS/app_home/himed/xpapps/lis/refprintmngtxp/xp/SMLNP00500_건수분석자료.xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SMLNP00500" position="absolute 0 0 1201 758" titletext="건수분석자료" oninit="SMLNP00500_oninit" onload="SMLNP00500_onload">
    <Layouts>
      <Layout>
        <Static id="caption6" text="건수분석 자료관리" class="tit_1" position="absolute 0 0 176 23"/>
        <Shape id="line32" class="line_6" position="absolute 0 46 1194 52" anchor="left top right"/>
        <Button id="button11" taborder="1" text="출력" class="btn6" position="absolute 0 25 56 47" onclick="button11_onclick"/>
        <Button id="btn_reset" taborder="2" text="초기화" class="btn4" position="absolute 1127 25 1195 47" anchor="top right" onclick="btn_reset_onclick"/>
        <Shape id="line1" class="line_10" position="absolute 0 110 1194 116" anchor="left top right"/>
        <Div id="group1" taborder="3" class="div_SA" position="absolute 0 50 1195 85" anchor="left top right">
          <Layouts>
            <Layout>
              <Shape id="line3" linetype="vertical" class="line_4" position="absolute 1105 7 1111 29" anchor="top right"/>
              <Button id="btn_Ref" taborder="1" text="조회" class="btn1" position="absolute 1123 7 1179 29" anchor="top right" onclick="group1_btn_Ref_onclick"/>
              <Static id="caption11" text="기준월 :" class="search_name" position="absolute 40 10 107 27"/>
              <Calendar id="input3" taborder="2" autoselect="true" autoskip="true" dateformat="yyyy-MM" class="input_default" position="absolute 125 8 215 27" mask="yyyy-mm" value="null" editformat="yyyy-MM" onchanged="group1_input3_onchanged"/>
              <Calendar id="input7" taborder="3" autoselect="true" autoskip="true" dateformat="yyyy-MM" class="input_default" position="absolute 241 8 331 27" mask="yyyy-mm" editformat="yyyy-MM" onchanged="group1_input7_onchanged"/>
              <Static id="caption8" text="~" position="absolute 221 9 233 29"/>
            </Layout>
          </Layouts>
        </Div>
        <Static id="caption3" text="건수분석 리스트" class="tit_2" position="absolute 0 94 134 116"/>
        <Grid id="grd_usecntlist" taborder="4" binddataset="ds_main_usecntlist" useinputpanel="false" cellsizingtype="col" autofittype="col" position="absolute 0 115 1194 721" anchor="all">
          <Formats>
            <Format id="default">
              <Columns>
                <Column size="140"/>
                <Column size="85"/>
                <Column size="85"/>
                <Column size="85"/>
                <Column size="3"/>
                <Column size="140"/>
                <Column size="85"/>
                <Column size="85"/>
                <Column size="85"/>
                <Column size="3"/>
                <Column size="140"/>
                <Column size="85"/>
                <Column size="85"/>
                <Column size="85"/>
              </Columns>
              <Rows>
                <Row size="24" band="head"/>
                <Row size="24"/>
              </Rows>
              <Band id="head">
                <Cell text="검사명"/>
                <Cell col="1" text="1인당 소모량"/>
                <Cell col="2" text="월 환자수"/>
                <Cell col="3" text="월 실건수"/>
                <Cell col="4"/>
                <Cell col="5" text="검사명"/>
                <Cell col="6" text="1인당 소모량"/>
                <Cell col="7" text="월 환자수"/>
                <Cell col="8" text="월 실건수"/>
                <Cell col="9"/>
                <Cell col="10" text="검사명"/>
                <Cell col="11" text="1인당 소모량"/>
                <Cell col="12" text="월 환자수"/>
                <Cell col="13" text="월 실건수"/>
              </Band>
              <Band id="body">
                <Cell text="bind:tclsnm"/>
                <Cell col="1" text="bind:avgcnt"/>
                <Cell col="2" text="bind:patcnt"/>
                <Cell col="3" text="bind:testcnt"/>
                <Cell col="4" text="bind:tab1"/>
                <Cell col="5" text="bind:tclsnm2"/>
                <Cell col="6" text="bind:avgcnt2"/>
                <Cell col="7" text="bind:patcnt2"/>
                <Cell col="8" text="bind:testcnt2"/>
                <Cell col="9" text="bind:tab2"/>
                <Cell col="10" text="bind:tclsnm3"/>
                <Cell col="11" text="bind:avgcnt3"/>
                <Cell col="12" text="bind:patcnt3"/>
                <Cell col="13" text="bind:testcnt3"/>
              </Band>
            </Format>
          </Formats>
        </Grid>
        <Static id="caption4" text="근무일수" class="cell_1" position="absolute 579 727 649 750" anchor="left bottom"/>
        <Static id="caption5" text="일평균 환자수" class="cell_1" position="absolute 724 727 815 750" anchor="left bottom"/>
        <Static id="caption1" text="일평균 실건수" class="cell_1" position="absolute 907 727 998 750" anchor="left bottom"/>
        <MaskEdit id="input1" taborder="5" mask="#.##" position="absolute 816 729 905 748" anchor="left bottom" maskchar=" " trimtype="both" type="string"/>
        <Edit id="input2" taborder="6" position="absolute 650 729 722 748" anchor="left bottom" onkeydown="input2_onkeydown"/>
        <MaskEdit id="input4" taborder="7" mask="#.##" position="absolute 999 729 1088 748" anchor="left bottom" maskchar=" " trimtype="both" type="string"/>
        <Shape id="line2" linetype="horizontal" class="line_3" position="absolute 83 723 1090 729" anchor="left bottom"/>
        <Button id="btn_excel" taborder="8" text="엑셀저장" class="btn7" position="absolute 0 729 80 749" anchor="left bottom" onclick="btn_excel_onclick"/>
        <Static id="caption2" text="실건수 합계" class="cell_1" position="absolute 406 727 489 750" anchor="left bottom"/>
        <Static id="caption7" text="환자수 합계" class="cell_1" position="absolute 232 727 315 750" anchor="left bottom"/>
        <Edit id="input5" taborder="9" position="absolute 316 729 403 748" anchor="left bottom"/>
        <Edit id="input6" taborder="10" position="absolute 490 729 577 748" anchor="left bottom"/>
        <Shape id="line4" linetype="horizontal" class="line_3" position="absolute 83 749 1090 755" anchor="left bottom"/>
        <Static id="caption9" text="검사항목수" class="cell_1" position="absolute 82 727 160 750" anchor="left bottom"/>
        <Edit id="input8" taborder="11" position="absolute 162 729 229 748" anchor="left bottom"/>
        <Button id="button1" taborder="12" text="근무일수저장" class="btn4" position="absolute 1091 727 1195 749" anchor="right bottom" onclick="button1_onclick"/>
      </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="srchym" type="STRING" size="256"/>
          <Column id="srchym2" type="STRING" size="256"/>
          <Column id="srchbdioflag" type="STRING" size="256"/>
          <Column id="workday" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="srchym"/>
            <Col id="srchym2"/>
            <Col id="srchbdioflag"/>
            <Col id="workday"/>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_main_usecntlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="tclsnm" type="STRING" size="256" sumtext="검사명"/>
          <Column id="avgcnt" type="STRING" size="256" sumtext="평균"/>
          <Column id="patcnt" type="STRING" size="256" sumtext="환자수"/>
          <Column id="testcnt" type="STRING" size="256" sumtext="검사수"/>
          <Column id="tclsnm2" type="STRING" size="256" sumtext="검사명"/>
          <Column id="avgcnt2" type="STRING" size="256" sumtext="평균"/>
          <Column id="patcnt2" type="STRING" size="256" sumtext="환자수"/>
          <Column id="testcnt2" type="STRING" size="256" sumtext="검사수"/>
          <Column id="tclsnm3" type="STRING" size="256" sumtext="검사명"/>
          <Column id="avgcnt3" type="STRING" size="256" sumtext="평균"/>
          <Column id="patcnt3" type="STRING" size="256" sumtext="환자수"/>
          <Column id="testcnt3" type="STRING" size="256" sumtext="검사수"/>
          <Column id="allpatsum" type="STRING" size="256" sumtext="검사수"/>
          <Column id="alltestsum" type="STRING" size="256" sumtext="검사수"/>
          <Column id="testcntsum" type="STRING" size="256" sumtext="검사수"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_hidden" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="workday" type="STRING" size="256"/>
          <Column id="daypatcnt" type="STRING" size="256"/>
          <Column id="daytestcnt" type="STRING" size="256"/>
          <Column id="allpatsum" type="STRING" size="256"/>
          <Column id="alltestsum" type="STRING" size="256"/>
          <Column id="testcntsum" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="workday"/>
            <Col id="daypatcnt"/>
            <Col id="daytestcnt"/>
            <Col id="allpatsum"/>
            <Col id="alltestsum"/>
            <Col id="testcntsum"/>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_main_workday" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="cnt" type="STRING" size="256"/>
        </ColumnInfo>
      </Dataset>
    </Objects>
    <Bind>
      <BindItem id="item0" compid="group1.input7" propid="value" datasetid="ds_send" columnid="srchym2"/>
      <BindItem id="item1" compid="group1.input3" propid="value" datasetid="ds_send" columnid="srchym"/>
      <BindItem id="item2" compid="input8" propid="value" datasetid="ds_hidden" columnid="testcntsum"/>
      <BindItem id="item3" compid="input5" propid="value" datasetid="ds_hidden" columnid="allpatsum"/>
      <BindItem id="item4" compid="input6" propid="value" datasetid="ds_hidden" columnid="alltestsum"/>
      <BindItem id="item5" compid="input2" propid="value" datasetid="ds_hidden" columnid="workday"/>
      <BindItem id="item6" compid="input1" propid="value" datasetid="ds_hidden" columnid="daypatcnt"/>
      <BindItem id="item7" compid="input4" propid="value" datasetid="ds_hidden" columnid="daytestcnt"/>
    </Bind>
    <Script type="xscript4.0"><![CDATA[/***************************************************************************************  
 * System Name		:	
 * Job Name 		:	
 * Creator 	    :	
 * Make Date 		:	2015-05-01
 * Description  	:	                                                                   
 *--------------------------------------------------------------------------------------- 
 * Modify Date     	Modifier  	  Modify Description                                   
 *--------------------------------------------------------------------------------------- 
 * 2015-05-01      Live Converter   TF->XP                                           
 *                                                                                        
 *--------------------------------------------------------------------------------------- 
 ****************************************************************************************/
include "com_commonxp::comm_main.xjs";
function SMLNP00500_oninit(obj:Form, e:InitEventInfo)
{
	frmf_initForm(obj);
}

function SMLNP00500_onload(obj:Form, e:LoadEventInfo)
{	
	grdf_initGrid(grd_usecntlist);
	fSetInit();
}

function fSetInit()
{
	ds_main_usecntlist.clearData();
	
	var toDay = utlf_getCurrentDate();
	var toDays = toDay.substr(0,6);
	
	ds_send.setColumn(0, "srchbdioflag", "O");
	ds_send.setColumn(0, "srchym", toDays);
	ds_send.setColumn(0, "srchym2", toDays);
	
	ds_hidden.setColumn(0, "workday", "");
	ds_hidden.setColumn(0, "daypatcnt", "");
	ds_hidden.setColumn(0, "daytestcnt", "");
}

function group1_input3_onchanged(obj:Calendar, e:ChangeEventInfo)
{
	ds_send.setColumn(0, "srchym", String(obj.value).substr(0,6));
}

function group1_input7_onchanged(obj:Calendar, e:ChangeEventInfo)
{
	ds_send.setColumn(0, "srchym2", String(obj.value).substr(0,6));
}

function group1_btn_Ref_onclick(obj:Button,  e:ClickEventInfo)
{
	fGetUseCntList();
}

function fGetUseCntList()
{
	ds_hidden.setColumn(0, "workday", "");
	ds_hidden.setColumn(0, "daypatcnt", "");
	ds_hidden.setColumn(0, "daytestcnt", "");
	
	ds_main_usecntlist.clearData();
	
	var oParam = {};
		oParam.id          = "TRLNP00501";
		oParam.service     = "refprintmngtapp.NmedRefPrintMngt";
		oParam.method      = "reqGetUseCntList";
		oParam.inds        = "cond=ds_send";
		oParam.outds       = "ds_main_usecntlist=getUseCntList ds_main_workday=getWorkDay";
		oParam.async       = false;
		//oParam.callback    = "cf_TRLNP00501";

	tranf_submit(oParam);
	
	ds_hidden.setColumn(0, "alltestsum", ds_main_usecntlist.getColumn(0, "alltestsum"));
	ds_hidden.setColumn(0, "allpatsum", ds_main_usecntlist.getColumn(0, "allpatsum"));
	ds_hidden.setColumn(0, "testcntsum", ds_main_usecntlist.getColumn(0, "testcntsum"));
	ds_hidden.setColumn(0, "workday", ds_main_workday.getColumn(0, "cnt"));
							
	if(!utlf_isNull(ds_hidden.getColumn(0, "workday")))
	{
		fCalcnt();
	}
}

function fCalcnt()
{
	ds_hidden.setColumn(0, "workday", input2.value);
	
	var daypatcnt = ds_main_usecntlist.getColumn(0, "allpatsum") / ds_hidden.getColumn(0, "workday");
	var daytestcnt = ds_main_usecntlist.getColumn(0, "alltestsum") / ds_hidden.getColumn(0, "workday");
	
	var ext = Math.pow(10, 2);
	var caldaypatcnt = Math.round(daypatcnt * ext) / ext;
	var caldaytestcnt = Math.round(daytestcnt * ext) / ext;
	
	ds_hidden.setColumn(0, "daypatcnt", caldaypatcnt);
	ds_hidden.setColumn(0, "daytestcnt", caldaytestcnt);
}


function input2_onkeydown(obj:Edit, e:KeyEventInfo)
{
	if(e.keycode == 13)
	{
		fCalcnt();
	}
}

function btn_excel_onclick(obj:Button,  e:ClickEventInfo)
{
	grdf_exportExcel(grd_usecntlist, "", "", false, "", "", false);
}

function button1_onclick(obj:Button,  e:ClickEventInfo)
{
	fSetWorkDayCnt();
}

function fSetWorkDayCnt()
{	
	var srchym = ds_send.getColumn(0, "srchym");
	var srchym2 = ds_send.getColumn(0, "srchym2");
	
	if(srchym == srchym2)
	{
		ds_send.setColumn(0, "workday", ds_hidden.getColumn(0, "workday"));
		
		var oParam = {};
			oParam.id          = "TXLNP00501";
			oParam.service     = "refprintmngtapp.NmedRefPrintMngt";
			oParam.method      = "reqSetWorkDayCnt";
			oParam.inds        = "cond=ds_send";
			oParam.async       = false;
			oParam.callback    = "cf_TXLNP00501";

		tranf_submit(oParam);
		
	}
	else
	{	
		alert("조회된 기간이 한달이 아닙니다.");	
	}
}

function btn_reset_onclick(obj:Button,  e:ClickEventInfo)
{
	fSetInit();
}

function button11_onclick(obj:Button,  e:ClickEventInfo)
{
	fReportPrint();
}

function fReportPrint()
{
	var objDOM = rptf_createDOM();
		rptf_setNodeListToDOM(objDOM, "/root/main/usecntlist", ds_main_usecntlist);
		rptf_setNodeListToDOM(objDOM, "/root/send", ds_send);
	
	var objParam = new Object();
		objParam.xml_data_XML1 = objDOM.documentElement.source;          // 최상의노드 XML 스트링 추출
	
	var option = ""; 
	rptf_exeReportPreview30(["RPLNP00500"],[objParam], option);
}]]></Script>
  </Form>
</FDL>