YNU_JEUS/app_home/himed/webapps/emr/carerecweb/js/SMMNR01000.js

/*
  
      수혈간호기록(SMMNR01000.xfm - JScript )

      - Version :
          1)  : Ver.1.00.01 
          2)  : var 2.0 khj  REA 12061 1Pint 투여량 추가
                                     , 임시저장-초기화-미수행 수행목록 선택 기능 조건별수정
                                     , 기록삭제기능수정
                                     , 기록수정기능제한
                                     , 수혈기록된 혈액의 통반납/폐기 불가능 처리
*/

var xTopAttributePath   = "/root/main/topattribute";
var xRecgrupListPath    = "/root/main/recgrup/recgruplist";
var xHIsgrupListPath    = "/root/main/histgrup/histgruplist";
var xRecHIstPntListPath = "/root/main/rechistpntgrup/rechistpntlist";
var xClsListPath        = "/root/main/detlgrup/detlgruplist"
var xHIsgrupListBKPath  = "/root/temp/histgrup/histgruplist";

var xlrgListPath            = "/root/main/lrggrup/lrggruplist"
var xCondPath               = "/root/main/cond"; 
var xClsListBKPath          = "/root/temp/main/detlgrup/detlgruplist";
var xPopWndClsListBKPath    = "/root/temp/main/cond/execpopwnddetlgrup/execpopwnddetlgruplist";
var xPatientPath            = "/root/temp/cond/patientgrup/patientgruplist";
var xExecDetlListPath       = "/root/main/cond/execdetlgrup/execdetlgruplist";
var xPopWndExecDetlListPath = "/root/main/cond/execpopwnddetlgrup/execpopwnddetlgruplist";

var xDelDeliveExecPrcpListPath = "/root/main/cond/delivedetlgrup/delivedetlgruplist";
var xBlodReturnReqGrupListPath = "/root/main/cond/blodreturnreqgrup/blodreturnreqgruplist";
var xBlodExecRecGrupListPath = "/root/main/cond/blodreturnreqgrup/blodexecrecgruplist";
var xVitalSignPath = "/root/main/cond/vitalsigngrup/vitalsigngruplist";

var xTnsNurseRecPath   ="/root/main/cond/tnsnurserecgrup/tnsnurserecgruplist";

var xBlodNoRecPath = "/root/main/cond/blodreturnreqgrup/blodnoexecrecgruplist";

var ioparam     = "" ; // 화면에서 넘어오는 파라메터 (절대 지우면 안됨)
var sGolPid     = "" ;
var sFlagChkYN  = "N"; // 폐기 확정 여부 
var sFindBlodnm = "";

//------------(20100630:경북대)
var grecnm0 = "";	//수혈기록버튼(화면open시)
var grecnm1 = "";	//수혈기록버튼(방사선조사)
var grecnm2 = "";	//수혈기록버튼(백혈구제거필터)
var grecnm3 = "";	//수혈기록버튼(수혈전투약)
var grecnm4 = "";	//수혈기록버튼(혈액혈
var grecnm5 = "";	//수혈기록버튼(hb)
var grecnm6 = "";	//수혈기록버튼(plt)
//------------(20100630:경북대)

/**
 * @group  :
 * @ver    : 2007.07.16
 * @by     : 정찬성 
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : 화면 초기화
 * @param  :
 * @return :
 * @---------------------------------------------------
 */
function fInitialize(){
	//debugger;
  var addDy = model.getValue("/root/main/cond/prcpddfrom");
  var dt = getCurrentDate();
//  var dt = "20080711";

  model.setValue(ipt_receiptid.attribute("ref"), getUserInfo("userid") );
  model.setValue(ipt_receiptnm.attribute("ref"), getUserInfo("usernm") );
  	
  ipt_receiptid.refresh();
  ipt_receiptnm.refresh();

  model.removeNodeset("/root/main/cond/execdetlgrup");
  model.removeNodeset("/root/main/cond/delivedetlgrup");
  model.removeNodeset("/root/main/cond/blodreturnreqgrup");
  model.removeNodeset("/root/main/cond/patcmtgrup");
  
  //-------------(20100630:경북대)
  if(submit("TRMNR01099")){
		grecnm0 = model.getValue("/root/hidden2/reclist/recnm0");
		grecnm1 = model.getValue("/root/hidden2/reclist/recnm1");
		grecnm2 = model.getValue("/root/hidden2/reclist/recnm2");
		grecnm3 = model.getValue("/root/hidden2/reclist/recnm3");
		grecnm4 = model.getValue("/root/hidden2/reclist/recnm4");
		grecnm5 = model.getValue("/root/hidden2/reclist/recnm5");
		grecnm6 = model.getValue("/root/hidden2/reclist/recnm6");
  }
  //-------------(20100630:경북대)	

  var pCode = "'172','016','013'"; // 조회할 CdGrupID 코드정보(170331_AYS_본원 마취회복실, 수술실 코드 추가)
  fGetNursHardCdInfo(pCode, dt);	  
     
  var instUseYN = model.getValue("/root/code/codeinfo/codelist[cdgrupid ='172']/cdid");
  if(instUseYN == "Y"){
     grp_bexcexec1.visible = 'true'			;
     grp_bexcexec2.visible = 'true'			;
  }  
  fInitWardList(getparam);  
  
          

  var sTopIOflag = ""; 
  var getparam   = "";  
  var getrgstdd   = "";
	
	var indd = opener.javascript.getParameter("SMMNR010_Param2");
	
	if(indd == "") {
		model.setValue(ipt_prcpddfrom.attribute("ref"), getDateCalc(dt, 2));          	
	} else {
		model.setValue(ipt_prcpddfrom.attribute("ref"), indd);
	}
  model.setValue(ipt_prcdddto.attribute("ref"), dt);    

  sTopIOflag = getPatientInfoDetail("ioflag"); //상단 정보에서 받음
    
  if(opener.javascript.getParameter("SMMNR010_Param") ==  ""){
	getparam = getScreenMenuParameter();         //메뉴에서 파라미터 받음
  }else{
	 if(opener.javascript.getParameter("SMMNR010_RgstddDATA") !=  ""){    		 
		getrgstdd = opener.javascript.getParameter("SMMNR010_RgstddDATA"); //수혈현황조회에서 파라미터받음(처방일자)
		model.setValue(ipt_prcpddfrom.attribute("ref"), getrgstdd);      
     }
     getparam = opener.javascript.getParameter("SMMNR010_Param");
  }

  if(getparam != ""){
    if(sTopIOflag == "O"){ //상단 정보 외래
      if(getparam == "IPRC" || getparam == ""){ //메뉴 파라미터 병동일 경우 파라미터 변경
        getparam = "OPRC";
        }else if(getparam == "IPRC1"){
            getparam = "OPRC1";
        }else if(getparam == "IPRC2"){
          getparam = "OPRC2";
        }
      }else if(sTopIOflag == "I" || sTopIOflag == "D" || sTopIOflag == "T" || sTopIOflag == "E"){ // 입원, DSC&항암, 수술, 응급 파라미터 변경
        if(getparam == "OPRC" || getparam == ""){ //메뉴 파라미터 외래일 경우 파라미터 변경
          getparam = "IPRC";
        }else if(getparam == "OPRC1"){
          getparam = "IPRC1";
        }else if(getparam == "OPRC2"){
          getparam = "IPRC2";
        }
     } 
  }
  
  getparam = fParam(getparam);             // 파라메터에 따른 혈액불출/수혈간호 case 선택
  
  if(getparam == "OPRC"){
      rdo_ioflag1.value="O";
      btn_prtconsent.visible = false;
  }else{
      rdo_ioflag1.value="I";
      btn_prtconsent.visible = true;
  }

  // 공통코드 스크립트 호출 - 수혈부작용/수혈중단 사유
  zbcfGetCodeList( new Array("M0330", "L0084", "L0085", "L0093", "L0094"),
             new Array("/root/init/sideeffectcom", "/root/init/etcprcpresncd", "/root/init/discontinucom", "/root/init/L0093list", "/root/init/L0094list"), true,
             new Array("cdid"),  new Array("asc"));

  //수혈중단사유중 "병원사유기타" 삭제 --> 2008-08-20 사유가 기타로 변경되면서 주석처리
  //model.removenode("/root/init/L0093list/L0093[cdid = '12399']");
    
  submit("TRMNR01026");
  
//  if(submit("TRMNR01026")){ // 수혈중단 사유 코드 가져오기
//    for(var j=1 ; j <= getNodesetCount("/root/init/totresncd/item/cdid") ; j++){
//      for(var i =1 ; i <= getNodesetCount("/root/init/discontinucom/L0085") ; i++){
//        if( model.getValue("/root/init/totresncd/item["+j+"]/cdid") == model.getValue("/root/init/discontinucom/L0085["+i+"]/cdid") ){
//          var ChgLavel = model.getValue("/root/init/totresncd/item["+j+"]/cdnm");
//          model.setValue("/root/init/discontinucom/L0085["+i+"]/cdnm" , ChgLavel);
//        }
//      }
//        
//      for(var i =1 ; i <= getNodesetCount("/root/init/etcprcpresncd/L0084") ; i++){
//        if( model.getValue("/root/init/totresncd/item["+j+"]/cdid") == model.getValue("/root/init/etcprcpresncd/L0084["+i+"]/cdid") ){
//          var ChgLavel = model.getValue("/root/init/totresncd/item["+j+"]/cdnm");
//          model.setValue("/root/init/etcprcpresncd/L0084["+i+"]/cdnm" , ChgLavel);
//        }
//      }
//    }
//  }     
  
  cmb_discontinu.disabled = true ;
  ipt_etc.disabled = true ;
//----------------(20100630:경북대)
//textarea1.value = "수혈팔찌 확인함, 수혈부작용 설명함" + "\n" + "본인확인 혈액형 :";			//수혈부작용 설명함 추가_20090327_SMY
	var tempstr = grecnm0
	if (tempstr != "") {
		textarea1.value = tempstr;			//수혈부작용 설명함 추가_20090327_SMY		
	} else {
	  	if(getUserInfo("dutplceinstcd") == "031" && (getUserInfo("dutplcecd") == model.getValue("/root/code/codeinfo/codelist[cdgrupid ='016']/cdid") || getUserInfo("dutplcecd") == model.getValue("/root/code/codeinfo/codelist[cdgrupid ='013']/cdid")) ){	// '17.03.29_AYS_본원 마취회복실, 수술실 문구 수정
			textarea1.value = "혈액전달 및 연결시 수여자와 혈액의 환자이름, 혈액형, 혈액종류를 확인한다." + "\n" + "수혈간호기록의 vital sign기록을  마취기록조회(진료)의 5분 vital sign으로 대체한다.";			// 마취회복실 수혈오류 관련 보완사항_170220_AYS
		} else{
			textarea1.value = "수혈팔찌 확인함, 수혈부작용 설명함" + "\n" + "수혈이 완료될 때까지 30분마다 환자 상태를 관찰하고 확인한다." + "\n" + "본인확인 혈액형 확인함";			//수혈부작용 설명함 추가_20090327_SMY
  	}
  }
//----------------(20100630:경북대)  
  
  fGetBrcdPrntInfo(); //바코드 프린터 설정 정보를 가진 Instance 생성 및 바코드 프린터 설정 가져오기
  //lzzfMakeBrcdPrntObj("CommAX");
  lzzfMakeBrcdPrntObjHanDo("CommAX");
  
  model.setfocus("ipt_pid");//등록번호로 포커스 맞춤  
}


 /**
 * @group  :
 * @ver    : 2007.09.27
 * @by     : 정찬성 
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   :  바이탈싸인 행삭제 (2008-08-19 요구사항으로 삭제 처리)
 * @param  :
 * @return :
 * @---------------------------------------------------
 */
function fDelRow(){
  var iRow = grd_vitalsigngruplist.row ;
  var sRowNum = model.getValue(xVitalSignPath + "[" + iRow + "]/tnscarerecvsseq");
  
  if(parseInt(sRowNum) < 4){
    messageBox("Vital Sign 기본정보는 삭제 ","E001");
    return; 
  } else if( model.getValue(xVitalSignPath+"["+1+"]/stat") == 'I' ) {
      grd_vitalsigngruplist.deleteRow(iRow);
  } else if( model.getValue(xVitalSignPath+"["+1+"]/stat") == 'U'  && model.getValue(xVitalSignPath+"["+iRow+"]/stat") == 'I'  ) {
      grd_vitalsigngruplist.deleteRow(iRow);
  } else if( model.getValue(xVitalSignPath+"["+1+"]/stat") == 'U'  ) {
    grd_vitalsigngruplist.textmatrix(iRow, 1) = "D" ;
  }
}

 /**
 * @group  :
 * @ver    : 2007.09.27
 * @by     : 정찬성 
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   :  줄추가 버튼 (2008-08-19 요구사항으로 삭제 처리)   
 * @param  :
 * @return :
 * @---------------------------------------------------
 */
function fAddSameLevlItemButton(){
//  var iRows = grd_vitalsigngruplist.rows;
  var iRow = grd_vitalsigngruplist.row;
  
  if(iRow > 0 ){
    grd_vitalsigngruplist.insertRow(iRow, "below");
    model.setValue(xVitalSignPath+"["+grd_vitalsigngruplist.row+"]/tnscarerecseq", model.getValue(xVitalSignPath+"["+1+"]/tnscarerecseq") );
    model.setValue(xVitalSignPath+"["+grd_vitalsigngruplist.row+"]/stat","I");
  }
}

/**
 * @group  :
 * @ver    : 2007.05.09
 * @by     : 정찬성
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : 참여자 정보 팝업 조회
 * @param  : originalNode
 * @param  : copyNode
 * @return : true/false
 * @---------------------------------------------------
 */
function fClickUserBtn(userflag, seq, deptcd2, flag){
  var deptcd = "";
  var jobkindcd = "";
  var deptcd = "";
  if(userflag == "doctor"){
    deptcd = deptcd2;
    jobkindcd = "";
  }else if(userflag == "nurse"){
    deptcd = deptcd2;
    jobkindcd = "";
  }else{}
  setParameter("SPMNN02100_deptcd", deptcd);
  setParameter("SPMNN02100_jobkindcd", jobkindcd);
  
  modal("SPMNR02100");
  
  var userid = getParameter("SPMNN02100_userid");
  var usernm = getParameter("SPMNN02100_usernm");
  var posinstnm = getParameter("SPMNN02100_posinstnm");
  var posinstcd = getParameter("SPMNN02100_posinstcd");
  var posdeptnm = getParameter("SPMNN02100_posdeptnm");
  var posdeptcd = getParameter("SPMNN02100_posdeptcd");
  
  if(userid != "" && posdeptcd != ""){//사용자 정보가 있을 경우에만 처리
    if(flag == "str"){
      model.setValue(opt_fromdeptnm.attribute("ref"), userid);// 저장할 데이터 생성
      model.setValue(opt_fromusernm.attribute("ref"), usernm);// 저장할 데이터 생성
      model.setValue(opt_tnsstrnursall.attribute("ref"), userid+","+usernm+","+posinstnm+","+posinstcd+","+posdeptnm+","+posdeptcd);// 저장할 데이터 생성
    } else if(flag == "end"){
      model.setValue(opt_todeptnm.attribute("ref"), userid);// 저장할 데이터 생성
      model.setValue(opt_tousernm.attribute("ref"), usernm);// 저장할 데이터 생성
      model.setValue(opt_tnsendnursall.attribute("ref"), userid+","+usernm+","+posinstnm+","+posinstcd+","+posdeptnm+","+posdeptcd);// 저장할 데이터 생성
    }
  }

  model.refresh();  

  setParameter("SPMNN02100_userid", "");
  setParameter("SPMNN02100_usernm", "");
}

/**
 * @group  :
 * @ver    : 2007.07.09
 * @by     : 정찬성 
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : 그리드 클릭시 선택컬럼 값 변경
 * @param  :
 * @return :
 * @---------------------------------------------------
 */ 
function fClickedGridRow(datagrid, aGridNm, xListPath){
  var iRow = 0; 
  var iCol = 0;
  var ocrtag = "";

  iRow = datagrid.row;  
  iCol = datagrid.col;
  
  if(iCol == 1) return;
  if(iRow < 1) return;
  
  var ocrtag = datagrid.valueMatrix(iRow, datagrid.colRef("ocrtag"));
  
  if(ocrtag == "") {
	 	if(model.getValue(xListPath+"["+iRow+"]/sel") == "true"){  	
	    model.setValue(xListPath+"["+iRow+"]/sel","false");
	    datagrid.removeStatus(iRow, "update");
	  }else{
	    model.setValue(xListPath+"["+iRow+"]/sel", "true");
	    datagrid.rowStatus(iRow) = 2;
	    if (aGridNm == "grd_execdetlgruplist") fSelchange();
	  }	
  } else {
  	for(var i = datagrid.fixedRows; i < datagrid.rows;  i++) {
  		if(ocrtag == datagrid.valueMatrix(i, datagrid.colRef("ocrtag"))) {
	  		if(model.getValue(xListPath+"["+i+"]/sel") == "true"){  	
			    model.setValue(xListPath+"["+i+"]/sel","false");
			    datagrid.removeStatus(i, "update");
			  }else{
			    model.setValue(xListPath+"["+i+"]/sel", "true");
			    datagrid.rowStatus(i) = 2;
			    if (aGridNm == "grd_execdetlgruplist") fSelchange();
			  }	
			}
  	}
  }
}

 /**
 * @group  :
 * @ver    : 2007.07.09
 * @by     : 정찬성 
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   :  미수행기록 목록에서 선택항목 체크(더블클릭)
 * @param  :
 * @return :
 * @---------------------------------------------------
 */

function fParam(getparam) {
  var openernull = "" // 파마리터 null check
  var popvalue = "" ;
  var pidvalue = "" ;
  var sPid = getPatientInfo("pid");
  //debugger;

  //sGolPid = sPid; // 기존 Pid 기록
  /* 메뉴 || 파라미터로 들어올때 체크 시작 */
  /* IPRC1 : 수혈불출관리화면(병동) */
  /* IPRC2 : 수혈간호기록(병동) */
  /* OPRC1 : 수혈불출관리화면(외래) */
  /* OPRC2 : 수혈간호기록(외래) */

  if( window.opener == null && 
    ( getparam == "IPRC1" || getparam == "IPRC2" || 
      getparam == "OPRC1" || getparam == "OPRC2" || 
      getparam == "IPRC"  || getparam == "OPRC") ) {//병동메인/주사에서 들어오지 않을때...

    openernull = 'Y';

    model.setValue(ipt_pid.attribute("ref"), sPid  );//등록번호 화면에 셋팅
    model.setValue(ipt_pid2.attribute("ref"), sPid  );//등록번호 화면에 셋팅
    if(getparam == "OPRC1"){
      button1.selected = true;
      model.toggle("case1");                
      group4.visible = false;
      getparam = "OPRC" ;   
      ioparam = getparam ;

      if(sPid != null && sPid != "" ) btn_srch1.dispatch("DOMActivate"); //상단정보가 있을때
    } else if(getparam == "OPRC2"){
      button2.selected = true;
      model.toggle("case2");
      group4.visible = true;
      getparam = "OPRC" ; 
      ioparam = getparam ;
      fGetPatientInfo("pid","case2");// 환자 개인정보를 가져온다.
      
      if(sPid != null && sPid != "" ) btn_srch2.dispatch("DOMActivate"); //상단정보가 있을때
    } else if(getparam == "IPRC1"){
      button1.selected = true;
      model.toggle("case1");    
      group4.visible = false;           
      getparam = "IPRC" ; 
      ioparam = getparam ;
      
      if(sPid != null && sPid != "" ) btn_srch1.dispatch("DOMActivate"); //상단정보가 있을때
    } else if(getparam == "IPRC2"){
      button2.selected = true;
      model.toggle("case2");    
      group4.visible = true;            
      getparam = "IPRC" ;   
      ioparam = getparam ;
      fGetPatientInfo("pid","case2");// 환자 개인정보를 가져온다.
      
      if(sPid != null && sPid != "" ) btn_srch2.dispatch("DOMActivate"); //상단정보가 있을때
    }

  } else if( window.opener != null && 
             ( opener.window.javascript.getParameter("ioflag") == "IPRC1" || 
               opener.window.javascript.getParameter("ioflag") == "IPRC2" || 
               opener.window.javascript.getParameter("ioflag") == "OPRC1" || 
               opener.window.javascript.getParameter("ioflag") == "OPRC2" )) {//병동메인/주사실메인에서 들어올때...
                      
    popvalue = opener.window.javascript.getParameter("ioflag")
    pidvalue = opener.window.javascript.getParameter("pid")

    model.setValue(ipt_pid.attribute("ref"), opener.window.javascript.getParameter("pid") );
    model.setValue(ipt_pid2.attribute("ref"), opener.window.javascript.getParameter("pid") );
    //sGolPid = opener.window.javascript.getParameter("pid");
    
    if( popvalue != null && popvalue != "" && pidvalue != null && pidvalue != "") {//플래그별 화면 case 선택
       if(popvalue == "OPRC1"){
        button1.selected = true;
        model.toggle("case1");    
        group4.visible = false;           
        getparam = "OPRC" ;   
        ioparam = getparam ;
        btn_srch1.dispatch("DOMActivate");
      } else if(popvalue == "OPRC2"){
        button2.selected = true;
        model.toggle("case2");          
        group4.visible = true;      
        getparam = "OPRC" ; 
        ioparam = getparam ;
        btn_srch2.dispatch("DOMActivate");
      } else if(popvalue == "IPRC1"){
        button1.selected = true;
        model.toggle("case1");                
        group4.visible = false;
        getparam = "IPRC" ; 
        ioparam = getparam ;
        btn_srch1.dispatch("DOMActivate");
      } else if(popvalue == "IPRC2"){
        button2.selected = true;
        model.toggle("case2");  
        group4.visible = true;              
        getparam = "IPRC" ;   
        ioparam = getparam ;
        btn_srch2.dispatch("DOMActivate");
      }
    }
  } else  if(( getparam == "IPRC1" || getparam == "IPRC2" || getparam == "OPRC1" || getparam == "OPRC2" || getparam == "IPRC" || getparam == "OPRC")) {// 메뉴에서 들어올때
    model.setValue(ipt_pid.attribute("ref"), sPid  );//등록번호 화면에 셋팅
    model.setValue(ipt_pid2.attribute("ref"), sPid  );//등록번호 화면에 셋팅
    if(getparam == "OPRC1"){
      button1.selected = true;
      model.toggle("case1");      
      group4.visible = false;         
      getparam = "OPRC" ;   
      ioparam = getparam ;
    
      if(sPid != null && sPid != "" ) btn_srch1.dispatch("DOMActivate"); //상단정보가 있을때
    } else if(getparam == "OPRC2"){
      button2.selected = true;
      model.toggle("case2");          
      group4.visible = true;                
      getparam = "OPRC" ; 
      ioparam = getparam ;
      
      if(sPid != null && sPid != "" ) btn_srch2.dispatch("DOMActivate"); //상단정보가 있을때
    } else if(getparam == "IPRC1"){
      button1.selected = true;
      model.toggle("case1");        
      group4.visible = false;       
      getparam = "IPRC" ; 
      ioparam = getparam ;
      
      if(sPid != null && sPid != "" ) btn_srch1.dispatch("DOMActivate"); //상단정보가 있을때
    } else if(getparam == "IPRC2"){
      button2.selected = true;
      model.toggle("case2");      
      group4.visible = true;          
      getparam = "IPRC" ;   
      ioparam = getparam ;
    
      if(sPid != null && sPid != "" ) btn_srch2.dispatch("DOMActivate"); //상단정보가 있을때
    } else {
      if(sPid != null && sPid != "" ) {//상단정보가 있을때
        model.setValue(ipt_pid.attribute("ref"), sPid  );//등록번호 화면에 셋팅
        model.setValue(ipt_pid2.attribute("ref"), sPid  );//등록번호 화면에 셋팅
      }
    }
  } else if(getparam == "" || getparam == null  ) {// 화면파라미터 없을때 
    button1.selected = true;
    model.toggle("case1");    
    group4.visible = false; 
    getparam = "IPRC";
  } else {
    openernull = 'Y';
    getparam = "" ;
  }

  /* 메뉴 && 파라미터가 아닌 로컬이나 다른 값으로 들어올때 기본 셋팅값으로 시작 */

  if(getparam == "" && openernull == "Y"){
    //        화면파라미터/팝업파라미터 모두 없을때   
    button1.selected = true;
    model.toggle("case1");                
    group4.visible = false; 
    getparam = "IPRC" ; 
  }

  /* 메뉴 && 파라미터가 아닌 로컬이나 다른 값으로 들어올때 기본 셋팅값으로 끝 */

  /* 메뉴 || 파라미터가 외래일때 병동/병실/환자 리스트 disabled 시작 */
  if(getparam == "OPRC"){ // 외래일때, 병동/병실/환자 리스트 disabled
    cmb_wardcdgruplist2.disabled = true ;
    cmb_roomcdgruplist2.disabled = true ;
    cmb_patientgruplist2.disabled = true ;
    cmb_wardcdgruplist.disabled = true ;
    cmb_roomcdgruplist.disabled = true ;
    cmb_patientgruplist.disabled = true ;
  }else{
    cmb_wardcdgruplist2.disabled = false ;
    cmb_roomcdgruplist2.disabled = false ;
    cmb_patientgruplist2.disabled = false ;
    cmb_wardcdgruplist.disabled = false ;
    cmb_roomcdgruplist.disabled = false ;
    cmb_patientgruplist.disabled = false ;
  }

  /* 메뉴 || 파라미터가 외래일때 병동/병실/환자 리스트 disabled 끝 */
  ioparam = getparam ;
  return getparam ;
}



 /**
 * @group  :
 * @ver    : 2007.07.09
 * @by     : 정찬성 
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   :  혈액요청취소 선택했을때...
 * @param  :
 * @return :
 * @---------------------------------------------------
 */

function fBlodReqCancelDoc(){
  var sRowCnt = grd_delivedetlgruplist.rows-grd_delivedetlgruplist.fixedrows;
  var cnt = 0 ;

  model.removeNode ("/root/send/report"); 

  for(var i=1; i<= sRowCnt; i++){ // 선택한 값이 불출신청 상태인지 체크
    if( grd_delivedetlgruplist.labelmatrix(i, 1) == "true" ) {
      cnt = cnt + 1;

      if( grd_delivedetlgruplist.labelmatrix(i, 2) != "불출요청") {
        messageBox("불출요청 상태 이외에는 혈액요청취소를 ","E001");
        return; 
      }

      if( grd_delivedetlgruplist.labelmatrix(i, grd_delivedetlgruplist.colRef("blodno") ).length <  5 ) {
        messageBox("혈액번호가 ","I004");
        return; 
      }

      model.makeValue("/root/send/report/delivedetlgrup/delivedetlgruplist["+cnt+"]","");
      model.copyNode( "/root/send/report/delivedetlgrup/delivedetlgruplist["+cnt+"]", "/root/main/cond/delivedetlgrup/delivedetlgruplist["+i+"]" );
    }
  }

  if(cnt < 1){
    messageBox("선택 정보가 ","I004");
    return; 
  }                       

  if(messageBox("혈액요청 취소를 ","Q004") != 6) return;// 저장하시겠습니까?

  model.makeValue("/root/send/report/patientnm",model.getValue("/root/main/cond/patientgrupInfo/patientgruplistInfo/patientnm1") );                  
  model.makeValue("/root/send/report/pid",model.getValue("/root/main/cond/patientgrupInfo/patientgruplistInfo/pid") );  
  model.makeValue("/root/send/report/sexage",model.getValue("/root/main/cond/patientgrupInfo/patientgruplistInfo/sexage") );  
  model.makeValue("/root/send/report/btypee",model.getValue("/root/main/cond/patientgrupInfo/patientgruplistInfo/btype") );                 
  
  model.makeValue("/root/send/detlgrup",grd_delivedetlgruplist.getupdatedataAll("i"));
  
  if(submit("TXMNR01034")){
    fGettDeliveDetlList();// 불출신청 내역 재조회
  } 
}


 /**
 * @group  :
 * @ver    : 2007.07.09
 * @by     : 정찬성 
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   :  미수행기록 목록에서 선택항목 체크(더블클릭)
 * @param  :
 * @return :
 * @---------------------------------------------------
 */

function fGridSel() {

  var sRowCnt2 = grd_blodnoexecrecgruplist.rows-grd_blodnoexecrecgruplist.fixedrows;
  var iRow = grd_blodnoexecrecgruplist.Row ;

  if( grd_blodnoexecrecgruplist.labelmatrix(iRow, 1) == "FALSE" || grd_blodnoexecrecgruplist.labelmatrix(iRow, 1) == "false" ){
    grd_blodnoexecrecgruplist.textmatrix(iRow, 1) = "true" ;
    
    fOtherRecListUncheck("noexec");
    
  } else if( grd_blodnoexecrecgruplist.labelmatrix(iRow, 1) == "true"  ) {
    grd_blodnoexecrecgruplist.textmatrix(iRow, 1) = "FALSE" ;
  }
}

 /**
 * @group  :
 * @ver    : 2007.07.09
 * @by     : 정찬성 
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   :  수행기록 내역 상세정보 (더블클릭)
 * @param  :
 * @return :
 * @---------------------------------------------------
 */

function fBlodExecRecDetlinfo() {

  var sRowCnt = grd_blodexecrecgruplist.rows-grd_blodexecrecgruplist.fixedrows;

  var iRow = grd_blodexecrecgruplist.row ;

  model.setValue(cap_blodno.attribute("ref"), model.getValue(xBlodExecRecGrupListPath+"["+iRow+"]/blodno"));
  model.setValue(cap_blodnm.attribute("ref"), model.getValue(xBlodExecRecGrupListPath+"["+iRow+"]/prcpnm"));
  model.setValue(cap_aborh.attribute("ref"), model.getValue(xBlodExecRecGrupListPath+"["+iRow+"]/abo") + model.getValue(xBlodExecRecGrupListPath+"["+iRow+"]/rh") );
  model.setValue(ipt_fromdd.attribute("ref"), model.getValue(xBlodExecRecGrupListPath+"["+iRow+"]/tnsstrddtm").substring(0,8));
  model.setValue(ipt_fromtm.attribute("ref"), model.getValue(xBlodExecRecGrupListPath+"["+iRow+"]/tnsstrddtm").substring(8,12));

  model.setValue(ipt_todd.attribute("ref"), model.getValue(xBlodExecRecGrupListPath+"["+iRow+"]/tnsendddtm").substring(0,8));
  model.setValue(ipt_totm.attribute("ref"), model.getValue(xBlodExecRecGrupListPath+"["+iRow+"]/tnsendddtm").substring(8,12));
  model.setValue(opt_fromdeptnm.attribute("ref"), model.getValue(xBlodExecRecGrupListPath+"["+iRow+"]/tnsstrnursedeptnm"));
  model.setValue(opt_fromusernm.attribute("ref"), model.getValue(xBlodExecRecGrupListPath+"["+iRow+"]/tnsstrnursenm"));
  model.setValue(opt_todeptnm.attribute("ref"), model.getValue(xBlodExecRecGrupListPath+"["+iRow+"]/tnsendnursedeptnm"));


  model.setValue(opt_tousernm.attribute("ref"), model.getValue(xBlodExecRecGrupListPath+"["+iRow+"]/tnsendnursenm"));
  model.setValue(cmb_tnssideeffect.attribute("ref"), model.getValue(xBlodExecRecGrupListPath+"["+iRow+"]/tnssideeffect"));
  model.setValue(ipt_prcpdelivefact.attribute("ref"), model.getValue(xBlodExecRecGrupListPath+"["+iRow+"]/prcpdelivefact"));
  model.setValue(rdo_discontinuyn.attribute("ref"), model.getValue(xBlodExecRecGrupListPath+"["+iRow+"]/discontinuyn"));
  //rdo_discontinuyn.disabled = true;
  //cmb_discontinu.disabled = true;
  model.setValue(cmb_discontinu.attribute("ref"), model.getValue(xBlodExecRecGrupListPath+"["+iRow+"]/discontinu"));
  model.setValue(ipt_etc.attribute("ref"), model.getValue(xBlodExecRecGrupListPath+"["+iRow+"]/discontinuetc"));

  //model.setValue(ipt_drugqty.attribute("ref"), model.getValue(xBlodExecRecGrupListPath+"["+iRow+"]/drugqty"));
  model.setValue(ipt_onepintqty.attribute("ref"), model.getValue(xBlodExecRecGrupListPath+"["+iRow+"]/onepintqty"));
  fSumQtyCalc(model.getValue(xBlodExecRecGrupListPath+"["+iRow+"]/drugqty"));// 총투여량 계산 onepintqty * 혈액갯수
    
  model.setValue(textarea1.attribute("ref"), model.getValue(xBlodExecRecGrupListPath+"["+iRow+"]/tnsrec"));
  model.setValue(opt_instcd.attribute("ref"), model.getValue(xBlodExecRecGrupListPath+"["+iRow+"]/instcd"));
  model.setValue("/root/main/cond/tnsnurserecgrup/tnsnurserecgruplist/signno", 
  model.getValue("/root/main/cond/blodreturnreqgrup/blodexecrecgruplist["+iRow+"]/signno"));
  model.setValue(chk_smlqtytnsyn.attribute("ref"), model.getValue("/root/main/cond/blodreturnreqgrup/blodexecrecgruplist["+iRow+"]/smlqtytnsyn"));

  model.setValue(opt_tnsstrnursall.attribute("ref"), 
  model.getValue(xBlodExecRecGrupListPath+"["+iRow+"]/tnsstrnurseid")+","+
  model.getValue(xBlodExecRecGrupListPath+"["+iRow+"]/tnsstrnursenm")+","+","+","+
  model.getValue(xBlodExecRecGrupListPath+"["+iRow+"]/tnsstrnursedeptnm")+","+
  model.getValue(xBlodExecRecGrupListPath+"["+iRow+"]/tnsstrnursedeptcd"));

  model.setValue(opt_tnsendnursall.attribute("ref"), 
  model.getValue(xBlodExecRecGrupListPath+"["+iRow+"]/tnsendnurseid")+","+
  model.getValue(xBlodExecRecGrupListPath+"["+iRow+"]/tnsendnursenm")+","+","+","+
  model.getValue(xBlodExecRecGrupListPath+"["+iRow+"]/tnsendnursedeptnm")+","+
  model.getValue(xBlodExecRecGrupListPath+"["+iRow+"]/tnsendnursedeptcd"));

  if(rdo_discontinuyn.value=='Y'){
    cmb_discontinu.disabled = false ;
    if (cmb_discontinu.value.substring(3,5) == "99") {
      ipt_etc.disabled = false ;
    }
  }else{
    cmb_discontinu.disabled = true;
    ipt_etc.disabled = true ;
  }

  model.refresh();

  var sRowCnt2 = grd_blodnoexecrecgruplist.rows-grd_blodnoexecrecgruplist.fixedrows;
  
  for(var i=1; i<= sRowCnt2; i++){ // 선택한 값이 불출신청 상태인지 체크
    grd_blodnoexecrecgruplist.textmatrix(i, 1) = "FALSE" ;
  }
}


 /**
 * @group  :
 * @ver    : 2007.07.16
 * @by     : 정찬성 
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   :  수혈 수행 내역 리스트
 * @param  :
 * @return :
 * @---------------------------------------------------
 */
