var sORDERBY = "desc";
var gTimerID;
var gIntervalTime = 500;
var gTimeCnt;


/**
 * @desc ¼­½Ä¸í Á¶È¸
 */
function fReqGetFormList(){
	if(submit("TRMRI01804")){    //¼­½Ä¸íÄÞº¸ Á¶È¸
		addComboItem("cmb_formcd","Àüü","-");
	}				
}

/**
 * @desc ¹ÌºñÇ׸ñÄÚµå Á¶È¸
 */
function fReqGetFormItemList(formcd){
	model.removeNodeset("/root/send/reqdata");
	model.makeNode("/root/send/reqdata");
	model.makeValue("/root/send/reqdata/formcd", formcd);
	if(submit("TRMRI01805")){
		addComboItem("cmb_itemcd","Àüü","-");
	}
}

/**
 * @desc ¹ÌºñÀÇ»ç Á¶È¸
 * @param srchflag °Ë»ö±¸ºÐ(id:¾ÆÀ̵ð, nm:¸í)
 *        unprepdeptcd ¹ÌºñÁø·á°ú
 *        unprepdr ¹ÌºñÀÇ»ç(srch?id:¾ÆÀ̵ð, nm:¸í)
 *        stnddd ±âÁØÀÏÀÚ
 *        deptengabbr ºÎ¼­¾à¾î¸í
 */
function fReqGetUnPrepDrList(srchflag, unprepdeptcd, unprepdr, stnddd, deptengabbr, grupflag){
	model.removeNodeset("/root/send/reqdata");
	model.makeValue("/root/send/reqdata/srchflag"    , srchflag);
	model.makeValue("/root/send/reqdata/unprepdeptcd", unprepdeptcd);
	model.makeValue("/root/send/reqdata/unprepdr"    , unprepdr);
	model.makeValue("/root/send/reqdata/deptengabbr" , deptengabbr);
	model.makeValue("/root/send/reqdata/stnddd"      , stnddd);
	model.makeValue("/root/send/reqdata/grupflag"    , grupflag);
	if(submit("TRMRI02604")){
	}
}

/**
 * @desc Á¶È¸±âÁØ Á¤º¸ CSV ÇüÅ·Π»ý¼º
 */ 
function doSrchCondCSV(nodeList, sColSep, sRowSep){
	if( nodeList.length == 0 ){
		return;
	}
	
	var rCSV = "";
	var childNodeList = nodeList.item(0).childNodes;
	var childNodeCnt = childNodeList.length;
	if( childNodeCnt == 0 ){
		return;
	}
	
	var i, j;
	for( i = 0; i < childNodeCnt - 1; i++) {
		rCSV += childNodeList.item(i).nodeName + sColSep;
	}
	rCSV += childNodeList.item(i).nodeName + sRowSep;
	
	var node;
	while( node = nodeList.nextNode() ) {
		childNodeList = node.childNodes;
		for( i = 0; i < childNodeCnt - 1; i++) {
			rCSV += childNodeList.item(i).text + sColSep;
		}
		rCSV += childNodeList.item(i).text + sRowSep;
	}
	return rCSV;
}

/**
 * @desc ¹ÌºñÀÇ»çÈ®ÀΠǥ½Ã
 * SMMRI01800_medirecinfo ±¸¼º »óÅÂ^µî·Ï¹øÈ£^Áø·áÀÏÀÚ^»ý¼º¹øÈ£^¼­½ÄÄÚµå^¼­½ÄÀϷùøÈ£
 * status + "^" + pid + "^" + orddd + "^" + cretno + "^" + formcd + "^" + formrecdd + "^" + formrecseq + "^" + workflag; 
 */
