var instance = document.models(0).instances(0);
var pageInfo = new PAGEINFO();
/**
 * @group  :
 * @ver    : 2007.03.20
 * @by     : 
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : 
 * @param  :
 * @return :
 * @---------------------------------------------------
 */
function fInitialize()
{
    model.removeNodeset("/root/main/selectdiaglist");
    grd_diaglist.col = 4;
    grd_diaglist.row = grd_diaglist.rows - 1;
    
    //dispOnLoadComplete("", model.getValue(pageInfo.formmastRef + "/formcd"));
    dispOnLoadComplete("", "0000000899");

//    model.refresh();
//    parent.body.dispatch("diag_onloadcomplete");
}



/**
 * @group  :
 * @ver    : 2007.03.20
 * @by     : 
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : 
 * @param  :
 * @return :
 * @---------------------------------------------------
 */
function fCheckChange()
{
    var iLeng = 0;
	var degnitemcd = model.getValue("/root/main/recinfo/grid[" + grd_diaglist.row + "]/recitem[degnitemno = '13' and degnitemkind = 'GSU']/degnitemcd");
	var dgnm = "";
	//2010.02.05 dhkim - Áø´Ü¸í Äڵ庯°æ
	if(degnitemcd.substring(0, 7) == '0000960'){
		dgnm = model.getValue("/root/main/recinfo/grid[" + grd_diaglist.row + "]/recitem[degnitemcd = '" + degnitemcd + "' and degnitemkind = 'GSU']/rectermnm");
	}
	
    if (dgnm == "")
    {
        model.setValue("/root/main/recinfo/grid[" + grd_diaglist.row + "]/recitem[degnitemcd='0001443001' and degnitemkind = 'GSU']/rectermnm", "");
        model.setValue("/root/main/recinfo/grid[" + grd_diaglist.row + "]/recitem[degnitemcd='0001443001' and degnitemkind = 'GSU']/rectermcd", "S");
        
        model.setValue("/root/main/recinfo/grid[" + grd_diaglist.row + "]/recitem[degnitemcd='0004249001' and degnitemkind = 'GSU']/rectermnm", "");
        model.setValue("/root/main/recinfo/grid[" + grd_diaglist.row + "]/recitem[degnitemcd='0004249001' and degnitemkind = 'GSU']/rectermcd", "C");
        return false;
    }
        
    //ÁÖ/ºÎ ºñ±³ ¹× ÁÖ°¡ ¸ÇÀ§·Î
    if ( grd_diaglist.valueMatrix ( grd_diaglist.row,2  ) == "M" && grd_diaglist.col == "2" )
    {
        for ( var i = 1; i < grd_diaglist.rows; i++ )
        {
            if ( grd_diaglist.valueMatrix ( i, 2 ) == "M" && i !=  grd_diaglist.row )
            {
                grd_diaglist.valueMatrix ( i, 2  ) = "S";
                //model.setValue("/root/main/recinfo/recitem[" + i + "]/recitem[degnitemcd='" + '0001443001' + "']/recitemnm", "");
                //model.setValue("/root/main/recinfo/grid[" + i + "]/recitem[degnitemcd='" + '0001443001' + "']/recitemnm", "");
                model.setValue("/root/main/recinfo/grid[" + i + "]/recitem[degnitemcd='" + '0001443001' + "']/rectermnm", "");
            }
        }

        model.setValue("/root/main/recinfo/grid[" + grd_diaglist.row + "]/recitem[degnitemcd='0001443001']/rectermnm", "ÁÖ");
        model.refresh();

        var iRow = grd_diaglist.row;
        if (iRow != 1)
        {
            var sNodeRowNo = "";    //¼±ÅÃµÈ ÇàÀÇ rowno
            var fNodeRowNo = "";    //ù¹ø° ÇàÀÇ rowno
            
            fNodeRowNo = model.getValue("/root/main/recinfo/grid[" + 1 + "]/recitem[" + 1 + "]/rowno");
            sNodeRowNo = model.getValue("/root/main/recinfo/grid[" + iRow + "]/recitem[" + 1 + "]/rowno");
            
            //ù¹ø° ÇàÀÇ rowno¸¦ ¼±ÅÃµÈ ÇàÀÇ rowno·Î ¹Ù²Û´Ù
            var fnodelist = model.instance1.selectNodes("/root/main/recinfo/grid[" + 1 + "]/recitem");    
            for(var i = 0; i < fnodelist.length; i++)
            {
           		var node = fnodelist.item(i);
           		var path1 = node.selectSingleNode("rowno");
           		
           		path1.text = sNodeRowNo;
            }
            
            //¼±ÅÃµÈ ÇàÀÇ rowno¸¦ ù¹ø° ÇàÀÇ rowno·Î ¹Ù²Û´Ù
            var snodelist = model.instance1.selectNodes("/root/main/recinfo/grid[" + iRow + "]/recitem");    
            for(var i = 0; i < snodelist.length; i++)
            {
           		var node = snodelist.item(i);
           		var path1 = node.selectSingleNode("rowno");
           		
           		path1.text = fNodeRowNo;
            }
        
            model.makeValue("root/hidden/temp", "");
            model.copyNode("root/hidden/temp", "/root/main/recinfo/grid[" + iRow + "]");
            model.copyNode("/root/main/recinfo/grid[" + iRow + "]", "/root/main/recinfo/grid[" + 1 + "]");
            model.copyNode("/root/main/recinfo/grid[" + 1 + "]", "root/hidden/temp");
            model.removeNodeset("root/hidden/temp");
        }
    }
    else if ( grd_diaglist.valueMatrix ( grd_diaglist.row,2  ) == "S" && grd_diaglist.col == "2" )
    {
        var chkmskind = false;
        for ( var i = 1; i < grd_diaglist.rows; i++ )
        {
            if ( grd_diaglist.valueMatrix ( i, 2 ) == "M")
            {
                chkmskind = true;
            }
        }
        
        if(chkmskind)
        {
            model.setValue("/root/main/recinfo/grid[" + grd_diaglist.row + "]/recitem[degnitemcd='" + '0001443001' + "']/rectermnm", "");
        }
        else
        {
            
            messageBox("ÇϳªÀÇ ÁÖÁø´ÜÀº Çʼö ", "I009");
            model.setValue("/root/main/recinfo/grid[" + grd_diaglist.row + "]/recitem[degnitemcd='0001443001']/rectermcd", "M");
            model.setValue("/root/main/recinfo/grid[" + grd_diaglist.row + "]/recitem[degnitemcd='0001443001']/rectermnm", "ÁÖ");
            return false;
        }
    }

    //R/Oºñ±³
    if ( grd_diaglist.valueMatrix ( grd_diaglist.row,1  ) == "R" && grd_diaglist.col == "1" )
    {
        model.setValue("/root/main/recinfo/grid[" + grd_diaglist.row + "]/recitem[degnitemcd='0004249001']/rectermnm", "R/O");
        model.refresh();

    }
    else if ( grd_diaglist.valueMatrix ( grd_diaglist.row,1  ) == "C" && grd_diaglist.col == "1" )
    {
        model.setValue("/root/main/recinfo/grid[" + grd_diaglist.row + "]/recitem[degnitemcd='" + '0004249001' + "']/rectermnm", "");
    }
    model.refresh();
}

