//ÀÀ±Þ½Ç ȯÀÚ ÀÀ±ÞÀÇ·á°ü¸®·á Á¤º¸ Ç¥½Ã //ÀÀ±ÞÀü¿ø¼Ò°ß¼­ Á¶È¸ function fER_mngt_msg(grd_inpatinfo_row) { /* if (model.getValue("/root/main/inpt_info/inptpatinfo/inpt_ordtype") == "E") { model.setValue("/root/send/data1/cretno", model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ grd_inpatinfo_row +"]/iphs_cretno")); submit("TRPAI00125"); if (model.getValue("/root/main/ermngtamtmsg/ermsg/cdid") != "") { cpt_ermesg.text = "[" + model.getValue("/root/main/ermngtamtmsg/ermsg/detldesc") + "]"; } else { cpt_ermesg.text = ""; } } else { cpt_ermesg.text = ""; } model.resetInstanceNode("/root/send/data1"); */ if (model.getValue("/root/main/inpt_info/inptpatinfo/inpt_ordtype") == "E") { if (model.getValue("/root/main/ermngtamtmsg/ermsg/cdid") != "") { cpt_ermesg.text = "[" + model.getValue("/root/main/ermngtamtmsg/ermsg/detldesc") + "]"; } else { cpt_ermesg.text = ""; } } else { cpt_ermesg.text = ""; } model.resetInstanceNode("/root/send/data1"); } //½Å»ý¾Æ : 1, »ê¸ð : 2, °ø¿©ÀÚ : 3, ¼öÇýÀÚ : 4 Á¤º¸ function fBabyHsct() { /* model.makeValue("/root/send/data4/pid", model.getValue("/root/main/inpt_info/inptpatinfo/inpt_pid")); model.makeValue("/root/send/data4/indd", model.getValue("/root/main/inpt_info/inptpatinfo/inpt_indd")); model.makeValue("/root/send/data4/cretno", model.getValue("/root/main/inpt_info/inptpatinfo/inpt_cretno")); model.makeValue("/root/send/data4/instcd", model.getValue("/root/main/inpt_info/inptpatinfo/inpt_instcd")); model.makeValue("/root/send/data4/mskind", model.getValue("/root/main/inpt_info/inptpatinfo/inpt_mskind")); if (submit("TRPAI00107") == true) { if (model.getValue("/root/main/emr_ast_info/grdbabyhsct/flag") == "1") { grdbabyhsct.attribute("caption") = "Åð¿ø»óÅÂ^ȯÀÚ¹øÈ£^»ê¸ð¸í^ÀÔ¿øÀÏÀÚ^"; grdbabyhsct.colHidden(3) = false; grdbabyhsct.rebuild(); grd_inpatinfo.attribute("width") = "575" grdbabyhsct.attribute("visibility") = "visible"; } else if (model.getValue("/root/main/emr_ast_info/grdbabyhsct/flag") == "2") { grdbabyhsct.attribute("caption") = "Åð¿ø»óÅÂ^ȯÀÚ¹øÈ£^½Å»ý¾Æ¸í^ÀÔ¿øÀÏÀÚ^"; grdbabyhsct.colHidden(3) = false; grdbabyhsct.rebuild(); grd_inpatinfo.attribute("width") = "575" grdbabyhsct.attribute("visibility") = "visible"; } else if (model.getValue("/root/main/emr_ast_info/grdbabyhsct/flag") == "3") { grdbabyhsct.attribute("caption") = "Åð¿ø»óÅÂ^ȯÀÚ¹øÈ£^¼öÇýÀÚ¸í^À̽ÄÀÏÀÚ^À̽ÄÁ¾·ù"; grdbabyhsct.colHidden(3) = true; grdbabyhsct.rebuild(); grd_inpatinfo.attribute("width") = "575" grdbabyhsct.attribute("visibility") = "visible"; } else if (model.getValue("/root/main/emr_ast_info/grdbabyhsct/flag") == "4") { grdbabyhsct.attribute("caption") = "Åð¿ø»óÅÂ^ȯÀÚ¹øÈ£^°ø¿©ÀÚ¸í^^À̽ÄÁ¾·ù"; grdbabyhsct.colHidden(3) = false; grdbabyhsct.rebuild(); grd_inpatinfo.attribute("width") = "575" grdbabyhsct.attribute("visibility") = "visible"; } else { grd_inpatinfo.attribute("width") = "884" grdbabyhsct.attribute("visibility") = "hidden"; } } */ if (model.getValue("/root/main/emr_ast_info/grdbabyhsct/flag") == "1") { grdbabyhsct.attribute("caption") = "Åð¿ø»óÅÂ^ȯÀÚ¹øÈ£^»ê¸ð¸í^ÀÔ¿øÀÏÀÚ^"; grdbabyhsct.colHidden(3) = false; grdbabyhsct.rebuild(); grd_inpatinfo.attribute("width") = "575" grdbabyhsct.attribute("visibility") = "visible"; } else if (model.getValue("/root/main/emr_ast_info/grdbabyhsct/flag") == "2") { grdbabyhsct.attribute("caption") = "Åð¿ø»óÅÂ^ȯÀÚ¹øÈ£^½Å»ý¾Æ¸í^ÀÔ¿øÀÏÀÚ^"; grdbabyhsct.colHidden(3) = false; grdbabyhsct.rebuild(); grd_inpatinfo.attribute("width") = "575" grdbabyhsct.attribute("visibility") = "visible"; } else if (model.getValue("/root/main/emr_ast_info/grdbabyhsct/flag") == "3") { grdbabyhsct.attribute("caption") = "Åð¿ø»óÅÂ^ȯÀÚ¹øÈ£^¼öÇýÀÚ¸í^À̽ÄÀÏÀÚ^À̽ÄÁ¾·ù"; grdbabyhsct.colHidden(3) = true; grdbabyhsct.rebuild(); grd_inpatinfo.attribute("width") = "575" grdbabyhsct.attribute("visibility") = "visible"; } else if (model.getValue("/root/main/emr_ast_info/grdbabyhsct/flag") == "4") { grdbabyhsct.attribute("caption") = "Åð¿ø»óÅÂ^ȯÀÚ¹øÈ£^°ø¿©ÀÚ¸í^^À̽ÄÁ¾·ù"; grdbabyhsct.colHidden(3) = false; grdbabyhsct.rebuild(); grd_inpatinfo.attribute("width") = "575" grdbabyhsct.attribute("visibility") = "visible"; } else { grd_inpatinfo.attribute("width") = "884" grdbabyhsct.attribute("visibility") = "hidden"; } } //ÀÀ±Þ 6½Ã°£ ¹Ì¸¸ ¿Ü·¡ ºÎ´ãÀ² Á¤º¸ ¸Þ¼¼Áö function fBrateflagMsg(){ var srow = grd_inpatinfo.row if (srow <= 0 ) {srow = 1;} if (model.getValue("/root/main/inpt_info/inptpatinfo/inpt_brateflag") == "O") { var sStartDDTM = model.getValue("/root/main/inpt_info/inptpatinfo/inpt_calcdd") + model.getValue("/root/main/inpt_info/inptpatinfo/inpt_calctm"); var sEndDDTM = model.getValue("/root/main/inpt_info/inptpatinfo/inpt_dschnotidt"); var sStartDDTM1 = model.getValue("/root/main/inpt_info/inptpatinfo/inpt_calcdd"); var sMessage = ""; if (sStartDDTM1 == "00000000" || sStartDDTM1 == "" || sStartDDTM1 == '-' || sEndDDTM == "-" || sEndDDTM == "" || sEndDDTM == null) { sMessage = ""; } else { sStartDDTM = sStartDDTM.substr(0,4) + "-" + sStartDDTM.substr(4,2) + "-" + sStartDDTM.substr(6,2) + " " + sStartDDTM.substr(8,2) + ":" + sStartDDTM.substr(10,2); sEndDDTM = sEndDDTM.substr(0,4) + "-" + sEndDDTM.substr(4,2) + "-" + sEndDDTM.substr(6,2) + " " + sEndDDTM.substr(8,2) + ":" + sEndDDTM.substr(10,2); sMessage = "(" + sStartDDTM + " ~ " + sEndDDTM + ")" ; } // 6½Ã°£ ¹Ì¸¸È¯ÀÚ ÆË¾÷Ç¥½Ã ÇØÁ¦ 20120117 Á¶Áß·¡ /* if (model.getValue("/root/main/inpt_info/inptpatinfo/inpt_ordtype") == "E") { messageBox("6½Ã°£ ¹Ì¸¸ ÀÀ±Þ ȯÀÚÀÔ´Ï´Ù. " + sMessage, "I999"); } else if (model.getValue("/root/main/inpt_info/inptpatinfo/inpt_ordtype") == "D") { messageBox("6½Ã°£ ¹Ì¸¸ DSC / CHEMO ȯÀÚÀÔ´Ï´Ù. " + sMessage, "I999"); } else if (model.getValue("/root/main/inpt_info/inptpatinfo/inpt_ordtype") == "I") { messageBox("6½Ã°£ ¹Ì¸¸ ÀÏ¹Ý È¯ÀÚÀÔ´Ï´Ù. " + sMessage, "I999"); } */ //º¸Á¶À¯Çü º¯°æÀº Àç¿ø»óÅÂÀÏ °æ¿ì¸¸ üũÇÑ´Ù. // 2009.03.27 - Â÷»óÀ§2Á¾ üũ·ÎÁ÷ Ãß°¡ - ¿Ü·¡¿äÀ² Â÷»óÀ§2Á¾ 6¼¼¹Ì¸¸ -> Â÷»óÀ§2Á¾ Á¤»ó for( i =1; i <= getNodesetCount("/root/main/iphs_info/h_grdipatinfo/grdipatinfo"); i++) { if (model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ i +"]/iphs_indschacptstat") == "A" && model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ i +"]/iphs_dschjudgprcsstat") == "A" && (model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ i +"]/iphs_insukind") == "11" || model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ i +"]/iphs_insukind") == "21" || model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ i +"]/iphs_insukind") == "22") ) { if (model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ i +"]/iphs_suppkind") == "08" || model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ i +"]/iphs_suppkind") == "31" //½Å»ý¾Æ || model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ i +"]/iphs_suppkind") == "41") { var sMsg1 = ""; var sMsg2 = ""; if (model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ i +"]/iphs_suppkind") == "08") { sMsg1 = "[ÀÔ¿ø6¼¼¹Ì¸¸]"; sMsg2 = "[Á¤»ó]"; }else if (model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ i +"]/iphs_suppkind") == "31") { sMsg1 = "[½Å»ý¾Æ]"; sMsg2 = "[Á¤»ó]"; }else if (model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ i +"]/iphs_suppkind") == "41") { sMsg1 = "[Â÷»óÀ§2Á¾ ÀÔ¿ø6¼¼¹Ì¸¸]"; sMsg2 = "[Â÷»óÀ§2Á¾ Á¤»ó]"; } if (messageBox("¿Ü·¡¿äÀ² ȯÀÚ´Â " + sMsg1 + " º¸Á¶À¯ÇüÀ» Àû¿ëÇÒ ¼ö ¾ø½À´Ï´Ù. \nº¸Á¶À¯ÇüÀ» " + sMsg2 + "À¸·Î º¯°æÇϽðڽÀ´Ï±î?", "Q999","") != 7) { model.makevalue("/root/send/data7/pid", model.getvalue("/root/main/inpt_info/inptpatinfo/inpt_pid")); model.makevalue("/root/send/data7/instcd", model.getvalue("/root/main/inpt_info/inptpatinfo/inpt_instcd")); model.makevalue("/root/send/data7/cretno", model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ i +"]/iphs_cretno")); model.makevalue("/root/send/data7/indd", model.getValue("/root/main/inpt_info/inptpatinfo/inpt_indd")); model.makevalue("/root/send/data7/prcpdd", model.getValue("/root/main/inpt_info/inptpatinfo/inpt_indd")); if (model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ i +"]/iphs_suppkind") == "08" || model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ i +"]/iphs_suppkind") == "31") { model.makevalue("/root/send/data7/appsuppkind", "00"); } else if (model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ i +"]/iphs_suppkind") == "41") { model.makevalue("/root/send/data7/appsuppkind", "33"); } else { } if (submit("TXPAI00108") == true) { //º¸Á¶À¯Çü º¯°æ model.removenode("/root/temp1/nexeccalc"); model.makeNode("/root/temp1/nexeccalc"); model.copyNode("/root/temp1/nexeccalc", "/root/main/inpt_info/inptpatinfo"); model.setValue("/root/temp1/nexeccalc/inpt_cretno", model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ i +"]/iphs_cretno")); model.setValue("/root/temp1/nexeccalc/inpt_mskind", model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ i +"]/iphs_mskind")); //nexeccalcflag : Y : ¹Ì½ÃÇà°è»ê(¹Ì½ÃÇà ³»¿ª node return), N : ½ÃÇàó¹æ, U : ¹Ì½ÃÇà ó¹æ model.makeValue("/root/temp1/nexeccalc/inpt_nexeccalcflag", "N"); model.makeValue("/root/temp1/nexeccalc/inpt_nexeccalcflag_flag", "U"); model.makeValue("/root/temp1/nexeccalc/inpt_calcbasedd", getCurrentDate()); submit("TXPAI00103"); //submit("TXPAI01801"); //°è»ê¹èÄ¡ »ý¼º //¼ö°¡°è»ê ¿Ï·á ÈÄ È¯ÀÚ ÀçÁ¶È¸ var sPid = model.getValue("/root/main/inpt_info/inptpatinfo/inpt_pid"); if (sPid != "") { fInitialize("all"); model.setValue("/root/main/inpt_info/inptpatinfo/inpt_pid", sPid); fInPatInfoRef("1"); return; } } else { messageBox("Àû¿ë½Ã ¿À·ù°¡ ¹ß»ýÇϼ̽À´Ï´Ù. ¼öµ¿À¸·Î º¯°æ ÈÄ Àç°è»ê ÇϽʽÿÀ.", "I999"); } } } } } if (model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ i +"]/iphs_indschacptstat") == "A" && model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ i +"]/iphs_dschjudgprcsstat") == "A" && (model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ i +"]/iphs_insukind") == "11" || model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ i +"]/iphs_insukind") == "21" || model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ i +"]/iphs_insukind") == "22") ) { // 2009.03.27 - Â÷»óÀ§2Á¾ »êÁ¤Æ¯·Ê(45), µî·Ï¾Ï(40) Á¶°Ç Ãß°¡ var sSpclSuppKind = model.getValue("/root/main/inpt_info/inptpatinfo/inpt_spclsuppkind"); if (model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]/iphs_insukind") == "11" && (sSpclSuppKind == "02" || sSpclSuppKind == "03" || sSpclSuppKind == "07" || sSpclSuppKind == "06" || sSpclSuppKind == "45" || sSpclSuppKind == "40" || sSpclSuppKind == "50" || sSpclSuppKind == "46")) { var sSpclSuppKindNm = ""; if (sSpclSuppKind == "07") { sSpclSuppKindNm = "»êÁ¤Æ¯·Ê"; } else if (sSpclSuppKind == "06") { sSpclSuppKindNm = "ÁßÁõ"; } else if (sSpclSuppKind == "45") { sSpclSuppKindNm = "Â÷»óÀ§2Á¾ »êÁ¤Æ¯·Ê"; } else if (sSpclSuppKind == "40") { sSpclSuppKindNm = "Â÷»óÀ§2Á¾ ÁßÁõ"; } else if (sSpclSuppKind == "02" || sSpclSuppKind == "03" || sSpclSuppKind == "50") { sSpclSuppKindNm = "Èñ±Í³­Ä¡¼º»êÁ¤Æ¯·Ê"; } else if (sSpclSuppKind == "46") { sSpclSuppKindNm = "Â÷»óÀ§2Á¾ Èñ±Í³­Ä¡¼º»êÁ¤Æ¯·Ê"; } else { } var sSuppKind = model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]/iphs_suppkind"); if (sSpclSuppKind != sSuppKind) { //»êÁ¤Æ¯·ÊÀÏ °æ¿ì ÁßÁõ¹øÈ£¸¦ üũÇÑ´Ù.(º¸Çè ÀÏ °æ¿ì ´çÀÏ sign ¿©ºÎ üũ) //if (sSpclSuppKind == "07") { // model.makevalue("/root/send/data7/pid", model.getvalue("/root/main/inpt_info/inptpatinfo/inpt_pid")); // model.makevalue("/root/send/data7/insukind", model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]/iphs_insukind")); // model.makevalue("/root/send/data7/cretno", model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]/iphs_cretno")); // model.makevalue("/root/send/data7/orddd", model.getValue("/root/main/inpt_info/inptpatinfo/inpt_indd")); // submit("TRPAI00128"); //} if (messageBox(sSpclSuppKindNm + " Àû¿ë ȯÀÚÀÔ´Ï´Ù. º¸Á¶À¯ÇüÀ» º¯°æÇϽðڽÀ´Ï±î?", "Q999","") != 7) { model.makevalue("/root/send/data7/pid", model.getvalue("/root/main/inpt_info/inptpatinfo/inpt_pid")); model.makevalue("/root/send/data7/instcd", model.getvalue("/root/main/inpt_info/inptpatinfo/inpt_instcd")); model.makevalue("/root/send/data7/cretno", model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]/iphs_cretno")); model.makevalue("/root/send/data7/indd", model.getValue("/root/main/inpt_info/inptpatinfo/inpt_indd")); model.makevalue("/root/send/data7/prcpdd", model.getValue("/root/main/inpt_info/inptpatinfo/inpt_indd")); model.makevalue("/root/send/data7/appsuppkind", sSpclSuppKind); if (submit("TXPAI00108") == true) { //»êÁ¤Æ¯·Ê º¯°æ model.removenode("/root/temp1/nexeccalc"); model.makeNode("/root/temp1/nexeccalc"); model.copyNode("/root/temp1/nexeccalc", "/root/main/inpt_info/inptpatinfo"); model.setValue("/root/temp1/nexeccalc/inpt_cretno", model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]/iphs_cretno")); model.setValue("/root/temp1/nexeccalc/inpt_mskind", model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]/iphs_mskind")); //nexeccalcflag : Y ¹Ì½ÃÇà°è»ê(¹Ì½ÃÇà ³»¿ª node return, N : ½ÃÇàó¹æ, U : ¹Ì½ÃÇà ó¹æ model.makeValue("/root/temp1/nexeccalc/inpt_nexeccalcflag", "N"); model.makeValue("/root/temp1/nexeccalc/inpt_nexeccalcflag_flag", "U"); model.makeValue("/root/temp1/nexeccalc/inpt_calcbasedd", getCurrentDate()); submit("TXPAI00103"); //submit("TXPAI01801"); //°è»ê¹èÄ¡ »ý¼º //¼ö°¡°è»ê ¿Ï·á ÈÄ È¯ÀÚ ÀçÁ¶È¸ var sPid = model.getValue("/root/main/inpt_info/inptpatinfo/inpt_pid"); if (sPid != "") { fInitialize("all"); model.setValue("/root/main/inpt_info/inptpatinfo/inpt_pid", sPid); fInPatInfoRef("1"); return; } } else { messageBox(sSpclSuppKindNm + " Àû¿ë½Ã ¿À·ù°¡ ¹ß»ýÇϼ̽À´Ï´Ù. ¼öµ¿À¸·Î º¯°æ ÈÄ Àç°è»ê ÇϽʽÿÀ.", "I999"); } } } } } }else{ /** //½Å»ý¾Æ ó¸® ·ÎÁ÷ Ãß°¡ var iDayno = getDateInterval(model.getValue("/root/main/inpt_info/inptpatinfo/inpt_brthdd"), model.getValue("/root/main/inpt_info/inptpatinfo/inpt_indd")); // (dateHelper.js) µÎ ÀÏÀÚ»çÀÌÀÇ Â÷¸¦ ÀÏ´ÜÀ§·Î ¹Ýȯ for( var a =1; ai <= getNodesetCount("/root/main/iphs_info/h_grdipatinfo/grdipatinfo/iphs_insukind"); a++) { if (model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ a +"]/iphs_indschacptstat") == "A" && model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ a +"]/iphs_dschjudgprcsstat") == "A"){ if(model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ a +"]/iphs_suppkind") == "31"){ if( iDayno > 28 ){ if (messageBox("»ýÈÄ 28ÀÏÀÌ Áö³ª¼­ ÀÔ¿øÇÑ È¯ÀÚ´Â [½Å»ý¾Æ] º¸Á¶À¯ÇüÀ» Àû¿ëÇÒ ¼ö ¾ø½À´Ï´Ù. \nº¸Á¶À¯ÇüÀ» [Á¤»ó] À¸·Î º¯°æÇϽðڽÀ´Ï±î?", "Q999","") != 7) { model.makevalue("/root/send/data7/pid", model.getvalue("/root/main/inpt_info/inptpatinfo/inpt_pid")); model.makevalue("/root/send/data7/instcd", model.getvalue("/root/main/inpt_info/inptpatinfo/inpt_instcd")); model.makevalue("/root/send/data7/cretno", model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ i +"]/iphs_cretno")); model.makevalue("/root/send/data7/indd", model.getValue("/root/main/inpt_info/inptpatinfo/inpt_indd")); model.makevalue("/root/send/data7/prcpdd", model.getValue("/root/main/inpt_info/inptpatinfo/inpt_indd")); model.makevalue("/root/send/data7/appsuppkind", "00"); if (submit("TXPAI00108") == true) { //º¸Á¶À¯Çü º¯°æ model.removenode("/root/temp1/nexeccalc"); model.makeNode("/root/temp1/nexeccalc"); model.copyNode("/root/temp1/nexeccalc", "/root/main/inpt_info/inptpatinfo"); model.setValue("/root/temp1/nexeccalc/inpt_cretno", model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ i +"]/iphs_cretno")); model.setValue("/root/temp1/nexeccalc/inpt_mskind", model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ i +"]/iphs_mskind")); //nexeccalcflag : Y : ¹Ì½ÃÇà°è»ê(¹Ì½ÃÇà ³»¿ª node return), N : ½ÃÇàó¹æ, U : ¹Ì½ÃÇà ó¹æ model.makeValue("/root/temp1/nexeccalc/inpt_nexeccalcflag", "N"); model.makeValue("/root/temp1/nexeccalc/inpt_nexeccalcflag_flag", "U"); model.makeValue("/root/temp1/nexeccalc/inpt_calcbasedd", getCurrentDate()); submit("TXPAI00103"); //submit("TXPAI01801"); //°è»ê¹èÄ¡ »ý¼º //¼ö°¡°è»ê ¿Ï·á ÈÄ È¯ÀÚ ÀçÁ¶È¸ var sPid = model.getValue("/root/main/inpt_info/inptpatinfo/inpt_pid"); if (sPid != "") { fInitialize("all"); model.setValue("/root/main/inpt_info/inptpatinfo/inpt_pid", sPid); fInPatInfoRef("1"); return; } } else { messageBox("Àû¿ë½Ã ¿À·ù°¡ ¹ß»ýÇϼ̽À´Ï´Ù. ¼öµ¿À¸·Î º¯°æ ÈÄ Àç°è»ê ÇϽʽÿÀ.", "I999"); } } } }else if( model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ a +"]/iphs_insukind") == "08" || model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ a +"]/iphs_insukind") == "41"){ } } } **/ } if (model.getValue("/root/main/inpt_info/inptpatinfo/inpt_ordtype") == "E") { if (model.getValue("/root/main/inpt_info/inptpatinfo/inpt_calcdd") == "00000000" && model.getValue("/root/main/inpt_info/inptpatinfo/inpt_calctm") == "0000") { messageBox("°£È£ ÀÔ½ÇÈ®ÀÎÀÌ µÇÁö ¾ÊÀº ÀÀ±Þ½Ç ³»¿ø ȯÀÚÀÔ´Ï´Ù.", "I999"); } else { messageBox("ÀÀ±Þ½Ç ³»¿ø ȯÀÚÀÔ´Ï´Ù.", "I999"); } } else if (model.getValue("/root/main/inpt_info/inptpatinfo/inpt_ordtype") == "D") { if (model.getValue("/root/main/inpt_info/inptpatinfo/inpt_calcdd") == "00000000" && model.getValue("/root/main/inpt_info/inptpatinfo/inpt_calctm") == "0000") { messageBox("°£È£ ÀÔ½ÇÈ®ÀÎÀÌ µÇÁö ¾ÊÀº DSC / CHEMO ȯÀÚÀÔ´Ï´Ù.", "I999"); } else { messageBox("DSC / CHEMO ȯÀÚÀÔ´Ï´Ù.", "I999"); } } } //Àç¿ø»óÅ º¸Á¶À¯Çü º¯°æ üũ function fInsukindChk(){ // var srow = grd_inpatinfo.row // if (srow <= 0 ) {srow = 1;} //½Å»ý¾Æ ó¸® ·ÎÁ÷ Ãß°¡ var iDayno = getDateInterval(model.getValue("/root/main/inpt_info/inptpatinfo/inpt_brthdd"), model.getValue("/root/main/inpt_info/inptpatinfo/inpt_indd")); // (dateHelper.js) µÎ ÀÏÀÚ»çÀÌÀÇ Â÷¸¦ ÀÏ´ÜÀ§·Î ¹Ýȯ for( var i =1; i <= getNodesetCount("/root/main/iphs_info/h_grdipatinfo/grdipatinfo/iphs_insukind"); i++) { //alert("11"); //º¸Á¶À¯Çü º¯°æÀº Àç¿ø»óÅÂÀÏ °æ¿ì¸¸ üũÇÑ´Ù. if (model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ i +"]/iphs_indschacptstat") == "A" && model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ i +"]/iphs_dschjudgprcsstat") == "A" && (model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ i +"]/iphs_insukind") == "11" || model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ i +"]/iphs_insukind") == "21" || model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ i +"]/iphs_insukind") == "22") ) { //ÀÔ¿ø¿äÀ², Àü¾×º»Àκδ㠾ƴϰí, Åð¿øÁ¤¸® ¿Ï·á ÈÄ if (model.getValue("/root/main/inpt_info/inptpatinfo/inpt_brateflag") == "I" //&& model.getValue("/root/main/inpt_info/inptpatinfo/inpt_ordtype") != "I" && model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ i +"]/iphs_suppkind") != "01" && model.getValue("/root/main/inpt_info/inptpatinfo/inpt_dschnotiyn") == "Y") { //for( var i =1; i <= getNodesetCount("/root/main/iphs_info/h_grdipatinfo/grdipatinfo/iphs_insukind"); i++) { if (model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ i +"]/iphs_insukind") == "11" && model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ i +"]/iphs_suppkind") == "07") { messageBox("6½Ã°£ ÀÌ»ó ȯÀÚÀÔ´Ï´Ù. [»êÁ¤Æ¯·Ê]¸¦ Àû¿ëÇÒ ¼ö ¾ø½À´Ï´Ù. º¸Á¶À¯ÇüÀ» º¯°æÇϽʽÿÀ.", "I999"); //break; return; } // 2009.03.27 - Â÷»óÀ§2Á¾ üũ Ãß°¡ if (model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ i +"]/iphs_insukind") == "11" && model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ i +"]/iphs_suppkind") == "45") { messageBox("6½Ã°£ ÀÌ»ó ȯÀÚÀÔ´Ï´Ù. [Â÷»óÀ§2Á¾ »êÁ¤Æ¯·Ê]¸¦ Àû¿ëÇÒ ¼ö ¾ø½À´Ï´Ù. º¸Á¶À¯ÇüÀ» º¯°æÇϽʽÿÀ.", "I999"); //break; return; } var sIphsSuppKind = model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ i +"]/iphs_suppkind"); //2013-04-24 À̵¿½Ä //½Å»ý¾Æ 28ÀÏ ¹Ì¸¸ Àû¿ë if (model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ i +"]/iphs_insukind") == "11" && sIphsSuppKind == "00" && parseInt(iDayno) <= 28) { if (messageBox("»ýÈÄ 28ÀÏ ÀÌÀü ÀÔ¿øÈ¯ÀÚÀÔ´Ï´Ù." +"\n½Å»ý¾Æ ÀÔ¿ø¿äÀ² º¸Á¶À¯ÇüÀ» Àû¿ëÇϽðڽÀ´Ï±î?", "Q999","") != 7) { model.makevalue("/root/send/data7/pid", model.getvalue("/root/main/inpt_info/inptpatinfo/inpt_pid")); model.makevalue("/root/send/data7/instcd", model.getvalue("/root/main/inpt_info/inptpatinfo/inpt_instcd")); model.makevalue("/root/send/data7/cretno", model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ i +"]/iphs_cretno")); model.makevalue("/root/send/data7/indd", model.getValue("/root/main/inpt_info/inptpatinfo/inpt_indd")); model.makevalue("/root/send/data7/prcpdd", model.getValue("/root/main/inpt_info/inptpatinfo/inpt_indd")); model.makevalue("/root/send/data7/appsuppkind", "31"); //½Å»ý¾Æ º¸Á¶À¯Çü if (submit("TXPAI00108") == true) { //º¸Á¶À¯Çü º¯°æ model.removenode("/root/temp1/nexeccalc"); model.makeNode("/root/temp1/nexeccalc"); model.copyNode("/root/temp1/nexeccalc", "/root/main/inpt_info/inptpatinfo"); model.setValue("/root/temp1/nexeccalc/inpt_cretno", model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ i +"]/iphs_cretno")); model.setValue("/root/temp1/nexeccalc/inpt_mskind", model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ i +"]/iphs_mskind")); //nexeccalcflag : Y ¹Ì½ÃÇà°è»ê(¹Ì½ÃÇà ³»¿ª node return, N : ½ÃÇàó¹æ, U : ¹Ì½ÃÇà ó¹æ model.makeValue("/root/temp1/nexeccalc/inpt_nexeccalcflag", "N"); model.makeValue("/root/temp1/nexeccalc/inpt_nexeccalcflag_flag", "U"); model.makeValue("/root/temp1/nexeccalc/inpt_calcbasedd", getCurrentDate()); submit("TXPAI00103"); //submit("TXPAI01801"); //°è»ê¹èÄ¡ »ý¼º //¼ö°¡°è»ê ¿Ï·á ÈÄ È¯ÀÚ ÀçÁ¶È¸ var sPid = model.getValue("/root/main/inpt_info/inptpatinfo/inpt_pid"); if (sPid != "") { fInitialize("all"); model.setValue("/root/main/inpt_info/inptpatinfo/inpt_pid", sPid); fInPatInfoRef("1"); return; } } else { messageBox("Àû¿ë½Ã ¿À·ù°¡ ¹ß»ýÇϼ̽À´Ï´Ù. ¼öµ¿À¸·Î º¯°æ ÈÄ Àç°è»ê ÇϽʽÿÀ.", "I999"); } } }else if ((sIphsSuppKind == "00" || sIphsSuppKind == "33") && parseInt(model.getValue("/root/main/inpt_info/inptpatinfo/inpt_age")) < 6) { var sSuppKindNM = ""; if (sIphsSuppKind == "00") { sSuppKindNM = "[ÀÔ¿ø6¼¼¹Ì¸¸]"; } else { sSuppKindNM = "[Â÷»óÀ§2Á¾ ÀÔ¿ø6¼¼¹Ì¸¸]"; } if (messageBox("6¼¼¹Ì¸¸ ÀÔ¿ø¿äÀ² ȯÀÚ·Î " + sSuppKindNM + " º¸Á¶À¯ÇüÀ» Àû¿ëÇϽðڽÀ´Ï±î?", "Q999","") != 7) { model.makevalue("/root/send/data7/pid", model.getvalue("/root/main/inpt_info/inptpatinfo/inpt_pid")); model.makevalue("/root/send/data7/instcd", model.getvalue("/root/main/inpt_info/inptpatinfo/inpt_instcd")); model.makevalue("/root/send/data7/cretno", model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ i +"]/iphs_cretno")); model.makevalue("/root/send/data7/indd", model.getValue("/root/main/inpt_info/inptpatinfo/inpt_indd")); model.makevalue("/root/send/data7/prcpdd", model.getValue("/root/main/inpt_info/inptpatinfo/inpt_indd")); if (sIphsSuppKind == "00") { model.makevalue("/root/send/data7/appsuppkind", "08"); } else { model.makevalue("/root/send/data7/appsuppkind", "41"); } if (submit("TXPAI00108") == true) { //º¸Á¶À¯Çü º¯°æ model.removenode("/root/temp1/nexeccalc"); model.makeNode("/root/temp1/nexeccalc"); model.copyNode("/root/temp1/nexeccalc", "/root/main/inpt_info/inptpatinfo"); model.setValue("/root/temp1/nexeccalc/inpt_cretno", model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ i +"]/iphs_cretno")); model.setValue("/root/temp1/nexeccalc/inpt_mskind", model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ i +"]/iphs_mskind")); //nexeccalcflag : Y ¹Ì½ÃÇà°è»ê(¹Ì½ÃÇà ³»¿ª node return, N : ½ÃÇàó¹æ, U : ¹Ì½ÃÇà ó¹æ model.makeValue("/root/temp1/nexeccalc/inpt_nexeccalcflag", "N"); model.makeValue("/root/temp1/nexeccalc/inpt_nexeccalcflag_flag", "U"); model.makeValue("/root/temp1/nexeccalc/inpt_calcbasedd", getCurrentDate()); submit("TXPAI00103"); //submit("TXPAI01801"); //°è»ê¹èÄ¡ »ý¼º //¼ö°¡°è»ê ¿Ï·á ÈÄ È¯ÀÚ ÀçÁ¶È¸ var sPid = model.getValue("/root/main/inpt_info/inptpatinfo/inpt_pid"); if (sPid != "") { fInitialize("all"); model.setValue("/root/main/inpt_info/inptpatinfo/inpt_pid", sPid); fInPatInfoRef("1"); return; } } else { messageBox("Àû¿ë½Ã ¿À·ù°¡ ¹ß»ýÇϼ̽À´Ï´Ù. ¼öµ¿À¸·Î º¯°æ ÈÄ Àç°è»ê ÇϽʽÿÀ.", "I999"); } } } //ÀÔ¿ø¿äÀ² Èñ±Í³­Ä¡¼º»êÁ¤Æ¯·Ê, ÁßÁõ... Àû¿ë var sSpclSuppKind = model.getValue("/root/main/inpt_info/inptpatinfo/inpt_spclsuppkind"); if (model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ i +"]/iphs_insukind") == "11" && (sSpclSuppKind == "06" || sSpclSuppKind == "50" || sSpclSuppKind == "46")) { var sSpclSuppKindNm = ""; if (sSpclSuppKind == "50") { sSpclSuppKindNm = "Èñ±Í³­Ä¡¼º»êÁ¤Æ¯·Ê"; } else if (sSpclSuppKind == "46") { sSpclSuppKindNm = "Â÷»óÀ§2Á¾ Èñ±Í³­Ä¡¼º»êÁ¤Æ¯·Ê"; } else if (sSpclSuppKind == "06") { sSpclSuppKindNm = "ÁßÁõ"; } var sSuppKind = model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ i +"]/iphs_suppkind"); if (sSpclSuppKind != sSuppKind) { if (messageBox(sSpclSuppKindNm + " Àû¿ë ȯÀÚÀÔ´Ï´Ù. º¸Á¶À¯ÇüÀ» º¯°æÇϽðڽÀ´Ï±î?", "Q999","") != 7) { model.makevalue("/root/send/data7/pid", model.getvalue("/root/main/inpt_info/inptpatinfo/inpt_pid")); model.makevalue("/root/send/data7/instcd", model.getvalue("/root/main/inpt_info/inptpatinfo/inpt_instcd")); model.makevalue("/root/send/data7/cretno", model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ i +"]/iphs_cretno")); model.makevalue("/root/send/data7/indd", model.getValue("/root/main/inpt_info/inptpatinfo/inpt_indd")); model.makevalue("/root/send/data7/prcpdd", model.getValue("/root/main/inpt_info/inptpatinfo/inpt_indd")); model.makevalue("/root/send/data7/appsuppkind", sSpclSuppKind); if (submit("TXPAI00108") == true) { //»êÁ¤Æ¯·Ê º¯°æ model.removenode("/root/temp1/nexeccalc"); model.makeNode("/root/temp1/nexeccalc"); model.copyNode("/root/temp1/nexeccalc", "/root/main/inpt_info/inptpatinfo"); model.setValue("/root/temp1/nexeccalc/inpt_cretno", model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ i +"]/iphs_cretno")); model.setValue("/root/temp1/nexeccalc/inpt_mskind", model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ i +"]/iphs_mskind")); //nexeccalcflag : Y ¹Ì½ÃÇà°è»ê(¹Ì½ÃÇà ³»¿ª node return, N : ½ÃÇàó¹æ, U : ¹Ì½ÃÇà ó¹æ model.makeValue("/root/temp1/nexeccalc/inpt_nexeccalcflag", "N"); model.makeValue("/root/temp1/nexeccalc/inpt_nexeccalcflag_flag", "U"); model.makeValue("/root/temp1/nexeccalc/inpt_calcbasedd", getCurrentDate()); submit("TXPAI00103"); //submit("TXPAI01801"); //°è»ê¹èÄ¡ »ý¼º //¼ö°¡°è»ê ¿Ï·á ÈÄ È¯ÀÚ ÀçÁ¶È¸ var sPid = model.getValue("/root/main/inpt_info/inptpatinfo/inpt_pid"); if (sPid != "") { fInitialize("all"); model.setValue("/root/main/inpt_info/inptpatinfo/inpt_pid", sPid); fInPatInfoRef("1"); return; } } else { messageBox(sSpclSuppKindNm + " Àû¿ë½Ã ¿À·ù°¡ ¹ß»ýÇϼ̽À´Ï´Ù. ¼öµ¿À¸·Î º¯°æ ÈÄ Àç°è»ê ÇϽʽÿÀ.", "I999"); } } } } //ÀÔ¿ø¿äÀ² Èñ±Í³­Ä¡¼º»êÁ¤Æ¯·Ê, ÁßÁõ... Àû¿ë ³¡ //} // end of for } } } // end of for } //¼Ò±Þ³»¿ª Á¶È¸ function fRetcSpec() { var icount = getNodesetCount("/root/main/ipsc_info/retcspec[ indd != '' ]/pid") if (icount > 0) { if (messageBox("¼ö°¡°è»ê ¹Ì½Ç½Ã°Ç ¶Ç´Â ¹Ýȯ¿äû¾àÀÌ Á¸ÀçÇÕ´Ï´Ù. \r\n\r\n - ¼ö°¡°è»ê ¹Ì½Ç½Ã : Åð¿ø¼ö³³ ½Ã ¼ö°¡°è»ê ½Ç½Ã \r\n\r\n - ¹Ýȯ¿äû¾à : ÇØ´çº´µ¿¿¡ Å뺸ÇÏ¿© ó¸® \r\n\r\n´ë»óÀÏÀÚ¸¦ È®ÀÎ ÇϽðڽÀ´Ï±î?", "Q999","") == 7) { return; } else { modal("SPPAI02400", "1","300", "300", "SPPAI02400", "/root/main/ipsc_info", "/root/send"); if (getParameter("SPPAI02400_RTN") == "Y" ) { if (model.getValue("/root/main/inpt_info/inptpatinfo/inpt_indschacptstat") == 'D') { messageBox("Åð¿øÈ¯ÀÚ´Â ¼Ò±Þ °è»êÀ» ÇÒ ¼ö", "I004"); setParameter("SPPAI02400_RTN", "N"); return; } if (model.getValue("/root/main/inpt_info/inptpatinfo/inpt_dschjudgprcsstat") == 'B') { messageBox("ÇØ´çȯÀÚ´Â ÇöÀç ½É»çÁß »óÅÂÀÔ´Ï´Ù. ¼Ò±Þ °è»êÀ» ÇÒ ¼ö", "I004"); setParameter("SPPAI02400_RTN", "N"); return; } if (model.getValue("/root/main/inpt_info/inptpatinfo/inpt_dschjudgprcsstat") != 'A') { for (j = 1; j <= icount; j++) { if (model.getValue("/root/main/ipsc_info/retcspec["+ j + "]/retcgenrplce") != "W") { messageBox("½É»ç¿Ï·áµÈ ȯÀÚ ¼Ò±Þ³»¿ªÁß °£È£/Áø·á/Áö¿øºÎ¼­ÀÇ ¼Ò±Þ³»¿ªÀÌ ÀÖ½À´Ï´Ù. º¸ÇèÆÀÀ¸·Î ¿¬¶ôÇϽʽÿÀ.", "I999"); setParameter("SPPAI02400_RTN", "N"); return; } } } model.makevalue("/root/send/data7/pid", model.getvalue("/root/main/inpt_info/inptpatinfo/inpt_pid")); model.makevalue("/root/send/data7/instcd", model.getvalue("/root/main/inpt_info/inptpatinfo/inpt_instcd")); model.makevalue("/root/send/data7/prcpdd", model.getValue("/root/main/ipsc_info/retcspec[1]/recaldd")); /* //retcgenrplce --¼Ò±Þ¹ß»ýÀå¼Ò (W:¿ø¹«, C:Áø·á, G:°£È£, L:LIS, A:Áö¿øºÎ¼­) for ( i = 1; i <= icount; i++) { //°°Àº ¼Ò±ÞÀÏÀÚ°¡ ÀÖÀ» °æ¿ì ÇϷ縸 µ¹¸°´Ù. 󹿰è»ê, ¼Ò±ÞÀÌ °°ÀÌ ÀÖÀ» °æ¿ì 󹿰è»ê¸¸ µ¹¸°´Ù. if (model.getValue("/root/main/ipsc_info/retcspec["+ i + "]/recaldd") != sCalcBaseDD) { if (model.getValue("/root/main/ipsc_info/retcspec["+ i + "]/retcgenrplce") != "W") { //calctype Y ó¹æ °è»ó != ¼Ò±Þ³»¿ª °è»ê model.setValue("/root/send/data7/inpt_calctype" , "Y"); model.makevalue("/root/send/data7/inpt_calcbasedd" , sCalcBaseDD); } else { model.setValue("/root/send/data7/inpt_calctype" , "N"); //¼Ò±ÞÀÏ °æ¿ì ±â°£À¸·Î ÁØ´Ù. model.setValue("/root/send/data7/inpt_calcfromdd" , sCalcBaseDD); model.setValue("/root/send/data7/inpt_calctodd" , sCalcBaseDD); } var rslt = submit("TXPAI01801"); var rslt = submit("TXPAI01801"); if (rslt == false ) { //messageBox( model.getvalue("/root/send/data3/calcbasedd") + "ÀÏ °è»ê¿¡¼­ ¿À·ù°¡ ¹ß»ýµÇ¾ú½À´Ï´Ù.", "I999"); messageBox( "°è»êÁß ¿À·ù°¡ ¹ß»ýÇÏ¿´½À´Ï´Ù. ¼ö°¡°è»ê¿¡¼­ Àç°è»ê", "I008"); setParameter("SPPAI02400_RTN", "N"); model.resetInstanceNode("/root/send/data7"); return; } */ submit("TXPAI01801"); model.resetInstanceNode("/root/send/data7"); //¼ö°¡°è»ê ¿Ï·á ÈÄ È¯ÀÚ ÀçÁ¶È¸ var sPid = model.getValue("/root/main/inpt_info/inptpatinfo/inpt_pid"); if (sPid != "") { fInitialize("all"); model.setValue("/root/main/inpt_info/inptpatinfo/inpt_pid", sPid); fInPatInfoRef("1"); } setParameter("SPPAI02400_RTN", "N"); }//getParameter "Y" ¿Ï·á } }else return true; } //¹Ì¼ö±Ý³»¿ª ¿©ºÎ È®ÀÎ function fUncoAmtChk() { var suncomsg = ""; if (model.getValue("/root/main/pat_info/h_unco_uncoamt/unco_uncoamt/unco_outuncoyn") == "¿Ü·¡ Y") { var unconm = "[" + model.getValue("/root/main/pat_info/h_unco_uncoamt/unco_uncoamt/unco_unconm") + "]"; suncomsg = unconm + "[¿Ü·¡¹Ì¼ö±Ý : " + model.getValue("/root/main/pat_info/h_unco_uncoamt/unco_uncoamt/unco_outuncoamt") + "] "; } if (model.getValue("/root/main/pat_info/h_unco_uncoamt/unco_uncoamt/unco_inuncoyn") == "ÀÔ¿ø Y") { var unconm = "[" + model.getValue("/root/main/pat_info/h_unco_uncoamt/unco_uncoamt/unco_inunconm") + "]"; suncomsg = suncomsg + unconm + "[ÀÔ¿ø¹Ì¼ö±Ý : " + model.getValue("/root/main/pat_info/h_unco_uncoamt/unco_uncoamt/unco_inuncoamt") + "] "; } if (model.getValue("/root/main/pat_info/h_unco_uncoamt/unco_uncoamt/unco_aiduncoyn") == "ÈÄ¿ø Y") { suncomsg = suncomsg + "[ÈÄ¿ø¹Ì¼ö±Ý : " + model.getValue("/root/main/pat_info/h_unco_uncoamt/unco_uncoamt/unco_aiduncoamt") + "] "; } if (suncomsg != "") { if (messageBox(suncomsg + "\n¹Ì¼ö ³»¿ªÀÌ Á¸Àç ÇÕ´Ï´Ù. ¹Ì¼ö ³»¿ªÀ» È®ÀÎ ÇϽðڽÀ´Ï±î?", "Q999","") != 7) { setParameter("SMPAM00100_PID_PARM", model.getValue("/root/main/inpt_info/inptpatinfo/inpt_pid")); modal("../../../pam/uncoamtmngtweb/xrw/SMPAM00100", "1","", "", "SMPAM00100", "", ""); setParameter("SMPAM00100_PID_PARM", ""); } } } //º¸°ü±Ý³»¿ª ¿©ºÎ È®ÀÎ function fKeepAmtChk() { if (model.getValue("/root/main/inpt_info/inptpatinfo/inpt_keepamt") != "0") { if (messageBox("º¸°ü±Ý[" + model.getValue("/root/main/inpt_info/inptpatinfo/inpt_keepamt") + "]ÀÌ Á¸Àç ÇÕ´Ï´Ù.\nº¸°ü±Ý ³»¿ªÀ» È®ÀÎ ÇϽðڽÀ´Ï±î?", "Q999","") != 7) { modal("../../../pam/inordamtmngtweb/xrw/SMPAI02300", "1","", "", "SMPAI02300", "/root/main/inpt_info/inptpatinfo", "/root/send/patinfo"); } } } //¹öư »óÅ× ¼ÂÆÃ function fBtn_State() { if (model.getValue("/root/main/pat_info/h_unco_uncoamt/unco_uncoamt/unco_outuncoyn") == "¿Ü·¡ Y") { ipt_outunco.attribute("color") = "#ff0000"; } else { ipt_outunco.attribute("color") = "#000000"; } if (model.getValue("/root/main/pat_info/h_unco_uncoamt/unco_uncoamt/unco_inuncoyn") == "ÀÔ¿ø Y") { ipt_inunco.attribute("color") = "#ff0000"; } else { ipt_inunco.attribute("color") = "#000000"; } if (model.getValue("/root/main/pat_info/h_unco_uncoamt/unco_uncoamt/unco_aiduncoyn") == "ÈÄ¿ø Y") { ipt_aidunco.attribute("color") = "#ff0000"; } else { ipt_aidunco.attribute("color") = "#000000"; } if (model.getValue("/root/main/inpt_info/inptpatinfo/inpt_dschdd") != "99991231") { ipt_dschdd.attribute("color") = "#0000FF"; } else { ipt_dschdd.attribute("color") = "#000000"; } var sopdcount = getNodesetCount("/root/main/pat_info/h_otpt_rsrv/otpt_rsrv"); if (sopdcount >= 2) { btn_opdinfo.attribute("class") = "btn5_letter4"; btn_opdinfo.attribute("color") = "#ff0066"; } else { btn_opdinfo.attribute("class") = "btn2_letter4"; } //ƯÀÌȯÀÚ¿©ºÎ if (model.getValue("/root/main/pat_info/h_ptsp_specpat/ptsp_specpat/ptsp_pid") != "" ){ btn_patspcfyn.attribute("background-color") = "#ff0000"; }else{ btn_patspcfyn.attribute("background-color") = "#c0c0c0"; } } //Áø·áºñ ³»¿ª,û±¸¼ö³³, ¹Ì½ÃÇàó¹æ, ÇåÇ÷Áõ function fRcpt_AllInfo(ord_info , rcpt_info, srcptkind) { //alert("ord_info :" + ord_info); //alert("rcpt_info :" + rcpt_info); //alert("srcptkind :" + srcptkind); var srow = grd_inpatinfo.row; //Àç¿øÁ¤º¸ grid ¼±ÅÃÀÌ ¾øÀ»½Ã 1¹øÂ°¸¦ ¼±ÅÃÇϵµ·Ï ÇÑ´Ù if (srow <= 0 ) { srow = 1; grd_inpatinfo.isSelected(1) = true; //ù¹øÂ° grid row »ö±ò º¯°æ } model.copynode("/root/send/rcptinfo/inpt_info/inptpatinfo" , "/root/main/inpt_info/inptpatinfo"); model.copynode("/root/send/rcptinfo/iphs_info/grdipatinfo" , "/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]"); model.setvalue("/root/send/rcptinfo/rcpt_info/rcptkind" , model.getValue("/root/hidden/rcptkind")); //¼öÇ÷´ëü ³»¿ª Áß °¨¸é±Ý¾×ÀÌ ÀÖÀ» °æ¿ì °¨¸é Á¦¿Üó¸® if( srcptkind == '4'){ model.makeNode("/root/send/rcptinfo/rcpt_info/bldcdiscamtdcYN"); model.setvalue("/root/send/rcptinfo/rcpt_info/bldcdiscamtdcYN", "Y"); model.makeNode("/root/send/rcptinfo/bldc_info/set_bldc"); model.copynode("/root/send/rcptinfo/bldc_info/set_bldc" , "/root/send/set_bldc"); }else if( model.getValue("/root/send/rcptinfo/rcpt_info/bldcdiscamtdcYN") == 'O' ){ model.makeNode("/root/send/rcptinfo/rcpt_info/bldcdiscamtdcYN"); model.setvalue("/root/send/rcptinfo/rcpt_info/bldcdiscamtdcYN", "O"); }else{ model.removeNodeset("/root/send/rcptinfo/bldc_info"); model.removeNode("/root/send/rcptinfo/rcpt_info/bldcdiscamtdcYN"); } submit("TRPAI00136"); if(ord_info == "Y"){ model.makeNode("/root/hidden/admi_info/ordamt/admispec"); model.makeNode("/root/hidden/admi_info/ordamt/unco"); model.makeNode("/root/hidden/admi_info/ordamt/dcgm"); model.makeNode("/root/hidden/admi_info/ordamt/cash"); model.makeNode("/root/hidden/admi_info/ordamt/onln"); model.makeNode("/root/hidden/admi_info/ordamt/ownblim"); model.makeNode("/root/hidden/admi_info/ordamt/aipm"); model.makeNode("/root/hidden/admi_info/ordamt/prvnamt"); model.makeNode("/root/hidden/admi_info/ordamt/inbornamt"); model.makeNode("/root/hidden/admi_info/ordamt/tissueamt"); model.copynode("/root/hidden/admi_info/ordamt/admispec" , "/root/hidden2/rcpt_info/pidinfo/h_admispec/admispec"); //model.copynode("/root/hidden/admi_info/ordamt/unco" , "/root/hidden2/rcpt_info/pidinfo/h_unco/unco"); copyNodesetType("/root/hidden/admi_info/ordamt/unco" , "/root/hidden2/rcpt_info/pidinfo/h_unco/unco", "replace"); model.copynode("/root/hidden/admi_info/ordamt/dcgm" , "/root/hidden2/rcpt_info/pidinfo/h_dcgm/dcgm"); model.copynode("/root/hidden/admi_info/ordamt/cash" , "/root/hidden2/rcpt_info/pidinfo/h_cash/cash"); model.copynode("/root/hidden/admi_info/ordamt/onln" , "/root/hidden2/rcpt_info/pidinfo/h_onln/onln"); model.copynode("/root/hidden/admi_info/ordamt/ownblim" , "/root/hidden2/rcpt_info/pidinfo/h_ownblim/ownblim"); model.copynode("/root/hidden/admi_info/ordamt/aipm" , "/root/hidden2/rcpt_info/pidinfo/h_aipm/aipm"); model.copynode("/root/hidden/admi_info/ordamt/prvnamt" , "/root/hidden2/rcpt_info/pidinfo/h_prvnamt/prvnamt"); model.copynode("/root/hidden/admi_info/ordamt/inbornamt" , "/root/hidden2/rcpt_info/pidinfo/h_inbornamt/inbornamt"); model.copynode("/root/hidden/admi_info/ordamt/tissueamt" , "/root/hidden2/rcpt_info/pidinfo/h_tissueamt/tissueamt"); fOrdAmtInfo(); } if(rcpt_info == "Y"){ model.makeNode("/root/hidden/admi_info/admi"); model.makeNode("/root/hidden/admi_info/admietc"); model.copynode("/root/hidden/admi_info/admi" , "/root/hidden2/rcpt_info/pidinfo/h_grdclamrcpt"); model.copynode("/root/hidden/admi_info/admietc" , "/root/hidden2/rcpt_info/pidinfo/h_grdbloodspec"); fRcptInfo(srcptkind); } model.copynode("/root/main/ipsc_info" , "/root/hidden2/rcpt_info/pidinfo/h_retcspec"); model.refresh(); } //Áø·áºñ ³»¿ª function fOrdAmtInfo() { /* var srow = grd_inpatinfo.row; //Àç¿øÁ¤º¸ grid ¼±ÅÃÀÌ ¾øÀ»½Ã 1¹øÂ°¸¦ ¼±ÅÃÇϵµ·Ï ÇÑ´Ù if (srow <= 0 ) { srow = 1; grd_inpatinfo.isSelected(1) = true; //ù¹øÂ° grid row »ö±ò º¯°æ } model.resetInstanceNode("/root/send/data1"); model.resetInstanceNode("/root/send/data2"); model.copyNode("/root/send/data1", "/root/main/inpt_info/inptpatinfo"); model.copyNode("/root/send/data2", "/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]"); submit("TRPAI00104","false"); copyNodesetType("/root/main/admi_info/ordamt/admispec","/root/hidden/admi_info/ordamt/admispec","replace"); copyNodesetType("/root/main/admi_info/unco/unco","/root/hidden/admi_info/ordamt/unco","replace"); copyNodesetType("/root/main/admi_info/dcgm/dcgm","/root/hidden/admi_info/ordamt/dcgm","replace"); //¹Ì¼ö³»¿ªÀÌ 2°³ÀÌ»óÀÌ¸é ¹öưÀ» »öÀ» º¯°æ var uncocnt = getNodesetCount("/root/main/admi_info/unco/unco"); if(uncocnt>1){ btn_uncoamt.attribute("class") = "btn5_letter3"; btn_uncoamt.attribute("color") = "#ff0066"; }else{ btn_uncoamt.attribute("class") = "btn2_letter3"; } //°¨¸é³»¿ªÀÌ 2°³ ÀÌ»óÀÌ¸é ¹öưÀÇ »ö±òÀ» º¯°æ var dcgmnt = getNodesetCount("/root/main/admi_info/dcgm/dcgm"); if(dcgmnt>1){ btn_reduamt.attribute("class") = "btn5_letter4"; btn_reduamt.attribute("color") = "#ff0066"; }else{ btn_reduamt.attribute("class") = "btn2_letter4"; } //Ä«µåÆË¾÷¿¡¼­ Ä«µå ½ÂÀÎ, Ãë¼ÒÇÒ ³»¿ªÀ» ³Ñ°Ü ¹Þ´Â´Ù. È­¸é mappingÀº hidden¿¡ Àִ°ÍÀ¸·Î dispaly¸¸ ÇÑ´Ù. copyNodesetType("/root/main/admi_info/cash/cash","/root/hidden/admi_info/ordamt/cash","replace"); copyNodesetType("/root/main/admi_info/onln/onln","/root/hidden/admi_info/ordamt/onln","replace"); copyNodesetType("/root/main/admi_info/ownblim/ownblim","/root/hidden/admi_info/ordamt/ownblim","replace"); copyNodesetType("/root/main/admi_info/aipm/aipm","/root/hidden/admi_info/ordamt/aipm","replace"); copyNodesetType("/root/main/admi_info/prvnamt/prvnamt","/root/hidden/admi_info/ordamt/prvnamt","replace"); copyNodesetType("/root/main/admi_info/inbornamt/inbornamt","/root/hidden/admi_info/ordamt/inbornamt","replace"); //°¡Åð¿ø±Ý º¯°æ ÈÄ ´Ù½Ã °¡Åð¿ø±Ý °è»êÀ» Çϱâ À§ÇØ ³³ºÎ±Ý¾×À» ¼¼ÆÃÇÔ. model.setValue("/root/temp1/admi_orgrcptpayamt", model.getValue("/root/main/admi_info/ordamt/admispec/admi_rcptpayamt")); //¼ö³³¹æ¹ý card, cash¿¡ ³³ºÎÇÒ ±Ý¾×À» setting if (model.getValue("/root/main/admi_info/rcptmthd/rcptmthd") == "1") { model.setValue("/root/main/admi_info/ordamt/admispec/admi_cardamt", model.getValue("/root/main/admi_info/ordamt/admispec/admi_rcptpayamt")); model.setValue("/root/main/admi_info/ordamt/admispec/admi_cashamt", "0") } else { model.setValue("/root/main/admi_info/ordamt/admispec/admi_cashamt", model.getValue("/root/main/admi_info/ordamt/admispec/admi_rcptpayamt")); model.setValue("/root/main/admi_info/ordamt/admispec/admi_cardamt", "0") } grd_cardspec.rebuild(); //ÀÚº¸Çѵµ¾×ÀÌ ÀÖÀ» °æ¿ì ¹öư º¯°æ / ÀÚº¸Çѵµ¾× popup È£Ãâ var nodeList = getNodesetCount("/root/main/admi_info/aipm/aipm"); if (nodeList > 0 && parseInt(model.getValue("/root/main/admi_info/aipm/aipm/aipm_paylimamt")) >= 0) { btn_aipm.attribute("class") = "btn5_letter5"; btn_aipm.attribute("color") = "#ff0066"; model.resetInstanceNode("/root/hidden/source"); model.setValue("/root/hidden/source/pid", model.getValue("/root/main/inpt_info/inptpatinfo/inpt_pid")); model.setValue("/root/hidden/source/orddd", model.getValue("/root/main/inpt_info/inptpatinfo/inpt_indd")); model.setValue("/root/hidden/source/instcd", model.getValue("/root/main/inpt_info/inptpatinfo/inpt_instcd")); modal("../../../pam/inordamtmngtweb/xrw/SPPAI02600", "1","200", "200", "SPPAI02600", "/root/hidden/source", "/root/send", "align:center"); model.resetInstanceNode("/root/hidden/source"); } else { btn_aipm.attribute("class") = "btn2_letter5"; } //Á¶Á÷ÀºÇà ¹Ì¼ö ´ë»ó±Ý¾× ¸Þ¼¼Áö model.makeNode("/root/main/admi_info/tissuebank/tissueamt"); copyNodesetType("/root/main/admi_info/tissuebank/tissueamt","/root/hidden/admi_info/ordamt/tissueamt","replace"); if( model.getValue("/root/main/admi_info/tissuebank/tissueamt/pid") != '' && model.getValue("/root/main/admi_info/tissuebank/tissueamt/totalamt") != '' ){ messageBox("Á¶Á÷ÀºÇà ´ë»óȯÀÚ ÀÔ´Ï´Ù. ´ë»ó ±Ý¾×¸¸Å­ Á¶Á÷ÀºÇà ¹Ì¼ö ó¸®ÇØ ÁÖ¼¼¿ä!" + "\nÁÖÀÇ!! Á¶Á÷ÀºÇà ó¹æÁß ¹Ì½ÃÇà °ÇÀº ´ë»ó±Ý¾×¿¡ Æ÷ÇÔµÇÁö ¾Ê½À´Ï´Ù. ÃÖÁ¾±Ý¾×Àº Åð¿ø¼ö³³ÇÏ½Ç ¶§ È®ÀÎ ÈÄ Àû¿ëÇϼ¼¿ä!" + "\n[ ´ë»ó ±Ý¾× : " + model.getValue("/root/main/admi_info/tissuebank/tissueamt/totalamt") + " ¿ø ][ ¹Ì¼öÄÚµå : A38(Á¶Á÷ÀºÇà) ]" , "E999", ""); } //Åð¿øÅ뺸ÀÌÈÄ¿¡ ½Ç½ÃµÈ ó¹æ blocking var vdschnotidt = model.getValue("/root/main/inpt_info/inptpatinfo/inpt_dschnotidt"); if (vdschnotidt == "-" || vdschnotidt == "" || vdschnotidt == null) { }else{ model.resetInstanceNode("/root/send/data1"); model.resetInstanceNode("/root/main/admicheck/admichecklist/execddnotiyn"); model.makeValue("/root/send/data1/pid", model.getValue("/root/main/inpt_info/inptpatinfo/inpt_pid")); model.makeValue("/root/send/data1/indd", model.getValue("/root/main/inpt_info/inptpatinfo/inpt_indd")); model.makeValue("/root/send/data1/dschnotidt", model.getValue("/root/main/inpt_info/inptpatinfo/inpt_dschnotidt")); model.makeValue("/root/send/data1/cretno", model.getValue("/root/main/inpt_info/inptpatinfo/inpt_cretno")); submit("TRPAI00131","false"); } //¼±ÅÃÁø·á »çÀΠüũ //¼±ÅÃÁø·á ÀÀ±Þ½Ç ȯÀÚÀÎ °æ¿ì¿¡´Â üũÇÏÁö ¾ÊÀ½ -> üũ·Î º¯°æ 20120103 Á¶Áß·¡ model.resetInstanceNode("/root/main/admicheck1/rgst/rgstyn"); var inddspec = model.getValue("/root/init/PAM/P0041list/P0041[cdid = 'J01']/cdnm"); if(model.getValue("/root/main/inpt_info/inptpatinfo/inpt_indd") >= inddspec){ if (fCheckSpecOrdApp() == true) { } } model.refresh(); */ // ÀÔ¿ø6¼¼¹Ì¸¸ º¸Á¶À¯Çü üũÃß°¡ by Á¶Áß·¡ 20161219 if (model.getValue("/root/main/inpt_info/inptpatinfo/inpt_brateflag") == "O" && model.getValue("/root/main/inpt_info/inptpatinfo/inpt_insukind") == "11" && model.getValue("/root/main/inpt_info/inptpatinfo/inpt_suppkind") == "08") { messageBox("ÀÔ¿ø6¼¼¹Ì¸¸ º¸Á¶À¯ÇüÀº ÀÔ¿ø¿äÀ²¿¡¸¸ »ç¿ë°¡´ÉÇÕ´Ï´Ù.\r\nº¸Á¶À¯ÇüÀ» º¯°æÇϽʽÿÀ!!", "E000"); return false; } model.makeNode("/root/main/admi_info/ordamt/admispec"); model.makeNode("/root/main/admi_info/unco/unco"); model.makeNode("/root/main/admi_info/dcgm/dcgm"); model.makeNode("/root/main/admi_info/cash/cash"); model.makeNode("/root/main/admi_info/onln/onln"); model.makeNode("/root/main/admi_info/ownblim/ownblim"); model.makeNode("/root/main/admi_info/aipm/aipm"); model.makeNode("/root/main/admi_info/prvnamt/prvnamt"); model.makeNode("/root/main/admi_info/inbornamt/inbornamt"); model.makeNode("/root/main/admi_info/tissuebank/tissueamt"); copyNodesetType("/root/main/admi_info/ordamt/admispec","/root/hidden/admi_info/ordamt/admispec","replace"); copyNodesetType("/root/main/admi_info/unco/unco" ,"/root/hidden/admi_info/ordamt/unco","replace"); copyNodesetType("/root/main/admi_info/dcgm/dcgm" ,"/root/hidden/admi_info/ordamt/dcgm","replace"); //Ä«µåÆË¾÷¿¡¼­ Ä«µå ½ÂÀÎ, Ãë¼ÒÇÒ ³»¿ªÀ» ³Ñ°Ü ¹Þ´Â´Ù. È­¸é mappingÀº hidden¿¡ Àִ°ÍÀ¸·Î dispaly¸¸ ÇÑ´Ù. copyNodesetType("/root/main/admi_info/cash/cash" ,"/root/hidden/admi_info/ordamt/cash","replace"); copyNodesetType("/root/main/admi_info/onln/onln" ,"/root/hidden/admi_info/ordamt/onln","replace"); copyNodesetType("/root/main/admi_info/ownblim/ownblim" ,"/root/hidden/admi_info/ordamt/ownblim","replace"); copyNodesetType("/root/main/admi_info/aipm/aipm" ,"/root/hidden/admi_info/ordamt/aipm","replace"); copyNodesetType("/root/main/admi_info/prvnamt/prvnamt" ,"/root/hidden/admi_info/ordamt/prvnamt","replace"); copyNodesetType("/root/main/admi_info/inbornamt/inbornamt" ,"/root/hidden/admi_info/ordamt/inbornamt","replace"); copyNodesetType("/root/main/admi_info/tissuebank/tissueamt","/root/hidden/admi_info/ordamt/tissueamt","replace"); //¹Ì¼ö³»¿ªÀÌ 2°³ÀÌ»óÀÌ¸é ¹öưÀ» »öÀ» º¯°æ var uncocnt = getNodesetCount("/root/main/admi_info/unco/unco"); if(uncocnt>1){ btn_uncoamt.attribute("class") = "btn5_letter3"; btn_uncoamt.attribute("color") = "#ff0066"; }else{ btn_uncoamt.attribute("class") = "btn2_letter3"; } //°¨¸é³»¿ªÀÌ 2°³ ÀÌ»óÀÌ¸é ¹öưÀÇ »ö±òÀ» º¯°æ var dcgmnt = getNodesetCount("/root/main/admi_info/dcgm/dcgm"); if(dcgmnt>1){ btn_reduamt.attribute("class") = "btn5_letter4"; btn_reduamt.attribute("color") = "#ff0066"; }else{ btn_reduamt.attribute("class") = "btn2_letter4"; } //°¡Åð¿ø±Ý º¯°æ ÈÄ ´Ù½Ã °¡Åð¿ø±Ý °è»êÀ» Çϱâ À§ÇØ ³³ºÎ±Ý¾×À» ¼¼ÆÃÇÔ. model.setValue("/root/temp1/admi_orgrcptpayamt", model.getValue("/root/main/admi_info/ordamt/admispec/admi_rcptpayamt")); //¼ö³³¹æ¹ý card, cash¿¡ ³³ºÎÇÒ ±Ý¾×À» setting if (model.getValue("/root/main/admi_info/rcptmthd/rcptmthd") == "1") { model.setValue("/root/main/admi_info/ordamt/admispec/admi_cardamt", model.getValue("/root/main/admi_info/ordamt/admispec/admi_rcptpayamt")); model.setValue("/root/main/admi_info/ordamt/admispec/admi_cashamt", "0") } else { model.setValue("/root/main/admi_info/ordamt/admispec/admi_cashamt", model.getValue("/root/main/admi_info/ordamt/admispec/admi_rcptpayamt")); model.setValue("/root/main/admi_info/ordamt/admispec/admi_cardamt", "0") } grd_cardspec.rebuild(); //ÀÚº¸Çѵµ¾×ÀÌ ÀÖÀ» °æ¿ì ¹öư º¯°æ / ÀÚº¸Çѵµ¾× popup È£Ãâ var nodeList = getNodesetCount("/root/main/admi_info/aipm/aipm"); if (nodeList > 0 && parseInt(model.getValue("/root/main/admi_info/aipm/aipm/aipm_paylimamt")) >= 0) { btn_aipm.attribute("class") = "btn5_letter4"; btn_aipm.attribute("color") = "#ff0066"; model.resetInstanceNode("/root/hidden/source"); model.setValue("/root/hidden/source/pid", model.getValue("/root/main/inpt_info/inptpatinfo/inpt_pid")); model.setValue("/root/hidden/source/orddd", model.getValue("/root/main/inpt_info/inptpatinfo/inpt_indd")); model.setValue("/root/hidden/source/instcd", model.getValue("/root/main/inpt_info/inptpatinfo/inpt_instcd")); modal("../../../pam/inordamtmngtweb/xrw/SPPAI02600", "1","200", "200", "SPPAI02600", "/root/hidden/source", "/root/send", "align:center"); model.resetInstanceNode("/root/hidden/source"); } else { btn_aipm.attribute("class") = "btn2_letter4"; } //Á¶Á÷ÀºÇà ¹Ì¼ö ´ë»ó±Ý¾× ¸Þ¼¼Áö if( model.getValue("/root/main/admi_info/tissuebank/tissueamt/pid") != '' && model.getValue("/root/main/admi_info/tissuebank/tissueamt/totalamt") != '' ){ messageBox("Á¶Á÷ÀºÇà ´ë»óȯÀÚ ÀÔ´Ï´Ù. ´ë»ó ±Ý¾×¸¸Å­ Á¶Á÷ÀºÇà ¹Ì¼ö ó¸®ÇØ ÁÖ¼¼¿ä!" + "\nÁÖÀÇ!! Á¶Á÷ÀºÇà ó¹æÁß ¹Ì½ÃÇà °ÇÀº ´ë»ó±Ý¾×¿¡ Æ÷ÇÔµÇÁö ¾Ê½À´Ï´Ù. ÃÖÁ¾±Ý¾×Àº Åð¿ø¼ö³³ÇÏ½Ç ¶§ È®ÀÎ ÈÄ Àû¿ëÇϼ¼¿ä!" + "\n[ ´ë»ó ±Ý¾× : " + model.getValue("/root/main/admi_info/tissuebank/tissueamt/totalamt") + " ¿ø ][ ¹Ì¼öÄÚµå : A38(Á¶Á÷ÀºÇà) ]" , "E999", ""); } //Åð¿øÅ뺸ÀÌÈÄ¿¡ ½Ç½ÃµÈ ó¹æ blocking var vdschnotidt = model.getValue("/root/main/inpt_info/inptpatinfo/inpt_dschnotidt"); if (vdschnotidt == "-" || vdschnotidt == "" || vdschnotidt == null) { // }else{ model.copynode("/root/main/admicheck/admichecklist" , "/root/hidden2/rcpt_info/pidinfo/h_admichecklist/admichecklist"); } //¼±ÅÃÁø·á »çÀΠüũ //¼±ÅÃÁø·á ÀÀ±Þ½Ç ȯÀÚÀÎ °æ¿ì¿¡´Â üũÇÏÁö ¾ÊÀ½ -> üũ·Î º¯°æ 20120103 Á¶Áß·¡ model.resetInstanceNode("/root/main/admicheck1/rgst/rgstyn"); var inddspec = model.getValue("/root/init/PAM/P0041list/P0041[cdid = 'J01']/cdnm"); // ¼±ÅÃÁø·á½Åû¼­ À¯È¿¼º üũ´Â ¼±ÅÃÁø·áºñ°¡ ¹ß»ýÇÑ °æ¿ì¿¡¸¸ ó¸® var specamt = parseInt(model.getValue("/root/main/admi_info/ordamt/admispec/admi_specinsubamt")) + parseInt(model.getValue("/root/main/admi_info/ordamt/admispec/admi_specownbamt")); if (specamt > 0) { if(model.getValue("/root/main/inpt_info/inptpatinfo/inpt_indd") >= inddspec){ if (fCheckSpecOrdApp() == true) { } } } var srow = grd_inpatinfo.row; // ÃÖÃʷεù ½Ã -1 -> 1 º¸Á¤Ã³¸® if (srow < 1) srow = 1; //2012-02-09 //Åð¿ø¼ö³³½Ã¿¡ ½É»çÇʼö¿©ºÎ Ç¥½Ã ¿äû //½ÇÁ¦ ¼ö³³Á¦¾î¿ë ·ÎÁ÷Àº È­¸é´Ü¿¡ ÀÖÀ½¿¡ À¯ÀÇÇÒ °Í!! // Ä¡°ú Áø·á°ú ¼¼ºÐÈ­·Î ÀÎÇØ ¾Õ 2ÀÚ¸®¸¸À¸·Î ó¸® by Á¶Áß·¡ 20170516 var orddeptcd = model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]/iphs_orddeptcd"); var reqdeptno = model.getValue("/root/hidden/init/orddeptcd[cd = '" + orddeptcd + "']/reqdeptno").substr(0,2); if (model.getValue("/root/main/inpt_info/inptpatinfo/inpt_indschacptstat") == "A" //Àç¿ø ¹× °¡Åð¿ø. && ( model.getValue("/root/main/inpt_info/inptpatinfo/inpt_ordtype") == "D" || model.getValue("/root/main/inpt_info/inptpatinfo/inpt_ordtype") == "E") //ÀÀ±Þ, DSC/CHEMO && model.getValue("/root/main/inpt_info/inptpatinfo/inpt_brateflag") == 'I'){ //ÀÔ¿ø¿äÀ² cpt_judgneedmsg.text = "Çʼö½É»ç(ÀÔ¿ø¿äÀ²)"; }else if(model.getValue("/root/main/inpt_info/inptpatinfo/inpt_indschacptstat") == "A" //Àç¿ø ¹× °¡Åð¿ø. && model.getValue("/root/main/inpt_info/inptpatinfo/inpt_brateflag") == 'O' //¿Ü·¡¿äÀ². && reqdeptno != '55' //Ä¡°úÁ¦¿Ü && parseInt(model.getValue("/root/main/inpt_info/inptpatinfo/inpt_bfjudgcnt")) > 0 && ( (model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]/iphs_insukind") == "21" || model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]/iphs_insukind") == "22" || model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]/iphs_insukind") == "11" ) && model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]/iphs_suppkind") != "01") ){ cpt_judgneedmsg.text = "Çʼö½É»ç(»çÀü½É»çó¹æ)"; }else if (model.getValue("/root/main/inpt_info/inptpatinfo/inpt_dschjudgprcsstat") == "G" && parseInt(model.getValue("/root/main/inpt_info/inptpatinfo/inpt_bfjudgcnt")) > 0 && reqdeptno != '55' //Ä¡°úÁ¦¿Ü && model.getValue("/root/main/inpt_info/inptpatinfo/inpt_brateflag") == 'I' //ÀÔ¿ø¿äÀ² && ( (model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]/iphs_insukind") == "21" || model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]/iphs_insukind") == "22" || model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]/iphs_insukind") == "11" ) && model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]/iphs_suppkind") != "01") ) { cpt_judgneedmsg.text = "Çʼö½É»ç(¿¹°í½É»ç ÀÌÈÄ ½Ç½Ãó¹æ)"; }else if(model.getValue("/root/main/inpt_info/inptpatinfo/inpt_dschjudgprcsstat") != "G" && parseInt(model.getValue("/root/main/admi_info/ordamt/admispec/admi_totamt")) > 500000 //ÃÑÁø·áºñ 50¸¸¿ø Ãʰú && reqdeptno != '55' //Ä¡°úÁ¦¿Ü && ( (model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]/iphs_insukind") == "21" || model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]/iphs_insukind") == "22" || model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]/iphs_insukind") == "11" ) && model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]/iphs_suppkind") != "01") ){ cpt_judgneedmsg.text = "Çʼö½É»ç(ÃÑÁø·áºñ)"; }else if(model.getValue("/root/main/inpt_info/inptpatinfo/inpt_brateflag") == "O" && model.getValue("/root/main/inpt_info/inptpatinfo/inpt_emerprcpyn") == "Y" && ((model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]/iphs_insukind") == "11" || model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]/iphs_insukind") == "21" || model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]/iphs_insukind") == "22" || model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]/iphs_insukind") == "31") && model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]/iphs_suppkind") != "01") && model.getValue("/root/main/inpt_info/inptpatinfo/inpt_dschjudgprcsstat") != 'C' && model.getValue("/root/main/inpt_info/inptpatinfo/inpt_dschjudgprcsstat") != 'E') { cpt_judgneedmsg.text = "Çʼö½É»ç(ÀÀ±ÞÀÇ·á°ü¸®·á)"; }else if(model.getValue("/root/hidden2/all_info/pidinfo/h_dump/dump/dumpexistyn") == "Y") { cpt_judgneedmsg.text = "Çʼö½É»ç(¿Ü·¡Ã³¹æ ´ýÇÁ)"; }else{ cpt_judgneedmsg.text = ""; } } //û±¸¼ö³³, ¹Ì½ÃÇàó¹æ, ÇåÇ÷Áõ //û±¸¼ö³³ÀÇ srcptkind 1: Àüü, 2:Áß°£, 3:Åð¿ø function fRcptInfo(srcptkind) { /* var srow = grd_inpatinfo.row //Àç¿øÁ¤º¸ grid ¼±ÅÃÀÌ ¾øÀ»½Ã 1¹øÂ°¸¦ ¼±ÅÃÇϵµ·Ï ÇÑ´Ù if (srow <= 0 ) { srow = 1; } model.resetInstanceNode("/root/send/data1"); model.makeValue("/root/send/data1/pid", model.getValue("/root/main/inpt_info/inptpatinfo/inpt_pid")); model.makeValue("/root/send/data1/indd", model.getValue("/root/main/inpt_info/inptpatinfo/inpt_indd")); model.makeValue("/root/send/data1/dschdd", model.getValue("/root/main/inpt_info/inptpatinfo/inpt_dschdd")); model.makeValue("/root/send/data1/mskind", model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]/iphs_mskind")); model.makeValue("/root/send/data1/fromdd", model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]/iphs_fromdd")); model.makeValue("/root/send/data1/todd", model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]/iphs_todd")); model.makeValue("/root/send/data1/cretno", model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]/iphs_cretno")); model.makeValue("/root/send/data1/insukind", model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]/iphs_insukind")); model.makeValue("/root/send/data1/suppkind", model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]/iphs_suppkind")); model.makeValue("/root/send/data1/rcptkind", model.getValue("/root/hidden/rcptkind")); submit("TRPAI00105","false"); copyNodeType("/root/main/admi_info/admi","/root/hidden/admi_info/admi","replace"); if (srcptkind == "1") { submit("TRPAI00106","false"); copyNodeType("/root/main/admi_info/admietc","/root/hidden/admi_info/admietc","replace"); grd_bloodspec.rebuild(); } //[2012.03.30 À̼º¿õ Ãß°¡] °¡Åð¿ø ¼ö³³À̳ª °¡Åð¿ø Ãë¼Ò °èÁ¤ÀÏ °æ¿ì, »çÀ¯¸¦ ÅøÆÁÀ¸·Î º¸¿©ÁÜ for(var i = 1; i < grd_rcptamt.rows; i++) { grd_rcptamt.tooltipText(i, grd_rcptamt.colRef("rcptflag") ) = grd_rcptamt.valueMatrix(i, grd_rcptamt.colRef("keepresn")); } grd_rcptamt.rebuild(); var scount = getNodesetCount("/root/main/admi_info/admi/grdclamrcpt"); var schk = model.getValue("/root/hidden/dcrcptkind"); if (schk != "0") { for( i =1; i <= scount; i++) { var srcptstat = model.getValue("/root/main/admi_info/admi/grdclamrcpt["+ i +"]/rcptstat"); if (srcptstat == "Y") { grd_rcptamt.rowHidden(i) = false; } else { grd_rcptamt.rowHidden(i) = true; } } } model.refresh(); if (model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ srow +"]/iphs_insukind") == "71") { messageBox("ÀÓ»óȯÀÚ ÀÔ´Ï´Ù. ¼ö³³½Ã ÀÓ»ó¹Ì¼ö·Î »ý¼ºÇϽʽÿÀ.", "I999"); } */ copyNodeType("/root/main/admi_info/admi","/root/hidden/admi_info/admi","replace"); if (srcptkind == "1") { copyNodeType("/root/main/admi_info/admietc","/root/hidden/admi_info/admietc","replace"); grd_bloodspec.rebuild(); } //[2012.03.30 À̼º¿õ Ãß°¡] °¡Åð¿ø ¼ö³³À̳ª °¡Åð¿ø Ãë¼Ò °èÁ¤ÀÏ °æ¿ì, »çÀ¯¸¦ ÅøÆÁÀ¸·Î º¸¿©ÁÜ for(var i = 1; i < grd_rcptamt.rows; i++) { grd_rcptamt.tooltipText(i, grd_rcptamt.colRef("rcptflag") ) = grd_rcptamt.valueMatrix(i, grd_rcptamt.colRef("keepresn")); } grd_rcptamt.rebuild(); var scount = getNodesetCount("/root/main/admi_info/admi/grdclamrcpt"); var schk = model.getValue("/root/hidden/dcrcptkind"); if (schk != "0") { for( i =1; i <= scount; i++) { var srcptstat = model.getValue("/root/main/admi_info/admi/grdclamrcpt["+ i +"]/rcptstat"); if (srcptstat == "Y") { grd_rcptamt.rowHidden(i) = false; } else { grd_rcptamt.rowHidden(i) = true; } } } if (model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ grd_inpatinfo.row +"]/iphs_insukind") == "71") { messageBox("ÀÓ»óȯÀÚ ÀÔ´Ï´Ù. ¼ö³³½Ã ÀÓ»ó¹Ì¼ö·Î »ý¼ºÇϽʽÿÀ.", "I999"); } } //Àç¿øÀ¯Çü Á¤º¸Á¶È¸ function fIphs_Info() { /* model.resetInstanceNode("/root/send/data1"); model.makeValue("/root/send/data1/pid" , model.getValue("/root/main/inpt_info/inptpatinfo/inpt_pid")); model.makeValue("/root/send/data1/cretno" , model.getValue("/root/main/inpt_info/inptpatinfo/inpt_cretno")); model.makeValue("/root/send/data1/indd" , model.getValue("/root/main/inpt_info/inptpatinfo/inpt_indd")); model.makeValue("/root/send/data1/orddeptcd" , model.getValue("/root/main/inpt_info/inptpatinfo/inpt_orddeptcd")); model.makeValue("/root/send/data1/dschdclrtyn", model.getValue("/root/main/inpt_info/inptpatinfo/inpt_dschdclrtyn")); model.makeValue("/root/send/data1/dschdclrdt" , model.getValue("/root/main/inpt_info/inptpatinfo/inpt_dschdclrdt").substr(0, 8)); model.makeValue("/root/send/data1/dschnotiyn" , model.getValue("/root/main/inpt_info/inptpatinfo/inpt_dschnotiyn")); model.makeValue("/root/send/data1/dschnotidt" , model.getValue("/root/main/inpt_info/inptpatinfo/inpt_dschnotidt").substr(0, 8)); model.makeValue("/root/send/data1/dschdd" , model.getValue("/root/main/inpt_info/inptpatinfo/inpt_dschdd")); model.resetInstanceNode("/root/main/iphs_info/h_opspec/opspec"); submit("TRPAI00102"); //Àç¿øÁ¤º¸ Á¶È¸ //¼ö¼ú³»¿ª // Àç¿øÀ¯Çü °Ç¼ö Ç¥½Ã // ÇÕÄ¡±â ÀÌÀüÀÇ À¯Çü°Ç¼ö¸¦ Ç¥½ÃÇÔ 2011/04/22 Á¶Áß·¡ var scount = model.getValue("/root/main/iphs_info/h_iphscnt/iphscnt/count"); if (scount <= 0) { messageBox("ȯÀÚÀÇ Àç¿øÁ¤º¸¸¦ °¡Á® ¿Ã ¼ö", "I004"); fInitialize("all"); return; } if (scount >= 1) { cpt_iphs.text = "Àç¿øÀ¯Çü [ "+ scount +" ]°Ç"; } else { cpt_iphs.text = ""; } if (model.getValue("/root/main/inpt_info/inptpatinfo/inpt_brateflag") == "O") { cpt_amtflag.text = "[¿Ü·¡¿äÀ²È¯ÀÚ]"; } else { cpt_amtflag.text = ""; } scount = getNodesetCount("/root/main/iphs_info/h_grdipatinfo/grdipatinfo"); for( i =1; i <= scount; i++) { var rcptyn = model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ i +"]/iphs_rcptyn"); if (rcptyn == "Y") { grd_inpatinfo.rowStyle(i,"data","color") = "#0000FF";//"#ff6600" } else { grd_inpatinfo.rowStyle(i,"data","color") = "#000000"; } if (model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ i +"]/iphs_handicaprbookpossnyn") == "Y") { grd_inpatinfo.cellStyle("color", i, grd_inpatinfo.colref("iphs_handicaprbookpossnyn")) = "#ff0000"; } if (model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ i +"]/iphs_rareobstflag") == "H") { grd_inpatinfo.cellStyle("color", i, grd_inpatinfo.colref("iphs_rareobstflag")) = "#ff0000"; } } var sopcount = getNodesetCount("/root/main/iphs_info/h_opspec/opspec"); if (sopcount >= 2) { btn_opspec.attribute("class") = "btn5_letter2"; btn_opspec.attribute("color") = "#ff0066"; } else { btn_opspec.attribute("class") = "btn2_letter2"; } //Åð¿øÂü°í»çÇ×ÀÌ ÀÖÀ» °æ¿ì ¹öư º¯°æ var sdschmemo = trim(model.getValue("/root/main/inpt_info/inptpatinfo/inpt_dscharngmnmemo")); if (sdschmemo == "" || sdschmemo == "-") { btn_dscharngmnmemo.attribute("class") = "btn2_letter6"; } else { btn_dscharngmnmemo.attribute("class") = "btn5_letter6"; btn_dscharngmnmemo.attribute("color") = "#ff0066"; } */ // Àç¿øÀ¯Çü °Ç¼ö Ç¥½Ã // ÇÕÄ¡±â ÀÌÀüÀÇ À¯Çü°Ç¼ö¸¦ Ç¥½ÃÇÔ 2011/04/22 Á¶Áß·¡ var scount = model.getValue("/root/main/iphs_info/h_iphscnt/iphscnt/count"); if (scount <= 0) { messageBox("ȯÀÚÀÇ Àç¿øÁ¤º¸¸¦ °¡Á® ¿Ã ¼ö", "I004"); fInitialize("all"); return; } if (scount >= 1) { cpt_iphs.text = "Àç¿øÀ¯Çü [ "+ scount +" ]°Ç"; } else { cpt_iphs.text = ""; } if (model.getValue("/root/main/inpt_info/inptpatinfo/inpt_brateflag") == "O") { cpt_amtflag.text = "[¿Ü·¡¿äÀ²È¯ÀÚ]"; } else { cpt_amtflag.text = ""; } if (model.getValue("/root/main/inpt_info/inptpatinfo/inpt_specordtype") != "-") { var msg = "KTAS-" + model.getValue("/root/main/inpt_info/inptpatinfo/inpt_specordtype") // ÀÀ±Þ½Ç Á¢Åðó¸® Ç¥½Ã if (model.getValue("/root/main/inpt_info/inptpatinfo/inpt_etcordflag") == "X") { msg = msg + " Á¢Åð"; } cap_ktas.text = "[" + msg + "]"; // KTAS µî±Þº° »ö±òÁöÁ¤ 1, 2, 3 : »¡°­ / ±×¿Ü : ÆÄ¶û if (model.getValue("/root/main/inpt_info/inptpatinfo/inpt_specordtype") == "1" || model.getValue("/root/main/inpt_info/inptpatinfo/inpt_specordtype") == "2" || model.getValue("/root/main/inpt_info/inptpatinfo/inpt_specordtype") == "3") { cap_ktas.attribute("color") = "#ff0066"; } else { cap_ktas.attribute("color") = "#6600ff"; } } else { cap_ktas.text = ""; } scount = getNodesetCount("/root/main/iphs_info/h_grdipatinfo/grdipatinfo"); // DRGÁ¤º¸ reset model.setValue("/root/hidden/drginfo/drgno", ""); model.setValue("/root/hidden/drginfo/rowno", ""); for(var i =1; i <= scount; i++) { var rcptyn = model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ i +"]/iphs_rcptyn"); if (rcptyn == "Y") { grd_inpatinfo.rowStyle(i,"data","color") = "#0000FF";//"#ff6600" } else { grd_inpatinfo.rowStyle(i,"data","color") = "#000000"; } if (model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ i +"]/iphs_handicaprbookpossnyn") == "Y") { grd_inpatinfo.cellStyle("color", i, grd_inpatinfo.colref("iphs_handicaprbookpossnyn")) = "#ff0000"; } if (model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ i +"]/iphs_rareobstflag") == "H" || model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ i +"]/iphs_rareobstflag") == "L") { grd_inpatinfo.cellStyle("color", i, grd_inpatinfo.colref("iphs_rareobstflag")) = "#ff0000"; } // DRGÁ¤º¸ Ãß°¡ by Á¶Áß·¡ 20130403 // iphs¿¡ DRGÁ¤º¸°¡ º¹¼ö°³ Á¸ÀçÇÏ´Â °æ¿ì, Á¦ÀÏ Ã¹¹øÂ° Á¤º¸¸¦ ¼¼ÆÃÇÑ´Ù. if (model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ i +"]/iphs_drgno") != "" && model.getValue("/root/hidden/drginfo/drgno") == "") { model.setValue("/root/hidden/drginfo/drgno", model.getValue("/root/main/iphs_info/h_grdipatinfo/grdipatinfo["+ i +"]/iphs_drgno")); model.setValue("/root/hidden/drginfo/rowno", i); } else { model.setValue("/root/hidden/drginfo/drgno", ""); model.setValue("/root/hidden/drginfo/rowno", ""); } } var sopcount = getNodesetCount("/root/main/iphs_info/h_opspec/opspec"); if (sopcount >= 2) { btn_opspec.attribute("class") = "btn5_letter2"; btn_opspec.attribute("color") = "#ff0066"; } else { btn_opspec.attribute("class") = "btn2_letter2"; } //Åð¿øÂü°í»çÇ×ÀÌ ÀÖÀ» °æ¿ì ¹öư º¯°æ var sdschmemo = trim(model.getValue("/root/main/inpt_info/inptpatinfo/inpt_dscharngmnmemo")); if (sdschmemo == "" || sdschmemo == "-") { btn_dscharngmnmemo.attribute("class") = "btn2_letter4"; } else { btn_dscharngmnmemo.attribute("class") = "btn5_letter4"; btn_dscharngmnmemo.attribute("color") = "#ff0066"; } } //»ç¸ÁȯÀÚÀÏ °æ¿ì ¿Ü·¡Á¢¼ö³»¿ªÁ¶È¸ - ¼øÃµÇâ¹öÀü °æºÏ´ë »ç¿ë¾ÈÇÔ function fDethordlist() { //[2012.03.20 À̼º¿õ Ãß°¡]»ç¸ÁȯÀÚÀÏ °æ¿ì, ¿Ü·¡Á¢¼ö³»¿ª, °Ë»ç¿¹¾à³»¿ª, ¹Ì½ÃÇàó¹æÀ» º¸¿©ÁØ´Ù. /* if(model.getValue("/root/main/inpt_info/inptpatinfo/inpt_dethyn") == "Y"){//»ç¸ÁȯÀÚ var dschdclrdt = model.getValue("/root/main/inpt_info/inptpatinfo/inpt_dschdclrdt"); model.setValue("/root/send/dschdclrdt", dschdclrdt); submit("TRPAI05008"); //[2012.03.21 À̼º¿õ ¼öÁ¤]³»¿ªÀÌ Á¸ÀçÇÒ¶§¸¸ »ç¸Á³»¿ª ÅÇÀ» Ȱ¼ºÈ­ if(grd_dethordlist.rows > 1){ button60.visible = true; }else{ button60.visible = false; } }else{ button60.visible = false; } */ if(model.getValue("/root/main/inpt_info/inptpatinfo/inpt_dethyn") == "Y"){//»ç¸ÁȯÀÚ //[2012.03.21 À̼º¿õ ¼öÁ¤]³»¿ªÀÌ Á¸ÀçÇÒ¶§¸¸ »ç¸Á³»¿ª ÅÇÀ» Ȱ¼ºÈ­ if(getNodesetCount("/root/temp6/deathinfo/deathlist/orddd") > 0){ button60.visible = true; }else{ button60.visible = false; } }else{ button60.visible = false; } } //°Ë»ç¿¹¾à³»¿ª - ¼øÃµÇâ¹öÀü °æºÏ´ë »ç¿ë¾ÈÇÔ function fTestRsrv(){ //[2012.03.21 À̼º¿õ ¼öÁ¤]ȯÀÚ Á¶È¸ ½Ã ȯÀÚ Åð¿ø ÈÄ, °Ë»ç¿¹¾à³»¿ª ¹× Á¦Áõ¸í ³»¿ª Á¸Àç ½Ã ¹öư color º¯°æ /* var pid = model.getValue("/root/send/data1/pid"); var dschdclrdt = model.getValue("/root/main/inpt_info/inptpatinfo/inpt_dschdclrdt"); model.setValue("/root/temp5/pid", pid); model.setValue("/root/temp5/dschdclrdt", dschdclrdt); submit("TRPAI05009");//°Ë»ç¿¹¾à³»¿ª if(getNodesetCount("/root/temp7/testrsrvinfo/testrsrvlist") > 0){ button59.attribute("class") = "btn5_letter4"; button59.attribute("color") = "#ff0066"; }else{ button59.attribute("class") = "btn2_letter4"; } */ if(getNodesetCount("/root/temp7/testrsrvinfo/testrsrvlist/rsrvdt") > 0){ button59.attribute("class") = "btn5_letter4"; button59.attribute("color") = "#ff0066"; }else{ button59.attribute("class") = "btn2_letter4"; } } //Á¦Áõ¸í³»¿ª - ¼øÃµÇâ¹öÀü °æºÏ´ë »ç¿ë¾ÈÇÔ function fProfCert(){ /* submit("TRPAI05010"); if(getNodesetCount("/root/temp8/profcertinfo/profcertlist") > 0){ button57.attribute("class") = "btn5_letter5"; button57.attribute("color") = "#ff0066"; }else{ button57.attribute("class") = "btn2_letter5"; } */ if(getNodesetCount("/root/temp8/profcertinfo/profcertlist/issdt") > 0){ button57.attribute("class") = "btn5_letter5"; button57.attribute("color") = "#ff0066"; }else{ button57.attribute("class") = "btn2_letter5"; } } // iphs´ÜÀ§·Î ÀÇ»ç ÈÞÁøÀÏÁ¤ °ËÁõ½Ç½Ã function fGetDrHoliInfo(rcptyn) { model.makeValue("/root/send/data1/pid", model.getValue("/root/main/inpt_info/inptpatinfo/inpt_pid")); //ȯÀÚ¹øÈ£ model.makeValue("/root/send/data1/indd", model.getValue("/root/main/inpt_info/inptpatinfo/inpt_indd")); //ÀÔ¿øÀÏÀÚ model.makeValue("/root/send/data1/cretno", model.getValue("/root/main/inpt_info/inptpatinfo/inpt_cretno")); //»ý¼º¹øÈ£ // ¼ö³³½Ã´Â Á¶È¸ ½ºÅµ if (rcptyn != "Y") { submit("TRPAI00139"); } var holiMsg = ""; for(var i=0; i<=getNodesetCount("/root/hidden/drholilist/drholilist"); i++) { if (model.getValue("/root/hidden/drholilist/drholilist[" + i + "]/holimsg") != null && model.getValue("/root/hidden/drholilist/drholilist[" + i + "]/holimsg") != "") { holiMsg += "\r\n" + model.getValue("/root/hidden/drholilist/drholilist[" + i + "]/holimsg"); } } if (holiMsg != null && holiMsg != "") { holiMsg = "ÁÖÄ¡ÀÇ ÈÞÁøÁ¤º¸°¡ Á¸ÀçÇÕ´Ï´Ù. \r\n´ÙÀ½ÀÇ ÈÞÁøÁ¤º¸¸¦ Âü°íÇÏ¿© Àç¿øº¯°æÃ³¸®ÇϽʽÿä.\r\nÈÞÁøÁ¤º¸°¡ Á¸ÀçÇÏ´Â °æ¿ì Åð¿ø¼ö³³ ºÒ°¡´ÉÇÕ´Ï´Ù. \r\n" + holiMsg; alert(holiMsg); } // ¼ö³³ ½Ã ºí·¯Å·Ã³¸® if (rcptyn == "Y") { return false; } else { return true; } } function fGetPatName() { // 0. ÀÔ¿ø¾àÁ¤¼­ Ãâ·Â var ivrObjt = document.all("ivr_agmt"); if (ivrObjt == null) { body.createChild("xforms:iviewer", "id:ivr_agmt; src:../../../pam/ipatmngtweb/xrw/SPPMI03200_ÀÔ¿ø¾àÁ¤¼­°ü¸®.xrw"); ivrObjt = document.all("ivr_agmt"); } var retMsg = ivrObjt.window.javascript.fReqGetInAgmtCount( model.getValue("/root/main/inpt_info/inptpatinfo/inpt_pid"), model.getValue("/root/main/inpt_info/inptpatinfo/inpt_indd"), model.getValue("/root/main/inpt_info/inptpatinfo/inpt_agmttype") ); // 1. ÇØ´ç ÀÔ¿ø¿¡ ´ëÇÑ ¾àÁ¤¼­°¡ Á¸ÀçÇÏÁö ¾Ê´Â °æ¿ì ¾àÁ¤¼­ ÀÚµ¿Ãâ·Â // 2. ȯÀÚ°¡ ÀÔ¿ø¾àÁ¤¼­¸¦ ÁöÂüÇÏÁö ¾ÊÀº °æ¿ì ÀÔ¿ø¾àÁ¤¼­ °ü¸®È­¸é¿¡¼­ ÀçÃâ·Â if (retMsg != true) { // ÀüÀÚµ¿ÀǼ­ Á¦¾î·ÎÁ÷ Ãß°¡ by Á¶Áß·¡ 20130314 if (model.getValue("/root/init/PAM/PK018list/PK018[cdid='" + app.clientIp + "']/cdnm") == "Y") { // ÀÔ¿øÁ¤º¸ ¼³Á¤ model.makeValue("/root/main/ininfo/orddeptnm", model.getValue("/root/hidden/init/wardcd[cd=2280200000]/nm")); model.makeValue("/root/main/ininfo/roomcd", model.getValue("/root/hidden/erroomcd")); model.makeValue("/root/main/ininfo/bedcnt", 0); model.makeValue("/root/main/ininfo/insukind", model.getValue("/root/main/inpt_info/inptpatinfo/inpt_insukind")); // ÀüÀÚµ¿ÀǼ­ ÆÄ¶ó¹ÌÅÍ ¼³Á¤ setParameter("SSMRC03160_param_instcd", getUserInfo("dutplceinstcd")); setParameter("SSMRC03160_param_patid", model.getValue("/root/main/inpt_info/inptpatinfo/inpt_pid")); setParameter("SSMRC03160_param_indate", model.getValue("/root/main/inpt_info/inptpatinfo/inpt_indd")); setParameter("SSMRC03160_param_cretno", model.getValue("/root/main/inpt_info/inptpatinfo/inpt_cretno")); setParameter("SSMRC03160_param_class", "I"); setParameter("SSMRC03160_param_docucd", model.getValue("/root/init/prncd/hardcd[cdseqno='5']/hardcd")); // 1300013648 ÀϹݾàÁ¤¼­ setParameter("SSMRC03160_param_flag", "A"); // S : ¼±ÅÃÁø·á½Åû¼­, A : ÀÔ¿ø¾àÁ¤¼­, T : ±â°£¾àÁ¤¼­ setParameter("SSMRC03160_param_cuser", getUserInfo("userid")); model.makeValue("/root/main/ininfo/fromdd", model.getValue("/root/main/inpt_info/inptpatinfo/inpt_indd")); model.makeValue("/root/main/ininfo/todd", model.getValue("/root/main/inpt_info/inptpatinfo/inpt_indd")); model.makeValue("/root/main/ininfo/agmttype", "1"); // 1:ÀϹݾàÁ¤¼­ // ´ã´çÀÚ ¿¬¶ôó ¼³Á¤ // Ä¡°úº´¿ø ¹ýÀÎÈ­ °ü·Ã 033 Ãß°¡ by Á¶Áß·¡ 20151123 if (getUserInfo("dutplceinstcd") == '031') { model.makeValue("/root/main/ininfo/officetelno", "053-200-5061"); } else if (getUserInfo("dutplceinstcd") == '032') { model.makeValue("/root/main/ininfo/officetelno", "053-200-2073"); } else if (getUserInfo("dutplceinstcd") == '033') { model.makeValue("/root/main/ininfo/officetelno", "053-200-5061"); } else { model.makeValue("/root/main/ininfo/officetelno", ""); } // ÀüÀÚµ¿ÀǼ­ ÆË¾÷ È£Ãâ modal("SSMRC03160"); } else { ivrObjt.window.javascript.fPrintAgmt( model.getValue("/root/main/inpt_info/inptpatinfo/inpt_pid"), model.getValue("/root/main/inpt_info/inptpatinfo/inpt_indd"), model.getValue("/root/main/inpt_info/inptpatinfo/inpt_orddeptcd"), model.getValue("/root/main/inpt_info/inptpatinfo/inpt_medispclid"), model.getValue("/root/main/inpt_info/inptpatinfo/inpt_agmttype"), "N", "", "", model.getValue("/root/main/inpt_info/inptpatinfo/inpt_insukind"), "", model.getValue("/root/main/inpt_info/inptpatinfo/inpt_cretno") ); } } // 1. ȯÀÚÆÈÂî Ãâ·Â var sPrintYN = model.getValue("/root/init/PAM/P0041list/P0041[cdid = 'E03']/cdnm"); // ¹ÙÄÚµåÃâ·Â¿©ºÎ if (sPrintYN == "Y") { pmifPrintBarCode(model.getValue("/root/main/inpt_info/inptpatinfo/inpt_pid"), model.getValue("/root/main/inpt_info/inptpatinfo/inpt_indd"), model.getValue("/root/main/inpt_info/inptpatinfo/inpt_cretno"), model.getValue("/root/main/inpt_info/inptpatinfo/inpt_mskind"), "Y", "Y", "SMPAI00100", "", "", "", "Y"); } // 2. ȯÀÚ À̸§Ç¥ Ãâ·Â : ȯÀÚ À̸§Ç¥´Â °£È£¿¡¼­ Àü½Ç¿Ï·á½ÃÁ¡¿¡ Ãâ·ÂÇϱâ·Î ÇùÀÇ(with ±èÁö¼±¼±»ý´Ô 20140117) // model.makeValue("/root/send/patnameinfo/pid" , model.getValue("/root/main/inpt_info/inptpatinfo/inpt_pid")); // model.makeValue("/root/send/patnameinfo/wardcd", "ERBD"); // // model.makeNode("/root/main_nm/temp2"); // // // Ãâ·ÂÁ¤º¸ Á¶È¸ // submit("TRMNE00110"); // // // À̸§Ç¥ Á¶È¸°á°ú°¡ Á¸ÀçÇÏ´Â °æ¿ì¿¡¸¸ Ãâ·Â // if (model.getValue("/root/main_nm/temp2/patnamelist/pid") != null // && model.getValue("/root/main_nm/temp2/patnamelist/pid") != "") { // // model.makeNode("/root/send/temp2"); // model.makeNode("/root/send/temp2/patnamelist"); // model.copyNode("/root/send/temp2/patnamelist", "/root/main_nm/temp2/patnamelist"); // // // // // ¼Ò¹æ¾ÈÀü ±¸ºÐ Ãß°¡ by Á¶Áß·¡ 2012/04/09 // model.makeValue("/root/send/temp2/patnamelist/method", "Foot"); // // //°øÅëÄÚµå P0045¿¡¼­ ÇÁ¸°ÅÍ ¸íΰú Æ®·¹ÀÌ È£Ãâ - ÀÔ¿øÈ¯ÀÚÆÈÂî ÇÁ¸°ÅÍ // fGetPrintName(); // var print_name = getGlobalVariable("SPPAO00100_P0045_10_nm","p"); // var print_tray = getGlobalVariable("SPPAO00100_P0045_10_tray","p"); // //È£Ãⳡ // // if(print_name != "false"){ // exeReportPreview("RPMNE00110", "XMLSTR" , "" , "" , print_name , "", "", "", "", "true", "", "", print_tray); // } // // model.removeNodeset("/root/send/temp2"); // model.removeNodeset("/root/main_nm/temp2"); // } }