function fDispUnPrepDrCnfm(){

	var cmplcnt = model.getValue("/root/main/cnfmcmplcnt/cnfmcmplcnt");
	var posinstcd = getUserInfo("posinstcd");
	var dutplcecd = getUserInfo("dutplcecd");
	var posuserid = getUserId();

	cmplcnt++;				
	model.setValue("/root/main/cnfmcmplcnt/cnfmcmplcnt", cmplcnt);
	
	var mainobj = getMainViewer();
	var medirecinfo = mainobj.javascript.getParameter("SMMRI01800_medirecinfo");
	if(medirecinfo != ""){
		var unprepinfo = medirecinfo.split("^");
		var status     = unprepinfo[0];
		var pid        = unprepinfo[1];
		var orddd      = unprepinfo[2];
		var cretno     = unprepinfo[3];
		var formcd     = unprepinfo[4];
		var formrecdd  = unprepinfo[5];
		var formrecseq = unprepinfo[6];
		var workflag = unprepinfo[7];		// usg : ÀÎÁõÀúÀå, uss : Staff-Sign
		var formrecdeptcd = unprepinfo[8];	//Áø·á±â·Ï ÀÛ¼ººÎ¼­ÄÚµå
		
		if(formrecdeptcd==""){
		   formrecdeptcd = dutplcecd;
		}


		   
		for(var i = 1; i < grd_unpreplist.rows; i++){
			var trgtpid    = model.getValue(grd_unpreplist.nodeset + "[" + i + "]/pid");
			var trgtorddd  = model.getValue(grd_unpreplist.nodeset + "[" + i + "]/indd");
			var trgtcretno = model.getValue(grd_unpreplist.nodeset + "[" + i + "]/cretno");
			var trgtformcd = model.getValue(grd_unpreplist.nodeset + "[" + i + "]/srcformcd");
			var trgtformrecdd = model.getValue(grd_unpreplist.nodeset + "[" + i + "]/formrecdd");
			var trgtformrecseq = model.getValue(grd_unpreplist.nodeset + "[" + i + "]/formrecseq");
			var trgtunprepdrid = model.getValue(grd_unpreplist.nodeset + "[" + i + "]/unprepdrid");
			
			var trgtunprepitemcd = model.getValue(grd_unpreplist.nodeset + "[" + i + "]/unprepitemcd");			
			var trgtorddeptcd = model.getValue(grd_unpreplist.nodeset + "[" + i + "]/orddeptcd");				
			
			//Staff Sign󸮵Ǵ °ÇÀº ¹Ìºñ»óŸ¦ ÀÇ»çÈ®ÀÎÀ¸·Î º¯°æ
			//2008. 12. 26 ¿ÀÁöÈÆ
			if((workflag=="usg") && !(trgtunprepitemcd == "000000002"||trgtunprepitemcd =="0000000057")){	
				if(formcd == "0000000680" || formcd =="0000001592"){ //ÀÔÅð¿ø¿ä¾àÁö/DischargeNoteÀÎ °æ¿ì¿¡´Â ÀÏÀÚ°¡ Á¶È¸Á¶°Ç¿¡¼­ ºüÁü
					if(pid == trgtpid && orddd == trgtorddd && cretno == trgtcretno && formcd == trgtformcd && formrecdeptcd == trgtorddeptcd){
						model.setValue(grd_unpreplist.nodeset + "[" + i + "]/unprepitemnm", "ÀÇ»çÈ®ÀÎ");
						grd_unpreplist.cellStyle("color", i, grd_unpreplist.colRef("unprepdrnm"), i, grd_unpreplist.colRef("drcnfmdt"))="#0000ff";
						grd_unpreplist.cellStyle("font-weight", i, grd_unpreplist.colRef("unprepdrnm"), i, grd_unpreplist.colRef("drcnfmdt"))="bold";
						grd_unpreplist.refresh();
					}							
				}else{						
					if(pid == trgtpid && orddd == trgtorddd && cretno == trgtcretno && formcd == trgtformcd && formrecseq == trgtformrecseq && formrecdeptcd == trgtorddeptcd){
						//¼­¿ï¼º¸ðº´¿ø ¼ö¼ú±â·ÏÁöÀÇ °æ¿ì ÀÎÁõÀúÀå½Ã ¹Ìºñ»óŸ¦ '¿Ï·á'·Î ó¸®ÇÑ´Ù.(2010.02.10 À̳²ÀÍ)
						if(trgtformcd == "0000000676"){
							model.setValue(grd_unpreplist.nodeset + "[" + i + "]/unprepitemnm", "¿Ï·á");					
						} else {							
								model.setValue(grd_unpreplist.nodeset + "[" + i + "]/unprepitemnm", "ÀÇ»çÈ®ÀÎ");	
						}

						model.setValue(grd_unpreplist.nodeset + "[" + i + "]/formrecdd", formrecdd);					
						grd_unpreplist.cellStyle("color", i, grd_unpreplist.colRef("unprepdrnm"), i, grd_unpreplist.colRef("drcnfmdt"))="#0000ff";
						grd_unpreplist.cellStyle("font-weight", i, grd_unpreplist.colRef("unprepdrnm"), i, grd_unpreplist.colRef("drcnfmdt"))="bold";
						grd_unpreplist.refresh();
					}else if(pid == trgtpid && orddd == trgtorddd && cretno == trgtcretno && formcd == trgtformcd && formrecdeptcd == trgtorddeptcd && formrecdd == trgtformrecdd ){
						if(trgtformcd == "0000000676"){
							model.setValue(grd_unpreplist.nodeset + "[" + i + "]/unprepitemnm", "¿Ï·á");					
						} else {
							model.setValue(grd_unpreplist.nodeset + "[" + i + "]/unprepitemnm", "ÀÇ»çÈ®ÀÎ");					
						}

						grd_unpreplist.cellStyle("color", i, grd_unpreplist.colRef("unprepdrnm"), i, grd_unpreplist.colRef("drcnfmdt"))="#0000ff";
						grd_unpreplist.cellStyle("font-weight", i, grd_unpreplist.colRef("unprepdrnm"), i, grd_unpreplist.colRef("drcnfmdt"))="bold";
						grd_unpreplist.refresh();			

					}else if(pid == trgtpid && orddd == trgtorddd && cretno == trgtcretno && formcd == trgtformcd && formrecdeptcd == trgtorddeptcd){
						//ÀÔÅð¿ø¿ä¾àÁö, Discharge Note¿¡ ´ëÇÑ Áø·á±â·ÏÀÏÀÚ º¯°æ½Ã ó¸®
						if(trgtformcd == "0000000680" || trgtformcd == "0000001592"){
							if(trgtformcd == "0000001592"){
								model.setValue(grd_unpreplist.nodeset + "[" + i + "]/unprepitemnm", "¿Ï·á");					
							} else {
								model.setValue(grd_unpreplist.nodeset + "[" + i + "]/unprepitemnm", "ÀÇ»çÈ®ÀÎ");					
							}
	
							grd_unpreplist.cellStyle("color", i, grd_unpreplist.colRef("unprepdrnm"), i, grd_unpreplist.colRef("drcnfmdt"))="#0000ff";
							grd_unpreplist.cellStyle("font-weight", i, grd_unpreplist.colRef("unprepdrnm"), i, grd_unpreplist.colRef("drcnfmdt"))="bold";
							grd_unpreplist.refresh();										
						}		
					}
				}
			} else if((workflag=="usg") && (trgtunprepitemcd == "000000002"||trgtunprepitemcd =="0000000057")){				
				if(pid == trgtpid && orddd == trgtorddd && cretno == trgtcretno && formcd == trgtformcd && formrecseq == trgtformrecseq){			
					if(trgtformcd == "0000000676" && posuserid == trgtunprepdrid){				
						model.setValue(grd_unpreplist.nodeset + "[" + i + "]/unprepitemnm", "ÀÇ»çÈ®ÀÎ");	

						grd_unpreplist.cellStyle("color", i, grd_unpreplist.colRef("unprepdrnm"), i, grd_unpreplist.colRef("drcnfmdt"))="#0000ff";
						grd_unpreplist.cellStyle("font-weight", i, grd_unpreplist.colRef("unprepdrnm"), i, grd_unpreplist.colRef("drcnfmdt"))="bold";
						grd_unpreplist.refresh();									
					}
				}else if(pid == trgtpid && orddd == trgtorddd && cretno == trgtcretno && formcd == trgtformcd && formrecdd == trgtformrecdd){
					if(trgtformcd == "0000000676" && posuserid == trgtunprepdrid){				
						model.setValue(grd_unpreplist.nodeset + "[" + i + "]/unprepitemnm", "ÀÇ»çÈ®ÀÎ");	

						grd_unpreplist.cellStyle("color", i, grd_unpreplist.colRef("unprepdrnm"), i, grd_unpreplist.colRef("drcnfmdt"))="#0000ff";
						grd_unpreplist.cellStyle("font-weight", i, grd_unpreplist.colRef("unprepdrnm"), i, grd_unpreplist.colRef("drcnfmdt"))="bold";
						grd_unpreplist.refresh();									
					}				
				}else if(pid == trgtpid && orddd == trgtorddd && cretno == trgtcretno && formcd == trgtformcd){
					//ÀÔÅð¿ø¿ä¾àÁö, Discharge Note¿¡ ´ëÇÑ Áø·á±â·ÏÀÏÀÚ º¯°æ½Ã ó¸®
					if(trgtformcd == "0000000680" || trgtformcd == "0000001592"){		
						if(posuserid == trgtunprepdrid){				
							model.setValue(grd_unpreplist.nodeset + "[" + i + "]/unprepitemnm", "ÀÇ»çÈ®ÀÎ");	
	
							grd_unpreplist.cellStyle("color", i, grd_unpreplist.colRef("unprepdrnm"), i, grd_unpreplist.colRef("drcnfmdt"))="#0000ff";
							grd_unpreplist.cellStyle("font-weight", i, grd_unpreplist.colRef("unprepdrnm"), i, grd_unpreplist.colRef("drcnfmdt"))="bold";
							grd_unpreplist.refresh();									
						}														
					}
				}							
			}else if(workflag=="uss" && (trgtunprepitemcd == "000000002"||trgtunprepitemcd =="0000000057")){	
				if(formcd == "0000000680" || formcd =="0000001592"){ //ÀÔÅð¿ø¿ä¾àÁö/DischargeNote ÀÎ °æ¿ì¿¡´Â ÀÏÀÚ°¡ Á¶È¸Á¶°Ç¿¡¼­ ºüÁü
					if(pid == trgtpid && orddd == trgtorddd && cretno == trgtcretno && formcd == trgtformcd){
						model.setValue(grd_unpreplist.nodeset + "[" + i + "]/unprepitemnm", "ÀÇ»çÈ®ÀÎ");
						grd_unpreplist.cellStyle("color", i, grd_unpreplist.colRef("unprepdrnm"), i, grd_unpreplist.colRef("drcnfmdt"))="#0000ff";
						grd_unpreplist.cellStyle("font-weight", i, grd_unpreplist.colRef("unprepdrnm"), i, grd_unpreplist.colRef("drcnfmdt"))="bold";
						grd_unpreplist.refresh();
					}							
				}else{						
					if(pid == trgtpid && orddd == trgtorddd && cretno == trgtcretno && formcd == trgtformcd && formrecseq == trgtformrecseq){					
						model.setValue(grd_unpreplist.nodeset + "[" + i + "]/unprepitemnm", "ÀÇ»çÈ®ÀÎ");					
						model.setValue(grd_unpreplist.nodeset + "[" + i + "]/formrecdd", formrecdd);					
						grd_unpreplist.cellStyle("color", i, grd_unpreplist.colRef("unprepdrnm"), i, grd_unpreplist.colRef("drcnfmdt"))="#0000ff";
						grd_unpreplist.cellStyle("font-weight", i, grd_unpreplist.colRef("unprepdrnm"), i, grd_unpreplist.colRef("drcnfmdt"))="bold";
						grd_unpreplist.refresh();
					}else if(pid == trgtpid && orddd == trgtorddd && cretno == trgtcretno && formcd == trgtformcd && formrecdd == trgtformrecdd){
						model.setValue(grd_unpreplist.nodeset + "[" + i + "]/unprepitemnm", "ÀÇ»çÈ®ÀÎ");
						grd_unpreplist.cellStyle("color", i, grd_unpreplist.colRef("unprepdrnm"), i, grd_unpreplist.colRef("drcnfmdt"))="#0000ff";
						grd_unpreplist.cellStyle("font-weight", i, grd_unpreplist.colRef("unprepdrnm"), i, grd_unpreplist.colRef("drcnfmdt"))="bold";
						grd_unpreplist.refresh();				
					}
				}			
			}
		}
		grd_unpreplist.select(i, grd_unpreplist.col) = false;					
	}
	model.refresh();
}

