/*
  
      ¿Ü·¡ ¸ÞÀÎ È­¸é (SMMNO00100.xfm - JScript )

      - Version :
          1)  : Ver.1.00.01 
*/
/**
 * @group  :
 * @ver    : 2007.04.11
 * @by     : ±èº´±¹
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : 
 * @param  : 
 * @return : 
 * @---------------------------------------------------
 */ 
function fCalcDate(yr, dt) {
    
    var dt = model.getValue("/root/init/orddd");
    dt = dt.toDate("YYYYMMDD");
    dt = dt.getAddDate(yr, "Y");
    dt = dt.getDateFormat("YYYYMMDD");   
    
    return dt;
}
 /**
 * @group  :
 * @ver    : 2007.04.11
 * @by     : ±èº´±¹
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : 
 * @param  : 
 * @return : 
 * @---------------------------------------------------
 */ 
function fGridDbClicked() {
       
    var dt = fCalcDate(-5, model.getValue("/root/main/opatlist/opatlist[" + grd_opatmngt.row + "]/orddd"));
    model.setValue("/root/main/condition/preorddd", dt);
    

    //submit
    model.removeNodeset("/root/main/patdetlinfo");
    grd_ordinfo.refresh();
	  grd_prcpspec.refresh();
	  grd_ordrsrvinfo.refresh();
	  grd_outerspec.refresh();
    model.removeNodeset("/root/send/reqpredata");
    model.makeValue("/root/send/reqpredata/orddd", model.getValue("/root/main/opatlist/opatlist[" + grd_opatmngt.row + "]/orddd"));
    model.makeValue("/root/send/reqpredata/pid", model.getValue("/root/main/opatlist/opatlist[" + grd_opatmngt.row + "]/pid"));
    model.makeValue("/root/send/reqpredata/orddeptcd", model.getValue("/root/main/opatlist/opatlist[" + grd_opatmngt.row + "]/orddeptcd"));
    model.makeValue("/root/send/reqpredata/orddrid", model.getValue("/root/main/opatlist/opatlist[" + grd_opatmngt.row + "]/orddrid"));
    model.makeValue("/root/send/reqpredata/cretno", model.getValue("/root/main/opatlist/opatlist[" + grd_opatmngt.row + "]/cretno"));
    model.makeValue("/root/send/reqpredata/instcd", model.getValue("/root/main/opatlist/opatlist[" + grd_opatmngt.row + "]/instcd"));
    model.makeValue("/root/send/reqpredata/preorddd", dt);
    model.makeValue("/root/send/reqpredata/MDdeptcd", MDdeptcd); // ÇϵåÄÚµù¼öÁ¤_³»°úºÎ¼­ÄÚµå Ãß°¡_20090423(ByJA)
    model.makeValue("/root/send/reqpredata/RDdeptcd", RDdeptcd); // ÇϵåÄÚµù¼öÁ¤_¿µ»óÀÇÇаúºÎ¼­ÄÚµå Ãß°¡_20090423(ByJA)
	model.makeValue("/root/send/reqpredata/insukindcd", model.getValue("/root/main/opatlist/opatlist[" + grd_opatmngt.row + "]/insukindcd")); //Áø·áÁ¤º¸¿¡ »êÁ¤Æ¯·ÊÃß°¡·Î ÀÎÇØ ¼öÁ¤-20090623
	  
	  
	
    submit("TRMNO00102", false);
    
    var node = instance1.selectSingleNode("/root/main/patdetlinfo/ordinfo/rem");
    if(node == null){
    	model.makeValue("/root/main/patdetlinfo/ordinfo/rem", model.getValue("/root/main/opatlist/opatlist["+grd_opatmngt.row+ "]/telrsrvrem"));
    }else{
		model.setValue("/root/main/patdetlinfo/ordinfo/rem", model.getValue("/root/main/opatlist/opatlist["+grd_opatmngt.row+ "]/telrsrvrem"));
	}
	
	//Áø·á¿¹Á¤ÀÚ¸®½ºÆ®¿¡¼­ ÀÇ·Ú°¡ ÀÖÀ»°æ¿ì¿¡¸¸ Consult°ü¸®È­¸é ¿¬µ¿À» À§ÇØ Ãß°¡-20090220
	var node2 = instance1.selectSingleNode("/root/main/patdetlinfo/ordinfo/reqcnstyn");
    if(node2 == null){
    	model.makeValue("/root/main/patdetlinfo/ordinfo/reqcnstyn", model.getValue("/root/main/opatlist/opatlist["+grd_opatmngt.row+ "]/req"));
	}else{
		model.setValue("/root/main/patdetlinfo/ordinfo/reqcnstyn", model.getValue("/root/main/opatlist/opatlist["+grd_opatmngt.row+ "]/req"));
	}
	
	grd_ordinfo.refresh();
	grd_prcpspec.refresh();
	grd_ordrsrvinfo.refresh();
	grd_outerspec.refresh();
	grd_testrsrv.refresh();
	grd_inspec.refresh();
	
	
	var prcpspecflag = model.getValue("/root/main/condition/prcpspecflag");
	var orddd = model.getValue("/root/main/opatlist/opatlist[" + grd_opatmngt.row + "]/orddd");
	var orddeptcd = model.getValue("/root/main/opatlist/opatlist[" + grd_opatmngt.row + "]/orddeptcd");
	var orddrid = model.getValue("/root/main/opatlist/opatlist[" + grd_opatmngt.row + "]/orddrid");

	if(prcpspecflag == "1") {							
		cmb_prcpspec.choices.itemset.attribute("nodeset") = "/root/main/patdetlinfo/prcpcmbdatainfo";
		cmb_prcpspec.refresh();
	} else if(prcpspecflag == "1 2") {
		cmb_prcpspec.choices.itemset.attribute("nodeset") = "/root/main/patdetlinfo/prcpcmbdatainfo";
		cmb_prcpspec.refresh();
	} else {
		cmb_prcpspec.choices.itemset.attribute("nodeset") = "/root/main/patdetlinfo/prcpcmbdatainfo[orddeptcd = '" + orddeptcd + "']";
		cmb_prcpspec.refresh();

	}
	
	var str = orddd + "/" + orddeptcd + "/" + orddrid;
	
	// ó¹æ³»¿ªÀÇ ÄÞº¸¿¡ ³»¿ë
	cmb_prcpspec.value = str;
	cmb_prcpspec.refresh();
	
	
	// ¿¹¾à±¸ºÐÀÌ ´çÀÏÀΠȯÀÚ¿¡ ´ëÇؼ­ Ç×¾ÏÇÁ·ÎÅäÄÝ Ã³¹æÀÌ ÀÖÀ¸¸é Æ˾÷ ¸Þ½ÃÁö º¸À̱â
	var srsrvflag = model.getValue("/root/main/opatlist/opatlist[" + grd_opatmngt.row + "]/rsrvflag"); //¿¹¾à±¸ºÐ
	var scpgyn = model.getValue("/root/main/patdetlinfo/cpginfo/cpgyn"); // ¿Ü·¡Ç×¾ÏÇÁ·ÎÅäÄÝ Ã³¹æ¿©ºÎ
	
	if ((srsrvflag == "´çÀÏ") && (scpgyn == "Y")) {
		messageBox("¿Ü·¡ Ç×¾ÏÇÁ·ÎÅäÄÝ Ã³¹æÀÌ ÀÖ´Â", "I005");
	}	
	
	model.makeValue("/root/send/reqdata1/pid", model.getValue("/root/main/opatlist/opatlist[" + grd_opatmngt.row + "]/pid"));
	ipt_pid2.refresh();
	btn_pid2.dispatch("DOMActivate");
	
	// »ó´ÜÁ¤º¸ ȯÀÚ ¼±Åõǵµ·Ï ¼öÁ¤
	fGetParamSetting();
	model.refresh();
	

	
}
 /**
 * @group  :
 * @ver    : 2007.04.11
 * @by     : ±èº´±¹
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : 
 * @param  :
 * @return : 
 * @---------------------------------------------------
 */ 	
