/*

      Ä«µ¦½º°ü¸®(SMMNB00200_Ä«µ¦½º°ü¸®.xrw - JScript )

      - Version :
          1)  : Ver.1.00.01
 */
var ePID = "";
var eINDD = "";
var eCRETNO = "";
//20110208_SMYÃß°¡
var eORDTYPE = "";
var eINSTCD = "";
//20110211_SMYÃß°¡
var eERDEPTCD = "";
var eERFLAG = "";

var ePRCPDD = "";

var xPathPatDetlInfo            = "/root/main/kardexinfo/patdetlinfo";//ȯÀÚ»ó¼¼Á¤º¸
var xPathPatList                = "/root/main/kardexinfo/ompatlist";
var xPathHiddenPatList          = "/root/hidden/kardexinfo/ompatlist";

var xPathTodayScheduleList      = "/root/main/kardexinfo/todayschedulelist";//¿À´Ã½ºÄÉÁì
var xPathTomorrowScheduleList   = "/root/main/kardexinfo/tomorrowschedulelist";//³»ÀϽºÄÉÁì

var xPathAssessInfo             = "/root/main/kardexinfo/assessinfo";//ÃÖ±ÙAssess

var xPathTodayList1             = "/root/main/kardexinfo/todaylist1";//¿åâ
var xPathTodayList2             = "/root/main/kardexinfo/todaylist2";//ÅëÁõ

var xPathTodayList3             = "/root/main/kardexinfo/todaylist3";//À¯Áö±â±¸
var xPathHiddenTodayList3       = "/root/hidden/kardexinfo/todaylist3";//À¯Áö±â±¸

var xPathCardexSetList          = "/root/main/kardexinfo/cardexsetlist";//Ä«µ¦½ºsetÁ¤º¸
var xPathHidCardexSetList          = "/root/hidden/kardexinfo/cardexsetlist";//Ä«µ¦½ºsetÁ¤º¸

var xPathMemoList               = "/root/main/kardexinfo/memolist";
var xPathHidMemoList               = "/root/hidden/kardexinfo/memolist";

var xPathConsultInfo            = "/root/main/kardexinfo/consultinfo"

var xPathNarcInfo               = "/root/main/kardexinfo/narclist"
var xPathHiddenNarcInfo         = "/root/hidden/kardexinfo/narclist"

var xPathHiddenCatheterList     = "/root/hidden/kardexinfo/catheterlist";//Á¶È¸½Ã hidden°Ë»ç°ü¸®Á¤º¸
var xPathCatheterList           = "/root/main/kardexinfo/catheterlist";//CatheterÁ¤º¸

var xPathMedrMemoInfo           = "/root/main/kardexinfo/medrmemoinfo";
var xPathHidMedrMemoInfo           = "/root/hidden/kardexinfo/medrmemoinfo";

var xPathMedrList               = "/root/main/kardexinfo/medrlist";
var xPathMedrPrcpddList         = "/root/main/kardexinfo/medrprcpdd";
var xPathMedrPrcpList           = "/root/main/kardexinfo/medrprcplist";

var xPathHiddenTestList         = "/root/hidden/kardexinfo/testlist";//Á¶È¸½Ã hidden°Ë»ç°ü¸®Á¤º¸
var xPathTestList               = "/root/main/kardexinfo/testlist";//½ÇÁ¦ º¸ÀÌ´Â °Ë»ç°ü¸®Á¤º¸

/**
 * @group  :
 * @ver    : 2007.10.08
 * @by     : ÃÖ°æ¿ë
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : ÃʱⰪ Á¶È¸
 * @param  :
 * @param  :
 * @return :
 * @---------------------------------------------------
 */
function fInitialize(){
	//fClearExceptPatList();

	//------------(20101019) °æºÏ´ë
	//ÀÀ±ÞÀÇ·á¼¾ÅÍ ºÎ¼­ÄÚµå ÃßÃâ
  	model.makeValue("/root/send/cdgrupid", "'002'");
	model.makeValue("/root/send/srchdd"  , getCurrentDate());  // Á¶È¸±âÁØÀÏÀÚ  
  	if(submit("TRMNW00001", false)){
  		eERDEPTCD = model.getvalue("/root/code/codeinfo/codelist/cdid");
  	}
  	
    btn_today.selected = true;
	model.makeValue(xPathPatDetlInfo + "/roomcd", "º´½Ç");
	model.makeValue(xPathPatDetlInfo + "/pid", "µî·Ï¹øÈ£");
	model.makeValue(xPathPatDetlInfo + "/patnm", "ȯÀÚ¸í");
	model.makeValue(xPathPatDetlInfo + "/sexage", "S/A");

	//¿À´Ã ³¯Â¥·Î ÃʱâÈ­ ÇÏ´Â ºÎºÐ.(Áø·áÀÏÀÚ¸¦ default·Î ¿À´Ã ³¯Â¥·Î ¼±ÅÃÇÔ)
	model.setValue("/root/main/cond/settingrnid", "");
	model.setValue("/root/main/cond/userid", getUserId());
	model.setValue("/root/main/cond/usernm", getUserName());
	model.setValue("/root/main/cond/orddd", getCurrentDate());

  

	// ȯÀÚÁ¤º¸ Á¶È¸
	
	model.removenodeSet("/root/main/paminfo");
	
	model.makeNode("/root/main/paminfo");
	
	var sPamInfo = getGlobalVariable("paminfo");
	setCSVToNode("/root/main/paminfo",sPamInfo,"pamlist");
    
	ePID = model.getValue("/root/main/paminfo/pamlist/pid");
    eINDD = model.getValue("/root/main/paminfo/pamlist/indd");
    eCRETNO = model.getValue("/root/main/paminfo/pamlist/cretno");
    
  
	var sWardCd = model.getValue("/root/main/paminfo/pamlist/wardcd");
	if( !isNull(sWardCd)){
		model.setValue("/root/main/cond/wardcd", sWardCd);
	}else{
	    model.setValue("/root/main/cond/wardcd", getUserInfo("dutplcecd"));
	}
	
	//°øÅëÇÔ¼ö·Î ¼öÁ¤_20110211_ SMY
	fGetWardChngInfo();
	/*
	model.removeNodeset("/root/send/reqdata");
	model.makeNode("/root/send/reqdata");
	model.makeValue("/root/send/reqdata/wardcd", model.getValue("/root/main/cond/wardcd"));
	submit("TRMNW00101");
	for(i=1; i <= getNodesetCount("/root/init/settingrn"); i++ ) {
		if (model.getValue("/root/main/cond/userid") == model.getValue("/root/init/settingrn["+ i +"]/settingrnid")) {
          		model.setValue("/root/main/cond/settingrnid", model.getValue("/root/main/cond/userid"));
		}
	}
	*/

	//ÀÀ±Þ½Ç ±¸¿ªÁ¤º¸ ¼ÂÆÃÃß°¡_20110216_SMY
	var sSectionCd = model.getValue("/root/main/paminfo/pamlist/sectioncd");
	if( !isNull(sSectionCd)){
		model.setValue("/root/main/cond/zonecd", sSectionCd);
	}

	
//	model.makeNode("/root/init/A0078list");
//	zbcfGetCodeList(new Array("A0078"), new Array("/root/init/A0078list"));	// ¿¹¾à»óű¸ºÐ(A0078)

	//ȯÀÚ¸®½ºÆ® Á¶È¸
	if ( isNull(ePID) ){
	    fGetMedSpccdList("pat");
	} else {
	    fGetMedSpccdList("all");
	}
	
	
}

/**
 * @group  :
 * @ver    : 2011.02.11
 * @by     : ¼º¹Ì¿¬
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : º´µ¿, ³»È¯ÀÚ, ±¸¿ªÁ¤º¸(ÀÀ±Þ½ÇÀÎ °æ¿ì) Á¶È¸
 * @param  :
 * @param  :
 * @return :
 * @---------------------------------------------------
 */
function fGetWardChngInfo(){
	if ( model.getValue("/root/main/cond/wardcd") == eERDEPTCD) { 
		eERFLAG = "Y";
	}else{
		eERFLAG = "";
	}
	
	model.removeNodeset("/root/send/reqdata");
	model.makeNode("/root/send/reqdata");
	model.makeValue("/root/send/reqdata/wardcd", model.getValue("/root/main/cond/wardcd"));
	submit("TRMNW00101");
	model.setValue("/root/main/cond/settingrnid", "");
	for(i=1; i <= getNodesetCount("/root/init/settingrn"); i++ ) {
		if (model.getValue("/root/main/cond/userid") == model.getValue("/root/init/settingrn["+ i +"]/settingrnid")) {
          		model.setValue("/root/main/cond/settingrnid", model.getValue("/root/main/cond/userid"));
		}
	}
	
	//ÀÀ±Þ½ÇÀÎ °æ¿ì ±¸¿ªÁ¤º¸ Ãß°¡Á¶È¸
	if(eERFLAG == "Y"){
		fGetZoneList();
		cmb_zone.visible = "true";
		cap_settingrnid.attribute("text") = "±¸ ¿ª:";
		btn_settingrnid.visible = "false";
		model.setValue("/root/main/cond/zonecd", "-");
	}else{
		cmb_zone.visible = "false";
		cap_settingrnid.attribute("text") = "³»È¯ÀÚ:"
		btn_settingrnid.visible = "true";
		model.setValue("/root/main/cond/zonecd", "");
	}
	cmb_zone.refresh();
	cap_settingrnid.refresh();
	btn_settingrnid.refresh();
}


/**
 * @group  :
 * @ver    : 2007.10.08
 * @by     : ±èÈ«Á¡
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : ȯÀÚ¸®½ºÆ® Ŭ¸¯½Ã ȯÀÚ »ó¼¼Á¤º¸ ¼ÂÆÃ
 * @param  :
 * @param  :
 * @return :
 * @---------------------------------------------------
 */