/**
 * @group  :
 * @ver    : 2007.03.20
 * @by     : ??????
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : ?????? Enable / Disable
 * @param  :
 * @return :
 * @---------------------------------------------------
 */
function fGrdDelRow()
{
    if ( grd_diaglist.valueMatrix ( grd_diaglist.row,2  ) == "M")
    {
        messageBox("ÁÖÁø´ÜÀº »èÁ¦", "E001");
        return;
    }
    else
    {
        var iRow = grd_diaglist.row;
        var smmcnts = model.getValue("/root/main/recinfo/grid[" + iRow + "]/recitem[colno='2']/rectermnm");
        var smmcntcd = model.getValue("/root/main/recinfo/grid[" + iRow + "]/recitem[colno='2']/rectermcd");
    
        if(iRow > 0 && (smmcnts != "" || smmcntcd != "")){
            model.removeNodeset("/root/main/recinfo/grid[" + iRow + "]");
            model.removeNodeset("/root/main/selectdiaglist[" + iRow + "]");
            model.removeNodeset("/root/tmpdiag/selectdiaglist[" + iRow + "]");
        }
        else
        {
            return;
        }
        
        var nodelist = model.instance1.selectNodes("/root/main/recinfo/grid");    
        var totrow = nodelist.length;
        var irowcnt = 0;    
        
        for(var i = 0; i < totrow; i++)
        {
            var node = nodelist.item(i);
            var tmpnode = node.selectNodes("recitem");
            
            for(var j = 0; j < tmpnode.length; j++)
            {
           		var node = tmpnode.item(j);
           		var path1 = node.selectSingleNode("rowno");
           		
           		path1.text = irowcnt;
            }
       		/*
       		var path1 = node.selectSingleNode("recitem[degnitemlevlcd='0000521.0000960']/rowno");         //Áø´Üheader
       		var path2 = node.selectSingleNode("recitem[degnitemlevlcd='0000521.0000960.0004249']/rowno"); //R/O
       		var path3 = node.selectSingleNode("recitem[degnitemlevlcd='0000521.0000960.0001443']/rowno"); //ÁÖ/ºÎ
       		var path4 = node.selectSingleNode("recitem[degnitemlevlcd='0000521.0000960.0000960']/rowno"); //Áø´Ü¸í
       		var path5 = node.selectSingleNode("recitem[degnitemlevlcd='0000521.0000960.0000168']/rowno"); //Comments
       		
       		path1.text = irowcnt;
       		path2.text = irowcnt;
       		path3.text = irowcnt;
       		path4.text = irowcnt;
       		path5.text = irowcnt;
       		*/
       		irowcnt++;
        }
        
        grd_diaglist.rebuild();
    }
}