function fBtnRefClicked(){
    if(isRequiredControls("ipt_orddd", "cmb_orddept")) {
						
        //submit 
		model.removenode("/root/main/opatlist/prescond");
		//À籸¼º
		model.makeValue("/root/main/opatlist/prescond","");
        //model.removeNodeset("/root/main/opatlist/prescond");

		model.makeValue("/root/send/reqdata/orddd", model.getValue("/root/init/orddd"));
		model.makeValue("/root/send/reqdata/orddeptcd", model.getValue("/root/main/condition/orddeptcd"));        
		model.makeValue("/root/send/reqdata/orddrid", model.getValue("/root/main/condition/orddrid"));
		//20101203_KNUH_Start Ãß°¡(Àüü¿©ºÎ)
		model.makeValue("/root/send/reqdata/chkyn", model.getValue("/root/main/condition/prcpspecflag1"));    
		//20101203_KNUH_End Ãß°¡(Àüü¿©ºÎ)
    
		model.makeValue("/root/send/reqdata/stat", model.getValue("/root/main/condition/stat"));
		model.makeValue("/root/send/reqdata/sortseq", model.getValue("/root/main/condition/sortseq"));					    
		model.makeValue("/root/send/reqdata/ordclsdeptflag", model.getValue("/root/main/condition/ordclsdeptflag")); 
		model.makeValue("/root/send/reqdata/supdeptcd", model.getValue("/root/main/condition/supdeptcd"));         
		model.makeValue("/root/send/reqdata/MDdeptcd", MDdeptcd);         // ÇϵåÄÚµù¼öÁ¤_³»°úºÎ¼­ÄÚµå Ãß°¡_20090423(ByJA)
		model.makeValue("/root/send/reqdata/timeflag", model.getValue("/root/main/condition/timeflag"));  // Áø·á±¸ºÐ(AM/PM) 2011.06.29 ¾ö¿µ¸¸
		model.makeValue("/root/send/reqdata/chrtyn", model.getValue("/root/main/condition/chrtyn"));  //2011.12.08 
		model.makeValue("/root/send/reqdata/rsrvyn", model.getValue("/root/main/condition/rsrvyn"));  //2011.12.08 
		
		 var orddr = "";
		 var drid = "";
	 for(var i = 1; i <= cmb_orddr.length; i++) {
	     drid = model.getValue("/root/init/orddr/orddr[" + i + "]/userid");
	     
	     if(drid == "") {
	     	
	     } else {
	     	   orddr += "'" + drid + "'";
	     	   if(i == cmb_orddr.length) {
	     	   	
	     	   } else {
	     	   	orddr += ",";
	     	  }
	     }
	 }
	 model.makeValue("/root/send/reqdata/orddrlist", orddr);
		
		submit("TRMNO00101", false);
		// »ó´ÜÁ¤º¸ ȯÀÚ ¼±Åõǵµ·Ï ¼öÁ¤
		//fGetParamSetting();
		grd_opatmngt.refresh();	

		
    }
}

 /**
 * @group  :
 * @ver    : 2007.10.11
 * @by     : È«¿µÇ¥
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : ¿Ü·¡Áø·áÀǻ纯°æÀ»À§ÇÑ µ¥ÀÌÅÍ Á¶È¸
 * @param  :
 * @return : 
 * @---------------------------------------------------
 */ 	
function fBtnRef1Clicked(){
    if(isRequiredControls("ipt_orddd", "cmb_orddept")) {
						
        //submit 
		//model.removenode("/root/main/opatlist1/prescond");
		//À籸¼º
		//model.makeValue("/root/main/opatlist1/prescond","");
        //model.removeNodeset("/root/main/opatlist/prescond");
				
				var orddrid = model.getValue("/root/main/condition/orddrid");
				
        model.makeValue("/root/send/reqdata1/orddd", model.getValue("/root/init/orddd"));
        
        //if(orddrid == "") {
        	model.makeValue("/root/send/reqdata1/orddeptcd", model.getValue("/root/main/condition/orddeptcd"));
        	model.makeValue("/root/send/reqdata1/ordclsdeptflag", model.getValue("/root/main/condition/ordclsdeptflag"));
        	model.makeValue("/root/send/reqdata1/supdeptcd", model.getValue("/root/main/condition/supdeptcd"));
       // }
        /*
         else {
        	
        	model.makeValue("/root/send/reqdata1/orddeptcd", model.getValue("/root/init/orddr/orddr[userid = '"+ orddrid + "']/deptcd"));        
        }*/
        							
	    submit("TRMNO00109", false);
	    
	    //ȯÀÚ ´õºíŬ¸¯½Ã ½ºÅ©·Ñ ¾Æ·¡¿¡ ¼±ÅÃµÈ È¯ÀÚ topRow·Î Á¶È¸µÇµµ·Ï Ãß°¡_20091127_SMY
	    grd_opatmngt.topRow = grd_opatmngt.row;
  
//		grd_opatmngt1.refresh();    
    }
}

 /**
 * @group  :
 * @ver    : 2007.04.11
 * @by     : ±èº´±¹
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : 
 * @param  : 
 * @return : 
 * @---------------------------------------------------
 */ 
function fFindRow(data, col){
    var row = grd_opatmngt.findRow(data, 1, col);
    grd_opatmngt.select(row, 1, row,grd_opatmngt.cols-1) = true;
    
    return row;
}

 
//°á°ú°ªÀ» ´ãÀ» À§Ä¡ 
var zbcResultRef = "/root/hidden/rsrvinfo";
var zbcRef = "root/send/rsrsvinfo";


/**
 * @group  :
 * @ver    : 2007.04.11
 * @by     : ±èº´±¹
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : °Ë»ç°á°úÁ¤º¸¸¦ °¡Á®¿Â´Ù
 * @param  : pid, orddd, orddeptcd, orddrid
 * @return : 
 * @---------------------------------------------------
 */ 					
function fGetRsrvInfo(pid, orddd,orddeptcd, orddrid ) {
	model.makeNode(zbcRef);
	

	model.makeValue("/root/send/rsrvinfo/pid", pid);
	model.makeValue("/root/send/rsrvinfo/orddd" , orddd);
	model.makeValue("/root/send/rsrvinfo/orddeptcd" , orddeptcd);
	model.makeValue("/root/send/rsrvinfo/orddrid" , orddrid);
	
	

	
	submit("TRMNO00106");

	model.refresh();	
	
}

/**
 * @desc   : ó¹æ »ó¼¼º¸±â
 * @param  : Àüó¹æ, ¿¬¼Óó¹æ, ó¹æ°Ë»ö ÅǹöÆ° ´­·¶À» °æ¿ì ¿øº¹ orgflag => Y
 * @id     : btn_detlvw
 * @event  : DOMActivate
 * @return : void
 * @authur : ¸¶Á¤¹Î 2007. 3. 12
 */

