function fInitialize()
{
    var formnm = opener.javascript.getParameter("SPMRF1300_formnm");
    //2009.12.28 ¾ÈÄ¡¿ø - ¼­½ÄµðÀÚÀο¡¼­ ½ÃÀÛÀÏÀÚ¸¦ ¹Ì·¡·Î ¼³Á¤ÇÑ ¼­½ÄÀÌ Á¶È¸µÇµµ·Ï ¼öÁ¤
    var isFutureYn = opener.javascript.getParameter("SPMRF1300_isFutureYn");
    if(formnm != "")
    {
        if(formnm.charAt(0) == "/")
        {
            formnm = formnm.setReplaceWord("/", "");
            model.setValue("/root/hidden/condition/formflag", "formcd"); 
        }
        model.setValue("/root/hidden/condition/formnm", formnm);  
        
        fSrchForm();
        if(grd_formlist.rows - grd_formlist.fixedRows == 1)
        {
            grd_formlist.row = grd_formlist.fixedRows;
            fAppFormToPltte();
        }
        opener.javascript.setParameter("SPMRF1300_formnm", "");
        
    }
    //2009.12.28 ¾ÈÄ¡¿ø - ¼­½ÄµðÀÚÀο¡¼­ ½ÃÀÛÀÏÀÚ¸¦ ¹Ì·¡·Î ¼³Á¤ÇÑ ¼­½ÄÀÌ Á¶È¸µÇµµ·Ï ¼öÁ¤
    model.makeValue("/root/hidden/condition/isfutureyn", isFutureYn);
    opener.javascript.setParameter("SPMRF1300_isFutureYn", "");
    
    fSrchForm();
}

function fSrchForm()
{
    var formflag = model.getValue("/root/hidden/condition/formflag");
    if(formflag == "formcd"){
    
        var sCode = model.getValue("/root/hidden/condition/formnm");
         
        var sTmp = "";
        var iTmp = 0;
    
        // formÄÚµå ÀԷ½à ÀÚ¸´¼ö ä¿öÁØ´Ù        
        var iCodeLength = sCode.length;
        if(iCodeLength ==0){
            return;

        }else if(iCodeLength > 10){
            return;
        }
        var temp = 10 - iCodeLength
        for(var i = 1; i <= temp; i++){
          sTmp += "0";
        } 
        sTmp = sTmp + sCode;
        model.setValue("/root/hidden/condition/formnm",sTmp);
    }
    var formnm = model.getValue("/root/hidden/condition/formnm");
    model.setValue("/root/hidden/condition/formnm",formnm.toUpperCase());
    submit("TRMRF01301");
	//setTree(grd_formlist, grd_formlist.colRef("levl"), grd_formlist.colref("labl"), true);
}

//°Ë»öµÈ formlist¿¡¼­ form¼±ÅÃ
function fSelectForm()
{
	var curRow = grd_formlist.row - grd_formlist.fixedRows + 1;
	
	if(curRow < 1){
		return;
	}
	// MB_YESNO | MB_ICONQUESTION | MB_DEFBUTTON2
	var result = window.alert("»õ·Î¿î ¼­½ÄÀ» Àû¿ëÇϽðڽÀ´Ï±î?", "¼­½Ä ¼±ÅÃ", 4 | 32 | 256);	
	if(result == 7)
		return;
	
	var formcd = model.getValue("/root/main/formlist[" + curRow + "]/formcd");     //form ÄÚµå
	var degnusdt = model.getValue("/root/main/formlist[" + curRow + "]/degnusdt");     // µðÀÚÀÎ Àû¿ë½ÃÀÛÀÏ
	var degnuedt = model.getValue("/root/main/formlist[" + curRow + "]/degnuedt");     // µðÀÚÀÎ Àû¿ëÁ¾·áÀÏ
	
	opener.model.setValue("/root/send/formdegninfo/master/formcd", formcd);
	opener.model.setValue("/root/send/formdegninfo/master/degnusdt", degnusdt);
	opener.model.setValue("/root/send/formdegninfo/master/degnuedt", degnuedt);
}



