YNU_JEUS/app_home/himed/xpapps/mis/acntknuhxp/xp/SMRAH02100_회계관리번호.xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SMRAH02100" position="absolute 0 0 945 784" titletext="관리번호" oninit="SMRAH02100_oninit" onload="SMRAH02100_onload">
    <Layouts>
      <Layout>
        <Static text="관리번호" position="absolute 0 0 91 25" id="caption1" class="tit_1"/>
        <Shape position="absolute 3 25 940 82" id="rectangle1" type="roundrectangle"/>
        <Static text="코드" position="absolute 60 57 110 74" id="caption11" class="search_name"/>
        <Edit position="absolute 116 56 254 75" id="input13" class="input_default" autoselect="true"/>
        <Button position="absolute 832 41 888 63" id="btn_sea" class="btn1" text="조회" onclick="btn_sea_onclick"/>
        <Shape position="absolute 812 30 818 77" linetype="vertical" id="line6"/>
        <Shape position="absolute 3 113 938 114" linetype="vertical" id="line7" class="line_1"/>
        <Grid position="absolute 3 117 940 752" id="datagrid1" binddataset="ds_main_codeinfo_codelist" autoenter="select" cellsizingtype="col" onexpanddown="datagrid1_onexpanddown">
          <Formats>
            <Format id="default">
              <Columns>
                <Column size="24"/>
                <Column size="100"/>
                <Column size="108"/>
                <Column size="128"/>
                <Column size="297"/>
                <Column size="56"/>
                <Column size="100"/>
                <Column size="55"/>
                <Column size="55"/>
                <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="caption1"/>
              </Band>
              <Band id="body">
                <Cell celltype="head" expr="currow + 1"/>
                <Cell col="1" displaytype="text" edittype="text" style="align:left top;padding:5 2 1 2;" text="bind:cdid" wordwrap="word" editautoselect="true" enable="false"/>
                <Cell col="2" displaytype="text" edittype="text" style="align:left top;padding:5 2 1 2;" text="bind:cntlcd1" wordwrap="word" editautoselect="true"/>
                <Cell col="3" displaytype="text" edittype="text" style="align:left top;padding:5 2 1 2;" text="bind:cdnm" wordwrap="word" editautoselect="true"/>
                <Cell col="4" displaytype="text" edittype="text" style="align:left top;padding:5 2 1 2;" text="bind:detldesc" wordwrap="word" editautoselect="true"/>
                <Cell col="5" displaytype="text" edittype="text" style="align:left top;padding:5 2 1 2;" text="bind:cntlcd2" wordwrap="word" editautoselect="true" expandshow="show"/>
                <Cell col="6" style="align:left top;padding:5 2 1 2;" text="bind:custnm" wordwrap="word" editautoselect="true"/>
                <Cell col="7" displaytype="combo" edittype="combo" style="align:center;" text="bind:useyn"/>
                <Cell col="8" displaytype="text" edittype="text" text="bind:cntlcd3" mask="#"/>
                <Cell col="9" text="bind:grupcdid"/>
              </Band>
            </Format>
          </Formats>
        </Grid>
        <Static text="관리번호내역" position="absolute 3 96 116 112" id="caption4" class="tit_2"/>
        <Button position="absolute 763 91 816 110" id="btn_grdadd" class="btn2" text="행추가" onclick="btn_grdadd_onclick"/>
        <Button position="absolute 819 91 872 110" id="btn_grddel" class="btn2" text="행삭제" onclick="btn_grddel_onclick"/>
        <Button position="absolute 745 32 798 51" id="button27" class="btn2" visible="false" text="행복사"/>
        <Button position="absolute 880 757 936 779" id="btn_save" class="btn4" text="저장" onclick="btn_save_onclick"/>
        <Static text="구분" position="absolute 60 33 110 50" id="caption2" class="search_name"/>
        <Combo position="absolute 116 32 329 51" id="combo1" innerdataset="@ds_init_cat_catlist" datacolumn="nm" codecolumn="cd" oncloseup="combo1_oncloseup"/>
        <Static text="사용여부" position="absolute 360 33 439 50" id="caption3" class="search_name"/>
        <Combo position="absolute 441 32 530 51" id="combo2" codecolumn="codecolumn" datacolumn="datacolumn" oncloseup="combo2_oncloseup">
          <Dataset id="innerdataset">
            <ColumnInfo>
              <Column id="codecolumn"/>
              <Column id="datacolumn"/>
            </ColumnInfo>
            <Rows>
              <Row>
                <Col id="codecolumn">
                </Col>
                <Col id="datacolumn">전체</Col>
              </Row>
              <Row>
                <Col id="codecolumn">Y</Col>
                <Col id="datacolumn">사용</Col>
              </Row>
              <Row>
                <Col id="codecolumn">N</Col>
                <Col id="datacolumn">미사용</Col>
              </Row>
            </Rows>
          </Dataset>
        </Combo>
        <Static text="상세정보" position="absolute 360 57 440 74" id="caption5" class="search_name"/>
        <Edit position="absolute 441 56 596 75" id="input1" class="input_default" autoselect="true"/>
        <Static text="거래처코드" position="absolute 630 57 719 74" id="caption6" class="search_name"/>
        <Edit position="absolute 725 56 780 75" id="input2" class="input_default" autoselect="true"/>
        <Static text="※ 품의등록시 코드가 조회되지 않도록 사용종료처리 하려면, 사용여부를 &quot;사용안함&quot; 으로 변경하십시요." position="absolute 115 91 735 116" id="caption7"/>
        <Button position="absolute 875 91 939 110" align="align:left middle;" id="btn_excel" class="btn2" text="엑셀출력" onclick="btn_excel_onclick"/>
      </Layout>
    </Layouts>
    <Objects>
      <Dataset id="ds_main_codeinfo_codelist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="cdid" type="STRING" size="256"/>
          <Column id="cntlcd1" type="STRING" size="256"/>
          <Column id="cdnm" type="STRING" size="256"/>
          <Column id="detldesc" type="STRING" size="256"/>
          <Column id="cntlcd2" type="STRING" size="256"/>
          <Column id="custnm" type="STRING" size="256"/>
          <Column id="useyn" type="STRING" size="256"/>
          <Column id="grupcdid" type="STRING" size="256"/>
          <Column id="cntlcd3" type="STRING" size="256"/>
          <Column id="usedeptcd" type="STRING" size="256"/>
          <Column id="usedeptnm" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="cdid"/>
            <Col id="cntlcd1"/>
            <Col id="cdnm"/>
            <Col id="detldesc"/>
            <Col id="cntlcd2"/>
            <Col id="custnm"/>
            <Col id="useyn"/>
            <Col id="grupcdid"/>
            <Col id="cntlcd3"/>
            <Col id="usedeptcd"/>
            <Col id="usedeptnm"/>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_send_reqdata" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="grupcdid" type="STRING" size="256"/>
          <Column id="srcd" type="STRING" size="256"/>
          <Column id="useyn" type="STRING" size="256"/>
          <Column id="detldesc" type="STRING" size="256"/>
          <Column id="cntlcd2" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="grupcdid"/>
            <Col id="srcd"/>
            <Col id="useyn"/>
            <Col id="detldesc"/>
            <Col id="cntlcd2"/>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_popdata" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="cdgrupid" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="cdgrupid"/>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_init_cat_catlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="cd" type="STRING" size="256"/>
          <Column id="nm" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="cd"/>
            <Col id="nm"/>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_cbo_useyn" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="label" type="STRING" size="256"/>
          <Column id="value" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="label">사용</Col>
            <Col id="value">Y</Col>
          </Row>
          <Row>
            <Col id="label">사용안함</Col>
            <Col id="value">N</Col>
          </Row>
        </Rows>
      </Dataset>
    </Objects>
    <Bind>
      <BindItem id="item0" compid="combo1" propid="value" datasetid="ds_send_reqdata" columnid="grupcdid"/>
      <BindItem id="item1" compid="combo2" propid="value" datasetid="ds_send_reqdata" columnid="useyn"/>
      <BindItem id="item2" compid="input13" propid="value" datasetid="ds_send_reqdata" columnid="srcd"/>
      <BindItem id="item3" compid="input1" propid="value" datasetid="ds_send_reqdata" columnid="detldesc"/>
      <BindItem id="item4" compid="input2" propid="value" datasetid="ds_send_reqdata" columnid="cntlcd2"/>
    </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";

