/*
      EMC¸ÞÀÎ, ER Census(SMMNE00100.xfm - JScript )

      - Version :
          1)  : Ver.1.00.01
*/

var sSrchToolStatus = "";        
var xPathUser       = "/root/UserData/list";
var xPathUserPop    = "/root/main/list";
/* 20090116(ByJA)
var pid = ""; //ȯÀÚ¶óº§Ãâ·Â º¯¼ö
var patnm = ""; //ȯÀÚ¶óº§Ãâ·Â º¯¼ö
var sexage = ""; //ȯÀÚ¶óº§Ãâ·Â º¯¼ö
var rgstno = ""; //ȯÀÚ¶óº§Ãâ·Â º¯¼ö
var orddd = ""; //ȯÀÚ¶óº§Ãâ·Â º¯¼ö
var prtcnt = ""; //ȯÀÚ¶óº§Ãâ·Â º¯¼ö
var scrnid = ""; //ȯÀÚ¶óº§Ãâ·Â º¯¼ö
var barcdRef = ""; //ȯÀÚ¶óº§Ãâ·Â º¯¼ö
*/
var gOrddd ="";
var MemoUseYn = "";
var ColorUseYn = "";
var LabelPntCnt = "";
var instUseForJci = "";

var xOldPosflagcd = "";
var xOldPosflag = "";
/**
 * @group  :
 * @ver    : 2007.06.07
 * @by     : ¾çõ´ö
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : Ãʱ⠰˻ö Á¶°Ç Á¶È¸
 * @param  :
 * @return :
 * @---------------------------------------------------
 */ 
function fInit(pFlag){
      // parameter ·Î ¼¾¼­½º Á¶È¸
      //lzzfMakeBrcdPrntObj("CommAX");
        var instcd = getUserInfo("dutplceinstcd");
      

        // °£È£ÇϵåÄÚµù Å×À̺í Á¶È¸_20090415(ByJA)
        var pCode = "'110', '131', '133','201'"; // Á¶È¸ÇÒ CdGrupID ÄÚµåÁ¤º¸
        var pDate = getCurrentDate(); //Á¶È¸±âÁØÀÏÀÚ
        fGetNursHardCdInfo(pCode, pDate);      
        
        MemoUseYn = model.getValue("/root/code/codeinfo/codelist[cdgrupid ="+"131"+"]/cdid");
        ColorUseYn = model.getValue("/root/code/codeinfo/codelist[cdgrupid ="+"131"+"]/supcdid");
        LabelPntCnt = model.getValue("/root/code/codeinfo/codelist[cdgrupid ="+"133"+"]/cdid");
        instUseForJci = model.getValue("/root/code/codeinfo/codelist[cdgrupid ='201']/cdid");
        
        nursemaininfo.colHidden(nursemaininfo.colRef("dschdt"))= true;
        //Ãâ·ÂÀå¼ö ¼¼ÆÃÀÌ ¾ÈµÇ¾î ÀÖÀ» °æ¿ì Default 1Àå ¼¼ÆÃ
        if(LabelPntCnt == ""){
            LabelPntCnt = "1";
        }
        
        //º´¿øº° Àû¿ë(ȯÀÚ ¸Þ¸ð ÀÔ·Â Ãß°¡ ±â´É)
        if(MemoUseYn == "Y"){
            grid01Cnt = eval(getNodesetCount("/root/codedata/popupmenu/grid01/item"));
            grid02Cnt = eval(getNodesetCount("/root/codedata/popupmenu/grid02/item"));
            for(i = 1 ; i <= 4 ; i++){
                var sPopupName = "";
                var sPopupFunc = "";
                switch(i){
                    case 1:
                        sPopupName = "--------------";
                        sPopupFunc = "";
                    break;
                    case 2:
                      sPopupName = "¸Þ¸ð »ðÀÔ";
                      sPopupFunc = "fErPatInsmemo";
                    break;
                    case 3:
                      sPopupName = "¸Þ¸ð ÆíÁý";
                      sPopupFunc = "fErPatSetmemo";
                    break;
                    case 4:
                      sPopupName = "¸Þ¸ð »èÁ¦";
                      sPopupFunc = "fErPatDelmemo";
                    break;
                }
                
                model.makeValue("/root/codedata/popupmenu/grid01/item["+(i+grid01Cnt)+"]/name", sPopupName);
                model.makeValue("/root/codedata/popupmenu/grid01/item["+(i+grid01Cnt)+"]/func", sPopupFunc);                
                model.makeValue("/root/codedata/popupmenu/grid02/item["+(i+grid02Cnt)+"]/name", sPopupName);
                model.makeValue("/root/codedata/popupmenu/grid02/item["+(i+grid02Cnt)+"]/func", sPopupFunc);                
            }
        }

        if(checkOpener()){
            var sParamInfo = opener.javascript.getParameter("SMMNE001_Param");
            if(sParamInfo.length > 0 ){
                var sPid    = getArrayData(sParamInfo,0,0,"¢Ì","¢Ë");    // ȯÀÚ¹øÈ£
                var sIndd   = getArrayData(sParamInfo,0,1,"¢Ì","¢Ë");    // ÀÔ¿øÀÏÀÚ
                var sCretno = getArrayData(sParamInfo,0,2,"¢Ì","¢Ë");    // »ý¼º¹øÈ£
                var sPageflag = getArrayData(sParamInfo,0,3,"¢Ì","¢Ë");    // OM ¿À´õ¸Å´ÏÁö 20090511 ±èÈ«Á¡ Ãß°¡
                gOrddd = getArrayData(sParamInfo,0,4,"¢Ì","¢Ë");    // OM ¿À´õ¸Å´ÏÁö 20090511 ±èÈ«Á¡ Ãß°¡
                if ( sPageflag == "om"){
                    model.setValue("/root/main/cond/indschacptstat" ,"1");
                    
                    model.setValue("/root/main/pageflag", sPageflag );
                    model.setValue("/root/main/cond/orddd", gOrddd );    
                }else{
                    model.setValue("/root/main/cond/pid", sPid);
                    model.setValue("/root/main/cond/indd", sIndd);
                    model.setValue("/root/main/cond/cretno", sCretno);
                    model.setValue("/root/main/cond/indschacptstat" ,"4");
                    
                    model.setValue("/root/main/pageflag", "ec" );
                    
                }
            }else{ // »ó´ÜÁ¤º¸ ¼¼ÆÃ
                model.setValue("/root/main/pageflag",getScreenMenuParameter() );
                model.setValue("/root/main/cond/orddd", getCurrentDate());    
            }
        }else{
            model.setValue("/root/main/pageflag",getScreenMenuParameter() );
            model.setValue("/root/main/cond/orddd", getCurrentDate());    
        }
        
        //model.setValue("/root/main/cond/wardcd", "2280200000");20090630 ±èÈ«Á¡ ÇϵåÄÚµù¼öÁ¤
        model.setValue("/root/main/cond/wardcd", (model.getValue("/root/code/codeinfo/codelist[cdgrupid='110']/cdid")).substring(0,10));//ÀÀ±ÞÀÇ·á¼¾Åͺ´µ¿ÄÚµå
        model.setValue("/root/main/cond/srchinstcd", (model.getValue("/root/code/codeinfo/codelist[cdgrupid='110']/cdid")).substring(11));//Á¶È¸¼ø¼­¿ë ±â°üÄÚµå
        model.setValue("/root/main/cond/outdt", getCurrentDate()); // Àç¿ø±¸ºÐ Åð¿ø½Ã Åð¿øÀÏÀÚ Setting
    var sStat = pFlag

    fInitNode(sStat);    

    model.removenode("/root/send");
    model.makeValue("/root/send/searchitem", "all");
    
    submit("TRMNE00203", false);
    
    fSelctionOutRmCombo();
    
    zbcfGetCodeList( 
        new Array("M0117", "M0118", "M0119", "M0120", "P0008", "P0378", "M0378", "M0720"),
        new Array("/root/init/M0117list","/root/init/M0118list","/root/init/M0119list","/root/init/M0120list","/root/init/P0008list", "/root/init/P0378list", "/root/init/M0378list", "/root/init/M0720list"));
    
    
            var standard_yn = "orduseyn";
            var ord_deptflag = 'D';
            var rslt_ref  = "/root/hidden/orddeptlist";
            var sort_field = "dispseq";
            var sort_method = "asc";
            zbcfGetDeptCodeList(instcd, standard_yn, ord_deptflag, rslt_ref, sort_field, sort_method);
            
        var deptcd = model.getValue("/root/main/cond/orddeptcd");
        var resultRef = "/root/main/userlist";
        var flag = "_D";
        zsufGetUserInfoCombo(deptcd, resultRef, flag);
        
        model.makevalue("/root/hidden/erorddeptlist/dept/depthngnm", "-");
            model.makevalue("/root/hidden/erorddeptlist/dept/deptcd", "");

            for(i = 0 ; i < getNodesetCount("/root/hidden/orddeptlist/dept") ; i ++ ) {
                model.makevalue("/root/hidden/erorddeptlist/dept["+(i+2)+"]/depthngnm", model.getValue("/root/hidden/orddeptlist/dept["+(i+1)+"]/depthngnm") );
                model.makevalue("/root/hidden/erorddeptlist/dept["+(i+2)+"]/deptcd"   , model.getValue("/root/hidden/orddeptlist/dept["+(i+1)+"]/deptcd") );
            }
    
      //ÀÔ¿ø´ë±â»çÀ¯±¸ºÐ ¼¼ÆÃ
        group2.attribute("height") = 0;
        datagrid3.rowhidden(0) = true;
        datagrid3.deleteRow(1, true);
                
    fSeletedSrcTool();
}
        
/**
 * @group  :
 * @ver    : 2007.06.07
 * @by     : ¾çõ´ö
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : SWITCHÈ­¸éº° ³ëµå ÃʱâÈ­
 * @param  :
 * @return :
 * @---------------------------------------------------
 */             
function fInitNode(pFlag){
    if ( pFlag == "F" ){

        model.removeNodeset("/root/main/nursemainlist/nursemaininfo");
                
        model.removeNodeset("/root/main/ercensuslist/erpatientlist");

        fClearChildNodeSet("/root/main/ercensusinfo/patinfo");
        fClearChildNodeSet("/root/main/ercensusinfo/erorddrlist");
        fClearChildNodeSet("/root/main/ercensusinfo/erorddrlist1");
        fClearChildNodeSet("/root/main/ercensusinfo/erorddrlist2");
    }
    
    if ( pFlag == "nm" ){
        model.removeNodeset("/root/main/nursemainlist/nursemaininfo");
    }
    if ( pFlag == "ec" ){
        model.removeNodeset("/root/main/ercensuslist/erpatientlist");
        
        if(getNodesetCount("/root/main/ercensusinfo/patinfo/pid") > 0 ){
            fClearChildNodeSet("/root/main/ercensusinfo/patinfo");
        }

        model.removeNodeset("/root/main/ercensusinfo/erorddrlist");
        model.removeNodeset("/root/main/ercensusinfo/erorddrlist1");
        model.removeNodeset("/root/main/ercensusinfo/erorddrlist2");
        
        fButtonSettion("A");    
    }
    model.refresh();
}
          
/**
 * @group  :
 * @ver    : 2007.06.07
 * @by     : ¾çõ´ö
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : SWITCHÈ­¸éº° ¼Ó¼º°ª ºÎ¿©
 * @param  :
 * @return :
 * @---------------------------------------------------
 */     
         
