/*

(SMMNW04000_ÁßÁõµµ.xrw - JScript )

- Version :
1)  : Ver.1.00.01
 */
var xRecInfo = '/root/main/recgrup/recinfo';
var xRecMasterPath = "/root/main/recgrup/recgruplist";      		//ÁßÁõµµ±â·Ï¸¶½ºÅÍ
var xRecDetailPath = "/root/main/recdetailgrup/recdetailgruplist";  //ÁßÁõµµ»ó¼¼³»¿ª
var xRecPntPath    = "/root/main/recpntgrup/recpntlist";	//ÁßÁõµµ»ó¼¼Á¡¼ö
var xRecDetailBKPath = "/root/temp/histgrup/histgruplist";  //ÁßÁõµµ»ó¼¼³»¿ª hidden
var recMCurRow = 0; //±â·Ï¸¶½ºÅÍ¿¡ ÇöÀç ¼±ÅÃµÈ row index
var instUseYN = "N";//JCIÀû¿ë¿©ºÎ 20100430 ±èÈ«Á¡ 
var instUseYNcdnm = "";//JCIÀû¿ë¿©ºÎ 20100430 ±èÈ«Á¡ 

var patRow = "";
var recRow = "";
var sAllSignSave = false;
/*
var icuArr = new Array(4);//ÁßȯÀڽǸ®½ºÆ® ÇϵåÄÚµù
icuArr[0] = '3060100000';//³»°úÁßȯÀÚ½Ç
icuArr[1] = '3060200000';//¿Ü°úÁßȯÀÚ½Ç
icuArr[2] = '3060300000';//½Å°æ¿Ü°úÁßȯÀÚ½Ç
icuArr[3] = '3060400000';//¼øȯ±â°èÁßȯÀÚ½Ç
icuArr[4] = '3060600000';//2ÃþÁßȯÀÚ½Ç
*/

//ÀÀ±ÞÀÇ·á¼¾ÅÍ °ü·Ã º¯¼ö_°æºÏ´ë (2011.03.14 Ahn)
var eERDEPTCD = "";
var eERFLAG = "";

// ȯÀÚÁ¤º¸ ±×¸®µå °ü·Ã »ö (2011.03.30)
var red = "#ff0000";
var yellow = "#ffff00";
var indigo = "#333399";
var white = "#ffffff";


/**
 * 20080820
 * ºÐ·ù°¡ ¼±Åõɶ§¸¶´Ù hiddenÀ¸·Î ºÐ·ù±ºÁ¤º¸¸¦ ·ÎµåÇÔ(ÀÎÁõÀúÀå½Ã ÇÊ¿äÇÔ)
 */
 function fLoadBsPnt(totpnt){

 	var clsflag = model.getValue('/root/cond/clsflag'); //ºÐ·ù±¸ºÐ
 	var execdt  = model.getValue('/root/cond/execdd');  //±â·ÏÀÏÀÚ
 	var maddchk01 = model.getValue('/root/cond/maddchk01'); 
 	var maddchk02 = model.getValue('/root/cond/maddchk02'); 
 	var maddchk03 = model.getValue('/root/cond/maddchk03'); 
 	var maddchk04 = model.getValue('/root/cond/maddchk04'); 
 	var haddchk = model.getValue('/root/cond/haddchk'); 
 	var haddchk01 = model.getValue('/root/cond/haddchk01'); 
 	var dinfo = maddchk01+maddchk02+maddchk03+maddchk04+haddchk+haddchk01;
 	

    if ( model.getValue("/root/cond/agechk") == "Y" ){
        bspntnm = instUseYNcdnm
        return bspntnm;
    }else {
    	
    
     	model.removenode('/root/send');
     	model.makeValue('/root/send/bspnt/clsflag', clsflag);
     	model.makeValue('/root/send/bspntgrup/execdt', execdt);
     	model.makeValue('/root/send/bspntgrup/totpnt', totpnt);
     	model.makeValue('/root/send/bspntgrup/dinfo', dinfo);
     	if(submit('TRMNW04014')){
     		var bspntnm = model.getValue('/root/hidden/bspnt/bspntinfo/bspntnm');
     		return bspntnm;
    
     	}else{
     		messageBox('ÁßÁõ±ºÁ¶È¸¸¦', 'E009');
     		return;
     	}
        
    }
 }


/**
 * @group  :
 * @ver    : 2007.12.04
 * @by     : ½ÅÇõÃá
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : ÁßÁõµµ ½ÃÀ۽à º´µ¿, º´½Ç, ȯÀÚÁ¤º¸ Á¶È¸
 * @param  :
 * @return :
 * @---------------------------------------------------
 */
function fInit(){
	
		//debugger;
		
		//ȯÀÚÁ¤º¸ Á¶È¸
		//var sPamInfo = getGlobalVariable("paminfo");	
		//if(sPamInfo == ""){
		//		messageBox("ȯÀÚ¸¦ ¸ÕÀú","C002");	
		//		window.close();
		//		return;
		//}
		
		
		//»ç¿ëÀÚ Á÷±Þ±¸ºÐ¿¡ µû¸¥ È­¸é Á¦¾î Ç÷¡±× ¼³Á¤		
		sJobKindCD = getUserInfo("jobkindcd");	// Á÷±ÞÄÚµå	
		
		//---------(20101204) °æºÏ´ë  
		//Ãß°¡
		var ssflag = "";  
		if(getUserInfo("dutplceinstcd") != '032' && getUserInfo("dutplceinstcd") != '031') {
				//°æºÏ´ë°¡ ¾Æ´Ï¸é
				if( sJobKindCD == "0330" || sJobKindCD == "0310"){
						ssflag = "Y";
				} else {
						ssflag = "N";
				}
		} else if(getUserInfo("dutplceinstcd") == '032' || getUserInfo("dutplceinstcd") == '031') {
				//°æºÏ´ëÀ̸é 03%·Î üũÇÑ´Ù.
				if( sJobKindCD.substring(0, 2) == "03"){
						ssflag = "Y";
				} else {
						ssflag = "N";
				}
		}
		
		//----------------------------
		//ÀÀ±ÞÀÇ·á¼¾ÅÍ ºÎ¼­ÄÚµå ÃßÃâ_ °æºÏ´ë (2011.03.14 Ahn)
		model.makeValue("/root/send/cdgrupid", "'002'");
		model.makeValue("/root/send/srchdd"  , getCurrentDate());  // Á¶È¸±âÁØÀÏÀÚ  
		if(submit("TRMNW00001", false)){
				eERDEPTCD = model.getvalue("/root/code/codeinfo/codelist[cdgrupid='002']/cdid");
		}
		
		//¿øº»:ÀÇ»çÀÇ °æ¿ì¸¸      
		//if(sJobKindCD == "0330" || sJobKindCD == "0310" ){
		if(ssflag=="Y") {  
				//---------(20101204) °æºÏ´ë
				button4.visible = false;
		}else{
				button4.visible = true;
		}
		
		var pCode = "'199','055','W02','052','T49','T98'"; // ÁßÁõµµÀ§Çè»çÁ¤¿¡¼­ ³«»ó ³ªÀ̺° °íÀ§Ç豺 ÁöÁ¤ Àû¿ë¿©ºÎ FOR JCI 
		fGetNursHardCdInfo(pCode, getCurrentDate());	  
		
		instUseYN = model.getValue("/root/code/codeinfo/codelist[cdgrupid ='199' and cdnm = 'Y']/cdnm");//cdid °¡ 1: ³«»ó¼Ò¾Æ 2:³«»ó¼ºÀÎ (Morse Scale)
		
		var pid = "";
		var wardcd = "";
		var roomcd ="";
		// ÀÀ±Þ½Ç-±¸¿ªÁ¤º¸ (2011.03.14 Ahn)
		var sectioncd ="";
		
		// Ãß°¡ (2011.03.29 Ahn)
		var sexage = "";
		var patnm = "";
		var age = "";
    
		//ÁßÁõµµ ±â·Ï¿¡¼­ »ç¿ëÇÏ´Â ºÎ¼­ÄÚµå Á¶È¸_20090414_SMYÃß°¡
		submit("TRMNW04001");
		
		//¶óµð¿À¹öÆ° µðÆúÆ® ¼±ÅÃ
		wardcd = getUserInfo("dutplcecd");
		fChangeWardByRadio(wardcd);
		
		ipt_indate.value = getCurrentDate();// ¼öÇàÀÏ¿¡ ÇöÀ糯¥(µðÆúÆ®);
		ipt_time.value   = getCurrentDateTime().substring(9,13);//¼öÇà½Ã°£
		
		// »ó´ÜÁ¤º¸ ¼¼ÆÃ
		var sPamInfo = getGlobalVariable("paminfo");
		if ( !isNull(sPamInfo) ){
				setCSVToNode("/root/main/paminfo",sPamInfo,"pamlist");
				pid    = model.getValue("/root/main/paminfo/pamlist/pid");
				wardcd = model.getValue("/root/main/paminfo/pamlist/wardcd");
				roomcd = model.getValue("/root/main/paminfo/pamlist/roomcd");
				// ÀÀ±Þ½Ç - ±¸¿ªÄ÷³ Ãß°¡ (2011.03.14 Ahn)
				sectioncd = model.getValue("/root/main/paminfo/pamlist/sectioncd");
				
				// Ãß°¡ (2011.03.29 Ahn)
				sexage = model.getValue("/root/main/paminfo/pamlist/sex") + "/" + model.getValue("/root/main/paminfo/pamlist/age"); 
				patnm = model.getValue("/root/main/paminfo/pamlist/hngnm2");
				age = model.getValue("/root/main/paminfo/pamlist/age");
		}
	
		// ÀÀ±Þ½ÇÀÏ °æ¿ì (2011.03.14 Ahn)
		fGetWardChngInfo("Y", wardcd, sectioncd);  
		
		//»ó´ÜÁ¤º¸ÀÖÀ»¶§ º´µ¿, º´½Ç, ȯÀÚ¸í, pid ¼¼ÆÃ
		if( !isNull(pid)){
				opt_pid.value = pid;
				// Ãß°¡ (2011.03.29 Ahn)
				opt_sexage.value = sexage;
				opt_patnm.value = patnm;
				opt_age.value = age;
				
				//»ó´ÜȯÀÚ°¡ Åð¿øȯÀÚÀÏ°æ¿ì
				if(model.getValue("/root/main/paminfo/pamlist/dschdd") != "99991231"){				  		 
						fGetICUList();                 //ÁßȯÀڽǸ®½ºÆ® Á¶È¸
						fSetICUInOutFlag(pid, wardcd); //ÁßȯÀڽǴçÀÏÀÔÅð½Ç¿©ºÎ
						
						model.setValue("/root/cond/patnm",patnm );
						model.setValue("/root/cond/sexage",sexage );
						model.setValue("/root/cond/age",age );
						
						//¼öÇàÀϽà ÃʱâÈ­°ª ¼¼ÆÃ
						model.setValue('/root/cond/execdd', getCurrentDate());
						model.setValue('/root/cond/exectm', getCurrentTime().substring(0, 4));
						model.setValue('/root/cond/execnm', getUserInfo("usernm"));
						
						model.removenode(xRecMasterPath);	//±â·Ï¸¶½ºÅ͸®¼Â
						model.removenode('/root/main/recpntgrup/recpntlist');	//»ó¼¼Á¡¼ö¸®¼Â            
						model.removenode('/root/main/recdetailgrup/recdetailgruplist');	//»ó¼¼³»¿ª¸®¼Â
						fSearchPatList();//pid°¡ ÀÔ·ÂµÈ °æ¿ì¿¡´Â ÁßÁõµµ³»¿ª, »ó¼¼Á¡¼ö, »ó¼¼³»¿ª ¸ðµÎÁ¶È¸
						return;
				} else {
						//20080827 dhkim Ãß°¡                	
						fGetICUList();                  //ÁßȯÀڽǸ®½ºÆ® Á¶È¸
						fSetICUInOutFlag(pid, wardcd);  //ÁßȯÀڽǴçÀÏÀÔÅð½Ç¿©ºÎ
				}
		}
		
		//if(eERFLAG == "Y"){
		fGetWard();					//º´µ¿ Á¶È¸
		cmb_ward.value = wardcd;
		
		fGetRoom();					//º´½Ç °Ë»ö
		fmisetting();				//³»È¯ÀÚ ¼¼Æà Á¶È¸
		//if(!isNull(roomcd)){	
		//	cmb_room.value = roomcd;
		//}	
		if(eERFLAG == "Y"){    // ÀÀ±Þ½Ç ȯÀÚ Á¶È¸ (2011.03.15 Ahn)
				fGetCareComPatList(cmb_ward.value, cmb_room.value, cmb_zone.value);
		} else {
				fGetPatient();				//ȯÀÚ°Ë»ö
		}
		
		//}else{
		//}
		
		//¼öÇàÀϽà ÃʱâÈ­°ª ¼¼ÆÃ
		model.setValue('/root/cond/execdd', getCurrentDate());
		model.setValue('/root/cond/exectm', getCurrentTime().substring(0, 4));
		model.setValue('/root/cond/execnm', getUserInfo("usernm"));
		
		model.removenode(xRecMasterPath);												//±â·Ï¸¶½ºÅ͸®¼Â
		model.removenode('/root/main/recpntgrup/recpntlist');		//»ó¼¼Á¡¼ö¸®¼Â
		model.removenode('/root/main/recdetailgrup/recdetailgruplist');	//»ó¼¼³»¿ª¸®¼Â
		fSearchPatList();		//pid°¡ ÀÔ·ÂµÈ °æ¿ì¿¡´Â ÁßÁõµµ³»¿ª, »ó¼¼Á¡¼ö, »ó¼¼³»¿ª ¸ðµÎÁ¶È¸
		model.refresh();
}


/**
 * @author : dhkim
 * @create : 20080829
 * @desc   :ÇØ´çȯÀÚ°¡ ÁßȯÀڽǴçÀÏÀÔ½ÇȯÀÚÀÎÁö,
			´çÀÏÅð½ÇȯÀÚÀÎÁö ¿©ºÎ¿¡ µû¶ó Á¶È¸Á¶°ÇÀÇ ÁßÁõµµ ±¸ºÐÀ» º¯°æ
			1.ÁßȯÀÚ½ÇȯÀÚÀÎÁö üũ
			2.ÁßȯÀÚ½Ç ´çÀÏÅð½ÇȯÀÚÀÎÁö üũ(Åð¿ø¿¹°íÆ÷ÇÔ)
			  ÇØ´çȯÀÚ¸é Á¶È¸Á¶°ÇÀÇ ÁßÁõµµ±¸ºÐÀ» ÁßȯÀÚ½ÇÅð½Ç·Î ¼±Åûóź¯°æ
			3.ÁßȯÀÚ½Ç ´çÀÏÀÔ½ÇȯÀÚÀÎÁö üũ
			  ÇØ´çȯÀÚ¸é Á¶È¸Á¶°ÇÀÇ ÁßÁõµµ±¸ºÐÀ» ÁßȯÀÚ½ÇÀԽǷΠ¼±Åûóź¯°æ
*/

function fSetICUInOutFlag(pid, wardcd){
		var icuYn = 'N';
		/*
		//ÁßȯÀÚ½Ç È¯ÀÚÀÎÁö ¿©ºÎ¸¦ Á¶È¸
		for(var i = 0; i < icuArr.length; i++){
				if(wardcd == icuArr[i]){
						icuYn = 'Y';
						break;
				}
		}
		*/
		//ÁßÁõµµ ±â·Ï¿¡¼­ »ç¿ëÇÏ´Â ºÎ¼­ÄÚµå Á¶È¸_20090414_SMYÃß°¡
		for(i = 1; i <= getNodesetCount("/root/init/icucdgrup/icucdgruplist"); i++){
				if(wardcd == model.getValue("/root/init/icucdgrup/icucdgruplist[" + i + "]/wardcd")
					&& model.getValue("/root/init/icucdgrup/icucdgruplist[" + i + "]/clsflag") == '4'){
						icuYn = 'Y';
						break;
				}
		}

		//ÁßȯÀÚ½Ç È¯ÀÚÀÏ°æ¿ì¸¸ ÀÔÅð½Ç¿©ºÎüũ
		if(icuYn == 'Y'){
				//ÀÔ½Ç, Åð½Ç¿©ºÎ
				model.removenode('/root/send');
				model.makeValue('/root/send/pid', pid);
				model.makeValue('/root/send/wardcd', wardcd);

				if(submit('TRMNW04015')){
				/*
						var icuOutYn = model.getValue('/root/hidden/icuinout/icuinoutinfo/outyn');
						var icuInYn = model.getValue('/root/hidden/icuinout/icuinoutinfo/inyn');

						if(icuOutYn == 'Y'){
								model.setValue('/root/cond/clsflag', '7');//ÁßȯÀÚ½ÇÅð½Ç
						}else if(icuInYn == 'Y'){
								model.setValue('/root/cond/clsflag', '6');//ÁßȯÀÚ½ÇÀÔ½Ç
						}else{
								model.setValue('/root/cond/clsflag', '4');//ÁßȯÀÚ½Ç
						}
			*/
						model.setValue('/root/cond/clsflag', '4');//ÁßȯÀÚ½Ç
						model.refresh();
				}
		}
}


/**
 * @author : dhkim
 * @create : 20080827
 * @desc   : º´µ¿¸®½ºÆ®Áß ÁßȯÀڽǸ®½ºÆ®¸¸ Á¶È¸ÇØ hidden½ÃÅ´.
 *           ÁßȯÀÚ½Ç ±¸ºÐ ¾øÀ½.. ÇϵåÄÚµù .. ¡æ '3060100000','3060200000','3060300000','3060400000','3060600000'
 */
function fGetICUList(){

	var wardCnt = getNodesetCount("/root/hidden/wardcdgrup/wardcdgruplist");//ward list ³ëµå °¹¼ö
	var wardcd, wardnm ;

	model.removenode('/root/temp/signdata/recpntgrup/recpntlist');
	model.makeNode('/root/temp/signdata/recpntgrup/recpntlist');

	var nodeCnt = 0;

	/*
	for(var j = 0; j < icuArr.length; j++){

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

			wardcd = model.getValue('/root/hidden/wardcdgrup/wardcdgruplist[' + i + ']/wardcd');
			wardnm = model.getValue('/root/hidden/wardcdgrup/wardcdgruplist[' + i + ']/wardnm');

			if(wardcd == icuArr[j]){
				nodeCnt += 1;
				model.makeValue('/root/hidden/icucdgrup/icucdgruplist[' + nodeCnt + ']/cd', wardcd);
				model.makeValue('/root/hidden/icucdgrup/icucdgruplist[' + nodeCnt + ']/nm', wardnm);
			}
		}
	}
	*/

	//ÁßÁõµµ ±â·Ï¿¡¼­ »ç¿ëÇÏ´Â ºÎ¼­ÄÚµå Á¶È¸_20090414_SMYÃß°¡
	for(j = 1; j <= getNodesetCount("/root/init/icucdgrup/icucdgruplist"); j++){
		for(var i = 1; i <= wardCnt; i++){

			wardcd = model.getValue('/root/hidden/wardcdgrup/wardcdgruplist[' + i + ']/wardcd');
			wardnm = model.getValue('/root/hidden/wardcdgrup/wardcdgruplist[' + i + ']/wardnm');

			if(wardcd == model.getValue("/root/init/icucdgrup/icucdgruplist[" + j + "]/wardcd")
				&& model.getValue("/root/init/icucdgrup/icucdgruplist[" + j + "]/clsflag") == '4'){
					nodeCnt += 1;
					model.makeValue('/root/hidden/icucdgrup/icucdgruplist[' + nodeCnt + ']/cd', wardcd);
					model.makeValue('/root/hidden/icucdgrup/icucdgruplist[' + nodeCnt + ']/nm', wardnm);

			}
		}


	}

}

/**
 * @author : dhkim
 * @create : 20080827
 * @desc   : ÇØ´çȯÀÚ°¡ ÁßȯÀÚ½Ç È¯ÀÚÀΰ¡?
 * @return : boolean (true/false)
 */
function fIsICUPatient(wardcd){

	var ret = false;//icu ȯÀÚÀÎÁö ¿©ºÎ µðÆúÆ®
	/*
	for(var i = 0; i < icuArr.length ; i++){
		if(wardcd == icuArr[i]){
			ret = true;
			return true;
		}
	}
	*/
	//ÁßÁõµµ ±â·Ï¿¡¼­ »ç¿ëÇÏ´Â ºÎ¼­ÄÚµå Á¶È¸_20090414_SMYÃß°¡
	for(i = 1; i <= getNodesetCount("/root/init/icucdgrup/icucdgruplist"); i++){
		if(wardcd == model.getValue("/root/init/icucdgrup/icucdgruplist[" + i + "]/wardcd")
			&& model.getValue("/root/init/icucdgrup/icucdgruplist[" + i + "]/clsflag") == '4'){
				ret = true;
				return true;
		}
	}


	return ret;

}


/**
 * @author : dhkim
 * @desc   : º´µ¿°ª value changed µÆÀ»¶§ º´µ¿º° ºÐ·ù±¸ºÐ ¶óµð¿À¹öÆ° º¯°æ(default)
 */
function fChangeWardByRadio(wardcd){

/*
	var clsflag = '1';

  	switch (wardcd){
    	case "3050122000" : clsflag = "5" ; break;	//10Ãþµ¿º´µ¿(Á¤½Å°úº´µ¿)
        case "2110201000" : clsflag = "2" ; break;	//½Å»ý¾ÆÁßȯÀÚ½Ç(½Å»ý¾ÆICU)
        case "3060000000" : clsflag = "4" ; break;	//ÁßȯÀÚ½Ç
        case "3060600000" : clsflag = "4" ; break;	//2ÃþÁßȯÀÚ½Ç
        case "3060400000" : clsflag = "4" ; break;	//¼øȯ±â°èÁßȯÀÚ½Ç
        case "3060300000" : clsflag = "4" ; break;	//½Å°æ¿Ü°úÁßȯÀÚ½Ç
        case "3060200000" : clsflag = "4" ; break;	//¿Ü°úÁßȯÀÚ½Ç
        case "3060100000" : clsflag = "4" ; break;	//³»°úÁßȯÀÚ½Ç
        default : clsflag = "1"						//default´Â ÀϹݺ´µ¿ÀÓ.
    }
*/

		//ÁßÁõµµ ±â·Ï¿¡¼­ »ç¿ëÇÏ´Â ºÎ¼­ÄÚµå Á¶È¸_20090414_SMYÃß°¡
		var clsflag = "1";

		for(i = 1; i <= getNodesetCount("/root/init/icucdgrup/icucdgruplist"); i++){
				if(wardcd == model.getValue("/root/init/icucdgrup/icucdgruplist[" + i + "]/wardcd")){	 // ÁßȯÀÚ½ÇÀ̸é
						if(wardcd == model.getvalue("/root/code/codeinfo/codelist[cdgrupid='052']/cdid")){ // ½Å»ý¾ÆÁßȯÀÚ½ÇÀ̸é
								clsflag = '2';
						} else {
								clsflag = model.getValue("/root/init/icucdgrup/icucdgruplist[" + i + "]/clsflag");
						}
				}
		}
		
		if (clsflag == '1') {
				if(wardcd == model.getvalue("/root/code/codeinfo/codelist[cdgrupid='W02']/cdid")){		// 302º´µ¿À̸é
						clsflag = '5'
				} else if(wardcd == model.getvalue("/root/code/codeinfo/codelist[cdgrupid='055']/cdid")){		// Àΰø½ÅÀå½ÇÀ̸é
						clsflag = '3'
				} else {
						clsflag = '1';
				}
		}
		
		//Àΰø½ÅÀå½Ç¿¡¼­ ¸Þ´º ¶ç¿ï °æ¿ì Ç÷¾×Åõ¼® ¼ÂÆÃ_20090211_SMYÃß°¡
		//Àΰø½ÅÀå½Ç Ç÷¾×Åõ¼®°£È£±â·Ï¿¡¼­ È­¸é ¿¬µ¿½Ã parmaÃß°¡-kys-20100412
		if(getScreenMenuParameter() == "SMMND" || opener.javascript.getParameter("SMMND00700_param_dial") == "dialrec"){
				clsflag = "3";
		}
		
		model.setValue('/root/cond/recflag', '1');
		model.setValue('/root/cond/clsflag', clsflag);
}


/**
 * @group  :
 * @ver    : 2007.12.04
 * @by     : ½ÅÇõÃá
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : ÁßÁõµµ º´µ¿ °Ë»ö
 * @param  :
 * @return :
 * @---------------------------------------------------
 */
function fGetWard(){
	model.removeNodeset("/root/send");
	submit("TRMNW04003"); //º´µ¿ Á¶È¸
}

/**
 * @group  :
 * @ver    : 2007.12.04
 * @by     : ½ÅÇõÃá
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : ÁßÁõµµ º´½Ç °Ë»ö
 * @param  :
 * @return :
 * @---------------------------------------------------
 */
function fGetRoom(flag){
	model.removeNodeset("/root/send");
	model.makeValue("/root/send/wardcd",model.getValue("/root/cond/wardcd"));
	var setchk = model.getValue("/root/main/cond/settingrnid");
	submit("TRMNW04008"); //º´½Ç Á¶È¸
	
	addComboItem("cmb_room", "Àüü", "", "above");
}

/**
 * @group  :
 * @ver    : 2007.12.04
 * @by     : ½ÅÇõÃá
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : ÁßÁõµµ ȯÀÚ °Ë»ö
 * @param  :
 * @return :
 * @---------------------------------------------------
 */
function fGetPatient(){
	model.removeNodeset("/root/send");
	model.makeValue("/root/send/wardcd",model.getValue("/root/cond/wardcd"));
	model.makeValue("/root/send/roomcd",model.getValue("/root/cond/roomcd"));
	model.makeValue("/root/send/pid",model.getValue("/root/cond/pid"));	
	submit("TRMNW04009"); //ȯÀÚ Á¶È¸
}


/**
 * @ver    : 2008.06.20
 * @author : dhkim
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @param  :
 * @return :
 * @desc   : ±×¸®µå ȯÀÚÁ¤º¸ ¸®½ºÆ® Á¶È¸
 * @---------------------------------------------------
 */
function fSearchPatList(flag){

	var wardcd = model.getValue(cmb_ward.attribute('ref'));
	var roomcd = model.getValue(cmb_room.attribute('ref'));
	var pid = "";
	
	if(flag != "Srch"){
		if(eERFLAG=="Y"){   // ÀÀ±Þ½Ç (2011.03.15 Ahn)
			pid = cmb_erpat.value;
		}else{
			pid = model.getValue(cmb_pid.attribute('ref'));
		}
	}

	
	var onlyPatSrch = "N";
	if (flag == "Srch"){
		// ±¸ºÐ °ª µ¿±âÈ­ Á¶È¸±¸ºÐ -> ¶óµð¿À±¸ºÐ(2011.04.01 Ahn)		
		var recsrchflag = model.getValue('/root/cond/recsrchflag');
		var selRecFlag = fGetMinSrchFlag(recsrchflag); // ºÐ·ù±¸ºÐ Áß ¿ì¼±¼øÀ§ °ª °¡Á®¿À±â
		if(selRecFlag == 1){
			model.setValue("/root/cond/clsflag", 1);
			model.setValue("/root/cond/recflag", 1);
			}
		else if(selRecFlag == 2){ 
			model.setValue("/root/cond/clsflag", 9);
			model.setValue("/root/cond/recflag", 2);
		}
		else if(selRecFlag == 3){
			model.setValue("/root/cond/clsflag", 10);
			model.setValue("/root/cond/recflag", 3);
		}
		else if(selRecFlag == 4) {
			model.setValue("/root/cond/clsflag", 11);
			model.setValue("/root/cond/recflag", 4);
		}
		else{
			//messageBox('ÃÖ¼Ò ÇÑ°³ ¼±ÅÃÀº Çʼö', 'I009');
			model.setValue("/root/cond/clsflag", "");
			onlyPatSrch = "Y";
			//event.defaultAction = "cancel";
			//return;
		}
		
	}else if (flag == "Sel"){
		// ±¸ºÐ °ª µ¿±âÈ­ ¶óµð¿À ±¸ºÐ -> Á¶È¸±¸ºÐ		
		var selClsFlag = model.getValue('/root/cond/clsflag');
		//var selRecFlag = fGetMinSrchFlag(recsrchflag); // ºÐ·ù±¸ºÐ Áß ¿ì¼±¼øÀ§ °ª °¡Á®¿À±â
		if(parseInt(selClsFlag) < 8){
			model.setValue('/root/cond/recsrchflag', 1);
			model.setValue('/root/cond/recflag', 1);
    		//recflag = "1";//ÁßÁõµµ
    	}else if(parseInt(selClsFlag) >= 8 && parseInt(selClsFlag) < 10){
    		model.setValue('/root/cond/recsrchflag', 2);
			model.setValue('/root/cond/recflag', 2);
    		//recflag = "2";//³«»ó
    	}else if(parseInt(selClsFlag) == 10){
    		model.setValue('/root/cond/recsrchflag', 3);
			model.setValue('/root/cond/recflag', 3);
    		//recflag = "3";//¿åâ
    	}else if(parseInt(selClsFlag) == 11){
    		model.setValue('/root/cond/recsrchflag', 4);
			model.setValue('/root/cond/recflag', 4);
			//alert("ÅëÁõ±â·Ï °ü·Ã °³¹ßÁßÀÔ´Ï´Ù!!");
			//messageBox('°ü·Ã È­¸é ÁغñÁß', 'I009');
			//modal("SMMNW04800",1, event.screenX-200, event.screenY+50); //ÅëÁõ°ü¸®±â·Ï È­¸é È£Ãâ
			//messageBox('ÅëÁõÀ§Çè »çÁ¤±¸ºÐÀ» ¼±ÅÃÇϽʽÿÀ', 'I');
			//modal("SMMNW04800",1); //ÅëÁõ°ü¸®±â·Ï È­¸é È£Ãâ
			//model.refresh();
			//return;
    		//recflag = "1";//default
    	}
	}
	
	var clsflag = model.getValue('/root/cond/clsflag');
	var recflag = model.getValue('/root/cond/recflag');
	var settingrnid = model.getValue('/root/cond/settingrnid');//³»È¯ÀÚ

	//20080820 ÁÖ¼®Ã³¸®
	//var bloodioflag = model.getValue('/root/cond/bloodioflag');//Ç÷¾×Åõ¼®¿Ü·¡ÀÔ¿ø±¸ºÐ 2008.08.07 dhkim Ãß°¡

	//default ¼¼ÆÃ
	if(wardcd == null || wardcd == ''){
		//wardcd = '-';				//20090319_SMY_ÁÖ¼®Ã³¸®ÇÔ
	}
	if(recflag == null || recflag == ''){
		recflag = '1';
	}
	if(clsflag == null || clsflag == ''){
		clsflag = '1';
	}
	//ĸ¼ÇÀ» ¶óµð¿À ±¸ºÐ¿¡ µû¶ó º¯°æ
	fChangeCaption(clsflag);

	//ȯÀÚÁ¤º¸ ±×¸®µåÀÇ Ä÷³À» ¶óµð¿À±¸ºÐ¿¡ µû¶ó º¯°æ
	fChangeGridColumn(clsflag);


	//Ç÷¾×Åõ¼®¼±ÅÃÀÏ °æ¿ì Á¶È¸Á¶°Çclear
	if(clsflag == '3'){
		wardcd = '';
		roomcd = '';
		//pid    = '';
		/* 20080820 ÁÖ¼®Ã³¸®
		if(bloodioflag == ''){
			bloodioflag = 'I';//default
			model.setValue('/root/cond/bloodioflag', bloodioflag);

		}
		*/
	}


	//¼±ÅÃµÈ ºÐ·ù±¸ºÐ ¶óµð¿À¹öÆ° Äڵ忡 µû¶ó ½ÇÁ¦ ÀÔ·ÂÇÒ clsflag, recflag °ªÀ» ¼³Á¤ÇØÁØ´Ù.
	if(Number(clsflag) < 8){
		recflag = '1';//ÁßÁõµµ
	}else if(Number(clsflag) >= 8 && Number(clsflag) < 10){
		recflag = '2';//³«»ó
		if ( model.getValue("/root/cond/agechk") == "Y" ){
		    model.setValue("/root/cond/agechk", "N" );
		    //bool_agechk.dispatch("xforms-value-changed");
		}
		
	}else if(Number(clsflag) == 10){
		recflag = '3';//¿åâ
	}else if(Number(clsflag) == 11){         // ÅëÁõ Ãß°¡ (2011.03.31 Ahn)
		recflag = '4';//ÅëÁõ
	}else{
		recflag = '1';//default
	}

	//Á¶È¸Á¶°ÇÀÇ recflag, clsflag°ªÀ» Àç¼³Á¤ÇÑ´Ù.
	model.setValue('/root/cond/wardcd',  wardcd);
	model.setValue('/root/cond/roomcd',  roomcd);
	//model.setValue('/root/cond/pid',     pid);
	//model.setValue('/root/cond/recflag', recflag);
	//model.setValue('/root/cond/clsflag', clsflag);

	//alert('recflag : ' + recflag + ', clsflag : ' + clsflag);

	//Á¶È¸Àü instance ¼³Á¤
	model.removenode('/root/send');
	model.makeNode('/root/send');
	model.copyNode('/root/send', '/root/cond');
	var cretno = "";
	var dschdd ="";
	if ( !isNull(pid) && pid == model.getValue("/root/main/paminfo/pamlist/pid") ){
    	cretno= model.getValue("/root/main/paminfo/pamlist/cretno");
    	dschdd = model.getValue("/root/main/paminfo/pamlist/dschdd")
	    
	}else if (!isNull(pid) && !isNull(model.getValue("/root/hidden/patientgrup/patientgruplist[pid='"+ pid +"']/dschdd") ) ){
    	cretno= model.getValue("/root/hidden/patientgrup/patientgruplist[pid='"+ pid +"']/cretno")
    	dschdd = model.getValue("/root/hidden/patientgrup/patientgruplist[pid='"+ pid +"']/dschdd");
	}else {
	    dschdd = "99991231";
	}
	
	model.makeValue('/root/send/cretno', cretno);
	model.makeValue('/root/send/dschdd', dschdd);


	model.removenode('/root/main/patinfo');
	model.makeNode('/root/main/patinfo');

	//ÁßÁõ¸¶½ºÅÍ, »ó¼¼Á¡¼ö, »ó¼¼³»¿ª, »ó¼¼¼³¸íÀÇ ÇöÀçinstance¸¦ removeÇÑ´Ù.
	model.removenode('/root/main/recgrup');
	model.removenode('/root/main/recpntgrup');
	model.removenode('/root/main/recdetailgrup');
	model.removenode('/root/main/tar_desccnts');
	model.refresh();

	// ÀÀ±Þ½Ç ȯÀÚÁ¤º¸ flag »ðÀÔ (2011.03.15 ahn)
	model.makeValue('/root/send/erflag', eERFLAG);
	
	// ÀÀ±Þ½Ç ȯÀÚ ±¸¿ªÁ¤º¸ »ðÀÔ (2011.03.15 ahn)
	model.makeValue('/root/send/zonecd', cmb_zone.value);
	
	//ȯÀÚÁ¤º¸ ±×¸®µå ¸®½ºÆ® Á¶È¸
	if(!submit('TRMNW04004')){
		messageBox('ȯÀÚÁ¤º¸ Á¶È¸¸¦', 'E009');//½ÇÆÐÇÏ¿´½À´Ï´Ù.
		return;
	}else{

		//±â·Ï¸¶½ºÅ͸®¼Â
		model.removenode(xRecMasterPath);
		//»ó¼¼Á¡¼ö¸®¼Â
		model.removenode('/root/main/recpntgrup/recpntlist');
		//»ó¼¼³»¿ª¸®¼Â
		model.removenode('/root/main/recdetailgrup/recdetailgruplist');

		//2008.08.05 dhkim Ãß°¡
		//pid°¡ ÀÔ·ÂµÈ °æ¿ì¿¡´Â ȯÀÚÁ¤º¸¿¡ ÇØ´ç pidÀÇ È¯ÀÚ¿¡ Æ÷Ä¿½º À̵¿°ú µ¿½Ã¿¡ ÁßÁõµµ ³»¿ª ÀÚµ¿Á¶È¸
		if(pid != ''){
			for(var i = 1; i < grd_patinfo.rows; i++){
				if(model.getValue('/root/main/patinfo/patlist[' + i + ']/pid') == pid ){
					grd_patinfo.row = i+1;
					break;
				}
			}
			
			// Á¶È¸±¸ºÐÀÌ ¾Æ¹«°Íµµ ¼±ÅõÇÁö ¾ÊÀº °æ¿ì 
			if(onlyPatSrch != "Y"){
				//ÁßÁõµµ/³«»ó/¿åâ ³»¿ª Á¶È¸(grd_recmaster)
				fSearchRecMaster(grd_patinfo.row, recflag);
			}
			
		}

	}
	
	// ±×¸®µå À籸¼º (2011.03.30 Ahn)
	fSetPatGrid(grd_patinfo, "Pat");
	
	if( !isNull(pid)){
		if( dschdd != "99991231"){		                
          //otp_dsch.visible = true;
		  cmb_pid.visible  =false;		
		  cmb_ward.disabled = true;
		  cmb_room.disabled = true;
		  cmb_erpat.visible = false;
		  //ipt_pid.disabled = true;	
		  model.refresh();
        }
    }
	
	/*
	// ȯÀÚ°¡ ÇѸíÀÏ °æ¿ì row ¼±Åà ÇØÁ¦ (»ö±ò °ü·Ã) 
	if(grd_patinfo.row == 2){
		grd_patinfo.row = 0;
	}
	*/

}