var arErrorCode 	= new HashArray();

function SMRAH02100_oninit(obj:Form, e:InitEventInfo)
{
	frmf_initForm(obj);	//폼 초기화
}

function SMRAH02100_onload(obj:Form, e:LoadEventInfo)
{
	//2014.03.28 박준범 : 구분코드를 하드코딩에서 회계기초정보 setting 테이블에서 가져오도록 수정
	var oParam = {};
		oParam.id          = "TRRAH02102";
		oParam.service     = "acntknuhapp.Acntknuh";
		oParam.method      = "reqGetCatList";
		oParam.inds        = "req=ds_send_reqdata";
		oParam.outds       = "ds_init_cat_catlist=catlist";
		oParam.async       = false;		

	tranf_submit(oParam);	
	
	ds_init_cat_catlist.insertRow(0);
	combo1.value = "";				
}

function btn_sea_onclick(obj:Button,  e:ClickEventInfo)
{
	readfunc();
}

function readfunc(){// 해당 조건에 대한 사용자 권한내역을 조회한다.
	if (utlf_isNull(ds_send_reqdata.getColumn(0, "grupcdid"))){
		sysf_messageBox("구분코드를 선택한 후 조회하시기 바랍니다.", "E999", "");
		return;
	}	
	ds_main_codeinfo_codelist.clearData();
	
	btn_save.enable = true;	
	
	var oParam = {};
		oParam.id          = "TRRAH02101";
		oParam.service     = "acntknuhapp.Acntknuh";
		oParam.method      = "reqGetAdministrationList";
		oParam.inds        = "req=ds_send_reqdata";
		oParam.outds       = "ds_main_codeinfo_codelist=codelist";
		oParam.async       = false;

	tranf_submit(oParam);
}