function fGetBlodExecRecList(blodpidflag){

  var sRowCnt = grd_execdetlgruplist.rows-grd_execdetlgruplist.fixedrows; 

  if( model.getValue("/root/main/cond/patientgrupInfo/patientgruplistInfo/pid") == "" && model.getValue("/root/main/cond/blodno") == "" ){
  
//    messageBox("혈액번호/등록번호를 ","C001");
//    model.setfocus("ipt_blodno");
//    return; 
  
  }

  model.refresh();

  model.makeValue("/root/send/blodpidflag",blodpidflag);  

  model.makeValue("/root/send/blodno", ipt_blodno.value  );
  model.makeValue("/root/send/prcpddfrom", ipt_prcpddfrom2.value  );
  model.makeValue("/root/send/prcpddto", ipt_prcdddto2.value  );
  model.makeValue("/root/send/wardcd", cmb_wardcdgruplist2.value  );
  model.makeValue("/root/send/wardcdnm", cmb_wardcdgruplist2.label  );
  model.makeValue("/root/send/roomcd", cmb_roomcdgruplist2.value  );
  model.makeValue("/root/send/hngnm", cmb_patientgruplist2.value  );
  model.makeValue("/root/send/pid", ipt_pid2.value  );
  model.makeValue("/root/send/ioparam", ioparam);

  if(submit("TRMNR01024")){
  }   

}

  /**
 * @group  :
 * @ver    : 2007.05.09
 * @by     : 정찬성 
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   :  수혈간호기록 기록저장 버튼
 * @param  :
 * @return :
 * @---------------------------------------------------
 */

function fTnsRecSave(pFlag){
  
  if(pFlag==""){
    pFlag = "TempSave";
  }
  
  //20100415 khj 12061 수혈종료일시 입력후 임시저장 기능 블로킹
  if ( pFlag == "TempSave" && !isNull(model.getValue(xTnsNurseRecPath+"/tnsenddd") ) ){
    messageBox("수혈종료일시의 기록은 인증저장만 ","I006");
    return;
  }
  
  //if (!isNull(model.getValue("/root/main/cond/tnsnurserecgrup/tnsnurserecgruplist/signno") ) ){
  //  messageBox("최초 인증저장이 아니므로 FlowSheet에서 V/S 수정이 필요합니다.","I");
  //}
  
  var CheckValue = "";
  var check = "" ;
  var sRowCnt = grd_blodexecrecgruplist.rows-grd_blodexecrecgruplist.fixedrows;
  var rtnBlodList = "";
  var rtnBlodFindRow = 0;
  var rtnBlodListArr = new Array();
  
  
  // 기존 Signno 여부 확인
  var CheckSignno = model.getValue("/root/main/cond/tnsnurserecgrup/tnsnurserecgruplist/signno").split(",") ;
  if(CheckSignno.length > 0){
  	for(var i=0 ; i <= CheckSignno.length ; i++){
  		if(!isNull(CheckSignno[i])){
  			messageBox("최초 인증저장이 아니므로 FlowSheet에서 V/S 수정이 필요합니다.","I");
  			break;
  		}
  	}
  }
  
  // 미수행기록목록 리스트, 수행기록 내역 리스트 확인 작업
  var blodnodupSourcebase = new Array();
  var prcpnodupSourcebase = new Array();
  if(cap_blodno.value != ""){
    blodnodupSourcebase = cap_blodno.value.split(",") ;
    prcpnodupSourcebase = model.getValue("/root/main/cond/tnsnurserecgrup/tnsnurserecgruplist/prcpno").split(",") ;
  }
//  else {
//    blodnodupSourcebase[0] = cap_blodno.value ;
//  }
    

  for(var i=1; i<= sRowCnt; i++){ // 선택한 값이 불출신청 상태인지 체크, 수행기록내역에서 선택한 혈액번호인지 체크
    if( grd_blodexecrecgruplist.valuematrix(i, grd_blodexecrecgruplist.colRef("blodno")) == blodnodupSourcebase[0] &&
        grd_blodexecrecgruplist.valuematrix(i, grd_blodexecrecgruplist.colRef("prcpno")) == prcpnodupSourcebase[0] ) {
      check = "Y" ;
      rtnBlodFindRow = i;
      break;
    }
  }
  
  if(check == "Y" && pFlag == "CertSave" && blodnodupSourcebase.length == 1  ){//인증저장이고 하나의 혈액번호가 선택되어 수정할경우 함께 기록된 혈액번호가 존재하는지 체크
    rtnBlodList = fExistsExecRecTogether(rtnBlodFindRow,"U");
    
  }

  if(chk_smlqtytnsyn.value == "Y"){
    //if(model.getValue("/root/main/cond/tnsnurserecgrup/tnsnurserecgruplist/drugqty") == ""){
    if(model.getValue("/root/main/cond/tnsnurserecgrup/tnsnurserecgruplist/onepintqty") == ""){
      messageBox("투여량을 입력하십시요", "E");
      model.setFocus("ipt_onepintqty");
      return;
    }
  }
  
  /* 수혈종료일시가 입력되면 반드시 투여량이 입력되어야함 */
  if(model.getValue("/root/main/cond/tnsnurserecgrup/tnsnurserecgruplist/tnsenddd") != "" || model.getValue("/root/main/cond/tnsnurserecgrup/tnsnurserecgruplist/tnsendtm") != "") {
    //if(model.getValue("/root/main/cond/tnsnurserecgrup/tnsnurserecgruplist/drugqty") == ""){
    if(model.getValue("/root/main/cond/tnsnurserecgrup/tnsnurserecgruplist/onepintqty") == ""){
      messageBox("혈액 투여량이 입력되지 않았습니다.\n\n투여량을 입력하세요.", "E");
      model.setFocus("ipt_onepintqty");
      return;     
    }
  }
  
  //2008-12-16 추가
  if(ipt_tnssideeffectetc.disabled == false && ipt_tnssideeffectetc.value == "" ){
    messageBox("수혈 부작용 기타에 대한 상세 입력을 하지 않았습니다.\n\n부작용 기타란에 입력하세요.", "E");
    model.setfocus("ipt_tnssideeffectetc");
    return;
  }
    
  
  /* 수혈중단이 Y 일때 수혈폐기로 상태 변경 시작 */
  if( rdo_discontinuyn.value == 'Y') {
  
    CheckValue = "Y";
    var blodnodupSource = new Array();
    var prcpnodupSource = new Array();
    
    if(cap_blodno.value != ""){
      blodnodupSource = cap_blodno.value.split(",") ;
      prcpnodupSource = model.getValue("/root/main/cond/tnsnurserecgrup/tnsnurserecgruplist/prcpno").split(",") ;
    } 
//    else {
//      blodnodupSource[0] = cap_blodno.value ;
//    }
    
    for(var i=0; i<= blodnodupSource.length -1 ; i++){
//    if ( check != "Y" ){// 신규 저장
      for(var n=1; n <= grd_blodreturnreqgruplist.rows ; n++){
        if( blodnodupSource[i] ==  model.getValue(xBlodReturnReqGrupListPath+"["+n+"]/blodno") &&
            prcpnodupSource[i] ==  model.getValue(xBlodReturnReqGrupListPath+"["+n+"]/prcpno") ) {//혈액번호와 같으면 그리드에 셋팅
          if(model.getValue(xBlodReturnReqGrupListPath+"["+n+"]/reqflagstat") == "Y"){
            //messageBox(model.getValue(xBlodReturnReqGrupListPath+"["+n+"]/blodno") + " 는 폐기 확정 된 혈액입니다.", "E");
            //return;
            grd_blodreturnreqgruplist.valuematrix(n,1) = 'true' ;
          }else{
            grd_blodreturnreqgruplist.valuematrix(n,1) = 'true' ;
            grd_blodreturnreqgruplist.valuematrix(n, grd_blodreturnreqgruplist.colRef("reqflag")) =  '3' ;
            grd_blodreturnreqgruplist.valuematrix(n, grd_blodreturnreqgruplist.colRef("returnabandondate")) = ipt_todd.value ;
            if(chk_smlqtytnsyn.value == "Y"){
              grd_blodreturnreqgruplist.valuematrix(n, grd_blodreturnreqgruplist.colRef("etcprcpresncd")) = "13001"; //소량수혈 코드 하드코딩
              grd_blodreturnreqgruplist.valuematrix(n, grd_blodreturnreqgruplist.colRef("clinccmtcnts")) = "" ;
            }else{
              grd_blodreturnreqgruplist.valuematrix(n, grd_blodreturnreqgruplist.colRef("etcprcpresncd")) = cmb_discontinu.value ;
              grd_blodreturnreqgruplist.valuematrix(n, grd_blodreturnreqgruplist.colRef("clinccmtcnts")) = ipt_etc.value ;
            }
          }
        }
      }
    }

    var cnt = 0 ;
    var Hosyn = 0;
    for(var i=1; i<= grd_blodreturnreqgruplist.rows ; i++){//체크된 그리드 값 체크
      if( grd_blodreturnreqgruplist.labelmatrix(i, 1) == "true" ) {
        cnt = cnt + 1;

        // ****************************** 반납사유 필수 로직 추가 ***************************************
        if(model.getValue(xBlodReturnReqGrupListPath+"["+i+"]/reqflag") == "-" || model.getValue(xBlodReturnReqGrupListPath+"["+i+"]/reqflag") == ""){//반납/폐기를 체크
          fReturnData("Y");
          messageBox("잔량폐기를 ","C002");
          return;     
        }

        if(model.getValue(xBlodReturnReqGrupListPath+"["+i+"]/returnabandondate") == "-" || model.getValue(xBlodReturnReqGrupListPath+"["+i+"]/returnabandondate") == ""){//반납/폐기일 체크
          fReturnData("Y");
          messageBox("잔량폐기일을","C002");      
          model.setFocus("ipt_todd");
          return;     
        }

        if(model.getValue(xBlodReturnReqGrupListPath+"["+i+"]/etcprcpresncd") == "-" || model.getValue(xBlodReturnReqGrupListPath+"["+i+"]/etcprcpresncd") == ""){//반납사유 체크
          fReturnData("Y");
          messageBox("잔량폐기 사유를","C002");
          model.setFocus("cmb_discontinu");
          return;     
        }
        
        if(model.getValue(xBlodReturnReqGrupListPath+"["+i+"]/etcprcpresncd").substr(3,2) == "99" && model.getValue(xBlodReturnReqGrupListPath+"["+i+"]/clinccmtcnts") == ""){//반납사유 체크
          fReturnData("Y");
          messageBox("기타 사유 처리 시 기타사유내역을 입력해야 합니다.","C");
          model.setFocus("ipt_etc");
          return;     
        }       
        
        if(model.getValue("/root/main/cond/tnsnurserecgrup/tnsnurserecgruplist/onepintqty") == "" ){//투여량 체크
          fReturnData("Y");
          messageBox("투여량을 입력하십시요","C");
          model.setFocus("ipt_onepintqty");
          return;     
        }
        
//        if(model.getValue(xBlodReturnReqGrupListPath+"["+i+"]/etcprcpresncd").substring(0,3) == "080"){ //반납사유가 병원사유인지 체크
        if(model.getValue(xBlodReturnReqGrupListPath+"["+i+"]/etcprcpresncd").substring(0,3) == "072"){ //반납사유가 병원사유인지 체크
          Hosyn++;
        }
      }
    }
    
    if(Hosyn > 0 || CheckValue == "Y"){
      if(model.getValue("/root/main/cond/tnsnurserecgrup/tnsnurserecgruplist/tnsenddd") == "" || 
         model.getValue("/root/main/cond/tnsnurserecgrup/tnsnurserecgruplist/tnsendtm") == "" ){ 
         fReturnData("Y");
         messageBox("수혈종료 일시를 ","C002"); 
         model.setFocus("ipt_todd");
         return;
       }
       
       if(model.getValue("/root/main/cond/tnsnurserecgrup/tnsnurserecgruplist/tnsendnursnm") == "" ){
        fReturnData("Y");
        messageBox("수혈종료 간호사를 ","C002");  
        model.setFocus("btn_usersetting");
        return;
       }
      
      //반납사유가 병원사유인지 체크
      if(Hosyn > 0){
        var sRtnMsg = messageBox("병원사유에 의한 혈액폐기시 혈액대금이 병원손실처리 됩니다.\n\n","Q003");
        if(sRtnMsg != 6){
          fReturnData("Y");
          return;
        }
      }else{
        if(model.getValue("root/main/cond/tnsnurserecgrup/tnsnurserecgruplist/discontinu").substring(0,3) == "072" ){
          var sRtnMsg = messageBox("병원사유에 의한 혈액폐기시 혈액대금이 병원손실처리 됩니다.\n\n","Q003");
          if(sRtnMsg != 6){
            fReturnData("Y");
            return;
          }
        }
      }
    }
      
//return;
//if ( check != "Y" ){// 신규 저장

    if (CheckValue =="Y"){
      if(cnt < 1){
        messageBox("선택 정보가 ","I004");
        fReturnData("Y");
        return; 
      }
      model.removenode("/root/send");
      model.makeValue("/root/send/detlgrup2",grd_blodreturnreqgruplist.getupdatedataAll("i"));
    }
    model.makeValue("/root/send/discontinuyn2", "Y"  );
    
  } else {
    
    var blodnodupSource2 = new Array();
    var prcpnodupSource2 = new Array();
    
    if(cap_blodno.value != ""){
      blodnodupSource2 = cap_blodno.value.split(",") ;
      prcpnodupSource2 = model.getValue("/root/main/cond/tnsnurserecgrup/tnsnurserecgruplist/prcpno").split(",") ;
    } 

    for(var i=0; i<= blodnodupSource2.length -1 ; i++){
      for(var x=1; x<= grd_blodreturnreqgruplist.rows ; x++){
        if( blodnodupSource2[i] ==  model.getValue(xBlodReturnReqGrupListPath+"["+x+"]/blodno") &&
            prcpnodupSource2[i] ==  model.getValue(xBlodReturnReqGrupListPath+"["+x+"]/prcpno") ) {//혈액번호와 같으면 그리드에 셋팅
          //if(model.getValue(xBlodReturnReqGrupListPath+"["+x+"]/reqflagstat") == "Y"){
          //  messageBox(model.getValue(xBlodReturnReqGrupListPath+"["+x+"]/blodno") + " 는 폐기 확정 된 혈액입니다.", "E");
          //  return;
          //}else{
            grd_blodreturnreqgruplist.valuematrix(x,1) = 'true' ;
          //}
        }
      }
    }
  }

  /* 수혈중단이 Y 일때 수혈폐기로 상태 변경 끝 */
  if(model.getValue("/root/main/cond/tnsnurserecgrup/tnsnurserecgruplist/blodno") == ""){
    fReturnData("N");
    messageBox("혈액번호를","C002");
    return; 
  }

  if(model.getValue("/root/main/cond/tnsnurserecgrup/tnsnurserecgruplist/prcpnm") == ""){
    fReturnData("N");
    messageBox("혈액명을","C002");
    return; 
  }

  if(model.getValue("/root/main/cond/tnsnurserecgrup/tnsnurserecgruplist/abo") == ""){
    fReturnData("N");
    messageBox("혈액형을","C002");
    return; 
  }

  // 15.09.08 추가 - AYS  
	if(model.getValue("/root/main/cond/tnsnurserecgrup/tnsnurserecgruplist/tnsstrdd") == "" || model.getValue("/root/main/cond/tnsnurserecgrup/tnsnurserecgruplist/tnsstrtm") == "" ) {
		fReturnData("N");
		if(model.getValue("/root/main/cond/tnsnurserecgrup/tnsnurserecgruplist/nonactpher") != "Y"){
			messageBox("수혈시작시간을","C001");
		} else{
			messageBox("환자보낸 시간을","C001");
		}
		model.setFocus("btn_setfromdt");
		return; 
	}
  
	
	// 15.09.08 추가 - AYS  
	if(model.getValue("/root/main/cond/tnsnurserecgrup/tnsnurserecgruplist/tnsstrnursdeptnm") == "" || model.getValue("/root/main/cond/tnsnurserecgrup/tnsnurserecgruplist/tnsstrnursnm") == "" || model.getValue("/root/main/cond/tnsnurserecgrup/tnsnurserecgruplist/tnsstrnursall") == "") {
		fReturnData("N");
		if(model.getValue("/root/main/cond/tnsnurserecgrup/tnsnurserecgruplist/nonactpher") != "Y"){
			messageBox("수혈시작 간호사를","C002");
		} else{
			messageBox("담당 간호사를","C001");
		}
		model.setFocus("btn_srchfromus");
		return; 
	}
  
  // 15.09.08 추가 - AYS
  if(model.getValue("/root/main/cond/tnsnurserecgrup/tnsnurserecgruplist/nonactpher") != "Y"){
  	if(model.getValue("/root/main/cond/tnsnurserecgrup/tnsnurserecgruplist/tnsrec") == "" ) {
  		fReturnData("N");
  		messageBox("수혈기록을","C001");
  		return; 
  	}
  }

  if( model.getValue("/root/main/cond/tnsnurserecgrup/tnsnurserecgruplist/transferyn") != "Y" && model.getValue("/root/main/cond/tnsnurserecgrup/tnsnurserecgruplist/nonactpher") != "Y") {
  	if( ( model.getValue("/root/main/cond/tnsnurserecgrup/tnsnurserecgruplist/tnsendnursdeptnm") != "" || model.getValue("/root/main/cond/tnsnurserecgrup/tnsnurserecgruplist/tnsendnursnm") != ""  ) &&
        ( model.getValue("/root/main/cond/tnsnurserecgrup/tnsnurserecgruplist/tnsenddd") == "" || model.getValue("/root/main/cond/tnsnurserecgrup/tnsnurserecgruplist/tnsendtm") == ""  ) ) {
        	fReturnData("N");
        	messageBox("수혈종료시간을","C001");
        	model.setFocus("btn_settodt");
        	return;
    }
  }
    
  if( model.getValue("/root/main/cond/tnsnurserecgrup/tnsnurserecgruplist/transferyn") != "Y" && model.getValue("/root/main/cond/tnsnurserecgrup/tnsnurserecgruplist/nonactpher") != "Y") {
  	if( ( model.getValue("/root/main/cond/tnsnurserecgrup/tnsnurserecgruplist/tnsenddd") != "" || model.getValue("/root/main/cond/tnsnurserecgrup/tnsnurserecgruplist/tnsendtm") != ""  ) &&
        ( model.getValue("/root/main/cond/tnsnurserecgrup/tnsnurserecgruplist/tnsendnursdeptnm") == "" || model.getValue("/root/main/cond/tnsnurserecgrup/tnsnurserecgruplist/tnsendnursnm") == "" ) ) {
        	fReturnData("N");
        	messageBox("수혈종료 간호사를","C002");
        	model.setFocus("btn_usersetting");
        	return;
    }
  }
  
  if((model.getValue("/root/main/cond/tnsnurserecgrup/tnsnurserecgruplist/transferyn") == "Y" && model.getValue("/root/main/cond/tnsnurserecgrup/tnsnurserecgruplist/discontinuyn") == "Y") || (model.getValue("/root/main/cond/tnsnurserecgrup/tnsnurserecgruplist/nonactpher") == "Y"  && model.getValue("/root/main/cond/tnsnurserecgrup/tnsnurserecgruplist/discontinuyn") == "Y")) {
    fReturnData("N");
    messageBox("전원 및 성분채집실 수혈 시 수혈 중단을 선택할 수 없습니다.","C");
    return; 
  }
  
//  if(ipt_tnssideeffectetc.attribute("disabled")== "false"){
//    if(ipt_tnssideeffectetc.value == ""){
//      fReturnData("N");
//      messageBox("수혈 부작용 내역 중 기타 항목이 선택되었습니다.\n\n부작용 기타 내역은 필수입력입니다.","I");
//      return;   
//    }
//  }
  
  if(messageBox("수혈기록을 ","Q002") != 6){
    fReturnData("N"); 
    return;// 저장하시겠습니까? 
  }
    
  model.makeValue("/root/send/pid",model.getValue("/root/main/cond/patientgrupInfo/patientgruplistInfo/pid") ) ;
  model.makeValue("/root/send/blodno",model.getValue("/root/main/cond/tnsnurserecgrup/tnsnurserecgruplist/blodno") ) ;
  model.makeValue("/root/send/tnsstrddtm",
                  ( !isNull(model.getValue("/root/main/cond/tnsnurserecgrup/tnsnurserecgruplist/tnsstrtm")) ? (model.getValue("/root/main/cond/tnsnurserecgrup/tnsnurserecgruplist/tnsstrdd") + model.getValue("/root/main/cond/tnsnurserecgrup/tnsnurserecgruplist/tnsstrtm")+"00").substring(0,14): "") );
  model.makeValue("/root/send/tnsendddtm",
                  ( !isNull(model.getValue("/root/main/cond/tnsnurserecgrup/tnsnurserecgruplist/tnsendtm")) ? (model.getValue("/root/main/cond/tnsnurserecgrup/tnsnurserecgruplist/tnsenddd") + model.getValue("/root/main/cond/tnsnurserecgrup/tnsnurserecgruplist/tnsendtm")+"00").substring(0,14): "") );
  model.makeValue("/root/send/tnsstrnursall",model.getValue("/root/main/cond/tnsnurserecgrup/tnsnurserecgruplist/tnsstrnursall") );
  model.makeValue("/root/send/tnsendnursall",model.getValue("/root/main/cond/tnsnurserecgrup/tnsnurserecgruplist/tnsendnursall") );
  model.makeValue("/root/send/sideeffectcomcodelist",model.getValue("/root/main/cond/tnsnurserecgrup/tnsnurserecgruplist/tnssideeffect") );
  model.makeValue("/root/send/tnssideeffectetc",model.getValue("/root/main/cond/tnsnurserecgrup/tnsnurserecgruplist/tnssideeffectetc") );
  model.makeValue("/root/send/discontinuyn",model.getValue("/root/main/cond/tnsnurserecgrup/tnsnurserecgruplist/discontinuyn") );
  model.makeValue("/root/send/discontinucomcodelist",model.getValue("/root/main/cond/tnsnurserecgrup/tnsnurserecgruplist/discontinu") );
  model.makeValue("/root/send/discontinuetc",model.getValue("/root/main/cond/tnsnurserecgrup/tnsnurserecgruplist/discontinuetc") );
  model.makeValue("/root/send/drugqty",model.getValue("/root/main/cond/tnsnurserecgrup/tnsnurserecgruplist/drugqty") );
  model.makeValue("/root/send/onepintqty",model.getValue("/root/main/cond/tnsnurserecgrup/tnsnurserecgruplist/onepintqty") );
  model.makeValue("/root/send/tnsrec",model.getValue("/root/main/cond/tnsnurserecgrup/tnsnurserecgruplist/tnsrec") );
  model.makeValue("/root/send/smlqtytnsyn",model.getValue("/root/main/cond/tnsnurserecgrup/tnsnurserecgruplist/smlqtytnsyn") );
  model.makeValue("/root/send/tprlnkyn",model.getValue("/root/main/cond/tnsnurserecgrup/tnsnurserecgruplist/tprlnkyn") );
  
  
  // 150423 추가 - AYS
//  if(model.getValue("/root/main/cond/tnsnurserecgrup/tnsnurserecgruplist/transferyn") != "Y") {
//  		model.setValue("/root/main/cond/tnsnurserecgrup/tnsnurserecgruplist/transferyn", "N");
//  }
  model.makeValue("/root/send/transferyn",model.getValue("/root/main/cond/tnsnurserecgrup/tnsnurserecgruplist/transferyn") );
  // 15.09.08 - AYS 추가
  model.makeValue("/root/send/nonactpher",model.getValue("/root/main/cond/tnsnurserecgrup/tnsnurserecgruplist/nonactpher") );
  
  model.makeValue("/root/send/ioparam", ioparam);
  //model.makeValue("/root/send/prcpdelivefact",model.getValue("/root/main/cond/tnsnurserecgrup/tnsnurserecgruplist/prcpdelivefact") );
  
  var sp = model.getValue("/root/main/cond/tnsnurserecgrup/tnsnurserecgruplist/tnsstrnursall").split(",");
  model.makeValue("/root/send/tnsstrnurseid",   sp[0] );
  model.makeValue("/root/send/tnsstrnursenm",   sp[1] );
  model.makeValue("/root/send/tnsstrnursedeptcd", sp[5] );
  model.makeValue("/root/send/tnsstrnursedeptnm", sp[4] );

  var sp2 = model.getValue("/root/main/cond/tnsnurserecgrup/tnsnurserecgruplist/tnsendnursall").split(",");
  model.makeValue("/root/send/tnsendnurseid",   sp2[0] );
  model.makeValue("/root/send/tnsendnursenm",   sp2[1] );
  model.makeValue("/root/send/tnsendnursedeptcd", sp2[5] );
  model.makeValue("/root/send/tnsendnursedeptnm", sp2[4] );
  model.makeValue("/root/send/wardcd", cmb_wardcdgruplist2.value);
  model.makeValue("/root/send/roomcd", cmb_roomcdgruplist2.value);
  model.makeValue("/root/send/instcd", getUserInfo("dutplceinstcd"));
  
  var chekBlod = model.getValue("/root/main/cond/tnsnurserecgrup/tnsnurserecgruplist/blodno").split(",");
  if(chekBlod.length > 0) {
  	model.makeValue("/root/send/orddd", model.getValue("/root/main/cond/blodreturnreqgrup/blodreturnreqgruplist/orddd"));
  	model.makeValue("/root/send/cretno", model.getValue("/root/main/cond/blodreturnreqgrup/blodreturnreqgruplist/cretno"));
  }
  
  var pidblodflag = '';
  if(ipt_pid2.value != ""){
    pidblodflag = 'pid';
  } else if (ipt_blodno.value !="") {
    pidblodflag = 'blod';                   
  }

  if(pFlag == "CertSave"){
    // 인증저장시에는 수혈종료일시, 수혈종료간호사 반드시 입력 후 저장 되도록 추가 : 2008-01-16
    if( model.getValue("/root/main/cond/tnsnurserecgrup/tnsnurserecgruplist/transferyn") != "Y" && model.getValue("/root/main/cond/tnsnurserecgrup/tnsnurserecgruplist/nonactpher") != "Y") {
    	if( model.getValue("/root/main/cond/tnsnurserecgrup/tnsnurserecgruplist/tnsendnursdeptnm") == "" || model.getValue("/root/main/cond/tnsnurserecgrup/tnsnurserecgruplist/tnsendnursnm") == "" )  {
    		fReturnData("Y");
    		messageBox("수혈종료 간호사를","C002");
    		return; 
    	}
    }
    
    if( model.getValue("/root/main/cond/tnsnurserecgrup/tnsnurserecgruplist/transferyn") != "Y" && model.getValue("/root/main/cond/tnsnurserecgrup/tnsnurserecgruplist/nonactpher") != "Y") {
    	if( model.getValue("/root/main/cond/tnsnurserecgrup/tnsnurserecgruplist/tnsenddd") == "" || model.getValue("/root/main/cond/tnsnurserecgrup/tnsnurserecgruplist/tnsendtm") == ""  ) {
    		fReturnData("Y");
    		messageBox("수혈종료 시간을","C001");
    		return; 
    	}
    }

    model.removeNodeSet("/root/send/signdata");
    
    var chekBlod = model.getValue("/root/main/cond/tnsnurserecgrup/tnsnurserecgruplist/blodno").split(",");
    var chekprcpnm = model.getValue("/root/main/cond/tnsnurserecgrup/tnsnurserecgruplist/prcpnm").split(",");
    var chekabo = model.getValue("/root/main/cond/tnsnurserecgrup/tnsnurserecgruplist/abo").split(",");
    var cheksignno = model.getValue("/root/main/cond/tnsnurserecgrup/tnsnurserecgruplist/signno").split(",");
    var chekprcpno = model.getValue("/root/main/cond/tnsnurserecgrup/tnsnurserecgruplist/prcpno").split(",");
    
    //alert(chekBlod + "============" + chekBlod.length );
    
//    if(chekBlod.length == 1){
//      Sign.certreload = true; 
//    }
    
    for(var i=0; i < chekBlod.length ; i++){
      
      model.makeNode("/root/hidden/tnsnurserecgrup/tnsnurserecgruplist");
      model.makeNode("/root/hidden/vitalsigngrup"    );
      
      model.copyNode("/root/hidden/tnsnurserecgrup/tnsnurserecgruplist", "/root/main/cond/tnsnurserecgrup/tnsnurserecgruplist");
      model.copyNode("/root/hidden/vitalsigngrup"                      , "/root/main/cond/vitalsigngrup");
      
      model.setValue("/root/hidden/tnsnurserecgrup/tnsnurserecgruplist/blodno"  , chekBlod[i] );
      model.setValue("/root/hidden/tnsnurserecgrup/tnsnurserecgruplist/prcpnm"  , chekprcpnm[i] );
      model.setValue("/root/hidden/tnsnurserecgrup/tnsnurserecgruplist/abo"     , chekabo[i] );
      model.setValue("/root/hidden/tnsnurserecgrup/tnsnurserecgruplist/signno"  , cheksignno[i] );

      
      sFindBlodnm = "";
      //if(getPatientInfo("pid") == ""){
        sFindBlodnm = chekprcpno[i];
      //}
        //if(chekBlod.length == 1){
        if( i== 0 ){
            Sign.certreload = true; 
        } else {
            Sign.certreload = false; 
        } 
            
        var fRow = "";
        fRow = grd_blodreturnreqgruplist.findRow(sFindBlodnm, 0, grd_blodreturnreqgruplist.colRef("prcpno"), true, true);
        if(Sign.signprocess() == true){  
           
           model.makeValue("/root/certtmp/signdata/certblodno", model.getValue("/root/main/cond/blodreturnreqgrup/blodreturnreqgruplist["+fRow+"]/blodno"));
           model.makeValue("/root/certtmp/signdata/pid",        model.getValue("/root/main/cond/patientgrupInfo/patientgruplistInfo/pid"));
           model.makeValue("/root/certtmp/signdata/orddd",      model.getValue("/root/main/cond/blodreturnreqgrup/blodreturnreqgruplist["+fRow+"]/orddd"));
           model.makeValue("/root/certtmp/signdata/cretno",     model.getValue("/root/main/cond/blodreturnreqgrup/blodreturnreqgruplist["+fRow+"]/cretno"));    
           
           model.makeValue("/root/certtmp/signdata/signno",     cheksignno[i] );
           
           model.makeValue("/root/certtmp/signdata/recdd",      getCurrentDate());
           model.makeValue("/root/certtmp/signdata/rectm",      getCurrentTime());
           
           
//         if( check != "Y" ){// 신규 저장
//             model.makeValue("/root/certtmp/signdata/recsaveflag", "N");  
//          }else{
           model.makeValue("/root/certtmp/signdata/recsaveflag", "Y");  
//          }
           model.makeValue("/root/certtmp/signdata/signflag", "02"); 
           
           if(ioparam == "IPRC"){
             //model.makeValue("/root/certtmp/signdata/signgenrflag", model.getValue("/root/temp/cond/patientgrup/patientgruplist/ordtype"));    
             model.makeValue("/root/certtmp/signdata/signgenrflag", model.getValue("/root/main/cond/blodreturnreqgrup/blodreturnreqgruplist["+fRow+"]/ordtype")); 
             model.makeValue("/root/certtmp/signdata/orddeptcd", model.getValue("/root/main/cond/blodreturnreqgrup/blodreturnreqgruplist["+fRow+"]/inptorddeptcd")); 
             model.makeValue("/root/certtmp/signdata/orddrid", model.getValue("/root/main/cond/blodreturnreqgrup/blodreturnreqgruplist["+fRow+"]/medispclid"));              
           }else{
             model.makeValue("/root/certtmp/signdata/signgenrflag", "O");    
             model.makeValue("/root/certtmp/signdata/orddeptcd", model.getValue("/root/main/cond/blodreturnreqgrup/blodreturnreqgruplist["+fRow+"]/orddeptcd")); 
             model.makeValue("/root/certtmp/signdata/orddrid", model.getValue("/root/main/cond/blodreturnreqgrup/blodreturnreqgruplist["+fRow+"]/orddrid"));                         
           }
           model.makeValue("/root/certtmp/signdata/formcd", "0000002460"); 
           
        //alert( Sign.signedInfos[4]);
        //alert( Sign.signedInfos[5]);
        //return; // test 주석
           
    //    ▶ 인증할 데이터 정보(미기록 노드 제거된 정보) 
    //    ▶ 미기록 노드 제거전 원본 노드 정보 : Sign.signedInfos[3]
            model.makeValue("/root/certtmp/signdata/signbfcnts", Sign.signedInfos[1]); 
    //        
    //    ▶ 공인인증 처리후 데이터
            model.makeValue("/root/certtmp/signdata/signaftcnts", Sign.signedInfos[2]);
            
            if(!copyNodeType("/root/send", "/root/certtmp", "after")){
              model.removeNode("/root/certtmp");
            }
        }else{
            fBlodDeliveList(pidblodflag);// 혈액불출내역 리스트 
            fTnsRecInit(); //수혈간호기록 초기화
            //fBlodColChg(); //컬럼속성 변경
          return false; 
        }
      }
      
      model.removeNode("/root/hidden/tnsnurserecgrup");
      model.removeNode("/root/hidden/vitalsigngrup");
    } else {
    	
    }
  
  //debugger;
  /*  저장 / 업데이트 구분 체크 끝 */
  if( check != "Y" ){// 신규 저장
    model.makeValue("/root/send/instcd",     "" );
    model.makeValue("/root/send/execprcpuniqno",     "" );

    //model.makeValue("/root/send/detlgrup",grd_blodnoexecrecgruplist.getupdatedataAll("i"));
    model.makeValue("/root/send/detlgrup",fSaveExecRecListMake("noexec"));//20100419 khj 체크된 정보 get
    model.makeValue("/root/send/vitalgrup",grd_vitalsigngruplist.getupdatedataAll("i"));
		
//  if(messageBox("수혈기록을 ","Q002") != 6) return;// 저장하시겠습니까?
    
    if(submit("TXMNR01031")){
      model.copyNode("/root/hidden/main","/root/main");
    }
// 저장 실패 해도 재조회 : 
//      fBlodDeliveList(pidblodflag);// 혈액불출내역 리스트 
//      //fGetBlodNoExecRecList(pidblodflag); //수혈 미수행 내역 리스트
//      //fGetBlodExecRecList(pidblodflag); //수혈 수행 내역 리스트 
//      fTnsRecInit(); //수혈간호기록 초기화
//      fBlodColChg(); //컬럼속성 변경
    
  } else if( check == "Y") {// 업데이트
    
    model.makeValue("/root/send/prcpdd",    "" );
    model.makeValue("/root/send/prcpno",    "" );
    model.makeValue("/root/send/prcphistno",  "" );
    model.makeValue("/root/send/instcd",     "" );
    model.makeValue("/root/send/execprcpuniqno",     "" );

    model.makeValue("/root/send/detlgrup",fSaveExecRecListMake("exec"));//20100419 khj 체크된 정보 get
    model.makeValue("/root/send/vitalgrup",grd_vitalsigngruplist.getupdatedataAll("i"));	// 150310 - AYS
    
//  if(messageBox("","Q002") != 6) return;// 저장하시겠습니까?
    
    if(submit("TXMNR01032")){
      model.copyNode("/root/hidden/main","/root/main");
    }
// 저장 실패 해도 재조회 : // 저장 실패 해도 재조회
//      fBlodDeliveList(pidblodflag);// 혈액불출내역 리스트 
//      
//      //fGetBlodNoExecRecList(pidblodflag); //수혈 미수행 내역 리스트                                   
//      //fGetBlodExecRecList(pidblodflag); //수혈 수행 내역 리스트
//      
//      //model.removeNodeset("/root/main/cond/vitalsigngrup/vitalsigngruplist");
//      
//      fTnsRecInit(); //수혈간호기록 초기화
//      fBlodColChg(); //컬럼속성 변경

      
  }
      fBlodDeliveList(pidblodflag);// 혈액불출내역 리스트 
      //fGetBlodNoExecRecList(pidblodflag); //수혈 미수행 내역 리스트
      //fGetBlodExecRecList(pidblodflag); //수혈 수행 내역 리스트 
      fTnsRecInit(); //수혈간호기록 초기화
      //fBlodColChg(); //컬럼속성 변경
      model.refresh();
}