/**
 * @group  :
 * @ver    : 2007.12.05 ½ÅÇõÃá
 *           2008.06.09 dhkim ¼öÁ¤
 * @by     : dhkim
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @param  : curRow - ÇöÀç ¼±ÅÃµÈ ±×¸®µåÀÇ Çà À妽º, pFlag : save ÀúÀåÈÄ ÀçÁ¶È¸ÇÒ°æ¿ì »ó´Ü ¼öÇàÀÏÀڴ ù¹ø°ÇàÀÇ ³¯Â¥·Î ¼¼ÆÃÇÑ´Ù.
 * @return :
 * @desc   : ȯÀÚÁ¤º¸ ±×¸®µå ´õºíŬ¸¯ À̺¥Æ® ¹ß»ý½Ã È£ÃâµÊ
 *           ÁßÁõµµ ±¸ºÐ¿¡ µû¸¥ ÁßÁõµµ/³«»ó/¿åâ ³»¿ª Á¶È¸
 *           [ÀÓÀÇ ÄÚµå ºÎ¿© clsflag]
 *           (1) ÁßÁõµµ ±¸ºÐ
 *            1: ÀϹݺ´µ¿
 *            2: ½Å»ý¾Æ ICU
 *            3: Ç÷¾×Åõ¼®
 *            4: ÁßȯÀÚ½Ç
 *            5: Á¤½Å°úº´µ¿
 *           10: ÁßȯÀÚ½ÇÀÔ½Ç(½ÇÁ¦ flag´Â 4(ÁßȯÀÚ½Ç)·Î ³Ñ±â³ª ´çÀÏ ÁßȯÀÚ½Ç ÀÔ½ÇȯÀÚ¸¸ Á¶È¸
 *           11: ÁßȯÀÚ½ÇÅð½Ç(½ÇÁ¦ flag´Â 4(ÁßȯÀÚ½Ç)·Î ³Ñ±â³ª ´çÀÏ ÁßȯÀÚ½Ç Åð½ÇȯÀÚ¸¸ Á¶È¸
 *           (2) ³«»óÀ§Çè»çÁ¤±¸ºÐ
 *            7: ¼Ò¾Æ
 *            8: ¼ºÀÎ -> Morse Scale
 *           (3) ¿åâÀ§Çè»çÁ¤±¸ºÐ (¿åâ -> Braden Scale)
 *            9: ¿åâ(¿åâÀ§Çè»çÁ¤±¸ºÐ)
 *
 *           *2008.08.05 dhkim Ãß°¡
 *            ÇØ´çȯÀÚÀÇ ÀÔ¿øÀÏÀÚ ÀÌÀüÀ¸·Î ¼öÇàÀÏÀÚ¸¦ ±â·ÏÇÏ·Á°í ÇÒ¶§¿¡´Â blockingó¸®
 * @---------------------------------------------------
 */
function fSearchRecMaster(curRow,pFlag){
	//Ç÷¾×Åõ¼®ÀÇ °æ¿ì ÀÔ¿øȯÀÚ ´õºíŬ¸¯ ÇÒ¶§¿¡ Á¶È¸Á¶°Ç¿¡ ±âº» Á¶È¸°ªÀ» ¼¼ÆÃÇؾßÇÔ.
	//Ç÷¾×Åõ¼®ÀÇ °æ¿ì ¿Ü·¡È¯ÀÚ ´õºíŬ¸¯Àº Á¶È¸Á¶°Ç ºñÈ°¼ºÈ­
	var clsflag	 = model.getValue('/root/cond/clsflag');//ºÐ·ù±¸ºÐ
	var recflag  = model.getValue('/root/cond/recflag');//±â·Ï±¸ºÐ


//	var ioflag	 = model.getValue('/root/main/paminfo/pamlist/ioflag');   //¿Ü·¡/ÀÔ¿ø±¸ºÐ
//	var pid      = model.getValue('/root/main/paminfo/pamlist/pid');	   //µî·Ï¹øÈ£
//	var indd     = model.getValue('/root/main/paminfo/pamlist/indd');     //ÀÔ¿øÀÏÀÚ
//	var histstat = model.getValue('/root/main/paminfo/pamlist/histstat'); //À̷»óÅÂ
//	var cretno   = model.getValue('/root/main/paminfo/pamlist/cretno');   //»ý¼º¹øÈ£
//	var seqno    = model.getValue('/root/main/paminfo/pamlist/seqno');    //À̷¹øÈ£
//	var hngnm    = model.getValue('/root/main/paminfo/pamlist/hngnm');    //ȯÀÚ¸í

	var ioflag	 = model.getValue("/root/main/patinfo/patlist[" + (curRow-1) + "]/ioflag");   //¿Ü·¡/ÀÔ¿ø±¸ºÐ
	var pid      = model.getValue("/root/main/patinfo/patlist[" + (curRow-1) + "]/pid");	   //µî·Ï¹øÈ£
	var indd     = model.getValue("/root/main/patinfo/patlist[" + (curRow-1) + "]/indd");    //ÀÔ¿øÀÏÀÚ
	var histstat = model.getValue("/root/main/patinfo/patlist[" + (curRow-1) + "]/histstat"); //À̷»óÅÂ
	var cretno   = model.getValue("/root/main/patinfo/patlist[" + (curRow-1) + "]/cretno");   //»ý¼º¹øÈ£
	var seqno    = model.getValue("/root/main/patinfo/patlist[" + (curRow-1) + "]/seqno");    //À̷¹øÈ£
	var hngnm    = model.getValue("/root/main/patinfo/patlist[" + (curRow-1) + "]/hngnm");    //ȯÀÚ¸í
	

	var execdd   = model.getValue('/root/cond/execdd');  //¼öÇàÀÏÀÚ
	var exectm   = model.getValue('/root/cond/exectm');  //¼öÇà½Ã°£

	if(execdd == null || execdd == ''){
		execdd = getCurrentDate();
	}
	if(exectm == null || exectm == ''){
		exectm = getCurrentTime().substring(0, 4);
	}

	/********************************************************
	//È­¸é ¿ÀÇ½à »ó´Ü¿¡ ȯÀÚ ¼ÂÆÃÇÏÁö ¾ÊÀº °æ¿ì ÀúÀå ÈÄ¿¡µµ ȯÀÚÁ¤º¸°¡ Àüü¸®½ºÆ®·Î Á¶È¸µÇ¾î¾ß ÇÔ_ÁßÁõµµ Á¶È¸Á¶°Ç¿¡ ¼ÂÆÃÇÏÁö ¾ÊÀ½_20090211_SMY
	if(pid != '' && model.getValue('/root/cond/pid') == ''){
		model.setValue('/root/cond/pid', pid);//ȯÀÚ¼±ÅõÆÀ»¶§ Á¶È¸Á¶°Ç¿¡ µî·Ï¹øÈ£ ¼¼ÆÃ
	}
	**********************************************************/

	//2008.08.05 dhkim
	//ÇØ´çȯÀÚÀÇ ÀÔ¿øÀÏÀÚ ÀÌÀüÀ¸·Î ¼öÇàÀÏÀÚ¸¦ ±â·ÏÇÏ·Á°í ÇÒ¶§¿¡´Â blockingó¸®
	//20080820 ¿Ü·¡È¯ÀÚÀÇ °æ¿ì ¸Þ¼¼Áö º¯°æ
	/*
	if(execdd < indd){
		var msgStr  = '±â·ÏÇϽ÷Á´Â ÀÏÀÚ(';
		    msgStr += execdd.substring(0,4) + '-' + execdd.substring(4, 6) + '-' + execdd.substring(6);
		    if(ioflag == 'O'){
		    	msgStr += ')´Â ȯÀÚÀÇ ¿¹¾àÀÏÀÚ(';
		    }else{
		    	msgStr += ')´Â ȯÀÚÀÇ ÀÔ¿øÀÏÀÚ(';
		    }
		    msgStr += indd.substring(0,4) + '-' + indd.substring(4, 6) + '-' + indd.substring(6);
		    msgStr += ') ÀÌÀüÀÏÀÚ°¡ µÉ ¼ö';
		messageBox(msgStr, 'I004');
		return;
	}
	*/

	

	//20081014 i/oÁ¶°Ç°ª cond ³ëµå¿¡ setting
	model.removenode('/root/cond/ioflag');
	model.makeValue('/root/cond/ioflag', ioflag);

	model.refresh();
	//Ç÷¾×Åõ¼®¿Ü·¡È¯ÀÚÀÇ °æ¿ì Á¶È¸Á¶°ÇÀ» ºñÈ°¼ºÈ­ ó¸®
	fDisabledSearchArea(clsflag, ioflag);
	/********************************************************
	//È­¸é ¿ÀÇ½à »ó´Ü¿¡ ȯÀÚ ¼ÂÆÃÇÏÁö ¾ÊÀº °æ¿ì ÀúÀå ÈÄ¿¡µµ ȯÀÚÁ¤º¸°¡ Àüü¸®½ºÆ®·Î Á¶È¸µÇ¾î¾ß ÇÔ_ÁßÁõµµ Á¶È¸Á¶°Ç¿¡ ¼ÂÆÃÇÏÁö ¾ÊÀ½_20090211_SMY
	if(clsflag == '3'){
		//Ç÷¾×Åõ¼®¿Ü·¡È¯ÀÚÀÇ °æ¿ì Á¶È¸Á¶°Ç¿¡ pid¸¸ ¼¼ÆÃ, ÀÔ¿øȯÀÚÀÇ °æ¿ì wardcd, roomcd, pid ¼¼ÆÃ
		fSetSearchCondition(clsflag, ioflag);//Á¶È¸Á¶°Ç ¼¼ÆÃ
	}
	**********************************************************/


	//ÁßÁõµµ ¸¶½ºÅͳ»¿ªÀ» Á¶È¸ÇÑ´Ù.
	model.removenode('/root/send');
	model.makeValue('/root/send/clsflag',  clsflag);
	model.makeValue('/root/send/recflag',  recflag);
	model.makeValue('/root/send/execdd',   execdd);
	model.makeValue('/root/send/exectm',   exectm);

	model.makeValue('/root/send/pid',      pid);
	model.makeValue('/root/send/indd',     indd);
	model.makeValue('/root/send/histstat', histstat);
	model.makeValue('/root/send/cretno',   cretno);
	model.makeValue('/root/send/seqno',    seqno);
	model.makeValue('/root/send/hngnm',    hngnm);
	model.makeValue('/root/send/ioflag',    ioflag);
	
	// Á¶È¸±¸ºÐ Ãß°¡ (2011.03.31 Ahn)
	var recsrchflag = model.getValue('/root/cond/recsrchflag');
	model.makeValue('/root/send/recsrchflag', recsrchflag);
	
	// ºÐ·ù±¸ºÐ Áß ¿ì¼±¼øÀ§ °ª °¡Á®¿À±â (2011.03.31 ahn)
	var selRecFlag = fGetMinSrchFlag(recsrchflag);
	model.makeValue('/root/send/selrecflag', selRecFlag);
	//model.setValue('/root/cond/recflag', selRecFlag);       // »ó´Ü ¶óµð¿Àüũ ºÐ·ù set
	
	//model.makeValue('/root/send/recflag',  selRecFlag);
	//model.makeValue('/root/send/clsflag',  selRecFlag ? '2' : '2' model.getValue('/root/cond/clsflag'));

	
	model.removenode('/root/main/recgrup');
	model.makeNode('/root/main/recgrup');


	//»ó¼¼Á¡¼ö, »ó¼¼³»¿ª, »ó¼¼¼³¸íÀÇ ÇöÀçinstance¸¦ removeÇÑ´Ù.
	model.removenode('/root/main/recpntgrup');
	model.removenode('/root/main/recdetailgrup');
	model.removenode('/root/main/tar_desccnts');
	model.refresh();
	//ÁßÁõµµ³»¿ª ¸¶½ºÅÍ Á¶È¸ ÈÄ ±â·ÏÁ¤º¸ Á¶È¸
	if(!submit('TRMNW04011')){
		messageBox('ÁßÁõµµ³»¿ªÀÇ Á¶È¸¸¦', 'E009');
		return;
	}else{
		//Á¶È¸°¹¼ö 0À϶§ Á¶È¸ ÈÄ ¼öÇàÀÏÀÚ, ¼öÇà½Ã°£, ÃÖ±Ù ÀúÀåÀÏÀ» ¼¼ÆÃ
		//var execdd     = model.getValue('/root/cond/execdd');
		var execdd     = model.getValue('/root/cond/copyexecdd');		
		var exectm     = model.getValue('/root/cond/exectm');
		
		//model.getValue(xRecMasterPath + '[' + curRow + ']/stat')
		/*
		var maxRecFlag = 0;
		var maxClsFlag = 0;
		for(i=1; i <= getNodesetCount(xRecMasterPath); i++){
			if(selRecFlag == model.getValue(xRecMasterPath + '[' + i + ']/recflag')){
				maxRecFlag = model.getValue(xRecMasterPath + '[' + i + ']/recflag');
				maxClsFlag = model.getValue(xRecMasterPath + '[' + i + ']/clsflag');
				break;
			}
		}
		*/

		if(pFlag != "4"){
			//ÁßÁõµµ ¸¶½ºÅ͸¦ Á¶È¸ÈÄ ¼öÇàÀÏÀÚ¿¡ ÇØ´çÇÏ´Â ³»¿ªÀÌ ¾øÀ¸¸é ÇàÃß°¡, ÀÖÀ¸¸é ÇØ´ç row select
			fSetRecMaster(exectm, execdd, pFlag);
	
			//ȯÀÚÁ¤º¸¿¡ ¼±ÅÃÇÑ ·Î¿ìÁ¤º¸ set
			//grd_patinfo.row = curRow;
			//grd_patinfo.topRow = curRow;
			
			//ÁßÁõµµ »ó¼¼Á¡¼öÁ¶È¸
			fSearchRecPnt();		
		}
	}
	
}



/**
 * ÁßÁõµµ ¸¶½ºÅ͸¦ Á¶È¸ÈÄ °¡Àå ¿ì¼±¼öÇàÀÏÀÚ, ±â·Ï¼ø¹ø¿¡ ÇØ´çÇÏ´Â ³»¿ªÀÌ ¾øÀ¸¸é ÇàÃß°¡, ÀÖÀ¸¸é ÇØ´ç row select
 */
function fSetRecMaster(exectm, execdd, pFlag){

	//model.getValue(xRecMasterPath + '[' + curRow + ']/stat')
	var indx = 0;
	
	for(i=1; i <= getNodesetCount(xRecMasterPath); i++){
		if((model.getValue(xRecInfo + "/recflag") == model.getValue(xRecMasterPath + '[' + i + ']/recflag')) &&
				(model.getValue(xRecInfo + "/clsflag") == model.getValue(xRecMasterPath + '[' + i + ']/clsflag'))){
			indx = i;
			break;
		}
	}
	
	
	//if(grd_recmaster.rows > 1){
	if (indx > 0){    // ±â·Ï ³»¿ªÀÌ Á¸ÀçÇÒ °æ¿ì  (2011.03.31 Ahn)

		
		/* 
		var _recseq, _execdd;
		var selRow = 0;
		
		for(var i = 1; i < grd_recmaster.rows; i++){

			//_exectm = model.getValue(xRecMasterPath + '[' + i + ']/exectm');
			_execdd = model.getValue(xRecMasterPath + '[' + i + ']/execdd');

			//2008.08.07 dhkim ¼öÁ¤. ³¯Â¥·Î¸¸ üũ
			//if(exectm == _exectm && execdd == _execdd){
			
			if(execdd == _execdd){        // ¼öÇàÀÏÀÚ¿Í °°À¸¸é¼­ ÇØ´ç recflagÀÏ °æ¿ì
				selRow = i;
				break;
			}
		}

		if(selRow > 0){
			grd_recmaster.row = selRow; //¼öÇàÀÏÀÚ¿¡ ÇØ´çÇÏ´Â row¸¦ ¼±ÅÃ
		}else{
        
			//¼öÇàÀÏÀÚ¿¡ ÇØ´çÇÏ´Â ±â·ÏÀÌ ¾øÀ¸¸é »ó¼¼³»¿ªÀÌ updateµÉ¶§ ¸Þ¼¼Áö »Ñ¸².
			//2008.08.07 dhkim ¼öÁ¤
			//¼öÇàÀÏÀÚ¿¡ ÇØ´çÇÏ´Â ±â·ÏÀÌ ÀÖÀ¸¸é ¹«Á¶°Ç °¡Àå ÃÖ±Ù Çà¿¡ Æ÷Ä¿½º À̵¿.
			
			//grd_recmaster.insertRow("1", "above");
			//fSetNewRowRecMaster();
		}
	   */
		//¼öÇàÀÏÀÚ¿¡ ÇØ´çÇÏ´Â ±â·Ï »ó°ü¾øÀÌ ÇØ´ç ºÐ·ù±¸ºÐ ÁßÀÇ °¡Àå ù¹ø°Çà Æ÷Ä¿½º·Î À̵¿.     (2011.04.19 Ahn)
		grd_recmaster.row = indx;

		if ( pFlag =="save" )
		{
			if(model.getValue("/root/cond/nextyn") == 'Y'){
				model.setValue("/root/cond/execdd", getCurrentDate());
			}else{
				model.setValue("/root/cond/execdd", grd_recmaster.valueMatrix(grd_recmaster.row,grd_recmaster.colRef("execdd")));
			}
		}

	}else{
		//±â·ÏµÈ ³»¿ªÀÌ ÇѰǵµ ¾øÀ»¶§ ½Å±ÔÇàÀ» Ãß°¡
		grd_recmaster.addRow();
		fSetNewRowRecMaster();
	}
	
	if ( instUseYN == "Y" && grp_agechk.visible == true ){
	    model.setValue("/root/cond/agechk", model.getValue(xRecMasterPath + '[' + grd_recmaster.row + ']/agechk'));
	}else {
	    model.setValue("/root/cond/agechk", "N");
	}

}


/**
 * @group  :
 * @ver    : 2008.06.23
 * @by     : dhkim
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : ±â·Ï¸¶½ºÅÍ¿¡ ÇàÃß°¡ÈÄ °ª ¼¼ÆÃ
 * @param  :
 * @return :
 * @---------------------------------------------------
 */
function fSetNewRowRecMaster(){
	var curRow = grd_recmaster.row;
	model.setValue(xRecMasterPath + '[' + curRow + ']/execdd',   model.getValue('/root/cond/execdd'));//¼öÇàÀÏÀÚ
	model.setValue(xRecMasterPath + '[' + curRow + ']/exectm',   model.getValue('/root/cond/exectm'));//¼öÇà½Ã°£
	if (model.getValue(xRecInfo + '/recflag') == '1') var recflagnm = "ÁßÁõµµ";
	else if (model.getValue(xRecInfo + '/recflag') == '2') var recflagnm = "³«»ó";
	else if (model.getValue(xRecInfo + '/recflag') == '3') var recflagnm = "¿åâ";
	else if (model.getValue(xRecInfo + '/recflag') == '4') var recflagnm = "ÅëÁõ";
	model.setValue(xRecMasterPath + '[' + curRow + ']/recflagnm',  recflagnm);//±â·Ï ºÐ·ù±¸ºÐ¸í Ãß°¡ (2011.04.01 Ahn)
	model.setValue(xRecMasterPath + '[' + curRow + ']/totpnt',   0);  //ÃÑÁ¡
	model.setValue(xRecMasterPath + '[' + curRow + ']/execnm',   getUserName());//¼öÇàÀÚ¸í  
	model.setValue(xRecMasterPath + '[' + curRow + ']/pid',      model.getValue(xRecInfo + '/pid'));//µî·Ï¹øÈ£
	model.setValue(xRecMasterPath + '[' + curRow + ']/hngnm',    model.getValue(xRecInfo + '/hngnm'));//ȯÀÚ¸í
	model.setValue(xRecMasterPath + '[' + curRow + ']/recflag',  model.getValue(xRecInfo + '/recflag'));//±â·Ï±¸ºÐ
	model.setValue(xRecMasterPath + '[' + curRow + ']/clsflag',  model.getValue(xRecInfo + '/clsflag'));//ºÐ·ù±¸ºÐ
	model.setValue(xRecMasterPath + '[' + curRow + ']/execkind', 0);//ºÐ·ù±¸ºÐ
	model.setValue(xRecMasterPath + '[' + curRow + ']/execid',   getUserId());//¼öÇàÀÚID
	model.setValue(xRecMasterPath + '[' + curRow + ']/indd',     model.getValue(xRecInfo + '/indd'));//ÀÔ¿øÀÏÀÚ
	model.setValue(xRecMasterPath + '[' + curRow + ']/histstat', model.getValue(xRecInfo + '/histstat'));//À̷»óÅÂ
	model.setValue(xRecMasterPath + '[' + curRow + ']/cretno',   model.getValue(xRecInfo + '/cretno'));//»ý¼º¹øÈ£
	model.setValue(xRecMasterPath + '[' + curRow + ']/seqno',    model.getValue(xRecInfo + '/seqno'));//ÀÌ·ÂÀϷùøÈ£
	model.setValue(xRecMasterPath + '[' + curRow + ']/stat',     'i');//±×¸®µå»óÅÂ
	model.setValue(xRecMasterPath + '[' + curRow + ']/agechk',   'N');//±×¸®µå»óÅÂ

	model.refresh();

}



/**
 * @group  :
 * @ver    : 2007.12.06
 * @by     : ½ÅÇõÃá
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : »ó¼¼Á¡¼öÁ¶È¸ ¼ÂÆÃ
 * @param  :
 * @return :
 * @---------------------------------------------------
 */
function fSearchRecPnt(selflag){
	
	model.setValue("/root/cond/maddchk01",'');
	model.setValue("/root/cond/maddchk02",'');
	model.setValue("/root/cond/maddchk03",'');
	model.setValue("/root/cond/maddchk04",'');
	model.setValue("/root/cond/haddchk",'');
	model.setValue("/root/cond/maddchk99",'');
	model.setValue("/root/cond/haddchk01",'');

	
	group2.refresh();
	group4.refresh();
	
	var curRow  = grd_recmaster.row;
	var clsflag = "";
	var recflag = "";
	
	if(selflag == "Sel"){
		clsflag = model.getValue(xRecMasterPath + '[' + curRow + ']/clsflag');
		recflag = model.getValue(xRecMasterPath + '[' + curRow + ']/recflag');
		if(recflag == '1'){
			model.setValue("/root/cond/clsflag", clsflag);     // ÁßÁõµµ±¸ºÐ Áß ¼±Åà 
		}else if((recflag == '2') && (clsflag == '2')){
			model.setValue("/root/cond/clsflag", 9);           // ³«»ó - Morse Scale ¼±ÅÃ
		}else if((recflag == '2') && (clsflag == '1')){
			model.setValue("/root/cond/clsflag", 8);           // ³«»ó - Humpty Dumpty ¼±ÅÃ
		}else if((recflag == '3') && (clsflag == '1')){
			model.setValue("/root/cond/clsflag", 10);           // ¿åâ ¼±ÅÃ
		}else if(recflag == '4'){
			//model.setValue("/root/cond/clsflag", 11);           // ÅëÁõ ¼±ÅÃ
			//alert("ÅëÁõ°ü·Ã °³¹ßÁßÀÔ´Ï´Ù.");
			//messageBox('°ü·Ã È­¸é ÁغñÁß', 'I009');
			messageBox('ÅëÁõ°ü¸®±â·Ï ¸Þ´º¸¦ »ç¿ëÇϽʽÿÀ', 'I');
			//modal("SMMNW04800",1); //ÅëÁõ°ü¸®±â·Ï È­¸é È£Ãâ
			return;
		}
		
		fChangeCaption(model.getValue("/root/cond/clsflag"));   // ¼±ÅÃµÈ ±¸ºÐÀ¸·Î ĸ¼Ç º¯°æ (2011.04.19 ahn) 
		
	}else{
		clsflag = model.getValue(xRecInfo + '/clsflag');
		recflag = model.getValue(xRecInfo + '/recflag');
	    
	}
	
	

    // »ó´Ü ¶óµð¿À ¼±ÅÃ
    

  	//¸¶½ºÅÍ°¡ ¾Ï°Íµµ ¾øÀ»¶§³ª ÇàÃß°¡ »óÅÂÀ϶§´Â Á¶È¸¾ÈÇÏ°í ¹Ù·Î ¸®ÅÏÇÑ´Ù.
  	if(grd_recmaster.rows < 2 || model.getValue(xRecMasterPath + '[' + curRow + ']/stat') == 'i'){
  		model.removeNodeset("/root/main/recpntgrup/recpntlist");// ÁßÁõµµ »ó¼¼Á¡¼ö Ŭ¸®¾î
    	model.refresh();
  	}
  	
 	var maddchk01 = model.getValue(xRecMasterPath + '[' + curRow + ']/maddchk01'); 
 	var maddchk02 = model.getValue(xRecMasterPath + '[' + curRow + ']/maddchk02'); 
 	var maddchk03 = model.getValue(xRecMasterPath + '[' + curRow + ']/maddchk03'); 
 	var maddchk04 = model.getValue(xRecMasterPath + '[' + curRow + ']/maddchk04'); 
 	var haddchk = model.getValue(xRecMasterPath + '[' + curRow + ']/haddchk'); 
 	var haddchk01 = model.getValue(xRecMasterPath + '[' + curRow + ']/haddchk01'); 
 	var dinfo = maddchk01+maddchk02+maddchk03+maddchk04+haddchk+haddchk01;
    

	//ÁßÁõµµ³»¿ª ¼±ÅÃÇß´ø ·Î¿ìÁ¤º¸(¼öÇàÀÏÀÚ)¸¦ ÀúÀåÇÑ´Ù.
	model.removeNodeset("/root/send");
	model.makeValue("/root/send/pid", 	        model.getValue(xRecMasterPath+"["+curRow+"]/pid"));
	model.makeValue("/root/send/indd", 	        model.getValue(xRecMasterPath+"["+curRow+"]/indd"));
	model.makeValue("/root/send/cretno", 	    model.getValue(xRecMasterPath+"["+curRow+"]/cretno"));
	model.makeValue("/root/send/execdd",        model.getValue(xRecMasterPath+"["+curRow+"]/execdd"));
	//model.makeValue("/root/send/execdd",        model.getValue('/root/cond/copyexecdd'));
	model.makeValue("/root/send/recseq",        model.getValue(xRecMasterPath+"["+curRow+"]/recseq"));
	model.makeValue("/root/send/clsflag",       clsflag);
	model.makeValue("/root/send/recflag",       recflag);
	model.makeValue('/root/send/bspntgrup/dinfo', dinfo);

  	//»ó¼¼³»¿ª, »ó¼¼¼³¸íÀÇ ÇöÀçinstance¸¦ removeÇÑ´Ù.
	model.removenode('/root/main/recdetailgrup');
	model.removenode('/root/main/tar_desccnts');
	
	model.refresh();

	//»ó¼¼Á¡¼ö±×¸®µåÁ¶È¸
	if(!submit("TRMNW04007")){//»ó¼¼Á¡¼öÁ¶È¸
		messageBox('»ó¼¼Á¡¼öÁ¶È¸¸¦', 'E009');
		return;
	}else{
		//»ó¼¼Á¡¼ö±×¸®µåÀÇ Ä÷³À» Á¶È¸ÇÑ ³»¿ªÀÇ °¹¼ö¸¸Å­ È­¸é¿¡ º¸¿©ÁØ´Ù.
  		fColLqidtys();
	}
  	//ÁßÁõ±â·Ï detail »ó¼¼³»¿ª ±×¸®µå¸®½ºÆ®¸¦ Á¶È¸ÇÑ´Ù.
	
  	fSearchRecDetail();	
  	addchk();
}


 /**
 * @group  :
 * @ver    : 2007.12.06
 *           2008.06.23 dhkim ¼öÁ¤
 * @by     : ½ÅÇõÃá
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : »ó¼¼Á¡¼ö±×¸®µåÀÇ Ä÷³À» Á¶È¸ÇÑ ³»¿ªÀÇ °¹¼ö¸¸Å­ È­¸é¿¡ º¸¿©ÁØ´Ù.
 * @param  :
 * @return :
 * @---------------------------------------------------
 */

function fColLqidtys() {

  	var cnt = model.getValue("/root/main/recpntgrup/recpntlist/cnt");

	if(Number(cnt) > 0 ){

		var fdx = 0;

		var hngnm;
		var idx = 0;

		fdx = Number(grd_recpnt.colRef("hngnm"));

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

			hngnm = model.getValue("/root/main/recpntgrup/pnttitlgruplist["+ i +"]/hngnm");

          	idx = Number(fdx) + Number(i);

          	grd_recpnt.colhidden(idx)     = false;	//Á¶È¸µÈ Ä÷³ °¹¼ö¸¸Å­ ±×¸®µåÀÇ Çʵ带 º¸¿©ÁÜ
          	//grd_recpnt.colwidth(idx)      = hngnm.length * 10;		//Á¶È¸µÈ Ä÷³ °¹¼ö¸¸Å­ ±×¸®µåÀÇ Çʵ带 100À¸·Î ±æÀÌ ¼¼ÆÃ
          	grd_recpnt.colwidth(idx)      = 50; // Ä÷³»çÀÌÁî fix

          	//±×¸®µåÀÇ Å¸ÀÌƲÇʵ尪¿¡ »ó¼¼³»¿ªÀÇ Å¸ÀÌƲÀ» ¼¼ÆÃ
          	grd_recpnt.valuematrix(0, idx) = hngnm;
		   	grd_recpnt.valuematrix(1, idx) = hngnm;
      	}


		grd_recpnt.colhidden(grd_recpnt.colRef("totpnt")) = false;
	 	grd_recpnt.colhidden(grd_recpnt.colRef("resultcd")) = false;

     // 	grd_recpnt.colhidden(43) = false;//ÁßÁõµµºÐ·ùÄÚµå
     //	grd_recpnt.colhidden(44) = false;//column °¹¼ö

      	grd_recpnt.colwidth(grd_recpnt.colRef("totpnt")) = 50;
      	grd_recpnt.colwidth(grd_recpnt.colRef("resultcd")) = 50;

		//»ó¼¼Á¡¼ö ±×¸®µå 1,2¹ø° Ä÷³¿¡ µî·Ï¹øÈ£, ȯÀÚ¸í ¼¼ÆÃ
      	grd_recpnt.valuematrix(2,1) = model.getValue(xRecMasterPath+"["+grd_recmaster.row+"]/pid");
      	grd_recpnt.valuematrix(2,2) = model.getValue(xRecMasterPath+"["+grd_recmaster.row+"]/hngnm");

      	grd_recpnt.refresh();
    }
}



/**
 * @group  :
 * @ver    : 2007.12.05
 * @by     : ½ÅÇõÃá
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : ¼±ÅÃµÈ ÁßÁõµµ ³»¿ª¿¡ µû¸¥ ÁßÁõµµ »ó¼¼³»¿ªÀ» Á¶È¸ÇÑ´Ù.
 * @param  :
 * @return :
 * @---------------------------------------------------
 */