function fSettingPatDetlInfo(rowNo) {
    //assess Á¤º¸ ¼ÂÆà Äõ¸®ºÐ¸® 20090109 ±èÈ«Á¡

//    model.makeValue(xPathAssessInfo + "/weight",    model.getValue(xPathPatList + "[" + rowNo + "]/weight"));
//    model.makeValue(xPathAssessInfo + "/height",     model.getValue(xPathPatList + "[" + rowNo + "]/height"));
//    model.makeValue(xPathAssessInfo + "/serigrade",  model.getValue(xPathPatList + "[" + rowNo + "]/serigrade"));
//    model.makeValue(xPathAssessInfo + "/bedsore",    model.getValue(xPathPatList + "[" + rowNo + "]/bedsore"));
//    model.makeValue(xPathAssessInfo + "/fallhurt",   model.getValue(xPathPatList + "[" + rowNo + "]/fallhurt"));

    //»ó´Ü ȯÀÚ Á¤º¸ ¼ÂÆÃ

    model.makeValue(xPathPatDetlInfo + "/roomcd",     model.getValue(xPathPatList + "[" + rowNo + "]/roomcd"));
    model.makeValue(xPathPatDetlInfo + "/pid",        model.getValue(xPathPatList + "[" + rowNo + "]/pid"));
    model.makeValue(xPathPatDetlInfo + "/patnm",      model.getValue(xPathPatList + "[" + rowNo + "]/patnm"));
    model.makeValue(xPathPatDetlInfo + "/sexage",     model.getValue(xPathPatList + "[" + rowNo + "]/sexage"));
    model.makeValue(xPathPatDetlInfo + "/vipyn",      model.getValue(xPathPatList + "[" + rowNo + "]/vipyn"));
    model.makeValue(xPathPatDetlInfo + "/rqstyn",     model.getValue(xPathPatList + "[" + rowNo + "]/rqstyn"));
    model.makeValue(xPathPatDetlInfo + "/spcffactyn", model.getValue(xPathPatList + "[" + rowNo + "]/spcffactyn"));
    model.makeValue(xPathPatDetlInfo + "/clincstdyyn",model.getValue(xPathPatList + "[" + rowNo + "]/clincstdyyn"));
    model.makeValue(xPathPatDetlInfo + "/cpyn",       model.getValue(xPathPatList + "[" + rowNo + "]/cpyn"));
    model.makeValue(xPathPatDetlInfo + "/indschstat", model.getValue(xPathPatList + "[" + rowNo + "]/indschstat"));
    model.makeValue(xPathPatDetlInfo + "/serdiag",    model.getValue(xPathPatList + "[" + rowNo + "]/serdiag"));
    model.makeValue(xPathPatDetlInfo + "/rarediag",    model.getValue(xPathPatList + "[" + rowNo + "]/rarediag"));
	model.makeValue(xPathPatDetlInfo + "/chngroomstat",    model.getValue(xPathPatList + "[" + rowNo + "]/chngroomstat"));

	if(model.getValue(xPathPatDetlInfo + "/vipyn")       !="" ){cap_vipyn.attribute('background-color') = '#ffff99';}
	else{														cap_vipyn.attribute('background-color') = '#ffffff';}
	if(model.getValue(xPathPatDetlInfo + "/rqstyn")      !="" ){opt_rqstyn.attribute('background-color') = '#ffff99';}
	else{														opt_rqstyn.attribute('background-color') = '#ffffff';}
	if(model.getValue(xPathPatDetlInfo + "/spcffactyn")  !="" ){opt_spcffactyn.attribute('background-color') = '#ffff99';}
	else{														opt_spcffactyn.attribute('background-color') = '#ffffff';}
	if(model.getValue(xPathPatDetlInfo + "/clincstdyyn") !="" ){cap_clincstdyyn.attribute('background-color') = '#ffff99';}
	else{														cap_clincstdyyn.attribute('background-color') = '#ffffff';}
	if(model.getValue(xPathPatDetlInfo + "/cpyn")        !="" ){opt_cpyn.attribute('background-color') = '#ffff99';}
	else{														opt_cpyn.attribute('background-color') = '#ffffff';}
	if(model.getValue(xPathPatDetlInfo + "/blodprepyn")  !="" ){opt_blodprepyn.attribute('background-color') = '#ffff99';}
	else{														opt_blodprepyn.attribute('background-color') = '#ffffff';}
	if(model.getValue(xPathPatDetlInfo + "/chngroomstat")!="" ){opt_chngroomstat.attribute('background-color') = '#ffff99';}
	else{														opt_chngroomstat.attribute('background-color') = '#ffffff';}
	if(model.getValue(xPathPatDetlInfo + "/indschstat")  !="" ){opt_indschstat.attribute('background-color') = '#ffff99';}
	else{														opt_indschstat.attribute('background-color') = '#ffffff';}

    var blodprep = model.getValue(xPathPatList + "[" + rowNo + "]/blodprepyn");


	if (blodprep == "Y") {
		opt_blodprepyn.attribute("background-image") = "../../../emr/commonweb/images/blood.gif";
	} else {
		opt_blodprepyn.attribute("background-image") = "";
	}
    model.refresh();
}


/**
 * @group  :
 * @ver    : 2007.10.08
 * @by     : ±èÈ«Á¡
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : ȯÀÚ¸®½ºÆ® Ŭ¸¯½Ã
 * @param  :
 * @param  :
 * @return :
 * @---------------------------------------------------
 */