function fDetlVw2 ( orgflag ) {

	var grdLeft = 750;
	var grdWidht = 444;
	var grdHeight = 205;	//205->180À¸·Î º¯°æ(Áߺ¹Ã³¹æÁ¶È¸¹öÆ°Ãß°¡·ÎÀÎÇØ ±×¸®µåÅ©±âº¯°æ)-20091028-kys->Áߺ¹Ã³¹æÈ£Ã⿬±â·Î 205·Î À纯°æ20091103
	var extnGrdLeft = 0;
	var extnGrdWidht = 1194;
	var extnGrdHeight = 625;

	var prcpcdCol = grd_prcpspec.colRef("prcpcd");          //ó¹æÄÚµå Ä÷³ index
	var prcpnmCol = grd_prcpspec.colRef("prcpnm");          //ó¹æ¸í Ä÷³ index
	var prcpengnmCol = grd_prcpspec.colRef("prcpengnm");     //ó¹æ¿µ¹®¸í Ä÷³ index
	var prcpspecCol = grd_prcpspec.colRef("prcpspec");          //ó¹æ³»¿ª Ä÷³ index
	var abbrnmCol = grd_prcpspec.colRef("abbrnm");          //°æ·Î³»¿ª Ä÷³ index
  	var prcpdelivefactCol = grd_prcpspec.colRef("prcpdelivefact"); //Àü´Þ»çÇ×(remark Ä÷³ index)	
	var tempcol7Col = grd_prcpspec.colRef("tempcol7");          //ó¹æ³»¿ª_20090716_SMYÃß°¡
  	
//   var ivwLeft = 8;
//   var ivwWidth = 416;
//   var minIvwLeft = ivwLeft;
//   var minIvwWidth = 7;

	var lineX1 = grdLeft; 
	var lineX2 = grdLeft + grdWidht;
	var extnLineX1 = extnGrdLeft;
	var extnLineX2 = lineX2;
	
	var prcpColsize = 40;
	var prcpnmColsize = 200;
	var prcpengnmColsize = 200;
	var prcpspecColsize = 80;
	var abbrnmColsize = 80;
	var prcpdelivefactColsize = 40;
  	var tempcol7Colsize = 150;		
	
	if ( model.getValue( "/root/init/detlvw" ) == "p" && orgflag != "y" ) {
		grd_prcpspec.attribute ( "left" ) = extnGrdLeft;
		grd_prcpspec.attribute ( "width" ) = extnGrdWidht;	   
		grd_prcpspec.attribute ( "height" ) = extnGrdHeight;
//		ivw_prcp.attribute ( "left" ) = minIvwLeft;
//		ivw_prcp.attribute ( "width" ) = minIvwWidth;
		line3.attribute ( "x1" ) = extnLineX1;
		line3.attribute ( "x2" ) = extnLineX2;	 
//		line2.attribute ( "x1" ) = extnLineX1;
//		line2.attribute ( "x2" ) = extnLineX2;		   
		model.setValue( "/root/init/detlvw", "m" );
		
		grd_prcpspec.colWidth(prcpcdCol) = grd_prcpspec.colWidth(prcpcdCol) + prcpColsize;
		if(grd_prcpspec.colWidth(prcpnmCol) != 0) {
		    grd_prcpspec.colWidth(prcpnmCol) = grd_prcpspec.colWidth(prcpnmCol) + prcpnmColsize;
		}
		if(grd_prcpspec.colWidth(prcpengnmCol) != 0) {
			  grd_prcpspec.colWidth(prcpengnmCol) = grd_prcpspec.colWidth(prcpengnmCol) + prcpengnmColsize;
		}
		grd_prcpspec.colWidth(prcpspecCol) = grd_prcpspec.colWidth(prcpspecCol) + prcpspecColsize;
		grd_prcpspec.colWidth(abbrnmCol) = grd_prcpspec.colWidth(abbrnmCol) + abbrnmColsize;
		grd_prcpspec.colWidth(prcpdelivefactCol) = grd_prcpspec.colWidth(prcpdelivefactCol) + prcpdelivefactColsize;
		grd_prcpspec.colWidth(tempcol7Col) = grd_prcpspec.colWidth(tempcol7Col) + tempcol7Colsize;
		
   } else {
		grd_prcpspec.attribute ( "left" ) = grdLeft;
		grd_prcpspec.attribute ( "width" ) = grdWidht;
		grd_prcpspec.attribute ( "height" ) = grdHeight;
//		ivw_prcp.attribute ( "left" ) = ivwLeft;
//		ivw_prcp.attribute ( "width" ) = ivwWidth;
		line3.attribute ( "x1" ) = lineX1;
		line3.attribute ( "x2" ) = lineX2;	   
//		line2.attribute ( "x1" ) = lineX1;
//		line2.attribute ( "x2" ) = lineX2;		   
		model.setValue( "/root/init/detlvw", "p" );
		grd_prcpspec.colWidth(prcpcdCol) = grd_prcpspec.colWidth(prcpcdCol) - prcpColsize;
		grd_prcpspec.colWidth(prcpnmCol) = grd_prcpspec.colWidth(prcpnmCol) - prcpnmColsize;
		grd_prcpspec.colWidth(prcpengnmCol) = grd_prcpspec.colWidth(prcpengnmCol) - prcpengnmColsize;
		grd_prcpspec.colWidth(prcpspecCol) = grd_prcpspec.colWidth(prcpspecCol) - prcpspecColsize;
		grd_prcpspec.colWidth(abbrnmCol) = grd_prcpspec.colWidth(abbrnmCol) - abbrnmColsize;
		grd_prcpspec.colWidth(prcpdelivefactCol) = grd_prcpspec.colWidth(prcpdelivefactCol) - prcpdelivefactColsize;
		grd_prcpspec.colWidth(tempcol7Col) = grd_prcpspec.colWidth(tempcol7Col) - tempcol7Colsize;
   }
}

/**
 * @desc   : º¸È£ÀÚ´ëÁø Àû¿ë
 * @
 * @param  : sEtcOrdFlag - 'F' º¸È£ÀÚ´ëÁø Àû¿ë
 *
 * @return :
 * @author : ¿ÀÁöÈÆ
 * @---------------------------------------------------
 */
function fProcerSubtApp(){
   //¸¶¿ì½º ¿À¸¥ÂʹöÆ° Æ˾÷¿¡¼­ parameter󸮰¡ µÇÁö ¾Ê¾Æ ¿ì¼± ÇÔ¼ö·Î ³ª´©¾î ó¸®, Â÷ÈÄ ¼öÁ¤µÇ¸é º¯°æ¿¹Á¤
   fUpdtOutPatPamInfo("F");
}

/**
 * @desc   : º¸È£ÀÚ´ëÁø Ãë¼Ò
 * @
 * @param  : sEtcOrdFlag - '-' º¸È£ÀÚ´ëÁø Àû¿ë
 *
 * @return :
 * @author : ¿ÀÁöÈÆ
 * @---------------------------------------------------
 */
function fProcerSubtCncl(){   
   //¸¶¿ì½º ¿À¸¥ÂʹöÆ° Æ˾÷¿¡¼­ parameter󸮰¡ µÇÁö ¾Ê¾Æ ¿ì¼± ÇÔ¼ö·Î ³ª´©¾î ó¸®, Â÷ÈÄ ¼öÁ¤µÇ¸é º¯°æ¿¹Á¤
   fUpdtOutPatPamInfo("-");
}

