/**
 * @desc   : Source NodeÀÇ °¹¼ö¸¦ ±¸ÇÑ´Ù.
 * @
 * @param  : path  -  node path
 * @return : 
 * @authur : ±è¼±Å 2007. 5. 8
 * @---------------------------------------------------
 */
function getNodeSetCnt(path)
{
	var insXml = model.instances(0);
	var nodeList = insXml.selectNodes(path);
	return nodeList.length;
}


/**
 * @desc   : Source NodeÀÇ child nodelist¸¦ DestinationÀÇ nodelist·Î appendÇÑ´Ù.
 *           
 * @param  : strDest  -  µµÂønode path
 *         : strSrc   -  Ãâ¹ßnode path
 * @return : 
 * @authur : ÀÌ»óÇö 2007. 3. 27
 * @---------------------------------------------------
 */
function addCopyNodeset(strDest, strSrc, mode, destModel, srcModel) {

	if( destModel == null || destModel =="" )
		destModel = document.models.item(0);
		
	if( srcModel == null || srcModel =="" )
		srcModel = document.models.item(0);
		
	var srcNodeList = srcModel.instances(0).selectNodes(strSrc);
	var srcNode;
		
	var pDestNode = destModel.instances.item(0).selectSingleNode(strDest).parentNode;
	
	if( mode == "replace" || mode == null ) {	
		destModel.removeNodeset(strDest);
		while( srcNode = srcNodeList.nextNode() ) {
			pDestNode.appendChild(srcNode.cloneNode(true));
		}
	}
	
	else if( mode == "after" ) {
		while( srcNode = srcNodeList.nextNode() ) {
			pDestNode.appendChild(srcNode.cloneNode(true));
		}
	}
	
	else if( mode == "before" ) {	
		var destNode;				
		for( var i = srcNodeList.length - 1; i >= 0; i-- ) {
			destNode = destModel.instances.item(0).selectSingleNode(strDest + "[1]");
			pDestNode.insertBefore(srcNodeList.item(i).cloneNode(true), destNode);
		}
	}
}

/**
 * @desc : »ç¿ëÀÚÀÇ ±ÇÇÑÀ» üũÇÏ¿© ¹öÆ°¼ÂÆÃ.
 *         btn_r Á¶È¸¹öÆ°, btn_x ÀúÀå ¹× ¼öÁ¤ ¹öÆ°, btn_p : Ãâ·Â¹öÆ°
 * @return : 
 * @authur : ±è¼±Å 2007. 5. 8
 */
function fchkAuth()
{
			
	for(var i=0; i<= document.controls.length-1 ; i++){
			if(document.controls.item(i).elementName == "xforms:button"){
				if(document.controls.item(i).attribute("id").substr(0,6) == "btn_r_"){
					document.controls.item(i).disabled = !checkAuth("R");	
				}
				
				if(document.controls.item(i).attribute("id").substr(0,6) == "btn_x_"){
					document.controls.item(i).disabled = !checkAuth("X");	
				}
				
				if(document.controls.item(i).attribute("id").substr(0,6) == "btn_p_"){
					document.controls.item(i).disabled = !checkAuth("P");	
				}
			
			}
		}	

}



/**
 * @desc   : ÆûÃʱâÈ­
 * @
 * @param  : 
 * @return :
 * @authur : ÀÌÀº¿µ 2008.03.18
 * @---------------------------------------------------
 */
