YNU_JEUS/app_home/himed/xpapps/mis/slipxp/xp/SPRAD00103_현금영수증사용내역관리.xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SPRAD00103" position="absolute 0 0 551 255" titletext="현금영수증 사용내역 관리" oninit="SPRAD00103_oninit" onload="SPRAD00103_onload">
    <Layouts>
      <Layout>
        <Static id="caption6" text="현금영수증 사용내역 관리" class="tit_1" position="absolute 0 0 316 22"/>
        <MaskEdit id="ipt_profcnt" taborder="1" mask="###" class="input_essential" position="absolute 408 79 530 98"/>
        <Static id="caption12" text="증빙매수" class="cell_1" position="absolute 305 77 405 100"/>
        <Edit id="ipt_posspsn" taborder="2" class="input_essential" position="absolute 111 31 208 50" autoselect="true" autoskip="true" onkeydown="ipt_posspsn_onkeydown"/>
        <Shape id="line11" class="line_3" position="absolute 0 220 543 226"/>
        <Shape id="line15" linetype="vertical" class="line_2" position="absolute 26 124 32 221"/>
        <MaskEdit id="ipt_entrregno" taborder="3" mask="###-##-#####" class="input_default" position="absolute 111 127 293 146" autoselect="true" autoskip="true" maskchar=" " trimtype="both" type="string" style="align:left middle;"/>
        <Edit id="input2" taborder="4" class="input_default" position="absolute 111 199 333 218"/>
        <Edit id="input1" taborder="5" class="input_default" position="absolute 111 174 543 193"/>
        <Edit id="ipt_custnm" taborder="6" class="input_default" position="absolute 111 151 333 170"/>
        <Shape id="line7" class="line_2" position="absolute 0 122 543 128"/>
        <Shape id="line6" class="line_2" position="absolute 0 74 543 80"/>
        <Shape id="line5" class="line_2" position="absolute 0 50 543 56"/>
        <Static id="caption9" text="전화번호" class="cell_1" position="absolute 30 197 108 220"/>
        <Static id="caption8" text="사용금액" class="cell_1" position="absolute 0 77 108 100"/>
        <Shape id="line3" class="line_2" position="absolute 0 98 543 104"/>
        <Static id="caption15" text="적요" class="cell_1" position="absolute 0 101 108 124"/>
        <Static id="caption14" text="사업자번호" class="cell_1" position="absolute 30 125 108 148"/>
        <Static id="caption5" text="주소" class="cell_1" position="absolute 30 173 108 196"/>
        <Static id="caption3" text="사용일자" class="cell_1" position="absolute 0 53 108 76"/>
        <Static id="caption11" text="가맹점" class="cell_1" position="absolute 0 125 29 221"/>
        <Static id="caption2" text="상호" class="cell_1" position="absolute 30 149 108 172"/>
        <Static id="caption10" text="사용자" class="cell_1" position="absolute 0 29 108 52"/>
        <Shape id="line12" class="line_2" position="absolute 0 146 543 152"/>
        <Shape id="line9" class="line_2" position="absolute 0 170 543 176"/>
        <Shape id="line8" class="line_2" position="absolute 0 194 543 200"/>
        <Button id="btn_userhelp" taborder="7" class="icon_search" position="absolute 213 32 229 48" onclick="btn_userhelp_onclick"/>
        <Edit id="ipt_posspsnnm" taborder="8" class="input_essential" position="absolute 233 31 458 50" onkeydown="ipt_posspsnnm_onkeydown"/>
        <MaskEdit id="ipt_amt" taborder="9" mask="(-)#,###" class="input_essential" position="absolute 111 79 293 98" onkeydown="ipt_amt_onkeydown"/>
        <Edit id="ipt_cmt" taborder="10" class="input_essential" position="absolute 111 103 458 122" onkeydown="ipt_cmt_onkeydown"/>
        <Calendar id="ipt_usedd" taborder="11" class="input_essential" position="absolute 111 55 293 74" onkeydown="ipt_usedd_onkeydown"/>
        <Shape id="line2" class="line_10" position="absolute 0 24 543 30"/>
        <Grid id="grd_cardexpsevdnc" taborder="12" binddataset="ds_grd_cardexpsevdnc" useinputpanel="false" visible="false" position="absolute 27 232 72 249">
          <Formats>
            <Format id="default">
              <Columns>
                <Column size="30"/>
                <Column size="29"/>
                <Column size="26"/>
                <Column size="52"/>
                <Column size="37"/>
                <Column size="54"/>
                <Column size="26"/>
                <Column size="47"/>
                <Column size="43"/>
                <Column size="35"/>
                <Column size="35"/>
                <Column size="31"/>
                <Column size="50"/>
                <Column size="39"/>
                <Column size="38"/>
                <Column size="39"/>
                <Column size="50"/>
                <Column size="50"/>
                <Column size="50"/>
                <Column size="100"/>
              </Columns>
              <Rows>
                <Row size="24" band="head"/>
                <Row size="24"/>
              </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="소유자id"/>
                <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="주소"/>
                <Cell col="15" text="전화번호"/>
                <Cell col="16" text="미결전표일자"/>
                <Cell col="17" text="미결전표번호"/>
                <Cell col="18" text="미결일련번호"/>
                <Cell col="19"/>
              </Band>
              <Band id="body">
                <Cell text="bind:instcd"/>
                <Cell col="1" text="bind:seqno"/>
                <Cell col="2" text="bind:useflag"/>
                <Cell col="3" text="bind:instcardseqno"/>
                <Cell col="4" text="bind:cardcmpycd"/>
                <Cell col="5" text="bind:posspsn"/>
                <Cell col="6" text="bind:posspsnnm"/>
                <Cell col="7" text="bind:possdeptcd"/>
                <Cell col="8" text="bind:possdeptnm"/>
                <Cell col="9" text="bind:usedd"/>
                <Cell col="10" text="bind:useamt"/>
                <Cell col="11" text="bind:mainrec"/>
                <Cell col="12" text="bind:entrregno"/>
                <Cell col="13" text="bind:custnm"/>
                <Cell col="14" text="bind:custaddr"/>
                <Cell col="15" text="bind:cntctel"/>
                <Cell col="16" text="bind:unsldd"/>
                <Cell col="17" text="bind:unslno"/>
                <Cell col="18" text="bind:undeciseqno"/>
                <Cell col="19" text="bind:profcnt"/>
              </Band>
            </Format>
          </Formats>
        </Grid>
        <Shape id="line1" class="line_6" visible="false" position="absolute -1 226 542 232"/>
        <Button id="btn_save" taborder="13" text="저장" class="btn4" position="absolute 371 230 427 252" onclick="btn_save_onclick"/>
        <Button id="btn_delete" taborder="14" text="삭제" class="btn4" position="absolute 429 230 485 252" onclick="btn_delete_onclick"/>
        <Button id="btn_close" taborder="15" text="닫기" class="btn4" position="absolute 487 230 543 252" onclick="btn_close_onclick"/>
      </Layout>
    </Layouts>
    <Objects>
      <Dataset id="ds_main_list_cardexpsevdnc" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false" oncolumnchanged="ds_main_list_cardexpsevdnc_oncolumnchanged">
        <ColumnInfo>
          <Column id="instcd" type="STRING" size="256"/>
          <Column id="seqno" type="STRING" size="256"/>
          <Column id="useflag" type="STRING" size="256"/>
          <Column id="instcardseqno" type="STRING" size="256"/>
          <Column id="cardcmpycd" type="STRING" size="256"/>
          <Column id="posspsn" type="STRING" size="256"/>
          <Column id="posspsnnm" type="STRING" size="256"/>
          <Column id="possdeptcd" type="STRING" size="256"/>
          <Column id="possdeptnm" type="STRING" size="256"/>
          <Column id="usedd" type="STRING" size="256"/>
          <Column id="useamt" type="STRING" size="256"/>
          <Column id="mainrec" type="STRING" size="256"/>
          <Column id="entrregno" type="STRING" size="256"/>
          <Column id="custnm" type="STRING" size="256"/>
          <Column id="custaddr" type="STRING" size="256"/>
          <Column id="cntctel" type="STRING" size="256"/>
          <Column id="unsldd" type="STRING" size="256"/>
          <Column id="unslno" type="STRING" size="256"/>
          <Column id="undeciseqno" type="STRING" size="256"/>
          <Column id="profcnt" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="instcd"/>
            <Col id="seqno"/>
            <Col id="useflag">3</Col>
            <Col id="instcardseqno"/>
            <Col id="cardcmpycd"/>
            <Col id="posspsn"/>
            <Col id="posspsnnm"/>
            <Col id="possdeptcd"/>
            <Col id="possdeptnm"/>
            <Col id="usedd"/>
            <Col id="useamt"/>
            <Col id="mainrec"/>
            <Col id="entrregno"/>
            <Col id="custnm"/>
            <Col id="custaddr"/>
            <Col id="cntctel"/>
            <Col id="unsldd"/>
            <Col id="unslno"/>
            <Col id="undeciseqno"/>
            <Col id="profcnt"/>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_send_retrparams" 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="seqno" type="STRING" size="256"/>
          <Column id="useflag" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="instcd"/>
            <Col id="seqno"/>
            <Col id="useflag"/>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_target_slipinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_temp_seqno" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="seqno" type="STRING" size="256"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_target" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
    </Objects>
    <Bind>
      <BindItem id="item0" compid="ipt_posspsn" propid="value" datasetid="ds_main_list_cardexpsevdnc" columnid="posspsn"/>
      <BindItem id="item1" compid="ipt_posspsnnm" propid="value" datasetid="ds_main_list_cardexpsevdnc" columnid="posspsnnm"/>
      <BindItem id="item2" compid="ipt_usedd" propid="value" datasetid="ds_main_list_cardexpsevdnc" columnid="usedd"/>
      <BindItem id="item3" compid="ipt_amt" propid="value" datasetid="ds_main_list_cardexpsevdnc" columnid="useamt"/>
      <BindItem id="item4" compid="ipt_profcnt" propid="value" datasetid="ds_main_list_cardexpsevdnc" columnid="profcnt"/>
      <BindItem id="item5" compid="ipt_cmt" propid="value" datasetid="ds_main_list_cardexpsevdnc" columnid="mainrec"/>
      <BindItem id="item6" compid="ipt_entrregno" propid="value" datasetid="ds_main_list_cardexpsevdnc" columnid="entrregno"/>
      <BindItem id="item7" compid="ipt_custnm" propid="value" datasetid="ds_main_list_cardexpsevdnc" columnid="custnm"/>
      <BindItem id="item8" compid="input1" propid="value" datasetid="ds_main_list_cardexpsevdnc" columnid="custaddr"/>
      <BindItem id="item9" compid="input2" propid="value" datasetid="ds_main_list_cardexpsevdnc" columnid="cntctel"/>
    </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";