function fSearchRecDetail(){		
    var curRow  = grd_recmaster.row;

	model.removenode('/root/main/recdetailgrup');
	model.makeNode('/root/main/recdetailgrup'); 

    model.removeNodeset("/root/send");
    model.makeValue("/root/send/pid",     model.getValue(xRecMasterPath+"["+curRow+"]/pid"));
    model.makeValue("/root/send/cretno",  model.getValue(xRecMasterPath+"["+curRow+"]/cretno"));
    model.makeValue("/root/send/indd",    model.getValue(xRecMasterPath+"["+curRow+"]/indd"));
    model.makeValue("/root/send/seqno",   model.getValue(xRecMasterPath+"["+curRow+"]/seqno"));
    model.makeValue("/root/send/recseq",  model.getValue(xRecMasterPath+"["+curRow+"]/recseq"));
    model.makeValue("/root/send/clsflag", model.getValue(xRecMasterPath+"["+curRow+"]/clsflag"));
    model.makeValue("/root/send/recflag", model.getValue(xRecMasterPath+"["+curRow+"]/recflag"));
    model.makeValue("/root/send/execdd",  model.getValue(xRecMasterPath+"["+curRow+"]/execdd"));
	model.makeValue("/root/send/newexecdd",  model.getValue("/root/cond/execdd"));

	//»ó¼¼¼³¸íÀÇ ÇöÀçinstance¸¦ removeÇÑ´Ù.
	model.removenode('/root/main/tar_desccnts');
	model.refresh();

    //ÁßÁõµµ »ó¼¼³»¿ª Á¶È¸
  	if(submit("TRMNW04006")){
      	model.copyNode("/root/temp","/root/main");
      	fShowTreeRecDetailGrup();
    }
}



 /**
 * @group  :
 * @ver    : 2007.12.06
 * @by     : ½ÅÇõÃá
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : ÁßÁõµµ »ó¼¼³»¿ª Æ®¸®±¸Á¶·Î º¯È¯
 * @param  :
 * @return :
 * @---------------------------------------------------
 */
function fShowTreeRecDetailGrup(){


	//±×¸®µå¸¦ depth¿¡ ¸Â°Ô levelÀ» Á¶Á¤ÇÑ´Ù.
	var dpth = 0;
  	for(var i=1; i< grd_recdetail.rows; i++){
      	//grd_recdetail.IsSubtotal(i)   = true;
      	dpth = Number(model.getValue(xRecDetailPath+"[" + (i) + "]/depth"));
      	if(dpth == 1){
      		grd_recdetail.outlinelevel(i) = 1;
      	}else if(dpth == 2){
      		grd_recdetail.outlinelevel(i) = 2;
      	}
      	grd_recdetail.colDisabled(11) = true ;
	}

	//Æ®¸®½ºÅ¸ÀÏ ¼³Á¤
    grd_recdetail.OutlineCol = 3;
    grd_recdetail.OutlineBar = 4;
    grd_recdetail.allstyle( "all", "background-color" ) = "#FFFFFF" ;


    var iRow = grd_recdetail.rows;
    var timsval, flag;
    for(var i = 1 ; i < grd_recdetail.rows; i++ ){

    	timsval = model.getValue(xRecDetailPath+"["+ i +"]/timsval");
    	flag = model.getValue(xRecDetailPath+"["+ i +"]/flag");

      	//ÀÔ·ÂÇʵ尡 ¾Æ´Ò¶§ Á¡¼ö¸¦ ȸ»öÀ¸·Î º¸¿©ÁØ´Ù.
       	if(model.getValue(xRecDetailPath+"["+ i +"]/timsval") ==  "") {
         	grd_recdetail.cellstyle("background-color", i,5 ,i,5) = "#C0C0C0";//ȸ»ö
       	}
       	//20080827 ±¸ºÐ¿¡ üũµÇ¾îÀÖ°í ÀÔ·ÂÇʵåÀÏ ¶§ Ƚ¼ö°ªÀÌ 0ÀÌ¸é ¹è°æÀ» ³ë¶û»öÀ¸·Î º¸¿©ÁØ´Ù.
       	else if(flag == 'Y' && timsval != '' && (timsval == '0' || timsval == 0)){
       		grd_recdetail.cellstyle("background-color", i,5 ,i,5) = "#FCFF00";//³ë¶û
       	}


      	if(model.getValue(xRecDetailPath+"["+ i +"]/supcd") ==  "00000000") {//levelÀÌ »óÀ§·¹º§À϶§
        	//»ö±ò(¿¬µÎ»ö)À» ÀÔÇô¼­ º¸¿©ÁØ´Ù.
          	grd_recdetail.rowstyle(i, "data", "background-color") = "#c0ff80";
          	//±×¸®µå üũ¹Ú½º readonly true·Î º¯°æ
          	grd_recdetail.isReadonly(i, 1, i, 1) = true;//üũ¹Ú½º
      	}else{
          	//±×¸®µå üũ¹Ú½º readonly false·Î º¯°æ
          	if ( model.getValue("/root/cond/agechk") =="Y" ){
          	    grd_recdetail.isReadonly(i, 1, i, 1) = true;//üũ¹Ú½º
          	} else {
          	    grd_recdetail.isReadonly(i, 1, i, 1) = false;//üũ¹Ú½º
          	}
          	
      	}


      	var timsinptyn = model.getValue(xRecDetailPath + '[' + i + ']/timsinptyn');//Ƚ¼öÀԷ¿©ºÎ
      	if(timsinptyn == 'Y'){
          	//±×¸®µå üũ¹Ú½º readonly false·Î º¯°æ
          	if ( model.getValue("/root/cond/agechk") =="Y" ){
          	    grd_recdetail.isReadonly(i, 5, i, 5) = true;//üũ¹Ú½º
          	} else {
          	    grd_recdetail.isReadonly(i, 5, i, 5) = false;//Ƚ¼öÀÔ·ÂÇʵå readonly true·Î º¯°æ
          	}      	    
      		
      	}else if(timsinptyn == 'N'){
      		grd_recdetail.isReadonly(i, 5, i, 5) = true;//Ƚ¼öÀÔ·ÂÇʵå readonly false·Î º¯°æ
      	}

    }
  	model.refresh();
}

 /**
 * @group  :
 * @ver    : 2008.06.25
 * @by     : dhkim
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @param  : selRow ÇöÀç ¼±ÅÃÇÑ ±×¸®µå row idx
 *           selCol ÇöÀç ¼±ÅÃÇÑ ±×¸®µå col idx
 *           _supcd ÇöÀç ¼±ÅÃÇÑ ±×¸®µå rowÀÇ »óÀ§Äڵ尪
 * @desc   : Ƚ¼öÀԷ½à ÀԷ¿©ºÎ°¡ NÀÌ¸é °ªÀ» ¿ø·¡ °ªÀ¸·Î ¸®ÅÏ
 *           col = 1 (±¸ºÐüũ¹Ú½º), col=5 (Ƚ¼ö)
 * @return :
 * @---------------------------------------------------
 */
function fChangeTimsValValue(selRow, selCol, _supcd){

	if(_supcd == '00000000'){
		return;
	}

	if(selCol == 5){//Ƚ¼öº¯°æ	(Ƚ¼öÀԷ¿©ºÎ°¡ YÀΰ͸¸ ÀÔ·Â °¡´ÉÇÔ)

		var flag       = model.getValue(xRecDetailPath + '[' + selRow + ']/flag');
		var timsinptyn = model.getValue(xRecDetailPath + '[' + selRow + ']/timsinptyn');//Ƚ¼öÀԷ°¡´É¿©ºÎ

		if(timsinptyn == 'N'){
			return;
		}else if(timsinptyn == 'Y'){//Ƚ¼ö ÀԷ°¡´É»óÅÂ
			if(flag == 'N'){
				//üũ»óÅ°¡ ¾Æ´Ñ µ¥ÀÌÅÍ¿¡ Ƚ¼ö ÀԷ½à ¿ø·¡»óÅ·Πback
				model.setValue(xRecDetailPath + '[' + selRow + ']/timsval', model.getValue(xRecDetailPath + '[' + selRow + ']/bktimsval'));
			}
		}

	}
}


 /**
 * @group  :
 * @ver    : 2008.06.25
 * @by     : dhkim
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @param  : selRow ÇöÀç ¼±ÅÃÇÑ ±×¸®µå row idx
 *           selCol ÇöÀç ¼±ÅÃÇÑ ±×¸®µå col idx
 *           _supcd ÇöÀç ¼±ÅÃÇÑ ±×¸®µå rowÀÇ »óÀ§Äڵ尪
 * @desc   : üũ¹Ú½º º¯°æ¿¡ µû¸¥ ¼±ÅÃµÈ °°Àº ±×·ì³»ÀÇ Ã¼Å©¹Ú½º °ª º¯°æ
 *           col = 1 (±¸ºÐüũ¹Ú½º)
 * @return :
 * @---------------------------------------------------
 */
function fChangeCheckboxValue(selRow, selCol, _supcd){

	var curFlag = model.getValue(xRecDetailPath + '[' + selRow + ']/flag');//ÇöÀç¼±ÅÃÇÑ Ã¼Å©°ª
	var clsflag = model.getValue('/root/cond/clsflag');

	if(_supcd == '00000000'){
		return;
	}

	if(selCol == 1){//üũ°ª º¯°æ

		//2008.08.07 dhkim Ãß°¡
		//ÁßÁõµµÁßȯÀÚ½Ç(ÁßȯÀÚ½ÇÀÔ½Ç, ÁßȯÀÚ½ÇÅð½Ç Æ÷ÇÔ), ½Å»ý¾ÆICU´Â multi üũÀ̹ǷΠ±âÁ¸¿¡ üũµÈ µ¥ÀÌÅ͸¦ ÇØÁ¦ÇÏÁö ¾Ê´Â´Ù.
		//ÀϹݺ´µ¿, Á¤½Å°úº´µ¿, Ç÷¾×Åõ¼®, ³«»ó¼ºÀÎ(Morse Scale), ¿åâÀº single üũÀÓ
		var isMulti = false;
		if(clsflag == '4' || clsflag == '6' ||clsflag == '7' || clsflag == '2'){
			isMulti = true;
		}

		var supcd, flag;
		for(var i = 1; i < grd_recdetail.rows; i++){

			supcd = model.getValue(xRecDetailPath + '[' + i + ']/supcd');
			flag     = model.getValue(xRecDetailPath + '[' + i + ']/flag');

			if(!isMulti){
				//°°Àº ±×·ì³»¿¡¼­ ºñ±³
				if(supcd != '00000000' && supcd == _supcd && flag == 'Y'){//±âÁ¸ üũµ¥ÀÌÅ͸¦ ÇØÁ¦
					//¿ø·¡ üũµÇ¾îÀÖ´ø °ªÀ» ÇØÁ¦, »óÅ »èÁ¦·Î
					model.setValue(xRecDetailPath + '[' + i + ']/flag', 'N');
				}
			}


		}

		//ÇöÀç üũÇÑ °ªÀ» ¼±ÅÃ, »óÅ ½Å±Ô·Î
		if(curFlag == 'Y'){

			model.setValue(xRecDetailPath + '[' + selRow + ']/flag', 'Y');

			//20080827
			//Ƚ¼ö°ªÀÌ ÀԷ°¡´É Ç׸ñÀ̸é Ç׸ñ¿¡ üũµÇ¾úÀ»¶§ Ƚ¼öÇʵ带 ³ë¶ûÀ¸·Î º¯°æ
			if(model.getValue(xRecDetailPath+"["+ selRow +"]/timsval") != ''){
				grd_recdetail.cellstyle("background-color", selRow,5 ,selRow,5) = "#FCFF00";//³ë¶û
			}

		}else if(curFlag == 'N'){
			model.setValue(xRecDetailPath + '[' + selRow + ']/flag', 'N');

			//20080827
			//Ƚ¼ö°ªÀÌ ÀԷ°¡´É Ç׸ñÀ̸é Ç׸ñ¿¡ üũÇØÁ¦µÇ¾úÀ»¶§ Ƚ¼öÇʵ带 ÇϳÉÀ¸·Î º¯°æ
			if(model.getValue(xRecDetailPath+"["+ selRow +"]/timsval") != ''){
				grd_recdetail.cellstyle("background-color", selRow,5 ,selRow,5) = "#FFFFFF";//ÇϾç
			}
		}



		model.refresh();
	}
}

/**
 * @group  :
 * @ver    : 2008.06.25
 * @by     : dhkim
 * @-------------------------------------------------------------------------------------------------------
 * @type   : function
 * @access : public
 * @param  :
 * @return :
 * @desc   : ÀúÀåÇϱâÀü Àüü±×¸®µåÀÇ º¯°æµÈ ³»¿ª¿¡ µû¸¥ ±×¸®µå »óÅ°ªÀ» º¯°æÇÑ´Ù.
 *           (1) üũ¹Ú½º ¼±Åÿ©ºÎ¿¡ µû¸¥ »óÅ°ª º¯°æ
 *				1. ¿ø·¡°ªÀÌ Y, ÇöÀçYÀ̸é statÀº '-'
 *				2. ¿ø·¡°ªÀÌ Y, ÇöÀçNÀ̸é statÀº 'd'
 *				3. ¿ø·¡°ªÀÌ N, ÇöÀçNÀ̸é statÀº '-'
 *				4. ¿ø·¡°ªÀÌ N, ÇöÀçYÀ̸é statÀº 'i'
 *			(2) Ƚ¼ö ÀԷ¿¡ µû¸¥ »óÅ°ª º¯°æ
 *				1. ÇöÀç chkbox°¡ YÀÌ°í timsinptyn(Ƚ¼öÀԷ¿©ºÎ)ÀÌ YÀ϶§¸¸ ÀԷ°¡´ÉÇÔ.
 *				2. ¿ø·¡ chkbox°¡ Y, ÇöÀçY, ÇöÀçtimsval°ú ¿ø·¡ bktimsval°ªÀÌ ´Ù¸£¸é »óÅ°ªÀº 'u'·Î
 *				3. ÇöÀç chkbox°¡ NÀÎ °Í¿¡ timsval°ªÀÌ ÀԷµǸé timsval°ªÀ» ¿ø·¡»óÅÂ(¿ø·¡»óÅ°ª:bkimsval)·Î º¹±¸
 * @-------------------------------------------------------------------------------------------------------
 */
function fChangeGridStat(){

	var bkflag, bktimsval;	//¿ø·¡ üũ¹Ú½º°ª, ¿ø·¡È½¼ö°ª
	var flag, timsval;		//º¯°æÇÑüũ¹Ú½º°ª, º¯°æÇÑȽ¼ö°ª
	var timsinptyn;         //Ƚ¼öÀԷ¿©ºÎ
	var stat='-';			//º¯°æÇÒ ±×¸®µå »óÅ°ª
	var pntstat = '-';		//»ó¼¼Á¡¼öÀÇ stat
	var recmasterrow = 0;
	
    for( var idx = 1 ; idx < grd_recmaster.rows ; idx++ ){
        if ( model.getValue(xRecDetailPath + '[1]/pid') == model.getValue(xRecMasterPath + '['+ idx +']/pid') 
          && model.getValue(xRecDetailPath + '[1]/execdd') == model.getValue(xRecMasterPath + '['+ idx +']/execdd') 
          && model.getValue(xRecDetailPath + '[1]/recseq') == model.getValue(xRecMasterPath + '['+ idx +']/recseq') 
           ){
            recmasterrow = idx;
            grd_recmaster.row = recmasterrow;
            break;
        }
    }
    
    if ( recmasterrow == 0 ){
        messageBox( capt_master.attribute("text") + " ¼±ÅÃ" ,"I008");
        return;
    }

	for(var i = 1; i < grd_recdetail.rows; i++){

		flag      = model.getValue(xRecDetailPath + '[' + i + ']/flag');		//ÇöÀçüũ¹Ú½º°ª
		timsval   = model.getValue(xRecDetailPath + '[' + i + ']/timsval');		//ÇöÀçȽ¼ö°ª
		bkflag    = model.getValue(xRecDetailPath + '[' + i + ']/bkflag');		//¿ø·¡Ã¼Å©¹Ú½º°ª
		bktimsval = model.getValue(xRecDetailPath + '[' + i + ']/bktimsval');	//¿ø·¡È½¼ö°ª
		timsinptyn= model.getValue(xRecDetailPath + '[' + i + ']/timsinptyn');	//Ƚ¼öÀԷ¿©ºÎ

		if(bkflag == 'Y' &&  flag == 'Y'){
			if(timsinptyn == 'Y' && (timsval != bktimsval)){
				stat = 'u';
				pntstat = 'u';
			}else{
				stat = '-';
			}
		}else if(bkflag == 'Y' && flag == 'N'){
			stat = 'd';
			pntstat = 'u';
		}else if(bkflag == 'N' && flag == 'N'){
			stat = '-';
		}else if(bkflag == 'N' && flag == 'Y'){
			stat = 'i';
			pntstat = 'u';
		}

		//alert(i + stat);

		model.setValue(xRecDetailPath + '[' + i + ']/stat', stat);
		//alert(i + stat + ' , ' + );
	}
    
    
	//»ó¼¼³»¿ªÀÌ º¯°æµÇ¸é »ó¼¼Á¡¼ö¿Í ÁßÁõµµ¸¶½ºÅÍÀÇ statÀ» º¯°æ»óÅ·Π¼³Á¤ÇÑ´Ù.
	if(pntstat == 'u'){

		//ÁßÁõµµÁ¡¼ö±×¸®µå
		grd_recpnt.addStatus(2, 'update');

		//ÁßÁõµµ ¸¶½ºÅͱ׸®µå
		if(grd_recmaster.rowStatus(recmasterrow) != 1){//»óÅ°¡ ½Å±Ô»óÅ°¡ ¾Æ´Ï¸é u·Î º¯°æ
			grd_recmaster.addStatus(recmasterrow, 'update');
			model.setValue(xRecMasterPath + '[' + recmasterrow + ']/stat', 'u');
		}

	}else{

		//ÁßÁõµµÁ¡¼ö±×¸®µå
		grd_recpnt.removeStatus(2, 'update');

		//ÁßÁõµµ ¸¶½ºÅͱ׸®µå
		if(grd_recmaster.rowStatus(recmasterrow) != 1){//»óÅ°¡ ½Å±Ô»óÅ°¡ ¾Æ´Ï¸é u·Î º¯°æ
			grd_recmaster.removeStatus(recmasterrow, 'update');
			model.setValue(xRecMasterPath + '[' + recmasterrow + ']/stat', '-');
		}
	}

	model.refresh();

}



 /**
 * @group  :
 * @ver    : 2008.06.27
 * @by     : dhkim
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : ÁßÁõµµ ³»¿ª »èÁ¦¸¦ ÇÑ´Ù
 * @param  :
 * @return :
 * @---------------------------------------------------
 */
function fDelete(){

	var curRow = grd_recmaster.row;
	if(model.getValue(xRecMasterPath + '[' + curRow + ']/stat') == 'i'){
		grd_recmaster.deleteRow(curRow);
		return;
	}else{

		//20080926 ±â·ÏÀÚ¸¸ÀÌ »èÁ¦¸¦ ÇÒ ¼ö ÀÖ´Ù.
		var recid = model.getValue(xRecMasterPath + '[' + curRow + ']/execid');
		var recnm = model.getValue(xRecMasterPath + '[' + curRow + ']/execnm');
		if(recid != getUserId()){
			messageBox('±â·ÏÀ» ÀÔ·ÂÇÑ µî·ÏÀÚ( ' + recnm + ' )¸¸ ÇØ´ç ±â·Ï³»¿ªÀ» »èÁ¦ÇÏ½Ç ¼ö ÀÖ½À´Ï´Ù.' , 'E');
			return ;
		}else{

			var msg = messageBox('»èÁ¦¸¦ ÁøÇàÇϽøé ÀÔ·ÂÇϽŠ»ó¼¼³»¿ªµµ ÀüºÎ »èÁ¦µË´Ï´Ù. ¼±ÅÃÇϽŠÁßÁõµµ ³»¿ªÀ»', 'Q001');
			if(msg == 6){

				model.removenode('/root/send');
				model.setValue(xRecMasterPath + '[' + curRow + ']/stat', 'd');
				model.makeValue('/root/send/recmaster', grd_recmaster.getUpdateDataAll('d'));

	            var pid       = model.getValue(xRecMasterPath + "/pid");
	            var orddd     = model.getValue('/root/main/patinfo/patlist[' + (grd_patinfo.row-1) + ']/indd');//ÀÔ¿øÀÏ/Áø·áÀÏ
	            var cretno    = model.getValue('/root/main/patinfo/patlist[' + (grd_patinfo.row-1) + ']/cretno');//»ý¼º¹øÈ£
	            var orddeptcd = model.getValue('/root/main/patinfo/patlist[' + (grd_patinfo.row-1) + ']/orddeptcd');//Áø·á°ú
	            var orddrid   = model.getValue('/root/main/patinfo/patlist[' + (grd_patinfo.row-1) + ']/medispclid');//Áø·áÀÇ
				var ioflag	  = model.getValue('/root/main/patinfo/patlist[' + (grd_patinfo.row-1) + ']/ioflag');   //¿Ü·¡/ÀÔ¿ø±¸ºÐ
				var signno    = model.getValue(xRecMasterPath + '[' + curRow + ']/signno');//ÀÎÁõ¹øÈ£

				/* [°¢ ±¸ºÐº° ±â·Ï¼­½ÄÄÚµå]
	             * ÁßÁõµµ_ÀϹݺ´µ¿	: 0000002439
				 * ÁßÁõµµ_½Å»ý¾Æ ICU 	: 0000002440
				 * ÁßÁõµµ_Ç÷¾×Åõ¼® 	: 0000002441
				 * ÁßÁõµµ_ÁßȯÀÚ½Ç 	: 0000002442
				 * ÁßÁõµµ_Á¤½Å°úº´µ¿ 	: 0000002444
				 * ³«»ó»çÁ¤_¾Æµ¿ 		: 0000002447
				 * ³«»ó»çÁ¤_¼ºÀÎ(Morse Scale) : 0000002449
				 * ¿åâ»çÁ¤ (Braden Scale)			: 0000002450
	             */
	            var recflag = model.getValue('/root/cond/recflag');
	            var clsflag = model.getValue('/root/cond/clsflag');
	            var formcd;//±â·Ï¼­½ÄÄÚµå
	            var formnm;//¼­½Ä¸í

	            if(clsflag == '1'){
	        		formcd = '0000002439';	//ÁßÁõµµ_ÀϹݺ´µ¿
	        		formnm = 'ÁßÁõµµ»çÁ¤(ÀϹݺ´µ¿)';
	        		recflag = '1';
	        		clsflag = '1';
	        	}else if(clsflag == '2'){
	        		formcd = '0000002440';	//ÁßÁõµµ_½Å»ý¾Æ ICU
	        		formnm = 'ÁßÁõµµ»çÁ¤(½Å»ý¾Æ ICU)';
	        		recflag = '1';
	        		clsflag = '2';
	        	}else if(clsflag == '5'){
	        		formcd = '0000002444';	//ÁßÁõµµ_Á¤½Å°úº´µ¿
	        		formnm = 'ÁßÁõµµ»çÁ¤(Á¤½Å°úº´µ¿)';
	        		recflag = '1';
	        		clsflag = '5';
	        	}else if(clsflag == '4' || clsflag == '6' || clsflag == '7'){
	        		formcd = '0000002442';	//ÁßÁõµµ_ÁßȯÀÚ½Ç
	        		formnm = 'ÁßÁõµµ»çÁ¤(ÁßȯÀÚ½Ç)';
	        		recflag = '1';
	        		clsflag = '4';
	        	}else if(clsflag == '3'){
	        		formcd = '0000002441';	//ÁßÁõµµ_Ç÷¾×Åõ¼®
	        		formnm = 'ÁßÁõµµ»çÁ¤(Ç÷¾×Åõ¼®)';
	        		recflag = '1';
	        		clsflag = '3';
	        	}else if(clsflag == '8'){
	        		formcd = '0000002447';	//³«»ó»çÁ¤_¾Æµ¿
	        		formnm = '³«»óÀ§Çè»çÁ¤(Humpty Dumpty Scale)';
	        		recflag = '2';
	        		clsflag = '1';
	        	}else if(clsflag == '9'){
	        		formcd = '0000002449';	//³«»ó»çÁ¤_¼ºÀÎ(Morse Scale)
	        		formnm = '³«»óÀ§Çè»çÁ¤(Morse Scale)'; // ¼ºÀÎ -> Morse Scale (2011.03.17 ahn)
	        		recflag = '2';
	        		clsflag = '2';
	        	}else if(clsflag == '10'){
	        		formcd = '0000002450';	//¿åâ
	        		formnm = '¿åâÀ§Çè»çÁ¤(Braden Scale)';  // ¿åâ -> Braden Scale (2011.04.13 ahn)
	        		recflag = '3';
	        		clsflag = '1';
	        	}

				Sign.certreload = true ; // ÀüÀÚ¼­¸í È£Ãâ½Ã ÀÎÁõÀúÀå ¹öÆ°À»  ´©´Ã¶§¸¶´Ù ÀÎÁõ¼­°¡ ¶ßµµ·Ï ó¸®
			    // ÀÎÁõ ·ÎÁ÷ È£Ãâ
	            if(Sign.signprocess() == true){  // ¢º ÀüÀÚÀÎÁõ °ü·Ã ȯÀÚ ÀÎÀû Á¤º¸¸¦ º¸³»ÁÜ.

	             var wSigninfo = "pid"                                    +"¢Ë"  // 01 µî·Ï¹øÈ£
	                            + "orddd"                                 +"¢Ë"  // 02 ÀÔ¿øÀÏÀÚ(ÀÔ¿ø,ÀÀ±Þ)/Áø·áÀÏÀÚ(¿Ü·¡)
	                            + "cretno"                                +"¢Ë"  // 03 »ý¼º¹øÈ£
	                            + "signno"                                +"¢Ë"  // 04 ¼­¸í¹øÈ£(ÀÎÁõ¹øÈ£)
	                            + "recdd"                                 +"¢Ë"  // 05 ½ÇÁ¦ ±â·ÏÀÌ ÀÌ·ç¾îÁø ±â·ÏÀÏÀÚ
	                            + "rectm"                                 +"¢Ë"  // 06 ½ÇÁ¦ ±â·ÏÀÌ ÀÌ·ç¾îÁø ±â·Ï½Ã°£
	                            + "recsaveflag"                           +"¢Ë"  // 07 ÀüÀÚ¼­¸í ÀÎÀûÁ¤º¸ º¯°æ¿©ºÎ(±â·ÏÀϽà º¯°æµÇ´Â °æ¿ì  : Y, ±×¿Ü : N)
	                            + "signflag"                              +"¢Ë"  // 08 ¼­¸íÀڷᱸºÐ(01 : Áø·á, 02 : °£È£, 03 : LIS, 04 : Áø·áÁö¿ø)
	                            + "signgenrflag"                          +"¢Ë"  // 09 ¿Ü·¡/ÀÔ¿ø±¸ºÐ(ÄÚµåÁ¤ÀǼ­ M0010 ÂüÁ¶)
	                            + "formcd"                                +"¢Ë"  // 10 °¢ ±â·ÏÁöº° ¼­½ÄÄÚµå  0000002473  N57 °£È£  ¼ö¼ú°£È£±â·Ï
	                            + "orddeptcd"                             +"¢Ë"  // 11 Áø·áºÎ¼­ÄÚµå
	                            + "orddrid"                               +"¢Ë"  // 12 Áø·áÀÇ»çID (ÁýµµÀÇ)
	                            + "signbfcnts"                            +"¢Ë"  // 13 ¢º ÀÎÁõÇÒ µ¥ÀÌÅÍ Á¤º¸(¹Ì±â·Ï ³ëµå Á¦°ÅµÈ Á¤º¸)
	                            + "signaftcnts"                           +"¢Ë"  // 14 ¢º °øÀÎÀÎÁõ ó¸®ÈÄ µ¥ÀÌÅÍ
	                            + "screenid"                              +"¢Ë"  // 15 ¢º È­¸é¾ÆÀ̵ð
	                            + "certflag"                              +"¢Ì"  // 16 ¢º ÀÎÁõ¿©ºÎ( T : ÀÓ½ÃÀúÀå, C : ÀÎÁõÀúÀå)
	                            + pid                                     +"¢Ë"  // 01 µî·Ï¹øÈ£
	                            + orddd                                   +"¢Ë"  // 02 ÀÔ¿øÀÏÀÚ(ÀÔ¿ø,ÀÀ±Þ)/Áø·áÀÏÀÚ(¿Ü·¡)
	                            + cretno                                  +"¢Ë"  // 03 »ý¼º¹øÈ£
	                            + signno                                  +"¢Ë"  // 04 ¼­¸í¹øÈ£(ÀÎÁõ¹øÈ£)
	                            + getCurrentDate()                        +"¢Ë"  // 05 ½ÇÁ¦ ±â·ÏÀÌ ÀÌ·ç¾îÁø ±â·ÏÀÏÀÚ
	                            + getCurrentTime()                        +"¢Ë"  // 06 ½ÇÁ¦ ±â·ÏÀÌ ÀÌ·ç¾îÁø ±â·Ï½Ã°£
	                            + "Y"                                     +"¢Ë"  // 07 ÀüÀÚ¼­¸í ÀÎÀûÁ¤º¸ º¯°æ¿©ºÎ(±â·ÏÀϽà º¯°æµÇ´Â °æ¿ì  : Y, ±×¿Ü : N)
	                            + "02"                                    +"¢Ë"  // 08 ¼­¸íÀڷᱸºÐ(01 : Áø·á, 02 : °£È£, 03 : LIS, 04 : Áø·áÁö¿ø)
	                            + ioflag                                  +"¢Ë"  // 09 ¿Ü·¡/ÀÔ¿ø±¸ºÐ(ÄÚµåÁ¤ÀǼ­ M0010 ÂüÁ¶)
	                            + formcd                                  +"¢Ë"  // 10 °¢ ±â·ÏÁöº° ¼­½ÄÄÚµå (emr.mrfmform)
	                            + orddeptcd                               +"¢Ë"  // 11 Áø·áºÎ¼­ÄÚµå
	                            + orddrid                                 +"¢Ë"  // 12 Áø·áÀÇ»çID
	                            + Sign.signedInfos[1]                     +"¢Ë"  // 13 ¢º ÀÎÁõÇÒ µ¥ÀÌÅÍ Á¤º¸(¹Ì±â·Ï ³ëµå Á¦°ÅµÈ Á¤º¸)
	                            + Sign.signedInfos[2]                     +"¢Ë"  // 14 ¢º °øÀÎÀÎÁõ ó¸®ÈÄ µ¥ÀÌÅÍ
	                            + getScreenID()                           +"¢Ë"  // 15 ¢º È­¸é¾ÆÀ̵ð
	                            + "C"                                     +"¢Ì"; // 16 ¢º ÀÎÁõ¿©ºÎ( T : ÀÓ½ÃÀúÀå, C : ÀÎÁõÀúÀå)
	              model.makeValue("/root/send/signinfo"         , wSigninfo);

	            } else {
	                    return ;
	            }

				if(!submit('TXMNW04001')){
					messageBox('ÁßÁõµµ ³»¿ªÀÇ »èÁ¦¸¦', 'E009');
					return;
				}else{

					//ÁßÁõµµÁ¶È¸
					fSearchRecMaster(grd_patinfo.row);
				}

			}else if(msg == 7){
				return;
			}

		}
	}
}


 //  ¡Ø ÀÎÁõµ¥ÀÌÅÍ »ý¼ºÇÔ¼ö ¸¸µé±â
function fMake_SignData(){

        // ¢º ±â·Ï °ü·Ã ÀνºÅϽº Àüü¸¦ copy, ÀÎÁõ¿¡ ÀúÀåÇÒ ¸ðµç Instance AddNodeÇÑ´Ù.
    
    if(sAllSignSave == true){
    	
    	Sign.addnode("/root/cond");
			Sign.addnode("/root/main/patinfo/patlist[" + (patRow) + "]");
			Sign.addnode("/root/main/recgrup/recgruplist[" + (recRow) + "]");
			Sign.addnode("/root/main/recpntgrup" );
			Sign.addnode("/root/main/recdetailgrup");
			Sign.addnode("/root/temp/signdata/recpntgrup");
			Sign.addnode('/root/temp/signdata/detailinfo');
		
		} else{
			Sign.addnode("/root/cond");
			Sign.addnode("/root/main/patinfo/patlist[" + (grd_patinfo.row-1) + "]");
			Sign.addnode("/root/main/recgrup/recgruplist[" + (grd_recmaster.row) + "]");
			Sign.addnode("/root/main/recpntgrup" );
			Sign.addnode("/root/main/recdetailgrup");
			Sign.addnode("/root/temp/signdata/recpntgrup");
			Sign.addnode('/root/temp/signdata/detailinfo');
		}
			
		/***************************************/
		//1.»ó¼¼Á¡¼ö ³ëµå ¸¸µé±â
		//2.ÁßÁõµµ±¸ºÐ Çѱ۸íÀ¸·Î º¸³»±â
		/****************************************/
		/*/ --------------------------
        var condPath   = Sign.XPATH_SIGNINFO + "/cond";
        //ÁßÁõµµ ±¸ºÐ
        var clsflag = model.getValue(condpath + "/clsflag");
        if(clsflag == '1'){
        	model.makeValue(condpath + "/recflagnm", 'ÁßÁõµµ');
        	model.makeValue(condpath + "/clsflagnm", 'ÀϹݺ´µ¿');
        }*/
}