function fAppFormToPltte()
{
	var row = grd_formlist.row - grd_formlist.fixedRows + 1;
	//model.setValue("/root/send/formdegnseqno", model.getValue("/root/main/formlist[" + row + "]/valu"));
	model.makeValue("/root/send/req/formcd", model.getValue("/root/main/formlist[" + row + "]/formcd"));
	model.makeValue("/root/send/req/formdegnseq", "");
	model.makeValue("/root/send/req/extnunitformlistyn", "N");
	model.makeValue("/root/send/req/cashedformdegnseq", "");
	model.makeValue("/root/send/req/sysformrecdt", "");
	model.makeValue("/root/send/req/mode", "D");
		
	submit("TRMRF02001");
	
	// µðÀÚÀÎ ¿Ï·á ¿©ºÎ È®ÀÎ
	var degncmpltyn = model.getValue("/root/main/formlist[" + row + "]/degncmpltyn");
		
	copyNode(model, model, "/root/main/forminfo", "/root/temp/forminfo");
	model.removenode("/root/temp/forminfo");

	var opentype = opener.window.javascript.getParameter("opentype");

////////////////////////////
//2010.04.08, µ¿½Ã¿¡ µÎ¸íÀÌ»óÀÇ ÀÛ¾÷ÀÚ°¡ µðÀÚÀÎ ¼öÁ¤ ±ÝÁöÇϱâ À§ÇØ ÀбâÀü¿ë ¿©ºÎ üũ Ãß°¡ , ÁÖÈñ°æ

	//ÀúÀå ¹öÆ° ±×·ì È°¼ºÈ­
	opener.defaulttab.disabled = false;

	//ÇÁ·Î±×·¥¼­½ÄÀ¸·Î ÀÛ¼ºÁßÀÎ ¼­½ÄÀ̸é ÀúÀåÀÌ ¾ÈµÊ 20131112 ±è¿µ±â
	if(fCheckFormcdByProgramDesign(model.getValue("/root/main/formlist[" + row + "]/formcd"))){		
		opener.defaulttab.disabled = true;
	} else {  // ÇÁ·Î±×·¥¼­½Ä ºí·ÎÅ·À» À§ÇÑ ºÐ±âÁ¡ start
	
		// ¼­½Ä»ý¼º±â 2.0 ±â·Ï È®ÀÎ
		var formxfdluseyn = model.getValue("/root/main/forminfo/formmast/formxfdluseyn");
		if( formxfdluseyn == "Y" ){
			alert("¼­½Ä»ý¼º±â 2.0À¸·Î »ý¼ºµÈ ±â·ÏÀÔ´Ï´Ù. ¼­½Ä»ý¼º±â 2.0À» »ç¿ëÇϽñ⠹ٶø´Ï´Ù.");
			opener.window.javascript.setParameter("saveyn", "N");
			window.close();	
			return;
		}
		
		// ÀбâÀü¿ëÀÎÁö È®ÀÎ
		var readonlystatdt = model.getValue("/root/main/forminfo/readonlylist/readonlystatdt");
		var readonlyuserid = model.getValue("/root/main/forminfo/readonlylist/readonlyuserid");
		var userid = getUserInfo("userid");
		if ( readonlystatdt != "-" && readonlyuserid != userid )	//ÀбâÀü¿ëµî·ÏÀϽÃÁ¤º¸°¡ ÀÖ°í µ¿ÀϾÆÀ̵𰡠¾Æ´Ñ°æ¿ì
		{
			var blokingdt = readonlystatdt.substr(0,4) + "/";
			blokingdt = blokingdt + readonlystatdt.substr(4,2) + "/";
			blokingdt = blokingdt + readonlystatdt.substr(6,2) + "/ ";
			blokingdt = blokingdt + readonlystatdt.substr(8,2) + ":";
			blokingdt = blokingdt + readonlystatdt.substr(10,2) + ":";
			blokingdt = blokingdt + readonlystatdt.substr(12,2);
	
			var readonlyusernm = model.getValue("/root/main/forminfo/readonlylist/readonlyusernm");	
			if( opentype == "save")		//´Ù¸¥ ¼­½ÄÀ¸·Î ÀúÀå ½Ã
			{
				alert("["+readonlyuserid+","+readonlyusernm+"]´ÔÀÌ ["+blokingdt+"]ºÎÅÍ ÀÛ¾÷ ÁßÀ̹ǷΠÀúÀåÇÒ ¼ö ¾ø½À´Ï´Ù.");
				opener.window.javascript.setParameter("saveyn", "N");
				window.close();	
				return;
			}
			else						//¼­½Ä ÀÏ¹Ý Á¶È¸ ½Ã
			{
				var result = window.alert("["+readonlyuserid+","+readonlyusernm+"]´ÔÀÌ ["+blokingdt+"]ºÎÅÍ ÀÛ¾÷ ÁßÀÔ´Ï´Ù. ÀбâÀü¿ëÀ¸·Î ¿©½Ã°Ú½À´Ï±î?", "ÀбâÀü¿ë¾Ë¸²", 4 | 32 | 256);	
				if(result == 7) {
					window.close();	
					return;
				}
				else
				{
					opener.defaulttab.disabled = true;		//ÀúÀå ¹öÆ° ±×·ì ºñÈ°¼ºÈ­
				}
			}
		}
		else if ( readonlystatdt != "-" && readonlyuserid == userid )	//ÀбâÀü¿ëµî·ÏÀϽÃÁ¤º¸°¡ ÀÖ°í µ¿ÀϾÆÀ̵ðÀÎ °æ¿ì
		{
			if( opentype == "save")		//´Ù¸¥ ¼­½ÄÀ¸·Î ÀúÀå ½Ã
			{
			}
			else						//¼­½Ä ÀÏ¹Ý Á¶È¸ ½Ã
			{
				model.setValue("/root/main/forminfo/readonlylist/readonlyyn", "Y");
			}
		}
	//
	////////////////////////
	
	////////////////////////
		//º´¿øÃÖ´ë¼­½ÄÀº ÀÇ·á¿ø¿¡¼­¸¸ ¼öÁ¤ °¡´ÉÇϵµ·Ï, 2010.05.27, ÁÖÈñ°æ
		var formuserid = model.getValue("/root/main/formlist["+row+"]/formuserid");
		if ( formuserid == "DEPT_BASE" && getUserInfo("posinstcd") != "001" && getUserInfo("posdeptcd") != "4130700000" )	
		{
			opener.defaulttab.disabled = true;		//ÀúÀå ¹öÆ° ±×·ì ºñÈ°¼ºÈ­		
			if( opentype == "save")
			{
				opener.window.javascript.setParameter("saveyn", "N");
				alert("ÃÖ´ë¼­½ÄÀº ÀÇ·á¿ø ¼Ò¼ÓÀ̾î¾ß ¼öÁ¤ °¡´É ÇÕ´Ï´Ù.");
				window.close();	
				return;
			}		
		}
	
    } // ÇÁ·Î±×·¥¼­½Ä ºí·ÎÅ·À» À§ÇÑ ºÐ±âÁ¡ end
//
////////////////////////
	
	if( opentype == "save")
	{
		//var srcformcd = opener.model.getValue("/root/main/forminfo/formmast/srcformcd");
		//var formprogflag = opener.model.getValue("/root/main/forminfo/formmast/formprogflag");
		
		//copyNode(opener.model, model, "/root/main/forminfo/formmast", "/root/temp/settingform/forminfo/formmast");
		
		copyNode(model, model, "/root/temp/settingform/forminfo/formmast", "/root/main/forminfo/formmast");
		
		copyNode(opener.model, model, "/root/main/forminfo/formmast", "/root/main/forminfo/formmast");

		/////////////
		//´Ù¸¥¼­½ÄÀ¸·Î ÀúÀå ½Ã ÀÚµ¿À¸·Î °øÀ¯ÇØÁ¦ ÀúÀå ÇØÁØ´Ù, 2010.04.16, ÁÖÈñ°æ
		var formcd = model.getValue("/root/main/forminfo/formmast/formcd");
		model.makeValue("/root/send/req/formcd",formcd);
		model.makeValue("/root/send/req/readonlyyn","Y");
		submit("TXMRF02003");
		
		model.makeValue("/root/temp/forminfo/readonlylist/readonlyyn", "Y");
		copyNode(opener.model, model, "/root/main/forminfo/readonlylist", "/root/temp/forminfo/readonlylist");
		/////////////

		//opener.model.setValue("/root/main/forminfo/formmast/srcformcd", srcformcd);		
		//opener.model.setValue("/root/main/forminfo/formmast/formprogflag", formprogflag);
	    	
	    opener.model.makeValue("/root/temp/degncmpltyn", degncmpltyn);
		opener.window.javascript.fSetDegnCmpltYN(degncmpltyn);
		opener.window.javascript.setParameter("saveyn", "Y");


	    		    	
		opener.model.refresh();
	}
	else
	{
		//copyNode(opener.model, model, "/root/main/forminfo", "/root/temp/settingform/forminfo");
		copyNode(opener.model, model, "/root/main/forminfo", "/root/main/forminfo");
		var grdpltte = opener.document.controls("grd_pltte");
		var colLevl = grdpltte.colref("degnitemlevlno");
		grdpltte.rebuild();
		
		opener.model.makeValue("/root/temp/degncmpltyn", degncmpltyn);
		opener.window.javascript.fSetDegnCmpltYN(degncmpltyn);
				
		opener.model.refresh();
		setTree(grdpltte, colLevl, grdpltte.colref("degnitemcd"), true);
	}

	gTimerID = window.setInterval( "close();", 500 );		//ºÎ¸ðâ¿¡ µ¥ÀÌÅÍ Á¶È¸ ÇÏ´Â ½Ã°£ÀÌ ¿À·¡ °É¸®¸é window.close°¡ Á¦´ë·Î ¼öÇà ¾ÈµÇ±â ¶§¹®¿¡ È®Àλç»ì, 2010.04.29, ÁÖÈñ°æ

	window.close();
}