function fMake_SignData(){
  
  if(sFindBlodnm != ""){
    var fRow = "";
    fRow = grd_blodreturnreqgruplist.findRow(sFindBlodnm, 0, grd_blodreturnreqgruplist.colRef("prcpno"),true, true);
    if(fRow > 0){
      
      model.setValue(Sign.XPATH_BASICINFO + "/pid"       , model.getValue("/root/main/cond/patientgrupInfo/patientgruplistInfo/pid"));
      model.setValue(Sign.XPATH_BASICINFO + "/pname"     , model.getValue("/root/main/cond/patientgrupInfo/patientgruplistInfo/patientnm1"));
      model.setValue(Sign.XPATH_BASICINFO + "/age"       , model.getValue("/root/main/cond/patientgrupInfo/patientgruplistInfo/sexage"));
      model.setValue(Sign.XPATH_BASICINFO + "/body"      , "");
      model.setValue(Sign.XPATH_BASICINFO + "/btype"     , model.getValue("/root/main/cond/patientgrupInfo/patientgruplistInfo/btype"));
      model.setValue(Sign.XPATH_BASICINFO + "/insukind"  , "");
      model.setValue(Sign.XPATH_BASICINFO + "/orddept"   , model.getValue("/root/main/cond/blodreturnreqgrup/blodreturnreqgruplist["+fRow+"]/orddeptnm"));
      model.setValue(Sign.XPATH_BASICINFO + "/apntdr"    , model.getValue("/root/main/cond/blodreturnreqgrup/blodreturnreqgruplist["+fRow+"]/orddrnm"));
      model.setValue(Sign.XPATH_BASICINFO + "/attndr"    , "");
    }
  }
  
  Sign.addnode("/root/hidden/tnsnurserecgrup/tnsnurserecgruplist");
  Sign.addnode("/root/hidden/vitalsigngrup");
  

  var xRecinfoPath      = Sign.XPATH_SIGNINFO+"/tnsnurserecgruplist";
  var xRecinfoVitalPath = Sign.XPATH_SIGNINFO+"/vitalsigngruplist";
          
  var sTnsSideeffect = model.getValue(xRecinfoPath + "/tnssideeffect");
  var sTnsDiscontinu = model.getValue(xRecinfoPath + "/discontinu"   );
  var sTnsTnsrec     = model.getValue(xRecinfoPath + "/tnsrec"       );
  var sTnsstrdd      = model.getValue(xRecinfoPath + "/tnsstrdd"     );
  var sTnsstrtm      = model.getValue(xRecinfoPath + "/tnsstrtm"     );
  var sTnsenddd      = model.getValue(xRecinfoPath + "/tnsenddd"     );
  var sTnsendtm      = model.getValue(xRecinfoPath + "/tnsendtm"     );
  var sTnsSideeffectRslt =  sTnsSideeffect.split(" ");
  
  if(sTnsSideeffect != "" ){
    sTnsEfftInfo = "";
    for(var i = 0 ; i < sTnsSideeffectRslt.length ; i ++){
      for(var j = 0 ; j <= getNodesetCount("/root/init/sideeffectcom/M0330") ; j++){
        if(sTnsSideeffectRslt[i] == model.getValue("/root/init/sideeffectcom/M0330["+j+"]/cdid")){
          if(sTnsEfftInfo == ""){
            sTnsEfftInfo += model.getValue("/root/init/sideeffectcom/M0330[cdid='"+sTnsSideeffectRslt[i]+"']/cdnm");
          }else{
            sTnsEfftInfo += ",  " + model.getValue("/root/init/sideeffectcom/M0330[cdid='"+sTnsSideeffectRslt[i]+"']/cdnm");
          }
        }
      }
    }
    model.setValue(xRecinfoPath + "/tnssideeffect", sTnsEfftInfo);
  }
  
  if(sTnsDiscontinu != "" ){
    model.setValue(xRecinfoPath + "/discontinu",
      model.getValue("/root/init/L0093list/L0093[cdid='"+sTnsDiscontinu+"']/cdnm"));
  }
  
//  if(sTnsstrdd != "" && sTnsstrtm != ""){
//    model.makeValue(xRecinfoPath + "/tnsstrdt",
//      sTnsstrdd.substring(1,4) + "-" + 
//      sTnsstrdd.substring(5,2) + "-" + 
//      sTnsstrdd.substring(7,2) + " " +
//      sTnsstrtm.substring(1,2) + ":" +
//      sTnsstrtm.substring(3,2) );
//    model.removenode(xRecinfoPath + "/tnsstrdd");
//    model.removenode(xRecinfoPath + "/tnsstrtm");
//  }
//  
//  if(sTnsenddd != "" && sTnsendtm != ""){
//    model.makeValue(xRecinfoPath + "/tnsenddt",
//      sTnsenddd.substring(1,4) + "-" +           
//      sTnsenddd.substring(5,2) + "-" +           
//      sTnsenddd.substring(7,2) + " " +           
//      sTnsendtm.substring(1,2) + ":" +           
//      sTnsendtm.substring(3,2) );                
//    model.removenode(xRecinfoPath + "/tnsenddd");
//    model.removenode(xRecinfoPath + "/tnsendtm");
//
//  }
}

/**
 * @group  :
 * @ver    : 2008.01.17
 * @by     : 양천덕 
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : 수혈기록 내역이 있는 내역은 모든 상태 변경 불가능 not used
 * @param  :
 * @return :
 * @---------------------------------------------------
 */
function fBlodColChg(){

  for(var i = 1 ; i < grd_blodreturnreqgruplist.rows; i++ ){
    for(var n = 1 ; n < grd_blodexecrecgruplist.rows; n++ ){
      if( model.getValue("/root/main/cond/blodreturnreqgrup/blodreturnreqgruplist["+ i +"]/blodno") == model.getValue("/root/main/cond/blodreturnreqgrup/blodexecrecgruplist["+ n +"]/blodno") 
       || model.getValue("/root/main/cond/blodreturnreqgrup/blodreturnreqgruplist["+ i +"]/prcpno") == model.getValue("/root/main/cond/blodreturnreqgrup/blodexecrecgruplist["+ n +"]/prcpno") 
      ) {
        grd_blodreturnreqgruplist.isReadOnly(i, grd_blodreturnreqgruplist.colRef("reqflag")) = true;
        grd_blodreturnreqgruplist.isReadOnly(i, grd_blodreturnreqgruplist.colRef("returnabandondate")) = true;
        grd_blodreturnreqgruplist.isReadOnly(i, grd_blodreturnreqgruplist.colRef("etcprcpresncd")) = true;
        grd_blodreturnreqgruplist.isReadOnly(i, grd_blodreturnreqgruplist.colRef("stat")) = true;
        grd_blodreturnreqgruplist.rowstyle(i, "data", "background-color") = "#fff000";
      }   
    }
  }
}

/**
 * @group  :
 * @ver    : 2007.05.09
 * @by     : 정찬성 
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   :  미수행기록목록에서 선택한 혈액정보 기록버튼
 * @param  :
 * @return :
 * @---------------------------------------------------
 */

function fExecRec(){
  var sRowCnt = grd_blodnoexecrecgruplist.rows-grd_blodnoexecrecgruplist.fixedrows;   
  var cnt = 0 ;

  model.removenode("/root/send");
  model.makeValue("/root/send/detlgrup",grd_blodnoexecrecgruplist.getupdatedataAll("i"));
  
  var blodno = "" ;
  var prcpnm = "" ;
  var aborh = "" ;
  var prcpno = "";
  var prcpdelivefact = "" ;
  var duplreccheck = false ;
  
  btn_init.disabled = false;
  btn_tempsave.disabled = false;
  btn_certsave.disabled = false;
  
  /* 미수행기록 목록 선택 되어 있는지 체크 시작 */
  for(var i=1; i<= sRowCnt; i++){
//    alert(grd_blodnoexecrecgruplist.labelmatrix(i, 1));

    if( grd_blodnoexecrecgruplist.labelmatrix(i, 1) == "true" ) {
      blodno += grd_blodnoexecrecgruplist.labelmatrix(i, grd_blodnoexecrecgruplist.colRef("blodno")) + "," ;
      prcpnm += grd_blodnoexecrecgruplist.labelmatrix(i, grd_blodnoexecrecgruplist.colRef("prcpnm")) + "," ;
      aborh  += grd_blodnoexecrecgruplist.labelmatrix(i, grd_blodnoexecrecgruplist.colRef("abo"))
              + grd_blodnoexecrecgruplist.labelmatrix(i, grd_blodnoexecrecgruplist.colRef("rh"))     + "," ;
      prcpno += grd_blodnoexecrecgruplist.labelmatrix(i, grd_blodnoexecrecgruplist.colRef("prcpno")) + "," ;
      if(grd_blodnoexecrecgruplist.labelmatrix(i, grd_blodnoexecrecgruplist.colRef("prcpdelivefact")) != ""){
        prcpdelivefact += grd_blodnoexecrecgruplist.labelmatrix(i, grd_blodnoexecrecgruplist.colRef("prcpdelivefact")) + "," ;
      }
      cnt = cnt + 1;
      
    }
  }

  if(cnt < 1){
    messageBox("선택 정보가 ","I004");
    return; 
  }

  /* 미수행기록 목록 선택 되어 있는지 체크 끝 */

  var blodnodupSource =  blodno.substr(0,blodno.length-1).split(",");
  var prcpnodupSource =  prcpno.substr(0,prcpno.length-1).split(",");
//  alert(blodnodupSource);


  /* 미수행내역 기록버튼시 중복 체크 시작 */


  for(var i=0; i<= blodnodupSource.length; i++){
//    alert(grd_blodnoexecrecgruplist.labelmatrix(i, 1));

    for(var n=0; n<= grd_blodexecrecgruplist.rows; n++){
      if( blodnodupSource[i] ==  model.getValue(xBlodReturnReqGrupListPath+"["+n+"]/blodno") &&
          prcpnodupSource[i] ==  model.getValue(xBlodReturnReqGrupListPath+"["+n+"]/prcpno") ) {
        duplreccheck = true ;
      }
    }
  }

  /* 미수행내역 기록버튼시 중복 체크 끝 */

//  alert(blodno.substr(0,blodno.length-1));

//  if( duplreccheck ){// 중복기록 체크
//    messageBox("수행기록된 혈액을 중복으로 기록할수 ","I004");
//    return; 
//  };

//  fClearChildNode("/root/main/cond/tnsnurserecgrup/tnsnurserecgruplist");
  
//  model.refresh();  

  model.setValue(cap_blodno.attribute("ref"), blodno.substr(0,blodno.length-1) );
  model.setValue(cap_blodnm.attribute("ref"), prcpnm.substr(0,prcpnm.length-1) );
  model.setValue(cap_aborh.attribute("ref"), aborh.substr(0,aborh.length-1) );
  model.setValue("/root/main/cond/tnsnurserecgrup/tnsnurserecgruplist/prcpno", prcpno.substr(0,prcpno.length-1));
  model.setValue(rdo_discontinuyn.attribute("ref"), "N" );

  model.setValue(ipt_prcpdelivefact.attribute("ref"), prcpdelivefact.substr(0,prcpdelivefact.length-1) );//전달사항

  model.setValue(ipt_fromdd.attribute("ref"), getCurrentDate() );
  model.setValue(ipt_fromtm.attribute("ref"), getCurrentTime().substring(0,4) );

  model.setValue(opt_fromdeptnm.attribute("ref"), getUserId() );
  //기록 저장시 부서정보 삭제, 사용자 이름 세팅 : 2008-01-16
  //model.setValue(opt_fromusernm.attribute("ref"), getUserInfo("dutplcenm") );
  model.setValue(opt_fromusernm.attribute("ref"), getUserName() );
  model.setValue(opt_tnsstrnursall.attribute("ref"), getUserInfo("userid")+","+getUserInfo("usernm")+","+getUserInfo("dutplceinstnm")+","+getUserInfo("dutplceinstcd")+","+getUserInfo("dutplcenm")+","+getUserInfo("dutplcecd"));// 저장할 데이터 생성
  model.setValue(chk_smlqtytnsyn.attribute("ref"), ""); //소량수혈 체크
  model.setValue(chk_tprlnkyn.attribute("ref"), ""); //I/O연동설정값 DEFAULT ''
  
  // '15.11.26 성분채집실수혈, 전원 관련 초기화
  model.setValue(bol_nonactpher.attribute("ref"), "N"); // 성분채집실수혈 여부
  model.setValue(bol_transferyn.attribute("ref"), "N"); // 전원여부
  // '15.11.26 성분채집실수혈, 전원 관련 초기화

  //model.setValue(opt_todeptnm.attribute("ref"), getUserId() );
  //model.setValue(opt_tousernm.attribute("ref"), getUserInfo("dutplcenm") );
  //model.setValue(opt_tnsendnursall.attribute("ref"), getUserInfo("userid")+","+getUserInfo("usernm")+","+getUserInfo("dutplceinstnm")+","+getUserInfo("dutplceinstcd")+","+getUserInfo("dutplcenm")+","+getUserInfo("dutplcecd"));// 저장할 데이터 생성

  /* 미수행내역 리스트에서 기록버튼 누를때 vital sign 측정시작 측정일시/시간 15분후 일시 시간 셋팅 시작 */

  //grd_vitalsigngruplist.valuematrix(1, grd_vitalsigngruplist.colRef("recdd")) = getCurrentDate() ;
  //grd_vitalsigngruplist.valuematrix(1, grd_vitalsigngruplist.colRef("rectm")) = getCurrentTime() ;

  /* 미수행내역 리스트에서 기록버튼 누를때 vital sign 측정시작 측정일시/시간 15분후 일시 시간 셋팅 끝 */

  //model.refresh();

//  if(submit("TRMNR01023")){
//    model.copyNode("/root/hidden/main","/root/main");
//  }
}

 /**
 * @group  :
 * @ver    : 2007.07.09
 * @by     : 정찬성 
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   :  혈액요청서 선택했을때...
 * @param  :
 * @return :
 * @---------------------------------------------------
 */

function fBlodReqDoc(gubn){
	//debugger;
  var sRowCnt = grd_delivedetlgruplist.rows-grd_delivedetlgruplist.fixedrows;
  var cnt = 0 ;

  model.removeNode ("/root/send/report"); 
  var receiptid = model.getValue(ipt_receiptid.attribute("ref"));
  var receiptnm = model.getValue(ipt_receiptnm.attribute("ref"));
  
  
  //20101220_KNUH_Start
  if( (receiptid == "" || receiptid == null) && (receiptnm == "" || receiptnm == null)) {
  	model.setValue(ipt_receiptid.attribute("ref"), getUserInfo("userid") );
  	model.setValue(ipt_receiptnm.attribute("ref"), getUserInfo("usernm") );
  	
  	ipt_receiptid.refresh();
  	ipt_receiptnm.refresh();
  	
  }
  //20101220_KNUH_End
  for(var i=1; i<= sRowCnt; i++){ // 선택한 값이 불출신청 상태인지 체크
    if( grd_delivedetlgruplist.labelmatrix(i, 1) == "true" ) {
    	
      cnt = cnt + 1;

      if( grd_delivedetlgruplist.labelmatrix(i, grd_delivedetlgruplist.colRef("pid")) != ipt_pid.value ) {
        messageBox("입력된 등록번호가 ","E004");
        model.setfocus("ipt_pid");
        return; 
      }
  
      if(gubn == "Blood") { // 혈액요청서 출력. 체크
  //      if( grd_delivedetlgruplist.labelmatrix(i, 2) != "검사완료" ) { //  코드 변경후 바꾸기
  //      if( grd_delivedetlgruplist.labelmatrix(i, 35) != "520") {// 520 혈액준비 (공통코드)
  //      
  ////        messageBox("검사완료 상태 이외에는 혈액요청서를 출력 ","E001");//  코드 변경후 바꾸기
  //
  ////        if(grd_delivedetlgruplist.labelmatrix(i, 35) == "525"){
  ////          messageBox("혈액요청서를 이미 출력한 상태입니다. 혈액요청서를 출력 ","E001");
  ////          return; 
  ////        } else
  //          
  ////        if(grd_delivedetlgruplist.labelmatrix(i, 35) != "520" && grd_delivedetlgruplist.labelmatrix(i, 35) != "525"){
  ////          messageBox("준비완료 상태 이외에는 혈액요청서를 출력 ","E001");
  ////          return; 
  ////        }
  //      
  //      }
        if(grd_delivedetlgruplist.labelmatrix(i, grd_delivedetlgruplist.colRef("ocrtag")) != "") {
        	messageBox("이미 출력한 혈액이므로 재출력됩니다.", "E");
        	fRePrtBldReq();//이미 출력한 혈액일 경우에는 재출력 로직을 태움.
        	return;
        }  
          
        if(grd_delivedetlgruplist.labelmatrix(i, grd_delivedetlgruplist.colRef("prcpstatcd3")) != "520" || grd_delivedetlgruplist.labelmatrix(i, grd_delivedetlgruplist.colRef("prcpstatcd3")) != "525"){
        	if(grd_delivedetlgruplist.valueMatrix(i, grd_delivedetlgruplist.colRef("prcpstatcd")) != "준비완료") {
	          messageBox("준비완료 상태 이외에는 혈액요청서를 출력 ","E001");
	          return; 
	        }
        }

        if( grd_delivedetlgruplist.labelmatrix(i, grd_delivedetlgruplist.colRef("blodno") ).length <  5 ) {
          messageBox("혈액번호가 ","I004");
          return; 
        }
  
        model.makeValue("/root/send/report/delivedetlgrup/delivedetlgruplist["+cnt+"]","");
        model.copyNode( "/root/send/report/delivedetlgrup/delivedetlgruplist["+cnt+"]", "/root/main/cond/delivedetlgrup/delivedetlgruplist["+i+"]" );
  //      alert(instance1.selectSingleNode("/root/send/report/delivedetlgrup/delivedetlgruplist"+"["+cnt+"]").xml);
      } else if(gubn == "ER") { // 응급혈액불출요청서 출력. 체크
        model.makeValue("/root/send/report/delivedetlgrup/delivedetlgruplist["+cnt+"]","");
        model.copyNode( "/root/send/report/delivedetlgrup/delivedetlgruplist["+cnt+"]", "/root/main/cond/delivedetlgrup/delivedetlgruplist["+i+"]" );
        if( model.getValue("/root/send/report/delivedetlgrup/delivedetlgruplist["+cnt+"]/blodno") == "-" ){
          model.setValue("/root/send/report/delivedetlgrup/delivedetlgruplist["+cnt+"]/blodno", "");
        }
      }
    
    }
  }
  
  model.makeValue("/root/send/report/receiptid", receiptid);
  model.makeValue("/root/send/report/receiptnm", receiptnm);
  

  if(cnt < 1){
    messageBox("선택 정보가 ","I004");
    return; 
  }

  if(messageBox("혈액요청 출력을 ","Q004") != 6) return;
  
  for(var i=1; i<= sRowCnt; i++){ // 선택한 값이 불출신청 상태인지 체크
    if( grd_delivedetlgruplist.labelmatrix(i, 1) == "true" ) {
    	grd_delivedetlgruplist.valueMatrix(i, grd_delivedetlgruplist.colRef("receiptid")) = receiptid;
    	grd_delivedetlgruplist.valueMatrix(i, grd_delivedetlgruplist.colRef("receiptnm")) = receiptnm;
    }
  }

  model.makeValue("/root/send/report/patientnm",model.getValue("/root/main/cond/patientgrupInfo/patientgruplistInfo/patientnm1") );
  model.makeValue("/root/send/report/pid",model.getValue("/root/main/cond/patientgrupInfo/patientgruplistInfo/pid") );  
  model.makeValue("/root/send/report/sexage",model.getValue("/root/main/cond/patientgrupInfo/patientgruplistInfo/sexage") );  
  model.makeValue("/root/send/report/btype",model.getValue("/root/main/cond/patientgrupInfo/patientgruplistInfo/btype") );
  model.makeValue("/root/send/report/wardnm",cmb_wardcdgruplist.label );
  model.makeValue("/root/send/report/roomcd",cmb_roomcdgruplist.value );
  //model.makeValue("/root/send/report/logourl", getBigLogoImageURL("",getUserInfo("dutplceinstcd")));
  model.makeValue("/root/send/report/logourl", getImageURL("biglogo"+getUserInfo("dutplceinstcd"), "jpg"));
  
  //출력일시
  var printdd = getCurrentDate().substr(0,4) + "/" + getCurrentDate().substr(4,2) + "/" + getCurrentDate().substr(6,2);
  var printtm = getCurrentTime().substr(0,2) + ":" + getCurrentTime().substr(2,2) + ":" + getCurrentTime().substr(4,2);
  
  model.makeValue("/root/send/report/printdt", printdd + " " +printtm );
  model.makeValue("/root/send/report/usernm", getUserName() );

  if(gubn == "Blood"){
    model.makeValue("/root/send/ocrflag", "B");
  }else if(gubn == "ER"){
    model.makeValue("/root/send/ocrflag", "E");
  } 
  model.makeValue("/root/send/ioparam", ioparam);
  
//  exeReportPreview("RFMNR01000", "XMLSTR");
/*
exeReportPreview(레포트명, 연계방법, 매개변수필드 XPath, SubmitID, 출력여부, 인쇄 창 보임 여부,  저장타입, 파일명, 파일 저장 창 보임여부, 미리보기창닫기여부, 모니터 번호, 데이터 소스, 데이터 XPath , 메인리포트 반복XPath, 서브리포트1 반복Xpath)

*/

  model.makeValue("/root/send/pid", model.getValue("/root/main/cond/patientgrupInfo/patientgruplistInfo/pid"));
  
  if(!submit("TRMNR01027")) return; //"TRMNN01603"
  
  //alert(model.getValue("/root/temp/ocrtag/ocrtagseq/seq"));
  //model.makeValue("/root/send/report/seq", "50001");
  model.makeValue("/root/send/report/seq",        model.getValue("/root/temp/ocrtag/ocrtagseq/seq"        ));
  model.makeValue("/root/send/report/formcd",     model.getValue("/root/temp/ocrtag/ocrtagseq/formcd"     ));
  model.makeValue("/root/send/report/formfromdt", model.getValue("/root/temp/ocrtag/ocrtagseq/formfromdt" ));
  
  var ip = app.clientIp.split("^");
  
  var ipstr = ip[0].split(".");
  
  model.makeValue("/root/send/report/ip", ipstr[2] + "." + ipstr[3]);
  
  // ****************************************************************************************************************
  
  //통합기록조회 연동 param setting
  var sSeq = "";
  var sPid = "";      
  var sIndd = "";      
  var sCretno = "";
  var sOrdtype = "";
  var sOrddeptcd = "";
  var sMedispclid = "";
  var sFormcd = "";
  var sFormfromdt = "";
  var sPagecnt = "";
  
  var compareCretno = "";
  var compareIndd = "";
  var compareOrddeptcd = "";
  var compareMedispclid = "";
  
  var rowcnt = 0;
  
  //통합기록조회 연동 parameter 설정 부분
  for(var i = 1 ; i <= getNodesetCount("/root/main/cond/delivedetlgrup/delivedetlgruplist") ; i++){
    if(model.getValue("/root/main/cond/delivedetlgrup/delivedetlgruplist["+i+"]/sel") == "true"){
      if(compareCretno == ""){
        compareCretno = model.getValue("/root/main/cond/delivedetlgrup/delivedetlgruplist["+i+"]/cretno");
      }else{
        if(compareCretno != model.getValue("/root/main/cond/delivedetlgrup/delivedetlgruplist["+i+"]/cretno")){
          messageBox("통합기록조회 연동중 생성번호가 일치하지 않는 데이터가 존재합니다.", "I");
          return;
        }
      }
      
      if(compareIndd == ""){
        if(ioparam == "OPRC"){
          compareIndd = model.getValue("/root/main/cond/delivedetlgrup/delivedetlgruplist["+i+"]/orddd");
        }else if(ioparam == "IPRC"){
          compareIndd = model.getValue("/root/main/cond/delivedetlgrup/delivedetlgruplist["+i+"]/indd");
        }
      }else{
        if(ioparam == "OPRC"){
          if(compareIndd != model.getValue("/root/main/cond/delivedetlgrup/delivedetlgruplist["+i+"]/orddd")){
            messageBox("통합기록조회 연동중 진료일자가 일치하지 않는 데이터가 존재합니다.", "I");
            return;
          }
        }else{
          if(compareIndd != model.getValue("/root/main/cond/delivedetlgrup/delivedetlgruplist["+i+"]/indd")){
            messageBox("통합기록조회 연동중 입원일자가 일치하지 않는 데이터가 존재합니다.", "I");
            return;
          }
        }
      }
      
      if(compareOrddeptcd == ""){
        if(ioparam == "OPRC"){
          compareOrddeptcd = model.getValue("/root/main/cond/delivedetlgrup/delivedetlgruplist["+i+"]/orddeptcd");
        }else if(ioparam == "IPRC"){
          compareOrddeptcd = model.getValue("/root/main/cond/patientgrupInfo/patientgruplistInfo/pidsearchlistInfo/orddeptcd");   
        }
      }
      
      if(compareMedispclid == ""){
        if(ioparam == "OPRC"){
          compareMedispclid = model.getValue("/root/main/cond/delivedetlgrup/delivedetlgruplist["+i+"]/orddrid");
        }else if(ioparam == "IPRC"){
          compareMedispclid = model.getValue("/root/main/cond/patientgrupInfo/patientgruplistInfo/pidsearchlistInfo/medispclid");   
        }
      }
            
// 김병로 팀장 요구에 의해 삭제(2008-09-27)
//      if(compareOrddeptcd == ""){
//        compareOrddeptcd = model.getValue("/root/main/cond/delivedetlgrup/delivedetlgruplist["+i+"]/orddeptcd");
//      }else{
//        if(compareOrddeptcd != model.getValue("/root/main/cond/delivedetlgrup/delivedetlgruplist["+i+"]/orddeptcd")){
//          messageBox("통합기록조회 연동중 진료과가 일치하지 않는 데이터가 존재합니다.", "I");
//          return;
//        }
//      }
//      
//      if(compareMedispclid == ""){
//        compareMedispclid = model.getValue("/root/main/cond/delivedetlgrup/delivedetlgruplist["+i+"]/orddrid");       
//      }else{
//        if(compareMedispclid != model.getValue("/root/main/cond/delivedetlgrup/delivedetlgruplist["+i+"]/orddrid")){
//          messageBox("통합기록조회 연동중 진료의사가 일치하지 않는 데이터가 존재합니다.", "I");
//          return;
//        }
//      }     
      rowcnt++;
    }
  }

  //출력 page 수  
  if(rowcnt == 0){
    messageBox("불출요청서 출력건이 존재하지 않습니다.","E");
    return;
  }else if( rowcnt < 5 ){
    sPagecnt = 1;
  }else{
    sPagecnt = 0;
    sPagecnt = sPagecnt + parseInt(rowcnt/4);
    if((rowcnt % 4 ) > 0 ){
      sPagecnt = sPagecnt + 1;
    }
  }
  
  if(ioparam == "OPRC"){ //외래
    sSeq          = model.getValue("/root/temp/ocrtag/ocrtagseq/seq");
    sPid          = model.getValue("/root/main/cond/patientgrupInfo/patientgruplistInfo/pid") ; 
    sIndd         = compareIndd;
    sCretno       = compareCretno;
    sOrdtype      = "O";
    sOrddeptcd    = compareOrddeptcd;
    sMedispclid   = compareMedispclid;
    sFormcd       = model.getValue("/root/temp/ocrtag/ocrtagseq/formcd" );
    sFormfromdt   = model.getValue("/root/temp/ocrtag/ocrtagseq/formfromdt" );
  }else if(ioparam == "IPRC"){ // 입원
    sSeq          = model.getValue("/root/temp/ocrtag/ocrtagseq/seq");
    sPid          = model.getValue("/root/main/cond/patientgrupInfo/patientgruplistInfo/pid") ; 
    sIndd         = compareIndd;
    sCretno       = compareCretno;
    sOrdtype      = model.getValue("/root/temp/cond/patientgrup/patientgruplist[pid ='"+ sPid+"']/ordtype");
    sOrddeptcd    = compareOrddeptcd;
    sMedispclid   = compareMedispclid;
    sFormcd       = model.getValue("/root/temp/ocrtag/ocrtagseq/formcd" );
    sFormfromdt   = model.getValue("/root/temp/ocrtag/ocrtagseq/formfromdt" );
  } 

  //param 데이터 존재하지 여부 체크
  if(sSeq == ""       || sPid == ""         || sIndd == ""   || sCretno == ""     || sOrdtype == "" || 
     sOrddeptcd == "" || sMedispclid  == "" || sFormcd == "" || sFormfromdt == "" ){
       //alert(sSeq + " : " + sPid + " : " + sIndd + " : " + sCretno + " : " + sOrdtype + " : " + sOrddeptcd + " : " + sMedispclid + " : " + sFormcd + " : " + sFormfromdt);
       messageBox("통합기록조회 연동 설정 조건값이 정확하지 않습니다.", "E");
       return;  
    }

  if(!fSaveOCRIF(sSeq, sPid, sIndd, sCretno, sOrdtype, sOrddeptcd, sMedispclid, sFormcd, sFormfromdt, "", "", sPagecnt)){
    messageBox("통합기록조회 연동중 실패하였습니다.","C999");
    return;
  } 
    
  if(gubn == "Blood") { // 혈액요청서 출력. 체크
    
    exeReportPreview("RFMNR01000", "XMLSTR", "", "", "true", "", "", "", "", "", "", "grp_report"); //미리보기 없이 출력
    //exeReportPreview("RFMNR01000", "XMLSTR", "");                                                   //임시 미리보기 창 활성화
    //exeReportPreview("RFMNR01000", "XMLSTR", "", "", "true", "", "", "", "", "true");               // 미리보기 떻다가 사라지면서 출력

    for(var i = grd_delivedetlgruplist.fixedRows; i < grd_delivedetlgruplist.rows; i++) {
			if(grd_delivedetlgruplist.valueMatrix(i, grd_delivedetlgruplist.colRef("sel")) == "true") {
				grd_delivedetlgruplist.valueMatrix(i, grd_delivedetlgruplist.colRef("ocrtag")) = model.getValue("/root/temp/ocrtag/ocrtagseq/seq");
			}
		}
		
    model.makeValue("/root/send/detlgrup",grd_delivedetlgruplist.getupdatedataAll("i"));  

		model.makeValue("/root/send/ocrtag", model.getValue("/root/temp/ocrtag/ocrtagseq/seq"));
		
		
		
    if(submit("TXMNR01033")){
      fGettDeliveDetlList();// 불출신청 내역 재조회
    }
  } else if(gubn == "ER") { // 응급혈액불출요청서 출력. 체크
    exeReportPreview("RFMNR01002", "XMLSTR", "", "", "true", "", "", "", "", "", "", "grp_report"); //미리보기 없이 출력
    //exeReportPreview("RFMNR01002", "XMLSTR", "");                                                   //임시 미리보기 창 활성화
    //exeReportPreview("RFMNR01002", "XMLSTR", "", "", "true", "", "", "", "", "true");               // 미리보기 떻다가 사라지면서 출력

    model.makeValue("/root/send/detlgrup",grd_delivedetlgruplist.getupdatedataAll("i"));  
    for( var idx = grd_delivedetlgruplist.fixedRows ; idx <= grd_delivedetlgruplist.rows  ;  idx++ ){
        grd_delivedetlgruplist.valueMatrix( idx, grd_delivedetlgruplist.colRef("sel")) = false;
    }
  }
}


 /**
 * @group  :
 * @ver    : 2007.07.09
 * @by     : 정찬성 
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   :  혈액불출 내역 선택 삭제 (신청취소)
 * @param  :
 * @return :
 * @---------------------------------------------------
 */