function fFormInit()
{
		// KNUH_20101207_¹Ú¼ºÈ£_start_Àǹ«±â·Ï ºÎ¼­ÄÚµå °¡Á®¿À±â
		mmbfGetHardCodeInfo("/root/send/reqdata", "/root/temp/basedeptcd", 5501);	
		mmbfGetHardCodeInfo("/root/send/reqdata", "/root/temp/appdeptcd", 5503);	
		
		var basedeptcd = model.getValue("/root/temp/basedeptcd/hardcd/hardcd");
		var appdeptcd = model.getValue("/root/temp/appdeptcd/hardcd/hardcd");
		//alert(basedeptcd + "     " + appdeptcd);
		// KNUH_20101207_¹Ú¼ºÈ£_end
		
		model.setValue("/root/main/condition/basedeptcd", basedeptcd);
		model.setValue("/root/main/condition/appdeptcd", appdeptcd);


		// »ó´ÜȯÀÚÁ¤º¸ °¡Á®¿À±â..
		var node = getGlobalVariable("paminfo");
		model.removeNodeset("/root/main/result/paminfo/list");
		setCSVToNode("/root/main/result/paminfo", node);	
		// ȯÀÚµî·Ï¹øÈ£	    
		var pid		= model.getValue("/root/main/result/paminfo/list/pid");	  
		var pnm		= model.getValue("/root/main/result/paminfo/list/hngnm");
		var indd	= model.getValue("/root/main/result/paminfo/list/indd");	  
		var cretno	= model.getValue("/root/main/result/paminfo/list/cretno");		    
		var wardcd	= model.getValue("/root/main/result/paminfo/list/wardcd");	  
		var roomcd	= model.getValue("/root/main/result/paminfo/list/roomcd");	
		model.makeValue("/root/main/condition/pid"   , pid);    
		model.makeValue("/root/main/condition/pnm"   , pnm);
		model.makeValue("/root/main/condition/indd"  , indd);    
		model.makeValue("/root/main/condition/cretno", cretno);
		model.makeValue("/root/main/condition/wardcd", wardcd);
		model.makeValue("/root/main/condition/roomcd", roomcd);
		model.refresh();

		if (pid == ""){
			alert("»ó´ÜÀÇ È¯ÀÚÁ¤º¸°¡ ¾ø½À´Ï´Ù");
			window.close();
			return;
		}

		if (isPopup() == true) {
			// 2008.01.08. ÆĶó¸ÞÅÍ·Î ÀÔ¿ø º´µ¿ÄÚµå,º´½ÇÄÚµå ¸¦ ¹Þ´Â´Ù..(ÀÀ±Þ½Ç¿¡¼­..)
			// ÀÔ¿ø º´µ¿ÄÚµå,º´½ÇÄÚµå 
			var pid		 = opener.javascript.getParameter("pid");
			var inwardcd = opener.javascript.getParameter("inwardcd");
			var inroomcd = opener.javascript.getParameter("inroomcd");
			if (pid.length > 0){
				model.makeValue("/root/main/condition/pid"   , pid);
				model.makeValue("/root/main/condition/wardcd", inwardcd);
				model.makeValue("/root/main/condition/roomcd", inroomcd);
				model.makeValue("/root/hidden/param/pid"	 , pid);
				model.makeValue("/root/hidden/param/inwardcd", inwardcd);
				model.makeValue("/root/hidden/param/inroomcd", inroomcd);
				model.refresh();
			}
		}

		// º´µ¿Á¶È¸Çϱâ..
		mmbfGetDeptCodeComboList("/root/send/reqdata", "/root/init/wardlist", "W"); //º´µ¿ÄÚµå ÄÞº¸
		// º´½ÇÁ¶È¸Çϱâ..
		fSelectWard();	
		
		// íƮÁ¶È¸Çϱâ..
		fGetERLendChrtList();
}

/**
 * @desc   : º´µ¿¿¡ º´½Ç °¡Á®¿À±â
 * @
 * @param  : 
 * @return :
 * @authur : ÀÌÀº¿µ 2008.03.18
 * @---------------------------------------------------
 */
function fSelectWard()
{
		model.makeValue("/root/send/reqdata/wardcd", model.getValue("/root/main/condition/wardcd"));
		submit("TRMRC00051");
}

/**
 * @desc   : ÀÀ±Þ½Ç¿¡¼­ ´ëÃâÇÑ Ã­Æ® ¸®½ºÆ® Á¶È¸Çϱâ
 * @
 * @param  : 
 * @return :
 * @authur : ÀÌÀº¿µ 2008.03.18
 * @---------------------------------------------------
 */
