var TX_SUBMIT_COMN_FORM = "TXMMR01301";
var TX_SUBMIT_EXTN_FORM = "TXMMR01303";

var gPageInfo = new PAGEINFO();

/**
 * @desc   : ±â·ÏÁ¤º¸ º¯¼ö ÃʱâÈ­
 * @id     :
 * @event  : xforms-ready
 * @return : void
 * @authur : ¹ÚÁ¾ÈÆ
 */
function SAVED_INFO()
{
    this.formrecseq = 0;
    this.rechistseq = 0;
}

/**
 * @desc   : ȯÀÚÁ¤º¸ º¯¼ö ÃʱâÈ­
 * @id     :
 * @event  : xforms-ready
 * @return : void
 * @authur : ¹ÚÁ¾ÈÆ
 */
function COMN_CONT_RECCNTS()
{
    this.pid = "";
    this.recfromdt = "";
    this.rectodt = "";
    this.formrecdeptcd = "";
    this.chosflag = "";

    this.formrecseq = "";
    this.formcd = "-";
}

/**
 * @desc   : ±â·ÏÇ׸ñ º¯¼ö ÃʱâÈ­
 * @id     :
 * @event  : xforms-ready
 * @return : void
 * @authur : ¹ÚÁ¾ÈÆ
 */
function RECITEM_INFO()
{
    this.pid = "";

    this.degnitemkind = "";
    this.degnitemcd = "";
    this.degnitemlevlcd = "";
    this.rectermcd = "";
    this.recitemcd = "";
    this.reccnts = "";
}

 /**
 * @group  :
 * @ver    : 2008.06.13
 * @by     : snoweye
 * @---------------------------------------------------
 * @type   : struct
 * @access : public
 * @desc   : ºÎ¸ð È­¸éÀ¸·Î onloadcomplete À̺¥Æ®¸¦ dispatch
 * @param  : formcd - ÇöÀç ·ÎµùÀÌ ¿Ï·áµÈ ¼­½ÄÄÚµå
 * @param  : curformtype - ·ÎµùÀÌ ¿Ï·áµÈ ¼­½ÄÀÇ Á¾·ù (COMN_FORM/UNIT_FORM/GENL_FORM)
 * @return :
 * @---------------------------------------------------
 */
/*
function FORM_LOAD_STATUS()
{
    this.curformcd = "";
    this.curformtype = "";
    this.loadlist = new ActiveXObject("Scripting.Dictionary");
}
*/
/**
 * @group  :
 * @ver    : 2008.06.13
 * @by     : snoweye
 * @---------------------------------------------------
 * @type   : function
 * @access : private
 * @desc   : ¼­½Ä ·Îµù»óŸ¦ ¼¼ÆÃ
 * @param  : obj - loadstatus¸¦ ¼¼ÆÃÇÒ °´Ã¼
 * @param  : formcd - ÇöÀç ·ÎµùÀÌ ¿Ï·áµÈ ¼­½ÄÄÚµå
 * @param  : curformtype - ·ÎµùÀÌ ¿Ï·áµÈ ¼­½ÄÀÇ Á¾·ù (COMN_FORM/UNIT_FORM/GENL_FORM)
 * @return :
 * @---------------------------------------------------
 */
function setLoadStatus(obj, curformcd, curformtype)
{
    loadstatus = obj.window.javascript.gFormLoadStatus;

    loadstatus.curformcd = curformcd;
    loadstatus.curformtype = curformtype;
    //loadstatus.loadlist.add(curformcd, LOAD_COMPLETE);
}


/**
 * @desc   : ÃÊÁø, ÀçÁø±â·ÏÁö ¿©ºÎ
 * @id     :
 * @event  : xforms-ready
 * @return : void
 * @authur : ¹ÚÁ¾ÈÆ
 */
function IsComnMediForm(srcformcd)
{
    var flag = false;
    switch (srcformcd)
    {
        case "0000000001" :
        case "0000000002" :
        case "0000000003" :
        case "0000000004" :
            flag = true;
            break;
    }

    return flag;
}

/**
 * @desc   : ±â·Ï°ª ¼ÂÆÃ
 * @id     :
 * @event  :
 * @return : void
 * @authur : ¹ÚÁ¾ÈÆ
 */
function SetCommMediFormValue(pItemCds, reciteminfo)
{
    var ivwObj;
    var flag;
    for (var i=0; i<pItemCds.length; i++)
    {
        ivwObj = document.controls("ivw_" + pItemCds[i]);

        //2010.03.09 ¾ÈÄ¡¿ø - ±â·Ï³»¿ë¿¡¼­ ºÎºÐ¼­½ÄÀÇ Copy°¡ ¾ÈµÇ´Â ¿À·ù ¼öÁ¤
        //if (ivwObj != null && ivwObj.attribute("ctrluseyn") == "Y")
        if (ivwObj != null && ivwObj.attribute("unitformcd") != "")
	        flag = SetMediFormValue(ivwObj.model, reciteminfo);
	    else
	    	flag = SetMediFormValue(model, reciteminfo);

        if (flag) break;
    }
    return flag;
}

var MMR_REC_INFO = "/root/main/recinfo/recitem";

var MMR_FORM_INFO = "/root/main/forminfo/formdegn";
/**
 * @desc   : ±â·Ï°ª ¼ÂÆÃ
 * @id     :
 * @event  :
 * @return : void
 * @authur : ¹ÚÁ¾ÈÆ
 */
function SetMediFormValue(pModel, reciteminfo)
{









    var nodeSet = MMR_REC_INFO;
    
    //2010-05-28 ¿ÀÀü 9:299:42 ÀÌÁö¿î Ãß°¡ : MSL -> ºÎºÐ¼­½ÄÁö·Î º¹»çÇÒ°æ¿ì ¹ß»ýÇÏ´Â ¿À·ù ¼öÁ¤
    if(reciteminfo.degnitemkind == "MSL"){
    	nodeSet = nodeSet + "[degnitemlevlcd='" +reciteminfo.degnitemlevlcd+ "' and colno='" +reciteminfo.colno+ "']";
    }else{
    	nodeSet = nodeSet + "[degnitemlevlcd='" +reciteminfo.degnitemlevlcd+ "']";
    }
    
    var xPathFunction = "count(" + nodeSet + ")";

    var cnt = pModel.getXPathValue(xPathFunction);
    if (cnt == 1)
    {
    	//2009-10-07 ¿ÀÈÄ 7:59:42 °­ÁöÈÆ Ãß°¡ : MTX -> ºÎºÐ¼­½ÄÁö·Î º¹»çÇÒ°æ¿ì ¹ß»ýÇÏ´Â ¿À·ù ¼öÁ¤
    	var nodeCnt
    	if(reciteminfo.degnitemkind == "MTX"){
    		var otherNodeSet = MMR_FORM_INFO + "[degnitemkind != 'MTX' and contains(degnitemlevlcd, '" + reciteminfo.degnitemlevlcd + ".')]";
    		nodeCnt = pModel.getXPathValue("count(" + otherNodeSet + ")");
    	}
    	else{
    		nodeCnt = 0;
    	}
    
        var degnitemno = pModel.getXPathValue(nodeSet+"/degnitemno");

        var degncntrviewflag = pModel.getXPathValue(MMR_FORM_INFO + "[degnitemno='" +degnitemno+ "']/degncntrviewflag");

        if (degncntrviewflag != "L" && nodeCnt == 0)
        {
            pModel.setValue(nodeSet+"/rectermcd", reciteminfo.rectermcd);
            
            if (reciteminfo.rectermcd != "")
            {
            	pModel.setValue(nodeSet+"/rectermnm", reciteminfo.rectermnm);
            	
            	if(reciteminfo.degnitemkind == "MSL" && reciteminfo.reccnts != ""){
            		pModel.setValue(nodeSet+"/reccnts",   reciteminfo.reccnts);
            	}
            }
            else
            {
                pModel.setValue(nodeSet+"/reccnts",   reciteminfo.reccnts);
            }
            
           //2016.05.11 ÀÔ¿øÃÊÁø±â·Ï ±³À°ÀÏÀÚ ³»¿ë º¹»ç½Ã ±âÁØÀÏÀÚ ±âÁØÀ¸·Î ¼³Á¤
            try{
	            var nSrcFormcd = parent.window.javascript.fGetFormRec("srcformcd");
	            var nDegnitemlevlcd = reciteminfo.degnitemlevlcd;
	            if( !isNull(nSrcFormcd) && nSrcFormcd == "0000000003" 
					&& !isNull(nDegnitemlevlcd) && nDegnitemlevlcd == "0006747.0000160"){
					lf_setEduDt();
				}
            }catch(e){
            }

            pModel.refresh();
        }

        return true;
    }
    else
    {
        return false;
    }
}

/**











































































 * @desc   : ±â·Ï°ª Clear
 * @id     :
 * @event  :
 * @return : void
 * @authur : ¹ÚÁ¾ÈÆ
 */
function ClearComnFormData(itemCds)
{
    var ctrlIvw;
    for (var i = 0; i < itemCds.length; i++)
    {
        ctrlIvw = document.controls("ivw_" + itemCds[i]);

        if (ctrlIvw != null && ctrlIvw.visible && ctrlIvw.src != "")
            ctrlIvw.window.javascript.clearData();
    }

    var pageInfo = new PAGEINFO();
    model.removeNodeset(pageInfo.extnrecItemRef);
    model.removeNodeset(pageInfo.imgerecItemRef);
    model.removeNodeset(pageInfo.fmyrecItemRef);
    model.removeNodeset(pageInfo.etcrecItemRef);
    model.removeNodeset(pageInfo.lastdiagItemRef); //2010-03-31 ¿ÀÀü 10:08:49 °­ÁöÈÆÃß°¡ : ÃÖÁ¾Áø´Ü¸í ¿ä¾à Ãß°¡
    
    model.removeNodeset(pageInfo.recRef2);
    //model.removeNodeset(pageInfo.recItemRef);
    copyNodeset(pageInfo.recRef, pageInfo.initrecRef, "replace", model, model);
    model.removeNodeset("/root/properties/parameters");
    model.makeNode("/root/properties/parameters");
}

/**
 * @desc   : À̹ÌÁö ÆíÁýÈ­¸é Open
 * @id     :
 * @event  :
 * @return : void
 * @authur : ¹ÚÁ¾ÈÆ
 */
function OpenUnitFormImge(fstlevlitemcd, ivwid)
{
    if (fstlevlitemcd == null)
    {
        var ctrlID = event.target;
        fstlevlitemcd = ctrlID.replace("btn_imge_", "");
    }

    if (ivwid == null)
        ivwid = "ivw_" + fstlevlitemcd;

    var pageInfo = new PAGEINFO();
    var node = model.instances(0).selectSingleNode(pageInfo.formdegnRef + "[degnitemcd = '"+fstlevlitemcd+"']");

    setParameter("openmode",        "MediRec");
    setParameter("formcd",          parent.window.javascript.fGetFormMast("formcd"));
    setParameter("formdegnseq",     parent.window.javascript.fGetFormMast("formdegnseq"));
    setParameter("fstlevlitemcd",   fstlevlitemcd);
    setParameter("degnitemlevlcd",  node.getXPathString("degnitemlevlcd"));
    setParameter("degnitemlevlno",  node.getXPathString("degnitemlevlno"));
    setParameter("ivwid",           ivwid);
    
    //ºÎºÐ¼­½Ä ·Îµù
    var ctrl = document.controls("lbl_" + fstlevlitemcd);
    
    if (ctrl != null)
    {
        loadClickSection(fstlevlitemcd);
    }
    
    var retVal = modalUrl("../../../emr/medirecweb/xrw/SMMMR03600_À̹ÌÁöÆíÁý.xrw",1,100,100,"À̹ÌÁöÆíÁý");
    
    /**
     * @desc   : °øÅë¼­½Ä³»ÀÇ È®Àå¹öÆ°(À̹ÌÁö,°¡°èµµ,Ãß°¡±â·Ï)À» ±â·Ï¿©ºÎ¿¡ µû¶ó Ç¥½ÃÇÑ´Ù.
     * @history : 2009.09.09    ½Å±Ô   ¾ÈÄ¡¿ø    ACW_090909A
     */
    try {
        setButtonToggleByRecYn(null, event.target);
    } catch (e) {
    }
    
    return retVal;
}

/**
 * @desc   : °¡°èµµ ÆíÁýÈ­¸é Open
 * @id     :
 * @event  :
 * @return : void
 * @authur : ¹ÚÁ¾ÈÆ
 */
function OpenUnitFormFmy(fstlevlitemcd, ivwid)
{
    if (fstlevlitemcd == null)
    {
        var ctrlID = event.target;
        fstlevlitemcd = ctrlID.replace("btn_fmy_", "");
    }
    
    //ºÎºÐ¼­½Ä ·Îµù
    var ctrl = document.controls("lbl_" + fstlevlitemcd);
    
    if (ctrl != null)
    {
        loadClickSection(fstlevlitemcd);
    }

    openFamilyDiagram(fstlevlitemcd);

    /**
     * @desc   : °øÅë¼­½Ä³»ÀÇ È®Àå¹öÆ°(À̹ÌÁö,°¡°èµµ,Ãß°¡±â·Ï)À» ±â·Ï¿©ºÎ¿¡ µû¶ó Ç¥½ÃÇÑ´Ù.
     * @history : 2009.09.09    ½Å±Ô   ¾ÈÄ¡¿ø    ACW_090909A
     */
    try {
        setButtonToggleByRecYn(null, event.target);
    } catch (e) {
    }    
}

/**
 * @desc   : ¼­½Ä ±â·Ï Ç׸ñ ÃʱâÈ­
 * @id     :
 * @event  :
 * @return : void
 * @authur : ¹ÚÁ¾ÈÆ
 */
function InitUnitFormData(itemCds)
{
    var ctrlIvw;
    var pageInfo = new PAGEINFO();

    //var degnitemcdlist = model.instances(0).selectNodes(pageInfo.formdegnRef + "[degnitemkind = 'FRM' and itemuseflag='F0']/degnitemcd");
    //var supdegnitemcdlist = model.instances(0).selectNodes(pageInfo.formdegnRef + "[degnitemkind = 'FRM' and itemuseflag='F0']/supdegnitemcd");
    var frmlist = model.instances(0).selectNodes(pageInfo.formdegnRef + "[degnitemkind = 'FRM' and itemuseflag='F0']");

    for (var i = 0; i < frmlist.length; i++)
    {
        var degnitemcd = frmlist.item(i).selectSingleNode("degnitemcd").text;
        var supdegnitemcd = frmlist.item(i).selectSingleNode("supdegnitemcd").text;
        var degnitemlevlcd = frmlist.item(i).selectSingleNode("degnitemlevlcd").text;

        ctrlIvw = document.controls("ivw_" + supdegnitemcd);

        if (ctrlIvw != null && ctrlIvw.visible && ctrlIvw.src != "")
        {
            ctrlIvw.window.javascript.clearData();

            var fstlevlitembasecd = degnitemlevlcd.split(".")[0];
            var fstlevlitemcd = model.getValue(gPrePath_formdegnRef + "degnitemlevlcd = '" + fstlevlitembasecd + "']/degnitemcd");

            setSrchData(pageInfo.recItemRef2 + "[fstlevlitemcd='" +fstlevlitemcd+ "' and formcd = '" + degnitemcd + "']", ctrlIvw);
                  
				ctrlIvw.window.javascript.fFormReload();
        }
    }

    model.removeNodeset(pageInfo.extnrecItemRef);
    var cnt = getNodesetCnt(model, pageInfo.forminfoRef + "/extnformlist");
    for (var i = 1; i <= cnt; i++)
    {
    
//        stmt = pageInfo.recItemRef2 + "[degnitemkind != 'FDG' and fstlevlitemcd='" +model.getValue(pageInfo.forminfoRef + "/extnformlist[" +i+ "]/supdegnitemcd")+
//            "' and formcd = '" + model.getValue(pageInfo.forminfoRef + "/extnformlist[" +i+ "]/formcd") + "']";

        //°¡°èµµ´Â È®Àå¼­½Ä¿¡ ºÙÀ¸¸é ¾ÈµÇ´Â ¹®Á¦·Î ¼öÁ¤(¹ÚÁ¾ÈÆ/2008-09-29)    
        stmt = pageInfo.recItemRef2 + "[degnitemkind != 'FDG' and fstlevlitemcd='" +model.getValue(pageInfo.forminfoRef + "/extnformlist[" +i+ "]/supdegnitemcd")+
            "' and formcd = '" + model.getValue(pageInfo.forminfoRef + "/extnformlist[" +i+ "]/formcd") + "']";

        copyNodeset(pageInfo.extnrecItemRef, stmt, "append", model, model);
        model.removeNodeset(stmt);
    }

    copyNodeset(pageInfo.imgerecItemRef, pageInfo.recItemRef2 + "[degnitemkind='IMG' and rowno != '']", "replace", model, model);
    copyNodeset(pageInfo.fmyrecItemRef + "/recitem", pageInfo.recItemRef2 + "[degnitemkind='FDG']", "replace", model, model);
    copyNodeset(pageInfo.etcrecItemRef + "/recitem", pageInfo.recItemRef2 + "[degnitemno='0']", "replace", model, model);
    copyNodeset(pageInfo.lastdiagItemRef + "/recitem", pageInfo.recItemRef2 + "[formcd = '1000007943']", "replace", model, model); //2010-03-31 ¿ÀÀü 10:09:29 °­ÁöÈÆ Ãß°¡ : ÃÖÁ¾Áø´Ü¸í ¿ä¾àÁö Ãß°¡
    
}

/**
 * @desc   : ¼­½Ä ±â·Ï À̹ÌÁö ÃʱâÈ­
 * @id     :
 * @event  :
 * @return : void
 * @authur : ¹ÚÁ¾ÈÆ
 */
function InitUnitFormImgeData(itemCds)
{
    var ctrlIvw;
    var imgelist;
    var node;
    var pageInfo = new PAGEINFO();

    for (var i = 0; i < itemCds.length; i++)
    {
        ctrlIvw = document.controls("ivw_" + itemCds[i]);

        imgelist = ctrlIvw.model.instances(0).selectNodes(pageInfo.recItemRef+"[degnitemkind='IMG']");

        if (imgelist.length > 0)
        {
            copyNodeset(pageInfo.imgerecItemRef, pageInfo.recItemRef + "[degnitemkind='IMG']", "replace", model, ctrlIvw.model);

            for (var j = 0; j < imgelist.length; j++)
            {
                node = model.instances(0).selectSingleNode(pageInfo.imgelistRef + "[imgecd='"+ imgelist.item(j).getXPathString("degnitemcd") +"']/imgedata");
                if (node != null)
                {

                }
            }
        }
    }

    copyNodeset(pageInfo.imgerecItemRef, pageInfo.recItemRef2 + "[degnitemkind='IMG']", "replace", model, model);
}

/**
 * @desc   : ÇÁ·Î±×·¥ ¼­½Ä µ¥ÀÌÅÍ ÃʱâÈ­
 * @id     :
 * @event  :
 * @return : void
 * @authur : ¹ÚÁ¾ÈÆ
 */
function InitPgmFormData()
{
    var pageInfo = new PAGEINFO();
    setSrchData(pageInfo.recItemRef2 , window);
}

/**
 * @desc   : ¼­½ÄÇ׸ñ ±âº» »çÀÌÁî
 * @id     :
 * @event  :
 * @return : void
 * @authur : ¹ÚÁ¾ÈÆ
 */
function SetUnitFormOrgSize(pItemCds, iheig, oheig)   //20100316
{
    var grupObj;
    var ctrlIvw;
    for (var i = 0; i < pItemCds.length; i++)
    {
        grupObj = document.controls("grup_" + pItemCds[i]);
        ctrlIvw = document.controls("ivw_" + pItemCds[i]);

        if (grupObj.attribute("orgheight") == "" || grupObj.attribute("orgheight") == null)
        {
            grupObj.attribute("orgheight") = oheig;
            ctrlIvw.attribute("orgheight") = iheig;
        }
        else
        {
            if (iheig == null || iheig == "")
            {
                grupObj.attribute("height") = grupObj.attribute("orgheight");
                ctrlIvw.attribute("height") = ctrlIvw.attribute("orgheight");
            }
            else
            {
                grupObj.attribute("height") = oheig;
                ctrlIvw.attribute("height") = iheig;
            }
            
            SetMultiTextFull(ctrlIvw, 1);
        }
        
        var extngrupObj = document.controls("grup_extn" + pItemCds[i]);
        
        if (extngrupObj == null)
            continue;
            
        grupObj.attribute("visibility") = "visible";
        extngrupObj.attribute("visibility") = "visible";
        
    }
}

/**
 * @desc   : ¼­½ÄÇ׸ñ ±âº» »çÀÌÁî
 * @id     :
 * @event  :
 * @return : void
 * @authur : ¹ÚÁ¾ÈÆ
 */
function SetUnitFormOrgSizeCnst(pItemCds, iheigArr, oheigArr)
{
    var grupObj;
    var ctrlIvw;
    for (var i = 0; i < pItemCds.length; i++)
    {
        grupObj = document.controls("grup_" + pItemCds[i]);
        ctrlIvw = document.controls("ivw_" + pItemCds[i]);

        if (grupObj.attribute("orgheight") == "" || grupObj.attribute("orgheight") == null)
        {
            grupObj.attribute("orgheight") = oheigArr[i];
            ctrlIvw.attribute("orgheight") = iheigArr[i];
        }
        else
        {
            if (iheigArr == null || iheigArr == "")
            {
                grupObj.attribute("height") = grupObj.attribute("orgheight");
                ctrlIvw.attribute("height") = ctrlIvw.attribute("orgheight");
            }
            else
            {
                grupObj.attribute("height") = oheigArr[i];
                ctrlIvw.attribute("height") = iheigArr[i];
            }
            
            SetMultiTextFull(ctrlIvw, 1);
        }
        
        var extngrupObj = document.controls("grup_extn" + pItemCds[i]);
        
        if (extngrupObj == null)
            continue;
            
        grupObj.attribute("visibility") = "visible";
        extngrupObj.attribute("visibility") = "visible";
    }
}

/**
 * @desc   : ¼­½ÄÇ׸ñ ÃÖ´ë »çÀÌÁî
 * @id     :
 * @event  :
 * @return : void
 * @authur : ¹ÚÁ¾ÈÆ
 */