function fSeletedSrcTool(){
        //byCY
    
        
        
        //byCY
    model.removenode("/root/send");

    var rendcd=model.getValue("/root/main/cond/section");
    var chkdata=checkbox1.value;
    var rendcdlist=rendcd.split(" ");
    if (chkdata.substr(0,1) != "-") {
        if (rendcd.length>0) {
            for (var i=0; i<rendcdlist.length;i++) {
                rendcd=rendcd.replace(" ","','");  
            }
            rendcd="('" + rendcd + "')";
        }
    } else {
        rendcd = "-";    
    }    

//-----(20110427)
// ±¸¿ªÁ¤º¸¸¦ ¼±ÅÃÇÏÁö ¾ÊÀ¸¸é Á¶È¸µÇÁö ¾Êµµ·Ï ÇÑ´Ù.
    if (rendcd == "") {
        messageBox("±¸¿ªÁ¤º¸¸¦ ¼±ÅÃÇϽʽÿÀ.","E");    
        model.setFocus("checkbox1");
        return;
    }
//-----(20110427)

    var sSrchData   = "";
    var sSrchHeader = "flag¢Ëorddept¢Ëorddrid¢Ësection¢Ëfromorddd¢Ëorddd¢Ëwardcd¢Ëoutdt¢Ësrchinstcd¢Ësettingrnid¢Ì";
    var sSrchData   = model.getValue("/root/main/cond/indschacptstat") +"¢Ë"
                    + model.getValue("/root/main/cond/orddeptcd")      +"¢Ë"
                    + model.getValue("/root/main/cond/medispclid")     +"¢Ë"
                    //+ model.getValue("/root/main/cond/section")        +"¢Ë" //20110224 À̼±°æ °æºÏ´ë : ¸ÖƼüũ±â´É Ãß°¡
                    + rendcd                                           +"¢Ë" 
                    + getDateCalc(getCurrentDate().substr(0,8), 3, "-")+"¢Ë"
                    + getCurrentDate().substr(0,8)                     +"¢Ë"
                    + model.getValue("/root/main/cond/wardcd")         +"¢Ë" 
                    + model.getValue("/root/main/cond/outdt")          +"¢Ë" 
                    + model.getValue("/root/main/cond/srchinstcd")     +"¢Ë"
                    + model.getValue("/root/main/cond/settingrnid")     +"¢Ì";
                    
    model.makeValue("/root/send/mainsearchinfo", sSrchHeader + sSrchData);
    sSrchToolStatus = model.getValue("/root/main/pageflag");
    
    //alert("tool : "+sSrchToolStatus);
    //Ç÷¾×ÁغñȯÀÚ & ÀÔ¿ø´ë±â ȯÀÚ Á¶È¸
    submit("TRMNE00107", false);
    submit("TRMNE00108", false);
		submit("TRMNE00109", false);		// ºÎÀûÇÕ È¯ÀÚ Á¶È¸ _ ¼Õ¼ºÈÆ.
		
		if(model.getValue("/root/main_om/cond/hopedd")==""){
			model.setValue("/root/main_om/cond/hopedd",'4');
			model.setValue("/root/main_om/cond/hopefmdd", '');
		  model.setValue("/root/main_om/cond/hopetodd", '');
		}
		
		model.makeValue("/root/send/settingrnid", model.getValue("/root/main/cond/settingrnid"));

    switch(sSrchToolStatus){
        case "td":
            fInitNode(sSrchToolStatus);
            btn_todolistmv.selected = true;
            group8.visible = false;
            group9.visible = false;
            group10.visible = false;
            model.toggle("case2");
        break;
        case "om":
            fInitNode(sSrchToolStatus);
            btn_ordermngmv.selected = true;
            group8.visible = false;
            group9.visible = true;
            group10.visible = false;
            model.toggle("case3");

            model.setValue("/root/main_om/cond/pid", "µî·Ï¹øÈ£");                                                                                                                    
            model.setValue("/root/main_om/cond/roomcd", "º´½Ç");                                                                                                                    
            model.setValue("/root/main_om/cond/sexage", "S/A");                                                                                                                    
            model.setValue("/root/main_om/cond/patnm", "ȯÀÚ¸í");  
                                                                                                                                              
            fGetOMPatList("emc", gOrddd);
        break;
        case "ec":
                
            fInitNode(sSrchToolStatus);
            btn_ercensusmv.selected = true;
            group8.visible = false;
            group9.visible = false;
            group10.visible = false;
            model.toggle("case4");
            model.removeNodeset("/root/main/nursemainlist/nursemaininfo");
            model.makeNode("/root/send/reqcensus");
            
            if(model.getValue("/root/main/cond/pid") == ""){
                submit("TRMNE00103");
                            fGetParamSetting();
                        }else{
                            //±â°£º° ³»¿øȯÀÚ pop_up
                            btn_mainmv.disabled     = true;
                            btn_ordermngmv.disabled = true;
                            cmb_Zone.disabled       = true;   
                            cmb_OrdDept2.disabled   = true;   
                            cmb_OrdDR.disabled      = true;   
                            rdo_Flag.disabled       = true;   
                            fSearchPatienInfo("p_ec");
                        }
            model.refresh();
        break;
        case "prn":
            fInitNode(sSrchToolStatus);
            btn_ordermngmv.selected = true;
            group8.visible = false;
            group9.visible = true;
            group10.visible = false;
            model.toggle("case3");

                model.setValue("/root/main_om/cond/pid", "µî·Ï¹øÈ£");                                                                                                                    
                model.setValue("/root/main_om/cond/roomcd", "º´½Ç");                                                                                                                    
                model.setValue("/root/main_om/cond/sexage", "S/A");                                                                                                                    
                model.setValue("/root/main_om/cond/patnm", "ȯÀÚ¸í");    
                fSetPrnMode();
              fGetOMPatList("emc");        
        break;
        default :
            fInitNode(sSrchToolStatus);
            
            btn_mainmv.selected = true;
                        group8.visible = true;
                        group9.visible = false;
                        group10.visible = false;
            model.toggle("case1");
            
            //model.removeNodeset("/root/main/nursemainlist/nursemaininfo");
            model.makeNode("/root/send/reqdata");
            nursemaininfo.allstyle("all",  "background-color") = "white"; 
            if(MemoUseYn == "Y"){
              nursemaininfo.colHidden(nursemaininfo.colRef("memoyn")) = false;
            }else{
                nursemaininfo.colHidden(nursemaininfo.colRef("memoyn")) = true;
            }
            //nursemaininfo.refresh();
            
            submit("TRMNE00101");
            
            var paminfo = getGlobalVariable("paminfo");
                        
            if(paminfo.length > 0) {    //¿ø¹« Á¤º¸(±âº» Á¤º¸)°¡ ÀÖ´Â °æ¿ì
                
                //¼³Á¤µÈ »ó´ÜÁ¤º¸¸¦ ºÒ·¯¿È
                model.removenode("/root/main/paminfo");
                model.makeNode("/root/main/paminfo");
                setCSVToNode("/root/main/paminfo", paminfo);
                
                var pid = model.getValue("/root/main/paminfo/list/pid");    
                
                if (pid != "") {
                    for(var i = nursemaininfo.fixedRows; i < nursemaininfo.rows; i++) {
                        var main_pid = nursemaininfo.valueMatrix(i, nursemaininfo.colRef("pid"));
                        
                        if(pid ==main_pid ) {
                            model.setFocus("nursemaininfo");
                            nursemaininfo.row = i;
                            break;
                        }
                        
                    }
                }
            }
            //model.refresh();

            //byCY 4-6-24½Ã°£ÀÌ»ó ü·ùȯÀÚ Ã¼Å©
/*
            var count4  = 0; //4½Ã°£ÀÌ»óü·ùȯÀÚ
            var count6  = 0; //6½Ã°£ÀÌ»óü·ùȯÀÚ
            var count24 = 0; //24½Ã°£ÀÌ»óü·ùȯÀÚ

                
            for(var i=0; i<nursemaininfo.rows;i++) {                
                if(model.getValue("/root/main/nursemainlist/nursemaininfo[" + i + "]/stattmck4") =="Y" 
                    && model.getValue("/root/main/nursemainlist/nursemaininfo[" + i + "]/stattmck") == "N" 
                    && model.getValue("/root/main/nursemainlist/nursemaininfo[" + i + "]/stattmck24") =="N") 
                {
                    //ü·ù½Ã°£ 4½Ã°£ ÀÌ»ó ü·ùÇÑ È¯ÀÚ¿¡ ´ëÇØ ¼¿ »ö»ó ÁöÁ¤
                    nursemaininfo.cellstyle("background-color", i, 0, i, nursemaininfo.colRef("stattmck")) = "#0099FF";        
                    count4++;
                }
                if(model.getValue("/root/main/nursemainlist/nursemaininfo[" + i + "]/stattmck4") =="Y" 
                    && model.getValue("/root/main/nursemainlist/nursemaininfo[" + i + "]/stattmck") == "Y" 
                    && model.getValue("/root/main/nursemainlist/nursemaininfo[" + i + "]/stattmck24") =="N") 
                {
                    //ü·ù½Ã°£ 6½Ã°£ ÀÌ»ó ü·ùÇÑ È¯ÀÚ¿¡ ´ëÇØ ¼¿ »ö»ó ÁöÁ¤
                    nursemaininfo.cellstyle("background-color", i, 0, i, nursemaininfo.colRef("stattmck")) = "#deffde";        
                    count6++;
                }
                if(model.getValue("/root/main/nursemainlist/nursemaininfo[" + i + "]/stattmck4") =="Y" 
                    && model.getValue("/root/main/nursemainlist/nursemaininfo[" + i + "]/stattmck") == "Y" 
                    && model.getValue("/root/main/nursemainlist/nursemaininfo[" + i + "]/stattmck24") =="Y") 
                {
                    //ü·ù½Ã°£ 24½Ã°£ ÀÌ»ó ü·ùÇÑ È¯ÀÚ¿¡ ´ëÇØ ¼¿ »ö»ó ÁöÁ¤
                    nursemaininfo.cellstyle("background-color", i, 0, i, nursemaininfo.colRef("stattmck")) = "#FFFF66";    
                    count24++;
                }
            }
        
            model.makeValue("/root/main/cntpat/count4","("+count4+")");
            model.makeValue("/root/main/cntpat/count6","("+count6+")");
            model.makeValue("/root/main/cntpat/count24","("+count24+")");
*/
            //byCY
            
            // ºÎÀûÇÕ°Ëü µî·Ï ȯÀÚ Á¶È¸_¼Õ¼ºÈÆ
 /*   		var spcPatnm = "";
    		if(getNodesetCount("/root/main/topunablspc/nursemainspclist") > 0) {
    			for( var k = 1 ; k <= getNodesetCount("/root/main/topunablspc/nursemainspclist") ; k++){
    				if(spcPatnm == ""){
    					spcPatnm += model.getValue("/root/main/topunablspc/nursemainspclist["+k+"]/patnm");
    				}else{
    					spcPatnm += ", "+ model.getValue("/root/main/topunablspc/nursemainspclist["+k+"]/patnm");
   		 			}
 		   		}
						tar_unablspc.value = spcPatnm;
		    	}
   */                                 
            //Ç÷¾×Áغñ ȯÀÚ ¸®½ºÆ®
            /*var blodlist ="";
            for( i = 0 ; i < getNodesetCount("/root/main/nursemainlist/nursemainblodlist") ; i ++){
                if(blodlist != ""){
                    blodlist += ", ";
                }
                blodlist += model.getValue("/root/main/nursemainlist/nursemainblodlist["+(i+1)+"]/patnm");
            }
            tar_blodprep.value = blodlist;
            model.setFocus("nursemaininfo");*/
            
            var iRows = getNodesetCount("/root/main/nursemainlist/nursemaininfo");
            var nodePath = "/root/main/nursemainlist/nursemaininfo";
            
            //20120109_KNUH_Start °¨¿°Á¤º¸imgÃß°¡
            for(var i = 1; i<=iRows; i++) {
	            
	            if (model.getValue(nodePath + "["+i+"]/disp1") == "Y") {
	              nursemaininfo.cellstyle("background-image", i, nursemaininfo.colRef("disp1img")) = "../../../com/hismainweb/images/btn_top_infection0.gif";
	            }else{
	            	  nursemaininfo.cellstyle("background-image", i, nursemaininfo.colRef("disp1img")) = "";
	            }
	            if (model.getValue(nodePath + "["+i+"]/disp2") == "Y") {
	                nursemaininfo.cellstyle("background-image", i, nursemaininfo.colRef("disp2img")) = "../../../com/hismainweb/images/btn_top_infection1.gif";
	            }else{
	            	  nursemaininfo.cellstyle("background-image", i, nursemaininfo.colRef("disp2img")) = "";
	            }
	            if (model.getValue(nodePath + "["+i+"]/disp3") == "Y") {
	                nursemaininfo.cellstyle("background-image", i, nursemaininfo.colRef("disp3img")) = "../../../com/hismainweb/images/btn_top_infection2.gif";
	            }else{
	            	  nursemaininfo.cellstyle("background-image", i, nursemaininfo.colRef("disp3img")) = "";
	            }
	          }
            
            var iRow = nursemaininfo.rows;
            
            /*
            for(i= 1 ; i < iRow ; i ++ ){                
                // Ç÷¾×ÁغñȯÀÚ ¾ÆÀÌÄÜÇ¥½Ã                                  
                 var blodprep = model.getValue("/root/main/nursemainlist/nursemaininfo[" + i + "]/blodprepyn");
                 
                 if (blodprep == "Y") {
                        model.setValue("/root/main/nursemainlist/nursemaininfo[" + i + "]/blodprepyn", "");
                        nursemaininfo.cellstyle("background-image", i , 9) = "../../../emr/commonweb/images/blood.gif";
                } else {
                        //model.setValue("/root/main/nursemainlist/nursemaininfo[" + i + "]/blodprepyn", "");
                        nursemaininfo.cellstyle("background-image", i , 9) = "";
                }
            
            }
            */
            
            
            /*
            for(i= 0 ; i < iRow ; i ++ ){
                if(model.getValue("/root/main/nursemainlist/nursemaininfo["+i+"]/stattmck") == "Y"){
                            //ü·ù½Ã°£ 6½Ã°£ ÀÌ»ó ü·ùÇÑ È¯ÀÚ¿¡ ´ëÇØ ¼¿ »ö»ó ÁöÁ¤
                                nursemaininfo.cellstyle("background-color", i, 0, i, nursemaininfo.colRef("stattmck")) = "#deffde";                                
                            } 
            }
            
            for(i= 0 ; i < iRow ; i ++ ){
                  if(model.getValue("/root/main/nursemainlist/nursemaininfo["+i+"]/censusck") == "Y"){
                            //Census ¹Ìµî·Ï ȯÀÚ
                                nursemaininfo.cellstyle("background-color", i, 0, i, nursemaininfo.colRef("stattmck")) = "#ffefd6";
                            } 
             }                
                    
                    
             for(i = 0; i < iRow; i++) {
                 if(model.getValue("/root/main/nursemainlist/nursemaininfo[" + i + "]/recovwardcd") != "") {
                     nursemaininfo.cellstyle("color", i,nursemaininfo.colRef("recovwardcd")  , i, nursemaininfo.colRef("patnm")) = "#ff0000";                        
                     
                 }    
                   
                 if(model.getValue("/root/main/nursemainlist/nursemaininfo[" + i + "]/actsymp") == "Y") {
                     nursemaininfo.cellstyle("background-color", i,nursemaininfo.colRef("bedposcnts")  , i, nursemaininfo.colRef("bedposcnts")) = "#ff0000";                        
                     
                 }
                   
             }
             */
       
            //º´¿øº° Àû¿ë Àӽà ÇϵåÄÚµù ºÎºÐ(ÃßÈÄ È¯°æ¼³Á¤ È­¸é Àû¿ë ÇÊ¿ä)
            if(ColorUseYn == "Y"){ 
                grup_help1.visible = true;
                for(i= 1 ; i < iRow ; i ++ ){
                /*+ ±ÛÀÚ»ö ÁöÁ¤ */    
                  if(model.getValue("/root/main/nursemainlist/nursemaininfo[" + i + "]/prcpcnt") == "0") {
                      nursemaininfo.cellstyle("color", i,nursemaininfo.colRef("bedposcnts")  , i, nursemaininfo.colRef("staytime")) = "#0033CC";                        
                  }else{
                      if( eval(model.getValue("/root/main/nursemainlist/nursemaininfo[" + i + "]/staytime"))  > 150  &&
                          (model.getValue("/root/main/nursemainlist/nursemaininfo[" + i + "]/dschdclrtyn") == "N" && 
                           model.getValue("/root/main/nursemainlist/nursemaininfo[" + i + "]/inreq") == ""  )) {
                             nursemaininfo.cellstyle("color", i,nursemaininfo.colRef("vipyn")  , i, nursemaininfo.colRef("staytime")) = "#ff0000";
                         }
                  }
                
                  if(model.getValue("/root/main/nursemainlist/nursemaininfo[" + i + "]/recovwardcd") != "") {
                  	nursemaininfo.cellstyle("color", i,nursemaininfo.colRef("recovwardcd")  , i, nursemaininfo.colRef("patnm")) = "#ff0000";                        
                  }    
	                 // ÀÔ¿øÀå ¹ßÇà Àǻ簡 Ÿ°ú ÀÇ»ç ÁöÁ¤À» ÇÒ °æ¿ì ó¸®
	                 //20110617_KNUH_Start dark9258 ÀÔ¿øÀå »¡°£»ö Ä¥ÇÏ´Â ºÎºÐ »èÁ¦.
	                 /*
	                 if(model.getValue("/root/main/nursemainlist/nursemaininfo[" + i + "]/erdocyn") == "Y") {
	                     nursemaininfo.cellstyle("color", i,nursemaininfo.colRef("inreq")  , i, nursemaininfo.colRef("inreq")) = "#ff0000";                        
	                 }
	                 */
    
          				/*+ ¹è°æ»ö ÁöÁ¤ */
                    if( eval(model.getValue("/root/main/nursemainlist/nursemaininfo["+i+"]/staytime")) >= 240 && eval(model.getValue("/root/main/nursemainlist/nursemaininfo["+i+"]/staytime")) < 360 ){
                  //ü·ù½Ã°£ 4~6½Ã°£ ü·ùÇÑ È¯ÀÚ¿¡ ´ëÇØ ¼¿ »ö»ó ÁöÁ¤
                    nursemaininfo.cellstyle("background-color", i, 0, i, nursemaininfo.colRef("nplan")) = "#DDBBFF";                                            
                  }else if(eval(model.getValue("/root/main/nursemainlist/nursemaininfo["+i+"]/staytime")) >= 360 && eval(model.getValue("/root/main/nursemainlist/nursemaininfo["+i+"]/staytime")) < 1440 ){
                      //ü·ù½Ã°£ 6~24½Ã°£ ü·ùÇÑ È¯ÀÚ¿¡ ´ëÇØ ¼¿ »ö»ó ÁöÁ¤
                      nursemaininfo.cellstyle("background-color", i, 0, i, nursemaininfo.colRef("nplan")) = "#deffde";                                            
                  }else if(eval(model.getValue("/root/main/nursemainlist/nursemaininfo["+i+"]/staytime")) >= 1440 ){
                      //ü·ù½Ã°£ 24½Ã°£ ÀÌ»ó ü·ùÇÑ È¯ÀÚ¿¡ ´ëÇØ ¼¿ »ö»ó ÁöÁ¤
              				nursemaininfo.cellstyle("background-color", i, 0, i, nursemaininfo.colRef("nplan")) = "#99ccff";                                            
                  }
    
                     //Census ¹Ìµî·Ï ȯÀÚ
                  if(model.getValue("/root/main/nursemainlist/nursemaininfo["+i+"]/censusck") == "Y"){
                  		nursemaininfo.cellstyle("background-color", i, 0, i, nursemaininfo.colRef("nplan")) = "#ffefd6";
                  }
                  
                  if(model.getValue("/root/main/nursemainlist/nursemaininfo["+i+"]/recovwardcd") != ""){
                      nursemaininfo.cellstyle("background-color", i, 0, i, nursemaininfo.colRef("nplan")) = "#ffff99";
                  }              
            
            //È°·Â¡ÈÄ ´ë»óÀÚ                               
                     if(model.getValue("/root/main/nursemainlist/nursemaininfo[" + i + "]/actsymp") == "Y") {
                         nursemaininfo.cellstyle("background-color", i,nursemaininfo.colRef("bedposcnts")  , i, nursemaininfo.colRef("bedposcnts")) = "#ff0000";                        
                     }              
                     
                /*+ ±âȣǥ½Ã */     
                     // Ç÷¾×ÁغñȯÀÚ ¾ÆÀÌÄÜÇ¥½Ã                                  
                     var blodprep = model.getValue("/root/main/nursemainlist/nursemaininfo[" + i + "]/blodprepyn");
                     
                     if (blodprep == "Y") {
                            model.setValue("/root/main/nursemainlist/nursemaininfo[" + i + "]/blodprepyn", "");
                            nursemaininfo.cellstyle("background-image", i , nursemaininfo.colRef("blodprepyn")) = "../../../emr/commonweb/images/blood.gif";
                    } else {
                            //model.setValue("/root/main/nursemainlist/nursemaininfo[" + i + "]/blodprepyn", "");
                            nursemaininfo.cellstyle("background-image", i , nursemaininfo.colRef("blodprepyn")) = "";
                    }
                    
                    //¸Þ¸ð±âÈ£ Ç¥½Ã
                    if(MemoUseYn == "Y"){
                        if(model.getValue("/root/main/nursemainlist/nursemaininfo[" + i + "]/memo") == "Y"){
                            nursemaininfo.cellstyle("background-image", i , nursemaininfo.colRef("memoyn")) = "../../../com/commonweb/images/icon_list.gif";
                        }else{
                            nursemaininfo.cellstyle("background-image", i , nursemaininfo.colRef("memoyn")) = "";                            
                        }
                    }
                    
                    // ¿Ü·¡ÀÔ¿øÀå ±â·Î Ç¥½Ã¸¦ ÇÔÀ¸·Î½á »èÁ¦ ó¸®
                    // ¿Ü·¡ÀÔ¿øÀåÇ¥½Ã
                    //if(model.getValue("/root/main/nursemainlist/nursemaininfo[" + i + "]/outreq") == "Y") {
                         //nursemaininfo.cellstyle("background-color", i,nursemaininfo.colRef("patnm")  , i, nursemaininfo.colRef("patnm")) = "#999999";                        
                     //}
 		          		  
 		          		  // ºÎôÇÕ °Ëü Ä÷³ »ö»ó º¯°æ_¼Õ¼ºÈÆ.
										if (nursemaininfo.valueMatrix(i,nursemaininfo.colRef("unablspc")) == "[ºÎ]") { 
										
										nursemaininfo.cellstyle("background-color", i,nursemaininfo.colRef("unablspc") , i, nursemaininfo.colRef("unablspc")) = "#ff9900";                        
										}  else {
											if ( nursemaininfo.cellstyle("background-color", i,nursemaininfo.colRef("unablspc") , i, nursemaininfo.colRef("unablspc")) == "#ff9900") {
													nursemaininfo.cellstyle("background-color", i,nursemaininfo.colRef("unablspc") , i, nursemaininfo.colRef("unablspc")) = "#ffffff"
											}
										}
          }
        }else{
            if ( instUseForJci == "Y" ){
                grup_help012.visible = true;
                
            } else {
                grup_help2.visible = true;
            }
            for(i= 1 ; i < iRow ; i ++ ){            
                if ( instUseForJci == "Y" ){
    
                  //ü·ù½Ã°£ º° ȯÀÚ¿¡ ´ëÇØ ¼¿ »ö»ó ÁöÁ¤
                    nursemaininfo.cellstyle("background-color", i, 0, i, nursemaininfo.colRef("nplan")) = "#"+ model.getValue("/root/main/nursemainlist/nursemaininfo["+i+"]/color012");                                            
                } else {
    
                    if(model.getValue("/root/main/nursemainlist/nursemaininfo["+i+"]/stattmck") == "Y"){
                        //ü·ù½Ã°£ 6½Ã°£ ÀÌ»ó ü·ùÇÑ È¯ÀÚ¿¡ ´ëÇØ ¼¿ »ö»ó ÁöÁ¤
                        nursemaininfo.cellstyle("background-color", i, 0, i, nursemaininfo.colRef("nplan")) = "#deffde";                                            
                    }
                }
                 if(model.getValue("/root/main/nursemainlist/nursemaininfo["+i+"]/censusck") == "Y"){
                  //Census ¹Ìµî·Ï ȯÀÚ
                    nursemaininfo.cellstyle("background-color", i, 0, i, nursemaininfo.colRef("nplan")) = "#ffefd6";
                }
                    
                if(model.getValue("/root/main/nursemainlist/nursemaininfo[" + i + "]/recovwardcd") != "") {
                     nursemaininfo.cellstyle("color", i,nursemaininfo.colRef("recovwardcd")  , i, nursemaininfo.colRef("patnm")) = "#ff0000";                        
                }    
                       
                if(model.getValue("/root/main/nursemainlist/nursemaininfo[" + i + "]/actsymp") == "Y") {
                     nursemaininfo.cellstyle("background-color", i,nursemaininfo.colRef("bedposcnts")  , i, nursemaininfo.colRef("bedposcnts")) = "#ff0000";                        
                }
                     
                // ÀÔ¿øÀå ¹ßÇà Àǻ簡 Ÿ°ú ÀÇ»ç ÁöÁ¤À» ÇÒ °æ¿ì ó¸®
                     //20110617_KNUH_Start dark9258 ÀÔ¿øÀå »¡°£»ö Ä¥ÇÏ´Â ºÎºÐ »èÁ¦.
                     /*
                     if(model.getValue("/root/main/nursemainlist/nursemaininfo[" + i + "]/erdocyn") == "Y") {
                         nursemaininfo.cellstyle("color", i,nursemaininfo.colRef("inreq")  , i, nursemaininfo.colRef("inreq")) = "#ff0000";                        
                     }
                     */
                     
                 // Ç÷¾×ÁغñȯÀÚ ¾ÆÀÌÄÜÇ¥½Ã                                  
                var blodprep = model.getValue("/root/main/nursemainlist/nursemaininfo[" + i + "]/blodprepyn");
                     
                if (blodprep == "Y") {
                    model.setValue("/root/main/nursemainlist/nursemaininfo[" + i + "]/blodprepyn", "");
                    nursemaininfo.cellstyle("background-image", i , nursemaininfo.colRef("blodprepyn")) = "../../../emr/commonweb/images/blood.gif";
                } else {
                    //model.setValue("/root/main/nursemainlist/nursemaininfo[" + i + "]/blodprepyn", "");
                    nursemaininfo.cellstyle("background-image", i , nursemaininfo.colRef("blodprepyn")) = "";
                }
                    
                //¸Þ¸ð±âÈ£ Ç¥½Ã
                if(MemoUseYn == "Y"){
                    if(model.getValue("/root/main/nursemainlist/nursemaininfo[" + i + "]/memo") == "Y"){
                        nursemaininfo.cellstyle("background-image", i , nursemaininfo.colRef("memoyn")) = "../../../com/commonweb/images/icon_list.gif";                            
                    }else{
                        nursemaininfo.cellstyle("background-image", i , nursemaininfo.colRef("memoyn")) = "";                            
                    }
                }   
                
 		            // ºÎôÇÕ °Ëü Ä÷³ »ö»ó º¯°æ_¼Õ¼ºÈÆ.
								if (nursemaininfo.valueMatrix(i,nursemaininfo.colRef("unablspc")) == "[ºÎ]") { 
								
								nursemaininfo.cellstyle("background-color", i,nursemaininfo.colRef("unablspc") , i, nursemaininfo.colRef("unablspc")) = "#ff9900";                        
								}  else {
									if ( nursemaininfo.cellstyle("background-color", i,nursemaininfo.colRef("unablspc") , i, nursemaininfo.colRef("unablspc")) == "#ff9900") {
											nursemaininfo.cellstyle("background-color", i,nursemaininfo.colRef("unablspc") , i, nursemaininfo.colRef("unablspc")) = "#ffffff"
									}
								}
            }                
        }
    }    
        
        //Ç÷¾×ÁغñȯÀÚ & ÀÔ¿ø´ë±â ȯÀÚ Á¶È¸
    //submit("TRMNE00107");
    //submit("TRMNE00108");
    
    var patnm = "";
    if(getNodesetCount("/root/main/topinfolistblod/nursemainblodlist") > 0 ){
        for( i = 1 ; i <= getNodesetCount("/root/main/topinfolistblod/nursemainblodlist") ; i ++ ){
            if(patnm == ""){
                patnm += model.getValue("/root/main/topinfolistblod/nursemainblodlist["+i+"]/patnm");
            }else{
                patnm += ", " + model.getValue("/root/main/topinfolistblod/nursemainblodlist["+i+"]/patnm");
            }
        }
        tar_blodprep.value = patnm;
    }
    
		// ºÎÀûÇÕ°Ëü µî·Ï ȯÀÚ Á¶È¸_¼Õ¼ºÈÆ
    var spcPatnm = "";
    if(getNodesetCount("/root/main/topunablspc/nursemainspclist") > 0) {
    	for( var k = 1 ; k <= getNodesetCount("/root/main/topunablspc/nursemainspclist") ; k++){
    		if(spcPatnm == ""){
    			spcPatnm += model.getValue("/root/main/topunablspc/nursemainspclist["+k+"]/patnm");
    			var patcnt = 1;
    		}else{
    			spcPatnm += ", "+ model.getValue("/root/main/topunablspc/nursemainspclist["+k+"]/patnm");
    			patcnt += 1;
    		}
    	}
    	cap_spcnt.text = "["+patcnt+"]";
    	tar_unablspc.value = spcPatnm;
    } else {
    	cap_spcnt.text = "";
    	tar_unablspc.value = "";
    }
    
    

    //20110209 °æºÏ´ë
    setParameter("SMMNR00600_Param", model.getValue("/root/main/cond/section"));
}
          
/**
 * @group  :
 * @ver    : 2007.06.07
 * @by     : ¾çõ´ö
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : È­¸é»ó´ÜÁ¤º¸¼³Á¤
 * @param  :
 * @return :
 * @---------------------------------------------------
 */     
 
function fSetParam(pFlag){
    
  if(pFlag == "nm"){
    // ÀÔ¿øȯÀÚ È­¸é»ó´ÜÁ¤º¸ ¼³Á¤
     if(nursemaininfo.row < 1){
         return;    
     } else {             
           var sindschacptstat = model.getValue("/root/main/cond/indschacptstat" ); // Àç¿ø±¸ºÐ
             
           var sOrdtype = model.getValue("/root/main/nursemainlist/nursemaininfo["+nursemaininfo.row+"]/ordtype" );
             var sPid     = model.getValue("/root/main/nursemainlist/nursemaininfo["+nursemaininfo.row+"]/pid"     );
             var sIndd    = model.getValue("/root/main/nursemainlist/nursemaininfo["+nursemaininfo.row+"]/indd"    );
             var sCretno  = model.getValue("/root/main/nursemainlist/nursemaininfo["+nursemaininfo.row+"]/cretno"  );
             var sInstcd  = model.getValue("/root/main/nursemainlist/nursemaininfo["+nursemaininfo.row+"]/instcd"  );
             var sSrchdd  = model.getValue("/root/main/nursemainlist/nursemaininfo["+nursemaininfo.row+"]/dschdd"    );
             
        var param = sOrdtype + "¢Ë" 
                  + sPid     + "¢Ë" 
                  + sIndd    + "¢Ë" 
                  + sCretno  + "¢Ë"     
                  + sInstcd  + "¢Ë" 
                  + sSrchdd  + "¢Ë" ;
        
        setParameter("condparam",  param);
        
        modal("SPMMO08900", 1, "", "", "", "", "", "left:0; right:0; width:0; height:0; sysmenu:hidden; caption:hidden; min:hidden, max:hidden;");
        
        //-------------------------------------------------------------
        // °£È£ ÀÏÁö Type 2
        // »ó´Ü Á¤º¸ ¼öÁ¤ÇÒ¶§ °£È£ ÀÏÁö Á¤º¸µµ °°ÀÌ º¯°æ
        // 2009 09 15
        //-------------------------------------------------------------
        
        
        
        //-------------------------------------------
        var curNurType2Obj   = getOpenWindow("SMMNR03400"); //°£È£ ŸÀÔ2 È­¸é object loading
         if(curNurType2Obj != null){      //°£È£ ŸÀÔ2 È­¸é refresh ;  
                    curNurType2Obj.javascript.fInitialize("init");
 
             } //°£È£ ŸÀÔ2 È­¸é refresh;      

        var curNurOpCnfmObj   = getOpenWindow("SMMNP00200");
        if(curNurOpCnfmObj != null){//ÁغñÈ®ÀÎÀÌ ¿­·ÁÀÖÀ¸¸é »ó´Ü ȯÀÚ·Î ÀçÁ¶È¸2010.01.04 K.J.M
            curNurOpCnfmObj.javascript.fFormInit();
        } 
        
        //ºÎÀûÇÕ °Ëü ´õºí Ŭ¸¯ ½Ã °ËüȮÀÎ È­¸é _¼Õ¼ºÈÆ.
        if	(nursemaininfo.valueMatrix(nursemaininfo.row,nursemaininfo.col) == "[ºÎ]"){
								setParameter("SMMNW00129_PARM_PID", model.getValue("/root/main/nursemainlist/nursemaininfo["+nursemaininfo.row+"]/pid"));
								setParameter("SMMNW00129_PARM_INDD", model.getValue("/root/main/nursemainlist/nursemaininfo["+nursemaininfo.row+"]/indd"));
								modal("SMMNW00129");
								fSeletedSrcTool()
							}	          
     }
  }else if(pFlag == "ec"){
     if(grd_patlist.row < 1){
        return;    
     } else {
           var sOrdtype = model.getValue("/root/main/ercensuslist/erpatientlist["+grd_patlist.row+"]/ordtype" );          
           var sPid     = model.getValue("/root/main/ercensuslist/erpatientlist["+grd_patlist.row+"]/pid"     );
           var sIndd    = model.getValue("/root/main/ercensuslist/erpatientlist["+grd_patlist.row+"]/indd"    );
           var sCretno  = model.getValue("/root/main/ercensuslist/erpatientlist["+grd_patlist.row+"]/cretno"  );
           var sInstcd  = model.getValue("/root/main/ercensuslist/erpatientlist["+grd_patlist.row+"]/instcd"  );
           var sSrchdd  = model.getValue("/root/main/ercensuslist/erpatientlist["+grd_patlist.row+"]/dschdd"  );
           
         var param = sOrdtype + "¢Ë"
                   + sPid     + "¢Ë" 
                   + sIndd    + "¢Ë" 
                   + sCretno  + "¢Ë"     
                   + sInstcd  + "¢Ë" 
                   + sSrchdd  + "¢Ë" ;
            
         setParameter("condparam",  param);
         
         modal("SPMMO08900", 1, "", "", "", "", "", "left:0; right:0; width:0; height:0; sysmenu:hidden; caption:hidden; min:hidden, max:hidden;");

        //-------------------------------------------------------------
        // °£È£ ÀÏÁö Type 2
        // »ó´Ü Á¤º¸ ¼öÁ¤ÇÒ¶§ °£È£ ÀÏÁö Á¤º¸µµ °°ÀÌ º¯°æ
        // 2009 09 15
        //-------------------------------------------------------------
        
        
        
        //-------------------------------------------
        var curNurType2Obj   = getOpenWindow("SMMNR03400"); //°£È£ ŸÀÔ2 È­¸é object loading
         if(curNurType2Obj != null){      //°£È£ ŸÀÔ2 È­¸é refresh ;  
                    curNurType2Obj.javascript.fInitialize("init");
 
             } //°£È£ ŸÀÔ2 È­¸é refresh;      

        var curNurOpCnfmObj   = getOpenWindow("SMMNP00200");
        if(curNurOpCnfmObj != null){//ÁغñÈ®ÀÎÀÌ ¿­·ÁÀÖÀ¸¸é »ó´Ü ȯÀÚ·Î ÀçÁ¶È¸2010.01.04 K.J.M
            curNurOpCnfmObj.javascript.fFormInit();
        }           

     }          
  }
  //20110905_KNUH_Start
  var curNurKadexObj = getOpenWindow("SMMNB00200");
    if(curNurKadexObj != null){//Ä«µ¦½º        
        curNurKadexObj.javascript.fInitialize();
    }
  
  
}
    