/**
 * @desc   : º¸È£ÀÚ´ëÁø Àû¿ë, Ãë¼Ò(¿Ü·¡µî·Ï tbl¿¡ etcordflag¼³Á¤)
 * @
 * @param  : sEtcOrdFlag - 'F' º¸È£ÀÚ´ëÁø Àû¿ë
 *         :             - '-' º¸È£ÀÚ´ëÁø Ãë¼Ò
 * @return :
 * @author : ¿ÀÁöÈÆ 
 * @---------------------------------------------------
 */
function fUpdtOutPatPamInfo(sEtcOrdFlag){
	var iRow = grd_opatmngt.row;
	if(iRow < 1)
		return;
	var sFsexamflag = model.getValue("/root/main/opatlist/opatlist[" + iRow + "]/fsexamflag");	//20100127-kys-º´ÃÊ, °úÃÊÀΰæ¿ì º¸È£ÀÚ´ëÁøÀû¿ëºí·°Å·
	if(sFsexamflag == "º´ÃÊ" || sFsexamflag == "°úÃÊ"){	//20100127-kys-º´ÃÊ, °úÃÊÀΰæ¿ì º¸È£ÀÚ´ëÁøÀû¿ëºí·°Å·
		if(sEtcOrdFlag == "-"){
			var msg = "Ãë¼Ò¸¦";
		}else if(sEtcOrdFlag == "F"){
			var msg = "Àû¿ëÀ»";
		}
		messageBox("ÃÊÁøȯÀÚ´Â º¸È£ÀÚ´ëÁø " + msg + " ÇϽǼö ¾ø½À´Ï´Ù.", "I");
		return;
	}
	var sPID        = model.getValue("/root/main/opatlist/opatlist[" + iRow + "]/pid");
	var sOrdDD      = model.getValue("/root/main/opatlist/opatlist[" + iRow + "]/orddd");
	var sCretNO     = model.getValue("/root/main/opatlist/opatlist[" + iRow + "]/cretno");
	var sInstCD     = model.getValue("/root/main/opatlist/opatlist[" + iRow + "]/instcd");
	var sAcptSeqNO  = model.getValue("/root/main/opatlist/opatlist[" + iRow + "]/acptseqno");
	var sEtcOrdFlag2= model.getValue("/root/main/opatlist/opatlist[" + iRow + "]/etcordflag");
	var sHngNM      = model.getValue("/root/main/opatlist/opatlist[" + iRow + "]/hngnm");
	var sUserID     = getUserInfo("userid");
	var sUserDeptCD = getUserInfo("dutplcecd");

	if(sEtcOrdFlag == "-"){ //º¸È£ÀÚ ´ëÁø Ãë¼Ò
		var msgstr = "Ãë¼Ò¸¦";
		sProcFlag = "P";
      
	}else if(sEtcOrdFlag == "F"){ //º¸È£ÀÚ ´ëÁø Àû¿ë      
		if(sEtcOrdFlag2 == "F"){
			messageBox("[" + sHngNM + "]ȯÀÚ´Â ÀÌ¹Ì º¸È£ÀÚ ´ëÁø Àû¿ëȯÀÚ", "E008");
			return;
		}else{
			var msgstr = "Àû¿ëÀ»";
			sProcFlag = "P";
		}
	}
   
	var rtnval = messageBox("[" + sHngNM + "]ȯÀÚÀÇ º¸È£ÀÚ ´ëÁø " + msgstr, "Q004");
	if(rtnval == 7){ //Ãë¼Ò ¹öÆ°À» Ŭ¸¯ÇÑ °æ¿ì
		return;
	}

	model.removeNodeset("/root/send/reqsavedata");
	model.makeNode("/root/send/reqsavedata/save");
	var sSave = "pid¢Ëorddd¢Ëcretno¢Ëinstcd¢Ëacptseqno¢Ëuserid¢Ëetcordflag¢Ëuserdeptcd¢Ëprocflag¢Ì";
	sSave +=sPID        + "¢Ë" +
			sOrdDD      + "¢Ë" +
			sCretNO     + "¢Ë" +
			sInstCD     + "¢Ë" +
			sAcptSeqNO  + "¢Ë" +
			sUserID     + "¢Ë" +
			sEtcOrdFlag + "¢Ë" +
			sUserDeptCD + "¢Ë" +
			sProcFlag   + "¢Ì";

	model.makeNode("/root/send/reqsavedata/req");

        model.makeValue("/root/send/reqdata/orddd", model.getValue("/root/init/orddd"));
        model.makeValue("/root/send/reqdata/orddeptcd", model.getValue("/root/main/condition/orddeptcd"));        
        model.makeValue("/root/send/reqdata/orddrid", model.getValue("/root/main/condition/orddrid"));
        model.makeValue("/root/send/reqdata/stat", model.getValue("/root/main/condition/stat"));
        model.makeValue("/root/send/reqdata/sortseq", model.getValue("/root/main/condition/sortseq"));

	var sReq = "orddd¢Ëpid¢Ëorddeptcd¢Ëorddrid¢Ëelbulbodstat¢Ësrchdd¢Ëdeptflag¢Ì";
	sReq += model.getValue("/root/init/orddd")        + "¢Ë" +
			model.getValue("/root/main/opatlist/opatlist[" + iRow + "]/pid")          + "¢Ë" +
			model.getValue("/root/main/condition/orddeptcd")    + "¢Ë" +
			model.getValue("/root/main/condition/orddrid")      + "¢Ë" +
			"-" + "¢Ë" +
			model.getValue("/root/init/orddd")        + "¢Ë" +
			"-"     + "¢Ì";

	model.setValue("/root/send/reqsavedata/save", sSave);
	model.setValue("/root/send/reqsavedata/req" , sReq);

	if (submit("TXMNO00102", false)) {
		//grd_opatmngt.isReadOnly(iRow,1) = true;
		//grd_opatmngt.cellstyle("background-color", iRow, 1, iRow, grd_opatmngt.cols-1) ="#FFC8C8";																	

		model.setValue("/root/main/opatlist/opatlist[" + iRow + "]/etcordflag", sEtcOrdFlag);
		model.setValue("/root/main/opatlist/opatlist[" + iRow + "]/acptseqno", model.getValue("/root/temp/outpatinfo/outpatlist/acptseqno"));
		
		grd_opatmngt.refresh();								
	}
}

/**
 * @group  :
 * @ver    : 2007.04.11
 * @by     : ±èº´±¹
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : °úList Á¶È¸
 * @param  : ord_deptflag
 * @return : 
 * @---------------------------------------------------
 */ 					
function fGetDeptCodeList(ord_deptflag) {
	model.setValue("/root/send/session", ord_deptflag);

	submit("TRMNO00108");
}

/**
 * @group  :
 * @ver    : 2008.12.19
 * @by     : Á¤°æÈ­
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : »ó´Ü Á¤º¸ ÀÌ¿ë ȯÀÚ ¼±ÅÃ
 * @param  :
 * @return :
 * @---------------------------------------------------
 */  
function fGetParamSetting(){
	var chkPid = getPatientInfo("pid");
	var iTgPatRow = 0;
	
	//alert(chkPid);
	
	if(chkPid != ""){
		var tRow = grd_opatmngt.rows;
		if(tRow == "1"){
			return;
		}else{
			for( i =0 ; i < tRow ; i++ ){
				iTgPatRow = grd_opatmngt.findRow(chkPid ,1, 6,true,true);	
			}
		}
	}
	//alert(iTgPatRow);
    //iTgPatRow = 20;
	if(iTgPatRow > 0){
       	grd_opatmngt.row = iTgPatRow;
       	grd_opatmngt.topRow = iTgPatRow;
		//fSelectPatList();
	}
	
}

