/*
  
      °£È£ÀÏÁöŸÀÔII_ºÎ¼­º°SET Á¶È¸ (SMMNR03700.xfm - JScript )

      - Version :
          1)  : Ver.1.00.01 
*/
var xGrupInfoPath = "/root/main/grupinfo/gruplist";	// ±×·ì °æ·Î
var xStmtSetListPath = "/root/main/stmtsetinfo/stmtsetlist";	// ±×·ìº° Áø¼ú¹® °æ·Î
var xSelectedStmtListPath = "/root/main/selectedstmtinfo/stmtlist";	// ¼±ÅÃµÈ Áø¼ú¹® °æ·Î

var xNStmtSetListPath = "/root/main/stmtsetinfo/nstmtsetlist";	// 20080621 ±èÈ«Á¡ SET Áø¼ú¹® Á¤º¸
var xDStmtSetListPath = "/root/main/stmtsetinfo/dstmtsetlist";	// 20080621 ±èÈ«Á¡ SET Áø¼ú¹® Á¤º¸
var xAStmtSetListPath = "/root/main/stmtsetinfo/astmtsetlist";	// 20080621 ±èÈ«Á¡ SET Áø¼ú¹® Á¤º¸
var xRStmtSetListPath = "/root/main/stmtsetinfo/rstmtsetlist";	// 20080621 ±èÈ«Á¡ SET Áø¼ú¹® Á¤º¸

var xHiddenGrupInfoPath = "/root/hidden/grupinfo/gruplist"; //20080621 ±èÈ«Á¡ Ãß°¡ set±×·ì hidden

var xLrgGrupInfoPath = "/root/main/grupinfo/lrggruplist" ;//20080621 ±èÈ«Á¡ Ãß°¡ set±×·ì
var xMdlGrupInfoPath = "/root/main/grupinfo/mdlgruplist" ;//20080621 ±èÈ«Á¡ Ãß°¡ set±×·ì
var xSmlGrupInfoPath = "/root/main/grupinfo/smlgruplist" ;//20080621 ±èÈ«Á¡ Ãß°¡ set±×·ì
var xSmlGrupInfoPath2 = "/root/main/grupinfo/smlgruplist2" ;//20080621 ±èÈ«Á¡ Ãß°¡ set±×·ì

var gReturnGrupcd = "";
var gGrupFlag="";

/**
 * @group  :
 * @ver    : 2007.06.20
 * @by     : ÀÌÀº¿µ
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : È­¸é ÃʱâÈ­
 * @param  :
 * @return :
 * @---------------------------------------------------
 */ 
function fInitialize(){
	
	grd_nursingd.fixedcellcheckbox(0, grd_nursingd.colRef("check")) = true;
	grd_data.fixedcellcheckbox(0, grd_data.colRef("check")) = true;
	grd_action.fixedcellcheckbox(0, grd_action.colRef("check")) = true;
	grd_result.fixedcellcheckbox(0, grd_result.colRef("check")) = true;
	
	var sDeptcd = opener.javascript.getParameter("SPMNR03700_Param");	// ºÎ¼­ÄÚµå
	opener.javascript.setParameter("SPMNR03700_Return","");	
	model.makeValue("/root/send/deptcd", sDeptcd);	// ºÎ¼­ÄÚµå
	model.makeValue("/root/send/grupflag", "1");	// ±×·ì±¸ºÐ
	model.removenodeset(xStmtSetListPath);
	model.removenodeset(xSelectedStmtListPath);
	fSettingLrgMdlSml("A",grd_lrg,xLrgGrupInfoPath);	// SET ±×·ì Á¤º¸ Á¶È¸

//	if(submit("TRMNR03701")){
//		var sRowCnt = grd_grupinfo.rows-grd_grupinfo.fixedRows;			
//				
//		for(var i=1; i<=sRowCnt; i++){
//			sDepth = eval(model.getValue(xGrupInfoPath+"["+i+"]/depth"));
//			grd_grupinfo.outlinelevel(i)=sDepth;						
//		}
//		grd_grupinfo.OutlineCol=1;	//¿¬°á¼±ÀÌ Ç¥ÇöµÇ´Â Ä÷³
//		grd_grupinfo.OutlineBar=4;	//¿¬°á¼± ÇüÅ ¼³Á¤ (+ , - , »ç°¢Çü ¾Èº¸ÀÌ°Ô ÇÏ·Á¸é 0 À¸·Î ¼¼ÆÃ)
//		grd_grupinfo.TreeColor="gray";	
//		// ÀÚ½Ä Á¢±â 
//		for(var i=1; i<=sRowCnt; i++){
//			sDepth = eval(model.getValue(xGrupInfoPath+"["+i+"]/depth"));
//			if(sDepth>2){
//				grd_grupinfo.iscollapsed(i)=true;	//ÀÚ½Ä Æ®¸® Á¢±â
//			}			
//		}	
//	}
	
}
/**
 * @group  :
 * @ver    : 2007.06.20
 * @by     : ÀÌÀº¿µ
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : SETº° Áø¼ú¹® Á¤º¸¸¦ Á¶È¸
 * @param  :
 * @return :
 * @---------------------------------------------------
 */ 