function SetUnitFormFullSize(pItemCd, pIdx, pItemCds, pPageIdx, pGrupBase)
{
    var grupObj;
    var toppos = 0;

    //for (var i = 0; i < pPageIdx.length; i++)
    for (var i = 0; i < pItemCds.length; i++)
    {
        grupObj = document.controls("grup_" + pItemCds[i]);
        extngrupObj = document.controls("grup_extn" + pItemCds[i]);

        if(grupObj == null)
            continue;

        grupObj.attribute("sizeFlag") = "full";

        if (pPageIdx[i] == pIdx)
        {
            if (pItemCds[i] == pItemCd)
            {
                grupObj.attribute("top") = 0;
                
                grupObj.attribute("orgheight") = grupObj.attribute("height");
                grupObj.attribute("height") = pGrupBase.attribute("height");

                var grupbase_hei = parseInt(pGrupBase.attribute("height"));
                var ctrlIvw = document.controls("ivw_" + pItemCds[i]);
                ctrlIvw.attribute("orgheight") = ctrlIvw.attribute("height");
                ctrlIvw.attribute("height") = parseInt(pGrupBase.attribute("height")) - parseInt(ctrlIvw.attribute("top"));

                //grupObj.attribute("visibility") = "visible";
                //extngrupObj.attribute("visibility") = "visible";

                SetMultiTextFull(ctrlIvw, 1);
            }
            else
            {

                grupObj.attribute("visibility") = "hidden";
                extngrupObj.attribute("visibility") = "hidden";
            }

        }
        else
        {

            grupObj.attribute("visibility") = "hidden";
            extngrupObj.attribute("visibility") = "hidden";
        }
    }
}

/**
 * @desc   : ¼­½ÄÇ׸ñ visible hidden
 * @id     :
 * @event  :
 * @return : void
 * @authur : ¹ÚÁ¾ÈÆ
 */
function InitUnitFormLayer(itemCds, pageIdx, pageCnt, grup)
{
    SetUserTimeLog("InitUnitFormLayer", "START");
    var pageInfo = new PAGEINFO();
    var i = 0;
    var pagePerSecCnt = new Array(pageCnt);
    for (i = 0; i < pagePerSecCnt.length; i++)
    {
        pagePerSecCnt[i] = 0;
    }
    var ctrlGrup;
    var existCtrl;
    // ¾Èº¸ÀÌ°Ô Çϱâ
    for (i = 0; i < itemCds.length; i++)
    {
        ctrlGrup = document.controls("grup_" + itemCds[i]);
        existCtrl = model.getValue(pageInfo.formdegnRef + "[degnitemcd='" + itemCds[i] + "']/degnitemcd");

        if (existCtrl == "")
        {
            ctrlGrup.visible = false;
        }
        else
        {
            ctrlGrup.visible = true;
            pagePerSecCnt[pageIdx[i]]++;
        }
    }

    // º¸À̴°ŠºÐÇÒÇϱâ À§ÇÑ ³ôÀÌ ±¸Çϱâ
    var pagePerTopPt = new Array(0 ,0, 0);
    var swtHei = parseInt(grup.attribute("height")) - 1;
    for (i = 0; i < pagePerSecCnt.length; i++)
    {
        if (pagePerSecCnt[i] == 1)
        {
            pagePerTopPt[i] = swtHei;
        }
        else
        {
            pagePerTopPt[i] = parseInt(swtHei / pagePerSecCnt[i]);
        }
    }

    // º¸À̴°ŠºÐÇÒÇϱâ
    var topPt = 0;
    var prePageIdx = -1;
    var ctrlLbl;
    var ctrlExtn;
    var ctrlIvw;
    var ctrlCbo;
    var swtWid = parseInt(grup.attribute("width"));
    var grupHei;
    var toppos = 0;
    var grupextnHei = 0;

    for (i = 0; i < itemCds.length; i++)
    {
        ctrlGrup = document.controls("grup_" + itemCds[i]);

        if (ctrlGrup.visible)
        {
            // º¸À̴°ŠÀ§Ä¡Àâ±â
            grupHei = pagePerTopPt[pageIdx[i]];
            if (prePageIdx != pageIdx[i])
                topPt = 0;
            else
                topPt += grupHei;

            prePageIdx = pageIdx[i];

            ctrlGrup.attribute("left") = 0;

            // º¸À̴°Šũ±â Á¶Á¤
            ctrlLbl = document.controls("lbl_" + itemCds[i]);
            ctrlExtn= document.controls("grup_extn" + itemCds[i]);
            ctrlIvw = document.controls("ivw_" + itemCds[i]);
            ctrlCbo = document.controls("cbo_" + itemCds[i]);

            toppos = parseInt(ctrlLbl.attribute("height"));

            ctrlIvw.attribute("border-style") = "none";

            if (ctrlGrup.attribute("degnflag") != "fix")
            {
                ctrlGrup.attribute("top") = topPt;
                ctrlGrup.attribute("width") = swtWid - 2;
                ctrlGrup.attribute("height") = grupHei - 1;
            }

            if (ctrlExtn != null)
            {
                grupextnHei = parseInt(ctrlExtn.attribute("height"));

                ctrlExtn.attribute("left") = 0;
                ctrlExtn.attribute("top") = ctrlLbl.attribute("height");
                ctrlExtn.attribute("width") = ctrlGrup.attribute("width");
                ctrlExtn.attribute("orgheight") = ctrlExtn.attribute("height");

                ctrlExtn.attribute("border-style") = "none";
                ctrlExtn.attribute("overflow") = "visible";
            }
            else
            {
                grupextnHei = 0;
            }

            ctrlGrup.attribute("orgwidth") = ctrlGrup.attribute("width");
            ctrlGrup.attribute("orgheight") = ctrlGrup.attribute("height");

            ctrlLbl.attribute("top") = 0;
//            ctrlIvw.attribute("top") = ctrlLbl.attribute("height");
            ctrlIvw.attribute("top") = toppos + grupextnHei;

            ctrlIvw.attribute("height") = parseInt(ctrlGrup.attribute("height")) - parseInt(ctrlIvw.attribute("top")) - 1;
            ctrlIvw.attribute("orgheight") = ctrlIvw.attribute("height");

            ctrlLbl.attribute("left") = 0;
            ctrlIvw.attribute("left") = 0;
            //ctrlCbo.attribute("left") = parseInt(ctrlGrup.attribute("width")) - parseInt(ctrlCbo.attribute("width")) - 2;

            ctrlGrup.attribute("orgtop") = ctrlGrup.attribute("top");
            ctrlGrup.attribute("orgleft") = ctrlGrup.attribute("left");

            ctrlLbl.attribute("width") = ctrlGrup.attribute("width");
            ctrlIvw.attribute("width") = ctrlGrup.attribute("width");

            ctrlGrup.attribute("overflow") = "visible";
        }
    }

    var ctrlTar;
    for (i = 0; i < itemCds.length; i++)
    {
    	ctrlIvw = document.controls("ivw_" + itemCds[i]);
    	ctrlTar = document.controls("tar_" + itemCds[i]);

    	if (ctrlTar != null)
    	{
	    	ctrlTar.attribute("top")  	= ctrlIvw.attribute("top");
	        ctrlTar.attribute("left") 	= ctrlIvw.attribute("left");
	        ctrlTar.attribute("width")  = ctrlIvw.attribute("width");
	        ctrlTar.attribute("height") = ctrlIvw.attribute("height");

	        ctrlTar.attribute("orgtop")    = ctrlIvw.attribute("orgtop");
	        ctrlTar.attribute("orgheight") = ctrlIvw.attribute("orgheight");
        }
    }

    model.refresh();
    SetUserTimeLog("InitUnitFormLayer", "END");
}

/**
 * @desc   : ¼­½ÄÇ׸ñ ÃʱâÈ­
 * @id     :
 * @event  :
 * @return : void
 * @authur : ¹ÚÁ¾ÈÆ
 */
function InitUnitForm(itemCds, pageIdx, pageCnt, grup)
{
    InitUnitFormLayer(itemCds, pageIdx, pageCnt, grup);

    InitSetUnitForm(itemCds, true);
}

var gLoadUnitFormCnt = 0;
var gLoadedUnitFormCnt = 0;

/**
 * @desc   : ÀÚÀ¯ÀÔ·Â Textarea(ºÎºÐ¼­½Ä ´ëü)
 * @id     :
 * @event  :
 * @return : void
 * @authur : ¹ÚÁ¾ÈÆ
 */
function InitLoadSection(itemCds)
{
    var pageInfo = new PAGEINFO();
    for (var i = 0; i < itemCds.length; i++)
    {
        var cnt = getNodesetCnt(model, pageInfo.forminfoRef + "/unitformmast[orgsupdegnitemcd='"+itemCds[i]+"']");
        var ivwObj = document.controls("ivw_" + itemCds[i]);
        var tarObj = document.controls("tar_" + itemCds[i]);

//alert(itemCds[i]+", "+model.getValue(pageInfo.forminfoRef + "/unitformmast/orgsupdegnitemcd"));

        if (cnt == 0)
        {
            //alert(itemCds[i]+", true");
            ivwObj.visible = false;
            tarObj.visible = true;

            //ivwObj.attribute("ctrluseyn") = "N";
            //tarObj.attribute("ctrluseyn") = "Y";
        }
        else
        {
            //alert(itemCds[i]+", false");
            ivwObj.visible = true;
            tarObj.visible = false;

            //ivwObj.attribute("ctrluseyn") = "Y";
            //tarObj.attribute("ctrluseyn") = "N";
        }

        if (tarObj.visible == true)
        {
        	setComnEvent(parent.window.javascript.fGetFormMast("srcformcd"), tarObj.attribute("degnitemno"), tarObj.attribute("id"));
        }

        var cboObj = document.controls("cbo_" + gItemCds[i]);

        if (cboObj != null)
            SetUnitFormList(cboObj, gItemCds[i])
    }

    InitSetUnitForm(itemCds, true);

    makeRefByDegnitemno();
}

/*
 * @desc   : ºÎºÐ¼­½Ä Load
 * @id     :
 * @event  :
 * @return : void
 * @authur : ¹ÚÁ¾ÈÆ
*/
function InitSetUnitForm(itemCds, pDraw)
{
    SetUserTimeLog("InitSetUnitForm", "START");
    var pageInfo = new PAGEINFO();
    var ctrlIvw;

    gLoadUnitFormCnt = itemCds.length;
    gLoadedUnitFormCnt = 0;

    for (var i = 0; i < itemCds.length; i++)
    {
       //try
       //{
            var unitformcd = model.getValue(pageInfo.formdegnRef + "[supdegnitemcd='" + itemCds[i] +
                "' and degnitemkind = 'FRM' and itemuseflag = 'F0']/degnitemcd");

            if (unitformcd != "")
            {
                ctrlIvw = document.controls("ivw_" + itemCds[i]);
                ctrlIvw.attribute("supdegnitemcd") = itemCds[i];
                ctrlIvw.attribute("unitformcd") = unitformcd;

                SetUnitForm(ctrlIvw, unitformcd, pDraw);
            }
            ctrlCbo = document.controls("cbo_" + itemCds[i]);
            SetUnitFormList(ctrlCbo,  itemCds[i]);
       //}
       //catch (e)
       //{
       //    alert("[ERROR] InitUnitForm : " + itemCds[i]);
       //    throw e;
       //}
    }
    SetUserTimeLog("InitSetUnitForm", "END");
}

/**
 * @desc   : ºÎºÐ¼­½Ä Set
 * @id     :
 * @event  :
 * @return : void
 * @authur : ¹ÚÁ¾ÈÆ
 */
function SetUnitForm(ivwObj, unitformcd, bDraw)
{
    SetUserTimeLog("SetUnitForm", "START - " + unitformcd);
    //try
    //{
        if(bDraw == null)
            bDraw = true;

        var pageInfo = new PAGEINFO();
        var supdegnitemcd = ivwObj.attribute("supdegnitemcd");

        if (ivwObj.src == "")
        {
            ivwObj.src = "../../../emr/formmngtweb/xrw/SSMRF01200.xrw";
        }
        
        if (opener.model.getValue("/root/emrtemp/sysformxrwyn") == "Y" &&
            model.getValue(pageInfo.forminfoRef + "/unitformmast[formcd='"+unitformcd+"']/formxrwyn") == "Y")
        {
            if(bDraw)
            {
                //alert("xrwyesdraw"+ivwObj.attribute("id"));
            	/*********************/
            	/* XRW Loading Logic */
            	/*********************/
                /*var formdegnseq = model.getValue(pageInfo.forminfoRef + "/unitformmast[formcd='"+unitformcd+"']/formdegnseq") ;

                if (ivwObj.attribute("loaded_formdegnseq") == formdegnseq)
                {
                    ivwObj.window.javascript.clearData();
                    SetUserTimeLog("SetUnitForm", "clearData END - " + ivwObj.attribute("id"));
//                    EmrFormReady(ivwObj.attribute("id"));
                }
                else
                {
                    ivwObj.attribute("loaded_formdegnseq") = formdegnseq;

//                    ivwObj.window.javascript.fDrawFormByFormDegnSeq(formdegnseq, ivwObj.attribute("id"));
//                    SetUserTimeLog("SetUnitForm", "fDrawFormByFormDegnSeq END - " + ivwObj.attribute("id"));
                    ivwObj.src = GetFormXrwSubmitStr(formdegnseq, "", ivwObj.attribute("id"));
                    SetUserTimeLog("SetUnitForm", "GetFormXrwSubmitStr END");

                    var pageInfo = new PAGEINFO();

                    ivwObj.window.javascript.fSetDegnItems(pageInfo.forminfoRef + "/unitformmast[orgsupdegnitemcd='"+ supdegnitemcd +"']",
                        pageInfo.forminfoRef + "/unitformdegn[orgsupdegnitemcd='"+ supdegnitemcd +"']",
                        pageInfo.forminfoRef + "/vallist", pageInfo.forminfoRef + "/imgelist", "record", supdegnitemcd, ivwObj);
                    SetUserTimeLog("SetUnitForm", "fSetDegnItems END");

                    ivwObj.window.javascript.makeInstance(NewPageInfo(ivwObj, supdegnitemcd));
                    SetUserTimeLog("SetUnitForm", "makeInstance END");

                    SetMultiTextFull(ivwObj, 1);

                    ivwObj.model.refresh();
                }*/
                /*ivwObj.window.javascript.fPreviewByDegnItems(pageInfo.forminfoRef + "/unitformmast[orgsupdegnitemcd='"+ supdegnitemcd +"']",
                        "", //µðÀÚÀÎÁ¤º¸¸¦ ÁÖÁö ¾Ê±â·Î ÇÔ.
                        pageInfo.forminfoRef + "/vallist",
                        pageInfo.forminfoRef + "/imgelist",
                        "record",
                        supdegnitemcd,
                        ivwObj);

                SetUserTimeLog("SetUnitForm", "fPreviewByDegnItems new END");

                SetMultiTextFull(ivwObj, 1);

                ivwObj.model.refresh();*/

                //ivwObj.window.javascript.fDrawFormByFormDegnSeq(model.getValue(pageInfo.forminfoRef + "/unitformmast[orgsupdegnitemcd='"+ supdegnitemcd +"']/formdegnseq"), ivwObj.attribute("id"));
                ivwObj.window.javascript.fLoadFormByFormDegnSeq(model.getValue(pageInfo.forminfoRef + "/unitformmast[orgsupdegnitemcd='"+ supdegnitemcd +"']/formdegnseq"), ivwObj.attribute("id"));

                SetUserTimeLog("SetUnitForm", "fLoadFormByFormDegnSeq END");

                SetMultiTextFull(ivwObj, 1);
            }
            else if(!bDraw)
            {
                ivwObj.window.javascript.fSetDegnItems(pageInfo.forminfoRef + "/unitformmast[orgsupdegnitemcd='"+ supdegnitemcd +"']",
                                pageInfo.forminfoRef + "/unitformdegn[orgsupdegnitemcd='"+ supdegnitemcd +"']",
                                pageInfo.forminfoRef + "/vallist", pageInfo.forminfoRef + "/imgelist", "record", supdegnitemcd, ivwObj);
            }
        }
        else
        {
            if(bDraw)
            {
                if (ivwObj.src != "../../../emr/formmngtweb/xrw/SSMRF01200.xrw")
                {
                    ivwObj.src = "../../../emr/formmngtweb/xrw/SSMRF01200.xrw";
                    SetUserTimeLog("SetUnitForm", "ivwObj.src END");
                }

                ivwObj.window.javascript.fPreviewByDegnItems(pageInfo.forminfoRef + "/unitformmast[orgsupdegnitemcd='"+ supdegnitemcd +"']",
                                pageInfo.forminfoRef + "/unitformdegn[orgsupdegnitemcd='"+ supdegnitemcd +"']",
                                pageInfo.forminfoRef + "/vallist", pageInfo.forminfoRef + "/imgelist", "record", supdegnitemcd, ivwObj);
                SetUserTimeLog("SetUnitForm", "fPreviewByDegnItems END");

                SetMultiTextFull(ivwObj, 1);

                ivwObj.model.refresh();
            }
            else if(!bDraw)
            {
                ivwObj.window.javascript.fSetDegnItems(pageInfo.forminfoRef + "/unitformmast[orgsupdegnitemcd='"+ supdegnitemcd +"']",
                                pageInfo.forminfoRef + "/unitformdegn[orgsupdegnitemcd='"+ supdegnitemcd +"']",
                                pageInfo.forminfoRef + "/vallist", pageInfo.forminfoRef + "/imgelist", "record", supdegnitemcd, ivwObj);
            }
        }

    //}
    //catch (e)
    //{
    //    alert("[ERROR] SetUnitForm");
    //    throw e;
    //}

    SetUserTimeLog("SetUnitForm", "END");
}



/**
 * @desc   : ¼­½ÄÇ׸ñ ŸÀÔ ÃʱâÈ­
 * @id     :
 * @event  :
 * @return : void
 * @authur : ¹ÚÁ¾ÈÆ
 */
function InitUnitFormTypeOne(itemCds)
{
    var ctrlIvw;
    var ctrlCbo;
    var ctrlGrup;
    var unitformcd;

    for (var i = 0; i < itemCds.length; i++)
    {
        ctrlGrup = document.controls("grup_" + itemCds[i]);
        ctrlGrup.attribute("orgtop") = ctrlGrup.attribute("top");
        ctrlGrup.attribute("orgheight") = ctrlGrup.attribute("height");

        ctrlIvw = document.controls("ivw_" + itemCds[i]);

        ctrlIvw.attribute("width") = 593;
        ctrlIvw.attribute("orgheight") = ctrlIvw.attribute("height");
        ctrlIvw.attribute("border-style") = "none";

        unitformcd = model.getValue(pageInfo.formdegnRef + "[supdegnitemcd='" + itemCds[i] +
            "' and degnitemkind = 'FRM' and itemuseflag = 'F0']/degnitemcd");

        if (unitformcd != "")
        {
            ctrlIvw = document.controls("ivw_" + itemCds[i]);
            ctrlIvw.attribute("unitformcd") = unitformcd;
            SetUnitForm(ctrlIvw, itemCds[i]);
        }

        ctrlCbo = document.controls("cbo_" + itemCds[i]);
        SetUnitFormList(ctrlCbo,  itemCds[i]);
    }
}

/**
 * @desc   : ±×·ì»çÀÌÁî ÃÖ´ëÈ­
 * @id     :
 * @event  :
 * @return : void
 * @authur : ¹ÚÁ¾ÈÆ
 */
function maxSizeGrup(pItemCd, pIdx, pItemCds, pPageIdx, pGrupBase, flag)
{
    var grupMinHei = 24;
    var grupObj = document.controls("grup_" + pItemCd);

    if (grupObj.attribute("sizeFlag") == "full")
    {
        return;
    }
    else if (grupObj.attribute("sizeFlag") == "max")
    {
        resetSizeGrup(pIdx, pItemCds, pPageIdx);
        return;
    }

    var grupCnt = 0;
    for (var i = 0; i < pPageIdx.length; i++)
    {
        if (pPageIdx[i] == pIdx) grupCnt++;
    }

    var baseHei = parseInt(pGrupBase.attribute("height"));

    var grupMaxHei = baseHei - (grupMinHei * (grupCnt - 1));
    var ypos = 0;
    var ivwObj;
    var extnObj;

    for (var i = 0; i < pItemCds.length; i++)
    {
        grupObj = document.controls("grup_" + pItemCds[i]);
        ivwObj = document.controls("ivw_" + pItemCds[i]);
        extnObj = document.controls("grup_extn" + pItemCds[i]);

        if (pItemCds[i] == pItemCd)
        {
            grupObj.attribute("height") = grupMaxHei;
            grupObj.attribute("sizeFlag") = "max";
            //grupObj.attribute("orgheight") = grupObj.attribute("height");

            if (extnObj != null)
            {
                extnObj.attribute("visibility") = "visible"
                extnObj.attribute("height") = extnObj.attribute("orgheight");
            }
            ivwObj.attribute("height") = parseInt(grupObj.attribute("height")) - parseInt(ivwObj.attribute("top")) - 1;

            SetMultiTextFull(ivwObj, 1);
        }
        else
        {
            if (pPageIdx[i] == pIdx)
            {
                grupObj.attribute("height") = grupMinHei;
                grupObj.attribute("sizeFlag") = "min";

                if (extnObj != null)
                {
                    extnObj.attribute("visibility") = "hidden"
                    extnObj.attribute("height") = 0;
                }
                ivwObj.attribute("height") = 0;

                //SetMultiTextFull(ivwObj, 1);
            }
        }

        if (pPageIdx[i] == pIdx)
        {
            grupObj.attribute("top") = ypos;
            ypos += parseInt(grupObj.attribute("height"));
        }
    }
}

/**
 * @desc   : ±×·ì »çÀÌÁî ÃʱâÈ­
 * @id     :
 * @event  :
 * @return : void
 * @authur : ¹ÚÁ¾ÈÆ
 */
function resetSizeGrup(pIdx, pItemCds, pPageIdx)
{
    for (var i = 0; i < pItemCds.length; i++)
    {
        if (pPageIdx[i] == pIdx)
        {
            var grupObj = document.controls("grup_" + pItemCds[i]);
            var ivwObj = document.controls("ivw_" + pItemCds[i]);
            var extnObj = document.controls("grup_extn" + pItemCds[i]);

            grupObj.attribute("top") = parseInt(grupObj.attribute("orgtop"));
            grupObj.attribute("height") = parseInt(grupObj.attribute("orgheight"));
            grupObj.attribute("sizeFlag") = "";

            if (extnObj != null)
            {
                extnObj.attribute("visibility") = "visible"
                extnObj.attribute("height") = extnObj.attribute("orgheight");
            }
            ivwObj.attribute("height") = ivwObj.attribute("orgheight");

            SetMultiTextFull(ivwObj, 1);
        }
    }
}

/**
 * @desc   : ¼­½Ä Á¤º¸ Set
 * @id     :
 * @event  :
 * @return : void
 * @authur : ¹ÚÁ¾ÈÆ
 */
function SetUnitFormInfo(itemCds)
{
    var ctrlIvw;
    var ctrlCbo;

    for (var i = 0; i < itemCds.length; i++)
    {
        ctrlIvw = document.controls("ivw_" + itemCds[i]);
        ctrlCbo = document.controls("cbo_" + itemCds[i]);

        SetUnitForm(ctrlIvw, itemCds[i]);
        SetUnitFormList(ctrlCbo, itemCds[i]);
    }

}