function fClickPopUp()
{
    setParameter("SPMMO3200_param_nodepath", "/root/tmpdiag");
    modal("../../../emr/prcpmngtweb/xrw/SPMMO03200_Áø´ÜÆ˾÷.xrw", 1, 0, 0, "", "", "");

    var nodelistMain = instance.selectNodes("/root/main/selectdiaglist");
    var nodelistTemp = instance.selectNodes("/root/tmpdiag/selectdiaglist");
   
    var iRow = grd_diaglist.row;
    var path = "/root/main/recinfo/grid";
    var nodelistJuh = instance.selectNodes(path);
    var nodelength = nodelistJuh.length;

	var smmcnts = "";
	
//2010.02.05 dhkim - Áø´Ü¸í Äڵ庯°æ
	var degnitemcd = model.getValue("/root/main/recinfo/grid[" + grd_diaglist.row + "]/recitem[degnitemno = '13' and degnitemkind = 'GSU']/degnitemcd");
	if(degnitemcd.substring(0, 7) == '0000960'){
		smmcnts = model.getValue(path + "[" + nodelength + "]/recitem[degnitemcd = '" + degnitemcd + "' and degnitemkind = 'GSU']/rectermnm");
	}
	
//    var smmcnts = model.getValue(path + "[" + nodelength + "]/recitem[degnitemcd = '0000960001' and degnitemkind = 'GSU']/rectermnm")

    if (smmcnts == "")
    {
        model.removeNodeset("/root/main/recinfo/grid[" + nodelength + "]");
        model.removeNodeset("/root/main/selectdiaglist[" + nodelength + "]");
        grd_diaglist.refresh();
    }

    var iLeng = 0;
    var sTmpdiagcd = "";
    var sTmpdiagengnm = "";
    var iMainleng = nodelistMain.length;
    //var iMainleng = instance.selectNodes("/root/main/recinfo/grid").length;

    if(nodelistTemp.length >= 1)
    {
        for(var i = 1; i <= nodelistTemp.length; i++)
        {
            sTmpdiagcd = model.getValue("/root/tmpdiag/selectdiaglist[" + i + "]/diagcd");
            sTmpdiagengnm = model.getValue("/root/tmpdiag/selectdiaglist[" + i + "]/diagengnm");

            //var iFndRow = getNodesetCnt(model, "/root/main/selectdiaglist/col[rectermcd='" + sTmpdiagcd + "']");
            var iFndRow = getNodesetCnt(model, "/root/main/recinfo/grid/recitem[rectermcd='" + sTmpdiagcd + "']");

            if(iFndRow > 0){
                iMainleng = iMainleng - 1;
            }else if(iFndRow <= 0){
                iLeng = i + iMainleng;
                model.makeValue("/root/main/selectdiaglist[" + iLeng + "]/col["+ 1 + "]/rectermcd", "C");
                model.makeValue("/root/main/selectdiaglist[" + iLeng + "]/col["+ 1 + "]/reccnts", "");
                model.makeValue("/root/main/selectdiaglist[" + iLeng + "]/col["+ 1 + "]/comp", "false");
                model.makeValue("/root/main/selectdiaglist[" + iLeng + "]/col["+ 1 + "]/colno", "0");

                model.makeValue("/root/main/selectdiaglist[" + iLeng + "]/col["+ 2 + "]/rectermcd", "S");
                model.makeValue("/root/main/selectdiaglist[" + iLeng + "]/col["+ 2 + "]/reccnts", "ºÎ");
                model.makeValue("/root/main/selectdiaglist[" + iLeng + "]/col["+ 2 + "]/comp", "false");
                model.makeValue("/root/main/selectdiaglist[" + iLeng + "]/col["+ 2 + "]/colno", "1");

                model.makeValue("/root/main/selectdiaglist[" + iLeng + "]/col["+ 3 + "]/rectermcd", sTmpdiagcd);
                model.makeValue("/root/main/selectdiaglist[" + iLeng + "]/col["+ 3 + "]/reccnts", sTmpdiagengnm);
                model.makeValue("/root/main/selectdiaglist[" + iLeng + "]/col["+ 3 + "]/cntsyn", "N");
                model.makeValue("/root/main/selectdiaglist[" + iLeng + "]/col["+ 3 + "]/comp", "true");
                model.makeValue("/root/main/selectdiaglist[" + iLeng + "]/col["+ 3 + "]/colno", "2");
            }
        }
    }
    makeProgInstance(pageInfo, instance, nodelistMain);
    
    fAddrow();
}