function fDelDeliveExecPrcp(){


  var sRowCnt = grd_delivedetlgruplist.rows-grd_delivedetlgruplist.fixedrows; 
  var cnt = 0 ;

  for(var i=1; i<= sRowCnt; i++){ // 선택한 값이 불출신청 상태인지 체크
    if( grd_delivedetlgruplist.labelmatrix(i, 1) == "true" ) {
      cnt = cnt + 1;
//      if( grd_delivedetlgruplist.labelmatrix(i, 2) != "500" ) {
//      
//        messageBox("불출신청 이외의 상태에서는 삭제할 수 ","I004");
//        return; 
//      
//      }

      if( grd_delivedetlgruplist.labelmatrix(i, grd_delivedetlgruplist.colRef("prcpstatcd3")) > "100" ) {// 500 불출요청 (공통코드)
        messageBox("혈액은행에 접수된 상태에서는 신청취소 할 수 ","I004");
        return; 
      } else if( grd_delivedetlgruplist.labelmatrix(i, grd_delivedetlgruplist.colRef("prcppreptfflag")) == "의사") {// 의사 처방 삭제 불가능
      
        messageBox("의사처방은 신청취소 할 수 ","I004");
        return; 
        
      }
    }
  }

  if(cnt < 1){
    messageBox("선택 정보가 ","I004");
    return; 
  }

  model.removenode("/root/send");
  model.refresh();

//  model.makeValue("/root/send/blodpidflag",blodpidflag);  

  model.makeValue("/root/send/blodno", ipt_blodno.value  );
  model.makeValue("/root/send/prcpddfrom", ipt_prcpddfrom2.value  );
  model.makeValue("/root/send/prcpddto", ipt_prcdddto2.value  );
  model.makeValue("/root/send/wardcd", cmb_wardcdgruplist2.value  );
  model.makeValue("/root/send/wardcdnm", cmb_wardcdgruplist2.label  );
  model.makeValue("/root/send/roomcd", cmb_roomcdgruplist2.value  );
  model.makeValue("/root/send/hngnm", cmb_patientgruplist2.value  );
  model.makeValue("/root/send/pid", ipt_pid2.value  );

  model.makeValue("/root/send/ioparam", ioparam);


  /* 양천덕시 로직 시작 */
  if(messageBox ( "신청취소를 ", "Q004" ) == "6"){
    model.makeValue("/root/send/detlgrup",grd_delivedetlgruplist.getupdatedataAll("i"));  
      
      if(submit("TXMNR01035") == true ){
      fGetExecDetlList();// 수행처방내역리스트  
      fGettDeliveDetlList();//  불출신청 내역 리스트  
      fGetPatCmtList();
      }
   }
  /* 양천덕시 로직 끝 */
}

 /**
 * @group  :
 * @ver    : 2007.07.16
 * @by     : 정찬성 
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   :  수혈 미수행 내역 리스트
 * @param  :
 * @return :
 * @---------------------------------------------------
 */
function fGetBlodNoExecRecList(blodpidflag){

  var sRowCnt = grd_execdetlgruplist.rows-grd_execdetlgruplist.fixedrows; 

  if( model.getValue("/root/main/cond/patientgrupInfo/patientgruplistInfo/pid") == "" && model.getValue("/root/main/cond/blodno") == "" ){
  
//    messageBox("혈액번호/등록번호를 ","C001");
//    model.setfocus("ipt_blodno");
//    return; 
  
  }

  /* 수혈간호기록 내용 초기화 */
//  fClearChildNode("/root/main/cond/tnsnurserecgrup/tnsnurserecgruplist");
//  
//  model.refresh();

  model.makeValue("/root/send/blodpidflag",blodpidflag);  

  model.makeValue("/root/send/blodno", ipt_blodno.value  );
  model.makeValue("/root/send/prcpddfrom", ipt_prcpddfrom2.value  );
  model.makeValue("/root/send/prcpddto", ipt_prcdddto2.value  );
  model.makeValue("/root/send/wardcd", cmb_wardcdgruplist2.value  );
  model.makeValue("/root/send/wardcdnm", cmb_wardcdgruplist2.label  );
  model.makeValue("/root/send/roomcd", cmb_roomcdgruplist2.value  );
  model.makeValue("/root/send/hngnm", cmb_patientgruplist2.value  );
  model.makeValue("/root/send/pid", ipt_pid2.value  );

  model.makeValue("/root/send/ioparam", ioparam);

  if(submit("TRMNR01021")){
  }   

}

  /**
 * @group  :
 * @ver    : 2007.05.09
 * @by     : 정찬성 
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   :  혈액불출내역의 혈액반납의뢰 저장
 * @param  :
 * @return :
 * @---------------------------------------------------
 */

function fBlodReturnSave(){
  var sRowCnt = grd_blodreturnreqgruplist.rows-grd_blodreturnreqgruplist.fixedrows;   
  var cnt = 0 ;

  model.removenode("/root/send");
  model.makeValue("/root/send/detlgrup",grd_blodreturnreqgruplist.getupdatedataAll("i")); 
  
  var Hosyn = 0 ;

  for(var i=1; i<= sRowCnt; i++){

    if( grd_blodreturnreqgruplist.labelmatrix(i, 1) == "true" ) {
      cnt = cnt + 1;

      // ****************************** 반납사유 필수 로직 추가 ***************************************
      if(model.getValue(xBlodReturnReqGrupListPath+"["+i+"]/reqflag") == "-" || model.getValue(xBlodReturnReqGrupListPath+"["+i+"]/reqflag") == ""){//반납/폐기를 체크
        messageBox("반납/폐기를 ","C002");
        return;     
      }

      if(model.getValue(xBlodReturnReqGrupListPath+"["+i+"]/returnabandondate") == "-" || model.getValue(xBlodReturnReqGrupListPath+"["+i+"]/returnabandondate") == ""){//반납/폐기일 체크
        messageBox("반납/폐기일을 ","C002");
        return;     
      }

      if(model.getValue(xBlodReturnReqGrupListPath+"["+i+"]/etcprcpresncd") == "-" || model.getValue(xBlodReturnReqGrupListPath+"["+i+"]/etcprcpresncd") == ""){//반납사유 체크
        messageBox("반납/폐기 사유를 ","C002");
        return;     
      }
//      if(model.getValue(xBlodReturnReqGrupListPath+"["+i+"]/etcprcpresncd").substring(0,3) == "080"){ //반납사유가 병원사유인지 체크
      if(model.getValue(xBlodReturnReqGrupListPath+"["+i+"]/etcprcpresncd").substring(0,3) == "072"){ //반납사유가 병원사유인지 체크
        Hosyn++;
      }
      
      if(model.getValue(xBlodReturnReqGrupListPath+"["+i+"]/etcprcpresncd").substr(3,2) == "99" &&  model.getValue(xBlodReturnReqGrupListPath+"["+i+"]/clinccmtcnts")== ""){ 
        messageBox("기타 사유 처리 시 기타사유내역을 입력해야 합니다.","C");
        return;
      }
    }
  }

  if(Hosyn > 0){
    var sRtnMsg = messageBox("병원사유에 의한 혈액폐기시 혈액대금이 병원손실처리 됩니다.\n\n","Q003");
    if(sRtnMsg != 6) return;
  }

  if(cnt < 1){
    messageBox("선택 정보가 ","I004");
    return;
  }

//return;
  model.removeNodeset("/root/temp/rtninfo");
  model.makeValue("/root/send/ioparam", ioparam);
  if(submit("TXMNR01030")){
    if(getNodesetCount("/root/temp/rtninfo/rtnlist") > 0){
      if(model.getValue("/root/temp/rtninfo/rtnlist/rtnflag") == "4"){
      }else{
        messageBox("퇴원환자에게 병원손실처리 사유로 반납/폐기 의뢰 할 수 없습니다.", "E");
      }
    }else{
      messageBox("반납/폐기 의뢰 처리를 실패하였습니다.", "E");
    }
    model.copyNode("/root/hidden/main","/root/main");
  }

  /* 반납/폐기 이후 정보 조회 실행 */

  var pidblodflag = '';
  if(ipt_pid2.value != ""){
    pidblodflag = 'pid';
  } else if (ipt_blodno.value !="") {
    pidblodflag = 'blod';                   
  }               

  fBlodDeliveList(pidblodflag); //혈액불출 리스트 조회버튼
  //fGetBlodNoExecRecList(pidblodflag); //수혈 미수행 내역 리스트
  //fBlodColChg(); //컬럼속성 변경
}

 /**
 * @group  :
 * @ver    : 2007.07.16
 * @by     : 정찬성 
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : 혈액불출 내역 조회 리스트
 * @param  :
 * @return :
 * @---------------------------------------------------
 */
function fBlodDeliveList(blodpidflag){

  var sRowCnt = grd_execdetlgruplist.rows-grd_execdetlgruplist.fixedrows; 

  if( model.getValue("/root/main/cond/patientgrupInfo/patientgruplistInfo/pid") == "" && model.getValue("/root/main/cond/blodno") == "" ){
  
//    messageBox("혈액번호/등록번호를 ","C001");
//    model.setfocus("ipt_blodno");
//    return; 
  
  }

  model.removenode("/root/send");
  model.refresh();

  model.makeValue("/root/send/blodpidflag" , blodpidflag    );  
  model.makeValue("/root/send/blodno"      , ipt_blodno.value  );
  model.makeValue("/root/send/prcpddfrom"  , ipt_prcpddfrom2.value   );
  model.makeValue("/root/send/prcpddto"    , ipt_prcdddto2.value  );
  model.makeValue("/root/send/wardcd"      , cmb_wardcdgruplist2.value   );
  model.makeValue("/root/send/wardcdnm"    , cmb_wardcdgruplist2.label   );
  model.makeValue("/root/send/roomcd"      , cmb_roomcdgruplist2.value   );
  model.makeValue("/root/send/hngnm"       , cmb_patientgruplist2.value   );
  model.makeValue("/root/send/pid"         , ipt_pid2.value  );
  model.makeValue("/root/send/ioparam"     , ioparam        );
  
  grd_blodreturnreqgruplist.rebuildStyle();
  grd_blodexecrecgruplist.rebuildStyle();
  
  if(submit("TRMNR01020")){
    model.removenode("/root/blodrtninfo");
    model.makenode("/root/blodrtninfo");
    model.copynode("/root/blodrtninfo", "root/main/cond/blodreturnreqgrup");
    
    for(var i = 1 ; i < grd_blodreturnreqgruplist.rows; i++ ){
      // 셀 초기화 부분
      grd_blodreturnreqgruplist.isReadOnly(i, grd_blodreturnreqgruplist.colRef("reqflag")) = false;
      grd_blodreturnreqgruplist.isReadOnly(i, grd_blodreturnreqgruplist.colRef("stat")) = false;
      grd_blodreturnreqgruplist.isReadOnly(i, grd_blodreturnreqgruplist.colRef("returnabandondate")) = false;
      grd_blodreturnreqgruplist.isReadOnly(i, grd_blodreturnreqgruplist.colRef("etcprcpresncd")) = false;
      grd_blodreturnreqgruplist.isReadOnly(i, grd_blodreturnreqgruplist.colRef("clinccmtcnts")) = false;
      grd_blodreturnreqgruplist.cellComboNodeset(i, grd_blodreturnreqgruplist.colRef("reqflag")) = "/root/init/reqflaglist/itemlist1/item";
      
      if( grd_blodexecrecgruplist.rows > 1){ //수행기록 내역 존재 할 경우
        for(var n = 1 ; n <= grd_blodexecrecgruplist.rows; n++ ){
          //if( model.getValue("/root/main/cond/blodreturnreqgrup/blodreturnreqgruplist["+ i +"]/blodno") == model.getValue("/root/main/cond/blodreturnreqgrup/blodexecrecgruplist["+ n +"]/blodno") &&
          //    model.getValue("/root/main/cond/blodreturnreqgrup/blodreturnreqgruplist["+ i +"]/prcpno") == model.getValue("/root/main/cond/blodreturnreqgrup/blodexecrecgruplist["+ n +"]/prcpno")  ) {
          
          if( model.getValue("/root/main/cond/blodreturnreqgrup/blodreturnreqgruplist["+ i +"]/chkstat") == "Y"){	//20090401_SMY수정
            if( model.getValue("/root/main/cond/blodreturnreqgrup/blodreturnreqgruplist["+ i +"]/etcprcpresncd") != ""  ) {
              grd_blodreturnreqgruplist.cellComboNodeset(i, grd_blodreturnreqgruplist.colRef("reqflag")) = "/root/init/reqflaglist/itemlist2/item";
              //폐기 반납 사유 셋팅
              if( model.getValue("/root/main/cond/blodreturnreqgrup/blodreturnreqgruplist["+ i +"]/reqflag") == "1"  ){
                grd_blodreturnreqgruplist.cellComboNodeset(i,grd_blodreturnreqgruplist.colRef("etcprcpresncd")) = "/root/init/etcprcpresncd/L0084";       //반납사유
              }else{
                //grd_blodreturnreqgruplist.cellComboNodeset(i,grd_blodreturnreqgruplist.colRef("etcprcpresncd")) = "/root/init/L0093list/L0093";            //폐기사유
                grd_blodreturnreqgruplist.cellComboNodeset(i,grd_blodreturnreqgruplist.colRef("etcprcpresncd")) = "/root/init/totresncd/item";            //폐기사유
              }
              grd_blodreturnreqgruplist.rowstyle(i, "data", "background-color") = "#fff000";
            }
            grd_blodreturnreqgruplist.isReadOnly(i, grd_blodreturnreqgruplist.colRef("stat")) = true;   
            grd_blodreturnreqgruplist.isReadOnly(i, grd_blodreturnreqgruplist.colRef("reqflag")) = true;
            grd_blodreturnreqgruplist.isReadOnly(i, grd_blodreturnreqgruplist.colRef("returnabandondate")) = true;
            grd_blodreturnreqgruplist.isReadOnly(i, grd_blodreturnreqgruplist.colRef("etcprcpresncd")) = true;
            grd_blodreturnreqgruplist.isReadOnly(i, grd_blodreturnreqgruplist.colRef("clinccmtcnts")) = true;
            
            //최은희 선생님 요청 : 2008 - 01- 29 혈액 폐기/반납이 아닌 건은 색 표시 제외
            //grd_blodreturnreqgruplist.rowstyle(i, "data", "background-color") = "#fff000";
            n = grd_blodexecrecgruplist.rows;
          }else{
            if( model.getValue("/root/main/cond/blodreturnreqgrup/blodreturnreqgruplist["+ i +"]/etcprcpresncd") != ""  ) {
              grd_blodreturnreqgruplist.cellComboNodeset(i, grd_blodreturnreqgruplist.colRef("reqflag")) = "/root/init/reqflaglist/itemlist2/item";
              //폐기 반납 사유 셋팅
              if( model.getValue("/root/main/cond/blodreturnreqgrup/blodreturnreqgruplist["+ i +"]/reqflag") == "1"  ){
                grd_blodreturnreqgruplist.cellComboNodeset(i,grd_blodreturnreqgruplist.colRef("etcprcpresncd")) = "/root/init/etcprcpresncd/L0084";       //반납사유
              }else{
                grd_blodreturnreqgruplist.cellComboNodeset(i,grd_blodreturnreqgruplist.colRef("etcprcpresncd")) = "/root/init/discontinucom/L0085";        //폐기사유
              }
              
              if(model.getValue("/root/main/cond/blodreturnreqgrup/blodreturnreqgruplist["+ i +"]/reqflagstat") == "Y"){
                grd_blodreturnreqgruplist.isReadOnly(i, grd_blodreturnreqgruplist.colRef("etcprcpresncd")) = true;
                grd_blodreturnreqgruplist.isReadOnly(i, grd_blodreturnreqgruplist.colRef("returnabandondate")) = true;
                grd_blodreturnreqgruplist.isReadOnly(i, grd_blodreturnreqgruplist.colRef("clinccmtcnts")) = true;
              }else{
                sChkReadOnlyCd = grd_blodreturnreqgruplist.valueMatrix(i, grd_blodreturnreqgruplist.colRef("etcprcpresncd")); 
                //사유가 기타인 항목은 입력할 수 있도록 수정
                if(sChkReadOnlyCd.substr(3,5) != "99"){
                  grd_blodreturnreqgruplist.isReadOnly(i, grd_blodreturnreqgruplist.colRef("clinccmtcnts")) = true;
                }                   
              }
              
              grd_blodreturnreqgruplist.isReadOnly(i, grd_blodreturnreqgruplist.colRef("reqflag")) = true;
              grd_blodreturnreqgruplist.isReadOnly(i, grd_blodreturnreqgruplist.colRef("stat")) = true;
              grd_blodreturnreqgruplist.rowstyle(i, "data", "background-color") = "#fff000";
            }       
          }
        }
      }else{ //수행기록 내역 존재하지 않을 경우
        if( model.getValue("/root/main/cond/blodreturnreqgrup/blodreturnreqgruplist["+ i +"]/etcprcpresncd") != ""  ) {
          //폐기 반납 사유 셋팅
          if( model.getValue("/root/main/cond/blodreturnreqgrup/blodreturnreqgruplist["+ i +"]/reqflag") == "1"  ){
            grd_blodreturnreqgruplist.cellComboNodeset(i,13) = "/root/init/etcprcpresncd/L0084";        //반납사유
          }else{
            grd_blodreturnreqgruplist.cellComboNodeset(i,13) = "/root/init/discontinucom/L0085";        //폐기사유
          }
          
          if(model.getValue("/root/main/cond/blodreturnreqgrup/blodreturnreqgruplist["+ i +"]/reqflagstat") == "Y"){
            grd_blodreturnreqgruplist.isReadOnly(i, grd_blodreturnreqgruplist.colRef("etcprcpresncd")) = true;
            grd_blodreturnreqgruplist.isReadOnly(i, grd_blodreturnreqgruplist.colRef("returnabandondate")) = true;
            grd_blodreturnreqgruplist.isReadOnly(i, grd_blodreturnreqgruplist.colRef("clinccmtcnts")) = true;
          }else{
            sChkReadOnlyCd = grd_blodreturnreqgruplist.valueMatrix(i, grd_blodreturnreqgruplist.colRef("etcprcpresncd")); 
            //사유가 기타인 항목은 입력할 수 있도록 수정
            if(sChkReadOnlyCd.substr(3,5) != "99"){
              grd_blodreturnreqgruplist.isReadOnly(i, grd_blodreturnreqgruplist.colRef("clinccmtcnts")) = true;
            }                 
          }
          grd_blodreturnreqgruplist.isReadOnly(i, grd_blodreturnreqgruplist.colRef("reqflag")) = true;
          grd_blodreturnreqgruplist.isReadOnly(i, grd_blodreturnreqgruplist.colRef("stat")) = true;
          grd_blodreturnreqgruplist.rowstyle(i, "data", "background-color") = "#fff000";
        }else{
          grd_blodreturnreqgruplist.isReadOnly(i, grd_blodreturnreqgruplist.colRef("clinccmtcnts")) = true;
          grd_blodreturnreqgruplist.isReadOnly(i, grd_blodreturnreqgruplist.colRef("etcprcpresncd")) = true;
          grd_blodreturnreqgruplist.isReadOnly(i, grd_blodreturnreqgruplist.colRef("returnabandondate")) = true;
        }
      }
    }
    
    //수행기록 내역 미종료 건 색표시
    for(var i= grd_blodexecrecgruplist.fixedRows ; i <= grd_blodexecrecgruplist.rows; i ++){
      var sColor3 = model.getValue("/root/main/cond/blodreturnreqgrup/blodexecrecgruplist["+ i +"]/signno"); //인증번호
      
      if( sColor3 != ""  ) {
        grd_blodexecrecgruplist.rowstyle(i, "data", "background-color") = "#ffff00"; //인증 정보 확인
      }else{
        grd_blodexecrecgruplist.rowstyle(i, "data", "background-color") = "#00FF00"; //종료시간 정보 확인
      }
    }
  }   
  model.setfocus("ipt_blodno");   
}

 /**
 * @group  :
 * @ver    : 2007.06.18
 * @by     : 정찬성 
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   :  불출신청 내역 조회 리스트
 * @param  :
 * @return :
 * @---------------------------------------------------
 */
function fGettDeliveDetlList(){
  if( ipt_pid.value == "" ){
    model.removenode("/root/main/cond/delivedetlgrup");
    model.refresh();
    return;
  }

  if( model.getValue("/root/main/cond/wardcdgrup/wardcdgruplist") == "" ){
//    messageBox("병동을 ","C002");
//    model.setfocus("cmb_wardcdgruplist");
//    return; 
  }

  model.removenode("/root/send");
  
  model.makeValue("/root/send/prcpddfrom", ipt_prcpddfrom.value);
  model.makeValue("/root/send/prcpddto", ipt_prcdddto.value);
  model.makeValue("/root/send/wardcd", cmb_wardcdgruplist.value); 
  model.makeValue("/root/send/wardcdnm", cmb_wardcdgruplist2.label  );
  model.makeValue("/root/send/roomcd", cmb_roomcdgruplist.value); 
  model.makeValue("/root/send/hngnm", cmb_patientgruplist.value);
  model.makeValue("/root/send/pid", ipt_pid.value);

  model.makeValue("/root/send/ioparam", ioparam);

  if(submit("TRMNR01009")){
    grd_delivedetlgruplist.rebuildStyle();
    var sTodate = getCurrentDate();
    for(var i = grd_delivedetlgruplist.fixedRows ; i <= grd_delivedetlgruplist.Rows ; i++){
      var sChkBlodBarCd = grd_delivedetlgruplist.valueMatrix(i, grd_delivedetlgruplist.colRef("blodbarcd")); 
      var sValiDt       = grd_delivedetlgruplist.valueMatrix(i, grd_delivedetlgruplist.colRef("validt")).substr(0,8); 
      var sChkDay       = getDateCalc(sTodate, 4, "+");
      if(sValiDt != ""){
        if( sChkBlodBarCd == "12003" || sChkBlodBarCd == "12004" || sChkBlodBarCd == "12017" || sChkBlodBarCd == "A0003"){
          if(sTodate >= sValiDt ){
            grd_delivedetlgruplist.rowStyle(i, "all", "background-color") = "#f7a08b";
          }
        }else{
          if(sChkDay >= sValiDt ){
            grd_delivedetlgruplist.rowStyle(i, "all", "background-color") = "#f7a08b";
          }
        }
      }
    }
  }   
}

/**
 * @group  :
 * @ver    : 2007.04.02
 * @by     : 정찬성 
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   :  수행처방 선택시 체크사항
 * @param  :
 * @return :
 * @---------------------------------------------------
 */   
function fSelchange(){
  var iRow = grd_execdetlgruplist.row ;

    
    var pid = model.getValue("/root/main/cond/patientgrupInfo/patientgruplistInfo/pid");


  if( parseInt(model.getValue(xExecDetlListPath+"["+iRow+"]/prcpqty")) <= parseInt(model.getValue(xExecDetlListPath+"["+iRow+"]/appno")) ) {
    model.setValue(xExecDetlListPath+"["+iRow+"]/sel", "false" ) ;
    messageBox("신청수량이 처방수량보다 클 수 ","I004");
    return;     
  }

  if( model.getValue(xExecDetlListPath+"["+iRow+"]/prcpstatcd") == "D/C") {
    model.setValue(xExecDetlListPath+"["+iRow+"]/sel", "false" ) ;
    messageBox("D/C 상태에서는 신청할 수 ","I004");
    return;     
  } else  if( model.getValue(xExecDetlListPath+"["+iRow+"]/prcpstatcd") == "의사") {
    model.setValue(xExecDetlListPath+"["+iRow+"]/sel", "false" ) ;
    messageBox("의사 상태에서는 신청할 수 ","I004");
    return;     
  } else  if( model.getValue(xExecDetlListPath+"["+iRow+"]/prcpstatcd") == "완료") {
    model.setValue(xExecDetlListPath+"["+iRow+"]/sel", "false" ) ;
    messageBox("완료 상태에서는 신청할 수 ","I004");
    return;     
  } else  if( model.getValue(xExecDetlListPath+"["+iRow+"]/prcpstatcd") != "처방") {
    model.setValue(xExecDetlListPath+"["+iRow+"]/sel", "false" ) ;
    messageBox("처방 상태 이외에는 신청할 수 ","I004");
    return;     
  } else {
  
      if ( model.getValue("/root/main/cond/ioflag") == "I" 
        && (model.getValue(xExecDetlListPath+"["+iRow+"]/orddd") !=  model.getValue("/root/temp/cond/patientgrup/patientgruplist[pid='"+ pid +"']/indd")  
         || model.getValue(xExecDetlListPath+"["+iRow+"]/cretno") !=  model.getValue("/root/temp/cond/patientgrup/patientgruplist[pid='"+ pid +"']/cretno")) ){
            model.setValue(xExecDetlListPath+"["+iRow+"]/sel", "false" ) ;
            messageBox("과거 (퇴원)수진처방은 신청할 수 ","I004");
            return;
      }else {
        if (  model.getValue("/root/main/cond/ioflag") == "I" ){
            model.removeNodeset("/root/temp/cond/patientgrup/patientgruplist");/* 환자리스트*/									
            fGetPatientList();// 환자리스트 정보를 가져온다.		
            if (  model.getValue("/root/temp/cond/patientgrup/patientgruplist[pid='"+ pid +"']/dschnotiyn") == "Y" ){
                    model.setValue(xExecDetlListPath+"["+iRow+"]/sel", "false" ) ;
                	messageBox("간호사 퇴원확정 취소하시고", "C003");
                	return;
            }
            
        }
      } 
  }
}


/**
 * @group  :
 * @ver    : 2007.04.02
 * @by     : 정찬성 
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   :  그리드의 값이 변경되었을때, 상태값을 변경한다.
 * @param  :
 * @return :
 * @---------------------------------------------------
 */   
function fChangedGridCol(){

  var sDetlGrupRow = grd_execpopwnddetlgruplist.row;
  var sDetlGrupBKRow=0;

  var num = model.getValue(xPopWndExecDetlListPath+"["+sDetlGrupRow+"]/num");

  for(var i=1; i<= getNodesetCount(xPopWndClsListBKPath); i++){
    if(model.getValue(xPopWndClsListBKPath+"["+i+"]/num") == num){
      sDetlGrupBKRow = i;
      break;
    }
  }

  if(event.keyCode == "32") {
    messageBox("신청수량에 스페이스를 넣을 수 ","I004");
    model.setValue(xPopWndExecDetlListPath+"["+sDetlGrupRow+"]/stat","-");
    model.setValue(xPopWndExecDetlListPath+"["+sDetlGrupRow+"]/appno","");
    grd_execpopwnddetlgruplist.refresh();
    return;                     
  }
	
	//예약시간 수정할 경우 6자리 셋팅_20090304_SMY	
	var prcphopetm = grd_execpopwnddetlgruplist.textmatrix(sDetlGrupRow, grd_execpopwnddetlgruplist.colRef("prcphopetm")) ;
	if(prcphopetm.length > "0" && prcphopetm.length < "4"){
		messageBox("예약시간 정보를 정확하게 입력하세요","I");
		return;
	}else if(prcphopetm.length == "4"){
		model.setValue(xPopWndExecDetlListPath+"["+sDetlGrupRow+"]/prcphopetm", prcphopetm+"00");	
	}
	
  var irr = grd_execpopwnddetlgruplist.textmatrix(sDetlGrupRow, grd_execpopwnddetlgruplist.colRef("irr")) ;

  if(model.getValue(xPopWndExecDetlListPath+"["+sDetlGrupRow+"]/appno") == "0" || model.getValue(xPopWndExecDetlListPath+"["+sDetlGrupRow+"]/appno") == ""){
    model.setValue(xPopWndExecDetlListPath+"["+sDetlGrupRow+"]/stat","-");
    //grd_execpopwnddetlgruplist.rebuild();
    //return; 
  }
  
//  alert(instance1.selectSingleNode(xPopWndExecDetlListPath+"["+sDetlGrupRow+"]").xml);
//
//  alert(instance1.selectSingleNode(xPopWndClsListBKPath+"["+sDetlGrupBKRow+"]").xml);

  if(instance1.selectSingleNode(xPopWndExecDetlListPath+"["+sDetlGrupRow+"]").xml != instance1.selectSingleNode(xPopWndClsListBKPath+"["+sDetlGrupBKRow+"]").xml){
    model.setValue(xPopWndExecDetlListPath+"["+sDetlGrupRow+"]/stat","I");
    //grd_execpopwnddetlgruplist.rebuild();
  } 
  grd_execpopwnddetlgruplist.refresh();
}

 /**
 * @group  :
 * @ver    : 2007.05.09
 * @by     : 정찬성 
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   :  혈액불출관리 init
 * @param  :
 * @return :
 * @---------------------------------------------------
 */

