var sORDERBY = "desc";
var sORDERBYDTL = "";
var sSEARCHTYPE = "";
/**
 * @desc   : È­¸é ÃʱâÈ­ ¹× ³¯Â¥ set
 */
 function fInit() {
 	model.removenode("/root/send/req/hardcdno");
 	model.removenode("/root/send/req/trgtcd");
	model.makeValue("/root/send/req/hardcdno", "1001");
	model.makeValue("/root/send/req/trgtcd", getUserInfo("dutplcecd")); 	
	
 	if(submit("TRMRI03502")){	
 		if(model.getValue("/root/main/hrdcdlist/hrdcdlist/existyn")=="Y"){
 			//HardCode¿¡ Àΰ¡µÈ ºÎ¼­ÀÇ User
 			btn_req.attribute("top") = "16px";
 			caption4.attribute("top") = "10px";
 			ipt_drid.attribute("top") = "10px"; 			
 			caption12.attribute("top") = "10px"; 	
 			cmb_doctkindflag.attribute("top") = "10px"; 		
 			caption14.attribute("top") = "37px";	
 			ipt_medispclid.attribute("top") = "37px";
 			caption15.attribute("top") = "37px"; 	
 			ipt_reccosignid.attribute("top") = "37px"; 	
 			cap_reqflag.attribute("top") = "63px"; 	
 			chk_DayChk.attribute("top") = "63px"; 	
 			cmb_ddflag.attribute("top") = "63px"; 			
 			ipt_fromdd.attribute("top") = "63px"; 			
 			caption5.attribute("top") = "66px"; 		
 			ipt_todd.attribute("top") = "63px"; 				
 		} else {
 			caption10.visible=false;
 			chk_SearchPointTimeAll.visible = false;
 			chk_SearchPointTimeBefore.visible = false;
 			chk_SearchPointTimeAfter.visible = false;
 			chk_SearchPointTimeBeforeNon.visible = false;
 			chk_SearchPointTimeAfterNon.visible = false;
 			
 			btn_req.attribute("top") = "31px";
 			caption4.attribute("top") = "37px";
 			ipt_drid.attribute("top") = "37px";
 			caption12.attribute("top") = "37px";
 			cmb_doctkindflag.attribute("top") = "37px"; 	
 			caption14.attribute("top") = "63px";
 			ipt_medispclid.attribute("top") = "63px";
 			caption15.attribute("top") = "63px"; 		
 			ipt_reccosignid.attribute("top") = "63px"; 		
 			cap_reqflag.attribute("top") = "89px"; 
 			chk_DayChk.attribute("top") = "89px"; 	
 			cmb_ddflag.attribute("top") = "89px"; 	
 			ipt_fromdd.attribute("top") = "89px"; 			
 			caption5.attribute("top") = "92px"; 		
 			ipt_todd.attribute("top") = "89px"; 			 				
 		}
 		
		ipt_fromdd.value = getCurrentDate().substr(0, 8);
		ipt_todd.value = getCurrentDate().substr(0, 8);
		cmb_ddflag.select(2);
		
		ipt_fromdd.disabled = true;	
		ipt_todd.disabled = true;	
		
		cap_0000001594.visible = true;
		opt_0000001594.visible = true;
				
		model.setValue("/root/main/cond/drid", getUserId());
		model.setValue("/root/main/cond/drnm", getUserName());					
		model.setValue("/root/main/cond/fromall", "ALL");		
		model.setValue("/root/main/cond/tmppointtimebeforenon", "BEFORENON");
		//model.setValue("/root/main/cond/tmppointtimeafternon", "AFTERNON");
		
		zbcfGetKindCodeList(new Array("M0037"), new Array("M0546"), new Array("/root/init/openday"), false);
				
		fInitMainList();
		fInitMainCol();
		fInitMainCombo();		
		fInitMainFromChang("ture");//false
		fColHidden("short");
		
		btn_req.dispatch("DOMActivate"); //½ÃÁ¡¹Ìºñ Á¶È¸
		
		model.refresh();	 	
 	}
}

/**
 * @desc   : ¼­½Ä °¡Á®¿À±â
 */