/**
 * @group  :
 * @ver    : 2009.07.02
 * @by     : ±è¾ç¼ö
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : ÁßÁõ ¹× Èñ±Í³­Ä¡ ¼­¸í ¿©ºÎ üũ
 * @param  :
 * @return :
 * @---------------------------------------------------
 */  
function fRooaSodaYnInfo(){
	model.makeValue("/root/send/reqsdoarooasignyn/pid", model.getValue("/root/main/opatlist/opatlist["+ grd_opatmngt.row +"]/pid"));
	model.makeValue("/root/send/reqsdoarooasignyn/instcd", model.getValue("/root/main/opatlist/opatlist["+ grd_opatmngt.row +"]/instcd"));
	model.makeValue("/root/send/reqsdoarooasignyn/insukindcd", model.getValue("/root/main/opatlist/opatlist["+ grd_opatmngt.row +"]/insukindcd"));
								
	if(submit("TRMNO02903")){
		var sdoayn = model.getValue("/root/main/sdoarooayn/sdoarooayn/sdoayn");  //ÁßÁõ»çÀο©ºÎ
		var rooayn = model.getValue("/root/main/sdoarooayn/sdoarooayn/rooayn");	//Èñ±Í³­Ä¡»çÀο©ºÎ
		var burnyn = model.getValue("/root/main/sdoarooayn/sdoarooayn/burnyn");	//ÁßÁõÈ­»ó  Á¶È¸ 20100708 ±èÈ«Á¡ ¿äû¹øÈ£ 14788
		var msgstr = "";
								
		if(sdoayn == "Y" ){
			msgstr = "ÁßÁõÁø·á½Åû";
		}
		if(rooayn == "Y"){
		    if ( isNull(msgstr) ){
		        msgstr = "Èñ±Í³­Ä¡¼ºÁúȯÀÚ½Åû";
		    }else {
		        msgstr += "/Èñ±Í³­Ä¡¼ºÁúȯÀÚ½Åû";
		    }
			
		}
		if(burnyn == "Y"){
		    if ( isNull(msgstr) ){
		        msgstr = "ÁßÁõÈ­»ó½Åû";
		    }else {
		        msgstr += "/ÁßÁõÈ­»ó½Åû";
		    }
			
		}
		if ( !isNull(msgstr) ){
		    messageBox(msgstr + " µî·Ï ¼­¸íÀÌ µÇÁö ¾ÊÀº ȯÀÚÀÔ´Ï´Ù.","I");
		}
        
//		if(sdoayn == "Y" && rooayn == "N"){
//			messageBox("ÁßÁõÁø·á½Åû µî·Ï ¼­¸íÀÌ µÇÁö ¾ÊÀº ȯÀÚÀÔ´Ï´Ù.","I");
//		}
//		else if(sdoayn == "N" && rooayn == "Y"){
//			messageBox("Èñ±Í³­Ä¡¼ºÁúȯÀÚ½Åû µî·Ï ¼­¸íÀÌ µÇÁö ¾ÊÀº ȯÀÚÀÔ´Ï´Ù.","I");
//		}
//		else if(sdoayn == "Y" && rooayn == "Y"){
//			messageBox("ÁßÁõÁø·á½Åû/Èñ±Í³­Ä¡¼ºÁúȯÀÚ½Åû µî·Ï ¼­¸íÀÌ µÇÁö ¾ÊÀº ȯÀÚÀÔ´Ï´Ù.","I");
//		}
	}
 }

/**
 * @group  :
 * @ver    : 2009.07.03
 * @by     : ±è¾ç¼ö
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : ÀÇ·Ú¼­È®ÀÎ ¿©ºÎ üũ ÈÄ »óȲ¿¡ ¸Â´Â ¸Þ½ÃÁö »ý¼º 
 * @param  :
 * @return :
 * @---------------------------------------------------
 */  