/**
 * @desc   : ÁÙÃß°¡
 * @
 * @param  :
 * @return :
 * @---------------------------------------------------
 */
function fAddrow()
{
    var path1 = "/root/main/recinfo/grid[degnitemno = '1']";
    var nodelistDGN = instance.selectNodes(path1);
    var nodelength = nodelistDGN.length;

    var path2 = "/root/main/recinfo/grid[degnitemno = '1'][" + nodelength + "]";
    copyNodeset("/root/tmp", path2, "replace", model, model);
    
    var smmcnts = model.getValue("/root/tmp/recitem[colno='2']/rectermnm");

    if(smmcnts != "" || nodelength == 0)
    {
        model.makeValue("/root/main/selectdiaglist[" + 1 + "]/col["+ 1 + "]/rectermcd", "C");
        model.makeValue("/root/main/selectdiaglist[" + 1 + "]/col["+ 1 + "]/reccnts", "");
        model.makeValue("/root/main/selectdiaglist[" + 1 + "]/col["+ 1 + "]/comp", "false");
        model.makeValue("/root/main/selectdiaglist[" + 1 + "]/col["+ 1 + "]/colno", "0");

        model.makeValue("/root/main/selectdiaglist[" + 1 + "]/col["+ 2 + "]/rectermcd", "S");
        model.makeValue("/root/main/selectdiaglist[" + 1 + "]/col["+ 2 + "]/reccnts", "");
        model.makeValue("/root/main/selectdiaglist[" + 1 + "]/col["+ 2 + "]/comp", "false");
        model.makeValue("/root/main/selectdiaglist[" + 1 + "]/col["+ 2 + "]/colno", "1");

        model.makeValue("/root/main/selectdiaglist[" + 1 + "]/col["+ 3 + "]/rectermcd", "");
        model.makeValue("/root/main/selectdiaglist[" + 1 + "]/col["+ 3 + "]/reccnts", "-");
        model.makeValue("/root/main/selectdiaglist[" + 1 + "]/col["+ 3 + "]/cntsyn", "N");
        model.makeValue("/root/main/selectdiaglist[" + 1 + "]/col["+ 3 + "]/comp", "true");
        model.makeValue("/root/main/selectdiaglist[" + 1 + "]/col["+ 3 + "]/colno", "2");

        nodelistMain = instance.selectNodes("/root/main/selectdiaglist");
        makeProgInstance(pageInfo, instance, nodelistMain);
//        grd_diaglist.row = nodelength + 1;
//        grd_diaglist.col = 2;
//    	  grd_diaglist.editCell();
    	grd_diaglist.refresh();
    }
}

/**
 * @desc   : ÆíÁý ÈÄ termcd°¡ ¾ø´Â °æ¿ì '-'¸¦ ³Ö¾îÁÜ(ÀúÀå¹®Á¦)
 * @
 * @param  :
 * @return :
 * @---------------------------------------------------
 */
function fEndEdit()
{
    //debugger;
    var path1 = "/root/main/recinfo/grid[degnitemno = '1']";
    var nodelistJuh = instance.selectNodes(path1);
    var nodelength = nodelistJuh.length;

    var smmcnts = model.getValue("/root/main/recinfo/grid[degnitemno = '1'][" + nodelength + "]/recitem[colno='2']/rectermnm");
    var termcd = model.getValue("/root/main/recinfo/grid[degnitemno = '1'][" + nodelength + "]/recitem[colno='2']/rectermcd");
    
    if(smmcnts != "" && termcd == "")
    {
        model.setValue("/root/main/recinfo/grid[degnitemno = '1'][" + nodelength + "]/recitem[colno='2']/rectermcd", "-");
    }
    
    var sDisgnm = model.getValue("/root/main/recinfo/grid[degnitemno = '1'][" + grd_diaglist.row + "]/recitem[colno='2']/rectermnm");
    
    if (sDisgnm == "")
    {
        fGrdDelRow();
    }
}

