YNU_JEUS/app_home/himed/xpapps/mis/accountinginfoxp/xp/SMRAR03200_부서별가수금확인.xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SMRAR03200" position="absolute 0 0 1198 777" titletext="가수금 입금 확인" oninit="SMRAR03200_oninit" onload="SMRAR03200_onload">
    <Layouts>
      <Layout>
        <Button position="absolute 1080 17 1136 39" id="btn_print" class="btn4" taborder="9" visible="true" text="출력" anchor="top right" onclick="btn_print_onclick"/>
        <Static id="caption6" text="가수금 입금 확인" class="tit_1" position="absolute 0 0 293 25"/>
        <Grid id="grd_main" taborder="10" binddataset="ds_main_maindatalist" useinputpanel="false" position="absolute 0 149 1194 748" autoenter="select" autofittype="col" cellsizingtype="col" anchor="all">
          <Formats>
            <Format id="default">
              <Columns>
                <Column size="27"/>
                <Column size="138"/>
                <Column size="58"/>
                <Column size="80"/>
                <Column size="60"/>
                <Column size="235"/>
                <Column size="211"/>
                <Column size="79"/>
                <Column size="31"/>
                <Column size="61"/>
                <Column size="111"/>
                <Column size="0"/>
                <Column size="0"/>
                <Column size="0"/>
              </Columns>
              <Rows>
                <Row size="24" band="head"/>
                <Row size="24"/>
              </Rows>
              <Band id="head">
                <Cell/>
                <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="instcd"/>
                <Cell col="12" text="line"/>
                <Cell col="13" text="seqline"/>
              </Band>
              <Band id="body">
                <Cell celltype="head"/>
                <Cell col="1" text="bind:aactno" editautoselect="true"/>
                <Cell col="2" text="bind:aactcd" editautoselect="true"/>
                <Cell col="3" displaytype="date" text="bind:gadate" editautoselect="true" calendardisplaynulltype="nulltext"/>
                <Cell col="4" text="bind:gubun" editautoselect="true"/>
                <Cell col="5" text="bind:rmrk" editautoselect="true"/>
                <Cell col="6" displaytype="text" edittype="text" text="bind:cmt" editautoselect="true"/>
                <Cell col="7" displaytype="date" text="bind:incmymd" editautoselect="true" calendardisplaynulltype="nulltext"/>
                <Cell col="8" displaytype="checkbox" edittype="checkbox" text="bind:incmconfyn" expr="expr:incmconfyn == 'Y' ? 1 : 0" editautoselect="true"/>
                <Cell col="9" text="bind:name" editautoselect="true"/>
                <Cell col="10" displaytype="number" text="bind:gaamt" editautoselect="true"/>
                <Cell col="11" text="bind:instcd"/>
                <Cell col="12" text="bind:line"/>
                <Cell col="13" text="bind:seqline"/>
              </Band>
            </Format>
          </Formats>
        </Grid>
        <Static id="caption1" text="합  계" class="cell_1" position="absolute 942 749 996 772" anchor="left bottom"/>
        <Static id="cpt_gaamtsum" position="absolute 997 749 1112 772" mask="(-)#,###" style="background:#ffccccff;" anchor="left bottom"/>
        <Shape id="line3" class="line_10" position="absolute 0 144 1194 150" anchor="left top right"/>
        <Button id="ipt_excsave" taborder="11" text="엑셀저장" class="btn7" position="absolute 1114 125 1194 144" anchor="top right" onclick="ipt_excsave_onclick"/>
        <Static id="caption21" text="가수금 내역" class="tit_2" position="absolute 0 128 100 149"/>
        <Div id="grp_sea" taborder="12" class="div_SA2" position="absolute 0 42 1195 102" anchor="left top right">
          <Layouts>
            <Layout>
              <Button id="btn_search" taborder="22" text="조회" class="btn1" position="absolute 1063 7 1119 29" anchor="top right" onclick="grp_sea_btn_search_onclick"/>
              <Shape id="line5" linetype="vertical" class="line_4" position="absolute 1039 7 1045 29" anchor="top right"/>
              <Calendar id="ipt_incmymd" taborder="23" class="input_s_essential" position="absolute 892 8 1005 27" mask="yyyy-mm-dd" anchor="default" autoselect="true" autoskip="true" onchanged="grp_sea_ipt_incmymd_onchanged"/>
              <Static id="caption3" text="수입일자 :" class="search_name" position="absolute 801 9 887 26" anchor="default"/>
              <Calendar id="ipt_gadate_fr" taborder="24" class="input_s_essential" position="absolute 164 8 269 27" mask="yyyy-mm-dd" anchor="default" autoselect="true" autoskip="true"/>
              <Static id="caption2" text="~" position="absolute 272 10 287 27" anchor="default"/>
              <Static id="caption5" text="가수금일자 :" class="search_name" position="absolute 61 9 160 26" anchor="default"/>
              <Static id="caption7" text="계좌번호 :" class="search_name" position="absolute 420 9 506 26" anchor="default"/>
              <Calendar id="ipt_gadate_to" taborder="25" class="input_s_essential" position="absolute 285 8 390 27" mask="yyyy-mm-dd" anchor="default" autoselect="true" autoskip="true"/>
              <Button id="btn_erase" taborder="26" text="지우기" class="btn2" position="absolute 693 8 746 27" anchor="default" onclick="grp_sea_btn_erase_onclick"/>
              <Edit id="opt_aactcmt" taborder="27" readonly="true" position="absolute 501 6 660 25" anchor="default" autoselect="true" autoskip="true" class="output"/>
              <Button id="btn_aact" taborder="28" class="icon_search" position="absolute 670 8 686 24" anchor="default" onclick="grp_sea_btn_aact_onclick"/>
              <Static id="caption8" text="위 수입일자로 확인표시된 금액의 합계 :" class="search_name" position="absolute 625 36 889 53" anchor="default"/>
              <MaskEdit id="opt_confsum" taborder="29" readonly="true" mask="#,##0" position="absolute 892 35 1005 54" anchor="default"/>
            </Layout>
          </Layouts>
        </Div>
        <Static id="caption9" position="absolute 766 14 1069 39" text="※ 아래 수입일자에 해당하는 내역만 출력됩니다." style="color:#800000ff;"/>
        <Button id="button39" taborder="14" text="저장" class="btn4" position="absolute 1137 17 1193 39" anchor="top right"/>
      </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="instcd" type="STRING" size="256"/>
          <Column id="incmymd" type="STRING" size="256"/>
          <Column id="gadate_fr" type="STRING" size="256"/>
          <Column id="gadate_to" type="STRING" size="256"/>
          <Column id="aactcmt" type="STRING" size="256"/>
          <Column id="confsum" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="instcd"/>
            <Col id="incmymd"/>
            <Col id="gadate_fr"/>
            <Col id="gadate_to"/>
            <Col id="aactcmt"/>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_main_maindatalist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false" oncolumnchanged="ds_main_maindatalist_oncolumnchanged">
        <ColumnInfo>
          <Column id="instcd" type="STRING" size="256" sumtext="기관코드"/>
          <Column id="line" type="STRING" size="256" sumtext="NO."/>
          <Column id="seqline" type="STRING" size="256" sumtext="SEQ NO."/>
          <Column id="aactno" type="STRING" size="256" sumtext="계좌번호"/>
          <Column id="aactcd" type="STRING" size="256" sumtext="계좌코드"/>
          <Column id="gadate" type="STRING" size="256" sumtext="가수금일자"/>
          <Column id="gubun" type="STRING" size="256" sumtext="구분"/>
          <Column id="rmrk" type="STRING" size="256" sumtext="적요"/>
          <Column id="gaamt" type="STRING" size="256" sumtext="가수금"/>
          <Column id="cmt" type="STRING" size="256" sumtext="비고"/>
          <Column id="incmymd" type="STRING" size="256" sumtext="수입일자(마감일자)"/>
          <Column id="incmconfyn" type="STRING" size="256" sumtext="수입확인여부"/>
          <Column id="incmconfid" type="STRING" size="256" sumtext="수입일자(마감일자)등록자ID"/>
          <Column id="name" type="STRING" size="256" sumtext="수입일자(마감일자)등록자 이름"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_send_aactlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="aactcd" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_hidden_apsl" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="sumgaamt" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_rexprnt_datalist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="instcd" type="STRING" size="256" sumtext="기관코드"/>
          <Column id="line" type="STRING" size="256" sumtext="NO."/>
          <Column id="seqline" type="STRING" size="256" sumtext="SEQ NO."/>
          <Column id="aactno" type="STRING" size="256" sumtext="계좌번호"/>
          <Column id="aactcd" type="STRING" size="256" sumtext="계좌코드"/>
          <Column id="gadate" type="STRING" size="256" sumtext="가수금일자"/>
          <Column id="gubun" type="STRING" size="256" sumtext="구분"/>
          <Column id="rmrk" type="STRING" size="256" sumtext="적요"/>
          <Column id="gaamt" type="STRING" size="256" sumtext="가수금"/>
          <Column id="cmt" type="STRING" size="256" sumtext="비고"/>
          <Column id="incmymd" type="STRING" size="256" sumtext="수입일자(마감일자)"/>
          <Column id="incmconfyn" type="STRING" size="256" sumtext="수입확인여부"/>
          <Column id="incmconfid" type="STRING" size="256" sumtext="수입일자(마감일자)등록자ID"/>
          <Column id="name" type="STRING" size="256" sumtext="수입일자(마감일자)등록자 이름"/>
        </ColumnInfo>
      </Dataset>
    </Objects>
    <Bind>
      <BindItem id="item0" compid="grp_sea.ipt_gadate_fr" propid="value" datasetid="ds_send" columnid="gadate_fr"/>
      <BindItem id="item1" compid="grp_sea.ipt_gadate_to" propid="value" datasetid="ds_send" columnid="gadate_to"/>
      <BindItem id="item2" compid="grp_sea.opt_aactcmt" propid="value" datasetid="ds_send" columnid="aactcmt"/>
      <BindItem id="item3" compid="grp_sea.ipt_incmymd" propid="value" datasetid="ds_send" columnid="incmymd"/>
      <BindItem id="item4" compid="grp_sea.opt_confsum" propid="value" datasetid="ds_send" columnid="confsum"/>
      <BindItem id="item5" compid="cpt_gaamtsum" propid="text" datasetid="ds_hidden_apsl" columnid="sumgaamt"/>
    </Bind>
    <Script type="xscript4.0"><![CDATA[/***************************************************************************************  
 * System Name		:	
 * Job Name 		:	
 * Creator 	    :	
 * Make Date 		:	2017-06-19
 * Description  	:	                                                                   
 *--------------------------------------------------------------------------------------- 
 * Modify Date     	Modifier  	  Modify Description                                   
 *--------------------------------------------------------------------------------------- 
 * 2017-06-19      Live Converter   TF->XP                                           
 *                                                                                        
 *--------------------------------------------------------------------------------------- 
 ****************************************************************************************/
include "com_commonxp::comm_main.xjs";
include "mis_miscommonxp::MIS.xjs";
function SMRAR03200_oninit(obj:Form, e:InitEventInfo)
{
	frmf_initForm(obj);
}

function SMRAR03200_onload(obj:Form, e:LoadEventInfo)
{
	grdf_initGrid(grd_main);
	grdf_setRowTypeIcon(grd_main, 0);
	
	var fdate = utlf_getCurrentDate(); 
	
	ds_send.setColumn(0, "instcd", sysf_getUserInfo("dutplceinstcd"));
	ds_send.setColumn(0, "incmymd", fdate);
	
	var vyear = String(fdate).substr(0,4) + "0101"
	
	ds_send.setColumn(0, "gadate_fr", vyear);
	ds_send.setColumn(0, "gadate_to", fdate);
	
	var oParam = {};
		oParam.id          = "TRRAR03201";
		oParam.service     = "accountinginfoapp.AccountingInfo";
		oParam.method      = "reqGetSangConfList";
		oParam.inds        = "req=ds_send reqAactlist=ds_send_aactlist";
		oParam.outds       = "ds_main_maindatalist=maindatalist";
		oParam.async       = false;
		//oParam.callback    = "cf_TRRAR03201";

	tranf_submit(oParam);
	
	var vConfSum = 0;
	
	for (var i = 0; i < ds_main_maindatalist.rowcount; i++) 
	{
		if(ds_main_maindatalist.getColumn(i, "incmymd") == grp_sea.ipt_incmymd.value)
		{
			vConfSum += parseInt(ds_main_maindatalist.getColumn(i, "gaamt"));
		}
	}
	grp_sea.opt_confsum.value = vConfSum;
}

function grp_sea_btn_aact_onclick(obj:Button,  e:ClickEventInfo)
{
	frmf_modal("SMRAR03100", "SMRAR03100", "", "", "", "", "", "", "", "", "", "", "M");
}

function grp_sea_btn_erase_onclick(obj:Button,  e:ClickEventInfo)
{
	grp_sea.opt_aactcmt.value = "";	
}

function grp_sea_ipt_incmymd_onchanged(obj:Calendar, e:ChangeEventInfo)
{
	var vConfSum = 0;
	
	for (var i = 0; i < ds_main_maindatalist.rowcount; i++) 
	{
		if ( ds_main_maindatalist.getColumn(i, "incmymd") == grp_sea.ipt_incmymd.value ) 
		{
			vConfSum += parseInt(ds_main_maindatalist.getColumn(i, "gaamt"));
		}
	}
	grp_sea.opt_confsum.value = vConfSum;
}

function grp_sea_btn_search_onclick(obj:Button,  e:ClickEventInfo)
{
	fGetMainDataList();
}

function fGetMainDataList()	
{	
	var oParam = {};
		oParam.id          = "TRRAR03201";
		oParam.service     = "accountinginfoapp.AccountingInfo";
		oParam.method      = "reqGetSangConfList";
		oParam.inds        = "req=ds_send reqAactlist=ds_send_aactlist";
		oParam.outds       = "ds_main_maindatalist=maindatalist";
		oParam.async       = false;
		//oParam.callback    = "cf_TRRAR03201";

	tranf_submit(oParam);
	
	var vConfSum = 0;
	for (var i = 0; i < ds_main_maindatalist.rowcount; i++) 
	{
		if ( ds_main_maindatalist.getColumn(i, "incmymd") == grp_sea.ipt_incmymd.value ) 
		{
			vConfSum += parseInt(ds_main_maindatalist.getColumn(i, "gaamt"));
		}
	}
	grp_sea.opt_confsum.value = vConfSum;
}	

function ds_main_maindatalist_oncolumnchanged(obj:Dataset, e:DSColChangeEventInfo)
{
	if (e.columnid == "incmconfyn")
	{
		obj.setColumn(e.row, "incmconfyn", (e.newvalue == "Y" || e.newvalue == 1) ? "Y" : "N");
		
		if (e.newvalue == "1") 
		{
			if (String(grp_sea.ipt_incmymd.value).length != 8) 
			{
				obj.setColumn(e.row, "incmconfyn", "N");
				sysf_messageBox("수입일자가 정확하지 않습니다. 먼저 수입일자를 확인하십시요. ", "E999", "");
				grp_sea.ipt_incmymd.setFocus();
				return;
			}	
									
			obj.setColumn(e.row, "incmymd", grp_sea.ipt_incmymd.value);
			obj.setColumn(e.row, "name", sysf_getUserName());
			
			grp_sea.opt_confsum.value = parseInt(grp_sea.opt_confsum.value) + parseInt(obj.getColumn(e.row, "gaamt"));
		} 
		else 
		{
			if ( obj.getColumn(e.row, "incmymd") == grp_sea.ipt_incmymd.value ) 
			{
				grp_sea.opt_confsum.value = parseInt(grp_sea.opt_confsum.value) - parseInt(obj.getColumn(e.row, "gaamt"));
			}

			obj.setColumn(e.row, "incmymd", "");
			obj.setColumn(e.row, "name", "");
		}
	}				
}

function ipt_excsave_onclick(obj:Button,  e:ClickEventInfo)
{
	grdf_exportExcel(grd_main, "excel", "see", "false");
}

function btn_print_onclick(obj:Button,  e:ClickEventInfo)
{
	var updtdata = grdf_getGridUpdateData(grd_main).rowcount;
						
	if (updtdata == 0)
	{
		sysf_messageBox("변경된 데이터가 존재합니다. 다시 조회하거나, 변경된 데이터를 저장 후 출력하십시요. ", "I999", "");
		return;
	}					
	
	if (String(grp_sea.ipt_incmymd.value).length != 8) 
	{
		sysf_messageBox("수입일자가 정확하지 않습니다. 먼저 수입일자를 확인하십시요. ", "E999", "");
		grp_sea.ipt_incmymd.setFocus();
		return;
	}							

	ds_rexprnt_datalist.clearData();
	
	var listcnt = ds_main_maindatalist.rowcount;
	
	for( var i = 0; i < listcnt ; i++)
	{
		if(ds_main_maindatalist.getColumn(i, "incmymd") == grp_sea.ipt_incmymd.value)
		{
			var cnt = ds_rexprnt_datalist.addRow();
			
			ds_rexprnt_datalist.copyRow(cnt, ds_main_maindatalist, i);
		}
	}
	var objDOM = rptf_createDOM();
		rptf_setNodeListToDOM(objDOM, "/root/rexprnt/datalist", ds_rexprnt_datalist);
		rptf_setNodeListToDOM(objDOM, "/root/send", ds_send);
	var objParam = new Object();
		objParam.xml_data_XML1 = objDOM.documentElement.source;  
	var option = ""; 
	rptf_exeReportPreview30(["SMRAR03201"],[objParam], option);
}
]]></Script>
  </Form>
</FDL>