YNU_JEUS/app_home/himed/xpapps/mis/accountinginfoxp/xp/SMRAR00800_구매건전자결제파일생성.xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SMRAR00800" position="absolute 0 0 1195 776" titletext="전자결제 전송파일 생성" onload="SMRAR00800_onload">
    <Layouts>
      <Layout>
        <Div id="grp_sea" taborder="9" position="absolute 0 25 1194 65" class="div_SA" anchor="left top right">
          <Layouts>
            <Layout>
              <Button id="button2" taborder="0" text="전송내역조회" class="btn1" position="absolute 1073 10 1179 32" anchor="right" onclick="grp_sea_button2_onclick"/>
              <Shape id="line5" linetype="vertical" class="line_4" position="absolute 1054 10 1060 32" anchor="right"/>
              <Calendar id="ipt_gipyoymd" taborder="1" class="input_default" position="absolute 491 11 601 30"/>
              <Static id="caption2" text="기표일자 :" class="search_name" position="absolute 404 12 508 29"/>
              <Calendar id="ipt_senddate" taborder="2" class="input_essential" position="absolute 216 11 326 30"/>
              <Combo id="cmb_sendday" taborder="3" innerdataset="@ds_init_senddaylist" codecolumn="value" datacolumn="label" class="combo_default" position="absolute 103 11 213 30" onitemchanged="grp_sea_cmb_sendday_onitemchanged"/>
              <Static id="caption3" text="전송일자 :" class="search_name" position="absolute 14 12 102 29"/>
            </Layout>
          </Layouts>
        </Div>
        <Static id="caption6" text="전자결제 전송파일 생성" class="tit_1" position="absolute 0 0 180 25"/>
        <Shape id="line3" class="line_10" position="absolute 0 89 1194 95" anchor="left top right"/>
        <Grid id="grd_main" taborder="5" binddataset="ds_main_maindatalist" useinputpanel="false" position="absolute 0 94 1194 745" anchor="all">
          <Formats>
            <Format id="default">
              <Columns>
                <Column size="25" band="left"/>
                <Column size="50"/>
                <Column size="50"/>
                <Column size="110"/>
                <Column size="170"/>
                <Column size="100"/>
                <Column size="100"/>
                <Column size="100"/>
                <Column size="100"/>
                <Column size="300"/>
                <Column size="50"/>
                <Column size="0"/>
                <Column size="0"/>
                <Column size="0"/>
                <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="seq"/>
                <Cell col="13" text="transymd"/>
                <Cell col="14" text="kydate"/>
                <Cell col="15" text="kyseq"/>
                <Cell col="16" text="ymdaction"/>
              </Band>
              <Band id="body">
                <Cell celltype="head"/>
                <Cell col="1" text="bind:line"/>
                <Cell col="2" text="bind:aprvtype"/>
                <Cell col="3" text="bind:entrregno" mask="999-99-99999"/>
                <Cell col="4" displaytype="text" text="bind:custnm"/>
                <Cell col="5" text="bind:ibgoymd" mask="####-##-##"/>
                <Cell col="6" text="bind:yejungymd" mask="####-##-##"/>
                <Cell col="7" displaytype="number" text="bind:keumak" mask="#,###"/>
                <Cell col="8" displaytype="number" text="bind:keumak" mask="#,###"/>
                <Cell col="9" displaytype="text" text="bind:rmrk"/>
                <Cell col="10" text="bind:signflag"/>
                <Cell col="11" text="bind:instcd"/>
                <Cell col="12" text="bind:seq"/>
                <Cell col="13" text="bind:transymd"/>
                <Cell col="14" text="bind:kydate"/>
                <Cell col="15" text="bind:kyseq"/>
                <Cell col="16" text="bind:ymdaction"/>
              </Band>
            </Format>
          </Formats>
        </Grid>
        <Button id="ipt_excsave" taborder="6" text="생 성" class="btn2" position="absolute 1148 67 1194 89" anchor="right" onclick="ipt_excsave_onclick"/>
        <Static id="caption21" text="전자결제 전송파일 생성" class="tit_2" position="absolute 0 73 200 90"/>
        <Button id="button1" taborder="7" text="전송자료생성" class="btn2" position="absolute 1056 67 1145 89" anchor="right" onclick="button1_onclick"/>
        <Grid id="grd_excel" taborder="8" binddataset="ds_main_mainexcellist" useinputpanel="false" visible="false" position="absolute 20 446 1175 726">
          <Formats>
            <Format id="default">
              <Columns>
                <Column size="25" band="left"/>
                <Column size="70"/>
                <Column size="100"/>
                <Column size="103"/>
                <Column size="170"/>
                <Column size="100"/>
                <Column size="100"/>
                <Column size="100"/>
                <Column size="100"/>
                <Column size="170"/>
              </Columns>
              <Rows>
                <Row size="0" band="head"/>
                <Row size="24"/>
              </Rows>
              <Band id="head">
                <Cell/>
                <Cell col="1"/>
                <Cell col="2"/>
                <Cell col="3"/>
                <Cell col="4"/>
                <Cell col="5"/>
                <Cell col="6"/>
                <Cell col="7"/>
                <Cell col="8"/>
                <Cell col="9"/>
              </Band>
              <Band id="body">
                <Cell celltype="head"/>
                <Cell col="1" text="bind:seq"/>
                <Cell col="2" text="bind:entrregno"/>
                <Cell col="3" text="bind:rrgstno" mask="999999-9999999"/>
                <Cell col="4" text="bind:custnm"/>
                <Cell col="5" text="bind:ibgoymd" mask="####-##-##"/>
                <Cell col="6" text="bind:yejungymd" mask="####-##-##"/>
                <Cell col="7" text="bind:keumak"/>
                <Cell col="8" text="bind:keumak"/>
                <Cell col="9" text="bind:rmrk"/>
              </Band>
            </Format>
          </Formats>
        </Grid>
        <Static id="caption1" text="합  계" class="cell_1" position="absolute 534 749 654 772" style="padding:0 0 0 0;align:center middle;"/>
        <Static id="cpt_sumkeumak" position="absolute 656 749 766 772" mask="(-)#,###" style="background:#ffccccff;"/>
      </Layout>
    </Layouts>
    <Objects>
      <Dataset id="ds_main_maindatalist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
        <ColumnInfo>
          <Column id="instcd" type="STRING" size="256"/>
          <Column id="entrregno" type="STRING" size="256"/>
          <Column id="rrgstno" type="STRING" size="256"/>
          <Column id="custnm" type="STRING" size="256"/>
          <Column id="ibgoymd" type="STRING" size="256"/>
          <Column id="yejungymd" type="STRING" size="256"/>
          <Column id="keumak" type="STRING" size="256"/>
          <Column id="rmrk" type="STRING" size="256"/>
          <Column id="transymd" type="STRING" size="256"/>
          <Column id="signflag" type="STRING" size="256"/>
          <Column id="kydate" type="STRING" size="256"/>
          <Column id="kyseq" type="STRING" size="256"/>
          <Column id="ymdaction" type="STRING" size="256"/>
          <Column id="seq" type="STRING" size="256"/>
          <Column id="line" type="STRING" size="256"/>
          <Column id="aprvtype" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="instcd"/>
            <Col id="entrregno"/>
            <Col id="rrgstno"/>
            <Col id="custnm"/>
            <Col id="ibgoymd"/>
            <Col id="yejungymd"/>
            <Col id="keumak"/>
            <Col id="rmrk"/>
            <Col id="transymd"/>
            <Col id="signflag"/>
            <Col id="kydate"/>
            <Col id="kyseq"/>
            <Col id="ymdaction"/>
            <Col id="seq"/>
            <Col id="line"/>
            <Col id="aprvtype"/>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_send" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
        <ColumnInfo>
          <Column id="instcd" type="STRING" size="256"/>
          <Column id="senddate" type="STRING" size="256"/>
          <Column id="signflag" type="STRING" size="256"/>
          <Column id="senddatetmp" type="STRING" size="256"/>
          <Column id="gipyoymd" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="instcd"/>
            <Col id="senddate"/>
            <Col id="signflag"/>
            <Col id="senddatetmp"/>
            <Col id="gipyoymd"/>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_main_mainexcellist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
        <ColumnInfo>
          <Column id="instcd" type="STRING" size="256"/>
          <Column id="seq" type="STRING" size="256"/>
          <Column id="entrregno" type="STRING" size="256"/>
          <Column id="rrgstno" type="STRING" size="256"/>
          <Column id="custnm" type="STRING" size="256"/>
          <Column id="ibgoymd" type="STRING" size="256"/>
          <Column id="yejungymd" type="STRING" size="256"/>
          <Column id="keumak" type="STRING" size="256"/>
          <Column id="rmrk" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="instcd"/>
            <Col id="seq"/>
            <Col id="entrregno"/>
            <Col id="rrgstno"/>
            <Col id="custnm"/>
            <Col id="ibgoymd"/>
            <Col id="yejungymd"/>
            <Col id="keumak"/>
            <Col id="rmrk"/>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_init_senddaylist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
        <ColumnInfo>
          <Column id="label" type="STRING" size="256"/>
          <Column id="value" type="STRING" size="256"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_hidden_apsl" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
        <ColumnInfo>
          <Column id="sumkeumak" type="STRING" size="256"/>
          <Column id="rowcount" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="sumkeumak"/>
            <Col id="rowcount"/>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_hidden" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
        <ColumnInfo>
          <Column id="save" type="STRING" size="256"/>
        </ColumnInfo>
      </Dataset>
    </Objects>
    <Bind>
      <BindItem id="item0" compid="grp_sea.ipt_senddate" propid="value" datasetid="ds_send" columnid="senddate"/>
      <BindItem id="item1" compid="grp_sea.cmb_sendday" propid="value" datasetid="ds_send" columnid="senddatetmp"/>
      <BindItem id="item2" compid="grp_sea.ipt_gipyoymd" propid="value" datasetid="ds_send" columnid="gipyoymd"/>
      <BindItem id="item3" compid="cpt_sumkeumak" propid="value" datasetid="ds_hidden_apsl" columnid="sumkeumak"/>
    </Bind>
    <Script type="xscript4.0"><![CDATA[/***************************************************************************************  
 * System Name		:	
 * Job Name 		:	
 * Creator 	    :	
 * Make Date 		:	2017-12-04
 * Description  	:	                                                                   
 *--------------------------------------------------------------------------------------- 
 * Modify Date     	Modifier  	  Modify Description                                   
 *--------------------------------------------------------------------------------------- 
 * 2017-06-19      Live Converter   TF->XP                                           
 *                                                                                        
 *--------------------------------------------------------------------------------------- 
 ****************************************************************************************/
//=======================================================================================
// Lib Include
//---------------------------------------------------------------------------------------
include "com_commonxp::comm_main.xjs";
include "mis_miscommonxp::MIS.xjs";
include "mis_humtrafactmngtxp::RPB001.xjs";

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

//=======================================================================================
// Function 
//---------------------------------------------------------------------------------------
/*-**************************************************************************************
 * Argument			: N/A
 * Description		: 
 ****************************************************************************************/
					//정렬 순서로 sort함.
					function fGetSortSeq(){
						var num = grd_main.rows- 1;
						if(rdo_seq.value == 1){
							grd_main.sort(1, 2, num, 2) = "asc";
						}else{
							grd_main.sort(1, 3, num, 3) = "asc";
						}

//model.refresh();

					}

					//출력물순서 저장

					//엑셀 입력
					function fInputExcel(pGrid) {
						var fileName = window.fileDialog("open", ",", false, "", "xls", "All Files (*.*)|*.*|Excel Files(*.xls)|*.xls");
						if(fileName != "") {
							pGrid.loadExcel(fileName, 1, true);
							pGrid.deleteRow(1);

							for(i = 1; i < pGrid.rows; i++) {
								pGrid.rowStatus(i) = 1;
							}

//pGrid.refresh();

						}
					}
					
/*-**************************************************************************************
 * Argument			: N/A
 * Description		: 전송내역조회
 ****************************************************************************************/
function call_TRRAR00801() {
	ds_main_maindatalist.clearData();
	ds_main_mainexcellist.clearData();
	var oParam = {};
		oParam.id          = "TRRAR00801";
		oParam.service     = "accountinginfoapp.AccountingInfo";
		oParam.method      = "getElectronPayList";
		oParam.inds        = "req=ds_send";
		oParam.outds       = "ds_main_maindatalist=maindatalist ds_main_mainexcellist=mainexcellist";
		oParam.async       = false;
		oParam.callback    = "cf_TRRAR00801";

	tranf_submit(oParam);
}
function cf_TRRAR00801(sSvcId, nErrorCode, sErrorMsg) {
	arErrorCode.push(sSvcId, nErrorCode);
	if(ds_main_maindatalist.rowcount < 1) sysf_messageBox("조회된 결과가 없습니다.", "I");
}

/*-**************************************************************************************
 * Argument			: N/A
 * Description		: 조회가능한 전송일자 리스트
 ****************************************************************************************/
function fGetSendDayList() {
	var oParam = {};
		oParam.id          = "TRRAR00802";
		oParam.service     = "accountinginfoapp.AccountingInfo";
		oParam.method      = "getSenddayList";
		oParam.inds        = "req=ds_send";
		oParam.outds       = "ds_init_senddaylist=senddaylist";
		oParam.async       = false;
		//oParam.callback    = "cf_TRRAR00802";

	tranf_submit(oParam);
}

//data checking logic..
function fSetChackValue() {
	/*var row = grd_main.row;
	var signflagN = 0;
	for ( var i = grd_main.fixedRows; i <= grd_main.rows; i++ ) {							
		if ( grd_main.valueMatrix(i, grd_main.colRef("signflag"))=="N" ){
			signflagN = signflagN + 1;
		}
	}
	if ( signflagN == 0 ) {
		alert("전송자료생성을 클릭하셔서 조회 후 생성해 주세요.");
		return false;
	}*/
	return true;
}					
					
//=======================================================================================
// Event
//---------------------------------------------------------------------------------------
/****************************************************************************************
 * Components		: Form
 * Description		: 화면 처음 초기화시 폼초기화
 ****************************************************************************************/
function SMRAR00800_onload(obj:Form, e:LoadEventInfo)
{
	frmf_initForm(obj); 
	//grdf_initGrid(grd_XXX); 
	//grdf_setGridSort(grd_XXX); 
	grdf_setRowTypeIcon(grd_main, 0); 
	grdf_setRowTypeIcon(grd_excel, 0); 

	var fdate = utlf_getCurrentDate();
	ds_main_maindatalist.clearData();
	ds_main_mainexcellist.clearData();
	ds_send.setColumn( 0, "instcd",   sysf_getUserInfo("dutplceinstcd"));
	ds_send.setColumn( 0, "senddate", fdate); 
	//2013.01.21 박준범 - 기표일자 조건 추가
	ds_send.setColumn( 0, "gipyoymd", fdate); 

	fGetSendDayList();

	button1.click();	//전송자료생성버튼 click	
}

/****************************************************************************************
 * Components		: Button
 * Description		: 전송내역조회
 ****************************************************************************************/
function grp_sea_button2_onclick(obj:Button, e:ClickEventInfo) {
//	setAlertOn();
	ds_send.setColumn( 0, "signflag", "Y");							

	call_TRRAR00801();

	if (arErrorCode.pop("TRRAR00801") > -1){
		//2011.06.20 박준범 -  " i <= grd_main.rows" 이 부분의 부등호를 "<" 로 변경함
		for ( var i = 0; i < ds_main_maindatalist.rowcount; i++ ) {							
			ds_main_maindatalist.setColumn(i, "line", i+1);
		}
	}
}

/****************************************************************************************
 * Components		: Combo
 * Description		: 전송일자 조건 변경
 ****************************************************************************************/
function grp_sea_cmb_sendday_onitemchanged(obj:Combo, e:ItemChangeEventInfo) {
	ds_send.setColumn( 0, "senddate", e.postvalue );
	grp_sea.button2.click();
}

/****************************************************************************************
 * Components		: Button
 * Description		: 생성
 ****************************************************************************************/
function ipt_excsave_onclick(obj:Button, e:ClickEventInfo) {
	if( fSetChackValue() ) {		//저장시 입력data checking logic..
		rtn = sysf_messageBox("아래의 DATA 생성을","Q003");
		if ( rtn == "6" ) {
			var signflagY = 0;
			//2011.06.20 박준범 -  " i <= grd_main.rows" 이 부분의 부등호를 "<" 로 변경함
			for ( var i = 0; i < ds_main_maindatalist.rowcount; i++ ) {							
				if ( ds_main_maindatalist.getColumn(i, "signflag")=="Y" ){
					signflagY = signflagY + 1;
				}
			}

			if ( signflagY > 0 ) {
				misfSaveExcel(grd_excel);
			}else{
				//N 인경우 DATA를 UPDATE 하고 아닌경우는 엑셀만 받는다.
				//2011.06.20 박준범 -  " i <= grd_main.rows" 이 부분의 부등호를 "<" 로 변경함
				for ( var i = 0; i < ds_main_maindatalist.rowcount; i++ ) {
					grdf_setStatus(grd_main, "U", [i]);
					ds_main_maindatalist.setColumn(i, "transymd", grp_sea.ipt_senddate.value);
					ds_main_maindatalist.setColumn(i, "signflag", "Y");
					ds_main_maindatalist.setColumn(i, "seq", ds_main_maindatalist.getColumn(i, "line"));
				}

				//입력,수정,삭제된 data save node 에 담기..
				dsf_createDs("ds_hidden_save");
				dsf_createDs("ds_temp_unsllist");
				var dsUpdate = grdf_getGridUpdateData(grd_exmptmpl, "all");
				grdf_setStatusColumn(dsUpdate, "status");
				ds_hidden_save.copyData(dsUpdate, true);

				var oParam = {};
					oParam.id          = "TXRAR00801";
					oParam.service     = "accountinginfoapp.AccountingInfo";
					oParam.method      = "setElectronPayList";
					oParam.inds        = "req=ds_hidden_save";
					oParam.outds       = "ds_temp_unsllist=unsllist";
					oParam.async       = false;
					oParam.callback    = "cf_TXRAR00801";

				tranf_submit(oParam);
				
				if(arErrorCode.pop("TXRAR00801") > -1) {
					//2011.06.22 박준범 - Excel 자료 생성시점을 다시 조회하기 전으로 옮겼음 
					misfSaveExcel(grd_excel);
					
					fGetSendDayList();
					//2011.06.22 박준범 - 하단의 구현된 것이 button2 클릭 이벤트의 구현부와 동일하여 event 호출로 대체함
					grp_sea.button2.click();	//전송내역조회버튼 click
				}
			}
		}
	}
}
function cf_TXRAR00801(sSvcId, nErrorCode, sErrorMsg) {
    arErrorCode.push(sSvcId, nErrorCode);
}

/****************************************************************************************
 * Components		: Button
 * Description		: 전송자료 생성
 ****************************************************************************************/
function button1_onclick(obj:Button, e:ClickEventInfo) {
//	setAlertOn();
	ds_send.setColumn( 0, "signflag", "N");
	
	call_TRRAR00801();
	
	if(arErrorCode.pop("TRRAR00801") > -1) {
		//2011.06.20 박준범 -  " i <= grd_main.rows" 이 부분의 부등호를 "<" 로 변경함
		for ( var i = 0; i < ds_main_maindatalist.rowcount; i++ ) {							
			ds_main_maindatalist.setColumn(i, "line", i+1);
		}
	}				
}
]]></Script>
  </Form>
</FDL>