YNU_JEUS/app_home/himed/xpapps/lis/plgybaseinfomngtxp/xp/SPLPC02400_병리번호코드팝업.xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SPLPC02400" position="absolute 0 0 345 410" titletext="병리번호코드" oninit="model1_oninit" class="frm_POP" onload="SPLPC02400_onload">
    <Layouts>
      <Layout>
        <Grid id="grd_ptnocdlist" taborder="1" useinputpanel="false" position="absolute 12 46 333 375" binddataset="ds_grid_grd_ptnocdlist" positiontype="position" ondbclick="grd_ptnocdlist_ondbclick" autofittype="col" oncelldblclick="grd_ptnocdlist_oncelldblclick">
          <Formats>
            <Format id="default">
              <Columns>
                <Column size="0"/>
                <Column size="30"/>
                <Column size="100"/>
                <Column size="200"/>
              </Columns>
              <Rows>
                <Row size="22" band="head"/>
                <Row size="20"/>
              </Rows>
              <Band id="head">
                <Cell text="병원코드"/>
                <Cell col="1"/>
                <Cell col="2" text="병리번호코드"/>
                <Cell col="3" text="병리번호명칭"/>
              </Band>
              <Band id="body">
                <Cell text="bind:instcd"/>
                <Cell col="1" celltype="head" expr="expr:currow+1"/>
                <Cell col="2" text="bind:ptnocd"/>
                <Cell col="3" style="align:left;" text="bind:ptnonm"/>
                <Cell col="4"/>
              </Band>
            </Format>
          </Formats>
        </Grid>
        <Static id="stt_titleText" text="병리번호코드" onclick="caption00_onclick" class="sta_POP_title" position="absolute 12 8 161 28"/>
        <Button id="btn_cfm" taborder="2" text="확인" onclick="btn_cfm_onclick" class="btn5" position="absolute 289 378 333 398" positiontype="position"/>
        <Button id="btn_cls00" taborder="4" onclick="btn_cls_onclick" class="btn_POP_cls" position="absolute 319 12 333 25"/>
      </Layout>
    </Layouts>
    <Objects>
      <Dataset id="ds_grid_grd_ptnocdlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="instcd" type="STRING"/>
          <Column id="ptnocd" type="STRING"/>
          <Column id="ptnonm" type="STRING"/>
        </ColumnInfo>
      </Dataset>
    </Objects>
    <Script type="xscript4.0"><![CDATA[/***************************************************************************************  
 * System Name		:	KU2.0
 * Job Name 		:	
 * File Name 		:	SPLPC02400_병리번호코드팝업.xfdl
 * Creator 	    :	
 * Make Date 		:	2015-11-12
 *                                                                                        
 * Description  	:	                                                                   
 *--------------------------------------------------------------------------------------- 
 * Modify Date     	Modifier  	Modify Description                                     
 *--------------------------------------------------------------------------------------- 
 * 2015-11-12        DBS       Converting Program(TF->XP)
 *                                                                                        
 *--------------------------------------------------------------------------------------- 
 ****************************************************************************************/


//=======================================================================================
// xjs Include
//---------------------------------------------------------------------------------------
include "com_commonxp::comm_main.xjs";


//=======================================================================================
// Function 
//---------------------------------------------------------------------------------------
function lf_GetRefData(){    
	var sInstCd   = opener.lgv_sInstCd;

	
	if (utlf_isNull(utlf_trim(sInstCd))) {
		sInstCd = opener.sysf_getUserInfo("dutplceinstcd");
	}

    var sInDsName = dsf_createDsRow("in_ds_search"
	                             , [{col: "delflagcd", val: "0"}	
							     ,  {col: "instcd"	 , val: sInstCd}
							     ]);	
			     
	ds_grid_grd_ptnocdlist.clearData();		

	
		
	// 서브밋호출
	var oParam = {};
		oParam.id          = "TRLPC02401";
		oParam.service     = "plgycomnusemngtapp.BaseInfoCode";
		oParam.method      = "reqGetPtNoCodeList";
		oParam.inds        = "refData="+sInDsName;
		oParam.outds       = "ds_grid_grd_ptnocdlist=refrslt";
		oParam.async       = false;
		oParam.callback    = "cbf_SPLPC02400";

	tranf_submit(oParam);
	
}



//콜백함수
function cbf_SPLPC02400(strSvcID, nErrorCode, strErrorMag){
	if(nErrorCode != 0) sysf_messageBox("ID: " + strSvcID + "  Error: " + strErrorMag, "E009", "");	
}		


// 병리코드번호, 병리번호명칭 보내기
function lf_ExeChoiPtnoCd(){	

	var nRow = ds_grid_grd_ptnocdlist.rowposition;
	opener.ds_hidden_scrndata.setColumn(0,"ptnocd",ds_grid_grd_ptnocdlist.getColumn(nRow, "ptnocd"));
	opener.ds_hidden_scrndata.setColumn(0,"ptnonm",ds_grid_grd_ptnocdlist.getColumn(nRow, "ptnonm"));

	this.close();	
}



//=======================================================================================
// Event
//---------------------------------------------------------------------------------------

/****************************************************************************************
 * Components	    : 
 * Components ID  	: SPLPC02400
 * Event 		    : onload
 * Argument			: 01.obj	: Object Event has occurred
 *					: 02.e		: Event Object
 * Description		: 
 ****************************************************************************************/
function SPLPC02400_onload(obj:Form, e:LoadEventInfo)
{
	frmf_initForm(obj);
	lf_GetRefData();
	
	
}

/****************************************************************************************
 * Components	    : 
 * Components ID  	: btn_cls
 * Event 		    : onclick
 * Argument			: 01.obj	: Object Event has occurred
 *					: 02.e		: Event Object
 * Description		: 
 ****************************************************************************************/
 //닫기버튼
function btn_cls_onclick(obj:Button,  e:ClickEventInfo)
{
	this.close();
}

/****************************************************************************************
 * Components	    : 
 * Components ID  	: btn_cfm
 * Event 		    : onclick
 * Argument			: 01.obj	: Object Event has occurred
 *					: 02.e		: Event Object
 * Description		: 
 ****************************************************************************************/
 //확인버튼
function btn_cfm_onclick(obj:Button,  e:ClickEventInfo)
{
	lf_ExeChoiPtnoCd();
}

/****************************************************************************************
 * Components	    : 
 * Components ID  	: grd_ptnocdlist
 * Event 		    : oncelldblclick
 * Argument			: 01.obj	: Object Event has occurred
 *					: 02.e		: Event Object
 * Description		: 
 ****************************************************************************************/
 //그리드 더블클릭
function grd_ptnocdlist_oncelldblclick(obj:Grid, e:GridClickEventInfo)
{
	lf_ExeChoiPtnoCd();
}
]]></Script>
  </Form>
</FDL>