var gFstItemCds; //gItemCds°¡ ÃÖ»óÀ§¾ÆÀÌÅÛÀÌ ¾Æ´Ò¶§ ¼¼ÆõȴÙ.
/**
 * @desc   : ±â·Ï ¾ÆÀÌÅÛ µ¥ÀÌÅÍ ÀúÀå
 * @id     :
 * @event  :
 * @return : void
 * @authur : ¹ÚÁ¾ÈÆ
 */
function InitSaveComnFormRecItemData(mode)
{
    var ctrlIvw;
    var pageInfo = new PAGEINFO();

    if (gFstItemCds == null)
    {
        gFstItemCds = gItemCds;
    }

    model.removeNodeset(pageInfo.sortItemRef);

    //program¼­½Ä µ¥ÀÌÅÍ ÀúÀå
    getSaveData(pageInfo.sortItemRef, "append", model, null, mode);

    for (var i = 0; i < gItemCds.length; i++)
    {
        ctrlIvw = document.controls("ivw_" + gItemCds[i]);

        if (ctrlIvw != null && ctrlIvw.visible)
            ctrlIvw.window.javascript.getSaveData(pageInfo.sortItemRef, "append", model, NewPageInfo(ctrlIvw, gFstItemCds[i]));

        copyNodeset(pageInfo.sortItemRef, "/root/hidden/extnformrec/recinfo/recitem[fstlevlitemcd = '" +gItemCds[i]+ "']", "append", model, model);

        copyNodeset(pageInfo.sortItemRef, pageInfo.imgerecItemRef + "[fstlevlitemcd = '" +gItemCds[i]+ "']", "append", model, model);
        
        //copyNodeset(pageInfo.sortItemRef, pageInfo.etcrecItemRef + "/recitem[fstlevlitemcd = '" +gItemCds[i]+ "']", "append", model, model);
    }

    /*var nodelist = model.instances(0).selectNodes(pageInfo.formdegnRef + "[degnitemlevlno = '1']/degnitemcd");
    for (var i = 0; i < nodelist.length; i++)
    {
        var degnitemcd = nodelist.item(i).text;

        copyNodeset(pageInfo.sortItemRef, "/root/hidden/extnformrec/recinfo/recitem[fstlevlitemcd = '" +degnitemcd+ "']", "append", model, model);

        copyNodeset(pageInfo.sortItemRef, pageInfo.imgerecItemRef + "[fstlevlitemcd = '" +degnitemcd+ "']", "append", model, model);
    }
    */


    SortRecItem();

    copyNodeset(pageInfo.recItemRef2, pageInfo.recItemRef2, "replace", opener.model, model);
}

/**
 * @desc   : ±â·Ï ¾ÆÀÌÅÛ Sort
 * @id     :
 * @event  :
 * @return : void
 * @authur : ¹ÚÁ¾ÈÆ
 */
function SortRecItem()
{
    var pageInfo = new PAGEINFO();

    model.removeNodeset(pageInfo.recItemRef2);

    var nodelist = model.instances(0).selectNodes(pageInfo.formdegnRef + "[degnitemlevlno = '1']/degnitemcd");
    var degnitemcd = null;
    for (var i = 0; i < nodelist.length; i++)
    {
        degnitemcd = nodelist.item(i).text;
				copyNodeset(pageInfo.recItemRef2, pageInfo.sortItemRef + "[fstlevlitemcd = '" +degnitemcd+ "']", "append", model, model);

        model.removeNodeset(pageInfo.sortItemRef + "[fstlevlitemcd = '" +degnitemcd+ "']");
    }
}

/**
 * @desc   : Page Info Àç¼³Á¤
 * @id     :
 * @event  :
 * @return : void
 * @authur : ¹ÚÁ¾ÈÆ
 */
function NewPageInfo(ctrlIvw, fstlevlitemcd, refPath)
{
    if(refPath == null)
        refPath = "/root/main/forminfo/";

    var node = model.instances(0).selectSingleNode(refPath + "/formdegn[degnitemcd='"+ fstlevlitemcd +"']");

    var pageInfo = new PAGEINFO(ctrlIvw);

    pageInfo.formCd = model.getValue(refPath + "/formmast/formcd");
    pageInfo.formDegnSeq = model.getValue(refPath + "/formmast/formdegnseq");
    pageInfo.degnItemNo = model.getValue(refPath + "/formdegn[degnitemcd='"+ fstlevlitemcd +"']/degnitemno");
    pageInfo.degnItemCd = model.getValue(refPath + "/formdegn[degnitemcd='"+ fstlevlitemcd +"']/degnitemcd");
    pageInfo.degnItemLevlCd = model.getValue(refPath + "/formdegn[degnitemcd='"+ fstlevlitemcd +"']/degnitemlevlcd");
    pageInfo.fstLevlItemCd = fstlevlitemcd;

    pageInfo.degnitemkind = model.getValue(refPath + "/formdegn[degnitemcd='"+ fstlevlitemcd +"']/degnitemkind");
    pageInfo.degnitemlevlno = model.getValue(refPath + "/formdegn[degnitemcd='"+ fstlevlitemcd +"']/degnitemlevlno");
    pageInfo.degnitemnm = model.getValue(refPath + "/formdegn[degnitemcd='"+ fstlevlitemcd +"']/degnitemnm");

    return pageInfo;
}

/**
 * @desc   : ºÎºÐ¼­½Ä °¹¼ö Ä«¿îÆ®ÇÏ¿© ¸®ÅÏ
 * @id     :
 * @event  :
 * @return : void
 * @authur : ¹ÚÁ¾ÈÆ
 */
function GetUnitFormCnt()
{
    return opener.window.javascript.fGetUnitFormCnt();
}

/**
 * @desc   : ºÎºÐ¼­½Ä Á¤º¸ °¡Á®¿Â´Ù
 * @id     :
 * @event  :
 * @return : void
 * @authur : ¹ÚÁ¾ÈÆ
 */
function GetUnitFormInfo(pIvwID)
{
    try
    {
        var ivwObj = document.controls(pIvwID);
        var supdegnitemcd = ivwObj.attribute("supdegnitemcd");
        var pageInfo = new PAGEINFO();

        ivwObj.window.javascript.fSetDegnItems(pageInfo.forminfoRef + "/unitformmast[orgsupdegnitemcd='"+ supdegnitemcd +"']",
            pageInfo.forminfoRef + "/unitformdegn[orgsupdegnitemcd='"+ supdegnitemcd +"']",
            pageInfo.forminfoRef + "/vallist", pageInfo.forminfoRef + "/imgelist", "record", supdegnitemcd, ivwObj);

        ivwObj.window.javascript.makeInstance(pageInfo);

        SetMultiTextFull(ivwObj, 1);
    }
    catch (e)
    {
        alert("[ERROR] GetUnitFormInfo : " + pIvwID);
        throw e;
    }
}

/**
 * @desc   : XRW Submit
 * @id     :
 * @event  :
 * @return : void
 * @authur : ¹ÚÁ¾ÈÆ
 */
function GetFormXrwSubmitStr(pFormDegnSeq, pFormCd, pIvwID)
{
    return getActionURL("TRMRF01201") + "&formdegnseq=" +pFormDegnSeq+ "&formcd=" +pFormCd+ "&ivwid=" +pIvwID+ "&";
}

var gFrLoadTime;
/**
 * @desc   : ½Ã°£À» ¸®ÅÏÇìÁØ´Ù
 * @id     :
 * @event  :
 * @return : void
 * @authur : ¹ÚÁ¾ÈÆ
 */
function GetFrLoadTime()
{
    return gFrLoadTime;
}

/**
 * @desc   : ¼­½Ä·Îµå °ü·Ã ½Ã°£°è»ê
 * @id     :
 * @event  :
 * @return : void
 * @authur : ¹ÚÁ¾ÈÆ
 */
function SetFrLoadTime(frtime)
{
    if (frtime == null)
    {
        gFrLoadTime = new Date();
    }
    else
    {
        gFrLoadTime = frtime;
    }
}

/**
 * @desc   : ¼­½Ä·Îµå °ü·Ã ½Ã°£°è»ê
 * @id     :
 * @event  :
 * @return : void
 * @authur : ¹ÚÁ¾ÈÆ
 */
function SetToLoadTime(flag, totime)
{
    if (totime == null)
    {
        totime = new Date();
    }

    if (flag==1)
    {
        cap_loadtime.text = ((totime.getTime() - gFrLoadTime.getTime()) / 1000) + " sec";
    }
    else if (flag==2)
    {
        opener.window.javascript.cap_loadtime.text = ((totime.getTime() - opener.window.javascript.gFrLoadTime.getTime()) / 1000) + " sec";
    }
}

/**
 * @desc   : ¼­½Ä·Îµå °ü·Ã ½Ã°£°è»ê
 * @id     :
 * @event  :
 * @return : void
 * @authur : ¹ÚÁ¾ÈÆ
 */
function EmrFormReady(ivwID)
{
    if (ivwID == "")
    {
        SetToLoadTime(1);
    }
    else
    {
        SetToLoadTime(2);
    }

//    if (ivwID == "")
//    {
//        SetToLoadTime(1);
//    }
//    else
//    {
//        SetUnitFormModel(ivwID);
//        fEndLoadForm(ivwID);
//        SetUserTimeLog("EmrFormReady", "END - " + ivwID);
//    }
//
//    gLoadedUnitFormCnt++;
//    if (gLoadUnitFormCnt == gLoadedUnitFormCnt)
//    {
//        try {
//            fEndLoadForm();
//            SetToLoadTime(2);
//            SetUserTimeLog("EmrFormReady", "END - ALL");
//        }
//        catch (e) {
//            alert("Function fEndLoadForm °¡ Á¤ÀǵǾî ÀÖÁö ¾Ê½À´Ï´Ù.");
//        }
//
//        opener.window.javascript.fLoaderEndForm();
//    }
}

/**
 * @desc   : ºÎºÐ¼­½Ä ¸ðµ¨ Set
 * @id     :
 * @event  :
 * @return : void
 * @authur : ¹ÚÁ¾ÈÆ
 */
function SetUnitFormModel(ivwID)
{
    SetUserTimeLog("SetUnitFormModel", "START - " + ivwID);
    var ivwObj = document.controls(ivwID);

    var supdegnitemcd = ivwObj.attribute("supdegnitemcd");
    var pageInfo = new PAGEINFO();

    ivwObj.window.javascript.fSetDegnItems(pageInfo.forminfoRef + "/unitformmast[orgsupdegnitemcd='"+ supdegnitemcd +"']",
        pageInfo.forminfoRef + "/unitformdegn[orgsupdegnitemcd='"+ supdegnitemcd +"']",
        pageInfo.forminfoRef + "/vallist", pageInfo.forminfoRef + "/imgelist", "record", supdegnitemcd, ivwObj);
    SetUserTimeLog("SetUnitFormModel", "fSetDegnItems END - " + ivwID);


    ivwObj.window.javascript.makeInstance(NewPageInfo(ivwObj, supdegnitemcd));
    SetUserTimeLog("SetUnitFormModel", "makeInstance END - " + ivwID);

    SetMultiTextFull(ivwObj, 1);

    //ivwObj.model.refresh();
    SetToLoadTime(2);
    SetUserTimeLog("SetUnitFormModel", "makeInstance END - " + ivwID);
}



/**
 * @desc   : ºÎºÐ¼­½Ä¸®½ºÆ® Set
 * @id     :
 * @event  :
 * @return : void
 * @authur : ¹ÚÁ¾ÈÆ
 */
function SetUnitFormList(cboObj, supdegnitemcd)
{
    if (cboObj == null) return;

    var pageInfo = new PAGEINFO();

    cboObj.refresh();
    if (cboObj.itemCount == 0)
    {
        cboObj.visible = false;
    }
    else
    {
        cboObj.visible = true;

        var node = model.instances(0).selectSingleNode(pageInfo.forminfoRef + "/unitformdegn[orgsupdegnitemcd='"+ supdegnitemcd +"']/formdegnseq");

        if (node != null)
        {
            model.makeValue("/root/hidden/choicbo/cbo_" + supdegnitemcd + "/baseunitformdegnseq", node.text);
            model.makeValue("/root/hidden/choicbo/cbo_" + supdegnitemcd + "/extnunitformdegnseq", node.text);
        }
        else
        {
            model.makeValue("/root/hidden/choicbo/cbo_" + supdegnitemcd + "/baseunitformdegnseq", "");
            model.makeValue("/root/hidden/choicbo/cbo_" + supdegnitemcd + "/extnunitformdegnseq", "");
        }

        //model.makeNode("/root/hidden/choicbo/cbo_" + supdegnitemcd + "/extnunitformdegnseq");

        cboObj.attribute("ref") = "/root/hidden/choicbo/cbo_" + supdegnitemcd + "/extnunitformdegnseq";

        cboObj.refresh();
    }
}

/**
 * @desc   : ¼­½Ä·Î´õ ¼ÂÆÃ
 * @id     :
 * @event  :
 * @return : void
 * @authur : ¹ÚÁ¾ÈÆ
 */
function setFormLoader(iviewer)
{
    iviewer.src = "../../medirecweb/xrw/SSMMR01100_¼­½Ä·Î´õ.xrw";

    iviewer.attribute("border-style") = "solid";
    iviewer.attribute("border-color") = "#c0c0c0";
}

/**
 * @desc   : ¼­½Ä±×¸®±â
 * @id     :
 * @event  :
 * @return : void
 * @authur : ¹ÚÁ¾ÈÆ
 */
function drawForm()
{
    for(var i = 0; i < document.controls.length; i++)
    {
        var ctrl = document.controls.item(i);
        if(ctrl.elementName != "xforms:iviewer")
            continue;

        var formcd = ctrl.attribute("formcd");
        var formdegnseqno = ctrl.attribute("formdegnseqno");
        if(formcd == "" && formdegnseqno == "")
            continue;

        //var degndeptcd = ctrl.attribute("degndeptcd");
        //var degnid = ctrl.attribute("degnid");
        ctrl.window.javascript.fSetFormDegnInfo(ctrl);
    }
}

/**
 * @desc   : ºÎºÐ¼­½Ä µ¥ÀÌÅÍ Á¶È¸
 * @id     :
 * @event  :
 * @return : void
 * @authur : ¹ÚÁ¾ÈÆ
 */
function getSubFormData()
{
    var targetRef = "/root/main/subform";
    var srcRef = "/root/main/formrecinfo/items";
    model.removeNodeset(targetRef);
    for(var i = 0; i < document.controls.length; i++)
    {
        var ctrl = document.controls.item(i);
        if(ctrl.elementName != "xforms:iviewer")
            continue;

        var formcd = ctrl.attribute("formcd");
        var formdegnseqno = ctrl.attribute("formdegnseqno");
        var id = "";
        var type = "";

        if(formcd != "")
        {
            id = formcd;
            type = "formcd";
        }
        else if(formdegnseqno != "")
        {
            id = formdegnseqno;
            type = "formdegnseqno";
        }
        else
            continue;

        var cntSubForm = getNodesetCnt(model, targetRef);
        //model.makeValue(targetRef + "[" + (cntSubForm + 1) + "]/@id", id);
        copyNodeset(model, ctrl.model, targetRef + "[" + (cntSubForm + 1) + "]/items", srcRef);
        model.makeValue(targetRef + "[" + (cntSubForm + 1) + "]/@id", id);
        model.makeValue(targetRef + "[" + (cntSubForm + 1) + "]/@type", type);
    }
}

/**
 * @desc   : ³ëµå¼Â Count
 * @id     :
 * @event  :
 * @return : void
 * @authur : ¹ÚÁ¾ÈÆ
 */
function fGetRecNodeCount(srcPath)
{
    return getNodesetCount(srcPath);
}

/**
 * @desc   : ³ëµå¼Â »èÁ¦
 * @id     :
 * @event  :
 * @return : void
 * @authur : ¹ÚÁ¾ÈÆ
 */
function fRemoveRecNodeset(srcPath)
{
    model.removeNodeset(srcPath);
}

//function GetExtnUnitFormInfo(baseunitformdegnseq, extnunitformdegnseq)
//{
//    return opener.window.javascript.fGetExtnUnitFormInfo(baseunitformdegnseq, extnunitformdegnseq)
//}

/**
 * @desc   : °¡°èµµ
 * @id     :
 * @event  :
 * @return : void
 * @authur : ¹ÚÁ¾ÈÆ
 */
function openFamilyDiagram(supdegnitemcd)
{
    var pageInfo = new PAGEINFO();

    //setParameter("SPMMR04700_opemode",          "comnform");
    //setParameter("SPMMR04700_fstlevlitemcd",    supdegnitemcd);
    //setParameter("SPMMR04700_path_output",      pageInfo.fmyrecItemRef);
    //setParameter("SPMMR04700_path_output",      pageInfo.fmyrecItemRef + "[fstlevlitemcd='" + supdegnitemcd + "' and formcd='0000002615']");
    var fdgInfo = model.getValue(pageInfo.recItemRef2 + "[fstlevlitemcd='" + supdegnitemcd + "' and formcd='0000002615']/reccnts");
    if(fdgInfo != "")	{
        setParameter("SPMMR04711_shape", fdgInfo);
        model.setValue("/root/properties/parameters/SPMMR04711_shape/SPMMR04711_shapevalue", fdgInfo, true);
    }

   var fdgImg = model.getValue(pageInfo.recItemRef2 + "[fstlevlitemcd='" + supdegnitemcd + "' and formcd='0000002615']/recimge");
    if(fdgImg != "")	{
        setParameter("SPMMR04711_base64", fdgImg);
        model.setValue("/root/properties/parameters/SPMMR04711_base64/SPMMR04711_base64value", fdgImg, true);
    }

    modal("SPMMR04700", 1, 0, 0, "", "", "");
    
    // °¡°èµµ Shape µ¥ÀÌÅÍ ¹× Base64 À̹ÌÁö¸¦ CDATA·Î ¼¼ÆÃ
    fdgInfo = getParameter("SPMMR04711_shape");
    fdgImg = getParameter("SPMMR04711_base64");

    if(fdgInfo != "")	{
        model.setValue("/root/properties/parameters/SPMMR04711_shape/SPMMR04711_shapevalue", fdgInfo, true);
    }

    if(fdgImg != "")	{
        model.setValue("/root/properties/parameters/SPMMR04711_base64/SPMMR04711_base64value", fdgImg, true);
    }

    if(fdgInfo == "")
    {
        clearParameter("SPMMR04711_shape");
        clearParameter("SPMMR04711_base64");
        model.removeNode(pageInfo.fmyrecItemRef + "/recitem[fstlevlitemcd='" + supdegnitemcd + "' and formcd='0000002615']");
        return;
    }
    else
    {
        var instcd          = instance1.createElement("instcd"         );
        var rechistseq      = instance1.createElement("rechistseq"     );
        var recitemno       = instance1.createElement("recitemno"      );
        var fstlevlitemcd   = instance1.createElement("fstlevlitemcd"  );
        var formcd          = instance1.createElement("formcd"         );
        var formdegnseq     = instance1.createElement("formdegnseq"    );
        var degnitemno      = instance1.createElement("degnitemno"     );
        var degnitemcd      = instance1.createElement("degnitemcd"     );
        var degnitemkind    = instance1.createElement("degnitemkind"   );
        var degnitemlevlno  = instance1.createElement("degnitemlevlno" );
        var degnitemnm      = instance1.createElement("degnitemnm"     );
        var degnitemlevlcd  = instance1.createElement("degnitemlevlcd" );
        var rectermcd       = instance1.createElement("rectermcd"      );
        var rectermnm       = instance1.createElement("rectermnm"      );
        var recrefcd        = instance1.createElement("recrefcd"       );
        var recitemnm       = instance1.createElement("recitemnm"      );
        var reccnts         = instance1.createElement("reccnts"        );
        var unitnm          = instance1.createElement("unitnm"         );
        var recimge         = instance1.createElement("recimge"        );
        var srcimge         = instance1.createElement("srcimge"        );
        var rowno           = instance1.createElement("rowno"          );
        var colno           = instance1.createElement("colno"          );
        
        fstlevlitemcd.text =  supdegnitemcd ;
        formcd.text =  "0000002615"  ;
        formdegnseq.text =  "12838"       ;
        degnitemno .text = "1"           ;
        degnitemcd .text = "0000006001"  ;
        degnitemkind .text = "FDG"         ;
        degnitemlevlno.text = "1"           ;
        degnitemnm.text = "°¡°èµµ"      ;
        degnitemlevlcd.text = supdegnitemcd.substr(0, 7) + ".0000006"     ;
        reccnts.text = fdgInfo;
        recimge.text = fdgImg;

        var recitem = instance1.createElement("recitem"                 );
        recitem.appendChild(instcd                                      );
        recitem.appendChild(rechistseq                                  );
        recitem.appendChild(recitemno                                   );
        recitem.appendChild(fstlevlitemcd                               );
        recitem.appendChild(formcd                                      );
        recitem.appendChild(formdegnseq                                 );
        recitem.appendChild(degnitemno                                  );
        recitem.appendChild(degnitemcd                                  );
        recitem.appendChild(degnitemkind                                );
        recitem.appendChild(degnitemlevlno                              );
        recitem.appendChild(degnitemnm                                  );
        recitem.appendChild(degnitemlevlcd                              );
        recitem.appendChild(rectermcd                                   );
        recitem.appendChild(rectermnm                                   );
        recitem.appendChild(recrefcd                                    );
        recitem.appendChild(recitemnm                                   );
        recitem.appendChild(reccnts                                     );
        recitem.appendChild(unitnm                                      );
        recitem.appendChild(recimge                                     );
        recitem.appendChild(srcimge                                     );
        recitem.appendChild(rowno                                       );
        recitem.appendChild(colno                                       );
        
		// CDATA ¼½¼ÇÀ¸·Î ¹­¾îÁÜ
        var node = recitem.selectSingleNode("reccnts");
		model.setValue(node, node.text, true);

		node = recitem.selectSingleNode("recimge");
		model.setValue(node, node.text, true);

        var targetNode = instance1.selectSingleNode(pageInfo.fmyrecItemRef + "/recitem[fstlevlitemcd='" + supdegnitemcd + "' and formcd='0000002615']");

        if(targetNode == null)
        {
            model.makeValue(pageInfo.fmyrecItemRef, "");
            var parentNode = instance1.selectSingleNode(pageInfo.fmyrecItemRef);
            parentNode.appendChild(recitem);
        }
        else
        {
            targetNode.parentNode.replaceChild(recitem, targetNode);
        }
    }
}

/**
 * @desc   : ÃÖÁ¾Áø´Ü¼Ò°ß
 * @id     :
 * @event  :
 * @return : void
 * @authur : 2010-03-31 ¿ÀÀü 10:11:05 °­ÁöÈÆ Ãß°¡
 */