//input¼öÇàÀÏÀÚ¿¡ ÇØ´çÇÏ´Â ±â·ÏÀÏÀÌ ÀÖ´ÂÁö Á¶È¸
//½Å±Ôµ¥ÀÌÅÍ°¡ ¾Æ´Ñ°ÍÁß..(stat != 'i')
//@param : iptExecdd ÀÔ·ÂÇÏ°íÀÚ ÇÏ´Â ¼öÇàÀÏÀÚ(input ÄÄÆ÷³ÍÆ®)
//@return : arr[0] - ±â·Ï¿©ºÎ (true/false)
//          arr[1] - signno  (±â·Ï¿©ºÎ°¡ trueÀ϶§ ÇØ´ç±â·ÏÀÇ signno¸¦ ÇÒ´ç)
// 20080820 - array·Î º¯°æ
function fIsRecorded(iptExecdd){

	var retArr = new Array(1);

	var recorded = false;
	var signno   = '';

	var execdd;
	var stat;

	for(var i = 1; i < grd_recmaster.rows; i++){

		execdd = model.getValue(xRecMasterPath + '[' + i + ']/execdd');
		stat   = model.getValue(xRecMasterPath + '[' + i + ']/stat');

		if(execdd != '' && iptExecdd == execdd && stat != 'i'){
			signno = model.getValue(xRecMasterPath + '[' + i + ']/signno');
			recorded = true;

			retArr[0] = recorded;
			retArr[1] = signno;

			return retArr;
		}

	}

	retArr[0] = recorded;
	retArr[1] = signno;

	return retArr;
}



/**
 * @group  :
 * @ver    : 2008.06.25
 * @by     : dhkim
 * @-------------------------------------------------------------------------------------------------------
 * @type   : function
 * @access : public
 * @param  :
 * @return :
 * @desc   : [ÀÎÁõÀúÀå]
 *            ÁßÁõµµ ¸¶½ºÅÍ¿Í »ó¼¼³»¿ªÀ» ÀÎÁõÀúÀåÇÑ´Ù.
 *           - ÀúÀåÀü ÁßÁõµµ »ó¼¼³»¿ª Á¡¼öÀÇ À¯È¿¼ºÀ» üũÇÑ´Ù.
 *           - »ó¼¼³»¿ªÀÇ Ã¼Å©µÈ ³»¿ª Á¡¼ö¸¦ ÇÕ»êÇÏ¿© ±â·Ï¸¶½ºÅÍÀÇ totpnt¿¡ setÇÑ´Ù.
 *           - ÀÌ¹Ì ±â·ÏÀÌ ÀԷµǾî ÀÖ´Â °æ¿ì¿¡ -> grd_recmaster¿¡ »óÅ°ªÀÌ 'u'ÀÓ.
 *                             ±â·ÏµÈ ³¯Â¥°¡ Á¶È¸Á¶°ÇÀÇ ¼öÇàÀÏÀÚ¿Í °°À¸¸é db¿¡ updateó¸®ÇÏ°í
 *                             ±â·ÏµÈ ³¯Â¥¿Í Á¶È¸Á¶°ÇÀÇ ¼öÇàÀÏÀÚ°¡ ´Ù¸£¸é ½Å±Ô·Î insertó¸®ÇÑ´Ù.(¸Þ¼¼Áö·Î ¾Ë·ÁÁÙ°Í)
 * @-------------------------------------------------------------------------------------------------------
 */
function fSignSave(){	
	
	//debugger;
	sAllSignSave = false;
	var dschdd = model.getValue("/root/main/paminfo/pamlist/dschdd"); //Åð¿øÀÏÀÚ
	var indd   = model.getValue("/root/main/paminfo/pamlist/indd");   //ÀÔ¿øÀÏÀÚ
	var execdd = model.getValue("/root/cond/execdd");                 //¼öÇàÀÏÀÚ

	if(indd != '' || indd ==null) {
		if((execdd < indd) || (execdd > dschdd)) { 	//ÀÔ¿ø,Åð¿øÀÏÀÚ »çÀÌÀÇ ¼öÇàÀÏÀÚ¸¸ ÀÔ·ÂÇϵµ·Ï ºí·¯Å·
			messageBox("¼öÇàÇÏ·Á´Â ÀÏÀÚ´Â ÀÔ¿øÀÏÀÚ(" +indd.substring(0,4) + "-" + indd.substring(4, 6) + "-" + indd.substring(6) + ")ÀÌÀü ¶Ç´Â Åð¿øÀÏÀÚ("+dschdd.substring(0,4) + "-" + dschdd.substring(4, 6) + "-" + dschdd.substring(6)+")ÀÌÈÄÀÇ ÀÏÀÚ°¡ µÉ ¼ö","I004");
			return;
		}
	}
	var recmasterrow = 0;
	
    for( var idx = 1 ; idx < grd_recmaster.rows ; idx++ ){
        if ( model.getValue(xRecDetailPath + '[1]/pid') == model.getValue(xRecMasterPath + '['+ idx +']/pid') 
          && model.getValue(xRecDetailPath + '[1]/execdd') == model.getValue(xRecMasterPath + '['+ idx +']/execdd') 
          && model.getValue(xRecDetailPath + '[1]/recseq') == model.getValue(xRecMasterPath + '['+ idx +']/recseq') 
           ){
            recmasterrow = idx;
            grd_recmaster.row = recmasterrow;
            break;
        }
    }
    
    if ( recmasterrow == 0 ){
        messageBox( capt_master.attribute("text") + " ¼±ÅÃ" ,"I008");
        return;
    }
    
	var recMasterStat = model.getValue(xRecMasterPath + '[' + grd_recmaster.row + ']/stat');//±â·Ï¸¶½ºÅÍÀÇ »óÅ°ª
	
	/*
	//1. ½Å±Ôµî·Ï
	//   1) ÀúÀåµÈ ±â·ÏÀÌ Çϳªµµ ¾øÀ»¶§ ÃÖÃʵî·ÏÀÇ °æ¿ì insert
	//   2) input¿¡ ¼öÇàÀÏÀÚ°¡ ÇØ´ç ±â·Ï¿¡ ¾ø´Â °æ¿ì... ÀÌ¹Ì ±â·ÏµÈ ³»¿ªÀ» ÇØ´ç ¼öÇàÀÏÀÚ·Î insert
	//   2008.08.27 ¼öÁ¤¿äû»çÇ×
	//   3) input¿¡ ¼öÇàÀÏÀÚ°¡ ÇØ´ç ±â·Ï¿¡ ÀÖ´Â °æ¿ì... ¼öÁ¤µÈ ³»¿ªÀ» ¼öÇàÀϽô ÇöÀçÀÏÀÚ+ÇöÀç½Ã°£ À¸·Î insert
	//recMasterStatÀÌ '-'ÀÌ¶óµµ ÀúÀåÇÒ ¼öÇàÀÏÀÚ°¡ ±â·Ï³»¿ª¿¡ ¾øÀ¸¸é ½Å±Ô insert
	//--------------------------------------------------------------------------------------------
	//2008.08.27 ¼öÁ¤¿äû»çÇ× (±â·Ï¼öÁ¤Àº ÁøÇàÇÏÁö ¾Ê´Â´Ù.)
	//2. ¼öÁ¤µî·Ï (»ç¿ë¾ÈÇÔ)
	//   1) ÇØ´ç±â·ÏÀÇ Ç׸ñÀ» ¼±ÅÃÇÏ¿© ¼öÁ¤ÇÏ´Â °æ¿ì ¼öÁ¤ÇÑ Ç׸ñÀ» update
	//   2) input¿¡ ¼öÇàÀÏÀÚ°¡ ÇØ´ç ±â·Ï¿¡ ÀÖ´Â °æ¿ì... ¼öÁ¤µÈ ³»¿ªÀ» ÇØ´ç¼öÇàÀÏÀÚ·Î update
	//     (ÀúÀåÇÒ ¼öÇàÀÏÀÚ°¡ ±â·Ï³»¿ª¿¡ ÀÖÀ¸¸é ÀÌ¹Ì ÀúÀåµÈ ±â·Ï³»¿ªÀÌ ÀÖ½À´Ï´Ù ¸Þ¼¼Áö »Ñ·ÁÁÙ°Í)
	*/

	//2008.08.27 »ç¿ë¾ÈÇÔ-->input¼öÇàÀÏÀÚ¿¡ ÇØ´çµÇ´Â ±â·ÏÀÌ ÀÌ¹Ì ÀԷµǾî ÀÖ´Â °æ¿ì¿¡ db¿¡ updateó¸®
	//2008.08.27 º¯°æµÊ-->input¼öÇàÀÏÀÚ¿¡ ÇØ´çµÇ´Â ±â·ÏÀÌ ÀÌ¹Ì ÀԷµǾî ÀÖ´Â °æ¿ì¿¡ db¿¡ insertó¸®, ´Ü, ¼öÇàÀϽô ¹«Á¶°Ç ÇöÀçÀϽ÷ΠÀúÀå
	//input¼öÇàÀÏÀÚ¿¡ ÇØ´çµÇ´Â ±â·ÏÀÌ ÀúÀåµÇ¾îÀÖÁö ¾ÊÀº°æ¿ì db¿¡ insertó¸®
	var execdd = model.getValue('/root/cond/execdd');//Á¶È¸Á¶°ÇÀÇ ¼öÇàÀÏÀÚ
	var exectm = model.getValue('/root/cond/exectm');//Á¶È¸Á¶°ÇÀÇ ¼öÇà½Ã°£

	//¼öÇàÀϽà ÇʼöÀԷ üũ_20090122_SMYÃß°¡
	if(execdd == ""){
		messageBox("¼öÇàÀÏÀÚ¸¦ ÀÔ·ÂÇϼ¼¿ä","I");
		model.setFocus("ipt_indate");
		return;
	}
	if(exectm == ""){
		messageBox("¼öÇà½Ã°£À» ÀÔ·ÂÇϼ¼¿ä","I");
		model.setFocus("ipt_time");
		return;
	}
/*
	var dschdd   = model.getValue("/root/main/patinfo/patlist[" + (grd_patinfo.row-1) + "]/dschdd"); //Åð¿øÀÏÀÚ
	if(dschdd != '99991231') {
		if(execdd > dschdd){
			var msgStr  = '±â·ÏÇϽ÷Á´Â ÀÏÀÚ(';
				msgStr += execdd.substring(0,4) + '-' + execdd.substring(4, 6) + '-' + execdd.substring(6);
				if(ioflag == 'O'){
					msgStr += ')´Â ȯÀÚÀÇ ¿¹¾àÀÏÀÚ(';
				}else{
					msgStr += ')´Â ȯÀÚÀÇ Åð¿øÀÏÀÚ(';
				}
				msgStr += dschdd.substring(0,4) + '-' + dschdd.substring(4, 6) + '-' + dschdd.substring(6);
				msgStr += ') ÀÌÈÄÀÏÀÚ°¡ µÉ ¼ö';
			messageBox(msgStr, 'I004');
			return;
		}
	}
*/
	var recdd  = model.getValue(xRecMasterPath + '[' + grd_recmaster.row + ']/execdd');//±â·ÏµÈ ÀÏÀÚ
	var isRecordedArr = fIsRecorded(execdd);//input¼öÇàÀÏÀÚ¿¡ ÇØ´çµÇ´Â ±â·ÏÀÌ ÀÖ´ÂÁö ¿©ºÎ
	                                     //20080820 array·Î º¯°æ
	                                     //arr[0]Àº ±â·Ï¿©ºÎ true/false
	                                     //arr[1]Àº ±â·Ï¿©ºÎ trueÀ϶§ÀÇ signno
	var signno    = '';//ÀÎÁõ¹øÈ£
	var siflag = 'N';//default ´Â N. ±âÁ¸ÀÇ µ¥ÀÌÅ͸¦ ±×´ë·Î ½Å±Ô·Î insertÇϴ°æ¿ìflag°ª
	                 // YÀΰæ¿ì : 1.´Ù¸¥ÀÏÀÚÀÇ ±â·Ï³»¿ªÀº ÀÖÀ¸³ª inputÀÇ ¼öÇàÀÏÀÚ¿¡ ÇØ´çµÇ´Â ±â·ÏÀÌ ¾øÀ»¶§..
	                 //          2. inputÀÇ ¼öÇàÀÏÀÚ¿¡ ÇØ´çµÇ´Â ±â·ÏÀÌ ÀÖÀ»¶§..

	//ÀúÀåÀü À¯È¿¼ºÀ» üũÇÑ´Ù.
  	if(fIsValid()){


		//»ó¼¼³»¿ªÀÇ Ã¼Å©Á¡¼ö¸¦ ÇÕ»êÇÏ¿© ¸¶½ºÅÍ¿Í »ó¼¼Á¡¼öÀÇ totpnt¿¡ setÇÑ´Ù.
		var totPnt = fSumPnt();
		model.setValue(xRecMasterPath + '[' + grd_recmaster.row + ']/totpnt', totPnt);//¸¶½ºÅÍÀÇ ÃÑÁ¡
		model.setValue('/root/main/recpntgrup/recpntlist/totpnt', totPnt);//»ó¼¼Á¡¼öÀÇ ÃÑÁ¡

		//ÃÑÁ¡¿¡ ÇØ´çÇÏ´Â ºÐ·ù±ºÀ» Á¶È¸ÇÑÈÄ ¸¶½ºÅÍ¿Í »ó¼¼Á¡¼öÀÇ ºÐ·ù±º¿¡ setÇÑ´Ù.
		var bspntnm = fLoadBsPnt(totPnt);
		model.setValue(xRecMasterPath + '[' + grd_recmaster.row + ']/resultnm', bspntnm);//¸¶½ºÅÍÀÇ ºÐ·ù±º
		model.setValue('/root/main/recpntgrup/recpntlist/resultcd', bspntnm);//»ó¼¼Á¡¼öÀÇ ÃÑÁ¡
		
		var maddchk01 =  model.getValue("/root/cond/maddchk01");
		var maddchk02 =  model.getValue("/root/cond/maddchk02");
		var maddchk03 =  model.getValue("/root/cond/maddchk03");
		var maddchk04 =  model.getValue("/root/cond/maddchk04");
		var haddchk =  model.getValue("/root/cond/haddchk");
		var maddchk99 =  model.getValue("/root/cond/maddchk99");
		var haddchk01 =  model.getValue("/root/cond/haddchk01");
		
		model.setValue(xRecMasterPath + '[' + grd_recmaster.row + ']/maddchk01', maddchk01);
		model.setValue(xRecMasterPath + '[' + grd_recmaster.row + ']/maddchk02', maddchk02);
		model.setValue(xRecMasterPath + '[' + grd_recmaster.row + ']/maddchk03', maddchk03);
		model.setValue(xRecMasterPath + '[' + grd_recmaster.row + ']/maddchk04', maddchk04);
		model.setValue(xRecMasterPath + '[' + grd_recmaster.row + ']/haddchk', haddchk);
		model.setValue(xRecMasterPath + '[' + grd_recmaster.row + ']/maddchk99', maddchk99);
		model.setValue(xRecMasterPath + '[' + grd_recmaster.row + ']/haddchk01', haddchk01);
		
		
		if(model.getValue("/root/cond/clsflag") == "9"){
			if(maddchk01 == "" && maddchk02 == "" && maddchk03 == "" && maddchk04 == "" && maddchk99 == "" ){
				messageBox("±âŸ Ç׸ñÀº ¹Ýµå½Ã Çϳª ÀÌ»ó üũ ÇÏ¼Å¾ß ÇÕ´Ï´Ù.","I");
				return;
			}
		}
		

		//»ó¼¼³»¿ª üũÇÑ Á¡¼ö¸¦ Ç׸ñº°·Î ÇÕ»êÇÏ¿© »ó¼¼Á¡¼ö ³ëµå¿¡ setÇÑ´Ù.
		fSetRecDetailPnt();

		var msgStr;
		if(isRecordedArr[0]){
			var execStr = execdd.substring(0, 4) + '-' + execdd.substring(4, 6) + '-' + execdd.substring(6, 8);
			msgStr = 'ÀÌ¹Ì ÀúÀåµÈ ±â·Ï ³»¿ª(' + execStr + ')ÀÌ ÀÖ½À´Ï´Ù. ´Ù½Ã';	//db insert (¼öÇàÀϽø¦ ÇöÀçÀϽ÷Î)

			//20080827 ÁÖ¼®Ã³¸® signno = isRecordedArr[1];//ÇØ´ç±â·ÏÀÇ signno¸¦ ÇÒ´çÇØ db¿¡ updateÇÑ´Ù.(»ç¿ë¾ÈÇÔ)

			signno = '';//½Å±ÔÀ̱⶧¹®¿¡ signno¸¦ »õ·Îµý´Ù.

		}else{//½Å±Ôµî·Ï¹× À̹̱â·ÏµÇ¾úÀ¸³ª ±â·ÏÀÏÀÚ¿Í ¼öÇàÀÏÀÚ°¡ °°À»¶§..
			//msgStr = 'ÁßÁõµµ ¹× À§Çè»çÁ¤ÀÇ ±â·Ï³»¿ªÀ»';
			msgStr = "";      // ¸Þ½ÃÁö´Â 'ÀúÀåÇϽðڽÀ´Ï±î?' ·Î ÅëÀÏ (2011.04.18 Ahn)
		}

		//recMasterStatÀÌ '-'°æ¿ì 'u'·Î ³Ñ±è.
		//ÁßÁõµµÁ¡¼ö±×¸®µå
		grd_recpnt.addStatus(2, 'update');

		//ÁßÁõµµ ¸¶½ºÅͱ׸®µå

		//20080827 »óÅ°¡ ½Å±Ô°¡ ¾Æ´Ï¸é u »óÅ·Πdb¿¡ º¹»çÇØ insert·Î º¯°æµÊ...
		if(grd_recmaster.rowStatus(grd_recmaster.row) != 1){//»óÅ°¡ ½Å±Ô»óÅ°¡ ¾Æ´Ï¸é u·Î º¯°æ
			grd_recmaster.addStatus(grd_recmaster.row, 'update');
			model.setValue(xRecMasterPath + '[' + grd_recmaster.row + ']/stat', 'u');
			siflag = 'Y';//±âÁ¸µ¥ÀÌÅ͸¦ º¹»çÇØ insertÇÏ´Â °æ¿ì Y¾Æ´Ï¸é N
		}

		var msg = messageBox(msgStr, 'Q002');//ÀúÀåÇϽðڽÀ´Ï±î?
		if(Number(msg) == 6){//¿¹
			model.removenode('/root/send');

			model.makeValue('/root/send/sch_execdd', execdd);//Á¶È¸Á¶°Ç¿¡ ÀÖ´Â ¼öÇàÀÏÀÚ
			model.makeValue('/root/send/sch_exectm', exectm);//Á¶È¸Á¶°Ç¿¡ ÀÖ´Â ¼öÇà½Ã°£
			model.makeValue('/root/send/siflag', siflag);//±âÁ¸µ¥ÀÌÅ͸¦ º¹»çÇØ insertÇÏ´Â °æ¿ì Y¾Æ´Ï¸é N
			model.makeValue('/root/send/ioflag', model.getValue('/root/cond/ioflag'));//¿Ü·¡ÀÔ¿ø±¸ºÐ
			
            var pid       = model.getValue(xRecMasterPath + "/pid");
            var orddd     = model.getValue('/root/main/patinfo/patlist[' + (grd_patinfo.row-1) + ']/indd');//ÀÔ¿øÀÏ/Áø·áÀÏ
            var cretno    = model.getValue('/root/main/patinfo/patlist[' + (grd_patinfo.row-1) + ']/cretno');//»ý¼º¹øÈ£
            var orddeptcd = model.getValue('/root/main/patinfo/patlist[' + (grd_patinfo.row-1) + ']/orddeptcd');//Áø·á°ú
            var orddrid   = model.getValue('/root/main/patinfo/patlist[' + (grd_patinfo.row-1) + ']/medispclid');//Áø·áÀÇ
			var ioflag	  = model.getValue('/root/main/patinfo/patlist[' + (grd_patinfo.row-1) + ']/ioflag');   //¿Ü·¡/ÀÔ¿ø±¸ºÐ

			//½Å±Ô(insert)À϶§´Â signno¸¦ ÃʱâÈ­ÇÑ´Ù.
			/*
			if((recMasterStat == 'i') || (recMasterStat == 'u' && execdd != recdd)){
				signno = '';
			}else{
				signno = model.getValue(xRecMasterPath + "[" + grd_recmaster.row + "]/signno");
			}
			*/

			//alert(grd_recmaster.row + 'ÀÇ signno : ' + signno);


            /* [°¢ ±¸ºÐº° ±â·Ï¼­½ÄÄÚµå]
             * ÁßÁõµµ_ÀϹݺ´µ¿	: 0000002439
			 * ÁßÁõµµ_½Å»ý¾Æ ICU 	: 0000002440
			 * ÁßÁõµµ_Ç÷¾×Åõ¼® 	: 0000002441
			 * ÁßÁõµµ_ÁßȯÀÚ½Ç 	: 0000002442
			 * ÁßÁõµµ_Á¤½Å°úº´µ¿ 	: 0000002444
			 * ³«»ó»çÁ¤_¾Æµ¿ 		: 0000002447
			 * ³«»ó»çÁ¤_¼ºÀÎ(Morse Scale) 		: 0000002449
			 * ¿åâ»çÁ¤(Braden Scale) 			: 0000002450
             */
            var recflag = model.getValue('/root/cond/recflag');
            var clsflag = model.getValue('/root/cond/clsflag');
            var formcd;//±â·Ï¼­½ÄÄÚµå
            var formnm;//¼­½Ä¸í

            if(clsflag == '1'){
        		formcd = '0000002439';	//ÁßÁõµµ_ÀϹݺ´µ¿
        		formnm = 'ÁßÁõµµ»çÁ¤(ÀϹݺ´µ¿)';
        		recflag = '1';
        		clsflag = '1';
        	}else if(clsflag == '2'){
        		formcd = '0000002440';	//ÁßÁõµµ_½Å»ý¾Æ ICU
        		formnm = 'ÁßÁõµµ»çÁ¤(½Å»ý¾Æ ICU)';
        		recflag = '1';
        		clsflag = '2';
        	}else if(clsflag == '5'){
        		formcd = '0000002444';	//ÁßÁõµµ_Á¤½Å°úº´µ¿
        		formnm = 'ÁßÁõµµ»çÁ¤(Á¤½Å°úº´µ¿)';
        		recflag = '1';
        		clsflag = '5';
        	}else if(clsflag == '4' || clsflag == '6' || clsflag == '7'){
        		formcd = '0000002442';	//ÁßÁõµµ_ÁßȯÀÚ½Ç
        		formnm = 'ÁßÁõµµ»çÁ¤(ÁßȯÀÚ½Ç)';
        		recflag = '1';
        		clsflag = '4';
        	}else if(clsflag == '3'){
        		formcd = '0000002441';	//ÁßÁõµµ_Ç÷¾×Åõ¼®
        		formnm = 'ÁßÁõµµ»çÁ¤(Ç÷¾×Åõ¼®)';
        		recflag = '1';
        		clsflag = '3';
        	}else if(clsflag == '8'){
        		formcd = '0000002447';	//³«»ó»çÁ¤_¾Æµ¿
        		formnm = '³«»óÀ§Çè»çÁ¤(Humpty Dumpty Scale)';
        		recflag = '2';
        		clsflag = '1';
        	}else if(clsflag == '9'){
        		formcd = '0000002449';	//³«»ó»çÁ¤_¼ºÀÎ (Morse Scale)
        		formnm = '³«»óÀ§Çè»çÁ¤(Morse Scale)'; // ¼ºÀÎ -> Morse Scale º¯°æ (2011.03.17 ahn)
        		recflag = '2';
        		clsflag = '2';
        	}else if(clsflag == '10'){
        		formcd = '0000002450';	//¿åâ
        		formnm = '¿åâÀ§Çè»çÁ¤(Braden Scale)';  // ¿åâ -> Braden Scale º¯°æ (2011.04.13 ahn)
        		recflag = '3';
        		clsflag = '1';
        	}



            //alert(formcd);

            //»ó¼¼Á¡¼ö³»¿ª ³ëµå¸¦ ¸¸µé¾î¼­ º¸³½´Ù.
			//temp/signdata/recpntgrup/recpntlist/timsval
			//temp/signdata/recpntgrup/recpntlist/hngnm
			model.removenode('/root/temp/signdata');
			model.makeNode('/root/temp/signdata/recpntgrup/recpntlist');

			//ÁßÁõ±â·Ï±¸ºÐÀ» Çѱ۸íÀ¸·Î ³ëµå¸¦ ¸¸µé¾î¼­ ³»º¸³½´Ù.
			var xDetailPath = '/root/temp/signdata/detailinfo';
			model.makeNode(xDetailPath);
			model.makeValue(xDetailPath + '/formnm', formnm);
			model.makeValue(xDetailPath + '/recflag', recflag);
			model.makeValue(xDetailPath + '/clsflag', clsflag);

			var recpntCnt = getNodesetCount("/root/main/recpntgrup/pnttitlgruplist");
			var timsval, hngnm;
			var colno;
			for(var i = 1; i <= recpntCnt; i++){

				if(i < 10){
					colno = '0' + i;
				}else{
					colno = i;
				}

				timsval = model.getValue(xRecPntPath + '/timsval' + colno);
				hngnm   = model.getValue('/root/main/recpntgrup/pnttitlgruplist[' + i + ']/hngnm');
				//alert(colno + ', ' + timsval + ', ' + hngnm + ', ' + i);

				model.makeValue('/root/temp/signdata/recpntgrup/recpntlist[' + i + ']/timsval', timsval);
				model.makeValue('/root/temp/signdata/recpntgrup/recpntlist[' + i + ']/hngnm', hngnm);
			}
//            Sign.certreload = true ; // ÀüÀÚ¼­¸í È£Ãâ½Ã ÀÎÁõÀúÀå ¹öÆ°À»  ´©´Ã¶§¸¶´Ù ÀÎÁõ¼­°¡ ¶ßµµ·Ï ó¸®

            // ÀÎÁõ ·ÎÁ÷ È£Ãâ
            if(Sign.signprocess() == true){  // ¢º ÀüÀÚÀÎÁõ °ü·Ã ȯÀÚ ÀÎÀû Á¤º¸¸¦ º¸³»ÁÜ.
            	//alert(Sign.signedInfos[1]);

             var wSigninfo = "pid"                                    +"¢Ë"  // 01 µî·Ï¹øÈ£
                            + "orddd"                                 +"¢Ë"  // 02 ÀÔ¿øÀÏÀÚ(ÀÔ¿ø,ÀÀ±Þ)/Áø·áÀÏÀÚ(¿Ü·¡)
                            + "cretno"                                +"¢Ë"  // 03 »ý¼º¹øÈ£
                            + "signno"                                +"¢Ë"  // 04 ¼­¸í¹øÈ£(ÀÎÁõ¹øÈ£)
                            + "recdd"                                 +"¢Ë"  // 05 ½ÇÁ¦ ±â·ÏÀÌ ÀÌ·ç¾îÁø ±â·ÏÀÏÀÚ
                            + "rectm"                                 +"¢Ë"  // 06 ½ÇÁ¦ ±â·ÏÀÌ ÀÌ·ç¾îÁø ±â·Ï½Ã°£
                            + "recsaveflag"                           +"¢Ë"  // 07 ÀüÀÚ¼­¸í ÀÎÀûÁ¤º¸ º¯°æ¿©ºÎ(±â·ÏÀϽà º¯°æµÇ´Â °æ¿ì  : Y, ±×¿Ü : N)
                            + "signflag"                              +"¢Ë"  // 08 ¼­¸íÀڷᱸºÐ(01 : Áø·á, 02 : °£È£, 03 : LIS, 04 : Áø·áÁö¿ø)
                            + "signgenrflag"                          +"¢Ë"  // 09 ¿Ü·¡/ÀÔ¿ø±¸ºÐ(ÄÚµåÁ¤ÀǼ­ M0010 ÂüÁ¶)
                            + "formcd"                                +"¢Ë"  // 10 °¢ ±â·ÏÁöº° ¼­½ÄÄÚµå  0000002473  N57 °£È£  ¼ö¼ú°£È£±â·Ï
                            + "orddeptcd"                             +"¢Ë"  // 11 Áø·áºÎ¼­ÄÚµå
                            + "orddrid"                               +"¢Ë"  // 12 Áø·áÀÇ»çID (ÁýµµÀÇ)
                            + "signbfcnts"                            +"¢Ë"  // 13 ¢º ÀÎÁõÇÒ µ¥ÀÌÅÍ Á¤º¸(¹Ì±â·Ï ³ëµå Á¦°ÅµÈ Á¤º¸)
                            + "signaftcnts"                           +"¢Ë"  // 14 ¢º °øÀÎÀÎÁõ ó¸®ÈÄ µ¥ÀÌÅÍ
                            + "screenid"                              +"¢Ë"  // 15 ¢º È­¸é¾ÆÀ̵ð
                            + "certflag"                              +"¢Ì"  // 16 ¢º ÀÎÁõ¿©ºÎ( T : ÀÓ½ÃÀúÀå, C : ÀÎÁõÀúÀå)
                            + pid                                     +"¢Ë"  // 01 µî·Ï¹øÈ£
                            + orddd                                   +"¢Ë"  // 02 ÀÔ¿øÀÏÀÚ(ÀÔ¿ø,ÀÀ±Þ)/Áø·áÀÏÀÚ(¿Ü·¡)
                            + cretno                                  +"¢Ë"  // 03 »ý¼º¹øÈ£
                            + signno                                  +"¢Ë"  // 04 ¼­¸í¹øÈ£(ÀÎÁõ¹øÈ£)
                            + getCurrentDate()                        +"¢Ë"  // 05 ½ÇÁ¦ ±â·ÏÀÌ ÀÌ·ç¾îÁø ±â·ÏÀÏÀÚ
                            + getCurrentTime()                        +"¢Ë"  // 06 ½ÇÁ¦ ±â·ÏÀÌ ÀÌ·ç¾îÁø ±â·Ï½Ã°£
                            + "Y"                                     +"¢Ë"  // 07 ÀüÀÚ¼­¸í ÀÎÀûÁ¤º¸ º¯°æ¿©ºÎ(±â·ÏÀϽà º¯°æµÇ´Â °æ¿ì  : Y, ±×¿Ü : N)
                            + "02"                                    +"¢Ë"  // 08 ¼­¸íÀڷᱸºÐ(01 : Áø·á, 02 : °£È£, 03 : LIS, 04 : Áø·áÁö¿ø)
                            + ioflag                                  +"¢Ë"  // 09 ¿Ü·¡/ÀÔ¿ø±¸ºÐ(ÄÚµåÁ¤ÀǼ­ M0010 ÂüÁ¶)
                            + formcd                                  +"¢Ë"  // 10 °¢ ±â·ÏÁöº° ¼­½ÄÄÚµå (emr.mrfmform)
                            + orddeptcd                               +"¢Ë"  // 11 Áø·áºÎ¼­ÄÚµå
                            + orddrid                                 +"¢Ë"  // 12 Áø·áÀÇ»çID
                            + Sign.signedInfos[1]                     +"¢Ë"  // 13 ¢º ÀÎÁõÇÒ µ¥ÀÌÅÍ Á¤º¸(¹Ì±â·Ï ³ëµå Á¦°ÅµÈ Á¤º¸)
                            + Sign.signedInfos[2]                     +"¢Ë"  // 14 ¢º °øÀÎÀÎÁõ ó¸®ÈÄ µ¥ÀÌÅÍ
                            + getScreenID()                           +"¢Ë"  // 15 ¢º È­¸é¾ÆÀ̵ð
                            + "C"                                     +"¢Ì"; // 16 ¢º ÀÎÁõ¿©ºÎ( T : ÀÓ½ÃÀúÀå, C : ÀÎÁõÀúÀå)
              model.makeValue("/root/send/signinfo"         , wSigninfo);

            } else {
                    return ;
            }

			var test_1 = grd_recmaster.getUpdateDataAll('i'); // 150114 - AYS
			model.makeValue('/root/send/recmaster', grd_recmaster.getUpdateDataAll('i'));
			//model.makeValue('/root/send/recmaster', (sRecHeader + sRecData));
			
			
			for( var idx = 1 ; idx <= getNodesetCount(xRecDetailPath) ; idx++){
			    if ( Number(model.getValue(xRecDetailPath + '[' + idx + ']/basepnt_multi')) > 0 ){
			        model.setValue( xRecDetailPath + '[' + idx + ']/basepnt',model.getValue(xRecDetailPath + '[' + idx + ']/basepnt_multi'));
			    }
			}
			
			var test_2 = grd_recdetail.getUpdateDataAll('i'); // 150114 - AYS
			model.makeValue('/root/send/recdetail', grd_recdetail.getUpdateDataAll('i'));
			//model.makeValue('/root/send/recdetail', (sDetailHeader + sDetailData));
			
			fLoadFallPnt(recflag, clsflag, bspntnm);

			if(!submit('TXMNW04001')){
				messageBox('ÀúÀåÀ»', 'E009');
				return;

			}else{
				model.removenode("/root/cond/copyexecdd");


				//ȯÀÚ¸®½ºÆ®Á¶È¸			
				//fSearchPatList();
				//ÁßÁõµµÁ¶È¸
				//fSearchRecMaster(grd_patinfo.row);
				//ÁßÁõµµ»ó¼¼Á¡¼öÁ¶È¸
				//fSearchRecPnt();
				var condparam  = '';			
				var i = grd_patinfo.row -1;
				
				if(model.getValue("/root/cond/nextyn")=='Y'){
					if((grd_patinfo.rows-2) > i){
						i = i+1 ;	
					}else if((grd_patinfo.rows-2) == i){
						messageBox('´ÙÀ½ ȯÀÚ°¡ ¾ø½À´Ï´Ù.', 'E');
					}
				}
				
				if(model.getValue("/root/main/paminfo/pamlist/dschdd") == "99991231"){ //Åð¿øȯÀÚ°¡ ¾Æ´Ñ°æ¿ì					
					if( model.getValue('/root/main/patinfo/patlist[' + i + ']/ioflag') =="O" ) {
					   //¿Ü·¡È¯ÀÚ »ó´ÜÁ¤º¸ µî·Ï
						condparam = "O"+"¢Ë" + model.getValue("/root/main/patinfo/patlist[" + i + "]/pid") 
											   + "¢Ë" + model.getValue("/root/main/patinfo/patlist[" + i + "]/indd") 
													  + "¢Ë" + model.getValue("/root/main/patinfo/patlist[" + i + "]/cretno") 
													  + "¢Ë" + getUserInfo("dutplceinstcd")
													  + getCurrentDate();
					
					}
					// ÀÀ±Þ½Ç Ãß°¡ 2011.03.15 (Ahn)
					else if(model.getValue('/root/main/patinfo/patlist[' + i + ']/ioflag') =="E" ) {
						//ÀÀ±ÞȯÀÚ »ó´ÜÁ¤º¸ µî·Ï
						condparam = "E"+"¢Ë" + model.getValue("/root/main/patinfo/patlist[" + i + "]/pid") 
											   + "¢Ë" + model.getValue("/root/main/patinfo/patlist[" + i + "]/indd") 
													  + "¢Ë" + model.getValue("/root/main/patinfo/patlist[" + i + "]/cretno") 
													  + "¢Ë" + getUserInfo("dutplceinstcd")
													  + getCurrentDate();	
					}else{
						//Àç¿øȯÀÚ »ó´ÜÁ¤º¸ µî·Ï
						condparam = "I"+"¢Ë" + model.getValue("/root/main/patinfo/patlist[" + i + "]/pid") 
											   + "¢Ë" + model.getValue("/root/main/patinfo/patlist[" + i + "]/indd") 
													  + "¢Ë" + model.getValue("/root/main/patinfo/patlist[" + i + "]/cretno") 
													  + "¢Ë" + getUserInfo("dutplceinstcd")
													  + getCurrentDate();	
					}	
				 }else {  //Åð¿øȯÀÚÀÎ °æ¿ì					
					if( model.getValue('/root/main/patinfo/patlist[' + i + ']/ioflag') =="O" ) {
					   //¿Ü·¡È¯ÀÚ »ó´ÜÁ¤º¸ µî·Ï
						condparam = "O"+"¢Ë" + model.getValue("/root/main/patinfo/patlist[" + i + "]/pid") 
											   + "¢Ë" + model.getValue("/root/main/patinfo/patlist[" + i + "]/indd") 
													  + "¢Ë" + model.getValue("/root/main/patinfo/patlist[" + i + "]/cretno") 
													  + "¢Ë" + getUserInfo("dutplceinstcd")
													  + "¢Ë" + model.getValue("/root/main/paminfo/pamlist/dschdd");	
						
					}// ÀÀ±Þ½Ç Ãß°¡ 2011.03.15 (Ahn)
					else if(model.getValue('/root/main/patinfo/patlist[' + i + ']/ioflag') =="E" ) {
						//ÀÀ±ÞȯÀÚ »ó´ÜÁ¤º¸ µî·Ï
						condparam = "E"+"¢Ë" + model.getValue("/root/main/patinfo/patlist[" + i + "]/pid") 
											   + "¢Ë" + model.getValue("/root/main/patinfo/patlist[" + i + "]/indd") 
													  + "¢Ë" + model.getValue("/root/main/patinfo/patlist[" + i + "]/cretno") 
													  + "¢Ë" + getUserInfo("dutplceinstcd")
													  + "¢Ë" + model.getValue("/root/main/paminfo/pamlist/dschdd");
					}else{
						//Àç¿øȯÀÚ »ó´ÜÁ¤º¸ µî·Ï
						condparam = "I"+"¢Ë" + model.getValue("/root/main/patinfo/patlist[" + i + "]/pid") 
											   + "¢Ë" + model.getValue("/root/main/patinfo/patlist[" + i + "]/indd") 
													  + "¢Ë" + model.getValue("/root/main/patinfo/patlist[" + i + "]/cretno") 
													  + "¢Ë" + getUserInfo("dutplceinstcd")
													  + "¢Ë" + model.getValue("/root/main/paminfo/pamlist/dschdd");	
					}		
				}
				setParameter("condparam", condparam);
				modal("SPMMO08900", 1, "", "", "", "", "", "left:0; right:0; width:0; height:0; sysmenu:hidden; caption:hidden; min:hidden, max:hidden;");
				
				//Á¶È¸Á¶°Ç clear
				model.setValue('/root/cond/pid', '');
				//ȯÀÚÁ¤º¸ Ç¥½Ã clear    (2011.03.29 Ahn)
				model.setValue('root/cond/patnm', '');
				model.setValue('root/cond/sexage', '');
				model.setValue('root/cond/age', '');

				
				// ÇØ´ç ȯÀÚ pid Àӽà ÀúÀå
				var patPid = model.getValue("/root/main/patinfo/patlist[" + i + "]/pid");
				var patIdx = "";
				
				//ȯÀÚÁ¤º¸ Á¶È¸
			    fSearchPatList();           // ȯÀÚÁ¤º¸ ÀçÁ¶È¸ (2011.03.30 Ahn)
			    
			    // ÇØ´ç ȯÀÚÁ¤º¸ Àç Ç¥½Ã
			    model.setValue('/root/cond/pid', model.getValue("/root/main/patinfo/patlist[pid = '" + patPid + "']/pid"));
				model.setValue('/root/cond/patnm', model.getValue("/root/main/patinfo/patlist[pid = '" + patPid + "']/hngnm"));
				model.setValue('/root/cond/sexage', model.getValue("/root/main/patinfo/patlist[pid = '" + patPid + "']/sexage"));
				model.setValue('/root/cond/age', model.getValue("/root/main/patinfo/patlist[pid = '" + patPid + "']/age"));
	
				
			    // ÇØ´ç ȯÀÚ À妽º ¼±Åà Àç ÁöÁ¤
				for(i=2; i<=grd_patinfo.rows; i++){
					if(patPid == grd_patinfo.valueMatrix(i,grd_patinfo.colRef("pid"))){
						model.setFocus("grd_patinfo");
						patIdx = i;
						break;
					}
				}
				grd_patinfo.row = patIdx; 
				
				//ÁßÁõµµ/³«»ó/¿åâ ³»¿ª Á¶È¸(grd_recmaster)
				fSearchRecMaster(patIdx,"save");						
			}

		}else if(Number(msg) == 7){//¾Æ´Ï¿À

			return;
		}

    }
}


