YNU_JEUS/app_home/himed/xpapps/sts/stspamxp/xp/SPSTP00100_통계집계.xfdl

<?xml version="1.0" encoding="utf-8" standalone="no"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SPSTP00100" position="absolute 0 0 1160 780" titletext="통계집계" onload="SPSTP00100_onload" oninit="SPSTP00100_oninit">
    <Layouts>
      <Layout>
        <Div id="group1" position="absolute 0 25 375 291" style="" class="div_SA2">
          <Layouts>
            <Layout>
              <Calendar id="ipt_fromdd" class="input_search" enable="false" taborder="1" visible="true" mask="yyyy-mm-dd" position="absolute 125 143 227 162" style="align:center ;" anchor="default" onkillfocus="group1_ipt_fromdd_onkillfocus"/>
              <Calendar id="ipt_todd" class="input_search" enable="false" taborder="1" visible="true" mask="yyyy-mm-dd" position="absolute 233 143 335 162" style="align:center ;" anchor="default" onkillfocus="group1_ipt_todd_onkillfocus"/>
              <Static id="caption30" class="search_name" position="absolute 30 85 115 102" style="" text="집계기준" anchor="default"/>
              <Calendar id="ipt_procdd" class="input_search" taborder="1" mask="yyyy-mm-dd" position="absolute 125 115 227 134" style="align:center ;" anchor="default" autoselect="true" onchanged="group1_ipt_procdd_onchanged"/>
              <Button id="btn_execute" class="btn4" position="absolute 164 174 220 196" style="" text="실행" onclick="group1_btn_execute_onclick" anchor="default"/>
              <Static id="caption1" position="absolute 25 205 259 222" style="" text="※ 현재일이후 통계는 집계 할 수 없습니다." anchor="default"/>
              <Static id="caption2" class="search_name" position="absolute 30 25 115 42" style="" text="집계구분" anchor="default"/>
              <Combo datacolumn="datacolumn" codecolumn="codecolumn" columncount="-1" rowcount="-1" id="cb_list" class="combo_search" position="absolute 125 25 227 44" style="" onitemchanged="group1_cb_list_onitemchanged" anchor="default">
                <Dataset id="innerdataset">
                  <ColumnInfo>
                    <Column id="codecolumn"/>
                    <Column id="datacolumn"/>
                  </ColumnInfo>
                  <Rows>
                    <Row>
                      <Col id="codecolumn">C</Col>
                      <Col id="datacolumn">공통통계</Col>
                    </Row>
                    <Row>
                      <Col id="codecolumn">P</Col>
                      <Col id="datacolumn">인원통계</Col>
                    </Row>
                    <Row>
                      <Col id="codecolumn">S</Col>
                      <Col id="datacolumn">수익통계</Col>
                    </Row>
                    <Row>
                      <Col id="codecolumn">B</Col>
                      <Col id="datacolumn">사회사업통계</Col>
                    </Row>
                    <Row>
                      <Col id="codecolumn">R</Col>
                      <Col id="datacolumn">진료실적통계</Col>
                    </Row>
                    <Row>
                      <Col id="codecolumn">T</Col>
                      <Col id="datacolumn">특정처방집계</Col>
                    </Row>
                    <Row>
                      <Col id="codecolumn">I</Col>
                      <Col id="datacolumn">MIS자동분개</Col>
                    </Row>
                    <Row>
                      <Col id="codecolumn">O</Col>
                      <Col id="datacolumn">수익마감전계산내역점검</Col>
                    </Row>
                    <Row>
                      <Col id="codecolumn">A</Col>
                      <Col id="datacolumn">수익마감 누적통계</Col>
                    </Row>
                    <Row>
                      <Col id="codecolumn">X</Col>
                      <Col id="datacolumn">오류데이터 점검</Col>
                    </Row>
                    <Row>
                      <Col id="codecolumn">G</Col>
                      <Col id="datacolumn">선택진료료 배분</Col>
                    </Row>
                    <Row>
                      <Col id="codecolumn">H</Col>
                      <Col id="datacolumn">수익일보상호검증</Col>
                    </Row>
                    <Row>
                      <Col id="codecolumn">J</Col>
                      <Col id="datacolumn">수익부서 셋팅</Col>
                    </Row>
                    <Row>
                      <Col id="codecolumn">N</Col>
                      <Col id="datacolumn">월마감집계</Col>
                    </Row>
                  </Rows>
                </Dataset>
              </Combo>
              <Static id="caption3" class="search_name" position="absolute 30 55 115 72" style="" text="진료구분" anchor="default"/>
              <Combo datacolumn="datacolumn" codecolumn="codecolumn" columncount="-1" rowcount="-1" id="cb_ordstat" class="combo_search" position="absolute 125 55 227 74" style="" onitemchanged="group1_cb_ordstat_onitemchanged" anchor="default">
                <Dataset id="innerdataset">
                  <ColumnInfo>
                    <Column id="codecolumn"/>
                    <Column id="datacolumn"/>
                  </ColumnInfo>
                  <Rows>
                    <Row>
                      <Col id="codecolumn">A</Col>
                      <Col id="datacolumn">전체</Col>
                    </Row>
                    <Row>
                      <Col id="codecolumn">I</Col>
                      <Col id="datacolumn">입원</Col>
                    </Row>
                    <Row>
                      <Col id="codecolumn">O</Col>
                      <Col id="datacolumn">외래</Col>
                    </Row>
                  </Rows>
                </Dataset>
              </Combo>
              <Combo datacolumn="datacolumn" codecolumn="codecolumn" columncount="-1" rowcount="-1" id="cb_monthday" class="combo_search" position="absolute 125 85 227 104" style="" onitemchanged="group1_cb_monthday_onitemchanged" anchor="default">
                <Dataset id="innerdataset">
                  <ColumnInfo>
                    <Column id="codecolumn"/>
                    <Column id="datacolumn"/>
                  </ColumnInfo>
                  <Rows>
                    <Row>
                      <Col id="codecolumn">D</Col>
                      <Col id="datacolumn">일단위</Col>
                    </Row>
                    <Row>
                      <Col id="codecolumn">M</Col>
                      <Col id="datacolumn">월단위</Col>
                    </Row>
                  </Rows>
                </Dataset>
              </Combo>
              <Button id="button1" class="btn4" position="absolute 224 174 304 196" style="" text="배치로그" onclick="group1_button1_onclick" anchor="default"/>
              <CheckBox id="chk_job" taborder="2" text="일괄작업" position="absolute 38 143 114 163" truevalue="A" anchor="default" onclick="group1_chk_job_onclick"/>
            </Layout>
          </Layouts>
        </Div>
        <Static id="caption6" text="원무통계 집계" class="tit_1" position="absolute 0 0 163 24"/>
      </Layout>
    </Layouts>
    <Objects>
      <Dataset id="ds_send" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
        <ColumnInfo>
          <Column id="in_batchgubn" type="STRING" size="256"/>
          <Column id="in_ordstat" type="STRING" size="256"/>
          <Column id="in_monthday" type="STRING" size="256"/>
          <Column id="in_procdd" type="STRING" size="256"/>
          <Column id="in_fromdd" type="STRING" size="256"/>
          <Column id="in_todd" type="STRING" size="256"/>
          <Column id="in_cond1" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="in_batchgubn">C</Col>
            <Col id="in_ordstat">A</Col>
            <Col id="in_monthday">D</Col>
            <Col id="in_procdd"/>
            <Col id="in_fromdd"/>
            <Col id="in_todd"/>
            <Col id="in_cond1"/>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_hide" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
        <ColumnInfo>
          <Column id="out_proccnt" type="STRING" size="256"/>
        </ColumnInfo>
      </Dataset>
    </Objects>
    <Bind>
      <BindItem id="item1" compid="group1.ipt_fromdd" propid="value" datasetid="ds_send" columnid="in_fromdd"/>
      <BindItem id="item2" compid="group1.ipt_todd" propid="value" datasetid="ds_send" columnid="in_todd"/>
      <BindItem id="item3" compid="group1.ipt_procdd" propid="value" datasetid="ds_send" columnid="in_procdd"/>
      <BindItem id="item4" compid="group1.cb_list" propid="value" datasetid="ds_send" columnid="in_batchgubn"/>
      <BindItem id="item5" compid="group1.cb_ordstat" propid="value" datasetid="ds_send" columnid="in_ordstat"/>
      <BindItem id="item6" compid="group1.cb_monthday" propid="value" datasetid="ds_send" columnid="in_monthday"/>
      <BindItem id="item0" compid="group1.chk_job" propid="value" datasetid="ds_send" columnid="in_cond1"/>
    </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";