function fPopWndSave(){
	//debugger;
  var sRowCnt = grd_execpopwnddetlgruplist.rows-grd_execpopwnddetlgruplist.fixedrows;   
  var saveyn = 0 ;
  var rsrvflag = "";

  for(var i=1; i<= sRowCnt; i++){
    if(model.getValue(xPopWndExecDetlListPath+"["+i+"]/stat") != "-") {
      saveyn = 1 ;
    }

    if(model.getValue(xPopWndExecDetlListPath+"["+i+"]/stat") != "-" && model.getValue(xPopWndExecDetlListPath+"["+i+"]/appno") == ""){
      messageBox("신청수량은","I003");
      return;     
    }

//    if( !isNumber(model.getValue(xPopWndExecDetlListPath+"["+i+"]/appno"))  ) {
//      messageBox("숫자형을 ","C001");
//      return; 
//    }

    if( parseInt(model.getValue(xPopWndExecDetlListPath+"["+i+"]/appno")) < 1 || parseInt(model.getValue(xPopWndExecDetlListPath+"["+i+"]/appno")) == " " ) {
      messageBox("신청수량은 1건 이하로 입력할 수","E001");
      return;     
    }
    
    if( parseInt(model.getValue(xPopWndExecDetlListPath+"["+i+"]/delivepossno")) < parseInt(model.getValue(xPopWndExecDetlListPath+"["+i+"]/appno")) ) {
      messageBox("신청수량은 불출수량보다 크게 입력","E001");
      return;     
    }
    
    /**************************************************************강남성모기준_서울성모오픈시 삭제부분
    if(model.getValue(xPopWndExecDetlListPath+"["+i+"]/prcphopedd") == "" || model.getValue(xPopWndExecDetlListPath+"["+i+"]/prcphopetm") == ""){
      messageBox("예약일자/예약시간은","I003");
      return;     
    }
    ***************************************************************/

	//*************************************************************************************서울성모오픈시 적용
	if(model.getValue(xPopWndExecDetlListPath+"["+i+"]/prcphopedd") == "" || model.getValue(xPopWndExecDetlListPath+"["+i+"]/prcphopetm") == ""){
        //setrsrvyn : Y일 경우 예약일시 지정코드_20090223_SMY추가
	    if(rsrvflag != "N" && model.getValue(xPopWndExecDetlListPath+"["+i+"]/setrsrvyn") == "Y"){
	    	rsrvflag = "Y";
	    }else{
	    	rsrvflag = "N";
	    }
    }
    //****************************************************************************************/
    
  }
  
  //*****************************************************************************************서울성모오픈시 적용
  //FFP, LRSDP, CRYO 혈액제제는 예약일자와 시간지정이 필수_20090223_SMY추가
  if(rsrvflag == "N"){
	  messageBox("예약일자/예약시간은","I003");
	  return;
	
  }else if (rsrvflag == "Y"){
	  var rtn = messageBox("FFP, LRSDP, CRYO 혈액제제는 예약일자와 시간지정이 필수입니다." +"\n" + "지정하지 않는 경우 현재 일시로 접수됩니다." +"\n" + "현재일시로 바로 접수하시겠습니까?","Q");
	  if (rtn == "7"){
	  	  return;
	  
	  }else{	  
	  	  for(var i=1; i<= sRowCnt; i++){
	  	  	  if(model.getValue(xPopWndExecDetlListPath+"["+i+"]/setrsrvyn") == "Y"){
	  	      	  model.setValue(xPopWndExecDetlListPath+"["+i+"]/prcphopedd",getCurrentDate());     
				  model.setValue(xPopWndExecDetlListPath+"["+i+"]/prcphopetm",getCurrentTime());  
				  model.setValue(xPopWndExecDetlListPath+"["+i+"]/stat","I");
			  }
  		  }
  		  model.refresh();
	  }
  }
  //********************************************************************************************/
  

  if(saveyn <= 0 ){
    messageBox("수정사항이 없어 저장 ","E001");
    return;
  }
  
    //alert("result : " + saveyn);
//  if(saveyn <= 0 ){
//    messageBox("수정사항이 없어 저장 ","E001");
//    return; 
//  }

//  alert(model.getValue("/root/main/cond/clsflag"));
//  alert(model.getValue("/root/main/cond/recflag"));
//  
//  if(messageBox("","Q002") != 6) return;
//    alert(model.getValue("/root/main/cond/todd"));
//    model.makeValue("/root/send/lrggrupcd", model.getValue(xCondPath+"/lrggrupcd"));
//    model.makeValue("/root/send/clsflag", model.getValue("/root/main/cond/clsflag"));
//    model.makeValue("/root/send/recflag", model.getValue("/root/main/cond/recflag"))
//    model.makeValue("/root/send/todd2", model.getValue("/root/main/cond/todd"))
//    alert(model.getValue("/root/send/todd2"));    


  model.removenode("/root/send");
  model.makeValue("/root/send/detlgrup",grd_execpopwnddetlgruplist.getupdatedataAll("i"));  

  if(submit("TXMNR01008")){
    //model.copyNode("/root/hidden/main","/root/main");
    
    if ( !isNull( model.getValue(xPopWndClsListBKPath + "[ocrtargetyn = 'Y']/ocrtargetyn"))
      && model.getValue(xPopWndClsListBKPath + "[ocrtargetyn = 'Y']/ocrtargetyn") == "Y" ){
        
		cap_msg.text = "첫 수혈이거나 마지막 수혈시행일로부터 60일 이상이 경과하였으니 \n 수혈동의서를 작성해주시기 바랍니다.\n 수혈동의서를 지금 출력하시겠습니까?"
		grp_msg.visible = true;
		rdo_msgcnfm.visible = true;
		model.setValue("/root/main/cond/ocrprntyn","N") ;
		
		model.setValue("/root/main/cond/ocrtargetyn", "Y");

        
    } else if ( !isNull( model.getValue(xPopWndClsListBKPath + "[ocrtargetyn = 'E']/ocrtargetyn"))
      && model.getValue(xPopWndClsListBKPath + "[ocrtargetyn = 'E']/ocrtargetyn") == "E" ){
		cap_msg.text = "당일 수혈동의서 출력 이력이 존재합니다. \n OCR 출력 리스트에서 확인하시기 바랍니다"
		grp_msg.visible = true;
		rdo_msgcnfm.visible = false;
		model.setValue("/root/main/cond/ocrtargetyn", "E");
        
    } else {
   		model.setValue("/root/main/cond/ocrtargetyn", "N");
   		grp_msg.visible = false;
   		cap_msg.text = "";
        window.close();
    }

  }

//  grd_detlgrup.row = 1;

}
 /**
 * @group  :
 * @ver    : 2007.05.09
 * @by     : 정찬성 
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   :  수혈동의서 출력 confirm
 * @param  :
 * @return :
 * @---------------------------------------------------
 */
function fPopWndOcrCnfm(){
    if ( model.getValue("/root/main/cond/ocrtargetyn") == "Y" ){
        if (model.getValue("/root/main/cond/ocrprntyn") == "Y" ){
            //emr/prcpmngtweb/js/MMO001.js
            
            fOcrAutoPrint(model.getValue(xPopWndClsListBKPath + "[ocrtargetyn = 'Y']/calcscorcd")+ "▦");
        } else if (model.getValue("/root/main/cond/ocrprntyn") == "N" ){
            //<script type="javascript" src="../../../emr/formmngtweb/js/MRF03800.js"/>
            //fSaveOCRIF(seq, pid, indd, cretno, ordtype, orddeptcd, medispclid, formcd, formfromdt, "", "", pagecnt)
            //xPatientPath
            var pid = model.getValue(xPopWndClsListBKPath + "[ocrtargetyn = 'Y']/pid");
            fSaveOCRIF(model.getValue(xPopWndClsListBKPath + "[ocrtargetyn = 'Y']/seq")
                     , pid
                     , opener.model.getValue(xPatientPath + "[pid = '"+pid+"']/indd")
                     , opener.model.getValue(xPatientPath + "[pid = '"+pid+"']/cretno")
                     , opener.model.getValue(xPatientPath + "[pid = '"+pid+"']/ordtype")
                     , opener.model.getValue(xPatientPath + "[pid = '"+pid+"']/orddeptcd")
                     , opener.model.getValue(xPatientPath + "[pid = '"+pid+"']/medispclid")
                     , model.getValue(xPopWndClsListBKPath + "[ocrtargetyn = 'Y']/formcd")
                     , model.getValue(xPopWndClsListBKPath + "[ocrtargetyn = 'Y']/formfromdt")
                     , ""
                     , ""
                     , model.getValue(xPopWndClsListBKPath + "[ocrtargetyn = 'Y']/pagecnt"))
        }
        
    } 
    
    window.close();
}

/**
 * @desc   : OCR 자동출력 
 * @
 * @return :
 * @author :  20087. 10. 17
 * @---------------------------------------------------
*/
function fOcrAutoPrint(calcscorcd) {

    var pid = model.getValue(xPopWndClsListBKPath + "[ocrtargetyn = 'Y']/pid");
    model.makeValue ( "/root/hidden/ocrprint/calcscor/pid", pid);
    model.makeValue ( "/root/hidden/ocrprint/calcscor/cretno", opener.model.getValue(xPatientPath + "[pid = '"+pid+"']/cretno"));
    model.makeValue ( "/root/hidden/ocrprint/calcscor/orddd", opener.model.getValue(xPatientPath + "[pid = '"+pid+"']/indd") );
    model.makeValue ( "/root/hidden/ocrprint/calcscor/ordtype", opener.model.getValue(xPatientPath + "[pid = '"+pid+"']/ordtype"));
    model.makeValue ( "/root/hidden/ocrprint/calcscor/calcscorcd", calcscorcd );
    model.makeValue ( "/root/hidden/ocrprint/calcscor/disflag", "calcscor" );
    
    var xpt = window.screenleft + 50;
    var ypt = window.screenTop + 50;                    
    var coord = getRelativeCoordinate ( xpt, ypt );
    var mon = coord[0];
    xpt = coord[1];
    ypt = coord[2];
    
	model.addLog("동의서 출력 - LSH");    
	model.addLog(model.instances(0).selectNodesXml("/root/hidden/ocrprint/calcscor"));        

    modal ( "SPMRF04500", mon,  xpt, ypt, "SSMRF03800", "/root/hidden/ocrprint/calcscor","/root/main/temp/calcscor", "", false );
}
 /**
 * @group  :
 * @ver    : 2007.05.09
 * @by     : 정찬성 
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   :  혈액불출관리 init
 * @param  :
 * @return :
 * @---------------------------------------------------
 */
function fPopWndInit(){
  model.makeValue("/root/send/prcpddfrom"     ,    opener.window.javascript.getParameter("prcpddfrom")      );
  model.makeValue("/root/send/prcpddto"       ,    opener.window.javascript.getParameter("prcpddto")        );
  model.makeValue("/root/send/wardcd"         ,    opener.window.javascript.getParameter("wardcd")          );
  model.makeValue("/root/send/roomcd"         ,    opener.window.javascript.getParameter("roomcd")          );
  model.makeValue("/root/send/pid"            ,    opener.window.javascript.getParameter("pid")             );
  model.makeValue("/root/send/queryprcpdd"    ,    opener.window.javascript.getParameter("queryprcpdd")     );
  model.makeValue("/root/send/queryprcpno"    ,    opener.window.javascript.getParameter("queryprcpno")     );
  model.makeValue("/root/send/queryprcphistno",    opener.window.javascript.getParameter("queryprcphistno") );

  if(submit("TRMNR01007")){
    model.copyNode("/root/temp/main","/root/main");

	
    for(var i = 1 ; i < grd_execpopwnddetlgruplist.rows ; i++) {
    	//setrsrvyn : Y일 경우 예약일시 지정코드_20090223_SMY추가
    	var setrsrvyn = model.getValue(xPopWndExecDetlListPath+"["+i+"]/setrsrvyn");
    	
      //if(model.getValue(xPopWndExecDetlListPath+"["+i+"]/prcphopetm") == "000000"  ){

    	 /**************************************************************강남성모기준_서울성모오픈시 삭제부분
         //prep order는 무조건 당일로 셋팅 : 2008-01-15
         model.setValue(xPopWndExecDetlListPath+"["+i+"]/prcphopedd",getCurrentDate());     
	     model.setValue(xPopWndExecDetlListPath+"["+i+"]/prcphopetm",getCurrentTime()); 
         ***************************************************************/


		 //*************************************************************************************서울성모오픈시 적용
         if(setrsrvyn == "Y"){
	         model.setValue(xPopWndExecDetlListPath+"["+i+"]/prcphopedd","");     
	         model.setValue(xPopWndExecDetlListPath+"["+i+"]/prcphopetm","");  
	     }else{
	         model.setValue(xPopWndExecDetlListPath+"["+i+"]/prcphopedd",getCurrentDate());     
	         model.setValue(xPopWndExecDetlListPath+"["+i+"]/prcphopetm",getCurrentTime());  
	     
	     }
	     //********************************************************************************************/

	     
      //}
    }
  } 
}

 /**
 * @group  :
 * @ver    : 2007.06.18
 * @by     : 정찬성 
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   :  혈액불출신청 팝업
 * @param  :
 * @return :
 * @---------------------------------------------------
 */
function fPopWnd(){
  var iRows = grd_execdetlgruplist.rows;
  var queryprcpdd = "" ;
  var queryprcpno = "" ;
  var queryprcphistno = "" ;
  var checkcnt = 0 ;

  for(var i = 1 ; i < grd_execdetlgruplist.rows; i++ ) {// 전체를 돌면서 그룹에 값이 체크되어 있는것 초기화
    if( model.getValue(xExecDetlListPath+"["+ i +"]/sel") ==  "true" ) {

      queryprcpdd   = queryprcpdd   + "'" + model.getValue(xExecDetlListPath+"["+ i +"]/prcpdd2") + "'," ;
      queryprcpno   = queryprcpno   + ""  + model.getValue(xExecDetlListPath+"["+ i +"]/prcpno" ) + ","  ;
      queryprcphistno = queryprcphistno + "" + model.getValue(xExecDetlListPath+"["+ i +"]/prcphistno") + "," ;

      checkcnt++ ;
    } else {
    
    }
  }

  if( checkcnt <= 0 ) {
    messageBox("수혈처방내역을 ","C002");
    return 0 ;  
  }
  
  if(opt_inj.value == ""){
    messageBox("보관검체가 없습니다.", "E");
  }

  queryprcpdd = queryprcpdd.replace(/-/g,"")

  queryprcpdd = queryprcpdd.substr(0,queryprcpdd.length-1) ;
  queryprcpno = queryprcpno.substr(0,queryprcpno.length-1) ;
  queryprcphistno = queryprcphistno.substr(0,queryprcphistno.length-1) ;

  setParameter("prcpddfrom", ipt_prcpddfrom.value);
  setParameter("prcpddto", ipt_prcdddto.value);
  setParameter("wardcd", cmb_wardcdgruplist.value);
  setParameter("roomcd", cmb_roomcdgruplist.value);
  setParameter("pid", ipt_pid.value);
  setParameter("queryprcpdd", queryprcpdd);
  setParameter("queryprcpno", queryprcpno);
  setParameter("queryprcphistno", queryprcphistno);

  var left = event.screenX-1000;
  var top = event.screenY+50;
  modal("SMMNR01001",1,left,top);
}

 /**
 * @group  :
 * @ver    : 2007.06.18
 * @by     : 정찬성 
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   :  수행처방내역 조회 리스트
 * @param  :
 * @return :
 * @---------------------------------------------------
 */
function fGetExecDetlList(){
    var pid = ipt_pid.value;
  if( pid == "" ){
    model.removenode("/root/main/cond/execdetlgrup");
    model.refresh();
    return;
  }

  if( model.getValue("/root/main/cond/wardcdgrup/wardcdgruplist") == "" ){
//    messageBox("병동을 ","C002");
//    model.setfocus("cmb_wardcdgruplist");
//    return; 
  }
  grd_execdetlgruplist.rebuildStyle();
  model.removenode("/root/send");
  model.makeValue("/root/send/prcpddfrom", ipt_prcpddfrom.value);
  model.makeValue("/root/send/prcpddto", ipt_prcdddto.value);
  model.makeValue("/root/send/wardcd", cmb_wardcdgruplist.value); 
  model.makeValue("/root/send/wardcdnm", cmb_wardcdgruplist2.label  );
  model.makeValue("/root/send/roomcd", cmb_roomcdgruplist.value); 
  model.makeValue("/root/send/hngnm", cmb_patientgruplist.value);
  model.makeValue("/root/send/pid", pid);
  model.makeValue("/root/send/ioparam", ioparam);

  if(submit("TRMNR01006")){

    //신청 불가 선택란 Disabled 처리 : 2008-01-16   
    for(iRow = 1 ; iRow <= getNodesetCount(xExecDetlListPath) ; iRow++ ){
      grd_execdetlgruplist.isReadOnly(iRow, grd_execdetlgruplist.colRef("sel")) = false; // 콤보박스 초기화
      if( model.getValue(xExecDetlListPath+"["+iRow+"]/prcpstatcd") == "D/C") {
        grd_execdetlgruplist.isReadOnly(iRow, grd_execdetlgruplist.colRef("sel")) = true; 
      } else  if( model.getValue(xExecDetlListPath+"["+iRow+"]/prcpstatcd") == "의사") {
        grd_execdetlgruplist.isReadOnly(iRow, grd_execdetlgruplist.colRef("sel")) = true; 
      } else  if( model.getValue(xExecDetlListPath+"["+iRow+"]/prcpstatcd") == "완료") {
        grd_execdetlgruplist.isReadOnly(iRow, grd_execdetlgruplist.colRef("sel")) = true; 
      } else  if( model.getValue(xExecDetlListPath+"["+iRow+"]/prcpstatcd") != "처방") {
        grd_execdetlgruplist.isReadOnly(iRow, grd_execdetlgruplist.colRef("sel")) = true; 
      } else if( model.getValue(xExecDetlListPath+"["+iRow+"]/prcpstatcd") == "처방") {
          if ( model.getValue("/root/main/cond/ioflag") == "I" 
            && (model.getValue(xExecDetlListPath+"["+iRow+"]/orddd") !=  model.getValue("/root/temp/cond/patientgrup/patientgruplist[pid='"+ pid +"']/indd")  
             || model.getValue(xExecDetlListPath+"["+iRow+"]/cretno") !=  model.getValue("/root/temp/cond/patientgrup/patientgruplist[pid='"+ pid +"']/cretno")) ){
                grd_execdetlgruplist.isReadOnly(iRow, grd_execdetlgruplist.colRef("sel")) = true;
          } 
      }
    }
  }
}

 /**
 * @group  :
 * @ver    : 2007.06.18
 * @by     : 정찬성 
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   :  환자 상세정보 조회 combo
 * @param  :
 * @return :
 * @---------------------------------------------------
 */
function fGetPatientInfo(arg, aCase){
  var sLoPid = "";
  //기존 Pid와 새로 조회되는 Pid같은지 점검
  if(aCase == "case1") {
    sLoPid = ipt_pid.value;
  } else {
    sLoPid = ipt_pid2.value;
  }
  
  if(getPatientInfo("pid") != sLoPid ){
    delPatientInfos(); //화면상단정보 삭제
    setGlobalVariable("paminfo", ""); //원무정보 reset
  }

//  if(sGolPid == sLoPid) return;

  model.removenode("/root/send");
  if(aCase == "case1") { //수혈불출관리화면
    if(arg != ""){
      //cmb_wardcdgruplist2.value = "";
      //cmb_roomcdgruplist2.value = "";
      //cmb_patientgruplist2.value = "";
      //model.setValue("/root/temp/cond/wardcdgrup/wardcdgruplist", "");
      //model.setValue("/root/temp/cond/roomcdgrup/roomcdgruplist", "");
      //model.setValue("/root/temp/cond/patientgrup/patientgruplist", "");
    }
    //opt_patientnm.value = "" ;
    //opt_sexage1.value = "" ;
    model.setValue("/root/main/cond/patientgrupInfo/patientgruplistInfo/patientnm", "");
    model.setValue("/root/main/cond/patientgrupInfo/patientgruplistInfo/sexage", "");
    
    model.makeValue("/root/send/wardcd", cmb_wardcdgruplist.value);
    model.makeValue("/root/send/roomcd", cmb_roomcdgruplist.value);

    if( ipt_pid.value != "" ){
      model.makeValue("/root/send/pid", ipt_pid.value);
    } else if( model.makeValue("/root/send/pid", cmb_patientgruplist.value) != "" ){
      model.makeValue("/root/send/pid", cmb_patientgruplist.value); 
    }
  } else {
    if(arg != ""){
      //cmb_wardcdgruplist.value = "" ;
      //cmb_roomcdgruplist.value = "" ; 
      //cmb_patientgruplist.value = "" ;
      //model.setValue("/root/temp/cond/wardcdgrup/wardcdgruplist", "");
      //model.setValue("/root/temp/cond/roomcdgrup/roomcdgruplist", "");
      //model.setValue("/root/temp/cond/patientgrup/patientgruplist", "");      
    }
    //opt_patientnm2.value = "" ;
    //opt_sexage.value = "" ;
    model.setValue("/root/main/cond/patientgrupInfo/patientgruplistInfo/patientnm", "");
    model.setValue("/root/main/cond/patientgrupInfo/patientgruplistInfo/sexage", "");
    
    //opt_signno.value = "" ;
    model.makeValue("/root/send/wardcd", cmb_wardcdgruplist2.value);
    model.makeValue("/root/send/roomcd", cmb_roomcdgruplist2.value);

    if( ipt_pid2.value != "" ){
      model.makeValue("/root/send/pid", ipt_pid2.value);  
    } else if( model.makeValue("/root/send/pid", cmb_patientgruplist2.value) != "" ){
      model.makeValue("/root/send/pid", cmb_patientgruplist2.value);  
    }
  }
  
  model.makeValue("/root/send/ioparam", ioparam); 
  if(submit("TRMNR01005", false)){
    sGolPid = sLoPid;
    if( arg == "pid" && ioparam == "IPRC" ){

//      fGetWardList();

      if("" == model.getValue("/root/main/cond/patientgrupInfo/patientgruplistInfo/pidsearchlistInfo/wardcd") ) {
        return ;
      }

      if(aCase == "case1") { //수혈불출관리화면
        model.setValue(cmb_wardcdgruplist.attribute("ref"), model.getValue("/root/main/cond/patientgrupInfo/patientgruplistInfo/pidsearchlistInfo/wardcd") );
  
        fGetRoomList();
  
        if( "" == model.getValue("/root/main/cond/patientgrupInfo/patientgruplistInfo/pidsearchlistInfo/roomcd") ) {
          return ;
        }
  
        model.setValue(cmb_roomcdgruplist.attribute("ref"), model.getValue("/root/main/cond/patientgrupInfo/patientgruplistInfo/pidsearchlistInfo/roomcd") );
  
        fGetPatientList();
  
        if("" == model.getValue("/root/main/cond/patientgrupInfo/patientgruplistInfo/pidsearchlistInfo/pid") ) {
          return ;
        }
  
        model.setValue(cmb_patientgruplist.attribute("ref"), model.getValue("/root/main/cond/patientgrupInfo/patientgruplistInfo/pidsearchlistInfo/pid") );
      } else {
        model.setValue(cmb_wardcdgruplist2.attribute("ref"), model.getValue("/root/main/cond/patientgrupInfo/patientgruplistInfo/pidsearchlistInfo/wardcd") );
  
        fGetRoomList();
  
        if( "" == model.getValue("/root/main/cond/patientgrupInfo/patientgruplistInfo/pidsearchlistInfo/roomcd") ) {
          return ;
        }
  
        model.setValue(cmb_roomcdgruplist2.attribute("ref"), model.getValue("/root/main/cond/patientgrupInfo/patientgruplistInfo/pidsearchlistInfo/roomcd") );
  
        fGetPatientList();
  
        if("" == model.getValue("/root/main/cond/patientgrupInfo/patientgruplistInfo/pidsearchlistInfo/pid") ) {
          return ;
        }
        model.setValue(cmb_patientgruplist2.attribute("ref"), model.getValue("/root/main/cond/patientgrupInfo/patientgruplistInfo/pidsearchlistInfo/pid") );
      }
    }
  }   

  if(aCase == "case1") { //수혈불출관리화면
    model.setfocus("btn_srch1");
  } else {
    model.setfocus("btn_srch2");
  }
}

 /**
 * @group  :
 * @ver    : 2007.06.18
 * @by     : 정찬성 
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   :  환자 정보 조회 combo
 * @param  :
 * @return :
 * @---------------------------------------------------
 */
function fGetPatientList(){
  model.removenode("/root/send");
  
  model.makeValue("/root/send/wardcd", cmb_wardcdgruplist.value);
  model.makeValue("/root/send/roomcd", cmb_roomcdgruplist.value);

  if(submit("TRMNR01004", false)){
  }   

  model.setfocus("cmb_patientgruplist");
}

 /**
 * @group  :
 * @ver    : 2007.06.18
 * @by     : 정찬성 
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   :  병실 조회 combo
 * @param  :
 * @return :
 * @---------------------------------------------------
 */
function fGetRoomList(){
  model.removenode("/root/send");
  
  model.makeValue("/root/send/wardcd", cmb_wardcdgruplist.value);

  if(submit("TRMNR01003", false)){
  }   

  model.setfocus("cmb_roomcdgruplist");
}

 /**
 * @group  :
 * @ver    : 2007.06.18
 * @by     : 정찬성 
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   :  병동 조회
 * @param  :
 * @return :
 * @---------------------------------------------------
 */
function fGetWardList(){
  model.removenode("/root/send");
  
  model.makeValue("/root/send/wardcd", model.getValue("/root/temp/cond/wardcdgrup/wardcdgruplist/wardcd"));

  if(submit("TRMNR01002", false)){
  }   

//  model.setfocus("cmb_wardcdgruplist");
}


 /**
 * @group  :
 * @ver    : 2007.05.09
 * @by     : 정찬성 
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   :  혈액불출관리 init
 * @param  :
 * @return :
 * @---------------------------------------------------
 */
function fInitWardList( getparam){
  fGetWardList();// 병동코드 리스트
}

/**
 * @group  :
 * @ver    : 2007.08.29
 * @by     : 정찬성
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : 초기화
 * @param  :
 * @return :
 * @---------------------------------------------------
 */ 
function fTnsRecInit(){
  
  rdo_discontinuyn.value = "N";						// 수혈중단
  rdo_discontinuyn.disabled = false;			// 수혈중단
  cmb_discontinu.disabled = true;					// 수혈중단 콤보
  ipt_etc.disabled = true;								// 수혈중단 기타
  ipt_drugqty.disabled = true;						// 총투여량
  ipt_onepintqty.disabled = false;				// 1pint 투여량
  chk_tnssideeffect.disabled = false;			//20100126_SMY추가
  ipt_tnssideeffectetc.disabled = true;		// 수혈부작용	기타 비활성화
  chk_smlqtytnsyn.disabled = true;				// 소량수혈	비활성화
  btn_deltemprec.disabled = true;					// 기록삭제 버튼 비활성화
  btn_init.disabled = true;								// 초기화 버튼 비활성화
  btn_tempsave.disabled = true;						// 임시저장 버튼 비활성화
  btn_certsave.disabled = true;						// 인증저장 버튼 비활성화
  
  model.removeNode ("/root/main/cond/tnsnurserecgrup/tnsnurserecgruplist");
  model.copyNode("/root/main/cond/tnsnurserecgrup","/root/temp/tnsnurserecgrup");

  model.removeNode ("/root/main/cond/vitalsigngrup/vitalsigngruplist");   
  model.copyNode("/root/main/cond/vitalsigngrup","/root/temp/vitalsigngrup");
  //textarea1.value = "수혈팔찌 확인함" + "\n" + "본인확인 혈액형 :";
  
  // 170221_마취회복실, 수술실 수혈기록_문구수정
  if(getUserInfo("dutplceinstcd") == "031" && (getUserInfo("dutplcecd") == model.getValue("/root/code/codeinfo/codelist[cdgrupid ='016']/cdid") || getUserInfo("dutplcecd") == model.getValue("/root/code/codeinfo/codelist[cdgrupid ='013']/cdid")) ){
		model.makeValue("/root/main/cond/tnsnurserecgrup/tnsnurserecgruplist/tnsrec", "혈액전달 및 연결시 수여자와 혈액의 환자이름, 혈액형, 혈액종류를 확인한다." + "\n" + "수혈간호기록의 vital sign기록을  마취기록조회(진료)의 5분 vital sign으로 대체한다.");
  }else{
		model.makeValue("/root/main/cond/tnsnurserecgrup/tnsnurserecgruplist/tnsrec", "수혈팔찌 확인함, 수혈부작용 설명함" + "\n" + "수혈이 완료될 때까지 30분마다 환자 상태를 관찰하고 확인한다." + "\n" + "본인확인 혈액형 확인함");
  }
  //model.makeValue("/root/main/cond/tnsnurserecgrup/tnsnurserecgruplist/tnsrec", "수혈팔찌 확인함, 수혈부작용 설명함" + "\n" + "수혈이 완료될 때까지 30분마다 환자 상태를 관찰하고 확인한다." + "\n" + "본인확인 혈액형 확인함");		//수혈부작용 설명함 추가_20090327_SMY
  
  model.makeValue("/root/main/cond/tnsnurserecgrup/tnsnurserecgruplist/transferyn","N"); // 150309 - AYS
  model.makeValue("/root/main/cond/tnsnurserecgrup/tnsnurserecgruplist/nonactpher","N"); // 150908 - AYS
  
  // '15.09.08 - AYS
  caption17.value = "수혈시작일시";
	caption19.value = "수혈시작 간호사";

  grd_vitalsigngruplist.row = 0;
  grd_vitalsigngruplist.col = 0;
  //model.refresh();
}

/**
 * @group  :
 * @ver    : 2007.08.29
 * @by     : 정찬성
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : Set선택의 항목 지정
 * @param  :
 * @return :
 * @---------------------------------------------------
 */ 
function fBaseMakeParameter() {
  var param = "";
  rowsep = "▩";
  colsep = "▦";
  
  param = "recflag" + colsep + "dutplaccd" + colsep + "reclnkkey"+ rowsep+"O" + colsep + "12611" + colsep + "12611" + rowsep;
  
  return param;
}


/**
 * @group  :
 * @ver    : 2007.12.29
 * @by     : 양천덕
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : 수행기록내역 체크
 * @param  :
 * @return :
 * @---------------------------------------------------
 */ 