/**
 * @group  :
 * @ver    : 2008.08.20
 * @by     : dhkim
 * @-------------------------------------------------------------------------------------------------------
 * @type   : function
 * @access : public
 * @param  :
 * @return :
 * @desc   : »ó¼¼³»¿ª üũÇÑ Á¡¼ö¸¦ Ç׸ñº°·Î ÇÕ»êÇÏ¿© »ó¼¼Á¡¼ö ³ëµå¿¡ setÇÑ´Ù.
 *           0. Ç׸ñÀÇ index°ªÀ» ÀÓ½ÃÀúÀå
 *           1. Ç׸ñ¿¡ ÇØ´çÇÏ´Â ¸íĪ get (pnttitlgruplist)
 *           2. 1ÀÇ ¸íĪ¿¡ ÇØ´çÇÏ´Â clstlcd get (recdetailgruplist)
 *           3. supcd°¡ 2ÀÎ ±×·ìÀÇ Ã¹¹ø° index¸¦ ã´Â´Ù.
 *           4. 3ºÎÅÍ detail°ªÀ» ¹Ýº¹ÇÏ¿© supcd°¡ 2ÀÎ ±×·ìÀÇ Á¡¼ö¸¦ ÇÕ»ê (recdetailgruplist)
 *           5. »ó¼¼Á¡¼ö¿¡ 0¹ø° timsval+0 ³ëµå¿¡ 3°ªÀ» ¼¼Æà (recpntlist)
 */
function fSetRecDetailPnt(){

	var recpntTitlCnt = getNodesetCount("/root/main/recpntgrup/pnttitlgruplist");
	var titlhngnm;
	var clstlcd;
	var detlFidx;
	var basepnt = 0;
	var totpnt = 0;
	var flag;
    if ( model.getValue("/root/cond/agechk") == "Y" ){
        return;
    }

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

		//1. Ç׸ñ¿¡ ÇØ´çÇÏ´Â ¸íĪ get (pnttitlgruplist)
		titlhngnm = model.getValue('/root/main/recpntgrup/pnttitlgruplist[' + i + ']/hngnm');

		//2. 1ÀÇ ¸íĪ¿¡ ÇØ´çÇÏ´Â clstlcd get (recdetailgruplist)
		clstlcd = model.getValue("/root/main/recdetailgrup/recdetailgruplist[hngnm='" + titlhngnm + "']/clstlcd");

		//3. supcd°¡ 2ÀÎ ±×·ìÀÇ Ã¹¹ø° index¸¦ ã´Â´Ù.
		detlFidx = grd_recdetail.findRow(clstlcd, 1, grd_recdetail.colRef("supcd"));

		//alert('detlFidx : ' + detlFidx  + ', clstlcd : ' + clstlcd );

		//4. 3ºÎÅÍ detail°ªÀ» ¹Ýº¹ÇÏ¿© supcd°¡ 2ÀÎ ±×·ìÀÇ Á¡¼ö¸¦ ÇÕ»ê (recdetailgruplist)
		for(var j = detlFidx; j <= grd_recdetail.rows; j++){

			supcd = model.getValue(xRecDetailPath + '[' + j + ']/supcd');
			flag  = model.getValue(xRecDetailPath + '[' + j + ']/flag');

			//basepnt  = model.getValue(xRecDetailPath + '[' + j + ']/basepnt');

			//alert('supcd : ' + supcd + ', flag : ' + flag + ', basepnt : ' + basepnt);

			if(supcd == clstlcd){
				if(flag == 'Y'){//üũµÈ µ¥ÀÌÅ͸¸ ÇÕ»êÇÑ´Ù.
        		    if( model.getValue(xRecDetailPath + '[' + j + ']/timsinptyn') == "Y" ){//Ƚ¼öÀԷ¿©ºÎ
        		        basepnt = Number(model.getValue(xRecDetailPath + '[' + j + ']/basepnt')) * Number(model.getValue(xRecDetailPath + '[' + j + ']/timsval'));
        		    } else {
        		        basepnt = Number(model.getValue(xRecDetailPath + '[' + j + ']/basepnt'));
        		    }

        		    model.makeValue(xRecDetailPath + '[' + j + ']/basepnt_multi',basepnt);
					totpnt += Number(basepnt);
				}
			}else{
				j = grd_recdetail.rows;//for·çÇÁ¸¦ ¸ØÃá´Ù.
			}
		}

		//5. »ó¼¼Á¡¼ö¿¡ i¹ø° timsval+i ³ëµå¿¡ 3°ªÀ» ¼¼Æà (recpntlist)
		if(i < 10){
			colno = '0' + i;
		}else{
			colno = i;
		}

		model.setValue(xRecPntPath + '/timsval' + colno, totpnt);

		totpnt = 0; //ÃʱâÈ­
		basepnt=0;

	}

}


/**
 * @group  :
 * @ver    : 2008.06.25
 * @by     : dhkim not used
 * @-------------------------------------------------------------------------------------------------------
 * @type   : function
 * @access : public
 * @param  :
 * @return :
 * @desc   : ÁßÁõµµ ¸¶½ºÅÍ¿Í »ó¼¼³»¿ªÀ» ÀúÀåÇÑ´Ù.
 *           - ÀúÀåÀü ÁßÁõµµ »ó¼¼³»¿ª Á¡¼öÀÇ À¯È¿¼ºÀ» üũÇÑ´Ù.
 *           - »ó¼¼³»¿ªÀÇ Ã¼Å©µÈ ³»¿ª Á¡¼ö¸¦ ÇÕ»êÇÏ¿© ±â·Ï¸¶½ºÅÍÀÇ totpnt¿¡ setÇÑ´Ù.
 *           - ÀÌ¹Ì ±â·ÏÀÌ ÀԷµǾî ÀÖ´Â °æ¿ì¿¡ -> grd_recmaster¿¡ »óÅ°ªÀÌ 'u'ÀÓ.
 *                             ±â·ÏµÈ ³¯Â¥°¡ Á¶È¸Á¶°ÇÀÇ ¼öÇàÀÏÀÚ¿Í °°À¸¸é db¿¡ updateó¸®ÇÏ°í
 *                             ±â·ÏµÈ ³¯Â¥¿Í Á¶È¸Á¶°ÇÀÇ ¼öÇàÀÏÀÚ°¡ ´Ù¸£¸é ½Å±Ô·Î insertó¸®ÇÑ´Ù.(¸Þ¼¼Áö·Î ¾Ë·ÁÁÙ°Í)
 * @-------------------------------------------------------------------------------------------------------
 */
function fSave(){

	var recMasterStat = model.getValue(xRecMasterPath + '[' + grd_recmaster.row + ']/stat');//±â·Ï¸¶½ºÅÍÀÇ »óÅ°ª
	if(recMasterStat == '-'){//ÀúÀå³»¿ª ¾øÀ¸¸é ¹Ù·Î¸®ÅÏ
		return false;
	}

	//ÀúÀåÀü À¯È¿¼ºÀ» üũÇÑ´Ù.
	if(fIsValid()){

		//»ó¼¼³»¿ªÀÇ Ã¼Å©Á¡¼ö¸¦ ÇÕ»êÇÏ¿© ¸¶½ºÅÍÀÇ totpnt¿¡ setÇÑ´Ù.
		var totPnt = fSumPnt();
		model.setValue(xRecMasterPath + '[' + grd_recmaster.row + ']/totpnt', totPnt);

		var execdd = model.getValue('/root/cond/execdd');//Á¶È¸Á¶°ÇÀÇ ¼öÇàÀÏÀÚ
		var exectm = model.getValue('/root/cond/exectm');//Á¶È¸Á¶°ÇÀÇ ¼öÇà½Ã°£
		var recdd  = model.getValue(xRecMasterPath + '[' + grd_recmaster.row + ']/execdd');//±â·ÏµÈ ÀÏÀÚ

		var msgStr = 'ÁßÁõµµ ¹× À§Çè»çÁ¤ÀÇ ±â·Ï³»¿ªÀ»';

		//ÀÌ¹Ì ±â·ÏÀÌ ÀԷµǾî ÀÖ´Â °æ¿ì¿¡ ±â·ÏµÈ ³¯Â¥°¡ Á¶È¸Á¶°ÇÀÇ ¼öÇàÀÏÀÚ¿Í °°À¸¸é db¿¡ updateó¸®
		if(recMasterStat == 'u' && execdd != recdd){
			msgStr = 'ÀÌ¹Ì ÀúÀåµÈ ±â·Ï ³»¿ªÀÌ ÀÖ½À´Ï´Ù. ´Ù½Ã';
		}else{//½Å±Ôµî·Ï¹× À̹̱â·ÏµÇ¾úÀ¸³ª ±â·ÏÀÏÀÚ¿Í ¼öÇàÀÏÀÚ°¡ °°À»¶§..
			msgStr = 'ÁßÁõµµ ¹× À§Çè»çÁ¤ÀÇ ±â·Ï³»¿ªÀ»';
		}


		var msg = messageBox(msgStr, 'Q002');//ÀúÀåÇϽðڽÀ´Ï±î?

		if(Number(msg) == 6){//¿¹

			model.removenode('/root/send');
			model.makeValue('/root/send/recmaster', grd_recmaster.getUpdateDataAll('i'));
			model.makeValue('/root/send/recdetail', grd_recdetail.getUpdateDataAll('i'));
			model.makeValue('/root/send/sch_execdd', execdd);//Á¶È¸Á¶°Ç¿¡ ÀÖ´Â ¼öÇàÀÏÀÚ
			model.makeValue('/root/send/sch_exectm', exectm);//Á¶È¸Á¶°Ç¿¡ ÀÖ´Â ¼öÇà½Ã°£

			if(!submit('TXMNW04001')){
				messageBox('ÁßÁõµµ¹× À§Çè»çÁ¤ÀÇ ÀúÀåÀ»', 'E009');
				return;
			}else{
				//ÁßÁõµµÁ¶È¸
				fSearchRecMaster(grd_patinfo.row);
			}

		}else if(Number(msg) == 7){//¾Æ´Ï¿À
			return;
		}
	}

}



/**
 * @group  :
 * @ver    : 2008.06.25
 * @by     : dhkim
 * @-------------------------------------------------------------------------------------------------------
 * @type   : function
 * @access : public
 * @param  :
 * @return : totpnt ÃÑÁ¡
 * @desc   : »ó¼¼³»¿ª üũµÈ ³»¿ªÀÇ Á¡¼ö¸¦ ÇÕ»êÇÑ´Ù.
 * @-------------------------------------------------------------------------------------------------------
 */
function fSumPnt(){

	var flag, timsval;
	var totPnt = 0;
	
    if ( model.getValue("/root/cond/agechk") == "Y" ){
        return "";
    }	
	for(var i = 1; i < grd_recdetail.rows; i++){

		flag = model.getValue(xRecDetailPath + '[' + i + ']/flag');

		if(flag == 'Y'){
		    if( model.getValue(xRecDetailPath + '[' + i + ']/timsinptyn') == "Y" ){//Ƚ¼öÀԷ¿©ºÎ
		        timsval = Number(model.getValue(xRecDetailPath + '[' + i + ']/basepnt')) * Number(model.getValue(xRecDetailPath + '[' + i + ']/timsval'));
		    } else {
		        timsval = Number(model.getValue(xRecDetailPath + '[' + i + ']/basepnt'));
		    }

			totPnt += Number(timsval);
		}
	}

	return totPnt;
}

/**
 * @group  :
 * @ver    : 2008.06.25
 * @by     : dhkim
 * @-------------------------------------------------------------------------------------------------------
 * @type   : function
 * @access : public
 * @param  :
 * @return :
 * @desc   : ÁßÁõµµ ¸¶½ºÅÍ¿Í »ó¼¼³»¿ªÀ» ÀúÀåÇϱâ Àü µ¥ÀÌÅÍÀÇ À¯È¿¼ºÀ» üũÇÑ´Ù.
 *           - »ó¼¼³»¿ª¿¡ ¹Ìüũ ³»¿ªÀÌ ÀÖ´ÂÁö È®ÀÎÇÑ´Ù.
 *           - 2008.08.06 dhkim ¿ä±¸»çÇ× Ãß°¡
 *             [¸ðµçÇ׸ñ ÇʼöüũÇϴ°æ¿ì]
 *             1) ÁßÁõµµ : ÀϹݺ´µ¿, Á¤½Å°úº´µ¿(DT, ECTÇ׸ñÀº Çʼö¾Æ´Ô), Ç÷¾×Åõ¼®
 *             2) ¿åâ
 *                clsflag = 1, 3, 5, 10(È­¸é³»ºÎ)
 *
 *             [¸ðµçÇ׸ñ Çʼöüũ¾Æ´Ñ°æ¿ì]
 *             1) ÁßÁõµµ : ÁßȯÀÚ½Ç, ½Å»ý¾ÆICU
 *             2) ³«»ó   : ¼ºÀÎ, ¼Ò¾Æ
 *                clsflag = 2, 4, 8, 9(È­¸é³»ºÎ)
 *           - 2008.08.20 dhkim ¿ä±¸»çÇ× Ãß°¡
 *             ³«»óÀÇ °æ¿ì ³ªÀ̸¦ üũÇÒ°Í.
 *             ³«»ó ¼Ò¾Æ : ¸¸ 12¼¼ ¹Ì¸¸ clsflag = 8
 *             ³«»ó ¼ºÀÎ : ¸¸ 13¼¼ ÀÌ»ó clsflag = 9
 *           - 2008.08.27 dhkim ¿ä±¸»çÇ× Ãß°¡
 *             üũµÈ Ç׸ñ¿¡ ´ëÇØ È½¼ö ÀÔ·ÂÇʵ尡 0À̸é Ƚ¼öÀÔ·ÂÇ϶ó´Â ¸Þ¼¼Áö ¶ç¿ï°Í
 * @-------------------------------------------------------------------------------------------------------
 */
function fIsValid(){

	var supcd;
	var _supcd, _flag, _hngnm, _timsval;
	var isChecked = false;


	var clsflag = model.getValue('/root/cond/clsflag');
	var age = model.getValue("/root/main/patinfo/patlist[" + (grd_patinfo.row-1) + "]/sexage").split('/')[1];

	//ȯÀÚ°¡ ¼±ÅõÇÁö ¾ÊÀº°æ¿ì ±â·ÏÀ» ÀÔ·ÂÇÒ¼ö ¾ø´Ù.
	var pid = grd_recpnt.valueMatrix(2, 1);//20080917 ¼öÁ¤
	if(pid == ''){
		messageBox('±â·ÏÇÏ·Á´Â ȯÀÚÁ¤º¸°¡ Á¸ÀçÇÏÁö ¾Ê½À´Ï´Ù. ȯÀÚ¸¦ ¸ÕÀú ¼±ÅÃÇϽŠÈÄ ±â·ÏÀ» ÀÛ¼ºÇϼ¼¿ä.', 'E');
		return false;
	}

	//20080827
	//üũµÈ Ç׸ñ¿¡ ´ëÇØ È½¼ö ÀÔ·ÂÇʵ尡 0À̸é Ƚ¼öÀÔ·ÂÇ϶ó´Â ¸Þ¼¼Áö ¶ç¿ï°Í
	for(var j = 1; j < grd_recdetail.rows; j++){

		_flag  = model.getValue(xRecDetailPath + '[' + j + ']/flag');
		_timsval  = model.getValue(xRecDetailPath + '[' + j + ']/timsval');
		_hngnm  = model.getValue(xRecDetailPath + '[' + j + ']/hngnm');

		//20080827
		//üũµÈ Ç׸ñ¿¡ ´ëÇØ È½¼ö ÀÔ·ÂÇʵ尡 0À̸é Ƚ¼öÀÔ·ÂÇ϶ó´Â ¸Þ¼¼Áö ¶ç¿ï°Í
		if(_flag == 'Y' && _timsval != '' && (_timsval == '0' || _timsval == 0)){
			messageBox('[' + _hngnm + ']ÀÇ È½¼ö°¡ ÀԷµÇÁö ¾Ê¾Ò½À´Ï´Ù. Ƚ¼ö¸¦', 'C001');
			grd_recdetail.topRow = j;
			return false;
		}

	}

	//20080923 dhkim 2Â÷¸®Çã¼³ ¿ä±¸»çÇ× (¼Ò¾Æû¼Ò³â°úÀÇ °æ¿ì 13¼¼ ÀÌ»óÀÌ¶óµµ ÀÔ¿øÇÒ °æ¿ì°¡ Àֱ⶧¹®¿¡ ³ªÀÌÁ¦ÇÑÀ» µÎÁö ¸»¾Æ¾ß ÇÑ´Ù.)
	/*
	//³«»ó¼ºÀÎ, ³«»ó¼Ò¾ÆÀÇ °æ¿ì ȯÀÚ ³ªÀ̸¦ üũÇÔ
	if(clsflag == '8'){//³«»ó¼Ò¾Æ
		if(age > 13){
			messageBox('ÇØ´ç ȯÀÚÀÇ ³ªÀÌ°¡ ' + age + '¼¼À̹ǷΠ¾Æµ¿ ³«»óÀ§Çè»çÁ¤ ±â·ÏÀ»', 'E001');
			return false;
		}
	}else if(clsflag == '9'){//³«»ó¼ºÀÎ
		if(age < 13){
			messageBox('ÇØ´ç ȯÀÚÀÇ ³ªÀÌ°¡ ' + age + '¼¼À̹ǷΠ¼ºÀÎ ³«»óÀ§Çè»çÁ¤ ±â·ÏÀ»', 'E001');
			return false;
		}
	}
	*/

	//³«»ó¼ºÀÎ (Morse Scale), ³«»ó¼Ò¾Æ, ÁßÁõµµ ÁßȯÀÚ½Ç, ½Å»ý¾ÆICU Àº Çʼöüũ ¾ÈÇÔ
	if(clsflag == '2' || clsflag == '4' || clsflag == '6' || clsflag == '7' || clsflag == '8' || clsflag == '9'){
		return true;
	}

	var testhngnm = '';

	//»ó¼¼³»¿ªÀÇ ¹Ìüũ ³»¿ªÀÌ ÀÖ´ÂÁö È®ÀÎÇÑ´Ù.
	//Á¤½Å°úº´µ¿ ¼±ÅÃÇßÀ»¶§ Ç׸ñÁß DT(<clstlcd>00000440</clstlcd>), ECT(<clstlcd>00000447</clstlcd>)´Â Çʼö¾Æ´Ô
	for(var i = 1; i <= grd_recdetail.rows; i++){

		supcd = model.getValue(xRecDetailPath + '[' + i + ']/supcd');

		if(i == (grd_recdetail.rows)){
			if(isChecked == false){//¸¶Áö¸· rowÀÇ ±×·ìÀº ºñ±³ÇÒ µ¥ÀÌÅÍ°¡ ¾øÀ¸¹Ç·Î üũ°ªÀÌfalseÀ̸é blocking°Ç´Ù.(20080825)
				//2008.08.07 dhkim Ãß°¡
				//Á¤½Å°úº´µ¿ ¼±ÅÃÇßÀ»¶§ Ç׸ñÁß DT, ECT´Â Çʼö¾Æ´Ô
				if((clsflag == '5' && hngnm == 'DT')||(clsflag == '5' && hngnm == 'ECT')){
					//skip
				}else{
					messageBox(hngnm + '(ÀÌ)°¡ ¼±ÅõÇÁö ¾Ê¾Ò½À´Ï´Ù.' + hngnm + '(¸¦)À»', 'C001');//¼±ÅÃÇϽʽÿÀ.
					grd_recdetail.topRow = i-1;

					return false;
				}
			}
		}

		if(supcd == '00000000'){

			hngnm = model.getValue(xRecDetailPath + '[' + i + ']/hngnm');

			for(var j = (i + 1); j < grd_recdetail.rows; j++){

				_supcd = model.getValue(xRecDetailPath + '[' + j + ']/supcd');

				//alert('»óÀ§ : ' + hngnm + ', ÇÏÀ§ : ' + model.getValue(xRecDetailPath + '[' + j + ']/hngnm') );

				if(supcd == _supcd){

					if(isChecked == false){//´Ù¸¥±×·ìÀ¸·Î º¯°æµÆÀ»¶§ isChecked°¡ falseÀÌ¸é ¸®ÅÏÇϸ鼭 ÇØ´ç row¸¦ Á© À§·Î °¡µµ·Ï º¸¿©ÁÜ-_-;

						//2008.08.07 dhkim Ãß°¡
						//Á¤½Å°úº´µ¿ ¼±ÅÃÇßÀ»¶§ Ç׸ñÁß DT, ECT´Â Çʼö¾Æ´Ô
						if((clsflag == '5' && hngnm == 'DT')||(clsflag == '5' && hngnm == 'ECT')){
							//skip
						}else{
							messageBox(hngnm + '(ÀÌ)°¡ ¼±ÅõÇÁö ¾Ê¾Ò½À´Ï´Ù.' + hngnm + '(¸¦)À»', 'C001');//¼±ÅÃÇϽʽÿÀ.
							grd_recdetail.topRow = i;

							return false;
						}
					}

					isChecked = false;
					j = grd_recdetail.rows;
					//break;

				}else{

					_flag  = model.getValue(xRecDetailPath + '[' + j + ']/flag');

					if(_flag == 'Y'){
						isChecked = true;
					}
				}
			}
		}
	}
	return true;
}


 /**
 * @group  :
 * @ver    : 2007.12.06
 * @by     : ½ÅÇõÃá
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : ³»È¯ÀÚ Á¤º¸¸¦ Á¶È¸ÇÑ´Ù.
 * @param  :
 * @return :
 * @---------------------------------------------------
 */
function fmisetting(){
		var setid = getUserId();
		var setdeptcd = getUserInfo("dutplcecd");
		
		model.removeNodeset("/root/send");
		model.removeNodeset("/root/hidden/setting/settingrn");
		
		//Àΰø½ÅÀå½Ç Ç÷¾×Åõ¼®°£È£±â·Ï¿¡¼­ È­¸é ¿¬µ¿½Ã parmaÃß°¡-kys-20100412
		if(getScreenMenuParameter() == "SMMND" || opener.javascript.getParameter("SMMND00700_param_dial") == "dialrec"){
				model.makeValue("/root/send/wardcd", setdeptcd);
		} else {
				model.makeValue("/root/send/wardcd", model.getValue("/root/cond/wardcd"));
		}
		
		//³»È¯ÀÚ¼¼ÆÃÇÑ °£È£»ç Á¶È¸
		if(submit("TRMNW04012")){
		//º´µ¿ º¯°æ½Ã ³»È¯ÀÚ Á¤º¸ ¼ÂÆõÊ_2009-02-09_SMY¼öÁ¤
		
		model.setValue("/root/cond/settingrnid", "");
		for(i = 1; i <= getNodesetCount("/root/hidden/setting/settingrn"); i++ ) {
				if (model.getValue("/root/hidden/setting/settingrn[" + i + "]/settingrnid") == setid) {
						model.setValue("/root/cond/settingrnid", setid);
				}
		}
	/*
		var pid    = model.getValue("/root/main/paminfo/pamlist/pid");//»ó´ÜÁ¤º¸
		var setid = getUserId();
		var setCnt = getNodesetCount('/root/hidden/setting/settingrn');
		
		var setRow = 0;
		for(var i = 1; i < setCnt; i++){
				if(model.getValue('/root/hidden/setting/settingrn[" + i + "]/settingrnid') == setid){
						setRow = i-1;
						break;
				}
		}

		if(setRow > 0 && pid == ''){//»ó´ÜÁ¤º¸ ¼³Á¤¾ÈµÇ¾î ÀÖÀ»¶§
				model.setValue('/root/cond/settingrnid', setid);//¼¼¼ÇÀÇ °£È£»ç·Î ¾ÆÀ̵ð¼¼ÆÃ
		} else {
				model.setValue('/root/cond/settingrnid', '-');//¾øÀ¸¸é default
		}
	*/
		}
		model.refresh();
		return;
}


 /**
 * @group  :
 * @ver    : 2007.12.06
 * @by     : ½ÅÇõÃá
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   :  ÁßÁõµµ »ó¼¼³»¿ªÀÇ ¼³¸íÀ» Á¶È¸ÇÑ´Ù.
 * @param  :
 * @return :
 * @---------------------------------------------------
 */
function fHistDescs(){
		model.removeNodeset("/root/main/tar_desccnts");
		var iRow = grd_recdetail.row;
		model.makeValue("/root/main/tar_desccnts",model.getValue(xRecDetailPath+"["+iRow+"]/desccnts"));
		tar_desccnts.refresh();
}


/**
 * @ver    : 2008.06.09
 * @author : dhkim
 * @------------------------------------------------------------------------------
 * @access : public
 * @type   : function
 * @param  :
 * @desc   : ¼±ÅÃµÈ º´µ¿¿¡ µû¶ó ÁßÁõµµ/³«»ó/¿åâ ±¸ºÐÀ» default¼±ÅÃÇÑ´Ù.
 * @--------------------------------------------------------------------------------
 */
function fSelectDefaultRdoCond(clsseting){
/*
  switch (clsseting){
  	  	case "3050122000" : rdo_clsflaga.value = "5" ; break;	//10Ãþµ¿º´µ¿(Á¤½Å°úº´µ¿)
        case "2110201000" : rdo_clsflaga.value = "2" ; break;	//½Å»ý¾ÆÁßȯÀÚ½Ç(½Å»ý¾ÆICU)
        case "3060000000" : rdo_clsflaga.value = "4" ; break;	//ÁßȯÀÚ½Ç
        case "3060600000" : rdo_clsflaga.value = "4" ; break;	//2ÃþÁßȯÀÚ½Ç
        case "3060400000" : rdo_clsflaga.value = "4" ; break;	//¼øȯ±â°èÁßȯÀÚ½Ç
        case "3060300000" : rdo_clsflaga.value = "4" ; break;	//½Å°æ¿Ü°úÁßȯÀÚ½Ç
        case "3060200000" : rdo_clsflaga.value = "4" ; break;	//¿Ü°úÁßȯÀÚ½Ç
        case "3060100000" : rdo_clsflaga.value = "4" ; break;	//³»°úÁßȯÀÚ½Ç
        default : rdo_clsflaga.value = "1"						//default´Â ÀϹݺ´µ¿ÀÓ.
  }
*/
		var setflag = "1";

		//ÁßÁõµµ ±â·Ï¿¡¼­ »ç¿ëÇÏ´Â ºÎ¼­ÄÚµå Á¶È¸_20090414_SMYÃß°¡
		for(i = 1; i <= getNodesetCount("/root/init/icucdgrup/icucdgruplist"); i++){
				if(clsseting == model.getValue("/root/init/icucdgrup/icucdgruplist[" + i + "]/wardcd")){	// ÁßȯÀÚ½ÇÀ̸é
						if(clsseting == model.getvalue("/root/code/codeinfo/codelist[cdgrupid='052']/cdid")){ // ½Å»ý¾ÆÁßȯÀÚ½ÇÀ̸é
								setflag = '2';
						} else {
								setflag = model.getValue("/root/init/icucdgrup/icucdgruplist[" + i + "]/clsflag");
						}
				}
		}
		
		if (setflag == '1') {		
				if(clsseting == model.getvalue("/root/code/codeinfo/codelist[cdgrupid='W02']/cdid")){		// 302º´µ¿À̸é
						setflag = '5'
				} else if(clsseting == model.getvalue("/root/code/codeinfo/codelist[cdgrupid='055']/cdid")){		// Àΰø½ÅÀå½ÇÀ̸é
						setflag = '3'
				} else {
						setflag = '1';
				}
		}
		
		rdo_clsflaga.value = setflag;
}


/**
 * @ver    : 2008.06.09
 * @author : dhkim
 * @------------------------------------------------------------------------------
 * @access : public
 * @type   : function
 * @param  : clsflag ÁßÁõµµ/³«»ó/¿åâ ±¸ºÐ(¶óµð¿À¹öÆ°)
 *           ioflag  ¿Ü·¡/ÀÔ¿ø±¸ºÐ
 * @desc   : ȯÀÚÁ¤º¸ ´õºíŬ¸¯ÇÒ¶§
 *           Ç÷¾×Åõ¼®ÀÇ °æ¿ì
 *           ÀÔ¿øȯÀÚ´Â Á¶È¸Á¶°Ç¿¡ ±âº» Á¶È¸°ª(º´µ¿, º´½Ç, ȯÀÚ¸í, µî·Ï¹øÈ£)À» ¼¼ÆÃÇؾßÇÑ´Ù.
 * @--------------------------------------------------------------------------------
 */