/**
 * @desc ¹Ìºñ±â·Ï load
 */
function fLoadUnPrepRec(){
	
    var currow     = grd_unpreplist.row;
    var pid        = model.getValue("/root/main/unpreplist/unpreplist["+ currow +"]/pid");
    var indd       = model.getValue("/root/main/unpreplist/unpreplist["+ currow +"]/indd");
    var cretno     = model.getValue("/root/main/unpreplist/unpreplist["+ currow +"]/cretno");     
    var ioflag     = model.getValue("/root/main/unpreplist/unpreplist["+ currow +"]/indschflag");
    var formcd     = model.getValue("/root/main/unpreplist/unpreplist["+ currow +"]/formcd");
    var srcformcd  = model.getValue("/root/main/unpreplist/unpreplist["+ currow +"]/srcformcd");
    var orddeptcd  = model.getValue("/root/main/unpreplist/unpreplist["+ currow +"]/indschdeptcd");
    var formrecdd  = model.getValue("/root/main/unpreplist/unpreplist["+ currow +"]/formrecdd");
    var dschdd     = model.getValue("/root/main/unpreplist/unpreplist["+ currow +"]/dschdd");
    var formrecseq = model.getValue("/root/main/unpreplist/unpreplist["+ currow +"]/formrecseq");
    var oprsrvno   = model.getValue("/root/main/unpreplist/unpreplist["+ currow +"]/oprsrvno");
    var instcd     = getUserInfo("dutplceinstcd");
    var unprepitemcd = model.getValue("/root/main/unpreplist/unpreplist["+ currow +"]/unprepitemcd");
    var unprepno = model.getValue("/root/main/unpreplist/unpreplist["+ currow +"]/unprepno");
    var opendd     = model.getValue("/root/init/openday/M0037M0546/cdid"); // º´¿øº° ¿ÀÇÂÀÏ    
    //2009-07-08 ¿ÀÈÄ 8:03:43 °­ÁöÈÆ ¼öÁ¤ : 20091002·Î ÇϵåÄÚµùµÈ ³»¿ªÀ» °øÅëÄÚµå "M0546" À¯ÇüÄÚµå "M0037" ·Î °ü¸®
    var preopendd = opendd.toDate().getAddDate(-1, "D").getDateFormat(); 
    
    var preOpenMonth = preopendd.substring(4,6);
    var preOpenDay   = preopendd.substring(6,8);
    //2010-01-04 À̳²ÀÍ ¼öÁ¤ : ÀÀ±Þ½Ç¹Ìºñ Á¶È¸¸¦ À§ÇÑ ordertype ±¸ºÐ
    var ordtype   = model.getValue("/root/main/unpreplist/unpreplist["+ currow +"]/ordtype");    
    
    var dutplcecd   = getUserInfo("dutplcecd");       //»ç¿ëÀںμ­
    
    if(formrecdd <= preopendd){
        messageBox(preOpenMonth+"¿ù "+preOpenDay+"ÀϱîÁö ¹ß»ýµÈ ¹Ìºñ±â·ÏÀº ±¸OCSÇÁ·Î±×·¥°ú Á¾ÀÌ¿¡ ÀÛ¼º", "I008");
        return;
    }
    
    //ÀÛ¼º¹ÌºñµÈ ±â·ÏÀÎ °æ¿ì, formrecseq°ªÀ» »èÁ¦ÇÔ
    if(formrecseq == -1){
        formrecseq = "";
    }
    
    if((srcformcd != "0000002022")){ 
    //±â·ÏÁö ¹øÈ£°¡ ¾ø°í, ¹ÌºñÇ׸ñÄڵ尡 ÀÎÁõ¹ÌºñÀÎ °æ¿ì ±â·ÏÁö ·ÎµùÀ» ÇÏÁö ¾Ê´Â´Ù.    
	    if(formrecseq == ""){
	        if(unprepitemcd == "0000000057" || unprepitemcd == "000000002"){
	            messageBox("±â·ÏÁö¿Í ¿¬µ¿µÇÁö ¾Ê¾Æ ÀÎÁõ", "E001");
	            return;
	        }
	    }
    }
      
    // 2009.07.01 ÀÌ°æÈñ
		// ȯÀÚÀÇ Åð¿øÀÏÀÌ ÇØ´ç ÀÏÀÚ ÀÌÈÄÀÎ °æ¿ì. Áï Àç¿øÁßÀΠȯÀÚ´Â dschdd¸¦ ÇöÀçÀÏÀÚ·Î ³Ñ±ä´Ù.
		var today = getCurrentDate();
		if(dschdd > today)	{
			dschdd = today;
		}
    
    
    // ¼ö¼ú±â·Ï¿¬µ¿
    // ¼ö¼úȯÀÚ parameter ±¸Á¶        ioflag¢Ëpid     ¢Ëopcnfmdd¢Ëcretno  ¢Ëinstcd  ¢Ëperfdeptcd¢Ëperfdrid¢Ëpatflag ¢Ëprocflag¢Ëoprsrvno¢Ëophistno¢Ësrchdd
	//                         ¿Ü·¡/ÀÔ¿ø±¸ºÐ¢Ëµî·Ï¹øÈ£¢Ë¼ö¼úÀÏÀڢ˻ý¼º¹øÈ£¢Ë±â°üÄÚµå¢ËÁýµµ°ú    ¢ËÁýµµÀÇ  ¢ËȯÀÚ±¸ºÐ¢Ë󸮱¸ºÐ
    // ¼ö¼ú±â·Ï || Brief OP Note || Post Op Note(New)-20130619 || ¸¶Ãë±â·ÏÁö-20131015 || ¸¶ÃëÀü Æò°¡ ¹× ÇùÁø¼­-20131025
    if(srcformcd == "0000000676" || srcformcd == "0000003169" || srcformcd == "1300014169" || srcformcd == "0000002022" || srcformcd == "0000000737"){
/*	      
        if(oprsrvno == ""){
            messageBox("¼ö¼úÁ¤º¸¸¦ ¿¬°áÇÒ ¼ö", "I004");
            return;
        }
*/        
        
        var param = "T"       + "¢Ë" + 		// ioflag
                    pid       + "¢Ë" + 		// pid
                    formrecdd + "¢Ë" + 	// opcnfmdd
                    cretno    + "¢Ë" +		// cretno 
                    instcd    + "¢Ë" + 		// instcd
                    ""        + "¢Ë" + 		// perfdeptcd
                    ""        + "¢Ë" + 		// perfdrid
                    "I"       + "¢Ë" + 		// patflag
                    "F"       + "¢Ë" + 		// procflag
                    oprsrvno  + "¢Ë" + 		// oprsrvno
                    ""        + "¢Ë" +		// ophistno
                    dschdd;								// srchdd
/*	      
	      // ¼ö¼ú±â·ÏÀÎ °æ¿ì ȯÀÚ¿ø¹«Å° Á¶È¸¸¦ ÇÑ´Ù.
        // Á¶È¸ °á°ú°¡ 1°ÇÀÎ °æ¿ì¿¡´Â ±âÁ¸ ·ÎÁ÷´ë·Î ÁøÇà
        // 2°ÇÀÎ °æ¿ì¿¡´Â Á¶È¸µÈ °á°ú¸¦ Æ˾÷À¸·Î ¶ç¿ö »ç¿ëÀÚ°¡ ¾î¶² ¼öÁøÀ» ¿­°ÍÀÎÁö ¼±ÅÃ
        // ¼±ÅÃµÈ ¼öÁøÀ¸·Î ¿­µµ·Ï ¼³Á¤.
        param = fGetEtcPatPamPrimaryKey(param);
*/        
                  
    //¼ö¼ú±â·Ï ÀÌ¿ÜÀÇ ±â·Ï¿¬µ¿
    }else{
    /*Ãß°¡ 2010.01.05 À̳²ÀÍ ÀÀ±Þ½Ç °ü·Ã Ãß°¡ ÀÌÀü
    	var param = "I"    + "¢Ë" + 
                    pid    + "¢Ë" + 
                    indd   + "¢Ë" + 
                    cretno + "¢Ë" + 
                    instcd + "¢Ë" + 
                    dschdd;	                      
    
    */
    	if(ordtype!="E"){
    		ordtype = "I";
		}
		    		
    	var param = ordtype    + "¢Ë" + 
                    pid    + "¢Ë" + 
                    indd   + "¢Ë" + 
                    cretno + "¢Ë" + 
                    instcd + "¢Ë" + 
                    dschdd;	                      
    }
    setParameter("condparam", param);
	
	//±â·Ï¹øÈ£°¡ ¾ø´Â °æ¿ì, ÀÛ¼º¹Ìºñ°¡ ¾Æ´Ï¸é ¿¬µ¿ºÒ°¡
	setGlobalVariable("linked_formcd"    , formcd     , "emr");
	setGlobalVariable("linked_formrecseq", formrecseq , "emr");
	setGlobalVariable("linked_formrecdd" , formrecdd  , "emr");	
	
    modal("SPMMO08900", 1, 0, 0, "", "", "", "left:0; right:0; width:0; height:0; sysmenu:hidden; caption:hidden; min:hidden, max:hidden;");    

    var gmainwnd = getMainViewer();
    setParameter("SMMMO04100_ANSWCNT", "");
    /*
    gmainwnd.javascript.navigate("SMMMR00100");
    */
    // 2013.10.15 ±è¿µ±â ¸¶Ãë±â·ÏÁö ¹× ¸¶ÃëÀü Æò°¡ ¹× ÇùÁø¼­ Ãß°¡¸¦ À§ÇÑ ·ÎÁ÷ ¼öÁ¤    
    //if((dutplcecd == "2090000000" || dutplcecd == "2090300000")){ //»ç¿ëÀںμ­°¡ ¸¶ÃëÅëÁõÀÇÇаú, ÅëÁõŬ¸®´ÐÀÎ °æ¿ì
    if(srcformcd == "0000002022" || srcformcd == "0000000737"){ //¼­½ÄÄڵ尡 ¸¶Ãë±â·ÏÁö ¹× ¸¶ÃëÀü Æò°¡ ÀÏ°æ¿ì 
        gmainwnd.javascript.navigate("SMMMR03700");
        //model.setValue("/root/temp2/unprepno", unprepno);
        setParameter("SMMMR03700_unprepno", unprepno);
    }else{
    	gmainwnd.javascript.navigate("SMMMR00100");
    }
    
    model.refresh();
}

