/* HD Scheduling_°³Àκ°¿¹¾àÇöȲ (SMMND02700.xrw - JScript ) - Version : 1) : Ver.1.00.01 */ var sRtn = getCurrentDate(); //ÇöÀçÀÏÀÚ var rsrvdd1 = model.getValue("/root/temp/savedata/rsrvdd1"); var rsrvdd2 = model.getValue("/root/temp/savedata/rsrvdd2"); var rsrvterm = getDateInterval(rsrvdd1,rsrvdd2); //µÎ ÀÏÀÚÀÇ Â÷À̸¦ ÀÏÀÚ·Î ¸®ÅÏ /** * @group : * @ver : 2007.04.19 * @by : ±èÁø¾Æ * @--------------------------------------------------- * @type : function * @access : public * @desc : È­¸é ÃʱâÈ­ * @param : * @return : * @--------------------------------------------------- */ function fDone(){ model.makeNode("/root/temp/savedata/status"); model.setValue("/root/temp/savedata/status","i"); //fGetDate(rsrvdd1,rsrvdd2); //fInitCellColor(rsrvdd1,rsrvdd2); } // È­¸é open½Ã È­¸é ½ºÅ¸ÀÏ ÃʱâÈ­ ±â´ÉÀ» ¼öÇàÇÑ´Ù. function fInitStyle() { //font style grd_calendar.cellStyle("color",1 , 0, 6, 0) = "#ff0000"; grd_calendar.cellStyle("color",1 , 6, 6, 6) = "#0000ff"; grd_calendar.cellStyle("font-size",1 , 0, 1, 6) = "12px"; grd_calendar.cellStyle("font-size",2 , 0, 2, 6) = "12px"; grd_calendar.cellStyle("font-size",3 , 0, 3, 6) = "12px"; grd_calendar.cellStyle("font-size",4 , 0, 4, 6) = "12px"; grd_calendar.cellStyle("font-size",5 , 0, 5, 6) = "12px"; grd_calendar.cellStyle("font-size",6 , 0, 6, 6) = "12px"; grd_calendar.cellStyle("font-size",7 , 0, 7, 6) = "12px"; } //È­¸é ÄÁÆ®·Ñ ÃʱâÈ­ function fInitControl() { //¼­¹ö ÀÏÀڷΠó¸® today = (model.getValue("/root/temp/savedata/getdatelist/getdate/savedate")).toDate("YYYYMMDD"); var isYear, isMonth, ls_day; isYear = (today.getYear()).toString(); isMonth = (today.getMonth() + 1).toString(); //1~9¿ù±îÁö ¼ýÀÚ ¾Õ¿¡ 0À» ºÙ¿©ÁØ´Ù. ex) 1 -> 01 if ((isMonth.toString()).length == 1) isMonth = ("0".concat(isMonth.toString())); thisMonth = isYear.concat(isMonth); if (thisMonth < '200001') { model.setValue("/root/main/year","2000"); model.setValue("/root/main/month","01"); model.refresh(); } else { model.setValue("/root/main/year",isYear); model.setValue("/root/main/month",isMonth); model.refresh(); } } //ÇØ´ç ÀÏÀÚÀÇ º´¿ø ÀÏÁ¤ Á¤º¸¸¦ ¾ò¾î ¿Â´Ù function fGetHospitalCalendar() { var dd = (model.getValue("/root/main/year")).concat(model.getValue("/root/main/month")); model.makeNode("/root/send/date"); model.setValue("/root/send/date", dd); model.removeNodeset("/root/main/caldatalist"); model.removeNodeset("/root/main/caldatalist/caldatainfo"); if (submit("TRMND01109") == true) return true; else return false; } /** * @group : * @ver : 2007.05.21 * @by : ±èÁø¾Æ * @--------------------------------------------------- * @type : function * @access : public * @desc : ´Þ·ÂÁ¤º¸ ¹× ÀÏÀÚº° ¿¹¾àÀοø¼ö¸¦ ´Þ·Â¿¡ Ç¥½Ã * @param : * @return : * @--------------------------------------------------- */ function fCreateCalendar() { //TFclearNodeValue("/root/main/cal"); //¼­¹ö·Î ÀÚ·á ¿äû if ( fGetHospitalCalendar() != true ){ alert(" line 222 : µ¥ÀÌÅ͸¦ °¡Á®¿ÀÁö ¸øÇß½À´Ï´Ù."); //¿¡·¯·Î ÀÎÇÑ ÃʱâÈ­¸éÀ¸·Î ¼¼ÆÃ fInitControl(); //fCreateCalendar(); return false; }else{ model.resetInstanceNode("/root/main/cal"); } grd_calendar.cellStyle("color", 1 , 0, 6, 6) = "#000000"; //ÆòÀÏ grd_calendar.cellStyle("color", 1 , 0, 6, 0) = "#ff0000"; //ÀÏ¿äÀÏ grd_calendar.cellStyle("color", 1 , 6, 6, 6) = "#0000ff"; //Åä¿äÀÏ var row, col; var sDW = "sun mon tue wed thu fri sat"; var sDay = sDW.split(" "); var xPath = "/root/main/caldatalist/caldatainfo" for ( i = 1; i <= getNodesetCount(xPath); i++) { row = model.getValue(xPath + "[" + i + "]/weekno" ); col = model.getValue(xPath + "[" + i + "]/dw" ) - 1; buff = model.getValue(xPath + "[" + i + "]/holiflag"); if( buff == "1"){ //°øÈÞÀÏ grd_calendar.cellStyle("color", row, col, row, col) = "#ff0000"; } model.setValue("/root/main/cal/weeks[" + row + "]/"+sDay[col], model.getValue(xPath+"[" + i + "]/day" )); } //end of for model.refresh(); } //end of func //ÁöÁ¤µÈ ÀÏÀÚ¿¡ ÇØ´çÇÏ´Â cell¿¡ »ö»óÀ» Ç¥½ÃÇÑ´Ù. function fInitCellColor(rsrvdd1, rsrvdd2){ //´Þ·ÂÃʱâÈ­ for(var i=0;i<7;i++){ for(var j=0;j<7;j++){ grd_calendar.cellStyle("background-color", i, j) = "white"; } } var dw = model.getValue("/root/temp/savedata/dw"); var dwcol; //¿äÀϰª Çϳª¾¿ °¡Á®¿À±â À§ÇÑ º¯¼ö for(var i=0;i<13;i=i+2){ //üũ¹Ú½ºÀÇ value°ª for(var j=1;j<7;j++){ var dd = model.getValue("/root/send/date"); if(dw.substr(i,1)!=""){ dwcol = parseInt(dw.substr(i,1)); //üũ¹Ú½º¿¡¼­ ¿äÀϼ±Åà ½Ã ±¸ºÐÇÏ¿© Çϳª¾¿ °¡Á®¿À±â //fInitCellColor(j,dwcol); //ÁöÁ¤µÈ ÀÏÀÚ¿¡ ÇØ´çÇÏ´Â cell¿¡ »ö»ó ÁöÁ¤ if(grd_calendar.textmatrix(j,dwcol) < 10){ dd = dd + "0" + grd_calendar.textmatrix(j,dwcol); }else{ dd = dd + grd_calendar.textmatrix(j,dwcol); } if((dd>=rsrvdd1) && (dd<=rsrvdd2) && (grd_calendar.textmatrix(j,dwcol)!="")){ grd_calendar.cellStyle("background-color", j, dwcol) = "#cc99ff"; } } } } model.refresh(); } /** * @group : * @ver : 2007.04.19 * @by : ±èÁø¾Æ * @--------------------------------------------------- * @type : function * @access : public * @desc : ¿¹¾àÁ¤º¸ ÀúÀå ±â°£ ÁöÁ¤ * @param : * @return : * @--------------------------------------------------- */ function fGetDate(rsrvdd1, rsrvdd2){ var dd = model.getValue("/root/send/date"); //ÇØ´ç ³â,¿ù var iValuedd; for(var i=1;i<7;i++){ for(var j=0;j<7;j++){ if(grd_calendar.textmatrix(i,j)<10){ iValuedd = "0" + grd_calendar.textmatrix(i,j); //¼¿ÀÇ ÀÏÀÚ }else{ iValuedd = grd_calendar.textmatrix(i,j); } if((dd+iValuedd) == rsrvdd1){ model.makeValue("/root/main/datelist/dateinfo/startfocus", (i +" "+j)); //¿¹¾à½ÃÀÛ½ÃÁ¡ÀÇ À§Ä¡°ªÀ» startdate¿¡ ³Ö¾îÁÜ. } if((dd+iValuedd) == rsrvdd2){ model.makeValue("/root/main/datelist/dateinfo/endfocus", (i +" "+j)); //¿¹¾àÁ¾·á½ÃÁ¡ÀÇ À§Ä¡°ªÀ» enddate¿¡ ³Ö¾îÁÜ. } }//end of for }//end of for } /** * @group : * @ver : 2007.04.19 * @by : ±èÁø¾Æ * @--------------------------------------------------- * @type : function * @access : public * @desc : ¿¹¾àÁ¤º¸ ÀúÀå½Ã * @param : * @return : * @--------------------------------------------------- */ function fSaveInfo(){ var sMatnDial = model.getValue ( "/root/temp/savedata/matndialflag" ); // À¯ÁöȯÀÚ Åõ¼®±¸ºÐ var xSavePath = "/root/temp/savedata"; var xRsltSavePath = "/root/send/savedata"; if( sMatnDial == "P" ){ //º¹¸·À¯ÁöȯÀÚ·Î µî·ÏµÇ¾î ÀÖ´Â °æ¿ì messageBox("º¹¸·Åõ¼® À¯ÁöȯÀÚ·Î µî·ÏµÇ¾î Àִ ȯÀÚ", "E008", "Åõ¼®±¸ºÐÀ» º¯°æÇϽʽÿÀ."); model.close(); } else { model.copyNode("/root/send" , "/root/temp"); if( sMatnDial == "H" ){ //Åõ¼®À¯ÁöȯÀÚ·Î µî·ÏµÇ¾î ÀÖ´Â °æ¿ì if(model.getValue( xRsltSavePath + "/matnflag") != "1" ){ //À¯ÁöȯÀÚ(1:À¯Áö±¸ºÐ)°¡ ¾Æ´Ô if( model.getValue( xRsltSavePath + "/maintepatrgstdd") == sRtn ){ //¿À´ÃÀÏÀÚ model.makeNode ( xRsltSavePath + "/status" ); model.setValue ( xRsltSavePath + "/status", "u" ); //»óŰª ÁöÁ¤(update) }else if( model.getValue( xRsltSavePath + "/maintepatrgstdd") < sRtn){ //°ú°ÅÀÏÀÚ model.makeNode ( xRsltSavePath + "/status" ); model.setValue ( xRsltSavePath + "/status", "i" ); //»óŰª ÁöÁ¤(insert) } model.makeValue("/root/send/savedata/dialflag", "H"); if(submit("TXMND02702") == true) { // À¯ÁöȯÀÚµî·Ï ÀúÀå messageBox("Ç÷¾×Åõ¼® À¯ÁöȯÀÚ·Î µî·Ï 󸮵Ǿú½À´Ï´Ù.", "I001", "°£È£Á¤º¸Á¶»çÁö¸¦ ±â·ÏÇϽʽÿä."); } } } else if( sMatnDial == "" ){ //À¯ÁöȯÀÚ µî·Ï ±â·ÏÀÌ ¾ø´Â °æ¿ì model.makeNode ( xRsltSavePath + "/status" ); model.setValue ( xRsltSavePath + "/status" , "i" ); //»óŰª ÁöÁ¤(insert) model.makeValue( xRsltSavePath + "/dialflag", "H" ); if(submit("TXMND02702") == true) { // À¯ÁöȯÀÚµî·Ï ÀúÀå messageBox("Ç÷¾×Åõ¼® À¯ÁöȯÀÚ·Î µî·Ï", "I001", "°£È£Á¤º¸Á¶»çÁö¸¦ ±â·ÏÇϽʽÿä."); } } if(getNodesetCount(xSavePath +"/getdatelist/getdate") > 0){ var sOrddd_Old = ""; var sCretno_Old = ""; var sGenrflagcd_Old = ""; var sIoFlag = model.getValue(xSavePath +"/ioflag"); var sParamPid = model.getValue(xSavePath +"/pid"); var sParamRsrvdd = model.getValue(xSavePath +"/getdatelist/getdate["+1+"]/savedate"); /* Áø´Ü copy ·ÎÁ÷ ½ÃÀÛ */ if(sIoFlag == "¿Ü·¡" || sIoFlag == "-" ){ setParameter("preDiagCond", "InjRoom¢Ë"+sParamPid+"¢Ë"+sParamRsrvdd+"¢Ë¢Ë¢Ë/root"); fFindDiagInfo(); var sParamArr = getParameter("preDiagResult").split("¢Ë"); sCretno_Old = sParamArr[3]; sGenrflagcd_Old = sParamArr[4]; sIoFlag = "¿Ü·¡"; if(sParamArr[1] == "" && sParamArr[2] == "" ){ //messageBox("°¡Á¢¼ö »ý¼º½Ã Áø´Ü CopyÇÒ ¼öÁø Á¤º¸°¡ ¼±ÅõÇÁö ¾Ê¾Ò½À´Ï´Ù.", "I"); //return; }else{ if(sGenrflagcd_Old == "O"){ sOrddd_Old = sParamArr[1]; }else{ sOrddd_Old = sParamArr[2]; } } } /* Áø´Ü copy ·ÎÁ÷ Á¾·á */ model.removenode("/root/send"); model.makeNode("/root/send"); for(var i = 1 ; i <= getNodesetCount(xSavePath +"/getdatelist/getdate") ; i++){ var insRow = eval(getNodesetCount(xRsltSavePath))+1; model.makeValue(xRsltSavePath+"["+insRow+"]/rsrvdd" , model.getValue(xSavePath +"/getdatelist/getdate["+insRow+"]/savedate")); model.makeValue(xRsltSavePath+"["+insRow+"]/pid" , model.getValue(xSavePath +"/pid") ); model.makeValue(xRsltSavePath+"["+insRow+"]/shiftflag" , model.getValue(xSavePath +"/shiftflag") ); model.makeValue(xRsltSavePath+"["+insRow+"]/dialseatflag" , model.getValue(xSavePath +"/dialseatflag") ); model.makeValue(xRsltSavePath+"["+insRow+"]/status" , model.getValue(xSavePath +"/status") ); model.makeValue(xRsltSavePath+"["+insRow+"]/ioflag" , sIoFlag ); model.makeValue(xRsltSavePath+"["+insRow+"]/dialflag" , "H" ); model.makeValue(xRsltSavePath+"["+insRow+"]/rsrvcnts" , model.getValue(xSavePath +"/rsrvcnts") ); model.makeValue(xRsltSavePath+"["+insRow+"]/matnflag" , model.getValue(xSavePath +"/matnflag") ); model.makeValue(xRsltSavePath+"["+insRow+"]/infcflag" , model.getValue(xSavePath +"/infcflag") ); model.makeValue(xRsltSavePath+"["+insRow+"]/orddd_old" , sOrddd_Old ); // °ú°Å Áø·áÀÏÀÚ model.makeValue(xRsltSavePath+"["+insRow+"]/cretno_old" , sCretno_Old ); // °ú°Å »ý¼º¹øÈ£ model.makeValue(xRsltSavePath+"["+insRow+"]/genrflagcd_old" , sGenrflagcd_Old ); // °ú°Å ¿Ü·¡ÀÔ¿ø±¸ºÐ model.makeValue(xRsltSavePath+"["+insRow+"]/orddeptcd_old" , "" ); // °ú°Å Áø·á°ú model.makeValue(xRsltSavePath+"["+insRow+"]/copyflag" , "Y" ); // Áø´Ü º¹»ç ±¸ºÐ ( Y/N,NULL => NÀ̰ųª NULLÀ̸é ÀÌÀü ·ÎÁ÷´ë·Î ) //centcd Ãß°¡ 2012.10.29 by kya model.makeValue(xRsltSavePath+"["+insRow+"]/centcd" , model.getValue(xSavePath +"/centcd") ); //¼¾ÅÍÄÚµå if(model.getValue(xSavePath +"/shiftflag") == "5"){ //ÀÀ±ÞShiftÀΰæ¿ì 1,2,3Shift¿ÍÀÇ ½Ã°£ÀÌ °°À»°æ¿ì ±¸ºÐÀ» À§ÇØ ordtmÀ» settingÇÑ´Ù.-kys-20091217 var currenttime = getCurrentTime().substr(0,4); if(currenttime == "0730"){ currenttime = "0731"; }else if(currenttime == "1300"){ currenttime = "1301"; }else if(currenttime == "1700"){ currenttime = "1701"; } model.makeValue(xRsltSavePath+"["+insRow+"]/ordtm" , currenttime); //Áø·á¿¹¾à½Ã°£-kys-20091217 } } model.removeNodeset("/root/main/retmsginfo"); var sResltStat = submit("TXMND02701"); if(getNodesetCount("/root/main/retmsginfo") > 0){ var pDupMsg = ""; //Áߺ¹°ª °ü·Ã ¸Þ½ÃÁö var pEmpMsg = ""; //ÀÇ»ç¹ÌÁöÁ¤ °ü·Ã ¸Þ½ÃÁö for(var k = 1 ; k <= getNodesetCount("/root/main/retmsginfo") ; k++){ if(model.getValue("/root/main/retmsginfo["+k+"]/rtnmgsflag")=="dup"){ if(pDupMsg == ""){ pDupMsg += model.getValue("/root/main/retmsginfo["+k+"]/rtnmsg"); }else{ pDupMsg += ", " + model.getValue("/root/main/retmsginfo["+k+"]/rtnmsg"); } }else{ if(pEmpMsg == ""){ pEmpMsg += model.getValue("/root/main/retmsginfo["+k+"]/rtnmsg").substr(0,4)+"-" + model.getValue("/root/main/retmsginfo["+k+"]/rtnmsg").substr(4,2)+"-" + model.getValue("/root/main/retmsginfo["+k+"]/rtnmsg").substr(6,2); }else{ pEmpMsg += ", " + model.getValue("/root/main/retmsginfo["+k+"]/rtnmsg").substr(0,4)+"-" + model.getValue("/root/main/retmsginfo["+k+"]/rtnmsg").substr(4,2)+"-" + model.getValue("/root/main/retmsginfo["+k+"]/rtnmsg").substr(6,2); } } } if(pDupMsg != ""){ messageBox("["+pDupMsg+"]ÀÏÀÚ¿¡ ¿¹¾àÀÌ", "E006", "\nÈ®ÀÎ ÈÄ ´Ù½Ã ½ÃµµÇϽʽÿÀ."); } if(pEmpMsg != ""){ messageBox("["+pEmpMsg+"]ÀÏÀÚ¿¡ ¿¹¾àÀǻ簡 ÁöÁ¤µÇÁö ¾Ê¾Ò½À´Ï´Ù.", "E", "\nÈ®ÀÎ ÈÄ ´Ù½Ã ½ÃµµÇϽʽÿÀ."); } } if( sResltStat == true){ model.close(); } else { messageBox("ÀúÀåÀ» ½ÇÆÐÇß½À´Ï´Ù.", "E"); return; } }else{ messageBox("¿¹¾àµî·ÏÇÒ Á¤º¸°¡ Á¸ÀçÇÏÁö ¾Ê½À´Ï´Ù.","I"); //model.close(); } // for(var i=1;i<=rsrvterm+1;i++) { // //var dd = model.getValue("/root/main/datelist/dateinfo/getdate"+i); // var dd = model.getValue("/root/send/savedata/getdatelist/getdate"+i); // if(dd != "") { // model.removeNodeset("/root/send/savedata/rsrvdd" ); // model.makeValue ("/root/send/savedata/rsrvdd" , dd ); // model.makeValue ("/root/send/savedata/dialflag", "H"); // var sResltStat = submit("TXMND02701"); // ¿¹¾àÁ¤º¸ ÀúÀå // // if(model.getValue("/root/main/retmsginfo/retmsg") != ""){ // messageBox("ÁöÁ¤µÈ ¿Ü·¡¿¹¾àÀǻ簡","I004", "¿Ü·¡ÀÇ»çÁöÁ¤ ÈÄ ´Ù½Ã ½ÃµµÇϽʽÿÀ."); // model.close(); // return; // } // // } // } } } /** * @group : * @ver : 2007.05.15 * @by : ±èÁø¾Æ * @--------------------------------------------------- * @type : function * @access : public * @desc : À¯ÁöȯÀÚ ¸®½ºÆ® ÀÔ·Â * @param : * @return : * @--------------------------------------------------- */ /* function fSaveMatnInfo(){ var sMatnDial = model.getValue ( "/root/send/savedata/matndialflag" ); // À¯ÁöȯÀÚ Åõ¼®±¸ºÐ var xSavePath = "/root/send/savedata"; if( sMatnDial == "P" ){ //º¹¸·À¯ÁöȯÀÚ·Î µî·ÏµÇ¾î ÀÖ´Â °æ¿ì messageBox("º¹¸·Åõ¼® À¯ÁöȯÀÚ·Î µî·ÏµÇ¾î Àִ ȯÀÚ", "E008", "Åõ¼®±¸ºÐÀ» º¯°æÇϽʽÿÀ."); } else if( sMatnDial == "H" ){ //Åõ¼®À¯ÁöȯÀÚ·Î µî·ÏµÇ¾î ÀÖ´Â °æ¿ì if(model.getValue( xSavePath + "/matnflag") != "1" ){ //À¯ÁöȯÀÚ(1:À¯Áö±¸ºÐ)°¡ ¾Æ´Ô if( model.getValue( xSavePath + "/maintepatrgstdd") == sRtn ){ //¿À´ÃÀÏÀÚ model.makeNode ( xSavePath + "/status" ); model.setValue ( xSavePath + "/status", "u" ); //»óŰª ÁöÁ¤(update) }else if( model.getValue( xSavePath + "/maintepatrgstdd") < sRtn){ //°ú°ÅÀÏÀÚ model.makeNode ( xSavePath + "/status" ); model.setValue ( xSavePath + "/status", "i" ); //»óŰª ÁöÁ¤(insert) } model.makeValue("/root/send/savedata/dialflag", "H"); submit("TXMND02702"); } } else if( sMatnDial == "" ){ //À¯ÁöȯÀÚ µî·Ï ±â·ÏÀÌ ¾ø´Â °æ¿ì model.makeNode ( xSavePath + "/status" ); model.setValue ( xSavePath + "/status" , "i" ); //»óŰª ÁöÁ¤(insert) model.makeValue( xSavePath + "/dialflag", "H" ); submit("TXMND02702"); } } */