function fSetSearchCondition(clsflag, ioflag){

  if(clsflag == '3' && ioflag == 'O'){

    var pid    = model.getValue('/root/main/patinfo/patlist[' + (grd_patinfo.row-1) + ']/pid');
    var patnm  = model.getValue('/root/main/patinfo/patlist[' + (grd_patinfo.row-1) + ']/hngnm');
    var sexage = model.getValue('/root/main/patinfo/patlist[' + (grd_patinfo.row-1) + ']/sexage');
    var age = model.getValue('/root/main/patinfo/patlist[' + (grd_patinfo.row-1) + ']/age');
    //ȯÀÚ¸í, µî·Ï¹øÈ£ ¼¼ÆÃ
    model.setValue("/root/cond/pid", pid);
    model.refresh();
  }else if(clsflag == '3' && ioflag == 'I'){

    var pid = model.getValue('/root/main/patinfo/patlist[' + (grd_patinfo.row-1) + ']/pid');
    var roomcd = model.getValue('/root/main/patinfo/patlist[' + (grd_patinfo.row-1) + ']/roomcd');
    var wardcd = model.getValue('/root/main/patinfo/patlist[' + (grd_patinfo.row-1) + ']/wardcd');
    var patnm  = model.getValue('/root/main/patinfo/patlist[' + (grd_patinfo.row-1) + ']/hngnm');
    var sexage = model.getValue('/root/main/patinfo/patlist[' + (grd_patinfo.row-1) + ']/sexage');
    var age = model.getValue('/root/main/patinfo/patlist[' + (grd_patinfo.row-1) + ']/age');

    //º´µ¿¼±ÅÃ
    cmb_ward.value = wardcd;
    //º´µ¿¿¡ ÇØ´çµÇ´Â º´½Ç°Ë»ö
    fGetRoom();
    //º´½Ç¼±ÅÃ
    cmb_room.value = roomcd;
    //º´½Çº° ȯÀÚ°Ë»ö
    fGetPatient();
    //ȯÀÚ¸í, µî·Ï¹øÈ£ ¼¼ÆÃ
    cmb_pid.value = pid;
    opt_pid.value = pid;
    opt_patnm.value = patnm;            // Ãß°¡ (2011.03.29 Ahn)
    opt_sexage.value = sexage;  
    opt_age.value = age; 
  }
}


/**
 * ÁßÁõµµ/³«»ó/¿åâ (recflag) ¼±Åÿ©ºÎ¿¡ µû¶ó ĸ¼ÇÀ» º¯°æ
 */
function fChangeCaption(clsflag){
    model.setValue("/root/cond/agechk", "N" );
    
	//ÁßÁõµµ/³«»ó/¿åâ ¼±Åÿ©ºÎ¿¡ µû¶ó ÅؽºÆ®¸¦ º¯°æ
  	if(clsflag == "1" ){
      //capt_master.attribute("text") = "ÀϹݺ´µ¿ ÁßÁõµµ³»¿ª";        // 'ȯÀÚº° ÁßÁõµµ ¹× À§Çè»çÁ¤' À¸·Î °íÁ¤ (2011.03.29 Ahn)
      capt_pnt.attribute("text")    = "ÀϹݺ´µ¿ ÁßÁõµµ»ó¼¼Á¡¼ö";
      capt_detail.attribute("text") = "ÀϹݺ´µ¿ ÁßÁõµµ»ó¼¼³»¿ª";
      capt_bedsore.visible=false;
      grp_agechk.visible = false;
      group2.visible = false;
      group4.visible = false;
      grd_recdetail.attribute("height") = "525px";
    }else if(clsflag == "2" ){
      //capt_master.attribute("text") = "½Å»ý¾Æ ICU ÁßÁõµµ³»¿ª";
      capt_pnt.attribute("text")    = "½Å»ý¾Æ ICU ÁßÁõµµ»ó¼¼Á¡¼ö";
      capt_detail.attribute("text") = "½Å»ý¾Æ ICU ÁßÁõµµ»ó¼¼³»¿ª";
      capt_bedsore.visible=false;
      grp_agechk.visible = false;
      group2.visible = false;
      group4.visible = false;
      grd_recdetail.attribute("height") = "525px";
    }else if(clsflag == "3" ){
      //capt_master.attribute("text") = "Ç÷¾×Åõ¼® ÁßÁõµµ³»¿ª";
      capt_pnt.attribute("text")    = "Ç÷¾×Åõ¼® ÁßÁõµµ»ó¼¼Á¡¼ö";
      capt_detail.attribute("text") = "Ç÷¾×Åõ¼® ÁßÁõµµ»ó¼¼³»¿ª";
      capt_bedsore.visible=false;
      grp_agechk.visible = false;
      group2.visible = false;
      group4.visible = false;
      grd_recdetail.attribute("height") = "525px";
    }else if(clsflag == "4" || clsflag == "6" || clsflag == "7"){
      //capt_master.attribute("text") = "ÁßȯÀÚ½Ç ÁßÁõµµ³»¿ª";
      capt_pnt.attribute("text")    = "ÁßȯÀÚ½Ç ÁßÁõµµ»ó¼¼Á¡¼ö";
      capt_detail.attribute("text") = "ÁßȯÀÚ½Ç ÁßÁõµµ»ó¼¼³»¿ª";
      capt_bedsore.visible=false;
      grp_agechk.visible = false;
      group2.visible = false;
      group4.visible = false;
      grd_recdetail.attribute("height") = "525px";
    }else if(clsflag == "5"){
      //capt_master.attribute("text") = "Á¤½Å°úº´µ¿ ÁßÁõµµ³»¿ª";
      capt_pnt.attribute("text")    = "Á¤½Å°úº´µ¿ ÁßÁõµµ»ó¼¼Á¡¼ö";
      capt_detail.attribute("text") = "Á¤½Å°úº´µ¿ ÁßÁõµµ»ó¼¼³»¿ª";
      capt_bedsore.visible=false;
      grp_agechk.visible = false;
      group2.visible = false;
      group4.visible = false;
      grd_recdetail.attribute("height") = "525px";
    }else if(clsflag == "8"){
      //capt_master.attribute("text") = "³«»óÀ§Çè»çÁ¤±¸ºÐ(¾Æµ¿)³»¿ª";
      capt_pnt.attribute("text")    = "³«»óÀ§Çè»çÁ¤±¸ºÐ(Humpty Dumpty Scale)»ó¼¼Á¡¼ö";
      capt_detail.attribute("text") = "³«»óÀ§Çè»çÁ¤±¸ºÐ(Humpty Dumpty Scale)»ó¼¼³»¿ª";
      capt_bedsore.visible=false;
      group2.visible = false;
      group4.visible = true;
      grd_recdetail.attribute("height") = "420px";
      /*
      if ( instUseYN == "Y" ){
          grp_agechk.visible = true;
          cap_agemsg.attribute("text") = "³«»ó»çÁ¤ Á¦¿Ü °íÀ§Ç豺ÀÔ´Ï´Ù";
      }else {
          grp_agechk.visible = false;
      } 
      */
    }else if(clsflag == "9"){

    	//capt_master.attribute("text") = "³«»óÀ§Çè»çÁ¤±¸ºÐ(Morse Scale)³»¿ª";
	    capt_pnt.attribute("text")    = "³«»óÀ§Çè»çÁ¤±¸ºÐ(Morse Scale)»ó¼¼Á¡¼ö";
	    capt_detail.attribute("text") = "³«»óÀ§Çè»çÁ¤±¸ºÐ(Morse Scale)»ó¼¼³»¿ª";
	    capt_bedsore.visible=false;
	    group2.visible = true;
	    group4.visible = false;
	    grd_recdetail.attribute("height") = "420px";
	    
			/*
      if ( instUseYN == "Y" ){
          grp_agechk.visible = true;
          cap_agemsg.attribute("text") = "³«»ó»çÁ¤ Á¦¿Ü °íÀ§Ç豺ÀÔ´Ï´Ù";//20100514 khj ¼Ò°æÈ­itc ¿äû¿¡ÀÇÇÑ ¸Þ½ÃÁö ¼öÁ¤
      }else {
          grp_agechk.visible = false;
      } 
      */
    }else if(clsflag == "10"){
     // capt_master.attribute("text") = "¿åâÀ§Çè»çÁ¤±¸ºÐ(¿åâ)³»¿ª";
      capt_pnt.attribute("text")    = "¿åâÀ§Çè»çÁ¤±¸ºÐ(Braden Scale)»ó¼¼Á¡¼ö";
      capt_detail.attribute("text") = "¿åâÀ§Çè»çÁ¤±¸ºÐ(Braden Scale)»ó¼¼³»¿ª";
      capt_bedsore.visible=true;
      grp_agechk.visible = false;
      group2.visible = false;
      group4.visible = false;
      grd_recdetail.attribute("height") = "525px";
    }

}



/**
 * @ver    : 2008.06.09
 * @author : dhkim
 * @------------------------------------------------------------------------------
 * @access : public
 * @type   : function
 * @param  :
 * @desc   : Ç÷¾×Åõ¼®ÀÇ °æ¿ì ȯÀÚÁ¤º¸ ±×¸®µåÀÇ ±¸Á¶¸¦ º¯°æ
 * @--------------------------------------------------------------------------------
 */
function fChangeGridColumn(clsflag){
  if(clsflag == '3'){
    grd_patinfo.colWidth(grd_patinfo.colRef("ioflagnm")) = 33;	//±¸ºÐ
    grd_patinfo.colWidth(grd_patinfo.colRef("pid")) = 80;	//µî·Ï¹øÈ£
    grd_patinfo.colWidth(grd_patinfo.colRef("roomcd")) = 0;	//º´½Ç
    grd_patinfo.colWidth(grd_patinfo.colRef("indd")) = 0;	//ÀÔ¿øÀÏ
    grd_patinfo.colWidth(grd_patinfo.colRef("maintepatrgstdd")) = 68;	//À¯ÁöȯÀÚµî·ÏÀÏÀÚ
    //20080820 ÁÖ¼®Ã³¸® rdo_bloodioflag.attribute("visibility") = "visible";//¿Ü·¡ÀÔ¿ø±¸ºÐ
  }else{
    grd_patinfo.colWidth(grd_patinfo.colRef("ioflagnm")) = 0;	//±¸ºÐ
    grd_patinfo.colWidth(grd_patinfo.colRef("pid")) = 0;	//µî·Ï¹øÈ£
    grd_patinfo.colWidth(grd_patinfo.colRef("roomcd")) = 53;	//º´½Ç
    grd_patinfo.colWidth(grd_patinfo.colRef("indd")) = 69;	//ÀÔ¿øÀÏ
    grd_patinfo.colWidth(grd_patinfo.colRef("maintepatrgstdd")) = 0;	//À¯ÁöȯÀÚµî·ÏÀÏÀÚ
    //20080820 ÁÖ¼®Ã³¸® rdo_bloodioflag.attribute("visibility") = "hidden";//¿Ü·¡ÀÔ¿ø±¸ºÐ
    //20080820 ÁÖ¼®Ã³¸® rdo_bloodioflag.value = '';
  }
}

/**
 * @ver    : 2008.06.09
 * @author : dhkim
 * @------------------------------------------------------------------------------
 * @access : public
 * @type   : function
 * @param  : clsflag ÁßÁõµµ/³«»ó/¿åâ ±¸ºÐ(¶óµð¿À¹öÆ°)
 *           ioflag  ¿Ü·¡/ÀÔ¿ø±¸ºÐ
 * @desc   : ȯÀÚÁ¤º¸ ´õºíŬ¸¯ÇÒ¶§
 *           Ç÷¾×Åõ¼®ÀÇ °æ¿ì ¿Ü·¡È¯ÀÚ´Â Á¶È¸Á¶°ÇÀ» clearÇÏ°í ºñÈ°¼ºÈ­Ã³¸®ÇÑ´Ù.
 * @--------------------------------------------------------------------------------
 */
function fDisabledSearchArea(clsflag, ioflag){


  //±¸ºÐÀÌ Ç÷¾×Åõ¼®, ¿Ü·¡È¯ÀÚÀ϶§ Á¶È¸Á¶°Ç clear, ºñÈ°¼ºÈ­Ã³¸®
  if(clsflag == '3' && ioflag == 'O'){
	
  	caption35.attribute('visibility') = 'visible';
  	cmb_ward.attribute('visibility') = 'visible';
  	// ÀÀ±Þ½ÇÀÌ ¾Æ´Ò °æ¿ì¸¸ º¸ÀÓ  (2011.03.15 Ahn)
  	if(eERFLAG != "Y"){
	  	cmb_room.attribute('visibility') = 'visible';
	  	//cmb_pid.attribute('visibility') = 'visible';         // ȯÀÚ¸®½ºÆ® ÄÞº¸ ¼û±â±â (2011.03.29 Ahn)
  	}
	
  	cmb_ward.disabled = true;
  	cmb_room.disabled = true;
  	cmb_pid.disabled = true;

  	cmb_ward.value = '';
  	cmb_room.value = '';
  }else{
  	caption35.attribute('visibility') = 'visible';							// Room ĸ¼Ç È°¼ºÈ­
  	cmb_ward.attribute('visibility') = 'visible';								// º´µ¿¼±Åà ¶óµð¿À ¹öÆ° È°¼ºÈ­
  	if(eERFLAG != "Y"){
	  	cmb_room.attribute('visibility') = 'visible';							// º´½Ç¼±Åà Ȱ¼ºÈ­
	  	//cmb_pid.attribute('visibility') = 'visible';            // ȯÀÚ¸®½ºÆ® ÄÞº¸ ¼û±â±â (2011.03.29 Ahn)
  	}
	
	if(model.getValue("/root/main/paminfo/pamlist/dschdd") == "99991231"){
		caption35.disabled = false;
		cmb_ward.disabled = false;
		cmb_room.disabled = false;
		cmb_pid.disabled = false;
	}

  }
}


/**********************************************************************************************************************************************/
/***********************************************************½ºÅ©¸³Æ®Á¤¸®ÁßÀÔ´Ï´Ù******************************************************************/
/**********************************************************************************************************************************************/






 /**
 * @group  :
 * @ver    : 2007.12.14
 * @by     : ½ÅÇõÃá
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : Sign Á¤º¸ÀÇ ÀνºÅϽº¸¦ ¸¸µç´Ù.
 * @param  :
 * @return :
 * @---------------------------------------------------
 */
function fsingnode(){
  var clsrecchk = model.getValue("/root/main/topattribute/clsflag")
     var a = rdo_clsflaga.label;
     var b = rdo_clsflagb.label;
     var c = rdo_clsflagc.label;

     var iRow = grd_recmaster.row
     var xrecgruplistPath = "/root/main/recgrup/recgruplist"
     if(a != ""){
       model.makeValue("/root/main/sing/redord/clsflag",a);
     }
     if(b != ""){
       model.makeValue("/root/main/sing/redord/clsflag",b);
     }
     if(c != ""){
       model.makeValue("/root/main/sing/redord/clsflag",c);
     }
    model.makeValue("/root/main/sing/redord/usernm",model.getValue(xrecgruplistPath+"["+ iRow +"]/usernm"));
    model.makeValue("/root/main/sing/redord/execdt",model.getValue(xrecgruplistPath+"["+ iRow +"]/execdt"));
    model.makeValue("/root/main/sing/redord/exectm",model.getValue(xrecgruplistPath+"["+ iRow +"]/exectm"));
    var hRow = grd_recdetail.rows
    var k = 1
    var o = 1
    var xhistgruplistPath = "/root/main/histgrup/histgruplist"
    var xsinghistgrupPath = "/root/main/sing/histgrup"
    var total = 0
    var only = 0
    var supcd2 = "00000000"
    for(i=0; i <= hRow; i++){
      var flagchk = model.getValue(xhistgruplistPath+"["+i+"]/flag")
         var supcdk  = model.getValue(xhistgruplistPath+"["+i+"]/supcd")
         if(supcdk  == "00000000"){
           model.makeNode("/root/main/sing/histgrup["+k+"]");
           model.copyNode("/root/main/sing/histgrup["+k+"]", xhistgruplistPath+"["+i+"]");
           k = k + 1
         }
         if(flagchk == "Y"){
           model.makeNode("/root/main/sing/histgrup["+k+"]");
           model.copyNode("/root/main/sing/histgrup["+k+"]", xhistgruplistPath+"["+i+"]");
           k = k + 1
        }
    }
    for(i=0; i <= hRow; i++){
    var flagchk = model.getValue(xhistgruplistPath+"["+i+"]/flag")
         var supcdk  = model.getValue(xhistgruplistPath+"["+i+"]/supcd")
         if(supcdk  == "00000000"){
           var l = 0
           var grupcd1 = model.getValue(xhistgruplistPath+"["+i+"]/grupcd")
        }
        var supcd1 = model.getValue(xhistgruplistPath+"["+i+"]/supcd")
        var sum1 = model.getValue(xhistgruplistPath+"["+i+"]/sumk")
        var sumk = 0
        if(l==0 && flagchk == "Y" && sum1!="Y"){
          for(k=0; k<=hRow; k++){
            supcd2 = model.getValue(xhistgruplistPath+"["+k+"]/supcd")
            var flagchk1 = model.getValue(xhistgruplistPath+"["+k+"]/flag")
            if(supcd1==supcd2 && supcd1==grupcd1 && flagchk1 == "Y"){
              sumk = sumk + (model.getValue(xhistgruplistPath+"["+k+"]/basepnt") * model.getValue(xhistgruplistPath+"["+k+"]/timsinptyn"));
              total = total + (model.getValue(xhistgruplistPath+"["+k+"]/basepnt") * model.getValue(xhistgruplistPath+"["+k+"]/timsinptyn"));
              model.makeValue(xhistgruplistPath+"["+k+"]/sumk", "Y");
            }
          }
           model.makeNode("/root/main/sing/topsum["+o+"]");
           model.makeValue("/root/main/sing/topsum["+o+"]/sum", sumk);
           if(l==0){
             sumk = 0;
             o = o +1
           }
        }


    }
    model.makeNode("/root/main/sing/topsum["+o+"]");
    model.makeValue("/root/main/sing/topsum["+o+"]/sum", total);

    if(clsrecchk != 7 || clsrecchk != 8 || clsrecchk != 9){
         clsflag = model.getValue("/root/main/topattribute/clsflag") ;
         recflag = "1";
    }
    if (clsrecchk == 8 || clsrecchk == 7){
         clsflag = model.getValue("/root/main/topattribute/clsflag") ;
         recflag = "2";
    }
    if (clsrecchk == 9  ){
         clsflag =  model.getValue("/root/main/topattribute/clsflag") ;
         recflag = "3";
    }
    var kRow = grd_recmaster.row
  var xrecgruplistPath = "/root/main/recgrup/recgruplist"
  
  var maddchk01 = model.getValue('/root/cond/maddchk01'); 
 	var maddchk02 = model.getValue('/root/cond/maddchk02'); 
 	var maddchk03 = model.getValue('/root/cond/maddchk03'); 
 	var maddchk04 = model.getValue('/root/cond/maddchk04'); 
 	var haddchk = model.getValue('/root/cond/haddchk'); 
 	var haddchk01 = model.getValue('/root/cond/haddchk'); 
 	var dinfo = maddchk01+maddchk02+maddchk03+maddchk04+haddchk+haddchk01;
 	
    model.makeValue("/root/send/execdt",  model.getValue(xrecgruplistPath+"["+kRow+"]/execdt"))
    model.makeValue("/root/send/clsflag", model.getValue("/root/main/topattribute/clsflag") );
    model.makeValue("/root/send/recflag", recflag);
    model.makeValue("/root/send/totpnt", total);
    model.makeValue('/root/send/bspntgrup/dinfo', dinfo);
    
    if(submit("TRMNW04014")){
       o = o+1
       model.makeNode("/root/main/sing/topsum["+o+"]");
       model.makeValue("/root/main/sing/topsum["+o+"]/sum", model.getValue("/root/main/sfbp/sfbpinfo/clsgrupkind"));
  }
}

 /**
 * @group  :
 * @ver    : 2010.05.03
 * @by     : khj
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : JCI¿ë : ³«»óÀº 7¼¼ ¹Ì¸¸ ȤÀº 65¼¼ ÀÌ»óÀÎ °æ¿ì °íÀ§Ç豺üũµÇ¸é »ó¼¼³»¿ª ¼±ÅÃÇÒ¼ö ¾ø°í µðÆúÆ®·Î °íÀ§Ç豺ÀÓ.
 * @param  : pFlag = Y : check, N : uncheck
 * @return :
 * @---------------------------------------------------
 */
function fJCISettingAgeChk(pFlag){

    var clsflag = model.getValue('/root/cond/clsflag');
    if ( clsflag != "8" && clsflag != "9" ) return;
    
    var clsflag_modify = (clsflag == "8" ? "1" : "2");
    
    instUseYNcdnm = model.getValue("/root/code/codeinfo/codelist[cdgrupid ='199' and cdnm = 'Y' and cdid ='"+ clsflag_modify +"' ]/grupdetldesc");
    
    if ( pFlag =="Y" ){
        
        grd_recpnt.addStatus(2, 'update');
        grd_recpnt.valueMatrix(grd_recpnt.fixedRows,grd_recpnt.colRef("resultcd") ) = instUseYNcdnm;

		for( var jdx = grd_recpnt.colRef("timsval01") ; jdx <= grd_recpnt.colRef("totpnt") ; jdx++ ){
		    grd_recpnt.valueMatrix(grd_recpnt.fixedRows, jdx ) = "";
		}
		
		if(grd_recmaster.rowStatus(grd_recmaster.row) != 1){//»óÅ°¡ ½Å±Ô»óÅ°¡ ¾Æ´Ï¸é u·Î º¯°æ
			grd_recmaster.addStatus(grd_recmaster.row, 'update');
			model.setValue(xRecMasterPath + '[' + grd_recmaster.row + ']/stat', 'u');
		}
		
        grd_recmaster.valueMatrix(grd_recmaster.row,grd_recmaster.colRef("resultnm") ) = instUseYNcdnm;
        grd_recmaster.valueMatrix(grd_recmaster.row,grd_recmaster.colRef("totpnt") ) = "";

        model.setValue(xRecMasterPath + '[' + grd_recmaster.row + ']/agechk', "Y" );

        for( var idx = 1 ; idx <= getNodesetCount(xRecDetailPath); idx++ ){
            model.setValue(xRecDetailPath +"["+ idx +"]/flag", "N");
            model.setValue(xRecDetailPath +"["+ idx +"]/timsval", "");
            grd_recdetail.isReadonly(idx, grd_recdetail.colRef("flag"), idx, grd_recdetail.colRef("timsval")) = true;
        }
        
        

    }else {
        
		//ÁßÁõµµ ¸¶½ºÅͱ׸®µå
		if(grd_recmaster.rowStatus(grd_recmaster.row) != 1){//»óÅ°¡ ½Å±Ô»óÅ°¡ ¾Æ´Ï¸é u·Î º¯°æ
			grd_recmaster.removeStatus(grd_recmaster.row, 'update');
			model.setValue(xRecMasterPath + '[' + grd_recmaster.row + ']/stat', '-');
			
		}   
		model.setValue(xRecMasterPath + '[' + grd_recmaster.row + ']/agechk', "N" );     
        fSearchRecPnt();

        grd_recmaster.valueMatrix(grd_recmaster.row,grd_recmaster.colRef("resultnm") ) = grd_recpnt.valueMatrix(grd_recpnt.fixedRows,grd_recpnt.colRef("resultcd") );
        grd_recmaster.valueMatrix(grd_recmaster.row,grd_recmaster.colRef("totpnt") ) = grd_recpnt.valueMatrix(grd_recpnt.fixedRows, grd_recpnt.colRef("totpnt") );
    }
    
    grd_recdetail.refresh();
    
}

/**
 * @group  :
 * @ver    : 2011.03.14
 * @by     : ¾Èµµ¿µ
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : ±¸¿ªÁ¤º¸ Á¶È¸ ¹× ³»È¯ÀÚÁ¤º¸ ¼û±â±â (ÀÀ±Þ½ÇÀÎ °æ¿ì)
 * @param  :
 * @param  :
 * @return :
 * @---------------------------------------------------
 */
function fGetWardChngInfo(initFlag, wardCd, sectionCd){
	if(initFlag=="Y") {
		var sWardCD = wardCd;
	}
	else{
		var sWardCD = model.getValue("/root/cond/wardcd");
	}
	
	if ( sWardCD == eERDEPTCD) {
		eERFLAG = "Y";
	}else{
		eERFLAG = "";
	}
		
	//ÀÀ±Þ½ÇÀÎ °æ¿ì ±¸¿ªÁ¤º¸ Ãß°¡Á¶È¸
	if(eERFLAG == "Y"){          // ÀÀ±Þ½Ç
		fGetZoneList();
		copyNodeset("/root/temp2/zoneinfo", "/root/temp/zoneinfo");
		//cap_wardcd.attribute("text") = "±¸¿ª:";
		cmb_room.visible = "false";
		//cmb_settingrn.disabled = "true";
		//cmb_erpat.visible = "true";
		//cmb_pid.visible = "false"; 
		cmb_zone.visible = "true";
		 
		if(initFlag=="Y"){  // óÀ½ »ó´Ü Á¤º¸·Î È­¸é ¿­¸± ¶§
			model.setValue("/root/cond/zonecd", (sectionCd == "") ? "-" : sectionCd);
		}else{
			model.setValue("/root/cond/zonecd", "-");  // 'All'·Î default
		}
	
		
	}else{
		//cap_wardcd.attribute("text") = "º´½Ç:"
		cmb_room.visible = "true";
		//cmb_settingrn.disabled = "false";
		//cmb_erpat.visible = "false";
		//cmb_pid.visible = "true"
		cmb_zone.visible = "false";
		
		//grd_patinfo.colAttribute(grd_patinfo.colRef("roomcd"), "visibility") = "visible";
		//grd_patinfo.colAttribute(grd_patinfo.colRef("bedposcnts"), "visibility") = "hidden";
		
		model.setValue("/root/cond/zonecd", "");
		
	}
	cmb_zone.refresh();
	cmb_room.refresh();
	cmb_erpat.refresh();
	//cmb_settingrn.refresh();
	grd_patinfo.refresh();
}

/**
 * @group  :
 * @ver    : 2011.03.30
 * @by     : ¾Èµµ¿µ
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : ±×¸®µå Á¶È¸ ½Ã ºÐ·ù±¸ºÐ¿¡ µû¸¥ À籸¼º
 * @param  :
 * @param  :
 * @return :
 * @---------------------------------------------------
 */

function fSetPatGrid(grid, flag){
	switch (flag){
	
	case "Pat" :
	
		var arrColIdx = new Array();
		arrColIdx[0] = grid.colRef("resultnm1");     // °¢ À§Ç豺 ÄÝ À妽º
		arrColIdx[1] = grid.colRef("resultnm2");
		arrColIdx[2] = grid.colRef("resultnm3");
		arrColIdx[3] = grid.colRef("resultnm4");
		
		// °ªÀÌ ÀÖ´Â À§Ç豺 ¼¿ »ö ³Ö±â
		for(i=2; i< grid.rows; i++){      // Çà
			for(var j=0; j<arrColIdx.length; j++){
				if("" != grid.valueMatrix(i, arrColIdx[j])){
					if(2 == (j+1)) {       // ³«»ó
						if("Y" == grid.valueMatrix(i, grid.colRef("coloryn2"))){             // '°íÀ§Ç豺' ¸¸ »ö Ç¥½Ã (2011.04.13 ahn)
							grid.cellstyle("background-color", i, arrColIdx[j]) = yellow;
							grid.cellstyle("color", i, arrColIdx[j]) = red;
						}
					}else if(3 == (j+1)) {       // ¿åâ
						if("Y" == grid.valueMatrix(i, grid.colRef("coloryn3"))){             // 'Á¤»ó' Á¦¿ÜÇÑ ±º »ö Ç¥½Ã (2011.04.19 ahn)
							grid.cellstyle("background-color", i, arrColIdx[j]) = red;
							//grd_patinfo.cellstyle("font-color", i, arrColIdx[j]) = red;
						}
					}else if(4 == (j+1)) {       // ÅëÁõ
						if(4 <= parseInt(grid.valueMatrix(i, arrColIdx[j]))){                // ÅëÁõ Á¡¼ö°¡ 4Á¡ ÀÌ»óÀÎ °æ¿ì¸¸ »ö Ç¥½Ã (2011.04.13 ahn)
							grid.cellstyle("background-color", i, arrColIdx[j]) = indigo;
							grid.cellstyle("color", i, arrColIdx[j]) = white;       
						}
					}
				}
			}
		}
	
		// Á¶È¸ ±¸ºÐ´ë·Î ȯÀÚÁ¤º¸ ±×¸®µå ±¸¼º
		var tmp = model.getValue("/root/cond/recsrchflag");
		var recSrchFlag = tmp.setReplaceWord("^", "");
		
		for(i=1; i<5; i++){     // ºÐ·ù ¼ö
			var resultnm = "resultnm" + i;
			var execnm = "execnm" + i;
			var execdd = "execdd" + i;
			grid.colHidden(grid.colRef(resultnm)) = true;
			grid.colHidden(grid.colRef(execnm)) = true;
			grid.colHidden(grid.colRef(execdd)) = true;
			
			for(var j=0; j < recSrchFlag.length; j++){	
				if(i == recSrchFlag.charAt(j)){
					var resultnm = "resultnm" + recSrchFlag.charAt(j);
					var execnm = "execnm" + recSrchFlag.charAt(j);
					var execdd = "execdd" + recSrchFlag.charAt(j);
					grid.colHidden(grid.colRef(resultnm)) = false;
					grid.colHidden(grid.colRef(execnm)) = false;
					grid.colHidden(grid.colRef(execdd)) = false;
					break;
				}
			}
			
		}
		grid.refresh();
		
		break;
	/*	
	case "Exec" :
		// Á¶È¸ ±¸ºÐ´ë·Î ȯÀÚÁ¤º¸ ±×¸®µå ±¸¼º
		var tmp = model.getValue("/root/cond/recsrchflag");
		var recSrchFlag = tmp.setReplaceWord("^", "");
		var totpnt = "";
		var resultnm = "";
		var execnm = "";
		
		for(i=1; i<5; i++){     // ºÐ·ù ¼ö
			totpnt = "totpnt" + i;
			resultnm = "resultnm" + i;
			execnm = "execnm" + i;
			
			grid.colHidden(grid.colRef(totpnt)) = true;
			grid.colHidden(grid.colRef(resultnm)) = true;
			grid.colHidden(grid.colRef(execnm)) = true;
			
			for(var j=0; j < recSrchFlag.length; j++){	
				if(i == recSrchFlag.charAt(j)){
					totpnt = "totpnt" + recSrchFlag.charAt(j);
					resultnm = "resultnm" + recSrchFlag.charAt(j);
					execnm = "execnm" + recSrchFlag.charAt(j);
					if(i<4) grid.colHidden(grid.colRef(totpnt)) = false;
					grid.colHidden(grid.colRef(resultnm)) = false;
					grid.colHidden(grid.colRef(execnm)) = false;
					break;
				}
			}
			
		}
		grid.refresh();
		
		break;
	*/	
	default :
		break;
		
	}
		
}


/**
 * @group  :
 * @ver    : 2011.03.31
 * @by     : ¾Èµµ¿µ
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : Á¶È¸ ºÐ·ùº° Á¤·Ä (°¡Àå ÀÛÀº °ª ã±â)
 * @param  :
 * @param  :
 * @return :
 * @---------------------------------------------------
 */

function fGetMinSrchFlag(srchflag){
	var arrRecSrFlag = new Array();
	var recsrchflag = srchflag.setReplaceWord("^", "");       
	for(i=0; i< recsrchflag.length; i++){
		arrRecSrFlag[i] = recsrchflag.charAt(i);
	}
	for(var j = 0; j < arrRecSrFlag.length; j++){ 
		 for(i = j+ 1; i < arrRecSrFlag.length; i++){ 
	
			 if(arrRecSrFlag[i] < arrRecSrFlag[j])
			 {
				 var tmp = arrRecSrFlag[j];
				 arrRecSrFlag[j] = arrRecSrFlag[i];
				 arrRecSrFlag[i] = tmp;
			 }
	    }
	}
	
	return arrRecSrFlag[0];     // °¡Àå ÀÛÀº °ª return
}

/**
 * @group  :
 * @ver    : 2011.04.13
 * @by     : ¾Èµµ¿µ
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : ȯÀÚ¸®½ºÆ® ±×¸®µå È®´ë / Ãà¼Ò
 * @param  :
 * @param  :
 * @return :
 * @---------------------------------------------------
 */

function fPatlist_Extend(grid){
	//switch (workflag) { 	
	
		//case "pat":
		/*	if ( btn_sizectr.text == "Ãà¼Ò") { 
				btn_sizectr.text = "È®´ë";		//Ãà¼ÒµÇ¾úÀ¸¹Ç·Î È®´ë½ÃÄѾßÇÑ´Ù.	 
				swtpatList.visible = true ;
				linpatListRight.visible = true ;
				linDruglistTop.attribute("x1") = "220"
				grd_druglist.attribute("left") = "220"
				grd_druglist.attribute("width") = "970"
				
				bolall.attribute("left") = "222";		//--(20081216)
			}
			*/		
		//	break;

		//case "drug":	
			if ( btn_sizectr.text == "Ãà¼Ò") { 
				btn_sizectr.text = "È®´ë";		//Ãà¼ÒµÇ¾úÀ¸¹Ç·Î È®´ë½ÃÄѾßÇÑ´Ù.	 
				//swtpatList.visible = true ;
				//linpatListRight.visible = true ;
				//linDruglistTop.attribute("x1") = "220"
				//grd_druglist.attribute("left") = "220"
				grid.attribute("width") = "335"
				
				//bolall.attribute("left") = "222";		//--(20081216)
			} else {
				btn_sizectr.text = "Ãà¼Ò";		//È®´ëµÇ¾úÀ¸¹Ç·Î Ãà¼Ò½ÃÄѾßÇÑ´Ù.
				//swtpatList.visible = false ;
				//linpatListRight.visible = false ;
				//linDruglistTop.attribute("x1") = "0"
				//grd_druglist.attribute("left") = "0"
				grid.attribute("width") = "690"
				
				//bolall.attribute("left") = "2";		//--(20081216)
			}
			grid.refresh();
		//	break;
	//}
}
///-----------------(20081210)