function openLastDiag(supdegnitemcd){
	
	
	var pageInfo = new PAGEINFO();
	
  supdegnitemcd = "0001013001";
  setParameter("lastdiag_supdegnitemcd", supdegnitemcd);
    
  //ºÎºÐ¼­½Ä ·Îµù
  var ctrl = document.controls("lbl_" + supdegnitemcd);
  
  if (ctrl != null){
  	loadClickSection(supdegnitemcd);
  }   
  var bfCosignedYN =  opener.window.javascript.fGetFormRec("cosign");
	
	//Æ˾÷À»¶ç¿ö ³»¿ëÀÔ·Â.
  modal("SPMMR06600");  
  var saveFlag = getParameter("lastdiag_saveflag_" + supdegnitemcd); //±â·Ï»óÅÂ
  
  
  //Flag¿¡ µû¶ó ±â·Ï ÀúÀå, ¼öÁ¤, »èÁ¦
  if(saveFlag == "C"){ // ±â·Ï³»¿ëÀÌ ÀÌÀü°ú°°À»¶§.
  	return;
	}
  else if(saveFlag == "D") //»èÁ¦
  {  
    model.removeNodeSet(pageInfo.recItemRef2 + "[formcd='1000007943']/reccnts");
    model.removeNodeSet(pageInfo.lastdiagItemRef + "/recitem[formcd='1000007943']");
    
    opener.opener.window.javascript.setParameter("SSMMR01100_fChkPreSaveUseFlag", "N");
    opener.window.javascript.setParameter("SSMMR01100_fChkLastDiag", "Y");
    var savedYn = opener.window.javascript.fClickSave("Y");
    if(savedYn == true){
    	//±â·Ï¹Ý·Áó¸®
    	parent.window.javascript.fSaveLastDiagRec(bfCosignedYN);
    }
 		
  }
  else if(saveFlag == "S")
  {
        opener.opener.window.javascript.setParameter("SSMMR01100_fChkPreSaveUseFlag", "N");
        opener.window.javascript.setParameter("SSMMR01100_fChkLastDiag", "Y");
    		var savedYn = opener.window.javascript.fClickSave("Y");
		    if(savedYn == true){
		    	//±â·Ï¹Ý·Áó¸®
		    	parent.window.javascript.fSaveLastDiagRec(bfCosignedYN);
		    }
  }
  
  opener.window.javascript.clearParameter("cosignclclyn");
  opener.window.javascript.clearParameter("SSMMR01100_fChkLastDiag");
  opener.opener.window.javascript.clearParameter("SSMMR01100_fChkPreSaveUseFlag", "N");
  //
  //¹öÆ° ¸ð¾ç¼³Á¤
  try {
  	setButtonToggleByRecYn(null, event.target);
  } catch (e) {
  }
}

/**
 * @desc   : Ãß°¡±â·Ï
 * @id     :
 * @event  :
 * @return : void
 * @authur : ¹ÚÁ¾ÈÆ
 */
function openEtcRec(supdegnitemcd)
{
    var pageInfo = new PAGEINFO();
    
    setParameter("etcrec_supdegnitemcd", supdegnitemcd);
    
    //ºÎºÐ¼­½Ä ·Îµù
    var ctrl = document.controls("lbl_" + supdegnitemcd);
    
    if (ctrl != null)
    {
        loadClickSection(supdegnitemcd);
    }
    
    //setParameter("SPMMR04700_opemode",          "comnform");
    //setParameter("SPMMR04700_fstlevlitemcd",    supdegnitemcd);
    //setParameter("SPMMR04700_path_output",      pageInfo.fmyrecItemRef);
    //setParameter("SPMMR04700_path_output",      pageInfo.fmyrecItemRef + "[fstlevlitemcd='" + supdegnitemcd + "' and formcd='0000002615']");
    var etcrec = model.getValue(pageInfo.recItemRef2 + "[degnitemno='0' and fstlevlitemcd='" + supdegnitemcd + "' and formcd='" + opener.window.javascript.fGetFormMast("formcd") + "']/reccnts");
    
    if(etcrec != "")
    {
        setParameter("etc_rec_" + supdegnitemcd, etcrec);
    }

    modal("SPMMR06100");
    
    var recrtn = getParameter("etcrec_rtn_" + supdegnitemcd);
    
    if(recrtn == "")
    {
        setParameter("etcrec_rtn_" + supdegnitemcd, recrtn);
        setParameter("etc_rec_" + supdegnitemcd, recrtn);
        model.removeNode(pageInfo.recItemRef2 + "[degnitemno='0' and fstlevlitemcd='" + supdegnitemcd + "' and formcd='" + opener.window.javascript.fGetFormMast("formcd") + "']/reccnts");
        model.removeNode(pageInfo.etcrecItemRef + "/recitem[fstlevlitemcd='" + supdegnitemcd + "' and formcd='" + opener.window.javascript.fGetFormMast("formcd") + "']");
        //return;
    }
    else
    {
        setParameter("etc_rec_" + supdegnitemcd, recrtn);
        var instcd          = instance1.createElement("instcd"         );
        var rechistseq      = instance1.createElement("rechistseq"     );
        var recitemno       = instance1.createElement("recitemno"      );
        var fstlevlitemcd   = instance1.createElement("fstlevlitemcd"  );
        var formcd          = instance1.createElement("formcd"         );
        var formdegnseq     = instance1.createElement("formdegnseq"    );
        var degnitemno      = instance1.createElement("degnitemno"     );
        var degnitemcd      = instance1.createElement("degnitemcd"     );
        var degnitemkind    = instance1.createElement("degnitemkind"   );
        var degnitemlevlno  = instance1.createElement("degnitemlevlno" );
        var degnitemnm      = instance1.createElement("degnitemnm"     );
        var degnitemlevlcd  = instance1.createElement("degnitemlevlcd" );
        var rectermcd       = instance1.createElement("rectermcd"      );
        var rectermnm       = instance1.createElement("rectermnm"      );
        var recrefcd        = instance1.createElement("recrefcd"       );
        var recitemnm       = instance1.createElement("recitemnm"      );
        var reccnts         = instance1.createElement("reccnts"        );
        var unitnm          = instance1.createElement("unitnm"         );
        var recimge         = instance1.createElement("recimge"        );
        var rowno           = instance1.createElement("rowno"          );
        var colno           = instance1.createElement("colno"          );

        fstlevlitemcd.text =  supdegnitemcd ;
        formcd.text =  opener.window.javascript.fGetFormMast("formcd");
        formdegnseq.text =  opener.window.javascript.fGetFormMast("formdegnseq");
        degnitemno .text = "0"           ;
        degnitemcd .text = "0008458001"  ;
        degnitemkind .text = "STX"         ;
        degnitemlevlno.text = "2"           ;
        degnitemnm.text = "¡×Ãß°¡ÀÔ·Â"      ;
        degnitemlevlcd.text = supdegnitemcd.substr(0, 7) + ".0008458"     ;
        reccnts.text = recrtn;
        
        var recitem = instance1.createElement("recitem"                 );
        recitem.appendChild(instcd                                      );
        recitem.appendChild(rechistseq                                  );
        recitem.appendChild(recitemno                                   );
        recitem.appendChild(fstlevlitemcd                               );
        recitem.appendChild(formcd                                      );
        recitem.appendChild(formdegnseq                                 );
        recitem.appendChild(degnitemno                                  );
        recitem.appendChild(degnitemcd                                  );
        recitem.appendChild(degnitemkind                                );
        recitem.appendChild(degnitemlevlno                              );
        recitem.appendChild(degnitemnm                                  );
        recitem.appendChild(degnitemlevlcd                              );
        recitem.appendChild(rectermcd                                   );
        recitem.appendChild(rectermnm                                   );
        recitem.appendChild(recrefcd                                    );
        recitem.appendChild(recitemnm                                   );
        recitem.appendChild(reccnts                                     );
        recitem.appendChild(unitnm                                      );
        recitem.appendChild(recimge                                     );
        recitem.appendChild(rowno                                       );
        recitem.appendChild(colno                                       );

		// CDATA ¼½¼ÇÀ¸·Î ¹­¾îÁÜ
        var node = recitem.selectSingleNode("reccnts");
		model.setValue(node, node.text, true);

		node = recitem.selectSingleNode("recimge");
		model.setValue(node, node.text, true);

        var targetNode = instance1.selectSingleNode(pageInfo.etcrecItemRef + "/recitem[fstlevlitemcd='" + supdegnitemcd + "' and formcd='" + opener.window.javascript.fGetFormMast("formcd") + "']");

        if(targetNode == null)
        {
            model.makeValue(pageInfo.etcrecItemRef, "");
            var parentNode = instance1.selectSingleNode(pageInfo.etcrecItemRef);
            parentNode.appendChild(recitem);
        }
        else
        {
            targetNode.parentNode.replaceChild(recitem, targetNode);
        }
    }
    
    /**
     * @desc   : °øÅë¼­½Ä³»ÀÇ È®Àå¹öÆ°(À̹ÌÁö,°¡°èµµ,Ãß°¡±â·Ï)À» ±â·Ï¿©ºÎ¿¡ µû¶ó Ç¥½ÃÇÑ´Ù.
     * @history : 2009.09.09    ½Å±Ô   ¾ÈÄ¡¿ø    ACW_090909A
     */
    try {
        setButtonToggleByRecYn(null, event.target);
    } catch (e) {
    }
}

/**
 * @desc   : °¡°èµµ
 * @id     :
 * @event  :
 * @return : void
 * @authur : ¹ÚÁ¾ÈÆ
 */
function openFamilyDiagram_old(supdegnitemcd)
{
    var pageInfo = new PAGEINFO();

    //setParameter("SPMMR04700_opemode",          "comnform");
    //setParameter("SPMMR04700_fstlevlitemcd",    supdegnitemcd);
    //setParameter("SPMMR04700_path_output",      pageInfo.extnrecItemRef);
    //setParameter("SPMMR04700_path_output",      pageInfo.extnrecItemRef + "[fstlevlitemcd='" + supdegnitemcd + "' and formcd='0000002615']");
    var fdgInfo = model.getValue(pageInfo.extnrecItemRef + "[fstlevlitemcd='" + supdegnitemcd + "' and formcd='0000002615']/reccnts");
    if(fdgInfo != "")	{
        setParameter("SPMMR04711_shape", fdgInfo);
        model.setValue("/root/properties/parameters/SPMMR04711_shape/SPMMR04711_shapevalue", fdgInfo, true);
    }

   var fdgImg = model.getValue(pageInfo.extnrecItemRef + "[fstlevlitemcd='" + supdegnitemcd + "' and formcd='0000002615']/recimge");
    if(fdgImg != "")	{
        setParameter("SPMMR04711_base64", fdgImg);
        model.setValue("/root/properties/parameters/SPMMR04711_base64/SPMMR04711_base64value", fdgImg, true);
    }

    modal("SPMMR04700", 1, 0, 0, "", "", "");

    // °¡°èµµ Shape µ¥ÀÌÅÍ ¹× Base64 À̹ÌÁö¸¦ CDATA·Î ¼¼ÆÃ
    fdgInfo = getParameter("SPMMR04711_shape");
    fdgImg = getParameter("SPMMR04711_base64");

    if(fdgInfo != "")	{
        model.setValue("/root/properties/parameters/SPMMR04711_shape/SPMMR04711_shapevalue", fdgInfo, true);
    }

    if(fdgImg != "")	{
        model.setValue("/root/properties/parameters/SPMMR04711_base64/SPMMR04711_base64value", fdgImg, true);
    }

    if(fdgInfo == "")
    {
        model.removeNode(pageInfo.extnrecItemRef + "[fstlevlitemcd='" + supdegnitemcd + "' and formcd='0000002615']");
        return;
    }
    else
    {
        var instcd          = instance1.createElement("instcd"         );
        var rechistseq      = instance1.createElement("rechistseq"     );
        var recitemno       = instance1.createElement("recitemno"      );
        var fstlevlitemcd   = instance1.createElement("fstlevlitemcd"  );
        var formcd          = instance1.createElement("formcd"         );
        var formdegnseq     = instance1.createElement("formdegnseq"    );
        var degnitemno      = instance1.createElement("degnitemno"     );
        var degnitemcd      = instance1.createElement("degnitemcd"     );
        var degnitemkind    = instance1.createElement("degnitemkind"   );
        var degnitemlevlno  = instance1.createElement("degnitemlevlno" );
        var degnitemnm      = instance1.createElement("degnitemnm"     );
        var degnitemlevlcd  = instance1.createElement("degnitemlevlcd" );
        var rectermcd       = instance1.createElement("rectermcd"      );
        var rectermnm       = instance1.createElement("rectermnm"      );
        var recrefcd        = instance1.createElement("recrefcd"       );
        var recitemnm       = instance1.createElement("recitemnm"      );
        var reccnts         = instance1.createElement("reccnts"        );
        var unitnm          = instance1.createElement("unitnm"         );
        var recimge         = instance1.createElement("recimge"        );
        var rowno           = instance1.createElement("rowno"          );
        var colno           = instance1.createElement("colno"          );

        fstlevlitemcd.text =  supdegnitemcd ;
        formcd.text =  "0000002615"  ;
        formdegnseq.text =  "12838"       ;
        degnitemno .text = "1"           ;
        degnitemcd .text = "0000006001"  ;
        degnitemkind .text = "FDG"         ;
        degnitemlevlno.text = "1"           ;
        degnitemnm.text = "°¡°èµµ"      ;
        degnitemlevlcd.text = "0000006"     ;
        reccnts.text = fdgInfo;
        recimge.text = fdgImg;

        var recitem = instance1.createElement("recitem"                 );
        recitem.appendChild(instcd                                      );
        recitem.appendChild(rechistseq                                  );
        recitem.appendChild(recitemno                                   );
        recitem.appendChild(fstlevlitemcd                               );
        recitem.appendChild(formcd                                      );
        recitem.appendChild(formdegnseq                                 );
        recitem.appendChild(degnitemno                                  );
        recitem.appendChild(degnitemcd                                  );
        recitem.appendChild(degnitemkind                                );
        recitem.appendChild(degnitemlevlno                              );
        recitem.appendChild(degnitemnm                                  );
        recitem.appendChild(degnitemlevlcd                              );
        recitem.appendChild(rectermcd                                   );
        recitem.appendChild(rectermnm                                   );
        recitem.appendChild(recrefcd                                    );
        recitem.appendChild(recitemnm                                   );
        recitem.appendChild(reccnts                                     );
        recitem.appendChild(unitnm                                      );
        recitem.appendChild(recimge                                     );
        recitem.appendChild(rowno                                       );
        recitem.appendChild(colno                                       );

		// CDATA ¼½¼ÇÀ¸·Î ¹­¾îÁÜ
        var node = recitem.selectSingleNode("reccnts");
		model.setValue(node, node.text, true);

		node = recitem.selectSingleNode("recimge");
		model.setValue(node, node.text, true);

        var targetNode = instance1.selectSingleNode(pageInfo.extnrecItemRef + "[fstlevlitemcd='" + supdegnitemcd + "' and formcd='0000002615']");

        if(targetNode == null)
        {
            model.makeValue(pageInfo.extnrecRef, "");
            var parentNode = instance1.selectSingleNode(pageInfo.extnrecRef);
            parentNode.appendChild(recitem);
        }
        else
        {
            targetNode.parentNode.replaceChild(recitem, targetNode);
        }
    }
}

/**
 * @desc   : È®Àå¼­½ÄÇ׸ñ ¿ÀÇÂ
 * @id     :
 * @event  :
 * @return : void
 * @authur : ¹ÚÁ¾ÈÆ
 */
function openExtnUnitFormOfComnMediForm(supdegnitemcd)
{
    var pageInfo = new PAGEINFO();
    var cboObj = document.controls("cbo_" + supdegnitemcd);
    var cboid = cboObj.attribute("id");

    var baseunitformdegnseq = model.getValue("/root/hidden/choicbo/" + cboid + "/baseunitformdegnseq");
    var extnunitformdegnseq = model.getValue("/root/hidden/choicbo/" + cboid + "/extnunitformdegnseq");

    var node = model.instances(0).selectSingleNode(pageInfo.forminfoRef + "/extnformlist[formdegnseq='"+ extnunitformdegnseq +"']/formcd");

    if (node != null && node.text == "0000002615") //°¡°èµµ
    {
        openFamilyDiagram(supdegnitemcd);
        return;
    }

    var baseNode = model.instances(0).selectSingleNode(pageInfo.forminfoRef + "/unitformmast[formdegnseq='"+ baseunitformdegnseq +"']/srcformcd");
    var extnNode = model.instances(0).selectSingleNode(pageInfo.forminfoRef + "/extnformlist[formdegnseq='"+ extnunitformdegnseq +"']/srcformcd");

    var forminfo;
    var widflag;
    if (baseNode != null && baseNode.text == extnNode.text)
    {
        forminfo = opener.window.javascript.fGetExtnUnitFormInfo(baseunitformdegnseq, extnunitformdegnseq);
        widflag = "ExtnUnitForm";
    }
    else
    {
    	// opener.window.javascript.fGetFormInfoByFormDegnCd(extnunitformdegnseq);
    	// forminfo, formcd, formdegnseq, extnunitformlistyn, sysformrecdt, formfromdt
    	var sysformrecdt = opener.window.javascript.fGetFormRec("sysformrecdt") ;
        opener.window.javascript.fGetFormInfoByFormDegnCd("extnform", "", extnunitformdegnseq, "N", sysformrecdt);
        widflag = "-";

        var cnt = getNodesetCnt(opener.model, "/root/temp/settingform/forminfo/formdegnseq");

        if (cnt == 0)
            forminfo = "";
        else
            forminfo = opener.window.javascript.fGetCSVByFormInfo("/root/temp/settingform/forminfo");
    }

    if (forminfo == "")	//±âº»¼­½Ä¿¡ ¾ø´Â È®Àå¼­½Ä ¾ÆÀÌÅÛ¸¸ ÃßÃâÇÑ Á¤º¸
    {
        messageBox("Áߺ¹µÈ ¾ÆÀÌÅÛÀ» Á¦°ÅÇϸé È®Àå¼­½Ä¿¡ Ãß°¡µÉ ¾ÆÀÌÅÛÀÌ", "I004");
    }
    else
    {
        var nodelist = model.instances(0).selectNodes(pageInfo.extnrecItemRef + "[fstlevlitemcd='" +supdegnitemcd+ "' and formcd='" + node.text + "']");
        var recinfo = getNodeListCSV(nodelist);

        //alert(pageInfo.extnrecItemRef + "[fstlevlitemcd='" +supdegnitemcd+ "' and formcd='" + node.text + "']");
		//alert("forminfo:   "+forminfo);

        setParameter("openmode", "extnunitform");
        setParameter("fstlevlitemcd", supdegnitemcd);
        setParameter("recinfo", recinfo);		//È®Àå¼­½Ä¿¡ ÀúÀåÇÑ Á¤º¸
        setParameter("forminfo", forminfo);	//±âº»¼­½Ä¿¡ ¾ø´Â È®Àå¼­½Ä ¾ÆÀÌÅÛ¸¸ ÃßÃâÇÑ Á¤º¸
        setParameter("widflag", widflag);

		modalUrl("../../../emr/medirecweb/xrw/SSMMR01100_¼­½Ä·Î´õ.xrw", 1, 0, 0, "", "", "");
    }
}

/**
 * @desc   : ºÎºÐ¼­½ÄÀÇ µðÀÚÀο¡ ÀÖ´Â À̹ÌÁö¸¦ À̹ÌÁöÆíÁýâÀ¸·Î º¹»çÇÑ´Ù.
 * @id     :
 * @event  :
 * @return : void
 * @authur : ¹ÚÁ¾ÈÆ
 */
function getBaseUnitFormRecImge(ivwId, destModel)
{
    var pageInfo = new PAGEINFO();
    var ivwObj = document.controls(ivwId);

    if (ivwObj == null || !ivwObj.visible)
        ivwObj = window;

    copyNodeset(pageInfo.recItemRef, pageInfo.recItemRef+"[degnitemkind='IMG']", "replace" ,destModel, ivwObj.model);

    var cnt = getNodesetCnt(destModel, pageInfo.recItemRef);

    var imgecd;
    var imgedata;
    for (var i = 1; i <= cnt; i++)
    {

        if (destModel.getValue(pageInfo.recItemRef+"["+i+"]/recimge") == "")
        {
            imgecd = destModel.getValue(pageInfo.recItemRef+"["+i+"]/degnitemcd");
            imgedata = ivwObj.model.getValue(pageInfo.imgelistRef + "[imgecd='" +imgecd+ "']/imgedata");
            destModel.setValue(pageInfo.recItemRef+"["+i+"]/recimge", imgedata);
        }
    }
}

/**
 * @desc   : ÆíÁýµÈ À̹ÌÁö¸¦ ºÎºÐ¼­½ÄÀ¸·Î Ä«ÇÇÇÑ´Ù.
 * @id     :
 * @event  :
 * @return : void
 * @authur : ¹ÚÁ¾ÈÆ
 */
function setBaseUnitFormRecImge(ivwId, destModel)
{
    var pageInfo = new PAGEINFO();
    var ivwObj = document.controls(ivwId);

    if (ivwObj == null || !ivwObj.visible)
        ivwObj = window;

    var nodelist = destModel.instance1.selectNodes(pageInfo.recItemRef + "[rowno = '' and reccnts != '']");

    var path;
    for (var i = 0; i < nodelist.length; i++)
    {
        path = pageInfo.recItemRef + "[degnitemno='" + nodelist.item(i).getXPathString("degnitemno") + "']";

        ivwObj.model.setValue(path + "/reccnts", nodelist.item(i).getXPathString("reccnts"));
        ivwObj.model.setValue(path + "/recimge", nodelist.item(i).getXPathString("recimge"));
    }

    destModel.removeNodeset(pageInfo.recItemRef + "[rowno = '']");
}

/**
 * @desc   : ÇÁ·Î±×·¥¼­½Ä¿©ºÎ °Ë»ç
 * @id     :
 * @event  :
 * @return : void
 * @authur : ¹ÚÁ¾ÈÆ
 */
function isProgForm()
{
    var formprogflag = fGetFormMast("formprogflag");

    if (formprogflag == "-" || formprogflag == "PROF" || formprogflag == "MAIN")
        return false;
    else
        return true;
}

/**
 * @desc   : lt, gt º¯È¯
 * @id     :
 * @event  :
 * @return : void
 * @authur : ¹ÚÁ¾ÈÆ
 */
function doReplaceLtGt(path)
{
    var nodelist = model.instances(0).selectNodes(path + "[degnitemkind = 'IMG']/reccnts");
    var shape = "";
    for (var i = 0; i < nodelist.length; i++)
    {
        if (nodelist.item(i).text.indexOf("&lt;") == 0)
        {
            shape = nodelist.item(i).text.replace(/&lt;/gi, "<");

            nodelist.item(i).text = shape.replace(/&gt;/gi, ">");
        }
    }
}

