YNU_JEUS/app_home/himed/xpapps/ast/healexamstatxp/xp/SMAHS00700_건진수입.xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SMAHS00700" position="absolute 0 0 1211 784" titletext="건진수입" oninit="SMAHS00700_oninit" onload="SMAHS00700_onload">
    <Layouts>
      <Layout>
        <Div position="absolute 0 25 1195 65" id="group2" class="div_SA" anchor="left top right">
          <Layouts>
            <Layout>
              <Button id="btn_search" taborder="0" text="조회" class="btn1" position="absolute 1135 10 1191 32" anchor="top right" onclick="group2_btn_search_onclick"/>
              <Shape id="line2" linetype="vertical" class="line_4" position="absolute 1125 10 1131 32" anchor="top right"/>
              <Button id="btn_prt" taborder="1" text="출력" class="btn6" position="absolute 1065 10 1121 32" anchor="top right" onclick="group2_btn_prt_onclick"/>
              <Button id="btn_excelsave" taborder="2" text="엑셀저장" class="btn7" position="absolute 981 10 1061 32" anchor="top right" onclick="group2_btn_excelsave_onclick"/>
              <Button id="btn_dutyprnt" taborder="3" text="업무일지출력" class="btn6" visible="false" position="absolute 872 10 976 32" anchor="top right" onclick="group2_btn_dutyprnt_onclick"/>
              <Combo id="cmb_month" taborder="4" innerdataset="ds_init_cmb_month" codecolumn="cdid" datacolumn="cdnm" visible="false" position="absolute 779 10 834 29" onitemchanged="group2_cmb_month_onitemchanged"/>
              <Static id="caption1" text="월 :" class="search_name" visible="false" position="absolute 729 11 770 28"/>
              <Combo id="cmb_year" taborder="5" innerdataset="@ds_init_baseinfo_yearlst_P0167" codecolumn="cdid" datacolumn="cdnm" onitemchanged="group2_cmb_year_onitemchanged" visible="false" position="absolute 641 11 701 30"/>
              <Static id="caption2" text="연도 :" class="search_name" visible="false" position="absolute 576 11 649 28"/>
              <Calendar id="input1" taborder="6" autoselect="true" autoskip="true" class="input_search" position="absolute 423 11 528 30"/>
              <Static id="caption93" text="~" class="search_n_b" position="absolute 406 13 418 30"/>
              <Calendar id="ipt_fromdd" taborder="7" autoselect="true" autoskip="true" class="input_search" position="absolute 295 11 400 30"/>
              <Static id="caption3" text="기간 :" class="search_name" position="absolute 228 12 301 29"/>
              <Combo id="cmb_healexamflag" taborder="8" innerdataset="@ds_init_baseinfo_healexamflaglist_A0068" codecolumn="cdid" datacolumn="cdnm" position="absolute 115 11 215 30"/>
              <Static id="caption7" text="건진구분 :" class="search_name" position="absolute 25 12 112 29"/>
            </Layout>
          </Layouts>
        </Div>
        <Static id="caption60" text="건진수입" class="tit_1" position="absolute 0 0 183 25"/>
        <Grid id="grd_healexamincm" taborder="1" binddataset="ds_main_healexamincm_item" autoenter="select" useinputpanel="false" cellsizingtype="col" autofittype="col" position="absolute 0 70 1195 777" anchor="all">
          <Formats>
            <Format id="default">
              <Columns>
                <Column size="100"/>
                <Column size="50"/>
                <Column size="60"/>
                <Column size="60"/>
                <Column size="60"/>
                <Column size="105"/>
                <Column size="105"/>
                <Column size="105"/>
                <Column size="105"/>
                <Column size="0"/>
                <Column size="105"/>
                <Column size="0"/>
                <Column size="105"/>
                <Column size="105"/>
                <Column size="105"/>
              </Columns>
              <Rows>
                <Row size="24" band="head"/>
                <Row size="24"/>
                <Row size="24" band="summ"/>
              </Rows>
              <Band id="head">
                <Cell text="일자"/>
                <Cell col="1" text="구분"/>
                <Cell col="2" text="총인원"/>
                <Cell col="3" text="남자인원"/>
                <Cell col="4" text="여자인원"/>
                <Cell col="5" text="총진료비"/>
                <Cell col="6" text="할인액"/>
                <Cell col="7" text="단체미수"/>
                <Cell col="8" text="공단미수"/>
                <Cell col="9" text="개인미수"/>
                <Cell col="10" text="현금수납"/>
                <Cell col="11" text="통장수납"/>
                <Cell col="12" text="카드수납"/>
                <Cell col="13" text="절사액"/>
                <Cell col="14" text="선수대체"/>
              </Band>
              <Band id="body">
                <Cell displaytype="date" text="bind:rcptexecdd" calendardisplaynulltype="nulltext"/>
                <Cell col="1" text="bind:cmpyflag"/>
                <Cell col="2" text="bind:totcnt"/>
                <Cell col="3" text="bind:mcnt"/>
                <Cell col="4" text="bind:fcnt"/>
                <Cell col="5" displaytype="number" text="bind:totamt"/>
                <Cell col="6" displaytype="number" text="bind:discamt"/>
                <Cell col="7" displaytype="number" text="bind:cmpyamt"/>
                <Cell col="8" displaytype="number" text="bind:payinsubamt"/>
                <Cell col="9" displaytype="number" text="bind:ownuncoamt"/>
                <Cell col="10" displaytype="number" text="bind:cashamt"/>
                <Cell col="11" displaytype="number" text="bind:onlineamt"/>
                <Cell col="12" displaytype="number" text="bind:cardamt"/>
                <Cell col="13" displaytype="number" text="bind:restamt"/>
                <Cell col="14" displaytype="number" text="bind:mdlrcptamt"/>
              </Band>
              <Band id="summary">
                <Cell style="background:#808080ff;background2:#808080ff;color:#ffffffff;color2:#ffffffff;font:arial,9,bold;"/>
                <Cell col="1" style="background:#808080ff;background2:#808080ff;color:#ffffffff;color2:#ffffffff;font:arial,9,bold;"/>
                <Cell col="2" style="background:#808080ff;background2:#808080ff;color:#ffffffff;color2:#ffffffff;font:arial,9,bold;"/>
                <Cell col="3" style="background:#808080ff;background2:#808080ff;color:#ffffffff;color2:#ffffffff;font:arial,9,bold;"/>
                <Cell col="4" style="background:#808080ff;background2:#808080ff;color:#ffffffff;color2:#ffffffff;font:arial,9,bold;"/>
                <Cell col="5" displaytype="number" style="background:#808080ff;background2:#808080ff;color:#ffffffff;color2:#ffffffff;font:arial,9,bold;" text="expr:getSum('totamt')"/>
                <Cell col="6" displaytype="number" style="background:#808080ff;background2:#808080ff;color:#ffffffff;color2:#ffffffff;font:arial,9,bold;" text="expr:getSum('discamt')"/>
                <Cell col="7" displaytype="number" style="background:#808080ff;background2:#808080ff;color:#ffffffff;color2:#ffffffff;font:arial,9,bold;" text="expr:getSum('cmpyamt')"/>
                <Cell col="8" displaytype="number" style="background:#808080ff;background2:#808080ff;color:#ffffffff;color2:#ffffffff;font:arial,9,bold;" text="expr:getSum('payinsubamt')"/>
                <Cell col="9" displaytype="number" style="background:#808080ff;background2:#808080ff;color:#ffffffff;color2:#ffffffff;font:arial,9,bold;"/>
                <Cell col="10" displaytype="number" style="background:#808080ff;background2:#808080ff;color:#ffffffff;color2:#ffffffff;font:arial,9,bold;" text="expr:getSum('cashamt')"/>
                <Cell col="11" displaytype="number" style="background:#808080ff;background2:#808080ff;color:#ffffffff;color2:#ffffffff;font:arial,9,bold;"/>
                <Cell col="12" displaytype="number" style="background:#808080ff;background2:#808080ff;color:#ffffffff;color2:#ffffffff;font:arial,9,bold;" text="expr:getSum('cardamt')"/>
                <Cell col="13" displaytype="number" style="background:#808080ff;background2:#808080ff;color:#ffffffff;color2:#ffffffff;font:arial,9,bold;" text="expr:getSum('restamt')"/>
                <Cell col="14" displaytype="number" style="background:#808080ff;background2:#808080ff;color:#ffffffff;color2:#ffffffff;font:arial,9,bold;" text="expr:getSum('mdlrcptamt')"/>
              </Band>
            </Format>
          </Formats>
        </Grid>
      </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="srchfromdd" type="STRING" size="256"/>
          <Column id="srchtodd" type="STRING" size="256"/>
          <Column id="srchinstcd" type="STRING" size="256"/>
          <Column id="srchyear" type="STRING" size="256"/>
          <Column id="srchmonth" type="STRING" size="256"/>
          <Column id="srchhealexamflag" type="STRING" size="256"/>
          <Column id="srchsuppdeptcd" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="srchfromdd"/>
            <Col id="srchtodd"/>
            <Col id="srchinstcd"/>
            <Col id="srchyear"/>
            <Col id="srchmonth"/>
            <Col id="srchhealexamflag"/>
            <Col id="srchsuppdeptcd"/>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_main_healexamincm_item" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="rcptexecdd" type="STRING" size="256" sumtext="수납일자"/>
          <Column id="cmpyflag" type="STRING" size="256" sumtext="단체구분"/>
          <Column id="totamt" type="STRING" size="256" sumtext="총진료비"/>
          <Column id="discamt" type="STRING" size="256" sumtext="할인액"/>
          <Column id="cmpyamt" type="STRING" size="256" sumtext="단체미수"/>
          <Column id="payinsubamt" type="STRING" size="256" sumtext="공단미수"/>
          <Column id="ownuncoamt" type="STRING" size="256" sumtext="개인미수"/>
          <Column id="cashamt" type="STRING" size="256" sumtext="현금수납"/>
          <Column id="onlineamt" type="STRING" size="256" sumtext="통장수납"/>
          <Column id="cardamt" type="STRING" size="256" sumtext="카드수납"/>
          <Column id="restamt" type="STRING" size="256" sumtext="절사액"/>
          <Column id="mdlrcptamt" type="STRING" size="256" sumtext="선수대체금"/>
          <Column id="totcnt" type="STRING" size="256" sumtext="총인원"/>
          <Column id="mcnt" type="STRING" size="256" sumtext="남자인원"/>
          <Column id="fcnt" type="STRING" size="256" sumtext="여자인원"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_init_baseinfo_healexamflaglist_A0068" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_init_baseinfo_yearlst_P0167" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
    </Objects>
    <Bind>
      <BindItem id="item0" compid="group2.cmb_healexamflag" propid="value" datasetid="ds_send" columnid="srchhealexamflag"/>
      <BindItem id="item1" compid="group2.ipt_fromdd" propid="value" datasetid="ds_send" columnid="srchfromdd"/>
      <BindItem id="item2" compid="group2.input1" propid="value" datasetid="ds_send" columnid="srchtodd"/>
      <BindItem id="item3" compid="group2.cmb_year" propid="value" datasetid="ds_send" columnid="srchyear"/>
      <BindItem id="item4" compid="group2.cmb_month" propid="value" datasetid="ds_send" columnid="srchmonth"/>
    </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";