function fCnstExitAlram(){
	//¿¹¿Ü»çÇ×:º»¿øÀÇ Á¾ÇÕ°ÇÁø[±â°£:1³â]À» º»°æ¿ì, ÇØ´ç°úÀÇ ÀÀ±Þ½Ç °æÀ¯, Ÿ°úÀÇ ÀÇ·ÚÀΰæ¿ì¿¡´Â ¸Þ½ÃÁöâÀ» ¶ç¿ìÁö ¾Ê°í
	//ÀÚµ¿À¸·Î ÀÇ·Ú¼­¸¦ µî·ÏÇÑ´Ù-20090630º¯°æ¿äû¼­°Ç(¿¹¿Ü»çÇ×ÀÇ °æ¿ì ÀçÁøÀϼöµµ °úÃÊÀϼöµµ ÀÖÀ½)
	
	//¿©Àǵµ ȯÀÚµ¿ÀǼ­ ¼­¸í¿©ºÎ üũ
	var sungmopat= "";
	var consult = model.getValue("/root/main/opatlist/opatlist[" + grd_opatmngt.row + "]/req"); //ÀÇ·Ú
	
	//Áø·áÀÇ·Ú¼­ µî·Ï ¾Ë¸² ¹× ¸Þ½ÃÁö ¶ç¿ì±â.
	caption22.value         = "";
	btn_cnstup.visible 	    = true;
	btn_cnstup.disabled     = true;
	img_btncnstup.visible   = false;
	group2.attribute("visibility") = "hidden";
								
	var insukind    = model.getValue("/root/main/opatlist/opatlist[" + grd_opatmngt.row + "]/insukindcd");  //º¸ÇèÀ¯Çü
	var fsexamflag  = model.getValue("/root/main/opatlist/opatlist[" + grd_opatmngt.row + "]/fsexamflag");
	var hngnm       = model.getValue("/root/main/opatlist/opatlist[" + grd_opatmngt.row + "]/hngnm");
								
	model.makeValue("/root/send/reqeixtcnstchk/pid",        model.getValue("/root/main/opatlist/opatlist["+ grd_opatmngt.row +"]/pid"));
	model.makeValue("/root/send/reqeixtcnstchk/orddd",      model.getValue("/root/main/opatlist/opatlist["+ grd_opatmngt.row +"]/orddd"));
	model.makeValue("/root/send/reqeixtcnstchk/cretno",     model.getValue("/root/main/opatlist/opatlist["+ grd_opatmngt.row +"]/cretno"));
	model.makeValue("/root/send/reqeixtcnstchk/instcd",     model.getValue("/root/main/opatlist/opatlist["+ grd_opatmngt.row +"]/instcd"));
	model.makeValue("/root/send/reqeixtcnstchk/orddeptcd",  model.getValue("/root/main/opatlist/opatlist["+ grd_opatmngt.row +"]/orddeptcd"));
	model.makeValue("/root/send/reqeixtcnstchk/fsexamflag", model.getValue("/root/main/opatlist/opatlist["+ grd_opatmngt.row +"]/fsexamflag"));

	//¿©Àǵµ È®Àνà Áø·á¸¦ º» ÇØ´çÁø·á°úÀΰæ¿ì¿¡¸¸ Áø·áÀÇ·Ú¼­ È®ÀÎÀ» ÇÏÁö ¾Ê´Â´Ù·Î º¯°æ-20090717-kys
	//submitÀ» ´Ù½Ã ÅëÇÕÇÔ-20090717-kys
	//ÃÊÁøÀÏ°æ¿ì(º´ÃÊ,°úÃÊ) ¼º¸ðÃÊÁø µ¿ÀǼ­¿©ºÎ¸¦ È®ÀÎÇÏ¿© µ¿ÀǼ­¿¡ ¼­¸íÇÑ È¯ÀÚ´Â Áø·áÀÇ·Ú¼­ È®ÀÎÀ» ÇÏÁö ¾Ê´Â´Ù.-20090708-kys
	sungmopat = "N";
	if(submit("TRMNO02905")){//Áø·áÀÇ·Ú¼­ Á¸Àç È®ÀÎ 
		//¿¹¿Ü»çÇ× Ã¼Å©
		var healexamchk = "";
		var erchk = "";

		var cnstexityn  = model.getValue("/root/main/exitcnstrgstchk/exitcnstrgstchk/rtnvalue");	//Áø·áÀÇ·Ú¼­ Á¸Àç¿©ºÎ
		healexamchk     = model.getValue("/root/main/exitcnstrgstchk/autocnstup/healexamchk");      //°ÇÁø±â°£Ã¼Å©
		erchk           = model.getValue("/root/main/exitcnstrgstchk/autocnstup/erchk");            //ÀÀ±Þ½Ç°æÀ¯ üũ
		sungmopat       = model.getValue("/root/main/exitcnstrgstchk/sungmopatrgstchk/sungmopat");  //¿©Àǵµ µ¿ÀǼ­ ¼­¸íȯÀÚ
		//alert("sungmopat : " + sungmopat);
		if(sungmopat == "Y"){
			//¿©ÀǵµÈ¯ÀÚ ÃÊÁøÀÏ°æ¿ì ÇØ´ç°ú Áø·áº» ³»¿ªÀÌ ÀÖ´Ù¸é Áø·áÀÇ·Ú¼­ È®ÀÎÀ» ÇÏÁö ¾Ê´Â´Ù-kys-20090717 
		}else{
			btn_cnstsave.disabled = false;
			btn_cnstdel.disabled = false;
			//º´¿øÃÊÁø/°úÃÊÁøÀÎ °æ¿ì
			if(fsexamflag == "º´ÃÊ" || (fsexamflag == "°úÃÊ" && (healexamchk != "Y" && erchk != "Y" && consult != "ÀÇ"))){//º´ÃÊÀ̰ųª °úÃÊÀ̸鼭 ¿¹¿Ü»çÇ×ÀÌ ¾Æ´Ñ ȯÀÚ
				//º´ÃÊ °úÃÊÀΰæ¿ì Áø·áÀÇ·Ú¼­ È®ÀιöÆ° ±ô¹Ú°Å¸²(»ç¿ëÀÚ¿¡°Ô ¾Ë¸²±â´É)
				if(cnstexityn == "N"){
					caption22.value = "Áø·áÀÇ·Ú¼­ È®ÀÎÀÌ ¿Ï·áµÇ¾ú½À´Ï´Ù.";
					btn_cnstup.visible 	= true;   //±âÁ¸¹öÆ° visible
					btn_cnstup.disabled = false;  //±âÁ¸¹öÆ° È°¼ºÈ­.
					img_btncnstup.visible = false; //±ô¹ÚÀÌ ¹öÆ° unvisible
					btn_cnstsave.disabled = true; //ÀúÀå¹öÆ° ºñÈ°¼ºÈ­(ÀÇ·Ú¼­°¡ Á¸ÀçÇϹǷΠÀúÀåÀ» ÇÏ¸é ¾ÈµÇ¹Ç·Î)
				}else if(cnstexityn == "Y" && insukind != "21" && insukind != "22"){
					if(fsexamflag == "º´ÃÊ"){
						caption22.value = hngnm + "´ÔÀº º´ÃÊÁøȯÀÚÀÔ´Ï´Ù. Áø·áÀÇ·Ú¼­¸¦ È®ÀÎÇϽñ⠹ٶø´Ï´Ù.";
					}else if(fsexamflag == "°úÃÊ"){
						caption22.value = hngnm + "´ÔÀº °úÃÊÁøȯÀÚÀÔ´Ï´Ù. Áø·áÀÇ·Ú¼­¸¦ È®ÀÎÇϽñ⠹ٶø´Ï´Ù.";
					}
					//btn_cnstsave.disabled = false;
					btn_cnstup.visible 	= false; //±âÁ¸¹öÆ° ¼û±è
					img_btncnstup.visible = true; //±ô¹ÚÀÌ ¹öÆ° º¸ÀÓ
				}else if(cnstexityn == "Y" && (insukind == "21" || insukind == "22")){
					if(fsexamflag == "º´ÃÊ"){
						caption22.value = hngnm + "´ÔÀº º´ÃÊÁø, ÀǷẸȣ´ë»óÀÚÀÔ´Ï´Ù. Áø·áÀÇ·Ú¼­¸¦ È®ÀÎÇϽñ⠹ٶø´Ï´Ù.";
					}else if(fsexamflag == "°úÃÊ"){
						caption22.value = hngnm + "´ÔÀº °úÃÊÁø, ÀǷẸȣ´ë»óÀÚÀÔ´Ï´Ù. Áø·áÀÇ·Ú¼­¸¦ È®ÀÎÇϽñ⠹ٶø´Ï´Ù.";
					}
					//btn_cnstsave.disabled = false;
					btn_cnstup.visible 	= false; //±âÁ¸¹öÆ° ¼û±è
					img_btncnstup.visible = true; //±ô¹ÚÀÌ ¹öÆ° º¸ÀÓ
				}
			}else if(healexamchk == "Y" || erchk == "Y" || consult == "ÀÇ"){//°úÃÊ È¤Àº ÀçÁøÀ̸鼭 ¿¹¿Ü»çÇ×ÀΠȯÀÚ
				if(cnstexityn == "N"){
					caption22.value = "Áø·áÀÇ·Ú¼­ È®ÀÎÀÌ ¿Ï·áµÇ¾ú½À´Ï´Ù.";
					btn_cnstup.visible 	= true;   //±âÁ¸¹öÆ° visible
					btn_cnstup.disabled = false;  //±âÁ¸¹öÆ° È°¼ºÈ­.
					img_btncnstup.visible = false; //±ô¹ÚÀÌ ¹öÆ° unvisible
					btn_cnstsave.disabled = true;  //ÀúÀå¹öÆ° ºñÈ°¼ºÈ­(ÇÁ·Î±×·¥¿¡¼­ ÀÇ·Ú¼­ ÀÚµ¿µî·ÏÇϹǷΠ¹öÆ°È°¼º ºÒÇÊ¿ä)
					btn_cnstdel.disabled = true;  //»èÁ¦¹öÆ° ºñÈ°¼ºÈ­(ÇÁ·Î±×·¥¿¡¼­ ÀÇ·Ú¼­ ÀÚµ¿µî·ÏÇϹǷΠ¹öÆ°È°¼º ºÒÇÊ¿ä)
				}else if(cnstexityn == "Y" && healexamchk == "Y"){
					//caption22.value = hngnm + "´ÔÀº Á¾ÇÕ°ÇÁøÀ» º» ȯÀÚÀÔ´Ï´Ù. Áø·áÀÇ·Ú¼­¸¦ È®ÀÎÇϽñ⠹ٶø´Ï´Ù.";
					//btn_cnstsave.dispatch("DOMActivate"); //ÀÚµ¿ÀúÀå
					//btn_cnstsave.disabled = false;
				}else if(cnstexityn == "Y" && erchk == "Y"){
					//caption22.value = hngnm + "´ÔÀº ÀÀ±Þ½Ç °æÀ¯È¯ÀÚÀÔ´Ï´Ù. Áø·áÀÇ·Ú¼­¸¦ È®ÀÎÇϽñ⠹ٶø´Ï´Ù.";
					//btn_cnstsave.dispatch("DOMActivate"); //ÀÚµ¿ÀúÀå
					//btn_cnstsave.disabled = false;
				}else if(cnstexityn == "Y" && consult == "ÀÇ"){
					//caption22.value = hngnm + "´ÔÀº Ÿ°ú ÀÇ·Ú È¯ÀÚÀÔ´Ï´Ù. Áø·áÀÇ·Ú¼­¸¦ È®ÀÎÇϽñ⠹ٶø´Ï´Ù.";
					//btn_cnstsave.dispatch("DOMActivate"); //ÀÚµ¿ÀúÀå
					//btn_cnstsave.disabled = false;
				}
				//btn_cnstup.visible 	= false;
				//img_btncnstup.visible = true;
			}
		}
	}else{
		messageBox("Áø·áÀÇ·Ú¼­ È®ÀÎ ½ÇÆÐÇÏ¿´½À´Ï´Ù.","E");
		var acptyn = model.getValue("/root/main/opatlist/opatlist[" + grd_opatmngt.row + "]/acptyn");

		if(acptyn != true) {
			model.setValue("/root/main/opatlist/opatlist[" + grd_opatmngt.row + "]/acptyn", "");
		} else {
			model.setValue("/root/main/opatlist/opatlist[" + grd_opatmngt.row + "]/acptyn", "true")
		}
		grd_opatmngt.rebuild();
		return;
	}
}