include "mis_acntcommonxp::RAD001.xjs";
include "mis_miscommonxp::RAC001.xjs";
function SPRAD00103_oninit(obj:Form, e:InitEventInfo)
{
	frmf_initForm(obj);
}

function SPRAD00103_onload(obj:Form, e:LoadEventInfo)
{
	grdf_initGrid(grd_cardexpsevdnc);
	
	try
	{
		ds_target_slipinfo.copyData(arg_ds_target_slipinfo);
	}
	catch(e)
	{
	}
	
	try
	{
		ds_target.copyData(arg_ds_target);
	}
	catch(e)
	{
	}
	
	fInitialize();
}

function fInitialize()
{
	ds_main_list_cardexpsevdnc.clearData();
	
	ds_send_retrparams.setColumn(0, "instcd", ds_target_slipinfo.getColumn(0, "instcd"));
	ds_send_retrparams.setColumn(0, "seqno", ds_target_slipinfo.getColumn(0, "seqno"));
	ds_send_retrparams.setColumn(0, "useflag", ds_target_slipinfo.getColumn(0, "profflag"));
	
	//misfMsterDetailSet(grd_cardexpsevdnc, null, "TRRAD00104", "Y");
	misfMsterDetailRetrieve();

	if(ds_main_list_cardexpsevdnc.rowcount == 0)
	{
		ds_main_list_cardexpsevdnc.addRow();
		
		ds_main_list_cardexpsevdnc.setColumn(0, "unsldd", ds_target_slipinfo.getColumn(0, "unsldd"));
		ds_main_list_cardexpsevdnc.setColumn(0, "unslno", ds_target_slipinfo.getColumn(0, "unslno"));
		
		if(ds_target_slipinfo.getColumnInfo("undeciseqno"))
		{
			ds_main_list_cardexpsevdnc.setColumn(0, "undeciseqno", ds_target_slipinfo.getColumn(0, "undeciseqno"));
		}
		ds_main_list_cardexpsevdnc.setColumn(0, "useflag", ds_target_slipinfo.getColumn(0, "profflag"));
	}
	else
	{
		ipt_usedd.enable = false;
	}
	
	if(utlf_isNull(ds_main_list_cardexpsevdnc.getColumn(0, "useflag")))
	{
		ds_main_list_cardexpsevdnc.setColumn(0, "useflag", "3");
	}
	
	dsf_makeValue(ds_main_list_cardexpsevdnc, "dummy", "string", "", 0);
	dsf_makeValue(ds_main_list_cardexpsevdnc, "profcnt", "string", "", 0);
	dsf_makeValue(ds_main_list_cardexpsevdnc, "instcd", "string", ds_target_slipinfo.getColumn(0, "instcd"), 0);
	
	if(utlf_isNull(ds_main_list_cardexpsevdnc.getColumn(0, "entrregno")) && !utlf_isNull(ds_target_slipinfo.getColumn(0, "custcd")))
	{
		ds_main_list_cardexpsevdnc.setColumn(0, "entrregno", ds_target_slipinfo.getColumn(0, "custcd"));
	}	
	
	if(utlf_isNull(ds_main_list_cardexpsevdnc.getColumn(0, "posspsn")))
	{
		if(frmf_checkOpener())
		{
			dsf_makeValue(ds_main_list_cardexpsevdnc, "mainrec", "string", ds_target_slipinfo.getColumn(0, "etcnotefact"), 0);
			dsf_makeValue(ds_main_list_cardexpsevdnc, "useamt", "string", ds_target_slipinfo.getColumn(0, "amt"), 0);
			//dsf_makeValue(ds_main_list_cardexpsevdnc, "posspsn", "string", ds_target_slipinfo.getColumn(0, "emplno"), 0);
		}
	}
}

