YNU_JEUS/app_home/himed/xpapps/mis/purcbasexp/xp/SMRSC01600_구매팀부서등록.xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SMRSC01600" position="absolute 0 0 1200 771" titletext="구매팀 부서 등록" oninit="SMRSC01600_oninit" onload="SMRSC01600_onload">
    <Layouts>
      <Layout>
        <Static id="caption6" text="구매팀 부서 등록" class="tit_1" position="absolute 0 0 186 25"/>
        <Shape id="line16" class="line_2" position="absolute 0 47 1195 53"/>
        <Button id="btn_prt" taborder="1" text="출력" class="btn6" visible="false" position="absolute 0 26 56 48"/>
        <Button id="btn_save" taborder="2" text="저장" class="btn4" position="absolute 1069 26 1125 48" onclick="btn_save_onclick"/>
        <Button id="btn_clear" taborder="3" text="초기화" class="btn4" position="absolute 1127 26 1195 48" onclick="btn_clear_onclick"/>
        <Div id="grp_sea" anchor="left top right" taborder="4" class="div_SA2" position="absolute 0 51 1195 91">
          <Layouts>
            <Layout>
              <Static id="cap_instcd" text="기관코드 :" class="search_name" position="absolute 15 11 101 28"/>
              <Shape id="line13" linetype="vertical" class="line_4" position="absolute 1107 2 1113 36"/>
              <Button id="btn_search" taborder="1" text="조회" class="btn1" position="absolute 1124 9 1180 31" onclick="grp_sea_btn_search_onclick"/>
              <Combo id="cmb_instcd" taborder="2" class="combo_essential" position="absolute 102 10 290 29" onitemchanged="grp_sea_cmb_instcd_onitemchanged"/>
              <Combo id="cmb_goodflag" taborder="3" class="combo_essential" visible="false" position="absolute 897 10 1085 29" onitemchanged="grp_sea_cmb_goodflag_onitemchanged"/>
              <Static id="cap_goodflag" text="물품구분 :" class="search_name" visible="false" position="absolute 810 12 896 29"/>
              <Static id="caption11" text="부 서 명 :" class="search_name" position="absolute 351 11 437 28"/>
              <Button id="btn_deptcd" taborder="4" class="icon_search" position="absolute 551 11 567 27" onclick="grp_sea_btn_deptcd_onclick"/>
              <Edit id="ipt_deptnm" taborder="5" class="output" position="absolute 575 10 740 29" style="background:URL('theme://images/bg_edit_R.png') stretch 5,5;font:Dotum,9;"/>
              <Edit id="ipt_deptcd" taborder="6" class="input_essential" position="absolute 441 10 545 29"/>
            </Layout>
          </Layouts>
        </Div>
        <Shape id="line2" linetype="horizontal" class="line_10" position="absolute 352 119 1194 128" anchor="left top right"/>
        <Static id="caption8" text="부서 List" class="tit_2" position="absolute 0 104 129 126"/>
        <Button id="btn_grddel" taborder="5" text="행삭제" class="btn2" position="absolute 1141 101 1194 120" onclick="btn_grddel_onclick"/>
        <Grid id="grd_rscmdodtlist" taborder="6" binddataset="ds_main_rscmdodtlist" useinputpanel="false" position="absolute 352 125 1194 765" autoenter="select" autofittype="col" cellsizingtype="col" onexpanddown="grd_rscmdodtlist_onexpanddown" oncellclick="grd_rscmdodtlist_oncellclick">
          <Formats>
            <Format id="default">
              <Columns>
                <Column size="20"/>
                <Column size="116"/>
                <Column size="154"/>
                <Column size="122"/>
                <Column size="89"/>
                <Column size="141"/>
                <Column size="157"/>
                <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" colspan="2" text="집계부서" taborder="undefined"/>
                <Cell col="7" text="기관코드"/>
                <Cell col="8" text="물품구분"/>
              </Band>
              <Band id="body">
                <Cell celltype="head"/>
                <Cell col="1" style="align:left middle;padding:0 0 0 3;" text="bind:deptcd"/>
                <Cell col="2" style="align:left middle;padding:0 0 0 3;" text="bind:deptnm"/>
                <Cell col="3" displaytype="combo" edittype="combo" style="align:left middle;padding:0 0 0 3;" text="bind:deptgr" combodataset="ds_cmb_deptgr" combocodecol="value" combodatacol="label"/>
                <Cell col="4" displaytype="combo" edittype="combo" style="align:left middle;padding:0 0 0 3;" text="bind:deptflag"/>
                <Cell col="5" displaytype="text" edittype="text" style="align:left middle;padding:0 0 0 3;" text="bind:demddeptcd" expandshow="show"/>
                <Cell col="6" style="align:left middle;padding:0 0 0 3;" text="bind:demddeptnm"/>
                <Cell col="7" text="bind:instcd"/>
                <Cell col="8" text="bind:goodflag"/>
              </Band>
            </Format>
          </Formats>
        </Grid>
        <Grid id="grd_zsdddeptlist" taborder="7" binddataset="ds_main_zsdddeptlist" autoenter="select" useinputpanel="false" cellsizingtype="col" autofittype="col" position="absolute 0 125 320 765" oncelldblclick="grd_zsdddeptlist_oncelldblclick">
          <Formats>
            <Format id="default">
              <Columns>
                <Column size="24"/>
                <Column size="86"/>
                <Column size="168"/>
                <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="기관코드"/>
              </Band>
              <Band id="body">
                <Cell celltype="head" expr="currow+1"/>
                <Cell col="1" style="align:left middle;padding:0 0 0 3;" text="bind:deptcd"/>
                <Cell col="2" style="align:left middle;padding:0 0 0 3;" text="bind:depthngnm"/>
                <Cell col="3" text="bind:instcd"/>
              </Band>
            </Format>
          </Formats>
        </Grid>
        <Shape id="line1" linetype="horizontal" class="line_10" position="absolute 0 119 320 128"/>
        <Static id="caption1" text="구매팀 부서 List" class="tit_2" position="absolute 352 104 481 125"/>
        <Static id="caption2" text="&gt;&gt;" position="absolute 326 288 349 308" style="font:Dotum,9,bold;"/>
        <Static id="caption3" text="&gt;&gt;" position="absolute 326 303 349 323" style="font:Dotum,9,bold;"/>
        <Static id="caption4" text="&gt;&gt;" position="absolute 326 318 349 338" style="font:Dotum,9,bold;"/>
        <Static id="caption5" text="&gt;&gt;" position="absolute 326 468 350 488" style="font:Dotum,9,bold;"/>
        <Static id="caption7" text="&gt;&gt;" position="absolute 326 483 350 503" style="font:Dotum,9,bold;"/>
        <Static id="caption9" text="&gt;&gt;" position="absolute 326 498 350 518" style="font:Dotum,9,bold;"/>
        <Static id="caption10" text="※부서 List 를 더블클릭시 구매팀 부서 List에 추가됩니다." position="absolute 697 98 1053 121" style="color:#ff6600ff;font:Dotum,9,bold;"/>
        <Button id="button1" taborder="8" text="엑셀저장" class="btn7" position="absolute 1060 101 1140 120" onclick="button1_onclick"/>
        <Combo id="cmb_deptflag" taborder="9" class="combo_default" visible="false" position="absolute 480 20 570 39"/>
      </Layout>
    </Layouts>
    <Objects>
      <Dataset id="ds_send" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false" oncolumnchanged="ds_send_oncolumnchanged">
        <ColumnInfo>
          <Column id="instcd" type="STRING" size="256"/>
          <Column id="goodflag" type="STRING" size="256"/>
          <Column id="deptcd" type="STRING" size="256"/>
          <Column id="deptnm" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="instcd"/>
            <Col id="goodflag"/>
            <Col id="deptcd"/>
            <Col id="deptnm"/>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_main_rscmdodtlist" firefirstcount="0" firenextcount="0" useclientlayout="true" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false" oncolumnchanged="ds_main_rscmdodtlist_oncolumnchanged">
        <ColumnInfo>
          <Column id="instcd" type="STRING" size="256" sumtext="기관코드"/>
          <Column id="goodflag" type="STRING" size="256" sumtext="물품구분"/>
          <Column id="deptcd" type="STRING" size="256" sumtext="매일처방부서코드"/>
          <Column id="deptnm" type="STRING" size="256" sumtext="매일처방부서코드"/>
          <Column id="fstrgstrid" type="STRING" size="256" sumtext="최초등록자id"/>
          <Column id="fstrgstdt" type="STRING" size="256" sumtext="최초등록일시"/>
          <Column id="lastupdtrid" type="STRING" size="256" sumtext="최종수정자id"/>
          <Column id="lastupdtdt" type="STRING" size="256" sumtext="최종수정일시"/>
          <Column id="deptgr" type="STRING" size="256" sumtext="부서그룹(외래,병동,수술....)"/>
          <Column id="deptflag" type="STRING" size="256" sumtext="부서구분(외래,입원,행정..)"/>
          <Column id="demddeptcd" type="STRING" size="256" sumtext="처방집계부서코드(없으면집계안함)"/>
          <Column id="demddeptnm" type="STRING" size="256" sumtext="처방집계부서코드(없으면집계안함)"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_main_zsdddeptlist" 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="instcd"/>
          <Column id="deptcd" type="STRING" size="256" sumtext="deptcd"/>
          <Column id="valifromdd" type="STRING" size="256" sumtext="valifromdd"/>
          <Column id="depthngnm" type="STRING" size="256" sumtext="depthngnm"/>
          <Column id="deptengnm" type="STRING" size="256" sumtext="deptengnm"/>
          <Column id="valitodd" type="STRING" size="256" sumtext="valitodd"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_cmb_deptgr" 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">A</Col>
          </Row>
          <Row>
            <Col id="label">병동</Col>
            <Col id="value">B</Col>
          </Row>
          <Row>
            <Col id="label">수술실</Col>
            <Col id="value">C</Col>
          </Row>
          <Row>
            <Col id="label">마취</Col>
            <Col id="value">D</Col>
          </Row>
          <Row>
            <Col id="label">방사선과</Col>
            <Col id="value">E</Col>
          </Row>
          <Row>
            <Col id="label">진단검사</Col>
            <Col id="value">F</Col>
          </Row>
          <Row>
            <Col id="label">Angio</Col>
            <Col id="value">G</Col>
          </Row>
          <Row>
            <Col id="label">가정간호</Col>
            <Col id="value">H</Col>
          </Row>
        </Rows>
      </Dataset>
    </Objects>
    <Bind>
      <BindItem id="item0" compid="grp_sea.cmb_instcd" propid="value" datasetid="ds_send" columnid="instcd"/>
      <BindItem id="item1" compid="grp_sea.ipt_deptcd" propid="value" datasetid="ds_send" columnid="deptcd"/>
      <BindItem id="item2" compid="grp_sea.ipt_deptnm" propid="value" datasetid="ds_send" columnid="deptnm"/>
      <BindItem id="item3" compid="grp_sea.cmb_goodflag" propid="value" datasetid="ds_send" columnid="goodflag"/>
    </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_miscommonxp::RSZ001.xjs";