var gTermViewTopPos = 0;
var gTermViewHei = 0;
var gTermViewItems;
var gTermViewMaxCtrlID = "";
var gTermViewCtrlInitFlag = false;
/**
 * @desc   : ¾ÆÀÌÅÛ ¿µ¿ª ÃÖ´ëÈ­
 * @id     :
 * @event  :
 * @return : void
 * @authur : ¹ÚÁ¾ÈÆ
 */
function fSetTermViewMaxSize(ivwID)
{
    if (gTermViewItems == null) return;

    var ctrl;
    if (! gTermViewCtrlInitFlag)
    {
        for (var i = 0; i < gTermViewItems.length; i++)
        {
            ctrl = document.controls("ivw_" + gTermViewItems[i]);
            ctrl.attribute("orgtop") = ctrl.attribute("top");
            ctrl.attribute("orgheight") = ctrl.attribute("height");
        }
        gTermViewCtrlInitFlag = true;
    }

    ctrl = document.controls(ivwID);
    var ctrlvisible = ivwID == gTermViewMaxCtrlID ? true : false;

    for (var i = 0; i < gTermViewItems.length; i++)
    {
        ctrl = document.controls("ivw_" + gTermViewItems[i]);
        ctrl.attribute("top") = ctrl.attribute("orgtop");
        ctrl.attribute("height") = ctrl.attribute("orgheight");
        ctrl.visible = ctrlvisible;
    }

    ctrl = document.controls(ivwID);
    if (ivwID != gTermViewMaxCtrlID)
    {
        ctrl.visible = true;
        ctrl.attribute("top") = gTermViewTopPos;
        ctrl.attribute("height") = gTermViewHei;

        gTermViewMaxCtrlID = ivwID;
    }
    else
    {
        gTermViewMaxCtrlID = "";
    }
    ctrl.window.javascript.fInitPage(false, parseInt(ctrl.attribute("height")), parseInt(ctrl.attribute("width")), ivwID);
}

var gMaxSectionTop;
var gMaxSectionHei;
/**
 * @desc   : ¾ÆÀÌÅÛ ¿µ¿ª ÃÖ´ëÈ­
 * @id     :
 * @event  :
 * @return : void
 * @authur : ¹ÚÁ¾ÈÆ
 */
function setSectionSize(itemCds, topPos, heiSz)
{
    gMaxSectionTop = topPos;
    gMaxSectionHei = heiSz;

    var ivwObj;
    var tarObj;
    for (var i = 0; i < itemCds.length; i++)
    {
        ivwObj = document.controls("ivw_" + itemCds[i]);
        tarObj = document.controls("tar_" + itemCds[i]);

        if (tarObj == null)
        {
            ivwObj.attribute("orgtop")     = ivwObj.attribute("top");
            ivwObj.attribute("orgheight")  = ivwObj.attribute("height");
            ivwObj.attribute("ctrluseyn") = "Y";
        }
        else
        {
            tarObj.attribute("top") 		 = ivwObj.attribute("top");
            tarObj.attribute("left")   		 = ivwObj.attribute("left");
            tarObj.attribute("width")        = ivwObj.attribute("width");
            tarObj.attribute("height") 	     = ivwObj.attribute("height");

            tarObj.attribute("border-style") = "solid";
            ivwObj.attribute("border-style") = "none";

            ivwObj.attribute("orgtop")     = ivwObj.attribute("top");
            tarObj.attribute("orgtop")     = tarObj.attribute("top");
            ivwObj.attribute("orgheight")  = ivwObj.attribute("height");
            tarObj.attribute("orgheight")  = tarObj.attribute("height");

            tarObj.navindex = 100 + i;

        }
    }
    // model.refresh();
}


var gMaxSectionID = "";
/**
 * @desc   : ¾ÆÀÌÅÛÀÇ ¿µ¿ª ÃÖ´ëÈ­
 * @id     :
 * @event  :
 * @return : void
 * @authur : ¹ÚÁ¾ÈÆ
 */
function SetMaxSizeSection(itemCds)
{
    var ctrlID = event.target;

    var itemcd = ctrlID.replace("lbl_", "");

    var ctrlvisible = itemcd == gMaxSectionID ? true : false;

    for (var i = 0; i < itemCds.length; i++)
    {
        ctrl = document.controls("ivw_" + itemCds[i]);

        if (ctrl.attribute("ctrluseyn") == "N")
            ctrl = document.controls("tar_" + itemCds[i]);

        ctrl.attribute("top") = ctrl.attribute("orgtop");
        ctrl.attribute("height") = ctrl.attribute("orgheight");
        ctrl.visible = ctrlvisible;

        if (ctrl.elementName == "xforms:iviewer")
        	SetMultiTextFull(ctrl, 1);

        ctrl = document.controls("lbl_" + itemCds[i]);
        ctrl.attribute("background-color") = "#cce8ff";
    }

    ctrl = document.controls("ivw_" + itemcd);
    if (ctrl.attribute("ctrluseyn") == "N")
    {
        ctrl = document.controls("tar_" + itemcd);
    }

    if (! ctrlvisible)
    {
        ctrl.visible = true;
        ctrl.attribute("top") = gMaxSectionTop;
        ctrl.attribute("height") = gMaxSectionHei;

        if (ctrl.elementName == "xforms:iviewer")
        	SetMultiTextFull(ctrl, 1);

        ctrl = document.controls("lbl_" + itemcd);
        ctrl.attribute("background-color") = "#99ccff";

        gMaxSectionID = itemcd;
    }
    else
    {
       if (ctrl.elementName == "xforms:iviewer")
        	SetMultiTextFull(ctrl, 1);

        gMaxSectionID = "";
    }

    for (var i = 0; i < itemCds.length; i++)
    {
        ctrl = document.controls("tar_" + itemCds[i]);

        if (ctrl == null)
        {
            ctrl = document.controls("ivw_" + itemCds[i]);
            ctrl.window.javascript.fInitPage(false, parseInt(ctrl.attribute("height")), parseInt(ctrl.attribute("width")));
        }
    }

    ctrl = document.controls("tar_" + itemcd);
    if (ctrl != null && ctrl.attribute("ctrluseyn") == "Y")
    {
	    model.setFocus(ctrl.attribute("id"));
		ctrl.dispatch("onkeyup");
    }
}

/**
 * @desc   : À̹ÌÁö ¹öÆ° ÇÔ¼ö ¼³Á¤
 * @id     :
 * @event  :
 * @return : void
 * @authur : ¹ÚÁ¾ÈÆ
 */
function InitBtnImge(itemCds)
{
    for (var i = 0; i < itemCds.length; i++)
    {
        ctrl = document.controls("btn_imge_" + itemCds[i]);
        //alert(itemCds[i]);

        if (ctrl != null) {
        	  //alert("set attribute");
            ctrl.attribute("DOMActivate") = "OpenUnitFormImge()";
        }
        else {
            //alert("no set attribute");
        }
    }
}
/**
 * @desc   : È®Àå¼­½Ä ÄÞº¸ ref ¼³Á¤
 * @id     :
 * @event  :
 * @return : void
 * @authur : ÁÖÈñ°æ, 2010.01.19
 */
function initCmbExtnList(itemCds)
{
    for (var i = 0; i < itemCds.length; i++)
    {
        ctrl = document.controls("cbo_" + itemCds[i]);

        if (ctrl != null) {
        	//È®Àå¼­½Ä ÄÞº¸¸®½ºÆ® ÄÁÆ®·Ñµé¿¡ À̺¥Æ®¸¦ µ¿ÀûÀ¸·Î »ý¼ºÇÑ´Ù. (1. °ª¼ÂÆÃ, 2. ÇØ´ç ¼­½Ä ¿ÀÇ )
            ctrl.attribute("xforms-select") = "setExtnValueChange(cbo_" + itemCds[i]+", '"+itemCds[i]+"')";
        	//È®Àå¼­½Ä ÄÞº¸¸®½ºÆ®µé¿¡ µ¿ÀûÀ¸·Î ÀνºÅϽº¸¦ ¸ÅÇÎÇÑ´Ù.
        	setExtnFormList(ctrl, itemCds[i]);
        }
        else {
            //alert("no set attribute");
        }
    }
}

/**
 * @desc   : È®Àå¼­½Ä ÄÞº¸ value-change ½ÇÇà ÇÔ¼ö
 * @id     :
 * @event  :
 * @return : void
 * @authur : ÁÖÈñ°æ, 2010.01.19
 */
function setExtnValueChange(strCtrl, itemCd)
{
	fSetBaseForm( itemCd );	//±âº»¼­½Ä ·Îµù
	
	setExtnFormList(eval(strCtrl), itemCd);				//ÇöÀç ¼±ÅÃÇÑ ÄÞº¸°ª ÀúÀå
	openExtnUnitFormOfComnMediForm(itemCd);	//¼±ÅÃÇÑ È®Àå¼­½Ä ¿ÀÇÂ
}

/**
 * @desc   : È®Àå¼­½Ä Æ˾÷¿¡¼­ ±âº»¼­½Ä°ú °ãÄ¡´Â ¾ÆÀÌÅÛÀº disable ó¸® 
 *                 ( ±âº»ÀûÀ¸·Î Äõ¸®¿¡¼­ Áߺ¹Àº ó¸®Çϳª ƯÁ¤ ¾ÆÀÌÅÛÀÇ °æ¿ì ºÎ¸ð ¾ÆÀÌÅÛÀÌ µþ·Á Á¶È¸µÇ¾ß ÇϹǷΠºÎ¸ð ¾ÆÀÌÅÛÀ» disable ó¸® )
 * @id     :
 * @event  :
 * @return : void
 * @authur : ÁÖÈñ°æ, 2010.01.27
 */
function setCtrlDisabled(gFstLevlItemCd)
{
	var parentIvw = eval("opener.ivw_"+gFstLevlItemCd);
	var bodyCtrls = ivw_base.body.children;
	var length = bodyCtrls.length;
	
	for (i=0; i< length; i++)
	{
		if ( bodyCtrls.item(i).elementName == "xforms:scrollbar" || bodyCtrls.item(i).elementName == "xforms:import" || bodyCtrls.item(i).elementName == "xforms:script"|| bodyCtrls.item(i).elementName == "xforms:tooltip"  || bodyCtrls.item(i).elementName == "xforms:caption" || bodyCtrls.item(i).elementName == "xforms:group")
			continue;
			
		var degnitemno = bodyCtrls.item(i).attribute("degnitemno");		
		var cnt = parentIvw.model.getXPathValue("count(/root/main/recinfo/recitem[degnitemno='"+degnitemno+"'])");

		if ( cnt == 1 )
			bodyCtrls.item(i).disabled= true;
	}
}

/**
 * @desc   : °¡°èµµ ¹öÆ° ÇÔ¼ö ¼³Á¤
 * @id     :
 * @event  :
 * @return : void
 * @authur : ¹ÚÁ¾ÈÆ
 */
function InitBtnFmy(itemCds)
{
    for (var i = 0; i < itemCds.length; i++)
    {
        ctrl = document.controls("btn_fmy_" + itemCds[i]);

        if (ctrl != null)
            ctrl.attribute("DOMActivate") = "OpenUnitFormFmy()";
    }
}

/**
 * @desc   : Ãß°¡±â·Ï ¹öÆ° ÇÔ¼ö ¼³Á¤
 * @id     :
 * @event  :
 * @return : void
 * @authur : ¹ÚÁ¾ÈÆ
 */
function InitBtnEtcRec(itemCds)
{
    for (var i = 0; i < itemCds.length; i++)
    {
        ctrl = document.controls("btn_etcrec_" + itemCds[i]);

        if (ctrl != null)
            ctrl.attribute("DOMActivate") = "openEtcRec('" + itemCds[i] + "')";
    }
}

/**
 * @desc   : ÃÖÁ¾Áø´Ü¼Ò°ß ¹öÆ° ÇÔ¼ö ¼³Á¤
 * @id     :
 * @event  :
 * @return : void
 * @authur : °­ÁöÈÆ
 */
function InitBtnLastDiag(itemCd)
{
    ctrl = document.controls("btn_lastdiag_" + itemCd);

    if (ctrl != null)
    {
        ctrl.attribute("DOMActivate") = "openLastDiag('" + itemCd + "')";
    }
}

/**
 * @desc   : »ó¿ë±¸ °ü¸®È­¸é ¹öÆ° ÇÔ¼ö ¼³Á¤
 * @id     :
 * @event  :
 * @return : void
 * @authur : ¹ÚÁ¾ÈÆ
 */
function InitBtnComn(itemCds)
{
    //»ó¿ë±¸°ü¸®È­¸é ¿¡·¯·Î Àӽà ¸·À½(2008-01-03) ¹ÚÁ¾ÈÆ
//    for (var i = 0; i < itemCds.length; i++)
//    {
//        ctrl = document.controls("btn_comn_" + itemCds[i]);
//
//        if (ctrl != null)
//            ctrl.attribute("DOMActivate") = "OpenComnUseStmt()";
//    }
}

/**
 * @desc   : »ó¿ë±¸ ¿¹¹®°ü¸® È­¸é Æ˾÷
 * @id     :
 * @event  :
 * @return : void
 * @authur : ¹ÚÁ¾ÈÆ
 */
function OpenComnUseStmt()
{
    var ctrlID = event.target;

    var degnitemcd = ctrlID.replace("btn_comn_", "");

    setParameter("comn_degnitemcd", degnitemcd);
	setParameter("comn_srcformcd", parent.window.javascript.fGetFormMast("srcformcd"));

	modal("SMMRF02400",1 ,50, 50);
}

/**
 * @desc   :ȯÀÚÁø´ÜÁ¤º¸ °¡Á®¿À±â ¹öÆ° ¼³Á¤
 *          2010.01.15 dhkim 
 *          - ¹öÆ°À§Ä¡°¡ ºÎºÐ¼­½ÄÀÇ ¼½¼ÇÀÎ °æ¿ì ¹öÆ°À» hiddenó¸®ÇÔ
 *          - isBtnSet ÆĶó¹ÌÅÍ Ãß°¡ (Y:hiddenó¸®Àû¿ë, N:±âÁ¸´ë·Î»ç¿ë)
 * @id     :
 * @event  :
 * @return : void
 * @authur : ¹ÚÁ¾ÈÆ
 */
function InitBtnDiag(itemCd, isBtnSet)
{
    ctrl = document.controls("btn_diag_" + itemCd);

    if (ctrl != null)
    {
        ctrl.attribute("DOMActivate") = "GetPatDiagNm('" + itemCd + "')";
    }
    
    //2010.01.15 dhkim
    //isBtnSet ÆĶó¹ÌÅÍ Ãß°¡ (Y:hiddenó¸®Àû¿ë, N:±âÁ¸´ë·Î»ç¿ë)
    if(isBtnSet == null || isBtnSet == ""){
    	isBtnSet = "N";
    }
    
    //¹öÆ°À§Ä¡°¡ ºÎºÐ¼­½ÄÀÇ ¼½¼ÇÀÎ °æ¿ì ¹öÆ°À» hiddenó¸®ÇÔ
    if(isBtnSet == "Y"){
    	
    	
    	var srcNode = model.instance1.selectSingleNode("/root/main/forminfo/formdegn[supdegnitemcd='" + itemCd + "' and itemuseflag='F0']");
    	if(srcNode == null){
    		return;
    	}
    	
		var degnitemkindNode = srcNode.selectSingleNode("degnitemkind").text;
		var degnitemcd = srcNode.selectSingleNode("degnitemcd").text;
		
		//FRM & 00000005 (ÀÚÀ¯¼­½Ä)¾Æ´Ñ°Í
		if(degnitemkindNode == "FRM" && degnitemcd != "0000000005"){
			document.controls("btn_diag_" + itemCd).attribute("visibility") = "hidden";
		}else{
			document.controls("btn_diag_" + itemCd).attribute("visibility") = "visible";
		}
		
		document.controls("btn_diag_" + itemCd).refresh();
    }
    
}

/**
 * @desc   :ȯÀÚó¹æÁ¤º¸ °¡Á®¿À±â ¹öÆ° ¼³Á¤
 *          2010.01.15 dhkim 
 *          - ¹öÆ°À§Ä¡°¡ ºÎºÐ¼­½ÄÀÇ ¼½¼ÇÀÎ °æ¿ì ¹öÆ°À» hiddenó¸®ÇÔ
 *          - isBtnSet ÆĶó¹ÌÅÍ Ãß°¡ (Y:hiddenó¸®Àû¿ë, N:±âÁ¸´ë·Î»ç¿ë)
 * @id     :
 * @event  :
 * @return : void
 * @authur : ¹ÚÁ¾ÈÆ
 */
function InitBtnPrcp(itemCd, isBtnSet)
{
    ctrl = document.controls("btn_prcp_" + itemCd);

    if (ctrl != null)
    {
        ctrl.attribute("DOMActivate") = "GetPatPrcpList('" + itemCd + "')";
    }
    
    //20130329 Á¤Ã¢Çõ/ ó¹æ³»¿ªÀ» ¼±ÅÃÇÏ¿© Ãß°¡ÇÒ ¼ö ÀÖ´Â Æ˾÷â È£Ãâ
    var ctrlSelBtn = document.controls("btn_sel_prcp_" + itemCd);
    if (ctrlSelBtn != null) {
        ctrlSelBtn.attribute("DOMActivate") = "modal('SPMMR09000');";
    }
    
    //2010.01.15 dhkim
    //isBtnSet ÆĶó¹ÌÅÍ Ãß°¡ (Y:hiddenó¸®Àû¿ë, N:±âÁ¸´ë·Î»ç¿ë)
    if(isBtnSet == null || isBtnSet == ""){
    	isBtnSet = "N";
    }
    
    //¹öÆ°À§Ä¡°¡ ºÎºÐ¼­½ÄÀÇ ¼½¼ÇÀÎ °æ¿ì ¹öÆ°À» hiddenó¸®ÇÔ
    if(isBtnSet == "Y"){
    	
    	
    	var srcNode = model.instance1.selectSingleNode("/root/main/forminfo/formdegn[supdegnitemcd='" + itemCd + "' and itemuseflag='F0']");
    	if(srcNode == null){
    		return;
    	}
    	
		var degnitemkindNode = srcNode.selectSingleNode("degnitemkind").text;
		var degnitemcd = srcNode.selectSingleNode("degnitemcd").text;
		
		//FRM & 00000005 (ÀÚÀ¯¼­½Ä)¾Æ´Ñ°Í
		if(degnitemkindNode == "FRM" && degnitemcd != "0000000005"){
			document.controls("btn_prcp_" + itemCd).attribute("visibility") = "hidden";
		}else{
			document.controls("btn_prcp_" + itemCd).attribute("visibility") = "visible";
		}
		
		document.controls("btn_prcp_" + itemCd).refresh();
    }
    
}

/**
 * @desc   :ȯÀÚÅð¿øó¹æÁ¤º¸ °¡Á®¿À±â ¹öÆ° ¼³Á¤
 * @id     :
 * @event  :
 * @return : void
 * @authur : ¹ÚÁ¾ÈÆ
 */
function InitBtnOutPrcp(itemCd)
{
    ctrl = document.controls("btn_outprcp_" + itemCd);

    if (ctrl != null)
    {
        ctrl.attribute("DOMActivate") = "GetPatOutPrcpList('" + itemCd + "')";
    }
}

/**
 * @desc   :ȯÀÚ¿¹¾àÁ¤º¸ °¡Á®¿À±â ¹öÆ° ¼³Á¤
 * @id     :
 * @event  :
 * @return : void
 * @authur : ¹ÚÁ¾ÈÆ
 */
function InitBtnResv(itemCd)
{
    ctrl = document.controls("btn_resv_" + itemCd);

    if (ctrl != null)
    {
        ctrl.attribute("DOMActivate") = "GetPatResvList('" + itemCd + "')";
    }
}

/**
 * @desc   :ȯÀÚ¿¹¾àÁ¤º¸ °¡Á®¿À±â
 * @id     :
 * @event  : onclick
 * @return : void
 * @authur : ¹ÚÁ¾ÈÆ
 */
 function GetPatResvList(itemCd)
{
    var pageInfo = new PAGEINFO();
    var pid = parent.model.getValue(pageInfo.recMastRef + "/pid");

    //2009-11-10 ¿ÀÈÄ 11:48:12 °­ÁöÈÆ ¼öÁ¤ : ù¹ø° pid¸¦ ã¾Æ°¡±â¶§¹®¿¡ »ý±â´Â ¿À·ù
    model.removeNode("/root/send/pid");
    model.setValue("/root/send/reqinfstrec/pid", pid); 
    model.makeValue("/root/send/pid", pid );

		if (submit("TRMMR00301"))
		{
		    var nodelistResrvinfo = model.instances(0).selectNodes("/root/main/resvlist");
		    var resvinfo

		    if (nodelistResrvinfo.length > 0)
		    {
    		    resvinfo = "Áø·á¿¹¾à : ";
            var orddd = "";
            var ordtm = "";
            var orddeptnm = "";
            var orddrnm = "";

    		    for (var i = 1; i <= nodelistResrvinfo.length; i++)
    		    {
                var subNode = nodelistResrvinfo.item(i - 1);
                var orddd = subNode.selectSingleNode("orddd").text;
                var ordtm = subNode.selectSingleNode("ordtm").text;
                var orddeptnm = subNode.selectSingleNode("orddeptnm").text;
                var orddrnm = subNode.selectSingleNode("orddrnm").text;

                if (i == 1)
                {
                    resvinfo += orddd.substr(0, 4) + "-" + orddd.substr(4, 2) + "-"
                             + orddd.substr(6, 2) + " " + ordtm.substr(0, 2) + ":"
                             + ordtm.substr(2, 2) + ", Áø·á°ú : " + orddeptnm + ", Áø·áÀÇ : " + orddrnm + "\n";
                }
                else
                {
                    resvinfo += "               " + orddd.substr(0, 4) + "-" + orddd.substr(4, 2) + "-"
                             + orddd.substr(6, 2) + " " + ordtm.substr(0, 2) + ":"
                             + ordtm.substr(2, 2) + ", Áø·á°ú : " + orddeptnm + ", Áø·áÀÇ : " + orddrnm + "\n";
                }
    		    }
    		}
            else
            {
                messageBox("¿¹¾à³»¿ªÀÌ", "I004");
                return;
            }
		}

		if (resvinfo != "")
		{
		    model.setValue(pageInfo.recItemRef + "[fstlevlitemcd='" + itemCd + "']/reccnts", resvinfo);
		}

    model.refresh();
}