function fInitPage(colhide, heig, wid, ivwID, initnm)
{
    body.attribute("height") = heig;
    body.attribute("width") = wid;
    grd_diaglist.attribute("height") = heig - 2;
    grd_diaglist.attribute("width") = wid - 4;
    grd_diaglist.extendLastCol = "scroll";

    if(colhide)
    {
        grd_diaglist.colhidden(0) = colhide;
        btn_pop.attribute("visibility") = "hidden";
    }

    if (ivwID != null && ivwID != "")
        gSendParentCallID = ivwID;

    if (initnm != null && initnm != "")
        grd_diaglist.valueMatrix(0, 4) = initnm;

    body.refresh();
}


/**
 * @group  :
 * @ver    : 2007.03.20
 * @by     : ??????
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : ?????? Enable / Disable
 * @param  :
 * @return :
 * @---------------------------------------------------
 */
function old_fGetDiagNm()
{
    var pamInfoCvs = getGlobalVariable("paminfo");  //»ó´ÜÁ¤º¸°¡ ÀÖÀ» °æ¿ì´Â °Ë»ö
    if(pamInfoCvs != null && pamInfoCvs != "")
    { //cvs°¡ nullÀÌ ¾Æ´Ñ °æ¿ì¿¡¸¸ ó¸®ÇÔ.
        model.removeNodeSet ("/root/init/paminfo/list");
        setCSVToNode ("/root/init/paminfo", pamInfoCvs);

        var sPid = model.getValue ("/root/init/paminfo/list/pid");
        var sCretno = cretno = model.getValue ("/root/init/paminfo/list/cretno");
        var sIoflag = ioflag = model.getValue ("/root/init/paminfo/list/ioflag");
        var sOrddeptcd = orddeptcd = model.getValue ("/root/init/paminfo/list/orddeptcd");

        var sOrddd = "";

        if (ioflag == "O")
        {
            sOrddd = model.getValue ("/root/init/paminfo/list/orddd");
        } else {
            sOrddd = model.getValue ("/root/init/paminfo/list/indd");
        }
    }

    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);

//    model.makeValue("/root/send/cond1", "00301165");
//    model.makeValue("/root/send/cond2", "20070524");
//    model.makeValue("/root/send/cond3", "1");
//    model.makeValue("/root/send/cond4", "1000000004");
//    model.makeValue("/root/send/cond5", "I");

    submit("TRMMO00105", false);

    fSetDiagNmInstance();
}

/**
 * @group  :
 * @ver    : 2007.03.20
 * @by     : ??????
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : ?????? Enable / Disable
 * @param  :
 * @return :
 * @---------------------------------------------------
 */
function fGetDiagNm(paminfo)
{
    var pageInfo = new PAGEINFO();
    var degnlvcd = model.getValue(pageInfo.initRecinfoGridrecItemRef + "[orgdegnitemkind='DGN']/degnitemlevlcd").substring(0, 7);
    
    if(paminfo != null)
    {
        var pid = paminfo.selectSingleNode("pid").text
        var cretno = paminfo.selectSingleNode("cretno").text
        var orddd = paminfo.selectSingleNode("orddd").text
        var orddeptcd = paminfo.selectSingleNode("orddeptcd").text
        var ioflag = paminfo.selectSingleNode("chosflag").text
    
        fSetDiagNmbyDegnItemLevlCd(pid, cretno, orddd, orddeptcd, ioflag, degnlvcd);
        
        fAddrow();
    }
}

var gDegnItemNm = null;
function fSetDiagNmInstance()
{
    var nodelistDiaginfo = instance.selectNodes("/root/main/diaginfo/diagcdlist");
    var nodelistMain = instance.selectNodes("/root/main/selectdiaglist");
    var ro = "";
    var ms = "";
    var sDiagkindcd = "";
    var sDiagkindcdflag = "";
    
    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 = "";
                sDiagkindcd = "C";
            }

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

            model.makeValue("/root/main/selectdiaglist[" + i + "]/col["+ 1 + "]/rectermcd", sDiagkindcd);
            model.makeValue("/root/main/selectdiaglist[" + i + "]/col["+ 1 + "]/reccnts", ro);
            model.makeValue("/root/main/selectdiaglist[" + i + "]/col["+ 1 + "]/comp", "false");
            model.makeValue("/root/main/selectdiaglist[" + i + "]/col["+ 1 + "]/colno", "0");

            model.makeValue("/root/main/selectdiaglist[" + i + "]/col["+ 2 + "]/rectermcd", sDiagkindcdflag);
            model.makeValue("/root/main/selectdiaglist[" + i + "]/col["+ 2 + "]/reccnts", ms);
            model.makeValue("/root/main/selectdiaglist[" + i + "]/col["+ 2 + "]/comp", "false");
            model.makeValue("/root/main/selectdiaglist[" + i + "]/col["+ 2 + "]/colno", "1");

            model.makeValue("/root/main/selectdiaglist[" + i + "]/col["+ 3 + "]/rectermcd", sTmpdiagcd);
            model.makeValue("/root/main/selectdiaglist[" + i + "]/col["+ 3 + "]/reccnts", sTmpdiagengnm);
            model.makeValue("/root/main/selectdiaglist[" + i + "]/col["+ 3 + "]/comp", "true");
            model.makeValue("/root/main/selectdiaglist[" + i + "]/col["+ 3 + "]/colno", "2");
            model.makeValue("/root/main/selectdiaglist[" + i + "]/col["+ 3 + "]/rectermflag", "002");

            if (sDiagkindcdflag == "M")
            {
                parent.window.javascript.setParameter("SSMRF04000_diagnm", sTmpdiagengnm);
            }
        }
        makeProgInstance(pageInfo, instance, nodelistMain, gDegnItemNm);
    }
    
    fAddrow();

    model.refresh();
}


