YNU_JEUS/app_home/himed/xpapps/ast/examcurestatsxp/xp/SMAES06300_재활의학팀실인원환자수.xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SMAES06300" position="absolute 0 0 1197 759" titletext="재활의학팀치료건수" onload="SMAES06300_onload">
    <Layouts>
      <Layout>
        <Div position="absolute 0 13 1195 757" id="grp_biz" scrollbars="autoboth" anchor="all">
          <Layouts>
            <Layout>
              <Static text="재활의학팀실인원환자수" position="absolute 0 61 200 82" id="caption1" class="tit_2" anchor="default"/>
              <Div position="absolute 0 12 1195 52" align="align:center top;" id="grp_sea" class="div_SA" anchor="left top right">
                <Layouts>
                  <Layout>
                    <Static text="조회기간 :" position="absolute 15 13 101 30" id="caption2" class="search_name" anchor="default"/>
                    <Shape position="absolute 1107 7 1113 34" linetype="vertical" id="line13" class="line_4" anchor="top right"/>
                    <Button position="absolute 1125 10 1181 32" id="btn_sea" class="btn1" taborder="4" text="조회" anchor="top right" onclick="grp_biz_grp_sea_btn_sea_onclick"/>
                    <Calendar position="absolute 227 11 327 30" align="align:center middle;" id="ipt_todd" class="input_default" taborder="2" anchor="default" dateformat="yyyy-MM-dd" onchanged="grp_biz_grp_sea_ipt_todd_onchanged"/>
                    <Static text="~" position="absolute 212 12 224 29" id="caption5" class="search_no_b" anchor="default"/>
                    <Calendar position="absolute 109 11 209 30" align="align:center middle;" id="ipt_fromdd" class="input_default" taborder="1" anchor="default" dateformat="yyyy-MM-dd" value="null" onchanged="grp_biz_grp_sea_ipt_fromdd_onchanged"/>
                  </Layout>
                </Layouts>
              </Div>
              <Shape position="absolute 0 77 1195 83" id="line1" class="line_10" anchor="left top right"/>
              <Grid position="absolute 0 82 1195 744" id="datagrid1" binddataset="ds_main_list_item" anchor="all" selecttype="multirow">
                <Formats>
                  <Format id="default">
                    <Columns>
                      <Column size="166"/>
                      <Column size="84"/>
                      <Column size="84"/>
                      <Column size="84"/>
                    </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="3" text="실인원" taborder="undefined"/>
                      <Cell row="1" col="1" text="입원"/>
                      <Cell row="1" col="2" text="외래"/>
                      <Cell row="1" col="3" text="합계"/>
                    </Band>
                    <Band id="body">
                      <Cell displaytype="text" text="bind:curerm"/>
                      <Cell col="1" displaytype="number" text="bind:intestexeccnt"/>
                      <Cell col="2" displaytype="number" text="bind:outtestexeccnt"/>
                      <Cell col="3" displaytype="number" text="bind:sumcnt"/>
                    </Band>
                  </Format>
                </Formats>
              </Grid>
              <Button position="absolute 1115 55 1195 77" id="button1" class="btn7" text="엑셀저장" anchor="top right" onclick="grp_biz_button1_onclick"/>
            </Layout>
          </Layouts>
        </Div>
        <Static id="caption6" text="재활의학팀실인원환자건수" class="tit_1" position="absolute 0 0 200 25"/>
      </Layout>
    </Layouts>
    <Objects>
      <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="curerm" type="STRING" size="256"/>
          <Column id="intestexeccnt" type="STRING" size="256"/>
          <Column id="outtestexeccnt" type="STRING" size="256"/>
          <Column id="sumcnt" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="curerm"/>
            <Col id="intestexeccnt"/>
            <Col id="outtestexeccnt"/>
            <Col id="sumcnt"/>
          </Row>
        </Rows>
      </Dataset>
      <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="execfromdd" type="STRING" size="256"/>
          <Column id="exectodd" type="STRING" size="256"/>
          <Column id="comparefromdd" type="STRING" size="256"/>
          <Column id="comparetodd" type="STRING" size="256"/>
          <Column id="orddeptcd" type="STRING" size="256"/>
          <Column id="fstpatyn" type="STRING" size="256"/>
          <Column id="curerm" type="STRING" size="256"/>
          <Column id="curedr" type="STRING" size="256"/>
          <Column id="prcpcd" type="STRING" size="256"/>
          <Column id="execdrid" type="STRING" size="256"/>
          <Column id="srchflag" type="STRING" size="256"/>
          <Column id="srchtab" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="srchdate"/>
            <Col id="suppdeptcd"/>
            <Col id="execfromdd"/>
            <Col id="exectodd"/>
            <Col id="comparefromdd"/>
            <Col id="comparetodd"/>
            <Col id="orddeptcd"/>
            <Col id="fstpatyn"/>
            <Col id="curerm"/>
            <Col id="curedr"/>
            <Col id="prcpcd"/>
            <Col id="execdrid"/>
            <Col id="srchflag">T</Col>
            <Col id="srchtab"/>
          </Row>
        </Rows>
      </Dataset>
    </Objects>
    <Bind>
      <BindItem id="item0" compid="grp_biz.grp_sea.ipt_todd" propid="value" datasetid="ds_send" columnid="exectodd"/>
      <BindItem id="item1" compid="grp_biz.grp_sea.ipt_fromdd" propid="value" datasetid="ds_send" columnid="execfromdd"/>
    </Bind>
    <Script type="xscript4.0"><![CDATA[/***************************************************************************************  
 * System Name		:	
 * Job Name 		:	
 * Creator 	    :	
 * Make Date 		:	2016-09-30
 * Description  	:	                                                                   
 *--------------------------------------------------------------------------------------- 
 * Modify Date     	Modifier  	  Modify Description                                   
 *--------------------------------------------------------------------------------------- 
 * 2016-09-30      Live Converter   TF->XP                                           
 *                                                                                        
 *--------------------------------------------------------------------------------------- 
 ****************************************************************************************/
//=======================================================================================
// Lib Include
//---------------------------------------------------------------------------------------
include "com_commonxp::comm_main.xjs";
include "ast_examcurexp::AEZ0001.xjs";

//=======================================================================================
// Global Form Variable
//---------------------------------------------------------------------------------------
var arErrorCode = new HashArray();
var gSuppdeptcd = "";

//=======================================================================================
// Function 
//---------------------------------------------------------------------------------------
/****************************************************************************************
 * Argument			: colNm - 대상컬럼
 * Description		: expr사용 합계 함수
 ****************************************************************************************/
 
//=======================================================================================
// Event
//---------------------------------------------------------------------------------------
/****************************************************************************************
 * Components		: Form
 * Description		: 화면 처음 초기화시 폼초기화
 ****************************************************************************************/
function SMAES06300_onload(obj:Form, e:LoadEventInfo)
{
	frmf_initForm(obj);  		// 폼 초기화 
	lf_aezfSetSuppDeptcd();	//AEZ0001.xjs
	gSuppdeptcd = frmf_getParameter("AST_DEPTCD");
	
// 	dsf_createDsRow("ds_req", 	[
//                                 {col:"suppdeptcd", type:"STRING", size:256, val:gSuppdeptcd}
//                               , {col:"rbasecdflag", type:"STRING", size:256, val:"0"}
//                                 ]);
// 	var oParam = {};
// 		oParam.id          = "TRAES09000";
// 		oParam.service     = "examcurestatsapp.RehbMediSc";
// 		oParam.method      = "reqGetCode";
// 		oParam.inds        = "req=ds_req";
// 		oParam.outds       = "ds_inti_execdrid=execdrid ds_inti_curerm=curerm ds_inti_prcpcd=prcpcd ds_inti_orddeptcd=orddeptcd";
// 		oParam.async       = false;
// 		oParam.callback    = "cf_TRAES09000";
// 
// 	tranf_submit(oParam);
	
	ds_send.setColumn( 0, "suppdeptcd", gSuppdeptcd);

	var fromdd = utlf_getCurrentDate().substr(0,4) + "0101"
	var todd =  utlf_getLastDate(utlf_getCurrentDate());

// 	var comparefromdd = utlf_getCurrentDate().substr(0,6).toDate().getAddDate(0,"Y").getDateFormat("YYYY") +  "0101";
// 	var comparetodd = comparefromdd.substr(0,4) + todd.substr(4,4);
					
	ds_main_list_item.clearData();

	ds_send.setColumn( 0, "fstpatyn","");
	ds_send.setColumn( 0, "srchflag","P");

	ds_send.setColumn( 0, "execfromdd", fromdd);
	ds_send.setColumn( 0, "exectodd", todd);
}

function grp_biz_grp_sea_ipt_fromdd_onchanged(obj:Calendar, e:ChangeEventInfo)
{
	var execfromdd = ds_send.getColumn(0, "execfromdd");
	var exectodd = ds_send.getColumn(0, "exectodd");
	if (execfromdd > exectodd) {
		sysf_messageBox("조회기간 시작일자가 조회기간 종료일자 이후 일자입니다.", "I");
		ds_send.setColumn( 0, "execfromdd",exectodd);
//		execfromdd = exectodd;
	} 
}

function grp_biz_grp_sea_ipt_todd_onchanged(obj:Calendar, e:ChangeEventInfo)
{
	var exectodd =  ds_send.getColumn(0, "exectodd");
	var execfromdd =  ds_send.getColumn(0, "execfromdd");
	if (execfromdd > exectodd) {
		sysf_messageBox("조회기간 종료일자가 조회기간 시작일자 이전 일자입니다.", "I");
		ds_send.setColumn( 0, "exectodd",execfromdd);
//		exectodd = execfromdd;
	}
}

function grp_biz_grp_sea_btn_sea_onclick(obj:Button,  e:ClickEventInfo)
{
	ds_main_list_item.clearData();
	//R:치료실,C:치료코드,D:처방과,E:치료사
//	ds_send.setColumn( 0, "srchtab","R");
	var oParam = {};
		oParam.id          = "TRAES06301";
		oParam.service     = "examcurestatsapp.RehbMediSc";
		oParam.method      = "reqGetRehbTrueCnt";
		oParam.inds        = "req=ds_send";
		oParam.outds       = "ds_main_list_item=item";
		oParam.async       = true;
		//oParam.callback    = "cf_TRAES06301";

	tranf_submit(oParam);
}

function grp_biz_button1_onclick(obj:Button,  e:ClickEventInfo)
{
	if( ds_main_list_item.rowcount > 0 ){
		grdf_exportExcel(grp_biz.datagrid1, "SheetName", "SheetName", false, "", "user", false);
	} else {
		sysf_messageBox("조회된 데이터가 ", "I004");
	}	
}
]]></Script>
  </Form>
</FDL>