function fGetERLendChrtList()
{
		var pid = model.getValue("/root/main/condition/pid");
		var appdeptcd = model.getValue("/root/main/condition/appdeptcd");
		model.makeValue("/root/send/reqdata/pid", pid);
		model.makeValue("/root/send/reqdata/appdeptcd", appdeptcd);
		model.refresh();
		
		if (pid.length > 0)	{		
			submit("TRMRC02301");
		}
}

/**
 * @desc   : íƮÀÌ°ü
 * @
 * @param  : 
 * @return :
 * @authur : ÀÌÀº¿µ 2008.03.18
 * @---------------------------------------------------
 */
function fSendChrt()
{
		var ref = "/root/main/lendchrt/chrtlist";
		var cnt = getNodeSetCnt(ref);
		var grdObj = grd_chrtlist;

   		var savedata = "status¢Ëchrtseqno¢Ëmedirecno¢Ëpid¢Ërtndeptcd¢Ërtnmanid¢Ëindd¢Ëcretno¢Ëwardcd¢Ëroomcd¢Ëbasedeptcd¢Ì";
		var dataString = "";
		var dataCount = 0;

		var rtndeptcd	= getUserInfo("dutplcecd");
		var rtnmanid	= getUserInfo("userid");
		var indd		= model.getValue("/root/main/condition/indd");
		var cretno		= model.getValue("/root/main/condition/cretno");
		var wardcd		= model.getValue("/root/main/condition/wardcd");
		var roomcd		= model.getValue("/root/main/condition/roomcd");
		var basedeptcd	= model.getValue("/root/main/condition/basedeptcd");

		if (wardcd == "") {
			alert("º¸³¾º´µ¿À» ¼±ÅÃÇϼ¼¿ä."); return;
		}
		if (roomcd == "") {
			alert("º¸³¾º´½ÇÀ» ¼±ÅÃÇϼ¼¿ä"); return;
		}

		for ( var i = 1; i <= cnt; i++)
		{				
			var checked		= model.getValue(ref + "[" + i + "]/checked");
			var chrtseqno	= model.getValue(ref + "[" + i + "]/chrtseqno");
			var medirecno	= model.getValue(ref + "[" + i + "]/medirecno");
			var pid			= model.getValue(ref + "[" + i + "]/pid");
			if (checked == "true" && medirecno != "")
			{
				dataString = dataString + "u¢Ë" + chrtseqno + "¢Ë" + medirecno + "¢Ë" + pid + "¢Ë";
				dataString = dataString + rtndeptcd + "¢Ë" + rtnmanid + "¢Ë" + indd + "¢Ë" + cretno + "¢Ë" + wardcd + "¢Ë" + roomcd + "¢Ë" + basedeptcd + "¢Ì";
				dataCount = dataCount + 1;
			}
		}
		
		if (dataString.length > 0)
		{
			model.makeValue("/root/send/savedata", savedata + dataString);
			submit("TXMRC02301");

			alert("ÃÑ " + dataCount + " °Ç íƮÀÌ°ü µÇ¾ú½À´Ï´Ù.");

			// ´Ù½Ã Á¶È¸Çϱâ..
			submit("TRMRC02301");
		}
}


/**
 * @desc   : ȯÀÚµî·Ï¹øÈ£ Á¶È¸ Æ˾÷
 * @
 * @param  : refPid - ȯÀÚ¹øÈ£ node path 
 * @         refPnm - ȯÀÚ¸í   node path
 * @return :
 * @authur : ÀÌÀº¿µ 2008.03.18
 * @---------------------------------------------------
 */