/**
 * @group  :
 * @ver    : 2007.06.07
 * @by     : ¾çõ´ö
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : ¼Ó¼º Á¶È¸
 * @param  : Census ±×¸®µå Ŭ¸¯½Ã Á¤º¸ Á¶È¸
 * @return :
 * @---------------------------------------------------
 */     
 
function fSearchPatienInfo(pFlag){
        
    var xPathPationList = "/root/main/ercensuslist/erpatientlist";
    var iRow = grd_patlist.row;
    var sRow = grd_patlist.rows; 
    
        if(pFlag  == ""){
            pFlag = "ec";
        }
      // ÀÇ»çÈ£Ãâ
      if(pFlag == "refresh"){
                        var sSrchData = "";
            var sSrchHeader = "pid¢Ëindd¢Ëcretno¢Ì";
            var sSrchData   = model.getValue("/root/main/ercensusinfo/patinfo/pid"   )+"¢Ë"
                            + model.getValue("/root/main/ercensusinfo/patinfo/indd"  )+"¢Ë"
                            + model.getValue("/root/main/ercensusinfo/patinfo/cretno")+"¢Ì";
            
            model.removenode("/root/send");
            model.makeValue("/root/send/srchinfo",sSrchHeader+sSrchData );
                          
            submit("TRMNE00104");
            
            var chosddck = model.getValue("/root/main/ercensusinfo/patinfo/chosdd") ; 
                        var bedinck = model.getValue("/root/main/ercensusinfo/patinfo/bedposflag");
            if(chosddck == "" && bedinck != "") {
                model.setValue("/root/main/ercensusinfo/patinfo/chosdd", model.getValue("/root/main/ercensusinfo/patinfo/indd") );
                model.setValue("/root/main/ercensusinfo/patinfo/chostm", model.getValue("/root/main/ercensusinfo/patinfo/intm") );
              }                
            
            model.refresh();
                                          
            fButtonSettion("A");
            fInputRefresh();
            
            return;
      }
      
    // ER Census
    if(pFlag == "ec") {
        if(sRow == "1"){
            return;    
        } else {
            var sSrchData = "";
            var sSrchHeader = "pid¢Ëindd¢Ëcretno¢Ëinstcd¢Ì";
            var sSrchData   = model.getValue(xPathPationList+"["+iRow+"]/pid"   )+"¢Ë"
                            + model.getValue(xPathPationList+"["+iRow+"]/indd"  )+"¢Ë"
                            + model.getValue(xPathPationList+"["+iRow+"]/cretno")+"¢Ë"
                            + model.getValue(xPathPationList+"["+iRow+"]/instcd")+"¢Ì";
            
            model.removenode("/root/send");
            model.makeValue("/root/send/srchinfo",sSrchHeader+sSrchData );
                          
            submit("TRMNE00104");
            
            var chosddck = model.getValue("/root/main/ercensusinfo/patinfo/chosdd") ; 
                        var bedinck = model.getValue("/root/main/ercensusinfo/patinfo/bedposflag");
            if(chosddck == "" && bedinck != "") {
                model.setValue("/root/main/ercensusinfo/patinfo/chosdd", model.getValue("/root/main/ercensusinfo/patinfo/indd") );
                model.setValue("/root/main/ercensusinfo/patinfo/chostm", model.getValue("/root/main/ercensusinfo/patinfo/intm") );
              }
              
              // »èÁ¦µÈ °æ¿ì´Â »èÁ¦Ã³¸® º¸À̵µ·Ï 
              opt_delyn.visible = false;
              var delyn = model.getValue("/root/main/ercensusinfo/patinfo/incncldtcheck"); // »èÁ¦¿©ºÎ
              if (delyn == "Y") {
                  opt_delyn.visible = true;
              }
            
            model.refresh();
                                          
            fButtonSettion("A");
            fInputRefresh();
            
            return;
        }
    
    // Nurse Main
    } else if (pFlag == "nm") {
        //alert("test N");
    } else if (pFlag == "p_ec") {
        var sSrchData = "";
        var sSrchHeader = "pid¢Ëindd¢Ëcretno¢Ì";
        var sSrchData   = model.getValue("/root/main/cond/pid"   )+"¢Ë"
                        + model.getValue("/root/main/cond/indd"  )+"¢Ë"
                        + model.getValue("/root/main/cond/cretno")+"¢Ì";
        
        model.removenode("/root/send");
        model.makeValue("/root/send/srchinfo",sSrchHeader+sSrchData );
                      
        submit("TRMNE00104");
        
        var chosddck = model.getValue("/root/main/ercensusinfo/patinfo/chosdd") ; 
                var bedinck = model.getValue("/root/main/ercensusinfo/patinfo/bedposflag");
        if(chosddck == "" && bedinck != "") {
          model.setValue("/root/main/ercensusinfo/patinfo/chosdd", model.getValue("/root/main/ercensusinfo/patinfo/indd") );
          model.setValue("/root/main/ercensusinfo/patinfo/chostm", model.getValue("/root/main/ercensusinfo/patinfo/intm") );
          }                
        
        // »èÁ¦µÈ °æ¿ì´Â »èÁ¦Ã³¸® º¸À̵µ·Ï 
        opt_delyn.visible = false;
        var delyn = model.getValue("/root/main/ercensusinfo/patinfo/incncldtcheck"); // »èÁ¦¿©ºÎ
        if (delyn == "Y") {
            opt_delyn.visible = true;
        }
        
        model.refresh();
                                      
        fButtonSettion("A");
        fInputRefresh();
        
        return;
    }
}    

/**
 * @group  :
 * @ver    : 2007.06.07
 * @by     : ¾çõ´ö
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : Census È­¸é ¹öÆ°,ÀԷ â ÄÁÆ®·Ñ
 * @param  :
 * @return :
 * @---------------------------------------------------
 */         
function fButtonSettion(pFlag){

    if( model.getValue("/root/main/cond/indschacptstat") == "4" ){
        
        btn_save.disabled       = true;   //»ó´Ü ÀúÀå ¹öÆ° ºñÈ°¼ºÈ­
        
        //Åð½ÇÃë¼Ò ¹öÆ° ºñÈ°¼ºÈ­
        btn_outrmcncl1.disabled = true;      
        btn_outrmcncl2.disabled = true;   
        btn_outrmcncl3.disabled = true;   
        
        //Àç¹æ¹æ üũ¹Ú½º ºñÈ°¼ºÈ­
        chk_revisit1.disabled   = true;
        chk_revisit2.disabled   = true;
        
        //¹æ¹®ÀÏÁö ºñÈ°¼ºÈ­
        int_chosdd1.disabled    = true;
    int_chostm1.disabled    = true;
    btn_saverow1.disabled   = true; 
    btn_updtrow1.disabled   = true;
    btn_callpop1.disabled   = true;
    
    //¹æ¹®ÀÏÁö 1Â÷ Àç¹æ¹® ºñÈ°¼ºÈ­
        int_chosdd2.disabled    = true;
    int_chostm2.disabled    = true;
    btn_saverow2.disabled   = true; 
    btn_updtrow2.disabled   = true;
    btn_callpop2.disabled   = true;
    
    //¹æ¹®ÀÏÁö 2Â÷ Àç¹æ¹® ºñÈ°¼ºÈ­
    int_chosdd3.disabled    = true;
    int_chostm3.disabled    = true;
    btn_saverow3.disabled   = true; 
    btn_updtrow3.disabled   = true;      
    btn_callpop3.disabled   = true;
    
    //ÀÇ»ç È£Ã⠺κР¸ÞÀÎÁø·á°ú º¯°æ ºÎºÐ ºñÈ°¼ºÈ­
    for(var i = 1 ; i <= grd_calldoc1.rows ; i ++){
        grd_calldoc1.isReadOnly(i, grd_calldoc1.colRef("mainyn")) = true;
    }
    
    for(var i = 1 ; i <= grd_calldoc2.rows ; i ++){
        grd_calldoc2.isReadOnly(i, grd_calldoc2.colRef("mainyn")) = true;
    }
    
    for(var i = 1 ; i <= grd_calldoc3.rows ; i ++){
        grd_calldoc3.isReadOnly(i, grd_calldoc3.colRef("mainyn")) = true;
    }
    
        
    }else{    
    if(model.getValue("/root/main/ercensusinfo/patinfo/stattm") == ""){
        btn_updtrow1.visible = false;
        btn_saverow1.visible = true;
    }else{
        btn_updtrow1.visible = true;
        btn_saverow1.visible = false;
    }
    
    if(model.getValue("/root/main/ercensusinfo/patinfo/revisit1stattm") == ""){
        btn_updtrow2.visible = false;
        btn_saverow2.visible = true;
    }else{
        btn_updtrow2.visible = true;
        btn_saverow2.visible = false;
    }
    
    if(model.getValue("/root/main/ercensusinfo/patinfo/revisit2stattm") == ""){
        btn_updtrow3.visible = false;
        btn_saverow3.visible = true;
    }else{
        btn_updtrow3.visible = true;
        btn_saverow3.visible = false;
    }
        
    
    if(model.getValue("/root/main/ercensusinfo/patinfo/outrmdt") == ""){
        btn_outrmcncl1.disabled = true;
        chk_revisit1.disabled = true;
    }else{
        btn_outrmcncl1.disabled = false;
        if(model.getValue("/root/main/ercensusinfo/patinfo/revisit1stattm") == ""){
            chk_revisit1.disabled = false;
        } else {
            chk_revisit1.disabled = true;
        }
    }
    
    if(model.getValue("/root/main/ercensusinfo/patinfo/revisit1outrmdt") == ""){
        btn_outrmcncl2.disabled = true;
        chk_revisit2.disabled = true;
    }else{
        btn_outrmcncl2.disabled = false;
        if(model.getValue("/root/main/ercensusinfo/patinfo/revisit2stattm") == ""){            
            chk_revisit2.disabled = false;
        } else {
            chk_revisit2.disabled = true;
        }
    }
   
    if(model.getValue("/root/main/ercensusinfo/patinfo/revisit2outrmdt") == ""){
        btn_outrmcncl3.disabled = true;
    }else{
        btn_outrmcncl3.disabled = false;
    }

    if(pFlag = "A"){
        if( model.getValue("/root/main/ercensusinfo/patinfo/bedposflag") == ""){
            int_chosdd1.disabled = true;
            int_chostm1.disabled = true;
            btn_addrow1.disabled = true;
            btn_delrow1.disabled = true;
            btn_introw1.disabled = true;
            btn_updtrow1.disabled = true;
            btn_saverow1.disabled = true;
        } else {
            int_chosdd1.disabled = false;
            int_chostm1.disabled = false;
            btn_addrow1.disabled = false;
            btn_delrow1.disabled = false;
            btn_introw1.disabled = false;
            btn_updtrow1.disabled = false;
            btn_saverow1.disabled = false;                
        }
        
        if( model.getValue("/root/main/ercensusinfo/patinfo/revisit1") == "Y" ) {
            int_chosdd2.disabled = false;
            int_chostm2.disabled = false;
            btn_addrow2.disabled = false;
            btn_delrow2.disabled = false;
            btn_introw2.disabled = false;
            btn_updtrow2.disabled = false;
            btn_saverow2.disabled = false;
            btn_callpop2.disabled = false;
        } else {
            int_chosdd2.disabled = true;
            int_chostm2.disabled = true;
            btn_addrow2.disabled = true;
            btn_delrow2.disabled = true
            btn_introw2.disabled = true
            btn_updtrow2.disabled = true;
            btn_saverow2.disabled = true;
            btn_callpop2.disabled = true;
        }
        if( model.getValue("/root/main/ercensusinfo/patinfo/revisit2") == "Y" ) {
            int_chosdd3.disabled = false;
            int_chostm3.disabled = false;
            btn_introw3.disabled = false;
            btn_delrow3.disabled = false;
            btn_addrow3.disabled = false;
            btn_saverow3.disabled = false;
            btn_updtrow3.disabled = false;
            btn_callpop3.disabled = false;
        } else {
            int_chosdd3.disabled = true;
            int_chostm3.disabled = true;
            btn_introw3.disabled = true;
            btn_delrow3.disabled = true;
            btn_addrow3.disabled = true;
            btn_saverow3.disabled = true;
            btn_updtrow3.disabled = true;
            btn_callpop3.disabled = true;
        }                
    }
    if(pFlag == "R1"){
        int_chosdd2.disabled = true;
        int_chostm2.disabled = true;
        int_chosdd3.disabled = true;
        int_chostm3.disabled = true;
        btn_addrow2.disabled = true;
        btn_delrow2.disabled = true;
        btn_introw2.disabled = true;
        btn_updtrow2.disabled = true;
        btn_saverow2.disabled = true;
        btn_introw3.disabled = true;
        btn_delrow3.disabled = true;
        btn_addrow3.disabled = true;
        btn_saverow3.disabled = true;
        btn_updtrow3.disabled = true;
        btn_callpop2.disabled = true;
        btn_callpop3.disabled = true;
    }
    
    if(pFlag == "R2"){
        int_chosdd3.disabled = true;
        int_chostm3.disabled = true;
        btn_introw3.disabled = true;
        btn_delrow3.disabled = true;
        btn_addrow3.disabled = true;
        btn_saverow3.disabled = true;
        btn_updtrow3.disabled = true;
        btn_callpop2.disabled = true;
        btn_callpop3.disabled = true;
    }
  }
}
    
/**
 * @group  :
 * @ver    : 2007.06.07
 * @by     : ¾çõ´ö
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : Census È­¸é ÀÔ·Ââ Refresh ºÎºÐ
 * @param  :
 * @return :
 * @---------------------------------------------------
 */        
function fInputRefresh(){
        int_chosdd2.refresh();
        int_chostm2.refresh();
        int_chosdd3.refresh();
        int_chostm3.refresh();
}
        
    
/**
 * @group  :
 * @ver    : 2007.06.07
 * @by     : ¾çõ´ö
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : ¿ÞÂÊ ¸¶¿ì½º Ŭ¸¯ ¸Þ´º
 * @param  :
 * @return :
 * @---------------------------------------------------
 */     
function fPopupMenuInfo(){
    var sCol = nursemaininfo.mouseCol;
  if(event.button == 3){
       if(sCol == nursemaininfo.colRef("orddrid")){
      if(nursemaininfo.isCell(event.target) && nursemaininfo.mouseRow >= nursemaininfo.fixedrows){
          setPopupMenu("nursemaininfo", false, "/root/codedata/popupmenu/grid01/item", "name", "func");
      }else{
          window.setPopupMenu(false);
      }
    }else{
        if(nursemaininfo.isCell(event.target) && nursemaininfo.mouseRow >= nursemaininfo.fixedrows){
        setPopupMenu("nursemaininfo", false, "/root/codedata/popupmenu/grid02/item", "name", "func");
      }else{
        window.setPopupMenu(false);
      }
    }
  }
}
    
/**
 * @group  :
 * @ver    : 2007.06.07
 * @by     : ¾çõ´ö
 * @---------------------------------------------------
 * @type   : function
 * @access : public¤Á¤©
 * @desc   : Exel ÀúÀå
 * @param  :
 * @return :
 * @---------------------------------------------------
 */ 
function fSaveExcel(){
    var fileName = "";
    var sIndschacptstat = model.getValue("/root/main/cond/indschacptstat");
    if(sIndschacptstat == "1"){
    fileName = window.fileDialog("save", ",", false, "EMC ¸ÞÀÎ(Àç¿ø)_"+getCurrentDate(), "xls", "All Files (*.*)|*.*|Excel Files(*.xls)|*.xls");
  }else if (sIndschacptstat == "2"){
      fileName = window.fileDialog("save", ",", false, "EMC ¸ÞÀÎ(Åð¿øÁøÇà)_"+getCurrentDate(), "xls", "All Files (*.*)|*.*|Excel Files(*.xls)|*.xls");
  }else if (sIndschacptstat == "3"){
    fileName = window.fileDialog("save", ",", false, "EMC ¸ÞÀÎ(Åð¿ø)_"+int_outdt.value, "xls", "All Files (*.*)|*.*|Excel Files(*.xls)|*.xls");
  }
  
  if (fileName != "") {
      nursemaininfo.saveExcel(fileName, "SheetName", true, true, "", "", false);
  }
}
    
/**
 * @group  :
 * @ver    : 2007.06.07
 * @by     : ¾çõ´ö
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : Bed Á¤º¸ ¼±Åà Popup
 * @param  :
 * @return :
 * @---------------------------------------------------
 */ 
function fPopupBed(){
	
		xOldPosflagcd = model.getValue("/root/main/ercensusinfo/patinfo/bedposflagcd");
		xOldPosflag = model.getValue("/root/main/ercensusinfo/patinfo/bedposflag");
		var vktas = model.getValue("/root/main/ercensusinfo/patinfo/ktas");
		if(vktas != ""){
			setParameter("ktas", model.getValue("/root/main/ercensusinfo/patinfo/ktas"));
		}		
    window.load( "SMMNE03600_BedÀ§Ä¡.xrw", "modeless" , "test", "left:"+ event.screenX+"px; top:"+event.screenY+"px; width:600px; height:600px;");    
}
    
/**
 * @group  :
 * @ver    : 2007.06.07
 * @by     : ¾çõ´ö
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : Census ÀúÀå, ¼öÁ¤
 * @param  :
 * @return :
 * @---------------------------------------------------
 */ 
