/* ȯÀÚº°IOÁ¶È¸(SMMNR08600_ȯÀÚº°IOÁ¶È¸.xrw - JScript ) - Version : 1) : Ver.1.00.01 */ var xPathMemoInfo = "/root/main/memoinfo/memolist"; var xPathCondInfo = "/root/main/cond"; /** * @group : * @ver : 2008.07.02 * @by : ¾çõ´ö * @--------------------------------------------------- * @type : function * @access : public * @desc : È­¸é ÃʱâÈ­ * @param : * @return : * @--------------------------------------------------- */ function fInitialize(){ for(var i = grd_patlist.colRef("ioyn"); i <= grd_patlist.colRef("acyn"); i++) { grd_patlist.colHidden(i) = true; } if(model.getValue("/root/main/cond/seardd") == ""){ ipt_seardd.value = getCurrentDate(); } // °£È£È¯°æ¼³Á¤ Å×À̺í Á¶È¸_20110215 var pCode = "'002'"; // Á¶È¸ÇÒ CdGrupID ÄÚµåÁ¤º¸ var pDate = getCurrentDate(); //Á¶È¸±âÁØÀÏÀÚ fGetNursHardCdInfo(pCode, pDate); model.makeValue("/root/send/reqdata/flag", "Y"); submit("TRMNW11001", false); //ºÎ¼­ÄÞº¸ Á¶È¸ //¼³Á¤µÈ »ó´ÜÁ¤º¸¸¦ ºÒ·¯¿È model.makeNode("/root/main/paminfo"); var node = getGlobalVariable("paminfo"); setCSVToNode("/root/main/paminfo", node); //·Î±×ÀÎÇÑ ºÎ¼­·Î ÀÚµ¿settingÇÑ´Ù. model.setValue(cmb_wardlist.attribute("ref"), getUserInfo("dutplcecd")); cmb_wardlist.refresh(); model.makeValue("/root/main/cond/wardnm", cmb_wardlist.label); model.makeNode("/root/send/reqdata"); model.makeValue("/root/send/reqdata/wardcd", model.getValue("/root/main/cond/wardcd")); submit("TRMNW10902"); if (model.getValue("/root/main/paminfo/list/pid") != "") {//»ó´ÜÁ¤º¸¿¡ ȯÀÚ°¡ ¼ÂÆÃµÇ¾î ÀÖÀ» °æ¿ì model.makeValue("/root/main/cond/upinfoyn", "Y"); ////20110828_KNUH_Start ³»È¯ÀÚsettingÁ¤º¸ Á¶È¸. model.setValue("/root/main/cond/wardcd", model.getValue("/root/main/paminfo/list/wardcd")); fGetSettringInfoRef(); //³»È¯ÀÚ¼ÂÆÃÁ¤º¸°¡ ÀÖÀ¸¸é set,¾øÀ¸¸é ±×³É null settingnurid = model.getValue("/root/init/settinginfo/settingrn[settingrnid='" + getUserInfo("userid") +"']/settingrnid"); if(settingnurid == null || settingnurid == "") { model.setValue(cmb_room.attribute("ref"), '-'); model.setValue(cmb_settingrn.attribute("ref"), ''); cmb_settingrn.refresh(); cmb_room.refresh(); } else { model.setValue(cmb_room.attribute("ref"), '-'); model.setValue(cmb_settingrn.attribute("ref"), getUserInfo("userid")); cmb_settingrn.refresh(); cmb_room.refresh(); } //20110828_KNUH_End } else { // chk_clincstdy.disabled = true; // model.setValue("/root/main/cond/clincstdyflag", "N"); model.setValue("/root/main/cond/wardcd", getUserInfo("dutplcecd")); //»ó´ÜÁ¤º¸°¡ ¾øÀ» °æ¿ì °£È£»ç ¼Ò¼ÓºÎ¼­ //20110828_KNUH_Start ȯÀÚsettingÁ¤º¸ Á¶È¸ fGetSettringInfoRef(); settingnurid = model.getValue("/root/init/settinginfo/settingrn[settingrnid='" + getUserInfo("userid") +"']/settingrnid"); //³»È¯ÀÚ¼ÂÆÃÁ¤º¸°¡ ÀÖÀ¸¸é set,¾øÀ¸¸é ±×³É null if(settingnurid == null || settingnurid == "") { model.setValue(cmb_room.attribute("ref"), '-'); model.setValue(cmb_settingrn.attribute("ref"), ''); cmb_settingrn.refresh(); cmb_room.refresh(); } else { model.setValue(cmb_room.attribute("ref"), '-'); model.setValue(cmb_settingrn.attribute("ref"), getUserInfo("userid")); cmb_settingrn.refresh(); cmb_room.refresh(); } //20110828_KNUH_End } //20110215 À̼±°æ : °æºÏ´ë - ÀÀ±Þ½ÇÀÏ °æ¿ì ±¸¿ªÁ¤º¸¸¦ Á¶È¸ fGetZoneList(); fnZoneDisp(); //fSearIOInfo(); fPatInfoRef("I"); } //20110828_KNUH_Start function fGetPatInfo() { var settingnurid = model.getValue("/root/main/cond/settingrnid"); if(settingnurid == null || settingnurid == "") { cmb_room.disabled = false; } else { cmb_room.disabled = true; } 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/settingrnid", model.getValue("/root/main/cond/settingrnid")); submit("TRMNW10902", false); model.setValue("/root/main/cond/roomcd", "-"); //ÇØ´ç º´½Ç ¼ÂÆÃ cmb_room.refresh(); //ÇØ´ç º´½ÇÀÇ È¯ÀÚ Á¶È¸ model.removeNodeset("/root/send/reqdata"); model.makeNode("/root/send/reqdata"); model.makeValue("/root/send/reqdata/orddd", model.getValue("/root/main/cond/seardd")); model.makeValue("/root/send/reqdata/wardcd", model.getValue("/root/main/cond/wardcd")); model.makeValue("/root/send/reqdata/roomcd", model.getValue("/root/main/cond/roomcd")); model.makeValue("/root/send/reqdata/refflag", "room"); model.makeValue("/root/send/reqdata/ordtype", "I"); model.makeValue("/root/send/reqdata/settingrnid", model.getValue("/root/main/cond/settingrnid")); model.makeValue("/root/send/reqdata/barflag" , "Y"); model.makeValue("/root/send/reqdata/typeflag" , model.getValue(rdo_typeflag.attribute("ref"))); if(submit("TRMNW10903")) { } } //20110828_KNUH_End /** * @desc : ºÎ¼­Á¶°Ç¿¡ µû¸¥ º´½Ç Á¶È¸ * @ * @param :initflag ="init" ÃʱâÈ­ * @return : * @author : ¼º¹Ì¿¬ * @--------------------------------------------------- */ function fRoomInfoRef(initflag) { model.removeNodeset("/root/init/roominfo/room/roomcd"); model.resetInstanceNode("/root/main/cond/patnm"); model.resetInstanceNode("/root/main/cond/pid"); var settingrnid = model.getValue("/root/main/cond/settingrnid"); cmb_room.disabled = false; 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/settingrnid", model.getValue("/root/main/cond/settingrnid")); if (submit("TRMNW10902", false)) { if (model.getValue("/root/main/cond/upinfoyn") == "Y") { //»ó´ÜÁ¤º¸¿¡ ȯÀÚ°¡ ¼ÂÆÃµÇ¾î ÀÖÀ» °æ¿ì //20110828_KNUH_Start if(settingrnid == null || settingrnid == "") { model.setValue("/root/main/cond/roomcd", model.getValue("/root/main/paminfo/list/roomcd")); } else { model.setValue("/root/main/cond/roomcd", ""); } //20110828_KNUH_End fPatInfoRef("I",initflag); } else { model.setValue("/root/main/cond/roomcd", "-"); model.removeNodeset("/root/init/patinfo/patlist"); } } model.refresh(); } function fnZoneDisp() { //ÀÀ±ÞÀÇ·á¼¾ÅÍ(2280200000)ÀÎ °æ¿ì //º´µ¿Á¤º¸´ë½Å¿¡ ±¸¿ªÁ¤º¸°¡ º¸ÀÓ)(20080620) if ( !isNull(model.getValue("/root/code/codeinfo/codelist[cdgrupid ='002' and cdid ='"+cmb_wardlist.value+"']/cdid")) ) { caption15.visible = false; cmb_room.visible = false; cap_Zone.visible = true; cmb_Zone.visible = true; //20110830_KNUH_Start cmb_settingrn.visible = false; cap_settingrn.visible = false; //20110830_KNUH_End cmb_room.value = "-"; var zonecd = model.getValue("/root/main/paminfo/list/sectioncd"); if( !isNull(zonecd) && zonecd != "-" ){ cmb_Zone.value = model.getValue("/root/main/paminfo/list/sectioncd"); } else { cmb_Zone.value = "-"; } cmb_settingrn.visible = false; } else { caption15.visible = true; cmb_room.visible = true; cmb_settingrn.visible =true; cap_Zone.visible = false; cmb_Zone.visible = false; cmb_Zone.value = ""; //20110830_KNUH_Start cmb_settingrn.visible = true; cap_settingrn.visible = true; //20110830_KNUH_End } model.refresh(); } /** * @desc : º´½Çº° ȯÀÚ¸®½ºÆ® Á¶È¸, ºÎ¼­º° ȯÀÚ¸®½ºÆ® Á¶È¸ * @ * @param : * @return : * @author : ¼º¹Ì¿¬ * @--------------------------------------------------- */ function fPatInfoRef(deptflag, initflag) { var settingnurid=""; settingnurid = model.getValue("/root/main/cond/settingrnid"); model.removeNodeset("/root/send/reqdata"); model.makeNode("/root/send/reqdata"); model.makeValue("/root/send/reqdata/orddd", model.getValue("/root/main/cond/seardd")); model.makeValue("/root/send/reqdata/wardcd", model.getValue("/root/main/cond/wardcd")); model.makeValue("/root/send/reqdata/settingrnid", model.getValue("/root/main/cond/settingrnid")); //20110828_KNUH_Start if(settingnurid == null || settingnurid == "") { model.makeValue("/root/send/reqdata/roomcd", model.getValue("/root/main/cond/roomcd")); } else { model.makeValue("/root/send/reqdata/roomcd", "-"); } //20110828_KNUH_End model.makeValue("/root/send/reqdata/refflag", "room"); model.makeValue("/root/send/reqdata/ordtype", "I"); model.makeValue("/root/send/reqdata/zonecd", model.getValue("/root/main/cond/zonecd")); model.makeValue("/root/send/reqdata/settingrnid", model.getValue("/root/main/cond/settingrnid")); model.makeValue("/root/send/reqdata/barflag" , "Y"); model.makeValue("/root/send/reqdata/typeflag" , model.getValue(rdo_typeflag.attribute("ref"))); if (submit("TRMNW10903")) { } } //20110828_KNUH_Start ȯÀÚsettingÁ¤º¸ Á¶È¸ function fGetSettringInfoRef() { model.makeValue("/root/send/reqdata/wardcd", model.getValue("/root/main/cond/wardcd") ); submit("TRMNW10910"); cmb_settingrn.refresh(); } /** * @group : * @ver : 2008.07.02 * @by : ¾çõ´ö * @--------------------------------------------------- * @type : function * @access : public * @desc : IOÁ¤º¸ Á¶È¸ * @param : * @return : * @--------------------------------------------------- */ function fSearIOInfo(){ model.removeNodeset(grd_ioinfo.nodeset); model.copynode("root/send", "root/main/cond"); model.setValue("/root/main/cond/seartodd", getDateCalc(ipt_seardd.value, 1, "+")); model.makeValue("/root/send/pid", model.getValue("/root/main/cond/pid")); model.makeValue("/root/send/cretno", model.getValue("/root/main/cond/cretno")); model.makeValue("/root/send/orddd", model.getValue("/root/main/cond/orddd")); model.makeValue("/root/send/seardd", model.getValue("/root/main/cond/seardd")); model.makeValue("/root/send/wardcd", model.getValue("/root/main/cond/wardcd")); model.makeValue("/root/send/seartodd", model.getValue("/root/main/cond/seartodd")); model.makeValue("/root/send/memoitemflag", "08"); submit("TRMNR05801_SJH"); fSettingIOlnfo(); } /** * @group : * @ver : 2008.07.02 * @by : ¾çõ´ö * @--------------------------------------------------- * @type : function * @access : public * @desc : Á¶È¸ Á¤º¸ Setting * @param : * @return : * @--------------------------------------------------- */ function fSettingIOlnfo(){ grd_ioinfo.rebuildStyle(); var tRow = grd_ioinfo.rows; var OralSum = 0; var DrugSum = 0; var BloodSum = 0 ; var EtcSum = 0; var OutPutSum = 0; var IntakeTotalSum = 0; var OutputTotalSum = 0; var SpecSum = 0; var StartFlag = ""; var sAddIntakeRow = ""; var IntakeLastRow = 0; OralSum = model.getValue("/root/main/ioinfo/iolist[lnkbizcd = '" + "01" + "' and itemnm = '"+""+"']/total"); DrugSum = model.getValue("/root/main/ioinfo/iolist[lnkbizcd = '" + "02" + "' and itemnm = '"+""+"']/total"); BloodSum = model.getValue("/root/main/ioinfo/iolist[lnkbizcd = '" + "03" + "' and itemnm = '"+""+"']/total"); EtcSum = model.getValue("/root/main/ioinfo/iolist[lnkbizcd = '" + "04" + "' and itemnm = '"+""+"']/total"); OutPutSum = model.getValue("/root/main/ioinfo/iolist[lnkbizcd = '" + "07" + "' and itemnm = '"+""+"']/total"); var DayOralSum = model.getValue("/root/main/ioinfo/iolist[lnkbizcd = '" + "01" + "' and itemnm = '"+"°æ±¸ÀÔ·Â"+"']/dayrslt"); var EvnOralSum = model.getValue("/root/main/ioinfo/iolist[lnkbizcd = '" + "01" + "' and itemnm = '"+"°æ±¸ÀÔ·Â"+"']/evnrslt"); var NgtOralSum = model.getValue("/root/main/ioinfo/iolist[lnkbizcd = '" + "01" + "' and itemnm = '"+"°æ±¸ÀÔ·Â"+"']/ngtrslt"); var totalOralSum = model.getValue("/root/main/ioinfo/iolist[lnkbizcd = '" + "01" + "' and itemnm = '"+"°æ±¸ÀÔ·Â"+"']/subtotal"); var DaySum1 = model.getValue("/root/main/ioinfo/iolist[lnkbizcd = '" + "01" + "' and itemnm = '"+""+"']/dayrslt"); var DaySum2 = model.getValue("/root/main/ioinfo/iolist[lnkbizcd = '" + "02" + "' and itemnm = '"+""+"']/dayrslt"); var DaySum3 = model.getValue("/root/main/ioinfo/iolist[lnkbizcd = '" + "03" + "' and itemnm = '"+""+"']/dayrslt"); var DaySum4 = model.getValue("/root/main/ioinfo/iolist[lnkbizcd = '" + "04" + "' and itemnm = '"+""+"']/dayrslt"); var EvnSum1 = model.getValue("/root/main/ioinfo/iolist[lnkbizcd = '" + "01" + "' and itemnm = '"+""+"']/evnrslt"); var EvnSum2 = model.getValue("/root/main/ioinfo/iolist[lnkbizcd = '" + "02" + "' and itemnm = '"+""+"']/evnrslt"); var EvnSum3 = model.getValue("/root/main/ioinfo/iolist[lnkbizcd = '" + "03" + "' and itemnm = '"+""+"']/evnrslt"); var EvnSum4 = model.getValue("/root/main/ioinfo/iolist[lnkbizcd = '" + "04" + "' and itemnm = '"+""+"']/evnrslt"); var NgtSum1 = model.getValue("/root/main/ioinfo/iolist[lnkbizcd = '" + "01" + "' and itemnm = '"+""+"']/ngtrslt"); var NgtSum2 = model.getValue("/root/main/ioinfo/iolist[lnkbizcd = '" + "02" + "' and itemnm = '"+""+"']/ngtrslt"); var NgtSum3 = model.getValue("/root/main/ioinfo/iolist[lnkbizcd = '" + "03" + "' and itemnm = '"+""+"']/ngtrslt"); var NgtSum4 = model.getValue("/root/main/ioinfo/iolist[lnkbizcd = '" + "04" + "' and itemnm = '"+""+"']/ngtrslt"); var SubTotal1 = model.getValue("/root/main/ioinfo/iolist[lnkbizcd = '" + "01" + "' and itemnm = '"+""+"']/subtotal"); if(DaySum1 == "")DaySum1=0; if(DaySum2 == "")DaySum2=0; if(DaySum3 == "")DaySum3=0; if(DaySum4 == "")DaySum4=0; if(EvnSum1 == "")EvnSum1=0; if(EvnSum2 == "")EvnSum2=0; if(EvnSum3 == "")EvnSum3=0; if(EvnSum4 == "")EvnSum4=0; if(NgtSum1 == "")NgtSum1=0; if(NgtSum2 == "")NgtSum2=0; if(NgtSum3 == "")NgtSum3=0; if(NgtSum4 == "")NgtSum4=0; for(var i=grd_ioinfo.fixedRows; i < grd_ioinfo.rows; i++) { lnkbizcd = grd_ioinfo.valueMatrix(i, grd_ioinfo.colRef("lnkbizcd")); itemnm = grd_ioinfo.valueMatrix(i, grd_ioinfo.colRef("itemnm")); if(lnkbizcd == "01" && (itemnm == "" || itemnm == null) ) { grd_ioinfo.valueMatrix(i, grd_ioinfo.colRef("dayrslt")) = parseFloat(DaySum1) + parseFloat(DayOralSum); grd_ioinfo.valueMatrix(i, grd_ioinfo.colRef("evnrslt")) = parseFloat(EvnSum1) + parseFloat(EvnOralSum); grd_ioinfo.valueMatrix(i, grd_ioinfo.colRef("ngtrslt")) = parseFloat(NgtSum1) + parseFloat(NgtOralSum); grd_ioinfo.valueMatrix(i, grd_ioinfo.colRef("subtotal")) = parseFloat(SubTotal1) + parseFloat(totalOralSum); grd_ioinfo.valueMatrix(i, grd_ioinfo.colRef("total")) = parseFloat(SubTotal1) + parseFloat(totalOralSum); } } if(tRow > 0){ for(var i = grd_ioinfo.fixedRows ; i <= grd_ioinfo.rows - grd_ioinfo.fixedRows ; i ++){ if(grd_ioinfo.valueMatrix(i, grd_ioinfo.colRef("setyn")) == "1"){ IntakeLastRow = i; } var param = grd_ioinfo.valueMatrix(i, grd_ioinfo.colRef("lnkbizcd")); //¼öÄ¡°¡ 0ÀÎ Ç׸ñ »èÁ¦ ¹× Ç׸ñ¸í ÀÔ·Â if(param == "01"){ if(grd_ioinfo.valueMatrix(i, grd_ioinfo.colRef("d_lnkrecflag")) == "" && grd_ioinfo.valueMatrix(i, grd_ioinfo.colRef("itemnm")) != ""){ //if(grd_ioinfo.valueMatrix(i, grd_ioinfo.colRef("dayrslt")) == "0"){ // grd_ioinfo.valueMatrix(i, grd_ioinfo.colRef("dayrslt")) = ""; //}else{ // grd_ioinfo.valueMatrix(i, grd_ioinfo.colRef("d_lnkrecflag")) = grd_ioinfo.valueMatrix(i, grd_ioinfo.colRef("itemnm")); //} grd_ioinfo.valueMatrix(i, grd_ioinfo.colRef("d_lnkrecflag")) = grd_ioinfo.valueMatrix(i, grd_ioinfo.colRef("itemnm")); } if(grd_ioinfo.valueMatrix(i, grd_ioinfo.colRef("e_lnkrecflag")) == "" && grd_ioinfo.valueMatrix(i, grd_ioinfo.colRef("itemnm")) != ""){ //if(grd_ioinfo.valueMatrix(i, grd_ioinfo.colRef("evnrslt")) == "0"){ // grd_ioinfo.valueMatrix(i, grd_ioinfo.colRef("evnrslt")) = ""; //}else{ // grd_ioinfo.valueMatrix(i, grd_ioinfo.colRef("e_lnkrecflag")) = grd_ioinfo.valueMatrix(i, grd_ioinfo.colRef("itemnm")); //} grd_ioinfo.valueMatrix(i, grd_ioinfo.colRef("e_lnkrecflag")) = grd_ioinfo.valueMatrix(i, grd_ioinfo.colRef("itemnm")); } if(grd_ioinfo.valueMatrix(i, grd_ioinfo.colRef("n_lnkrecflag")) == "" && grd_ioinfo.valueMatrix(i, grd_ioinfo.colRef("itemnm")) != ""){ //if(grd_ioinfo.valueMatrix(i, grd_ioinfo.colRef("ngtrslt")) == "0"){ // grd_ioinfo.valueMatrix(i, grd_ioinfo.colRef("ngtrslt")) = ""; //}else{ // grd_ioinfo.valueMatrix(i, grd_ioinfo.colRef("n_lnkrecflag")) = grd_ioinfo.valueMatrix(i, grd_ioinfo.colRef("itemnm")); //} grd_ioinfo.valueMatrix(i, grd_ioinfo.colRef("n_lnkrecflag")) = grd_ioinfo.valueMatrix(i, grd_ioinfo.colRef("itemnm")); } }else{ if( grd_ioinfo.valueMatrix(i, grd_ioinfo.colRef("d_lnkrecflag")) == ""){ grd_ioinfo.valueMatrix(i, grd_ioinfo.colRef("d_lnkrecflag")) = grd_ioinfo.valueMatrix(i, grd_ioinfo.colRef("itemnm"))+ ( param == "03" && grd_ioinfo.valueMatrix(i, grd_ioinfo.colRef("daycnt")) != "0" && grd_ioinfo.valueMatrix(i, grd_ioinfo.colRef("itemnm")) != "" ? " ("+ grd_ioinfo.valueMatrix(i, grd_ioinfo.colRef("daycnt")) + ")" : ""); }else if(grd_ioinfo.valueMatrix(i, grd_ioinfo.colRef("itemnm")) != ""){ grd_ioinfo.valueMatrix(i, grd_ioinfo.colRef("dayrslt")) = ""; } if(grd_ioinfo.valueMatrix(i, grd_ioinfo.colRef("e_lnkrecflag")) == ""){ grd_ioinfo.valueMatrix(i, grd_ioinfo.colRef("e_lnkrecflag")) = grd_ioinfo.valueMatrix(i, grd_ioinfo.colRef("itemnm"))+ ( param == "03" && grd_ioinfo.valueMatrix(i, grd_ioinfo.colRef("evncnt")) != "0" && grd_ioinfo.valueMatrix(i, grd_ioinfo.colRef("itemnm")) != "" ? " ("+ grd_ioinfo.valueMatrix(i, grd_ioinfo.colRef("evncnt")) + ")" : ""); }else if(grd_ioinfo.valueMatrix(i, grd_ioinfo.colRef("itemnm")) != ""){ grd_ioinfo.valueMatrix(i, grd_ioinfo.colRef("evnrslt")) = ""; } if(grd_ioinfo.valueMatrix(i, grd_ioinfo.colRef("n_lnkrecflag")) == ""){ grd_ioinfo.valueMatrix(i, grd_ioinfo.colRef("n_lnkrecflag")) = grd_ioinfo.valueMatrix(i, grd_ioinfo.colRef("itemnm"))+ ( param == "03" && grd_ioinfo.valueMatrix(i, grd_ioinfo.colRef("ngtcnt")) != "0" && grd_ioinfo.valueMatrix(i, grd_ioinfo.colRef("itemnm")) != "" ? " ("+ grd_ioinfo.valueMatrix(i, grd_ioinfo.colRef("ngtcnt")) + ")" : ""); }else if(grd_ioinfo.valueMatrix(i, grd_ioinfo.colRef("itemnm")) != ""){ grd_ioinfo.valueMatrix(i, grd_ioinfo.colRef("ngtrslt")) = ""; } } var fRow = grd_ioinfo.findrow(grd_ioinfo.valueMatrix( i, grd_ioinfo.colRef("lnkbizcd")), 1, grd_ioinfo.colRef("lnkbizcd")); /* if(fRow < i ){ //°°Àº ºÐ·ùÀÇ »óÀ§ Çà µ¥ÀÌÅÍ Á¸Àç ¿©ºÎ È®ÀÎ ¹× ä¿ì±â if( grd_ioinfo.valueMatrix(i, grd_ioinfo.colRef("itemnm")) != "" && grd_ioinfo.valueMatrix(i, grd_ioinfo.colRef("dayrslt")) != "" ){ for(var k = fRow ; k < i ; k++){ if(grd_ioinfo.valueMatrix(k, grd_ioinfo.colRef("dayrslt")) == "" ){ grd_ioinfo.valueMatrix(k, grd_ioinfo.colRef("dayrslt")) = grd_ioinfo.valueMatrix(i, grd_ioinfo.colRef("dayrslt")); grd_ioinfo.valueMatrix(k, grd_ioinfo.colRef("d_lnkrecflag")) = grd_ioinfo.valueMatrix(i, grd_ioinfo.colRef("itemnm"))+ ( param == "03" && grd_ioinfo.valueMatrix(i, grd_ioinfo.colRef("daycnt")) != "0" && grd_ioinfo.valueMatrix(i, grd_ioinfo.colRef("itemnm")) != "" ? " ("+ grd_ioinfo.valueMatrix(i, grd_ioinfo.colRef("daycnt")) + ")" : ""); grd_ioinfo.valueMatrix(i, grd_ioinfo.colRef("dayrslt")) = ""; grd_ioinfo.valueMatrix(i, grd_ioinfo.colRef("d_lnkrecflag")) = ""; } } } if( grd_ioinfo.valueMatrix(i, grd_ioinfo.colRef("itemnm")) != "" && grd_ioinfo.valueMatrix(i, grd_ioinfo.colRef("evnrslt")) != "" ){ for(var k = fRow ; k < i ; k++){ if(grd_ioinfo.valueMatrix(k, grd_ioinfo.colRef("evnrslt")) == "" ){ grd_ioinfo.valueMatrix(k, grd_ioinfo.colRef("evnrslt")) = grd_ioinfo.valueMatrix(i, grd_ioinfo.colRef("evnrslt")); grd_ioinfo.valueMatrix(k, grd_ioinfo.colRef("e_lnkrecflag")) = grd_ioinfo.valueMatrix(i, grd_ioinfo.colRef("itemnm"))+ ( param == "03" && grd_ioinfo.valueMatrix(i, grd_ioinfo.colRef("evncnt")) != "0" && grd_ioinfo.valueMatrix(i, grd_ioinfo.colRef("itemnm")) != "" ? " ("+ grd_ioinfo.valueMatrix(i, grd_ioinfo.colRef("evncnt")) + ")" : ""); grd_ioinfo.valueMatrix(i, grd_ioinfo.colRef("evnrslt")) = ""; grd_ioinfo.valueMatrix(i, grd_ioinfo.colRef("e_lnkrecflag")) = ""; } } }else{ grd_ioinfo.valueMatrix(i, grd_ioinfo.colRef("e_lnkrecflag")) = ""; } if( grd_ioinfo.valueMatrix(i, grd_ioinfo.colRef("itemnm")) != "" && grd_ioinfo.valueMatrix(i, grd_ioinfo.colRef("ngtrslt")) != "" ){ for(var k = fRow ; k < i ; k++){ if(grd_ioinfo.valueMatrix(k, grd_ioinfo.colRef("ngtrslt")) == "" ){ grd_ioinfo.valueMatrix(k, grd_ioinfo.colRef("ngtrslt")) = grd_ioinfo.valueMatrix(i, grd_ioinfo.colRef("ngtrslt")); grd_ioinfo.valueMatrix(k, grd_ioinfo.colRef("n_lnkrecflag")) = grd_ioinfo.valueMatrix(i, grd_ioinfo.colRef("itemnm"))+ ( param == "03" && grd_ioinfo.valueMatrix(i, grd_ioinfo.colRef("ngtcnt")) != "0" && grd_ioinfo.valueMatrix(i, grd_ioinfo.colRef("itemnm")) != "" ? " ("+ grd_ioinfo.valueMatrix(i, grd_ioinfo.colRef("ngtcnt")) + ")" : ""); grd_ioinfo.valueMatrix(i, grd_ioinfo.colRef("ngtrslt")) = ""; grd_ioinfo.valueMatrix(i, grd_ioinfo.colRef("n_lnkrecflag")) = ""; } } }else{ grd_ioinfo.valueMatrix(i, grd_ioinfo.colRef("n_lnkrecflag")) = ""; } } */ //±¸ºÐº° ÇÕ°è ÀÔ·Â(Merge ÀÛ¾÷À» ÇϱâÀ§ÇÏ¿© ¸ÓÁöÇÒ Çà µ¥ÀÌÅÍ ÀÏÄ¡½Ã۱â À§ÇÔ) switch(param){ case "01" : grd_ioinfo.valueMatrix(i, grd_ioinfo.colRef("total")) = " " + OralSum; break; case "02" : grd_ioinfo.valueMatrix(i, grd_ioinfo.colRef("total")) = " " + DrugSum; break; case "03" : grd_ioinfo.valueMatrix(i, grd_ioinfo.colRef("total")) = " " + BloodSum; break; case "04" : grd_ioinfo.valueMatrix(i, grd_ioinfo.colRef("total")) = " " + EtcSum; break; case "05" : grd_ioinfo.valueMatrix(i, grd_ioinfo.colRef("total")) = " " + OutPutSum; break; } //±¸ºÐÇÊµå »ö»ó º¯°æ grd_ioinfo.cellStyle("background-color", i, grd_ioinfo.colRef("setyn"), i, grd_ioinfo.colRef("lnkbizcd")) = "#ccccff"; //SubTotal Row »ö»ó º¯°æ if(model.getValue("/root/main/ioinfo/iolist["+i+"]/itemnm") == ""){ grd_ioinfo.cellStyle("background-color", i, grd_ioinfo.colRef("d_lnkrecflag"), i, grd_ioinfo.colRef("subtotal")) = "#ffff99"; } //Total Output Row »ö»óº¯°æ if(model.getValue("/root/main/ioinfo/iolist["+i+"]/lnkbizcd") == "07"){ grd_ioinfo.cellStyle("background-color", i, grd_ioinfo.colRef("setyn"), i, grd_ioinfo.colRef("total")) = "#ffff00"; grd_ioinfo.cellStyle("font-size", i, grd_ioinfo.colRef("setyn"), i, grd_ioinfo.colRef("total")) = "12"; grd_ioinfo.cellStyle("font-weight", i, grd_ioinfo.colRef("setyn"), i, grd_ioinfo.colRef("total")) = "bold"; //grd_ioinfo.cellStyle("text-align", i, grd_ioinfo.colRef("total"), i, grd_ioinfo.colRef("total")) = "center"; } } //Intake ÇÕ°è Row Ãß°¡ var intaketotalsetrow = 0; if(IntakeLastRow > 0){ grd_ioinfo.insertRow(IntakeLastRow, "below", false); intaketotalsetrow = IntakeLastRow + 1; } if(intaketotalsetrow > 0){ grd_ioinfo.valueMatrix(intaketotalsetrow, grd_ioinfo.colRef("setyn")) = "06"; grd_ioinfo.valueMatrix(intaketotalsetrow, grd_ioinfo.colRef("lnkbizcd")) = "06"; grd_ioinfo.valueMatrix(intaketotalsetrow, grd_ioinfo.colRef("dayrslt")) = eval(DayOralSum) + eval(DaySum1) + eval(DaySum2) + eval(DaySum3)+ eval(DaySum4); grd_ioinfo.valueMatrix(intaketotalsetrow, grd_ioinfo.colRef("evnrslt")) = eval(EvnOralSum) + eval(EvnSum1) + eval(EvnSum2) + eval(EvnSum3)+ eval(EvnSum4); grd_ioinfo.valueMatrix(intaketotalsetrow, grd_ioinfo.colRef("ngtrslt")) = eval(NgtOralSum) + eval(NgtSum1) + eval(NgtSum2) + eval(NgtSum3)+ eval(NgtSum4); grd_ioinfo.cellStyle("background-color", intaketotalsetrow, grd_ioinfo.colRef("setyn"), intaketotalsetrow, grd_ioinfo.colRef("total")) = "#ffff00"; grd_ioinfo.cellStyle("font-size", intaketotalsetrow, grd_ioinfo.colRef("setyn"), intaketotalsetrow, grd_ioinfo.colRef("total")) = "12"; grd_ioinfo.cellStyle("font-weight", intaketotalsetrow, grd_ioinfo.colRef("setyn"), intaketotalsetrow, grd_ioinfo.colRef("total")) = "bold"; } // ºñ°í Row Ãß°¡¹× °è»ê Á¤º¸ ÀÔ·Â var insertRow = 0 ; var specRow = 0; var outputtotalsetrow = grd_ioinfo.findRow("07", 1, grd_ioinfo.colRef("setyn")); if(intaketotalsetrow > 0 && outputtotalsetrow > 0){ grd_ioinfo.insertRow(outputtotalsetrow, "below", false); specRow = outputtotalsetrow+1; } if(specRow > 0 ){ var d_spec = eval(grd_ioinfo.valueMatrix(intaketotalsetrow, grd_ioinfo.colRef("dayrslt"))) - eval(grd_ioinfo.valueMatrix(outputtotalsetrow, grd_ioinfo.colRef("dayrslt"))); var e_spec = eval(grd_ioinfo.valueMatrix(intaketotalsetrow, grd_ioinfo.colRef("evnrslt"))) - eval(grd_ioinfo.valueMatrix(outputtotalsetrow, grd_ioinfo.colRef("evnrslt"))); var n_spec = eval(grd_ioinfo.valueMatrix(intaketotalsetrow, grd_ioinfo.colRef("ngtrslt"))) - eval(grd_ioinfo.valueMatrix(outputtotalsetrow, grd_ioinfo.colRef("ngtrslt"))); var t_spec = eval(d_spec) + eval(e_spec) + eval(n_spec); d_spec = Math.round(d_spec * Math.pow(10, (-4)*(-1)-1)) / Math.pow(10, (-4)*(-1)-1); e_spec = Math.round(e_spec * Math.pow(10, (-4)*(-1)-1)) / Math.pow(10, (-4)*(-1)-1); n_spec = Math.round(n_spec * Math.pow(10, (-4)*(-1)-1)) / Math.pow(10, (-4)*(-1)-1); t_spec = Math.round(t_spec * Math.pow(10, (-4)*(-1)-1)) / Math.pow(10, (-4)*(-1)-1); grd_ioinfo.valueMatrix(specRow, grd_ioinfo.colRef("setyn")) = "08"; grd_ioinfo.valueMatrix(specRow, grd_ioinfo.colRef("lnkbizcd")) = "08"; if(d_spec > 0){ grd_ioinfo.valueMatrix(specRow, grd_ioinfo.colRef("dayrslt"))= "+" + d_spec; grd_ioinfo.cellStyle("color", specRow, grd_ioinfo.colRef("dayrslt"), specRow, grd_ioinfo.colRef("dayrslt")) = "#ff0000"; }else if(d_spec == 0){ grd_ioinfo.valueMatrix(specRow, grd_ioinfo.colRef("dayrslt"))= d_spec; }else{ grd_ioinfo.valueMatrix(specRow, grd_ioinfo.colRef("dayrslt"))= d_spec; grd_ioinfo.cellStyle("color", specRow, grd_ioinfo.colRef("dayrslt"), specRow, grd_ioinfo.colRef("dayrslt")) = "#0000ff"; } if(e_spec > 0){ grd_ioinfo.valueMatrix(specRow, grd_ioinfo.colRef("evnrslt"))= "+" + e_spec; grd_ioinfo.cellStyle("color", specRow, grd_ioinfo.colRef("evnrslt"), specRow, grd_ioinfo.colRef("evnrslt")) = "#ff0000"; }else if(e_spec == 0){ grd_ioinfo.valueMatrix(specRow, grd_ioinfo.colRef("evnrslt"))= e_spec; }else{ grd_ioinfo.valueMatrix(specRow, grd_ioinfo.colRef("evnrslt"))= e_spec; grd_ioinfo.cellStyle("color", specRow, grd_ioinfo.colRef("evnrslt"), specRow, grd_ioinfo.colRef("evnrslt")) = "#0000ff"; } if(n_spec > 0){ grd_ioinfo.valueMatrix(specRow, grd_ioinfo.colRef("ngtrslt"))= "+" + n_spec; grd_ioinfo.cellStyle("color", specRow, grd_ioinfo.colRef("ngtrslt"), specRow, grd_ioinfo.colRef("ngtrslt")) = "#ff0000"; }else if(n_spec == 0){ grd_ioinfo.valueMatrix(specRow, grd_ioinfo.colRef("ngtrslt"))= n_spec; }else{ grd_ioinfo.valueMatrix(specRow, grd_ioinfo.colRef("ngtrslt"))= n_spec; grd_ioinfo.cellStyle("color", specRow, grd_ioinfo.colRef("ngtrslt"), specRow, grd_ioinfo.colRef("ngtrslt")) = "#0000ff"; } if(t_spec > 0){ grd_ioinfo.valueMatrix(specRow, grd_ioinfo.colRef("subtotal"))= "+" + t_spec; grd_ioinfo.valueMatrix(specRow, grd_ioinfo.colRef("total"))= "+" + t_spec; grd_ioinfo.cellStyle("color", specRow, grd_ioinfo.colRef("subtotal"), specRow, grd_ioinfo.colRef("total")) = "#ff0000"; }else if(t_spec == 0){ grd_ioinfo.valueMatrix(specRow, grd_ioinfo.colRef("subtotal"))= t_spec; grd_ioinfo.valueMatrix(specRow, grd_ioinfo.colRef("total"))= t_spec; }else{ grd_ioinfo.valueMatrix(specRow, grd_ioinfo.colRef("subtotal"))= t_spec; grd_ioinfo.valueMatrix(specRow, grd_ioinfo.colRef("total"))= t_spec; grd_ioinfo.cellStyle("color", specRow, grd_ioinfo.colRef("subtotal"), specRow, grd_ioinfo.colRef("total")) = "#0000ff"; } grd_ioinfo.cellStyle("background-color", specRow, grd_ioinfo.colRef("setyn"), specRow, grd_ioinfo.colRef("total")) = "#ffcc99"; grd_ioinfo.cellStyle("font-size", specRow, grd_ioinfo.colRef("setyn"), specRow, grd_ioinfo.colRef("total")) = "12"; grd_ioinfo.cellStyle("font-weight", specRow, grd_ioinfo.colRef("setyn"), specRow, grd_ioinfo.colRef("total")) = "bold"; } //±×¸®µå ¼±Åà Á¦¾î ºÎºÐ model.setFocus("btn_close"); grd_ioinfo.row = 0; grd_ioinfo.isReadOnly(grd_ioinfo.fixedrows, grd_ioinfo.fixedcols, grd_ioinfo.rows-1, grd_ioinfo.cols-1) = true; //±×¸®µå ¸ÓÁö ÀÛ¾÷ grd_ioinfo.mergecells = "bycolrec"; // byrestriccol byrestricrow grd_ioinfo.mergecol(0) = true; grd_ioinfo.mergecol(1) = true; grd_ioinfo.mergecol(2) = false; grd_ioinfo.mergecol(3) = false; grd_ioinfo.mergecol(4) = false; grd_ioinfo.mergecol(5) = false; grd_ioinfo.mergecol(6) = false; grd_ioinfo.mergecol(7) = false; grd_ioinfo.mergecol(8) = false; grd_ioinfo.mergecol(9) = true; //Total Intake ÇÕ°è µ¥ÀÌÅÍ ÀÔ·Â(Merge·Î ÀÎÇÏ¿© Á¦ÀÏ ÇÏ´Ü¿¡ Ãß°¡) if(intaketotalsetrow > 0){ grd_ioinfo.valueMatrix(intaketotalsetrow, grd_ioinfo.colRef("subtotal")) = " " + Math.round((eval(DaySum1) + eval(DaySum2) + eval(DaySum3)+ eval(DaySum4) + eval(EvnSum1) + eval(EvnSum2) + eval(EvnSum3)+ eval(EvnSum4) + eval(NgtSum1) + eval(NgtSum2) + eval(NgtSum3)+ eval(NgtSum4)) * Math.pow(10, (-4)*(-1)-1)) / Math.pow(10, (-4)*(-1)-1); grd_ioinfo.valueMatrix(intaketotalsetrow, grd_ioinfo.colRef("total")) = " " + Math.round((eval(DaySum1) + eval(DaySum2) + eval(DaySum3)+ eval(DaySum4) + eval(EvnSum1) + eval(EvnSum2) + eval(EvnSum3)+ eval(EvnSum4) + eval(NgtSum1) + eval(NgtSum2) + eval(NgtSum3)+ eval(NgtSum4)) * Math.pow(10, (-4)*(-1)-1)) / Math.pow(10, (-4)*(-1)-1); } } for(var i = grd_ioinfo.fixedRows ; i <= grd_ioinfo.rows - grd_ioinfo.fixedRows ; i ++){ if(grd_ioinfo.valueMatrix(i, grd_ioinfo.colRef("dayrslt")) == ""){ grd_ioinfo.valueMatrix(i, grd_ioinfo.colRef("d_lnkrecflag")) =""; } if(grd_ioinfo.valueMatrix(i, grd_ioinfo.colRef("evnrslt")) == ""){ grd_ioinfo.valueMatrix(i, grd_ioinfo.colRef("e_lnkrecflag")) =""; } if(grd_ioinfo.valueMatrix(i, grd_ioinfo.colRef("ngtrslt")) == "" ){ grd_ioinfo.valueMatrix(i, grd_ioinfo.colRef("n_lnkrecflag")) =""; } } //¼öÄ¡·®ÀÌ Á¸ÀçÇÏÁö ¾Ê´Â Row »èÁ¦ for(var i = grd_ioinfo.fixedRows ; i <= grd_ioinfo.rows - grd_ioinfo.fixedRows ; i ++){ if(grd_ioinfo.valueMatrix(i, grd_ioinfo.colRef("dayrslt")) == "07"){ grd_ioinfo.mergerow(i) = true; } if(grd_ioinfo.valueMatrix(i, grd_ioinfo.colRef("dayrslt")) == "" && grd_ioinfo.valueMatrix(i, grd_ioinfo.colRef("evnrslt")) == "" && grd_ioinfo.valueMatrix(i, grd_ioinfo.colRef("ngtrslt")) == "" ){ grd_ioinfo.deleteRow(i); i = i-1; } } model.refresh(); } /** * @group : * @ver : 2009.07.01 * @by : ±èÈ«Á¡ * @--------------------------------------------------- * @type : function * @access : public * @desc : ¸Þ¸ðÀúÀå, ¸Þ¸ð»èÁ¦ * @param :PFlag : D - ¸Þ¸ð»èÁ¦ , S - ÀúÀå * @return : * @--------------------------------------------------- */ function fMedrMomoSave(pFlag){ var saveHearder = "m¢Ëmemocnts¢Ëpid¢Ëmemoitemflag¢Ëseqno¢Ërecdd_b¢Ërectm_b¢Ërecdd¢Ërectm¢Ëindd¢Ëcretno¢Ì"; var saveData = ""; var status = ""; if ( isNull(model.getValue(xPathCondInfo + "/pid")) ) { messageBox("ÇØ´ç ȯÀÚ°¡ ¼±ÅõÇÁö", "E007"); return; } else { model.removeNodeset("/root/send/savedata"); model.makeNode("/root/send/savedata"); model.makeValue("/root/send/savedata/condinfo/wardcd", model.getValue(xPathCondInfo + "/wardcd")); model.makeValue("/root/send/savedata/condinfo/pid", model.getValue(xPathCondInfo + "/pid")); model.makeValue("/root/send/savedata/condinfo/indd", model.getValue(xPathCondInfo + "/orddd")); model.makeValue("/root/send/savedata/condinfo/cretno", model.getValue(xPathCondInfo + "/cretno")); model.makeValue("/root/send/savedata/condinfo/orddd", model.getValue(xPathCondInfo + "/seardd")); model.makeValue("/root/send/savedata/condinfo/seardd", model.getValue(xPathCondInfo + "/seardd")); model.makeValue("/root/send/savedata/condinfo/memoitemflag", "08"); if( pFlag =="D"){ saveData = "d" + "¢Ë" + "" + "¢Ë" + model.getValue(xPathCondInfo + "/pid") + "¢Ë" + "08" + "¢Ë" + model.getValue(xPathMemoInfo + "/seqno") + "¢Ë" + model.getValue(xPathMemoInfo + "/recdd_b") + "¢Ë" + model.getValue(xPathMemoInfo + "/rectm_b") + "¢Ë" + model.getValue(xPathMemoInfo + "/recdd_b") + "¢Ë" + model.getValue(xPathMemoInfo + "/rectm_b") + "¢Ë" + model.getValue(xPathCondInfo + "/orddd") + "¢Ë" + model.getValue(xPathCondInfo + "/cretno") + "¢Ì"; model.makeValue("/root/send/savedata/memoinfo",saveHearder+saveData); model.resetInstanceNode(xPathMemoInfo); if(submit("TXMNR05801","false")){ messageBox("¼º°øÀûÀ¸·Î", "I001"); } }else{ if ( isNull(model.getValue(xPathMemoInfo + "/memocnts")) ){ messageBox("ÀúÀåÇÒ ¸Þ¸ð¸¦", "C001");//" ÀÔ·ÂÇϽʽÿÀ." return; } if(isNull(model.getValue(xPathMemoInfo+"/status"))){ status="i"; saveData = status + "¢Ë" + model.getValue(xPathMemoInfo+"/memocnts") + "¢Ë" + model.getValue(xPathCondInfo + "/pid") + "¢Ë" + "08" + "¢Ë" + model.getValue(xPathMemoInfo + "/seqno") + "¢Ë" + model.getValue(xPathMemoInfo + "/recdd_b") + "¢Ë" + model.getValue(xPathMemoInfo + "/rectm_b") + "¢Ë" + model.getValue(xPathCondInfo + "/seardd") + "¢Ë" + "0000¢Ë" + model.getValue(xPathCondInfo + "/orddd") + "¢Ë" + model.getValue(xPathCondInfo + "/cretno") + "¢Ì"; }else{ status="u"; saveData = status + "¢Ë" + model.getValue(xPathMemoInfo+"/memocnts") + "¢Ë" + model.getValue(xPathCondInfo + "/pid") + "¢Ë" + "08" + "¢Ë" + model.getValue(xPathMemoInfo + "/seqno") + "¢Ë" + model.getValue(xPathMemoInfo + "/recdd_b") + "¢Ë" + model.getValue(xPathMemoInfo + "/rectm_b") + "¢Ë" + model.getValue(xPathMemoInfo + "/recdd_b") + "¢Ë" + model.getValue(xPathMemoInfo + "/rectm_b") + "¢Ë" + model.getValue(xPathCondInfo + "/orddd") + "¢Ë" + model.getValue(xPathCondInfo + "/cretno") + "¢Ì"; } model.makeValue("/root/send/savedata/memoinfo",saveHearder+saveData); model.resetInstanceNode(xPathMemoInfo); if(submit("TXMNR05801","false")){ messageBox("¼º°øÀûÀ¸·Î", "I001"); } } tar_memocnts.refresh(); } }