function fInitMainCombo() {	
	if(submit("TRMRI03401")){	
		var nodeList = instance1.selectNodes("/root/init/rspd/form");
			
		for(var i =1; i<=nodeList.length; i++){							
			if(model.getValue("/root/init/rspd/form["+i+"]/eventcd") !="00"){							
				if(model.getValue("/root/init/rspd/form["+i+"]/eventcd") =="01" || model.getValue("/root/init/rspd/form["+i+"]/eventcd") =="02" || model.getValue("/root/init/rspd/form["+i+"]/eventcd") =="05"){		
					model.makeValue("/root/init/rspd/forminhosp["+i+"]/srcformcd", model.getValue("/root/init/rspd/form["+i+"]/srcformcd"));
					model.makeValue("/root/init/rspd/forminhosp["+i+"]/srcformnm", model.getValue("/root/init/rspd/form["+i+"]/srcformnm"));
					model.makeValue("/root/init/rspd/forminhosp["+i+"]/eventcd", model.getValue("/root/init/rspd/form["+i+"]/eventcd"));
				} else if(model.getValue("/root/init/rspd/form["+i+"]/eventcd") =="03"){		
					model.makeValue("/root/init/rspd/formop["+i+"]/srcformcd", model.getValue("/root/init/rspd/form["+i+"]/srcformcd"));
					model.makeValue("/root/init/rspd/formop["+i+"]/srcformnm", model.getValue("/root/init/rspd/form["+i+"]/srcformnm"));
					model.makeValue("/root/init/rspd/formop["+i+"]/eventcd", model.getValue("/root/init/rspd/form["+i+"]/eventcd"));
				} else if(model.getValue("/root/init/rspd/form["+i+"]/eventcd") =="04" || model.getValue("/root/init/rspd/form["+i+"]/eventcd") =="06"){		
					model.makeValue("/root/init/rspd/formdsch["+i+"]/srcformcd", model.getValue("/root/init/rspd/form["+i+"]/srcformcd"));
					model.makeValue("/root/init/rspd/formdsch["+i+"]/srcformnm", model.getValue("/root/init/rspd/form["+i+"]/srcformnm"));
					model.makeValue("/root/init/rspd/formdsch["+i+"]/eventcd", model.getValue("/root/init/rspd/form["+i+"]/eventcd"));
				}
			} 
		}		
		zbcfGetCodeList(new Array("M0501", "M0502", "M0503"), new Array("/root/init/M0501", "/root/init/M0502", "/root/init/M0503"));
				
		model.refresh();	
		model.setValue("/root/main/cond/ordddflag", "orddd");
		model.setValue("/root/main/cond/inhospformall", "Y");		
	}	
}		

/**
 * @desc   : ¼­½Ä ÀüüÀ϶§ ÀÛ¼º´ë»ç üũ
 */
function fInitMainFromChang(flag){
	rdo_orddd.disabled = flag;
	rdo_anstenddd.disabled = flag;
	rdo_dschdd.disabled = flag;
	//chk_informcd.disabled = flag;
	chk_inhospformcd.disabled = flag;
	chk_opformcd.disabled = flag;
	chk_dschformcd.disabled = flag;
	
	chk_inhospformall.disabled = flag;
	chk_opformall.disabled = flag;
	chk_dschformall.disabled = flag;	
}

/**
 * @desc   : ¸®½ºÆ® ÃʱâÈ­
 */
function fInitMainList() {
	model.resetInstanceNode("/root/main/unpreplist/unpreplist");
	model.removeNodeset("/root/main/unpreplist/unpreplist");
	
	model.refresh();	
}

/**
 * @desc   : Ä®·³ ÃʱâÈ­
 */
function fInitMainCol() {
	model.makeValue("/root/main/unpreplist/cnt/patcnt", "");
	model.makeValue("/root/main/unpreplist/cnt/reccnt", "");
	model.makeValue("/root/main/unpreplist/cnt/cnfmcmplcnt", "");	
	
	model.makeValue("/root/main/unpreplist/formcnt/cnt_0000000680", "");
	model.makeValue("/root/main/unpreplist/formcnt/cnt_0000000003", "");
	model.makeValue("/root/main/unpreplist/formcnt/cnt_0000000004", "");		
	model.makeValue("/root/main/unpreplist/formcnt/cnt_0000003169", "");
	model.makeValue("/root/main/unpreplist/formcnt/cnt_0000000676", "");	
	model.makeValue("/root/main/unpreplist/formcnt/cnt_0000001592", "");	
	model.makeValue("/root/main/unpreplist/formcnt/cnt_0800003416", "");	
	model.makeValue("/root/main/unpreplist/formcnt/cnt_0000001595", "");	
	model.makeValue("/root/main/unpreplist/formcnt/cnt_0000001596", "");	
	model.makeValue("/root/main/unpreplist/formcnt/cnt_0900007052", "");	
	model.makeValue("/root/main/unpreplist/formcnt/cnt_0000001594", "");		
	
	model.refresh();	
}