function ipt_posspsn_onkeydown(obj:Edit, e:KeyEventInfo)
{
	if(e.keycode == 13)
	{
		obj.updateToDataset();
		ipt_usedd.setFocus();
	}
}

function ds_main_list_cardexpsevdnc_oncolumnchanged(obj:Dataset, e:DSColChangeEventInfo)
{
	if(e.columnid == "posspsn")
	{
		ipt_posspsn.value = e.newvalue;
		ipt_posspsn.setFocus();
		misfValidationCheck("49", "", "posspsn,posspsnnm", "", "", "code","");
	}
	
	if(e.columnid == "posspsnnm")
	{
		ipt_posspsnnm.value = e.newvalue;
		ipt_posspsnnm.setFocus();
		misfValidationCheck("49", "", "posspsn,posspsnnm","","","name","");
	}
	
	if(e.columnid == "entrregno")
	{
		ipt_entrregno.value = e.newvalue;
		ipt_entrregno.setFocus();
		racfCustValidCheck("entrregno,custnm,dummy,cntctel,custaddr", "code");		
	}
	
	if(e.columnid == "custnm")
	{
		ipt_custnm.value = e.newvalue;
		ipt_custnm.setFocus();
		racfCustValidCheck("entrregno,custnm,dummy,cntctel,custaddr", "name");	
	}
}