//function fSearchStmtSetList(){
//	var iGrupRow = grd_grupinfo.row;
//	if(iGrupRow < 1) return;
//	// ÀÚ½Ä Á¢±â or ÆîÄ¡±â
//	sDepth = eval(model.getValue(xGrupInfoPath+"["+iGrupRow+"]/depth"));
//	if(sDepth < 4){
//		sRowCnt = grd_grupinfo.rows - grd_grupinfo.fixedrows;
//		if(grd_grupinfo.iscollapsed(iGrupRow) == true){
//			sBoolStatus = false;
//		}else{
//			sBoolStatus = true;
//		}
//	
//		for(var i=iGrupRow; i<=sRowCnt; i++){
//			iDepth = eval(model.getValue(xGrupInfoPath+"["+i+"]/depth"));
//			if(i==iGrupRow){
//				grd_grupinfo.iscollapsed(i) = sBoolStatus; 
//			}else if(i != iGrupRow && sDepth < iDepth){
//				grd_grupinfo.iscollapsed(i) = sBoolStatus; 
//			}else{
//				break;
//			}
//		}		
//	}
//	model.removenode("/root/send");
//	model.makeValue("/root/send/grupcd", model.getValue(xGrupInfoPath+"["+iGrupRow+"]/grupcd"));
//	model.makeValue("/root/send/dnarflag", "%");
//	if(submit("TRMNR03702")){
//		grd_grupstmtinfo.mergecells = "bycol";
//		grd_grupstmtinfo.mergecol(2) = false;
//		grd_grupstmtinfo.mergecol(3) = false;
//		grd_grupstmtinfo.allstyle("data","color") = "#000000";					
//		for(var iRow=grd_grupstmtinfo.fixedrows; iRow<=grd_grupstmtinfo.rows-grd_grupstmtinfo.fixedrows; iRow++){
//			if(eval(model.getValue(xStmtSetListPath+"["+iRow+"]/attrcnt"))>0){
//				grd_grupstmtinfo.cellstyle("color",iRow,3) = "#33CC33";	//  ³ì»ö
//			}
//		}
//		grd_grupstmtinfo.resizeCells();
//	}
//}

/**
 * @group  :
 * @ver    : 2007.06.20
 * @by     : ÀÌÀº¿µ
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : SETº° Áø¼ú¹® Á¤º¸¸¦ ¼±ÅÃ
 * @param  :
 * @return :
 * @---------------------------------------------------
 */ 
function fClickedGridRow(pObj, pListPath, pRow, pCol){
		var iRow = pRow;	
		var iCol = pCol;
		
		if(iRow < 1 || iRow > pObj.rows) return;
		if(iCol != pObj.colRef("check")) {
    		if(model.getValue(pListPath+"["+iRow+"]/check") == "true"){							
    			model.setValue(pListPath+"["+iRow+"]/check","false");
    		}else{
    			model.setValue(pListPath+"["+iRow+"]/check","true");				
    		}
	    }

		if( pObj == grd_nursingd ){
		    fSettingGridBackColorNew(pRow);
	    }
}

/**
 * @group  :
 * @ver    : 2007.06.20
 * @by     : ÀÌÀº¿µ
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : Áø¼ú¹® º¸³»±â
 * @param  :
 * @return :
 * @---------------------------------------------------
 */ 
 
