var g_ref_buf_forminfo = "/root/temp/bufform/forminfo";
var gIsCashedFormDegn = true;
var gCashedFormDegnSeq = "";


function fSetFormMast(key, val)
{
    var pageInfo = new PAGEINFO();
    model.makeValue(pageInfo.formmastRef + "/" + key, val);
}


function fGetFormMast(key)
{
    var pageInfo = new PAGEINFO();
    
    return model.getValue(pageInfo.formmastRef + "/" + key);
}


function fGetFormInfoByFormDegnCd(forminfo, formcd, formdegnseq, extnunitformlistyn, sysformrecdt, formfromdt)
{
	// 20080528 ¼Ò½º Æ©´× fGetFormInfoByFormCd, fGetFormInfoByFormDegnSeq, fGetFormInfoByExtnFormDegnSeq ÇÔ¼ö¸¦ fGetFormInfoByFormDegnCd·Î º´ÇÕ 
	// forminfo -> newform(»õ·Î¿î ¼­½Ä), recform(ÀúÀåµÈ ¼­½Ä), extnform(È®Àå ¼­½Ä)
	// alert("forminfo :"+forminfo+", formcd :"+formcd+", formdegnseq :"+formdegnseq+", extnunitformlistyn :"+extnunitformlistyn+", sysformrecdt :"+sysformrecdt+", formfromdt :"+formfromdt);
	
	if (forminfo == "recform")
	{	
	    if (sysformrecdt == null) sysformrecdt = "-";        
	    if (formfromdt == null) formfromdt = "-";	
	}
	
	var pageInfo = new PAGEINFO();
	var flag = true;
	
	if ( gIsCashedFormDegn && fExistsFormDegn(formdegnseq))
	{
		fReadFormDegn(formdegnseq);
		flag = false;
	}	
	
	if (flag)
	{
		model.makeValue("/root/send/req/formcd",                formcd);				// newform: formcd, 			recform: "", 					extnform: ""
		model.makeValue("/root/send/req/formdegnseq",           formdegnseq);			// newform: 0, 					recform: formdegnseq, 			extnform: formdegnseq
		model.makeValue("/root/send/req/extnunitformlistyn",    extnunitformlistyn);	// newform: extnunitformlistyn, recform: extnunitformlistyn,	extnform: "N"
		model.makeValue("/root/send/req/cashedformdegnseq",     gCashedFormDegnSeq);	// newform: gCashedFormDegnSeq, recform: gCashedFormDegnSeq,	extnform: gCashedFormDegnSeq
		model.makeValue("/root/send/req/sysformrecdt",          sysformrecdt);			// newform: "", 				recform: sysformrecdt, 			extnform: fGetFormRec("sysformrecdt"))
		model.makeValue("/root/send/req/formfromdt",            formfromdt);			// newform: x, 					recform: formfromdt, 			extnform: x
		
		SetUserLog("fGetFormInfoByFormDegnCd", "cashedformdegnseq", gCashedFormDegnSeq);
		
		submit("TRMRF02001");
		
		copyNode(model, model, "/root/main/forminfo", "/root/temp/forminfo");
		model.removenode("/root/temp/forminfo");
		

		if(forminfo == "newform" || forminfo == "recform")
		{
			if (gMediRecMain && isOpenModalForm(model.getValue("/root/temp/settingform/forminfo/formmast/formprogflag")))
			{	        	
				// 20080519 main2-> temp/settingform ¼Ò½º Æ©´× 
				//model.removenodeset("/root/temp/settingform/forminfo");    	        	
				return true;
			}
			else
			{
				copyNodeset(pageInfo.forminfoRef, "/root/temp/settingform/forminfo");
				
				// 20080519 main2-> temp/settingform ¼Ò½º Æ©´× 
				model.removenodeset("/root/temp/settingform/forminfo");      	        	
	        	
				if (forminfo = "newform")
				{			        
					if (fGetFormMast("formprogflag") == "OCR")
					{
					}
					else
					{
						if (gIsCashedFormDegn)
						{
							var vformdegnseq = fGetFormMast("formdegnseq");
							if ( fExistsFormDegn(vformdegnseq))  fReadFormDegn(vformdegnseq);
							else  fCashFormDegn(vformdegnseq, pageInfo.forminfoRef);
						}
					}
				} 
				else 
				{
					fCashFormDegn(formdegnseq, pageInfo.forminfoRef);		
				}
				return false;
			}
		} 
		else if (forminfo == "extnform") 
		{
			fCashFormDegn(formdegnseq, "/root/temp/settingform/forminfo");     
		}	        
	}	
}