/**
 * @desc   : ¼ö¼ú¿¹¾à¹øÈ£¸¦ ÅëÇÑ Áø´Ü¸í, ¸¶ÃëÁ¾·ù Á¶È¸»èÁ¦¿¹Á¤
            (ÇØ´ç±â·ÏÁö¿¡¼­ Á÷Á¢ Á¶È¸ÇÏ¿© µ¥ÀÌÅÍ ³Ñ±è) 2008.05.20 ¹ÚÁ¾ÈÆ
 * @
 * @param  :
 * @return :
 * @---------------------------------------------------
 */
function fGetdiagFormOprsrvno(oprsrvno, iMcdnm, iMcdnm, iScdnm, iScdnm)
{
    if(oprsrvno != ""){
        model.removeNodeset("/root/main/diaginfo/diagcdlist");
        model.makeValue("/root/send/oprsrvno", oprsrvno);
        //model.makeValue("/root/send/oprsrvno", "2007000009");

        submit("TRMRF04001", false);

        var anstmthdcd = model.getValue("/root/main/diaginfo/anstlist/anstmthdcd");
        var mcdnm = model.getValue("/root/main/diaginfo/anstlist/mcdnm");
        var anstmthdcdsub = model.getValue("/root/main/diaginfo/anstlist/anstmthdcdsub");
        var scdnm = model.getValue("/root/main/diaginfo/anstlist/scdnm");

        //ÁÖ¸¶Ãë
        parent.model.setValue("/root/main/recinfo/recitem[degnitemno='" + iMcdnm + "']/recrefcd", anstmthdcd);
        parent.model.setValue("/root/main/recinfo/recitem[degnitemno='" + iMcdnm + "']/recitemnm", mcdnm);
        //ºÎ¸¶Ãë
        parent.model.setValue("/root/main/recinfo/recitem[degnitemno='" + iScdnm + "']/recrefcd", anstmthdcdsub);
        parent.model.setValue("/root/main/recinfo/recitem[degnitemno='" + iScdnm + "']/recitemnm", scdnm);

        fSetDiagNmInstance();
        return true;
    }else{
        alert("ÇØ´çȯÀÚ´Â ¼ö¼úȯÀÚ°¡ ¾Æ´Õ´Ï´Ù!");
        parent.grup_base.disabled = true;
        //parent.window.javascript.fBtnDisable();
        return false;
    }

//    var diagcdlistNode = instance1.selectSingleNode("/root/main/diaginfo");
//
//    if((diagcdlistNode.childNodes).length > 0){
//
//        var selectNode = ivw_0007983001.instance1.selectSingleNode("/root/main/diaginfo");
//
//        if(selectNode	== null){
//            ivw_0007983001.model.makeNode("/root/main/diaginfo");
//        }
//
//        copyNode(ivw_0007983001.model, model, "/root/main/diaginfo/diagcdlist", "/root/main/diaginfo/diagcdlist");
//        ivw_0007983001.window.javascript.fSetDiagNmInstance();
//
//        var anstmthdcd = model.getValue("/root/main/diaginfo/diagcdlist/anstmthdcd");
//        var mcdnm = model.getValue("/root/main/diaginfo/diagcdlist/mcdnm");
//        var anstmthdcdsub = model.getValue("/root/main/diaginfo/diagcdlist/anstmthdcdsub");
//        var scdnm = model.getValue("/root/main/diaginfo/diagcdlist/scdnm");
//        //ÁÖ¸¶Ãë
//        model.setValue("/root/main/recinfo/recitem[degnitemno='" + iMcdnm + "']/recrefcd", anstmthdcd);
//        model.setValue("/root/main/recinfo/recitem[degnitemno='" + iMcdnm + "']/recitemnm", mcdnm);
//        //ºÎ¸¶Ãë
//        model.setValue("/root/main/recinfo/recitem[degnitemno='" + iScdnm + "']/recrefcd", anstmthdcdsub);
//        model.setValue("/root/main/recinfo/recitem[degnitemno='" + iScdnm + "']/recitemnm", scdnm);
//
//        model.refresh();
//    }
}