/**
 * @desc   :ȯÀÚÅð¿øó¹æÁ¤º¸ °¡Á®¿À±â
 * @id     :
 * @event  : onclick
 * @return : void
 * @authur : ¹ÚÁ¾ÈÆ
 */
 function GetPatOutPrcpList(itemCd)
{
    var pageInfo = new PAGEINFO();

    var prcpdd = "";
    var bfflag = "bfprcp";
    var flag = "-";
    var todd = "";
    var pid = parent.model.getValue(pageInfo.recMastRef + "/pid");
    var orddd = parent.model.getValue(pageInfo.recMastRef + "/orddd");
    //var orddd = getCurrentDate();
    var cretno = parent.model.getValue(pageInfo.recMastRef + "/cretno");
    //var orddrid = parent.model.getValue(pageInfo.recMastRef + "/orddrid");
    var orddrid = "";
    var orddeptcd = parent.model.getValue(pageInfo.recMastRef + "/orddeptcd");
    var prcpgenrflag = parent.model.getValue(pageInfo.recMastRef + "/chosflag");

//    if (prcpgenrflag == "I")
//    {
//        prcpdd = getCurrentDate();
//    }
//    else
//    {
		prcpdd = "recbfsrch"; // ÀÔÅð¿ø ¿ä¾àÁöÀÇ Åð¿øó¹æ ³¯Â¥Á¶°Ç º¯°æÀ» À§ÇÑ ±¸ºÐÀÚ  20100301 ÀÌÀ±Á¤
//    }

//alert("onbuttonclick prcpdd" + prcpdd);

	model.addLog("==GetPatOutPrcpList ÀÔÅð¿ø¿ä¾à ó¹æ¹öưŬ¸¯½Ã : prcpdd ::" + prcpdd);

    //ó¹æÁ¤º¸ °¡Á®¿À±â(Åð¿øó¹æ prcpkindcd = 60)
    if(fBfPrcpSrchCom(pid, orddd, prcpdd, bfflag, flag, orddrid, todd, prcpgenrflag, orddeptcd, cretno, "TRMMO00100", true))
    {
        var nodelistPrcpinfo = model.instances(0).selectNodes("/root/prcpsrch/prcplist[prcpkindcd = 60 and prcphistcd != 'C' and prcphistcd != 'L' and prcphistcd != 'E']");
    }
    
    var prcpkind = "";          //ó¹æÁ¾·ù
    var orgprcpnm = "";         //ó¹æ¸í
    var drugmthdspccdnm = "";          //¿ë¹ý
    var prcpdelivefact = "";    //Àü´Þ»çÇ×
    var prcplist = "";
    
    var prcpclscd = "";
    
    var tmpdrugmthdspccdnm = "";

    if(nodelistPrcpinfo.length >= 1){
        for(var i = 1; i <= nodelistPrcpinfo.length; i++)
        {
            var subNode = nodelistPrcpinfo.item(i - 1);
            //orgprcpnm = subNode.selectSingleNode("orgprcpnm").text;
            tmpdrugmthdspccdnm = subNode.selectSingleNode("drugmthdspccdnm").text;
            prcpkind = subNode.selectSingleNode("tempcol13").text;
            orgprcpnm = subNode.selectSingleNode("tempcol6").text;
            drugmthdspccdnm = subNode.selectSingleNode("tempcol7").text;
            prcpclscd = subNode.selectSingleNode("prcpclscd").text;
            
            drugmthdspccdnm = drugmthdspccdnm.replace(tmpdrugmthdspccdnm, "");
            
            drugmthdspccdnm = drugmthdspccdnm.replace("[±Þ]", "");
            drugmthdspccdnm = drugmthdspccdnm.replace("[ÀÏ]", "");
            drugmthdspccdnm = drugmthdspccdnm.replace("[º»]", "");
            drugmthdspccdnm = drugmthdspccdnm.replace("(Áý)", "");
            drugmthdspccdnm = drugmthdspccdnm.replace("[home]", "");
            drugmthdspccdnm = drugmthdspccdnm.replace("[ÀÓ»ó]", "");
            drugmthdspccdnm = drugmthdspccdnm.replace("[prn]", "");            
            var prcpdelivefact = subNode.selectSingleNode("prcpdelivefact").text;

            //prcplist += prcpkind + " " +orgprcpnm + " " + drugmthdspccdnm + " " + prcpdelivefact + "\n"
            
            if (prcpclscd == "A2" || prcpclscd == "A4" || prcpclscd == "A6")
            {
                prcplist += orgprcpnm + " " + drugmthdspccdnm + "\n"
            }
            else
            {
                prcplist += orgprcpnm + "\n"
            }
        }
    }
    else
    {
    	messageBox("Åð¿øó¹æ ³»¿ªÀÌ", "I004");
        return false;
    }

    var prerec = model.getValue(pageInfo.recItemRef + "[fstlevlitemcd='" + itemCd + "']/reccnts");
    if (prerec != "")
    {
        prerec = prerec + "\n" + prcplist + "\n";
    }
    else
    {
        prerec = prcplist + "\n"
    }

    model.setValue(pageInfo.recItemRef + "[fstlevlitemcd='" + itemCd + "']/reccnts", prerec);
    model.refresh();
    return true;
}

/**
 * @desc   :ȯÀÚó¹æÁ¤º¸ °¡Á®¿À±â
 * @id     :
 * @event  : onclick
 * @return : void
 * @authur : ¹ÚÁ¾ÈÆ
 */
 function GetPatPrcpList(itemCd)
{
    var pageInfo = new PAGEINFO();

    var prcpdd = getCurrentDate();
    var bfflag = "bfprcp";
    var flag = "";
    var todd = "";
    var pid = parent.model.getValue(pageInfo.recMastRef + "/pid");
    var orddd = parent.model.getValue(pageInfo.recMastRef + "/orddd"); 
    var cretno = parent.model.getValue(pageInfo.recMastRef + "/cretno");
    var orddrid = parent.model.getValue(pageInfo.recMastRef + "/orddrid");
    var orddeptcd = parent.model.getValue(pageInfo.recMastRef + "/orddeptcd");
    var prcpgenrflag = parent.model.getValue(pageInfo.recMastRef + "/chosflag");

    if (prcpgenrflag == "I" || prcpgenrflag == "E" || prcpgenrflag == "D")
    {
        prcpdd = parent.model.getValue(pageInfo.recMastRef + "/formrecdd");
    }
    else
    {
        prcpdd = orddd;
    }
    
    //ó¹æÁ¤º¸ °¡Á®¿À±â(Åð¿øó¹æ prcpkindcd = 60)
    if(fBfPrcpSrchCom(pid, orddd, prcpdd, bfflag, flag, orddrid, todd, prcpgenrflag, orddeptcd, cretno, "TRMMO00100", true))
    {
        var nodelistPrcpinfo = model.instances(0).selectNodes("/root/prcpsrch/prcplist[prcpkindcd != '' and prcphistcd != 'C' and prcphistcd != 'L' and prcphistcd != 'E']");
    }
    
    var prcpkind = "";          //ó¹æÁ¾·ù
    var orgprcpnm = "";         //ó¹æ¸í
    var drugmthdspccdnm = "";          //¿ë¹ý
    var prcpdelivefact = "";    //Àü´Þ»çÇ×
    var prcplist = "";
    var prcphistcd = "";        //ÀÓ½Ã,ÀÎÁõ±¸ºÐ
    var prcpclscd = "";
    
    var tmpdrugmthdspccdnm = "";

    if(nodelistPrcpinfo.length >= 1){
        for(var i = 1; i <= nodelistPrcpinfo.length; i++)
        {
            var subNode = nodelistPrcpinfo.item(i - 1);
            //orgprcpnm = subNode.selectSingleNode("orgprcpnm").text;
            tmpdrugmthdspccdnm = subNode.selectSingleNode("drugmthdspccdnm").text;
            prcpkind = subNode.selectSingleNode("tempcol13").text;
            orgprcpnm = subNode.selectSingleNode("tempcol6").text;
            drugmthdspccdnm = subNode.selectSingleNode("tempcol7").text;
            prcpclscd = subNode.selectSingleNode("prcpclscd").text;
            
            //2012.06.08 ó¹æ °¡Á®¿À±â °³ÀÎ ¼³Á¤ Á¶È¸ ¾ö¿µ¸¸
            fGetUserEnvOcsOrdAnsw("/root/send/reqdata", "/root/envinit/getprcpcnt", "033");
            var getprcpcnt = model.getValue("/root/envinit/getprcpcnt/answcnt");
            switch(getprcpcnt)
            {
                case "001" :  // ±âº»°ª ¿ë¹ý »èÁ¦
                    drugmthdspccdnm = drugmthdspccdnm.replace(tmpdrugmthdspccdnm, "");
                    break;
                    
                case "002" : // ¾àǰó¹æ ¿ë¹ýÇ¥½Ã
                    if (prcpclscd != "A2" && prcpclscd != "A4" && prcpclscd != "A6") {
                        drugmthdspccdnm = drugmthdspccdnm.replace(tmpdrugmthdspccdnm, "");
                    }
                    break;
               
                default:
                    drugmthdspccdnm = drugmthdspccdnm.replace(tmpdrugmthdspccdnm, "");
                    break;
            }
            
            drugmthdspccdnm = drugmthdspccdnm.replace("[±Þ]", "");
            drugmthdspccdnm = drugmthdspccdnm.replace("[ÀÏ]", "");
            drugmthdspccdnm = drugmthdspccdnm.replace("[º»]", "");
            drugmthdspccdnm = drugmthdspccdnm.replace("(Áý)", "");
            drugmthdspccdnm = drugmthdspccdnm.replace("[home]", "");
            drugmthdspccdnm = drugmthdspccdnm.replace("[ÀÓ»ó]", "");
            drugmthdspccdnm = drugmthdspccdnm.replace("[prn]", "");
            prcpdelivefact = subNode.selectSingleNode("prcpdelivefact").text;
            prcphistcd = subNode.selectSingleNode("prcphistcd").text;
            
            if(prcphistcd == "T") {
                if (prcpclscd == "A2" || prcpclscd == "A4" || prcpclscd == "A6") {
                    prcplist += "[ÀÓ] " + orgprcpnm + " " + drugmthdspccdnm + "\n"
                } else {
                    prcplist += "[ÀÓ] " + orgprcpnm + "\n"
                }
            } else {
                if (prcpclscd == "A2" || prcpclscd == "A4" || prcpclscd == "A6") {
                    prcplist += orgprcpnm + " " + drugmthdspccdnm + " " + "\n"
                }
                else {
                    prcplist += orgprcpnm + "\n"
                }
            }
        }
    }

    var prerec = model.getValue(pageInfo.recItemRef + "[fstlevlitemcd='" + itemCd + "']/reccnts");
    if (prerec != "")
    {
        prerec = prerec + "\n" + prcplist + "\n";
    }
    else
    {
        prerec = prcplist + "\n"
    }

    model.makeValue("/root/send/pid", pid );

		if (submit("TRMMR00301"))
		{
		    var nodelistResrvinfo = model.instances(0).selectNodes("/root/main/resvlist");
		    var resvinfo

		    if (nodelistResrvinfo.length > 0)
		    {
    		    resvinfo = "Áø·á¿¹¾à : ";
            var orddd = "";
            var ordtm = "";
            var orddeptnm = "";
            var orddrnm = "";

    		    for (var i = 1; i <= nodelistResrvinfo.length; i++)
    		    {
                var subNode = nodelistResrvinfo.item(i - 1);
                var orddd = subNode.selectSingleNode("orddd").text;
                var ordtm = subNode.selectSingleNode("ordtm").text;
                var orddeptnm = subNode.selectSingleNode("orddeptnm").text;
                var orddrnm = subNode.selectSingleNode("orddrnm").text;

                if (i == 1)
                {
                    resvinfo += orddd.substr(0, 4) + "-" + orddd.substr(4, 2) + "-"
                             + orddd.substr(6, 2) + " " + ordtm.substr(0, 2) + ":"
                             + ordtm.substr(2, 2) + ", Áø·á°ú : " + orddeptnm + ", Áø·áÀÇ : " + orddrnm + "\n";
                }
                else
                {
                    resvinfo += "               " + orddd.substr(0, 4) + "-" + orddd.substr(4, 2) + "-"
                             + orddd.substr(6, 2) + " " + ordtm.substr(0, 2) + ":"
                             + ordtm.substr(2, 2) + ", Áø·á°ú : " + orddeptnm + ", Áø·áÀÇ : " + orddrnm + "\n";
                }
    		    }
    		}
        else
        {
            resvinfo = "";
        }
		}

		if (resvinfo != "")
		{
		    prerec += resvinfo;
		}

    model.setValue(pageInfo.recItemRef + "[fstlevlitemcd='" + itemCd + "']/reccnts", prerec);
    model.refresh();
}

/**
 * @desc   :ȯÀÚÁø´ÜÁ¤º¸ °¡Á®¿À±â
 * @id     :
 * @event  : onclick
 * @return : void
 * @authur : ¹ÚÁ¾ÈÆ
 */
 function GetPatDiagNm(itemCd)
{
    var pageInfo = new PAGEINFO();

    var sPid = parent.model.getValue(pageInfo.recMastRef + "/pid");
    var sOrddd = parent.model.getValue(pageInfo.recMastRef + "/orddd");
    var sCretno = parent.model.getValue(pageInfo.recMastRef + "/cretno");
    var sOrddeptcd = parent.model.getValue(pageInfo.recMastRef + "/orddeptcd");
    var sIoflag = parent.model.getValue(pageInfo.recMastRef + "/chosflag");

    model.removeNodeset("/root/main/diaginfo");
    model.makeValue("/root/send/cond1", sPid);
    model.makeValue("/root/send/cond2", sOrddd);
    model.makeValue("/root/send/cond3", sCretno);
    model.makeValue("/root/send/cond4", sOrddeptcd);
    model.makeValue("/root/send/cond5", sIoflag);

    if (submit("TRMMO00105", false))
    {
        var nodelistDiaginfo = model.instances(0).selectNodes("/root/main/diaginfo/diagcdlist");
        var ro = "";
        var ms = "";
        var diaglist = "";
        if(nodelistDiaginfo.length >= 1){
            for(var i = 1; i <= nodelistDiaginfo.length; i++)
            {
                sDiagkindcd = model.getValue("/root/main/diaginfo/diagcdlist[" + i + "]/diagkindcd");
                sDiagkindcdflag = model.getValue("/root/main/diaginfo/diagcdlist[" + i + "]/diagkindcdflag");
                sTmpdiagcd = model.getValue("/root/main/diaginfo/diagcdlist[" + i + "]/icd10cd");
                sTmpdiagengnm = model.getValue("/root/main/diaginfo/diagcdlist[" + i + "]/diagengnm");

                if (sDiagkindcd == "R")
                    ro = "R/O";
                else
                    ro = "  -  ";

                if (sDiagkindcdflag == "M")
                    ms = "ÁÖ";
                else
                    ms = "ºÎ";

                //diaglist += ro + " " + ms + " " + sTmpdiagcd + " " + sTmpdiagengnm + "\n"
                diaglist += ro + " " + ms + " " + sTmpdiagengnm + "\n"
            }
        }
    }

    var prerec = model.getValue(pageInfo.recItemRef + "[fstlevlitemcd='" + itemCd + "']/reccnts");
    if (prerec != "")
    {
        prerec = prerec + "\n" + diaglist;
    }
    else
    {
        prerec = diaglist;
    }

    model.setValue(pageInfo.recItemRef + "[fstlevlitemcd='" + itemCd + "']/reccnts", prerec);
    model.refresh();
}


function EditableCtrl(trgElement, editableBool)
{
    var editableStr = "";
	if( editableBool )
		editableStr = "true";
	else
		editableStr = "false";

	var childLen = trgElement.children.length;
	var tmpChildObj = null;
	for( var i = 0; i < childLen; i++ ) {

		tmpChildObj = trgElement.children.item(i);

		if (tmpChildObj.attribute("usereditable") == "Y")
		    continue;

		// group, switchÀÏ °æ¿ì
		if( tmpChildObj.elementName == "xforms:group" ) {
			EditableCtrl( tmpChildObj, editableBool);
		}
		// iviewerÀÏ °æ¿ì
		else if( tmpChildObj.elementName == "xforms:iviewer" ) {
		    if( tmpChildObj.src != "" && tmpChildObj.attribute("id").indexOf("FRM_") == -1 )
			    EditableCtrl( tmpChildObj.window.body, editableBool);
		}
		// switchÀÏ °æ¿ì
		else if( tmpChildObj.elementName == "xforms:switch" ) {
			for( var j = 0; j < tmpChildObj.children.length; j++ ) {
				EditableCtrl( tmpChildObj.children.item(j), editableBool);
			}
		}

		else{
			// inout, secret, textarea
			if( tmpChildObj.elementName == "xforms:input" || tmpChildObj.elementName == "xforms:secret" || tmpChildObj.elementName == "xforms:textarea" ) {
				tmpChildObj.attribute("editable") = editableStr;
			}
			// select, select1
			else if( tmpChildObj.elementName == "xforms:select" || tmpChildObj.elementName == "xforms:select1") {
				tmpChildObj.disabled = !editableBool;
			}
			else if( tmpChildObj.elementName == "xforms:datagrid" ) {
				tmpChildObj.isReadOnly(tmpChildObj.fixedRows, tmpChildObj.fixedCols, tmpChildObj.rows - 1, tmpChildObj.cols - 1) = !editableBool;
			}
			else if( tmpChildObj.elementName == "xforms:button" ) {
			    tmpChildObj.disabled = !editableBool;
			}
		}
	}
}

/*****************************************************************************
Æ©´×
******************************************************************************/

/**
 * @group  :
 * @ver    : 2008.06.13
 * @by     : snoweye
 * @---------------------------------------------------
 * @type   : function
 * @access : private
 * @desc   : Section ÃʱâÈ­(ºÎºÐ¼­½Ä ·Îµù ¹× È®Àå¼­½Ä ¼¼ÆÃ) <-- InitLoadSection, InitSetUnitForm ÅëÇÕ
 * @param  :
 * @return :
 * @---------------------------------------------------
 */
function initSection(itemCds)
{
    var pageInfo = new PAGEINFO();
    //alert("itemCds.length : " + itemCds.length);

    // °øÅë¼­½Ä ÀνºÅϽº »ý¼º
    copyNodeset("/root/main", "/root/main", "replace", model, parent.model);
    model.removeNodeset("/root/main/recinfo");
    
    //¼ö¼ú±â·Ï ºÐ±â(2008.10.24 ¹ÚÁ¾ÈÆ)
    if (parent.window.javascript.fGetFormMast("srcformcd") == "1000000001" || parent.window.javascript.fGetFormMast("srcformcd") == "0000000676" || parent.window.javascript.fGetFormMast("srcformcd") == "0000003169")
    {
        makeRefByDegnitemLevlCd();
    }
    else
    {
        makeRefByDegnitemno();
    }

//    model.addLog("######################################");
//    model.addLog("Loading ½ÃÀÛ : " + getCurrentTime());
//    model.addLog("######################################");
    var fstLoad = false;

    for (var i = 0; i < itemCds.length; i++)
    {
        //var cnt = getNodesetCnt(model, pageInfo.forminfoRef + "/unitformmast[orgsupdegnitemcd='"+itemCds[i]+"']");
        //debugger;
        var formdegnseq = model.getValue(pageInfo.forminfoRef + "/unitformmast[orgsupdegnitemcd='"+itemCds[i]+"']/formdegnseq");
        var unitformcd = model.getValue(pageInfo.forminfoRef + "/unitformmast[orgsupdegnitemcd='"+itemCds[i]+"']/formcd");
        var ivwObj = document.controls("ivw_" + itemCds[i]);
        var tarObj = document.controls("tar_" + itemCds[i]);
        
        //alert(ivwObj.src);
        
        //if (cnt == 0)
        if(formdegnseq == "")
        {
            ivwObj.visible = false;
            tarObj.visible = true;

            //onloadcomplete °­Á¦ ½ÇÇà(SectionÀÌ ºÎºÐ¼­½ÄÀÌ ¾Æ´Ñ°æ¿ì)

            fOnLoadComplete();
            
            //setParameter("loadformcd", "");
        }
        //snoweye(2008-12-16) - Sectionº° ·Îµù
        /*************************************************************************/
        else if(!fstLoad || unitformcd == '0000000005')//ù¹ø° ºÎºÐ¼­½Ä¸¸ ·Îµù(2008-12-04)
        {
            ivwObj.visible = true;
            tarObj.visible = false;
            //var unitformcd = model.getValue(pageInfo.formdegnRef + "[supdegnitemcd='" + itemCds[i] +
            //    "' and degnitemkind = 'FRM' and itemuseflag = 'F0']/degnitemcd");
            
            var unitformprogflag = model.getValue(pageInfo.forminfoRef + "/unitformmast[orgsupdegnitemcd='"+itemCds[i]+"']/formprogflag");

            if (unitformcd != "")
            {
                ivwObj.attribute("supdegnitemcd") = itemCds[i];
                ivwObj.attribute("unitformcd") = unitformcd;

                model.addLog(unitformcd + " Loading ½ÃÀÛ : " + getCurrentTime());
                loadUnitForm(ivwObj, itemCds[i]);
                model.addLog(unitformcd + " Loading ³¡ : " + getCurrentTime());
                
                if (unitformprogflag != "PROG" && parent.window.javascript.fGetFormRec("status") == "C" && parent.window.javascript.fGetFormMast("formcd") != "0800000722" && unitformcd != '0000000005')  //¿µ¾ç°Ë»öÀÇ·Ú Á¦¿Ü
                {
                    var srcformcd = model.getValue(pageInfo.formmastRef+ "/srcformcd");
                    
                    //ÀÔ¿ø°æ°ú,¿Ü·¡ÀçÁøÀº Á¦¿ÜÇÑ´Ù(20130729 ÀÌÀ±ÁÖ => 20161109 ¼öÁ¤)
                    if (srcformcd != "0000000004" && srcformcd != "0000000002" && srcformcd != "0000000679") {
                      fstLoad = true;//ù¹ø° ºÎºÐ¼­½Ä ·Îµù¿Ï·á(2008-12-04)
	                  	dispOnLoadComplete(UNIT_FORM);
	                }
                }
                else if(unitformprogflag == "PROG" && parent.window.javascript.fGetFormRec("status") == "C" && parent.window.javascript.fGetFormMast("formcd") == "0800000722")
                {
                    //dispOnLoadComplete(UNIT_FORM);
                    //model.setValue(gPageInfo.forminfoRef + "/unitformmast[formcd='" + unitformcd + "' and loaded != 'true']/loaded", "true");
                }
            }
        }
        //snoweye(2008-12-16) - Sectionº° ·Îµù ³¡
        /*************************************************************************/
        if(formdegnseq != "")
        {
            ivwObj.visible = true;
            tarObj.visible = false;
        }

        if (tarObj.visible == true)
        {
        	setComnEvent(parent.window.javascript.fGetFormMast("srcformcd"), tarObj.attribute("degnitemno"), tarObj.attribute("id"));
        }

        var cboObj = document.controls("cbo_" + gItemCds[i]);
        setExtnFormList(cboObj, gItemCds[i]);
    }
    
    return fstLoad;
}