function fSendStmtInfo(){
	var sStmtCnt = grd_stmtinfo.rows - grd_stmtinfo.fixedrows;	
	var xAttrInfo = "/root/init/recinfo/attrinfo";				// openerÀÇ ¼Ó¼º °æ·Î
	var xSelectedAttrInfo = "/root/main/attrlist/attrinfo";		// ¼±ÅÃµÈ Áø¼ú¹®ÀÇ ¼Ó¼º °æ·Î
	var sAttrCnt = 0;
	var sSelectedAttrCnt = 0;
	var sAttrInfo = "";
	var sStmtInfo = "grupcd¢Ëgrupnm¢Ëstmtcd¢Ëstmtcnts¢Ëattrinfo1¢Ëattrinfo2¢Ëattressnyn¢Ëdnarflag¢Ëattrcnt¢Ëdiagstmtcd¢Ì";
	model.removenode("/root/send");
	model.makeNode("/root/send/attrinfo");
	
	for(var i=grd_stmtinfo.fixedrows; i<=sStmtCnt; i++){		
		sAttrInfo = model.getValue(xSelectedStmtListPath+"["+i+"]/attrinfo1").split("¢Á");							
		sStmtInfo += model.getValue(xSelectedStmtListPath+"["+i+"]/grupcd") + "¢Ë"
					+ model.getValue(xSelectedStmtListPath+"["+i+"]/grupnm") + "¢Ë"
					+ model.getValue(xSelectedStmtListPath+"["+i+"]/stmtcd") + "¢Ë"
					+ model.getValue(xSelectedStmtListPath+"["+i+"]/stmtcnts") + "¢Ë"
					+ model.getValue(xSelectedStmtListPath+"["+i+"]/attrinfo1") + "¢Ë"
					+ model.getValue(xSelectedStmtListPath+"["+i+"]/attrinfo2") + "¢Ë"
					+ model.getValue(xSelectedStmtListPath+"["+i+"]/attressnyn") + "¢Ë"
					+ model.getValue(xSelectedStmtListPath+"["+i+"]/dnarflag") + "¢Ë"
					+ model.getValue(xSelectedStmtListPath+"["+i+"]/attrcnt") + "¢Ë"
					+ model.getValue(xSelectedStmtListPath+"["+i+"]/diagstmtcd") + "¢Ì"

		// ¹®Àå ³»ÀÇ ¼Ó¼º °¡Á®¿À±â		
		for(var j=0; j<sAttrInfo.length-1; j++){
			// °£È£ÀÏÁöŸÀÔII¿¡ ¼Ó¼ºÀÌ Á¸ÀçÇÏ´ÂÁö À¯¹«¸¦ üũ
			
			if(opener.model.getValue(xAttrInfo+"[attrcd = '"+sAttrInfo[j]+"']/attrcd") != "") continue;
			
			if(fExistAttrCd(sAttrInfo[j]) == "Y") continue;
			
			sSendData = model.getValue("/root/send/attrinfo");
			if(sSendData != "")  sSendData += ",";
			sSendData += sAttrInfo[j];
			model.setValue("/root/send/attrinfo", sSendData);
			
		}
	}
	
	if(model.getValue("/root/send/attrinfo") != ""){
		if(submit("TRMNR03703")){
			sAttrCnt = getNodesetCnt(opener.model,xAttrInfo)+1;
			sSelectedAttrCnt = getNodesetCnt(model, xSelectedAttrInfo);
			for(var iRow = 1; iRow <= sSelectedAttrCnt; iRow++){
				opener.model.makeValue(xAttrInfo+"["+sAttrCnt+"]/attrcd", model.getValue(xSelectedAttrInfo+"["+iRow+"]/attrcd"));
			    opener.model.makeValue(xAttrInfo+"["+sAttrCnt+"]/attrnm", model.getValue(xSelectedAttrInfo+"["+iRow+"]/attrnm"));
			    opener.model.makeValue(xAttrInfo+"["+sAttrCnt+"]/attrflag", model.getValue(xSelectedAttrInfo+"["+iRow+"]/attrflag"));
			    opener.model.makeValue(xAttrInfo+"["+sAttrCnt+"]/supcd", model.getValue(xSelectedAttrInfo+"["+iRow+"]/supcd"));
			    opener.model.makeValue(xAttrInfo+"["+sAttrCnt+"]/unitnm", model.getValue(xSelectedAttrInfo+"["+iRow+"]/unitnm"));
			    opener.model.makeValue(xAttrInfo+"["+sAttrCnt+"]/plnumchoiyn", model.getValue(xSelectedAttrInfo+"["+iRow+"]/plnumchoiyn"));			    
			    sAttrCnt++;
			}			 
		}    
	}
	opener.javascript.setParameter("SPMNR03700_Return", sStmtInfo);
	model.close();
}            
			                                                    

/**
 * @group  :
 * @ver    : 2007.04.25
 * @by     : ÀÌÀº¿µ
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : °¡Á®¿Ã µ¥ÀÌÅÍÀÇ ¼Ó¼º ÄÚµå Á¸Àç À¯¹« check 
 * @param  :
 * @return :
 * @---------------------------------------------------
 */ 
function fExistAttrCd(pAttrCD){
	var sAttrInfo = model.getValue("/root/send/attrinfo").split(",");	
	for(var i=0; i<sAttrInfo.length; i++){
		if(sAttrInfo[i]	== pAttrCD){
			return "Y";
		}
	}
	return "N";
}

/**
 * @group  :
 * @ver    : 2007.04.30
 * @by     : ÀÌÀº¿µ
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : Áø¼ú¹® Á¸Àç ¿©ºÎ üũ
 * @param  :
 * @return :
 * @---------------------------------------------------
 */
function fExistStmtCd(pStmtCD, pStmtlist, pGrupCD){

	var sStmtList = pStmtlist.split("¢Ì");	
	var sStmtInfo;
	
	var iRtnMsg = 0;
	var sStmtCnts = "";
	sStmtCnts = model.getValue(xSaveSetInfoPath+"[stmtcd='"+pStmtCD+"']/stmtcnts");

    //°£È£Áø´Ü³»¿ªÀÇ Áø´ÜÄÚµåÀÇ ±×·ìÄÚµå¿Í setÁ¶È¸¿¡¼­ ¼±ÅÃÇÑ Áø´ÜÀÇ ±×·ìÄڵ尡 °°À»¶§¸¸... 
    //¼±ÅÃÇÑ °£È£Áø¼ú¹®ÀÌ °£È£Áø´Ü°ú´Â ¿¬°áµÇ¾î ÀÖÁö ¾ÊÀ»°æ¿ì´Â ±×³É ÀúÀå. °£È£Áø´Ü°ú ¿¬°áµÈ°æ¿ì ¸Þ½ÃÁö¹Ú½º 
//    var nodeList = instance1.selectNodes(xCareDiagListPath + "[stmtcd = '"+ pStmtCD +"' and grupcd4='"+pGrupCD+"'and todt ='']/recverno");
//    
//	if(nodeList != null && nodeList.length > 0 ){
//		iRtnMsg = messageBox("µ¿ÀÏ °£È£°úÁ¤ Set ºÐ·ù¿¡¼­ ¼±ÅÃµÈ µ¿ÀÏ Áø´ÜÀÌ Á¸ÀçÇÕ´Ï´Ù.  ±â·ÏµÉ ¹øÈ£´Â\" "+nodeList.item(0).value+"\"","I009");
//
//        return "Y";
//	}
//
//	if(model.getValue(xNursingRecordListPath+"[recdd='"+sRecDD+"' and rectm='"+sRecTM+"' and stmtcd='"+pStmtCD+"']/stmtcd") != ""){
//		iRtnMsg = messageBox("µ¿ÀÏ ½Ã°£ ¶§¿¡ \""+sStmtCnts+"\" ¹®ÀåÀÌ Á¸ÀçÇÕ´Ï´Ù. µî·ÏÀ»","Q003");
//		if(iRtnMsg != "6"){
//			return "Y";
//		}
//	}

	for(var i=0; i<sStmtList.length; i++){
		if(getArrayData(pStmtlist,i,4)== pStmtCD){
			return "Y";
		}
	}
	return "N";
}