/**
 * @desc   : ¼ö¼ú¿¹¾à¹øÈ£¸¦ ÅëÇÑ Áø´Ü¸í, ¸¶ÃëÁ¾·ù Á¶È¸
 * @
 * @param  :
 * @return :
 * @---------------------------------------------------
 */
function fGetdiagFormOprsrvno_loc(tmp, iMcdnm, iMcdnm, iScdnm, iScdnm)
{
    model.removeNodeset("/root/main/diaginfo/diagcdlist");
    //model.makeValue("/root/send/oprsrvno", oprsrvno);
    model.makeValue("/root/send/oprsrvno", tmp);

    submit("TRMRF04001", false);

    var anstmthdcd = model.getValue("/root/main/diaginfo/anstlist/anstmthdcd");
    var mcdnm = model.getValue("/root/main/diaginfo/anstlist/mcdnm");
    var anstmthdcdsub = model.getValue("/root/main/diaginfo/anstlist/anstmthdcdsub");
    var scdnm = model.getValue("/root/main/diaginfo/anstlist/scdnm");

    //ÁÖ¸¶Ãë
    parent.model.setValue("/root/main/recinfo/recitem[degnitemno='" + iMcdnm + "']/recrefcd", anstmthdcd);
    parent.model.setValue("/root/main/recinfo/recitem[degnitemno='" + iMcdnm + "']/recitemnm", mcdnm);
    //ºÎ¸¶Ãë
    parent.model.setValue("/root/main/recinfo/recitem[degnitemno='" + iScdnm + "']/recrefcd", anstmthdcdsub);
    parent.model.setValue("/root/main/recinfo/recitem[degnitemno='" + iScdnm + "']/recitemnm", scdnm);

    fSetDiagNmInstance();
    return true;
}

function clearData()
{
    model.removeNodeset("/root/main/recinfo");
    model.refresh();
}

/**
 * @desc   : Comments ±â·Ï Á¸Àç ¿©ºÎ¿¡ µû¸¥ Ä÷³ Ç¥½Ã
 * @
 * @param  :
 * @return :
 * @---------------------------------------------------
 */
function fIsCommentExist()
{
	
	var iFndRow = 0;
	//2010.02.05 dhkim - Áø´Ü¸í Äڵ庯°æ
	var degnitemcd = model.getValue("/root/main/recinfo/grid[" + grd_diaglist.row + "]/recitem[degnitemno = '13' and degnitemkind = 'GSU']/degnitemcd");
	if(degnitemcd.substring(0, 7) == '0000960'){
		iFndRow = getNodesetCnt(model, "/root/main/recinfo/grid/recitem[degnitemcd = '" + degnitemcd + "' and degnitemkind = 'GSU' and reccnts != '']");
	}
	
//    var iFndRow = getNodesetCnt(model, "/root/main/recinfo/grid/recitem[degnitemcd ='0000960001' and degnitemkind = 'GSU' and reccnts != '']");
    
    if (iFndRow > 0)
    {
        grd_diaglist.colhidden(grd_diaglist.colref("recitem[colno='2']/reccnts")) = false;
    }
    else
    {
        grd_diaglist.colhidden(grd_diaglist.colref("recitem[colno='2']/reccnts")) = true;
    }
}







/**
 * @desc   : ÀúÀåÀü °Ë»ç
 *         : 2010.01.18 dhkim - Ãß°¡(isChk°¡ trueÀ϶§¸¸ üũÇÔ)
 * @
 * @param  : Ãß°¡
 * @return :
 * @---------------------------------------------------
 */
function fChkGrdPreSave(isChk, itemNm)
{
	
	if(isChk == null || isChk == false){
		return false;
	}
	
	if(isChk){
			
	}
	
}


/**
 * @desc   : ÀúÀåÀü °Ë»ç(ÀÔÅð¿ø¿ä¾à±â·Ï_MMR00800¿¡¼­¸¸ »ç¿ë)
 *         : 2010.01.27 dhkim - Ãß°¡(isChk°¡ trueÀ϶§¸¸ üũÇÔ)
 * @
 * @param  : Ãß°¡
 * @return :
 * @---------------------------------------------------
 */