/**
 * @desc ºÎ¼­ÄÞº¸ Á¶È¸
 */ 
function fGetDeptCodeComboList(ref, rsltref, orddeptflag, stnddd){
	var mmb_rsltref = "/root/hidden/mmb/orddept";
	model.removeNode(mmb_rsltref);
	model.makeNode(mmb_rsltref);

	model.removeNode(ref);
	model.makeValue(ref + "/orddeptflag", orddeptflag);
	if(stnddd != ""){    
		model.makeValue(ref + "/stnddd", stnddd);
	}

	if(submit("TRMMB04101", "false", ref, mmb_rsltref)==true){
		model.copyNode(rsltref, mmb_rsltref);
		model.removeNode(mmb_rsltref);
	}
	model.refresh();
}

/**
 * @desc ¹ÌºñÇ׸ñÄÚµå Count¿¹¿ÜÄÚµå Á¶È¸
 */ 
function reqGetUnPrepBaseExptCnt(){
	if(submit("TRMRI01703")){
	}
}

/**
 * @desc ´ÙÀ½´ÞÀ» ±¸ÇÏ´Â ÇÔ¼ö
 * @param yyyy : ³âµµ
 * @param  mm   : ¿ù
 * @return yyyymm : ³â¿ù
 */
function addMonth(yyyymm){
	var yyyy = yyyymm.substring(0, 4);
	var mm   = yyyymm.substring(4, 6);
	var bfmm;
	
	if(mm.substr(0,1) == "0"){ //10¿ù ÀÌÀüÀÎ °æ¿ì, ¾ÕÀÚ¸® 0À» Á¦°Å
		bfmm = mm.substr(1,1);
		bfmm++;
		
	}else{                   //10¿ù ÀÌÈÄÀÎ °æ¿ì					
		bfmm = mm;
		bfmm++;
	}
	
	if(bfmm > 12){ // 1¿ù ÀÌÀüÀ» ¼±ÅÃÇÑ °æ¿ì, ³âµµ¸¦ ¹Ù²Þ
		bfmm = "01";
		yyyy++;
		
	}else if(bfmm < 10){ //10¿ù ÀÌÈÄÀÎ °æ¿ì¿¡´Â ¾ÕÀÚ¸®¿¡ 0À» ºÙÀÓ.
		bfmm = "0".concat(bfmm);					
	}				
	return "" + yyyy + "".concat(bfmm);
}

/**
 * @desc ´Þ°£°ÝÀ» ±¸ÇÏ´Â ÇÔ¼ö
 * @param startdd : ½ÃÀÛ³â¿ù(YYYY-MM)
 * @param enddd   : Á¾·á³â¿ù(YYYY-MM)
 * @return monthcnt : ´Þ°£°Ý
 */