var gTimerID;
//ºÎ¸ðâ¿¡ µ¥ÀÌÅÍ Á¶È¸ ÇÏ´Â ½Ã°£ÀÌ ¿À·¡ °É¸®¸é window.close°¡ Á¦´ë·Î ¼öÇà ¾ÈµÇ±â ¶§¹®¿¡ È®Àλç»ì, 2010.04.29, ÁÖÈñ°æ
function close()
{
	window.clearinterval(gTimerID); 
	window.close();
}

function fAppFormToPltte_old1()
{
	var row = grd_formlist.row - grd_formlist.fixedRows + 1;
	//model.setValue("/root/send/formdegnseqno", model.getValue("/root/main/formlist[" + row + "]/valu"));
	model.makeValue("/root/send/req/formcd", model.getValue("/root/main/formlist[" + row + "]/formcd"));
	model.makeValue("/root/send/req/formdegnseq", "");
	model.makeValue("/root/send/req/extnunitformlistyn", "N");
	model.makeValue("/root/send/req/cashedformdegnseq", "");
	model.makeValue("/root/send/req/sysformrecdt", "");
	model.makeValue("/root/send/req/mode", "D");
	
	submit("TRMRF02001");
	
	
	
	//debugger;
	
	if(opener.window.javascript.getParameter("opentype") == "save")
	{
		//var srcformcd = opener.model.getValue("/root/main/forminfo/formmast/srcformcd");
		//var formprogflag = opener.model.getValue("/root/main/forminfo/formmast/formprogflag");
		
		//copyNode(opener.model, model, "/root/main/forminfo/formmast", "/root/temp/settingform/forminfo/formmast");
		
		copyNode(model, model, "/root/temp/settingform/forminfo/formmast", "/root/main/forminfo/formmast");
		
		copyNode(opener.model, model, "/root/main/forminfo/formmast", "/root/main/forminfo/formmast");
		
		//opener.model.setValue("/root/main/forminfo/formmast/srcformcd", srcformcd);		
		//opener.model.setValue("/root/main/forminfo/formmast/formprogflag", formprogflag);
	    	
		opener.model.refresh();
	}
	else
	{
		//copyNode(opener.model, model, "/root/main/forminfo", "/root/temp/settingform/forminfo");
		copyNode(opener.model, model, "/root/main/forminfo", "/root/main/forminfo");
		var grdpltte = opener.document.controls("grd_pltte");
		var colLevl = grdpltte.colref("degnitemlevlno");
		grdpltte.rebuild();
		opener.model.refresh();
		setTree(grdpltte, colLevl, grdpltte.colref("degnitemcd"), true);
	}
	window.close();	
}