function fGetPid(refPid, refPnm)
{
		//Á¶È¸°Ç¼ö°¡ 1°ÇÀÏ °æ¿ì Æ˾÷âÀ» ¹Ù·Î ´Ý´Â´Ù.
		model.setValue("/root/hidden/tmp/pidpopupinfo/checkfnexam", "1");
		model.setValue("/root/hidden/tmp/pidpopupinfo/autoflag", "N");
		if( model.getValue("/root/hidden/tmp/pidpopupinfo/srchcond") == '' ){
			model.setValue("/root/hidden/tmp/pidpopupinfo/srchcond", '2');	
		}
		
		modal("SPPMC02500", "1","150", "150", "SPPMC02500", "/root/hidden/tmp/pidpopupinfo", "/root/send");
		model.resetInstanceNode("/root/source");
		//ȯÀÚ¹øÈ£ copy
		var popupendflag = model.getValue("/root/main/popupendflag");
		
		if (popupendflag == "ok")
		{
			model.setValue(refPid, model.getValue("/root/main/patinfo/patinfolist/pid"));
			if (refPnm != null || refPnm != "") {
			model.setValue(refPnm, model.getValue("/root/main/patinfo/patinfolist/hngnm"));
			}
			model.refresh();
		}	
}



/**
 * @desc   : µî·ÏµÈ ȯÀÚ¹øÈ£ÀÎÁö üŷÇÑ´Ù..
 * @
 * @param  : iptObj - ȯÀÚ¹øÈ£ ÀÔ·Â ÄÁÆ®·Ñ
 * @return : pnm
 * @authur : ÀÌÀº¿µ 2008.03.18
 * @---------------------------------------------------
 */
function fCheckPid(iptObj)
{
		setInputNodeCurText();

		model.makeValue("/root/send/reqdata/srchcond", "1");
		model.makeValue("/root/send/reqdata/pid", iptObj.currentText);
		
		//ȯÀÚµî·Ï¹øÈ£ üũ
		if(iptObj.currentText.length > 0 ){
			
			model.resetInstanceNode("/root/main/result/patinfo");
			model.makeNode("/root/main/result/patinfo");
					
			if(submit("TRPMC02500")){
				//fSearch´Â ÀÎÀû»çÇ× È­¸éÀ» ÀÓÆ÷Æ® ÇØ°£ È­¸é¿¡¼­ ±¸ÇöÇØ ÁÖ¾î¾ß ÇÏ´Â ÇÔ¼öÀÌ´Ù.	
				if( getNodesetCount("/root/main/result/patinfo/patinfolist") > 0 ){
					model.copyNode("/root/main/patinfo", "/root/main/result/patinfo");
																	
					var pid = model.getValue("/root/main/result/patinfo/patinfolist/pid");
					var pnm = model.getValue("/root/main/result/patinfo/patinfolist/hngnm");
					
					return pnm;
					
					//fSearch();	
				}else{
					model.resetInstanceNode("/root/main/patinfo/patinfolist");
					messageBox("¾ø´Â ȯÀÚ ¹øÈ£ ÀÔ´Ï´Ù.", "E999", "");
					model.refresh();
				}								
			}	
				
		}else{
			messageBox("ȯÀÚµî·Ï¹øÈ£¸¦ Á¤È®È÷", "C001");
		}		
		return "";
}


/**
 * @desc   : ÇϵåÄÚµå Á¶È¸
 * @
 * @param  : ref      - reference path
 *           rsltref  - result reference path
 *           hardcd   - ÇϵåÄÚµå
 * @return :
 * @author : ¿ÀÁöÈÆ
 * @---------------------------------------------------
 */
function mmbfGetHardCodeInfo(ref, rsltref, hardcd){
    var mmb_rsltref = "/root/hidden/mmb/hardcd";
    model.removeNode(mmb_rsltref);
    model.makeNode(mmb_rsltref);
    model.removeNode(ref);
    model.makeValue(ref + "/hardcd", hardcd);
    if(submit("TRMMB04103", "false", ref, mmb_rsltref)==true){
        model.copyNode(rsltref, mmb_rsltref);
        model.removeNode(mmb_rsltref);
    }
    model.refresh();
}