function getMonthInterval(startdd, enddd){
	var monthcnt = 0;				
	while(startdd != enddd){
		startdd = addMonth(startdd);
		monthcnt++;
	}
	return monthcnt;
}

/**
 * @desc ¼ýÀÚ¿©ºÎ ÆÇ´Ü
 */ 
function isNumber(str) {
	str += ''; // ¹®ÀÚ¿­·Î º¯È¯
	str = str.replace(/^\s*|\s*$/g, ''); // ÁÂ¿ì °ø¹é Á¦°Å
	if (str == '' || isNaN(str)){
		return "N";
	}
	return "Y";
}

/**
 * @desc ¹ÌºñÀÇ»ç Á¶È¸
 */ 
function fReqGetUnPrepDrSmplList(srchflag, srchdata){
    model.removeNodeset("/root/send/reqdata");
    model.makeValue("/root/send/reqdata/srchflag", srchflag);
    model.makeValue("/root/send/reqdata/srchdata", srchdata);
    if(submit("TRMRI02901")){
    }
}

/**
 * @desc Àǻ纰¹Ìºñ¸®½ºÆ® Á¶È¸
 * @param unprepsign staffsign±¸ºÐ(Y/N)
 */
function fReqGetUnPrepDrClsList(unprepsign){
  grd_unpreplist.allstyle("all", "color") = "";
	grd_unpreplist.allstyle("all", "font-weight")= "";
	model.setValue("/root/main/cond/unprepsign", unprepsign);	
	model.removeNode("/root/main/unpreplist/unpreplistcnt");
	model.removeNodeset("/root/main/unpreplist/unpreplist");
	model.copyNode("/root/send/reqdata", "/root/main/cond");
	
	model.makeValue("/root/send/reqdata/offset", "0");
	model.makeValue("/root/send/reqdata/pagesize", "1000");
	if(submit("TRMRI01801")){
		fFormCountofSrcForminfo();
	 	//fFormCountofFominfo();
	    fDoMergeUnPrepDrClsList();	   
	}
	
	 //grd_unpreplist.rowstyle(1, "overchk", "background-color") = "#ff0000";
	 
	 for (var i=1 ; i < grd_unpreplist.rows ; i++ )
	 {
		 	var overchk = model.getValue("/root/main/unpreplist/unpreplist["+ i +"]/overchk");
		 	grd_unpreplist.cellstyle("color", i,1) = "#000000";
		 	if (overchk > 24 ) {
		 		grd_unpreplist.cellstyle("color", i,1) = "#FF0000";
		 	}
		 	
	 }

	
}

/**
 * @desc Àǻ纰¹Ìºñ¸®½ºÆ® Á¶È¸ ½ºÅ©·ÑÀ̺¥Æ®
 * @param unprepsign staffsign±¸ºÐ(Y/N)
 */
function fSubmitOnScroll() 
{	
		if( (grd_unpreplist.rows - grd_unpreplist.fixedrows) < 1000)
			return;
			
		if(grd_unpreplist.vscroll.attribute("max") == grd_unpreplist.vscroll.attribute("pos")) 
		{
			fDoUnMergeUnPrepDrClsList();

			model.copyNode("/root/send/reqdata", "/root/main/cond");
		
			// end of scroll
			var nextpage = grd_unpreplist.rows-grd_unpreplist.fixedRows;
			model.makeValue("/root/send/reqdata/offset", nextpage); // gridÀÇ header row´Â Á¦¿Ü
			model.makeValue("/root/send/reqdata/pagesize", "1000");
			
			if(submit("TRMRI01801")){
					grd_unpreplist.dispatch("onmouseup");  // ½ºÅ©·Ñ¹Ù 󸮸¦ À§ÇÑ À̺¥Æ® ¹ß»ý
					grd_unpreplist.refresh();
					grd_unpreplist.rebuild();
					fDoMergeUnPrepDrClsListScroll();
					fFormCountofSrcForminfo();
			}
	}
	
}

/**
 * @desc Àǻ纰¹Ìºñ¸®½ºÆ® unmerge
 */
function fDoUnMergeUnPrepDrClsList()
{		
	grd_unpreplist.sortClear();
	for(var i = 1; i < grd_unpreplist.rows; i++)
	{
		if(grd_unpreplist.isMerge(i, grd_unpreplist.colRef("pid")))
		{
			grd_unpreplist.unmergeByFree(i, grd_unpreplist.colRef("pid"));
			grd_unpreplist.unmergeByFree(i, grd_unpreplist.colRef("hngnm"));
			grd_unpreplist.unmergeByFree(i, grd_unpreplist.colRef("dschdd"));
			grd_unpreplist.unmergeByFree(i, grd_unpreplist.colRef("dschdeptnm"));
			grd_unpreplist.unmergeByFree(i, grd_unpreplist.colRef("medispclnm"));
		}
	}
	grd_unpreplist.refresh();
	model.refresh();    
}

/**
 * @desc Àǻ纰¹Ìºñ¸®½ºÆ® Scroll merge
 */
function fDoMergeUnPrepDrClsListScroll(){
	var reccnt = 0;
	var patcnt = 0;
	var icnt   = 0;
	var color  = "#ffffcc";
	var startrow = 1;
	
	for(var i = 1; i < grd_unpreplist.rows; i++){
		var unprepitemcd = model.getValue("/root/main/unpreplist/unpreplist[" + i + "]/unprepitemcd");
		var result = model.getValue("/root/main/unprepiteminfo/unprepiteminfo[unprepitemcd='" + unprepitemcd + "']/unprepitemcd");
		if(result == ""){
			reccnt++;
		}
		
		if(i == 1){
			var orgpid        = grd_unpreplist.valuematrix(i, grd_unpreplist.colRef("pid")); //pid
			var orgdschdd     = grd_unpreplist.valuematrix(i, grd_unpreplist.colRef("dschdd")); //dschdd
			var orgmedispclnm = grd_unpreplist.valuematrix(i, grd_unpreplist.colRef("medispclnm")); //medispclnm
			startrow = 1;
			grd_unpreplist.rowStyle(i, "data", "background-color")= color;
			patcnt++;
			continue;
		}
		
		var pid        = grd_unpreplist.valuematrix(i, grd_unpreplist.colRef("pid")); //pid
		var dschdd     = grd_unpreplist.valuematrix(i, grd_unpreplist.colRef("dschdd")); //dschdd
		var medispclnm = grd_unpreplist.valuematrix(i, grd_unpreplist.colRef("medispclnm")); //medispclnm
			
		if(orgpid == pid && orgdschdd == dschdd && orgmedispclnm == medispclnm){
			grd_unpreplist.mergeByFree(startrow, grd_unpreplist.colRef("pid"), i, grd_unpreplist.colRef("pid"));
			grd_unpreplist.mergeByFree(startrow, grd_unpreplist.colRef("hngnm"), i, grd_unpreplist.colRef("hngnm"));
			grd_unpreplist.mergeByFree(startrow, grd_unpreplist.colRef("dschdd"), i, grd_unpreplist.colRef("dschdd"));
			grd_unpreplist.mergeByFree(startrow, grd_unpreplist.colRef("dschdeptnm"), i, grd_unpreplist.colRef("dschdeptnm"));
			grd_unpreplist.mergeByFree(startrow, grd_unpreplist.colRef("medispclnm"), i, grd_unpreplist.colRef("medispclnm"));								
			
		}else{
			patcnt++;
			var orgpid        = grd_unpreplist.valuematrix(i, grd_unpreplist.colRef("pid")); //pid
			var orgdschdd     = grd_unpreplist.valuematrix(i, grd_unpreplist.colRef("dschdd")); //dschdd
			var orgmedispclnm = grd_unpreplist.valuematrix(i, grd_unpreplist.colRef("medispclnm")); //medispclnm
			startrow = i;
			if(color == "#ffffcc"){
				color = "#ffffff";
			}else{
				color = "#ffffcc";
			}								
		}
		grd_unpreplist.rowStyle(i, "data", "background-color")= color;
	}	
	model.setValue("/root/main/cond/patcnt", patcnt);
	model.setValue("/root/main/cond/reccnt", reccnt);
	model.refresh();    
}