function fSaveCensusInfo(pFlag){
    
    // Å°°ª Á¤ÀÇ
    var sPid       = model.getValue("/root/main/ercensusinfo/patinfo/pid"   );     // µî·Ï¹øÈ£
    var sIndd      = model.getValue("/root/main/ercensusinfo/patinfo/indd"  );     // ÀÔ¿øÀÏÀÚ
    var sOrddd     = model.getValue("/root/main/ercensusinfo/patinfo/orddd" );     // Áø·áÀÏÀÚ
    var sCretno    = model.getValue("/root/main/ercensusinfo/patinfo/cretno");     // »ý¼º¹øÈ£
    var sIntm      = model.getValue("/root/main/ercensusinfo/patinfo/intm"  );     // ÀÔ¿ø½Ã°£
    
    
    // ½ÇÁ¦ ÀԷ°ª ¼³Á¤
    var sBedposflag         = model.getValue("/root/main/ercensusinfo/patinfo/bedposflag"    );         // BedÀ§Ä¡³»¿ë
    var sOutcureyn          = model.getValue("/root/main/ercensusinfo/patinfo/outcureyn"     );         // ¿Ü·¡Ã³Ä¡¿©ºÎ
    var sCpryn              = model.getValue("/root/main/ercensusinfo/patinfo/cpryn"         );         // CPR¿©ºÎ
    var sElbulbodpatnm      = model.getValue("/root/main/ercensusinfo/patinfo/elbulbodpatnm" );         // Àü±¤ÆÇ¿ë ȯÀÚ¸í        
    var sElbulbodcccnts     = model.getValue("/root/main/ercensusinfo/patinfo/elbulbodcccnts");         // Àü±¤ÆÇ¿ëÁÖÈ£¼Ò
    var sNurscccnts         = model.getValue("/root/main/ercensusinfo/patinfo/nurscccnts"    );         // °£È£»ç ÀÔ·Â ÁÖÈ£¼Ò
    var sInwaitresncnts     = model.getValue("/root/main/ercensusinfo/patinfo/inwaitresncnts");         // ÀÔ¿ø´ë±â»çÀ¯³»¿ë
    var sSkilfact           = model.getValue("/root/main/ercensusinfo/patinfo/skilfact"      );         // remart    
    var sSpcltest           = model.getValue("/root/main/ercensusinfo/patinfo/spcltest"      );         // Ư¼ö°Ë»ç
    var sBedposflagcd       = model.getValue("/root/main/ercensusinfo/patinfo/bedposflagcd"  );         // BedÀ§Ä¡
    var sBedcd              = model.getValue("/root/main/ercensusinfo/patinfo/bedcd"    		 );         // ¿ø¹«bedÀ§Ä¡³»¿ë
    var sExtrecyn						= model.getValue("/root/main/ercensusinfo/patinfo/extrecyn"    	 );         // ¿ÜºÎ Àǹ«±â·Ï ¿©ºÎ y,n _ ¼Õ¼ºÈÆ.
    var sExtrecsaveyn				= model.getValue("/root/main/ercensusinfo/patinfo/extrecsaveyn"  );         // ¿ÜºÎ Àǹ«±â·Ï ÀúÀå ¿©ºÎ y,n _ ¼Õ¼ºÈÆ.
    var sExtrecrtnyn				= model.getValue("/root/main/ercensusinfo/patinfo/extrecrtnyn"   );         // ¿ÜºÎ Àǹ«±â·Ï ¹Ýȯ ¿©ºÎ y,n _ ¼Õ¼ºÈÆ.
    var sExtemryn						= model.getValue("/root/main/ercensusinfo/patinfo/extemryn"    	 );         // ¿ÜºÎ ¿µ»ó±â·Ï ¿©ºÎ y,n _ ¼Õ¼ºÈÆ.
    var sExtemrsaveyn				= model.getValue("/root/main/ercensusinfo/patinfo/extemrsaveyn"  );         // ¿ÜºÎ ¿µ»ó±â·Ï ÀúÀå ¿©ºÎ y,n _ ¼Õ¼ºÈÆ.
    var sExtemrrtnyn				= model.getValue("/root/main/ercensusinfo/patinfo/extemrrtnyn"   );         // ¿ÜºÎ ¿µ»ó±â·Ï ¹Ýȯ ¿©ºÎ y,n _ ¼Õ¼ºÈÆ.
    var sBedGrupcd          = model.getValue("/root/main/ercensusinfo/patinfo/bedgrupcd"     );         // bed±×·ìÄÚµå(ÀÀ±ÞÀÔ¿ø½Ç/EICUÀÎ °æ¿ì(I)¿Í ÀÀ±Þ½ÇÀÎ °æ¿ì(E) ±¸ºÐ)_20110127_SMY
    var sCprTims            = model.getValue("/root/main/ercensusinfo/patinfo/cprtims"    	 );         // CPRȽ¼ö
    
    // 161020_ Ä¥°î ÀÀ±Þ½Ç ±¸¿ªº¯°æ °ü·Ã ¼öÁ¤
    var spamroomcd          = model.getValue("/root/main/ercensusinfo/patinfo/pamroomcd"   	 );         // ÀÀ±Þ½Ç ±¸¿ªÁ¤º¸(roomcd)
    var spambedcd           = model.getValue("/root/main/ercensusinfo/patinfo/pambedcd"    	 );         // ÀÀ±Þ½Ç º´»óÁ¤º¸(bedcd)
    var spamroomtypecd      = model.getValue("/root/main/ercensusinfo/patinfo/pamroomtypecd" );         // º´½ÇÇüÅ ÄÚµå
    var spamroomgrdecd      = model.getValue("/root/main/ercensusinfo/patinfo/pamroomgrdecd" );         // º´½Çµî±Þ ÄÚµå
    var spamflag			= model.getValue("/root/main/ercensusinfo/patinfo/pamflag" 		 );         // ±¸¿ªº¯°æ flag
		
		//alert("spamroomcd : " + spamroomcd + " / spambedcd : " + spambedcd + " / spamroomtypecd : " + spamroomtypecd + "/ spamroomgrdecd : " + spamroomgrdecd);
    
    if(sPid == ""     || sPid == null ) {
        messageBox("ȯÀÚ°¡ ¼±ÅõÇÁö", "E007");
        model.setFocus("grd_patlist");
        return;
    }
    
    if((sBedposflag == ""     || sBedposflag == null) && (pFlag == "patinfoU" || pFlag == "patinfoI")) {
        messageBox("BedÀ§Ä¡´Â", "I003");
        model.setFocus("int_bedposflag");
        return;
    }
    
    var cpryn = rdo_cpryn.value;
    var cprtims = cmb_cprtims.value;
    
    if(cpryn == "Y" && cprtims == 0) {
        messageBox("CPR Ƚ¼ö¸¦ ÀÔ·ÂÇϼ¼¿ä", "I");
        model.setFocus("cmb_cprtims");
        return;
    }
    

    var sCensusInfoHeader1 = "stat¢Ëpid¢Ëorddd¢Ëcretno¢Ëindd¢Ëintm¢Ëelbulbodpatnm¢Ënurscccnts¢Ëbedposflag¢Ëoutcureyn¢Ëcpryn¢Ëelbulbodcccnts¢Ëinwaitresncnts¢Ëskilfact¢Ëspcltest¢Ëbedposflagcd¢Ëbedcd¢Ëextrecyn¢Ëextrecsaveyn¢Ëextrecrtnyn¢Ëextemryn¢Ëextemrsaveyn¢Ëextemrrtnyn¢Ëbedgrupcd¢Ëcprtims¢Ëpamroomcd¢Ëpambedcd¢Ëpamroomtypecd¢Ëpamroomgrdecd¢Ëpamflag¢Ì";
    var sCensusInfoHeader = "stat¢Ëpid¢Ëorddd¢Ëcretno¢Ëindd¢Ëintm¢Ëelbulbodpatnm¢Ënurscccnts¢Ëbedposflag¢Ëoutcureyn¢Ëcpryn¢Ëelbulbodcccnts¢Ëinwaitresncnts¢Ëskilfact¢Ëspcltest¢Ëbedposflagcd¢Ëbedcd¢Ëextrecyn¢Ëextrecsaveyn¢Ëextrecrtnyn¢Ëextemryn¢Ëextemrsaveyn¢Ëextemrrtnyn¢Ëbedgrupcd¢Ëcprtims¢Ì";
    
    // census ¼öÁ¤
    if(pFlag == "patinfoU" ){
                
        var sInsertdata     = "U¢Ë"                    // »óÅÂ
                            + sPid            +"¢Ë"    // µî·Ï¹øÈ£
                            + sOrddd          +"¢Ë"    // Áø·áÀÏÀÚ
                            + sCretno         +"¢Ë"    // »ý¼º¹øÈ£
                            + sIndd           +"¢Ë"    // ÀÔ¿øÀÏÀÚ
                            + sIntm           +"¢Ë"    // ÀÔ¿ø½Ã°£
                            + sElbulbodpatnm  +"¢Ë"    // Àü±¤ÆÇ¿ë ȯÀÚ¸í
                            + sNurscccnts     +"¢Ë"    // °£È£»ç ÀÔ·Â ÁÖÈ£¼Ò
                            + sBedposflag     +"¢Ë"    // Bed À§Ä¡
                            + sOutcureyn      +"¢Ë"    // ¿Ü·¡Ã³Ä¡ ¿©ºÎ
                            + sCpryn          +"¢Ë"    // CPR ¿©ºÎ
                            + sElbulbodcccnts +"¢Ë"    // Àü±¤ÆÇ¿ë ÁÖÈ£¼Ò
                            + sInwaitresncnts +"¢Ë"    // ÀÔ¿øÁö¿ø»çÀ¯³»¿ª
                            + sSkilfact       +"¢Ë"    // remart
                            + sSpcltest       +"¢Ë"    // Ư¼ö°Ë»ç
                            + sBedposflagcd   +"¢Ë"    // bed À§Ä¡ÄÚµå
                            + sBedcd          +"¢Ë"    // ¿ø¹«º´»óÄÚµå
                            + sExtrecyn       +"¢Ë"    // ¿ÜºÎ Àǹ«±â·Ï ÁöÂü¿©ºÎ
                            + sExtrecsaveyn   +"¢Ë"    // ¿ÜºÎ Àǹ«±â·Ï ÀúÀå¿©ºÎ È®ÀÎ
                            + sExtrecrtnyn	  +"¢Ë"		// ¿ÜºÎ Àǹ«±â·Ï ¹Ýȯ ¿©ºÎ
                            + sExtemryn       +"¢Ë"    // ¿ÜºÎ ¿µ»óÀÚ·á ÁöÂü¿©ºÎ
                            + sExtemrsaveyn   +"¢Ë"    // ¿ÜºÎ ¿µ»óÀÚ·á ÀúÀå¿©ºÎ È®ÀÎ
                            + sExtemrrtnyn	  +"¢Ë"		// ¿ÜºÎ ¿µ»óÀÚ·á ¹Ýȯ ¿©ºÎ
                            + sBedGrupcd      +"¢Ë"
                            + sCprTims        +"¢Ë"    // Bed±×·ìÄÚµå
                            + spamroomcd      +"¢Ë"		 // ÀÀ±Þ½Ç ±¸¿ªÁ¤º¸
                            + spambedcd       +"¢Ë"		 // ÀÀ±Þ½Ç º´»óÁ¤º¸
                            + spamroomtypecd  +"¢Ë"		 // º´½ÇÇüÅ ÄÚµå
                            + spamroomgrdecd  +"¢Ë"	 // º´½Çµî±Þ ÄÚµå
                            + spamflag 			  +"¢Ì";	 // º´½Çµî±Þ ÄÚµå
                            
                            
               
        model.removenode("/root/send");
        model.makeValue("/root/send/censusinfo",sCensusInfoHeader1 + sInsertdata );
    }

    // census µî·Ï
    if(pFlag == "patinfoI"){
                                                            
        var sInsertdata     = "I¢Ë"                    // »óÅÂ
                            + sPid            +"¢Ë"    // µî·Ï¹øÈ£
                            + sOrddd          +"¢Ë"    // Áø·áÀÏÀÚ
                            + sCretno         +"¢Ë"    // »ý¼º¹øÈ£
                            + sIndd           +"¢Ë"    // ÀÔ¿øÀÏÀÚ
                            + sIntm           +"¢Ë"    // ÀÔ¿ø½Ã°£
                            + sElbulbodpatnm  +"¢Ë"    // Àü±¤ÆÇ¿ë ȯÀÚ¸í
                            + sNurscccnts     +"¢Ë"    // °£È£»ç ÀÔ·Â ÁÖÈ£¼Ò
                            + sBedposflag     +"¢Ë"    // Bed À§Ä¡
                            + sOutcureyn      +"¢Ë"    // ¿Ü·¡Ã³Ä¡ ¿©ºÎ
                            + sCpryn          +"¢Ë"    // CPR ¿©ºÎ
                            + sElbulbodcccnts +"¢Ë"    // Àü±¤ÆÇ¿ë ÁÖÈ£¼Ò
                            + sInwaitresncnts +"¢Ë"    // ÀÔ¿øÁö¿ø»çÀ¯³»¿ª
                            + sSkilfact       +"¢Ë"    // remart
                            + sSpcltest       +"¢Ë"    // Ư¼ö°Ë»ç
                            + sBedposflagcd   +"¢Ë"    // bed À§Ä¡ÄÚµå
                            + sBedcd          +"¢Ë"    // ¿ø¹«º´»óÄÚµå
														+ sExtrecyn       +"¢Ë"    // ¿ÜºÎ Àǹ«±â·Ï ÁöÂü¿©ºÎ
                            + sExtrecsaveyn    +"¢Ë"    // ¿ÜºÎ Àǹ«±â·Ï ÀúÀå¿©ºÎ È®ÀÎ
                            + sExtrecrtnyn	  +"¢Ë"		// ¿ÜºÎ Àǹ«±â·Ï ¹Ýȯ ¿©ºÎ
                            + sExtemryn       +"¢Ë"    // ¿ÜºÎ ¿µ»óÀÚ·á ÁöÂü¿©ºÎ
                            + sExtemrsaveyn   +"¢Ë"    // ¿ÜºÎ ¿µ»óÀÚ·á ÀúÀå¿©ºÎ È®ÀÎ
                            + sExtemrrtnyn	  +"¢Ë"		// ¿ÜºÎ ¿µ»óÀÚ·á ¹Ýȯ ¿©ºÎ                            
                            + sBedGrupcd      +"¢Ë"
                            + sCprTims        +"¢Ë"   // Bed±×·ìÄÚµå
                            + spamroomcd      +"¢Ë"		 // ÀÀ±Þ½Ç ±¸¿ªÁ¤º¸
                            + spambedcd       +"¢Ë"		 // ÀÀ±Þ½Ç º´»óÁ¤º¸
                            + spamroomtypecd  +"¢Ë"		 // º´½ÇÇüÅ ÄÚµå
                            + spamroomgrdecd  +"¢Ë" 	 // º´½Çµî±Þ ÄÚµå
                            + spamflag 			  +"¢Ì";	 // º´½Çµî±Þ ÄÚµå
                            
                                                        
        model.removenode("/root/send");
        model.makeValue("/root/send/censusinfo",sCensusInfoHeader1 + sInsertdata );
        
        var chosddck = model.getValue("/root/main/ercensusinfo/patinfo/chosdd") ; 

        // ³»¿øÀϽÃ
        if(chosddck == "") {
          model.setValue("/root/main/ercensusinfo/patinfo/chosdd", model.getValue("/root/main/ercensusinfo/patinfo/indd") );
          model.setValue("/root/main/ercensusinfo/patinfo/chostm", model.getValue("/root/main/ercensusinfo/patinfo/intm") );
          }
    }

    // Triage/census »èÁ¦ 2008.09.10
    if(pFlag == "patinfoD" ){
                
        var sInsertdata     = "D¢Ë"                    // »óÅÂ
                            + sPid            +"¢Ë"    // µî·Ï¹øÈ£
                            + sOrddd          +"¢Ë"    // Áø·áÀÏÀÚ
                            + sCretno         +"¢Ë"    // »ý¼º¹øÈ£
                            + sIndd           +"¢Ë"    // ÀÔ¿øÀÏÀÚ
                            + sIntm           +"¢Ë"    // ÀÔ¿ø½Ã°£
                            + sElbulbodpatnm  +"¢Ë"    // Àü±¤ÆÇ¿ë ȯÀÚ¸í
                            + sNurscccnts     +"¢Ë"    // °£È£»ç ÀÔ·Â ÁÖÈ£¼Ò
                            + sBedposflag     +"¢Ë"    // Bed À§Ä¡
                            + sOutcureyn      +"¢Ë"    // ¿Ü·¡Ã³Ä¡ ¿©ºÎ
                            + sCpryn          +"¢Ë"    // CPR ¿©ºÎ
                            + sElbulbodcccnts +"¢Ë"    // Àü±¤ÆÇ¿ë ÁÖÈ£¼Ò
                            + sInwaitresncnts +"¢Ë"    // ÀÔ¿øÁö¿ø»çÀ¯³»¿ª
                            + sSkilfact       +"¢Ë"    // remart
                            + sSpcltest       +"¢Ë"    // Ư¼ö°Ë»ç
                            + sBedposflagcd   +"¢Ë"    // bed À§Ä¡ÄÚµå
                            + sBedcd          +"¢Ë"    // ¿ø¹«º´»óÄÚµå
														+ sExtrecyn       +"¢Ë"    // ¿ÜºÎ Àǹ«±â·Ï ÁöÂü¿©ºÎ
                            + sExtrecsaveyn    +"¢Ë"    // ¿ÜºÎ Àǹ«±â·Ï ÀúÀå¿©ºÎ È®ÀÎ
                            + sExtrecrtnyn	  +"¢Ë"		// ¿ÜºÎ Àǹ«±â·Ï ¹Ýȯ ¿©ºÎ
                            + sExtemryn       +"¢Ë"    // ¿ÜºÎ ¿µ»óÀÚ·á ÁöÂü¿©ºÎ
                            + sExtemrsaveyn   +"¢Ë"    // ¿ÜºÎ ¿µ»óÀÚ·á ÀúÀå¿©ºÎ È®ÀÎ
                            + sExtemrrtnyn	  +"¢Ë"		// ¿ÜºÎ ¿µ»óÀÚ·á ¹Ýȯ ¿©ºÎ
                            + sBedGrupcd      +"¢Ë"
                            + sCprTims        +"¢Ì";   // Bed±×·ìÄÚµå
            
        model.removenode("/root/send");
        model.makeValue("/root/send/censusinfo",sCensusInfoHeader + sInsertdata );
    }    
    
    // Triage/census »èÁ¦Ãë¼Ò 2008.09.10
    if(pFlag == "patinfoC" ){
                
        var sInsertdata     = "C¢Ë"                    // »óÅÂ
                            + sPid            +"¢Ë"    // µî·Ï¹øÈ£
                            + sOrddd          +"¢Ë"    // Áø·áÀÏÀÚ
                            + sCretno         +"¢Ë"    // »ý¼º¹øÈ£
                            + sIndd           +"¢Ë"    // ÀÔ¿øÀÏÀÚ
                            + sIntm           +"¢Ë"    // ÀÔ¿ø½Ã°£
                            + sElbulbodpatnm  +"¢Ë"    // Àü±¤ÆÇ¿ë ȯÀÚ¸í
                            + sNurscccnts     +"¢Ë"    // °£È£»ç ÀÔ·Â ÁÖÈ£¼Ò
                            + sBedposflag     +"¢Ë"    // Bed À§Ä¡
                            + sOutcureyn      +"¢Ë"    // ¿Ü·¡Ã³Ä¡ ¿©ºÎ
                            + sCpryn          +"¢Ë"    // CPR ¿©ºÎ
                            + sElbulbodcccnts +"¢Ë"    // Àü±¤ÆÇ¿ë ÁÖÈ£¼Ò
                            + sInwaitresncnts +"¢Ë"    // ÀÔ¿øÁö¿ø»çÀ¯³»¿ª
                            + sSkilfact       +"¢Ë"    // remart
                            + sSpcltest       +"¢Ë"    // Ư¼ö°Ë»ç
                            + sBedposflagcd   +"¢Ë"    // bed À§Ä¡ÄÚµå
                            + sBedcd          +"¢Ë"    // ¿ø¹«º´»óÄÚµå
							+ sExtrecyn       +"¢Ë"    // ¿ÜºÎ Àǹ«±â·Ï ÁöÂü¿©ºÎ
                            + sExtrecsaveyn    +"¢Ë"    // ¿ÜºÎ Àǹ«±â·Ï ÀúÀå¿©ºÎ È®ÀÎ
                            + sExtrecrtnyn	  +"¢Ë"		// ¿ÜºÎ Àǹ«±â·Ï ¹Ýȯ ¿©ºÎ
                            + sExtemryn       +"¢Ë"    // ¿ÜºÎ ¿µ»óÀÚ·á ÁöÂü¿©ºÎ
                            + sExtemrsaveyn   +"¢Ë"    // ¿ÜºÎ ¿µ»óÀÚ·á ÀúÀå¿©ºÎ È®ÀÎ
                            + sExtemrrtnyn	  +"¢Ë"		// ¿ÜºÎ ¿µ»óÀÚ·á ¹Ýȯ ¿©ºÎ
                            + sBedGrupcd      +"¢Ì";   // Bed±×·ìÄÚµå
            
        model.removenode("/root/send");
        model.makeValue("/root/send/censusinfo",sCensusInfoHeader + sInsertdata );
    }    
        //20110225 À̼±°æ °æºÏ´ë : ÀÀ±Þ½Ç ±¸¿ª ¸ÖƼüũ
        var rendcd=model.getValue("/root/main/cond/section");
        var chkdata=checkbox1.value;
        var rendcdlist=rendcd.split(" ");
        if (chkdata.substr(0,1) != "-") {
            if (rendcd.length>0) {
                for (var i=0; i<rendcdlist.length;i++) {
                    rendcd=rendcd.replace(" ","','");  
                }
                rendcd="('" + rendcd + "')";
            }
        } else {
            rendcd = "-";    
        }

        var sSrchData   = "";
        var sSrchHeader = "flag¢Ësection¢Ëorddept¢Ëorddrid¢Ì";
        var sSrchData   = model.getValue("/root/main/cond/indschacptstat"   ) +"¢Ë"
                        //+ model.getValue("/root/main/cond/section"          ) +"¢Ë" 
                        + rendcd                                             +"¢Ë" 
                        + model.getValue("/root/main/cond/orddeptcd"        ) +"¢Ë"
                        + model.getValue("/root/main/cond/medispclid"       ) +"¢Ì";
    
        model.makeValue("/root/send/mainsearchinfo", sSrchHeader + sSrchData);
    
        if(submit("TXMNE00101")== true){
            fSaveCallDoc("/chosdd", "/chostm", "/stattm", "0", "R1");        
        }else{
            return;
        }
        
        //---------------------------------------------------------------------------------
        //ER-EICU°£ ±¸¿ª º¯°æÀÌ ÀÌ·ç¾îÁ³À» °æ¿ì °£È£±â·ÏÀ¸·Î ³²±ä´Ù. 2013.10.22 KJS
        //xOldPosflagcd VS sBedposflagcd
        var oldSupCD = xOldPosflagcd.substr(0, 3) ;
        var newSupCD = sBedposflagcd.substr(0, 3) ;
        var recdt = getCurrentDate() + getCurrentTime().substr(0, 4);
        
        if ( xOldPosflagcd != "" && oldSupCD != newSupCD && (oldSupCD == "BDD" || newSupCD == "BDD" || oldSupCD == "BDE" || newSupCD == "BDE" || oldSupCD == "BDT" || newSupCD == "BDT") ) {
        	fSetNrRecord ("move", oldSupCD, newSupCD, recdt);
        }
        
        //---------------------------------------------------------------------------------
        
				//alert(sSrchToolStatus);
				// ÀúÀåÈÄ ÀçÁ¶È¸
				//fSearchPatienInfo("ec");
				fSeletedSrcTool();
        
        
        fButtonSettion("A");
        grd_patlist.refresh();
        
        var iRow = grd_patlist.rows;
        var cRow = "";
        
        for( i = 1 ; i < iRow + 1 ; i++ ){
            if ( model.getValue("/root/main/ercensuslist/erpatientlist["+ i +"]/pid" ) == sPid){
                cRow = i;
            }
        }
        
        if(cRow == "" ){
            return;
        }else{
            grd_patlist.row = cRow;
            grd_patlist.topRow = cRow;
          }
          
        
}


    
/**
 * @group  :
 * @ver    : 2007.06.07
 * @by     : ¾çõ´ö
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : »ç¿ëÀÚ Á¶È¸popup
 * @param  :
 * @return :
 * @---------------------------------------------------
 */     
function fUserEnter(pPath, pNodeID,pNodeNM, pNodeDept, pNodeDeptNM, pDOC, pFlag) {
    
         var pParam = fUseridPopupData("TRMNE00105","SMMNE00101", pDOC, pFlag);
         //var pParam = fUseridPopupData("TRMNE00105","SMMNE00101", pDOC);
         fUserDataSet(pParam, pPath+pNodeID,pPath+pNodeNM, pPath+pNodeDept, pPath+pNodeDeptNM, pDOC);
}      


function fUseridPopup(pPath, pNodeID, pNodeNM, pNodeDept, pNodeDeptNM, pDOC, pFlag) {
         
         var pParam = fShowModal("SMMNE00101", pFlag);  
         fUserDataSet(pParam, pPath+pNodeID,pPath+pNodeNM, pPath+pNodeDept, pPath+pNodeDeptNM, pDOC);

}
 
 function fUseridFlag(pFlag){
        setParameter("SPMNE00101_Param", pFlag);     
 }
 
 function fGetValue(node, row, element) {
     
        var rtnValue = model.getValue(node + "[" + row + "]/" + element);
        return rtnValue;
}


/**
 * @group  :
 * @ver    : 2007.06.07
 * @by     : ¾çõ´ö
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : »ç¿ëÀÚ Á¶È¸popup
 * @param  :
 * @return :
 * @---------------------------------------------------
 */ 
function fUseridPopupData(pMapID, pProgID, pData, pFlag) {

     var iParam="";

     if (pData == "") {
            return iParam;
     }       

     model.removenode("/root/send");
     model.makeValue("/root/send/searchitem", pData);
     model.makeValue("/root/send/flag"      , "all");    
     model.makeValue("/root/send/srchflag"  , pFlag);

     submit(pMapID);

     var NodeCnt = instance1.selectSingleNode(xPathUser).childNodes.length;
     var iNode   = xPathUser + "/userlist";

     switch(NodeCnt) {
       case 0 : messageBox(pData + "¿¡ ÇØ´çÇÏ´Â ÀÚ·á°¡", "I004"); 
                break;
       case 1 : iParam = fGetValue(iNode, 1, "userid"   ) + "|"
                       + fGetValue(iNode, 1, "usernm"   ) + "|"
                       + fGetValue(iNode, 1, "posinstnm") + "|"
                       + fGetValue(iNode, 1, "posinstcd") + "|"
                       + fGetValue(iNode, 1, "posdeptnm") + "|"
                       + fGetValue(iNode, 1, "posdeptcd")      ;              
                break;
      default : iParam =  fShowModal(pProgID, pFlag);
     }
     
     return iParam;
}      
  
  
function fShowModal(pProgID, pFlag) {  

   var xpos = event.screenX-100;
   var ypos = event.screenY-100;
   
   fUseridFlag(pFlag);
   modal(pProgID, 1, xpos, ypos,pProgID, xPathUser, xPathUserPop);  

   var iProperties  = getParameter("SendData"); 
   
   return iProperties
} 

function fUserDataSet(pData, pNodeID,pNodeNM, pNodeDept, pNodeDeptNM, pDoc, pFlag) {

    var iSplit_Value = pData.split("|");
                 
    if (pData == "") {
        model.setValue(pNodeNM, iSplit_Value[1]);
        model.setValue(pNodeDeptNM, iSplit_Value[4]);
            
        return; 
    }      
    
    // iParam_userid    0 »ç¿ëÀÚID
    // iParam_usernm    1 »ç¿ëÀÚ¸í
    // iParam_posinstnm 2 ¼Ò¼Ó±â°ü¸í
    // iParam_posinstcd 3 ¼Ò¼Ó±â°üÄÚµå
    // iParam_posdeptnm 4 ¼Ò¼ÓºÎ¼­¸í
    // iParam_posdeptcd 5 ¼Ò¼ÓºÎ¼­ÄÚµå

    
    if (iSplit_Value.length > 0)  {
        model.setValue(pNodeID, iSplit_Value[0]);           // »ç¿ëÀÚID   
        model.setValue(pNodeNM, iSplit_Value[1]);           // »ç¿ëÀÚ¸í   
           
        if (pNodeDept !="") {
            model.setValue(pNodeDeptNM, iSplit_Value[4]);  // ¼Ò¼ÓºÎ¼­¸í 
            model.setValue(pNodeDept  , iSplit_Value[5]);  // ¼Ò¼ÓºÎ¼­ÄÚµå   
               
        }  
    }    
}      
 

/**
 * @group  :
 * @ver    : 2007.07.03
 * @by     : ¾çõ´ö
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : Á¶È¸Á¶°Ç ÄÞº¸ µ¥ÀÌÅÍ ¼ÂÆÃ
 * @param  :
 * @return :
 * @---------------------------------------------------
 */ 
  
function fSelctionOutRmCombo(){
    
    model.removeNodeset("/root/hidden/item");
    
    for(i=1; i <= getNodesetCount("/root/init/erbaselist/outrminfo");i++ ) {
        model.makeValue("/root/hidden/item["+i+"]/label", model.getValue("/root/init/erbaselist/outrminfo["+i+"]/typenm")    );
        model.makeValue("/root/hidden/item["+i+"]/value", model.getValue("/root/init/erbaselist/outrminfo["+i+"]/basetypecd"));
    }
}
        
        
/**
 * @group  :
 * @ver    : 2007.07.03
 * @by     : ¾çõ´ö
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : Åð¿øÃë¼Ò ºÎºÐ
 * @param  :
 * @return :
 * @---------------------------------------------------
 */ 