/**
 * @group  :
 * @ver    : 2009.07.04
 * @by     : ±è¾ç¼ö
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : Áø·áÀÇ·Ú¼­¸¦ µî·Ï ¹× »èÁ¦ÇÑ´Ù. 
 * @param  :
 * @return :
 * @---------------------------------------------------
 */ 
 function fcnstsave(saveyn){
	//¿¹¿Ü»çÇ×:º»¿øÀÇ Á¾ÇÕ°ÇÁø[±â°£:1³â]À» º»°æ¿ì, ÇØ´ç°úÀÇ ÀÀ±Þ½Ç °æÀ¯(7ÀÏ), Ÿ°úÀÇ ÀÇ·ÚÀΰæ¿ì¿¡´Â ¸Þ½ÃÁöâÀ» ¶ç¿ìÁö ¾Ê°í
	//ÀÚµ¿À¸·Î ÀÇ·Ú¼­¸¦ µî·ÏÇÑ´Ù-20090630º¯°æ¿äû¼­°Ç(¿¹¿Ü»çÇ×ÀÇ °æ¿ì ÀçÁøÀϼöµµ °úÃÊÀϼöµµ ÀÖÀ½)

	//ÇöÀç Ŭ¸¯µÇ¾î Àִ ȯÀÚ¿Í ÀÇ·Ú¼­ Á¸Àç Á¶È¸ÇÑ È¯ÀÚ°¡ µ¿ÀÏ¿©ºÎ üũ block
	if(model.getValue("/root/main/opatlist/opatlist["+ grd_opatmngt.row +"]/pid") != model.getValue("/root/send/reqeixtcnstchk/pid")){
		messageBox("ÇöÀç Ŭ¸¯µÈ ȯÀÚ¿Í ÀÇ·Ú¼­ Á¸Àç È®ÀÎÇÑ È¯ÀÚ°¡ µ¿ÀÏÇÏÁö ¾Ê½À´Ï´Ù.\nÈ®ÀÎÇϽñ⠹ٶø´Ï´Ù.","E");
		return;
	}
	//»èÁ¦½Ã ´çÀÏ µî·Ï°Ç¸¸ »èÁ¦ÇÒ¼ö ÀÖµµ·Ï block
	if(saveyn == 2){
		var dt = getCurrentDate();
		if(model.getValue("/root/main/opatlist/opatlist["+ grd_opatmngt.row +"]/orddd") < dt){
			messageBox("´çÀÏ µî·Ï°Ç¸¸ »èÁ¦ °¡´ÉÇÕ´Ï´Ù.","E");
			return;
		}
	}

	//üũ º¯¼ö 
	var healexamchk = model.getValue("/root/main/exitcnstrgstchk/autocnstup/healexamchk");  //°ÇÁø±â°£Ã¼Å©(1³â)
	var erchk = model.getValue("/root/main/exitcnstrgstchk/autocnstup/erchk"); //ÀÀ±Þ½Ç°æÀ¯ üũ(7ÀÏ)
	var consult = model.getValue("/root/main/opatlist/opatlist[" + grd_opatmngt.row + "]/req"); //ÀÇ·Ú 
	var insukind = model.getValue("/root/main/opatlist/opatlist[" + grd_opatmngt.row + "]/insukindcd");  //º¸ÇèÀ¯Çü
	var fsexamflag = model.getValue("/root/main/opatlist/opatlist[" + grd_opatmngt.row + "]/fsexamflag"); //ÃÊ.ÀçÁø¿©ºÎ
	var hngnm = model.getValue("/root/main/opatlist/opatlist[" + grd_opatmngt.row + "]/hngnm"); //ȯÀÚ¼º¸í

	//Æ®·£Àè¼Ç data setting
	model.makeValue("/root/send/requpprcpcnst/pid", model.getValue("/root/main/opatlist/opatlist["+ grd_opatmngt.row +"]/pid"));
	model.makeValue("/root/send/requpprcpcnst/orddd", model.getValue("/root/main/opatlist/opatlist["+ grd_opatmngt.row +"]/orddd"));
	model.makeValue("/root/send/requpprcpcnst/cretno", model.getValue("/root/main/opatlist/opatlist["+ grd_opatmngt.row +"]/cretno"));
	model.makeValue("/root/send/requpprcpcnst/instcd", model.getValue("/root/main/opatlist/opatlist["+ grd_opatmngt.row +"]/instcd"));
	if(saveyn == 1){
		model.makeValue("/root/send/requpprcpcnst/workflag", "I");//ÀúÀå
	}else{
		model.makeValue("/root/send/requpprcpcnst/workflag", "D");//»èÁ¦(°£È£¿¡¼­ ÀÔ·ÂÇÑ µ¥ÀÌÅ͸¸ »èÁ¦°¡´ÉÇÏ´Ù)
	}

	if(saveyn == 1){ //ÀúÀå
		if(fsexamflag == "º´ÃÊ" || (fsexamflag == "°úÃÊ" && (healexamchk != "Y" && erchk != "Y" && consult != "ÀÇ"))){//º´ÃÊÀ̰ųª °úÃÊÀ̸鼭 ¿¹¿Ü»çÇ×ÀÌ ¾Æ´Ñ ȯÀÚ
			if(messageBox(hngnm + "´ÔÀÇ Áø·áÀÇ·Ú¼­¸¦ È®ÀÎÇϽðڽÀ´Ï±î?","Q") == 6){
				//ÀÇ·á±Þ¿©1,2Á¾Àΰæ¿ì
				if(insukind == "21" || insukind == "22"){
					if(messageBox(hngnm + "´ÔÀº ÀǷẸȣ´ë»óÀÚÀÔ´Ï´Ù.\nº´¿ø±Þ Áø·áÀÇ·Ú¼­¸¦ È®ÀÎÇϽðڽÀ´Ï±î?","Q") == 6){
						if(submit("TXMNO02901")){	//ÀÇ·Ú¼­ µî·Ï
							model.removeNodeset("/root/prcpcnstinfo/prcpcnstinfo");
							model.makeNode("/root/prcpcnstinfo/prcpcnstinfo");
							btn_cnstsave.disabled = false; //ÀúÀå¹öÆ° È°¼ºÈ­
						}else{
							messageBox("ÀÇ·Ú¼­ µî·Ï¿¡ ½ÇÆÐÇÏ¿´½À´Ï´Ù.","E");
							return;
						}
					}
				}else{
					if(submit("TXMNO02901")){
						model.removeNodeset("/root/prcpcnstinfo/prcpcnstinfo");
						model.makeNode("/root/prcpcnstinfo/prcpcnstinfo");
						btn_cnstsave.disabled = false; //ÀúÀå¹öÆ° È°¼ºÈ­
					}else{
						messageBox("ÀÇ·Ú¼­ µî·Ï¿¡ ½ÇÆÐÇÏ¿´½À´Ï´Ù.","E");
						return;
					}
				}
			}
		}else if(healexamchk == "Y" || erchk == "Y" || consult == "ÀÇ"){//°úÃÊ È¤Àº ÀçÁøÀ̸鼭 ¿¹¿Ü»çÇ×ÀΠȯÀÚ
			if(submit("TXMNO02901")){	//ÀÇ·Ú¼­ µî·Ï
				model.removeNodeset("/root/prcpcnstinfo/prcpcnstinfo");
				model.makeNode("/root/prcpcnstinfo/prcpcnstinfo");
				btn_cnstsave.disabled = false;
			}else{
				messageBox("ÀÇ·Ú¼­ µî·Ï¿¡ ½ÇÆÐÇÏ¿´½À´Ï´Ù.","E");
				return;
			}
		}
	}else{ //»èÁ¦
		if(messageBox(hngnm + "´ÔÀÇ Áø·áÀÇ·Ú¼­¸¦ »èÁ¦ÇϽðڽÀ´Ï±î?","Q") == 6){
			if(submit("TXMNO02901")){
				model.removeNodeset("/root/prcpcnstinfo/prcpcnstinfo");
				model.makeNode("/root/prcpcnstinfo/prcpcnstinfo");
				btn_cnstsave.disabled = false; //ÀúÀå¹öÆ° È°¼ºÈ­
			}else{
				messageBox("ÀÇ·Ú¼­ µî·Ï¿¡ ½ÇÆÐÇÏ¿´½À´Ï´Ù.","E");
				return;
			}
		}
	}
}