/**
 * @desc Àǻ纰¹Ìºñ¸®½ºÆ® merge
 */
function fDoMergeUnPrepDrClsList()
{		
	var reccnt = 0;
	var patcnt = 0;
	var icnt   = 0;
	var color  = "#ffffcc";
	var startrow = 1;
	
	for(var i = 1; i < grd_unpreplist.rows; i++){
		var unprepitemcd = model.getValue(grd_unpreplist.nodeset + "[" + i + "]/unprepitemcd");
		var result = model.getValue("/root/main/unprepiteminfo/unprepiteminfo[unprepitemcd='" + unprepitemcd + "']/unprepitemcd");
		if(result == ""){
			reccnt++;
		}
		
		if(i == 1){
			var orgpid        = model.getValue(grd_unpreplist.nodeset + "[" + i + "]/pid");
			var orgdschdd     = model.getValue(grd_unpreplist.nodeset + "[" + i + "]/dschdd");
			var orgmedispclnm = model.getValue(grd_unpreplist.nodeset + "[" + i + "]/medispclnm");
			startrow = 1;
			grd_unpreplist.rowStyle(i, "data", "background-color")= color;
			patcnt++;
			continue;
		}
		
		var pid        = model.getValue(grd_unpreplist.nodeset + "[" + i + "]/pid");
		var dschdd     = model.getValue(grd_unpreplist.nodeset + "[" + i + "]/dschdd");
		var medispclnm = model.getValue(grd_unpreplist.nodeset + "[" + i + "]/medispclnm");
		
		if(orgpid == pid && orgdschdd == dschdd && orgmedispclnm == medispclnm){
			grd_unpreplist.mergeByFree(startrow, grd_unpreplist.colRef("pid"), i, grd_unpreplist.colRef("pid"));
			grd_unpreplist.mergeByFree(startrow, grd_unpreplist.colRef("hngnm"), i, grd_unpreplist.colRef("hngnm"));
			grd_unpreplist.mergeByFree(startrow, grd_unpreplist.colRef("dschdd"), i, grd_unpreplist.colRef("dschdd"));
			grd_unpreplist.mergeByFree(startrow, grd_unpreplist.colRef("dschdeptnm"), i, grd_unpreplist.colRef("dschdeptnm"));
			grd_unpreplist.mergeByFree(startrow, grd_unpreplist.colRef("medispclnm"), i, grd_unpreplist.colRef("medispclnm"));								
			
		}else{
			patcnt++;
			var orgpid        = model.getValue(grd_unpreplist.nodeset + "[" + i + "]/pid");
			var orgdschdd     = model.getValue(grd_unpreplist.nodeset + "[" + i + "]/dschdd");
			var orgmedispclnm = model.getValue(grd_unpreplist.nodeset + "[" + i + "]/medispclnm");
			startrow = i;
			if(color == "#ffffcc"){
				color = "#ffffff";
			}else{
				color = "#ffffcc";
			}								
		}
		grd_unpreplist.rowStyle(i, "data", "background-color")= color;
	}	
	model.setValue("/root/main/cond/patcnt", patcnt);
	model.setValue("/root/main/cond/reccnt", reccnt);
	model.refresh();    
}

/**
 * @desc   : ¿¢¼¿ ÀúÀå
 */
function fSaveExcel(){
    var fileName = window.fileDialog("save", ",", false, "excel", "xls", "Excel Files(*.xls)|*.xls|All Files (*.*)|*.*");
    if (fileName != ""){	
        grd_unpreplist.saveExcel(fileName, "SheetName", true, true, "", "", "false");
    }
}

/**
 * @desc   : Àǻ纰¹Ìºñ¸®½ºÆ® Ãâ·Â
 */
function fPrntUnPrepInfo(){
//    model.setValue("/root/main/cond/unprepdeptnm", cmb_deptcd.label);
//	model.setValue("/root/main/cond/indschflagnm", rdo_inoutflag.label);
//	model.setValue("/root/main/cond/dateflagnm"  , cmb_inoutddflag.label);
//	model.setValue("/root/main/cond/formnm"      , cmb_formcd.label);
//	model.setValue("/root/main/cond/unprepitemnm", cmb_itemcd.label);						
	
	exeReportPreview("RPMRI01800", "XMLSTR");
}

function fFormCountofSrcForminfo()
{
	/*	0000000680 : ÀÔÅð¿ø¿ä¾à±â·ÏÁö
		0000000003 : ÀÔ¿øÃÊÁø±â·Ï
		0000000004 : °æ°ú±â·Ï   
		0000003169 : Brief OP Note 
		0000001594 : Expired Note
		0000000676 : ¼ö¼ú±â·Ï
		0000001592 : Discharge Note
		0800003416 : Post Op Note*/
	var arrItem = new Array("0000000680", "0000000003", "0000000004", "0000003169", "0000001594", "0000000676", "0000001592", "0800003416");
	for( i=0; i<arrItem.length;i++ )
	{
//			var nodelist =  instance1.selectNodes("/root/unpreplist");
//			var cnt = model.getXPathValue("count(/root/main/unpreplist/unpreplist[srcformcd='"+arrItem[i]+"'])");

//	formcd º° count Áý°è¿¡¼­ ȯÀÚ´ç formcd º° count Áý°è·Î ¼öÁ¤	2010.02.25 ¼º±ÔÈÆ	
			var nodelist =  instance1.selectNodes("root/main/unpreplist/unpreplist")
			var pidArray = Array(nodelist.length);			//ÇØ´ç formÀ» °®°íÀÖ´Â pid¸¦ ¸ð¾ÆµÑ ¹è¿­
			var cnt = 0;
			for( j=0; j < nodelist.length; j++)
			{
				var itemNode = nodelist.item(j);
				var pid = itemNode.selectSingleNode("pid").text;
				var srcformcd = itemNode.selectSingleNode("srcformcd").text;
				if(srcformcd == arrItem[i])
				{
					pidArray[j] = pid;					
				}
			}
			pidArray.sort();												//pidArray Á¤·Ä
			for(j=0; j<pidArray.length; j++)
			{
				if(pidArray[j] != pidArray[j-1] && pidArray[j] != null)
				{
					cnt++
				}
			}		
			model.setValue("/root/main/formcnt/cnt_"+arrItem[i], cnt);
	}
	grp_formcnt.refresh();
}

