YNU_JEUS/app_home/himed/xpapps/lis/plgyrefmngtxp/xp/SPLPP02900_블록번호수정.xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SPLPP02900" position="absolute 0 0 500 350" titletext="블록번호수정" oninit="model1_oninit" class="frm_POP" onload="SPLPP02900_onload">
    <Layouts>
      <Layout>
        <Static id="stt_titleText" text="블록번호수정" class="sta_POP_title" position="absolute 12 8 192 28"/>
        <Button id="btn_close" taborder="1" class="btn_POP_cls" position="absolute 474 11 488 25" style="color:#333333ff;" onclick="btn_close_onclick"/>
        <Button id="btn_cfm" taborder="2" text="확인" onclick="btn_cfm_onclick" class="btn5" position="absolute 444 318 488 338" positiontype="position"/>
        <Static id="caption2" text="카세트/슬라이드 목록" class="tit_2" position="absolute 12 46 212 66" positiontype="position"/>
        <Grid id="grd_slidelist" class="CSS::lis.css" taborder="3" useinputpanel="false" position="absolute 12 66 488 315" binddataset="ds_grid_grd_slidelist" positiontype="position" ondbclick="grd_slidelist_ondbclick" oncellclick="grd_slidelist_oncellclick" oncelldblclick="grd_slidelist_oncelldblclick">
          <Formats>
            <Format id="default">
              <Columns>
                <Column size="20"/>
                <Column size="108"/>
                <Column size="175"/>
                <Column size="67"/>
                <Column size="82"/>
              </Columns>
              <Rows>
                <Row size="35" band="head"/>
                <Row size="20"/>
              </Rows>
              <Band id="head">
                <Cell text="선&#10;택"/>
                <Cell col="1" text="병리번호"/>
                <Cell col="2" text="검체명"/>
                <Cell col="3" text="블록번호"/>
                <Cell col="4" text="블록표시내용"/>
              </Band>
              <Band id="body">
                <Cell displaytype="checkbox" edittype="checkbox" text="bind:choi"/>
                <Cell col="1" text="bind:dispptno"/>
                <Cell col="2" text="bind:spcnm"/>
                <Cell col="3" text="bind:csteno"/>
                <Cell col="4" text="bind:blockcnts"/>
                <Cell col="5"/>
                <Cell col="6"/>
              </Band>
            </Format>
          </Formats>
        </Grid>
      </Layout>
    </Layouts>
    <Objects>
      <Dataset id="ds_grid_grd_slidelist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="choi" type="STRING"/>
          <Column id="ptno" type="STRING"/>
          <Column id="spcnm" type="STRING"/>
          <Column id="csteno" type="STRING"/>
          <Column id="slidno" type="STRING"/>
          <Column id="blockcnts" type="STRING"/>
          <Column id="slidecnts" type="STRING"/>
          <Column id="spcacptseqno" type="STRING"/>
          <Column id="dispptno" type="STRING"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_cond" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="fromscrno" type="STRING"/>
          <Column id="ptno" type="STRING"/>
          <Column id="relaptno" type="STRING"/>
          <Column id="spcacptseqno" type="STRING"/>
          <Column id="blocno" type="STRING"/>
          <Column id="slidno" type="STRING"/>
        </ColumnInfo>
      </Dataset>
    </Objects>
    <Script type="xscript4.0"><![CDATA[/***************************************************************************************  
 * System Name		:	KU2.0
 * Job Name 		:	
 * File Name 		:	SPLPP02900_블록번호수정.xfdl
 * Creator 	    :	
 * Make Date 		:	2015-11-11
 *                                                                                        
 * Description  	:	                                                                   
 *--------------------------------------------------------------------------------------- 
 * Modify Date     	Modifier  	Modify Description                                     
 *--------------------------------------------------------------------------------------- 
 * 2015-11-11        DBS       Converting Program(TF->XP)
 *                                                                                        
 *--------------------------------------------------------------------------------------- 
 ****************************************************************************************/


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


//=======================================================================================
// Function 
//---------------------------------------------------------------------------------------
/**********************************************************************************
 * Name			: lf_exeInitialize
 * Description	: 오픈시 화면 초기화
 * Argument		: 
 * return Type	: Null
 * Author		: Autumn
***********************************************************************************/
function lf_exeInitialize(){
	var objParentWin = opener.getOwnerFrame().name;

	if(frmf_checkOpener()) {
		if(opener.frmf_getParameter("SPLPP02900_relaptno") != ""){

			var slideblocflag = "B";
			var fromscrno = "";

			//이 화면 부모창에서 무조건 SMLPP00200값을 보냄.
			if(opener.frmf_getParameter("SPLPP02900_fromsrcno")=="SMLPP00200"){
				slideblocflag="B";
				ds_cond.setColumn(0,"fromscrno","SMLPP00200")
			} else if(opener.frmf_getParameter("SPLPP02900_fromsrcno")=="SPLPJ02600"){
				slideblocflag="B";
				ds_cond.setColumn(0,"fromscrno","SPLPJ02600");
			} else{
				slideblocflag="S";
			}
		
			var sInDsName = dsf_createDsRow("ds_temp_search"
											 , [{col: "instcd"       , val: sysf_getUserInfo("dutplceinstcd")}
											 ,  {col: "ptno"         , val: opener.frmf_getParameter("SPLPP02900_relaptno")}
											 ,  {col: "slideblocflag", val: slideblocflag}													 
											 ]);									

            tranf_submit({
                 id: "TRLPD00706"
               , service: "plgylendmngtapp.SlidLendRtn"
               , method: "reqGetSlideList"
               , inds : "refData="+sInDsName
               , outds: "ds_grid_grd_slidelist=slidelist"
               , async: false
             });

            if (ds_grid_grd_slidelist.rowcount > 0) {
                if(opener.frmf_getParameter("SPLPP02900_spcacptseqno") != "-" && opener.frmf_getParameter("SPLPP02900_spcacptseqno") != "" &&
                   opener.frmf_getParameter("SPLPP02900_slidno")       != "-" && opener.frmf_getParameter("SPLPP02900_slidno")       != "" &&
                   opener.frmf_getParameter("SPLPP02900_blocno")       != "-" && opener.frmf_getParameter("SPLPP02900_blocno")       != "") {
                    for(var iNo=0; iNo<ds_grid_grd_slidelist.rowcount; iNo++) {
                        if(opener.frmf_getParameter("SPLPP02900_spcacptseqno")==ds_grid_grd_slidelist.getColumn(iNo,"spcacptseqno")){
                            if(opener.frmf_getParameter("SPLPP02900_blocno")==ds_grid_grd_slidelist.getColumn(iNo,"csteno")){
                                if(opener.frmf_getParameter("SPLPP02900_slidno")==ds_grid_grd_slidelist.getColumn(iNo,"slidno")){
                                    ds_grid_grd_slidelist.setColumn(iNo,"choi","1");
                                    break;
                                }
                            }
                        }
                    }		
                }
            }
		}
	}
}

/**********************************************************************************
 * Name			: lf_exeSave
 * Description	: 저장
 * Argument		: 
 * return Type	: Null
 * Author		: Autumn
***********************************************************************************/
function lf_exeSave(){

	var sSpcacptseqno = "-";
	var sBlocno       = "-";
	var sBlocNm       = "";

	var nRoNo = ds_grid_grd_slidelist.findRow("choi", "1");
	
	if(nRoNo > -1 ){
		sSpcacptseqno = ds_grid_grd_slidelist.getColumn(nRoNo,"spcacptseqno");
		sBlocno       = ds_grid_grd_slidelist.getColumn(nRoNo,"csteno");
		sBlocNm       = ds_grid_grd_slidelist.getColumn(nRoNo,"blockcnts");
	} else {
		sSpcacptseqno = "-";
		sBlocno       = "-";
		sBlocNm       = "";
	}

	var sInDsName = dsf_createDsRow("ds_temp_saveflag"
									 , [{col: "instcd"      , val: sysf_getUserInfo("dutplceinstcd")}
									 ,	{col: "fromsrcno"   , val: opener.frmf_getParameter("SPLPP02900_fromsrcno")}
									 ,	{col: "ptno"        , val: opener.frmf_getParameter("SPLPP02900_ptno")}
									 ,	{col: "spcacptseqno", val: sSpcacptseqno}
									 ,	{col: "blocno"      , val: sBlocno}
									 ]);	 
	if(	opener.frmf_getParameter("SPLPP02900_fromsrcno") != "SPLPJ02600"){
		tranf_submit({
						 id: "TXLPP02901"
					   , service: "plgyrefmngtapp.AcptSpecRef"
					   , method: "reqExeRelaPtnoBloc"
					   , inds : "refData=" + sInDsName
					   , callback: "cbf_TXLPP02901"
					   , async: false
		 });	
		 lf_exeClsScrn();
	} else {
		opener.frmf_setParameter("spcacptseqno",sSpcacptseqno);
		opener.frmf_setParameter("csteno",sBlocno);
		opener.frmf_setParameter("blocnm",sBlocNm);
        lf_exeClsScrn();
	}
}

/**********************************************************************************
 * Name			: cbf_TRLLP00700
 * Description	: 콜백함수
 * Argument		: 
 * return Type	: Null
 * Author		: Autumn
***********************************************************************************/
function cbf_TXLPP02901(strSvcID, nErrorCode, strErrorMag){
	if(nErrorCode != 0){
		sysf_messageBox("ID: " + strSvcID + "  Error: " + strErrorMag, "E009", "");
		return;
	}
}

function lf_exeClsScrn(){
	this.close();
}

/**********************************************************************************
 * Name			: lf_ChkSelect
 * Description	: 체크박스 클릭/더블클릭 시 선택 처리
 * Argument		: string:환자번호
 * return Type	: Null
 * Author		: Autumn
***********************************************************************************/
function lf_ChkSelect(obj:Grid, e:GridClickEventInfo, sFlag){

    if (sFlag == "D" || (sFlag == "S" && obj.getCellValue(e.row, e.col) == 1)) {
        for (var i = 0; i < ds_grid_grd_slidelist.rowcount; i++) {
            if (e.row != i) {
                ds_grid_grd_slidelist.setColumn(i, "choi", 0);
            }
        }

        if (sFlag == "D") {
            ds_grid_grd_slidelist.setColumn(e.row , "choi", 1);
        }
    }

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

/****************************************************************************************
 * Components	    : 
 * Components ID  : SPLPP02900
 * Event 		    : onload
 * Argument		: 01.obj	: Object Event has occurred
 *				: 02.e		: Event Object
 * Description	: 
 ****************************************************************************************/
function SPLPP02900_onload(obj:Form, e:LoadEventInfo)
{
	frmf_initForm(obj);  // 화면공통

	lf_exeInitialize();
				
}

/****************************************************************************************
 * Components	    : 
 * Components ID  : btn_close
 * Event 		    : onclick
 * Argument		: 01.obj	: Object Event has occurred
 *				: 02.e		: Event Object
 * Description	: 
 ****************************************************************************************/
function btn_close_onclick(obj:Button,  e:ClickEventInfo)
{
	lf_exeClsScrn(); 
}

/****************************************************************************************
 * 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_exeSave();
}

/****************************************************************************************
 * Components	    : 
 * Components ID  : grd_slidelist
 * Event 		    : oncellclick
 * Argument		: 01.obj	: Object Event has occurred
 *				: 02.e		: Event Object
 * Description	: 
 ****************************************************************************************/
function grd_slidelist_oncellclick(obj:Grid, e:GridClickEventInfo)
{
	if(e.col==0){ //체크박스 있는 칼럼만 선택되었을 경우
		lf_ChkSelect(obj, e, "S");
	}
}

/****************************************************************************************
 * Components	    : 
 * Components ID  : grd_slidelist
 * Event 		    : oncelldblclick
 * Argument		: 01.obj	: Object Event has occurred
 *				: 02.e		: Event Object
 * Description	: 
 ****************************************************************************************/
function grd_slidelist_oncelldblclick(obj:Grid, e:GridClickEventInfo)
{
    lf_ChkSelect(obj, e, "D");

}
]]></Script>
  </Form>
</FDL>