/**
 * @group  :
 * @ver    : 2008.06.13
 * @by     : snoweye
 * @---------------------------------------------------
 * @type   : function
 * @access : private
 * @desc   : ºÎºÐ¼­½Ä Load
 * @param  :
 * @return :
 * @---------------------------------------------------
 */
function loadUnitForm(ivwObj, fstLevlItemCd)
{
    var pageInfo = new PAGEINFO();
    var formdegnseq = model.getValue(pageInfo.forminfoRef + "/unitformmast[orgsupdegnitemcd='" + fstLevlItemCd + "']/formdegnseq");
    var formprogflag = model.getValue(pageInfo.forminfoRef + "/unitformmast[orgsupdegnitemcd='" + fstLevlItemCd + "']/formprogflag");
    var srcformcd = model.getValue(pageInfo.formmastRef+ "/srcformcd");
    
    if(formprogflag == "PROG")
    {
        var formprognm = model.getValue(pageInfo.forminfoRef + "/unitformmast[orgsupdegnitemcd='" + fstLevlItemCd + "']/formprognm");
        ivwObj.src = formprognm + ".xrw";
    }
    else
    {
        ivwObj.src = getFormUrl(formdegnseq, ivwObj.attribute("id"));
    }
    
    setMaxSizeMtx(ivwObj, 1);
    
    if (srcformcd == "0000000679" && ivwObj.src != "")
    {
        if (opener.window.javascript.getScreenID() == "SSMMR01100")
        {
            fSetErTriageRec(ivwObj, null);
        }
        else
        {
            ivw_base.window.javascript.fSetErTriageRec(ivwObj, null);
        }
    }
}

/**
 * @group  :
 * @ver    : 2008.06.13
 * @by     : snoweye
 * @---------------------------------------------------
 * @type   : function
 * @access : private
 * @desc   : È®Àå¼­½Ä ¼¼Æà (<--SetUnitFormList)
 * @param  :
 * @return :
 * @---------------------------------------------------
 */
function setExtnFormList(cboObj, supdegnitemcd)
{
    if (cboObj == null) return;

    var pageInfo = new PAGEINFO();

    cboObj.refresh();
    if (cboObj.itemCount == 0)
    {
        cboObj.visible = false;
    }
    else
    {
        cboObj.visible = true;

        var node = model.instances(0).selectSingleNode(pageInfo.forminfoRef + "/unitformmast[orgsupdegnitemcd='"+ supdegnitemcd +"']/formdegnseq");

        if (node != null)
        {
            model.makeValue("/root/hidden/choicbo/cbo_" + supdegnitemcd + "/baseunitformdegnseq", node.text);
            model.makeValue("/root/hidden/choicbo/cbo_" + supdegnitemcd + "/extnunitformdegnseq", cboObj.value);
        }
        else
        {
            model.makeValue("/root/hidden/choicbo/cbo_" + supdegnitemcd + "/baseunitformdegnseq", "");
            model.makeValue("/root/hidden/choicbo/cbo_" + supdegnitemcd + "/extnunitformdegnseq", "");
        }

        //model.makeNode("/root/hidden/choicbo/cbo_" + supdegnitemcd + "/extnunitformdegnseq");

        cboObj.attribute("ref") = "/root/hidden/choicbo/cbo_" + supdegnitemcd + "/extnunitformdegnseq";

        cboObj.refresh();
    }
}

/**
 * @group  :
 * @ver    : 2008.06.23
 * @by     : snoweye
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : ·ÎµåÇÒ ¼­½ÄÀÇ UrlÀ» ¹Ýȯ
 * @param  : formdegnseq - loadÇÒ ¼­½ÄÀÇ µðÀÚÀÎ ¼ø¹ø
 * @param  : ivwid - ¼­½ÄÀ» loadÇÒ viewerÀÇ id
 * @return : Action Url (String)
 * @---------------------------------------------------
 */
function getFormUrl(formdegnseq, ivwid)
{
    return getActionURL("TRMRF01201") + getUserSessionString() + "&formcd=&formdegnseq=" + formdegnseq + "&ivwid=" + ivwid;
}



/**
 * @group  :
 * @ver    : 2008.06.23
 * @by     : snoweye
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : Section¿µ¿ª ÃÖ´ëÈ­ ( <-- SetMaxSizeSection)
 * @param  : itemCds - ¼½¼Ç itemcd ¹è¿­
 * @return :
 * @---------------------------------------------------
 */
function expandSection(itemCds)
{
    var ctrlID = event.target;

    var itemcd = ctrlID.replace("lbl_", "");

    var bFold = itemcd == gMaxSectionID ? true : false;

    var ctrl = null;
    var prevItemCd = gMaxSectionID;
    var unitformcd = "";
    
    for (var i = 0; i < itemCds.length; i++)
    {
        var secCtrl = document.controls("lbl_" + itemCds[i]);
        var formdegnseq = model.getValue(gPageInfo.forminfoRef + "/unitformmast[orgsupdegnitemcd='"+itemCds[i]+"']/formdegnseq");
        unitformcd = model.getValue(gPageInfo.forminfoRef + "/unitformmast[orgsupdegnitemcd='"+itemCds[i]+"']/formcd");

        /*ctrl = document.controls("ivw_" + itemCds[i]);

        if (ctrl.attribute("ctrluseyn") == "N")
            ctrl = document.controls("tar_" + itemCds[i]);*/

        if(formdegnseq == "")
            ctrl = document.controls("tar_" + itemCds[i]);
        else
            ctrl = document.controls("ivw_" + itemCds[i]);

        if(itemcd == itemCds[i])
        {
            fSetBaseForm( itemCds[i] );
            
            if(bFold)//fold
            {
                ctrl.attribute("top") = ctrl.attribute("orgtop");
                ctrl.attribute("height") = ctrl.attribute("orgheight");
                secCtrl.attribute("background-color") = secCtrl.attribute("orgbackground-color");

                gMaxSectionID = "";
            }
            else//expand
            {
                ctrl.attribute("orgtop") = ctrl.attribute("top");
                ctrl.attribute("orgheight") = ctrl.attribute("height");
                secCtrl.attribute("orgbackground-color") = secCtrl.attribute("background-color");

                ctrl.attribute("top") = gMaxSectionTop;
                ctrl.attribute("height") = gMaxSectionHei;
                secCtrl.attribute("background-color") = "#99ccff";
                gMaxSectionID = itemcd;
                
            }
            ctrl.visible = true;

        }
        else
        {
            if(bFold)//fold
            {
                ctrl.visible = true;
            }
            else//expand
            {
                ctrl.visible = false;
                if(prevItemCd == itemCds[i])
                {
                    ctrl.attribute("top") = ctrl.attribute("orgtop");
                    ctrl.attribute("height") = ctrl.attribute("orgheight");
                    secCtrl.attribute("background-color") = secCtrl.attribute("orgbackground-color");
                }
            }
        }
        
        if (ctrl.attribute("id") == "ivw_" + itemCds[i])
        {
            SetMultiTextFull(ctrl, 1);
        }
        
        if (unitformcd == "0000000901" || unitformcd == "0000000899" || unitformcd == "0000000900")
        {
            ctrl.window.javascript.fInitPage(false, parseInt(ctrl.attribute("height")), parseInt(ctrl.attribute("width")));
        }
        
        //ctrl = document.controls("lbl_" + itemCds[i]);
        //ctrl.attribute("background-color") = "#cce8ff";
    }

    /*ctrl = document.controls("ivw_" + itemcd);
    if (ctrl.attribute("ctrluseyn") == "N")
    {
        ctrl = document.controls("tar_" + itemcd);
    }

    if (! ctrlvisible)
    {
        ctrl.visible = true;
        ctrl.attribute("top") = gMaxSectionTop;
        ctrl.attribute("height") = gMaxSectionHei;

        if (ctrl.elementName == "xforms:iviewer")
        	setMaxSizeMtx(ctrl, 1);

        ctrl = document.controls("lbl_" + itemcd);
        ctrl.attribute("background-color") = "#99ccff";

        gMaxSectionID = itemcd;
    }
    else
    {
       if (ctrl.elementName == "xforms:iviewer")
        	setMaxSizeMtx(ctrl, 1);

        gMaxSectionID = "";
    }

    for (var i = 0; i < itemCds.length; i++)
    {
        ctrl = document.controls("tar_" + itemCds[i]);

        if (ctrl == null)
        {
            ctrl = document.controls("ivw_" + itemCds[i]);
            ctrl.window.javascript.fInitPage(false, parseInt(ctrl.attribute("height")), parseInt(ctrl.attribute("width")));
        }
    }

    ctrl = document.controls("tar_" + itemcd);
    if (ctrl != null && ctrl.attribute("ctrluseyn") == "Y")
    {
	    model.setFocus(ctrl.attribute("id"));
		ctrl.dispatch("onkeyup");
    }*/
}

function fSetBaseForm( itemCd )
{
	//¼½¼Ç ¼±Åýà ÇØ´ç ¼½¼ÇÀÇ ºÎºÐ¼­½ÄÀÇ ·ÎµùµÇ¾îÀÖ´ÂÁö È®ÀÎÇÏ¿©
    //·ÎµùµÇ¾î ÀÖÁö ¾ÊÀ¸¸é ºÎºÐ¼­½Ä·Îµù
    var ivwObj = document.controls("ivw_" + itemCd);
    if(ivwObj.src == "")
    {
        //var unitformcd = model.getValue(gPageInfo.formdegnRef + "[supdegnitemcd='" + itemCd +
        //    "' and degnitemkind = 'FRM' and itemuseflag = 'F0']/degnitemcd");
        var unitformcd = model.getValue( gPageInfo.forminfoRef + "/unitformmast[orgsupdegnitemcd='"+itemCd+"']/formcd");
        
        if (unitformcd != "")
        {
            ivwObj.attribute("supdegnitemcd") = itemCd;
            ivwObj.attribute("unitformcd") = unitformcd;

            model.addLog(unitformcd + " Loading ½ÃÀÛ : " + getCurrentTime());
            loadUnitForm(ivwObj, itemCd);
            model.addLog(unitformcd + " Loading ³¡ : " + getCurrentTime());
            
            //2008-12-18¹ÚÁ¾ÈÆ(±â·Ïµ¥ÀÌÅÍ °¡Á®¿À±â-º¸¿ÏÇÊ¿ä)
            //parent.window.javascript.InitUnitFormDataBySupdegnitemcd(itemCd);
        }
    }
}
/**
 * @group  :
 * @ver    : 2008.06.23
 * @by     : snoweye
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : TextArea ÃÖ´ëÈ­ ( <-- SetMultiTextFull)
 * @param  : ctrl - TextArea°¡ Æ÷ÇÔµÈ iviewer object ¶Ç´Â  TextArea
 * @return :
 * @---------------------------------------------------
 */
function setMaxSizeMtx(ivwObj, pDegnItemNo)
{
    if (ivwObj.attribute("unitformcd") == "0000000005")
    {
        ivwObj.window.javascript.fSetMtxSize(pDegnItemNo, 0, 0, parseInt(ivwObj.attribute("width"))-5, parseInt(ivwObj.attribute("height")));

        /*var mtxNm = "MTX_" + pDegnItemNo;
        var mtx = ivwObj.window.document.controls(mtxNm);
        if(mtx != null)
        {
            mtx.attribute("border-style") = "none";

            mtx.refresh();
        }*/
    }

}


/**
 * @group  :
 * @ver    : 2008.06.23
 * @by     : snoweye
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : º¹ÇÕ¼­½Ä(ºÎºÐ¼­½ÄÀ» Æ÷ÇÔ, °øÅë¼­½Ä)ÀÇ ±â·Ï µ¥ÀÌÅ͸¦ ÃëÇÕ ( <-- initSaveComnFormRecItemData)
 * @param  : mode - null / 'all' ( ±â·ÏµÈ µ¥ÀÌÅ͸¸ / Àüü µ¥ÀÌÅÍ)
 * @return :
 * @---------------------------------------------------
 */
function getSaveComnFormData_old(mode)
{
    var ctrlIvw;
    var pageInfo = new PAGEINFO();

    if (gFstItemCds == null)
    {
        gFstItemCds = gItemCds;
    }

    model.removeNodeset(pageInfo.sortItemRef);

    //program¼­½Ä µ¥ÀÌÅÍ ÀúÀå
    getSaveData(pageInfo.sortItemRef, "append", model, null, mode);

    for (var i = 0; i < gItemCds.length; i++)
    {
        ctrlIvw = document.controls("ivw_" + gItemCds[i]);

        if (ctrlIvw != null && ctrlIvw.visible)
            ctrlIvw.window.javascript.getSaveData(pageInfo.sortItemRef, "append", model, NewPageInfo(ctrlIvw, gFstItemCds[i]));

        copyNodeset(pageInfo.sortItemRef, "/root/hidden/extnformrec/recinfo/recitem[fstlevlitemcd = '" +gItemCds[i]+ "']", "append", model, model);

        copyNodeset(pageInfo.sortItemRef, pageInfo.imgerecItemRef + "[fstlevlitemcd = '" +gItemCds[i]+ "']", "append", model, model);
    }
    SortRecItem();
    copyNodeset(pageInfo.recItemRef2, pageInfo.recItemRef2, "replace", opener.model, model);
}

/**
 * @group  :
 * @ver    : 2008.06.23
 * @by     : snoweye
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : º¹ÇÕ¼­½Ä(ºÎºÐ¼­½ÄÀ» Æ÷ÇÔ, °øÅë¼­½Ä)ÀÇ ±â·Ï µ¥ÀÌÅ͸¦ ÃëÇÕ ( <-- initSaveComnFormRecItemData)
 * @param  : mode - null / 'all' ( ±â·ÏµÈ µ¥ÀÌÅ͸¸ / Àüü µ¥ÀÌÅÍ)
 * @return :
 * @---------------------------------------------------
 */
function getSaveComnFormData(mode, tmp)
{
    var ctrlIvw;
    var ctrlTar;
    var pageInfo = new PAGEINFO();
    var savedInfo = new SAVED_INFO();

    if (gFstItemCds == null)
    {
        gFstItemCds = gItemCds;
    }

    model.removeNodeset(pageInfo.sortItemRef);

    //program¼­½Ä µ¥ÀÌÅÍ ÀúÀå
    
    //2010.01.12 ¾ÈÄ¡¿ø - MTXÀÇ ÇʼöÀԷ½à ±âº»ºÎºÐ¼­½ÄÀÌ ÀÖÀ¸¸é ºÎºÐ¼­½ÄÀ», ¾øÀ¸¸é MTXÀÇ ÀԷ¿©ºÎ¸¦ °Ë»çÇÑ´Ù.
//    if (tmp == null)
//    {
//        //Çʼö ÀÔ·ÂÇ׸ñ üũ(Ư¼ö¼­½Ä)
//        if(chkEssentialitem() == false)
//    	{
//    	    return savedInfo;
//    	}
//    }
	//pageInfo.sortItemRef --> /root/temp/sort/recinfo/recitem
    getSaveData(pageInfo.sortItemRef, "append", model, null, mode);
  
        
    for (var i = 0; i < gItemCds.length; i++)
    {
        ctrlIvw = document.controls("ivw_" + gItemCds[i]);
        
        //2010-03-31 ¿ÀÀü 10:12:54 °­ÁöÈÆ Ãß°¡ : ÀÔÅð¿ø¿ä¾àÁö ÃÖÁ¾Áø´Ü¸í Ãß°¡            
				var lastDiagStrDest = pageInfo.sortItemRef;
				var lastDiagStrSrc = pageInfo.lastdiagItemRef + "/recitem[fstlevlitemcd = '" +gItemCds[i]+ "']";
        
        var formdegnseq = model.getValue(pageInfo.forminfoRef + "/unitformmast[orgsupdegnitemcd='"+gItemCds[i]+"']/formdegnseq");
        //if (ctrlIvw != null && ctrlIvw.visible)
        //if (ctrlIvw != null)
        if(formdegnseq != "" && ctrlIvw.src != "")
        {
            var orgsupdegnitemno = model.getValue(gPageInfo.forminfoRef + "/unitformmast[orgsupdegnitemcd='" + gItemCds[i] + "']/orgsupdegnitemno");
            
            if(orgsupdegnitemno == "")
            {
                copyNodeset(pageInfo.sortItemRef, "/root/hidden/extnformrec/recinfo/recitem[degnitemkind != 'FDG' and fstlevlitemcd = '" +gItemCds[i]+ "']", "append", model, model);
                copyNodeset(pageInfo.sortItemRef, pageInfo.imgerecItemRef + "[fstlevlitemcd = '" +gItemCds[i]+ "']", "append", model, model);
                copyNodeset(pageInfo.sortItemRef, pageInfo.fmyrecItemRef + "/recitem[fstlevlitemcd = '" +gItemCds[i]+ "']", "append", model, model); //°¡°èµµ
                copyNodeset(pageInfo.sortItemRef, pageInfo.etcrecItemRef + "/recitem[fstlevlitemcd = '" +gItemCds[i]+ "']", "append", model, model); //Ãß°¡±â·Ï
                fInsertNodes(lastDiagStrDest, lastDiagStrSrc); //2010-03-30 ¿ÀÈÄ 9:03:47 °­ÁöÈÆ Ãß°¡ : ÀÔÅð¿ø¿ä¾àÁö ÃÖÁ¾Áø´Ü¸í Ãß°¡
                continue;
            }
            
            var degnitemlevlcd = model.getValue(gPageInfo.formdegnRef + "[degnitemno = '" + orgsupdegnitemno + "']/degnitemlevlcd");        
            var fstLevlBaseItemCd = degnitemlevlcd.substr(0, degnitemlevlcd.indexOf(".") >= 0 ? degnitemlevlcd.indexOf(".") : degnitemlevlcd.length);
            var fstLevlItemCd = model.getValue(gPageInfo.formdegnRef + "[degnitemlevlcd = '" + fstLevlBaseItemCd + "']/degnitemcd");        
            
            if (tmp == null)
            {
                
                //2010-07-27 ±è´ÞÇö 
                //ÀÇ·Ú»óÅÂÀÇ °Ý¸®º´½Ç½Åû ¼öÁ¤½Ã º¸ÀÌÁö ¾Ê´Â ȸ½Å³»¿ª Çʼöüũ¶§¹®¿¡ ¼öÁ¤¾ÈµÇ´Â ¿À·ù¹ß»ý(¿äû¹øÈ£:9731)
                //HIT°­ÁöÈÆ»ç¿øÀÌ MMR04900¿¡ ivw.src°ø¹é󸮷Π¼öÁ¤ÇßÀ¸³ª(2010-04-06) ÀÌ ºÎºÐÀ¸·Î ÀÎÇØ ÄÁ¼³Æ® ȸ½Å½Ã ÀÔ·ÂÇÑ ³»¿ëÀÌ °ø¹éÀ¸·Î ÀúÀåµÈ ¿À·ù¹ß»ýÇØ ´Ù½Ã ÁÖ¼®Ã³¸®ÇÔ.
                //notChkEssnYn Ç÷¡±×¸¦ Ãß°¡ÇÔ.(ivw.attribute)°ªÀÌ YÀÏ °æ¿ì´Â Çʼöüũ ¾ÈÇÔ. NÀ¸·Î ¼³Á¤ÇÑ °æ¿ì¸¸ ÇʼöüũÇÔ.
                if(ctrlIvw.attribute("notChkEssnYn") != "Y" && ctrlIvw.window.javascript.chkEssentialitem(gItemCds[i].substr(0, 7)) == false)//Çʼö ÀÔ·ÂÇ׸ñ üũ(Ư¼ö¼­½Ä)
	            	{
	            	    return savedInfo;
	            	}
            	
            }
            ctrlIvw.window.javascript.getSaveData(pageInfo.sortItemRef, "append", model, NewPageInfo(ctrlIvw, fstLevlItemCd));
            
        }
        copyNodeset(pageInfo.sortItemRef, "/root/hidden/extnformrec/recinfo/recitem[degnitemkind != 'FDG' and fstlevlitemcd = '" +gItemCds[i]+ "']", "append", model, model);
        copyNodeset(pageInfo.sortItemRef, pageInfo.imgerecItemRef + "[fstlevlitemcd = '" +gItemCds[i]+ "']", "append", model, model);
        copyNodeset(pageInfo.sortItemRef, pageInfo.etcrecItemRef + "/recitem[fstlevlitemcd = '" +gItemCds[i]+ "']", "append", model, model); //Ãß°¡±â·Ï
        copyNodeset(pageInfo.sortItemRef, pageInfo.fmyrecItemRef + "/recitem[fstlevlitemcd = '" +gItemCds[i]+ "']", "append", model, model); //°¡°èµµ
        fInsertNodes(lastDiagStrDest, lastDiagStrSrc); //2010-03-30 ¿ÀÈÄ 9:03:47 °­ÁöÈÆ Ãß°¡ : ÀÔÅð¿ø¿ä¾àÁö ÃÖÁ¾Áø´Ü¸í Ãß°¡
    }


    SortRecItem();
    copyNodeset(pageInfo.recItemRef2, pageInfo.recItemRef2, "replace", opener.model, model);
    
    //2010.01.12 ¾ÈÄ¡¿ø - MTXÀÇ ÇʼöÀԷ½à ±âº»ºÎºÐ¼­½ÄÀÌ ÀÖÀ¸¸é ºÎºÐ¼­½ÄÀ», ¾øÀ¸¸é MTXÀÇ ÀԷ¿©ºÎ¸¦ °Ë»çÇÑ´Ù.
    if (tmp == null)
    {
        //Çʼö ÀÔ·ÂÇ׸ñ üũ(Ư¼ö¼­½Ä)
        if(chkEssentialitem() == false)
    	{
    	    return savedInfo;
    	}
    }
}

/** 
 * @desc   : Text Box ÃÖ´ëÈ­(ÄÁ¼³Æ®¼­½ÄÀ» À§ÇØ ´Ù½Ã Ãß°¡)
 * @id     :
 * @event  :
 * @return : void
 * @authur : ¹ÚÁ¾ÈÆ
 */
function SetMultiTextFull(ivwObj, pDegnItemNo)
{
    if (ivwObj.attribute("unitformcd") == "0000000005")
    {
        ivwObj.window.javascript.fSetMtxSize(pDegnItemNo, 0, 0, parseInt(ivwObj.attribute("width"))-5, parseInt(ivwObj.attribute("height")));

        /*var mtxNm = "MTX_" + pDegnItemNo;
        var mtx = ivwObj.window.document.controls(mtxNm);
        if(mtx != null)
        {
            mtx.attribute("border-style") = "none";

            mtx.refresh();
        }*/
    }
}