function SMRSC01600_oninit(obj:Form, e:InitEventInfo)
{
	frmf_initForm(obj);
}

function SMRSC01600_onload(obj:Form, e:LoadEventInfo)
{
	grdf_initGrid(grd_zsdddeptlist);
	grdf_initGrid(grd_rscmdodtlist);
	grdf_setRowTypeIcon(grd_rscmdodtlist, 0);
	fInitialize();
}

function fInitialize() 
{
	misfGridInit(grd_rscmdodtlist);
	misfGridInit(grd_zsdddeptlist);

	ds_send.clearData();
	ds_send.addRow();
	
	misfMsterDetailSet(grd_rscmdodtlist,null,"TRRSC01601","Y"); 
	misfMsterDetailSet(grd_zsdddeptlist,null,"TRRSC01602","N"); 

	rszfGoodFlagListByPgmGubn(grp_sea.cmb_goodflag,"1","N");
	ds_send.setColumn(0, "instcd", sysf_getUserInfo("dutplceinstcd"));

	misfComboComCdList("C0048", grp_sea.cmb_instcd); 
	misfComboComCdList(grp_sea.cmb_instcd.value + "R0029", cmb_deptflag);
	
	misfComboCopyItemSet(cmb_deptflag,"",grd_rscmdodtlist,"deptflag");
	
	btn_save.enable = frmf_checkAuth("X");
	btn_prt.enable = frmf_checkAuth("P");
	
	ds_send.setColumn(0, "goodflag", "Y");
	fSearchDeptList();
}