/**
 * @group  :
 * @ver    : 2007.06.22
 * @by     : ÀÌÀº¿µ
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : Àü¼ÛÇÒ Áø¼ú¹® ¼±ÅÃ
 * @param  :
 * @return :
 * @---------------------------------------------------
 */
function fSelectStmtInfo(){
	var sStmtCD = "";
	var sGrupCD = ""; 
	var sRAN = "";
	var sRAD = "";
	var sRAA = "";
	var sRAR = "";
	var sReplace = "replace";
	var sAfter = "after";
	//var sStmtCnt = grd_grupstmtinfo.rows - grd_grupstmtinfo.fixedrows;
	var iSelectStmtRow = 0;
	
	var sGrupCdPath = (gGrupFlag == '3'? xSmlGrupInfoPath2 : xSmlGrupInfoPath );

	model.removeNode(xStmtSetListPath);
	model.makeNode(xStmtSetListPath);
	copyNodesetType(xStmtSetListPath, xNStmtSetListPath, "replace", model, model);
	copyNodesetType(xStmtSetListPath, xDStmtSetListPath, "after", model, model);
	copyNodesetType(xStmtSetListPath, xAStmtSetListPath, "after", model, model);
	copyNodesetType(xStmtSetListPath, xRStmtSetListPath, "after", model, model);

	sGrupCD = gReturnGrupcd;
	
	for(var iRow=1; iRow<=getNodesetCount(xStmtSetListPath); iRow++){
		sDNARFlag = model.getValue(xStmtSetListPath+"["+iRow+"]/dnarflag");

		if(model.getValue(xStmtSetListPath+"["+iRow+"]/check") == "true"){
			sStmtCd = model.getValue(xStmtSetListPath+"["+iRow+"]/stmtcd");						

			cnt = model.getValue(xStmtSetListPath+"["+iRow+"]/cnt");
			
			if(cnt < 1 || cnt == "" ){
			    
				grd_stmtinfo.addRow(false);
				iSelectStmtRow = grd_stmtinfo.rows - grd_stmtinfo.fixedrows;
				model.setValue(xSelectedStmtListPath+"["+iSelectStmtRow+"]/grupnm", model.getValue(sGrupCdPath+"[grupcd ='"+sGrupCD+"']/hngnm"));
				model.setValue(xSelectedStmtListPath+"["+iSelectStmtRow+"]/dnarflag",model.getValue(xStmtSetListPath+"["+iRow+"]/dnarflag"));
				model.setValue(xSelectedStmtListPath+"["+iSelectStmtRow+"]/stmtcnts",model.getValue(xStmtSetListPath+"["+iRow+"]/stmtcnts"));
				model.setValue(xSelectedStmtListPath+"["+iSelectStmtRow+"]/stmtcd",sStmtCd);
				model.setValue(xSelectedStmtListPath+"["+iSelectStmtRow+"]/attrcnt",model.getValue(xStmtSetListPath+"["+iRow+"]/attrcnt"));
				model.setValue(xSelectedStmtListPath+"["+iSelectStmtRow+"]/grupcd",sGrupCD);
				model.setValue(xSelectedStmtListPath+"["+iSelectStmtRow+"]/attrinfo1",model.getValue(xStmtSetListPath+"["+iRow+"]/attrinfo1"));
				model.setValue(xSelectedStmtListPath+"["+iSelectStmtRow+"]/attrinfo2",model.getValue(xStmtSetListPath+"["+iRow+"]/attrinfo2"));
				model.setValue(xSelectedStmtListPath+"["+iSelectStmtRow+"]/attressnyn",model.getValue(xStmtSetListPath+"["+iRow+"]/attressnyn"));			

				if(sDNARFlag == "2N"  ){
					model.setValue(xSelectedStmtListPath+"["+iSelectStmtRow+"]/diagstmtcd",sStmtCd);
				}else {
					model.setValue(xSelectedStmtListPath+"["+iSelectStmtRow+"]/diagstmtcd","");
				}            				

		    }else{
	    		//ºÐ·ùº° Áø´Ü ÄÚµå »ý¼º(Ãß°¡ÀÌÀ¯ : ÇöÀç ºÐ·ùº° Áø´ÜÄڵ带 »ý¼ºÇϱâ À§ÇÔ)
	    		var sChkStmtCd = fCreatDiag(sStmtCd);
	    		var sDiagStmtCd = sChkStmtCd.split("¢Ë");

	    		for(i = 0; i < cnt ; i++){
    				grd_stmtinfo.addRow(false);
    				iSelectStmtRow = grd_stmtinfo.rows - grd_stmtinfo.fixedrows;
    				sGrupCD = gReturnGrupcd;
    				model.setValue(xSelectedStmtListPath+"["+iSelectStmtRow+"]/grupnm", model.getValue(sGrupCdPath+"[grupcd ='"+sGrupCD+"']/hngnm"));
    				model.setValue(xSelectedStmtListPath+"["+iSelectStmtRow+"]/dnarflag",model.getValue(xStmtSetListPath+"["+iRow+"]/dnarflag"));
    				model.setValue(xSelectedStmtListPath+"["+iSelectStmtRow+"]/stmtcnts",model.getValue(xStmtSetListPath+"["+iRow+"]/stmtcnts"));
    				model.setValue(xSelectedStmtListPath+"["+iSelectStmtRow+"]/stmtcd",sStmtCd);
    				model.setValue(xSelectedStmtListPath+"["+iSelectStmtRow+"]/attrcnt",model.getValue(xStmtSetListPath+"["+iRow+"]/attrcnt"));
    				model.setValue(xSelectedStmtListPath+"["+iSelectStmtRow+"]/grupcd",sGrupCD);
    				model.setValue(xSelectedStmtListPath+"["+iSelectStmtRow+"]/attrinfo1",model.getValue(xStmtSetListPath+"["+iRow+"]/attrinfo1"));
    				model.setValue(xSelectedStmtListPath+"["+iSelectStmtRow+"]/attrinfo2",model.getValue(xStmtSetListPath+"["+iRow+"]/attrinfo2"));
    				model.setValue(xSelectedStmtListPath+"["+iSelectStmtRow+"]/attressnyn",model.getValue(xStmtSetListPath+"["+iRow+"]/attressnyn"));			
    				model.setValue(xSelectedStmtListPath+"["+iSelectStmtRow+"]/diagstmtcd",sDiagStmtCd[i]);
			    }
		    }
	    }
    }

	model.removenodeset(xNStmtSetListPath);	
	model.removenodeset(xDStmtSetListPath);	
	model.removenodeset(xAStmtSetListPath);	
	model.removenodeset(xRStmtSetListPath);	

	grd_stmtinfo.mergecells = "bycol";
	grd_stmtinfo.mergecol(3) = false;
	grd_stmtinfo.refresh();
	
	grp_dnarset.refresh();
	grp_dnarset.visible = false;
}