/**
 * @desc   :ȯÀÚó¹æÁ¤º¸ °¡Á®¿À±â
 * @id     :
 * @event  : onclick
 * @return : void
 * @authur : ¹ÚÁ¾ÈÆ
 */
 function GetPatDrugPrcpList(itemCd, itemCd1)
{
    var pageInfo = new PAGEINFO();

    var prcpdd = "";
    var bfflag = "bfprcp";
    var flag = "";
    var todd = "";
    var pid = parent.model.getValue(pageInfo.recMastRef + "/pid");
    var orddd = parent.model.getValue(pageInfo.recMastRef + "/orddd");
    var cretno = parent.model.getValue(pageInfo.recMastRef + "/cretno");
    var orddrid = parent.model.getValue(pageInfo.recMastRef + "/orddrid");
    var orddeptcd = parent.model.getValue(pageInfo.recMastRef + "/orddeptcd");
    var prcpgenrflag = parent.model.getValue(pageInfo.recMastRef + "/chosflag");

    if (prcpgenrflag == "I" || prcpgenrflag == "E" || prcpgenrflag == "D")
    {
        prcpdd = parent.model.getValue(pageInfo.recMastRef + "/formrecdd");
    }
    else
    {
        prcpdd = orddd;
    }

    //ó¹æÁ¤º¸ °¡Á®¿À±â(Åð¿øó¹æ prcpkindcd = 60)
    if(fBfPrcpSrchCom(pid, orddd, prcpdd, bfflag, flag, orddrid, todd, prcpgenrflag, orddeptcd, cretno, "TRMMO00100", true))
    {
        //Åõ¾à
        var nodelistDrugPrcpinfo = model.instances(0).selectNodes("/root/prcpsrch/prcplist[(prcpkindcd != '' and prcphistcd != 'C' and prcphistcd != 'L' and prcphistcd != 'E') and (prcpclscd = 'A2' or prcpclscd = 'A4' or prcpclscd = 'A6')]");
        //óġ
        var nodelistPrcpinfo = model.instances(0).selectNodes("/root/prcpsrch/prcplist[(prcpkindcd != '' and prcphistcd != 'C' and prcphistcd != 'L' and prcphistcd != 'E') and (prcpclscd = 'H2' or prcpclscd = 'H4')]");
    }
    
    var prcpkind = "";          //ó¹æÁ¾·ù
    var orgprcpnm = "";         //ó¹æ¸í
    var drugmthdspccdnm = "";          //¿ë¹ý
    var prcpdelivefact = "";    //Àü´Þ»çÇ×
    var prcplist = "";
    var prcphistcd = "";        //ÀÓ½Ã,ÀÎÁõ±¸ºÐ
    var prcpclscd = "";
    
    var tmpdrugmthdspccdnm = "";

    if(nodelistDrugPrcpinfo.length >= 1){
        for(var i = 1; i <= nodelistDrugPrcpinfo.length; i++)
        {
            var subNode = nodelistDrugPrcpinfo.item(i - 1);
            //orgprcpnm = subNode.selectSingleNode("orgprcpnm").text;
            tmpdrugmthdspccdnm = subNode.selectSingleNode("drugmthdspccdnm").text;
            prcpkind = subNode.selectSingleNode("tempcol13").text;
            orgprcpnm = subNode.selectSingleNode("tempcol6").text;
            drugmthdspccdnm = subNode.selectSingleNode("tempcol7").text;
            prcpclscd = subNode.selectSingleNode("prcpclscd").text;
            
            drugmthdspccdnm = drugmthdspccdnm.replace(tmpdrugmthdspccdnm, "");
            
            drugmthdspccdnm = drugmthdspccdnm.replace("[±Þ]", "");
            drugmthdspccdnm = drugmthdspccdnm.replace("[ÀÏ]", "");
            drugmthdspccdnm = drugmthdspccdnm.replace("[º»]", "");
            drugmthdspccdnm = drugmthdspccdnm.replace("(Áý)", "");
	        drugmthdspccdnm = drugmthdspccdnm.replace("[home]", "");
            drugmthdspccdnm = drugmthdspccdnm.replace("[ÀÓ»ó]", "");
            drugmthdspccdnm = drugmthdspccdnm.replace("[prn]", "");
            prcpdelivefact = subNode.selectSingleNode("prcpdelivefact").text;
            prcphistcd = subNode.selectSingleNode("prcphistcd").text;
            
            if(prcphistcd == "T")
            {
                if (prcpclscd == "A2" || prcpclscd == "A4" || prcpclscd == "A6")
                {
                    prcplist += "[ÀÓ] " + orgprcpnm + " " + drugmthdspccdnm + "\n"
                }
                else
                {
                    prcplist += "[ÀÓ] " + orgprcpnm + "\n"
                }
            }
            else
            {
                if (prcpclscd == "A2" || prcpclscd == "A4" || prcpclscd == "A6")
                {
                    prcplist += orgprcpnm + " " + drugmthdspccdnm + "\n"
                }
                else
                {
                    prcplist += orgprcpnm + "\n"
                }
            }
        }
    }

    var prerec = model.getValue(pageInfo.recItemRef + "[fstlevlitemcd='" + itemCd + "']/reccnts");
    if (prerec != "")
    {
        prerec = prerec + "\n" + prcplist + "\n";
    }
    else
    {
        prerec = prcplist + "\n"
    }

    model.setValue(pageInfo.recItemRef + "[fstlevlitemcd='" + itemCd + "']/reccnts", prerec);
    
    var prcpkind = "";          //ó¹æÁ¾·ù
    var orgprcpnm = "";         //ó¹æ¸í
    var drugmthdspccdnm = "";          //¿ë¹ý
    var prcpdelivefact = "";    //Àü´Þ»çÇ×
    var prcplist = "";
    var prcphistcd = "";        //ÀÓ½Ã,ÀÎÁõ±¸ºÐ
    var prcpclscd = "";
    
    var tmpdrugmthdspccdnm = "";

    if(nodelistPrcpinfo.length >= 1){
        for(var i = 1; i <= nodelistPrcpinfo.length; i++)
        {
            var subNode = nodelistPrcpinfo.item(i - 1);
            prcpkind = subNode.selectSingleNode("tempcol13").text;
            orgprcpnm = subNode.selectSingleNode("tempcol6").text;
            tmpdrugmthdspccdnm = subNode.selectSingleNode("drugmthdspccdnm").text;
            drugmthdspccdnm = subNode.selectSingleNode("tempcol7").text;
            prcpclscd = subNode.selectSingleNode("prcpclscd").text;
            
            drugmthdspccdnm = drugmthdspccdnm.replace(tmpdrugmthdspccdnm, "");
            
            drugmthdspccdnm = drugmthdspccdnm.replace("[±Þ]", "");
            drugmthdspccdnm = drugmthdspccdnm.replace("[ÀÏ]", "");
            drugmthdspccdnm = drugmthdspccdnm.replace("[º»]", "");
            drugmthdspccdnm = drugmthdspccdnm.replace("(Áý)", "");
	        drugmthdspccdnm = drugmthdspccdnm.replace("[home]", "");
	        drugmthdspccdnm = drugmthdspccdnm.replace("[ÀÓ»ó]", "");
            drugmthdspccdnm = drugmthdspccdnm.replace("[prn]", "");
            prcpdelivefact = subNode.selectSingleNode("prcpdelivefact").text;
            prcphistcd = subNode.selectSingleNode("prcphistcd").text;
            
            if(prcphistcd == "T")
            {
                if (prcpclscd == "A2" || prcpclscd == "A4" || prcpclscd == "A6")
                {
                    prcplist += "[ÀÓ] " + orgprcpnm + " " + drugmthdspccdnm + "\n"
                }
                else
                {
                    prcplist += "[ÀÓ] " + orgprcpnm + "\n"
                }
            }
            else
            {
                if (prcpclscd == "A2" || prcpclscd == "A4" || prcpclscd == "A6")
                {
                    prcplist += orgprcpnm + " " + drugmthdspccdnm + "\n"
                }
                else
                {
                    prcplist += orgprcpnm + "\n"
                }
            }
        }
    }

    var prerec = model.getValue(pageInfo.recItemRef + "[fstlevlitemcd='" + itemCd1 + "']/reccnts");
    if (prerec != "")
    {
        prerec = prerec + "\n" + prcplist + "\n";
    }
    else
    {
        prerec = prcplist + "\n"
    }

    model.setValue(pageInfo.recItemRef + "[fstlevlitemcd='" + itemCd1 + "']/reccnts", prerec);
    model.refresh();
}

/**
 * @desc   :°øÅë±â·Ï µðÆúÆ® Æ÷Ä¿½ºÃ³¸®(MTX)
 * @id     :
 * @event  : onclick
 * @return : void
 * @authur : ¹ÚÁ¾ÈÆ
 */
 function SetDefFocusMTX(itemArr)
{
    var ctrlTar;
    for (var i = 0; i < itemArr.length; i++)
    {
        ctrlTar = document.controls("tar_" + itemArr[i]);

        if (ctrlTar != null && ctrlTar.visible)
        {
            model.setFocus("tar_" + itemArr[i]);
            ctrlTar.dispatch("onkeyup");
            break;
        }
    }
}

/**
 * @desc   :°øÅë±â·Ï µðÆúÆ® Æ÷Ä¿½ºÃ³¸®(IVW)
 * @id     :
 * @event  : onclick
 * @return : void
 * @authur : ¹ÚÁ¾ÈÆ
 */
 function SetDefFocusIVW(itemArr)
{
    var ctrlIvw;
    var mtxNm = "MTX_1";
    var mtx
    for (var i = 0; i < itemArr.length; i++)
    {
        ctrlIvw = document.controls("ivw_" + itemArr[i]);

        if (ctrlIvw != null && ctrlIvw.visible && ctrlIvw.src != "")
        {
            
            var mtx = ctrlIvw.window.document.controls(mtxNm);
            
            if (mtx == null)
                continue;
            
            ctrlIvw.model.setFocus(mtxNm);
            
            mtx.dispatch("onkeyup");
            break;
        }
    }
}

/**
 * @desc   : ºÎºÐ¼­½Ä ·Îµù ÈÄ ±â·Ï³»¿ë ¼ÂÆÃ(º¸¿ÏÇÊ¿ä)
 * @id     :
 * @event  :
 * @return : void
 * @authur : ¹ÚÁ¾ÈÆ
 */
function InitUnitFormDataBySupdegnitemcd(itemcd)
{
    if (fGetFormRec("status") != "U")
        return;
    
    var ctrlIvw;
    var pageInfo = new PAGEINFO();

    //var degnitemcdlist = model.instances(0).selectNodes(pageInfo.formdegnRef + "[degnitemkind = 'FRM' and itemuseflag='F0']/degnitemcd");
    //var supdegnitemcdlist = model.instances(0).selectNodes(pageInfo.formdegnRef + "[degnitemkind = 'FRM' and itemuseflag='F0']/supdegnitemcd");
    var node = model.instances(0).selectSingleNode(pageInfo.formdegnRef + "[degnitemkind = 'FRM' and itemuseflag='F0' and supdegnitemcd = '" + itemcd + "']");
    
    var degnitemcd = node.getXPathString("degnitemcd");
    var supdegnitemcd = node.getXPathString("supdegnitemcd");
    var degnitemlevlcd = node.getXPathString("degnitemlevlcd");

    ctrlIvw = document.controls("ivw_" + supdegnitemcd);

    if (ctrlIvw != null && ctrlIvw.visible && ctrlIvw.src != "")
    {
        ctrlIvw.window.javascript.clearData();

        var fstlevlitembasecd = degnitemlevlcd.split(".")[0];
        var fstlevlitemcd = model.getValue(gPrePath_formdegnRef + "degnitemlevlcd = '" + fstlevlitembasecd + "']/degnitemcd");

        setSrchData(pageInfo.recItemRef2 + "[fstlevlitemcd='" +fstlevlitemcd+ "' and formcd = '" + degnitemcd + "']", ctrlIvw);
    }
    

    model.removeNodeset(pageInfo.extnrecItemRef);
    var cnt = getNodesetCnt(model, pageInfo.forminfoRef + "/extnformlist");
    for (var i = 1; i <= cnt; i++)
    {
    
//        stmt = pageInfo.recItemRef2 + "[degnitemkind != 'FDG' and fstlevlitemcd='" +model.getValue(pageInfo.forminfoRef + "/extnformlist[" +i+ "]/supdegnitemcd")+
//            "' and formcd = '" + model.getValue(pageInfo.forminfoRef + "/extnformlist[" +i+ "]/formcd") + "']";

        //°¡°èµµ´Â È®Àå¼­½Ä¿¡ ºÙÀ¸¸é ¾ÈµÇ´Â ¹®Á¦·Î ¼öÁ¤(¹ÚÁ¾ÈÆ/2008-09-29)    
        stmt = pageInfo.recItemRef2 + "[degnitemkind != 'FDG' and fstlevlitemcd='" +model.getValue(pageInfo.forminfoRef + "/extnformlist[" +i+ "]/supdegnitemcd")+
            "' and formcd = '" + model.getValue(pageInfo.forminfoRef + "/extnformlist[" +i+ "]/formcd") + "']";

        copyNodeset(pageInfo.extnrecItemRef, stmt, "append", model, model);
        model.removeNodeset(stmt);
    }

    copyNodeset(pageInfo.imgerecItemRef, pageInfo.recItemRef2 + "[degnitemkind='IMG' and rowno != '']", "replace", model, model);
    copyNodeset(pageInfo.fmyrecItemRef + "/recitem", pageInfo.recItemRef2 + "[degnitemkind='FDG']", "replace", model, model);
    copyNodeset(pageInfo.etcrecItemRef + "/recitem", pageInfo.recItemRef2 + "[degnitemno='0']", "replace", model, model);
    copyNodeset(pageInfo.lastdiagItemRef + "/recitem", pageInfo.recItemRef2 + "[formcd = '1000007943']", "replace", model, model); //2010-03-31 ¿ÀÀü 10:14:27 °­ÁöÈÆÃß°¡ : ÃÖÁ¾Áø´Ü¸í ¿ä¾àÁö Ãß°¡
}

/**
 * @group  :
 * @ver    : 2008.06.23
 * @by     : snoweye
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : Section¿µ¿ª ÃÖ´ëÈ­ ( <-- SetMaxSizeSection)
 * @param  : itemCds - ¼½¼Ç itemcd ¹è¿­
 * @return :
 * @---------------------------------------------------
 */
function loadClickSection(itemCd)
{
    var ctrlID = event.target;
    var itemcd = ctrlID.replace("lbl_", "");

    var ctrl = null;
    var prevItemCd = gMaxSectionID;
    var unitformcd = "";
    
    
    var secCtrl = document.controls("lbl_" + itemCd);
    var formdegnseq = model.getValue(gPageInfo.forminfoRef + "/unitformmast[orgsupdegnitemcd='"+itemCd+"']/formdegnseq");
    unitformcd = model.getValue(gPageInfo.forminfoRef + "/unitformmast[orgsupdegnitemcd='"+itemCd+"']/formcd");

    if(formdegnseq == "")
        ctrl = document.controls("tar_" + itemCd);
    else
        ctrl = document.controls("ivw_" + itemCd);

        
    //¼½¼Ç ¼±Åýà ÇØ´ç ¼½¼ÇÀÇ ºÎºÐ¼­½ÄÀÇ ·ÎµùµÇ¾îÀÖ´ÂÁö È®ÀÎÇÏ¿©
    //·ÎµùµÇ¾î ÀÖÁö ¾ÊÀ¸¸é ºÎºÐ¼­½Ä·Îµù
    var ivwObj = document.controls("ivw_" + itemCd);
    if(ivwObj.src == "")
    {
        //var unitformcd = model.getValue(gPageInfo.formdegnRef + "[supdegnitemcd='" + itemCds[i] +
        //    "' and degnitemkind = 'FRM' and itemuseflag = 'F0']/degnitemcd");
        var unitformcd = model.getValue(gPageInfo.forminfoRef + "/unitformmast[orgsupdegnitemcd='"+itemCd+"']/formcd");
        
        if (unitformcd != "")
        {
            ivwObj.attribute("supdegnitemcd") = itemCd;
            ivwObj.attribute("unitformcd") = unitformcd;

            model.addLog(unitformcd + " Loading ½ÃÀÛ : " + getCurrentTime());
            loadUnitForm(ivwObj, itemCd);
            model.addLog(unitformcd + " Loading ³¡ : " + getCurrentTime());
            
            //2008-12-18¹ÚÁ¾ÈÆ(±â·Ïµ¥ÀÌÅÍ °¡Á®¿À±â-º¸¿ÏÇÊ¿ä)
            //parent.window.javascript.InitUnitFormDataBySupdegnitemcd(itemCds[i]);
        }
    }
}

/**
 * @desc   : °øÅë¼­½Ä³»ÀÇ È®Àå¹öÆ°(À̹ÌÁö,°¡°èµµ,Ãß°¡±â·Ï)À» ±â·Ï¿©ºÎ¿¡ µû¶ó Ç¥½ÃÇÑ´Ù.
 * @id     : 
 * @event  : °øÅë¼­½ÄÀ» ¿­¾úÀ»¶§
 * @param : pViewObj - buttonÀ» °¡Áö°í ÀÖ´Â È­¸éÀÌ ¿­¸° view
 *                 pButtonIds - È®Àå¹öÆ°(À̹ÌÁö,°¡°èµµ,Ãß°¡±â·Ï)ÀÇ id ÀÇ ¹è¿­
 * @return : void
 * @authur : ¾ÈÄ¡¿ø
 * @history : 2009.09.09    ½Å±Ô   ¾ÈÄ¡¿ø    ACW_090909A
 */
function setButtonToggleAllByRecYn(pViewObj, pButtonIds)
{
	for (var i = 0; i < pButtonIds.length; i++) {
		setButtonToggleByRecYn(pViewObj, pButtonIds[i]);
	}
}

/**
 * @desc   : È®Àå¹öÆ°(À̹ÌÁö,°¡°èµµ,Ãß°¡±â·Ï)À» ±â·Ï¿©ºÎ¿¡ µû¶ó Ç¥½ÃÇÑ´Ù.
 * @id     : 
 * @event  : È®Àå¹öÆ° Ŭ¸¯ÈÄ¿¡ ¿­¸° Æ˾÷âÀÌ ´ÝÈú¶§,
 *                setButtonToggleAllByRecYn ¿¡ ÀÇÇÑ È£ÃâÀ϶§
 * @param : pViewObj - buttonÀ» °¡Áö°í ÀÖ´Â È­¸éÀÌ ¿­¸° view
 *                 pButtonIds - È®Àå¹öÆ°(À̹ÌÁö,°¡°èµµ,Ãß°¡±â·Ï)ÀÇ id
 * @return : void
 * @authur : ¾ÈÄ¡¿ø
 * @history : 2009.09.09    ½Å±Ô   ¾ÈÄ¡¿ø    ACW_090909A
 */
function setButtonToggleByRecYn(pViewObj, pButtonId)
{
	//alert("setButtonToggleByRecYn>>pButtonId::"+pButtonId);
	/**
	 * pButtonId Example
	 * btn_imge_0008224001     À̹ÌÁö      
	 * btn_fmy_0008224001       °¡°èµµ      
	 * btn_etcrec_0008224001   Ãß°¡±â·Ï 
	*/
	var buttonObj = null;
	/*if (pViewObj == null) {
		buttonObj = document.controls(pButtonId);
	}
	else {
		buttonObj = pViewObj.document.controls(pButtonId);	
	}*/
	if (pViewObj == null) {
		pViewObj = this;
	}
	buttonObj = pViewObj.document.controls(pButtonId);	

	var arr = pButtonId.split("_");
	var supperItemCd = arr[2];
	var recPath = "";
	if (arr[1] == "imge") {
		recPath = gPageInfo.imgerecItemRef;
	}
	else if (arr[1] == "fmy") {
		recPath = gPageInfo.fmyrecItemRef + "/recitem";
	}
	else if (arr[1] == "etcrec") {
		recPath = gPageInfo.etcrecItemRef + "/recitem";
	}
	else if (arr[1] == "lastdiag") { //2010-02-16 ¿ÀÈÄ 3:35:13 °­ÁöÈÆ Ãß°¡
		recPath = gPageInfo.lastdiagItemRef + "/recitem";
	}
	else {
		return;
	}
	
	//alert("setButtonToggleByRecYn>>supperItemCd::"+supperItemCd);
	var nodes = pViewObj.model.instances(0).selectNodes(recPath + "[fstlevlitemcd = '" + supperItemCd + "']");
	//alert("setButtonToggleByRecYn>>nodes.length::"+nodes.length);
	pViewObj.model.addLog("setButtonToggleByRecYn>>nodes.length::"+nodes.length);
	if (arr[1] == "imge") {
	    if (nodes.length > 0) {
    		buttonObj.attribute("background-image") = "../../../emr/commonweb/images/icon_picture_s.jpg";
    	}
    	else {
    		buttonObj.attribute("background-image") = "../../../com/commonweb/images/icon_picture.gif";
    	}
	} else {
	    if (nodes.length > 0) {
    		//buttonObj.attribute("color") = "#ff0000";
    		buttonObj.attribute("class") = buttonObj.attribute("class").replace(/btn2_/gi, "btn5_");
    		//buttonObj.attribute("border-style") = "solid";
    	}
    	else {
    		//buttonObj.attribute("color") = "#184d8b";
    		buttonObj.attribute("class") = buttonObj.attribute("class").replace(/btn5_/gi, "btn2_");
    		//buttonObj.attribute("border-style") = "none";    		
    	}
	}
	buttonObj.refresh();
}

/** 
 * @desc   : »ç¿ëÀÚ ´äº¯ Á¶È¸
 * @ 
 * @param  : 
 * @return : 
 * @author : ±è¿µÇÐ
 * @--------------------------------------------------- 
 */			
function fGetUserEnvOcsOrdAnsw(ref, rsltref, qestcd){
	/*
    var mmb_rsltref = "/root/hidden/interface";
    model.removeNode(mmb_rsltref);
    model.makeNode(mmb_rsltref);
    model.removeNode(ref);
    model.makeValue(ref + "/interqestcd", qestcd);
    if(submit("TRMMB01104", "false", ref, mmb_rsltref)==true){
        model.makeNode(rsltref);
        model.copyNode(rsltref, mmb_rsltref);
        model.removeNode(mmb_rsltref);
    }
	*/
	model.removeNodeset(rsltref);
	model.makeNode(rsltref);
	var viewerObj = getViewer("sysMessage");
	//KNUH_20110208, ÁÖÈñ°æ, ·Î±×ÀÎ ½Ã ¹Ì¸® µ¥ÀÌÅ͸¦ Á¶È¸ÇØ ³õ°í copyÇؼ­ ¾²´Â ¹æ½ÄÀ¸·Î º¯°æ
	var srcNode = viewerObj.window.instance1.selectSingleNode(gvOrderBasicInfoPath +"/interface[qestcd='"+qestcd+"']");
	
	var targetNode = instance1.selectSingleNode(rsltref);	
	var srcChildNodes = srcNode.childNodes;
	
	for(i=0; i<srcChildNodes.length; i++)
	{
		targetNode.appendChild(srcChildNodes.item(i));
	}
    model.refresh();
}