function fOutrmCancel(xCancelpath, fVisitno){
    
    if(model.getValue("/root/main/cond/indschacptstat") == "3"){
        messageBox("Åð¿øȯÀÚ´Â Åð½Ç Ãë¼Ò¸¦", "E001");
        return;
    }

    if(model.getValue("/root/main/ercensusinfo/patinfo/revisit1") == "Y" && fVisitno == "0"){
        messageBox("Revisit1 ³»¿ªÀÌ ÀÖ¾î Åð½Ç Ãë¼Ò¸¦", "E001");
        return;
    }
    
    if(model.getValue("/root/main/ercensusinfo/patinfo/revisit2") == "Y" && fVisitno == "1"){
        messageBox("Revisit2 ³»¿ªÀÌ ÀÖ¾î Åð½Ç Ãë¼Ò¸¦", "E001");
        return;
    }
    
    var jPid     = model.getValue("/root/main/ercensusinfo/patinfo/pid");             // µî·Ï¹øÈ£
    var jIndd    = model.getValue("/root/main/ercensusinfo/patinfo/indd");            // ÀÔ¿øÀÏÀÚ
    var jCretno  = model.getValue("/root/main/ercensusinfo/patinfo/cretno");          // »ý¼º¹øÈ£
    
    model.removenode("/root/send/judginfo");
    model.makeValue("/root/send/judginfo/pid", jPid);
    model.makeValue("/root/send/judginfo/indd", jIndd);
    model.makeValue("/root/send/judginfo/cretno", jCretno);
    submit("TRMNE00113");
    
    var jJudginfo = model.getValue("/root/judginfo/dschjudgprcsstat");
    if (jJudginfo != "A") {
    	messageBox("   ½É»ç»óŸ¦ ÇØÁ¦ÇÏ°í Åð½ÇÃë¼Ò¸¦ ÁøÇàÇϼ¼¿ä.\r\n\r\n" +
    						 "¡Ø ÀÏ°ú½Ã°£ Áß - ½É»ç½Ç·Î ¿¬¶ô, ÀÏ°ú½Ã°£ ¿Ü - ÀÀ±Þ¼ö³³À¸·Î ¿¬¶ô", "E999");
    	return;
    }
    	
    if(model.getValue(xCancelpath)    == "" ) {
        messageBox("Åð¿ø ³»¿ªÀÌ", "I004");
    } else {
        var vbYes = messageBox("Åð½ÇÃë¼Ò¸¦ ", "Q004");
            
        if(vbYes == 6){
            var sPid     = model.getValue("/root/main/ercensusinfo/patinfo/pid");             // µî·Ï¹øÈ£
            var sIndd    = model.getValue("/root/main/ercensusinfo/patinfo/indd");            // ÀÔ¿øÀÏÀÚ
            var sCretno  = model.getValue("/root/main/ercensusinfo/patinfo/cretno");          // »ý¼º¹øÈ£            
            var sVistno  = fVisitno ;                                                         // visitno
            //byCY revisit ¿©ºÎüũ
            if(model.getValue("/root/main/ercensusinfo/patinfo/revisit1")=='Y' ||model.getValue("/root/main/ercensusinfo/patinfo/revisit2")=='Y' ) {
                model.makeValue("/root/send/ourrmcancel/revisit","Y");
                var sRevisit = model.getValue("/root/send/ourrmcancel/revisit");            
            }
            //byCY            
            var sCensusInfoHeader = "pid¢Ëindd¢Ëcretno¢Ërevisit¢Ëvisitno¢Ì"
            
            var sCancelData = sPid    + "¢Ë"
                            + sIndd   + "¢Ë"
                            + sCretno + "¢Ë"
                            + sRevisit + "¢Ë"
                            + sVistno + "¢Ì";
                            
            model.removenode("/root/send");
            model.makeValue("/root/send/ourrmcancel",sCensusInfoHeader + sCancelData );
            
            messageBox("Åð½ÇÁ¤¸®½Ã ÀÚµ¿À¸·Î ±â·ÏµÈ °£È£±â·ÏÀÌ Á¸ÀçÇÏ¿À´Ï »èÁ¦ÇÏ¿© Áֽñ⠹ٶø´Ï´Ù.", "I");
            
            
            if(submit("TXMNE00103") == true){
                model.removenode("/root/send");
                
                //20110225 À̼±°æ °æºÏ´ë : ÀÀ±Þ½Ç ±¸¿ª ¸ÖƼüũ
                var rendcd=model.getValue("/root/main/cond/section");
                var chkdata=checkbox1.value;
                var rendcdlist=rendcd.split(" ");
                if (chkdata.substr(0,1) != "-") {
                    if (rendcd.length>0) {
                        for (var i=0; i<rendcdlist.length;i++) {
                            rendcd=rendcd.replace(" ","','");  
                        }
                        rendcd="('" + rendcd + "')";
                    }
                } else {
                    rendcd = "-";    
                }

                var sSrchHeader = "flag¢Ëorddept¢Ëorddrid¢Ësection¢Ì";
                        var sSrchData   = model.getValue("/root/main/cond/indschacptstat") +"¢Ë"
                                + model.getValue("/root/main/cond/orddeptcd") +"¢Ë"
                                + model.getValue("/root/main/cond/medispclid") +"¢Ë"
                                //+ model.getValue("/root/main/cond/section") +"¢Ì";
                                + rendcd + "¢Ì";

                        model.makeValue("/root/send/mainsearchinfo", sSrchHeader + sSrchData);
                 fInitNode(sSrchToolStatus);
              model.makeNode("/root/send/reqcensus");
              
              submit("TRMNE00103");
              fButtonSettion("A");
              model.refresh();
            } 
        } else {
            return;
        }
    }
}
        
/**
 * @group  :
 * @ver    : 2007.07.03
 * @by     : ¾çõ´ö
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : È£ÃâÀÇ»ç »èÁ¦ ºÎºÐ
 * @param  :
 * @return :
 * @---------------------------------------------------
 */ 
function fDelCallDoc(xPathDelCallDoc, sDelCheckRow, sRows,  sVisit, sBtnSet ){
    if(model.getValue(xPathDelCallDoc+"["+sRows+"]/main") == "Y"){
        messageBox("Main Áø·á°ú´Â »èÁ¦ÇÒ ¼ö ¾ø½À´Ï´Ù.","E");
        return;
    }
    
    if(sRows== "1"){
        messageBox("»èÁ¦ÇÒ µ¥ÀÌÅÍ°¡",  "I004");
        return;
    } else {
        if(model.getValue(xPathDelCallDoc+"["+sDelCheckRow+"]/status") == "I"){
            fDelGridRow(sVisit, sDelCheckRow );
            return;
        } else {
            if ( sDelCheckRow != null  || sDelCheckRow != "" ){
                var vbYes = messageBox("µ¥ÀÌÅ͸¦ ", "Q001");
            
                if (vbYes == 6) {
                    sPid         = model.getValue(xPathDelCallDoc+"["+sDelCheckRow+"]/pid"        );
                    sIndd        = model.getValue(xPathDelCallDoc+"["+sDelCheckRow+"]/indd"       );
                    sCretno      = model.getValue(xPathDelCallDoc+"["+sDelCheckRow+"]/cretno"     );
                    sVisitno     = model.getValue(xPathDelCallDoc+"["+sDelCheckRow+"]/visitno"    );
                    sInstcd      = model.getValue(xPathDelCallDoc+"["+sDelCheckRow+"]/instcd"     );
                    sErorddoctcd = model.getValue(xPathDelCallDoc+"["+sDelCheckRow+"]/erorddoctcd");
                    sCallno      = model.getValue(xPathDelCallDoc+"["+sDelCheckRow+"]/callno"     );
                    sRefseq      = model.getValue(xPathDelCallDoc+"["+sDelCheckRow+"]/refseq"     );
                    
                    var sCallVisitSaveHeader = "status¢Ëpid¢Ëindd¢Ëcretno¢Ëvisitno¢Ëinstcd¢Ëerorddoctcd¢Ëcallno¢Ërefseq¢Ì";
                            
                    var sCallVisitSaveData    = "D¢Ë"
                                              + sPid         +"¢Ë"      // µî·Ï¹øÈ£
                                              + sIndd        +"¢Ë"      // ÀÔ¿øÀÏÀÚ
                                              + sCretno      +"¢Ë"
                                              + sVisitno     +"¢Ë"
                                              + sInstcd      +"¢Ë"
                                              + sErorddoctcd +"¢Ë"
                                              + sCallno      +"¢Ë"
                                              + sRefseq      +"¢Ì";
    
                    model.removenode("/root/send");
                    model.makeValue("/root/send/calldocinfo", sCallVisitSaveHeader + sCallVisitSaveData);
                    model.makeValue("/root/send/cond",sCallVisitSaveHeader + sCallVisitSaveData );
                    
                    if(sBtnSet != ""){
                        fButtonSettion(sBtnSet);
                    }
                  
                    submit("TXMNE00102");
                  //model.refresh();
                    fInputRefresh();
                                    //fDelGridRow(sVisit, sDelCheckRow );
    
                } else {
                    return;
                }
            }
        }    
    }                     
}
         
/**
 * @group  :
 * @ver    : 2007.07.03
 * @by     : ¾çõ´ö
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : È£ÃâÀÇ»ç »èÁ¦ ºÎºÐ(¼±Åà ±×¸®µå row»èÁ¦)
 * @param  :
 * @return :
 * @---------------------------------------------------
 */          
function fDelGridRow(pFlag, pRow){
    if(pFlag == "0") {
        grd_calldoc1.deleteRow(pRow);
    } else if(pFlag == "1") {
        grd_calldoc2.deleteRow(pRow);
    } else if(pFlag == "2") {
        grd_calldoc3.deleteRow(pRow);
    }
}
    
/**
 * @group  :
 * @ver    : 2007.07.03
 * @by     : ¾çõ´ö
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : ¹æ¹®ÀÏÁö ¼öÁ¤ ºÎºÐ
 * @param  :
 * @return :
 * @---------------------------------------------------
 */          
function fSetCallDoc(sNode1, sNode2, sNode3, sVisit, sBtnSet){
    
        xPathSetCallDoc = "/root/main/ercensusinfo/patinfo";
        
        if ( model.getValue(xPathSetCallDoc + sNode3) == "" ){
                messageBox("¼öÁ¤ÇÒ ¼ö ¾ø½À´Ï´Ù.", "E");
                return;
        }
        
        if( sVisit == "0" && 
        model.getValue(xPathSetCallDoc+ "/revisit1stattm") == "" && 
        model.getValue(xPathSetCallDoc+ "/revisit1") =="Y" ){
            messageBox("Revisit ÀúÀåÀ» ¸ÕÀú ½ÇÇàÇϽʽÿä","E");
            return;
    }
    if ( sVisit == "1" &&
          model.getValue(xPathSetCallDoc+ "/revisit2stattm") == "" && 
        model.getValue(xPathSetCallDoc+ "/revisit2") =="Y" ){
            messageBox("Revisit ÀúÀåÀ» ¸ÕÀú ½ÇÇàÇϽʽÿä","E");
            return;
    }
        
    var sPid     = model.getValue(xPathSetCallDoc+"/pid"   );
    var sIndd    = model.getValue(xPathSetCallDoc+"/indd"  );
    var sCretno  = model.getValue(xPathSetCallDoc+"/cretno");
    var sVisitno = sVisit;

    // ÀÔ·Â Çʵå(ER¹æ¹®ÀÏÁö)
    sChosdd = model.getValue(xPathSetCallDoc+sNode1);
    sChostm = model.getValue(xPathSetCallDoc+sNode2);        
    
    var sCallVisitSaveHeader = "stat¢Ëpid¢Ëindd¢Ëcretno¢Ëvisitno¢Ëchosdd¢Ëchostm¢Ì";
            
    var sCallVisitSaveData   = "U¢Ë"
                             + sPid     +"¢Ë"           // µî·Ï¹øÈ£
                             + sIndd    +"¢Ë"           // ÀÔ¿øÀÏÀÚ
                             + sCretno  +"¢Ë"
                             + sVisitno +"¢Ë"
                             + sChosdd  +"¢Ë"
                             + sChostm  +"¢Ì";

    model.removenode("/root/send");
    model.makeValue("/root/send/chosinfo", sCallVisitSaveHeader + sCallVisitSaveData);
    
    //fGridUpdateSeleced(sVisit);
    
    model.makeValue("/root/send/cond",sCallVisitSaveHeader + sCallVisitSaveData );

    if(sBtnSet != ""){
        fButtonSettion(sBtnSet);
    }
    
    submit("TXMNE00102");
    fInputRefresh();

    fGridRebuild(sVisit);                        
    
    //---------------------------------------------------------------------------------
    //ÃÖÃÊ ÀÔ½Ç ±â·ÏÀÌ ¾øÀ» °æ¿ì °£È£±â·ÏÀ» ¹ß»ý½ÃŲ´Ù. 2013.10.22 KJS
    var sRecdt = sChosdd + sChostm.substr(0, 4);
    model.removenode("/root/send/recinfo");
    model.makeValue("/root/send/recinfo/pid", sPid);
    model.makeValue("/root/send/recinfo/indd", sIndd);
    model.makeValue("/root/send/recinfo/cretno", sCretno);
    model.makeValue("/root/send/recinfo/recdt", sRecdt);
    
    if (submit("TRMNE00112")) {
    	var reccnt = model.getValue("/root/init/recinfo/recinfo/reccnt");
    	var bedpos = model.getValue("/root/main/ercensusinfo/patinfo/bedposflagcd").substr(0, 3);

    	if (reccnt == 0) {
    		fSetNrRecord ("new", "", bedpos, sRecdt);
    	}
    }
}
         
/**
 * @group  :
 * @ver    : 2007.07.03
 * @by     : ¾çõ´ö
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : ¹æ¹®ÀÏÁö ÀúÀå ºÎºÐ
 * @param  :
 * @return :
 * @---------------------------------------------------
 */  
function fSaveCallDoc(sNode1, sNode2, sNode3, sVisit, sBtnSet){
    xPathSaveCallDoc = "/root/main/ercensusinfo/patinfo";
    
    if( sVisit == "0" && 
        model.getValue(xPathSaveCallDoc+ "/revisit1stattm") == "" && 
        model.getValue(xPathSaveCallDoc+ "/revisit1") =="Y" ){
            messageBox("Revisit ÀúÀåÀ» ¸ÕÀú ½ÇÇàÇϽʽÿä","E");
            return;
    }
    if ( sVisit == "1" &&
          model.getValue(xPathSaveCallDoc+ "/revisit2stattm") == "" && 
        model.getValue(xPathSaveCallDoc+ "/revisit2") =="Y" ){
            messageBox("Revisit ÀúÀåÀ» ¸ÕÀú ½ÇÇàÇϽʽÿä","E");
            return;
    }
    
    
    var sPid     = model.getValue(xPathSaveCallDoc+"/pid"   );
    var sIndd    = model.getValue(xPathSaveCallDoc+"/indd"  );
    var sCretno  = model.getValue(xPathSaveCallDoc+"/cretno");
    var sVisitno = sVisit;

    // ÀÔ·Â Çʵå(ER¹æ¹®ÀÏÁö)
    sChosdd = model.getValue(xPathSaveCallDoc+sNode1);
    sChostm = model.getValue(xPathSaveCallDoc+sNode2);                 
    
    var sChosddCheck = model.getValue(xPathSaveCallDoc+sNode1);
    if ( sChosddCheck == null  || sChosddCheck == "" ){
        messageBox("³»¿øÀϽôÂ", "I003");
        if ( sVisitno == "0"){
            model.setFocus("int_chosdd1");
        }else if ( sVisitno == "1"){
              model.setFocus("int_chosdd2");
        }else if ( sVisitno == "2"){
            model.setFocus("int_chosdd3");
        }
        return;
    }        
    
    if(sVisit == "1"){
        var outrmdt = model.getValue("/root/main/ercensusinfo/patinfo/outrmdt");
        var rechosdt = model.getValue("/root/main/ercensusinfo/patinfo/revisit1chosdd") 
                     + model.getValue("/root/main/ercensusinfo/patinfo/revisit1chostm") ;
        if( outrmdt > rechosdt ){
            messageBox("³»¿øÀϽð¡ ÀÌÀü ¹æ¹® Åð½ÇÀϽà º¸´Ù ÀÌÀüÀÔ´Ï´Ù. \n³»¿øÀϽø¦ Á¤È®ÇÏ°Ô ÀÔ·ÂÇϽʽÿä","I");
            model.setFocus("int_chosdd2");
            return;
        }
    }
        
    if(sVisit == "2"){
        var outrmdt = model.getValue("/root/main/ercensusinfo/patinfo/revisit1outrmdt");
        var rechosdt = model.getValue("/root/main/ercensusinfo/patinfo/revisit2chosdd") 
                     + model.getValue("/root/main/ercensusinfo/patinfo/revisit2chostm") ;
        if( outrmdt > rechosdt ){
            messageBox("³»¿øÀϽð¡ ÀÌÀü ¹æ¹® Åð½ÇÀϽà º¸´Ù ÀÌÀüÀÔ´Ï´Ù. \n³»¿øÀϽø¦ Á¤È®ÇÏ°Ô ÀÔ·ÂÇϽʽÿä","I");
            model.setFocus("int_chosdd3");
            return;
        }
    }    
    
    
    model.removenode("/root/send");         

    var sCallVisitSaveHeader = "stat¢Ëpid¢Ëindd¢Ëcretno¢Ëvisitno¢Ëchosdd¢Ëchostm¢Ì";
            
    var sCallVisitSaveData   = "I¢Ë"
                             + sPid     +"¢Ë"    // µî·Ï¹øÈ£
                             + sIndd    +"¢Ë"    // ÀÔ¿øÀÏÀÚ
                             + sCretno  +"¢Ë"
                             + sVisitno +"¢Ë"
                             + sChosdd  +"¢Ë"
                             + sChostm  +"¢Ì";
    
    if ( model.getValue(xPathSaveCallDoc+sNode1) != "" ) {
        if(model.getValue(xPathSaveCallDoc+sNode3) == "" ) { 
            model.makeValue("/root/send/chosinfo", sCallVisitSaveHeader + sCallVisitSaveData);
        }
    }     
    
    //fGridUpdateSeleced(sVisit);
    model.makeValue("/root/send/cond",sCallVisitSaveHeader + sCallVisitSaveData );
    var chkStattm = model.getValue(xPathSaveCallDoc + sNode3);
    
    if(submit("TXMNE00102") == true ){
    	
				// RevisitÀÇ °æ¿ì¿¡ OLDOUTRMDD, TMÀ» UpdateÇØÁØ´Ù.  2012.07.27 KJS
				if(sVisit != "0"){
					submit("TXMNE00105");						
				}
				
        if ( model.getValue("/root/main/cond/indschacptstat")  == "2" && chkStattm == "" ){

            //20110225 À̼±°æ °æºÏ´ë : ÀÀ±Þ½Ç ±¸¿ª ¸ÖƼüũ
            var rendcd=model.getValue("/root/main/cond/section");
            var chkdata=checkbox1.value;
            var rendcdlist=rendcd.split(" ");
            if (chkdata.substr(0,1) != "-") {
                if (rendcd.length>0) {
                    for (var i=0; i<rendcdlist.length;i++) {
                        rendcd=rendcd.replace(" ","','");  
                    }
                    rendcd="('" + rendcd + "')";
                }
            } else {
                rendcd = "-";    
            }

          var sSrchHeader = "flag¢Ëorddept¢Ëorddrid¢Ësection¢Ì";
                var sSrchData   = model.getValue("/root/main/cond/indschacptstat")  +"¢Ë"
                              + model.getValue("/root/main/cond/orddeptcd")         +"¢Ë"
                               + model.getValue("/root/main/cond/medispclid")        +"¢Ë"
                                //+ model.getValue("/root/main/cond/section")           +"¢Ì";
                                + rendcd + "¢Ì";
                                
          fInitNode(sSrchToolStatus);
                model.makeValue("/root/send/mainsearchinfo", sSrchHeader + sSrchData);
                model.makeNode("/root/send/reqcensus");
                    submit("TRMNE00103");            
          }
      }
    
    if(sBtnSet != ""){
        fButtonSettion(sBtnSet);
    }
    
    fInputRefresh();
    fGridRebuild(sVisit);
    
    //---------------------------------------------------------------------------------
    //ÃÖÃÊ ÀÔ½Ç ±â·ÏÀÌ ¾øÀ» °æ¿ì °£È£±â·ÏÀ» ¹ß»ý½ÃŲ´Ù. 2013.10.22 KJS
    var sRecdt = sChosdd + sChostm.substr(0, 4);
    model.removenode("/root/send/recinfo");
    model.makeValue("/root/send/recinfo/pid", sPid);
    model.makeValue("/root/send/recinfo/indd", sIndd);
    model.makeValue("/root/send/recinfo/cretno", sCretno);
    model.makeValue("/root/send/recinfo/recdt", sRecdt);
    
    if (submit("TRMNE00112")) {
    	var reccnt = model.getValue("/root/init/recinfo/recinfo/reccnt");
    	var bedpos = model.getValue("/root/main/ercensusinfo/patinfo/bedposflagcd").substr(0, 3);

    	if (reccnt == 0) {
    		fSetNrRecord ("new", "", bedpos, sRecdt);
    	}
    }
    
}
         
/**
 * @group  :
 * @ver    : 2007.06.07
 * @by     : ¾çõ´ö
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : È£ÃâÀÇ»ç ¼öÁ¤ ºÎºÐ
 * @param  :
 * @return :
 * @---------------------------------------------------
 */ 
function fGridUpdateSeleced(pFlag){
        var checkvalue = "I";
    if(pFlag == "0"){
        var rRow1 = grd_calldoc1.rows;
        for(i=1 ; i < rRow1 ; i ++ ) {
            if(model.getValue("/root/main/ercensusinfo/erorddrlist["+ i +"]/status") == "S"){
                checkvalue = "S";
            }
        }
        
        if(checkvalue == "I"){
             if(rRow1 !=  1) {
             for(i=1 ; i < rRow1 ; i++){
                   model.setValue("/root/main/ercensusinfo/erorddrlist["+ i +"]/refseq", i);
             }
         }
        }
        
      model.makeValue("/root/send/calldocinfo", grd_calldoc1.getUpdateDataAll("i"));
      
    } else if(pFlag == "1"){
        var rRow2 = grd_calldoc2.rows;
        for(i=1 ; i < rRow2 ; i ++ ) {
            if(model.getValue("/root/main/ercensusinfo/erorddrlist1["+ i +"]/status") == "S"){
                checkvalue = "S";
            }
        }
        if(checkvalue == "I"){
           if(rRow2 !=  1) {
            for(i=1 ; i < rRow2 ; i++){
                  model.setValue("/root/main/ercensusinfo/erorddrlist1["+ i +"]/refseq", i);
            }
         }    
        }
      model.makeValue("/root/send/calldocinfo", grd_calldoc2.getUpdateDataAll("i")); 
      
    } else if(pFlag == "2"){
        var rRow3 = grd_calldoc3.rows;
        for(i=1 ; i < rRow3 ; i ++ ) {
            if(model.getValue("/root/main/ercensusinfo/erorddrlist2["+ i +"]/status") == "S"){
                checkvalue = "S";
            }
        }
        if(checkvalue == "I"){
           if(rRow3 !=  1) {
            for(i=1 ; i < rRow3 ; i++){
                  model.setValue("/root/main/ercensusinfo/erorddrlist2["+ i +"]/refseq", i);
            }
         }    
        }
      model.makeValue("/root/send/calldocinfo", grd_calldoc3.getUpdateDataAll("i")); 
    }             
}

/**
 * @group  :
 * @ver    : 2007.06.07
 * @by     : ¾çõ´ö
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : È£ÃâÀÇ»ç ±×¸®µå ÃʱâÈ­
 * @param  :
 * @return :
 * @---------------------------------------------------
 */ 