include "com_basiccodexp::ZBC001.xjs";
include "com_batchinfoxp::ZSB001.xjs";

var gToday = new Date();
var gBaseyear  = gToday.getDateFormat("YYYY");	// (dateHelper.js)에서 제공하는 함수를 사용하여 해당 년를 구한다.
var gBasemonth = gToday.getDateFormat("MM");
var gBaseday   = gToday.getDateFormat("DD");
var gCurrentdd  = gBaseyear + gBasemonth + gBaseday;

var gCurrentmm  = gBaseyear + gBasemonth;

function SPSTP00100_oninit(obj:Form, e:InitEventInfo)
{
	frmf_initForm(obj); 
}

function SPSTP00100_onload(obj:Form, e:LoadEventInfo) 
{
 	ds_send.setColumn( 0, "in_procdd",utlf_getCurrentDate() );
	ds_send.setColumn( 0, "in_fromdd",utlf_getCurrentDate() );
	ds_send.setColumn( 0, "in_todd",utlf_getCurrentDate() );
}

function group1_cb_monthday_onitemchanged(obj:Combo, e:ItemChangeEventInfo)
{
	var sMonthday = obj.value;
	ds_send.setColumn(0, "in_procdd","" );
	ds_send.setColumn(0, "in_fromdd","" );
	ds_send.setColumn(0, "in_todd","" );
	
	if ( sMonthday == "D" ) 
	{
		group1.ipt_procdd.dateformat = "yyyy-MM-dd";
		group1.ipt_procdd.editformat = "yyyy-MM-dd";
		
		ds_send.setColumn(0, "in_procdd",gCurrentdd );
		ds_send.setColumn(0, "in_fromdd",gCurrentdd );
		ds_send.setColumn(0, "in_todd",gCurrentdd );
	}
	else 
	{
		group1.ipt_procdd.dateformat = "yyyy-MM";
		group1.ipt_procdd.editformat = "yyyy-MM";
		
		ds_send.setColumn(0, "in_procdd",gCurrentmm );
	}		
}