function fSearchDeptList()
{
	var oParam = {};
		oParam.id          = "TRRSC01602";
		oParam.service     = "purcbaseapp.PurcBaseMngt";
		oParam.method      = "reqGet015Zsdddeptlist";
		oParam.inds        = "req=ds_send";
		oParam.outds       = "ds_main_zsdddeptlist=zsdddeptlist";
		oParam.async       = false;
		oParam.callback    = "cf_TRRSC01602";

	tranf_submit(oParam);
}

function cf_TRRSC01602(sSvcId, nErrorCode, sErrorMsg) 
{
    if(nErrorCode < 0) return;
    else
    {
		ds_main_rscmdodtlist.clearData();
		misfComboComCdList(grp_sea.cmb_instcd.value + "R0029", cmb_deptflag);	
		grp_sea.btn_search.click();
    }
}

function grp_sea_cmb_instcd_onitemchanged(obj:Combo, e:ItemChangeEventInfo)
{
	fSearchDeptList();
}

function ds_send_oncolumnchanged(obj:Dataset, e:DSColChangeEventInfo)
{
	if(e.columnid == "deptcd")
	{
		grp_sea.ipt_deptcd.value = e.newvalue;
		grp_sea.ipt_deptcd.setFocus();
		
		misfSearchDept(grp_sea.ipt_deptnm);
		grp_sea.btn_search.click();
	}
}