/**
 * @group  :
 * @ver    : 2007.09.14
 * @by     : ¾çõ´ö
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : Áø¼ú¹® Äڵ庰 Áø´Ü ÄÚµå »ý¼º
 * @param  : pStmtCd : Áø¼ú¹®ÄÚµå
 * @return :
 * @---------------------------------------------------
 */ 
	function fCreatDiag(pStmtCd){
		var pSetDiagCd ="";
		
		for(var iRow=1; iRow<=getNodesetCount(xStmtSetListPath); iRow++){
			if( model.getValue(xStmtSetListPath+"["+iRow+"]/dnarflag") == "2N" 
			 && model.getValue(xStmtSetListPath+"["+iRow+"]/check")== "true" ){
				var sLnkStmt = model.getValue(xStmtSetListPath+"["+iRow+"]/lnkstmt");
				var sStmtCD = sLnkStmt.split(",");
				
				for(var iStmt=0; iStmt < sStmtCD.length; iStmt++){
					if(pStmtCd == sStmtCD[iStmt]){
						pSetDiagCd += model.getValue(xStmtSetListPath+"["+iRow+"]/stmtcd")+"¢Ë" ;
					}
				}	
			}
		}
		return pSetDiagCd;
	}

/**
 * @group  :
 * @ver    : 2007.06.22
 * @by     : ÀÌÀº¿µ
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : Àü¼ÛÇÒ Áø¼ú¹® »èÁ¦
 * @param  :
 * @return :
 * @---------------------------------------------------
 */
function fDelSelectedStmtInfo(){
//¸ÖƼ»èÁ¦·Î ¼öÁ¤ 20080702 ±èÈ«Á¡
//	var iRow = grd_stmtinfo.row;
//	
//	if( iRow < 1)  return;
//	
//	grd_stmtinfo.deleteRow(iRow);
	deleteSelectedRows(grd_stmtinfo,false);
	grd_stmtinfo.rebuild();
}

