/*********************************************************************************************************************************
	* 2007-12-17
	* follow up sheetÀÇ KPSÁ¡¼ö¸¦ µî·ÏÇÏ´Â Æ˾÷È­¸é ½ºÅ©¸³Æ®
	*********************************************************************************************************************************/
	
	//KPS Á¡¼ö xPath
	var xVashPath = "/root/main/vash/vashlist";	
	
	//opener parameters
	var pid         = opener.window.javascript.getParameter("pid");
	var cretdd      = opener.window.javascript.getParameter("cretdd");
	var crettm      = opener.window.javascript.getParameter("crettm");
	var recitemcd	= opener.window.javascript.getParameter("recitemcd");
	var recdd      	= opener.window.javascript.getParameter("recdd");
	var vas_row  	= opener.window.javascript.getParameter("vas_row");
	var vas_col  	= opener.window.javascript.getParameter("vas_col");
	var vashval  	= opener.window.javascript.getParameter("vashval");
	var spid  		= opener.window.javascript.getParameter("spid");
	
	
	if((vashval =="" )||(vashval==null)){
		vashval = "I";
	}else{
		vashval = "U";
	}
	
	var rectm;
	
	/*
	* ÃʱâÈ­
	* xforms-ready À̺¥Æ® ¹ß»ý½Ã ÃʱâÈ­Æã¼ÇÀ» È£ÃâÇÑ´Ù.
	**/
	function fInit(){

		//ÀԷ½ð£(ipt_recdt)¿¡ ÇöÀç ½Ã°£À» ¼¼ÆÃ
		ipt_recdt.value = getCurrentTime().substring(0,4);
		
		//ºÎ¸ðâ¿¡¼­ ¹Þ¾Æ¿Â paramter°ª¿¡ ÇØ´çÇϴ ȯÀÚÀÇ KPSÁ¡¼ö¸¦ Á¶È¸
		model.removenode("/root/send");
		model.makeValue("/root/send/pid",pid);
		model.makeValue("/root/send/cretdd",cretdd);
		model.makeValue("/root/send/crettm",crettm);
		model.makeValue("/root/send/recitemcd", recitemcd);
		model.makeValue("/root/send/recdd",recdd);
		model.removenodeset(xVashPath);	
		submit("TRMNH03301");
		
		//Á¶È¸µÈ KPSÁ¡¼ö°¡ ¾øÀ¸¸é default·Î row¸¦ ¼¼ÆÃÇØ ÁØ´Ù.
		if(grd_vashlist.rows < 2){
			grd_vashlist.addRow();
			model.setValue(xVashPath + "["+grd_vashlist.row+"]/staiud","insert");
			
			model.setValue(xVashPath + "["+grd_vashlist.row+"]/recdd",recdd);
			model.setValue(xVashPath + "["+grd_vashlist.row+"]/rectm",getCurrentTime().substring(0,4));
			grd_vashlist.cellStyle("background-image", grd_vashlist.row, 1) = "../../../com/commonweb/images/icon_i.gif";
			brecdd = recdd.substring(0,4)+"-"+ recdd.substring(4,6)+"-"+recdd.substring(6,8);
			var recdt = "";
			if(ipt_recdt.value == ""){
				recdt = getCurrentTime().substring(0,2)+":"+getCurrentTime().substring(2,4);
			}else{
				recdt = (ipt_recdt.value).substring(0,2)+":"+(ipt_recdt.value).substring(2,4);;	
			}
			grd_vashlist.valueMatrix(grd_vashlist.row,2) =  brecdd + " " + recdt;
			grd_vashlist.valueMatrix(grd_vashlist.row,4) = getUserName();
			grd_vashlist.valueMatrix(grd_vashlist.row,8) = getUserId();
		}
		
		model.refresh();			
				
	}
	
	/*
	* 2007-12-17
	* KPSÁ¡¼ö¸¦ ÀÔ·ÂÇϱâ À§ÇÑ ±×¸®µå¿¡ ÇàÃß°¡
	*/
	function fAddKPSScore(){
			
		//ÇàÃß°¡ ¹öÆ°À» Ŭ¸¯ÇÒ ¶§ ÀԷ½ð£(ipt_recdt)¿¡ ÀÔ·ÂµÈ °ªÀ» rectm¿¡ ³Ö¾îÁØ´Ù.
		//ipt_recdt¿¡ °ªÀÌ ¾øÀ¸¸é ÇöÀç ³¯Â¥,½Ã°£À» ³Ö¾îÁØ´Ù.
		var curDate = getCurrentDate();
		var inpTime = ipt_recdt.value;
		if(inpTime == '' || !isValidDateTime(inpTime, 'hhmm')){
			inpTime = getCurrentTime().substring(0, 4); 
			ipt_recdt.value = inpTime;
		}
								
		//±×¸®µå ³»¿¡ ÀԷµǾî ÀÖ´Â µ¥ÀÌÅÍÀÇ ÀÏ½Ã¿Í ÀÔ·ÂÇÏ·Á´Â ÀϽø¦ ºñ±³ÇÏ¿© ÀÔ·ÂÇÏ·Á´Â ÀϽð¡ Áߺ¹µÇ¸é ¸®ÅÏ
		var grdtm;
		for(var i = 1; i <= grd_vashlist.rows;  i++){
			grdtm = model.getValue(xVashPath + "[" + i + "]/rectm");
			if(grdtm == inpTime){
				messageBox("ÀԷ½ð£ÀÌ °°À¸¸é ÇàÀ» Ãß°¡ ÇÒ¼ö ","I004");
				return;	
			}
		}
								
		//±×¸®µå¿¡ º¸¿©ÁÙ ÀÔ·ÂÀϽø¦ registddtmStr Àӽú¯¼ö¿¡ ÀúÀåÇÑ´Ù.
		var registddtmStr  = curDate.substring(0, 4) + '-';
		     registddtmStr += curDate.substring(4, 6) + '-';
		     registddtmStr += curDate.substring(6) + ' ';
		     registddtmStr += inpTime.substring(0, 2) + ':';
		     registddtmStr += inpTime.substring(2);
		     
		     				
		//±×¸®µå¿¡ ù¹ø° row¿¡ ÇàÃß°¡
		grd_vashlist.insertRow(1);
		
		//ÀνºÅϽº¿¡ °ªÀ» ¼¼ÆÃÇÑ´Ù.						
		model.setValue(xVashPath + "[" + grd_vashlist.row + "]/recdt",	registddtmStr);	//ÀÔ·ÂÀϽÃ
		model.setValue(xVashPath + "[" + grd_vashlist.row + "]/staiud",	"insert");		//iud»óÅ°ª
		model.setValue(xVashPath + "[" + grd_vashlist.row + "]/recdd",	recdd);			//±â·ÏÀÏÀÚ
		model.setValue(xVashPath + "[" + grd_vashlist.row + "]/rectm",	inpTime);		//±â·Ï½Ã°£
		model.setValue(xVashPath + "[" + grd_vashlist.row + "]/userid",	getUserId());	//ÀÔ·ÂÀÚ¾ÆÀ̵ð
		model.setValue(xVashPath + "[" + grd_vashlist.row + "]/usernm", getUserName());	//ÀÔ·ÂÀÚÀ̸§
		grd_vashlist.cellStyle("background-image", grd_vashlist.row, 1) = "../../../com/commonweb/images/icon_i.gif"; //insert »óÅ°ªÀ̹ÌÁö
								
		model.refresh();
	}
	
	
	/*
	* 2007-12-17
	* KPSÁ¡¼ö¸¦ ÀÔ·ÂÇϱâ À§ÇÑ ±×¸®µå¿¡ ÇàÃß°¡
	*/
	function fDeleteKPSScore(){

		model.setValue(xVashPath + "["+grd_vashlist.row+"]/staiud","delete");
		grd_vashlist.cellStyle("background-image", grd_vashlist.row, 1) = "../../../com/commonweb/images/icon_d.gif";
		
	}
	
	
	/*
	* 2007-12-17
	* ÀԷ½ð£ÀÌ ÀÌ¹Ì ÀÔ·ÂµÈ KPSÁ¡¼öÀÇ ½Ã°£°ú Áߺ¹µÇ´ÂÁö À¯È¿¼ºÀ» üũÇÑ´Ù.
	*/
	function fIsValidKPSTime(){
	
		var recdt = ipt_recdt.value;
		if(Number(recdt.substring(0,2)) > 24){
			messageBox("½Ã°£ ÀԷ¿¡","E009");
			ipt_recdt.value = "";
			model.setFocus("ipt_recdt");
			return;
		}
		if(Number(recdt.substring(2,4)) > 60){
			messageBox("ºÐ ÀԷ¿¡","E009");
			ipt_recdt.value = "";
			model.setFocus("ipt_recdt");
			return;
		}			
		
	}
	
	
	/*
	* 2007-12-17
	* ½Ã°è¹öÆ°À» ´­·¶À»¶§ È£ÃâµÇ´Â Æã¼ÇÀÌ´Ù.
	* ÇöÀç½Ã°£À» input ¹Ú½º¿¡ ÀÔ·ÂÇÑ´Ù.
	**/
	function fInputCurrentTime(){
		//ÇöÀç½Ã°£À» ÀÔ·ÂÇÑ´Ù.
		var curtime = getCurrentTime().substring(0, 4);
		ipt_recdt.value= curtime;
	}
	
	
	/*
	* 2007-12-17
	* KPSÁ¡¼ö¸®½ºÆ®ÀÇ Á¡¼ö¸¦ Ŭ¸¯À̺¥Æ®°¡ ¹ß»ýÇßÀ»¶§ È£ÃâµÇ´Â Æã¼ÇÀÌ´Ù
	* Ŭ¸¯ÇÑ Æ÷Ä¿½ºÀÇ Á¡¼ö°¡ ÀÔ·ÂµÉ ±×¸®µåÀÇ Á¡¼öÇʵ忡 ÀԷµȴÙ.
	*/
	function fInputKPSScore(){
		
		var curRow = grd_vashlist.row;

		if(curRow > 0){
		
			grd_vashlist.valueMatrix(curRow, 3) = vasval.valueMatrix(vasval.row, 0);
		
			var staiud = model.getValue(xVashPath +"[" + curRow + "]/staiud");
			if( (staiud =="insert") || (staiud =="delete")  ){
				return;                        	
			}
			model.setValue(xVashPath +"[" + curRow + "]/staiud", "update");
			grd_vashlist.cellStyle("background-image", curRow, 1) = "../../../com/commonweb/images/icon_u.gif";
		}
		
	}
	
	
	/*
	* 2007-12-17
	* ÀúÀå½Ã À¯È¿¼ºÀ» üũÇÑ´Ù.
	*/
	function fIsValid(){
		
		
		if(messageBox("","Q002") != 6) 
			return false;
			
		if(model.getValue(xVashPath + "["+ 1 + "]/vasrslt"  )==""){
			messageBox("KPSÁ¡¼ö´Â Çʼö ÀÔ·Â »çÇ×","E008");
			model.setFocus("grd_vashlist");
			return false;
		}
		
		return true;
				  
	}
	
	
	/*
	* 2007-12-17
	* KPSÁ¡¼ö¸¦ ÀúÀåÇÑ´Ù.
	*/
	function fSaveKPSScore(){
		
		if(fIsValid()){
			
			var sVashData =
					  "pid"         //01µî·Ï¹øÈ£
					+ "¢Ëcretdd"     //02»ý¼ºÀÏÀÚ
					+ "¢Ëcrettm"    //03»ý¼º½Ã°£
					+ "¢Ërecitemcd"	//04±â·ÏÇ׸ñÄÚµå
					+ "¢Ërecdd"      //05±â·ÏÀÏÀÚ
					+ "¢Ërectm"      //06±â·Ï½Ã°£
					+ "¢Ëvasrslt"    	//07°ª
					+ "¢Ëstaiud"     //08»óÅÂ
					+ "¢Ëuserid"     //09ÀÔ·ÂÀÚ
					+ "¢Ì"   ;
		
			for (i=1;i < grd_vashlist.rows; i++ ) {
				sVashData +=
						         pid            									//01µî·Ï¹øÈ£
						+ "¢Ë" + cretdd         										//02»ý¼ºÀÏÀÚ
						+ "¢Ë" + crettm       										//03»ý¼º½Ã°£
						+ "¢Ë" + recitemcd											//04±â·ÏÇ׸ñÄÚµå
						+ "¢Ë" + recdd         										//05±â·ÏÀÏÀÚ
						+ "¢Ë" + model.getValue(xVashPath + "["+ i + "]/rectm") 		//06±â·Ï½Ã°£
						+ "¢Ë" + model.getValue(xVashPath + "["+ i + "]/vasrslt")	//07°ª
						+ "¢Ë" + model.getValue(xVashPath + "["+ i + "]/staiud") 	//08»óÅÂ
						+ "¢Ë" + model.getValue(xVashPath + "["+ i + "]/userid") 	//09ÀÔ·ÂÀÚ
						+ "¢Ì"   ;
			}
			
			
			// ȯÀÚº° ÅëÁõ»çÁ¤µµ±¸ VAS ÀÔ·Â,¼öÁ¤,»èÁ¦ ÇÑ´Ù.
			model.removenode("/root/send");		
			model.makeNode("/root/send");
			model.makeValue("/root/send/sVashData" ,sVashData );
			submit("TRMNH03302");				
			model.refresh();
			
			
			//ȯÀÚº° ÅëÁõ»çÁ¤µµ±¸  VAS ±â·Ï Á¶È¸ÇÑ´Ù.
			model.removenode("/root/send");
			model.makeValue("/root/send/pid",pid);
			model.makeValue("/root/send/cretdd",cretdd);
			model.makeValue("/root/send/crettm",crettm);
			model.makeValue("/root/send/recitemcd", recitemcd);
			model.makeValue("/root/send/recdd",recdd);
			model.removenodeset(xVashPath);	
			submit("TRMNH03301");
			
			
			// ȯÀÚº° ÅëÁõ»çÁ¤µµ±¸ VAS ¼öÁ¤ ÇÑ´Ù.
			model.removenode("/root/send");		
			model.makeNode("/root/send");
			model.makeValue("/root/send/pid" ,pid );
			model.makeValue("/root/send/cretdd" ,cretdd );
			model.makeValue("/root/send/crettm" ,crettm );
			model.makeValue("/root/send/recitemcd" ,recitemcd );
			model.makeValue("/root/send/recdd" ,recdd );
			model.makeValue("/root/send/dday" ,model.getValue(xVashPath + "["+ 1 + "]/vasrslt"  ) );
			model.makeValue("/root/send/userid" ,model.getValue(xVashPath + "["+ 1 + "]/userid"   ) );
			model.makeValue("/root/send/vashval" ,vashval);
			model.makeValue("/root/send/spid" ,spid);
			submit("TRMNH03303");				
			opener.grd_inptlist.valueMatrix(vas_row,vas_col) =  model.getValue(xVashPath + "["+ 1 + "]/vasrslt"  );
			opener.grd_inptlist.valueMatrix(vas_row,vas_col+1) =  model.getValue(xVashPath + "["+ 1 + "]/vasrslt"  );
			
		}
		
		window.close();
		
	}