/**
 * @desc   : ¼­½Ä Àüü üũ
 */
function fFromChk(sort){		
	var dayflag = "";
	var ordddflag = model.getValue("/root/main/cond/ordddflag");						//Àç¿øÀÏ
	var anstendddflag = model.getValue("/root/main/cond/anstendddflag");			//¼ö¼úÀÏ
	var dschddflag = model.getValue("/root/main/cond/dschddflag");					//Åð¿øÀÏ	
	
	if(ordddflag == "orddd" ){
		dayflag =  ordddflag;
	} else if(anstendddflag == "anstenddd" ){
		dayflag = anstendddflag;	
	} else if(dschddflag == "dschdd" ){
		dayflag = dschddflag;	
	}	
	
	if(sort == "Y"){		
		fInitMainFromChang("ture");		
		chk_DayChk.value="N";		
	} else {	
		if(dayflag=="orddd"){	//ÀÔ¿ø, Àç¿ø		
		}else if(dayflag=="anstenddd"){	//¼ö¼ú	
			cmb_ddflag.select(3);		
		}else {		//Åð¿ø		
			cmb_ddflag.select(0);										
		}
		fInitMainFromChang("false");	
		chk_DayChk.value="Y";	
	}		
	fDayChk(chk_DayChk.value);		
	model.refresh();	
}

/**
 * @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   : Á¶È¸ 
 */