function fSettingLrgMdlSml(pFlag,pCntlObj,pPath,pGrupFlag){
	var sSupCd = "";
	var sDepth = 0; 
	sGrupFlag = pGrupFlag;
	gGrupFlag = pGrupFlag;
	
	model.removenodeset(xHiddenGrupInfoPath);	
	model.makeNode(xHiddenGrupInfoPath);	
	if ( pFlag == "A"){
	    sSupCd = "********";
    	model.removenodeset(xLrgGrupInfoPath);	
    	model.removenodeset(xMdlGrupInfoPath);	
    	model.removenodeset(xSmlGrupInfoPath);	
    	model.removenodeset(xSmlGrupInfoPath2);	
    	
    	model.removenode("/root/send");
    	model.makeValue("/root/send/supcd",sSupCd);
    	model.makeValue("/root/send/grupflag","-");
    	model.makeValue("/root/send/flag","Y");//°¡·Î ±×¸®µå Á¶È¸ÀÓÀ» ±¸ºÐ
        
    	if(submit("TRMNR00701")){
    	    if (getNodesetCount(xHiddenGrupInfoPath) > 0){
    	        model.makeNode(xLrgGrupInfoPath);	
    	        copyNodesetType(xLrgGrupInfoPath, xHiddenGrupInfoPath, "replace", model, model);
            }
    	}
    	
    	pCntlObj.refresh();
   	    model.refresh();
	}else if( pFlag == "L" && pCntlObj.row > 0){
	    
	    sSupCd = model.getValue(xLrgGrupInfoPath+"["+ pCntlObj.row +"]/grupcd");   
    	model.removenodeset(xMdlGrupInfoPath);	
    	model.removenodeset(xSmlGrupInfoPath);	
    	model.removenodeset(xSmlGrupInfoPath2);	

    	model.removenode("/root/send");
    	model.makeValue("/root/send/supcd",sSupCd);
    	model.makeValue("/root/send/grupflag","-");
    	model.makeValue("/root/send/flag","Y");

    	if(sGrupFlag == 3){	// ºÎ¼­º°Àº ÀÚ±âÀÇ ºÎ¼­¸¸ Á¶È¸
    	    grd_sml2.visible  = true;
    	    grd_mdl.caption   = "ºÎ¼­^grupcd^deptcd^depth^grupflag"; 
    	    grd_sml.caption   = "Áߺзù^grupcd^deptcd^depth^grupflag"; 
    	    grd_sml2.caption   = "¼ÒºÐ·ù^grupcd^deptcd^depth^grupflag";
    		//model.makeValue("/root/send/deptcd", getUserInfo("dutplcecd") ); 20080723 ¼Ò¼ÓºÎ¼­¸¸ Á¶È¸µÇ´Â°Ô ¾Æ´Ï¶ó ÇØ´ç ¼Ò¼ÓºÎ¼­¸¦ ¼¿¼±Åà ÇØ´Þ¶ó°í ¿äû ±èÈ«Á¡
    	}else{
    	    grd_sml2.visible  = false; 
    	    grd_mdl.caption   = "Áߺзù^grupcd^deptcd^depth^grupflag"; 
    	    grd_sml.caption   = "¼ÒºÐ·ù^grupcd^deptcd^depth^grupflag";  
    	}
        
    	if(submit("TRMNR00701")){
    	    if (getNodesetCount(xHiddenGrupInfoPath) > 0){
    	        model.makeNode(xMdlGrupInfoPath);	
    	        copyNodesetType(xMdlGrupInfoPath, xHiddenGrupInfoPath, "replace", model, model);
            }
    	}
    	
    	pCntlObj.refresh();
   	    model.refresh();
	}else if( pFlag == "M" && pCntlObj.row > 0){
	    sSupCd = model.getValue(xMdlGrupInfoPath+"["+ pCntlObj.row +"]/grupcd");   
    	model.removenodeset(xSmlGrupInfoPath);	
    	model.removenodeset(xSmlGrupInfoPath2);	

    	model.removenode("/root/send");
    	model.makeValue("/root/send/supcd",sSupCd);
    	model.makeValue("/root/send/grupflag","-");
    	model.makeValue("/root/send/flag","Y");
//    	if(sGrupFlag == 3){	// ºÎ¼­º°Àº ÀÚ±âÀÇ ºÎ¼­¸¸ Á¶È¸ 20080709 ŸºÎ¼­µµ ºÁ¾ßÇÑ´ë¼­ ÁÖ¼®
//    		model.makeValue("/root/send/deptcd", getUserInfo("dutplcecd") );
//    	}
        
    	if(submit("TRMNR00701")){
    	    if (getNodesetCount(xHiddenGrupInfoPath) > 0){
    	        model.makeNode(xSmlGrupInfoPath);	
    	        copyNodesetType(xSmlGrupInfoPath, xHiddenGrupInfoPath, "replace", model, model);
            }
    	}
    	
    	pCntlObj.refresh();
   	    model.refresh();
	}else if( pFlag == "S" && pCntlObj.row > 0){
   	    sSupCd = model.getValue(xSmlGrupInfoPath+"["+ pCntlObj.row +"]/grupcd");  

       	if(sGrupFlag == 3){	// ºÎ¼­º°Àº ÀÚ±âÀÇ ºÎ¼­¸¸ Á¶È¸
	        
	        model.removenodeset(xSmlGrupInfoPath2);	  

        	model.removenode("/root/send");
        	model.makeValue("/root/send/supcd",sSupCd);
        	model.makeValue("/root/send/grupflag","-");
        	model.makeValue("/root/send/flag","Y");
    
        	if(submit("TRMNR00701")){
        	    if (getNodesetCount(xHiddenGrupInfoPath) > 0){
        	        model.makeNode(xSmlGrupInfoPath2);	
        	        copyNodesetType(xSmlGrupInfoPath2, xHiddenGrupInfoPath, "replace", model, model);
                }
        	}
    	}else{
    	    gReturnGrupcd = sSupCd; 
    	    fSearchSrchTool("StmtSet",pCntlObj.row, sSupCd );   
    	}
    	
    	pCntlObj.refresh();
   	    model.refresh();
	}else if( pFlag == "S2" && pCntlObj.row > 0){
	    sSupCd = model.getValue(xSmlGrupInfoPath2+"["+ pCntlObj.row +"]/grupcd");  
	    gReturnGrupcd = sSupCd; 
	    fSearchSrchTool("StmtSet",pCntlObj.row, sSupCd );   
	}
}
	