function fGridRebuild(pFlag){
    if(pFlag == "0"){                            
        grd_calldoc1.rebuild();        
    } else if(pFlag == "1"){
        grd_calldoc2.rebuild();                                
    } else if(pFlag == "2"){                        
        grd_calldoc3.rebuild();
    }                
}
                
/**
 * @group  :
 * @ver    : 2007.07.03
 * @by     : ¾çõ´ö
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : Revisit ¼³Á¤ ºÎºÐ ó¸®
 * @param  :
 * @return :
 * @---------------------------------------------------
 */      
 
function fRevisitSeting(sPath1, sNode1, sNode2, sVisit){
		model.removeNodeset("/root/temp/calldoclist/calldocinfo");
		xPathRevisitSeting = "/root/main/ercensusinfo/patinfo";
      
		if(model.getValue("/root/main/cond/indschacptstat") == "3"){
				messageBox("Åð¿øȯÀÚ´Â Revisit 󸮸¦", "E001");
				model.setValue(xPathRevisitSeting+sNode2, "N");
				if(sVisit == "1"){
						chk_revisit1.refresh();
				}else if (sVisit == "2"){
						chk_revisit2.refresh();
				}
				return;
		}

    var sPid     = model.getValue(xPathRevisitSeting+"/pid"   );       // µî·Ï¹øÈ£
    var sIndd    = model.getValue(xPathRevisitSeting+"/indd"  );       // ÀÔ¿øÀÏÀÚ
    var sCretno  = model.getValue(xPathRevisitSeting+"/cretno");       // »ý¼º¹øÈ£
    var sVistno  = sVisit; 
    var sOutrmdt = model.getValue(xPathRevisitSeting+sNode1);             

    var sCensusInfoHeader = "pid¢Ëindd¢Ëcretno¢Ëvisitno¢Ëoutrmdt¢Ì"
    
    var sCancelData       = sPid     + "¢Ë"
                          + sIndd    + "¢Ë"
                          + sCretno  + "¢Ë"
                          + sVistno  + "¢Ë"
                          + sOutrmdt + "¢Ì";    
                          
//byCY RevisitȯÀÚ Ã³¸®½Ã ´çÀÏ·Î Blocking 
    var sRevisitdd = getCurrentDate();   //ÇöÀçÀÏÀÚ    
    var sOutrmdd = sOutrmdt.substr(0,8); //Åð¿øÀÏÀÚ
    if(sRevisitdd != sOutrmdd) {
        chk_revisit1.value = 'N';
        chk_revisit1.refresh();
        messageBox("Åð¿øÀÏÀÌ ´çÀÏÀÎ °æ¿ì¸¸ REVISITó¸® °¡´ÉÇÕ´Ï´Ù.", "I");
        return;
    }
//byCY
                            
    if( model.getValue(xPathRevisitSeting + sNode2) == "Y" ) {
                                                
        var vbYes = messageBox("Revisit 󸮸¦ ", "Q004");
        
        if(vbYes == 6){

            model.removenode("/root/send");
            model.makeValue("/root/send/serchcalldoc",sCensusInfoHeader + sCancelData );   
                
            if(submit("TRMNE00106") == true ){
                    
                    for(i=0 ; i < getNodesetCount("/root/temp/calldoclist/calldocinfo") ; i++){
                        model.makeNode(sPath1+"["+(i+1)+"]");
                        model.copyNode(sPath1+"["+(i+1)+"]","/root/temp/calldoclist/calldocinfo["+(i+1)+"]");        
                    }
                model.refresh();
                
                if(sVisit == "1"){
                    int_chosdd2.value = getCurrentDate(); 
                    int_chostm2.value = getCurrentTime().substr(0,4) ;
                    int_chosdd2.disabled = false;
                    int_chostm2.disabled =  false;
                    btn_addrow2.disabled =  false;
                    btn_delrow2.disabled =  false;
                    btn_introw2.disabled =  false;
                    btn_updtrow2.disabled =  false;
                    btn_saverow2.disabled =  false;                                                
                } else if (sVisit == "2"){
                    int_chosdd3.value = getCurrentDate(); 
                    int_chostm3.value = getCurrentTime().substr(0,4) ;
                    int_chosdd3.disabled = false;
                    int_chostm3.disabled = false;
                    btn_introw3.disabled = false;
                    btn_delrow3.disabled = false;
                    btn_addrow3.disabled = false;
                    btn_saverow3.disabled = false;
                    btn_updtrow3.disabled = false;
                }
            
            } else {
                model.setValue(xPathRevisitSeting+sNode2, "N");
                if(sVisit == "1"){
                    chk_revisit1.refresh();
                }else if (sVisit == "2"){
                    chk_revisit2.refresh();
                }
                return;
            }
        } else {
            model.setValue(xPathRevisitSeting+sNode2, "N");
            if(sVisit == "1"){
              chk_revisit1.refresh();
          }else if (sVisit == "2"){
              chk_revisit2.refresh();
          }
          return;
        }
            
    } else {
        
        if( (sVisit == "1" && model.getValue("/root/main/ercensusinfo/patinfo/revisit1stattm") != "") ||
            (sVisit == "2" && model.getValue("/root/main/ercensusinfo/patinfo/revisit2stattm") != "")  ){
            messageBox("Revisit Ãë¼Ò 󸮸¦", "E001");
            return;
        }
                        
        var vbYes = messageBox("Revisit Ãë¼Ò 󸮸¦ ", "Q004");
        
        if(vbYes == 6){

            model.removenode(sPath1);
            
            if(sVisit == "1"){                                        
                int_chosdd2.value = "";
                int_chostm2.value = "";
                
                int_chosdd2.disabled = true;
                int_chostm2.disabled = true;
                btn_addrow2.disabled = true;
                btn_delrow2.disabled = true;
                btn_introw2.disabled = true;
                btn_updtrow2.disabled = true;
                btn_saverow2.disabled = true;
                
            } 
            
            if (sVisit == "2"){                                            
                int_chosdd3.value = "";
                int_chostm3.value = "";
                
                int_chosdd3.disabled = true;
                int_chostm3.disabled = true;
                btn_introw3.disabled = true;
                btn_delrow3.disabled = true;
                btn_addrow3.disabled = true;
                btn_saverow3.disabled = true;
                btn_updtrow3.disabled = true;
            }
        } else {
            model.setValue(xPathRevisitSeting + sNode2, "Y");
                if(sVisit == "1"){
                    chk_revisit1.refresh();
                }else if (sVisit == "2"){
                    chk_revisit2.refresh();
                }
            return;
        }
    }            
}
    
/**
 * @group  :
 * @ver    : 2007.07.03
 * @by     : ¾çõ´ö
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : È£ÃâÀÇ»ç Call, Visit Time Á¦ÇÑ
 * @param  :
 * @return :
 * @---------------------------------------------------
 */     
function fCallVisitTimeSet(pPath, pNode, pRow){
    var crtDate = getCurrentDate();
    var chkop = "D";
    var chkDate = model.getValue(pPath + "["+pRow+"]" + pNode).substr(0,8) ;
    var chkTime = model.getValue(pPath + "["+pRow+"]" + pNode).substr(8,4) ;
    
    if(isValidDateTime(chkDate, "YYYYMMDD") == false){
        chkop = "C";
        model.setValue(pPath + "["+pRow+"]" + pNode, crtDate +""+ chkTime);
        messageBox("±â·Ï ÀÏÀÚ°¡ À¯È¿ÇÏÁö","E007");    
    }
    if(isValidDateTime(chkTime, "hhmm") == false){
        if(chkop== "C"){
            model.setValue(pPath + "["+pRow+"]" + pNode, crtDate + "" + getCurrentTime.substr(0,4));
        }else{
            model.setValue(pPath + "["+pRow+"]" + pNode, chkDate + "" + getCurrentTime.substr(0,4));
        }
     messageBox("±â·Ï ½Ã°£ÀÌ À¯È¿ÇÏÁö","E007");    
    }
}
    
/**
 * @group  :
 * @ver    : 2007.07.03
 * @by     : ¾çõ´ö
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : ÁÖÁø·á°ú º¯°æ ºÎºÐ
 * @param  :
 * @return :
 * @---------------------------------------------------
 */  
 function fChangMainOdrdept(xPathChangeRow, pRow, pVisitno){

    var chgrow = "";
    j =0;
    
    if( (pVisitno == "0" && model.getValue("/root/main/ercensusinfo/patinfo/stattm"        ) == "" ) || 
        (pVisitno == "1" && model.getValue("/root/main/ercensusinfo/patinfo/revisit1stattm") == "" ) ||
        (pVisitno == "2" && model.getValue("/root/main/ercensusinfo/patinfo/revisit2stattm") == "" )  ){

            messageBox("³»¿ø ÀϽø¦ ¸ÕÀú ÀúÀåÇϽʽÿä","E");
          return;
    }

    if(getNodesetCount(xPathChangeRow) == 1){
        messageBox("¸ÞÀÎ Áø·á°ú Ãë¼Ò¸¦ ÇÒ ¼ö ¾ø½À´Ï´Ù.","E");
        model.setValue(xPathChangeRow+"["+ pRow +"]/mainyn", "M");
        return;
    }
    
    for(i=1 ; i <= getNodesetCount(xPathChangeRow)  ; i++){
        if(model.getValue(xPathChangeRow+"["+i+"]/mainyn") == "M" ){
            j = j + 1;        
        }
    }
    
    if(j == 0){
        messageBox("¸ÞÀÎ Áø·á°ú´Â ¹Ýµå½Ã Á¸ÀçÇØ¾ß ÇÕ´Ï´Ù.","E");
        model.setValue(xPathChangeRow+"["+ pRow +"]/mainyn", "M");
        return;
    }
    
    //Áø·á º¯°æ ºÎºÐ                                    
    if( j > 1){
        var vbYes = messageBox("¸ÞÀÎ Áø·á°ú º¯°æÀ» ", "Q004");
         if(vbYes == 6){
            for(i=1 ; i <= getNodesetCount(xPathChangeRow)  ; i++){
                if(model.getValue(xPathChangeRow+"["+i+"]/mainyn") == "M" && i != pRow){
                    chgrow = i;
                    model.setValue(xPathChangeRow+"["+i+"]/mainyn","S");
                }
            }
            model.setValue(xPathChangeRow+"["+pRow+"]/mainyn" , "M" );
         }else{
            model.setValue(xPathChangeRow+"["+pRow+"]/mainyn" , "S" );
            return;
         }
    }
    
    //¼öÁ¤ Àü ÁÖÁø·á°ú »óÅ º¯°æ
    if(chgrow != ""){
        var sStatus = "";
        var sStatus = model.getValue(xPathChangeRow+"["+chgrow+"]/status");
        if( sStatus == "S" ){        
            model.setValue(xPathChangeRow+"["+chgrow+"]/status", "U");    
        }
    }
    
    //¼öÁ¤ ÈÄ ÁÖÁø·á°ú »óÅ º¯°æ
    var sStatus = "";
    var sStatus = model.getValue(xPathChangeRow+"["+pRow+"]/status");
    if( sStatus == "S" ){        
        model.setValue(xPathChangeRow+"["+pRow+"]/status", "U");    
    }
    
    if(pVisitno == "0"){
        model.makeValue("/root/send/calldocinfo", grd_calldoc1.getUpdateDataAll("i")); 
    }
    if(pVisitno == "1"){
        model.makeValue("/root/send/calldocinfo", grd_calldoc2.getUpdateDataAll("i")); 
    }
    if(pVisitno == "2"){
        model.makeValue("/root/send/calldocinfo", grd_calldoc3.getUpdateDataAll("i")); 
    }
    
    if( submit("TXMNE00104") ){
        fSearchPatienInfo("refresh");        
    }
}

/**
 * @group  :
 * @ver    : 2007.06.07
 * @by     : ¾çõ´ö
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : È£ÃâÀÇ»ç ±×¸®µå »óÅ º¯°æ
 * @param  :
 * @return :
 * @---------------------------------------------------
 */  
function fChangeStatus(xPathChangeRow, pRow){
    
    //¼öÁ¤ ÈÄ ÁÖÁø·á°ú »óÅ º¯°æ
    var sStatus = "";
    var sStatus = model.getValue(xPathChangeRow+"["+pRow+"]/status");
    if( sStatus == "S" ){        
        model.setValue(xPathChangeRow+"["+pRow+"]/status", "U");    
    }    
}

/**
 * @group  :
 * @ver    : 2007.06.07
 * @by     : ¾çõ´ö
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : »ó´Ü Á¤º¸ ÀÌ¿ë ȯÀÚ ¼±ÅÃ
 * @param  :
 * @return :
 * @---------------------------------------------------
 */  
function fGetParamSetting(){
    var chkPid = getPatientInfo("pid");
    var iTgPatRow = 0;
    
    if(chkPid != ""){
        var iRow = grd_patlist.rows;
        
        if(iRow == "1"){
            return;
        }else{
            for( i =0 ; i < iRow ; i++ ){
                iTgPatRow = grd_patlist.findRow(chkPid ,1,1,true,true);    
            }
        }
    }

    if(iTgPatRow > 0){
           grd_patlist.row = iTgPatRow;
           grd_patlist.topRow = iTgPatRow;
        fSearchPatienInfo(sSrchToolStatus);
    }
}

/**
 * @group  :
 * @ver    : 2007.06.07
 * @by     : ¾çõ´ö
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : ³»¿øÀÏÀÚ Ã¼Å©
 * @param  :
 * @return :
 * @---------------------------------------------------
 */  
function fChosdtChk(pFlag, pData){
    var crtDate = getCurrentDate();
    var crtTime = getCurrentTime().substr(0,4);
    var sChkEndData = "";
    
    if(pFlag =="D"){
        if(isValidDateTime(pData, "YYYYMMDD") == false){
            sChkEndData = crtDate;
            messageBox("ÀÔ·ÂÇÑ ³»¿ø ÀÏÀÚ°¡ À¯È¿ÇÏÁö","E007");    
        }else{
            sChkEndData = pData;
        }
    }
    
    if(pFlag =="T"){
        if(isValidDateTime(pData, "hhmm") == false){
                sChkEndData = crtTime;
                messageBox("ÀÔ·ÂÇÑ ³»¿ø ½Ã°£ÀÌ À¯È¿ÇÏÁö","E007");    
        }else{
            sChkEndData = pData;
        }
    }
    
    return sChkEndData;
}


/**
 * @group  :
 * @ver    : 2007.06.07
 * @by     : ¾çõ´ö
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : ´ã´çÀÇ ºÎºÐ Æ˾÷ ¼³Á¤
 * @param  :
 * @return :
 * @---------------------------------------------------
 */  
function fShowPopupMenu(gridID, menuPath)
{        
        var gridObj = document.controls.item(gridID);
            
        if(event.button == 3) {
            if(gridObj.isCell(event.target) && gridObj.mouseRow >= gridObj.fixedrows){
                window.setPopupMenu(true, menuPath, "name", "func", false);
            }else{
                window.setPopupMenu(false);
            }                
        }    
}    

 /* -------------------------------------------------  */             
 /* desc   : ¼±Åà NODE ÇÏÀ§ÀÇ ³»¿ëÀ» CLEARÇÑ´Ù.        */             
 /* return :                                           */             
 /* -------------------------------------------------- */             
 function fClearChildNodeSet(pNode){                                     
                                                                      
         var nLen  = instance1.selectSingleNode(pNode).childNodes.length;
         var xNode = instance1.selectSingleNode(pNode);                  
                                                                      
          for (var i=0;i<nLen; i++){                                  
               xNode.childNodes(i).text = '';                         
          }                                                           
 }                                      
 
/**
 * @group  :
 * @ver    : 2008.01.17
 * @by     : ¾çõ´ö
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : Åõ¾à±â·Ï Æ˾÷ ¼³Á¤
 * @param  :
 * @return :
 * @---------------------------------------------------
 */                                         
function fDrugRecPopup(){
   if(btn_ordermngmv.selected == true) {	
			fSetPatInfo();	
	 }else{
   		fSetParam("nm");
   }
   
    open("SMMNR00600","1","15","128");    
}

/**
 * @group  :
 * @ver    : 2008.01.17
 * @by     : ¾çõ´ö
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : ÀÀ±Þ½Ç Åð½ÇÁ¤¸® È­¸é Æ˾÷ ¼³Á¤
 * @param  :
 * @return :
 * @---------------------------------------------------
 */                        
function fEROutPopup(){
   if(btn_ordermngmv.selected == true) {	
			fSetPatInfo();	
	 }else{
   		fSetParam("nm");
   }
   
    open("SMMNE00200","1","15","128");
}

/**
 * @group  :
 * @ver    : 2008.01.17
 * @by     : ¾çõ´ö
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : Â÷Æ®´ëÃâ½Åû È­¸é Æ˾÷ ¼³Á¤
 * @param  :
 * @return :
 * @---------------------------------------------------
 */                        
function fChartPopup(){
   if(btn_ordermngmv.selected == true) {	
			fSetPatInfo();	
	 }else{
   		fSetParam("nm");
   }
   
    //open("SPMRC01500","1","15","128");
    open("SMMRC00300","1","15","128");
}

/**
 * @group  :
 * @ver    : 2008.01.17
 * @by     : ¾çõ´ö
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : ÅëÇÕ°Ë»ç°á°úÁ¶È¸ È­¸é Æ˾÷ ¼³Á¤
 * @param  :
 * @return :
 * @---------------------------------------------------
 */                        
function fTestResultPopup(){
   if(btn_ordermngmv.selected == true) {	
			fSetPatInfo();	
	 }else{
   		fSetParam("nm");
   }
   
    open("SMAER00800","1","15","128");
}

/**
 * @group  :
 * @ver    : 2008.01.17
 * @by     : ¾çõ´ö
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : °£È£Ã³¹æ È­¸é Æ˾÷ ¼³Á¤
 * @param  :
 * @return :
 * @---------------------------------------------------
 */                        
function fNursPrcpPopup(){
   if(btn_ordermngmv.selected == true) {	
			fSetPatInfo();	
	 }else{
   		fSetParam("nm");
   }
   
     open("SMMNW10900","1","15","128"); // Â÷ÈÄ °áÁ¤
     //open("SMMNW01000","1","15","128");  
}

/**
 * @group  :
 * @ver    : 2008.01.17
 * @by     : ¾çõ´ö
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : º´µ¿Ã¤Ç÷°ü¸® È­¸é Æ˾÷ ¼³Á¤
 * @param  :
 * @return :
 * @---------------------------------------------------
 */                        
function fInBCollMngtPopup(){
   if(btn_ordermngmv.selected == true) {	
			fSetPatInfo();	
	 }else{
   		fSetParam("nm");
   }
   
   open("SMLLC00200","1","15","128");
}

/**
 * @group  :
 * @ver    : 2008.01.17
 * @by     : ¾çõ´ö
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : Name LabelÃâ·Â È­¸é Æ˾÷ ¼³Á¤
 * @param  :
 * @return :
 * @---------------------------------------------------
 */                        
function fNameLabelPopup(){
   if(btn_ordermngmv.selected == true) {	
			fSetPatInfo();	
	 }else{
   		fSetParam("nm");
   }
   
      open("SMAER00800","1","15","128");
}


/**
 * @group  :
 * @ver    : 2008.01.17
 * @by     : ¾çõ´ö
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : ´ã´çÀÇ ÇÁ·ÎÇʺ¸±â È­¸é Æ˾÷ ¼³Á¤
 * @param  :
 * @return :
 * @---------------------------------------------------
 */                        
function fAtdoctlist(){
    setParameter("atdoctid",model.getValue("/root/main/nursemainlist/nursemaininfo["+nursemaininfo.row+"]/atdocid"));
    setParameter("orddd",model.getValue("/root/main/nursemainlist/nursemaininfo["+nursemaininfo.row+"]/indd"));
    var left = event.screenX;
    var top = event.screenY;
    modal("SPMNW11300",1,left,top);
}

/**
 * @group  :
 * @ver    : 2008.01.17
 * @by     : ¾çõ´ö
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : ¸Þ¼¼Áö º¸³»±â ¼³Á¤
 * @param  :
 * @return :
 * @---------------------------------------------------
 */  
function fSendMessage(){
    model.removeNodeset("/root/main_om/temp/atdoctlist"); 
    model.removenode("/root/send");                                    
    model.makeValue("/root/send/atdoctid", model.getValue("/root/main/nursemainlist/nursemaininfo["+nursemaininfo.row+"]/atdocid"));                        
    model.makeValue("/root/send/orddd", getCurrentDate());                                                     
    model.makeValue("/root/send/deptcd", model.getValue("/root/main/nursemainlist/nursemaininfo["+nursemaininfo.row+"]/deptcd"));
    submit("TRMNW00202");
    var nodecnts = getNodesetCount("/root/main_om/temp/atdoctlist") ;
    if( nodecnts < 1){
               messageBox('´ã´çÀÇ Á¤º¸°¡ ', 'I004');
               return;
       }
    model.setValue("/root/main_om/temp/atdoctlist/calltype","msg");
    model.setValue("/root/main_om/temp/atdoctlist/msgcnts","ÀÀ±ÞÀÇ·á¼¾ÅÍ È£Ãâ");
    zmifOpenUserMessagePopup("/root/main_om/temp/atdoctlist", event.ScreenX, event.ScreenY);
}

/**
 * @group  :
 * @ver    : 2008.01.17
 * @by     : ¾çõ´ö
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : È£Ãâ ¼³Á¤
 * @param  :
 * @return :
 * @---------------------------------------------------
 */ 
function fSendCall(){
    model.removeNodeset("/root/main_om/temp/atdoctlist"); 
    model.removenode("/root/send");                                    
    model.makeValue("/root/send/atdoctid", model.getValue("/root/main/nursemainlist/nursemaininfo["+nursemaininfo.row+"]/atdocid"));                        
    model.makeValue("/root/send/orddd", getCurrentDate());                                                     
    model.makeValue("/root/send/deptcd", model.getValue("/root/main/nursemainlist/nursemaininfo["+nursemaininfo.row+"]/deptcd"));
    submit("TRMNW00202");
       if(getNodesetCount("/root/main_om/temp/atdoctlist") < 1){
               messageBox('´ã´çÀÇ Á¤º¸°¡ ', 'I004');
               return;
       }
    model.setValue("/root/main_om/temp/atdoctlist/calltype","call");
    model.setValue("/root/main_om/temp/atdoctlist/msgcnts","ÀÀ±ÞÀÇ·á¼¾ÅÍ È£Ãâ");
    zmifOpenUserMessagePopup("/root/main_om/temp/atdoctlist", event.ScreenX, event.ScreenY);
}

/**
 * @group  :
 * @ver    : 2008.01.17
 * @by     : ¾çõ´ö
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : ȯÀÚ ¶óº§ Ãâ·Â
 * @param  :
 * @return :
 * @---------------------------------------------------
 */ 

function fOpenLabelPrint(){
    /* 20090116(ByJA)
    pid      = model.getValue("/root/main/nursemainlist/nursemaininfo["+nursemaininfo.row+"]/pid");
    patnm    = model.getValue("/root/main/nursemainlist/nursemaininfo["+nursemaininfo.row+"]/patnm");
    sexage   = model.getValue("/root/main/nursemainlist/nursemaininfo["+nursemaininfo.row+"]/grdrage");
    rgstno   = model.getValue("/root/main/nursemainlist/nursemaininfo["+nursemaininfo.row+"]/rgstno");
    orddd    = getCurrentDate();                                                    
    */
    model.setValue("/root/printcnt", LabelPntCnt);
    
    /* 20090116(ByJA)
    scrnid    = "SMMNR00600";
    // barcdRef =  "/root/barcdprntsetup/prntsetupinfo/setupinfo";   // ¿øº»_20090106(ByJA)
    barcdRef =  "/root/main/barcdprntsetup/prntsetupinfo/setupinfo"; // ¼öÁ¤_20090106(ByJA)
    */
    
    //group10.attribute("left") = event.ScreenX - 30;
    //group10.attribute("top") = event.ScreenY - 290;
    model.setFocus("ipt_patcntctel");                
    model.refresh();
    group10.visible = true;    
}