function btn_userhelp_onclick(obj:Button,  e:ClickEventInfo)
{
	misfOpenPopUpList("49", ds_main_list_cardexpsevdnc, "", "posspsn,posspsnnm");
}

function ipt_posspsnnm_onkeydown(obj:Edit, e:KeyEventInfo)
{
	if(e.keycode == 13)
	{
		obj.updateToDataset();
		ipt_usedd.setFocus();
	}
}

function ipt_usedd_onkeydown(obj:Calendar, e:KeyEventInfo)
{
	if(e.keycode == 13)
	{
		obj.updateToDataset();
		ipt_amt.setFocus();
	}
}

function ipt_amt_onkeydown(obj:MaskEdit, e:KeyEventInfo)
{
	if(e.keycode == 13)
	{
		obj.updateToDataset();
		ipt_cmt.setFocus();
	}
}

function ipt_cmt_onkeydown(obj:Edit, e:KeyEventInfo)
{
	if(e.keycode == 13)
	{
		obj.updateToDataset();
		btn_save.setFocus();
	}
}

function btn_save_onclick(obj:Button,  e:ClickEventInfo)
{
	fSave();
}

function fSave()
{
	if(utlf_isNull(ds_main_list_cardexpsevdnc.getColumn(0, "usedd")))
	{
		sysf_messageBox("사용일자는" ,"I003");
		ipt_usedd.setFocus();
		return;
	}
	
	var oParam = {};
		oParam.id          = "TXRAD00104";
		oParam.service     = "slipapp.Slip";
		oParam.method      = "reqExeSaveCardExpsEvdnc";
		oParam.inds        = "req=ds_main_list_cardexpsevdnc:u";
		oParam.outds       = "ds_temp_seqno=seqno";
		oParam.async       = false;
		//oParam.callback    = "cf_TXRAD00104";

	tranf_submit(oParam);
	
	var receiveref = eval("opener."+ds_target.getColumn(0, "receiveref"));
	
	if (frmf_checkOpener())
	{
		receiveref.setColumn(0, "seqno", ds_temp_seqno.getColumn(0, "seqno"));
		receiveref.setColumn(0, "amt", ds_main_list_cardexpsevdnc.getColumn(0, "useamt"));
		
		if(utlf_isNull(receiveref.getColumn(0, "etcnotefact")))
		{
			receiveref.setColumn(0, "etcnotefact", ds_main_list_cardexpsevdnc.getColumn(0, "mainrec"));
		}
		sysf_messageBox("저장이 " ,"I002");			    
	}
	else
	{
		sysf_messageBox("상위화면이 변경되어 데이터를 전달할 수 ", "I004");
	}
	
	ds_main_list_cardexpsevdnc.setColumn(0, "seqno", ds_temp_seqno.getColumn(0, "seqno"));

	ipt_usedd.enable = false;
}