function SMAHS00700_oninit(obj:Form, e:InitEventInfo)
{
	frmf_initForm(obj);	
}

function SMAHS00700_onload(obj:Form, e:LoadEventInfo)
{
	grdf_initGrid(grd_healexamincm);
	
	var arrParam = [{dsNm: "ds_init_baseinfo_healexamflaglist_A0068", cdGrpId: "A0068"}
				   ,{dsNm: "ds_init_baseinfo_yearlst_P0167", cdGrpId: "P0167"}
				   ,{dsNm: "ds_init_baseinfo_monthlst_R0009", cdGrpId: "R0009"}]
	appf_getCodeList(arrParam); 
	
	frmf_addComboItem("group2.cmb_healexamflag","전체","%","above");
	group2.cmb_healexamflag.index = 0;
	
	ds_send.setColumn(0, "srchinstcd", sysf_getUserInfo("posinstcd"));
	ds_send.setColumn(0, "srchyear", String(utlf_getCurrentDate()).substr(0,4));
	ds_send.setColumn(0, "srchmonth", String(utlf_getCurrentDate()).substr(4,2));
	
	frmf_inputEnterKey("group2.cmb_year", "onitemchanged", new ItemChangeEventInfo );
	
	ds_send.setColumn(0, "srchsuppdeptcd", sysf_getUserInfo("dutplcecd"));
}

