YNU_JEUS/app_home/himed/xpapps/ast/examcurestatsxp/xp/SMAES02200_핵의학체내방사선동위원소치료현황.xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SMAES02200" position="absolute 0 0 1201 707" titletext="핵의학체내 방사선 동위원소 치료현황(일별)" oninit="SMAES02200_oninit" onload="SMAES02200_onload">
    <Layouts>
      <Layout>
        <Static id="caption6" text="핵의학체내 방사선 동위원소 치료현황(일별)" class="tit_1" position="absolute 0 0 335 23"/>
        <Div id="grp_sea" anchor="left top right" taborder="1" class="div_SA" position="absolute 0 24 1195 64">
          <Layouts>
            <Layout>
              <Shape id="line13" linetype="vertical" class="line_4" position="absolute 1107 7 1113 31" anchor="top right"/>
              <Button id="btn_sea" taborder="4" text="조회" class="btn1" position="absolute 1120 8 1176 30" anchor="top right" onclick="grp_sea_btn_sea_onclick"/>
              <Static id="caption3" text="일자 :" class="search_name" position="absolute 15 11 101 28"/>
              <Calendar id="input4" taborder="5" class="input_default" position="absolute 80 10 180 29" mask="yyyy-mm" dateformat="yyyy-MM" value="null" editformat="yyyy-MM" onchanged="grp_sea_input4_onchanged" autoselect="true"/>
            </Layout>
          </Layouts>
        </Div>
        <Static id="caption1" text="핵의학체내 방사선 동위원소 치료현황(일별)" class="tit_2" position="absolute 0 77 286 99"/>
        <Shape id="line1" class="line_10" position="absolute 0 93 1195 99" anchor="left top right"/>
        <Button id="btn_excsave" taborder="2" text="엑셀저장" class="btn7" position="absolute 1114 74 1194 93" anchor="top right" onclick="btn_excsave_onclick"/>
        <Grid id="grd_list" taborder="3" binddataset="ds_main_list_item" useinputpanel="false" position="absolute 0 98 1195 488" anchor="all">
          <Formats>
            <Format id="default">
              <Columns>
                <Column size="25" band="left"/>
                <Column size="91" band="left"/>
                <Column size="74" band="left"/>
                <Column size="92" band="left"/>
                <Column size="40"/>
                <Column size="40"/>
                <Column size="40"/>
                <Column size="40"/>
                <Column size="40"/>
                <Column size="40"/>
                <Column size="40"/>
                <Column size="40"/>
                <Column size="40"/>
                <Column size="40"/>
                <Column size="40"/>
                <Column size="40"/>
                <Column size="40"/>
                <Column size="40"/>
                <Column size="40"/>
                <Column size="40"/>
                <Column size="40"/>
                <Column size="40"/>
                <Column size="40"/>
                <Column size="40"/>
                <Column size="40"/>
                <Column size="40"/>
                <Column size="40"/>
                <Column size="40"/>
                <Column size="40"/>
                <Column size="40"/>
                <Column size="40"/>
                <Column size="40"/>
                <Column size="40"/>
                <Column size="40"/>
                <Column size="40"/>
                <Column size="40"/>
              </Columns>
              <Rows>
                <Row size="24" band="head"/>
                <Row size="24"/>
              </Rows>
              <Band id="head">
                <Cell/>
                <Cell col="1" colspan="2" taborder="undefined"/>
                <Cell col="3" text="처방량"/>
                <Cell col="4" text="1일"/>
                <Cell col="5" text="2일"/>
                <Cell col="6" text="3일"/>
                <Cell col="7" text="4일"/>
                <Cell col="8" text="5일"/>
                <Cell col="9" text="6일"/>
                <Cell col="10" text="7일"/>
                <Cell col="11" text="8일"/>
                <Cell col="12" text="9일"/>
                <Cell col="13" text="10일"/>
                <Cell col="14" text="11일"/>
                <Cell col="15" text="12일"/>
                <Cell col="16" text="13일"/>
                <Cell col="17" text="14일"/>
                <Cell col="18" text="15일"/>
                <Cell col="19" text="16일"/>
                <Cell col="20" text="17일"/>
                <Cell col="21" text="18일"/>
                <Cell col="22" text="19일"/>
                <Cell col="23" text="20일"/>
                <Cell col="24" text="21일"/>
                <Cell col="25" text="22일"/>
                <Cell col="26" text="23일"/>
                <Cell col="27" text="24일"/>
                <Cell col="28" text="25일"/>
                <Cell col="29" text="26일"/>
                <Cell col="30" text="27일"/>
                <Cell col="31" text="28일"/>
                <Cell col="32" text="29일"/>
                <Cell col="33" text="30일"/>
                <Cell col="34" text="31일"/>
                <Cell col="35" text="합계"/>
              </Band>
              <Band id="body">
                <Cell celltype="head" expr="currow+1"/>
                <Cell col="1" text="bind:ioflag"/>
                <Cell col="2" text="bind:roomcd"/>
                <Cell col="3" displaytype="number" text="bind:drugqty"/>
                <Cell col="4" displaytype="number" text="bind:day01"/>
                <Cell col="5" displaytype="number" text="bind:day02"/>
                <Cell col="6" displaytype="number" text="bind:day03"/>
                <Cell col="7" displaytype="number" text="bind:day04"/>
                <Cell col="8" displaytype="number" text="bind:day05"/>
                <Cell col="9" displaytype="number" text="bind:day06"/>
                <Cell col="10" displaytype="number" text="bind:day07"/>
                <Cell col="11" displaytype="number" text="bind:day08"/>
                <Cell col="12" displaytype="number" text="bind:day09"/>
                <Cell col="13" displaytype="number" text="bind:day10"/>
                <Cell col="14" displaytype="number" text="bind:day11"/>
                <Cell col="15" displaytype="number" text="bind:day12"/>
                <Cell col="16" displaytype="number" text="bind:day13"/>
                <Cell col="17" displaytype="number" text="bind:day14"/>
                <Cell col="18" displaytype="number" text="bind:day15"/>
                <Cell col="19" displaytype="number" text="bind:day16"/>
                <Cell col="20" displaytype="number" text="bind:day17"/>
                <Cell col="21" displaytype="number" text="bind:day18"/>
                <Cell col="22" displaytype="number" text="bind:day19"/>
                <Cell col="23" displaytype="number" text="bind:day20"/>
                <Cell col="24" displaytype="number" text="bind:day21"/>
                <Cell col="25" displaytype="number" text="bind:day22"/>
                <Cell col="26" displaytype="number" text="bind:day23"/>
                <Cell col="27" displaytype="number" text="bind:day24"/>
                <Cell col="28" displaytype="number" text="bind:day25"/>
                <Cell col="29" displaytype="number" text="bind:day26"/>
                <Cell col="30" displaytype="number" text="bind:day27"/>
                <Cell col="31" displaytype="number" text="bind:day28"/>
                <Cell col="32" displaytype="number" text="bind:day29"/>
                <Cell col="33" displaytype="number" text="bind:day30"/>
                <Cell col="34" displaytype="number" text="bind:day31"/>
                <Cell col="35" displaytype="number" text="bind:total"/>
              </Band>
            </Format>
          </Formats>
        </Grid>
        <Grid id="grd_isublist" taborder="4" binddataset="ds_main_isublist_item" useinputpanel="false" cellsizingtype="col" autofittype="col" position="absolute 0 492 258 632" anchor="left bottom">
          <Formats>
            <Format id="default">
              <Columns>
                <Column size="75"/>
                <Column size="80"/>
                <Column size="80"/>
              </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:ioflag"/>
                <Cell col="1" text="bind:drugqty"/>
                <Cell col="2" text="bind:cnt"/>
              </Band>
            </Format>
          </Formats>
        </Grid>
        <Grid id="grd_osublist" taborder="5" binddataset="ds_main_osublist_item" useinputpanel="false" cellsizingtype="col" autofittype="col" position="absolute 262 492 520 632" anchor="left bottom">
          <Formats>
            <Format id="default">
              <Columns>
                <Column size="75"/>
                <Column size="90"/>
                <Column size="90"/>
              </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:ioflag"/>
                <Cell col="1" text="bind:drugqty"/>
                <Cell col="2" text="bind:cnt"/>
              </Band>
            </Format>
          </Formats>
        </Grid>
        <Static id="caption2" text="외래합계" class="cell_1" position="absolute 260 638 387 661" anchor="left bottom"/>
        <Edit id="input2" taborder="6" position="absolute 389 640 518 659" anchor="left bottom" style="align:right middle;"/>
        <Edit id="input3" taborder="7" position="absolute 129 666 518 685" anchor="left bottom" style="align:right middle;"/>
        <Static id="caption4" text="총합계" class="cell_1" position="absolute 0 664 127 687" anchor="left bottom"/>
        <Static id="caption8" text="병실합계" class="cell_1" position="absolute 0 638 127 661" anchor="left bottom"/>
        <Edit id="input1" taborder="8" position="absolute 129 640 258 659" anchor="left bottom" style="align:right middle;"/>
      </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="srchdate" type="STRING" size="256"/>
          <Column id="suppdeptcd" type="STRING" size="256"/>
          <Column id="initexcuroomgrp" type="STRING" size="256"/>
          <Column id="srchyy" type="STRING" size="256"/>
          <Column id="srchmm" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="srchdate"/>
            <Col id="suppdeptcd"/>
            <Col id="initexcuroomgrp"/>
            <Col id="srchyy"/>
            <Col id="srchmm"/>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_main_list_item" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="ioflag" type="STRING" size="256" sumtext="IOFLAG"/>
          <Column id="roomcd" type="STRING" size="256" sumtext="병실"/>
          <Column id="drugqty" type="STRING" size="256" sumtext="처방량"/>
          <Column id="day01" type="STRING" size="256" sumtext="1일"/>
          <Column id="day02" type="STRING" size="256" sumtext="2일"/>
          <Column id="day03" type="STRING" size="256" sumtext="3일"/>
          <Column id="day04" type="STRING" size="256" sumtext="4일"/>
          <Column id="day05" type="STRING" size="256" sumtext="5일"/>
          <Column id="day06" type="STRING" size="256" sumtext="6일"/>
          <Column id="day07" type="STRING" size="256" sumtext="7일"/>
          <Column id="day08" type="STRING" size="256" sumtext="8일"/>
          <Column id="day09" type="STRING" size="256" sumtext="9일"/>
          <Column id="day10" type="STRING" size="256" sumtext="10일"/>
          <Column id="day11" type="STRING" size="256" sumtext="11일"/>
          <Column id="day12" type="STRING" size="256" sumtext="12일"/>
          <Column id="day13" type="STRING" size="256" sumtext="13일"/>
          <Column id="day14" type="STRING" size="256" sumtext="14일"/>
          <Column id="day15" type="STRING" size="256" sumtext="15일"/>
          <Column id="day16" type="STRING" size="256" sumtext="16일"/>
          <Column id="day17" type="STRING" size="256" sumtext="17일"/>
          <Column id="day18" type="STRING" size="256" sumtext="18일"/>
          <Column id="day19" type="STRING" size="256" sumtext="19일"/>
          <Column id="day20" type="STRING" size="256" sumtext="20일"/>
          <Column id="day21" type="STRING" size="256" sumtext="21일"/>
          <Column id="day22" type="STRING" size="256" sumtext="22일"/>
          <Column id="day23" type="STRING" size="256" sumtext="23일"/>
          <Column id="day24" type="STRING" size="256" sumtext="24일"/>
          <Column id="day25" type="STRING" size="256" sumtext="25일"/>
          <Column id="day26" type="STRING" size="256" sumtext="26일"/>
          <Column id="day27" type="STRING" size="256" sumtext="27일"/>
          <Column id="day28" type="STRING" size="256" sumtext="28일"/>
          <Column id="day29" type="STRING" size="256" sumtext="29일"/>
          <Column id="day30" type="STRING" size="256" sumtext="30일"/>
          <Column id="day31" type="STRING" size="256" sumtext="31일"/>
          <Column id="total" type="STRING" size="256" sumtext="합계"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_main_sublist_item" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="ioflag" type="STRING" size="256" sumtext="IOFLAG"/>
          <Column id="drugqty" type="STRING" size="256" sumtext="처방량"/>
          <Column id="cnt" type="STRING" size="256" sumtext="건수"/>
          <Column id="total" type="STRING" size="256" sumtext="합계"/>
        </ColumnInfo>
      </Dataset>
      <FilteredDataset id="ds_main_isublist_item" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false" binddataset="@ds_main_sublist_item" filterstr="ioflag == '입원'"/>
      <FilteredDataset id="ds_main_osublist_item" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false" binddataset="@ds_main_sublist_item" filterstr="ioflag == '외래'"/>
      <Dataset id="ds_main_examsum" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="isum" type="STRING" size="256"/>
          <Column id="osum" type="STRING" size="256"/>
          <Column id="total" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
    </Objects>
    <Bind>
      <BindItem id="item0" compid="grp_sea.input4" propid="value" datasetid="ds_send" columnid="srchdate"/>
      <BindItem id="item1" compid="input1" propid="value" datasetid="ds_main_examsum" columnid="isum"/>
      <BindItem id="item2" compid="input2" propid="value" datasetid="ds_main_examsum" columnid="osum"/>
      <BindItem id="item3" compid="input3" propid="value" datasetid="ds_main_examsum" columnid="total"/>
    </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 "ast_examcurexp::AEZ0001.xjs";