function fReqGetUnPrepDrClsList() {	
	fInitMainList();
	fInitMainCol();
	fInitGrid();
	model.removenode("/root/send/req");
	
	var dayflag = ""; 
	var deptcd = model.getValue("/root/main/cond/deptcd");						//ÀÛ¼º°ú
	var detldeptcd = model.getValue("/root/main/cond/detldeptcd");				//ÀÛ¼ººÐ°ú
	var drid = model.getValue("/root/main/cond/drid");									//ÀÛ¼ºÀÇ»ç
	var drnm = model.getValue("/root/main/cond/drnm");								//ÀÛ¼ºÀÇ»ç¸í
	var fromall = model.getValue("/root/main/cond/fromall");							//¼­½ÄÀüü	
	var informcd = model.getValue("/root/main/cond/informcd");					//ÀÔ¿øÀÏ
	
	var inhospformcd = model.getValue("/root/main/cond/inhospformcd");	//Àç¿øÀÏ
	var inhospformall = model.getValue("/root/main/cond/inhospformall");	//Àç¿øÀÏÀüü
		
	var opformcd = model.getValue("/root/main/cond/opformcd");				//¼ö¼úÀÏ
	var opformall = model.getValue("/root/main/cond/opformall");				//¼ö¼úÀÏÀüü
	
	var dschformcd = model.getValue("/root/main/cond/dschformcd");		//Åð¿øÀÏ
	var dschformall = model.getValue("/root/main/cond/dschformall");		//Åð¿øÀÏÀüü
	
	var getFormin = "/root/init/rspd/formIn";
	var getForminhosp = "/root/init/rspd/forminhosp";
	var getFormop = "/root/init/rspd/formop";
	var getFormdsch = "/root/init/rspd/formdsch";	
	var cntFormin = parseInt(model.getXPathValue( "count("+getFormin+")"));
	var cntForminhosp = parseInt(model.getXPathValue( "count("+getForminhosp+")"));
	var cntFormop = parseInt(model.getXPathValue( "count("+getFormop+")"));
	var cntFormdsch = parseInt(model.getXPathValue( "count("+getFormdsch+")"));	
	
	
	var ordddflag = model.getValue("/root/main/cond/ordddflag");						//Àç¿øÀÏ
	var anstendddflag = model.getValue("/root/main/cond/anstendddflag");			//¼ö¼úÀÏ
	var dschddflag = model.getValue("/root/main/cond/dschddflag");					//Åð¿øÀÏ	
	
	if(ordddflag == "orddd" ){
		dayflag =  ordddflag;
	} else if(anstendddflag == "anstenddd" ){
		dayflag = anstendddflag;	
	} else if(dschddflag == "dschdd" ){
		dayflag = dschddflag;	
	}
			
	if(fromall == "ALL"){
		if(deptcd.getTrim() == "" && (drid.getTrim() == "" || drnm.getTrim() == "")){
			messageBox("ÀÛ¼º°ú ¶Ç´Â ÀÛ¼ºÀÇ»ç Áß Çϳª´Â ¹Ýµå½Ã ¼±Åà ¶Ç´Â ÀÔ·ÂÀ» ÇØ Áֽʽÿä.","I003");			
			return;
		}	
	}	
		
	if(fromall != "ALL" && dayflag.getTrim() == ""){
		messageBox("¼­½Ä ÀÛ¼º´ë»óÀÏÀ» ¼±ÅÃÇϼ¼¿ä.","I003");
		if(ordddflag == "orddd" ){			
			model.setFocus("rdo_ordddflag");
		} else if(anstendddflag == "anstenddd" ){			
			model.setFocus("rdo_anstendddflag");
		} else if(dschddflag == "dschdd" ){			
			model.setFocus("rdo_dschddflag");
		}		
		return;
	} else {	
		if(fromall != "ALL"){
			 if(dayflag == "orddd"){			//Àç¿øÀÏ		
				if(inhospformcd == "" && inhospformall == ""){
					messageBox("Àç¿øÀÏ ÀÛ¼º´ë»óÀ» ¼±ÅÃÇϼ¼¿ä.","I003");
					model.setFocus("chk_inhospformcd");
					return;
				}					
				if(inhospformcd.getTrim() == ""){
					for(var i = 0; i <= cntForminhosp ; i++) {	
						inhospformcd = inhospformcd+"|" + model.getValue(getForminhosp+"[" + i + "]/srcformcd").getTrim();
					}					
				} 				
				model.makeValue("/root/send/req/srcformcd", inhospformcd.getTrim());	//¼­½ÄÄÚµå
			} else if(dayflag == "anstenddd"){		//¼ö¼úÀÏ
				if(opformcd == "" && opformall == ""){
					messageBox("¼ö¼úÀÏ ÀÛ¼º´ë»óÀ» ¼±ÅÃÇϼ¼¿ä.","I003");
					model.setFocus("chk_opformcd");
					return;
				}					
				if(opformcd.getTrim() == ""){
					for(var i = 0; i <= cntFormop ; i++) {	
						opformcd = opformcd+"|" + model.getValue(getFormop+"[" + i + "]/srcformcd").getTrim();
					}		
				}
				model.makeValue("/root/send/req/srcformcd", opformcd.getTrim());			//¼­½ÄÄÚµå
			} else if(dayflag == "dschdd"){			//Åð¿øÀÏ						
				if(dschformcd.getTrim() == ""){		
					if(dschformcd == "" && dschformall == ""){
						messageBox("Åð¿øÀÏ ÀÛ¼º´ë»óÀ» ¼±ÅÃÇϼ¼¿ä.","I003");
						model.setFocus("chk_dschformcd");
						return;
					}								
					for(var i = 0; i <= cntFormdsch ; i++) {	
						dschformcd = dschformcd+"|" + model.getValue(getFormdsch+"[" + i + "]/srcformcd").getTrim();
					}			
				}			
				model.makeValue("/root/send/req/srcformcd", dschformcd.getTrim());		//¼­½ÄÄÚµå
			}		
		}	else {	
			model.makeValue("/root/send/req/srcformcd", "");		//¼­½ÄÄÚµå
		}
	}
		
	model.makeValue("/root/send/req/dayflag", dayflag);																		//ÀÛ¼º´ë»óÀÏ
	model.makeValue("/root/send/req/recorddrid", model.getValue("/root/main/cond/drid"));				//ÀÛ¼ºÀÇ»çID
	model.makeValue("/root/send/req/medispclid", model.getValue("/root/main/cond/medispclid"));			//ÁÖÄ¡ÀÇ
	model.makeValue("/root/send/req/reccosignid", model.getValue("/root/main/cond/reccosignid"));	//ÁýµµÀÇ		
	model.makeValue("/root/send/req/ddflag", model.getValue("/root/main/cond/tmpddflag"));			//Á¶È¸±¸ºÐ(ÀÔ¿ø, Åð¿ø,Áø·á, Àç¿ø)
	model.makeValue("/root/send/req/fromdd", model.getValue("/root/main/cond/tmpfromdd"));			//³¯Â¥ from
	model.makeValue("/root/send/req/todd", model.getValue("/root/main/cond/tmptodd"));					//³¯Â¥ to
	model.makeValue("/root/send/req/btnflag", sSEARCHTYPE);															//¹ÌºñÁ¶È¸(1), ±â·ÏÀÛ¼ºÀ²(2)
	model.makeValue("/root/send/req/drflag", model.getValue("/root/main/cond/tmpdrflag"));	   			//Àǻ籸ºÐ
    model.makeValue("/root/send/req/deptcd", model.getValue("/root/main/cond/deptcd"));				//ÀÛ¼º°ú	
    model.makeValue("/root/send/req/detldeptcd", detldeptcd);															//ÀÛ¼ººÐ°ú		
	model.makeValue("/root/send/req/fromall", fromall); 																		//¼­½Ä Àüü
	model.makeValue("/root/send/req/daychk", model.getValue("/root/main/cond/daychk")); 				//³¯Â¥Á¶È¸
    
    //½ÃÁ¡±¸ºÐ
    model.makeValue("/root/send/req/timeall", model.getValue("/root/main/cond/tmppointtimeall"));
    model.makeValue("/root/send/req/timebefore", model.getValue("/root/main/cond/tmppointtimebefore"));
    model.makeValue("/root/send/req/timeafter", model.getValue("/root/main/cond/tmppointtimeafter"));
    model.makeValue("/root/send/req/timeinnon", model.getValue("/root/main/cond/tmppointtimebeforenon"));   
    model.makeValue("/root/send/req/timeoutnon", model.getValue("/root/main/cond/tmppointtimeafternon"));   
    
	model.makeValue("/root/send/req/orderby", model.getValue("/root/main/cond/tmporderbydtl"));
	
	 fGridChang();
	
	submit("TRMRI03501");
}

