YNU_JEUS/app_home/himed/xpapps/emr/cpgxp/xp/SPMMP02000_변경이력조회.xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SPMMP02000" position="absolute 0 0 433 677" titletext="Untitle" oninit="SPMMP02000_oninit" onload="SPMMP02000_onload">
    <Layouts>
      <Layout>
        <Button position="absolute 320 649 376 671" id="btn_close" class="btn4" visible="false" text="닫기" onclick="btn_close_onclick"/>
        <Grid position="absolute 0 0 433 677" id="datagrid1" binddataset="ds_main_cpglist" autofittype="col" autosizingtype="row" extendsizetype="row" anchor="all" oncelldblclick="datagrid1_oncelldblclick" onrbuttondown="datagrid1_onrbuttondown" oncellclick="datagrid1_oncellclick">
          <Formats>
            <Format id="default">
              <Columns>
                <Column size="32"/>
                <Column size="0"/>
                <Column size="179"/>
                <Column size="70"/>
                <Column size="70"/>
                <Column size="70"/>
                <Column size="70"/>
                <Column size="0"/>
              </Columns>
              <Rows>
                <Row size="24" band="head"/>
                <Row size="20"/>
              </Rows>
              <Band id="head">
                <Cell text="Ver"/>
                <Cell col="1" text="D"/>
                <Cell col="2" text="CP명"/>
                <Cell col="3" text="적용 시작일"/>
                <Cell col="4" text="종료일"/>
                <Cell col="5" text="작성자"/>
                <Cell col="6" text="수정일"/>
                <Cell col="7" text="cpghist seq"/>
              </Band>
              <Band id="body">
                <Cell text="bind:dispseq"/>
                <Cell col="1" text="bind:times"/>
                <Cell col="2" style="align:left middle;padding:3 4 3 4;linespace:3;" text="bind:cpgnm" wordwrap="word" autosizerow="limitmin"/>
                <Cell col="3" text="bind:appdd" mask="expr:utlf_isNull(appdd) ? &quot;&quot; : &quot;####-##-##&quot;"/>
                <Cell col="4" text="bind:todd" mask="expr:utlf_isNull(todd) ? &quot;&quot; : &quot;####-##-##&quot;"/>
                <Cell col="5" text="bind:rgstrnm"/>
                <Cell col="6" text="bind:lastupdtdt" mask="expr:utlf_isNull(lastupdtdt) ? &quot;&quot; : &quot;####-##-##&quot;"/>
                <Cell col="7" text="bind:cpghistseq"/>
              </Band>
            </Format>
          </Formats>
        </Grid>
        <PopupMenu id="pmn_menu" innerdataset="@ds_popupmenu" idcolumn="func" captioncolumn="label" levelcolumn="level" onmenuclick="pmn_menu_onmenuclick" position="absolute 448 104 524 126"/>
      </Layout>
    </Layouts>
    <Objects>
      <Dataset id="ds_main_cpglist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false" onrowposchanged="ds_main_cpglist_onrowposchanged">
        <ColumnInfo>
          <Column id="cpgno" type="STRING" size="256" sumtext="CPG번호"/>
          <Column id="cpghistseq" type="STRING" size="256" sumtext="CPG이력번호"/>
          <Column id="orghistseq" type="STRING" size="256" sumtext="CPG이력번호"/>
          <Column id="cpgnm" type="STRING" size="256" sumtext="CPG명"/>
          <Column id="cpglasthistyn" type="STRING" size="256" sumtext="CPG최종이력여부"/>
          <Column id="appdd" type="STRING" size="256" sumtext="적용일"/>
          <Column id="rgstrid" type="STRING" size="256" sumtext="등록자ID"/>
          <Column id="rgstrnm" type="STRING" size="256" sumtext="등록자명"/>
          <Column id="lastupdtdt" type="STRING" size="256" sumtext="최종수정일"/>
          <Column id="todd" type="STRING" size="256" sumtext="종료일"/>
          <Column id="times" type="STRING" size="256" sumtext="회차"/>
          <Column id="ioflag" type="STRING" size="256" sumtext="외래입원구분"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_search_cond" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="cpgflagcd" type="STRING" size="256"/>
          <Column id="cpgorddeptcd" type="STRING" size="256"/>
          <Column id="cpgnm" type="STRING" size="256"/>
          <Column id="getflag" type="STRING" size="256"/>
          <Column id="no" type="INT" size="256"/>
          <Column id="seq" type="INT" size="256"/>
          <Column id="authflag" type="STRING" size="256"/>
          <Column id="delyn" type="STRING" size="256"/>
          <Column id="cpgtypecd" type="STRING" size="256"/>
          <Column id="tmpyn" type="STRING" size="256"/>
          <Column id="indxyn" type="STRING" size="256"/>
          <Column id="authdept" type="STRING" size="256"/>
        </ColumnInfo>
      </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="cpgflagcd" type="STRING" size="256"/>
          <Column id="cpgorddeptcd" type="STRING" size="256"/>
          <Column id="cpgnm" type="STRING" size="256"/>
          <Column id="getflag" type="STRING" size="256"/>
          <Column id="no" type="INT" size="256"/>
          <Column id="seq" type="INT" size="256"/>
          <Column id="authflag" type="STRING" size="256"/>
          <Column id="delyn" type="STRING" size="256"/>
          <Column id="cpgtypecd" type="STRING" size="256"/>
          <Column id="tmpyn" type="STRING" size="256"/>
          <Column id="indxyn" type="STRING" size="256"/>
          <Column id="authdept" type="STRING" size="256"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_popupmenu" 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="func" type="STRING" size="256"/>
          <Column id="level" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="label">삭제</Col>
            <Col id="func">fCpgDelete</Col>
            <Col id="level">0</Col>
          </Row>
        </Rows>
      </Dataset>
    </Objects>
    <Script type="xscript4.0"><![CDATA[/***************************************************************************************  
 * System Name		:	
 * Job Name 		:	
 * Creator 	    :	
 * Make Date 		:	2015-01-12
 * Description  	:	                                                                   
 *--------------------------------------------------------------------------------------- 
 * Modify Date     	Modifier  	  Modify Description                                   
 *--------------------------------------------------------------------------------------- 
 * 2015-01-12      Live Converter   TF->XP                                           
 *                                                                                        
 *--------------------------------------------------------------------------------------- 
 ****************************************************************************************/

include "com_commonxp::comm_main.xjs";

var oOpener;


function SPMMP02000_oninit(obj:Form, e:InitEventInfo)
{
	frmf_initForm(obj);
	
	oOpener = this.getOwnerFrame().form;
}

function SPMMP02000_onload(obj:Form, e:LoadEventInfo)
{
	
}

function ds_main_cpglist_onrowposchanged(obj:Dataset, e:DSRowPosChangeEventInfo)
{
	var iRow = oOpener.ds_main_cpglist.rowposition;
	
	oOpener.ds_temp_selected.setColumn(0, "cpgno", 	    ds_main_cpglist.getColumn(e.newrow, "cpgno"));
	oOpener.ds_temp_selected.setColumn(0, "cpghistseq", ds_main_cpglist.getColumn(e.newrow, "cpghistseq"));
	oOpener.ds_temp_selected.setColumn(0, "cpgnm", 	    ds_main_cpglist.getColumn(e.newrow, "cpgnm"));
	oOpener.ds_temp_selected.setColumn(0, "cpgflagcd", 	oOpener.ds_main_cpglist.getColumn(iRow, "cpgflagcd"));
}

function datagrid1_oncelldblclick(obj:Grid, e:GridClickEventInfo)
{
	if( oOpener.ds_search_cond.getColumn(0, "authflag") == "M" ){
		if( e.row >= 0 ){
			oOpener.btn_srchver.onclick.fireEvent(oOpener.btn_srchver, new ClickEventInfo());
		}
	}
}

function datagrid1_onrbuttondown(obj:Grid, e:GridMouseEventInfo)
{
	if(e.row < 0 || e.col < 0) return;
	
	obj.setFocus();

	grdf_setSelectedCell(obj, e);
	
	obj.oncellclick.fireEvent(obj, new GridClickEventInfo());
	
	if( oOpener.ds_search_cond.getColumn(0, "authflag") == "M" ){
		pmn_menu.trackPopup(e.screenX,e.screenY);
	}
}

function pmn_menu_onmenuclick(obj:PopupMenu, e:MenuClickEventInfo)
{
	eval(e.id + "()");
}

function fGetCpgHist(){
	ds_search_cond.copyData(oOpener.ds_search_cond);
	ds_send_reqdata.copyData(ds_search_cond);
	
	var oParam = {};
		oParam.id       = "TRMMP02001";
		oParam.service  = "prcpbaseapp.CpMngt";
		oParam.method   = "reqGetSrchCPGList";
		oParam.inds     = "req=ds_send_reqdata";
		oParam.outds    = "ds_main_cpglist=cpginfo";
		oParam.async    = false;
	    oParam.callback = "cf_TRMMP02001";

	tranf_submit(oParam);

	oOpener.ds_search_cond.setColumn(0, "getflag", "");
	
	ds_search_cond.clearData();
}

function cf_TRMMP02001(sSvcId, nErrorCode, sErrorMsg) {
    var num = 1;
	if( ds_main_cpglist.rowcount > 0 ){
		ds_main_cpglist.addColumn("dispseq", "string");
		
		for( var i = 0; i < ds_main_cpglist.rowcount; i++ ){
			if( ds_main_cpglist.getColumn(i, "cpghistseq") == "임시" ){
				ds_main_cpglist.setColumn(i, "dispseq", ds_main_cpglist.getColumn(i, "cpghistseq"));
			}else{
				ds_main_cpglist.setColumn(i, "dispseq", num );
				num++;
			}
		}
		
	}
}

function fCpgDelete(){
	var row = ds_main_cpglist.rowposition;
	
	if( ds_main_cpglist.getColumn(row, "cpglasthistyn") == "Y" ){ 
		sysf_messageBox("유효한 CP는 삭제", "E001");
		return;
	}
	
	ds_send_reqdata.copyData(oOpener.ds_search_cond);
	
	dsf_makeValue(ds_send_reqdata, "cpgno",      "string", ds_main_cpglist.getColumn(row, "cpgno"));
// 2015.07.28 현행화 수정S	
//	dsf_makeValue(ds_send_reqdata, "cpghistseq", "string", ds_main_cpglist.getColumn(row, "cpghistseq"));
	dsf_makeValue(ds_send_reqdata, "cpghistseq", "string", ds_main_cpglist.getColumn(row, "orghistseq"));
// 2015.07.28 현행화 수정E
	dsf_makeValue(ds_send_reqdata, "todd",       "string", utlf_getCurrentDate());
	dsf_makeValue(ds_send_reqdata, "getflag",    "string", "H");

	var oParam = {};
		oParam.id       = "TXMMP02001";
		oParam.service  = "prcpbaseapp.CpMngt";
		oParam.method   = "reqDelCPGInfo";
		oParam.inds     = "req=ds_send_reqdata";
		oParam.outds    = "ds_main_cpglist=cpginfo";
		oParam.async    = false;
		oParam.callback = "cf_TRMMP02001";

	tranf_submit(oParam);
}

// function datagrid1_oncellclick(obj:Grid, e:GridClickEventInfo)
// {
// 	if( btn_close.attribute("left") != "420px" && datagrid1.row > 0){
// 		var iRow = opener.grd_cpglist.row;
// 	}
// 
// 	opener.model.setValue("/root/temp/selected/cpgno", 	     model.getValue("/root/main/cpglist/cpginfo[" + datagrid1.row + "]/cpgno"));
// 	opener.model.setValue("/root/temp/selected/cpghistseq",  model.getValue("/root/main/cpglist/cpginfo[" + datagrid1.row + "]/orghistseq"));
// 	opener.model.setValue("/root/temp/selected/cpgnm", 	     model.getValue("/root/main/cpglist/cpginfo[" + datagrid1.row + "]/cpgnm"));
// 	opener.model.setValue("/root/temp/selected/cpgflagcd", 	 opener.model.getValue("/root/main/cpglist/cpginfo[" + opener.grd_cpglist.row + "]/cpgflagcd"));
// }
// 
// function btn_close_onclick(obj:Button,  e:ClickEventInfo)
// {
// 	opener.fCloseCpgHist();
// }
]]></Script>
  </Form>
</FDL>