function group2_cmb_year_onitemchanged(obj:Combo, e:ItemChangeEventInfo)
{
	fDate(obj.value , group2.cmb_month.value);
}

function group2_cmb_month_onitemchanged(obj:Combo, e:ItemChangeEventInfo)
{
	fDate(group2.cmb_year.value , obj.value);
}

function fDate(vYear , vMon) 
{
	var dd = new Date(vYear, vMon  ,0);			
	ds_send.setColumn(0, "srchfromdd", vYear + vMon + "01");
	ds_send.setColumn(0, "srchtodd", vYear + vMon + dd.getDate());
}

function group2_btn_search_onclick(obj:Button,  e:ClickEventInfo)
{
	var oParam = {};
		oParam.id          = "TRAHS00701";
		oParam.service     = "healexamstatapp.StatRef";
		oParam.method      = "reqGetEarnMonthList";
		oParam.inds        = "req=ds_send";
		oParam.outds       = "ds_main_healexamincm_item=item";
		oParam.async       = false;
		//oParam.callback    = "cf_TRAHS00701";

	tranf_submit(oParam);
}

function group2_btn_dutyprnt_onclick(obj:Button,  e:ClickEventInfo)
{
	if( ds_main_healexamincm_item.rowposition < 0)
	{
		var totcnt 				= 0;
		var mcnt 				= 0;
		var fcnt 				= 0;
		var totamt 				= 0;
		var discamt 			= 0;
		var cmpyamt 			= 0;
		var ownuncoamt 			= 0;
		var cashamt 			= 0;
		var cardamt 			= 0;
		var mdlrcptamt 			= 0;
		var onlineamt 			= 0;

		var mtotcnt 			= 0;
		var mmcnt 				= 0;
		var mfcnt 				= 0;
		var mtotamt 			= 0;
		var mdiscamt 			= 0;
		var mcmpyamt 			= 0;
		var mownuncoamt 		= 0;
		var mcashamt 			= 0;
		var mcardamt 			= 0;
		var mmdlrcptamt 		= 0;
		var monlineamt 			= 0;

		var rcptexecdd = ds_main_healexamincm_item.getColumn(ds_main_healexamincm_item.rowposition, "rcptexecdd");
		
		for( var i = 0; i < ds_main_healexamincm_item.rowcount; i++ )
		{
			if( rcptexecdd == ds_main_healexamincm_item.getColumn(i, "rcptexecdd") )
			{
				totcnt 			= totcnt 			+	parseInt(ds_main_healexamincm_item.getColumn(i, "totcnt")); 
				mcnt 			= mcnt 				+ 	parseInt(ds_main_healexamincm_item.getColumn(i, "mcnt"));
				fcnt 			= fcnt 				+	parseInt(ds_main_healexamincm_item.getColumn(i, "fcnt"));
				totamt 			= totamt 			+	parseInt(ds_main_healexamincm_item.getColumn(i, "totamt"));
				discamt 		= discamt 			+	parseInt(ds_main_healexamincm_item.getColumn(i, "discamt"));
				cmpyamt 		= cmpyamt			+	parseInt(ds_main_healexamincm_item.getColumn(i, "cmpyamt"));
				ownuncoamt 		= ownuncoamt 		+	parseInt(ds_main_healexamincm_item.getColumn(i, "ownuncoamt"));
				cashamt 	  	= cashamt 			+	parseInt(ds_main_healexamincm_item.getColumn(i, "cashamt"));
				cardamt 	  	= cardamt 			+	parseInt(ds_main_healexamincm_item.getColumn(i, "cardamt"));
				mdlrcptamt 		= mdlrcptamt 		+	parseInt(ds_main_healexamincm_item.getColumn(i, "mdlrcptamt"));
				onlineamt 		= onlineamt  		+	parseInt(ds_main_healexamincm_item.getColumn(i, "onlineamt"));
			}
			
			if(!utlf_isNull(ds_main_healexamincm_item.getColumn(i, "rcptexecdd")))
			{
				mtotcnt 		= mtotcnt 			+	parseInt(ds_main_healexamincm_item.getColumn(i, "totcnt"));
				mmcnt 			= mmcnt 			+ 	parseInt(ds_main_healexamincm_item.getColumn(i, "mcnt"));
				mfcnt 			= mfcnt 			+	parseInt(ds_main_healexamincm_item.getColumn(i, "fcnt"));
				mtotamt 		= mtotamt 			+	parseInt(ds_main_healexamincm_item.getColumn(i, "totamt"));
				mdiscamt		= mdiscamt 			+	parseInt(ds_main_healexamincm_item.getColumn(i, "discamt"));
				mcmpyamt		= mcmpyamt 			+	parseInt(ds_main_healexamincm_item.getColumn(i, "cmpyamt"));
				mownuncoamt 	= mownuncoamt 		+	parseInt(ds_main_healexamincm_item.getColumn(i, "ownuncoamt"));
				mcashamt   		= mcashamt 			+	parseInt(ds_main_healexamincm_item.getColumn(i, "cashamt"));
				mcardamt   		= mcardamt 			+	parseInt(ds_main_healexamincm_item.getColumn(i, "cardamt"));
				mmdlrcptamt 	= mmdlrcptamt 		+	parseInt(ds_main_healexamincm_item.getColumn(i, "mdlrcptamt"));
				monlineamt 		= monlineamt  		+	parseInt(ds_main_healexamincm_item.getColumn(i, "onlineamt"));
			}
		}
		
		dsf_makeValue(ds_main_rexduty, "rcptexecdd", "string", rcptexecdd, 0);
		dsf_makeValue(ds_main_rexduty, "totcnt", "string", totcnt, 0);
		dsf_makeValue(ds_main_rexduty, "mcnt", "string", mcnt, 0);
		dsf_makeValue(ds_main_rexduty, "fcnt", "string", fcnt, 0);
		dsf_makeValue(ds_main_rexduty, "totamt", "string", totamt, 0);
		dsf_makeValue(ds_main_rexduty, "discamt", "string", discamt, 0);
		dsf_makeValue(ds_main_rexduty, "cmpyamt", "string", cmpyamt, 0);
		dsf_makeValue(ds_main_rexduty, "ownuncoamt", "string", ownuncoamt, 0);
		dsf_makeValue(ds_main_rexduty, "cashamt", "string", cashamt, 0);
		dsf_makeValue(ds_main_rexduty, "cardamt", "string", cardamt, 0);
		dsf_makeValue(ds_main_rexduty, "mdlrcptamt", "string", mdlrcptamt, 0);
		dsf_makeValue(ds_main_rexduty, "onlineamt", "string", onlineamt, 0);
		
		dsf_makeValue(ds_main_rexduty, "mtotcnt", "string", mtotcnt, 0);
		dsf_makeValue(ds_main_rexduty, "mmcnt", "string", mmcnt, 0);
		dsf_makeValue(ds_main_rexduty, "mfcnt", "string", mfcnt, 0);
		dsf_makeValue(ds_main_rexduty, "mtotamt", "string", mtotamt, 0);
		dsf_makeValue(ds_main_rexduty, "mdiscamt", "string", mdiscamt, 0);
		dsf_makeValue(ds_main_rexduty, "mcmpyamt", "string", mcmpyamt, 0);
		dsf_makeValue(ds_main_rexduty, "mownuncoamt", "string", mownuncoamt, 0);
		dsf_makeValue(ds_main_rexduty, "mcashamt", "string", mcashamt, 0);
		dsf_makeValue(ds_main_rexduty, "mcardamt", "string", mcardamt, 0);
		dsf_makeValue(ds_main_rexduty, "mmdlrcptamt", "string", mmdlrcptamt, 0);
		dsf_makeValue(ds_main_rexduty, "monlineamt", "string", monlineamt, 0);	

		var objDOM = rptf_createDOM();
			rptf_setNodeListToDOM(objDOM, "/root/main/rexduty", ds_main_rexduty);
		var objParam = new Object();
			objParam.xml_data_XML1 = objDOM.documentElement.source; 
		var option = ""; 
		rptf_exeReportPreview30(["RPAHS00702"],[objParam], option);										
	} 
	else 
	{
		sysf_messageBox("출력할 일자의 건진수입 정보를 선택 후","C003");
	}			
}

function group2_btn_excelsave_onclick(obj:Button,  e:ClickEventInfo)
{
	grdf_exportExcel(grd_healexamincm, "excel", "SheetName", "true", "", "");
}

function group2_btn_prt_onclick(obj:Button,  e:ClickEventInfo)
{
	var objDOM = rptf_createDOM();
		rptf_setNodeListToDOM(objDOM, "/root/main/healexamincm/item", ds_main_healexamincm_item);
	var objParam = new Object();
		objParam.xml_data_XML1 = objDOM.documentElement.source; 
		objParam.srchfromdd = ds_send.getColumn(0, "srchfromdd").toDate().getDateFormat("YYYY/MM/DD")
		objParam.srchtodd = ds_send.getColumn(0, "srchtodd").toDate().getDateFormat("YYYY/MM/DD")
		
	var option = ""; 
	rptf_exeReportPreview30(["RPAHS00701"],[objParam], option);
}
]]></Script>
  </Form>
</FDL>