/**
 * @desc   : Á¶È¸½Ã Ä®·³ º¯°æ
 */
function fGridChang(){

	var anstendddflag = model.getValue("/root/main/cond/anstendddflag");			
		
	if(anstendddflag == "anstenddd"){
		//¼ö¼ú°ú, ÁýµµÀÇ ¼û±è	
		grd_unprepllist.colhidden(17) = false;
		grd_unprepllist.colhidden(18) = false;
		
	} else {
		grd_unprepllist.colhidden(17) = true;
		grd_unprepllist.colhidden(18) = true;		
	}			
}

/**
 * @desc   : ±×¸®µå ÃʱâÈ­
 */
function fInitGrid(){
	grd_unprepllist.mergeCells = "bycol";	
	grd_unprepllist.mergeCol(3) = false;	
	grd_unprepllist.mergeCol(4) = false;
	grd_unprepllist.mergeCol(5) = false;
	grd_unprepllist.mergeCol(6) = false;
	grd_unprepllist.mergeCol(7) = false;					
	grd_unprepllist.mergeCol(8) = false;
	grd_unprepllist.mergeCol(9) = false;										
	grd_unprepllist.mergeCol(10) = false;			
	grd_unprepllist.mergeCol(11) = false;				
	grd_unprepllist.mergeCol(12) = false;				
	grd_unprepllist.mergeCol(13) = false;		
	grd_unprepllist.mergeCol(14) = false;			
	grd_unprepllist.mergeCol(15) = false;		
	grd_unprepllist.mergeCol(16) = false;	
	grd_unprepllist.mergeCol(17) = false;	
	grd_unprepllist.mergeCol(18) = false;	
	grd_unprepllist.mergeCol(19) = false;		
	grd_unprepllist.mergeCol(20) = false;	
	grd_unprepllist.mergeCol(21) = false;	
	grd_unprepllist.mergeCol(22) = false;	
	grd_unprepllist.mergeCol(23) = false;	
	grd_unprepllist.mergeCol(24) = false;	
	grd_unprepllist.mergeCol(25) = false;	
	
	grd_unprepllist.merge();
}