function group1_ipt_procdd_onchanged(obj:Calendar, e:ChangeEventInfo)
{
	var procdd = obj.value;
	var cond1 = ds_send.getColumn(0, "in_cond1");
	
	if ( cond1 != "A") 
	{
		ds_send.setColumn(0, "in_fromdd", procdd);
		ds_send.setColumn(0, "in_todd", procdd);
	}
}

function group1_chk_job_onclick(obj:CheckBox,  e:ClickEventInfo)
{
	if ( obj.value == "A")
	{
		group1.ipt_fromdd.enable = true;
		group1.ipt_todd.enable = true;
	}
	else 
	{
		group1.ipt_fromdd.enable = false;
		group1.ipt_todd.enable = false;
		
		ds_send.setColumn(0, "in_fromdd", ds_send.getColumn(0, "in_procdd"));
		ds_send.setColumn(0, "in_todd", ds_send.getColumn(0, "in_procdd"));
	}	
}

function group1_btn_execute_onclick(obj:Button,  e:ClickEventInfo)
{
	var sProcdd = ds_send.getColumn(0, "in_procdd");
	var sFromdd = ds_send.getColumn(0, "in_fromdd");
	var sTodd = ds_send.getColumn(0, "in_todd");
	
	if (ds_send.getColumn(0, "in_cond1") == "A" ) 
	{
		if (gCurrentdd.toDate() < sFromdd.toDate() || gCurrentdd.toDate() < sTodd.toDate()) 
		{
			sysf_messageBox("현재일 이후 통계는 집계할 수 없습니다.","C999");
			return;
		}
		
		if (sFromdd.toDate() > sTodd.toDate()) 
		{
			sysf_messageBox("집계 시작일자와 종료일자 설정이 올바르지 않습니다. 날짜를 확인하세요.","C999");
			return;
		}	
	}
	else 
	{
		if (gCurrentdd.toDate() < sProcdd.toDate()) 
		{
			sysf_messageBox("현재일 이후 통계는 집계할 수 없습니다.","C999");
			return;
		}
	}
	
	if ( !utlf_isNull(sProcdd))
	{
		var oParam = {};
			oParam.id          = "TXSTP00100";
			oParam.service     = "stspamapp.StsPam";
			oParam.method      = "reqExePamBatch";
			oParam.inds        = "req=ds_send";
			oParam.outds       = "";
			oParam.async       = false;
			//oParam.callback    = "cf_TXSTP00100";

		tranf_submit(oParam);
		
		group1.button1.click();
	}
	else 
	{
		alert("집계일자를 입력하세요");
		group1.ipt_procdd.setFocus();
		return;
	}	
}

function group1_button1_onclick(obj:Button,  e:ClickEventInfo)
{
	var todd = utlf_getCurrentDate();
	todd = todd.toDate().getAddDate(+1, 'D');
	zsbfOpenBatchLogPopup("stspambatchmgr.StsPamBatch",utlf_getCurrentDate(),todd.getDateFormat());	
}
]]></Script>
  </Form>
</FDL>