function fCheckExecRec(){
  
  var sRow = grd_blodexecrecgruplist.row;

  var sRowStratTime        = model.getValue("/root/main/cond/blodreturnreqgrup/blodexecrecgruplist["+ sRow +"]/fstrgstdt3");
  var sRowEndTime          = model.getValue("/root/main/cond/blodreturnreqgrup/blodexecrecgruplist["+ sRow +"]/tnsendddtm");
  var sRowTnsstrnurseid    = model.getValue("/root/main/cond/blodreturnreqgrup/blodexecrecgruplist["+ sRow +"]/tnsstrnurseid");
  var sRowTnsendnurseid    = model.getValue("/root/main/cond/blodreturnreqgrup/blodexecrecgruplist["+ sRow +"]/tnsendnurseid");
  var sRowSmlqtytnsyn      = model.getValue("/root/main/cond/blodreturnreqgrup/blodexecrecgruplist["+ sRow +"]/smlqtytnsyn");
  var sRowTnssideeffectetc = model.getValue("/root/main/cond/blodreturnreqgrup/blodexecrecgruplist["+ sRow +"]/tnssideeffectetc");
  var sRowDiscontinuyn     = model.getValue("/root/main/cond/blodreturnreqgrup/blodexecrecgruplist["+ sRow +"]/discontinuyn");  
	var sRowPrcpcd  			   = model.getValue("/root/main/cond/blodreturnreqgrup/blodexecrecgruplist["+ sRow +"]/prcpcd");	// 170331_AYS_처방코드 동시 확인

  if( model.getValue("/root/main/cond/blodreturnreqgrup/blodexecrecgruplist["+ sRow +"]/stat") == "true"){
    
    for(var i = 1 ; i < grd_blodexecrecgruplist.rows ; i++ ){
      model.setValue("/root/main/cond/blodreturnreqgrup/blodexecrecgruplist["+ i +"]/stat" , 'false');
    
      if(  model.getValue("/root/main/cond/blodreturnreqgrup/blodexecrecgruplist["+ i +"]/fstrgstdt3")       == sRowStratTime        && 
           model.getValue("/root/main/cond/blodreturnreqgrup/blodexecrecgruplist["+ i +"]/tnsendddtm")       == sRowEndTime          &&
           model.getValue("/root/main/cond/blodreturnreqgrup/blodexecrecgruplist["+ i +"]/tnsstrnurseid")    == sRowTnsstrnurseid    &&
           model.getValue("/root/main/cond/blodreturnreqgrup/blodexecrecgruplist["+ i +"]/tnsendnurseid")    == sRowTnsendnurseid    &&
           model.getValue("/root/main/cond/blodreturnreqgrup/blodexecrecgruplist["+ i +"]/smlqtytnsyn")      == sRowSmlqtytnsyn      &&
           model.getValue("/root/main/cond/blodreturnreqgrup/blodexecrecgruplist["+ i +"]/tnssideeffectetc") == sRowTnssideeffectetc &&
           model.getValue("/root/main/cond/blodreturnreqgrup/blodexecrecgruplist["+ i +"]/discontinuyn")     == sRowDiscontinuyn     &&
           model.getValue("/root/main/cond/blodreturnreqgrup/blodexecrecgruplist["+ i +"]/prcpcd")  			   == sRowPrcpcd      			   ){	// 170331_AYS_처방코드 동시 확인
         model.setValue("/root/main/cond/blodreturnreqgrup/blodexecrecgruplist["+ i +"]/stat" , 'true');
      }
    }
    
    fOtherRecListUncheck("exec");

  } else if( model.getValue("/root/main/cond/blodreturnreqgrup/blodexecrecgruplist["+ sRow +"]/stat") == "false"){
    
    for(var i = 1 ; i < grd_blodexecrecgruplist.rows ; i++ ){
    
      if( i != sRow  &&
         model.getValue("/root/main/cond/blodreturnreqgrup/blodexecrecgruplist["+ i +"]/fstrgstdt3")       == sRowStratTime        && 
         model.getValue("/root/main/cond/blodreturnreqgrup/blodexecrecgruplist["+ i +"]/tnsendddtm")       == sRowEndTime          &&
         model.getValue("/root/main/cond/blodreturnreqgrup/blodexecrecgruplist["+ i +"]/tnsstrnurseid")    == sRowTnsstrnurseid    &&
         model.getValue("/root/main/cond/blodreturnreqgrup/blodexecrecgruplist["+ i +"]/tnsendnurseid")    == sRowTnsendnurseid    &&
         model.getValue("/root/main/cond/blodreturnreqgrup/blodexecrecgruplist["+ i +"]/smlqtytnsyn")      == sRowSmlqtytnsyn      &&
         model.getValue("/root/main/cond/blodreturnreqgrup/blodexecrecgruplist["+ i +"]/tnssideeffectetc") == sRowTnssideeffectetc &&
         model.getValue("/root/main/cond/blodreturnreqgrup/blodexecrecgruplist["+ i +"]/discontinuyn")     == sRowDiscontinuyn     &&
         model.getValue("/root/main/cond/blodreturnreqgrup/blodexecrecgruplist["+ i +"]/prcpcd")  			   == sRowPrcpcd      			   ){	// 170331_AYS_처방코드 동시 확인
         model.setValue("/root/main/cond/blodreturnreqgrup/blodexecrecgruplist["+ i +"]/stat" , 'false');
      }
    }

  }
  
  grd_blodexecrecgruplist.refresh();
  
}

/**
 * @group  :
 * @ver    : 2007.12.29
 * @by     : 양천덕
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : 혈액번호 조회
 * @param  :
 * @return :
 * @---------------------------------------------------
 */ 
function fFindBlod(){
  var sCheckBold = ipt_blodno.currentText;
    
  var frow1 = "";
  var frow2 = "";
  var frow3 = "";
  
  // 혈액불출내역 조회
      frow1 = grd_blodreturnreqgruplist.findRow(sCheckBold, 1, 2);
      grd_blodreturnreqgruplist.row = frow1;
      grd_blodreturnreqgruplist.topRow = frow1;
  
  // 미수행기록목록 조회
      frow2 = grd_blodnoexecrecgruplist.findRow(sCheckBold, 1, 2);
      grd_blodnoexecrecgruplist.row = frow2;
      grd_blodnoexecrecgruplist.topRow = frow2;
  
  // 수행기록 내역 조회
      frow3 = grd_blodexecrecgruplist.findRow(sCheckBold, 1, 4);
      grd_blodexecrecgruplist.row = frow3;
      grd_blodexecrecgruplist.topRow = frow3;
    if(frow1 < 0 && frow2 < 0 && frow3 < 0){
      messageBox("검색 된 혈액이 없습니다.", "I");
      return;
    }
}

/**
 * @group  :
 * @ver    : 2007.12.29
 * @by     : 양천덕
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : 수행기록내역 더블클릭 이밴트 처리
 * @param  :
 * @return :
 * @---------------------------------------------------
 */ 
function fCheckExecRecDBclick(){
	//debugger;  
  if(grd_blodexecrecgruplist.row < 1){
    return;
  }
  
  for(var i=1 ; i < grd_blodexecrecgruplist.rows ; i++){
    model.setValue("/root/main/cond/blodreturnreqgrup/blodexecrecgruplist["+ i +"]/stat" , 'false');
  }

  var iRow = grd_blodexecrecgruplist.Row ;
  model.setValue("/root/main/cond/blodreturnreqgrup/blodexecrecgruplist["+ iRow +"]/stat", 'true');
  
  fOtherRecListUncheck("exec");
  
  grd_blodexecrecgruplist.refresh();
  
  //fBlodExecRecDetlinfo();// 수행기록내역 상세정보     
  //fTnsRecInit();      
  fExecRecBottom();
  fVitalSignList();// vital sign List
}


/**
 * @group  :
 * @ver    : 2007.12.29
 * @by     : 양천덕
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : 수행기록내역 더블클릭으로 수혈간호기록에 Seeting 처리
 * @param  :
 * @return :
 * @---------------------------------------------------
 */ 
function fExecRecBottom(){
  var sRowCnt = grd_blodexecrecgruplist.rows-grd_blodexecrecgruplist.fixedrows;   
  var cnt = 0 ;

  model.removenode("/root/send");
  model.makeValue("/root/send/detlgrup",grd_blodexecrecgruplist.getupdatedataAll("i"));
  
  var blodno = "" ;
  var prcpnm = "" ;
  var aborh = "" ;
  var prcpdelivefact = "" ;
  var iRow = "";
  var chkreqcnt = 0;
  var signno = "";
  var prcpno = "";
  var duplreccheck = false ;
  var discontinuyn = "";
  sFlagChkYN = "N";
  
  /* 미수행기록 목록 선택 되어 있는지 체크 시작 */

  for(var i=1; i<= sRowCnt; i++){
//    alert(grd_blodnoexecrecgruplist.labelmatrix(i, 1));

    if( grd_blodexecrecgruplist.labelmatrix(i, 1) == "true" ) {
      blodno += grd_blodexecrecgruplist.labelmatrix(i, grd_blodexecrecgruplist.colRef("blodno")) + "," ;
      prcpnm += grd_blodexecrecgruplist.labelmatrix(i, grd_blodexecrecgruplist.colRef("prcpnm")) + "," ;
      aborh  += grd_blodexecrecgruplist.labelmatrix(i, grd_blodexecrecgruplist.colRef("abo"))
              + grd_blodexecrecgruplist.labelmatrix(i, grd_blodexecrecgruplist.colRef("rh"))     + "," ;
      prcpdelivefact += grd_blodnoexecrecgruplist.labelmatrix(i, grd_blodnoexecrecgruplist.colRef("prcpdelivefact")) + "," ;
      signno += grd_blodexecrecgruplist.labelmatrix(i, grd_blodexecrecgruplist.colRef("signno")) + "," ;      
      prcpno += grd_blodexecrecgruplist.labelmatrix(i, grd_blodexecrecgruplist.colRef("prcpno")) + "," ;
      discontinuyn += grd_blodexecrecgruplist.labelmatrix(i, grd_blodexecrecgruplist.colRef("discontinuyn")) + "," ;
      if(iRow == ""){
        iRow = i ;
      }
      
      cnt = cnt + 1;
    }
  }

  if(cnt < 1){
    messageBox("선택 정보가 ","I004");
    return false; 
  }

  /* 수행기록 목록 선택 되어 있는지 체크 끝 */

  var blodnodupSource =  blodno.substr(0,blodno.length-1).split(",");
  var prcpnodupSource =  prcpno.substr(0,prcpno.length-1).split(",");
//  alert(blodnodupSource);


  /* 수행내역 기록버튼시 중복 체크 시작 */


  for(var i=0; i<= blodnodupSource.length; i++){
//    alert(grd_blodnoexecrecgruplist.labelmatrix(i, 1));

    for(var n=0; n<= grd_blodnoexecrecgruplist.rows; n++){
      if( blodnodupSource[i] ==  model.getValue(xBlodExecRecGrupListPath+"["+n+"]/blodno") &&
          prcpnodupSource[i] ==  model.getValue(xBlodExecRecGrupListPath+"["+n+"]/prcpno") ) {
        duplreccheck = true ;
      }
    }
  }
  
  btn_init.disabled = true;//20100415 khj 수행기록내역에서 넘긴경우 초기화버튼비활성화
  
  btn_certsave.disabled = false;
  //btn_deltemprec.disabled = true;
  var sChkSign = signno.split(",");
  var sChkDiscontinuyn = discontinuyn.split(",");
  for(var i=0 ; i < sChkSign.length-1 ; i++){
    if(sChkSign[i] == "" ){
      btn_tempsave.disabled = false;
      if(sChkDiscontinuyn[i]== "N"){
        btn_deltemprec.disabled = false;
      }
    }
  }
  
  for(var i=0; i<= blodnodupSource.length; i++){
//    alert(grd_blodnoexecrecgruplist.labelmatrix(i, 1));

    for(var n=1; n<= grd_blodreturnreqgruplist.rows; n++){
      if( blodnodupSource[i] ==  model.getValue(xBlodReturnReqGrupListPath+"["+n+"]/blodno") && 
          prcpnodupSource[i] ==  model.getValue(xBlodReturnReqGrupListPath+"["+n+"]/prcpno") ) {
        if(model.getValue(xBlodReturnReqGrupListPath+"["+n+"]/reqflagstat") == "Y" && model.getValue(xBlodReturnReqGrupListPath+"["+n+"]/reqflag") == "2"){
          chkreqcnt = chkreqcnt + 1;
        }
        
//        //반납폐기 구분에 정보가 있을 경우 기록 삭제 버튼 비활성화->  20100415 김홍점 폐기확정전까지는 활성화하고 메시지 팝업
//        if(model.getValue(xBlodReturnReqGrupListPath+"["+n+"]/reqflag") != ""){
//          btn_deltemprec.disabled = true;   
//        }
      }
    }
  }
  
  if(chkreqcnt > 0 ){
    rdo_discontinuyn.disabled = true;
    cmb_discontinu.disabled = true;
    chk_smlqtytnsyn.disabled = true;
    ipt_etc.disabled = true;
    ipt_drugqty.disabled = true;
    ipt_onepintqty.disabled = true;
    btn_deltemprec.disabled = true;   
    messageBox("폐기 확정 혈액은 사유 변경을 할 수 없습니다.","I");
    sFlagChkYN = "Y";
  } else {
    //수혈중단N인경우 기록삭제버튼 활성화 20100415 khj 12061
    //잔여폐기의뢰건도 버튼은 활성화 후 메시지 팝업
    btn_deltemprec.disabled = false;
    ipt_onepintqty.disabled = false;   
  }

  /* 수행내역 기록버튼시 중복 체크 끝 */

//  alert(blodno.substr(0,blodno.length-1));

//  if( duplreccheck ){// 중복기록 체크
//    messageBox("수행기록된 혈액을 중복으로 기록할수 ","I004");
//    return; 
//  };

//  fClearChildNode("/root/main/cond/tnsnurserecgrup/tnsnurserecgruplist");
  
//  model.refresh();  

  model.setValue(cap_blodno.attribute("ref"), blodno.substr(0,blodno.length-1) );
  model.setValue(cap_blodnm.attribute("ref"), prcpnm.substr(0,prcpnm.length-1) );
  model.setValue(cap_aborh.attribute("ref"), aborh.substr(0,aborh.length-1) );
  model.setValue("/root/main/cond/tnsnurserecgrup/tnsnurserecgruplist/prcpno", prcpno.substr(0,prcpno.length-1));
  model.setValue("/root/main/cond/tnsnurserecgrup/tnsnurserecgruplist/signno", signno.substr(0,signno.length-1) );
  
//alert(instance1.selectSingleNode(xBlodExecRecGrupListPath).xml);

//  model.setValue(cap_blodno.attribute("ref"), model.getValue(xBlodExecRecGrupListPath+"["+iRow+"]/blodno"));
//  model.setValue(cap_blodnm.attribute("ref"), model.getValue(xBlodExecRecGrupListPath+"["+iRow+"]/prcpnm"));
//  model.setValue(cap_aborh.attribute("ref"), model.getValue(xBlodExecRecGrupListPath+"["+iRow+"]/abo") + model.getValue(xBlodExecRecGrupListPath+"["+iRow+"]/rh") );
  
  model.setValue(ipt_fromdd.attribute("ref"), model.getValue(xBlodExecRecGrupListPath+"["+iRow+"]/tnsstrddtm").substring(0,8));
  model.setValue(ipt_fromtm.attribute("ref"), model.getValue(xBlodExecRecGrupListPath+"["+iRow+"]/tnsstrddtm").substring(8,12));

  model.setValue(ipt_todd.attribute("ref"), model.getValue(xBlodExecRecGrupListPath+"["+iRow+"]/tnsendddtm").substring(0,8));
  model.setValue(ipt_totm.attribute("ref"), model.getValue(xBlodExecRecGrupListPath+"["+iRow+"]/tnsendddtm").substring(8,12));
  
  //20100415 12061 khj 수혈종료일시입력된 기록은 임시저장버튼활성화, 수혈중단N인경우 기록삭제버튼 활성화
  
  if ( !isNull(model.getValue(xBlodExecRecGrupListPath+"["+iRow+"]/tnsendddtm")) ){
      btn_tempsave.disabled = true;
  }else{
      btn_tempsave.disabled = false;  
  }
  model.setValue(opt_fromdeptnm.attribute("ref"), model.getValue(xBlodExecRecGrupListPath+"["+iRow+"]/tnsstrnursedeptnm"));
  model.setValue(opt_fromusernm.attribute("ref"), model.getValue(xBlodExecRecGrupListPath+"["+iRow+"]/tnsstrnursenm"));
  model.setValue(opt_todeptnm.attribute("ref"), model.getValue(xBlodExecRecGrupListPath+"["+iRow+"]/tnsendnursedeptnm"));

  model.setValue(opt_tousernm.attribute("ref"), model.getValue(xBlodExecRecGrupListPath+"["+iRow+"]/tnsendnursenm"));
  //model.setValue(cmb_tnssideeffect.attribute("ref"), model.getValue(xBlodExecRecGrupListPath+"["+iRow+"]/tnssideeffect"));
  model.setValue(chk_tnssideeffect.attribute("ref"), model.getValue(xBlodExecRecGrupListPath+"["+iRow+"]/tnssideeffect"));
  model.setValue(ipt_tnssideeffectetc.attribute("ref"), model.getValue(xBlodExecRecGrupListPath+"["+iRow+"]/tnssideeffectetc"));
  
  model.setValue(ipt_prcpdelivefact.attribute("ref"), model.getValue(xBlodExecRecGrupListPath+"["+iRow+"]/prcpdelivefact"));
  model.setValue(rdo_discontinuyn.attribute("ref"), model.getValue(xBlodExecRecGrupListPath+"["+iRow+"]/discontinuyn"));
  //rdo_discontinuyn.disabled = true;
  //cmb_discontinu.disabled = true;
  model.setValue(cmb_discontinu.attribute("ref"), model.getValue(xBlodExecRecGrupListPath+"["+iRow+"]/discontinu"));
  model.setValue(ipt_etc.attribute("ref"), model.getValue(xBlodExecRecGrupListPath+"["+iRow+"]/discontinuetc"));

  model.setValue(ipt_onepintqty.attribute("ref"), model.getValue(xBlodExecRecGrupListPath+"["+iRow+"]/onepintqty"));
  fSumQtyCalc(model.getValue(xBlodExecRecGrupListPath+"["+iRow+"]/drugqty"));// 총투여량 계산 onepintqty * 혈액갯수 20100415 khj

  model.setValue("/root/main/cond/tnsnurserecgrup/tnsnurserecgruplist/tnscarerecseq", model.getValue(xBlodExecRecGrupListPath+"["+iRow+"]/tnscarerecseq"));
  
  //model.setValue(ipt_drugqty.attribute("ref"), model.getValue(xBlodExecRecGrupListPath+"["+iRow+"]/drugqty"));
  model.setValue(textarea1.attribute("ref"), model.getValue(xBlodExecRecGrupListPath+"["+iRow+"]/tnsrec"));
  model.setValue(opt_instcd.attribute("ref"), model.getValue(xBlodExecRecGrupListPath+"["+iRow+"]/instcd"));
  model.setValue(chk_smlqtytnsyn.attribute("ref"), model.getValue(xBlodExecRecGrupListPath+"["+iRow+"]/smlqtytnsyn"));
  model.setValue(chk_tprlnkyn.attribute("ref"), model.getValue(xBlodExecRecGrupListPath+"["+iRow+"]/tprlnkyn"));
  
  // 15.04.28 - AYS
  model.setValue(bol_transferyn.attribute("ref"), model.getValue(xBlodExecRecGrupListPath+"["+iRow+"]/transferyn"));
  // '15.09.08 - AYS 추가
  model.setValue(bol_nonactpher.attribute("ref"), model.getValue(xBlodExecRecGrupListPath+"["+iRow+"]/nonactpher"));
  
  // 15.11.27 성분채집실, 전원 기록은 임시저장버튼활성화 기록삭제버튼 활성화
  if ( model.getValue(xBlodExecRecGrupListPath+"["+iRow+"]/transferyn") == 'Y' || model.getValue(xBlodExecRecGrupListPath+"["+iRow+"]/nonactpher") == 'Y' ){
      btn_tempsave.disabled = true;
  }else{
      btn_tempsave.disabled = false;  
  }
	// 15.11.27 성분채집실, 전원 기록은 임시저장버튼활성화 기록삭제버튼 활성화
  
  model.setValue(opt_tnsstrnursall.attribute("ref"), 
  model.getValue(xBlodExecRecGrupListPath+"["+iRow+"]/tnsstrnurseid")+","+
  model.getValue(xBlodExecRecGrupListPath+"["+iRow+"]/tnsstrnursenm")+","+","+","+
  model.getValue(xBlodExecRecGrupListPath+"["+iRow+"]/tnsstrnursedeptnm")+","+
  model.getValue(xBlodExecRecGrupListPath+"["+iRow+"]/tnsstrnursedeptcd"));

  model.setValue(opt_tnsendnursall.attribute("ref"), 
  model.getValue(xBlodExecRecGrupListPath+"["+iRow+"]/tnsendnurseid")+","+
  model.getValue(xBlodExecRecGrupListPath+"["+iRow+"]/tnsendnursenm")+","+","+","+
  model.getValue(xBlodExecRecGrupListPath+"["+iRow+"]/tnsendnursedeptnm")+","+
  model.getValue(xBlodExecRecGrupListPath+"["+iRow+"]/tnsendnursedeptcd"));

  if(sFlagChkYN == "N"){
    if(rdo_discontinuyn.value=='Y'){
      rdo_discontinuyn.disabled = true;
      //chk_smlqtytnsyn.disabled = true ; 
      if(chk_smlqtytnsyn.value == 'Y'){
        chk_smlqtytnsyn.disabled = false ;    
        cmb_discontinu.disabled = true ;
      }else{
        chk_smlqtytnsyn.disabled = false ;    
        cmb_discontinu.disabled = false ;
        if (cmb_discontinu.value.substring(3,5) == "99") {
          ipt_etc.disabled = false ;
        }
      }
    }else{
      rdo_discontinuyn.disabled = false;
      cmb_discontinu.disabled = true;
      chk_smlqtytnsyn.disabled = true ; 
      ipt_etc.disabled = true ;
    }
  }
  
  // '15.09.08 추가 - AYS
  if(model.getValue("/root/main/cond/tnsnurserecgrup/tnsnurserecgruplist/nonactpher") == "Y"){
  	caption17.value = "환자 보낸일자";
		caption19.value = "담당 간호사";
	} else{
		caption17.value = "수혈시작일시";
		caption19.value = "수혈시작 간호사";
	}
  	
  
  //수혈부작용 기타사항 입력창 disabled 설정
  /*
  var sItem = model.getValue("/root/main/cond/tnsnurserecgrup/tnsnurserecgruplist/tnssideeffect");
  var sItemList = sItem.split(" ");
  var chkYN = "N";
  
  for(var i = 0 ; i < sItemList.length ; i ++){
    if(sItemList[i] == "07"){
      chkYN = "Y";
    }
  }
  
  if(chkYN == "Y"){
    ipt_tnssideeffectetc.disabled = false;  
  }else{
    ipt_tnssideeffectetc.value = "";  
    ipt_tnssideeffectetc.disabled = true; 
  }     

  //model.refresh();
  
  */
  fSelctTnssideEffect("Y");		//20100126_SMY
  

  var sRowCnt2 = grd_blodnoexecrecgruplist.rows-grd_blodnoexecrecgruplist.fixedrows;
  
  for(var i=1; i<= sRowCnt2; i++){ // 선택한 값이 불출신청 상태인지 체크
    grd_blodnoexecrecgruplist.textmatrix(i, 1) = "FALSE" ;
  }
  return true;
}

/**
 * @group  :
 * @ver    : 2007.07.16
 * @by     : 정찬성 
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   :  수혈 수행 내역에서 더블클릭 했을때, vital sign 리스트
 * @param  :
 * @return :
 * @---------------------------------------------------
 */
function fVitalSignList(){
  var sRowCnt = grd_blodexecrecgruplist.rows-grd_blodexecrecgruplist.fixedrows;   
  var iRow = "";

  for(var i=1; i<= sRowCnt; i++){

    if( grd_blodexecrecgruplist.labelmatrix(i, 1) == "true" ) {
      if(iRow == ""){
        iRow = i ;
      }
    }
  }
  
  model.removenode("/root/send");
  model.makeValue("/root/send/tnscarerecseq",model.getValue(xBlodExecRecGrupListPath+"["+iRow+"]/tnscarerecseq"));  
  model.makeValue("/root/send/pid",model.getValue(xBlodExecRecGrupListPath+"["+iRow+"]/pid"));  
  model.makeValue("/root/send/instcd",model.getValue(xBlodExecRecGrupListPath+"["+iRow+"]/instcd"));  
  model.makeValue("/root/send/blodno",model.getValue(xBlodExecRecGrupListPath+"["+iRow+"]/blodno"));    
  model.makeValue("/root/send/ioparam", ioparam);
  model.refresh();  
  
  if(submit("TRMNR01025", false)){
    model.removenodeset("/root/main/cond/vitalsigngrup/vitalsigngruplist");
    model.copyNode("/root/main/cond/vitalsigngrup", "/root/temp/vitalsigngrup");
    
    if(model.getValue(xBlodExecRecGrupListPath+"["+iRow+"]/signno") != ""){
    	model.copyNode("/root/main/cond/vitalsigngrup", "/root/hidden/vitalsigngrup");
    }else{
	    for(var i = 1 ; i <= getNodesetCount("/root/hidden/vitalsigngrup/vitalsigngruplist") ; i ++){
	      insIndex = model.getValue("/root/hidden/vitalsigngrup/vitalsigngruplist["+i+"]/tnscarerecvsseq");
	
	      model.setValue("/root/main/cond/vitalsigngrup/vitalsigngruplist["+insIndex+"]/stat"           , model.getValue("/root/hidden/vitalsigngrup/vitalsigngruplist["+i+"]/stat"));
	      model.setValue("/root/main/cond/vitalsigngrup/vitalsigngruplist["+insIndex+"]/recdd"          , model.getValue("/root/hidden/vitalsigngrup/vitalsigngruplist["+i+"]/recdd"));
	      model.setValue("/root/main/cond/vitalsigngrup/vitalsigngruplist["+insIndex+"]/rectm"          , model.getValue("/root/hidden/vitalsigngrup/vitalsigngruplist["+i+"]/rectm"));
	      model.setValue("/root/main/cond/vitalsigngrup/vitalsigngruplist["+insIndex+"]/flag"           , model.getValue("/root/hidden/vitalsigngrup/vitalsigngruplist["+i+"]/flag"));
	      model.setValue("/root/main/cond/vitalsigngrup/vitalsigngruplist["+insIndex+"]/bp"             , model.getValue("/root/hidden/vitalsigngrup/vitalsigngruplist["+i+"]/bp"));
	      model.setValue("/root/main/cond/vitalsigngrup/vitalsigngruplist["+insIndex+"]/pulse"          , model.getValue("/root/hidden/vitalsigngrup/vitalsigngruplist["+i+"]/pulse"));
	      model.setValue("/root/main/cond/vitalsigngrup/vitalsigngruplist["+insIndex+"]/breth"          , model.getValue("/root/hidden/vitalsigngrup/vitalsigngruplist["+i+"]/breth"));
	      model.setValue("/root/main/cond/vitalsigngrup/vitalsigngruplist["+insIndex+"]/bdtp"           , model.getValue("/root/hidden/vitalsigngrup/vitalsigngruplist["+i+"]/bdtp"));
	      model.setValue("/root/main/cond/vitalsigngrup/vitalsigngruplist["+insIndex+"]/tnscarerecseq"  , model.getValue("/root/hidden/vitalsigngrup/vitalsigngruplist["+i+"]/tnscarerecseq"));
	      model.setValue("/root/main/cond/vitalsigngrup/vitalsigngruplist["+insIndex+"]/tnscarerecvsseq", model.getValue("/root/hidden/vitalsigngrup/vitalsigngruplist["+i+"]/tnscarerecvsseq"));
	      model.setValue("/root/main/cond/vitalsigngrup/vitalsigngruplist["+insIndex+"]/instcd"         , model.getValue("/root/hidden/vitalsigngrup/vitalsigngruplist["+i+"]/instcd"));
	      model.setValue("/root/main/cond/vitalsigngrup/vitalsigngruplist["+insIndex+"]/blodno"         , model.getValue("/root/hidden/vitalsigngrup/vitalsigngruplist["+i+"]/blodno"));
	      model.setValue("/root/main/cond/vitalsigngrup/vitalsigngruplist["+insIndex+"]/pid"            , model.getValue("/root/hidden/vitalsigngrup/vitalsigngruplist["+i+"]/pid"));
	      model.setValue("/root/main/cond/vitalsigngrup/vitalsigngruplist["+insIndex+"]/prcpcd"         , model.getValue("/root/hidden/vitalsigngrup/vitalsigngruplist["+i+"]/prcpcd"));
	      model.setValue("/root/main/cond/vitalsigngrup/vitalsigngruplist["+insIndex+"]/sbp"            , model.getValue("/root/hidden/vitalsigngrup/vitalsigngruplist["+i+"]/sbp"));
	      model.setValue("/root/main/cond/vitalsigngrup/vitalsigngruplist["+insIndex+"]/dbp"            , model.getValue("/root/hidden/vitalsigngrup/vitalsigngruplist["+i+"]/dbp"));
	    }
	  }
  }
  grd_vitalsigngruplist.refresh();
}

/**
 * @group  :
 * @ver    : 2008.01.10
 * @by     : 양천덕 
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   :  보관검체바코드 출력 
 * @param  :
 * @return :
 * @---------------------------------------------------
 */
function fKeepBcnoPrint(){

  var pid = model.getvalue("/root/main/cond/patientgrupInfo/patientgruplistInfo/pid");
  
  if(pid=="") {
    messageBox("등록번호를", "C001");
    model.setfocus("ipt_pid");
    return; 
  }
  
  model.removeNodeset("/root/send/data1");
  model.makeValue("/root/send/data1" , pid);
  
  submit("TRLLC80101");
  
  if(getNodesetCount("/root/main/KeepBcnoPrint/printinfo") > 0){
    //fKeLabel();
    var prtkind = model.getvalue("/root/main/barcdprntsetup/prntsetupinfo/setupinfo/prntkind"); // 프틴터종류 추가_20090522(ByJA)
    var portnm = model.getvalue("/root/main/barcdprntsetup/prntsetupinfo/setupinfo/commkind"); 
    if( (prtkind == "9" && portnm == "01") || (prtkind == "11" && portnm == "01") || prtkind == "10" || prtkind == "2" || prtkind == "6" || prtkind == "7"){  // SATO일 경우 추가_20090522(ByJA)
    	fKeLabel2("/root/main/KeepBcnoPrint/printinfo", 1);  // liscommonweb/js/LLZ001.js
    }else{
    	fKeLabel ("/root/main/KeepBcnoPrint/printinfo", 1);  // liscommonweb/js/LLZ001.js
    }
  }
  
  //20101228_KNUH_Start
  /*
  var scrid = getScreenID();
		var pid = "";
		var toppid = "";

		//채혈버튼 클릭하여 보관검체 출력시엔 선택된 환자 목록에서 환자 아이디 가져옴. 2008.12.04 김성희 수정. 
		if(flag == "B"){
			pid = model.getValue(ipt_pid.attribute("ref"));	
		}else{
			toppid = getPatientInfo("pid");
			//top 정보가 없으면 조회조건에 입력한 환자번호
			if(toppid == ""){
				pid = model.getValue("/root/hidden/JoHoiFlag/regnopatnm");
			//top 정보가 있으면 탑정보의 환자번호
			}else{
				pid = toppid;
			}
		}
		
		if(pid=="") return;
		
		model.removeNodeset("/root/send/data1");
		
		model.makeValue("/root/send/data1" , pid);
		
		submit("TRLLC80101");
		
		if(getNodesetCount("/root/main/KeepBcnoPrint/printinfo") > 0){
			var prtkind = model.getvalue("/root/main/barcdprntsetup/prntsetupinfo/setupinfo/prntkind");
			var portnm = model.getvalue("/root/main/barcdprntsetup/prntsetupinfo/setupinfo/commkind");
						
				if( (prtkind == "9" && portnm == "01") || (prtkind == "11" && portnm == "01") || prtkind == "10" || prtkind == "2" || prtkind == "6" || prtkind == "7"){
					if((flag == "B") && (scrid == "SMLLC00100")) { //외래채혈일때
						LCount = getNodesetCount("/root/main/TestInfo/barcodeinfo"); //진검바코드 갯수
						
						fKeLabel2("/root/main/KeepBcnoPrint/printinfo", LCount);//portopen을 넘기기 위해
					} else if ((flag == "B") && (scrid != "SMLLC00100")){ //병동채혈 및 환자별채혈일때
						fKeLabel2("/root/main/KeepBcnoPrint/printinfo", "P"); //portopen을 넘기기 위해
					} else {//채혈이 아닐때..
						//보관검체 출력
						fKeLabel2("/root/main/KeepBcnoPrint/printinfo");
					}
				}else if(prtkind == "8"){ // 여의도 B472 
					if((flag == "B") && (scrid == "SMLLC00100")) { //외래채혈일때
						LCount = getNodesetCount("/root/main/TestInfo/barcodeinfo"); //진검바코드 갯수
						
						fKeLabel_B472("/root/main/KeepBcnoPrint/printinfo", LCount);//portopen을 넘기기 위해
					} else if ((flag == "B") && (scrid != "SMLLC00100")){ //병동채혈 및 환자별채혈일때
						fKeLabel_B472("/root/main/KeepBcnoPrint/printinfo", "P"); //portopen을 넘기기 위해
					} else {//채혈이 아닐때..
						//보관검체 출력
						fKeLabel_B472("/root/main/KeepBcnoPrint/printinfo");
					}
				}else{
					if((flag == "B") && (scrid == "SMLLC00100")) { //외래채혈일때
						LCount = getNodesetCount("/root/main/TestInfo/barcodeinfo"); //진검바코드 갯수
						
						fKeLabel("/root/main/KeepBcnoPrint/printinfo", LCount);//portopen을 넘기기 위해
					} else if ((flag == "B") && (scrid != "SMLLC00100")){ //병동채혈 및 환자별채혈일때
						fKeLabel("/root/main/KeepBcnoPrint/printinfo", "P"); //portopen을 넘기기 위해
					} else {//채혈이 아닐때..
						//보관검체 출력
						fKeLabel("/root/main/KeepBcnoPrint/printinfo");
					}
				}
		}
  */
}