/**
 * @group  :
 * @ver    : 2009.07.15
 * @by     : ±è¾ç¼ö
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : ÀÓ»ó°üÂû±â·Ï
 * @param  :
 * @return :
 * @---------------------------------------------------
 */                        
function fClinicObserRec(){
	 if(btn_ordermngmv.selected == true) {	
			fSetPatInfo();	
	 }else{
   		fSetParam("nm");
   }
   
		open("SMMNR00900","1","15","128");
}

/**
 * @group  :
 * @ver    : 2009.07.15
 * @by     : ±è¾ç¼ö
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : ȯÀÚÁø·áÁ¤º¸Á¶È¸
 * @param  :
 * @return :
 * @---------------------------------------------------
 */                        
function fOpenPrcpSpec(){
   if(btn_ordermngmv.selected == true) {	
			fSetPatInfo();	
	 }else{
   		fSetParam("nm");
   }
   
      open("SMMMO02500","1","15","128");
}

/**
 * @group  :
 * @ver    : 2009.08.17
 * @by     : ¾çõ´ö
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : ÀÀ±Þ½Ç ȯÀÚ ¸Þ¸ð »ðÀÔ
 * @param  :
 * @return :
 * @---------------------------------------------------
 */                       
function fErPatInsmemo(){
    var insMemoRow = nursemaininfo.row;

    if(model.getValue("/root/main/nursemainlist/nursemaininfo[" + insMemoRow + "]/censusck") == "Y"){
        messageBox("ÀÔ½ÇÀúÀåÀ» ÇÏÁö ¾ÊÀº ȯÀÚ´Â Memo¸¦ ÀúÀå ¹× ¼öÁ¤À» ÇÒ ¼ö ¾ø½À´Ï´Ù.","I");
        return;
    }    
    
    if(model.getValue("/root/main/nursemainlist/nursemaininfo[" + insMemoRow + "]/memo") == "Y"){
        messageBox("Memo°¡ ÀÌ¹Ì µî·ÏµÇ¾î ÀÖ½À´Ï´Ù.","I");
        return;
    }
    
    var insMemoPid     = model.getValue("/root/main/nursemainlist/nursemaininfo[" + insMemoRow + "]/pid"     );
    var insMemoIndd    = model.getValue("/root/main/nursemainlist/nursemaininfo[" + insMemoRow + "]/indd"    );
    var insMemoCretno  = model.getValue("/root/main/nursemainlist/nursemaininfo[" + insMemoRow + "]/cretno"  );
    var insMemoVisitno = model.getValue("/root/main/nursemainlist/nursemaininfo[" + insMemoRow + "]/visitno" );
    var insMemoStatus  = "U";
    
    setParameter("pid"      , insMemoPid     );
    setParameter("indd"     , insMemoIndd    );
  setParameter("cretno"   , insMemoCretno  );
  setParameter("visitno"  , insMemoVisitno );
  setParameter("status"   , insMemoStatus  );
  modal("SPMNE07600", 1, 200, 100);
}

/**
 * @group  :
 * @ver    : 2009.08.17
 * @by     : ¾çõ´ö
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : ÀÀ±Þ½Ç ȯÀÚ ¸Þ¸ð ÆíÁý
 * @param  :
 * @return :
 * @---------------------------------------------------
 */                       
function fErPatSetmemo(){
    var insMemoRow = nursemaininfo.row;
    
    if(model.getValue("/root/main/nursemainlist/nursemaininfo[" + insMemoRow + "]/censusck") == "Y"){
        messageBox("ÀÔ½ÇÀúÀåÀ» ÇÏÁö ¾ÊÀº ȯÀÚ´Â Memo¸¦ ÀúÀå ¹× ¼öÁ¤À» ÇÒ ¼ö ¾ø½À´Ï´Ù.","I");
        return;
    }    
        
    if(model.getValue("/root/main/nursemainlist/nursemaininfo[" + insMemoRow + "]/memo") != "Y"){
        messageBox("µî·ÏµÈ Memo°¡ ¾ø½À´Ï´Ù.","I");
        return;
    }
    
    var insMemoPid     = model.getValue("/root/main/nursemainlist/nursemaininfo[" + insMemoRow + "]/pid"     );
    var insMemoIndd    = model.getValue("/root/main/nursemainlist/nursemaininfo[" + insMemoRow + "]/indd"    );
    var insMemoCretno  = model.getValue("/root/main/nursemainlist/nursemaininfo[" + insMemoRow + "]/cretno"  );
    var insMemoVisitno = model.getValue("/root/main/nursemainlist/nursemaininfo[" + insMemoRow + "]/visitno" );
    var insMemoStatus  = "U";
    
    setParameter("pid"      , insMemoPid     );
    setParameter("indd"     , insMemoIndd    );
  setParameter("cretno"   , insMemoCretno  );
  setParameter("visitno"  , insMemoVisitno );
  setParameter("status"   , insMemoStatus  );
  modal("SPMNE07600", 1, 200, 100);
}

/**
 * @group  :
 * @ver    : 2009.08.17
 * @by     : ¾çõ´ö
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : ÀÀ±Þ½Ç ȯÀÚ ¸Þ¸ð »èÁ¦
 * @param  :
 * @return :
 * @---------------------------------------------------
 */                       
function fErPatDelmemo(){
    var insMemoRow = nursemaininfo.row;
    
    if(model.getValue("/root/main/nursemainlist/nursemaininfo[" + insMemoRow + "]/memo") != "Y"){
        messageBox("µî·ÏµÈ Memo°¡ ¾ø½À´Ï´Ù.","I");
        return;
    }
    
    var insMemoPid     = model.getValue("/root/main/nursemainlist/nursemaininfo[" + insMemoRow + "]/pid"     );
    var insMemoIndd    = model.getValue("/root/main/nursemainlist/nursemaininfo[" + insMemoRow + "]/indd"    );
    var insMemoCretno  = model.getValue("/root/main/nursemainlist/nursemaininfo[" + insMemoRow + "]/cretno"  );
    var insMemoVisitno = model.getValue("/root/main/nursemainlist/nursemaininfo[" + insMemoRow + "]/visitno" );
    var insMemoStatus  = "D";
    
    model.removenode("/root/send");
    model.makeValue("/root/send/pid"        , insMemoPid      );
    model.makeValue("/root/send/indd"       , insMemoIndd     );
    model.makeValue("/root/send/cretno"     , insMemoCretno   );
    model.makeValue("/root/send/visitno"    , insMemoVisitno  );
    model.makeValue("/root/send/status"     , insMemoStatus   );
    submit("TXMNE07601", false);
    fSeletedSrcTool();
}

function ErreqOrderInfoOfCol(scrnid, grdid, compscd){
                        model.removeNodeset("/root/send/reqdata");                    
                        model.makeValue("/root/send/reqdata/scrnid"            , scrnid);   
                        model.makeValue("/root/send/reqdata/compscd"        , compscd);   
                        if(submit("TRMNB02401", false)){
                            var refdata  = model.getValue("/root/init/userscrnenvinfo/gridseq/compsrefcnts");
                            var sizedata = model.getValue("/root/init/userscrnenvinfo/gridseq/compssizecnts");
                        
                            if(refdata != "" || sizedata != ""){
                                ErsetOrderInfoOfCol(grdid , refdata, sizedata);
                            }
                        }  
                    }    
                    
function ErsetOrderInfoOfCol(grdID, refdata, sizedata){
                        var grdObj    = document.controls.item(grdID);
                        var refArray  = refdata.split("^");
                        var sizeArray = sizedata.split("^");
                        for(var i = 0; i < refArray.length; i++){
                            var colcnt = grdObj.colref("" + refArray[i] + "");
                            if (colcnt <0 ) colcnt = 0;
                            // À̵¿ Ä÷³°ú ´ë»óÄ÷³ÀÇ À妽º°¡ °°Áö ¾ÊÀº °æ¿ì¸¸ À̵¿.
                            if (colcnt != i) {
                                grdObj.colMove(i,  colcnt, "before", false);
                            }                                    
                            var size = sizeArray[i];
                            if(size == 0){ // size of column 0 -> hidden
                                grdObj.colHidden(i) = true;         
                            }else{
                                grdObj.colHidden(i) = false;
                            }
                            grdObj.colWidth(i) = eval(size);
                            
                        }
                       model.refresh();
                    }            
                    
        //-----------------(20101018) °æºÏ´ë
        //Ä«µ¦½º ¿ÀÇÂ
        function fOpenCardex()
        {
            //fSetPatInfo();            
            
            
           if(btn_ordermngmv.selected == true) {	
							fSetPatInfo();	
					 }else{
				   		fSetParam("ec");
				   }
                                   
            fSearchPatienInfo(sSrchToolStatus);
            open("SMMNB00200","1","20","128");
        }
        
        //20110208_KNUH_Start
        function fPrtVital() {
            if(nursemaininfo.rows < 1) {
                messageBox("Vital SignÀ» Ãâ·ÂÇÒ Á¤º¸°¡ Á¸ÀçÇÏÁö ¾Ê½À´Ï´Ù.", "E");
                return;
            } else {
                model.makeValue("/root/main/cond/wardnm", getUserInfo("dutplcenm"));
                exeReportPreview("RPMNE00130", "XMLSTR", "", "","true","","","","","true");
            }
        }
        
        //20111125_ȯÀÚ¸Þ¸ð_ÀÀ±Þ½Ç Ç㱤ÀÚ ¼±»ý´Ô ¿äû.
        function fPatMemo() {
 						
 					var pid = "";
 					var hngnm = "";
 					var orddeptcd = "" ;	
 					
        	 if(btn_ordermngmv.selected == true) {	
        	 		pid = grd_ompatlist.valueMatrix(grd_ompatlist.row,grd_ompatlist.colRef("pid"));
	            hngnm = grd_ompatlist.valueMatrix(grd_ompatlist.row,grd_ompatlist.colRef("patnm"));                        
	            orddeptcd = grd_ompatlist.valueMatrix(grd_ompatlist.row,grd_ompatlist.colRef("orddeptcd"));
        	 }else{
	            pid = nursemaininfo.valueMatrix(nursemaininfo.row,nursemaininfo.colRef("pid"));
	            hngnm = nursemaininfo.valueMatrix(nursemaininfo.row,nursemaininfo.colRef("patnm"));                        
	            orddeptcd = nursemaininfo.valueMatrix(nursemaininfo.row,nursemaininfo.colRef("deptcd"));
	          }
            setParameter("SPMNO02300_PARM", pid + "¢Ë" + hngnm + "¢Ë" + orddeptcd);

            modal("../../../emr/outcareweb/xrw/SPMNO02300", "","", "", "SPMNO02300", "", "");
        }

//º´µ¿°£È£ÀÇ »ó´Ü¿Ã¸®´Â ±â´ÉÀ̳ª ÀÀ±Þ°£È£ÀÇ »ó´Ü¿Ã¸®´Â ±â´ÉÀ¸·Î »ç¿ë
        //Nurse Main /Order Manage¿¡¼­ »ó´ÜȯÀÚÁ¤º¸¼¼ÆÃÇ챉                    
