/*

      Ä«µ¦½º°ü¸®(SMMNB03000_Ä«µ¦½º°ü¸®_KNU.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 prcpstat="1";

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";//½ÇÁ¦ º¸ÀÌ´Â °Ë»ç°ü¸®Á¤º¸
var openx                       = 'N';

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

    //------------(20101019) °æºÏ´ë
    //ÀÀ±ÞÀÇ·á¼¾ÅÍ ºÎ¼­ÄÚµå ÃßÃâ

    
    model.makeValue("/root/send/cdgrupid", "'002', 'U31'");
    model.makeValue("/root/send/srchdd"  , getCurrentDate());  // Á¶È¸±âÁØÀÏÀÚ

    if(submit("TRMNW00001", false)){
        eERDEPTCD = model.getvalue("/root/code/codeinfo/codelist[cdgrupid='002']/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());
    
    // Á¤·Ä¼ø¼­ ÃʱâÈ­ Ä¥°î:º´»ó¼ø, º»¿ø:ȯÀÚ¸í¼ø
    if(openx == 'N'){
	    if(getUserInfo("dutplceinstcd") == "032") {
				model.makeValue("/root/main/cond/sortflag", "2");
				rdo_sortflag.refresh();
			} else {
				model.makeValue("/root/main/cond/sortflag", "1");
				rdo_sortflag.refresh();
			}
		}
		
		openx = 'Y';
	

    // ȯÀÚÁ¤º¸ Á¶È¸
    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"));
    }
    
    // Åõ¾à°ü¸® È­¸é ±×¸®µå¸í º¯°æ_160512_AYS_Ä¥°îÀÎÁõÆò°¡°ü·Ã_È¥µ¿ÁÖÀÇ °íÀ§Çè¾à ¹®±¸Á¦°Å
    if(getUserInfo("dutplceinstcd") == '032') {
			grd_medi2.caption = "±¸ºÐ^ó¹æÄÚµå^ó¹æ¸í^1ÀÏ\n¿ë·®^1ȸ\n¿ë·®^´Ü\nÀ§^1ÀÏ\n¼ö·®^1ȸ\n¼ö·®^´Ü\nÀ§^1ÀÏ\nȽ¼ö^±â°£^¿ë¹ý";
		}

    //°øÅëÇÔ¼ö·Î ¼öÁ¤_20110211_ SMY
    fGetWardChngInfo();

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

    //ȯÀÚ¸®½ºÆ® Á¶È¸
    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();
        cap_zone.visible = "true";
        cmb_zone.visible = "true";
        //cap_settingrnid.attribute("text") = "±¸ ¿ª:";
        //btn_settingrnid.visible = "false";
        
        cap_settingrnid.attribute("left") = 398;
		    cap_settingrnid.attribute("top") = 10;
		    cmb_settingrnid.attribute("left") = 473;
		    cmb_settingrnid.attribute("top") = 8;
		    button20.attribute("left") = 538;
		    button20.attribute("top") = 7;
		    
		    caption20.attribute("left") = 630;
		    caption20.attribute("top") = 10;
		    ipt_orddd.attribute("left") = 716;
		    ipt_orddd.attribute("top") = 8;

   			caption34.attribute("left") = 818;
		    caption34.attribute("top") = 10;
		    rdo_sortflag.attribute("left") = 900;
		    rdo_sortflag.attribute("top") = 10;

        model.setValue("/root/main/cond/zonecd", "-");
    }else{
    	  cap_zone.visible = "false";
        cmb_zone.visible = "false";
        //cap_settingrnid.attribute("text") = "³»È¯ÀÚ:"
        //btn_settingrnid.visible = "true";
        model.setValue("/root/main/cond/zonecd", "");
        
		    cap_settingrnid.attribute("left") = 245;
		    cap_settingrnid.attribute("top") = 10;
		    cmb_settingrnid.attribute("left") = 320;
		    cmb_settingrnid.attribute("top") = 8;
		    button20.attribute("left") = 387;
		    button20.attribute("top") = 7;
		    
		    caption20.attribute("left") = 485;
		    caption20.attribute("top") = 10;
		    ipt_orddd.attribute("left") = 568;
		    ipt_orddd.attribute("top") = 8;
		    
	    	caption34.attribute("left") = 675;
		    caption34.attribute("top") = 10;
		    rdo_sortflag.attribute("left") = 760;
		    rdo_sortflag.attribute("top") = 10;
    }
		model.refresh();
}
/**
 * @group  :
 * @ver    : 2007.10.08
 * @by     : ±èÈ«Á¡
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : ȯÀÚ¸®½ºÆ® Ŭ¸¯½Ã ȯÀÚ »ó¼¼Á¤º¸ ¼ÂÆÃ
 * @param  :
 * @param  :
 * @return :
 * @---------------------------------------------------
 */
