/* - ¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì ¼ö¼ú¸¶ÃëÈ®Á¤Ãë¼Ò ( SPMMO05800_¼ö¼ú¸¶ÃëÈ®Á¤Ãë¼Ò.xrw - JScript ) - ¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì */ var sRSRVAPPCNCL_PATH = "/root/main/reqinfo/rsrvappcncl"; var sOPRSRVINFO_PATH = "/root/main/reqinfo/rsrvappcncl"; var gSTATUS = 1; //ÁýµµÀǰ¡ º¯°æµÇ¸é 0: CaseCart¶ä, 1: CaseCart¶ßÁö¾ÊÀ½ /** * @desc : ¼ö¼ú¸¶Ãë È®Á¤ Ãë¼Ò È­¸é ÃʱâÈ­ * @ * @param : * @return : * @author : ¿ÀÁöÈÆ * @--------------------------------------------------- */ function fInitialize_SPMMO05800(){ fInitOpAnstChngInfo(); zbcfGetCodeList(new Array("M0014", "M0016", "M0017", "M0243", "M0244", "M0245", "M0341", "M0013", "M0377"), new Array("/root/init/M0014", "/root/init/M0016", "/root/init/M0017", "/root/init/M0243", "/root/init/M0244", "/root/init/M0245", "/root/init/M0341", "/root/init/M0013", "/root/init/M0377")); var opstatcd = model.getValue(sRSRVAPPCNCL_PATH + "/opstatcd") var hosprsncd = getNodeListCSV(model.instance1.selectNodes("/root/temp/M0356/M0356[cdid < 200]")); //º´¿ø»çÀ¯ var patrsncd = getNodeListCSV(model.instance1.selectNodes("/root/temp/M0356/M0356[cdid > 200 and cdid < 300]")); //ȯÀÚ»çÀ¯ if(opstatcd == "20" || opstatcd == "30") { // 2008.10.23 ´ë±â, ¼ö¼úÁß Ãß°¡ var opchngcd = getNodeListCSV(model.instance1.selectNodes("/root/temp/M0356/M0356[cdid > 300 and cdid < 400]")); //¼ö¼úº¯°æ }else{ var opchngcd = getNodeListCSV(model.instance1.selectNodes("/root/temp/M0356/M0356[cdid > 400 and cdid < 500]")); //¼ö¼úº¯°æ } // [¿äû¹øÈ£: 847] ¼ö¼úÀÏÀÚ º¯°æ 2010.06.25 kskim. ½ÃÀÛ // ¼ö¼úÀÏÀÚ º¯°æ ½Ã ¼ö¼ú¸¶ÃëÀÇ·Ú ½Ã »ç¿ë ÁßÀÎ ³¯Â¥, ½Ã°£ üũ ±â´É »ç¿ëÇϱâ À§ÇØ Ãß°¡ mmbfGetHardCodeInfoNm("/root/send/reqdata", "/root/init/chkopcnfmtm", 102); //¼ö¼ú¸¶Ãë Á¤±Ô¼ö¼ú ÀúÀå °¡´É½Ã°£ mmbfGetHardCodeInfoNm("/root/send/reqdata", "/root/init/chkoffday", 103); //¼ö¼ú¸¶Ãë Á¤±Ô¼ö¼ú ÀúÀå½Ã ÈÞÀÏüũ ¿©ºÎ üũ //2009.07.24 LYJ ¼­¿ï¼º¸ð¸¸ Ãß°¡, Á¤±ÔÀÇ·Ú¿¡ ´ëÇÑ ¸®¹ÌÆ® ½Ã°£À» µÐ´Ù. if( getUserInfo("dutplceinstcd") == '012' || getUserInfo("dutplceinstcd") == '017'){ reqHardCodeInfo("/root/init/hard","/root/init/hardcodeS","116"); reqHardCodeInfo("/root/init/hard","/root/init/hardcodeE","117"); reqHardCodeInfo("/root/init/hard","/root/init/hardcodeJ","120"); } // [¿äû¹øÈ£: 847] ¼ö¼úÀÏÀÚ º¯°æ 2010.06.25 kskim. ³¡ setCSVToNode("/root/init/hosprsncd", hosprsncd, "hosprsncd"); setCSVToNode("/root/init/patrsncd" , patrsncd , "patrsncd"); setCSVToNode("/root/init/opchngcd" , opchngcd , "opchngcd"); /*if(opstatcd != "20") { model.setValue("/root/main/reqinfo/rsrvappcncl/reqrsnflag", "U"); radio1.disabled = true; } */ if(opstatcd > "30") { // 2008.10.23 ´ë±âÀÏ °æ¿ìµµ Ç®±â model.setValue("/root/main/reqinfo/rsrvappcncl/reqrsnflag", "U"); radio1.disabled = true; } fChngCmbOpAnstCnclRsn(); fInptDisable(true); cmb_rsncd.select(0); model.refresh(); } /** * @desc : ¼ö¼ú¸¶Ãë È®Á¤ Ãë¼Ò/º¯°æ ±¸ºÐ, »çÀ¯º¯°æ * @ * @param : * @return : * @author : ¿ÀÁöÈÆ * @--------------------------------------------------- */ function fChngCmbOpAnstCnclRsn(){ var reqrsnflag = model.getValue("/root/main/reqinfo/rsrvappcncl/reqrsnflag"); var reqrsnflag2 = model.getValue("/root/main/reqinfo/rsrvappcncl/reqrsnflag2"); radio2.disabled = false; if(reqrsnflag == "U"){ // ¼ö¼úº¯°æ radio2.disabled = true; cmb_rsncd.choices.itemset.attribute("nodeset") = "/root/init/opchngcd/opchngcd"; model.setValue("/root/main/reqinfo/rsrvappcncl/reqrsncd", ""); }else if(reqrsnflag == "C"){ //¼ö¼úÃë¼Ò if(reqrsnflag2 == "H"){ //º´¿ø»çÀ¯ cmb_rsncd.choices.itemset.attribute("nodeset") = "/root/init/hosprsncd/hosprsncd"; model.setValue("/root/main/reqinfo/rsrvappcncl/reqrsncd", ""); }else if(reqrsnflag2 == "P"){ //ȯÀÚ»çÀ¯ cmb_rsncd.choices.itemset.attribute("nodeset") = "/root/init/patrsncd/patrsncd"; model.setValue("/root/main/reqinfo/rsrvappcncl/reqrsncd", ""); } fInptDisable(true); } model.refresh(); } /** * @desc : È­¸é disabled ¼³Á¤ * @ * @param : bflag true/false * @return : * @author : ¿ÀÁöÈÆ * @--------------------------------------------------- */ function fInptDisable(bflag){ ipt_opschedd.disabled = bflag; ipt_oproomcd.disabled = bflag; cmb_opfromtmcd.disabled = bflag; cmb_opendtmcd.disabled = bflag; ipt_opusetm.disabled = bflag; ipt_diagcd.disabled = bflag; ipt_diagnm.disabled = bflag; ipt_opcd.disabled = bflag; ipt_opnm.disabled = bflag; cmb_perfdeptcd.disabled = bflag; cmb_perfdrid.disabled = bflag; btn_openopsche.disabled = bflag; cmb_anstmthdcd.disabled = bflag; cmb_detlanstmthdcd.disabled = bflag; // 2008.10.15 cmb_opposture.disabled = bflag; cmb_opdirecflag.disabled = bflag; rdo_oppatflag.disabled = bflag; cmb_opcnfmdg.disabled = bflag; ipt_delivefact.disabled = bflag; // [¿äû¹øÈ£: 13012 ¿äûÁ¦¸ñ: ¼ö¼ú/¸¶Ãë ½ÂÀÎ ÀÌÈÄ Ãë¼Òº¯°æ ÀÇ·Ú ½Ã ÀúÀå ½ÃÁ¡¿¡ À¯È¿ÇÑ Á¤º¸°¡ ¾Æ´Ñ °æ¿ì BLOCKING] //À¯È¿ÇÑ ¼ö¼ú¸í ¹× Äڵ尡 ÀԷµǵµ·Ï ·ÎÁ÷ Ãß°¡ 2010.04.19 by ±è±¤¼º(kskim) // 2010.04.14 kskim btn_ccrtsearch.disabled = bflag; // (e) // [¿äû¹øÈ£: 847] ¼ö¼úÀÏÀÚº¯°æ 2010.06.25 kskim // opflagcd ¼ö¼ú±¸ºÐÁ¤º¸ Ãß°¡ rdo_opflag.disabled = bflag; // DRG Á¤º¸ 2013.06.20 KJS rdo_drgyn.disabled = bflag; btn_drgmod.disabled = bflag; ipt_drgno.disabled = bflag; ipt_drgnm.disabled = bflag; model.refresh(); } /** * @desc : »çÀ¯ÄÞº¸ º¯°æ * @ * @param : * @return : * @author : ¿ÀÁöÈÆ * @--------------------------------------------------- */ function fChngCmbRsnCD(){ var reqrsncd = model.getValue("/root/main/reqinfo/rsrvappcncl/reqrsncd"); if(reqrsncd == "302" || reqrsncd == "303" || reqrsncd == "306" || reqrsncd == "402" || reqrsncd == "403"){ //¼ö¼ú½Ã°£º¯°æ, ¼ö¼ú¹æº¯°æ fInptDisable(true); btn_openopsche.disabled = false; }else if(reqrsncd == "305" || reqrsncd == "405"){ //¼ö¼ú ÁýµµÀǺ¯°æ fInptDisable(true); ipt_opcd.disabled = false; ipt_opnm.disabled = false; cmb_perfdeptcd.disabled = false; cmb_perfdrid.disabled = false; model.setFocus("cmb_perfdrid"); }else if(reqrsncd == "301" || reqrsncd == "401"){ //¼ö¼ú¸í º¯°æ fInptDisable(true); ipt_opcd.disabled = false; ipt_opnm.disabled = false; // 2010.04.14 kskim btn_ccrtsearch.disabled = false; model.setFocus("ipt_opcd"); }else if(reqrsncd == "304" || reqrsncd == "404"){ //Áø´Ü¸í º¯°æ fInptDisable(true); ipt_diagcd.disabled = false; ipt_diagnm.disabled = false; model.setFocus("ipt_diagcd"); }else if(reqrsncd == "307" || reqrsncd == "406") { //¸¶Ãë¹æ¹ý º¯°æ fInptDisable(true); cmb_anstmthdcd.disabled = false; cmb_detlanstmthdcd.disabled = false; model.setFocus("cmb_anstmthdcd"); } // 2008.10.15 else if(reqrsncd == "308" || reqrsncd == "407") { //¼ö¼úÁýµµ°ú º¯°æ fInptDisable(true); cmb_perfdeptcd.disabled = false; cmb_perfdrid.disabled = false; ipt_diagcd.disabled = false; ipt_diagnm.disabled = false; ipt_opcd.disabled = false; ipt_opnm.disabled = false; model.setFocus("cmb_perfdeptcd"); } else if(reqrsncd == "309" || reqrsncd == "408") { //¼ö¼úüÀ§ º¯°æ fInptDisable(true); cmb_opposture.disabled = false; model.setFocus("cmb_opposture"); }else if(reqrsncd == "310" || reqrsncd == "409") { //¼ö¼úÀ§Ä¡ º¯°æ fInptDisable(true); cmb_opdirecflag.disabled = false; model.setFocus("cmb_opdirecflag"); }else if(reqrsncd == "311" || reqrsncd == "410") { //¼ö¼úâ»ó º¯°æ fInptDisable(true); cmb_opcnfmdg.disabled = false; model.setFocus("cmb_opcnfmdg"); }else if(reqrsncd == "312" || reqrsncd == "411") { //Àü´Þ»çÇ× º¯°æ fInptDisable(true); ipt_delivefact.disabled = false; model.setFocus("ipt_delivefact"); }else if(reqrsncd == "313" || reqrsncd == "412") { //¼ö¼úȯÀÚ±¸ºÐ º¯°æ fInptDisable(true); rdo_oppatflag.disabled = false; model.setFocus("rdo_oppatflag"); }else if(reqrsncd == "314" || reqrsncd == "315") { // [¿äû¹øÈ£: 847] ¼ö¼úÀÏ º¯°æ 2010.06.25 kskim // ¼ö¼úÈ®Á¤(opstatcd: 20), ¼ö¼ú´ë±â(opstatcd: 30) ±îÁö ¼ö¼úÀÏ º¯°æ Çã¿ë var opstatcd = model.getValue(sRSRVAPPCNCL_PATH + "/opstatcd"); if( !isNull(opstatcd) && opstatcd > 30 ){ messageBox("¼ö¼úÁßÀÎ ¼ö¼úÀº ¼ö¼úÀÏ º¯°æÀ» ÇÒ ¼ö ", "I004"); return; } // ¿Ü·¡, DSC¿©ºÎ üũ var oppatflagcd = model.getValue(sRSRVAPPCNCL_PATH + "/oppatflagcd"); if( !isNull(oppatflagcd) && (oppatflagcd == 'D' || oppatflagcd == 'O')){ //¿Ü·¡,DSCÀϰæ¿ì ¼ö¼úÀÏ º¯°æ ºÒ°¡ 2010.06.28. kskim messageBox("¿Ü·¡ ¶Ç´Â DSCȯÀÚ´Â ¼ö¼úÀÏ º¯°æÀ» ÇÒ ¼ö ", "I004"); return; } // [¿äû¹øÈ£: 847] ¼ö¼úÀÏ º¯°æ 2010.06.25 kskim // ÇùÁø¿©ºÎ üũ var cnstopflag = model.getValue(sRSRVAPPCNCL_PATH + "/cnstopflag"); if( cnstopflag != 'Y' ){ model.removeNodeset("/root/send/reqdata"); model.makeValue("/root/send/reqdata/oprsrvno", model.getValue(sRSRVAPPCNCL_PATH + "/oprsrvno") ); if( submit("TRMMO05803") ){ var cnstopchk = model.getValue("/root/tmp/cnstopinfo/cnstopchk"); if( !isNull(cnstopchk) && (cnstopchk == 'Y') ){ messageBox("ÇùÁø¼ö¼úÀÎ °æ¿ì´Â ¼ö¼úÀÏ º¯°æÀ» ÇÒ ¼ö ", "I004"); return; } } fInptDisable(true); rdo_opflag.disabled = false; //¼ö¼ú±¸ºÐ ipt_opschedd.disabled = false; //¼ö¼ú¿¹Á¤ÀÏ(´Þ·Â) btn_openopsche.disabled = false; //Á¤±Ô, ÀÀ±Þ, Ãß°¡¿¡ µû¶ó ½Ã°£ ¼³Á¤ model.setValue("/root/main/reqinfo/rsrvappcncl/opflagcd", ""); model.setValue("/root/main/reqinfo/rsrvappcncl/opschedd", ""); model.setValue("/root/main/reqinfo/rsrvappcncl/oproomcd", ""); model.setValue("/root/main/reqinfo/rsrvappcncl/opfromtmcd", ""); model.setValue("/root/main/reqinfo/rsrvappcncl/opendtmcd", ""); model.setValue("/root/main/reqinfo/rsrvappcncl/opusetm", ""); } else{ messageBox("ÇùÁø¼ö¼úÀÎ °æ¿ì´Â ¼ö¼úÀÏ º¯°æÀ» ÇÒ ¼ö ", "I004"); return; } }else if(reqrsncd == "316" || reqrsncd == "413") { //DRG Á¤º¸ º¯°æ fInptDisable(true); rdo_drgyn.disabled = false; btn_drgmod.disabled = false; ipt_drgno.disabled = false; ipt_drgnm.disabled = false; model.setFocus("rdo_drgyn"); } // (e) model.refresh(); } /** * @desc : ¼ö¼ú¿¹¾à½Ã°£ ¼³Á¤ open * @ * @param : * @return : * @author : ¿ÀÁöÈÆ * @--------------------------------------------------- */ function fOpenOpScheTime(){ var opflagcd = model.getValue("/root/main/reqinfo/rsrvappcncl/opflagcd "); var reqrsncd = model.getValue("/root/main/reqinfo/rsrvappcncl/reqrsncd"); if( !isNull(opflagcd) && opflagcd == '1' ){ var param = "u" + "¢Ë" + model.getValue(sRSRVAPPCNCL_PATH + "/oproomcd") + "¢Ë" + model.getValue(sRSRVAPPCNCL_PATH + "/oprsrvno") + "¢Ë" + model.getValue(sRSRVAPPCNCL_PATH + "/ophistno") + "¢Ë" + model.getValue(sRSRVAPPCNCL_PATH + "/pid") + "¢Ë" + model.getValue(sRSRVAPPCNCL_PATH + "/opschedd") + "¢Ë" + model.getValue(sRSRVAPPCNCL_PATH + "/perfdeptcd") + "¢Ë" + model.getValue(sRSRVAPPCNCL_PATH + "/opfromtmcd") + "¢Ë" + model.getValue(sRSRVAPPCNCL_PATH + "/opendtmcd") + "¢Ë" + "oprsrv" + "¢Ë" + model.getValue(sRSRVAPPCNCL_PATH + "/perfdrid") + "¢Ë" + model.getValue(sRSRVAPPCNCL_PATH + "/opstatcd"); setParameter("SPMMO08800_param", param); modal("SPMMO08800"); var rtnuseyn = getParameter("SPMMO08800_rtn_useyn"); if(rtnuseyn == "Y"){ setParameter("SPMMO08800_rtn_useyn", "N"); var rtnparam = getParameter("SPMMO08800_rtn_param"); rtnparam = rtnparam.split("¢Ë"); var difftime = getTimeInterval(rtnparam[1], rtnparam[2]); model.setValue(sRSRVAPPCNCL_PATH + "/oproomcd" , rtnparam[0]); model.setValue(sRSRVAPPCNCL_PATH + "/opfromtmcd", rtnparam[1]); model.setValue(sRSRVAPPCNCL_PATH + "/opendtmcd" , rtnparam[2]); model.setValue(sRSRVAPPCNCL_PATH + "/opusetm" , fTransSecToHourMin(difftime)); model.refresh(); } }// if( !isNull(opflagcd) && opflagcd == '1' ) else if( !isNull(opflagcd) && (opflagcd == '2' || opflagcd == '3') ){ group2.attribute("visibility") = "visible"; radio1.disabled = true; cmb_rsncd.disabled = true; if(reqrsncd == "314" || reqrsncd == "315") { // [¿äû¹øÈ£: 847] ¼ö¼úÀÏ º¯°æ 2010.06.25 kskim rdo_opflag.disabled = false; } else { rdo_opflag.disabled = true; } btn_openopsche.disabled = true; btn_schecnfm.disabled = true; } } /** * @desc : Ãʸ¦ ½ÃºÐÀ¸·Î Àüȯ * @ * @param : * @return : * @author : ¿ÀÁöÈÆ * @--------------------------------------------------- */ function fTransSecToHourMin(sec){ var hr = 3600; var min = 60; hour = parseInt(sec/hr); min = parseInt(sec%hr/min); hour = ("" + hour + "").getLeftPad(2, "0"); min = ("" + min + "").getLeftPad(2, "0"); var rtnstr = hour.concat(min); return rtnstr; } /** * @desc : Ãë¼Ò¹öư Ŭ¸¯ * @ * @param : * @return : * @author : ¿ÀÁöÈÆ * @--------------------------------------------------- */ function fClkBtnCncl(){ } /** * @desc : È®Àιöư Ŭ¸¯, Ãë¼Ò/º¯°æ ½ÂÀοäû ÀúÀå * @ * @param : * @return : * @author : ¿ÀÁöÈÆ * @--------------------------------------------------- */ function fClkBtnCnfm(){ //model.setValue(sRSRVAPPCNCL_PATH + "/status", "i"); model.copyNode("/root/send/savedata", sRSRVAPPCNCL_PATH); if(submit("TXMMO05801")){ window.close(); } } /** * @desc : Á¾·á¹öư Ŭ¸¯ * @ * @param : * @return : * @author : ¿ÀÁöÈÆ * @--------------------------------------------------- */ function fClkBtnExit(){ window.close(); } /** * @desc : ÀúÀå¹öư Ŭ¸¯ * @ * @param : * @return : * @author : ¿ÀÁöÈÆ * @--------------------------------------------------- */ function fClkBtnSave(){ var reqrsncd = model.getValue("/root/main/reqinfo/rsrvappcncl/reqrsncd"); if(reqrsncd == "" || reqrsncd == null ){ messageBox("»çÀ¯¸¦", "C002"); return; } var reqrsnflag = model.getValue(sRSRVAPPCNCL_PATH + "/reqrsnflag"); var reqrsnflag2= model.getValue(sRSRVAPPCNCL_PATH + "/reqrsnflag2"); if(reqrsnflag == "C" && reqrsnflag2 == "H"){ //¼ö¼úÃë¼Ò(º´¿ø»çÀ¯) model.setValue(sRSRVAPPCNCL_PATH + "/reqrsnflag", 1); }else if(reqrsnflag == "C" && reqrsnflag2 == "P"){ //¼ö¼úÃë¼Ò(ȯÀÚ»çÀ¯) model.setValue(sRSRVAPPCNCL_PATH + "/reqrsnflag", 2); }else{ //¼ö¼úº¯°æ model.setValue(sRSRVAPPCNCL_PATH + "/reqrsnflag", 3); } if(reqrsncd == "314" || reqrsncd == "315") { // [¿äû¹øÈ£: 847] ¼ö¼úÀÏ º¯°æ 2010.06.25 kskim model.setValue(sRSRVAPPCNCL_PATH + "/opcnfmdd", model.getValue(sRSRVAPPCNCL_PATH + "/opschedd") ); model.makeValue(sRSRVAPPCNCL_PATH + "/opchngddflag", "Y"); var opflagcd = model.getValue(sRSRVAPPCNCL_PATH + "/opflagcd"); var opusetm = model.getValue(sRSRVAPPCNCL_PATH + "/opusetm"); // [¿äû¹øÈ£: 847] ¼ö¼úÀÏ º¯°æ - ¼ö¼ú½Ã°£ 2010.07.06 by ¹Ú¿µ¿ì var oproomcd = model.getValue(sRSRVAPPCNCL_PATH + "/oproomcd"); // [¿äû¹øÈ£: 847] ¼ö¼úÀÏ º¯°æ - ¼ö¼ú¹æ 2010.07.06 by ¹Ú¿µ¿ì if(opflagcd == 1) { //[¿äû¹øÈ£: 847] ¼ö¼úÀÏ º¯°æ - Á¤±ÔÀÏ ¶§ ¼ö¼ú¹æ, ¼ö¼ú½Ã°£ÀÌ ºó°ªÀÏ °æ¿ì blocking 2010.07.06 by ¹Ú¿µ¿ì if(opusetm == "" || oproomcd == "") { messageBox("Á¤±Ô¼ö¼úÀº ¼ö¼ú¹æ ", "I003"); return; } } // ¼ö¼úÈ®Á¤(opstatcd: 20), ¼ö¼ú´ë±â(opstatcd: 30) ±îÁö ¼ö¼úÀÏ º¯°æ Çã¿ë var opstatcd = model.getValue(sRSRVAPPCNCL_PATH + "/opstatcd"); if( !isNull(opstatcd) && opstatcd > 30 ){ messageBox("¼ö¼úÁßÀÎ ¼ö¼úÀº ¼ö¼úÀÏ º¯°æÀ» ÇÒ ¼ö ", "I004"); return; } // ¿Ü·¡, DSC¿©ºÎ üũ var oppatflagcd = model.getValue(sRSRVAPPCNCL_PATH + "/oppatflagcd"); if( !isNull(oppatflagcd) && (oppatflagcd == 'D' || oppatflagcd == 'O')){ //¿Ü·¡,DSCÀϰæ¿ì ¼ö¼úÀÏ º¯°æ ºÒ°¡ 2010.06.28. kskim messageBox("¿Ü·¡ ¶Ç´Â DSCȯÀÚ´Â ¼ö¼úÀÏ º¯°æÀ» ÇÒ ¼ö ", "I004"); return; } // ÇùÁø¿©ºÎ üũ var cnstopflag = model.getValue(sRSRVAPPCNCL_PATH + "/cnstopflag"); if( cnstopflag != 'Y' ){ model.removeNodeset("/root/send/reqdata"); model.makeValue("/root/send/reqdata/oprsrvno", model.getValue(sRSRVAPPCNCL_PATH + "/oprsrvno") ); if( submit("TRMMO05803") ){ var cnstopchk = model.getValue("/root/tmp/cnstopinfo/cnstopchk"); if( !isNull(cnstopchk) && (cnstopchk == 'Y') ){ messageBox("ÇùÁø¼ö¼úÀÎ °æ¿ì´Â ¼ö¼úÀÏ º¯°æÀ» ÇÒ ¼ö ", "I004"); return; } } /*fInptDisable(true); rdo_opflag.disabled = false; //¼ö¼ú±¸ºÐ ipt_opschedd.disabled = false; //¼ö¼ú¿¹Á¤ÀÏ(´Þ·Â) btn_openopsche.disabled = false; //Á¤±Ô, ÀÀ±Þ, Ãß°¡¿¡ µû¶ó ½Ã°£ ¼³Á¤ model.setValue("/root/main/reqinfo/rsrvappcncl/opflagcd", ""); model.setValue("/root/main/reqinfo/rsrvappcncl/opschedd", ""); model.setValue("/root/main/reqinfo/rsrvappcncl/oproomcd", ""); model.setValue("/root/main/reqinfo/rsrvappcncl/opfromtmcd", ""); model.setValue("/root/main/reqinfo/rsrvappcncl/opendtmcd", ""); model.setValue("/root/main/reqinfo/rsrvappcncl/opusetm", ""); */ } else{ messageBox("ÇùÁø¼ö¼úÀÎ °æ¿ì´Â ¼ö¼úÀÏ º¯°æÀ» ÇÒ ¼ö ", "I004"); return; } //´çÀϼö¼ú º¯°æ °ü·Ã Ãß°¡ by sonjy 20100726 if( model.getValue(sRSRVAPPCNCL_PATH + "/opschedd") == getCurrentDate() ){ messageBox("´çÀÏ·Î ¼ö¼úÀÏ º¯°æÀº ÇÒ ¼ö ", "I004"); model.setValue(sRSRVAPPCNCL_PATH + "/opschedd", ""); return ; } //¼ö¼úÀÏ º¯°æ½Ã ÀԷºκРvalid check by sonjy 20100726 if( isNull( model.getValue(sRSRVAPPCNCL_PATH + "/opschedd") ) || model.getValue(sRSRVAPPCNCL_PATH + "/opschedd") == "-" ) { messageBox("¼ö¼ú¿¹Á¤ÀÏÀÚ¸¦ ", "C001"); return; } if( isNull( model.getValue(sRSRVAPPCNCL_PATH + "/opflagcd") ) || model.getValue(sRSRVAPPCNCL_PATH + "/opflagcd") == "-" ) { messageBox("¼ö¼ú±¸ºÐÀ» ", "C001"); return; } } model.copyNode("/root/send/savedata", sRSRVAPPCNCL_PATH); //alert(333); return; if(submit("TXMMO05801")){ opener.javascript.setParameter("SPMMO05800_rtn_useyn", "Y"); window.close(); } } /** * @desc : Áø´Ü¸í °Ë»ö ÆË¾÷ open * @ * @param : pFlag 󸮱¸ºÐ (code : ÄÚµå°Ë»ö, term : ¼ö¼ú¸í) * @return : * @author : ¿ÀÁöÈÆ * @--------------------------------------------------- */ function fOpenDiagSearch(pFlag){ if(pFlag == "code"){ var diagcd = model.getValue(sRSRVAPPCNCL_PATH + "/diagcd") setParameter("SPMMO00800_cond1", 1); setParameter("SPMMO00800_cond2", 1); setParameter("SPMMO00800_cond3", "E"); setParameter("SPMMO00800_cond4", getCurrentDate()); setParameter("SPMMO00800_cond5", diagcd); }else if(pFlag =="term"){ var diagnm = model.getValue(sRSRVAPPCNCL_PATH + "/diagnm"); setParameter("SPMMO00800_cond1", 2); setParameter("SPMMO00800_cond2", 2); setParameter("SPMMO00800_cond3", fIsHangul(diagnm)); setParameter("SPMMO00800_cond4", getCurrentDate()); setParameter("SPMMO00800_cond5", diagnm); } modal("SPMMO00800"); var useyn = getParameter("SPMMO00800_rtn_useyn"); if(useyn == "Y"){ setParameter("SPMMO00800_rtn_useyn", "N"); var rtnparam = getParameter("SPMMO00800_rtn"); rtnparam = rtnparam.split("¢Ì"); var tmpstr = rtnparam[1]; tmpstr = tmpstr.split("¢Ë"); model.setValue(sRSRVAPPCNCL_PATH + "/diagcd" , tmpstr[9]); model.setValue(sRSRVAPPCNCL_PATH + "/diagnm" , tmpstr[2]); }else{ model.setValue(sRSRVAPPCNCL_PATH + "/diagcd" , ""); model.setValue(sRSRVAPPCNCL_PATH + "/diagnm" , ""); } model.refresh(); } /** * @desc : CaseCartÁ¶È¸ ¹× value¼³Á¤ * @ * @param : * @return : * @author : ¿ÀÁöÈÆ * @--------------------------------------------------- */ function fOpenCcrtSearch(){ var param = model.getValue(sOPRSRVINFO_PATH + "/opschedd") + "¢Ë" + model.getValue(sOPRSRVINFO_PATH + "/perfdeptcd") + "¢Ë" + model.getValue(sOPRSRVINFO_PATH + "/perfdrid") + "¢Ë" + model.getValue(sOPRSRVINFO_PATH + "/opcd") + "¢Ë" + model.getValue(sOPRSRVINFO_PATH + "/opnm") + "¢Ë" + "perf"; //query±¸ºÐ setParameter("SPMMO11000_param", param); modal("SPMMO11000"); var useyn = getParameter("SPMMO11000_rtn_useyn"); if(useyn == "Y"){ var rtnparam = getParameter("SPMMO11000_rtn_param"); rtnparam = rtnparam.split("¢Ë"); model.setValue(sOPRSRVINFO_PATH + "/ccrtno" , rtnparam[0]); model.setValue(sOPRSRVINFO_PATH + "/ccrtstat", 1); model.setValue(sOPRSRVINFO_PATH + "/opcd" , rtnparam[1]); model.setValue(sOPRSRVINFO_PATH + "/opnm" , rtnparam[2]); setParameter("SPMMO11000_rtn_useyn", "N"); } model.refresh(); } /** * @desc : °Ë»ö Á¶°Ç¾øÀÌ CaseCartÁ¶È¸ * @ * @param : * @return : * @author : ¿ÀÁöÈÆ * @--------------------------------------------------- */ function fOpenCCrtSearchNoCond(){ var param = model.getValue(sOPRSRVINFO_PATH + "/opschedd") + "¢Ë" + model.getValue(sOPRSRVINFO_PATH + "/perfdeptcd") + "¢Ë" + model.getValue(sOPRSRVINFO_PATH + "/perfdrid") + "¢Ë" + "¢Ë" + "¢Ë" + "perf"; setParameter("SPMMO11000_param", param); modal("SPMMO11000"); var useyn = getParameter("SPMMO11000_rtn_useyn"); if(useyn == "Y"){ var rtnparam = getParameter("SPMMO11000_rtn_param"); rtnparam = rtnparam.split("¢Ë"); model.setValue(sOPRSRVINFO_PATH + "/ccrtno" , rtnparam[0]); model.setValue(sOPRSRVINFO_PATH + "/ccrtstat", 1); model.setValue(sOPRSRVINFO_PATH + "/opcd" , rtnparam[1]); model.setValue(sOPRSRVINFO_PATH + "/opnm" , rtnparam[2]); setParameter("SPMMO11000_rtn_useyn", "N"); } model.refresh(); } /** * @desc : ¼ö¼ú¸¶Ãë º¯°æ³»¿ë ÃʱâÈ­ * @ * @param : * @return : * @author : ¿ÀÁöÈÆ * @--------------------------------------------------- */ function fInitOpAnstChngInfo(){ var oprsrvno = opener.javascript.getParameter("SPMMO05800_param_oprsrvno"); var aprvreqno= opener.javascript.getParameter("SPMMO05800_param_aprvreqno"); var ophistno = opener.javascript.getParameter("SPMMO05800_param_ophistno"); var pid = opener.javascript.getParameter("SPMMO05800_param_pid"); var opdata = opener.javascript.getParameter("SPMMO05800_param_opdata"); var status = "i"; if(aprvreqno != 0){ status = "u"; } var param = opdata.split("¢Ë"); model.setValue(sRSRVAPPCNCL_PATH + "/status" , status); model.setValue(sRSRVAPPCNCL_PATH + "/oprsrvno" , oprsrvno); model.setValue(sRSRVAPPCNCL_PATH + "/aprvreqno" , aprvreqno); model.setValue(sRSRVAPPCNCL_PATH + "/ophistno" , ophistno); model.setValue(sRSRVAPPCNCL_PATH + "/pid" , pid); model.setValue(sRSRVAPPCNCL_PATH + "/opschedd" , param[19]); model.setValue(sRSRVAPPCNCL_PATH + "/opfromtmcd", param[1]); model.setValue(sRSRVAPPCNCL_PATH + "/opendtmcd" , param[2]); model.setValue(sRSRVAPPCNCL_PATH + "/oproomcd" , param[3]); model.setValue(sRSRVAPPCNCL_PATH + "/opcd" , param[4]); model.setValue(sRSRVAPPCNCL_PATH + "/opnm" , param[5]); model.setValue(sRSRVAPPCNCL_PATH + "/diagcd" , param[6]); model.setValue(sRSRVAPPCNCL_PATH + "/diagnm" , param[7]); model.setValue(sRSRVAPPCNCL_PATH + "/perfdeptcd", param[8]); model.setValue(sRSRVAPPCNCL_PATH + "/perfdrid" , param[9]); model.setValue(sRSRVAPPCNCL_PATH + "/opusetm" , param[10]); model.setValue(sRSRVAPPCNCL_PATH + "/anstmthdcd" , param[11]); model.setValue(sRSRVAPPCNCL_PATH + "/opposturecd" , param[14]); model.setValue(sRSRVAPPCNCL_PATH + "/opdirecflag" , param[15]); model.setValue(sRSRVAPPCNCL_PATH + "/oppatflagcd" , param[16]); model.setValue(sRSRVAPPCNCL_PATH + "/opcntmdg" , param[17]); model.setValue(sRSRVAPPCNCL_PATH + "/opdelivefact" , param[18]); if(!isNull(model.getValue(sRSRVAPPCNCL_PATH + "/anstmthdcd"))) { fChngAnstMthdCmb(cmb_anstmthdcd , cmb_detlanstmthdcd , "/root/main/reqinfo/rsrvappcncl/anstdetlmthdcd"); model.setValue(sRSRVAPPCNCL_PATH + "/anstdetlmthdcd" , param[12]); } model.setValue(sRSRVAPPCNCL_PATH + "/opstatcd" , param[13]); // [¿äû¹øÈ£: 847] ¼ö¼úÀÏÀÚº¯°æ 2010.06.25 kskim model.setValue(sRSRVAPPCNCL_PATH + "/opflagcd" , param[20]);//¼ö¼ú±¸ºÐ(Á¤±Ô,ÀÀ±Þ,Ãß°¡) model.setValue(sRSRVAPPCNCL_PATH + "/cntctel" , param[21]);//¿¬¶ôó model.setValue(sRSRVAPPCNCL_PATH + "/cnstopflag" , param[22]);//ÇùÁø¿©ºÎ model.setValue(sRSRVAPPCNCL_PATH + "/ccrtno" , param[23]);//Ä«µå¹øÈ£ // DRG Á¤º¸ 2013.06.20 KJS model.setValue(sRSRVAPPCNCL_PATH + "/drgyn" , param[24]);//DRG À¯¹« model.setValue(sRSRVAPPCNCL_PATH + "/drgno" , param[25]);//DRG ¹øÈ£ model.setValue(sRSRVAPPCNCL_PATH + "/drgnm" , param[26]);//DRG À̸§ var perfdeptcd = param[8]; //zbcfGetCodeList(new Array("M0356", "M0014", "M0017"), new Array("/root/temp/M0356", "/root/init/M0014", "/root/init/M0017")); zbcfGetCodeList(new Array("M0356"), new Array("/root/temp/M0356")); mmbfGetDeptCodeComboList("/root/send/reqdata", "/root/init/orddept", "D"); mmbfGetUserComboList("/root/send/reqdata", "/root/init/userlist", perfdeptcd, "0330"); reqOpRoomList(getCurrentDate(), "/root/init/oproomlist", "total"); mmbfGetHardCodeInfoNm("/root/send/reqdata", "/root/init/oppatflag", 84); //¼ö¼úȯÀÚ±¸ºÐ model.refresh(); } /** * @desc : ¸¶Ãë¹æ¹ý º¯°æ½Ã ¸¶Ãë¹æ¹ý»ó¼¼ º¯°æ * @ * @param : * @return : * @author : ¿ÀÁöÈÆ * @--------------------------------------------------- */ function fChngAnstMthdCmb(cmbobj, cmbobjtrgt, cmbpath){ var anstmthdcd = cmbobj.value; if(anstmthdcd == "01"){ //Àü½Å¸¶Ãë cmbobjtrgt.choices.itemset.attribute("nodeset") = "/root/init/M0243/M0243"; }else if(anstmthdcd == "02"){ //ºÎÀ§¸¶Ãë cmbobjtrgt.choices.itemset.attribute("nodeset") = "/root/init/M0244/M0244"; }else if(anstmthdcd == "03"){ //±¹¼Ò¸¶Ãë cmbobjtrgt.choices.itemset.attribute("nodeset") = "/root/init/M0245/M0245"; } model.setValue(cmbpath, "-"); model.setValue("/root/main/reqinfo/rsrvappcncl/anstdetlmthdcd", "00"); model.refresh(); } /** * @desc : º´¿ø ÈÞÀÏ select * @ * @param : * @return : * @author : ¹ÚÀ¯¹Ì * @--------------------------------------------------- * @ ÇÔ¼öÃß°¡ »çÀ¯: [¿äû¹øÈ£: 847] ¼ö¼úÀÏÀÚ º¯°æ 2010.06.25 kskim. */ function fGetCalendar(basedd){ var preyear = new Date(basedd.substring(0, 4) -1, basedd.substring(4, 6), basedd.substring(6, 8)); //alert(preyear.getDateFormat().substring(0, 4)); model.makeValue("/root/send/reqdata/basedd", preyear.getDateFormat().substring(0, 4)+ "¢Ë" +basedd.substring(0, 4)); //model.makeValue("/root/send/reqdata/basedd", basedd.substring(0, 4)); //submit("TRMMO10601"); submit("TRMMO00212"); // --> 2008.10.27 ÈÞÀÏÀÎ °æ¿ì blocking ó¸® check } /** * @desc : ¼ö¼ú±¸ºÐ À¯È¿¼º üũ, ´çÀÏÀÎ °æ¿ì Á¤±Ô ¼³Á¤Àº ºÒ°¡ÇÔ * @ * @param : * @return : * @author : ¿ÀÁöÈÆ * @--------------------------------------------------- * @ ÇÔ¼öÃß°¡ »çÀ¯: [¿äû¹øÈ£: 847] ¼ö¼úÀÏÀÚ º¯°æ 2010.06.25 kskim. */ function fValidOpFlagCD(){ var chkopcnfmtm = model.getValue("/root/init/chkopcnfmtm/hardcd/hardcd"); var opflagcd = model.getValue( sRSRVAPPCNCL_PATH + "/opflagcd"); var MyTime = getCurrentTime(); var Mydate = getCurrentDate(); var realtime = MyTime.substr(0,2); var addstart = model.getValue("/root/init/hardcodeS/hardcd/hardcd"); var addend = model.getValue("/root/init/hardcodeE/hardcd/hardcd"); var formalend = model.getValue("/root/init/hardcodeJ/hardcd/hardcd"); var dutflag = model.getValue("/root/main/calendar/calendar[basedd ="+ ipt_opschedd.value +"]/dutflag"); var currentflag = model.getValue("/root/main/calendar/calendar[basedd ="+ MyTime +"]/dutflag"); var reqrsncd = model.getValue(sRSRVAPPCNCL_PATH + "/reqrsncd"); // [¿äû¹øÈ£: 847] ¼ö¼úÀÏ º¯°æ - ¼ö¼úÀϺ¯°æ »çÀ¯ ±¸ºÐ ÄÚµå 2010.07.06 by ¹Ú¿µ¿ì var opusetm = model.getValue(sRSRVAPPCNCL_PATH + "/opusetm"); // [¿äû¹øÈ£: 847] ¼ö¼úÀÏ º¯°æ - ¼ö¼ú½Ã°£ 2010.07.06 by ¹Ú¿µ¿ì var oproomcd = model.getValue(sRSRVAPPCNCL_PATH + "/oproomcd"); // [¿äû¹øÈ£: 847] ¼ö¼úÀÏ º¯°æ - ¼ö¼ú¹æ 2010.07.06 by ¹Ú¿µ¿ì var cnstopflag = model.getValue(sRSRVAPPCNCL_PATH + "/cnstopflag"); var realopschedd; if(ipt_opschedd.value == Mydate){ //ÇöÀçÀÏÀÚ¿Í µ¿ÀÏÇÑ °æ¿ì if(reqrsncd == "314" || reqrsncd == "315") { // [¿äû¹øÈ£: 847] ¼ö¼úÀÏ º¯°æ - ´çÀϺ¯°æ ºÒ°¡ 2010.07.06 by ¹Ú¿µ¿ì messageBox("´çÀÏ·Î ¼ö¼úÀÏ º¯°æÀº ÇÒ ¼ö ", "I004"); //by sonjy 20100726 model.setValue(sRSRVAPPCNCL_PATH + "/opschedd", ""); } else { if(opflagcd == 1){ //Á¤±ÔÀÎ °æ¿ì if(getUserInfo("dutplceinstcd") == '012' ||getUserInfo("dutplceinstcd")=='017'||getUserInfo("dutplceinstcd")=='014'){ messageBox("´çÀÏ ¼ö¼ú¸¶ÃëÀÇ·Ú´Â ÀÀ±Þ¸¸", "I006"); }else{ messageBox("´çÀÏ ¼ö¼ú¸¶ÃëÀÇ·Ú´Â Ãß°¡, ÀÀ±Þ¸¸", "I006"); } model.setValue(sRSRVAPPCNCL_PATH + "/opflagcd", ""); // 2010.05.24 kskim model.setValue(sRSRVAPPCNCL_PATH + "/opusetm", ""); model.setValue(sRSRVAPPCNCL_PATH + "/oproomcd", ""); }else if((getUserInfo("dutplceinstcd") == '012' ||getUserInfo("dutplceinstcd")=='017'||getUserInfo("dutplceinstcd")=='014' )&& opflagcd == 3 && cnstopflag != "Y"){ //Ãß°¡ÀÎ °æ¿ì [kimsj 100322 ÇùÁøÀÏ °æ¿ì ´çÀÏ °¡´É] messageBox("Ãß°¡ÀÇ·Ú´Â ÀÍÀϺÎÅÍ", "I006"); model.setValue(sRSRVAPPCNCL_PATH + "/opflagcd", ""); }else if( getUserInfo("dutplceinstcd") == '012' && opflagcd == 3 && cnstopflag == "Y"){// ¼­¿ï¼º¸ð°æ¿ì ´çÀÏ ÇùÁøÀǷڽà ÀÀ±Þ¸¸ °¡´ÉÇϵµ·Ï ¿äû 2010.06.22 kskim messageBox("Ãß°¡ÀÇ·Ú´Â ÀÍÀϺÎÅÍ", "I006"); model.setValue(sRSRVAPPCNCL_PATH + "/opflagcd", ""); } } }else if(ipt_opschedd.value != Mydate){ //ÇöÀçÀÏÀÚ°¡ ¾Æ´Ñ°æ¿ì if( getCurrentWeek() == "6"|| getCurrentWeek() == "0" ) { if(getUserInfo("dutplceinstcd") == '012'){ var opsdd = model.getValue(sRSRVAPPCNCL_PATH + "/opschedd"); // ÀÇ·Ú¿äÀÏ var someday = new Date(opsdd.substring(0, 4), opsdd.substring(4, 6), opsdd.substring(6, 8)); someday = someday.getAddDate(-1, "M"); var dkind = someday.getDay(); if(opflagcd == "1" && dkind == "1") { // ÀÇ·Ú¿äÀÏÀÌ ¿ù¿äÀÏÀ̸é messageBox("¿ù¿äÀÏ Á¤±Ô ¼ö¼ú¸¶Ãë ÀÇ·Ú´Â ÀüÁÖ ±Ý¿äÀÏ 12MD ±îÁö¸¸ °¡´ÉÇÕ´Ï´Ù." + "\n"+"Ãß°¡·Î ÀÇ·ÚÇϽñ⠹ٶø´Ï´Ù. ", "I"); return; } } } if( getUserInfo("dutplceinstcd") == '012' ||getUserInfo("dutplceinstcd")=='017'){ for(var i =1; i<8; i++){ var tmprealopschedd = getCurrentDate().toDate('YYYYMMDD').getAddDate(+i, "D").getDateFormat('YYYYMMDD'); var opyn = model.getValue("/root/main/calendar/calendar[basedd ="+ tmprealopschedd +"]/dutflag"); if(opyn!="8" && opyn!="4" ){ realopschedd =tmprealopschedd; break; } } if(opflagcd == 1) { if (dutflag !="8" && dutflag !="4"){ if (realopschedd==ipt_opschedd.value){ if(formalend<=realtime){ model.alert("Á¤±Ô ¼ö¼ú¸¶ÃëÀÇ·Ú °¡´É ½Ã°£Àº 00:00 ~" +formalend+":00 ÀÔ´Ï´Ù."); model.setValue(sRSRVAPPCNCL_PATH + "/opflagcd", ""); } } }else if ( dutflag =="8" || dutflag =="4") { messageBox("¼ö¼úÀÏÀÚ°¡ ÈÞÀÏ ¶Ç´Â Åä¿äÀÏÀÎ °æ¿ì´Â Á¤±Ô¼ö¼ú·Î ÀÇ·Ú°¡ ºÒ°¡´ÉÇÕ´Ï´Ù", "I"); model.setValue(sRSRVAPPCNCL_PATH + "/opflagcd", ""); } }else if(opflagcd == 3) { //Ãß°¡ÀÎ °æ¿ì for(var i =1; i<8; i++){ var tmprealopschedd = getCurrentDate().toDate('YYYYMMDD').getAddDate(+i, "D").getDateFormat('YYYYMMDD'); var opyn = model.getValue("/root/main/calendar/calendar[basedd ="+ tmprealopschedd +"]/dutflag"); if(opyn!="8" ){ realopschedd =tmprealopschedd; break; } } if(dutflag!="8"){ // if(realopschedd !=ipt_opschedd.value ){ // model.alert("Ãß°¡ ¼ö¼ú¸¶Ãë ÀÇ·Ú°¡ °¡´ÉÇÑ ´ÙÀ½ ¼ö¼ú°¡´ÉÀÏÀÌ ¾Æ´Õ´Ï´Ù."); // model.setValue("/root/main/oprsrvinfo/oprsrvinfo/opflagcd", ""); // }else if (realopschedd ==ipt_opschedd.value) { if ((currentflag =="8"&& currentflag !="4") || currentflag !="8" ){ if(realtime