var vSuppdeptcd;
function SMAES02200_oninit(obj:Form, e:InitEventInfo)
{
	frmf_initForm(obj);
}

function SMAES02200_onload(obj:Form, e:LoadEventInfo)
{
	grdf_initGrid(grd_isublist);
	grdf_initGrid(grd_list);
	grdf_initGrid(grd_osublist);
	
	lf_aezfSetSuppDeptcd();
	
	vSuppdeptcd = frmf_getPrestDeptCd();
	
	ds_send.setColumn(0, "suppdeptcd", vSuppdeptcd);	
	ds_send.setColumn(0, "srchdate", utlf_getCurrentDate().substr(0,6));
}

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

function grp_sea_btn_sea_onclick(obj:Button,  e:ClickEventInfo)
{
	ds_main_isublist_item.clearData();
	ds_main_list_item.clearData();
	ds_main_osublist_item.clearData();
	
	var oParam = {};
		oParam.id          = "TRAES02200";
		oParam.service     = "examcurestatsapp.NmedStats";
		oParam.method      = "reqGetNmedStatsRayDDList";
		oParam.inds        = "req=ds_send";
		oParam.outds       = "ds_main_list_item=item ds_main_sublist_item=sublist";
		oParam.async       = false;
		oParam.callback    = "cf_TRAES02200";

	tranf_submit(oParam);
}

function cf_TRAES02200(sSvcId, nErrorCode, sErrorMsg) 
{
    if(nErrorCode < 0) 
    {
		return;
	}
	else
	{
		var rowCnt = ds_main_sublist_item.rowcount;
								
		var ioflag = "";
		var iSum = 0;
		var oSum = 0;
		var total = 0;

		for (var i = 0; i < rowCnt; i++) 
		{
			ioflag = ds_main_sublist_item.getColumn(i, "ioflag");
			
			if (ioflag == "입원") 
			{
				iSum = iSum + eval(ds_main_sublist_item.getColumn(i, "cnt"));
			}
			else  if (ioflag == "외래") 
			{
				oSum = oSum + eval(ds_main_sublist_item.getColumn(i, "cnt"));
			}
		}
		total = eval(iSum) + eval(oSum);
		
		ds_main_examsum.setColumn(0, "isum", iSum);
		ds_main_examsum.setColumn(0, "osum", oSum);
		ds_main_examsum.setColumn(0, "total", total);
	}
}

function btn_excsave_onclick(obj:Button,  e:ClickEventInfo)
{
	grdf_exportExcel(grd_list, "", "");
}
]]></Script>
  </Form>
</FDL>