function grp_sea_btn_deptcd_onclick(obj:Button,  e:ClickEventInfo)
{
	var recv_list = "deptcd,deptnm";
	misfOpenPopUpList("02", grp_sea.ipt_deptcd,"", "deptcd,deptnm");
	grp_sea.btn_search.click();
}

function grp_sea_cmb_goodflag_onitemchanged(obj:Combo, e:ItemChangeEventInfo)
{
	grp_sea.btn_search.click();
}

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

function fsearch()
{
	var updtdata = grdf_getGridUpdateData(grd_rscmdodtlist).rowcount;

	if ( updtdata != 0) 
	{
		var ret = sysf_messageBox("그리드에 작업 중인 내용이 있습니다. 조회 작업을","Q003");
		if (ret != 6) 
		{
			return;
		}
	}
	var oParam = {};
		oParam.id          = "TRRSC01601";
		oParam.service     = "purcbaseapp.PurcBaseMngt";
		oParam.method      = "reqGet015Rscmdodtlist";
		oParam.inds        = "req=ds_send";
		oParam.outds       = "ds_main_rscmdodtlist=rscmdodtlist";
		oParam.async       = false;
		//oParam.callback    = "cf_TRRSC01601";

	tranf_submit(oParam);
}

function grd_zsdddeptlist_oncelldblclick(obj:Grid, e:GridClickEventInfo)
{
	fGridDbclick();	
}