function fFormCountofFominfo()
{
	var cnt = model.getXPathValue("count(/root/main/unpreplist/unpreplist)");
	var isFormcd="";
	var totFormInfo ="";
	var rowcnt = 1;
	var colcnt = 1;
	
	for (i=1; i<=cnt; i++)
	{
		var formcd = model.getValue("/root/main/unpreplist/unpreplist["+i+"]/formcd");
		var idx = isFormcd.indexOf(formcd);
		
		if ( idx == -1 )
		{			
			var formnm = model.getValue("/root/main/unpreplist/unpreplist["+i+"]/formnm");
			var subcnt = model.getXPathValue("count(/root/main/unpreplist/unpreplist[formcd='"+formcd+"'])");
			var formcnt =  "* " + formnm  + " : " + subcnt;
			
			model.setValue("/root/main/formcnt/formcnt["+rowcnt+"]/col"+colcnt, formcnt);
			
			if ( colcnt == 5 )
			{				
				rowcnt++;
				colcnt = 0;
				model.makeNode("/root/main/formcnt/formcnt["+rowcnt+"]");
				model.copyNode("/root/main/formcnt/formcnt["+rowcnt+"]", "/root/temp/formcnt");
			}
			colcnt++;
		}
		isFormcd = isFormcd + formcd + "||";
	}
	datagrid1.rebuild();
}
/*
function fGetEtcPatPamPrimaryKey(condparam)
{
	var condarray = condparam.split("¢Ë");
	
	 model.makeValue("/root/send/reqdata/pid"      , condarray[1]); //µî·Ï¹øÈ£
   model.makeValue("/root/send/reqdata/orddd"    , condarray[2]); //¼ö¼úÀÏÀÚ
   model.makeValue("/root/send/reqdata/cretno"   , condarray[3]); //»ý¼º¹øÈ£
   model.makeValue("/root/send/reqdata/instcd"   , condarray[4]); //±â°üÄÚµå
   model.makeValue("/root/send/reqdata/ioflag"   , condarray[0]); //¿Ü·¡ÀÔ¿ø±¸ºÐ
   model.makeValue("/root/send/reqdata/orddeptcd", condarray[5]); //Áýµµ°ú
   model.makeValue("/root/send/reqdata/orddrid"  , condarray[6]); //ÁýµµÀÇ
   model.makeValue("/root/send/reqdata/patflag"  , condarray[7]); //ȯÀÚ±¸ºÐ - dao sql¿¡¼­ query±¸ºÐÀÚ ¼³Á¤
   model.makeValue("/root/send/reqdata/procflag" , condarray[8]); //󸮱¸ºÐ(F:ÃÖÃÊ Á¶È¸, R:ÀçÁ¶È¸)
   model.makeValue("/root/send/reqdata/oprsrvno" , condarray[9]); //¼ö¼ú¿¹¾à¹øÈ£
   model.makeValue("/root/send/reqdata/ophistno" , condarray[10]);//¼ö¼úÀ̷¹øÈ£
   model.makeValue("/root/send/reqdata/srchdd"   , condarray[11]);//Á¶È¸ÀÏÀÚ
 
	if(submit("TRMRI01808") == true)
  {
  	var param = "";
  	var PamKeyList = findNodeset(model, "/root/main/pamkeyinfo/pamprimekey");
  	
  	if(PamKeyList.length < 1){
  		model.makeValue("/root/send/reqdata/pid"      , condarray[1]); //µî·Ï¹øÈ£
	   model.makeValue("/root/send/reqdata/orddd"    , condarray[2]); //¼ö¼úÀÏÀÚ
	   model.makeValue("/root/send/reqdata/cretno"   , condarray[3]); //»ý¼º¹øÈ£
	   model.makeValue("/root/send/reqdata/instcd"   , condarray[4]); //±â°üÄÚµå
	   model.makeValue("/root/send/reqdata/ioflag"   , condarray[0]); //¿Ü·¡ÀÔ¿ø±¸ºÐ
	   model.makeValue("/root/send/reqdata/orddeptcd", condarray[5]); //Áýµµ°ú
	   model.makeValue("/root/send/reqdata/orddrid"  , condarray[6]); //ÁýµµÀÇ
	   model.makeValue("/root/send/reqdata/patflag"  , "O"); //ȯÀÚ±¸ºÐ - dao sql¿¡¼­ query±¸ºÐÀÚ ¼³Á¤
	   model.makeValue("/root/send/reqdata/procflag" , condarray[8]); //󸮱¸ºÐ(F:ÃÖÃÊ Á¶È¸, R:ÀçÁ¶È¸)
	   model.makeValue("/root/send/reqdata/oprsrvno" , condarray[9]); //¼ö¼ú¿¹¾à¹øÈ£
	   model.makeValue("/root/send/reqdata/ophistno" , condarray[10]);//¼ö¼úÀ̷¹øÈ£
	   model.makeValue("/root/send/reqdata/srchdd"   , condarray[11]);//Á¶È¸ÀÏÀÚ
	   
	   submit("TRMRI01808");
  	}
  	
		if(PamKeyList.length > 1){	
			modal("SPMRI03200", "1","150", "150", "SPMRI03200", "/root/main/pamkeyinfo", "/root/main/result");
			
			if(getParameter("SPMRI03200_useyn") == "Y")
			{
				var SelectedPamKey = findNodeset(model, "/root/main/result/pamkeyinfo");
				for(int i = 0; i < SelectedPamKey.length; i++)
				{
					var pid = model.getValue("/root/main/result/pamkeyinfo/pid"); //µî·Ï¹øÈ£
					var orddd = model.getValue("/root/main/result/pamkeyinfo/orddd"); //¼ö¼úÀÏÀÚ
					var cretno = model.getValue("/root/main/result/pamkeyinfo/cretno"); //»ý¼º¹øÈ£
					var instcd = model.getValue("/root/main/result/pamkeyinfo/instcd"); //±â°üÄÚµå
					var ioflag = model.getValue("/root/main/result/pamkeyinfo/ioflag"); //¿Ü·¡ÀÔ¿ø±¸ºÐ
					
					if(ioflag == "I")
					{
						param = "T"       + "¢Ë" + 		// ioflag
                    pid       + "¢Ë" + 		// pid
                    orddd + "¢Ë" + 	// opcnfmdd
                    cretno    + "¢Ë" +		// cretno 
                    instcd    + "¢Ë" + 		// instcd
                    ""        + "¢Ë" + 		// perfdeptcd
                    ""        + "¢Ë" + 		// perfdrid
                    "I"       + "¢Ë" + 		// patflag
                    "F"       + "¢Ë" + 		// procflag
                    oprsrvno  + "¢Ë" + 		// oprsrvno
                    ""        + "¢Ë" +		// ophistno
                    dschdd;								// srchdd
					}
				}
					
			}
			return param;
		}
  }  
}
*/

/**
 * @---------------------------------------------------
 * @creat  : 20110503 => 20140311 ¼öÁ¤
 * @author : ÃÖ¿øµ· => ÀÌÀ±ÁÖ
 * @desc   : ¼±ÅÃȯÀÚÀÇ °ü·Ã ¹Ìºñ»ó¼¼³»¿ªÀ» Á¶È¸ÇÑ´Ù.
 * @---------------------------------------------------
 */
function callUnprepDtPopMenu()
{
	var iRow = grd_unpreplist.row - grd_unpreplist.fixedRows + 1;
	var curObj           = opener.javascript.getOpenWindow("SPMRI03800"); //È°¼ºÈ­µÈ ¹Ìºñ»ó¼¼ È­¸é object loading  
	setParameter("SPMRI03800_pid", grd_unpreplist.valueMatrix(iRow, grd_unpreplist.colRef("pid")));
	setParameter("SPMRI03800_indd", grd_unpreplist.valueMatrix(iRow, grd_unpreplist.colRef("indd")));
	
	if(curObj != null) {        //¹Ìºñ»ó¼¼ È­¸é refresh;     
    curObj.window.javascript.fInit();
    activateChild("SPMRI03800");
  } 
	else {
		open("SPMRI03800", 1, 400, 0);
	}
	
	initPopupMenu(); // Reset Right Popupmenu
	
}