function fSearchSrchTool(pFlag,pRow,pGrupCd){
    var sGrupCd = pGrupCd;
    var sGrupRow = pRow;
	grp_dnarset.visible = true;
	model.removenode("/root/send");
	    
	model.makeValue("/root/send/grupcd", sGrupCd);
	model.makeValue("/root/send/dnarflag","%");//Àüü
	//model.makeValue("/root/send/dnarflag",model.getValue(xSrchToolCondPath+"/dnarflag"));20080624 ±èÈ«Á¡
	if(submit("TRMNR00702")){
        //fSettingStmtSet();
        fSettingStmtStyle("newsetinfo");
	}    
}	

//function fSettingStmtSet(pFlag){//pFlag : NDÀÏ°æ¿ì °£È£Áø´Ü °Ë»ö ÅÇ¿¡¼­ Ä«ÇÇÇÑ´Ù.
//	model.removenodeset(xNStmtSetListPath);	
//	model.removenodeset(xDStmtSetListPath);	
//	model.removenodeset(xAStmtSetListPath);	
//	model.removenodeset(xRStmtSetListPath);	
//	model.refresh();			    		
//	
//    if (getNodesetCount(xHiddenStmtSetInfoPath) > 0){
//        
//        if( getNodesetCount(xHiddenStmtSetInfoPath+"/nstmtsetlist") > 0 ){
//            model.makeNode(xNStmtSetListPath);
//            copyNodesetType(xNStmtSetListPath, xHiddenStmtSetInfoPath+"/nstmtsetlist", "replace", model, model);
//            grd_nursingd.resizeCells();	
//            grd_nursingd.refresh();
//        }
//
//        if( getNodesetCount(xHiddenStmtSetInfoPath+"/dstmtsetlist") > 0 ){
//            model.makeNode(xDStmtSetListPath);
//            copyNodesetType(xDStmtSetListPath, xHiddenStmtSetInfoPath+"/dstmtsetlist", "replace", model, model);
//            grd_data.resizeCells();		
//            grd_data.refresh();
//        }
//
//        if( getNodesetCount(xHiddenStmtSetInfoPath+"/astmtsetlist") > 0 ){
//            model.makeNode(xAStmtSetListPath);
//            copyNodesetType(xAStmtSetListPath, xHiddenStmtSetInfoPath+"/astmtsetlist", "replace", model, model);
//            grd_action.resizeCells();		
//            grd_action.refresh();
//        }
//
//        if( getNodesetCount(xHiddenStmtSetInfoPath+"/rstmtsetlist") > 0 ){
//            model.makeNode(xRStmtSetListPath);
//            copyNodesetType(xRStmtSetListPath, xHiddenStmtSetInfoPath+"/rstmtsetlist", "replace", model, model);
//            grd_result.resizeCells();		
//            grd_result.refresh();
//        }
//        fSettingStmtStyle("newsetinfo");
//    }
//    //model.refresh();	
//}

/**
 * @group  :
 * @ver    : 2007.04.19
 * @by     : ÀÌÀº¿µ
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : Áø¼ú¹® ÆùÆ® color ¼³Á¤  - ¼Ó¼ºÀÌ ÀÖ´Â °æ¿ì Áø¼ú¹® ÆùÆ® »ö»óÀ» º¯°æÇÑ´Ù.
 * @param  : pFlag ( setinfo : set, stmtinfo : Áø¼ú¹® °Ë»ö) 
 * @return :
 * @---------------------------------------------------
 */ 	
function fSettingStmtStyle(pFlag){
	switch(pFlag){
		case "newsetinfo" :	// set DARº°·Î ¼Ó¼ºÀÌ Á¸ÀçÇϴ°ÍÀº ÆùÆ®»öº¯°æ20080623 ±èÈ«Á¡
		    var iTgStmtRow = 0;
		    grd_data.allstyle("data","color") = "#000000";					
            var sStmtCDList = instance1.selectNodes(xDStmtSetListPath+"[attrcnt > 0]/stmtcd");

            for(var idx=0; idx < sStmtCDList.length; idx++){
            	  iTgStmtRow = grd_data.findRow(sStmtCDList.item(idx).value ,1,grd_data.colRef("stmtcd"),true,true);	
        
            	  if(iTgStmtRow < 0){
            			// ¼Â¿¡ ¼Ó¼ºÀÌ ¾øÀ» °æ¿ì pass  	
            	  } else {
                    grd_data.cellstyle("color",iTgStmtRow,grd_data.colRef("stmtcnts")) = "#6600ff";            	  

                  }
            }		

		    grd_action.allstyle("data","color") = "#000000";					
            sStmtCDList = instance1.selectNodes(xAStmtSetListPath+"[attrcnt > 0]/stmtcd");
            
            for(var idx=0; idx < sStmtCDList.length; idx++){
            	  iTgStmtRow = grd_action.findRow(sStmtCDList.item(idx).value ,1,grd_action.colRef("stmtcd"),true,true);	
        
            	  if(iTgStmtRow < 0){
            			// ¼Â¿¡ ¼Ó¼ºÀÌ ¾øÀ» °æ¿ì pass  	
            	  } else {
                    grd_action.cellstyle("color",iTgStmtRow,grd_action.colRef("stmtcnts")) = "#6600ff";            	  
                  }
            }		

		    grd_result.allstyle("data","color") = "#000000";					
            sStmtCDList = instance1.selectNodes(xRStmtSetListPath+"[attrcnt > 0]/stmtcd");
            
            for(var idx=0; idx < sStmtCDList.length; idx++){
            	  iTgStmtRow = grd_result.findRow(sStmtCDList.item(idx).value ,1,grd_result.colRef("stmtcd"),true,true);	
        
            	  if(iTgStmtRow < 0){
            			// ¼Â¿¡ ¼Ó¼ºÀÌ ¾øÀ» °æ¿ì pass  	
            	  } else {
                    grd_result.cellstyle("color",iTgStmtRow,grd_result.colRef("stmtcnts")) = "#6600ff";            	  
                  }
            }		
            model.refresh();

			break;
	}
}