/*
function fKeLabel(){
  var ref = "/root/main/KeepBcnoPrint/printinfo";
  
  var barcdRef = "/root/main/barcdprntsetup/prntsetupinfo/setupinfo";
  var sPrntKind = model.getValue(barcdRef + "[1]/prntkind");
  
  var sSndMsg = "";
  
  if (sPrntKind == 0) return;
  
  var sCommKind = model.getValue(barcdRef + "[1]/commkind");
  if(sCommKind == "01") {
    var sSetUpVal = model.getValue(barcdRef + "[1]/comm01/setupval");
  } else if(sCommKind == "02") {
    var sComm = model.getValue(barcdRef + "[1]/comm02/comm");
    var sDataBit = model.getValue(barcdRef + "[1]/comm02/databit");
    var sStopBit = model.getValue(barcdRef + "[1]/comm02/stopbit");
    var sBaudRate = model.getValue(barcdRef + "[1]/comm02/baudrate");
    var sParity = model.getValue(barcdRef + "[1]/comm02/parity");;
    CommAX.CommPort = sComm;
    CommAX.Settings = sBaudRate + "," + sParity + "," + sDataBit + "," + sStopBit;
      CommAX.PortOpen();
  } else if(sCommKind == "03") {
    var sSetUpVal = model.getValue(barcdRef + "[1]/comm03/setupval");
  }
  
  var sStr = "보관검체";
  var sRoomcd =  model.getvalue(ref +"/roomcd");
  var sPid =  model.getvalue(ref +"/pid");
  var sPatnm =  model.getvalue(ref +"/patnm");
  var sPatsexage =  model.getvalue(ref +"/patsex") + "/" + model.getvalue(ref +"/patage");
  var sOrddeptNm=  model.getvalue(ref +"/orddeptnm").substring(0,2);
  var sBtype =  model.getvalue(ref +"/btype");
  var sBcollNm =   "채혈자:" ;//+  model.getvalue(ref +"/bcollnm");
  var sDt =  model.getvalue(ref +"/dt");
  var sPidW = 85;
  var sBarcodeW = 130;
  var sBtypeW = 50;
  
  
  if(sPid.length == 10){
    //sPidW = 75;
    sBarcodeW = 90;
    sBtypeW = 20
  }
  if(sPrntKind == "1") {
    
    sSndMsg += lzzfBP_StartFormat(0, 20); // 시작위치 셋팅
    
    sSndMsg += CommAX.PrtImgOut("GRAPH001", sStr); 
    sSndMsg += lzzfBP_FiendOrigin(20, 2);
    sSndMsg += "^XGGRAPH001,1,1^FS";
    
    
    sSndMsg += lzzfBP_ChangeFont("C", 10, 10); // 폰트 설정
    sSndMsg += lzzfBP_FieldDataA(200, 20, sRoomcd); 
            
    
    sSndMsg += lzzfBP_ChangeFont("C", 10, 14); // 폰트 설정
    sSndMsg += lzzfBP_FieldDataA(30, 55, sPid);
    
    sSndMsg += CommAX.PrtImgOut("GRAPH004", sPatnm); 
    sSndMsg += lzzfBP_FiendOrigin(210, 50);
    sSndMsg += "^XGGRAPH004,2,1^FS";
    
    sSndMsg += lzzfBP_ChangeFont("C", 10, 10); // 폰트 설정
    sSndMsg += lzzfBP_FieldDataA(265, 25, sPatsexage);
    
    sSndMsg += CommAX.PrtImgOut("GRAPH006", sOrddeptNm); 
    sSndMsg += lzzfBP_FiendOrigin(340, 20);
    sSndMsg += "^XGGRAPH006,1,1^FS";
    
    sSndMsg += CommAX.PrtImgOut("GRAPH007", sBcollNm); 
    sSndMsg += lzzfBP_FiendOrigin(230, 230);
    sSndMsg += "^XGGRAPH007,1,1^FS";
    
    sSndMsg += lzzfBP_ChangeFont("C", 85, 20); // 폰트 설정
    sSndMsg += lzzfBP_FieldDataA(sBtypeW, 110, sBtype);
            
    sSndMsg += lzzfBP_ChangeFont("F", 1, 1);
    sSndMsg += lzzfBP_BarCode_Code39(sBarcodeW, 100, "N", 100, sPid); // 바코드
    
    sSndMsg += lzzfBP_ChangeFont("C", 5, 5); // 폰트 설정
    sSndMsg += lzzfBP_FieldDataA(205, 205, "*"+sPid+"*");
    
    
    sSndMsg += lzzfBP_ChangeFont("C", 10, 10); // 폰트 설정
    sSndMsg += lzzfBP_FieldDataA(20, 240, sDt);
    
    sSndMsg += lzzfBP_EndFormat();
    
    if(sCommKind == "01") {
        CommAX.SendMessageToLPT(sSndMsg);
      } else if(sCommKind == "02") {
        CommAX.SendMessage(sSndMsg);
      }

    //CommAX.SendMessageToLPT(sSndMsg);
    
  }
}
*/

/*
function fKeLabel(){
  var ref = "/root/main/KeepBcnoPrint/printinfo";
  
  var barcdRef = "/root/main/barcdprntsetup/prntsetupinfo/setupinfo";
  var sPrntKind = model.getValue(barcdRef + "[1]/prntkind");
  
  var sSndMsg = "";
  
  if (sPrntKind == 0) return;
  
  var sCommKind = model.getValue(barcdRef + "[1]/commkind");
  
  if(sCommKind == "01") {
    var sSetUpVal = model.getValue(barcdRef + "[1]/comm01/setupval");
    
  } else if(sCommKind == "02") {
    var sComm = model.getValue(barcdRef + "[1]/comm02/comm");
    var sDataBit = model.getValue(barcdRef + "[1]/comm02/databit");
    var sStopBit = model.getValue(barcdRef + "[1]/comm02/stopbit");
    var sBaudRate = model.getValue(barcdRef + "[1]/comm02/baudrate");
    var sParity = model.getValue(barcdRef + "[1]/comm02/parity");;
    CommAX.CommPort = sComm;
    CommAX.Settings = sBaudRate + "," + sParity + "," + sDataBit + "," + sStopBit;
  } else if(sCommKind == "03") {
    var sSetUpVal = model.getValue(barcdRef + "[1]/comm03/setupval");
  }
  
  var sStr = "보관검체";
  var sRoomcd =  model.getvalue(ref +"/roomcd");
  var sPid =  model.getvalue(ref +"/pid");
  var sPatnm =  model.getvalue(ref +"/patnm");
  var sPatsexage =  model.getvalue(ref +"/patsex") + "/" + model.getvalue(ref +"/patage");
  var sOrddeptNm=  model.getvalue(ref +"/orddeptnm").substring(0,2);
  var sBtype =  model.getvalue(ref +"/btype");
  var sBcollNm =   "채혈자:" ;//+  model.getvalue(ref +"/bcollnm");
  var sDt =  model.getvalue(ref +"/dt");
  var sPidW = 85;
  var sBarcodeW = 130;
  var sBtypeW = 30; 
  
  if(sPid.length == 10){
    sBarcodeW = 90;
    sBtypeW = 20
  }
  if(sPrntKind == "1") {
    
    sSndMsg += lzzfBP_StartFormat(0, 1); // 시작위치 셋팅
        
    sSndMsg += CommAX.PrtImgOut(20, 2, sStr, 1, 1);     //가로시작위치, 세로시작위치, 출력할문자열, 1,1 (비율)
    sSndMsg += CommAX.HanImageData();   
  
    sSndMsg += lzzfBP_ChangeFont("C", 10, 10); // 폰트 설정
    sSndMsg += lzzfBP_FieldDataA(200, 20, sRoomcd); 
    
    sSndMsg += lzzfBP_ChangeFont("C", 10, 14); // 폰트 설정
    sSndMsg += lzzfBP_FieldDataA(30, 55, sPid);
        
    sSndMsg += CommAX.PrtImgOut(210, 50, sPatnm, 2, 1);     //가로시작위치, 세로시작위치, 출력할문자열, 1,1 (비율)
    sSndMsg += CommAX.HanImageData();       
    
    sSndMsg += lzzfBP_ChangeFont("C", 10, 10); // 폰트 설정
    sSndMsg += lzzfBP_FieldDataA(265, 25, sPatsexage);
    
    sSndMsg += CommAX.PrtImgOut(340, 20, sOrddeptNm, 1, 1);     //가로시작위치, 세로시작위치, 출력할문자열, 1,1 (비율)
    sSndMsg += CommAX.HanImageData();     
    
    
    sSndMsg += CommAX.PrtImgOut(230, 230, sBcollNm, 1, 1);     //가로시작위치, 세로시작위치, 출력할문자열, 1,1 (비율)
    sSndMsg += CommAX.HanImageData();       

    sSndMsg += lzzfBP_ChangeFont("C", 85, 20); // 폰트 설정
    sSndMsg += lzzfBP_FieldDataA(sBtypeW, 110, sBtype);
            
    sSndMsg += lzzfBP_ChangeFont("F", 1, 1);
    sSndMsg += lzzfBP_BarCode_Code39(sBarcodeW, 100, "N", 100, sPid); // 바코드
    
    sSndMsg += lzzfBP_ChangeFont("C", 5, 5); // 폰트 설정
    sSndMsg += lzzfBP_FieldDataA(205, 205, "*"+sPid+"*");
    
    
    sSndMsg += lzzfBP_ChangeFont("C", 10, 10); // 폰트 설정
    sSndMsg += lzzfBP_FieldDataA(20, 240, sDt);
    
    sSndMsg += lzzfBP_EndFormat();
    
    if(sCommKind == "01") {
        CommAX.SendMessageToLPT(sSndMsg);
      } else if(sCommKind == "02") {
            var portOpenTF = "";  //오픈 성공 여부

      portOpenTF = CommAX.PortOpen("true");     
      if(portOpenTF == "TRUE"){       
          CommAX.SendMessage(sSndMsg);
          CommAX.PortOpen("false");
        } else {
        messageBox("아래 사항을 확인후 재출력해주십시오."
                     + " \n 1.프린트설정 화면에서 통신유형을 com 으로 선택한 경우 port 번호 확인"
                     + " \n 2.케이블 확인"
                     + " \n 3.먼저 출력중인 바코드 확인(모두 출력된 후 재출력하십시오.)", "I", "");
          return;       
        }
        
      }   
  }
}
*/

/**
 * @group  :
 * @ver    : 2008.01.16
 * @by     : 양천덕 
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : 수혈종료일자, 수혈종료일시 유효성 체크
 * @param  :
 * @return :
 * @---------------------------------------------------
 */
function fCheckTnsEndDt(pFlag, pData){
  var crtDate = getCurrentDate();
  var crtTime = getCurrentTime().substr(0,4);
  var sChkStrData = "";
  var sChkEndData = "";
  var fRow = "";
  
  for(var i = 1 ; i <= getNodesetCount("/root/main/cond/blodreturnreqgrup/blodnoexecrecgruplist") ; i++){
    if( grd_blodnoexecrecgruplist.labelmatrix(i, grd_blodnoexecrecgruplist.colRef("stat")) == "true"){
      fRow = grd_blodreturnreqgruplist.findRow( grd_blodnoexecrecgruplist.labelmatrix(i, grd_blodnoexecrecgruplist.colRef("blodno") ) , 1, grd_blodreturnreqgruplist.colRef("blodno"), false, false);
      if(sChkStrData == "" ){
        sChkStrData = grd_blodreturnreqgruplist.valuematrix(fRow, grd_blodreturnreqgruplist.colRef("fstdelive2"));
      }else{
        if(sChkStrData < grd_blodreturnreqgruplist.valuematrix(fRow, grd_blodreturnreqgruplist.colRef("fstdelive2")) ){
          sChkStrData = grd_blodreturnreqgruplist.valuematrix(fRow, grd_blodreturnreqgruplist.colRef("fstdelive2"));
        }
      }
    }
  }
  
  if(pFlag =="SD"){
    if(isValidDateTime(pData, "YYYYMMDD") == false){
      messageBox("입력한 일자는 유효하지","E007");  
      ipt_fromdd.value = crtDate;
    }else if(sChkStrData.substr(0,8) > pData ) {
      messageBox("시작일자는 불출일보다 이전일 수 없습니다.","E");  
      ipt_fromdd.value = crtDate;
    }else{
      ipt_fromdd.value = pData;
    }
    
    var trsfsdt =  getDateAddcTm(ipt_fromdd.value+ipt_fromtm.value, 15);
    var trsfsdt2 =  getDateAddcTm(ipt_fromdd.value+ipt_fromtm.value, 30);
    grd_vitalsigngruplist.valuematrix(1,grd_vitalsigngruplist.colRef("recdd")) = ipt_fromdd.value ;
    grd_vitalsigngruplist.valuematrix(1,grd_vitalsigngruplist.colRef("rectm")) = ipt_fromtm.value ;                             
    grd_vitalsigngruplist.valuematrix(2, grd_vitalsigngruplist.colRef("recdd")) = trsfsdt.substr(0,8) ;
    grd_vitalsigngruplist.valuematrix(2, grd_vitalsigngruplist.colRef("rectm")) = trsfsdt.substr(8, 12) ; 
    grd_vitalsigngruplist.valuematrix(3, grd_vitalsigngruplist.colRef("recdd")) = trsfsdt2.substr(0,8) ;
		grd_vitalsigngruplist.valuematrix(3, grd_vitalsigngruplist.colRef("rectm")) = trsfsdt2.substr(8, 12) ;		  
  }
  
  if(pFlag =="ST"){
    if(ipt_fromdd.value == ""){
      messageBox("시작 일자를 먼저 입력 하십시요","E"); 
      ipt_fromtm.value = "";
      model.setfocus("ipt_fromdd");     
    }else if(isValidDateTime(pData, "hhmm") == false){
      messageBox("입력한 시간은 유효하지","E007");  
      ipt_fromtm.value = crtTime;
    }else if(sChkStrData.substr(0,12) > ipt_fromdd.value + "" + ipt_fromtm.value){
      messageBox("시작일시는 불출일시보다 이전일 수 없습니다.","E");  
      ipt_fromdd.value = crtDate;
      ipt_fromtm.value = crtTime;
    }else{
      ipt_fromtm.value = pData;
    }
    
    var trsfsdt =  getDateAddcTm(ipt_fromdd.value+ipt_fromtm.value, 15);
    var trsfsdt2 =  getDateAddcTm(ipt_fromdd.value+ipt_fromtm.value, 30);
    grd_vitalsigngruplist.valuematrix(1, grd_vitalsigngruplist.colRef("recdd")) = ipt_fromdd.value ;
    grd_vitalsigngruplist.valuematrix(1, grd_vitalsigngruplist.colRef("rectm")) = ipt_fromtm.value ;                              
    grd_vitalsigngruplist.valuematrix(2, grd_vitalsigngruplist.colRef("recdd")) = trsfsdt.substr(0,8) ;
    grd_vitalsigngruplist.valuematrix(2, grd_vitalsigngruplist.colRef("rectm")) = trsfsdt.substr(8, 12) ;
    
    if(grd_vitalsigngruplist.valuematrix(1,grd_vitalsigngruplist.colRef("signno")) == ""){
	    grd_vitalsigngruplist.valuematrix(3, grd_vitalsigngruplist.colRef("recdd")) = trsfsdt2.substr(0,8) ;
			grd_vitalsigngruplist.valuematrix(3, grd_vitalsigngruplist.colRef("rectm")) = trsfsdt2.substr(8, 12) ;	
		}
  }
  
  if(pFlag =="ED"){
    if(pData != ""){
      if(isValidDateTime(pData, "YYYYMMDD") == false){
        messageBox("입력한 일자는 유효하지","E007");  
        ipt_todd.value = crtDate;
      }else if(ipt_fromdd.value > pData ){
        messageBox("종료일자는 시작일자보다 이전일 수 없습니다.","E");  
        ipt_todd.value = crtDate;
      }else{
        ipt_todd.value = pData;
      }
    }
		if(grd_vitalsigngruplist.valuematrix(1,grd_vitalsigngruplist.colRef("signno")) == ""){
			grd_vitalsigngruplist.valuematrix(4,grd_vitalsigngruplist.colRef("recdd")) = ipt_todd.value ;
			grd_vitalsigngruplist.valuematrix(4,grd_vitalsigngruplist.colRef("rectm")) = ipt_totm.value ;	
		}else{
			grd_vitalsigngruplist.valuematrix(3,grd_vitalsigngruplist.colRef("recdd")) = ipt_todd.value ;
			grd_vitalsigngruplist.valuematrix(3,grd_vitalsigngruplist.colRef("rectm")) = ipt_totm.value ;	
		}      
  }
  
  if(pFlag =="ET"){
    if(pData != ""){
      if(ipt_todd.value == ""){
        messageBox("종료 일자를 먼저 입력 하십시요","E"); 
        ipt_totm.value = "";
        model.setfocus("ipt_todd");
      }else if(isValidDateTime(pData, "hhmm") == false){
        messageBox("입력한 시간은 유효하지","E007");  
        ipt_totm.value = crtTime;
      }else if(ipt_fromdd.value + "" + ipt_fromtm.value > ipt_todd.value + "" + pData){
        messageBox("종료일시는 시작일시보다 이전일 수 없습니다.","E");  
        ipt_todd.value = crtDate;
        ipt_totm.value = crtTime;
      }else{
        ipt_totm.value = pData;
      }
    }
		if(grd_vitalsigngruplist.valuematrix(1,grd_vitalsigngruplist.colRef("signno")) == ""){
			grd_vitalsigngruplist.valuematrix(4,grd_vitalsigngruplist.colRef("recdd")) = ipt_todd.value ;
			grd_vitalsigngruplist.valuematrix(4,grd_vitalsigngruplist.colRef("rectm")) = ipt_totm.value ;	
		}else{
			grd_vitalsigngruplist.valuematrix(3,grd_vitalsigngruplist.colRef("recdd")) = ipt_todd.value ;
			grd_vitalsigngruplist.valuematrix(3,grd_vitalsigngruplist.colRef("rectm")) = ipt_totm.value ;	
		}          
  }
}

/**
 * @group  :
 * @ver    : 2008.01.16
 * @by     : 양천덕 
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : 외래, 입원 조회 대상 변경
 * @param  :
 * @return :
 * @---------------------------------------------------
 */
function fChangeIOflag(sparam, sflag){
    
  var pidblodflag = '';
  if(ipt_pid2.value != ""){
    pidblodflag = 'pid';
  }else if (ipt_blodno.value !="") {
    pidblodflag = 'blod';                   
  }
  
  //if(getPatientInfoDetail("pid") == ""){
  
 	//resetInstanceNode로 변경_20090423_SMY
    //model.removenodeset("/root/temp/cond/roomcdgrup");
    //model.removenodeset("/root/temp/cond/patientgrup");
    
    model.resetInstanceNode("/root/temp/cond/roomcdgrup");
    model.resetInstanceNode("/root/temp/cond/patientgrup");
    
    fClearChildNode("/root/main/cond/patientgrupInfo/patientgruplistInfo");
  
    //model.setValue(opt_patientnm.attribute("ref"), "" );
    //model.setValue(opt_sexage1.attribute("ref"), "" );
    //model.setValue(opt_allseq.attribute("ref"), "" );
    //model.setValue(opt_inj.attribute("ref"), "" );
    //model.setValue(opt_signno.attribute("ref"), "" );
    
    cmb_wardcdgruplist2.value = "";
    cmb_wardcdgruplist.value = "";
    model.setValue("/root/temp/cond/wardcdgrup/wardcdgruplist"                      , "");           
    model.setValue("/root/main/cond/patientgrupInfo/patientgruplistInfo/patientnm"  , "");           
    model.setValue("/root/main/cond/patientgrupInfo/patientgruplistInfo/sexage"     , "");    
  //}

  if(sparam =="1"){
    if(sflag == "O"){
      fParam("OPRC1");            
    }else{                        
      fParam("IPRC1");            
    }                             
    model.removenodeset("/root/main/cond/execdetlgrup/execdetlgruplist");
    model.removenodeset("/root/main/cond/delivedetlgrup/delivedetlgruplist");
    model.removenodeset("/root/main/cond/patcmtgrup/patcmtgruplist");
  }
  if(sparam =="2"){
    if(sflag == "O"){
      fParam("OPRC2");
    }else{
      fParam("IPRC2");    
    }
    model.removenodeset("/root/main/cond/blodreturnreqgrup/blodreturnreqgruplist");
    model.removenodeset("/root/main/cond/blodreturnreqgrup/blodnoexecrecgruplist");
    model.removenodeset("/root/main/cond/blodreturnreqgrup/blodexecrecgruplist");
  }
  
  fTnsRecInit();
  
  model.refresh();  
}   

/**
 * @group  :
 * @ver    : 2008.01.28
 * @by     : 양천덕 
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : 에러, 중단 시 혈액불출내역 값 셋팅 초기화
 * @param  :
 * @return :
 * @---------------------------------------------------
 */
function fReturnData(sParam){
  var blodnodupSource = new Array();
  if(cap_blodno.value.length > 10){
    blodnodupSource = cap_blodno.value.split(",") ;
  } else {
    blodnodupSource[0] = cap_blodno.value ;
  }
      
  if(sParam == "Y"){
    for(var i=0; i<= blodnodupSource.length -1 ; i++){
      for(var n=1; n <= grd_blodreturnreqgruplist.rows ; n++){
        if( blodnodupSource[i] ==  model.getValue(xBlodReturnReqGrupListPath+"["+n+"]/blodno") ) {//혈액번호와 같으면 그리드에 셋팅
          if(model.getValue(xBlodReturnReqGrupListPath+"["+n+"]/reqflagstat") == "Y"){
            grd_blodreturnreqgruplist.valuematrix(n,1) = 'false' ;
          }else{
            grd_blodreturnreqgruplist.valuematrix(n,1) = 'false' ;
            grd_blodreturnreqgruplist.valuematrix(n, grd_blodreturnreqgruplist.colRef("reqflag")) =  "" ;
            grd_blodreturnreqgruplist.valuematrix(n, grd_blodreturnreqgruplist.colRef("returnabandondate")) =  "" ;
            grd_blodreturnreqgruplist.valuematrix(n, grd_blodreturnreqgruplist.colRef("etcprcpresncd")) =  "" ;
            grd_blodreturnreqgruplist.valuematrix(n, grd_blodreturnreqgruplist.colRef("clinccmtcnts")) =  "" ;
          }
        }
      }
    } 
  }else{
    for(var i=0; i<= blodnodupSource.length -1 ; i++){
      for(var x=grd_blodreturnreqgruplist.fixedRows; x <= grd_blodreturnreqgruplist.rows ; x++){
        if( blodnodupSource[i] ==  model.getValue(xBlodReturnReqGrupListPath+"["+x+"]/blodno") ) {//혈액번호와 같으면 그리드에 셋팅
          grd_blodreturnreqgruplist.valuematrix(x, 1) = 'false' ;
          grd_blodreturnreqgruplist.valuematrix(x, grd_blodreturnreqgruplist.colRef("reqflag")          ) =  model.getValue("/root/blodrtninfo/blodreturnreqgruplist[blodno ='"+blodnodupSource[i]+"']/reqflag") ;
          grd_blodreturnreqgruplist.valuematrix(x, grd_blodreturnreqgruplist.colRef("returnabandondate")) =  model.getValue("/root/blodrtninfo/blodreturnreqgruplist[blodno ='"+blodnodupSource[i]+"']/returnabandondate") ;
          grd_blodreturnreqgruplist.valuematrix(x, grd_blodreturnreqgruplist.colRef("etcprcpresncd")    ) =  model.getValue("/root/blodrtninfo/blodreturnreqgruplist[blodno ='"+blodnodupSource[i]+"']/etcprcpresncd") ;
          grd_blodreturnreqgruplist.valuematrix(x, grd_blodreturnreqgruplist.colRef("clinccmtcnts")     ) =  model.getValue("/root/blodrtninfo/blodreturnreqgruplist[blodno ='"+blodnodupSource[i]+"']/clinccmtcnts") ;         
        }
      }
    }
  }
}

/**
 * @group  :
 * @ver    : 2008.02.21
 * @by     : 양천덕 
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : 수혈간호기록 리스트 조회 부분
 * @param  :
 * @return :
 * @---------------------------------------------------
 */
function fSrchTnsList(sParam){
  var pidblodflag = '';
  if(ipt_pid2.value != ""){
    pidblodflag = 'pid';
  }else if (ipt_blodno.value !="") {
    pidblodflag = 'blod';                   
  }else{
    messageBox("등록번호를 ","C001");
    model.setfocus("ipt_pid2");
    return;
  }

  fTnsRecInit();
  
  if(sParam == "button"){
    fGetPatientInfo("pid","case2"); // 환자 개인정보를 가져온다(병동/병실/환자 셋팅)
  }
  
  if( model.getValue("/root/main/cond/patientgrupInfo/patientgruplistInfo/pid") == "" && model.getValue("/root/main/cond/blodno") == "" ){
    messageBox("환자 정보가 존재하지 않습니다.","E");
    model.removenodeset("/root/temp/cond/roomcdgrup");
    model.removenodeset("/root/temp/cond/patientgrup");
    fClearChildNode("/root/main/cond/patientgrupInfo/patientgruplistInfo");                   
    cmb_wardcdgruplist2.value = "";
    cmb_wardcdgruplist.value = "";
    model.setValue("/root/temp/cond/wardcdgrup/wardcdgruplist"                      , "");           
    model.setValue("/root/main/cond/patientgrupInfo/patientgruplistInfo/patientnm"  , "");           
    model.setValue("/root/main/cond/patientgrupInfo/patientgruplistInfo/sexage"     , "");  
    model.removenodeset("/root/main/cond/execdetlgrup/execdetlgruplist");
    model.removenodeset("/root/main/cond/delivedetlgrup/delivedetlgruplist");
    model.removenodeset("/root/main/cond/patcmtgrup/patcmtgruplist");
    model.removenodeset("/root/main/cond/blodreturnreqgrup/blodreturnreqgruplist");
    model.removenodeset("/root/main/cond/blodreturnreqgrup/blodnoexecrecgruplist");
    model.removenodeset("/root/main/cond/blodreturnreqgrup/blodexecrecgruplist");     
    model.refresh();
    model.setfocus("ipt_pid2");
    return; 
  }
  fBlodDeliveList(pidblodflag); //혈액불출 리스트 조회버튼
  //fGetBlodNoExecRecList(pidblodflag); //수혈 미수행 내역 리스트
  //fGetBlodExecRecList(pidblodflag); //수혈 수행 내역 리스트 
  //fBlodColChg(); //컬럼속성 변경
  model.refresh();
}

/**
 * @group  :
 * @ver    : 2008.02.21
 * @by     : 양천덕 
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : 수혈간호기록 리스트 조회 부분
 * @param  :
 * @return :
 * @---------------------------------------------------
 */
function fGetPatCmtList(){
  if( ipt_pid.value == "" ){
    model.removenode("/root/main/cond/delivedetlgrup");
    model.refresh();
    return;
  }

  model.removenode("/root/send");
  
  model.makeValue("/root/send/prcpddfrom", ipt_prcpddfrom.value);
  model.makeValue("/root/send/prcpddto", ipt_prcdddto.value);
  model.makeValue("/root/send/pid", ipt_pid.value);

  if(submit("TRMNR01028")){
  }   
}

/**
 * @group  :
 * @ver    : 2008.08.18
 * @by     : 양천덕 
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : 날짜 계산(기준일자를 기준으로 입력분만큼 이후 날짜를 찾아오기)
 * @param  :
 * @return :
 * @---------------------------------------------------
 */
function getDateAddcTm(inputday,addend){ 
  var backDate ="";
  var rt = 0;
  var yyyy = inputday.substring(0,4) +"";
  var mm   = inputday.substring(4,6) +"";
  var dd   = inputday.substring(6,8) +"";
  var hh   = inputday.substring(8,10) +"";
  var mi   = inputday.substring(10,12) +"";
  var startDate = new Date(yyyy,(eval(mm)-1),dd, hh, mi); 
  startDate.setTime(startDate.getTime()+(60000*addend)); 
  NowYear = startDate.getYear();// 년 
  NowMonth = startDate.getMonth()+1;// 월 
  NowDay = startDate.getDate(); // 일 
  NowHours = startDate.getHours() ; // 시
  NowMinutes = startDate.getMinutes() ; // 분 
  backDate += NowYear ; //년도
  if (NowMonth < 10 ) backDate += "0" + NowMonth ;
  else backDate += (startDate.getMonth() + 1); 
  if (NowDay < 10 ) backDate += "0" + NowDay ;
  else backDate += (startDate.getDate());   
  if (NowHours < 10 )  backDate += "0" + NowHours ;
  else backDate += (startDate.getHours());  
  if(NowMinutes < 10 ) backDate += "0" + NowMinutes ;
  else backDate += (startDate.getMinutes());  
  
  return backDate ;
}

/**
 * @group  :
 * @ver    : 2008.09.20
 * @by     : 양천덕
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : 문자입력 제한
 * @param  :
 * @return :
 * @---------------------------------------------------
 */ 
function isNumber(str) {
    str += ''; // 문자열로 변환
    str = str.replace(/^\s*|\s*$/g, ''); // 좌우 공백 제거
    if (str == '' || isNaN(str)) return false;
    return true;
}   

/**
 * @group  :
 * @ver    : 2008.10.17
 * @by     : 양천덕
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : 혈액 반납/폐기 의뢰 취소 기능
 * @param  :
 * @return :
 * @---------------------------------------------------
 */ 