/**
 * @desc   : ÀÛ¼ºÀÇ»ç, Á÷Á¾ ¼û±â±â Àû¿ë
 */
function fColHidden(sort){		
	if(sort == "long"){	
		grd_unprepllist.colhidden(16) = false;			
		grd_unprepllist.colhidden(21) = false;						
	} else {
		grd_unprepllist.colhidden(16) = true;			
		grd_unprepllist.colhidden(21) = true;		
	}
}

/**
 * @desc   : ¼­½Ä¸í ÀÛ¼º´ë»óÀÏ º¯°æ½Ã Á¶È¸±¸ºÐ ³¯Â¥ ±¸ºÐº¯°æ
 */
function fFormessChang(dayflag){	
	var getFormin = "/root/init/rspd/formIn";
	var getForminhosp = "/root/init/rspd/forminhosp";
	var getFormop = "/root/init/rspd/formop";
	var getFormdsch = "/root/init/rspd/formdsch";	
	var cntFormin = parseInt(model.getXPathValue( "count("+getFormin+")"));
	var cntForminhosp = parseInt(model.getXPathValue( "count("+getForminhosp+")"));
	var cntFormop = parseInt(model.getXPathValue( "count("+getFormop+")"));
	var cntFormdsch = parseInt(model.getXPathValue( "count("+getFormdsch+")"));	
	model.refresh();		
	
	if(dayflag=="orddd"){			//Àç¿ø
		rdo_anstenddd.deselect(0);
		rdo_dschdd.deselect(0);
		chk_inhospformall.select(0);			
		
		chk_opformall.deselect(0);	
		for(var i = 0; i <= cntFormop ; i++) {	
			chk_opformcd.deselect(i);
		}		
		
		chk_dschformall.deselect(0);	
		for(var i = 0; i <= cntFormdsch ; i++) {	
			chk_dschformcd.deselect(i);
		}		
		cmb_ddflag.select(2);		
	}else if(dayflag=="anstenddd"){	//¼ö¼ú	
		rdo_orddd.deselect(0);
		rdo_dschdd.deselect(0);
		chk_opformall.select(0);			
		
		chk_inhospformall.deselect(0);	
		for(var i = 0; i <= cntForminhosp ; i++) {	
			chk_inhospformcd.deselect(i);
		}	
		
		chk_dschformall.deselect(0);		
		for(var i = 0; i <= cntFormdsch ; i++) {	
			chk_dschformcd.deselect(i);
		}		
		cmb_ddflag.select(3);		
	}else if(dayflag=="dschdd"){		//Åð¿ø		
		rdo_orddd.deselect(0);
		rdo_anstenddd.deselect(0);		
		chk_dschformall.select(0);	
		
		chk_inhospformall.deselect(0);				
		for(var i = 0; i <= cntForminhosp ; i++) {	
			chk_inhospformcd.deselect(i);
		}
				
		chk_opformall.deselect(0);			
		for(var i = 0; i <= cntFormop ; i++) {	
			chk_opformcd.deselect(i);
		}		
		cmb_ddflag.select(0);										
	} else {
		chk_inhospformall.deselect(0);					
		for(var i = 0; i <= cntForminhosp ; i++) {	
			chk_inhospformcd.deselect(i);
		}		
		
		chk_opformall.deselect(0);	
		for(var i = 0; i <= cntFormop ; i++) {	
			chk_opformcd.deselect(i);
		}		
		
		chk_dschformall.deselect(0);		
		for(var i = 0; i <= cntFormdsch ; i++) {	
			chk_dschformcd.deselect(i);
		}		
	}
	
	model.refresh();	
}

/**
 * @desc   : ¼­½Ä Àüü üũ
 */