function fExistsFormDegn(formdegnseq)
{
    var cashno = "#" + formdegnseq + "#";
    var flag = false;
    var flagnm = "false";

    if (gCashedFormDegnSeq.indexOf(cashno) > -1)
    {
        flag = true;
        flagnm = "true";
    }

    SetUserLog("fExistsFormDegn", cashno, flagnm);

    return flag;
}


function fCashFormDegn(formdegnseq, srcPath)
{
    var pageInfo = new PAGEINFO();
    model.makeValue(srcPath + "/formdegnseq", formdegnseq);
    copyNodeset(g_ref_buf_forminfo, srcPath, "add", model, model);

    var cashno = "#" + formdegnseq + "#";
    if (gCashedFormDegnSeq == "")
        gCashedFormDegnSeq += cashno;
    else
        gCashedFormDegnSeq += "." + cashno;

    SetUserLog("cashedformdegnseq", "", gCashedFormDegnSeq);
}


function fReadFormDegn(formdegnseq)
{
    var pageInfo = new PAGEINFO();
    copyNodeset(pageInfo.forminfoRef, g_ref_buf_forminfo+"[formdegnseq='"+formdegnseq+"']", "replace", model, model);
}


function fGetExtnUnitFormInfo(baseunitformdegnseq, extnunitformdegnseq)
{   
    model.makeValue("/root/send/reqextnunitform/baseunitformdegnseq", baseunitformdegnseq);
    model.makeValue("/root/send/reqextnunitform/extnunitformdegnseq", extnunitformdegnseq);

    submit("TRMRF02002");

//    var pageInfo = new PAGEINFO();
//    copyNodeset(pageInfo.forminfoRef, "/root/temp/settingform/forminfo");

    var cnt = getNodesetCnt(model, "/root/temp/settingform/forminfo/formdegn");

    if (cnt == 0)
        return "";
    else
        return fGetCSVByFormInfo("/root/temp/settingform/forminfo");

    
//    var formdegnseq = baseunitformdegnseq +"-"+ extnunitformdegnseq;
//    var pageInfo = new PAGEINFO();
//    var flag = true;
//    var sFormInfo = "";
//    var path = "";
//    var nodes;
//
//    if ( gIsCashedFormDegn && fExistsFormDegn(formdegnseq))
//    {
//        path = g_ref_buf_forminfo+"[formdegnseq='"+formdegnseq+"']";
//        flag = false;
//    }
//    
//    if (flag)
//    {
//        model.makeValue("/root/send/reqextnunitform/baseunitformdegnseq", baseunitformdegnseq);
//        model.makeValue("/root/send/reqextnunitform/extnunitformdegnseq", extnunitformdegnseq);
//
//        submit("TRMRF02002");
//
//        copyNodeset(pageInfo.forminfoRef, "/root/temp/settingform/forminfo");
//
//        fCashFormDegn(formdegnseq, "/root/temp/settingform/forminfo");
//
//        SetUserLog("fGetExtnUnitFormInfo", "fCashFormDegn", formdegnseq);
//    }
//    
//    return fGetCSVByFormInfo();
}


function fGetCSVByFormInfo(path)
{
    if (path == null)
        path = "/root/temp/settingform/forminfo";

    var nodes = instance1.selectNodes(path + "/formmast");
    var sFormMast = getNodeListCSV(nodes);

    nodes = instance1.selectNodes(path + "/formdegn");
    var sFormDegn = getNodeListCSV(nodes);

    nodes = instance1.selectNodes(path + "/vallist");
    var sValList = getNodeListCSV(nodes);

    nodes = instance1.selectNodes(path + "/imgelist");
    var sImgeList = getNodeListCSV(nodes);

    var info = sFormMast +INFO_CSV_DEL+ sFormDegn +INFO_CSV_DEL+ sValList +INFO_CSV_DEL+ sImgeList;

    // 20080519 main2-> temp/settingform ¼Ò½º Æ©´× 
    model.removenodeset("/root/temp/settingform/forminfo");    	        	

    return info;
}


function fSetFormInfoByCSV(csvStr)
{
    var info = csvStr.split(INFO_CSV_DEL);

    setCSVToNode(gPageInfo.forminfoRef, info[0], "formmast");
    setCSVToNode(gPageInfo.forminfoRef, info[1], "formdegn");
    setCSVToNode(gPageInfo.forminfoRef, info[2], "vallist");
    setCSVToNode(gPageInfo.forminfoRef, info[3], "imgelist");
}


function fSaveFormInfo()
{
    submit("TXMRF02001"); 
    
    if (model.getValue("/root/temp/settingform/savedforminfo/formcd").indexOf('/') == 0)
    {
    	messageBox(model.getValue("/root/temp/settingform/savedforminfo/formcd"), "E008");
    }
}