function datagrid1_onexpanddown(obj:Grid, e:GridMouseEventInfo)
{
	if(e.col == datagrid1.getBindCellIndex("body", "cntlcd2")){
		//거래처코드인 경우
		fOpenPopupHelp("14", datagrid1, "cntlcd2,custnm", "", "");
	}
	else if(e.col == datagrid1.getBindCellIndex("body", "usedeptcd")){
		//부서코드인 경우
		misfOpenPopUpList("02", datagrid1, "", "usedeptcd,usedeptnm");
	}
}

function btn_grdadd_onclick(obj:Button,  e:ClickEventInfo)
{
	if (utlf_isNull(ds_send_reqdata.getColumn(0, "grupcdid"))){
		sysf_messageBox("구분코드를 선택한 후 작업하시기 바랍니다.", "E999", "");
		return;
	}	
	ds_main_codeinfo_codelist.addRow();
	
	var irow = ds_main_codeinfo_codelist.rowposition;
	ds_main_codeinfo_codelist.setColumn(irow, "grupcdid", ds_send_reqdata.getColumn(0, "grupcdid"));
	
	ds_main_codeinfo_codelist.rowposition = irow;
	datagrid1.setCellPos(1);
	datagrid1.showEditor(true);
}

function btn_grddel_onclick(obj:Button,  e:ClickEventInfo)
{
	ds_main_codeinfo_codelist.deleteRow(ds_main_codeinfo_codelist.rowposition);
}

function btn_save_onclick(obj:Button,  e:ClickEventInfo)
{
	if (datacheck() == false){
		return;
	}
	ExecData();
}

function datacheck(){
	var scdid1 = "";
	var scdid2 = "";
	for (var i = 0; i < ds_main_codeinfo_codelist.rowcount; i ++){
		if (utlf_isNull(ds_main_codeinfo_codelist.getColumn(i, "cdid"))){
			sysf_messageBox("코드는 필수 입력항목입니다.", "E999", "");
			return false;
		}
		
		scdid1 = ds_main_codeinfo_codelist.getColumn(i, "cdid");
		var k = i + 1;
		for (var j = k; j < ds_main_codeinfo_codelist.rowcount; j++){
			scdid2 = ds_main_codeinfo_codelist.getColumn(j, "cdid");
			if (i != j){
				if (scdid1 == scdid2){
					sysf_messageBox(j + "번째에서 중복된 자료가 존재합니다", "E999", "");
					return false;
				}
			}
		}
	}
	return true;
}
function ExecData(){
	var oParam = {};
		oParam.id          = "TXRAH02101";
		oParam.service     = "acntknuhapp.Acntknuh";
		oParam.method      = "reqExeSaveAdministrationList";
		oParam.inds        = "req=ds_main_codeinfo_codelist:U";
		oParam.outds       = "ds_=item";
		oParam.typeStr	   = "status";
		oParam.async       = false;
		oParam.callback    = "cf_TXRAH02101";

	tranf_submit(oParam);
	
	if (arErrorCode.pop("TXRAH02101") > -1){
		readfunc();
	}
}

function cf_TXRAH02101(sSvcId, nErrorCode, sErrorMsg) {
    arErrorCode.push(sSvcId, nErrorCode);
}
function combo1_oncloseup(obj:Combo, e:ComboCloseUpEventInfo)
{
	readfunc();
}

function combo2_oncloseup(obj:Combo, e:ComboCloseUpEventInfo)
{
	readfunc();
}

function btn_excel_onclick(obj:Button,  e:ClickEventInfo)
{
	grdf_exportExcel(datagrid1, "회계관리번호" + utlf_getCurrentDate(), "sheetname1" , true, "" , "" , true);
}
]]></Script>
  </Form>
</FDL>