function fFormessAll(flag){	
	var formall = "";
	var getForminhosp = "/root/init/rspd/forminhosp";	
	var cntForminhosp = parseInt(model.getXPathValue( "count("+getForminhosp+")"));	
	var getFormop = "/root/init/rspd/formop";
	var cntFormop = parseInt(model.getXPathValue( "count("+getFormop+")"));
	var getFormdsch = "/root/init/rspd/formdsch";	
	var cntFormdsch = parseInt(model.getXPathValue( "count("+getFormdsch+")"));	
	
	if(flag == "I"){					//Àç¿ø		
		formall =  model.getValue("/root/main/cond/inhospformall");					
		if(formall == "Y"){
			for(var i = 0; i <= cntForminhosp ; i++) {	
				chk_inhospformcd.deselect(i);
			}	
		}
	} else if(flag == "O"){		//¼ö¼ú	
		formall = model.getValue("/root/main/cond/opformall");
		if(formall == "Y"){
			for(var i = 0; i <= cntFormop ; i++) {	
				chk_opformcd.deselect(i);
			}			
		}	
	} else if(flag == "D"){		//Åð¿ø	
		formall = model.getValue("/root/main/cond/dschformall");
		if(formall == "Y"){
			for(var i = 0; i <= cntFormdsch ; i++) {	
				chk_dschformcd.deselect(i);
			}			
		}		
	}	
	
	model.refresh();	
}

/**
 * @desc   : Àç¿øÀÏ Ã¼Å©
 */
function fChkInhospform(){	
	var dayflag = "";	
	var ordddflag = model.getValue("/root/main/cond/ordddflag");						//Àç¿øÀÏ
	var anstendddflag = model.getValue("/root/main/cond/anstendddflag");			//¼ö¼úÀÏ
	var dschddflag = model.getValue("/root/main/cond/dschddflag");					//Åð¿øÀÏ	
	
	if(ordddflag == "orddd" ){
		dayflag =  ordddflag;
	} else if(anstendddflag == "anstenddd" ){
		dayflag = anstendddflag;	
	} else if(dschddflag == "dschdd" ){
		dayflag = dschddflag;	
	}
	 model.setValue("/root/main/cond/dayflag" , dayflag);
	
	var getForminhosp = "/root/init/rspd/forminhosp";	
	var cntForminhosp = parseInt(model.getXPathValue( "count("+getForminhosp+")"));	
	var formcd = model.getValue("/root/main/cond/inhospformcd").getTrim();	
	
	if(dayflag=="orddd"){
		if(formcd.length > 0){				
			chk_inhospformall.deselect(0);		 		
	 	}
	}	

	model.refresh();		
}

/**
 * @desc   : ¼ö¼úÀÏ Ã¼Å©
 */
function fChkOpform(){
	var dayflag = "";	
	var ordddflag = model.getValue("/root/main/cond/ordddflag");						//Àç¿øÀÏ
	var anstendddflag = model.getValue("/root/main/cond/anstendddflag");			//¼ö¼úÀÏ
	var dschddflag = model.getValue("/root/main/cond/dschddflag");					//Åð¿øÀÏ	
	
	if(ordddflag == "orddd" ){
		dayflag =  ordddflag;
	} else if(anstendddflag == "anstenddd" ){
		dayflag = anstendddflag;	
	} else if(dschddflag == "dschdd" ){
		dayflag = dschddflag;	
	}
	 model.setValue("/root/main/cond/dayflag" , dayflag);
	 
	var getFormop = "/root/init/rspd/formop";
	var cntFormop = parseInt(model.getXPathValue( "count("+getFormop+")"));
	var formcd = model.getValue("/root/main/cond/opformcd").getTrim();	
		
	if(dayflag=="anstenddd"){
		if(formcd.length > 0){				
			chk_opformall.deselect(0);		 		
	 	}
	}	
	
	model.refresh();		
}

/**
 * @desc   : Åð¿øÀÏ Ã¼Å©
 */
function fChkDschform(){
	var dayflag = "";	
	var ordddflag = model.getValue("/root/main/cond/ordddflag");						//Àç¿øÀÏ
	var anstendddflag = model.getValue("/root/main/cond/anstendddflag");			//¼ö¼úÀÏ
	var dschddflag = model.getValue("/root/main/cond/dschddflag");					//Åð¿øÀÏ	
	
	if(ordddflag == "orddd" ){
		dayflag =  ordddflag;
	} else if(anstendddflag == "anstenddd" ){
		dayflag = anstendddflag;	
	} else if(dschddflag == "dschdd" ){
		dayflag = dschddflag;	
	}
	 model.setValue("/root/main/cond/dayflag" , dayflag);
	 
	var getFormdsch = "/root/init/rspd/formdsch";	
	var cntFormdsch = parseInt(model.getXPathValue( "count("+getFormdsch+")"));	
	var formcd = model.getValue("/root/main/cond/dschformcd").getTrim();	
	
	if(dayflag=="dschdd"){
		if(formcd.length > 0){				
			chk_dschformall.deselect(0);		 		
	 	}
	}
	
	model.refresh();		
}