/**
 * @group  :
 * @ver    : 2008.06.23
 * @by     : ±èÈ«Á¡
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : ¼±ÅÃµÈ Áø¼ú¹® º°·Î Ç¥ÁØ°£È£°úÁ¤  µî·ÏµÈ Áø¼ú¹®¿¡ ¹ÙÅÁ»öÀ» º¯°æ
 * @param  : 
 * @return :
 * @---------------------------------------------------
 */ 
function fSettingGridBackColorNew(pRow){
	var iRow = pRow;//grd_nursingd.selectedRow;
	var sDNARFlag = model.getValue(xNStmtSetListPath+"["+iRow+"]/dnarflag");		
	var sCheck = model.getValue(xNStmtSetListPath+"["+iRow+"]/check");	
	var iTgStmtRow = 0;

	var sLnkStmt = model.getValue(xNStmtSetListPath+"["+iRow+"]/lnkstmt");
	if(sLnkStmt == "") return;
	var sStmtCD = sLnkStmt.split(",");
    
    for(var iStmt=0; iStmt < sStmtCD.length; iStmt++){
    	  iTgStmtRow = grd_data.findRow(sStmtCD[iStmt],1,grd_data.colRef("stmtcd"),true,true);	

    	  if(iTgStmtRow < 0){
    			// ¼Â¿¡ ¹­ÀÎ Áø´ÜÀÌ ¾øÀ» °æ¿ì pass  	
    	  } else {
    	  	
    		  chkcnt = model.getValue(xDStmtSetListPath + "["+iTgStmtRow+"]/cnt");
  		  
    		  if(sCheck == "true"){
    		  	chkcnt ++;
    		  }else{
    		  	chkcnt --;
    		  }
    		  model.setValue(xDStmtSetListPath+"["+iTgStmtRow+"]/cnt", chkcnt);		
    		  if(model.getValue(xDStmtSetListPath+"["+iTgStmtRow+"]/cnt") > 0 ){
    		  	grd_data.rowstyle(iTgStmtRow,"data","background-color") = "#efd3e7";
    		  }else {
    		  	grd_data.rowstyle(iTgStmtRow,"data","background-color") = "#FFFFFF";
    		  }
    	  }
    }
    for(var iStmt=0; iStmt < sStmtCD.length; iStmt++){
    	  iTgStmtRow = grd_action.findRow(sStmtCD[iStmt],1,grd_action.colRef("stmtcd"),true,true);	
    	  
    	  if(iTgStmtRow < 0){
    			// ¼Â¿¡ ¹­ÀÎ Áø´ÜÀÌ ¾øÀ» °æ¿ì pass  	
    	  } else {
    	  	
    		  chkcnt = model.getValue(xAStmtSetListPath + "["+iTgStmtRow+"]/cnt");
    		  if(sCheck == "true"){
    		  	chkcnt ++;
    		  }else{
    		  	chkcnt --;
    		  }
    		  model.setValue(xAStmtSetListPath+"["+iTgStmtRow+"]/cnt", chkcnt);		
    		  if(model.getValue(xAStmtSetListPath+"["+iTgStmtRow+"]/cnt") > 0 ){
    		  	grd_action.rowstyle(iTgStmtRow,"data","background-color") = "#efd3e7";
    		  }else {
    		  	grd_action.rowstyle(iTgStmtRow,"data","background-color") = "#FFFFFF";
    		  }
    	  }
    }
    for(var iStmt=0; iStmt < sStmtCD.length; iStmt++){
    	  iTgStmtRow = grd_result.findRow(sStmtCD[iStmt],1,grd_result.colRef("stmtcd"),true,true);	
    	  
    	  if(iTgStmtRow < 0){
    			// ¼Â¿¡ ¹­ÀÎ Áø´ÜÀÌ ¾øÀ» °æ¿ì pass  	
    	  } else {
    	  	
    		  chkcnt = model.getValue(xRStmtSetListPath + "["+iTgStmtRow+"]/cnt");
    		  if(sCheck == "true"){
    		  	chkcnt ++;
    		  }else{
    		  	chkcnt --;
    		  }
    		  model.setValue(xRStmtSetListPath+"["+iTgStmtRow+"]/cnt", chkcnt);		
    		  if(model.getValue(xRStmtSetListPath+"["+iTgStmtRow+"]/cnt") > 0 ){
    		  	grd_result.rowstyle(iTgStmtRow,"data","background-color") = "#efd3e7";
    		  }else {
    		  	grd_result.rowstyle(iTgStmtRow,"data","background-color") = "#FFFFFF";
    		  }
    	  }
    }
}