/**
 * @group  :
 * @ver    : 2011.04.19
 * @by     : ¾Èµµ¿µ
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : ¶óµð¿À ¼±Åà ½Ã ÀçÁ¶È¸
 * @param  :
 * @param  :
 * @return :
 * @---------------------------------------------------
 */
function patReSrch(flag){
	
	// ÇØ´ç ȯÀÚ pid Àӽà ÀúÀå
	var patPid = model.getValue('/root/cond/pid');
	var patIdx = "";
	
	//Á¶È¸Á¶°Ç clear
	model.setValue('/root/cond/pid', '');
	//ȯÀÚÁ¤º¸ Ç¥½Ã clear    (2011.03.29 Ahn)
	model.setValue('root/cond/patnm', '');
	model.setValue('root/cond/sexage', '');
	model.setValue('root/cond/age', '');
	
	//ȯÀÚÁ¤º¸ Á¶È¸
	fSearchPatList(flag);
	
	if("" != patPid){
		// ÇØ´ç ȯÀÚÁ¤º¸ Àç Ç¥½Ã
		model.setValue('/root/cond/pid', model.getValue("/root/main/patinfo/patlist[pid = '" + patPid + "']/pid"));
		model.setValue('/root/cond/patnm', model.getValue("/root/main/patinfo/patlist[pid = '" + patPid + "']/hngnm"));
		model.setValue('/root/cond/sexage', model.getValue("/root/main/patinfo/patlist[pid = '" + patPid + "']/sexage"));
		model.setValue('/root/cond/age', model.getValue("/root/main/patinfo/patlist[pid = '" + patPid + "']/age"));
	
	
		// ÇØ´ç ȯÀÚ À妽º ¼±Åà Àç ÁöÁ¤
		for(i=2; i<=grd_patinfo.rows; i++){
			if(patPid == grd_patinfo.valueMatrix(i,grd_patinfo.colRef("pid"))){
				patIdx = i;
				break;
			}
		}
	
	grd_patinfo.row = patIdx;
	
	//ÁßÁõµµ/³«»ó/¿åâ ³»¿ª Á¶È¸(grd_recmaster)
	fSearchRecMaster(patIdx);
	}
}

function addchk(){
	
	var wardcd = model.getValue("/root/cond/wardcd");
	var age = model.getValue("/root/cond/age");

	if(model.getValue("/root/cond/clsflag")  == "8"){
		
		for(i = 1; i <= getNodesetCount("/root/init/icucdgrup/icucdgruplist"); i++){
			if(wardcd == model.getValue("/root/init/icucdgrup/icucdgruplist[" + i + "]/wardcd")){	// ÁßȯÀÚ½ÇÀ̸é
				chk_haddchk01.value = 'Y';
			}
		}
		
		if(age < 3){
			chk_haddchk.value = 'Y';
		}
	}else if(model.getValue("/root/cond/clsflag")  == "9"){
	
		for(i = 1; i <= getNodesetCount("/root/init/icucdgrup/icucdgruplist"); i++){
			if(wardcd == model.getValue("/root/init/icucdgrup/icucdgruplist[" + i + "]/wardcd")){	// ÁßȯÀÚ½ÇÀ̸é
				chk_maddchk01.value = 'Y';
			}
		}
		if(age >= 70){
			chk_maddchk02.value = 'Y';
		}
	}	
	group2.refresh();
	group4.refresh();
}


// ÁßÁõµµ ÀÏ°ýÀúÀå

function fAllSignSave(){	

  //debugger;
 	var chk = "Y";
 	var totcnt = 0;
 	var succnt = 0;
 	var failcnt = 0;
 	cap_succnt.value = 0;
 	cap_failcnt.value = 0;
 	cap_totcnt.value = 0;	
 	 	
 	var cnt = getNodesetCount("/root/main/patinfo/patlist[chk = '" + chk + "']");
 	
 	if(cnt < 1){
 		messageBox('ÀÏ°ýÀúÀå ÇÒ È¯ÀÚ¸¦', 'C002');
 		return;
 	}
 	
 	var msg = messageBox(cnt+'¸íÀÇ ÁßÁõµµ Ç׸ñÀ» ÀÏ°ý ÀÎÁõÀúÀå ÇϽðڽÀ´Ï±î?', 'Q');
		
	if(Number(msg) != 6){
		return;
	}

 	//cap_all.text = cnt;
	
	sAllSignSave = true;
	var chk = "N";
	var totcnt = getNodesetCount("/root/main/patinfo/patlist");
  
	for (patRow = 1;  patRow <= totcnt; patRow++) {
		chk = model.getValue("/root/main/patinfo/patlist[" + patRow + "]/chk");

		if (chk != "Y"){
			continue;
		}
				
		cap_totcnt.text = cnt;
		var dschdd = model.getValue("/root/main/patinfo/patlist[" + patRow + "]/dschdd"); //Åð¿øÀÏÀÚ
		var indd   = model.getValue("/root/main/patinfo/patlist[" + patRow + "]/indd");   //ÀÔ¿øÀÏÀÚ
		var hngnm  = model.getValue("/root/main/patinfo/patlist[" + patRow + "]/hngnm");	//ȯÀÚÀ̸§
		var execdd = model.getValue("/root/cond/execdd");              								    //¼öÇàÀÏÀÚ
						
		model.setValue("/root/cond/pid", 	model.getValue("/root/main/patinfo/patlist[" + patRow + "]/pid"));
		model.setValue("/root/cond/patnm", 	model.getValue("/root/main/patinfo/patlist[" + patRow + "]/hngnm"));
		model.setValue("/root/cond/sexage", model.getValue("/root/main/patinfo/patlist[" + patRow + "]/sexage"));
		model.setValue("/root/cond/age", 	model.getValue("/root/main/patinfo/patlist[" + patRow + "]/age"));
		

		if(indd != '' || indd ==null) {
			if((execdd < indd) || (execdd > dschdd)) { 	//ÀÔ¿ø,Åð¿øÀÏÀÚ »çÀÌÀÇ ¼öÇàÀÏÀÚ¸¸ ÀÔ·ÂÇϵµ·Ï ºí·¯Å·
				messageBox("¼öÇàÇÏ·Á´Â ÀÏÀÚ´Â ÀÔ¿øÀÏÀÚ(" +indd.substring(0,4) + "-" + indd.substring(4, 6) + "-" + indd.substring(6) + ")ÀÌÀü ¶Ç´Â Åð¿øÀÏÀÚ("+dschdd.substring(0,4) + "-" + dschdd.substring(4, 6) + "-" + dschdd.substring(6)+")ÀÌÈÄÀÇ ÀÏÀÚ°¡ µÉ ¼ö","I004");
				return;
			}
		}
		
		fSearchRecMasterAll(patRow);
		
		var recmasterrow = 0;
		
		for( var idx = 1 ; idx <= getNodesetCount(xRecMasterPath) ; idx++ ){
			if ( model.getValue(xRecDetailPath + '[1]/pid') == model.getValue(xRecMasterPath + '['+ idx +']/pid') 
			  && model.getValue(xRecDetailPath + '[1]/execdd') == model.getValue(xRecMasterPath + '['+ idx +']/execdd') 
			  && model.getValue(xRecDetailPath + '[1]/recseq') == model.getValue(xRecMasterPath + '['+ idx +']/recseq') 
			   ){
				recmasterrow = idx;
				recRow = idx;
				break;
			}
		}
		
		if ( recmasterrow == 0 ){
			//var hngnm = model.getValue("/root/main/patinfo/patlist[" + (patRow) + "]/hngnm");
			messageBox(hngnm + ' ȯÀÚ´Â ÀúÀå ÀÌ·ÂÀÌ ¾ø½À´Ï´Ù. °³º° ÀÎÁõÀúÀå ÇϽʽÿÀ.', "I008");
			//messageBox( capt_master.attribute("text") + " ¼±ÅÃ" ,"I008");
			failcnt++;
			cap_failcnt.text = failcnt;
			continue;
		}
		
		if(!addallchk()){
			//messageBox(hngnm + '³«»ó ±¸ºÐÀ» Àç ¼±ÅÃÇÏ¿© °³º° ÀÎÁõÀúÀå ÇϽʽÿÀ.', "I008");
			failcnt++;
			cap_failcnt.text = failcnt;
			continue;
		}
		
		var recMasterStat = model.getValue(xRecMasterPath + '[' + recmasterrow + ']/stat');//±â·Ï¸¶½ºÅÍÀÇ »óÅ°ª
		var execdd = model.getValue('/root/cond/execdd');//Á¶È¸Á¶°ÇÀÇ ¼öÇàÀÏÀÚ
		var exectm = model.getValue('/root/cond/exectm');//Á¶È¸Á¶°ÇÀÇ ¼öÇà½Ã°£

		//¼öÇàÀϽà ÇʼöÀԷ üũ_20090122_SMYÃß°¡
		if(execdd == ""){
			messageBox("¼öÇàÀÏÀÚ¸¦ ÀÔ·ÂÇϼ¼¿ä","I");
			model.setFocus("ipt_indate");
			return;
		}
		if(exectm == ""){
			messageBox("¼öÇà½Ã°£À» ÀÔ·ÂÇϼ¼¿ä","I");
			model.setFocus("ipt_time");
			return;
		}

		var recdd  = model.getValue(xRecMasterPath + '[' + recmasterrow + ']/execdd');//±â·ÏµÈ ÀÏÀÚ
		var isRecordedArr = fIsRecordedAll(execdd);//input¼öÇàÀÏÀÚ¿¡ ÇØ´çµÇ´Â ±â·ÏÀÌ ÀÖ´ÂÁö ¿©ºÎ
											 //20080820 array·Î º¯°æ
											 //arr[0]Àº ±â·Ï¿©ºÎ true/false
											 //arr[1]Àº ±â·Ï¿©ºÎ trueÀ϶§ÀÇ signno
		var signno    = '';//ÀÎÁõ¹øÈ£
		var siflag = 'N';//default ´Â N. ±âÁ¸ÀÇ µ¥ÀÌÅ͸¦ ±×´ë·Î ½Å±Ô·Î insertÇϴ°æ¿ìflag°ª
						 // YÀΰæ¿ì : 1.´Ù¸¥ÀÏÀÚÀÇ ±â·Ï³»¿ªÀº ÀÖÀ¸³ª inputÀÇ ¼öÇàÀÏÀÚ¿¡ ÇØ´çµÇ´Â ±â·ÏÀÌ ¾øÀ»¶§..
						 //          2. inputÀÇ ¼öÇàÀÏÀÚ¿¡ ÇØ´çµÇ´Â ±â·ÏÀÌ ÀÖÀ»¶§..

		
		//»ó¼¼³»¿ªÀÇ Ã¼Å©Á¡¼ö¸¦ ÇÕ»êÇÏ¿© ¸¶½ºÅÍ¿Í »ó¼¼Á¡¼öÀÇ totpnt¿¡ setÇÑ´Ù.
		//var totPnt = fSumPnt_1();
		//model.setValue(xRecMasterPath + '[' + recRow + ']/totpnt', totPnt);//¸¶½ºÅÍÀÇ ÃÑÁ¡
		//model.setValue('/root/main/recpntgrup/recpntlist/totpnt', totPnt);//»ó¼¼Á¡¼öÀÇ ÃÑÁ¡

		//ÃÑÁ¡¿¡ ÇØ´çÇÏ´Â ºÐ·ù±ºÀ» Á¶È¸ÇÑÈÄ ¸¶½ºÅÍ¿Í »ó¼¼Á¡¼öÀÇ ºÐ·ù±º¿¡ setÇÑ´Ù.
		//var bspntnm = fLoadBsPnt_1(totPnt);
		//model.setValue(xRecMasterPath + '[' + recRow + ']/resultnm', bspntnm);//¸¶½ºÅÍÀÇ ºÐ·ù±º
		//model.setValue('/root/main/recpntgrup/recpntlist/resultcd', bspntnm);//»ó¼¼Á¡¼öÀÇ ÃÑÁ¡
		
		//var maddchk01 =  model.getValue(xRecMasterPath + '[' + recRow + ']/maddchk01');
		//var maddchk02 =  model.getValue(xRecMasterPath + '[' + recRow + ']/maddchk02');
		//var maddchk03 =  model.getValue(xRecMasterPath + '[' + recRow + ']/maddchk03');
		//var maddchk04 =  model.getValue(xRecMasterPath + '[' + recRow + ']/maddchk04');
		//var haddchk = 	 model.getValue(xRecMasterPath + '[' + recRow + ']/haddchk');
		//var maddchk99 =  model.getValue(xRecMasterPath + '[' + recRow + ']/maddchk99');
				
		//if(model.getValue("/root/cond/clsflag") == "9"){
		//	if(maddchk01 == "" && maddchk02 == "" && maddchk03 == "" && maddchk04 == "" && maddchk99 == "" ){
		//		model.setValue(xRecMasterPath + '[' + recRow + ']/maddchk99', 'Y');
		//		//messageBox("±âŸ Ç׸ñÀº ¹Ýµå½Ã Çϳª ÀÌ»ó üũ ÇÏ¼Å¾ß ÇÕ´Ï´Ù.","I");
		//		//return;
		//	}
		//}
		
		//model.setValue(xRecMasterPath + '[' + recRow + ']/maddchk01', maddchk01);
		//model.setValue(xRecMasterPath + '[' + recRow + ']/maddchk02', maddchk02);
		//model.setValue(xRecMasterPath + '[' + recRow + ']/maddchk03', maddchk03);
		//model.setValue(xRecMasterPath + '[' + recRow + ']/maddchk04', maddchk04);
		//model.setValue(xRecMasterPath + '[' + recRow + ']/haddchk'	, haddchk);
		//model.setValue(xRecMasterPath + '[' + recRow + ']/maddchk99', maddchk99);
		

		//»ó¼¼³»¿ª üũÇÑ Á¡¼ö¸¦ Ç׸ñº°·Î ÇÕ»êÇÏ¿© »ó¼¼Á¡¼ö ³ëµå¿¡ setÇÑ´Ù.
		//fSetRecDetailPnt_1();

		var msgStr;
		if(isRecordedArr[0]){
			var execStr = execdd.substring(0, 4) + '-' + execdd.substring(4, 6) + '-' + execdd.substring(6, 8);
			var hngnm = model.getValue("/root/main/patinfo/patlist[" + (patRow) + "]/hngnm");
			msgStr = hngnm + 'ȯÀÚ´Â ÀÌ¹Ì ÀúÀåµÈ ±â·Ï ³»¿ª(' + execStr + ')ÀÌ ÀÖ½À´Ï´Ù. ´Ù½Ã';	//db insert (¼öÇàÀϽø¦ ÇöÀçÀϽ÷Î)

			var msg = messageBox(msgStr, 'Q002');//ÀúÀåÇϽðڽÀ´Ï±î?
			if(Number(msg) != 6){//¿¹
				failcnt++;
				cap_failcnt.text = failcnt;
				continue;
			}
			//20080827 ÁÖ¼®Ã³¸® signno = isRecordedArr[1];//ÇØ´ç±â·ÏÀÇ signno¸¦ ÇÒ´çÇØ db¿¡ updateÇÑ´Ù.(»ç¿ë¾ÈÇÔ)
			signno = '';//½Å±ÔÀ̱⶧¹®¿¡ signno¸¦ »õ·Îµý´Ù.

		}else{//½Å±Ôµî·Ï¹× À̹̱â·ÏµÇ¾úÀ¸³ª ±â·ÏÀÏÀÚ¿Í ¼öÇàÀÏÀÚ°¡ °°À»¶§..
			//msgStr = 'ÁßÁõµµ ¹× À§Çè»çÁ¤ÀÇ ±â·Ï³»¿ªÀ»';
			msgStr = "";      // ¸Þ½ÃÁö´Â 'ÀúÀåÇϽðڽÀ´Ï±î?' ·Î ÅëÀÏ (2011.04.18 Ahn)
		}

		//recMasterStatÀÌ '-'°æ¿ì 'u'·Î ³Ñ±è.
		//ÁßÁõµµÁ¡¼ö±×¸®µå
		//grd_recpnt.addStatus(2, 'update');

		//ÁßÁõµµ ¸¶½ºÅͱ׸®µå
		//20080827 »óÅ°¡ ½Å±Ô°¡ ¾Æ´Ï¸é u »óÅ·Πdb¿¡ º¹»çÇØ insert·Î º¯°æµÊ...
		//if(grd_recmaster.rowStatus(grd_recmaster.row) != 1){//»óÅ°¡ ½Å±Ô»óÅ°¡ ¾Æ´Ï¸é u·Î º¯°æ
		//	grd_recmaster.addStatus(grd_recmaster.row, 'update');

		var mstat = model.getValue(xRecMasterPath + '[' + recRow + ']/stat');
		if(mstat != 'i' || mstat != 'I'){
		model.setValue(xRecMasterPath + '[' + recRow + ']/stat', 'u');
		siflag = 'Y'; //±âÁ¸µ¥ÀÌÅ͸¦ º¹»çÇØ insertÇÏ´Â °æ¿ì Y¾Æ´Ï¸é N
		}
		
		//}
		//var msg = messageBox(msgStr, 'Q002');//ÀúÀåÇϽðڽÀ´Ï±î?
		//if(Number(msg) == 6){//¿¹
		
		//if(true){
		model.removenode('/root/send');

		model.makeValue('/root/send/sch_execdd', execdd);//Á¶È¸Á¶°Ç¿¡ ÀÖ´Â ¼öÇàÀÏÀÚ
		model.makeValue('/root/send/sch_exectm', exectm);//Á¶È¸Á¶°Ç¿¡ ÀÖ´Â ¼öÇà½Ã°£
		model.makeValue('/root/send/siflag', siflag);//±âÁ¸µ¥ÀÌÅ͸¦ º¹»çÇØ insertÇÏ´Â °æ¿ì Y¾Æ´Ï¸é N
		model.makeValue('/root/send/ioflag', model.getValue('/root/cond/ioflag'));//¿Ü·¡ÀÔ¿ø±¸ºÐ
		
		var pid       = model.getValue(xRecMasterPath + "/pid");
		var orddd     = model.getValue('/root/main/patinfo/patlist[' +  patRow  + ']/indd');//ÀÔ¿øÀÏ/Áø·áÀÏ
		var cretno    = model.getValue('/root/main/patinfo/patlist[' +  patRow  + ']/cretno');//»ý¼º¹øÈ£
		var orddeptcd = model.getValue('/root/main/patinfo/patlist[' +  patRow  + ']/orddeptcd');//Áø·á°ú
		var orddrid   = model.getValue('/root/main/patinfo/patlist[' +  patRow  + ']/medispclid');//Áø·áÀÇ
		var ioflag	  = model.getValue('/root/main/patinfo/patlist[' +  patRow  + ']/ioflag');   //¿Ü·¡/ÀÔ¿ø±¸ºÐ

		//½Å±Ô(insert)À϶§´Â signno¸¦ ÃʱâÈ­ÇÑ´Ù.
		/*
		if((recMasterStat == 'i') || (recMasterStat == 'u' && execdd != recdd)){
			signno = '';
		}else{
			signno = model.getValue(xRecMasterPath + "[" + grd_recmaster.row + "]/signno");
		}
		*/

		//alert(grd_recmaster.row + 'ÀÇ signno : ' + signno);


		/* [°¢ ±¸ºÐº° ±â·Ï¼­½ÄÄÚµå]
		 * ÁßÁõµµ_ÀϹݺ´µ¿	: 0000002439
		 * ÁßÁõµµ_½Å»ý¾Æ ICU 	: 0000002440
		 * ÁßÁõµµ_Ç÷¾×Åõ¼® 	: 0000002441
		 * ÁßÁõµµ_ÁßȯÀÚ½Ç 	: 0000002442
		 * ÁßÁõµµ_Á¤½Å°úº´µ¿ 	: 0000002444
		 * ³«»ó»çÁ¤_¾Æµ¿ 		: 0000002447
		 * ³«»ó»çÁ¤_¼ºÀÎ(Morse Scale) 		: 0000002449
		 * ¿åâ»çÁ¤(Braden Scale) 			: 0000002450
		 */
		var recflag = model.getValue('/root/cond/recflag');
		var clsflag = model.getValue('/root/cond/clsflag');
		var formcd;//±â·Ï¼­½ÄÄÚµå
		var formnm;//¼­½Ä¸í

		if(clsflag == '1'){
			formcd = '0000002439';	//ÁßÁõµµ_ÀϹݺ´µ¿
			formnm = 'ÁßÁõµµ»çÁ¤(ÀϹݺ´µ¿)';
			recflag = '1';
			clsflag = '1';
		}else if(clsflag == '2'){
			formcd = '0000002440';	//ÁßÁõµµ_½Å»ý¾Æ ICU
			formnm = 'ÁßÁõµµ»çÁ¤(½Å»ý¾Æ ICU)';
			recflag = '1';
			clsflag = '2';
		}else if(clsflag == '5'){
			formcd = '0000002444';	//ÁßÁõµµ_Á¤½Å°úº´µ¿
			formnm = 'ÁßÁõµµ»çÁ¤(Á¤½Å°úº´µ¿)';
			recflag = '1';
			clsflag = '5';
		}else if(clsflag == '4' || clsflag == '6' || clsflag == '7'){
			formcd = '0000002442';	//ÁßÁõµµ_ÁßȯÀÚ½Ç
			formnm = 'ÁßÁõµµ»çÁ¤(ÁßȯÀÚ½Ç)';
			recflag = '1';
			clsflag = '4';
		}else if(clsflag == '3'){
			formcd = '0000002441';	//ÁßÁõµµ_Ç÷¾×Åõ¼®
			formnm = 'ÁßÁõµµ»çÁ¤(Ç÷¾×Åõ¼®)';
			recflag = '1';
			clsflag = '3';
		}else if(clsflag == '8'){
			formcd = '0000002447';	//³«»ó»çÁ¤_¾Æµ¿
			formnm = '³«»óÀ§Çè»çÁ¤(Humpty Dumpty Scale)';
			recflag = '2';
			clsflag = '1';
		}else if(clsflag == '9'){
			formcd = '0000002449';	//³«»ó»çÁ¤_¼ºÀÎ (Morse Scale)
			formnm = '³«»óÀ§Çè»çÁ¤(Morse Scale)'; // ¼ºÀÎ -> Morse Scale º¯°æ (2011.03.17 ahn)
			recflag = '2';
			clsflag = '2';
		}else if(clsflag == '10'){
			formcd = '0000002450';	//¿åâ
			formnm = '¿åâÀ§Çè»çÁ¤(Braden Scale)';  // ¿åâ -> Braden Scale º¯°æ (2011.04.13 ahn)
			recflag = '3';
			clsflag = '1';
		}

		//alert(formcd);
		//»ó¼¼Á¡¼ö³»¿ª ³ëµå¸¦ ¸¸µé¾î¼­ º¸³½´Ù.
		//temp/signdata/recpntgrup/recpntlist/timsval
		//temp/signdata/recpntgrup/recpntlist/hngnm
		model.removenode('/root/temp/signdata');
		model.makeNode('/root/temp/signdata/recpntgrup/recpntlist');

		//ÁßÁõ±â·Ï±¸ºÐÀ» Çѱ۸íÀ¸·Î ³ëµå¸¦ ¸¸µé¾î¼­ ³»º¸³½´Ù.
		var xDetailPath = '/root/temp/signdata/detailinfo';
		model.makeNode(xDetailPath);
		model.makeValue(xDetailPath + '/formnm', formnm);
		model.makeValue(xDetailPath + '/recflag', recflag);
		model.makeValue(xDetailPath + '/clsflag', clsflag);

		var recpntCnt = getNodesetCount("/root/main/recpntgrup/pnttitlgruplist");
		var timsval, hngnm;
		var colno;
		for(var i = 1; i <= recpntCnt; i++){

			if(i < 10){
				colno = '0' + i;
			}else{
				colno = i;
			}

			timsval = model.getValue(xRecPntPath + '/timsval' + colno);
			hngnm   = model.getValue('/root/main/recpntgrup/pnttitlgruplist[' + i + ']/hngnm');
			//alert(colno + ', ' + timsval + ', ' + hngnm + ', ' + i);

			model.makeValue('/root/temp/signdata/recpntgrup/recpntlist[' + i + ']/timsval', timsval);
			model.makeValue('/root/temp/signdata/recpntgrup/recpntlist[' + i + ']/hngnm', hngnm);
		}
      Sign.certreload = false ; // ÀüÀÚ¼­¸í È£Ãâ½Ã ÀÎÁõÀúÀå ¹öÆ°À»  ´©´Ã¶§¸¶´Ù ÀÎÁõ¼­°¡ ¶ßµµ·Ï ó¸®

		// ÀÎÁõ ·ÎÁ÷ È£Ãâ
		if(Sign.signprocess() == true){  // ¢º ÀüÀÚÀÎÁõ °ü·Ã ȯÀÚ ÀÎÀû Á¤º¸¸¦ º¸³»ÁÜ.
			//alert(Sign.signedInfos[1]);
			
			var wSigninfo = ""

		  wSigninfo = "pid"                               +"¢Ë"  // 01 µî·Ï¹øÈ£
						+ "orddd"                                 +"¢Ë"  // 02 ÀÔ¿øÀÏÀÚ(ÀÔ¿ø,ÀÀ±Þ)/Áø·áÀÏÀÚ(¿Ü·¡)
						+ "cretno"                                +"¢Ë"  // 03 »ý¼º¹øÈ£
						+ "signno"                                +"¢Ë"  // 04 ¼­¸í¹øÈ£(ÀÎÁõ¹øÈ£)
						+ "recdd"                                 +"¢Ë"  // 05 ½ÇÁ¦ ±â·ÏÀÌ ÀÌ·ç¾îÁø ±â·ÏÀÏÀÚ
						+ "rectm"                                 +"¢Ë"  // 06 ½ÇÁ¦ ±â·ÏÀÌ ÀÌ·ç¾îÁø ±â·Ï½Ã°£
						+ "recsaveflag"                           +"¢Ë"  // 07 ÀüÀÚ¼­¸í ÀÎÀûÁ¤º¸ º¯°æ¿©ºÎ(±â·ÏÀϽà º¯°æµÇ´Â °æ¿ì  : Y, ±×¿Ü : N)
						+ "signflag"                              +"¢Ë"  // 08 ¼­¸íÀڷᱸºÐ(01 : Áø·á, 02 : °£È£, 03 : LIS, 04 : Áø·áÁö¿ø)
						+ "signgenrflag"                          +"¢Ë"  // 09 ¿Ü·¡/ÀÔ¿ø±¸ºÐ(ÄÚµåÁ¤ÀǼ­ M0010 ÂüÁ¶)
						+ "formcd"                                +"¢Ë"  // 10 °¢ ±â·ÏÁöº° ¼­½ÄÄÚµå  0000002473  N57 °£È£  ¼ö¼ú°£È£±â·Ï
						+ "orddeptcd"                             +"¢Ë"  // 11 Áø·áºÎ¼­ÄÚµå
						+ "orddrid"                               +"¢Ë"  // 12 Áø·áÀÇ»çID (ÁýµµÀÇ)
						+ "signbfcnts"                            +"¢Ë"  // 13 ¢º ÀÎÁõÇÒ µ¥ÀÌÅÍ Á¤º¸(¹Ì±â·Ï ³ëµå Á¦°ÅµÈ Á¤º¸)
						+ "signaftcnts"                           +"¢Ë"  // 14 ¢º °øÀÎÀÎÁõ ó¸®ÈÄ µ¥ÀÌÅÍ
						+ "screenid"                              +"¢Ë"  // 15 ¢º È­¸é¾ÆÀ̵ð
						+ "certflag"                              +"¢Ì"  // 16 ¢º ÀÎÁõ¿©ºÎ( T : ÀÓ½ÃÀúÀå, C : ÀÎÁõÀúÀå)
						+ pid                                     +"¢Ë"  // 01 µî·Ï¹øÈ£
						+ orddd                                   +"¢Ë"  // 02 ÀÔ¿øÀÏÀÚ(ÀÔ¿ø,ÀÀ±Þ)/Áø·áÀÏÀÚ(¿Ü·¡)
						+ cretno                                  +"¢Ë"  // 03 »ý¼º¹øÈ£
						+ signno                                  +"¢Ë"  // 04 ¼­¸í¹øÈ£(ÀÎÁõ¹øÈ£)
						+ getCurrentDate()                        +"¢Ë"  // 05 ½ÇÁ¦ ±â·ÏÀÌ ÀÌ·ç¾îÁø ±â·ÏÀÏÀÚ
						+ getCurrentTime()                        +"¢Ë"  // 06 ½ÇÁ¦ ±â·ÏÀÌ ÀÌ·ç¾îÁø ±â·Ï½Ã°£
						+ "Y"                                     +"¢Ë"  // 07 ÀüÀÚ¼­¸í ÀÎÀûÁ¤º¸ º¯°æ¿©ºÎ(±â·ÏÀϽà º¯°æµÇ´Â °æ¿ì  : Y, ±×¿Ü : N)
						+ "02"                                    +"¢Ë"  // 08 ¼­¸íÀڷᱸºÐ(01 : Áø·á, 02 : °£È£, 03 : LIS, 04 : Áø·áÁö¿ø)
						+ ioflag                                  +"¢Ë"  // 09 ¿Ü·¡/ÀÔ¿ø±¸ºÐ(ÄÚµåÁ¤ÀǼ­ M0010 ÂüÁ¶)
						+ formcd                                  +"¢Ë"  // 10 °¢ ±â·ÏÁöº° ¼­½ÄÄÚµå (emr.mrfmform)
						+ orddeptcd                               +"¢Ë"  // 11 Áø·áºÎ¼­ÄÚµå
						+ orddrid                                 +"¢Ë"  // 12 Áø·áÀÇ»çID
						+ Sign.signedInfos[1]                     +"¢Ë"  // 13 ¢º ÀÎÁõÇÒ µ¥ÀÌÅÍ Á¤º¸(¹Ì±â·Ï ³ëµå Á¦°ÅµÈ Á¤º¸)
						+ Sign.signedInfos[2]                     +"¢Ë"  // 14 ¢º °øÀÎÀÎÁõ ó¸®ÈÄ µ¥ÀÌÅÍ
						+ getScreenID()                           +"¢Ë"  // 15 ¢º È­¸é¾ÆÀ̵ð
						+ "C"                                     +"¢Ì"; // 16 ¢º ÀÎÁõ¿©ºÎ( T : ÀÓ½ÃÀúÀå, C : ÀÎÁõÀúÀå)
		  model.makeValue("/root/send/signinfo"         , wSigninfo);

		} else {
				return ;
		}
				
				
	var sRecData = "";
    for (i=1; i<=getNodesetCount(xRecMasterPath); i++){
    	  	var sRecHeader  = "m¢Ërownum¢Ëexecdd¢Ëexectm¢Ërecflagnm¢Ëtotpnt¢Ëresultnm¢Ëexecnm¢Ëpid¢Ëhngnm¢Ërecseq¢Ërecflag¢Ëclsflag¢Ëexeckind¢Ëexecid¢Ëindd¢Ëhiststat¢Ëcretno¢Ëseqno¢Ëresultcd¢Ësignno¢Ëstat¢Ëagechk¢Ëmaddchk01¢Ëmaddchk02¢Ëmaddchk03¢Ëmaddchk04¢Ëmaddchk99¢Ëhaddchk¢Ì";
    	  	var sRecData    =  sRecData 
    	                    +  "i"               +"¢Ë"
    	                    +  i                 +"¢Ë"
    	                    +  model.getValue(xRecMasterPath+ "["+i+"]/execdd" 		         )+"¢Ë"
    	                    +  model.getValue(xRecMasterPath+ "["+i+"]/exectm"             )+"¢Ë"
    	                    +  model.getValue(xRecMasterPath+ "["+i+"]/recflagnm"          )+"¢Ë"
    	                    +  model.getValue(xRecMasterPath+ "["+i+"]/totpnt"    		     )+"¢Ë"
    	                    +  model.getValue(xRecMasterPath+ "["+i+"]/resultnm"      		 )+"¢Ë"
    	                    +  model.getValue(xRecMasterPath+ "["+i+"]/execnm"         		 )+"¢Ë"
    	                    +  model.getValue(xRecMasterPath+ "["+i+"]/pid"      					 )+"¢Ë"
    	                    +  model.getValue(xRecMasterPath+ "["+i+"]/hngnm"           	 )+"¢Ë"
    	                    +  model.getValue(xRecMasterPath+ "["+i+"]/recseq"       	  	 )+"¢Ë"
    	                    +  model.getValue(xRecMasterPath+ "["+i+"]/recflag"     	     )+"¢Ë"
    	                    +  model.getValue(xRecMasterPath+ "["+i+"]/clsflag"      			 )+"¢Ë"
    	                    +  model.getValue(xRecMasterPath+ "["+i+"]/execkind"           )+"¢Ë"
    	                    +  model.getValue(xRecMasterPath+ "["+i+"]/execid" 						 )+"¢Ë"
    	                    +  model.getValue(xRecMasterPath+ "["+i+"]/indd"        			 )+"¢Ë"
    	                    +  model.getValue(xRecMasterPath+ "["+i+"]/histstat"           )+"¢Ë"
    	                    +  model.getValue(xRecMasterPath+ "["+i+"]/cretno"        		 )+"¢Ë"
    	                    +  model.getValue(xRecMasterPath+ "["+i+"]/seqno"           	 )+"¢Ë"
    	                    +  model.getValue(xRecMasterPath+ "["+i+"]/resultcd"           )+"¢Ë"
    	                    +  model.getValue(xRecMasterPath+ "["+i+"]/signno"       			 )+"¢Ë"
    	                    +  model.getValue(xRecMasterPath+ "["+i+"]/stat"          		 )+"¢Ë"
    	                    +  model.getValue(xRecMasterPath+ "["+i+"]/agechk"             )+"¢Ë"
    	                    +  model.getValue(xRecMasterPath+ "["+i+"]/maddchk01"          )+"¢Ë"
    	                    +  model.getValue(xRecMasterPath+ "["+i+"]/maddchk02"    		   )+"¢Ë"
    	                    +  model.getValue(xRecMasterPath+ "["+i+"]/maddchk03"        	 )+"¢Ë"
    	                    +  model.getValue(xRecMasterPath+ "["+i+"]/maddchk04"          )+"¢Ë"
    	                    +  model.getValue(xRecMasterPath+ "["+i+"]/maddchk99"          )+"¢Ë"
    	                    +  model.getValue(xRecMasterPath+ "["+i+"]/haddchk"            )+"¢Ì"
    	
    }
    
    var test_11 = sRecHeader + sRecData; 
	//var test_1 = grd_recmaster.getUpdateDataAll('i'); // 150114 - AYS
	//model.makeValue('/root/send/recmaster', grd_recmaster.getUpdateDataAll('i'));
	model.makeValue('/root/send/recmaster', (sRecHeader + sRecData));
			
			
	for( var idx = 1 ; idx <= getNodesetCount(xRecDetailPath) ; idx++){
		if ( Number(model.getValue(xRecDetailPath + '[' + idx + ']/basepnt_multi')) > 0 ){
			model.setValue( xRecDetailPath + '[' + idx + ']/basepnt',model.getValue(xRecDetailPath + '[' + idx + ']/basepnt_multi'));
		}
	}
			
			
			var sDetailData = "";
    for (i=1; i<=getNodesetCount(xRecDetailPath); i++){
    	  	var sDetailHeader = "m¢Ërownum¢Ëstat¢Ëflag¢Ëclstlcd¢Ëhngnm¢Ëbasepnt¢Ëtimsval¢Ëcnfmyn¢Ëcmtinptyn¢Ëgrupmulti¢Ëengnm¢Ërefseq¢Ëdeptcd¢Ësupcd¢Ëtodd¢Ëdepth¢Ëgrupflag¢Ëclsflag¢Ërecflag¢Ësortseq¢Ëbktimsval¢Ëdesccnts¢Ëpid¢Ëexecdd¢Ërecseq¢Ëwardcd¢Ëroomcd¢Ì";
    	  	var sDetailData =  sDetailData
    	                    +  "i"               +"¢Ë"
    	                    +  i                 +"¢Ë"
    	                    +  model.getValue(xRecDetailPath+ "["+i+"]/stat" 		         )+"¢Ë"
    	                    +  model.getValue(xRecDetailPath+ "["+i+"]/flag"             )+"¢Ë"
    	                    +  model.getValue(xRecDetailPath+ "["+i+"]/clstlcd"          )+"¢Ë"
			                    +  model.getValue(xRecDetailPath+ "["+i+"]/hngnm"    		     )+"¢Ë"
			                    +  model.getValue(xRecDetailPath+ "["+i+"]/basepnt"      		 )+"¢Ë"
			                    +  model.getValue(xRecDetailPath+ "["+i+"]/timsval"       	 )+"¢Ë"
			                    +  model.getValue(xRecDetailPath+ "["+i+"]/cnfmyn"     			 )+"¢Ë"
			                    +  model.getValue(xRecDetailPath+ "["+i+"]/cmtinptyn"      	 )+"¢Ë"
			                    +  model.getValue(xRecDetailPath+ "["+i+"]/grupmulti"    	 	 )+"¢Ë"
			                    +  model.getValue(xRecDetailPath+ "["+i+"]/engnm"     	     )+"¢Ë"
			                    +  model.getValue(xRecDetailPath+ "["+i+"]/refseq"      		 )+"¢Ë"
			                    +  model.getValue(xRecDetailPath+ "["+i+"]/deptcd"         	 )+"¢Ë"
			                    +  model.getValue(xRecDetailPath+ "["+i+"]/supcd" 					 )+"¢Ë"
			                    +  model.getValue(xRecDetailPath+ "["+i+"]/todd"         		 )+"¢Ë"
			                    +  model.getValue(xRecDetailPath+ "["+i+"]/depth"            )+"¢Ë"
			                    +  model.getValue(xRecDetailPath+ "["+i+"]/grupflag"         )+"¢Ë"
			                    +  model.getValue(xRecDetailPath+ "["+i+"]/clsflag"          )+"¢Ë"
			                    +  model.getValue(xRecDetailPath+ "["+i+"]/recflag"          )+"¢Ë"
			                    +  model.getValue(xRecDetailPath+ "["+i+"]/sortseq"          )+"¢Ë"
			                    +  model.getValue(xRecDetailPath+ "["+i+"]/bktimsval"        )+"¢Ë"
			                    +  model.getValue(xRecDetailPath+ "["+i+"]/desccnts"         )+"¢Ë"
			                    +  model.getValue(xRecDetailPath+ "["+i+"]/pid"          		 )+"¢Ë"
			                    +  model.getValue(xRecDetailPath+ "["+i+"]/execdd"       		 )+"¢Ë"
			                    +  model.getValue(xRecDetailPath+ "["+i+"]/recseq"    		   )+"¢Ë"
			                    +  model.getValue(xRecDetailPath+ "["+i+"]/wardcd"        	 )+"¢Ë"
			                    +  model.getValue(xRecDetailPath+ "["+i+"]/roomcd"         	 )+"¢Ì"
    	
    } 
    
    var test_12 = sDetailHeader + sDetailData;
			
			//var test_2 = grd_recdetail.getUpdateDataAll('i'); // 150114 - AYS
			//model.makeValue('/root/send/recdetail', grd_recdetail.getUpdateDataAll('i'));
			model.makeValue('/root/send/recdetail', (sDetailHeader + sDetailData));
			

			if(!submit('TXMNW04001', false)){
				//messageBox('ÀúÀåÀ»', 'E009');
				return;

			}else{
				model.removenode("/root/cond/copyexecdd");
				
					
					//Á¶È¸Á¶°Ç clear
					model.setValue('/root/cond/pid', '');
					//ȯÀÚÁ¤º¸ Ç¥½Ã clear    (2011.03.29 Ahn)
					model.setValue('root/cond/patnm', '');
					model.setValue('root/cond/sexage', '');
					model.setValue('root/cond/age', '');
					
					//model.removeNodeset(xRecMasterPath);
					//model.removeNodeset(xRecDetailPath);
					//model.removeNodeset('/root/send/');
					//model.removenode('/root/send/recmaster');
					//model.removenode('/root/send/recdetail');
					
					
					model.removenode('/root/send/');
					model.removenode('/root/main/recgrup');
					model.removenode('/root/main/recpntgrup');
					model.removenode('/root/main/recdetailgrup');
					model.removenode('/root/main/tar_desccnts');
					
					succnt++;
					cap_succnt.text = succnt;

				}

			//}else if(Number(msg) == 7){//¾Æ´Ï¿À
			//	
			//	continue;
			//}

		
	}
	
	//sAllSignSave = false;
	//model.removeNodeset(xRecInfo);
	//model.removeNodeset(xRecMasterPath);
	//model.removeNodeset(xRecDetailPath);
	//model.removeNodeset('/root/send/');
	
	model.setValue('/root/cond/pid', '');
	model.setValue('root/cond/patnm', '');
	model.setValue('root/cond/sexage', '');
	model.setValue('root/cond/age', '');
	
	model.removenode('/root/send/');
	model.removenode('/root/main/recgrup');
	model.removenode('/root/main/recpntgrup');
	model.removenode('/root/main/recdetailgrup');
	model.removenode('/root/main/tar_desccnts');
	//model.removenode('/root/main/patinfo');	
	fSearchPatList();
	
	messageBox( succnt + " ¸íÀÇ È¯ÀÚ ÀÏ°ýÀúÀåÀÌ", "I001");
}