function btn_delete_onclick(obj:Button,  e:ClickEventInfo)
{
	fDel();
}

function fDel()
{
	ds_main_list_cardexpsevdnc.updatecontrol = false;
	ds_main_list_cardexpsevdnc.setRowType(0, "d");
	ds_main_list_cardexpsevdnc.updatecontrol = true;
	
	var oParam = {};
		oParam.id          = "TXRAD00104";
		oParam.service     = "slipapp.Slip";
		oParam.method      = "reqExeSaveCardExpsEvdnc";
		oParam.inds        = "req=ds_main_list_cardexpsevdnc:u";
		oParam.outds       = "ds_temp_seqno=seqno";
		oParam.async       = false;
		//oParam.callback    = "cf_TXRAD00104";

	tranf_submit(oParam);
	
	ds_main_list_cardexpsevdnc.clearData();
	
	var receiveref = ds_target.getColumn(0, "receiveref");
	
	if (frmf_checkOpener())
	{
		opener.model.setValue(receiveref + "/seqno",		"");
	}
	else
	{
		sysf_messageBox("상위화면이 변경되어 데이터를 전달할 수 ", "I004");
	}
	
	ds_main_list_cardexpsevdnc.addRow();
	
	dsf_makeValue(ds_main_list_cardexpsevdnc, "dummy", "string", "", 0);
	
	ds_main_list_cardexpsevdnc.setColumn(0, "seqno", "");
	ds_main_list_cardexpsevdnc.setColumn(0, "unsldd", ds_target_slipinfo.getColumn(0, "unsldd"));
	ds_main_list_cardexpsevdnc.setColumn(0, "unslno", ds_target_slipinfo.getColumn(0, "unslno"));
	ds_main_list_cardexpsevdnc.setColumn(0, "undeciseqno", ds_target_slipinfo.getColumn(0, "undeciseqno"));
	ds_main_list_cardexpsevdnc.setColumn(0, "useflag", ds_target_slipinfo.getColumn(0, "profflag"));
	ds_main_list_cardexpsevdnc.setColumn(0, "entrregno", ds_target_slipinfo.getColumn(0, "custcd"));
		
	ipt_usedd.enable = true;
}

function btn_close_onclick(obj:Button,  e:ClickEventInfo)
{
	this.close();
}
]]></Script>
  </Form>
</FDL>