YNU_JEUS/app_home/himed/xpapps/sts/stscmcnwxp/xp/SMSDT07200_사회사업장기이식상담실적B.xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SMSDT07200" position="absolute 0 0 1204 800" titletext="사회사업장기이식상담실적" oninit="SMSDT07200_oninit" onload="SMSDT07200_onload">
    <Layouts>
      <Layout>
        <Static id="caption6" text="사회사업 장기이식상담실적" class="tit_1" position="absolute 0 0 230 25"/>
        <Shape id="line37" linetype="horizontal" class="line_6" position="absolute 0 770 1195 776" anchor="left right bottom"/>
        <Button id="btn_search0" taborder="1" text="초기화" class="btn4" position="absolute 1127 774 1195 796" anchor="right bottom" onclick="btn_search0_onclick"/>
        <Static id="caption21" text="사회사업 장기이식상담실적" class="tit_2" position="absolute 0 86 232 108"/>
        <Shape id="line1" class="line_10" position="absolute 0 100 1195 111" anchor="left top right"/>
        <Div id="group4" taborder="2" class="div_SA" position="absolute 0 25 1195 65" anchor="left top right">
          <Layouts>
            <Layout>
              <Button id="button2" taborder="4" text="조회" class="btn1" position="absolute 1123 10 1179 32" anchor="top right" onclick="group4_button2_onclick"/>
              <Static id="caption23" text="조회구분 :" class="search_name" position="absolute 15 11 101 28"/>
              <Shape id="line2" linetype="vertical" position="absolute 1110 10 1116 32" anchor="top right"/>
              <Static id="cap1" text="~" position="absolute 409 11 434 31"/>
              <Calendar id="ipt_fromdd" taborder="5" class="input_search" position="absolute 324 11 397 30" mask="yyyy-mm" autoselect="true" autoskip="true" onchanged="group4_ipt_fromdd_onchanged" dateformat="yyyy-MM" value="null" editformat="yyyy-MM"/>
              <Calendar id="ipt_todd" taborder="6" class="input_search" position="absolute 437 11 510 30" mask="yyyy-mm" autoselect="true" onchanged="group4_ipt_todd_onchanged" dateformat="yyyy-MM" editformat="yyyy-MM"/>
              <Static id="caption1" text="조회기간 :" class="search_name" position="absolute 232 13 332 30"/>
              <Combo id="cmb_reqflag" taborder="7" codecolumn="codecolumn" datacolumn="datacolumn" position="absolute 110 10 195 29" onitemchanged="group4_cmb_reqflag_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>
              </Combo>
            </Layout>
          </Layouts>
        </Div>
        <Button id="btn_excel" taborder="3" text="엑셀저장" class="btn7" position="absolute 1115 83 1195 102" anchor="top right" onclick="btn_excel_onclick"/>
        <Grid id="grd_brgstincmexpsprescond" class="datagrid2" taborder="4" binddataset="ds_main_brgstincmexpspres_brgstincmexpsprescond" autoenter="select" useinputpanel="false" cellsizingtype="col" autofittype="col" position="absolute 0 107 1195 771" anchor="all">
          <Formats>
            <Format id="default">
              <Columns>
                <Column size="161"/>
                <Column size="78"/>
                <Column size="78"/>
                <Column size="82"/>
                <Column size="78"/>
                <Column size="78"/>
                <Column size="78"/>
                <Column size="82"/>
                <Column size="78"/>
                <Column size="78"/>
                <Column size="78"/>
                <Column size="82"/>
                <Column size="78"/>
                <Column size="77"/>
              </Columns>
              <Rows>
                <Row size="24" band="head"/>
                <Row size="24" band="head"/>
                <Row size="24"/>
              </Rows>
              <Band id="head">
                <Cell rowspan="2" text="구분" taborder="undefined"/>
                <Cell col="1" colspan="4" text="신장" taborder="undefined"/>
                <Cell col="5" colspan="4" text="간" taborder="undefined"/>
                <Cell col="9" colspan="4" text="기타" taborder="undefined"/>
                <Cell col="13" rowspan="2" text="합계" taborder="undefined"/>
                <Cell row="1" col="1" text="혈연"/>
                <Cell row="1" col="2" text="비혈연"/>
                <Cell row="1" col="3" text="대상자미선정"/>
                <Cell row="1" col="4" text="합계"/>
                <Cell row="1" col="5" text="혈연"/>
                <Cell row="1" col="6" text="비혈연"/>
                <Cell row="1" col="7" text="대상자미선정"/>
                <Cell row="1" col="8" text="합계"/>
                <Cell row="1" col="9" text="혈연"/>
                <Cell row="1" col="10" text="비혈연"/>
                <Cell row="1" col="11" text="대상자미선정"/>
                <Cell row="1" col="12" text="합계"/>
              </Band>
              <Band id="body">
                <Cell text="bind:cond"/>
                <Cell col="1" text="bind:a1"/>
                <Cell col="2" text="bind:a2"/>
                <Cell col="3" text="bind:a3"/>
                <Cell col="4" text="bind:atotal"/>
                <Cell col="5" text="bind:b1"/>
                <Cell col="6" text="bind:b2"/>
                <Cell col="7" text="bind:b3"/>
                <Cell col="8" text="bind:btotal"/>
                <Cell col="9" text="bind:c1"/>
                <Cell col="10" text="bind:c2"/>
                <Cell col="11" text="bind:c3"/>
                <Cell col="12" text="bind:ctotal"/>
                <Cell col="13" text="bind:total"/>
              </Band>
            </Format>
          </Formats>
        </Grid>
      </Layout>
    </Layouts>
    <Objects>
      <Dataset id="ds_main_brgstincmexpspres_brgstincmexpsprescond" firefirstcount="0" firenextcount="0" useclientlayout="true" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="cond" type="STRING" size="256" sumtext="구분"/>
          <Column id="a1" type="STRING" size="256" sumtext="신장혈연"/>
          <Column id="a2" type="STRING" size="256" sumtext="신장비혈연"/>
          <Column id="a3" type="STRING" size="256" sumtext="신장대상자미선정"/>
          <Column id="atotal" type="STRING" size="256" sumtext="신장합계"/>
          <Column id="b1" type="STRING" size="256" sumtext="간혈연"/>
          <Column id="b2" type="STRING" size="256" sumtext="간비혈연"/>
          <Column id="b3" type="STRING" size="256" sumtext="간대상자미선정"/>
          <Column id="btotal" type="STRING" size="256" sumtext="간합계"/>
          <Column id="c1" type="STRING" size="256" sumtext="기타혈연"/>
          <Column id="c2" type="STRING" size="256" sumtext="기타비혈연"/>
          <Column id="c3" type="STRING" size="256" sumtext="기타대상자미선정"/>
          <Column id="ctotal" type="STRING" size="256" sumtext="기타합계"/>
          <Column id="total" type="STRING" size="256" sumtext="합계"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_main_search" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="reqflag" type="STRING" size="256"/>
          <Column id="fromdd" type="STRING" size="256"/>
          <Column id="todd" type="STRING" size="256"/>
          <Column id="fromentryy" type="STRING" size="256"/>
          <Column id="fromendyy" type="STRING" size="256"/>
          <Column id="toendyy" type="STRING" size="256"/>
          <Column id="toentryy" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="reqflag">1</Col>
            <Col id="fromdd"/>
            <Col id="todd"/>
            <Col id="fromentryy"/>
            <Col id="fromendyy"/>
            <Col id="toendyy"/>
            <Col id="toentryy"/>
          </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="group4.cmb_reqflag" propid="value" datasetid="ds_main_search" columnid="reqflag"/>
      <BindItem id="item1" compid="group4.ipt_fromdd" propid="value" datasetid="ds_main_search" columnid="fromdd"/>
      <BindItem id="item2" compid="group4.ipt_todd" propid="value" datasetid="ds_main_search" columnid="todd"/>
    </Bind>
    <Script type="xscript4.0"><![CDATA[/***************************************************************************************  
 * System Name		:	
 * Job Name 		:	
 * Creator 	    :	
 * Make Date 		:	2016-05-24
 * Description  	:	                                                                   
 *--------------------------------------------------------------------------------------- 
 * Modify Date     	Modifier  	  Modify Description                                   
 *--------------------------------------------------------------------------------------- 
 * 2016-05-24      Live Converter   TF->XP                                           
 *                                                                                        
 *--------------------------------------------------------------------------------------- 
 ****************************************************************************************/
include "com_commonxp::comm_main.xjs";
function SMSDT07200_oninit(obj:Form, e:InitEventInfo)
{
	frmf_initForm(obj);
}

function SMSDT07200_onload(obj:Form, e:LoadEventInfo)
{
	grdf_initGrid(grd_brgstincmexpsprescond);
	
	fInit();
}

function fInit()
{
	group4.caption1.visible = true;
	ds_main_brgstincmexpspres_brgstincmexpsprescond.clearData();
	
	var CurrentDate = utlf_getCurrentDate();
	var CurrentDateYM = String(CurrentDate).substr(0,6);
	var LastDate = CurrentDate.toDate().getAddDate(-1,"M").getDateFormat();
	var LastDateYM = String(LastDate).substr(0,6);
	
	dsf_makeValue(ds_main_search, "fromdd", "string",LastDateYM);
	dsf_makeValue(ds_main_search, "todd", "string",LastDateYM);
}		

function group4_cmb_reqflag_onitemchanged(obj:Combo, e:ItemChangeEventInfo)
{
	fReqBrgstIncmExpsCond(); 
}

function fReqBrgstIncmExpsCond()
{
	ds_send_reqdata.clearData();
	
	var fdate = String(ds_main_search.getColumn(0, "fromdd"));
	var todate = String(ds_main_search.getColumn(0, "todd"));
	var reqflag = ds_main_search.getColumn(0, "reqflag");
	
	var fromdd = fdate.substr(4,2);
	var todd = todate.substr(4,2);
	var fromendyy = fdate.substr(0,4);
	var toendyy = todate.substr(0,4);
	
	dsf_makeValue(ds_send_reqdata, "fromdd", "String",fromdd);
	dsf_makeValue(ds_send_reqdata, "todd", "String",todd);
	dsf_makeValue(ds_send_reqdata, "fromendyy", "String",fromendyy);
	dsf_makeValue(ds_send_reqdata, "toendyy", "String",toendyy);
	dsf_makeValue(ds_send_reqdata, "reqflag", "String",reqflag);
	
	if(utlf_isNull(fromdd))
	{
		sysf_messageBox("조회시작일자는","I003");
		group4.ipt_fromdd.setFocus();
		return;
	}
	if(utlf_isNull(todd))
	{
		sysf_messageBox("조회종료일자는","I003");
		group4.ipt_todd.setFocus();
		return;
	}
	var dateintval = utlf_getDateInterval(fdate+"01",todate+"31");
	
	if(fdate > todate)
	{
		sysf_messageBox("조회시작일보다 큰 조회종료일을 입력하십시요.","I");
		group4.ipt_todd.setFocus();
		return;
	}
	
	if(dateintval>"370")
	{
		sysf_messageBox("조회기간은 최대 1년까지 할 수 있습니다","I");
		group4.ipt_fromdd.setFocus();
		return;
	}
		
	var oParam = {};
		oParam.id          = "TRSDT07201";
		oParam.service     = "stscmcnwapp.SoclEndStats";
		oParam.method      = "reqGetOrgnTrnptCnstAchivDisq";
		oParam.inds        = "req=ds_send_reqdata";
		oParam.outds       = "ds_main_brgstincmexpspres_brgstincmexpsprescond=brgstincmexpsprescond";
		oParam.async       = false;
		//oParam.callback    = "cf_TRSDT07201";

	tranf_submit(oParam);
	
	var idxRow = ds_main_brgstincmexpspres_brgstincmexpsprescond.rowcount;
	var reqflag = ds_main_search.getColumn(0, "reqflag");
	
	for(var i = 0; i < idxRow; i++)
	{
		var cond = ds_main_brgstincmexpspres_brgstincmexpsprescond.getColumn(i, "cond");
		
		if(cond == '전기간실적'&& i == 0)
		{
			ds_main_brgstincmexpspres_brgstincmexpsprescond.clearData();
		}
		else
		{
			if(reqflag=='1')
			{
				fGetBfResult();
				return;
			}
		}
	}
}

function fGetBfResult()
{	                                                                                                             
	if(ds_main_brgstincmexpspres_brgstincmexpsprescond.rowcount > 0)
	{
		var sStat = 0;                                                                                                                       
		var insRow = ds_main_brgstincmexpspres_brgstincmexpsprescond.addRow();
		ds_main_brgstincmexpspres_brgstincmexpsprescond.setColumn(insRow, "cond", "전기간대비실적비교");
	
		for(var i = 1; i < 14; i++)                               
		{                                                                                                                                    
			var bfResult = eval(ds_main_brgstincmexpspres_brgstincmexpsprescond.getColumn(insRow-1 , i));
			var sSum = eval(ds_main_brgstincmexpspres_brgstincmexpsprescond.getColumn(insRow-2, i));		                                                     
																																			 
			sStat = eval(sSum)- eval(bfResult);                                           
			ds_main_brgstincmexpspres_brgstincmexpsprescond.setColumn(insRow, i ,eval(sStat));
		}												 
	}
	else
	{
		ds_main_brgstincmexpspres_brgstincmexpsprescond.clearData();
	}                                                                                                                                        
}         

function group4_ipt_todd_onchanged(obj:Calendar, e:ChangeEventInfo)
{
	ds_main_search.setColumn(0, "todd", String(obj.value).substr(0,6));
}

function group4_ipt_fromdd_onchanged(obj:Calendar, e:ChangeEventInfo)
{
	ds_main_search.setColumn(0, "fromdd", String(obj.value).substr(0,6));
}

function group4_button2_onclick(obj:Button,  e:ClickEventInfo)
{
	fReqBrgstIncmExpsCond();	
}

function btn_excel_onclick(obj:Button,  e:ClickEventInfo)
{
	fExcel();
}

function fExcel()
{
	if (ds_main_brgstincmexpspres_brgstincmexpsprescond.rowcount == 0)
	{
		sysf_messageBox("엑셀파일로 저장할 리스트 내역이", "I004");
		return;
	}
	
	grdf_exportExcel(grd_brgstincmexpsprescond, "장기이식상담실적", "SheetName", "true", "", "");
}

function btn_search0_onclick(obj:Button,  e:ClickEventInfo)
{
	fResetBrgstIncmExps();
}

function fResetBrgstIncmExps()
{
	ds_main_brgstincmexpspres_brgstincmexpsprescond.clearData();
}

]]></Script>
  </Form>
</FDL>