function fChkGrdPreSave_MMR00800(isChk, itemNm)
{
	
	if(isChk == null || isChk == false){
		return false;
	}
	
	if(isChk){
	
	
	model.addLog("MRF04000.js fChkGrdPreSave_MMR00800³»ºÎ == ");
	
		//2010.01.27 dhkim 
		//1. ÁÖÁø´Üüũ
		//2. Áø´ÜÀÌ 1°ÇÀÏ °æ¿ì ºÎÁø´ÜÀÌ ÀÖ´ÂÁö ¿©ºÎ¸¦ ¹°¾îº½
		//3. ºÎÁø´ÜÀÌ ÀÖ´Ù°í Çϸé ÀúÀå¾ÈÇÏ°í ¸®ÅϽÃÅ´

		if(itemNm == null || itemNm == ""){
			var pageInfo = new PAGEINFO();
			itemNm = model.instances(0).selectSingleNode(pageInfo.formdegnRef + "[degnitemkind = 'GRD']").getXPathString("itemnm");
		}
		
		var path = "/root/main/recinfo/grid";
		
		var nodelist = instance.selectNodes(path);
		var nodelength = (nodelist.length);
		var msFlag, diagnm, diagcd;
		var isMChk = false;//ÁÖÁø´Üüũ¿©ºÎ
		var isSChk = false;//ºÎÁø´Üüũ¿©ºÎ
		
		for(var i = 1; i <= nodelength; i++){
			
			msFlag = model.getValue(path + "[" + i + "]/recitem[colno='1']/rectermcd");//ÁÖºÎüũ
			diagnm = model.getValue(path + "[" + i + "]/recitem[colno='2']/rectermnm");//Áø´Ü¸í
			diagcd = model.getValue(path + "[" + i + "]/recitem[colno='2']/rectermcd");//Áø´ÜÄÚµå
			
			if(diagcd != ""){
				if(msFlag == "M"){
					isMChk = true;
				}else if(msFlag == "S"){
					isSChk = true;
				}
			}
			
			if(diagcd == "-" && diagnm == ""){
				messageBox(i + "Çà¿¡ Áø´Ü¸íÀ» ÀÔ·ÂÇϽʽÿä", "E");
				return false;
			}
			
		}
		

		//ÁÖÁø´Üüũ¿©ºÎ
		if(isMChk == false){
			messageBox("ÇϳªÀÇ ÁÖÁø´ÜÀº Çʼö ", "I009");
			return false;
		}
		
		//ºÎÁø´Üüũ¿©ºÎ - 
		//ºÎÁø´ÜÀÔ·ÂÈ®Àθ޼¼Áö¿¡ "¿¹" Ŭ¸¯ÇÏ´Â °æ¿ì ¸®ÅÏ(¿¹:6, ¾Æ´Ï¿À:7)
		if(isSChk == false){
			
			//2010.02.11 dhkim - ¸Þ¼¼Áöº¯°æ¿äû
			/*
			±èÀº¹Ì  02-11 11:07
			ºÎÁø´Ü¹ÌÀԷ½Ã, ¸Þ¼¼Áö³»¿ëÀ» º¯°æÇÏ·Á°í ÇÕ´Ï´Ù.
			±èÀº¹Ì  02-11 11:09
			(±âÁ¸)ºÎÁø´ÜÀÌ ¾ø½À´Ï´Ù. ºÎÁø´ÜÀ» ÀÔ·ÂÇϽðڽÀ´Ï±î? ->(º¯°æ¿äû³»¿ë) ºÎÁø´ÜÀº JCI ÇʼöÀÔ·ÂÇ׸ñÀÔ´Ï´Ù. ÇØ´çȯÀÚ¿¡°Ô ÀÔ·ÂµÈ ºÎÁø´ÜÀÌ ¾ø½À´Ï´Ù. ÀÔ·ÂÇϽðڽÀ´Ï±î?
			±èÀº¹Ì  02-11 11:09
			·Î º¯°æÇØÁÖ¼¼¿ä....
			*/
			//if(messageBox("ºÎÁø´ÜÀÌ ¾ø½À´Ï´Ù. ºÎÁø´ÜÀ» ÀÔ·ÂÇϽðڽÀ´Ï±î?", "Q") == 6){
			if(messageBox("ºÎÁø´ÜÀº JCI ÇʼöÀÔ·ÂÇ׸ñÀÔ´Ï´Ù. ÇØ´çȯÀÚ¿¡°Ô ÀÔ·ÂµÈ ºÎÁø´ÜÀÌ ¾ø½À´Ï´Ù. ÀÔ·ÂÇϽðڽÀ´Ï±î?", "Q") == 6){
				return false;
			}
		}
		
		return true;
		
	}
	
}