function fGridDbclick()
{
	var fInstcd = ds_main_zsdddeptlist.getColumn(ds_main_zsdddeptlist.rowposition, "instcd");
	var fDeptcd = ds_main_zsdddeptlist.getColumn(ds_main_zsdddeptlist.rowposition, "deptcd");
	
	if( fGridDataCheck( fInstcd, fDeptcd) )
	{
		return;
	}

	misfGridIUD(grd_rscmdodtlist, "A");
	ds_main_rscmdodtlist.setColumn(ds_main_rscmdodtlist.rowposition, "deptcd", ds_main_zsdddeptlist.getColumn(ds_main_zsdddeptlist.rowposition, "deptcd"));
	ds_main_rscmdodtlist.setColumn(ds_main_rscmdodtlist.rowposition, "deptnm", ds_main_zsdddeptlist.getColumn(ds_main_zsdddeptlist.rowposition, "depthngnm"));
	ds_main_rscmdodtlist.setColumn(ds_main_rscmdodtlist.rowposition, "demddeptcd", ds_main_zsdddeptlist.getColumn(ds_main_zsdddeptlist.rowposition, "deptcd"));
	ds_main_rscmdodtlist.setColumn(ds_main_rscmdodtlist.rowposition, "demddeptnm", ds_main_zsdddeptlist.getColumn(ds_main_zsdddeptlist.rowposition, "depthngnm"));
	ds_main_rscmdodtlist.setColumn(ds_main_rscmdodtlist.rowposition, "instcd", ds_main_zsdddeptlist.getColumn(ds_main_zsdddeptlist.rowposition, "instcd"));
	ds_main_rscmdodtlist.setColumn(ds_main_rscmdodtlist.rowposition, "deptgr", "A");
	ds_main_rscmdodtlist.setColumn(ds_main_rscmdodtlist.rowposition, "deptflag", "I");
	ds_main_rscmdodtlist.setColumn(ds_main_rscmdodtlist.rowposition, "goodflag", grp_sea.cmb_goodflag.value);
}

function fGridDataCheck( pInstcd, pDeptcd)
{					
	for(var fRow = 0; fRow < ds_main_rscmdodtlist.rowcount; fRow++)
	{
		if(ds_main_rscmdodtlist.getColumn(fRow, "deptcd") == pDeptcd)
		{
			if( ds_main_rscmdodtlist.getColumn(fRow, "instcd") == pInstcd )
			{
				grd_rscmdodtlist.setFocus();
				ds_main_rscmdodtlist.rowposition = fRow; 
				
				sysf_messageBox("등록된 Data가 있습니다. 확인하시고 다시 입력하세요.", "");								
				
				return true;
			}
		}
	}					
	
	return false;
}

function grd_rscmdodtlist_onexpanddown(obj:Grid, e:GridMouseEventInfo)
{
	if(e.cell == obj.getBindCellIndex("Body", "demddeptcd"))
	{
		misfOpenPopUpList("02", grd_rscmdodtlist, "", "demddeptcd,demddeptnm");
	}
}

function ds_main_rscmdodtlist_oncolumnchanged(obj:Dataset, e:DSColChangeEventInfo)
{
	if(e.columnid == "demddeptcd")
	{
		misfValidationCheck("02", "", "demddeptcd,demddeptnm" );
	}
}

function button1_onclick(obj:Button,  e:ClickEventInfo)
{
	grdf_exportExcel(grd_rscmdodtlist, "excel", "sheet1", "true", "", "");
}

function btn_grddel_onclick(obj:Button,  e:ClickEventInfo)
{
	misfGridIUD(grd_rscmdodtlist, "D");		
}

function btn_clear_onclick(obj:Button,  e:ClickEventInfo)
{
	fInitialize();		
}

function btn_save_onclick(obj:Button,  e:ClickEventInfo)
{
	var updtdata = grdf_getGridUpdateData(grd_rscmdodtlist).rowcount;
	if (updtdata == 0)
	{													
		sysf_messageBox("변경된 데이터가","I004");
		return;
	}
	
	if(!frmf_chkMdtGrid(grd_rscmdodtlist, [1,2,3,4,5], ["부서코드", "부서명", "부서그룹", "부서구분", "집계부서"])) return;
	
	rtn = sysf_messageBox("", "Q002");
	if(rtn != "6" ) return false;
	
	var oParam = {};
		oParam.id          = "TXRSC01601";
		oParam.service     = "purcbaseapp.PurcBaseMngt";
		oParam.method      = "reqExeSet015Rscmdodtlist";
		oParam.inds        = "req=ds_main_rscmdodtlist:u";
		oParam.outds       = "";
		oParam.async       = false;
		//oParam.callback    = "cf_TXRSC01601";

	tranf_submit(oParam);
	fsearch();
}

function grd_rscmdodtlist_oncellclick(obj:Grid, e:GridClickEventInfo)
{
	trace(grd_rscmdodtlist.getCellProperty("body", e.col, "combodataset"));
}
]]></Script>
  </Form>
</FDL>