function fBlodRtnCncl(pParam){
  var sChkRow = 0;
  var sChkBlodRtnFlag = "";
  var sDisUseYn = "N";//폐기
  var sDisUseResnCd = "";
  
  if(pParam == ""){
    messageBox("반납/폐기 의뢰 취소할 혈액번호를 입력하십시요", "E");
    model.setFocus("ipt_blodrtncncl");
    return;     
  }
  
  for(var i = grd_blodreturnreqgruplist.fixedRows ; i < grd_blodreturnreqgruplist.Rows ; i++){
    if(grd_blodreturnreqgruplist.valueMatrix(i, grd_blodreturnreqgruplist.colRef("blodno")) == pParam && 
       grd_blodreturnreqgruplist.valueMatrix(i, grd_blodreturnreqgruplist.colRef("reqflagstat")) == "N" ){
      if(sChkRow == 0){
         sChkRow = i;
         sChkBlodRtnFlag = grd_blodreturnreqgruplist.valueMatrix(i, grd_blodreturnreqgruplist.colRef("reqflag"));
      }else{
        var msg = messageBox("반납/폐기 의뢰중인 동일한 혈액번호가 존재합니다.\n\n"+grd_blodreturnreqgruplist.valueMatrix(i, grd_blodreturnreqgruplist.colRef("prcpnm"))+" 혈액을 반납/폐기 의뢰취소 하시겠습니까?", "Q");
        if(msg == 6){
          sChkRow = i;
          sChkBlodRtnFlag = grd_blodreturnreqgruplist.valueMatrix(i, grd_blodreturnreqgruplist.colRef("reqflag"));
        }
      }
    }
  }
  
  if(sChkRow == 0){
    messageBox("의뢰취소를 할 수 없는 혈액번호입니다.", "E");
    ipt_blodrtncncl.value = "";
    ipt_blodrtncncl.refresh();
    model.setFocus("ipt_blodrtncncl");
    //return; 
  }else{
    /*
     * <ul>
     * <li> ioflag              : 외래/입원구분 (I/O)
     * <li> reqflag             : 의뢰구분 (1:반납의뢰, 2:반납완료, 3:폐기의뢰, 4:폐기완료, 5:반납/폐기의뢰 취소)
     * <li> prcpdd              : 처방일자 (원 처방)
     * <li> prcpno              : 처방번호 (원 처방)
     * <li> prcphistno          : 처방이력번호 (원 처방)
     * <li> instcd              : 기관코드 (원 처방)
     * <li> etcprcpresncd       : 반납 및 폐기사유코드
     * <li> clinccmtcnts        : 반납 및 폐기기타사유
     * <li> deptcd              : 부서코드 (입력자 또는 로그인한 사용자의 부서코드)
     * <li> deptnm              : 부서명 (입력자 또는 로그인한 사용자의 부서명)
     * <li> userid              : 사용자ID (입력자 또는 로그인한 사용자ID)
     * <li> usernm              : 사용자명 (입력자 또는 로그인한 사용자명)
     */ 
    model.removeNodeset("/root/send");
    model.makeValue("/root/send/ioparam"           , model.getValue("/root/main/cond/ioflag"));
    model.makeValue("/root/send/prcpdd"            , grd_blodreturnreqgruplist.valueMatrix(sChkRow, grd_blodreturnreqgruplist.colRef("prcpdd")));
    model.makeValue("/root/send/prcpno"            , grd_blodreturnreqgruplist.valueMatrix(sChkRow, grd_blodreturnreqgruplist.colRef("prcpno")));
    model.makeValue("/root/send/prcphistno"        , grd_blodreturnreqgruplist.valueMatrix(sChkRow, grd_blodreturnreqgruplist.colRef("prcphistno")));
    model.makeValue("/root/send/instcd"            , grd_blodreturnreqgruplist.valueMatrix(sChkRow, grd_blodreturnreqgruplist.colRef("instcd")));
    model.makeValue("/root/send/etcprcpresncd"     , grd_blodreturnreqgruplist.valueMatrix(sChkRow, grd_blodreturnreqgruplist.colRef("etcprcpresncd")));
    model.makeValue("/root/send/clinccmtcnts"      , grd_blodreturnreqgruplist.valueMatrix(sChkRow, grd_blodreturnreqgruplist.colRef("clinccmtcnts")));
    model.makeValue("/root/send/reqflag"           , "5" );
    model.makeValue("/root/send/reqflagstat"       , grd_blodreturnreqgruplist.valueMatrix(sChkRow, grd_blodreturnreqgruplist.colRef("reqflagstat")));
    model.makeValue("/root/send/returnabandondate" , grd_blodreturnreqgruplist.valueMatrix(sChkRow, grd_blodreturnreqgruplist.colRef("returnabandondate")));
    model.makeValue("/root/send/pid"               , grd_blodreturnreqgruplist.valueMatrix(sChkRow, grd_blodreturnreqgruplist.colRef("pid")));
    model.makeValue("/root/send/blodno"            , grd_blodreturnreqgruplist.valueMatrix(sChkRow, grd_blodreturnreqgruplist.colRef("blodno")));   
    model.makeValue("/root/send/blodbarcd"         , grd_blodreturnreqgruplist.valueMatrix(sChkRow, grd_blodreturnreqgruplist.colRef("blodbarcd")));    
    model.makeValue("/root/send/execprcpuniqno"    , grd_blodreturnreqgruplist.valueMatrix(sChkRow, grd_blodreturnreqgruplist.colRef("execprcpuniqno")));   
    
    var pDelPrcpNo = grd_blodreturnreqgruplist.valueMatrix(sChkRow, grd_blodreturnreqgruplist.colRef("prcpno"));
    var pDelBlodNo = grd_blodreturnreqgruplist.valueMatrix(sChkRow, grd_blodreturnreqgruplist.colRef("blodno"));
    
    if (  grd_blodreturnreqgruplist.valueMatrix(sChkRow, grd_blodreturnreqgruplist.colRef("reqflag")) == "1" ){//반납
      sDisUseYn = "N"
    } else {
      sDisUseYn = "Y"
    }
    model.makeValue("/root/send/disuseyn"      , sDisUseYn );//폐기여부
    
    var msg1 ="";
    var msgtext = "혈액번호 : "+grd_blodreturnreqgruplist.valueMatrix(sChkRow, grd_blodreturnreqgruplist.colRef("blodno")) +" ["+grd_blodreturnreqgruplist.valueMatrix(sChkRow, grd_blodreturnreqgruplist.colRef("prcpnm")) +"]"; 
    
    if(sChkBlodRtnFlag == "2"){
      msg1 = messageBox(msgtext + " 혈액을 반납/폐기 의뢰 취소 하겠습니다.\n\n잔여폐기 의뢰 된 혈액의 수혈기록은 임시저장 상태로 변경됩니다.","Q003");
    }else{
      msg1 = messageBox(msgtext + " 혈액을 반납/폐기 의뢰 취소 하겠습니다.","Q003");
    }
    if(msg1 == 6){
        //var sFindRecRow = grd_blodreturnreqgruplist.findRow(pParam, 0, grd_blodreturnreqgruplist.colRef("blodno"));
        //model.makeValue("/root/send/recdelflag"    , "Y");
        model.makeValue("/root/send/tnscarerecseq" , model.getValue("/root/main/cond/blodreturnreqgrup/blodexecrecgruplist[ prcpno = '"+pDelPrcpNo+"' and blodno = '"+pDelBlodNo+"']/tnscarerecseq") );
        model.makeValue("/root/send/prcpcd"        , model.getValue("/root/main/cond/blodreturnreqgrup/blodexecrecgruplist[ prcpno = '"+pDelPrcpNo+"' and blodno = '"+pDelBlodNo+"']/prcpcd") );
        model.makeValue("/root/send/signno"        , model.getValue("/root/main/cond/blodreturnreqgrup/blodexecrecgruplist[ prcpno = '"+pDelPrcpNo+"' and blodno = '"+pDelBlodNo+"']/signno") );

    }else{
        model.removeNodeset("/root/send");
        model.setFocus("ipt_blodrtncncl");
        return;
    }
    
    model.removeNodeset("/root/temp/rtninfo");
    submit("TXMNR01036", false);
    if(getNodesetCount("/root/temp/rtninfo/rtnlist") > 0){
      if(model.getValue("/root/temp/rtninfo/rtnlist/rtnflag") == "1"){
        //messageBox("반납 / 폐기 의뢰 취소가 완료되었습니다.", "I");
        ipt_blodrtncncl.value = "";
      }else{
        messageBox("반납/폐기 의뢰 취소 처리를 할 수 없는 상태입니다.", "C");
      }
    }else{
      messageBox("의뢰 취소 처리를 실패하였습니다.", "E");
    }
  }
  fBlodDeliveList('pid');// 혈액불출내역 리스트 
  fTnsRecInit(); //수혈간호기록 초기화
  model.refresh();
  model.setFocus("ipt_blodrtncncl");            
}

/**
 * @group  :
 * @ver    : 2008.10.20
 * @by     : 양천덕
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : 기록 삭제 기능
 * @param  :
 * @return :
 * @---------------------------------------------------
 */ 
function fDelTempRec(){
  //폐기 확정된 혈액의 경우 삭제버튼은 비활성화되므로 아래 조건에서 삭제버튼 클릭하는경우는 폐기의뢰의 경우 
  if( model.getValue(xTnsNurseRecPath+"/discontinuyn") =="Y" ) {
    messageBox("잔여폐기 의뢰된 혈액입니다. 반납폐기의뢰 취소 후 기록삭제가 ","I006");
    return;
  }

  if ( messageBox("선택한 기록내역을 ","Q001") != "6" ){//삭제하시겠습니까?
    return;
  }

  var delBlodRow = 0;
  var sDelBoldNo = cap_blodno.value.split(",") ;
  var sDelPrcpNo = model.getValue("/root/main/cond/tnsnurserecgrup/tnsnurserecgruplist/prcpno").split(",") ;
  var sDelSignNo = model.getValue("/root/main/cond/tnsnurserecgrup/tnsnurserecgruplist/signno").split(",") ;
  var rtnBlodList = "";
  model.removeNodeSet("/root/send");
  
  if( !isNull(model.getValue(xTnsNurseRecPath+"/tnscarerecseq")) && sDelBoldNo.length == 1  ){
    //인증저장이고 하나의 혈액번호가 선택되어 삭제 할경우 함께 기록된 혈액번호가 존재하는지 체크
    
    for( var idx = 1 ; idx <= grd_blodexecrecgruplist.rows ; idx++ ){
      if ( model.getValue("/root/main/cond/blodreturnreqgrup/blodexecrecgruplist["+ idx +"]/stat")         == "true"        && 
           model.getValue("/root/main/cond/blodreturnreqgrup/blodexecrecgruplist["+ idx +"]/blodno")       == sDelBoldNo[0]        && 
           model.getValue("/root/main/cond/blodreturnreqgrup/blodexecrecgruplist["+ idx +"]/prcpno")       == sDelPrcpNo[0]          ) {
            delBlodRow = idx;
            break;
      } 
    }
    
    rtnBlodList = fExistsExecRecTogether(delBlodRow,"D");
    
    sDelBoldNo = cap_blodno.value.split(",") ;
    sDelPrcpNo = model.getValue("/root/main/cond/tnsnurserecgrup/tnsnurserecgruplist/prcpno").split(",") ;
    sDelSignNo = model.getValue("/root/main/cond/tnsnurserecgrup/tnsnurserecgruplist/signno").split(",") ;
    
  }

  if ( !isNull(sDelSignNo[0]) ){
    
      Sign.certreload = true ; // 전자서명 호출시 인증저장 버튼을  누를때마다 인증서가 뜨도록 처리
      if(Sign.signprocess() == true){	 
  	  // 전자인증 관련 환자 인적 정보를 보내줌. 
  
          model.makeValue("/root/send/delreclist/status", "d");	//삭제 상태
          model.makeValue("/root/send/delreclist/formcd","0000002460" ); //각 기록지별 서식코드
          model.makeValue("/root/send/delreclist/signflag","02" ); //서명자료구분 (01 : 진료, 02 : 간호, 03 : LIS, 04 : 진료지원)
          model.makeValue("/root/send/delreclist/signbfcnts", "삭제"); 
          
          model.makeValue("/root/send/delreclist/recdd",getCurrentDate());// 실제 기록이 이루어진 기록일자
          model.makeValue("/root/send/delreclist/rectm",getCurrentTime());// 실제 기록이 이루어진 기록일자

      	  model.makeValue("/root/send/signdata/screenid", getScreenID());      
      }else{
          return;	
      }
      
  }
  
  for(var i = 0 ; i <= sDelBoldNo.length-1 ; i++){
    model.makeValue("/root/send/delreclist["+(i+1)+"]/pid"           , model.getValue(xBlodExecRecGrupListPath+"[blodno='"+ sDelBoldNo[i]+"' and prcpno ='"+sDelPrcpNo[i]+"']/pid") );
    model.makeValue("/root/send/delreclist["+(i+1)+"]/tnscarerecseq" , model.getValue(xBlodExecRecGrupListPath+"[blodno='"+ sDelBoldNo[i]+"' and prcpno ='"+sDelPrcpNo[i]+"']/tnscarerecseq") );
    model.makeValue("/root/send/delreclist["+(i+1)+"]/blodno"        , model.getValue(xBlodExecRecGrupListPath+"[blodno='"+ sDelBoldNo[i]+"' and prcpno ='"+sDelPrcpNo[i]+"']/blodno") );
    model.makeValue("/root/send/delreclist["+(i+1)+"]/prcpcd"        , model.getValue(xBlodExecRecGrupListPath+"[blodno='"+ sDelBoldNo[i]+"' and prcpno ='"+sDelPrcpNo[i]+"']/prcpcd") );
    model.makeValue("/root/send/delreclist["+(i+1)+"]/prcpno"        , model.getValue(xBlodExecRecGrupListPath+"[blodno='"+ sDelBoldNo[i]+"' and prcpno ='"+sDelPrcpNo[i]+"']/prcpno") );
    model.makeValue("/root/send/delreclist["+(i+1)+"]/prcpdd"        , model.getValue(xBlodExecRecGrupListPath+"[blodno='"+ sDelBoldNo[i]+"' and prcpno ='"+sDelPrcpNo[i]+"']/prcpdd") );
    model.makeValue("/root/send/delreclist["+(i+1)+"]/ioflag"        , model.getValue(xBlodExecRecGrupListPath+"[blodno='"+ sDelBoldNo[i]+"' and prcpno ='"+sDelPrcpNo[i]+"']/ioflag") );
    model.makeValue("/root/send/delreclist["+(i+1)+"]/signno"        , model.getValue(xBlodExecRecGrupListPath+"[blodno='"+ sDelBoldNo[i]+"' and prcpno ='"+sDelPrcpNo[i]+"']/signno") );

  }
  submit("TXMNR01037", false);
  
  var rtncount = getNodesetCount("/root/temp/rtnlist/rtninfo");

  if(rtncount != 0){
    var rtnmsg = "";
    for(var i = 1 ; i <= rtncount ; i++){
      rtnmsg += model.getValue("/root/temp/rtnlist/rtninfo["+i+"]/blodno") + "  " ;
    }
    rtnmsg += "혈액에 대한 수혈기록 삭제를 할 수 없습니다.";
    messageBox(rtnmsg, "E");
  } else {
    if ( rtnBlodList != "" && sDelPrcpNo.length == 1){
        messageBox("필요시 함께 기록한 수혈간호기록을 수정하십시오","I");
    }
  }
  
  fBlodDeliveList('pid');// 혈액불출내역 리스트 
  fTnsRecInit(); //수혈간호기록 초기화
  model.refresh();
  
}

/**
 * @group  :
 * @ver    : 2008.10.20
 * @by     : 양천덕
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : Multi 수혈 기록 혈액 Alias 체크
 * @param  :
 * @return :
 * @---------------------------------------------------
 */ 
function fChkPrcpAlias(){
  if(grd_blodnoexecrecgruplist.valueMatrix(grd_blodnoexecrecgruplist.row, grd_blodnoexecrecgruplist.colRef("stat")) == "true"){
    var sPrcpAlias = grd_blodnoexecrecgruplist.valueMatrix(grd_blodnoexecrecgruplist.row, grd_blodnoexecrecgruplist.colRef("prcpalias"));
    for(var i = grd_blodnoexecrecgruplist.fixedRows ; i < grd_blodnoexecrecgruplist.Rows - grd_blodnoexecrecgruplist.fixedRows ; i++){
      if(grd_blodnoexecrecgruplist.valueMatrix(i, grd_blodnoexecrecgruplist.colRef("prcpalias")) != sPrcpAlias &&
         grd_blodnoexecrecgruplist.valueMatrix(i, grd_blodnoexecrecgruplist.colRef("stat")) == "true" ){
         messageBox("선택한 혈액 처방은 기선택된 혈액 처방과 Multi 기록을", "E001");
         grd_blodnoexecrecgruplist.valueMatrix(grd_blodnoexecrecgruplist.row, grd_blodnoexecrecgruplist.colRef("stat")) = "FALSE";
         i = grd_blodnoexecrecgruplist.Rows;
         return;
      }
    }
    
    fOtherRecListUncheck("noexec");
  }
}


/**
 * @group  :
 * @ver    : 2010.01.26
 * @by     : 성미연
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : 수혈부작용 선택, 선택취소
 * @param  :
 * @return :
 * @---------------------------------------------------
 */ 
function fSelctTnssideEffect(ReadYN){
	//'없음' 체크 선택시 그 이외의 선택항목들을 disable하도록 수정_20100126_SMY
	var sItem = model.getValue("/root/main/cond/tnsnurserecgrup/tnsnurserecgruplist/tnssideeffect");
	ipt_tnssideeffectetc.disabled = true;
	
	if(fSearchChar(sItem, "01") == true){			//없음(01)이 선택된 경우
		//ReadYN : Y 기존에 입력되어 있는 데이터 중에 없음을 포함하여 중복체크되어 있는 데이터가 있으므로 없음만 체크된 경우 disable함
		if(ReadYN == "Y"){
			if(sItem == "01"){	
				selectAll(true);
				ipt_tnssideeffectetc.disabled = true;
			}	
		
		}else{
			selectAll(true);
			ipt_tnssideeffectetc.disabled = true;
		}
		
	} else if(fSearchChar(sItem, "07") == true){	//기타(07)이 선택된 경우
		ipt_tnssideeffectetc.disabled = false;
		
	} else if(fSearchChar(sItem, "07") == false){	//기타(07)이 선택해제된 경우
		ipt_tnssideeffectetc.disabled = true;
		ipt_tnssideeffectetc.value = "";
		
	} else if(sItem == ""){
		selectAll(false);
		ipt_tnssideeffectetc.disabled = true;
		ipt_tnssideeffectetc.value = "";
	}
	
	if(fSearchChar(sItem, "01") == false){			//없음(01)이 선택해제된 경우
		chk_tnssideeffect.disabled = false;
		
	}
	model.refresh();
								
}

 
/**
 * @group  :
 * @ver    : 2010.01.26
 * @by     : 성미연
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : 수혈부작용 체크시 disable/able
 * @param  :
 * @return :
 * @---------------------------------------------------
 */ 
function selectAll(flag){	
	for(var i= 1; i < chk_tnssideeffect.length; i++){	
		chk_tnssideeffect.deselect(i);
		chk_tnssideeffect.item(i).disabled = flag;
	}
	model.resetInstanceNode("/root/main/cond/tnsnurserecgrup/tnsnurserecgruplist/tnssideeffectetc");
}


/**
 * @desc   : String에서 특정 문자 검사
 * @
 * @param  : trgtStr - 타켓이 되는 String문자열
 *         : fndCh   - 찾을 Char문자
 *
 * @return : true/false
 * @author : 성미연 
 * @---------------------------------------------------
 */
function fSearchChar(sItem, chFndChar){
	var sItemList = sItem.split(" ");
	
	for(var i = 0 ; i < sItemList.length ; i ++){
		if(sItemList[i] == chFndChar){
			return true;
		}
	}
	return false;
}

/**
 * @desc   : 1pint량으로 총투여량 계산
 * @
 * @param  : drugqty 총투여량
 *         : 
 *
 * @return : 
 * @author :  khj
 * @---------------------------------------------------
 */
function fSumQtyCalc(drugqty){
    var blodcnt = (cap_blodno.value.split(",")).length;
    if ( isNull(model.getValue(xTnsNurseRecPath+"/onepintqty")) ){
        if ( !isNull(drugqty) ){
            model.setValue(xTnsNurseRecPath+"/drugqty" , drugqty);
        }else {
            model.setValue(xTnsNurseRecPath+"/drugqty" , "");
        }
        model.setValue(xTnsNurseRecPath+"/onepintqty" , "");
    } else {
        model.setValue(xTnsNurseRecPath+"/drugqty" , eval(model.getValue(xTnsNurseRecPath+"/onepintqty")) * blodcnt );
    }
	
	ipt_drugqty.refresh();

}

/**
 * @desc   : 체크박스 선택시 다른 기록내역의 체크박스는 uncheck처리
 * @
 * @param  : checkTarget: 체크박스 클릭한 목록 exec:수행   noexec:미수행
 *         : 
 *
 * @return : 
 * @author :  khj
 * @---------------------------------------------------
 */
function fOtherRecListUncheck(checkTarget){

    var xUncheckTargetPath = "";
    var xUncheckTargetGrid = grd_blodexecrecgruplist;
    
    if ( checkTarget =="exec" ){
        xUncheckTargetPath = "/root/main/cond/blodreturnreqgrup/blodnoexecrecgruplist" ;
        xUncheckTargetGrid = grd_blodnoexecrecgruplist;
    } else {
        xUncheckTargetPath = "/root/main/cond/blodreturnreqgrup/blodexecrecgruplist" ;
        xUncheckTargetGrid = grd_blodexecrecgruplist;
    }

    for(var n=1; n <= xUncheckTargetGrid.rows ; n++){
        if ( model.getValue(xUncheckTargetPath + "["+ n +"]/stat") == "true" ){
            model.setValue(xUncheckTargetPath + "["+ n +"]/stat", 'false' );
            
        }
    }

    xUncheckTargetGrid.refresh();
    
}

/**
 * @desc   : 수행기록내역에서 선택된 혈액번호와 함께 기록된 내역이 존재하는지 체크
 * @
 * @param  : pBlodNo : 선택한 혈액번호, pFlag = U(수정시 일괄수정하므로 체크박스 체크), D(all삭제여부를 컨펌받으므로 체크박스 체크안함.) 수정삭제구분
 *         : 
 *
 * @return : rBlodList : 함께 기록된 혈액번호
 * @author :  khj
 * @---------------------------------------------------
 */
function fExistsExecRecTogether(pRow, pFlag ){

  var sRow = pRow;
  
  if ( sRow < 1 ){
    return "";
  }
  
  var sRowStratTime        = model.getValue("/root/main/cond/blodreturnreqgrup/blodexecrecgruplist["+ sRow +"]/fstrgstdt3");
  var sRowEndTime          = model.getValue("/root/main/cond/blodreturnreqgrup/blodexecrecgruplist["+ sRow +"]/tnsendddtm");
  var sRowTnsstrnurseid    = model.getValue("/root/main/cond/blodreturnreqgrup/blodexecrecgruplist["+ sRow +"]/tnsstrnurseid");
  var sRowTnsendnurseid    = model.getValue("/root/main/cond/blodreturnreqgrup/blodexecrecgruplist["+ sRow +"]/tnsendnurseid");
  var sRowSmlqtytnsyn      = model.getValue("/root/main/cond/blodreturnreqgrup/blodexecrecgruplist["+ sRow +"]/smlqtytnsyn");
  var sRowTnssideeffectetc = model.getValue("/root/main/cond/blodreturnreqgrup/blodexecrecgruplist["+ sRow +"]/tnssideeffectetc");
  var sRowDiscontinuyn     = model.getValue("/root/main/cond/blodreturnreqgrup/blodexecrecgruplist["+ sRow +"]/discontinuyn");
  var sRowPrcpcd  			   = model.getValue("/root/main/cond/blodreturnreqgrup/blodexecrecgruplist["+ sRow +"]/prcpcd");	//170331_AYS_수혈간호기록 처방확인
  
  var rBlodList = "";
  var sPrcpNoList = "";
  var sPrcpNmList = "";
  var sAboRhList = "";
  var sSignNoList = "";
  var sReturnGridBlodList = "";
  
  for( var idx = 1 ; idx <= grd_blodexecrecgruplist.rows ; idx++ ){
      if ( sRow != idx &&
           model.getValue("/root/main/cond/blodreturnreqgrup/blodexecrecgruplist["+ idx +"]/fstrgstdt3")       == sRowStratTime        && 
           model.getValue("/root/main/cond/blodreturnreqgrup/blodexecrecgruplist["+ idx +"]/tnsendddtm")       == sRowEndTime          &&
           model.getValue("/root/main/cond/blodreturnreqgrup/blodexecrecgruplist["+ idx +"]/tnsstrnurseid")    == sRowTnsstrnurseid    &&
           model.getValue("/root/main/cond/blodreturnreqgrup/blodexecrecgruplist["+ idx +"]/tnsendnurseid")    == sRowTnsendnurseid    &&
           model.getValue("/root/main/cond/blodreturnreqgrup/blodexecrecgruplist["+ idx +"]/smlqtytnsyn")      == sRowSmlqtytnsyn      &&
           model.getValue("/root/main/cond/blodreturnreqgrup/blodexecrecgruplist["+ idx +"]/tnssideeffectetc") == sRowTnssideeffectetc &&
           model.getValue("/root/main/cond/blodreturnreqgrup/blodexecrecgruplist["+ idx +"]/discontinuyn")     == sRowDiscontinuyn  	 &&
           model.getValue("/root/main/cond/blodreturnreqgrup/blodexecrecgruplist["+ idx +"]/prcpcd")  				 == sRowPrcpcd      			   ){  //170331_AYS_수혈간호기록 처방확인

          rBlodList   += grd_blodexecrecgruplist.labelmatrix(idx, grd_blodexecrecgruplist.colRef("blodno")) + "," ;
          sPrcpNmList += grd_blodexecrecgruplist.labelmatrix(idx, grd_blodexecrecgruplist.colRef("prcpnm")) + "," ;
          sAboRhList  += grd_blodexecrecgruplist.labelmatrix(idx, grd_blodexecrecgruplist.colRef("abo"))
                       + grd_blodexecrecgruplist.labelmatrix(idx, grd_blodexecrecgruplist.colRef("rh"))     + "," ;
          sSignNoList += grd_blodexecrecgruplist.labelmatrix(idx, grd_blodexecrecgruplist.colRef("signno")) + "," ;      
          sPrcpNoList += grd_blodexecrecgruplist.labelmatrix(idx, grd_blodexecrecgruplist.colRef("prcpno")) + "," ;
          
          //if ( model.getValue(xBlodReturnReqGrupListPath + "[]/)
                
          if ( pFlag == "U" ){
              model.setValue("/root/main/cond/blodreturnreqgrup/blodexecrecgruplist["+ idx +"]/stat" , 'true');
          }
      }  
  }

  if ( pFlag == "U" ){

      if ( !isNull(rBlodList) ){
          messageBox("함께 기록된 수혈간호기록이 존재합니다.( 혈액번호 : " + rBlodList.substring(0,rBlodList.length -1 )  
                   + ")\n\n함께 기록된 수혈간호기록도 수정됩니다.\n\n부분수정은 기록삭제 이후에만 ","I006");
                   
          model.setValue(cap_blodno.attribute("ref"), rBlodList + model.getValue(cap_blodno.attribute("ref")) );
          model.setValue(cap_blodnm.attribute("ref"), sPrcpNmList + model.getValue(cap_blodnm.attribute("ref")) );
          model.setValue(cap_aborh.attribute("ref"), sAboRhList + model.getValue(cap_aborh.attribute("ref")) );
          model.setValue("/root/main/cond/tnsnurserecgrup/tnsnurserecgruplist/prcpno", sPrcpNoList+ model.getValue("/root/main/cond/tnsnurserecgrup/tnsnurserecgruplist/prcpno") );
          model.setValue("/root/main/cond/tnsnurserecgrup/tnsnurserecgruplist/signno", sSignNoList+ model.getValue("/root/main/cond/tnsnurserecgrup/tnsnurserecgruplist/signno") );
          
      } 
  } else if ( pFlag == "D" ){

      if ( !isNull(rBlodList) ){
          if( messageBox("함께 기록된 수혈간호기록이 존재합니다.( 혈액번호 : " + rBlodList.substring(0,rBlodList.length -1 )  
                          + ")\n함께 기록 ","Q001") == 6 ){//삭제 하시겠습니까 ?  yes=6, no=7
              model.setValue(cap_blodno.attribute("ref"), rBlodList + model.getValue(cap_blodno.attribute("ref")) );
              model.setValue(cap_blodnm.attribute("ref"), sPrcpNmList + model.getValue(cap_blodnm.attribute("ref")) );
              model.setValue(cap_aborh.attribute("ref"), sAboRhList + model.getValue(cap_aborh.attribute("ref")) );
              model.setValue("/root/main/cond/tnsnurserecgrup/tnsnurserecgruplist/prcpno", sPrcpNoList + model.getValue("/root/main/cond/tnsnurserecgrup/tnsnurserecgruplist/prcpno") );
              model.setValue("/root/main/cond/tnsnurserecgrup/tnsnurserecgruplist/signno", sSignNoList + model.getValue("/root/main/cond/tnsnurserecgrup/tnsnurserecgruplist/signno") );
          }
          
      } 
  }
  
  cap_blodno.refresh();
  cap_blodnm.refresh();
  cap_aborh.refresh();  
  fSumQtyCalc();// 총투여량 계산 onepintqty * 혈액갯수

  return rBlodList;  
}

/**
 * @desc   : 수행기록내역에서 체크 된 detlgrup 저장파라미터 만들기
 * @
 * @param  : checkTarget : exec:수행   noexec:미수행
 *         : 
 *
 * @return : rSaveList
 * @author :  khj
 * @---------------------------------------------------
 */
function fSaveExecRecListMake(checkTarget){

    var rSaveList = "stat▦blodno▦prcpnm▦abo▦rh▦prcpdd▦prcpno▦prcpcd▦prcphistno▦prcpdelivefact▦pid▦tnscarerecseq▦instcd▩";
    var rSaveHeader = "";
    var xTargetGrid = grd_blodexecrecgruplist;
    var xTargetPath = "";
    
    if ( checkTarget =="exec" ){
        xTargetPath = "/root/main/cond/blodreturnreqgrup/blodexecrecgruplist" ;
        xTargetGrid = grd_blodexecrecgruplist;
    } else {
        xTargetPath = "/root/main/cond/blodreturnreqgrup/blodnoexecrecgruplist" ;
        xTargetGrid = grd_blodnoexecrecgruplist;
    }
        
    for(var n=1; n <= xTargetGrid.rows ; n++){
        if ( model.getValue(xTargetPath + "["+ n +"]/stat") == "true" ){
            rSaveList += model.getValue(xTargetPath + "["+ n +"]/stat")   + "▦"
                       + model.getValue(xTargetPath + "["+ n +"]/blodno") + "▦"
                       + model.getValue(xTargetPath + "["+ n +"]/prcpnm") + "▦"
                       + model.getValue(xTargetPath + "["+ n +"]/abo")    + "▦"
                       + model.getValue(xTargetPath + "["+ n +"]/rh")     + "▦"
                       + model.getValue(xTargetPath + "["+ n +"]/prcpdd") + "▦"
                       + model.getValue(xTargetPath + "["+ n +"]/prcpno") + "▦"
                       + model.getValue(xTargetPath + "["+ n +"]/prcpcd") + "▦"
                       + model.getValue(xTargetPath + "["+ n +"]/prcphistno") + "▦"
                       + model.getValue(xTargetPath + "["+ n +"]/prcpdelivefact") +"▦"
                       + model.getValue(xTargetPath + "["+ n +"]/pid") + "▦"
                       + model.getValue(xTargetPath + "["+ n +"]/tnscarerecseq") +"▦"
                       + model.getValue(xTargetPath + "["+ n +"]/instcd") + "▩"
        }
    }

    return rSaveList;
    
}
function fRePrtBldReq() {
	var chkyn;
	var ocrtag;
	var pretag;
	var cnt = 0;
	
	var receiptid="";
  var receiptnm="";
	
	for(var i = grd_delivedetlgruplist.fixedRows; i < grd_delivedetlgruplist.rows; i++) {
		chkyn = grd_delivedetlgruplist.valueMatrix(i, grd_delivedetlgruplist.colRef("sel"));
		ocrtag = grd_delivedetlgruplist.valueMatrix(i, grd_delivedetlgruplist.colRef("ocrtag"));
		
		if(chkyn == "true") {
			if(cnt == 0) {
				pretag = ocrtag;
				receiptid = grd_delivedetlgruplist.valueMatrix(i, grd_delivedetlgruplist.colRef("receiptid"));
				receiptnm = grd_delivedetlgruplist.valueMatrix(i, grd_delivedetlgruplist.colRef("receiptnm"));
				cnt++;
			}
			
			if(pretag != ocrtag) {
				messageBox("다른 OCR번호를 가진 혈액은 재출력할 수 없습니다.", "E");
				return;
			}
			
			if(ocrtag == "") {
				messageBox("혈액불출되지 않은 혈액은 재출력 하실 수 없습니다.", "E");
				return;
			}	else {
				
			}
		}
	}
	
	
	var ip = app.clientIp.split("^");
  var ipstr = ip[0].split(".");
	
	model.makeValue("/root/send/report/patientnm",model.getValue("/root/main/cond/patientgrupInfo/patientgruplistInfo/patientnm1") );                  
  model.makeValue("/root/send/report/pid",model.getValue("/root/main/cond/patientgrupInfo/patientgruplistInfo/pid") );  
  model.makeValue("/root/send/report/sexage",model.getValue("/root/main/cond/patientgrupInfo/patientgruplistInfo/sexage") );  
  model.makeValue("/root/send/report/btype",model.getValue("/root/main/cond/patientgrupInfo/patientgruplistInfo/btype") );
  model.makeValue("/root/send/report/wardnm",cmb_wardcdgruplist.label );
  model.makeValue("/root/send/report/roomcd",cmb_roomcdgruplist.value );
  //model.makeValue("/root/send/report/logourl", getBigLogoImageURL("",getUserInfo("dutplceinstcd")));
  
  model.makeValue("/root/send/report/logourl", getImageURL("biglogo"+getUserInfo("dutplceinstcd"), "jpg"));
  model.makeValue("/root/send/report/ip", ipstr[2] + "." + ipstr[3]);

  //출력일시
  var printdd = getCurrentDate().substr(0,4) + "/" + getCurrentDate().substr(4,2) + "/" + getCurrentDate().substr(6,2);
  var printtm = getCurrentTime().substr(0,2) + ":" + getCurrentTime().substr(2,2) + ":" + getCurrentTime().substr(4,2);
  
  model.makeValue("/root/send/report/printdt", printdd + " " +printtm );
  model.makeValue("/root/send/report/usernm", getUserName() );
  
  model.makeValue("/root/send/report/seq",       pretag);
  model.makeValue("/root/send/report/receiptid", receiptid);
  model.makeValue("/root/send/report/receiptnm", receiptnm);
  
  model.makeNode("/root/send/report/delivedetlgrup/delivedetlgruplist");  
  copyNodesetType( "/root/send/report/delivedetlgrup/delivedetlgruplist", "/root/main/cond/delivedetlgrup/delivedetlgruplist[sel='true']" );
	
	exeReportPreview("RFMNR01000", "XMLSTR", "", "", "true", "", "", "", "", "", "", "grp_report"); //미리보기 없이 출력
}

function fChngGridInfo() {
	var sel = grd_delivedetlgruplist.valueMatrix(grd_delivedetlgruplist.row, grd_delivedetlgruplist.colRef("sel"));
								
	if(grd_delivedetlgruplist.col == grd_delivedetlgruplist.colRef("sel")) {									
		var ocrtag = grd_delivedetlgruplist.valueMatrix(grd_delivedetlgruplist.row, grd_delivedetlgruplist.colRef("ocrtag"));
		
		if(ocrtag == "" || ocrtag == null) {
			return;
		}
		
		var ocrtag2="";
		for(i = grd_delivedetlgruplist.fixedRows; i < grd_delivedetlgruplist.rows; i++) {
			ocrtag2 = grd_delivedetlgruplist.valueMatrix(i, grd_delivedetlgruplist.colRef("ocrtag"));
			if(ocrtag == ocrtag2) {
				grd_delivedetlgruplist.valueMatrix(i, grd_delivedetlgruplist.colRef("sel")) = sel;
			}
		}
		grd_delivedetlgruplist.refresh();
	}
}