/**
 * @group  :
 * @ver    : 2009.07.04
 * @by     : ±è¾ç¼ö
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : Áø·áÀÇ·Ú¼­¿¡ °üÇÑ ¾Ë¸² ¹× ¹öÆ° ÃʱâÈ­. 
 * @param  :
 * @return :
 * @---------------------------------------------------
 */ 
 function fCnsrAlramClear(){
	caption22.value = "";
	btn_cnstup.visible 	= true;
	btn_cnstup.disabled = true;
	img_btncnstup.visible = false;
	group2.attribute("visibility") = "hidden";
 }

 /**
 * @group  :
 * @ver    : 2009.07.04
 * @by     : ±è¾ç¼ö
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : Áø·áÀÇ·Ú¼­¸¦ µî·Ï ÈÄ ¸Þ½ÃÁö ¼³Á¤. 
 * @param  :
 * @return :
 * @---------------------------------------------------
 */ 
 function fCnstResultAlram(){
	//üũ º¯¼ö 
	var healexamchk = model.getValue("/root/main/exitcnstrgstchk/autocnstup/healexamchk");  //°ÇÁø±â°£Ã¼Å©(1³â)
	var erchk = model.getValue("/root/main/exitcnstrgstchk/autocnstup/erchk"); //ÀÀ±Þ½Ç°æÀ¯ üũ(7ÀÏ)
	var consult = model.getValue("/root/main/opatlist/opatlist[" + grd_opatmngt.row + "]/req"); //ÀÇ·Ú 
	var fsexamflag = model.getValue("/root/main/opatlist/opatlist[" + grd_opatmngt.row + "]/fsexamflag"); //ÃÊ.ÀçÁø¿©ºÎ
	
	if(fsexamflag == "º´ÃÊ" || (fsexamflag == "°úÃÊ" && (healexamchk != "Y" && erchk != "Y" && consult != "ÀÇ"))){//º´ÃÊÀ̰ųª °úÃÊÀ̸鼭 ¿¹¿Ü»çÇ×ÀÌ ¾Æ´Ñ ȯÀÚ
		//º´ÃÊ °úÃÊÀΰæ¿ì Áø·áÀÇ·Ú¼­ È®ÀιöÆ° ±ô¹Ú°Å¸²(»ç¿ëÀÚ¿¡°Ô ¾Ë¸²±â´É)
		caption22.value = "Áø·áÀÇ·Ú¼­ È®ÀÎÀÌ ¿Ï·áµÇ¾ú½À´Ï´Ù.";
		btn_cnstup.visible 	= true;   //±âÁ¸¹öÆ° visible
		btn_cnstup.disabled = false;  //±âÁ¸¹öÆ° È°¼ºÈ­.
		img_btncnstup.visible = false; //±ô¹ÚÀÌ ¹öÆ° unvisible
		btn_cnstsave.disabled = true; //ÀúÀå¹öÆ° ºñÈ°¼ºÈ­(ÀÇ·Ú¼­°¡ Á¸ÀçÇϹǷΠÀúÀåÀ» ÇÏ¸é ¾ÈµÇ¹Ç·Î)
	}else if(healexamchk == "Y" || erchk == "Y" || consult == "ÀÇ"){//°úÃÊ È¤Àº ÀçÁøÀ̸鼭 ¿¹¿Ü»çÇ×ÀΠȯÀÚ
		caption22.value = "Áø·áÀÇ·Ú¼­ È®ÀÎÀÌ ¿Ï·áµÇ¾ú½À´Ï´Ù.";
		btn_cnstup.visible 	= true;   //±âÁ¸¹öÆ° visible
		btn_cnstup.disabled = false;  //±âÁ¸¹öÆ° È°¼ºÈ­.
		img_btncnstup.visible = false; //±ô¹ÚÀÌ ¹öÆ° unvisible
		btn_cnstsave.disabled = true;  //ÀúÀå¹öÆ° ºñÈ°¼ºÈ­(ÇÁ·Î±×·¥¿¡¼­ ÀÇ·Ú¼­ ÀÚµ¿µî·ÏÇϹǷΠ¹öÆ°È°¼º ºÒÇÊ¿ä)
		btn_cnstdel.disabled = true;  //»èÁ¦¹öÆ° ºñÈ°¼ºÈ­(ÇÁ·Î±×·¥¿¡¼­ ÀÇ·Ú¼­ ÀÚµ¿µî·ÏÇϹǷΠ¹öÆ°È°¼º ºÒÇÊ¿ä)
	}
 }