function fClickPatList() {
	
    if (grd_patlist.row > 0 ) {
    	
    	//debugger;
    	ePID = model.getValue(xPathPatList + "[" + grd_patlist.row + "]/pid");
    	
    	if(ePID == "3292911") { // ¸Þ¸£½º È®Á¤È¯ÀÚ
           if (!fContainsHardCD("5703", getUserInfo("userid"))) {
               messageBox("ȯÀÚ¹øÈ£ : " + pid + "\n°³ÀÎÁ¤º¸º¸È£ °ü¸®´ë»ó ȯÀÚ·Î Á¢±Ù±ÇÇÑÀ» Á¦ÇÑ ÇÕ´Ï´Ù.\n\nÁø·áÁö¿ø½ÇÀå ¾çµ¿Çå", "E999");
               return ;
           }
       }
    	
    	//ÀÀ±Þ½Ç »ó´ÜÃß°¡----------(20101018) °æºÏ´ë
		if ( model.getValue("/root/main/cond/wardcd") != eERDEPTCD ) {    
    		//ÀÔ¿ø	
	        ePID = model.getValue(xPathPatList + "[" + grd_patlist.row + "]/pid");
	        eINDD = model.getValue(xPathPatList + "[" + grd_patlist.row + "]/indd");
	        eCRETNO = model.getValue(xPathPatList + "[" + grd_patlist.row + "]/cretno");
	
	        //fSettingPatDetlInfo( grd_patlist.row );
	
	        // »ó´Ü ¼¼ÆÃÀ» À§ÇÑ ÆĶó¹ÌÅÍ
	        condparam = "I"+ "¢Ë" + model.getValue(xPathPatList + "[" + grd_patlist.row + "]/pid")
	                       + "¢Ë" + model.getValue(xPathPatList + "[" + grd_patlist.row + "]/indd")
	                       + "¢Ë" + model.getValue(xPathPatList + "[" + grd_patlist.row + "]/cretno")
	                       + "¢Ë" + model.getValue(xPathPatList + "[" + grd_patlist.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 {
		  //ÀÀ±Þ
		  eORDTYPE = model.getValue(xPathPatList + "[" + grd_patlist.row + "]/ordtype" );      	
     	  ePID     = model.getValue(xPathPatList + "[" + grd_patlist.row + "]/pid"     );
     	  eINDD    = model.getValue(xPathPatList + "[" + grd_patlist.row + "]/indd"    );
     	  eCRETNO  = model.getValue(xPathPatList + "[" + grd_patlist.row + "]/cretno"  );
     	  eINSTCD  = model.getValue(xPathPatList + "[" + grd_patlist.row + "]/instcd"  );
     	  //var sSrchdd  = model.getValue(xPathPatList + "[" + grd_patlist.row + "]/dschdd"  );
     	  
	     var param = "E" + "¢Ë"
	               + ePID     + "¢Ë" 
	               + eINDD    + "¢Ë" 
	               + eCRETNO  + "¢Ë"     
	               + eINSTCD  + "¢Ë" ;
	               //+ sSrchdd  + "¢Ë" ;
  
	     setParameter("condparam",  param);
	     
	     modal("SPMMO08900", 1, "", "", "", "", "", "left:0; right:0; width:0; height:0; sysmenu:hidden; caption:hidden; min:hidden, max:hidden;");			
		}
		//----------(20101018) °æºÏ´ë
        
        //to-do listÁ¶È¸
        //fGetTodoList();

        //¸Þ¸ð¸®½ºÆ® Á¶È¸
        //fGetMemoList();

        //Åõ¾à,°Ë»ç°ü¸® Á¶È¸ 20081216 Ä«µ¦½ºÁ¤º¸ ¸ðµÎ Á¶È¸ ±èÈ«Á¡ ¼öÁ¤

        fGetMedSpccdList("clickpat");
    }
    
    var mainObj = getMainViewer();
     
    if(mainObj != null) {
    	  scrid = mainObj.javascript.getScreenID();
    	  
    	  if(scrid == "SMMNW00100") {
    	  	mainObj.javascript.fInqurySelectedPrgm();	
    	  } else if(scrid == "SMMNE00100"){
    	  	mainObj.javascript.fSeletedSrcTool();	
    	  }
    }
    
    
     
}


function fActivitySave(pDelFlag){
	model.removeNodeset("/root/send/savedata");

//alert()
//	if ( grd_cadexset.row != -1 ||
//	     isNull(model.getValue(xPathCardexSetList + "["+grd_cadexset.row+"]/itemcnts")) ){
//
//	    messageBox("ÀúÀåÇÒ ","E013");
//	    return;
//	}
//
	var savecnt = 1;
	for( var idx = 1
	   ; idx <= grd_cadexset.rows - grd_cadexset.fixedRows
	   ; idx++ ){

        if( pDelFlag != "delete"
          && (model.getValue(xPathCardexSetList + "["+idx+"]/status") == "i"
          || model.getValue(xPathCardexSetList + "["+idx+"]/status") == "u") ){

        	if ( isNull(model.getValue(xPathCardexSetList + "["+idx+"]/itemcnts")) ){

        	    messageBox("ÀúÀåÇÒ ³»¿ëÀ» ", "C001");//ÀÔ·ÂÇϽʽÿä
        	    return;
        	}

            if(grd_cadexset.labelMatrix( idx , grd_cadexset.colRef("itemnm"))== "Activity"){
                model.makeValue("/root/send/savedata["+ savecnt +"]/status", model.getValue(xPathCardexSetList + "["+idx+"]/status"));
            	model.makeValue("/root/send/savedata["+ savecnt +"]/pid", model.getValue(xPathPatList + "[" + grd_patlist.row + "]/pid"));
            	model.makeValue("/root/send/savedata["+ savecnt +"]/indd", model.getValue(xPathPatList + "[" + grd_patlist.row + "]/indd"));
            	model.makeValue("/root/send/savedata["+ savecnt +"]/cretno", model.getValue(xPathPatList + "[" + grd_patlist.row + "]/cretno"));
            	model.makeValue("/root/send/savedata["+ savecnt +"]/orddd", model.getValue("/root/main/cond/orddd"));
            	model.makeValue("/root/send/savedata["+ savecnt +"]/apntflag", "C");
            	model.makeValue("/root/send/savedata["+ savecnt +"]/prcpcd", "-");
            	model.makeValue("/root/send/savedata["+ savecnt +"]/bizspec", model.getValue(xPathCardexSetList + "["+idx+"]/itemcnts"));
            	model.makeValue("/root/send/savedata["+ savecnt +"]/itemcd", "test");
            	model.makeValue("/root/send/savedata["+ savecnt +"]/apntseqno", model.getValue(xPathCardexSetList + "["+idx+"]/flag"));
            	model.makeValue("/root/send/savedata["+ savecnt +"]/memocnts", model.getValue(xPathCardexSetList + "["+idx+"]/itemcnts"));
            	model.makeValue("/root/send/savedata["+ savecnt +"]/memoitemflag", "07");
            	model.makeValue("/root/send/savedata["+ savecnt +"]/seqno", model.getValue(xPathCardexSetList + "["+idx+"]/flag"));
            	model.makeValue("/root/send/savedata["+ savecnt +"]/recdd_b", model.getValue(xPathCardexSetList + "["+idx+"]/recdd").substring(0,8));//ƯÀÌ»çÇ×Àº ÀϽð¡ Á¶È¸µÇ¾î³Ñ¾î¿È.
                model.makeValue("/root/send/savedata["+ savecnt +"]/rectm_b", model.getValue(xPathCardexSetList + "["+idx+"]/recdd").substring(8));

            } else {
                model.makeValue("/root/send/savedata["+ savecnt +"]/status", model.getValue(xPathCardexSetList + "["+idx+"]/status"));
            	model.makeValue("/root/send/savedata["+ savecnt +"]/pid", model.getValue(xPathPatList + "[" + grd_patlist.row + "]/pid"));
            	model.makeValue("/root/send/savedata["+ savecnt +"]/indd", model.getValue(xPathPatList + "[" + grd_patlist.row + "]/indd"));
            	model.makeValue("/root/send/savedata["+ savecnt +"]/cretno", model.getValue(xPathPatList + "[" + grd_patlist.row + "]/cretno"));
            	model.makeValue("/root/send/savedata["+ savecnt +"]/orddd", model.getValue("/root/main/cond/orddd"));
            	model.makeValue("/root/send/savedata["+ savecnt +"]/apntflag", "ƯÀÌ");
            	model.makeValue("/root/send/savedata["+ savecnt +"]/prcpcd", "-");
            	model.makeValue("/root/send/savedata["+ savecnt +"]/bizspec", model.getValue(xPathCardexSetList + "["+idx+"]/itemcnts"));
            	model.makeValue("/root/send/savedata["+ savecnt +"]/itemcd", "test");
            	model.makeValue("/root/send/savedata["+ savecnt +"]/apntseqno", model.getValue(xPathCardexSetList + "["+idx+"]/flag"));
            	model.makeValue("/root/send/savedata["+ savecnt +"]/memocnts", model.getValue(xPathCardexSetList + "["+idx+"]/itemcnts"));
            	model.makeValue("/root/send/savedata["+ savecnt +"]/memoitemflag", "07");
            	model.makeValue("/root/send/savedata["+ savecnt +"]/seqno", model.getValue(xPathCardexSetList + "["+idx+"]/flag"));
            	model.makeValue("/root/send/savedata["+ savecnt +"]/recdd_b", model.getValue(xPathCardexSetList + "["+idx+"]/recdd").substring(0,8));//ƯÀÌ»çÇ×Àº ÀϽð¡ Á¶È¸µÇ¾î³Ñ¾î¿È.
                model.makeValue("/root/send/savedata["+ savecnt +"]/rectm_b", model.getValue(xPathCardexSetList + "["+idx+"]/recdd").substring(8));

            }
        }else if ( pDelFlag == "delete"
            && model.getValue(xPathCardexSetList + "["+idx+"]/status") == "d"){
            if(grd_cadexset.labelMatrix( idx , grd_cadexset.colRef("itemnm"))== "Activity"){
                model.makeValue("/root/send/savedata["+ savecnt +"]/status", "d");
            	model.makeValue("/root/send/savedata["+ savecnt +"]/apntflag", "C");
            	model.makeValue("/root/send/savedata["+ savecnt +"]/apntseqno", model.getValue(xPathCardexSetList + "["+idx+"]/flag"));
            	model.makeValue("/root/send/savedata["+ savecnt +"]/pid", model.getValue(xPathPatList + "[" + grd_patlist.row + "]/pid"));
            	model.makeValue("/root/send/savedata["+ savecnt +"]/indd", model.getValue(xPathPatList + "[" + grd_patlist.row + "]/indd"));
            	model.makeValue("/root/send/savedata["+ savecnt +"]/cretno", model.getValue(xPathPatList + "[" + grd_patlist.row + "]/cretno"));
            	model.makeValue("/root/send/savedata["+ savecnt +"]/orddd", model.getValue("/root/main/cond/orddd"));
            	model.makeValue("/root/send/savedata["+ savecnt +"]/memoitemflag", "07");
            	model.makeValue("/root/send/savedata["+ savecnt +"]/seqno", model.getValue(xPathCardexSetList + "["+idx+"]/flag"));
            	model.makeValue("/root/send/savedata["+ savecnt +"]/recdd_b", model.getValue(xPathCardexSetList + "["+idx+"]/recdd").substring(0,8));//ƯÀÌ»çÇ×Àº ÀϽð¡ Á¶È¸µÇ¾î³Ñ¾î¿È.
                model.makeValue("/root/send/savedata["+ savecnt +"]/rectm_b", model.getValue(xPathCardexSetList + "["+idx+"]/recdd").substring(8));
            } else {
                model.makeValue("/root/send/savedata["+ savecnt +"]/status", "d");
            	model.makeValue("/root/send/savedata["+ savecnt +"]/apntflag", "ƯÀÌ");
            	model.makeValue("/root/send/savedata["+ savecnt +"]/apntseqno", model.getValue(xPathCardexSetList + "["+idx+"]/flag"));
            	model.makeValue("/root/send/savedata["+ savecnt +"]/pid", model.getValue(xPathPatList + "[" + grd_patlist.row + "]/pid"));
            	model.makeValue("/root/send/savedata["+ savecnt +"]/indd", model.getValue(xPathPatList + "[" + grd_patlist.row + "]/indd"));
            	model.makeValue("/root/send/savedata["+ savecnt +"]/cretno", model.getValue(xPathPatList + "[" + grd_patlist.row + "]/cretno"));
            	model.makeValue("/root/send/savedata["+ savecnt +"]/orddd", model.getValue("/root/main/cond/orddd"));
            	model.makeValue("/root/send/savedata["+ savecnt +"]/memoitemflag", "07");
            	model.makeValue("/root/send/savedata["+ savecnt +"]/seqno", model.getValue(xPathCardexSetList + "["+idx+"]/flag"));
            	model.makeValue("/root/send/savedata["+ savecnt +"]/recdd_b", model.getValue(xPathCardexSetList + "["+idx+"]/recdd").substring(0,8));//ƯÀÌ»çÇ×Àº ÀϽð¡ Á¶È¸µÇ¾î³Ñ¾î¿È.
                model.makeValue("/root/send/savedata["+ savecnt +"]/rectm_b", model.getValue(xPathCardexSetList + "["+idx+"]/recdd").substring(8));

            }

        }

	    savecnt++;
	}

    if ( getNodesetCount("/root/send/savedata") <= 0 ){
        return;
    }
    model.removeNodeSet(xPathCardexSetList);

    if(submit("TXMNB00204","false")){

    	//Ä«µ¦½º Á¤º¸ Setting
	    if ( getNodesetCount(xPathHidCardexSetList) > 0 ){
    	    model.makeNode(xPathCardexSetList);
    	    copyNodesetType(xPathCardexSetList, xPathHidCardexSetList, "replace", model, model);

	    }
    	grd_cadexset.rebuild();
    }
}

/**
 * @group  :
 * @ver    : 2007.10.08
 * @by     : ±èÈ«Á¡
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : ȯÀÚ¹øÈ£°¡ ¾ø°Å³ª ³»È¯ÀÚ, ¾÷¹«ÀÏÀÚ value change½Ã ȯÀÚ¸®½ºÆ®¿¡
 *           Àü¿ªº¯¼ö¿¡ ȯÀÚÁ¤º¸¿Í ÀÏÄ¡ÇÏ´Â °ªÀÌ Á¸ÀçÇÒ°æ¿ì all ÀÌ°í ¾Æ´Ï¸é patÀ¸·Î Á¶È¸
 * @param  :
 * @param  :
 * @return :
 * @---------------------------------------------------
 */
function fGetKardexInfo() {


}

/**
 * @group  :
 * @ver    : 2007.10.08
 * @by     : ÃÖ°æ¿ë
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : Åõ¾à, °Ë»ç°ü¸® Á¶È¸
 * @param  :srchflag : cardex(Ä«µ¦½º ÀúÀå¹öÆ° Ŭ¸¯ ¹× Æ˾÷È­¸é¿¡¼­ °ª ¼öÁ¤½Ã )
                     , med(Åõ¾à°ü¸® ÀúÀåŬ¸¯½Ã)
                     , test(°Ë»ç°ü¸®ÀÇ Á¶È¸¹öÆ° Ŭ¸¯½Ã)
                     , all (ȯÀÚ¸®½ºÆ®¸¦ Æ÷ÇÔÇÑ ¸ðµçÁ¤º¸  Á¶È¸ÇÒ°æ¿ì )
                     , pat (ȯÀÚ¸®½ºÆ®¸¸ Á¶È¸)
                     , clickpat (ȯÀÚ¸®½ºÆ®¸¦ Ŭ¸¯ÇßÀ»¶§ Á¶È¸)
                     , today (±â±¸°ü¸®±â·Ï È­¸é´ÝÀ»°æ¿ì)
 * @param  :
 * @return :
 * @---------------------------------------------------
 */
function fGetMedSpccdList(srchflag){

	var medrcnt = 0;
	var prcpdd = "";
	var preprcpdd = "";
	var nodecnt = 1;

	var orddd = model.getValue("/root/main/cond/orddd");
	var SUBMIT201 = "TRMNB00201";// all Àΰæ¿ì patÀ¸·Î È£ÃâÇؼ­ ȯÀÚÁ¤º¸¸¸ ¸ÕÀú Á¶È¸Çؼ­ copynode,pat,test,cath Àΰæ¿ì Á¶È¸Çؼ­ copynode
	var SUBMIT203 = "TRMNB00203";// all Àΰæ¿ì clickpat È£Ãâ , clickpatÀΰæ¿ìÀÇ ¼ÓµµÇâ»óÀ» À§ÇØ main ³ëµå¿¡ ¹Ù·Î ¹ÞÀ½.
	var submitID ="";
	var srcNodePath="";
	var destNodePath="";
	var destobj;

	//¸Þ¸ð¸®½ºÆ® Á¶È¸ Á¶°Ç Ãß°¡ 20081216 ±èÈ«Á¡
	model.removeNodeset("/root/send/reqdata");
	model.makeNode("/root/send/reqdata");
	model.makeValue("/root/send/reqdata/wardcd", model.getValue("/root/main/cond/wardcd"));
	model.makeValue("/root/send/reqdata/orddd", orddd);
	model.makeValue("/root/send/reqdata/orddd_1", getDateAddc(orddd, 1));

	//°Ë»ç°ü¸®¿ë Á¶°Ç
	model.makeValue("/root/send/reqdata/twodaypreorddd", getDateAddc(orddd, -1));
	model.makeValue("/root/send/reqdata/twoweekpreorddd", getDateAddc(orddd, -14));

	model.makeValue("/root/send/reqdata/testprcpflag", model.getValue("/root/main/cond/testprcpflag"));
	model.makeValue("/root/send/reqdata/execflag", model.getValue("/root/main/cond/execflag"));

	//model.makeValue("/root/send/reqdata/srchflag", srchflag);
    model.makeValue("/root/send/reqdata/pid", ePID );
    model.makeValue("/root/send/reqdata/indd", eINDD );
    model.makeValue("/root/send/reqdata/cretno", eCRETNO );
   	model.makeValue("/root/send/reqdata/settingrnid", model.getValue("/root/main/cond/settingrnid"));
	
	//ÀÀ±Þ½ÇÁ¤º¸ Ãß°¡_20110211_SMY
	model.makeValue("/root/send/reqdata/erflag", eERFLAG);
	model.makeValue("/root/send/reqdata/zonecd", model.getValue("/root/main/cond/zonecd"));
	
	if ( srchflag =="all" || srchflag =="clickpat" || srchflag == "pat" ){

	    model.makeValue("/root/send/reqdata/srchflag", srchflag);
	    submitID = SUBMIT203;

	    //fClearExceptPatList();

    	if(submit(submitID)){
    	    fSettingCardexDetlInfo();
    	    fCheckNacrCnt();

    	}

	}else {
		
    	model.makeValue("/root/send/reqdata/srchflag", srchflag);
    	submitID = SUBMIT201;

//        model.removeNodeSet("/root/hidden/kardexinfo");

    	destNodePath="";
    	srcNodePath="";

//    	if( srchflag == "pat"){
//    	    model.removeNodeSet(xPathPatList);
//    	    fClearExceptPatList();
//
//    	    srcNodePath = xPathHiddenPatList;
//    	    destNodePath = xPathPatList;
//    	    destobj = grd_patlist;
//    	}else
    	if( srchflag == "test" ){
    	    model.removeNodeSet(xPathTestList);

    	    srcNodePath = xPathHiddenTestList;
    	    destNodePath = xPathTestList;
    	    destobj = grd_test;

    	}else if ( srchflag == "cath" ){
    	    model.removeNodeSet(xPathCatheterList);

    	    srcNodePath = xPathHiddenCatheterList;
    	    destNodePath =  xPathCatheterList;
    	    destobj = grd_catheter;
    	}else if ( srchflag == "today" ){
    	    model.removeNodeSet(xPathTodayList3);

    	    srcNodePath = xPathHiddenTodayList3;
    	    destNodePath =  xPathTodayList3;
    	    destobj = grd_today3;
    	}else if ( srchflag == "narc" ){
    	    model.removeNodeSet(xPathNarcInfo);

    	    srcNodePath = xPathHiddenNarcInfo;
    	    destNodePath =  xPathNarcInfo;
    	    destobj = grd_today3;
    	}

    	if(submit(submitID, false)){
    	    if ( getNodesetCount(srcNodePath) > 0 ){
        	    model.makeNode(destNodePath);
        	    copyNodesetType(destNodePath, srcNodePath, "replace", model, model);

    	    }
       	    destobj.rebuild();
       	    fCheckNacrCnt();
    	}
	}
	fSettingGridColor();
	
//	model.removeNodeSet("/root/main/kardexinfo");
//	model.makeNode("/root/main/kardexinfo");
//
//	if(submit(submitID, false)){
//
//		//btn_medrsave.disabled = true;
//		//model.refresh();
//
//	    if( srchflag == "all" || srchflag == "clickpat" ){
//
////
////    		//ÀÇ·Ú¹× ÄÁ¼³Æ®
////    		model.setValue("/root/main/consultinfo/reqcnt", model.getValue("/root/hidden/medspccdlist/consultinfo/reqcnt"));
////    		model.setValue("/root/main/consultinfo/repcnt", model.getValue("/root/hidden/medspccdlist/consultinfo/repcnt"));
////
////    		//Ä«µ¦½º Á¤º¸ Setting
////    		model.removeNodeSet(xPathCardexSetList);
////    		model.makeNode(xPathCardexSetList);
////    		copyNodesetType(xPathCardexSetList, "/root/hidden/medspccdlist/cardexsetlist", "replace", model, model);
//    		grd_cadexset.rebuild();
////
////    		//¸Þ¸ð Á¤º¸ Setting
////    		model.removeNodeSet(xPathMemoList);
////    		model.makeNode(xPathMemoList);
////    		copyNodesetType(xPathMemoList, "/root/hidden/medspccdlist/memolist", "replace", model, model);
//    		grd_memo.rebuild();
////
////    		//Åõ¾à°ü¸® ¸Þ¸ð Setting
////    		model.removeNodeSet(xPathMedrMemoInfo);
////    		model.makeNode(xPathMedrMemoInfo);
////    		model.copyNode(xPathMedrMemoInfo, "/root/hidden/medspccdlist/medrmemoinfo");
//    		tar_remk1.refresh();
////
////    		//°£È£¼öÇà Á¤º¸ Setting 2008-05-22 1.Ä«µ¦½º_SMMNB00200_±è¼÷ÀÎ.xls ¿ä±¸»çÇ׿¡ ÀÇÇÑ »èÁ¦
//////    		model.removeNodeSet("/root/main/careexecinfo/careexeclist");
//////    		model.makeNode("/root/main/careexecinfo/careexeclist");
//////    		copyNodesetType("/root/main/careexecinfo/careexeclist", "/root/hidden/medspccdlist/careexeclist", "replace", model, model);
//////    		grd_careexec.rebuild();
////
////
////    		//Åõ¾àÁ¤º¸ Setting
////    		medrcnt = getNodesetCount("/root/hidden/medspccdlist/medrlist");
////
////    		model.removeNodeSet(xPathMedrPrcpddList);
////    		model.removeNodeSet(xPathMedrPrcpList);
////
////    		//model.resetInstanceNode(xPathMedrMemoInfo + "");
////
////    		if(medrcnt > 0){
////    			for(var i = 1; i <= medrcnt; i++){
////    				prcpdd = model.getValue("/root/hidden/medspccdlist/medrlist[" + i + "]/prcpdd");
////    				if(i == 1){
////    					preprcpdd = prcpdd;
////    					grd_medi1.addrow(false);
////    					model.setValue("/root/main/medinfo/medrprcpdd[" + nodecnt + "]/prcpdd", prcpdd);
////    					nodecnt++;
////    				}else if(preprcpdd != prcpdd){
////    					preprcpdd = prcpdd;
////    					grd_medi1.addrow(false);
////    					model.setValue("/root/main/medinfo/medrprcpdd[" + nodecnt + "]/prcpdd", prcpdd);
////    					nodecnt++;
////    				}else{}
////    			}
////    		}
//            grd_medi1.rebuild();
////
//    		var meprcpdd  = getNodesetCount(xPathMedrPrcpddList);
//
//    		if (meprcpdd > 0) {
//    			grd_medi1.row = grd_medi1.findRow(model.getValue("/root/main/cond/orddd"), 1, 0);
//    			grd_medi1.topRow = grd_medi1.row-1;
//
//    			fDBClickMedr();
//    		}
//    	}
////    	//Åõ¾à°ü¸® ¸Þ¸ðÁ¶È¸
////    	//fDBClickMemo();
////
//		//ȯÀÚ¼¼ÆÃ
//		if ( srchflag == "all" || srchflag == "pat" ){
//
//        	if( !isNull(ePID) && (srchflag =="all") ){
//        		for(var i = 1; i <= getNodesetCount(xPathPatList); i++){
//        			if(model.getValue(xPathPatList+"[" + i + "]/pid") == ePID){
//        				model.setFocus("grd_patlist");
//        				grd_patlist.row = i;
//        				grd_patlist.dispatch("onentercell");
//                        fSettingPatDetlInfo(grd_patlist.row);
//        				break;
//        			}
//        		}
//        	}
//
//    		grd_patlist.refresh();
//
//    		if ( srchflag == "pat" ){//ȯÀÚ¸®½ºÆ®°¡ ÀçÁ¶È¸µÇ¾úÀ» °æ¿ì ³ª¸ÓÁö Å×À̺íÀº Ŭ¸®¾î
//                fClearExceptPatList();
//    		}
//	    }
//
//		//°Ë»çÁ¤º¸ Setting
//		if ( srchflag == "test" || srchflag == "clickpat" ){
//    		model.removeNodeSet(xPathTestList);
//    		model.makeNode(xPathTestList);
//    		copyNodesetType(xPathTestList, xPathHiddenTestList, "replace", model, model);
//    		grd_test.rebuild();
//	    }
//
//		//catheter Setting
//		if ( srchflag == "cath" || srchflag == "clickpat" ){
//    		model.removeNodeSet(xPathCatheterList);
//    		model.makeNode(xPathCatheterList);
//    		copyNodesetType(xPathCatheterList, xPathHiddenCatheterList, "replace", model, model);
//    		grd_catheter.rebuild();
//	    }
//	}

}

/**
 * @group  :
 * @ver    : 2007.10.08
 * @by     : ±èÈ«Á¡
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : ȯÀÚ¸®½ºÆ®¿¡ ȯÀÚÁ¤º¸ Á¸ÀçÇÏ´ÂÁö üũ
 * @param  :
 * @param  :
 * @return :
 * @---------------------------------------------------
 */
function fCheckExistPid() {
	if( !isNull(ePID) ){
		for(var i = 1; i <= getNodesetCount(xPathPatList); i++){
			if(model.getValue(xPathPatList+"[" + i + "]/pid") == ePID){
				model.setFocus("grd_patlist");
				grd_patlist.row = i;
				break;
			}
		}
	}
}

/**
 * @group  :
 * @ver    : 2007.10.08
 * @by     : ±èÈ«Á¡
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : ȯÀÚÀÇ Ä«µ¦½º Á¤º¸ Á¶È¸ÈÄ ¼¼ÆÃ
 * @param  :
 * @param  :
 * @return :
 * @---------------------------------------------------
 */
function fSettingCardexDetlInfo() {

    fCheckExistPid();

	if ( grd_patlist.row > 0 ){
		grd_patlist.dispatch("onentercell");
        fSettingPatDetlInfo(grd_patlist.row);
    	grd_patlist.refresh();
	}

	cap_today.text = getNodesetCount(xPathTodayScheduleList);
	cap_tomorrow.text = getNodesetCount(xPathTomorrowScheduleList);

	var meprcpdd  = getNodesetCount(xPathMedrPrcpddList);

	if (meprcpdd > 0) {
		grd_medi1.row = grd_medi1.findRow(model.getValue("/root/main/cond/orddd"), 1, 0);
		grd_medi1.topRow = grd_medi1.row-1;

		fDBClickMedr();
	}

}

/**
 * @group  :
 * @ver    : 2007.10.08
 * @by     : ±èÈ«Á¡
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : ȯÀÚ¸®½ºÆ®¸¦ Á¦¿ÜÇÑ È¯ÀÚ »ó¼¼Á¤º¸ °ª clear
 * @param  :
 * @param  :
 * @return :
 * @---------------------------------------------------
 */
function fCheckNacrCnt() {
    //¸¶¾à ¹ÌÁ¤¸®°Ç ºí·¯Å· 20090504 ±èÈ«Á¡
    if ( model.getValue(xPathNarcInfo + "/cnt")  > "0" ){

        messageBox("Á¤¸®µÇÁö ¾ÊÀº ¸¶¾àÀÌ Á¸ÀçÇÕ´Ï´Ù.","I007");
		model.setAttribute("Narc_Menu_Param", "");
		var sParam = "I,op";
		model.setAttribute("Narc_Menu_Param", sParam);
		model.setAttribute("SMADT30400_Fromdd", model.getValue(xPathNarcInfo+"/prcpdd"));
		modal("SMADT30400","1","15","128");
		model.setAttribute("SMADT30400_Fromdd",  "");
		fGetMedSpccdList("narc");
    }

}

/**
 * @group  :
 * @ver    : 2007.10.08
 * @by     : ±èÈ«Á¡
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : ȯÀÚ¸®½ºÆ®¸¦ Á¦¿ÜÇÑ È¯ÀÚ »ó¼¼Á¤º¸ °ª clear
 * @param  :
 * @param  :
 * @return :
 * @---------------------------------------------------
 */
function fClearExceptPatList() {
    model.resetInstanceNode(xPathConsultInfo);
    model.resetInstanceNode(xPathAssessInfo);
    model.resetInstanceNode(xPathMedrMemoInfo);
    model.resetInstanceNode(xPathPatDetlInfo);
    opt_blodprepyn.attribute("background-image") = "";
	model.setValue(xPathPatDetlInfo + "/roomcd", "º´½Ç");
	model.setValue(xPathPatDetlInfo + "/pid", "µî·Ï¹øÈ£");
	model.setValue(xPathPatDetlInfo + "/patnm", "ȯÀÚ¸í");
	model.setValue(xPathPatDetlInfo + "/sexage", "S/A");

    model.removeNodeSet(xPathMemoList);
    model.removeNodeSet(xPathTodayScheduleList);
    model.removeNodeSet(xPathTomorrowScheduleList);
    model.removeNodeSet(xPathTodayList1);
    model.removeNodeSet(xPathTodayList2);
    model.removeNodeSet(xPathTodayList3);
    model.removeNodeSet(xPathCardexSetList);
    model.removeNodeSet(xPathHiddenCatheterList);
    model.removeNodeSet(xPathCatheterList);

    model.removeNodeSet(xPathMedrList);

    model.removeNodeSet(xPathMedrPrcpddList);
    model.removeNodeSet(xPathMedrPrcpList);

    model.removeNodeSet(xPathHiddenTestList);
    model.removeNodeSet(xPathTestList);

}

/**
 * @group  :
 * @ver    : 2007.10.08
 * @by     : ÃÖ°æ¿ë
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : Åõ¾à°ü¸® ó¹æÀû¿ëÀÏ ´õºíŬ¸¯½Ã
 * @param  :
 * @param  :
 * @return :
 * @---------------------------------------------------
 */
function fDBClickMedr(){
	var row = grd_medi1.row;
	var medrcnt = getNodesetCount(xPathMedrList);

	//model.copyNode("/root/main/medinfo/medrprcplist[" + 1 + "]", "/root/hidden/medspccdlist/medrlist[" + 1 + "]");//test
	//alert('test');

	//alert(model.getValue("/root/hidden/medspccdlist/medrlist[1]/prcpvol") + ' testdddd');
	//model.removeNode("/root/main/medinfo");


	var prcpdd = model.getValue(xPathMedrPrcpddList + "[" + row + "]/prcpdd");
	ePRCPDD = prcpdd;
	var hngnm = "";
	var prcpvol = "";
	var prcpvolunitflag = "";
	var prcpqty = "";
	var prcpqtyunitflag = "";
	var prcptims = "";
	var abbrnm = "";
	var drugmthdspccd = "";
	var prcpnm = "";
	var prcpstatnm = "";
	var count = 1;
	var icnt = 1;
	if(medrcnt > 0){
	    model.removeNodeSet(xPathMedrPrcpList);
		model.makeNode(xPathMedrPrcpList);
		copyNodesetType(xPathMedrPrcpList, xPathMedrList + "[prcpdd = '" + prcpdd + "']", "replace", model, model);

	}
	grd_medi2.rebuild();
}

/**
 * @group  :
 * @ver    : 2007.10.08
 * @by     : ÃÖ°æ¿ë
 *           ±èÈ«Á¡ 20081216 »ç¿ë¾ÈÇÔ fGetMedSpccdList("all")¿¡¼­ ¸ðµÎ Á¶È¸ Çϴ°ɷΠ¼öÁ¤
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : ¸Þ¸ð¸®½ºÆ® Á¶È¸
 * @param  :
 * @param  :
 * @return :
 * @---------------------------------------------------
 */
function fGetMemoList(){
	//¸Þ¸ð¸®½ºÆ® Á¶È¸
	model.removeNodeset("/root/send/reqdata");
	model.makeNode("/root/send/reqdata");
	model.makeValue("/root/send/reqdata/wardcd", model.getValue("/root/main/cond/wardcd"));
	model.makeValue("/root/send/reqdata/orddd", model.getValue("/root/main/cond/orddd"));
	model.makeValue("/root/send/reqdata/pid", model.getValue(xPathPatList + "[" + grd_patlist.row + "]/pid"));
	model.makeValue("/root/send/reqdata/indd", model.getValue(xPathPatList + "[" + grd_patlist.row + "]/indd"));
	model.makeValue("/root/send/reqdata/cretno", model.getValue(xPathPatList + "[" + grd_patlist.row + "]/cretno"));
	model.makeValue("/root/send/reqdata/memoitemflag", '05');
	model.removeNodeset("/root/main/memoinfo");
	model.makeNode("/root/main/memoinfo");
	submit("TRMNB00202");
}

/**
 * @group  :
 * @ver    : 2007.10.08
 * @by     : ÃÖ°æ¿ë
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : Åõ¾à°ü¸® ¸Þ¸ð Á¶È¸
 * @param  :
 * @param  :
 * @return :
 * @---------------------------------------------------
 */
function fDBClickMemo(){
	//¸Þ¸ð¸®½ºÆ® Á¶È¸
	model.removeNodeset("/root/send/reqdata");
	model.makeNode("/root/send/reqdata");
	model.makeValue("/root/send/reqdata/wardcd", model.getValue("/root/main/cond/wardcd"));
	//model.makeValue("/root/send/reqdata/orddd", ePRCPDD);
	model.makeValue("/root/send/reqdata/pid", model.getValue(xPathPatList + "[" + grd_patlist.row + "]/pid"));
	model.makeValue("/root/send/reqdata/indd", model.getValue(xPathPatList + "[" + grd_patlist.row + "]/indd"));
	model.makeValue("/root/send/reqdata/cretno", model.getValue(xPathPatList + "[" + grd_patlist.row + "]/cretno"));
	model.makeValue("/root/send/reqdata/memoitemflag", '06');
	submit("TRMNB00204");
	model.setValue(xPathMedrMemoInfo + "/memocnts", model.getValue("/root/hidden/memoinfo/memolist/memocnts"));
	model.setValue(xPathMedrMemoInfo + "/recdd_b", model.getValue("/root/hidden/memoinfo/memolist/recdd"));
	model.setValue(xPathMedrMemoInfo + "/rectm_b", model.getValue("/root/hidden/memoinfo/memolist/rectm"));
	model.setValue(xPathMedrMemoInfo + "/seqno", model.getValue("/root/hidden/memoinfo/memolist/seqno"));
	if( !isNull(model.getValue("/root/hidden/memoinfo/memolist/recdd"))){
		model.setValue(xPathMedrMemoInfo + "/status", "u")
	}
	model.refresh();
}

/**
 * @group  :
 * @ver    : 2007.10.08
 * @by     : ÃÖ°æ¿ë
 *           20081216 ±èÈ«Á¡ not use ¿ä±¸»çÇ׿¡ ÀÇÇØ »ç¿ë¾ÈÇÔ.
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : to-do ¸®½ºÆ® Á¶È¸
 * @param  :
 * @param  :
 * @return :
 * @---------------------------------------------------
 */
function fGetTodoList() {
	model.removeNodeset("/root/main_todo/todoinfo/todopatlist"); // ±³À°´ë»óÀÚ¸®½ºÆ® Clear
	grd_todolist.refresh();
	model.removenode("/root/send");
	model.makeValue("/root/send/wardcd", model.getValue("/root/main/cond/wardcd"));
	model.makeValue("/root/send/orddd", model.getValue("/root/main/cond/orddd"));
	model.makeValue("/root/send/orddd_t", (model.getValue("/root/main/cond/orddd")).toDate().getAddDate(+1, "D").getDateFormat());
	model.makeValue("/root/send/settingrnid", model.getValue("/root/main/cond/settingrnid"));
	model.makeValue("/root/send/memoitemflag", '04');
	model.makeValue("/root/send/status", '01');
	model.makeValue("/root/send/patinfoyn", 'Y');
	grd_todolist.allStyle("data", "background-image") = "";
	model.makeValue("/root/send/pid", model.getValue(xPathPatList + "[" + grd_patlist.row + "]/pid"));
	model.makeValue("/root/send/indd", model.getValue(xPathPatList + "[" + grd_patlist.row + "]/indd"));
	model.makeValue("/root/send/cretno", model.getValue(xPathPatList + "[" + grd_patlist.row + "]/cretno"));
	for(var i = 1 ; i < grd_todolist.rows ; i++){
			for(var j = 17 ; j < 100 ;){
				grd_todolist.cellStyle("background-color", i, j, i,j) = "#FFFFFF";
				j = j+3;
			}
	}
	if (submit("TRMNW00401")) {
		for(var i = 1 ; i < grd_todolist.rows ; i++){
			var blodprep = model.getValue("/root/main_todo/todoinfo/todopatlist[" + i + "]/blodprepyn");
			if (blodprep == "Y") {
				model.setValue("/root/main_todo/todoinfo/todopatlist[" + i + "]/blodprepyn", "");
				grd_todolist.cellstyle("background-image", i , 7) = "../../../emr/commonweb/images/blood.gif";
			} else {
				grd_todolist.cellstyle("background-image", i , 7) = "";
			}
			for(var j = 17 ; j < 100 ;){
				if(grd_todolist.valueMatrix(i,j) == "MEMO"){
					grd_todolist.cellstyle("background-image", i, j+1) = "../../../com/commonweb/images/icon_list.gif";
				}
				 j = j+3;
			}
			for(var j = 19 ; j < 100 ;){
				var execyn = (grd_todolist.valueMatrix(i,j)).substring(18,19);
				if( execyn == "Y"){
					grd_todolist.cellStyle("background-color", i, j-1, i,j-1) = "#F08080";
				}else{
				    grd_todolist.cellStyle("background-color", i, j-1, i,j-1) = grd_todolist.cellStyle("background-color", i, j+1, i,j+1);
				}
				 j = j+3;
			}
		}
	}//submit
}

/**
 * @group  :
 * @ver    : 2008.10.05
 * @by     : ±èÈ«Á¡
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : ƯÀÌ»çÇ× Activity »èÁ¦
 * @param  :
 * @param  :
 * @return :
 * @---------------------------------------------------
 */
function fDelCardexSet(){
    for ( var idx = 0 ; idx < grd_cadexset.selectedRows ; idx++){
        if( model.getValue(xPathCardexSetList + "["+grd_cadexset.selectedRow(idx)+"]/flag") != "0" ){
            model.makeValue(xPathCardexSetList + "["+grd_cadexset.selectedRow(idx)+"]/status", "d");
        }

    }
    fActivitySave("delete");

}

/**
 * @group  :
 * @ver    : 2007.10.08
 * @by     : ÃÖ°æ¿ë
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : ¸Þ¸ð¸®½ºÆ® ÀúÀå
 * @param  :
 * @param  :
 * @return :
 * @---------------------------------------------------
 */
function fExeMomoList() {
	if ( grd_patlist.row == -1) {
		messageBox("ÇØ´ç ȯÀÚ°¡ ¼±ÅõÇÁö", "E007");
		return;
	} else {
	    var memocnts = grd_memo.getUpdateData();

	    for( var cnt = 1 ; cnt < memocnts.split("¢Ì").length-1 ; cnt++ ){
	        if ( getArrayData(memocnts,cnt,2) == "" ){
    	       messageBox("ÀúÀåÇÒ ¸Þ¸ð¸¦", "C001");//" ÀÔ·ÂÇϽʽÿÀ."
    	       return;

	        }
	    }

		model.removeNodeset("/root/send/savedata");
		model.makeNode("/root/send/savedata");

		//±×¸®µå ÀúÀåÁ¶°Ç
		for (var i = 1; i < grd_memo.rows; i++) {
			model.setValue(xPathMemoList+"[" + i + "]/memoitemflag", '05');
			model.setValue(xPathMemoList + "[" + i + "]/recdd", model.getValue("/root/main/cond/orddd"));
			model.setValue(xPathMemoList + "[" + i + "]/rectm", getCurrentTime().substr(0, 4));
			model.setValue(xPathMemoList + "[" + i + "]/pid", model.getValue(xPathPatList + "[" + grd_patlist.row + "]/pid"));
			model.setValue(xPathMemoList + "[" + i + "]/indd", model.getValue(xPathPatList + "[" + grd_patlist.row + "]/indd"));
			model.setValue(xPathMemoList + "[" + i + "]/cretno", model.getValue(xPathPatList + "[" + grd_patlist.row + "]/cretno"));
		}
		model.makeValue("/root/send/savedata/memoinfo", grd_memo.getUpdateData());

		//Á¶È¸Á¶°Ç
		model.makeValue("/root/send/savedata/condinfo/wardcd", model.getValue("/root/main/cond/wardcd"));
		model.makeValue("/root/send/savedata/condinfo/pid", model.getValue(xPathPatList + "[" + grd_patlist.row + "]/pid"));
		model.makeValue("/root/send/savedata/condinfo/indd", model.getValue(xPathPatList + "[" + grd_patlist.row + "]/indd"));
		model.makeValue("/root/send/savedata/condinfo/cretno", model.getValue(xPathPatList + "[" + grd_patlist.row + "]/cretno"));
		model.makeValue("/root/send/savedata/condinfo/orddd", model.getValue("/root/main/cond/orddd"));
		model.makeValue("/root/send/savedata/condinfo/memoitemflag", '05');

	    model.removeNodeSet(xPathMemoList);

		if(submit("TXMNB00203",false)){
    	    if ( getNodesetCount(xPathHidMemoList) > 0 ){
        	    model.makeNode(xPathMemoList);
        	    copyNodesetType(xPathMemoList, xPathHidMemoList, "replace", model, model);

    	    }
			messageBox("¼º°øÀûÀ¸·Î", "I001");
		}
		grd_memo.rebuild();
	}
}

/**
 * @group  :
 * @ver    : 2007.10.08
 * @by     : ÃÖ°æ¿ë
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : Åõ¾à°ü¸® ¸Þ¸ð ÀúÀå
 * @param  :pFlag:"D" »èÁ¦
 * @param  :
 * @return :
 * @---------------------------------------------------
 */
function fMedrMomoSave(pFlag){
    var saveHearder = "m¢Ëmemocnts¢Ëpid¢Ëmemoitemflag¢Ëseqno¢Ërecdd_b¢Ërectm_b¢Ëindd¢Ëcretno¢Ì";
    var saveData = "";
    var status = "";
	if ( grd_patlist.row == -1) {
		messageBox("ÇØ´ç ȯÀÚ°¡ ¼±ÅõÇÁö", "E007");
		return;
	} else {
	    if( pFlag =="D"){
	        saveData = "d" + "¢Ë"
	                 + ""  + "¢Ë"
	                 + model.getValue(xPathPatList + "[" + grd_patlist.row + "]/pid")  + "¢Ë"
	                 + "06"  + "¢Ë"
	                 + model.getValue(xPathMedrMemoInfo + "/seqno") + "¢Ë"
	                 + model.getValue(xPathMedrMemoInfo + "/recdd_b") + "¢Ë"
	                 + model.getValue(xPathMedrMemoInfo + "/rectm_b") + "¢Ë"
	                 + model.getValue(xPathPatList + "[" + grd_patlist.row + "]/indd")  + "¢Ë"
	                 + model.getValue(xPathPatList + "[" + grd_patlist.row + "]/cretno")  + "¢Ì";

    	    model.makeValue("/root/send/savedata/memoinfo",saveHearder+saveData);

    		model.makeValue("/root/send/savedata/condinfo/wardcd", model.getValue("/root/main/cond/wardcd"));
    		model.makeValue("/root/send/savedata/condinfo/pid", model.getValue(xPathPatList + "[" + grd_patlist.row + "]/pid"));
    		model.makeValue("/root/send/savedata/condinfo/indd", model.getValue(xPathPatList + "[" + grd_patlist.row + "]/indd"));
    		model.makeValue("/root/send/savedata/condinfo/cretno", model.getValue(xPathPatList + "[" + grd_patlist.row + "]/cretno"));
    		model.makeValue("/root/send/savedata/condinfo/orddd", model.getValue("/root/main/cond/orddd"));
    		model.makeValue("/root/send/savedata/condinfo/memoitemflag", "06");


    	    model.resetInstanceNode(xPathMedrMemoInfo);

    		if(submit("TXMNB00203","false")){
            	model.setValue(xPathMedrMemoInfo + "/memocnts", model.getValue(xPathHidMedrMemoInfo + "/memocnts"));
            	model.setValue(xPathMedrMemoInfo + "/recdd_b", model.getValue(xPathHidMedrMemoInfo + "/recdd_b"));
            	model.setValue(xPathMedrMemoInfo + "/rectm_b", model.getValue(xPathHidMedrMemoInfo + "/rectm_b"));
            	model.setValue(xPathMedrMemoInfo + "/seqno", model.getValue(xPathHidMedrMemoInfo + "/seqno"));
            	if( !isNull(model.getValue(xPathMedrMemoInfo + "/recdd_b")) ){
            		model.setValue(xPathMedrMemoInfo + "/status", "i")
            	}else{
            		model.setValue(xPathMedrMemoInfo + "/status", "")
            	}
            	messageBox("¼º°øÀûÀ¸·Î", "I001");
    		}

	    }else{

    	    if ( isNull(model.getValue(xPathMedrMemoInfo + "/memocnts")) ){
    	       messageBox("ÀúÀåÇÒ Åõ¾à°ü¸® ¸Þ¸ð¸¦", "C001");//" ÀÔ·ÂÇϽʽÿÀ."
    	       return;
    	    }

    		model.removeNodeset("/root/send/savedata");
    		model.makeNode("/root/send/savedata");

    		//±×¸®µå ÀúÀåÁ¶°Ç
//    		model.makeValue("/root/send/savedata/memoinfo/pid", model.getValue(xPathPatList + "[" + grd_patlist.row + "]/pid"));
//    		model.makeValue("/root/send/savedata/memoinfo/indd", model.getValue(xPathPatList + "[" + grd_patlist.row + "]/indd"));
//    		model.makeValue("/root/send/savedata/memoinfo/cretno", model.getValue(xPathPatList + "[" + grd_patlist.row + "]/cretno"));
//    		model.makeValue("/root/send/savedata/memoinfo/seqno", model.getValue(xPathMedrMemoInfo+"/seqno"));
//    		model.makeValue("/root/send/savedata/memoinfo/memoitemflag", "06");
//    		model.makeValue("/root/send/savedata/memoinfo/memocnts", model.getValue(xPathMedrMemoInfo+"/memocnts"));
//    		model.makeValue("/root/send/savedata/memoinfo/recdd", getCurrentDate());
//    		model.makeValue("/root/send/savedata/memoinfo/rectm", getCurrentTime().substr(0, 4));
//    		model.makeValue("/root/send/savedata/memoinfo/recdd_b", model.getValue(xPathMedrMemoInfo+"/recdd_b"));
//    		model.makeValue("/root/send/savedata/memoinfo/rectm_b", model.getValue(xPathMedrMemoInfo+"/rectm_b"));
//    		model.makeValue("/root/send/savedata/memoinfo/wardcd", model.getValue("/root/main/cond/wardcd"));
//    		model.makeValue("/root/send/savedata/memoinfo/orddd", model.getValue("/root/main/cond/orddd"));
//    		if(isNull(model.getValue(xPathMedrMemoInfo+"/status"))){
//    			model.makeValue("/root/send/savedata/memoinfo/status", "i");
//    		}else{
//    			model.makeValue("/root/send/savedata/memoinfo/status", "u");
//    		}
//

    		if(isNull(model.getValue(xPathMedrMemoInfo+"/status"))){
               status="i";
    		}else{
               status="u";
    		}
	        saveData = status + "¢Ë"
	                 + model.getValue(xPathMedrMemoInfo+"/memocnts")  + "¢Ë"
	                 + model.getValue(xPathPatList + "[" + grd_patlist.row + "]/pid")  + "¢Ë"
	                 + "06"  + "¢Ë"
	                 + model.getValue(xPathMedrMemoInfo + "/seqno") + "¢Ë"
	                 + model.getValue(xPathMedrMemoInfo + "/recdd_b") + "¢Ë"
	                 + model.getValue(xPathMedrMemoInfo + "/rectm_b") + "¢Ë"
	                 + model.getValue(xPathPatList + "[" + grd_patlist.row + "]/indd")  + "¢Ë"
	                 + model.getValue(xPathPatList + "[" + grd_patlist.row + "]/cretno")  + "¢Ì";

    	    model.makeValue("/root/send/savedata/memoinfo",saveHearder+saveData);

    		model.makeValue("/root/send/savedata/condinfo/wardcd", model.getValue("/root/main/cond/wardcd"));
    		model.makeValue("/root/send/savedata/condinfo/pid", model.getValue(xPathPatList + "[" + grd_patlist.row + "]/pid"));
    		model.makeValue("/root/send/savedata/condinfo/indd", model.getValue(xPathPatList + "[" + grd_patlist.row + "]/indd"));
    		model.makeValue("/root/send/savedata/condinfo/cretno", model.getValue(xPathPatList + "[" + grd_patlist.row + "]/cretno"));
    		model.makeValue("/root/send/savedata/condinfo/orddd", model.getValue("/root/main/cond/orddd"));
    		model.makeValue("/root/send/savedata/condinfo/memoitemflag", "06");

            model.resetInstanceNode(xPathMedrMemoInfo);

    		if(submit("TXMNB00203","false")){
        	    if ( getNodesetCount(xPathHidMedrMemoInfo) > 0 ){
            	    copyNodesetType(xPathMedrMemoInfo, xPathHidMedrMemoInfo, "replace", model, model);

        	    }
    			messageBox("¼º°øÀûÀ¸·Î", "I001");
    		}

	    }
       	tar_remk1.refresh();
	}

}


/**
 * @group  :
 * @ver    : 2007.10.08
 * @by     : ÃÖ°æ¿ë
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : ³»È¯ÀÚ ¼ÂÆÃ
 * @param  :
 * @param  :
 * @return :
 * @---------------------------------------------------
 */
function fChangePidSetting(){
	setParameter("wardcd", model.getValue("/root/main/cond/wardcd"));
	setParameter("userid", model.getValue("/root/main/cond/userid"));
	setParameter("usernm", model.getValue("/root/main/cond/usernm"));
	modal("SMMNB00400","1" ,"868", "128");
	
	//°øÅëÇÔ¼ö·Î ¼öÁ¤_20110211_ SMY
	fGetWardChngInfo();
	/*
	model.removenode("/root/send");
	model.makeValue("/root/send/reqdata/wardcd", model.getValue("/root/main/cond/wardcd"));
	submit("TRMNW00101");

	for(i = 1; i <= getNodesetCount("/root/init/settingrn"); i++ ) {
		if (model.getValue("/root/main/cond/userid") == model.getValue("/root/init/settingrn["+ i +"]/settingrnid")) {
			model.setValue("/root/main/cond/settingrnid", model.getValue("/root/main/cond/userid"));
		}
	}
	*/
	fGetMedSpccdList("pat");
}



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

//ȯÀÚÁ¤º¸ ¿ÀÇÂ
//¼­ºê¸Þ´º¸¦ ÀÌ¿ëÇÑ ¿ÀÇÂÀº ±âº»À¸·Î »ó´ÜÁ¤º¸¸¦ ¿Ã¸®µµ·Ï Àû¿ë.
function fOpenPrcpSpec() 
{					
	fClickPatList();
	var pid = model.getValue("/root/main/kardexinfo/ompatlist[" + grd_patlist.row + "]/pid");
	var indd = model.getValue("/root/main/kardexinfo/ompatlist[" + grd_patlist.row + "]/indd");	
	var orddd = model.getValue("/root/main/cond/orddd");
	var param = pid + "¢Ì" + "I" + "¢Ì" + indd +  "¢Ì" + orddd;
	
	setParameter("SMMMO02500_pid", pid);
	open("SMMMO02500","1","20","128");							
}	

//ȯÀÚ¶óº§Ãâ·Â
function fOpenLabelPrint(){	
	fClickPatList();
	model.setValue("/root/main/printcnt","1");
	group4.attribute("left") = event.ScreenX-window.screenleft-10;
	group4.attribute("top") = event.ScreenY-window.screenTop-150;						
	model.setFocus("ipt_patcntctel");								
	model.refresh();
	group4.visible = true;					
}

//°£È£ÀÏÁö ¿ÀÇÂ
function fOpenNursingRecord()
{
	fClickPatList();
	open("SMMNR00700","1","20","128");
}


//Àü½Ç½Åû ¿ÀÇÂ
function fOpenChngRoom()
{
	fClickPatList();
	open("SMPMI01700","1","20","128");
}

//Åõ¾à±â·Ï ¿ÀÇÂ
function fOpenMediRecord()
{
	fClickPatList();
	open("SMMNR00600","1","20","128");
}

//°£È£Ã³¹æ ¿ÀÇÂ
function fOpenCarePrcp()
{
	fClickPatList();
	open("SMMNW10900","1","20","128");
}		

//¹ÙÄÚµå°ü¸® ¿ÀÇÂ
function fOpenBarcodeMngt()
{
	fClickPatList();
	open("SMLLC00200","1","20","128");
}	

//°Ë»ç°á°úÁ¶È¸ ¿ÀÇÂ
function fOpenTestRslt()
{
	fClickPatList();
	open("SMAER00800","1","20","128");
}						

//ÀÓ»ó°üÂû±â·Ï ¿ÀÇÂ
function fOpenTPR()
{
	fClickPatList();
	open("SMMNR00900","1","20","128");
}	

//Åð¿øÁ¤¸® ¿ÀÇÂ
function fOpenDschArngnm()
{
	fClickPatList();
	open("SMMNW01200","1","20","128");
}

// ¾àÇ°Àΰ賻¿ªÁ¶È¸Ãß°¡									
function fOpenDrugList(){
	fClickPatList();
	setParameter("SPMNW12400_PARAM1", model.getValue("/root/main/kardexinfo/ompatlist[" + grd_patlist.row + "]/pid"));
	setParameter("SPMNW12400_PARAM2", model.getValue("/root/main/kardexinfo/ompatlist[" + grd_patlist.row + "]/indd"));
	open("SPMNW12400","1","20","128");	
}

//2011.1.12, ÁÖÈñ°æ
//³»È¯ÀÚ ¸Þ¸ð Ãâ·Â
function fGetMypatMemo()
{
	//var wardcd = model.getValue("/root/main/cond/wardcd");
	if ( cmb_wardcd.label == "" )
	{
		messageBox("º´µ¿ÀÌ ¼±ÅõÇÁö", "E007");
		return;
	}
	
	//ÀÀ±Þ½ÇÀÎ °æ¿ì ±¸¿ªÁ¤º¸·Î 󸮵ǵµ·Ï ¼öÁ¤_20110214_SMY
	if(eERFLAG == "Y"){
		var zonecd = model.getValue("/root/main/cond/zonecd");
		if ( zonecd == "-" || zonecd == "" )
		{
			messageBox("±¸¿ªÁ¤º¸°¡ ¼±ÅõÇÁö", "E007");
			return;
		}
	}else{
		var nursid = model.getValue("/root/main/cond/settingrnid");
		if ( nursid == "-" || nursid == "" )
		{
			messageBox("³»È¯ÀÚ°¡ ¼±ÅõÇÁö", "E007");
			return;
		}
	}
	model.makeValue("/root/send/reqdata/wardcd", model.getValue("/root/main/cond/wardcd"));
	model.makeValue("/root/send/reqdata/nursid", model.getValue("/root/main/cond/settingrnid"));
	model.makeValue("/root/send/reqdata/orddd", model.getValue("/root/main/cond/orddd"));

	model.removeNodeset("/root/main/memoinfo");
	model.makeNode("/root/main/mypatmemoinfo");
	//ÀÀ±Þ½ÇÁ¤º¸ Ãß°¡_20110214_SMY
	model.makeValue("/root/send/reqdata/erflag", eERFLAG);
	model.makeValue("/root/send/reqdata/zonecd", model.getValue("/root/main/cond/zonecd"));
	
	if ( submit("TRMNB00205") )
	{
		model.removeNodeSet("/root/main/rex_memolist");
		var memolist= instance1.selectNodes("/root/main/mypatmemoinfo/memolist");
		var pid = "";
		var groupid = 0;
		var arr = 0;
		var memo = "";
		var memolistcnt = 1;
		var next_pid = "";

		for(i=0; i<memolist.length; i++)
		{
			var new_pid =  memolist.item(i).selectSingleNode("pid").value;
			if ( i != memolist.length-1)
			{
				next_pid =  memolist.item(i+1).selectSingleNode("pid").value;
			}
			else
				next_pid = "0";
			
			if ( pid != new_pid )
			{
				groupid++;	
				if ( groupid > 3 ) 
				{
					groupid = 1;					
				}
				
				if ( groupid == 1 )
				{
					arr++;
					model.makeNode("/root/main/rex_memolist/group["+arr+"]");
				}			
				model.makeNode("/root/main/rex_memolist/group["+arr+"]/s_group"+groupid);
				pid = new_pid;	
				memolistcnt = 1;
			}

			if ( memolistcnt == 1 )
			{
				var tarNode = instance1.selectSingleNode("/root/main/rex_memolist/group["+arr+"]/s_group"+groupid);						

				tarNode.appendChild( memolist.item(i).selectSingleNode("roomcd").cloneNode( false ));
				tarNode.appendChild( memolist.item(i).selectSingleNode("pid").cloneNode( false ));	
				tarNode.appendChild( memolist.item(i).selectSingleNode("patnm").cloneNode( false ));
				tarNode.appendChild( memolist.item(i).selectSingleNode("sa").cloneNode( false ));	
				tarNode.appendChild( memolist.item(i).selectSingleNode("atdoctnm").cloneNode( false ));	
				tarNode.appendChild( memolist.item(i).selectSingleNode("nzoneno").cloneNode( false ));	
				tarNode.appendChild( memolist.item(i).selectSingleNode("specldesc").cloneNode( false ));	
				tarNode.appendChild( memolist.item(i).selectSingleNode("activity").cloneNode( false ));	
				tarNode.appendChild( memolist.item(i).selectSingleNode("diagengnm").cloneNode( false ));	
				tarNode.appendChild( memolist.item(i).selectSingleNode("rectermnm").cloneNode( false ));	
				tarNode.appendChild( memolist.item(i).selectSingleNode("diet").cloneNode( false ));	
				tarNode.appendChild( memolist.item(i).selectSingleNode("vs").cloneNode( false ));
				tarNode.appendChild( memolist.item(i).selectSingleNode("vsnm").cloneNode( false ));	
				
				memo = "";
			}

			var recdt = memolist.item(i).selectSingleNode("recdt").value;
			recdt = recdt.substr(0,4) + "/" + recdt.substr(4,2) + "/" + recdt.substr(6,2) + " " + recdt.substr(8,2) + ":" + recdt.substr(10,2);			
//			memo = memo  + 	"[" + memolist.item(i).selectSingleNode("writ").value + "]  |  " +	recdt + "\n"+ memolist.item(i).selectSingleNode("memocnts").value + "\n\n";

			memo = memo  + 	memolist.item(i).selectSingleNode("memocnts").value + "\n";

			memolistcnt++;

			if ( new_pid != next_pid )
			{
				model.makeNode("/root/main/rex_memolist/group["+arr+"]/s_group"+groupid+"/memo");
				model.setValue("/root/main/rex_memolist/group["+arr+"]/s_group"+groupid+"/memo", memo, true);
			}
					
		}

		model.removeNodeset("/root/main/mypatmemoinfo");
		
		exeReportPreview("RPMNB00200", "XMLSTR", "", "", "false", "", "", "", "", "false", "", "", "", "","","","","","","/root/main/rex_memolist/group");
		
	}
}
/**
 * @group  :
 * @ver    : 2011.09.08
 * @by     : ±èº´±¹
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : °Ë»ç°ü¸® ÀÏÀÚº° ±¸ºÐ¼±
 * @param  :
 * @param  :
 * @return :
 * @---------------------------------------------------
 */
function fSettingGridColor() {
	
	var firstdd="";
	var prcpdd ="";
	
	
	if(grd_test.rows > grd_test.fixedRows) {
		firstdd = grd_test.valueMatrix(1, grd_test.colRef("prcpdd"));
	}
	
	for(var i = grd_test.fixedRows; i < grd_test.rows; i++){
		execdd = grd_test.valueMatrix(i, grd_test.colRef("execdd"));
		
		prcpdd = grd_test.valueMatrix(i, grd_test.colRef("prcpdd"));
		
		if(firstdd != prcpdd) {
			firstdd = prcpdd;
			//grd_test
			grd_test.rowStyle(i-1, "all", "border-bottom-color") = "#ff0000";
						
			grd_test.rowStyle(i-1, "all", "border-top-width") = "3";
		} else {
			grd_test.rowStyle(i-1, "all", "border-bottom-color") = "#b0b0b0";
						
			grd_test.rowStyle(i-1, "all", "border-top-width") = "3";
		}
				
		
		if(execdd == "" || execdd == null) {
			grd_test.rowstyle(i, "data", "background-color") = "#fff000";
		} else {
			grd_test.rowstyle(i, "data", "background-color") = "#ffffff";
		}
			
	}
	grd_test.refresh();

	
}
/**
 * @group  :
 * @ver    : 2011.09.19
 * @by     : ±èº´±¹
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : IOÁ¶È¸ ÀúÀå
 * @param  :
 * @param  :
 * @return :
 * @---------------------------------------------------
 */
function fSetIoInfo() {
		model.makeValue("/root/send/savedata/pid", grd_patlist.valueMatrix(grd_patlist.row, grd_patlist.colRef("pid")) );
		model.makeValue("/root/send/savedata/indd",grd_patlist.valueMatrix(grd_patlist.row, grd_patlist.colRef("indd")));
		model.makeValue("/root/send/savedata/cretno",grd_patlist.valueMatrix(grd_patlist.row, grd_patlist.colRef("cretno")));
		
		model.makeValue("/root/send/savedata/ioyn",model.getValue("/root/main/kardexinfo/ioinfo/ioyn"));
		model.makeValue("/root/send/savedata/bstyn",model.getValue("/root/main/kardexinfo/ioinfo/bstyn"));
		model.makeValue("/root/send/savedata/bwyn",model.getValue("/root/main/kardexinfo/ioinfo/bwyn"));
		model.makeValue("/root/send/savedata/acyn",model.getValue("/root/main/kardexinfo/ioinfo/acyn"));
		model.makeValue("/root/send/savedata/iokindcd",model.getValue("/root/main/kardexinfo/ioinfo/iokindcd"));
		model.makeValue("/root/send/savedata/bstkindcd",model.getValue("/root/main/kardexinfo/ioinfo/bstkindcd"));
		
		submit("TXMNB00212");
}