function fAppFormToPltte_old2()
{
	var row = grd_formlist.row - grd_formlist.fixedRows + 1;
	//model.setValue("/root/send/formdegnseqno", model.getValue("/root/main/formlist[" + row + "]/valu"));
	model.makeValue("/root/send/req/formcd", model.getValue("/root/main/formlist[" + row + "]/formcd"));
	model.makeValue("/root/send/req/formdegnseq", "");
	model.makeValue("/root/send/req/extnunitformlistyn", "N");
	model.makeValue("/root/send/req/cashedformdegnseq", "");
	model.makeValue("/root/send/req/sysformrecdt", "");
	model.makeValue("/root/send/req/mode", "D");
	
	submit("TRMRF02001");
	if(opener.window.javascript.getParameter("opentype") == "save")
	{
	    var srcformcd = opener.model.getValue("/root/main/forminfo/formmast/srcformcd");
	    var formprogflag = opener.model.getValue("/root/main/forminfo/formmast/formprogflag");
	    copyNode(opener.model, model, "/root/main/forminfo/formmast", "/root/temp/settingform/forminfo/formmast");
	    opener.model.setValue("/root/main/forminfo/formmast/srcformcd", srcformcd);
	    opener.model.setValue("/root/main/forminfo/formmast/formprogflag", formprogflag);
	    opener.model.refresh();
	}
    else
    {
        //copyNode(opener.model, model, "/root/main/forminfo", "/root/temp/settingform/forminfo");
        copyNode(opener.model, model, "/root/main/forminfo", "/root/main/forminfo");
    	var grdpltte = opener.document.controls("grd_pltte");
    	var colLevl = grdpltte.colref("degnitemlevlno");
    	grdpltte.rebuild();
    	opener.model.refresh();
    	setTree(grdpltte, colLevl, grdpltte.colref("degnitemcd"), true);
    }
	window.close();	
}

function fCheckFormcdByProgramDesign(formcd){
	
	var bFlag = false;
	
	for(var i = 1; i <= getNodesetCount("/root/main/forminfo/programdesignformlist"); i++){
		if(formcd == model.getValue("/root/main/forminfo/programdesignformlist["+i+"]/formcd")){
			bFlag = true;
			messageBox(model.getValue("/root/main/forminfo/programdesignformlist["+i+"]/message"),"I");
			break;
		}
	}
	
	return bFlag;
}