function fSettingPatDetlInfo(rowNo) {

    //»ó´Ü ȯÀÚ Á¤º¸ ¼ÂÆÃ
    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() {
	var deptcd = cmb_wardcd.value;
	var userdept = getUserInfo("dutplcecd");
	var spiritdept = model.getValue("/root/code/codeinfo/codelist[cdgrupid ='U31']/cdid");
	
	if(deptcd == spiritdept) {
		if(userdept != spiritdept) {
			messageBox("ȯÀÚ °³ÀÎÁ¤º¸ º¸È£¸¦ À§ÇØ Çش纴µ¿ »ç¿ëÀÚ¿Ü¿£  Á¶È¸¸¦ Á¦ÇÑÇÕ´Ï´Ù", "E");
			return;	
		}
	}

	ePID = model.getValue(xPathPatList + "[" + grd_patlist.row + "]/pid");
    	
	if(ePID == "3292911") { // ¸Þ¸£½º È®Á¤È¯ÀÚ
       if (!fContainsHardCD("5703", getUserInfo("userid"))) {
           messageBox("ȯÀÚ¹øÈ£ : " + ePID + "\n°³ÀÎÁ¤º¸º¸È£ °ü¸®´ë»ó ȯÀÚ·Î Á¢±Ù±ÇÇÑÀ» Á¦ÇÑ ÇÕ´Ï´Ù.\n\nÁø·áÁö¿ø½ÇÀå ¾çµ¿Çå", "E999");
           return ;
       }
   }
    
    if (grd_patlist.row > 0 ) {

        //ÀÀ±Þ½Ç »ó´ÜÃß°¡----------(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");
            ePATNM = model.getValue(xPathPatList + "[" + grd_patlist.row + "]/patnm"); 
            eSIGNINFOCNT = model.getValue(xPathPatList + "[" + grd_patlist.row + "]/signinfocnt"); // °£È£Á¤º¸Á¶»çÁö ÀÎÁõÀúÀå°Ç¼ö
            
            if(eSIGNINFOCNT == 0){
            	 messageBox("ÀÎÁõÀúÀå µÇÁö ¾ÊÀº °£È£Á¤º¸Á¶»çÁö°¡ ÀÖ½À´Ï´Ù.\nÈ®ÀÎÇϽñ⠹ٶø´Ï´Ù.","I");
            }

            //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 param =   "E"      + "¢Ë"
                        + ePID     + "¢Ë"
                        + eINDD    + "¢Ë"
                        + eCRETNO  + "¢Ë"
                        + eINSTCD  + "¢Ë" ;

            setParameter("condparam",  param);

            modal("SPMMO08900", 1, "", "", "", "", "", "left:0; right:0; width:0; height:0; sysmenu:hidden; caption:hidden; min:hidden, max:hidden;");
        }

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

    var savecnt = 1;
    var stat;
    var itemnm;
    for( var idx = 1; idx <= grd_cadexset.rows - grd_cadexset.fixedRows; idx++ ){
        stat = model.getValue(xPathCardexSetList + "["+idx+"]/status"); //°¢°¢ Çà¿¡ ´ëÇÑ ¼öÁ¤Á¤º¸¸¦ °¡Á®¿Â´Ù.
        itemnm = grd_cadexset.labelMatrix( idx , grd_cadexset.colRef("itemnm"));
        
        if( pDelFlag != "delete" && (stat == "i" || stat == "u") ){ //ÀúÀåÀ̳ª ¼öÁ¤ÀÏ °æ¿ì

            if ( isNull(model.getValue(xPathCardexSetList + "["+idx+"]/itemcnts")) ){
                messageBox("ÀúÀåÇÒ ³»¿ëÀ» ", "C001");//ÀÔ·ÂÇϽʽÿä
                return;
            }
            
            

            if(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 if(itemnm == "ÀÔ¿øµ¿±â") {
            	  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", "10");
                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(itemnm == "°ú°Åº´·Â") {
            	  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", "11");
                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(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 if(itemnm == "ÀÔ¿øµ¿±â") {
            	  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", "10");
                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(itemnm == "°ú°Åº´·Â") {
            	  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", "11");
                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); //tfHelper.jsµÚ¿¡ °æ·Î ³ëµå¼ÂÀ» ¾Õ¿¡ °æ·Î ³ëµå¼Â¿¡ º¹»ç.
        }
        
    }
    model.refresh();
}

/**
 * @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 deptcd = cmb_wardcd.value;
	var userdept = getUserInfo("dutplcecd");
	var spiritdept = model.getValue("/root/code/codeinfo/codelist[cdgrupid ='U31']/cdid");
	
	if(deptcd == spiritdept) {
		if(userdept != spiritdept) {
			messageBox("ȯÀÚ °³ÀÎÁ¤º¸ º¸È£¸¦ À§ÇØ Çش纴µ¿ »ç¿ëÀÚ¿Ü¿£  Á¶È¸¸¦ Á¦ÇÑÇÕ´Ï´Ù", "E");
			return;	
		}
	}
	
    var medrcnt = 0;
    var prcpdd = "";
    var preprcpdd = "";
    var nodecnt = 1;

    var orddd = model.getValue("/root/main/cond/orddd");
    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"));
    
    setParameter("SPMNR11100_pid",   grd_patlist.valueMatrix(grd_patlist.row, grd_patlist.colRef("pid")));
		setParameter("SPMNR11100_indd", grd_patlist.valueMatrix(grd_patlist.row, grd_patlist.colRef("indd")));
		setParameter("SPMNR11100_cretno", grd_patlist.valueMatrix(grd_patlist.row, grd_patlist.colRef("cretno")));
		setParameter("SPMNR11100_wardcd", model.getValue(cmb_wardcd.attribute("ref")));
		setParameter("SPMNR11100_orddd", model.getValue(ipt_orddd.attribute("ref")));
    
    
    //ȯÀÚ¸®½ºÆ® Äõ¸® º¯°æµÈ°É·Î Á¶È¸
    model.makeValue("/root/send/reqdata/newflag", "Y");
    
    //ȯÀÚ¸®½ºÆ® Á¤·Ä ¼ø¼­
    model.makeValue("/root/send/reqdata/sortflag", model.getValue("/root/main/cond/sortflag"));

    if ( srchflag =="all" || srchflag =="clickpat" || srchflag == "pat" ){

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

        if(submit("TRMNB00203")){
        	if(model.getValue("/root/main/kardexinfo/consultinfo/sysdatereqcnt") > 0){
			    	output1.attribute("color") = "#ff0000";
			    }else{
			    	output1.attribute("color") = "#000000";
			    }
			    
			    if(model.getValue("/root/main/kardexinfo/consultinfo/sysdaterepcnt") > 0){
			    	output2.attribute("color") = "#0000ff";
			    }else{
			    	output2.attribute("color") = "#000000";
			    }
			    
			    	output1.refresh();
			    	output2.refresh();
			    	
            fSettingCardexDetlInfo();
            fCheckNacrCnt();
        }

    }else {

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

        destNodePath="";
        srcNodePath="";

        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("TRMNB00201", false)){
            if ( getNodesetCount(srcNodePath) > 0 ){
                model.makeNode(destNodePath);
                copyNodesetType(destNodePath, srcNodePath, "replace", model, model);

            }
               destobj.rebuild();
               fCheckNacrCnt();
        }
    }
    fSettingGridColor();
}

/**
 * @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);

    // Á¦Áõ¸í½Åû°Ç¼ö/»çº»¹ß±Þ°Ç¼ö °¡ ÀÖÀ»°æ¿ì ȯÀÚÁ¤º¸ ¸®½ºÆ®¿¡ ÆĶõ»öÀ¸·Î Ç¥½Ã
		for (var i=1;i<=getNodesetCount(xPathPatList);i++) {
				var pGrdCertValue = model.getValue("/root/main/kardexinfo/ompatlist[" + i + "]/certcount"); // Á¦Áõ¸í½Åû°Ç¼ö
				var pGrdCpapValue = model.getValue("/root/main/kardexinfo/ompatlist[" + i + "]/cpapcount"); // »çº»¹ß±Þ°Ç¼ö
			
				if(pGrdCertValue > 0 || pGrdCpapValue > 0){
					grd_patlist.cellStyle("color",i, grd_patlist.colRef("patnm")) = "#0000ff";
				}else{
					grd_patlist.cellStyle("color",i, grd_patlist.colRef("patnm")) = "#000000";
				}	
		}	
		grd_patlist.refresh();
		

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

    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-50;
    model.setFocus("ipt_patcntctel");
    model.refresh();
    group4.visible = true;
}

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

function fPopupSearchRecDataInitParam() {
	
}


//Àü½Ç½Åû ¿ÀÇÂ
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") )
    {
    		//debugger;
        model.removeNodeSet("/root/main/rex_memolist");
        var memolist = instance1.selectNodes("/root/main/mypatmemoinfo/memolist");
        var sdeptcd  = getUserInfo("dutplcecd");
        //alert("sdeptcd : " + sdeptcd);
        //alert(instance1.selectNodesXml("/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("medispclnm").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("inmotive").cloneNode( false ));
                tarNode.appendChild( memolist.item(i).selectSingleNode("past").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 ));
                // '15.08.04 - Ãß°¡
                tarNode.appendChild( memolist.item(i).selectSingleNode("gesage").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);
            }

        }
        
        //alert(instance1.selectNodesXml("/root/main/rex_memolist/group"));

        //model.removeNodeset("/root/main/mypatmemoinfo");
        
        if(sdeptcd == '2100300000' || sdeptcd == '2110200000') {
        	exeReportPreview("RPMNB00205", "XMLSTR", "", "", "false", "", "", "", "", "false", "", "", "", "","","","","","","/root/main/rex_memolist/group");
        } else {
        	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++){
        execyn = grd_test.valueMatrix(i, grd_test.colRef("execyn"));

        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(execyn == "Y") {
            grd_test.rowstyle(i, "data", "background-color") = "#ffffff";
        } else {
            grd_test.rowstyle(i, "data", "background-color") = "#fff000";
        }

    }

    
    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");
}
/**
 * @group  :
 * @ver    : 2012.01.20
 * @by     : ±èº´±¹
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : PRN°ü¸® Á¶È¸
 * @param  :
 * @param  :
 * @return :
 * @---------------------------------------------------
 */
function fGetPrcpList() {
	if(prcpstat == "1") {
		prcpstat = "2";
		btn_prn.text = "Åõ¾à°ü¸®";
		cap_prcpstat.text = "PRN°ü¸®";
		grd_prcplist.visible= true;
	} else {
		prcpstat = "1";
		btn_prn.text = "PRN°ü¸®";
		cap_prcpstat.text = "Åõ¾à°ü¸®";
		grd_prcplist.visible= false;
	}
	
	if(grd_patlist.row > 0) {
		model.makeValue("/root/send/reqdata/prnstat"    , "1"); 																			
		model.makeValue("/root/send/reqdata/prcpdd"     , model.getValue("/root/main/cond/orddd"));
		model.makeValue("/root/send/reqdata/cnfmyn"     , "Y");
		model.makeValue("/root/send/reqdata/unitflag"   , "ward");
		model.makeValue("/root/send/reqdata/opprcpcond" , "1");
		
		model.makeValue("/root/send/reqdata/pid"    , grd_patlist.valueMatrix(grd_patlist.row, grd_patlist.colRef("pid")));
		model.makeValue("/root/send/reqdata/indd"   , grd_patlist.valueMatrix(grd_patlist.row, grd_patlist.colRef("indd")));
		model.makeValue("/root/send/reqdata/cretno" , grd_patlist.valueMatrix(grd_patlist.row, grd_patlist.colRef("cretno")));
		
		
		
		model.removeNodeset("/root/main/kardexinfo/prcpinfo/prcplist");
		model.makeNode("/root/man/kardexinfo/prcpinfo");
		
		submit("TRMNW00303");
	}
}