//        function fSetPatInfo()
//        {
//            // »ó´Ü ¼¼ÆÃÀ» À§ÇÑ ÆĶó¹ÌÅÍ
//            if(btn_om.selected == true) {                            
//                if (model.getValue("/root/main_om/cond/unitflag") == "emc") {        
//                    var param = "E¢Ë" + model.getValue("/root/main_om/ominfo/ompatinfo/ompatlist["+grd_ompatlist.row+"]/pid") 
//                                               + "¢Ë" + model.getValue("/root/main_om/ominfo/ompatinfo/ompatlist["+grd_ompatlist.row+"]/indd") 
//                                               + "¢Ë" + model.getValue("/root/main_om/ominfo/ompatinfo/ompatlist["+grd_ompatlist.row+"]/cretno") 
//                                               + "¢Ë" + model.getValue("/root/main_om/ominfo/ompatinfo/ompatlist["+grd_ompatlist.row+"]/instcd")
//                                               + "¢Ë" ;
//                    setParameter("condparam",  param);
//                    modal("SPMMO08900", 1, "", "", "", "", "", "left:0; right:0; width:0; height:0; sysmenu:hidden; caption:hidden; min:hidden, max:hidden;");                                
//                } else if (model.getValue("/root/main_om/cond/unitflag") == "dsc") {                        
//                    //------------(20071114)
//                    if (model.getValue("/root/main_om/ominfo/ompatinfo/ompatlist["+grd_ompatlist.row+"]/oprsrvno") != "") {                                    
//                        var param = "T" + "¢Ë"                                                      // 01 O:¿Ü·¡, I:ÀÔ¿ø±¸ºÐ, T:¼ö¼ú¿¹¾à
//                                               +  model.getValue("/root/main_om/ominfo/ompatinfo/ompatlist["+grd_ompatlist.row+"]/pid")            + "¢Ë"     // 02 µî·Ï¹øÈ£
//                                                                           +  model.getValue("/root/main_om/ominfo/ompatinfo/ompatlist["+grd_ompatlist.row+"]/opcnfmdd")        + "¢Ë"     // 03 ¼ö¼ú½ÃÀÛÀÏÀÚ
//                                                                           +  model.getValue("/root/main_om/ominfo/ompatinfo/ompatlist["+grd_ompatlist.row+"]/cretno")        + "¢Ë"     // 04 cretno(¾ø´Â °æ¿ì ""·Î ó¸®)
//                                                                            +  model.getValue("/root/main_om/ominfo/ompatinfo/ompatlist["+grd_ompatlist.row+"]/instcd")        + "¢Ë"     // 05 ±â°üÄÚµå
//                                                                             +  model.getValue("/root/main_om/ominfo/ompatinfo/ompatlist["+grd_ompatlist.row+"]/perfdeptcd")        + "¢Ë"     // 06 Áýµµ°úºÎ¼­
//                                                                           +  model.getValue("/root/main_om/ominfo/ompatinfo/ompatlist["+grd_ompatlist.row+"]/perfdrid")        + "¢Ë"     // 07 ÁýµµÀÇID
//                                                                           +  model.getValue("/root/main_om/ominfo/ompatinfo/ompatlist["+grd_ompatlist.row+"]/oppatflagcd")    + "¢Ë"     
//                                                                           +  "F" + "¢Ë"     
//                                                                           +  model.getValue("/root/main_om/ominfo/ompatinfo/ompatlist["+grd_ompatlist.row+"]/oprsrvno") + "¢Ë"     
//                                                                           +  model.getValue("/root/main_om/ominfo/ompatinfo/ompatlist["+grd_ompatlist.row+"]/ophistno") + "¢Ë" 
//                                                                           +  model.getValue("/root/main/cond/orddd")+ "¢Ë" ;
//                    } else {
//                        var param = "I" + "¢Ë" + model.getValue("/root/main_om/ominfo/ompatinfo/ompatlist["+grd_ompatlist.row+"]/pid")
//                                    + "¢Ë" + model.getValue("/root/main_om/ominfo/ompatinfo/ompatlist["+grd_ompatlist.row+"]/indd")
//                                    + "¢Ë" + model.getValue("/root/main_om/ominfo/ompatinfo/ompatlist["+grd_ompatlist.row+"]/cretno")
//                                    + "¢Ë" + model.getValue("/root/main_om/ominfo/ompatinfo/ompatlist["+grd_ompatlist.row+"]/instcd")
//                                    + "¢Ë" + model.getValue("/root/main_om/ominfo/ompatinfo/ompatlist["+grd_ompatlist.row+"]/indd")                                                                        
//                    }
//                    //------------
//                    setParameter("condparam",  param);
//                    modal("SPMMO08900", 1, "", "", "", "", "", "left:0; right:0; width:0; height:0; sysmenu:hidden; caption:hidden; min:hidden, max:hidden;");
//
//                } else if (model.getValue("/root/main_om/cond/unitflag") == "chemo") {
//                    //------------(20071114)                                
//                    condparam = "I"+ "¢Ë" + model.getValue("/root/main_om/ominfo/ompatinfo/ompatlist["+grd_ompatlist.row+"]/pid") 
//                                           + "¢Ë" + model.getValue("/root/main_om/ominfo/ompatinfo/ompatlist["+grd_ompatlist.row+"]/indd") 
//                                           + "¢Ë" + model.getValue("/root/main_om/ominfo/ompatinfo/ompatlist["+grd_ompatlist.row+"]/cretno") 
//                                           + "¢Ë" + model.getValue("/root/main_om/ominfo/ompatinfo/ompatlist["+grd_ompatlist.row+"]/instcd")    
//                                           + "¢Ë" + model.getValue("/root/main/cond/orddd");
//                    //------------
//                    setParameter("condparam", condparam);
//                    modal("SPMMO08900", 1, "", "", "", "", "", "left:0; right:0; width:0; height:0; sysmenu:hidden; caption:hidden; min:hidden, max:hidden;");                                                                                                                                 
//                } else if (model.getValue("/root/main_om/cond/unitflag") == "op") {
//                    var param = "T" + "¢Ë"                                                      // 01 O:¿Ü·¡, I:ÀÔ¿ø±¸ºÐ, T:¼ö¼ú¿¹¾à
//                                           +  model.getValue("/root/main_om/ominfo/ompatinfo/ompatlist["+grd_ompatlist.row+"]/pid")            + "¢Ë"     // 02 µî·Ï¹øÈ£
//                                           +  model.getValue("/root/main_om/ominfo/ompatinfo/ompatlist["+grd_ompatlist.row+"]/opcnfmdd")        + "¢Ë"     // 03 ¼ö¼ú½ÃÀÛÀÏÀÚ
//                                           +                "¢Ë"     // 04 cretno(¾ø´Â °æ¿ì ""·Î ó¸®)
//                                           +  model.getValue("/root/main_om/ominfo/ompatinfo/ompatlist["+grd_ompatlist.row+"]/instcd")        + "¢Ë"     // 05 ±â°üÄÚµå
//                                           +  model.getValue("/root/main_om/ominfo/ompatinfo/ompatlist["+grd_ompatlist.row+"]/perfdeptcd")        + "¢Ë"     // 06 Áýµµ°úºÎ¼­
//                                           +  model.getValue("/root/main_om/ominfo/ompatinfo/ompatlist["+grd_ompatlist.row+"]/perfdrid")        + "¢Ë"     // 07 ÁýµµÀÇID
//                                           +  model.getValue("/root/main_om/ominfo/ompatinfo/ompatlist["+grd_ompatlist.row+"]/oppatflagcd")    + "¢Ë"     
//                                           +  "F" + "¢Ë"     
//                                           +  model.getValue("/root/main_om/ominfo/ompatinfo/ompatlist["+grd_ompatlist.row+"]/oprsrvno")        + "¢Ë"     
//                                           +  model.getValue("/root/main_om/ominfo/ompatinfo/ompatlist["+grd_ompatlist.row+"]/ophistno")        + "¢Ë" 
//                                           +  model.getValue("/root/main_om/ominfo/ompatinfo/ompatlist["+grd_ompatlist.row+"]/opcnfmdd")        + "¢Ë" ;
//
//                    setParameter("condparam",  param);
//                    modal("SPMMO08900", 1, "", "", "", "", "", "left:0; right:0; width:0; height:0; sysmenu:hidden; caption:hidden; min:hidden, max:hidden;");                                            
//                } else if (model.getValue("/root/main_om/cond/unitflag") == "apu") {
//                    condparam = "I"+ "¢Ë" + model.getValue("/root/main_om/ominfo/ompatinfo/ompatlist["+grd_ompatlist.row+"]/pid") 
//                                           + "¢Ë" + model.getValue("/root/main_om/ominfo/ompatinfo/ompatlist["+grd_ompatlist.row+"]/indd") 
//                                           + "¢Ë" + model.getValue("/root/main_om/ominfo/ompatinfo/ompatlist["+grd_ompatlist.row+"]/cretno") 
//                                           + "¢Ë" + model.getValue("/root/main_om/ominfo/ompatinfo/ompatlist["+grd_ompatlist.row+"]/instcd")    
//                                           + "¢Ë" + model.getValue("/root/main/cond/orddd");
//                    setParameter("condparam", condparam);
//                    modal("SPMMO08900", 1, "", "", "", "", "", "left:0; right:0; width:0; height:0; sysmenu:hidden; caption:hidden; min:hidden, max:hidden;");         
//                    
//                } else {
//                    condparam = "I"+ "¢Ë" + model.getValue("/root/main_om/ominfo/ompatinfo/ompatlist["+grd_ompatlist.row+"]/pid") 
//                                           + "¢Ë" + model.getValue("/root/main_om/ominfo/ompatinfo/ompatlist["+grd_ompatlist.row+"]/indd") 
//                                            + "¢Ë" + model.getValue("/root/main_om/ominfo/ompatinfo/ompatlist["+grd_ompatlist.row+"]/cretno") 
//                                           + "¢Ë" + model.getValue("/root/main_om/ominfo/ompatinfo/ompatlist["+grd_ompatlist.row+"]/instcd")    
//                                           + "¢Ë" + model.getValue("/root/main/cond/orddd");
//                        
//                    setParameter("condparam", condparam);
//                    modal("SPMMO08900", 1, "", "", "", "", "", "left:0; right:0; width:0; height:0; sysmenu:hidden; caption:hidden; min:hidden, max:hidden;");                                                                                                                                                                            
//                }
//            } else {                            
//                condparam = "I"+ "¢Ë" + model.getValue("/root/main_nm/wardpatinfo/wardpatlist["+grd_wardpatlist.row+"]/pid") 
//                                      + "¢Ë" + model.getValue("/root/main_nm/wardpatinfo/wardpatlist["+grd_wardpatlist.row+"]/indd") 
//                                           + "¢Ë" + model.getValue("/root/main_nm/wardpatinfo/wardpatlist["+grd_wardpatlist.row+"]/cretno") 
//                                           + "¢Ë" + model.getValue("/root/main_nm/wardpatinfo/wardpatlist["+grd_wardpatlist.row+"]/instcd")
//                                          + "¢Ë" + model.getValue("/root/main/cond/orddd");
//                
//                setParameter("condparam", condparam);
//
//                 //»ó´Ü ¼¼Æà ȭ¸é »çÀÌÁî ÀÛ°Ô ¶ç¿ò
//                 modal("SPMMO08900", 1, "", "", "", "", "", "left:0; right:0; width:0; height:0; sysmenu:hidden; caption:hidden; min:hidden, max:hidden;");                                                    
//                                            /*
//                   var indschacptstat = model.getValue("/root/main/cond/indschacptstat");
//                   if(indschacptstat == "1" || indschacptstat == "3"){  // Á¶È¸Á¶°ÇÀÌ Àç¿ø,Åð¿øÁøÇà ÀÏ °æ¿ì
//                       condparam = "I"+ "¢Ë" + model.getValue("/root/main_nm/wardpatinfo/wardpatlist["+grd_wardpatlist.row+"]/pid") 
//                                      + "¢Ë" + model.getValue("/root/main_nm/wardpatinfo/wardpatlist["+grd_wardpatlist.row+"]/indd") 
//                                           + "¢Ë" + model.getValue("/root/main_nm/wardpatinfo/wardpatlist["+grd_wardpatlist.row+"]/cretno") 
//                                           + "¢Ë" + model.getValue("/root/main_nm/wardpatinfo/wardpatlist["+grd_wardpatlist.row+"]/instcd")
//                                          + "¢Ë" + getCurrentDate();
//                   }else{
//                       condparam = "I"+ "¢Ë" + model.getValue("/root/main_nm/wardpatinfo/wardpatlist["+grd_wardpatlist.row+"]/pid") 
//                                      + "¢Ë" + model.getValue("/root/main_nm/wardpatinfo/wardpatlist["+grd_wardpatlist.row+"]/indd") 
//                                           + "¢Ë" + model.getValue("/root/main_nm/wardpatinfo/wardpatlist["+grd_wardpatlist.row+"]/cretno") 
//                                           + "¢Ë" + model.getValue("/root/main_nm/wardpatinfo/wardpatlist["+grd_wardpatlist.row+"]/instcd")
//                                          + "¢Ë" + model.getValue("/root/main/cond/orddd");
//                   }
//                 */
//    
//            }
//        }                    
//        
        //-----------------(20101018) °æºÏ´ë

    //--------------(20101226) °æºÏ´ë
    //ȯÀÚÀ̸§Ç¥Ãâ·Â
    function fOpenNamePrint(){
    
    	if(btn_ordermngmv.selected == true) {	// OrderManage ¿¡¼­ È£Ãâ
    		group23.visible = true;
    		} else {
    			group5.visible = true;	
    		}					
    }
    
    //Á¤º¸È£Ãâ
    function fGetPatName() {
    	
    	var instcd = getUserInfo("dutplceinstcd");
    	    	
    	if(btn_ordermngmv.selected == true) {	// OrderManage ¿¡¼­ È£Ãâ
							
					var row_om = grd_ompatlist.row;
					
					if (row_om >= 1) {
						var pid    = model.getValue("/root/main_om/ominfo/ompatinfo/ompatlist["+row_om+"]/pid");
						var wardcd = model.getValue("/root/main/cond/wardcd");
						model.removenode("/root/send");
		
						model.makeValue("/root/send/patnameinfo/pid", pid);
						model.makeValue("/root/send/patnameinfo/wardcd", wardcd);
						submit("TRMNE00110");
						
						model.removeNodeset("/root/send");
						model.makeNode("/root/send/temp2");
						model.makeNode("/root/send/temp2/patnamelist");
						model.makeNode("/root/send/temp2/patnamelist/method");
						
						model.copyNode("/root/send/temp2/patnamelist", "/root/main_nm/temp2/patnamelist");
						model.makeNode("/root/send/temp2/patnamelist/method");
						model.setValue("/root/send/temp2/patnamelist/method", model.getValue("/root/main_om/method"));
						
						if(instcd == '031') {
							exeReportPreview("RPMNE00111", "XMLSTR"); //¹Ì¸®º¸±âÃâ·Â(º»¿ø)
						} else {
							exeReportPreview("RPMNE00110", "XMLSTR"); //¹Ì¸®º¸±âÃâ·Â(Ä¥°î)
						}
						
						//exeReportPreview("RPMNR06302", "XMLSTR", "/root/main/prtinfo", "", "true", "", "", "", "", "", "", "grp_report"); //¹Ì¸®º¸±â ¾øÀÌ Ãâ·Â
					}

			}else {	 // NurseMain ¿¡¼­ È£Ãâ
					
        	var row_nr = nursemaininfo.row;
        	
        	if (row_nr >= 1) {
            var pid    = model.getValue("/root/main/nursemainlist/nursemaininfo["+row_nr+"]/pid");
            var wardcd = model.getValue("/root/main/cond/wardcd");
            model.removenode("/root/send");

            model.makeValue("/root/send/patnameinfo/pid", pid);
            model.makeValue("/root/send/patnameinfo/wardcd", wardcd);
            submit("TRMNE00110");
            
            model.removeNodeset("/root/send");
            model.makeNode("/root/send/temp2");
            model.makeNode("/root/send/temp2/patnamelist");
            model.makeNode("/root/send/temp2/patnamelist/method");
            
            model.copyNode("/root/send/temp2/patnamelist", "/root/main_nm/temp2/patnamelist");
            model.makeNode("/root/send/temp2/patnamelist/method");
						model.setValue("/root/send/temp2/patnamelist/method", model.getValue("/root/main/cond/method"));
            
            if(instcd == '031') {
							exeReportPreview("RPMNE00111", "XMLSTR"); //¹Ì¸®º¸±âÃâ·Â(º»¿ø)
						} else {
							exeReportPreview("RPMNE00110", "XMLSTR"); //¹Ì¸®º¸±âÃâ·Â(Ä¥°î)
						}
            
            //exeReportPreview("RPMNR06302", "XMLSTR", "/root/main/prtinfo", "", "true", "", "", "", "", "", "", "grp_report"); //¹Ì¸®º¸±â ¾øÀÌ Ãâ·Â
        }
      }
    }
    
	function fChangeHopeBed () {
			//Èñ¸Á º´½Ç µî±Þ º¯°æ
			
			if(btn_ordermngmv.selected == true) {	// OrderManage ¿¡¼­ È£Ãâ
				
					var row_om = grd_ompatlist.row;
					if (row_om >= 1) {
							var pid    = model.getValue("/root/main_om/ominfo/ompatinfo/ompatlist["+row_om+"]/pid");
							var indd = model.getValue("/root/main_om/ominfo/ompatinfo/ompatlist["+row_om+"]/indd");
							var cretno = model.getValue("/root/main_om/ominfo/ompatinfo/ompatlist["+row_om+"]/cretno");
							var instcd = model.getValue("/root/main_om/ominfo/ompatinfo/ompatlist["+row_om+"]/instcd");
							
							model.removenode("/root/send");
							model.makeValue("/root/send/patadrvinfo/pid", pid);
							model.makeValue("/root/send/patadrvinfo/indd", indd);
							model.makeValue("/root/send/patadrvinfo/cretno", cretno);
							
							 var param = pid + "¢Ë" 
		                  + indd   + "¢Ë" 
		                  + cretno + "¢Ë" 
		                  + instcd +"¢Ë" ;
		                  
							setParameter("condparam", param);
							modal("SMMNE00102", 1, "", "", "", "", "", "left:100; right:0; width:0; height:0; min:hidden;");
					}
			}else{
					var row = nursemaininfo.row;
					if (row >= 1) {
							var pid    = model.getValue("/root/main/nursemainlist/nursemaininfo["+row+"]/pid");
							var indd = model.getValue("/root/main/nursemainlist/nursemaininfo["+row+"]/indd");
							var cretno = model.getValue("/root/main/nursemainlist/nursemaininfo["+row+"]/cretno");
							var instcd = model.getValue("/root/main/nursemainlist/nursemaininfo["+row+"]/instcd");
							
							model.removenode("/root/send");
							model.makeValue("/root/send/patadrvinfo/pid", pid);
							model.makeValue("/root/send/patadrvinfo/indd", indd);
							model.makeValue("/root/send/patadrvinfo/cretno", cretno);
							
							 var param = pid + "¢Ë" 
		                  + indd   + "¢Ë" 
		                  + cretno + "¢Ë" 
		                  + instcd +"¢Ë" ;
		                  
							setParameter("condparam", param);
							modal("SMMNE00102", 1, "", "", "", "", "", "left:100; right:0; width:0; height:0; min:hidden;");
							
					}
			}
	}
	
	
	//Nurse Main /Order Manage¿¡¼­ »ó´ÜȯÀÚÁ¤º¸¼¼ÆÃÇϱâ					
		function fSetPatInfo()
		{
			// »ó´Ü ¼¼ÆÃÀ» À§ÇÑ ÆĶó¹ÌÅÍ
			if(btn_ordermngmv.selected == true) {							
				if (model.getValue("/root/main_om/cond/unitflag") == "emc") {		
					var param = "E¢Ë" + model.getValue("/root/main_om/ominfo/ompatinfo/ompatlist["+grd_ompatlist.row+"]/pid") 
											   + "¢Ë" + model.getValue("/root/main_om/ominfo/ompatinfo/ompatlist["+grd_ompatlist.row+"]/indd") 
											   + "¢Ë" + model.getValue("/root/main_om/ominfo/ompatinfo/ompatlist["+grd_ompatlist.row+"]/cretno") 
											   + "¢Ë" + model.getValue("/root/main_om/ominfo/ompatinfo/ompatlist["+grd_ompatlist.row+"]/instcd")
											   + "¢Ë" ;
				    setParameter("condparam",  param);
				    modal("SPMMO08900", 1, "", "", "", "", "", "left:0; right:0; width:0; height:0; sysmenu:hidden; caption:hidden; min:hidden, max:hidden;");								
				} else if (model.getValue("/root/main_om/cond/unitflag") == "dsc") {						
					//------------(20071114)
					if (model.getValue("/root/main_om/ominfo/ompatinfo/ompatlist["+grd_ompatlist.row+"]/oprsrvno") != "") {						            
						var param = "T" + "¢Ë"                                                      // 01 O:¿Ü·¡, I:ÀÔ¿ø±¸ºÐ, T:¼ö¼ú¿¹¾à
											   +  model.getValue("/root/main_om/ominfo/ompatinfo/ompatlist["+grd_ompatlist.row+"]/pid")			+ "¢Ë"     // 02 µî·Ï¹øÈ£
																		   +  model.getValue("/root/main_om/ominfo/ompatinfo/ompatlist["+grd_ompatlist.row+"]/opcnfmdd")		+ "¢Ë"     // 03 ¼ö¼ú½ÃÀÛÀÏÀÚ
																		   +  model.getValue("/root/main_om/ominfo/ompatinfo/ompatlist["+grd_ompatlist.row+"]/cretno")		+ "¢Ë"     // 04 cretno(¾ø´Â °æ¿ì ""·Î ó¸®)
				 														   +  model.getValue("/root/main_om/ominfo/ompatinfo/ompatlist["+grd_ompatlist.row+"]/instcd")		+ "¢Ë"     // 05 ±â°üÄÚµå
					  												       +  model.getValue("/root/main_om/ominfo/ompatinfo/ompatlist["+grd_ompatlist.row+"]/perfdeptcd")		+ "¢Ë"     // 06 Áýµµ°úºÎ¼­
																		   +  model.getValue("/root/main_om/ominfo/ompatinfo/ompatlist["+grd_ompatlist.row+"]/perfdrid")		+ "¢Ë"     // 07 ÁýµµÀÇID
																		   +  model.getValue("/root/main_om/ominfo/ompatinfo/ompatlist["+grd_ompatlist.row+"]/oppatflagcd")	+ "¢Ë"     
																		   +  "F" + "¢Ë"     
																		   +  model.getValue("/root/main_om/ominfo/ompatinfo/ompatlist["+grd_ompatlist.row+"]/oprsrvno") + "¢Ë"     
																		   +  model.getValue("/root/main_om/ominfo/ompatinfo/ompatlist["+grd_ompatlist.row+"]/ophistno") + "¢Ë" 
																		   +  model.getValue("/root/main/cond/orddd")+ "¢Ë" ;
					} else {
						var param = "I" + "¢Ë" + model.getValue("/root/main_om/ominfo/ompatinfo/ompatlist["+grd_ompatlist.row+"]/pid")
									+ "¢Ë" + model.getValue("/root/main_om/ominfo/ompatinfo/ompatlist["+grd_ompatlist.row+"]/indd")
									+ "¢Ë" + model.getValue("/root/main_om/ominfo/ompatinfo/ompatlist["+grd_ompatlist.row+"]/cretno")
									+ "¢Ë" + model.getValue("/root/main_om/ominfo/ompatinfo/ompatlist["+grd_ompatlist.row+"]/instcd")
									+ "¢Ë" + model.getValue("/root/main_om/ominfo/ompatinfo/ompatlist["+grd_ompatlist.row+"]/indd")	                                                                    
					}
					//------------
					setParameter("condparam",  param);
				    modal("SPMMO08900", 1, "", "", "", "", "", "left:0; right:0; width:0; height:0; sysmenu:hidden; caption:hidden; min:hidden, max:hidden;");

				} else if (model.getValue("/root/main_om/cond/unitflag") == "chemo") {
					//------------(20071114)								
					condparam = "I"+ "¢Ë" + model.getValue("/root/main_om/ominfo/ompatinfo/ompatlist["+grd_ompatlist.row+"]/pid") 
										   + "¢Ë" + model.getValue("/root/main_om/ominfo/ompatinfo/ompatlist["+grd_ompatlist.row+"]/indd") 
										   + "¢Ë" + model.getValue("/root/main_om/ominfo/ompatinfo/ompatlist["+grd_ompatlist.row+"]/cretno") 
										   + "¢Ë" + model.getValue("/root/main_om/ominfo/ompatinfo/ompatlist["+grd_ompatlist.row+"]/instcd")	
										   + "¢Ë" + model.getValue("/root/main/cond/orddd");
					//------------
					setParameter("condparam", condparam);
					modal("SPMMO08900", 1, "", "", "", "", "", "left:0; right:0; width:0; height:0; sysmenu:hidden; caption:hidden; min:hidden, max:hidden;");	 				     	                              	 				     	       								
				} else if (model.getValue("/root/main_om/cond/unitflag") == "op") {
					var param = "T" + "¢Ë"                                                      // 01 O:¿Ü·¡, I:ÀÔ¿ø±¸ºÐ, T:¼ö¼ú¿¹¾à
										   +  model.getValue("/root/main_om/ominfo/ompatinfo/ompatlist["+grd_ompatlist.row+"]/pid")			+ "¢Ë"     // 02 µî·Ï¹øÈ£
										   +  model.getValue("/root/main_om/ominfo/ompatinfo/ompatlist["+grd_ompatlist.row+"]/opcnfmdd")		+ "¢Ë"     // 03 ¼ö¼ú½ÃÀÛÀÏÀÚ
										   +       		 "¢Ë"     // 04 cretno(¾ø´Â °æ¿ì ""·Î ó¸®)
										   +  model.getValue("/root/main_om/ominfo/ompatinfo/ompatlist["+grd_ompatlist.row+"]/instcd")		+ "¢Ë"     // 05 ±â°üÄÚµå
										   +  model.getValue("/root/main_om/ominfo/ompatinfo/ompatlist["+grd_ompatlist.row+"]/perfdeptcd")		+ "¢Ë"     // 06 Áýµµ°úºÎ¼­
										   +  model.getValue("/root/main_om/ominfo/ompatinfo/ompatlist["+grd_ompatlist.row+"]/perfdrid")		+ "¢Ë"     // 07 ÁýµµÀÇID
										   +  model.getValue("/root/main_om/ominfo/ompatinfo/ompatlist["+grd_ompatlist.row+"]/oppatflagcd")	+ "¢Ë"     
										   +  "F" + "¢Ë"     
										   +  model.getValue("/root/main_om/ominfo/ompatinfo/ompatlist["+grd_ompatlist.row+"]/oprsrvno")		+ "¢Ë"     
										   +  model.getValue("/root/main_om/ominfo/ompatinfo/ompatlist["+grd_ompatlist.row+"]/ophistno")		+ "¢Ë" 
										   +  model.getValue("/root/main_om/ominfo/ompatinfo/ompatlist["+grd_ompatlist.row+"]/opcnfmdd")		+ "¢Ë" ;

					setParameter("condparam",  param);
					modal("SPMMO08900", 1, "", "", "", "", "", "left:0; right:0; width:0; height:0; sysmenu:hidden; caption:hidden; min:hidden, max:hidden;");											
				} else if (model.getValue("/root/main_om/cond/unitflag") == "apu") {
					condparam = "I"+ "¢Ë" + model.getValue("/root/main_om/ominfo/ompatinfo/ompatlist["+grd_ompatlist.row+"]/pid") 
										   + "¢Ë" + model.getValue("/root/main_om/ominfo/ompatinfo/ompatlist["+grd_ompatlist.row+"]/indd") 
										   + "¢Ë" + model.getValue("/root/main_om/ominfo/ompatinfo/ompatlist["+grd_ompatlist.row+"]/cretno") 
										   + "¢Ë" + model.getValue("/root/main_om/ominfo/ompatinfo/ompatlist["+grd_ompatlist.row+"]/instcd")	
										   + "¢Ë" + model.getValue("/root/main/cond/orddd");
					setParameter("condparam", condparam);
					modal("SPMMO08900", 1, "", "", "", "", "", "left:0; right:0; width:0; height:0; sysmenu:hidden; caption:hidden; min:hidden, max:hidden;");	 	
					
				} else {
					condparam = "I"+ "¢Ë" + model.getValue("/root/main_om/ominfo/ompatinfo/ompatlist["+grd_ompatlist.row+"]/pid") 
										   + "¢Ë" + model.getValue("/root/main_om/ominfo/ompatinfo/ompatlist["+grd_ompatlist.row+"]/indd") 
					 					   + "¢Ë" + model.getValue("/root/main_om/ominfo/ompatinfo/ompatlist["+grd_ompatlist.row+"]/cretno") 
										   + "¢Ë" + model.getValue("/root/main_om/ominfo/ompatinfo/ompatlist["+grd_ompatlist.row+"]/instcd")	
										   + "¢Ë" + model.getValue("/root/main/cond/orddd");
						
				    setParameter("condparam", condparam);
				    modal("SPMMO08900", 1, "", "", "", "", "", "left:0; right:0; width:0; height:0; sysmenu:hidden; caption:hidden; min:hidden, max:hidden;");	 				     	                              	 				     	       										   								
				}
			} else {							
				condparam = "I"+ "¢Ë" + model.getValue("/root/main_nm/wardpatinfo/wardpatlist["+grd_wardpatlist.row+"]/pid") 
	  		     	               + "¢Ë" + model.getValue("/root/main_nm/wardpatinfo/wardpatlist["+grd_wardpatlist.row+"]/indd") 
	     	                              + "¢Ë" + model.getValue("/root/main_nm/wardpatinfo/wardpatlist["+grd_wardpatlist.row+"]/cretno") 
	     	                              + "¢Ë" + model.getValue("/root/main_nm/wardpatinfo/wardpatlist["+grd_wardpatlist.row+"]/instcd")
	     	                             + "¢Ë" + model.getValue("/root/main/cond/orddd");
			    
				setParameter("condparam", condparam);

	     	    //»ó´Ü ¼¼Æà ȭ¸é »çÀÌÁî ÀÛ°Ô ¶ç¿ò
	     	    modal("SPMMO08900", 1, "", "", "", "", "", "left:0; right:0; width:0; height:0; sysmenu:hidden; caption:hidden; min:hidden, max:hidden;");													
		        				     	   /*
	     	      var indschacptstat = model.getValue("/root/main/cond/indschacptstat");
	     	      if(indschacptstat == "1" || indschacptstat == "3"){  // Á¶È¸Á¶°ÇÀÌ Àç¿ø,Åð¿øÁøÇà ÀÏ °æ¿ì
	     	      	condparam = "I"+ "¢Ë" + model.getValue("/root/main_nm/wardpatinfo/wardpatlist["+grd_wardpatlist.row+"]/pid") 
	  		     	               + "¢Ë" + model.getValue("/root/main_nm/wardpatinfo/wardpatlist["+grd_wardpatlist.row+"]/indd") 
	     	                              + "¢Ë" + model.getValue("/root/main_nm/wardpatinfo/wardpatlist["+grd_wardpatlist.row+"]/cretno") 
	     	                              + "¢Ë" + model.getValue("/root/main_nm/wardpatinfo/wardpatlist["+grd_wardpatlist.row+"]/instcd")
	     	                             + "¢Ë" + getCurrentDate();
	     	      }else{
	     	      	condparam = "I"+ "¢Ë" + model.getValue("/root/main_nm/wardpatinfo/wardpatlist["+grd_wardpatlist.row+"]/pid") 
	  		     	               + "¢Ë" + model.getValue("/root/main_nm/wardpatinfo/wardpatlist["+grd_wardpatlist.row+"]/indd") 
	     	                              + "¢Ë" + model.getValue("/root/main_nm/wardpatinfo/wardpatlist["+grd_wardpatlist.row+"]/cretno") 
	     	                              + "¢Ë" + model.getValue("/root/main_nm/wardpatinfo/wardpatlist["+grd_wardpatlist.row+"]/instcd")
	     	                             + "¢Ë" + model.getValue("/root/main/cond/orddd");
	     	      }
	     	    */
	
			}
			
			
			//20110901_KNUH_End
		}					
    //--------------(20101226) °æºÏ´ë        
    
    
function fSetNrRecord (flag, oldSupCD, newSupCD, recdt) {
	
	var oldBedPos, newBedPos;
	
	if (oldSupCD == "BDD") {
		oldBedPos = "EICU";
	} else if (oldSupCD == "BDE") {
		oldBedPos = "ÀÀ±ÞÀÔ¿ø½Ç";
	} else if (oldSupCD == "BDT") {
		oldBedPos = "[TR]¿Ü»ó¼Ò»ý±¸¿ª";
	}	else {
		oldBedPos = "ÀÀ±Þ½Ç";
	}
	
	if (newSupCD == "BDD") {
		newBedPos = "EICU";
	} else if (newSupCD == "BDE") {
		newBedPos = "ÀÀ±ÞÀÔ¿ø½Ç";
	} else if (newSupCD == "BDT") {
		newBedPos = "[TR]¿Ü»ó¼Ò»ý±¸¿ª";
	} else {
		newBedPos = "ÀÀ±Þ½Ç";
	}
	
	if (flag == "new") {
		TextStmtInfo = newBedPos + " ÀÔ½ÇÇÔ.";
	} else {
		TextStmtInfo = oldBedPos + " Åð½Ç, " + newBedPos + " ÀÔ½ÇÇÔ.";
	}

  var sPid = model.getValue("/root/main/ercensusinfo/patinfo/pid");
  var sIndd = model.getValue("/root/main/ercensusinfo/patinfo/indd");
  var sCretno = model.getValue("/root/main/ercensusinfo/patinfo/cretno");
  var sInstcd = getUserInfo("dutplceinstcd");
  var sRecdt = recdt;
	
	setParameter("SMMNR03400_ParamBase", "recflag¢Ëdutplaccd¢Ëreclnkkey¢ÌE¢Ë010¢Ë"+ sPid + "," + sIndd + "," + sCretno + "," + sInstcd+"¢Ì");
	setParameter("SMMNR03400_ParamSaveText", "S¢ËA¢Ë"+sRecdt+"¢Ë"+TextStmtInfo+"¢Ì");
	modal("SMMNR03400");
}

function fPatQi(){
	var pid 			= model.getValue("/root/main/nursemainlist/nursemaininfo[" + nursemaininfo.row + "]/pid");
	var hngnm 		= model.getValue("/root/main/nursemainlist/nursemaininfo[" + nursemaininfo.row + "]/patnm");
	var orddeptcd 	= model.getValue("/root/main/nursemainlist/nursemaininfo[" + nursemaininfo.row + "]/deptcd");
	var medispclid 	= model.getValue("/root/main/nursemainlist/nursemaininfo[" + nursemaininfo.row + "]/juorddrid2");
	var diagnm		= model.getValue("/root/main/nursemainlist/nursemaininfo[" + nursemaininfo.row + "]/diagnm");
	var diagcd 		= model.getValue("/root/main/nursemainlist/nursemaininfo[" + nursemaininfo.row + "]/diagcd");
	var sexagestr 	= model.getValue("/root/main/nursemainlist/nursemaininfo[" + nursemaininfo.row + "]/grdrage").split("/");
	if( sexagestr[0] == "F" ) { var sex = "¿©ÀÚ"; }
	if( sexagestr[0] == "M" ){ var sex = "³²ÀÚ"; }	
	var age 			= sexagestr[1];
	var wardcd 		= model.getValue("/root/main/cond/wardcd");
	var roomcd		= "ERBD";
	var ioflag			= model.getValue("/root/main/nursemainlist/nursemaininfo[" + nursemaininfo.row + "]/ordtype");
	
	setParameter("SMMQR00100_PARAM", pid + "¢Ë" + hngnm + "¢Ë" + orddeptcd + "¢Ë" + medispclid + "¢Ë" + diagnm + "¢Ë" + diagcd + "¢Ë" + sex + "¢Ë" + age + "¢Ë" + wardcd + "¢Ë" + roomcd + "¢Ë" + ioflag);
	modal("../../../emr/qiweb/xrw/SMMQR00100", "","", "", "SMMQR00100", "", "");
}