/**
 * @desc   : ½ÃÁ¡ ±¸ºÐüũ
 */
function fTimepointChk(value){
    var all = model.getValue("/root/main/cond/tmppointtimeall");
	var before = model.getValue("/root/main/cond/tmppointtimebefore");
	var after = model.getValue("/root/main/cond/tmppointtimeafter");
	var beforenon = model.getValue("/root/main/cond/tmppointtimebeforenon");
	var afternon = model.getValue("/root/main/cond/tmppointtimeafternon");
	
	if(value == "ALL"){
		chk_SearchPointTimeBefore.deselect(0);
		chk_SearchPointTimeAfter.deselect(0);
		chk_SearchPointTimeBeforeNon.deselect(0);
		chk_SearchPointTimeAfterNon.deselect(0);
	} else {
		if(all == "" && before == "" && after == "" && beforenon == "" &&  afternon == ""){
			chk_SearchPointTimeAll.select(0);
		} else {
			chk_SearchPointTimeAll.deselect(0);
		}
	}
}

/**
 * @desc ³¯Â¥Á¶È¸ üũ
 */
function fDayChk(chk){	
	if(chk == "Y"){
		ipt_fromdd.disabled = false;	
		ipt_todd.disabled = false;	
	} else {
		ipt_fromdd.disabled = true;	
		ipt_todd.disabled = true;	
	}
}

/**
 * @desc ¹Ìºñ±â·Ï load
 */
function fLoadUnPrepRec(){
	
    var currow     = grd_unprepllist.row;
    var pid        = model.getValue("/root/main/unpreplist/unpreplist["+ currow +"]/pid");
    var indd       = model.getValue("/root/main/unpreplist/unpreplist["+ currow +"]/orddd");
    var cretno     = model.getValue("/root/main/unpreplist/unpreplist["+ currow +"]/cretno");//»ý¼º¹øÈ£    
    var formcd     = model.getValue("/root/main/unpreplist/unpreplist["+ currow +"]/formcd");
    var srcformcd  = model.getValue("/root/main/unpreplist/unpreplist["+ currow +"]/srcformcd");
    var formrecdd  = model.getValue("/root/main/unpreplist/unpreplist["+ currow +"]/orddt");//Áø·áÀÏÀÚ
    var dschdd     = model.getValue("/root/main/unpreplist/unpreplist["+ currow +"]/dschdt");
    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 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");//Áø·áÇüÅÂ(pmihinpt) 
    
    formrecdd =  formrecdd.substr(0,8);
    if(formrecdd <= preopendd){
        messageBox(preOpenMonth+"¿ù "+preOpenDay+"ÀϱîÁö ¹ß»ýµÈ ¹Ìºñ±â·ÏÀº ±¸OCSÇÁ·Î±×·¥°ú Á¾ÀÌ¿¡ ÀÛ¼º", "I008");
        return;
    }
    
    //ÀÛ¼º¹ÌºñµÈ ±â·ÏÀÎ °æ¿ì, formrecseq°ªÀ» »èÁ¦ÇÔ
    if(formrecseq == -1){
        formrecseq = "";
    }
       
        
    // 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 
    if(srcformcd == "0000000676" || srcformcd == "0000003169"){
/*	      
        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");
    model.refresh();
}

/**
 * @desc   : Number üũ
 */
function isNumber(str) {
	str += '';
	str = str.replace(/^\s*|\s*$/g, '');
	if (str == '' || isNaN(str)){
		return "N";
	}
	return "Y";
}

/**
 * @desc   : ¿¢¼¿ ÀúÀå
 */
function fSaveExcel(){
    var fileName = window.fileDialog("save", ",", false, "excel", "xls", "Excel Files(*.xls)|*.xls|All Files (*.*)|*.*");
    if (fileName != ""){	
        grd_unprepllist.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");
}