/**
 * @---------------------------------------------------
 * @creat  : 20120518
 * @author : ÀÌÀ±ÁÖ
 * @desc   : ¹Ìºñ³»¿ªÀ» Á¶È¸.
 * @---------------------------------------------------
 */
function fSearchMibi()
{
	var indschflag = model.getValue("/root/main/cond/indschflag");
						
	grd_unpreplist.caption = "½Ã°£°æ°ú(h)^¹Ìºñ°ú^¹ÌºñºÐ°ú^µî·Ï¹øÈ£^ȯÀÚ¸í^Åð¿øÀÏÀÚ^Åð¿ø°ú^unprepno^Àü¹®ÀÇ^¹ÌºñÀÇ»ç^Àǻ籸ºÐ^ÀÔ¿øÀÏ^¼­½ÄÄÚµå^¼­½Ä¸í^unprepitemcd^Ç׸ñ¸í^Áø·áÀÏÀÚ^Àç¹Ìºñ^Àü´Þ»çÇ× From ÀÇ·áÁ¤º¸^Àü´Þ»çÇ× From ÀÇ»ç^¹ß»ý¹øÈ£^¼­½Ä±â·Ï¼ø¹ø^ÃÖÁ¾¼öÁ¤ÀÚ^ÃÖÁ¾¼öÁ¤ÀϽÃ^ÀÇ»çÈ®ÀÎÀϽÃ";							 
	if(indschflag == "I"){ //Àç¿ø¹ÌºñÀÎ °æ¿ì
		grd_unpreplist.caption = "½Ã°£°æ°ú(h)^¹Ìºñ°ú^¹ÌºñºÐ°ú^µî·Ï¹øÈ£^ȯÀÚ¸í^Åð¿øÀÏÀÚ^Àç¿ø°ú^unprepno^Àü¹®ÀÇ^¹ÌºñÀÇ»ç^Àǻ籸ºÐ^ÀÔ¿øÀÏ^¼­½ÄÄÚµå^¼­½Ä¸í^unprepitemcd^Ç׸ñ¸í^Áø·áÀÏÀÚ^Àç¹Ìºñ^Àü´Þ»çÇ× From ÀÇ·áÁ¤º¸^Àü´Þ»çÇ× From ÀÇ»ç^¹ß»ý¹øÈ£^¼­½Ä±â·Ï¼ø¹ø^ÃÖÁ¾¼öÁ¤ÀÚ^ÃÖÁ¾¼öÁ¤ÀϽÃ^ÀÇ»çÈ®ÀÎÀϽÃ";							 
	}else if(indschflag == "A"){ //Àüü¹ÌºñÀÎ °æ¿ì	
		grd_unpreplist.caption = "½Ã°£°æ°ú(h)^¹Ìºñ°ú^¹ÌºñºÐ°ú^µî·Ï¹øÈ£^ȯÀÚ¸í^Åð¿øÀÏÀÚ^Àç(Åð)¿ø°ú^unprepno^Àü¹®ÀÇ^¹ÌºñÀÇ»ç^Àǻ籸ºÐ^ÀÔ¿øÀÏ^¼­½ÄÄÚµå^¼­½Ä¸í^unprepitemcd^Ç׸ñ¸í^Áø·áÀÏÀÚ^Àç¹Ìºñ^Àü´Þ»çÇ× From ÀÇ·áÁ¤º¸^Àü´Þ»çÇ× From ÀÇ»ç^¹ß»ý¹øÈ£^¼­½Ä±â·Ï¼ø¹ø^ÃÖÁ¾¼öÁ¤ÀÚ^ÃÖÁ¾¼öÁ¤ÀϽÃ^ÀÇ»çÈ®ÀÎÀϽÃ";							 
	}						
	
	if(indschflag == "O"){			
		model.removeNodeset("/root/main/unpreplist/unpreplist");
		model.setFocus("rdo_inoutflag");
		model.refresh();
		return;
	}
	/* ÀÀ±Þ½Ç ¹Ìºñ ±â´É Ãß°¡·Î Remark(2009.12.21 À̳²ÀÍ)
	if(indschflag == "E"){
		model.removeNodeset("/root/main/unpreplist/unpreplist");
		model.setFocus("rdo_inoutflag");
		model.refresh();
		return;
	}
	*/
	
	if(indschflag =="A"){
		var unprepdrid = model.getValue("/root/main/cond/unprepdrid");
		var deptcd = cmb_deptcd.value;

		if(unprepdrid == "" && deptcd == "-"){
			messageBox("¹Ìºñ°ú ¶Ç´Â ¹ÌºñÀÇ»çÁß Çϳª´Â ¹Ýµå½Ã ¼±Åà ¶Ç´Â ÀÔ·ÂÇØ¾ß ÇÕ´Ï´Ù.","I003");
			if(deptcd == "-"){
				model.setFocus("cmb_deptcd");
			} else {
				model.setFocus("ipt_unprepdrnm");
			}								
			return;								
		}
	}						
	model.setValue("/root/main/cond/orderby", "");						
	fReqGetUnPrepDrClsList("N");
	
}

/**
 * @---------------------------------------------------
 * @creat  : 20120518
 * @author : ÀÌÀ±ÁÖ
 * @desc   : ½ºÅܹ̺ñ³»¿ªÀ» Á¶È¸.
 * @---------------------------------------------------
 */
 function fStaffMibi()
{
	var indschflag = model.getValue("/root/main/cond/indschflag");
	if(indschflag == "O"){
		model.removeNodeset("/root/main/unpreplist/unpreplist");
		model.setFocus("rdo_inoutflag");
		model.refresh();
		return;
	}
	
	if(indschflag == "E"){
		model.removeNodeset("/root/main/unpreplist/unpreplist");
		model.setFocus("rdo_inoutflag");
		model.refresh();
		return;
	}

	if(indschflag =="A"){
		var unprepdrid = model.getValue("/root/main/cond/unprepdrid");
		var deptcd = cmb_deptcd.value;

		if(unprepdrid == "" && deptcd == "-"){
			messageBox("¹Ìºñ°ú ¶Ç´Â ¹ÌºñÀÇ»çÁß Çϳª´Â ¹Ýµå½Ã ¼±Åà ¶Ç´Â ÀÔ·ÂÇØ¾ß ÇÕ´Ï´Ù.","I003");
			if(deptcd == "-"){
				model.setFocus("cmb_deptcd");
			} else {
				model.setFocus("ipt_unprepdrnm");
			}								
			return;								
		}
	}
	model.setValue("/root/main/cond/orderby", "");
	fReqGetUnPrepDrClsList("Y");		
}

/**===================================================================================
@desc	: ±ôºýÀÌ ±â´É
=====================================================================================*/
function fviewinfomsg(){
	window.clearInterval(gTimerID);
	gTimerID = window.setInterval("fviewinfomsg()", gIntervalTime);
	if(gTimeCnt%2 == 0){
		cap_infomsg.visible = true;
	}else{
		cap_infomsg.visible = false;
	}
	cap_infomsg.refresh();
	gTimeCnt++;
}