function fSearchRecMasterAll(patRow,pFlag){
	//Ç÷¾×Åõ¼®ÀÇ °æ¿ì ÀÔ¿øȯÀÚ ´õºíŬ¸¯ ÇÒ¶§¿¡ Á¶È¸Á¶°Ç¿¡ ±âº» Á¶È¸°ªÀ» ¼¼ÆÃÇؾßÇÔ.
	//Ç÷¾×Åõ¼®ÀÇ °æ¿ì ¿Ü·¡È¯ÀÚ ´õºíŬ¸¯Àº Á¶È¸Á¶°Ç ºñÈ°¼ºÈ­
	var clsflag	 = model.getValue('/root/cond/clsflag');//ºÐ·ù±¸ºÐ
	var recflag  = model.getValue('/root/cond/recflag');//±â·Ï±¸ºÐ

	var ioflag	 = model.getValue("/root/main/patinfo/patlist[" + (patRow) + "]/ioflag");   //¿Ü·¡/ÀÔ¿ø±¸ºÐ
	var pid      = model.getValue("/root/main/patinfo/patlist[" + (patRow) + "]/pid");	   //µî·Ï¹øÈ£
	var indd     = model.getValue("/root/main/patinfo/patlist[" + (patRow) + "]/indd");    //ÀÔ¿øÀÏÀÚ
	var histstat = model.getValue("/root/main/patinfo/patlist[" + (patRow) + "]/histstat"); //À̷»óÅÂ
	var cretno   = model.getValue("/root/main/patinfo/patlist[" + (patRow) + "]/cretno");   //»ý¼º¹øÈ£
	var seqno    = model.getValue("/root/main/patinfo/patlist[" + (patRow) + "]/seqno");    //À̷¹øÈ£
	var hngnm    = model.getValue("/root/main/patinfo/patlist[" + (patRow) + "]/hngnm");    //ȯÀÚ¸í

	var execdd   = model.getValue('/root/cond/execdd');  //¼öÇàÀÏÀÚ
	var exectm   = model.getValue('/root/cond/exectm');  //¼öÇà½Ã°£

	if(execdd == null || execdd == ''){
		execdd = getCurrentDate();
	}
	if(exectm == null || exectm == ''){
		exectm = getCurrentTime().substring(0, 4);
	}

	//20081014 i/oÁ¶°Ç°ª cond ³ëµå¿¡ setting
	model.removenode('/root/cond/ioflag');
	model.makeValue('/root/cond/ioflag', ioflag);

	//Ç÷¾×Åõ¼®¿Ü·¡È¯ÀÚÀÇ °æ¿ì Á¶È¸Á¶°ÇÀ» ºñÈ°¼ºÈ­ ó¸®
	//fDisabledSearchArea(clsflag, ioflag);		// Ãß°¡¿©ºÎ´Â ÃßÈÄ ÆÇ´Ü
	
	/********************************************************
	//È­¸é ¿ÀÇ½à »ó´Ü¿¡ ȯÀÚ ¼ÂÆÃÇÏÁö ¾ÊÀº °æ¿ì ÀúÀå ÈÄ¿¡µµ ȯÀÚÁ¤º¸°¡ Àüü¸®½ºÆ®·Î Á¶È¸µÇ¾î¾ß ÇÔ_ÁßÁõµµ Á¶È¸Á¶°Ç¿¡ ¼ÂÆÃÇÏÁö ¾ÊÀ½_20090211_SMY
	if(clsflag == '3'){
		//Ç÷¾×Åõ¼®¿Ü·¡È¯ÀÚÀÇ °æ¿ì Á¶È¸Á¶°Ç¿¡ pid¸¸ ¼¼ÆÃ, ÀÔ¿øȯÀÚÀÇ °æ¿ì wardcd, roomcd, pid ¼¼ÆÃ
		fSetSearchCondition(clsflag, ioflag);//Á¶È¸Á¶°Ç ¼¼ÆÃ
	}
	**********************************************************/
	
	//ÁßÁõµµ ¸¶½ºÅͳ»¿ªÀ» Á¶È¸ÇÑ´Ù.
	model.removenode('/root/send');
	model.makeValue('/root/send/clsflag',  clsflag);
	model.makeValue('/root/send/recflag',  recflag);
	model.makeValue('/root/send/execdd',   execdd);
	model.makeValue('/root/send/exectm',   exectm);

	model.makeValue('/root/send/pid',      pid);
	model.makeValue('/root/send/indd',     indd);
	model.makeValue('/root/send/histstat', histstat);
	model.makeValue('/root/send/cretno',   cretno);
	model.makeValue('/root/send/seqno',    seqno);
	model.makeValue('/root/send/hngnm',    hngnm);
	model.makeValue('/root/send/ioflag',    ioflag);
	
	// Á¶È¸±¸ºÐ Ãß°¡ (2011.03.31 Ahn)
	var recsrchflag = model.getValue('/root/cond/recsrchflag');
	//var recsrchflag = '1'; // ÁßÁõµµ À̷¸¸ È£ÃâÇϱâ À§ÇØ °ª ¼³Á¤
	model.makeValue('/root/send/recsrchflag', recsrchflag);
	
	// ºÐ·ù±¸ºÐ Áß ¿ì¼±¼øÀ§ °ª °¡Á®¿À±â (2011.03.31 ahn)
	var selRecFlag = fGetMinSrchFlag(recsrchflag);
	//model.makeValue('/root/send/selrecflag', recsrchflag);
	model.setValue('/root/cond/recflag', selRecFlag);       // »ó´Ü ¶óµð¿Àüũ ºÐ·ù set
		
	model.removenode('/root/main/recgrup');
	model.makeNode('/root/main/recgrup');
	
	//»ó¼¼Á¡¼ö, »ó¼¼³»¿ª, »ó¼¼¼³¸íÀÇ ÇöÀçinstance¸¦ removeÇÑ´Ù.
	model.removenode('/root/main/recpntgrup');
	model.removenode('/root/main/recdetailgrup');
	model.removenode('/root/main/tar_desccnts');
	//model.refresh();
	
	//ÁßÁõµµ³»¿ª ¸¶½ºÅÍ Á¶È¸ ÈÄ ±â·ÏÁ¤º¸ Á¶È¸
	if(!submit('TRMNW04011',false)){
		messageBox('ÁßÁõµµ³»¿ªÀÇ Á¶È¸¸¦', 'E009');
		return;
	}else{
		//Á¶È¸°¹¼ö 0À϶§ Á¶È¸ ÈÄ ¼öÇàÀÏÀÚ, ¼öÇà½Ã°£, ÃÖ±Ù ÀúÀåÀÏÀ» ¼¼ÆÃ
		//var execdd     = model.getValue('/root/cond/execdd');
		var execdd     = model.getValue('/root/cond/copyexecdd');		
		var exectm     = model.getValue('/root/cond/exectm');
		
		if(pFlag != "4"){
			//ÁßÁõµµ ¸¶½ºÅ͸¦ Á¶È¸ÈÄ ¼öÇàÀÏÀÚ¿¡ ÇØ´çÇÏ´Â ³»¿ªÀÌ ¾øÀ¸¸é ÇàÃß°¡, ÀÖÀ¸¸é ÇØ´ç row select
			if(!fSetRecMasterAll(exectm, execdd, pFlag)){
				return;
			} else{
				//ȯÀÚÁ¤º¸¿¡ ¼±ÅÃÇÑ ·Î¿ìÁ¤º¸ set
				//grd_patinfo.row = curRow;
				//grd_patinfo.topRow = curRow;
				//ÁßÁõµµ »ó¼¼Á¡¼öÁ¶È¸
				fSearchRecPntAll();
				}	
		}
	}
}

function fSetRecMasterAll(exectm, execdd, pFlag){

	var indx = 0;
	
	for(i=1; i <= getNodesetCount(xRecMasterPath); i++){
		if((model.getValue(xRecInfo + "/recflag") == model.getValue(xRecMasterPath + '[' + i + ']/recflag')) &&
				(model.getValue(xRecInfo + "/clsflag") == model.getValue(xRecMasterPath + '[' + i + ']/clsflag'))){
			indx = i;
			break;
		}
	}
	
	if (indx > 0){    // ±â·Ï ³»¿ªÀÌ Á¸ÀçÇÒ °æ¿ì  (2011.03.31 Ahn)
		recRow = indx;
	} else{
		//±â·ÏµÈ ³»¿ªÀÌ ÇѰǵµ ¾øÀ»¶§ 
		//var hngnm = model.getValue("/root/main/patinfo/patlist[" + (patRow) + "]/hngnm");
		//var msgStr = '(' + hngnm + ') ȯÀÚ´Â ÁßÁõµµ ÀúÀå ÀÌ·ÂÀÌ ¾ø½À´Ï´Ù. °³º° ÀÎÁõÀúÀå ÇϽʽÿÀ.';
		//messageBox(msgStr,"I");
		return false;
	}
	
	if ( instUseYN == "Y" && grp_agechk.visible == true ){
	    model.setValue("/root/cond/agechk", model.getValue(xRecMasterPath + '[' + recRow + ']/agechk'));
	}else {
	    model.setValue("/root/cond/agechk", "N");
	}
	
	return true;

}

function fSearchRecPntAll(selflag){
	
	model.setValue("/root/cond/maddchk01",'');		// ÁýÁßÄ¡·á½Ç ȯÀÚ Ã¼Å©(Morse)
	model.setValue("/root/cond/maddchk02",'');		// ¸¸70¼¼ ÀÌ»ó ȯÀÚ Ã¼Å©(Morse)
	model.setValue("/root/cond/maddchk03",'');		// ÁøÁ¤ ¹× ÀÌ¿Ï ¾à¹°Åõ¿© ȯÀÚ Ã¼Å©(Morse)
	model.setValue("/root/cond/maddchk04",'');		// À½ÁÖ È¯ÀÚ Ã¼Å©(Morse)
	model.setValue("/root/cond/maddchk99",'');		// ÇØ´ç»çÇ× ¾øÀ½ üũ(Morse)
	model.setValue("/root/cond/haddchk",'');			// 3¼¼ ¹Ì¸¸ ¼Ò¾Æ üũ(Humpty Dumpty)
	model.setValue("/root/cond/haddchk01",'');		// ÁýÃæÄ¡·á½Ç ȯÀÚ Ã¼Å©(Humpty Dumpty)
	
	//group2.refresh();
	//group4.refresh();
	
	//var curRow  = grd_recmaster.row;	// ÀÌ ºÎºÐ GridRow Var·Î ¼öÁ¤ - AYS
	var clsflag = "";
	var recflag = "";
	
	if(selflag == "Sel"){
		clsflag = model.getValue(xRecMasterPath + '[' + recRow + ']/clsflag');
		recflag = model.getValue(xRecMasterPath + '[' + recRow + ']/recflag');
		if(recflag == '1'){
			model.setValue("/root/cond/clsflag", clsflag);     // ÁßÁõµµ±¸ºÐ Áß ¼±Åà 
		}else if((recflag == '2') && (clsflag == '2')){
			model.setValue("/root/cond/clsflag", 9);           // ³«»ó - Morse Scale ¼±ÅÃ
		}else if((recflag == '2') && (clsflag == '1')){
			model.setValue("/root/cond/clsflag", 8);           // ³«»ó - Humpty Dumpty ¼±ÅÃ
		}else if((recflag == '3') && (clsflag == '1')){
			model.setValue("/root/cond/clsflag", 10);           // ¿åâ ¼±ÅÃ
		}else if(recflag == '4'){
			//model.setValue("/root/cond/clsflag", 11);           // ÅëÁõ ¼±ÅÃ
			//alert("ÅëÁõ°ü·Ã °³¹ßÁßÀÔ´Ï´Ù.");
			//messageBox('°ü·Ã È­¸é ÁغñÁß', 'I009');
			messageBox('ÅëÁõ°ü¸®±â·Ï ¸Þ´º¸¦ »ç¿ëÇϽʽÿÀ', 'I');
			//modal("SMMNW04800",1); //ÅëÁõ°ü¸®±â·Ï È­¸é È£Ãâ
			return;
		}
		
		fChangeCaption(model.getValue("/root/cond/clsflag"));   // ¼±ÅÃµÈ ±¸ºÐÀ¸·Î ĸ¼Ç º¯°æ (2011.04.19 ahn) 
		
	}else{
		clsflag = model.getValue(xRecInfo + '/clsflag');
		recflag = model.getValue(xRecInfo + '/recflag');
	}

    // »ó´Ü ¶óµð¿À ¼±ÅÃ
  	//¸¶½ºÅÍ°¡ ¾Ï°Íµµ ¾øÀ»¶§³ª ÇàÃß°¡ »óÅÂÀ϶§´Â Á¶È¸¾ÈÇÏ°í ¹Ù·Î ¸®ÅÏÇÑ´Ù.
  	//if(grd_recmaster.rows < 2 || model.getValue(xRecMasterPath + '[' + recRow + ']/stat') == 'i'){		// ÀÌ ºÎºÐ GridRow Var·Î ¼öÁ¤ - AYS
	//if(getNodesetCount(xRecMasterPath) < 2 || model.getValue(xRecMasterPath + '[' + recRow + ']/stat') == 'i'){		// ÀÌ ºÎºÐ GridRow Var·Î ¼öÁ¤ - AYS
  //		model.removeNodeset("/root/main/recpntgrup/recpntlist");// ÁßÁõµµ »ó¼¼Á¡¼ö Ŭ¸®¾î
  //  	model.refresh();
  //	}
  	
 	var maddchk01 = model.getValue(xRecMasterPath + '[' + recRow + ']/maddchk01'); 
 	var maddchk02 = model.getValue(xRecMasterPath + '[' + recRow + ']/maddchk02'); 
 	var maddchk03 = model.getValue(xRecMasterPath + '[' + recRow + ']/maddchk03'); 
 	var maddchk04 = model.getValue(xRecMasterPath + '[' + recRow + ']/maddchk04'); 
 	var haddchk =	  model.getValue(xRecMasterPath + '[' + recRow + ']/haddchk'); 
 	//var haddchk01 = model.getValue(xRecMasterPath + '[' + recRow + ']/haddchk01'); 
 	var dinfo = maddchk01+maddchk02+maddchk03+maddchk04+haddchk;
    

	//ÁßÁõµµ³»¿ª ¼±ÅÃÇß´ø ·Î¿ìÁ¤º¸(¼öÇàÀÏÀÚ)¸¦ ÀúÀåÇÑ´Ù.
	model.removeNodeset("/root/send");
	model.makeValue("/root/send/pid", 	        model.getValue(xRecMasterPath+"["+recRow+"]/pid"));
	model.makeValue("/root/send/indd", 	        model.getValue(xRecMasterPath+"["+recRow+"]/indd"));
	model.makeValue("/root/send/cretno", 	      model.getValue(xRecMasterPath+"["+recRow+"]/cretno"));
	model.makeValue("/root/send/execdd",        model.getValue(xRecMasterPath+"["+recRow+"]/execdd"));
	//model.makeValue("/root/send/execdd",      model.getValue('/root/cond/copyexecdd'));
	model.makeValue("/root/send/recseq",        model.getValue(xRecMasterPath+"["+recRow+"]/recseq"));
	model.makeValue("/root/send/clsflag",       clsflag);
	model.makeValue("/root/send/recflag",       recflag);
	model.makeValue('/root/send/bspntgrup/dinfo', dinfo);

  	//»ó¼¼³»¿ª, »ó¼¼¼³¸íÀÇ ÇöÀçinstance¸¦ removeÇÑ´Ù.
	model.removenode('/root/main/recdetailgrup');
	model.removenode('/root/main/tar_desccnts');
	
	//model.refresh();

	//»ó¼¼Á¡¼ö±×¸®µåÁ¶È¸
	if(!submit("TRMNW04007",false)) {//»ó¼¼Á¡¼öÁ¶È¸
		messageBox('»ó¼¼Á¡¼öÁ¶È¸¸¦', 'E009');
		return;
	}else{
		//»ó¼¼Á¡¼ö±×¸®µåÀÇ Ä÷³À» Á¶È¸ÇÑ ³»¿ªÀÇ °¹¼ö¸¸Å­ È­¸é¿¡ º¸¿©ÁØ´Ù.
  		//fColLqidtys();		// »èÁ¦Çصµ ¹«¹æÇÏÁö ¾ÊÀ»±î? ±×¸®µå ÂüÁ¶ºÎºÐ - AYS
	}
  	//ÁßÁõ±â·Ï detail »ó¼¼³»¿ª ±×¸®µå¸®½ºÆ®¸¦ Á¶È¸ÇÑ´Ù.
	
  	fSearchRecDetailAll();	
  	//addchk();
}

function fSearchRecDetailAll(){		
    
	model.removenode('/root/main/recdetailgrup');
	model.makeNode('/root/main/recdetailgrup'); 

   model.removeNodeset("/root/send");
   model.makeValue("/root/send/pid",     model.getValue(xRecMasterPath+"["+recRow+"]/pid"));
   model.makeValue("/root/send/cretno",  model.getValue(xRecMasterPath+"["+recRow+"]/cretno"));
   model.makeValue("/root/send/indd",    model.getValue(xRecMasterPath+"["+recRow+"]/indd"));
   model.makeValue("/root/send/seqno",   model.getValue(xRecMasterPath+"["+recRow+"]/seqno"));
   model.makeValue("/root/send/recseq",  model.getValue(xRecMasterPath+"["+recRow+"]/recseq"));
   model.makeValue("/root/send/clsflag", model.getValue(xRecMasterPath+"["+recRow+"]/clsflag"));
   model.makeValue("/root/send/recflag", model.getValue(xRecMasterPath+"["+recRow+"]/recflag"));
   model.makeValue("/root/send/execdd",  model.getValue(xRecMasterPath+"["+recRow+"]/execdd"));
   model.makeValue("/root/send/newexecdd",  model.getValue("/root/cond/execdd"));

   //»ó¼¼¼³¸íÀÇ ÇöÀçinstance¸¦ removeÇÑ´Ù.
   model.removenode('/root/main/tar_desccnts');
   //model.refresh();

   //ÁßÁõµµ »ó¼¼³»¿ª Á¶È¸
   if(submit("TRMNW04006",false)){
   	//model.copyNode("/root/temp","/root/main");
    //fShowTreeRecDetailGrup();						// Grid »ö»ó Ãß°¡ ºÎºÐ Á¦°Å ÇÊ¿ä
   }
}



function fIsRecordedAll(iptExecdd){

	var retArr = new Array(1);

	var recorded = false;
	var signno   = '';

	var execdd;
	var stat;

	for(var i = 1; i < getNodesetCount(xRecMasterPath); i++){

		execdd = model.getValue(xRecMasterPath + '[' + i + ']/execdd');
		stat   = model.getValue(xRecMasterPath + '[' + i + ']/stat');

		if(execdd != '' && iptExecdd == execdd && stat != 'i'){
			signno = model.getValue(xRecMasterPath + '[' + i + ']/signno');
			recorded = true;

			retArr[0] = recorded;
			retArr[1] = signno;

			return retArr;
		}

	}

	retArr[0] = recorded;
	retArr[1] = signno;

	return retArr;
}

function addallchk(){
	
	var wardcd 	  =	 model.getValue("/root/cond/wardcd");
	var patnm 	  =	 model.getValue("/root/main/patinfo/patlist[" + patRow + "]/hngnm");
	var age 	  =	 model.getValue("/root/main/patinfo/patlist[" + patRow + "]/age");
	var maddchk01 =  model.getValue(xRecMasterPath + '[' + recRow + ']/maddchk01');
	var maddchk02 =  model.getValue(xRecMasterPath + '[' + recRow + ']/maddchk02');
	var maddchk03 =  model.getValue(xRecMasterPath + '[' + recRow + ']/maddchk03');
	var maddchk04 =  model.getValue(xRecMasterPath + '[' + recRow + ']/maddchk04');
	var maddchk99 =  model.getValue(xRecMasterPath + '[' + recRow + ']/maddchk99');
	var haddchk   =	 model.getValue(xRecMasterPath + '[' + recRow + ']/haddchk');
	var haddchk01 =  model.getValue(xRecMasterPath + '[' + recRow + ']/haddchk01');

	if(model.getValue("/root/cond/clsflag")  == "8"){
	
		if(parseInt(age) >= 15){
			messageBox(patnm + " ȯÀÚ´Â 15¼¼ ÀÌ»óÀÔ´Ï´Ù. Morse scaleÀ» »ç¿ëÇØ¾ß ÇÕ´Ï´Ù.","E");
			//messageBox("³«»ó À§Çè »çÁ¤Àº 15¼¼ ÀÌ»ó - Morse scaleÀ» »ç¿ëÇØ¾ß ÇÕ´Ï´Ù.","E");
			return false;
		}else{
		
			for(i = 1; i <= getNodesetCount("/root/init/icucdgrup/icucdgruplist"); i++){
				if(wardcd == model.getValue("/root/init/icucdgrup/icucdgruplist[" + i + "]/wardcd")){	// ÁßȯÀÚ½ÇÀ̸é
					//chk_haddchk01.value = 'Y';
					haddchk01 = 'Y';
					model.setValue(xRecMasterPath + '[' + recRow + ']/haddchk01', haddchk01);
				}
			}
		
			if(parseInt(age) < 3){
				//chk_haddchk.value = 'Y';
				haddchk = 'Y';
				model.setValue(xRecMasterPath + '[' + recRow + ']/haddchk', haddchk);
			}
		}
	
	}else if(model.getValue("/root/cond/clsflag")  == "9"){
		
		if(parseInt(age) < 15){
			//messageBox("³«»ó À§Çè »çÁ¤Àº 15¼¼ ¹Ì¸¸ - Humpty Dumpty scaleÀ» »ç¿ëÇØ¾ß ÇÕ´Ï´Ù.","E");
			messageBox(patnm + " ȯÀÚ´Â 15¼¼ ¹Ì¸¸ÀÔ´Ï´Ù. Humpty Dumpty scaleÀ» »ç¿ëÇØ¾ß ÇÕ´Ï´Ù.","E");
			return false;
		}else{
						
			for(i = 1; i <= getNodesetCount("/root/init/icucdgrup/icucdgruplist"); i++){
				if(wardcd == model.getValue("/root/init/icucdgrup/icucdgruplist[" + i + "]/wardcd")){	// ÁßȯÀÚ½ÇÀ̸é
					//chk_maddchk01.value = 'Y';
					maddchk01 = 'Y';
					model.setValue(xRecMasterPath + '[' + recRow + ']/maddchk01', maddchk01);
				}
			}
		}
		if(parseInt(age) >= 70){
			//chk_maddchk02.value = 'Y';
			maddchk02 = 'Y';
			model.setValue(xRecMasterPath + '[' + recRow + ']/maddchk02', maddchk02);
		}
		
		if(maddchk01 == "" && maddchk02 == "" && maddchk03 == "" && maddchk04 == "" && maddchk99 == "" ){
			maddchk99 = 'Y';
			model.setValue(xRecMasterPath + '[' + recRow + ']/maddchk99', maddchk99);
		}
	}
	
	model.setValue("/root/cond/maddchk01"	, maddchk01);
	model.setValue("/root/cond/maddchk02"	, maddchk02);
	model.setValue("/root/cond/maddchk03"	, maddchk03);
	model.setValue("/root/cond/maddchk04"	, maddchk04);
	model.setValue("/root/cond/maddchk99"	, maddchk99);
	model.setValue("/root/cond/haddchk"		, haddchk);
	model.setValue("/root/cond/haddchk01"	, haddchk01);
	
	return true;

}

function fLoadFallPnt(recflag, clsflag, bspntnm){
	//debugger;
	var spid    = model.getValue(xRecMasterPath + "/pid");
  var sorddd  = model.getValue('/root/main/patinfo/patlist[' + (grd_patinfo.row-1) + ']/indd');
	var sioflag	  = model.getValue('/root/main/patinfo/patlist[' + (grd_patinfo.row-1) + ']/ioflag');
  var scretno = model.getValue('/root/main/patinfo/patlist[' + (grd_patinfo.row-1) + ']/cretno');
  var sexecdd = model.getValue('/root/cond/execdd');
	var sfromcd = "";
	var sprntyn = "";
	var left = event.screenX;
	var top = event.screenY;
	var snowdate = getCurrentDate();

	if(recflag == '2' && clsflag == '1'){	//Humpty Dumpty(¼Ò¾Æ)
		sfromcd = '1600017757';
		sprntyn = 'Y';
	} else if(recflag == '2' && clsflag == '2'){ // Morse Scale(¼ºÀÎ)
		sfromcd = '1600017756';
		sprntyn = 'Y';
	} else{
		sfromcd = '';
		sprntyn = 'N';
	}
	
	model.removenode('/root/send2');
	model.makeValue("/root/send2/req/pid", spid);	
	model.makeValue("/root/send2/req/indd", sorddd);	   
	model.makeValue("/root/send2/req/cretno", scretno);	
	model.makeValue("/root/send2/req/formcd", sfromcd);	
	
	if(getUserInfo("dutplceinstcd") == '032' && sprntyn == 'Y' && bspntnm == '°íÀ§Ç豺' && snowdate == sexecdd && getUserInfo("dutplcecd") != '3062300000' && getUserInfo("dutplcecd") != '2110201000' && getUserInfo("dutplcecd") != '2364601000') {
		if (submit("TRMNW15101") == true){
			if(getNodesetCount("/root/duplocrprnt/msginfo/list") > 0 ) {  // Ãâ·ÂÇß´ø °ÇÀÎ °æ¿ì
				if(model.getValue("/root/duplocrprnt/msginfo/list/scanyn") == "N"){ // ½ºÄµµÈ°ÇÀÌ ¾ø´Â°æ¿ì
					if(model.getValue("/root/duplocrprnt/msginfo/list/statcd") == "D" || model.getValue("/root/duplocrprnt/msginfo/list/statcd") == "CP"){ // »èÁ¦/Ãâ·ÂÃë¼Ò µÈ °ÇÀÎ °æ¿ì
						//½Å±ÔÃâ·Â
						fOCRPrint(spid, sorddd, scretno, sioflag, sfromcd);
						//fOCRPrint(left, top, spid, sorddd, scretno, sioflag, sfromcd);
						
					}
				}
			}else{ 
					// ½Å±ÔÃâ·Â
					fOCRPrint(spid, sorddd, scretno, sioflag, sfromcd);
					//fOCRPrint(left, top, spid, sorddd, scretno, sioflag, sfromcd);
			}
		}
	}
}

function fOCRPrint(spid, sorddd, scretno, sioflag, sformcd){
		//ivwiewer ¸¦ nonvisible ·Î ¿Ã·ÁµÎ°í ÁøÇà
		var formcd = sformcd
		var pid  = spid
		var orddd  = sorddd
		var cretno  = scretno
		var ordtype  = sioflag
		var formtypecls = "3";
    var ocrtagprntyn = "Y";
    ivw_ocrprnt.attribute("src") = "../../../emr/formmngtweb/xrw/SSMRF03800_OCRºä¾î.xrw";
		ivw_ocrprnt.window.javascript.fGetOCRInfo(formcd, pid, orddd, cretno, ordtype, formtypecls, ocrtagprntyn);
    ivw_ocrprnt.window.javascript.fPrint();
}