/* --------------------------------------------------------------------- DSC MAIN µî·Ï (SMMNP06000.xfm - JScript ) - Version : 1) : Ver.1.00.01 : Create By Francis Choi : 2015.05.02 ---------------------------------------------------------------------- */ // -------------------------------------------------- // È­¸é Loading½Ã ó¸®ÇÏ´Â ÇÔ¼ö // -------------------------------------------------- function fInitScreen() { ipt_opcnfmdd.value = getCurrentDate(); var instcd = getUserInfo("dutplceinstcd"); var standard_yn = "orduseyn"; var ord_deptflag = 'D'; var rslt_ref = "/root/main/cond/orddeptlist"; fGetNursHardCdInfo("'049'", ipt_opcnfmdd.value); if(getNodesetCnt(model, "/root/code/codeinfo/codelist/cdid") < 1 ){ messageBox("ºÎ¼­ ¼¼ÆÃ ±âÁØÀڷḦ È®ÀÎÇϽñ⠹ٶø´Ï´Ù.", "I000"); return; } model.setValue("/root/main/cond/prestimportid", getScreenMenuParameter()); // tab ±âº»°ª (DSC Main) model.setValue("/root/main/cond/wardcd", model.getValue("/root/code/codeinfo/codelist/cdid")); //model.setValue("/root/main/cond/wardcd", "2360800000"); // Åë¿ø¼ö¼ú¼¾ÅÍ setting model.toggle("case_dm"); zbcfGetDeptCodeList(instcd, standard_yn, ord_deptflag, rslt_ref); //20101214_KNUH_Start Áø·á°ú¿¡ ÀüüÃß°¡ ¹× ¹Ù·Î¼±Åà addComboItem( "cmb_orddeptlist", "Àü ü", "", ""); cmb_orddeptlist.select(0); //20101214_KNUH_End zbcfGetCodeList(new Array("M0065", "M0020"), new Array("/root/init/M0065list","/root/init/M0020list")); //¼ö¼úȯÀÚÀÇ ÇöÀç À§Ä¡ Àå¼Ò¿¡ ´ëÇÑ Á¾·ù model.removenode("/root/send"); model.makeNode("/root/send"); model.makeValue("/root/send/opcnfmdd" ,ipt_opcnfmdd.value ); submit("TRMNP06001"); // cmb_orddeptlist.refresh(); fInqurySelectedPrgm(); // ¿ÀÇ½à ¼ö¼úÈ®Á¤¸®½ºÆ® Á¶È¸ grd_dscList.frozenCols = grd_dscList.colRef("opstatcd"); // ¹ÙÄÚµåOCX »ý¼º //lzzfMakeBrcdPrntObjHanDo(Object¸í); lzzfMakeBrcdPrntObjHanDo("CommAX"); } // -------------------------------------------------- // Á¶È¸ Ŭ¸¯½Ã ÅÇ»óŰª¿¡ µû¸¥ Á¶È¸ // -------------------------------------------------- function fInqurySelectedPrgm() { switch(model.getValue("/root/main/cond/prestimportid")) { case "om": // Order Manage È£Ãâ btn_om.selected = true; cap_color.visible = true; cap_uncnfm.visible = true; cap_prcp.visible = true; //cap_color.attribute("left") = "15px"; //cap_uncnfm.attribute("left") = "35px"; //cap_prcp.attribute("left") = "120px"; //cap_prcp.attribute("color") = "#0000ff"; fnOrderManageParam(); //(20080417) //model.setValue("/root/main/cond/orddd", model.getValue("/root/main/cond/opcnfmdd")); // ¾÷¹«ÀÏÀÚ(20080417) model.toggle("case_om"); //Order Manage fGetOMPatList("dsc"); break; case "prn": //Order ManageÀÇ Prn ó¹æÀ» Direct È£Ãâ btn_om.selected = true; cap_color.visible = false; cap_uncnfm.visible = false; cap_prcp.visible = true; cap_ser.visible = false; cap_prcp.attribute("left") = "698px"; cap_prcp.attribute("color") = "#000000"; fnOrderManageParam(); //(20080417) //model.setValue("/root/main/cond/orddd", model.getValue("/root/main/cond/opcnfmdd")); // ¾÷¹«ÀÏÀÚ(20080417) model.toggle("case_om"); //Order Manage fSetPrnMode(); fGetOMPatList("dsc"); break; case "rp" : if( eval(grd_dscList.row) < 1 ) { messageBox("ȯÀÚ¸¦ ¼±ÅÃÇÏ¼Å¾ß ÇÕ´Ï´Ù.!", "E000"); model.setValue("/root/main/cond/prestimportid", "dm"); fInqurySelectedPrgm(); return; } btn_rp.selected = false;//¿¹¾àó¹æÀü¼Û¹öưȰ¼ºÈ­ sha_state.visible = false;//ÇÁ·ÎÅäÄݸÞÀΠȯÀÚ»óÅ ĸ¼Ç cap_state.visible = false;//ÇÁ·ÎÅäÄݸÞÀΠȯÀÚ»óÅ ĸ¼Ç cap_color.visible = false;//¹ÌÈ®ÀÎÄ÷¯ ĸ¼Ç cap_uncnfm.visible = false;//¹ÌÈ®ÀΠĸ¼Ç cap_prcp.visible = false;//ÀϹÝ/¹Ýȯ/Åð¿ø Ä¸¼Ç //caption7.visible = false;//Àü½Ç½ÂÀÎĸ¼Ç //tar_chngroomaprv.visible = false;//Àü½Ç½ÂÀÎÅØ½ºÆ®¾Ö¸®¾î model.refresh(); var pid = model.getValue('/root/main/dsc/dscList[' + grd_dscList.row + ']/pid'); var indd = model.getValue('/root/main/dsc/dscList[' + grd_dscList.row + ']/indd'); var cretno = model.getValue('/root/main/dsc/dscList[' + grd_dscList.row + ']/cretno'); var ordtype = model.getValue('/root/main/dsc/dscList[' + grd_dscList.row + ']/iocls'); var medispclid = model.getValue('/root/main/dsc/dscList[' + grd_dscList.row + ']/chngmedispclid'); var roomcd = model.getValue('/root/main/dsc/dscList[' + grd_dscList.row + ']/roomcd'); var sexage = model.getValue('/root/main/dsc/dscList[' + grd_dscList.row + ']/sexage'); var hngnm = model.getValue('/root/main/dsc/dscList[' + grd_dscList.row + ']/hngnm'); if(indd == null || indd == ''){ indd = getCurrentDate(); } model.toggle("case_rp"); fGetRsrvPrcpChemo(pid, indd, cretno, ordtype, medispclid, roomcd, sexage, hngnm); break; default: btn_dm.selected = true; sha_state.visible = true;//ÇÁ·ÎÅäÄݸÞÀΠȯÀÚ»óÅ ĸ¼Ç cap_state.visible = true;//ÇÁ·ÎÅäÄݸÞÀΠȯÀÚ»óÅ ĸ¼Ç cap_color.visible = false; cap_uncnfm.visible = false; cap_prcp.visible = false; model.toggle("case_dm"); //DSC Main fDscDataRead(); break; } } /* --------------------------------------------------*/ /* type : function */ /* access : public */ /* desc : order manage tabŬ¸¯½Ã Ãß°¡Á¤º¸ ³Ñ±è */ /* param : ±â°üÄÚµå */ /* return : */ /* --------------------------------------------------*/ function fnOrderManageParam() { //(20080417) var pGrd = grd_dscList; var opcnfmdd = ""; var statflag1 = ""; var statflag2 = ""; var sPath = "/root/main/cond"; // ¾÷¹«ÀÏÀÚ opcnfmdd = model.getValue(sPath + "/opcnfmdd"); model.setValue( sPath + "/orddd", opcnfmdd ); /* //Àç¿øÁ¤º¸ statflag1 = model.getValue( "/root/main/dsc/dscList["+pGrd.row+"]/INDSCHSTAT") if (statflag1 = "¨Ð" ) statflag2 = "3"; //Åð¿ø¿¹°í if (statflag1 = "Åð¿ø" ) statflag2 = "4"; //Åð¿ø if (statflag2 != "") model.setValue( sPath + "/indschacptstat", statflag2); */ } /* --------------------------------------------------*/ /* type : function */ /* access : public */ /* desc : DSC MainÀ» Á¶È¸ */ /* param : ±â°üÄÚµå */ /* return : */ /* --------------------------------------------------*/ function fDscDataRead() { //20080917 grd_dscList.row = 0; fMsgDisp();//¸Þ¼¼Áö Áö¿ì±â model.removenode("/root/send"); model.removeNodeset("/root/main/dsc"); //model.makeValue("/root/send/opdeptcd" , cmb_opdeptcd.value ); // ¼öÇàºÎ¼­ model.makeValue("/root/send/opcnfmdd" , ipt_opcnfmdd.value ); model.makeValue("/root/send/dscflag" , rdo_dscflag.value ); // ¼ö¼úȯÀÚ±¸ºÐÄÚµå model.makeValue("/root/send/opflag" , rdo_opflag.value ); // ¼ö¼úÁøÇà model.makeValue("/root/send/opflagex" , chk_opflagex.value ); // Ãë¼ÒÁ¦¿Ü model.makeValue("/root/send/orddeptcd" , cmb_orddeptlist.value); // Áø·á°ú model.makeValue("/root/send/drcd" , cmb_drcd.value ); // ÁýµµÀÇ model.makeValue("/root/send/oproomcd" , cmb_oproomcd.value ); model.makeValue("/root/send/pid" , ipt_pid.value ); if(submit("TRMNP06003")){ var opstatcd ; var medipostyn; //var brateflag = ""; for(var i = 1; i < grd_dscList.rows; i++){ grd_dscList.removeStatus(i, "update"); //20080917 ¼ö¼úÃë¼ÒȯÀÚ ºÓÀº»öÀ¸·Î Ç¥½Ã opstatcd = model.getValue('/root/main/dsc/dscList[' + i + ']/opstatcd' ); medipostyn = model.getValue('/root/main/dsc/dscList[' + i + ']/medipostyn' ); if(opstatcd == '29'){ grd_dscList.cellStyle("color", i, grd_dscList.colRef("careinrmdd"), i, grd_dscList.colRef("oprccount")) = "#FF0000"; }else{ grd_dscList.cellStyle("color", i, grd_dscList.colRef("careinrmdd"), i, grd_dscList.colRef("oprccount")) = "#000000"; } if(medipostyn == "Y") { grd_dscList.cellstyle("background-color", i, 1, i, grd_dscList.cols-1) ="#ffff00"; } else { grd_dscList.cellstyle("background-color", i, 1, i, grd_dscList.cols-1) ="#FFFFF8"; } /*brateflag = model.getValue('/root/main/dsc/dscList[' + i + ']/brateflag' ); if (brateflag == "O") { model.removenode("/root/send/judinfo"); model.makeValue("/root/send/judinfo/pid", model.getValue('/root/main/dsc/dscList[' + i + ']/pid')); model.makeValue("/root/send/judinfo/indd", model.getValue('/root/main/dsc/dscList[' + i + ']/indd')); model.makeValue("/root/send/judinfo/cretno", model.getValue('/root/main/dsc/dscList[' + i + ']/cretno')); submit(""); }*/ } model.removeNodeset("/root/main/MmohiprcLists/CureList"); model.removeNodeset("/root/main/MmohiprcLists/CartList"); grd_dscList.refresh(); grd_otptlist.refresh(); grd_cartlist.refresh(); fInputNo(); }else{ messageBox("dscȯÀÚÁ¶È¸¸¦ ½ÇÆÐÇÏ¿´½À´Ï´Ù.", "E"); return; } } //-------------------- //(20080129) //-------------------- // °£È£Åð¿øÈ®Á¤ÀÌÈÄ´Â ÀԽǽð£/Åð½Ç½Ã°£º¯°æ ºÒ°¡·Î 󸮿¹Á¤ function fInputNo() { //----------------------------------------------- //¼±ÅúҰ¡·Î º¯°æ //----------------------------------------------- var pGrd = grd_dscList; if (pGrd.rows <= 1 ) return; //ÀüºÎ ¼öÁ¤ºÒ°¡ pGrd.isReadOnly(1,pGrd.colRef("careinrmdd"),pGrd.rows-1,pGrd.colRef("careinrmdd"))= true; for (var row=1;row= gridObj.fixedrows){ window.setPopupMenu(true, menuPath, "name", "func", false); }else{ window.setPopupMenu(false); } } } // -------------------------------------------------- // ȯÀÚÀ̸§Ç¥Ãâ·Â // -------------------------------------------------- function fOpenNamePrint(){ var pRow = grd_dscList.row; var sPath = "/root/main/dsc/dscList["+pRow+"]"; var calcdd = model.getValue(sPath+"/careinrmdd"); var grdStat = grd_dscList.rowStatus(grd_dscList.row); if(calcdd == '--' || (calcdd != '--' && grdStat != 0)){//ÀԽǽð¢ÀÌ ÀԷµÇÁö ¾Ê¾Ò°Å³ª ÀԽǽð¢À» ÀÔ·ÂÇßÀ¸³ª ÀúÀåÇÏÁö ¾ÊÀº»óÅ messageBox('ÀԽǽð¢Àû¿ë ÈÄ È¯ÀÚÀ̸§Ç¥Ãâ·ÂÀÌ °¡´ÉÇÕ´Ï´Ù.', 'E999'); return; } var dschdd = model.getValue(sPath+"/dschdd"); if(dschdd != '-'){ messageBox("ÀÌ¹Ì Åð½Çó¸®µÈ ȯÀÚÀÔ´Ï´Ù.", "E999", ""); return; } fGetPatName(); } //Á¤º¸È£Ãâ function fGetPatName() { var row = grd_dscList.row; if (row >= 1) { var pid = model.getValue("/root/main/dsc/dscList["+row+"]/pid"); var wardcd = model.getValue("/root/main/cond/wardcd"); model.removenode("/root/send"); model.makeValue("/root/send/patnameinfo/pid", pid); model.makeValue("/root/send/patnameinfo/wardcd", wardcd); submit("TRMNW00210"); model.removeNodeset("/root/send"); model.makeNode("/root/send/temp2"); model.makeNode("/root/send/temp2/patnamelist"); //alert(instance1.selectNodesXml("/root/main_nm/temp2/patnamelist")); model.copyNode("/root/send/temp2/patnamelist", "/root/temp2/patnamelist"); exeReportPreview("RPMNW00210", "XMLSTR" ); //¹Ì¸®º¸±âÃâ·Â //exeReportPreview("RPMNR06302", "XMLSTR", "/root/main/prtinfo", "", "true", "", "", "", "", "", "", "grp_report"); //¹Ì¸®º¸±â ¾øÀÌ Ãâ·Â } } // -------------------------------------------------- // ÀԽǽð¢ Àû¿ë(ȯÀÚÆÈÂîÃâ·Â) // -------------------------------------------------- function fSetIntime() { var pRow = grd_dscList.row; var sPath = "/root/main/dsc/dscList["+pRow+"]"; /* 20081004 ¼öÁ¤ var temp = model.getValue("/root/main/dsc/dscList[" + pRow + "]/indschstat"); if (false == finputCheck(temp)) { messageBox("Àç¿ø»óŸ¦ È®ÀÎÇϽʽÿÀ.", "E999", ""); return; } */ var dschdd = model.getValue("/root/main/dsc/dscList[" + pRow + "]/dschdd"); if(dschdd != '-'){ messageBox("ÀÌ¹Ì Åð½Çó¸®µÈ ȯÀÚÀÔ´Ï´Ù.", "E999", ""); return; } model.setValue(sPath+"/careinrmdd", getCurrentDate()+""+getCurrentTime().substring(0,4)); grd_dscList.addStatus(pRow, "update"); model.refresh(); fOpenPatBC(); } // -------------------------------------------------- // ÀúÀåÇÑ °£È£ÀԽǽð£À» Áö¿ì´Â °æ¿ì // ÀԽǽð¢ Ãë¼Ò // -------------------------------------------------- function fClsIntime() { var pRow = grd_dscList.row; var sPath = "/root/main/dsc/dscList["+pRow+"]"; var temp = model.getValue("/root/main/dsc/dscList[" + pRow + "]/indschstat"); if(temp != '') { messageBox("Àç¿ø»óŸ¦ È®ÀÎÇϽʽÿÀ.", "E999", ""); return; } if(model.getValue(sPath + "/pid") != "") { //¼±ÅÃµÈ È¯ÀÚ°¡ ÀÖ´Â °æ¿ì model.setValue(sPath + "/careinrmdd", ''); grd_dscList.addStatus(pRow, "update"); model.refresh(); } } // -------------------------------------------------- // ȯÀÚÆÈÂî ÀçÃâ·Â // -------------------------------------------------- function fOpenPatBC() { //20080117 Àû¿ëÅ×½ºÆ® //return; var pRow = grd_dscList.row; var sPath = "/root/main/dsc/dscList["+pRow+"]/"; //----------------(20071114:angioȯÀÚÁ¦¿Ü½ÃÅ´) //if (model.getValue(sPath +"oprsrvno") == "") { // messageBox("angioȯÀÚ´Â ÆÈÂîÃâ·ÂÀ» ", "E001"); // return; //} //----------------aa /* var barcdRef = "/root/main/barcdprntsetup/prntsetupinfo/setupinfo"; var sPrntKind = model.getValue(barcdRef + "[1]/prntkind"); var sSndMsg = ""; if (sPrntKind == 0) return; var sCommKind = model.getValue(barcdRef + "[1]/commkind"); */ //20080905 Ãß°¡ //portÁ¤º¸ °¡Á®¿À±â model.removenode('/root/send'); model.removenode('/root/main/barcdprntsetup'); model.makenode('/root/main/barcdprntsetup'); model.makeValue('/root/send/scrnid', 'SMMNP06000'); var comport = '1'; if(submit('TRLLC90101')){ comport = model.getValue('/root/main/barcdprntsetup/prntsetupinfo/setupinfo[1]/comm02/comm'); } // ¹ÙÄÚµå ¶óº§ È¯°æ¼³Á¤ lzzfMakeBrcdPrntObjHanDo("CommAX"); // ȯÀÚÁ¤º¸ »ó´ÜÀ¸·Î.. fSetPatInfo(); //¼³Á¤µÈ »ó´ÜÁ¤º¸¸¦ ºÒ·¯¿È model.makeNode("/root/main/paminfo"); var node = getGlobalVariable("paminfo"); setCSVToNode("/root/main/paminfo", node); var pid, indd, cretno, mskind, histstat; //patinfo Á¤º¸ ¼ÂÆÃ pid = model.getValue(sPath +"pid"); indd = model.getValue(sPath +"indd" ); cretno = model.getValue(sPath +"cretno"); mskind = model.getValue(sPath +"mskind"); histstat = model.getValue(sPath +"histstat"); // model.makeNode("/root/send/data17"); // model.makeNode("/root/hidden/h_receipt"); // model.makeNode("/root/hidden/h_receipt/receipt"); /* model.makeValue("/root/send/data17/pid",pid); model.makeValue("/root/send/data17/indd",indd); model.makeValue("/root/send/data17/cretno",cretno); model.makeValue("/root/send/data17/mskind",mskind); model.makeValue("/root/send/data17/histstat",histstat); submit("TRPMI00115"); fOpenBrcdPrnt(); */ //¿ø¹« ¸Þ¼Òµå È£Ãâ //fInPatBarCodePrn(pid, indd, cretno, mskind, histstat, comport); /* »èÁ¦µÈ ÆÄ¶ó¹ÌÅÍ : pPort - COM Port ÁöÁ¤°ª * Ãß°¡µÈ ÆÄ¶ó¹ÌÅÍ : pSetyn - ÇÁ¸°Åͼ³Á¤Á¤º¸ ¼ÂÆÃ¿©ºÎ * pScrid - ÇÁ¸°Åͼ³Á¤Á¤º¸ Á¶È¸¿ë È­¸é ¾ÆÀ̵ð * pBarcdRef - ¼³Á¤Á¤º¸ xpath */ pmifPrintBarCode(pid, indd, cretno, mskind, histstat, "N", "SMMNP06000", "/root/main/barcdprntsetup/prntsetupinfo/setupinfo"); // 20090527 º¯°æµÊ. } // -------------------------------------------------- // °Ë»ç°á°úÁ¶È¸ ¿ÀÇ // -------------------------------------------------- function fOpenTestRslt() { fSetPatInfo(); open("SMAER00800","1","20","128"); } // -------------------------------------------------- // ¼ö¼úÁغñÈ®ÀÎâ ¿ÀÇ // -------------------------------------------------- function fOpenTPR() { fSetPatInfo(); setParameter("OpMenu", "W"); open("SMMNP00200","1","20","128"); } // -------------------------------------------------- // Åõ¾à±â·Ï ¿ÀÇ // -------------------------------------------------- function fOpenMediRecord() { fSetPatInfo(); open("SMMNR00600","1","20","128"); } // -------------------------------------------------- // °£È£±â·ÏTypeII ¿ÀÇ -- 1Â÷ ¿ÀÇ¿¡¼­ Á¦¿ÜµÊ // -------------------------------------------------- function fOpenNursingRecord() { fSetPatInfo(); var sPath = "/root/main/dsc/dscList["+grd_dscList.row+"]"; var parammsg = "recflag¢Ëdutplaccd¢Ëreclnkkey¢ÌD¢Ë34100¢Ë" + model.getValue(sPath+"/oprsrvno")+"," + model.getValue(sPath+"/ophistno")+"," + model.getValue(sPath+"/instcd")+"¢Ì" setParameter("SMMNR03400_ParamBase",parammsg); modal("SMMNR03400","1","20","128"); } // -------------------------------------------------- // °£È£Ã³¹æ ¿ÀÇ // -------------------------------------------------- function fOpenCarePrcp() { fSetPatInfo(); open("SMMNW10900","1","20","128"); //°£È£Ã³¹æ } // -------------------------------------------------- // Åð½ÇÁ¤¸® ¿ÀÇÂ(20080129) // -------------------------------------------------- function fOpenOutRm() { var pGrd = grd_dscList; //20090123 dhkim //itc±è¼÷ÀÎ º¯°æ¿äû»çÇ× ¹Ý¿µ //ÀԽǽð¢ÀÌ ÀԷµÇÁö ¾ÊÀº »óÅ¿¡¼­ ¿À¸¥ÂÊ ¸¶¿ì½ºÀÇ Åð½ÇÁ¤¸® ¼±Åýà [ÀÔ½Çüũ ÈÄ Åð½ÇÁ¤¸®°¡ °¡´ÉÇÕ´Ï´Ù.]¶ó´Â blocking¸Þ½ÃÁö¿Í ÇÔ²² Åð½ÇÁ¤¸® blockingÇÔ. var calcdd = model.getValue("/root/main/dsc/dscList[" + pGrd.row + "]/careinrmdd"); var grdStat = grd_dscList.rowStatus(grd_dscList.row); if(calcdd == '--' || (calcdd != '--' && grdStat != 0)){//ÀԽǽð¢ÀÌ ÀԷµÇÁö ¾Ê¾Ò°Å³ª ÀԽǽð¢À» ÀÔ·ÂÇßÀ¸³ª ÀúÀåÇÏÁö ¾ÊÀº»óÅ messageBox('ÀÔ½Çüũ ÈÄ Åð½ÇÁ¤¸®°¡ °¡´ÉÇÕ´Ï´Ù.', 'E999'); return; } if (pGrd.rows <= 0 || pGrd.row < 1) { messageBox("ÀڷḦ ¼±ÅÃÇϽʽÿÀ.", "E999", ""); return; } if (model.getValue( "/root/main/dsc/dscList["+pGrd.row+"]/pid")== "") { messageBox("µî·Ï¹øÈ£°¡ ¾ø½À´Ï´Ù.", "E999", ""); return; } // »ó´Ü¿Ã¸®±â fSetPatInfo(); open("SMMNP06010","1","20","128"); } // -------------------------------------------------- // »ó´ÜȯÀÚÁ¤º¸¼¼ÆÃÇϱâ // -------------------------------------------------- function fSetPatInfo() { var sPath = "/root/main/dsc/dscList["+grd_dscList.row+"]"; var sPatFlag = model.getValue(sPath+"/oppatflagcd"); if (sPatFlag == "") sPatFlag = "I"; //¼ö¼úÁ¤º¸¾ø´Â°æ¿ì´Â 'I' //¿Ã¸®±â º¯°æ:¼ö¼úÇÏÁö ¾Ê´Â »ç¶÷µµ ³ª¿È var sOprsrvno = model.getValue(sPath+"/oprsrvno"); var param = ""; //¼ö¼úÃë¼ÒµÈ °æ¿ì T·Î ¿Ã¸®Áö ¸»°Í.(¾ÆÁ÷ ±¸Çö¾ÈÇÔ) //20080917 dhkim ¼ö¼úÃë¼ÒȯÀÚÀÇ °æ¿ì var opstatcd = model.getValue(sPath + "/opstatcd");//¼ö¼ú»óÅ if (sOprsrvno != "" && opstatcd != '29') { //20080917 dhkim ¼öÁ¤. ¼ö¼úÀÏÁ¤ÀÌ ÀÖ°í Ãë¼Ò»óŰ¡ ¾Æ´Ñ ȯÀÚ »ó´Ü¿Ã¸®±â //¼ö¼úÀü¿ë »ó´Ü ¿Ã¸®±â param = "T¢Ë" // 01 O:¿Ü·¡, I:ÀÔ¿ø±¸ºÐ, T:¼ö¼ú¿¹¾à + model.getValue(sPath+"/pid" ) + "¢Ë" // 02 µî·Ï¹øÈ£ + model.getValue(sPath+"/opcnfmdd" ) + "¢Ë" // 03 ¼ö¼ú½ÃÀÛÀÏÀÚ + "¢Ë" // 04 cretno(¾ø´Â °æ¿ì ""·Î ó¸®) + model.getValue(sPath+"/instcd" ) + "¢Ë" // 05 ±â°üÄÚµå + model.getValue(sPath+"/perfdeptcd" ) + "¢Ë" // 06 Áýµµ°úºÎ¼­ + model.getValue(sPath+"/perfdrid" ) + "¢Ë" // 07 ÁýµµÀÇID + sPatFlag + "¢Ë" // 08 ȯÀÚ±¸ºÐ + "F¢Ë" // 09 F -󸮱¸ºÐ ¹«Á¶°Ç F·Î ¼³Á¤ + model.getValue(sPath+"/oprsrvno" ) + "¢Ë" // 10 ¼ö¼ú¿¹¾à¹øÈ£ + model.getValue(sPath+"/ophistno" ) + "¢Ë" // 11 ¼ö¼úÀ̷¹øÈ£ + model.getValue("/root/main/cond/opcnfmdd" ) + "¢Ë"; // 12 Á¶È¸ÀÏÀÚ 2007-09-13 ¿ÀÁöÈÆ Ãß°¡... } else if(sOprsrvno != "" && opstatcd == '29'){ //20080917 dhkim ¼öÁ¤. ¼ö¼úÀÏÁ¤Ãë¼ÒµÈ ȯÀÚ »ó´Ü¿Ã¸®±â param = "I" //dsc + "¢Ë" + model.getValue(sPath+"/pid") //µî·Ï¹øÈ£ + "¢Ë" + model.getValue(sPath+"/indd") //ÀÔ¿øÀÏÀÚ + "¢Ë" + model.getValue(sPath+"/cretno") //ÀÔ¿ø»ý¼º¹øÈ£ + "¢Ë" + model.getValue(sPath+"/instcd") //±â°üÄÚµå + "¢Ë" + model.getValue(sPath+"/indd") //Áø·áÀÏÀÚ(´çÀÏÀÔ¿øÈ¯ÀÚ¸¦ Á¶È¸ÇϹǷÎ) //alert(param); //condparam = ordtype + "¢Ë" + pid + "¢Ë" + indd + "¢Ë" + cretno + "¢Ë" + instcd+ "¢Ë" + orddd; } else { // »ó´Ü ¼¼ÆÃÀ» À§ÇÑ ÆÄ¶ó¹ÌÅÍ(ÀÔ¿øÀü¿ë) param = "I" + "¢Ë" + model.getValue(sPath+"/pid") //µî·Ï¹øÈ£ + "¢Ë" + model.getValue(sPath+"/indd") //ÀÔ¿øÀÏÀÚ + "¢Ë" + model.getValue(sPath+"/cretno") //ÀÔ¿ø»ý¼º¹øÈ£ + "¢Ë" + model.getValue(sPath+"/instcd") //±â°üÄÚµå + "¢Ë" + model.getValue(sPath+"/indd") //Áø·áÀÏÀÚ(´çÀÏÀÔ¿øÈ¯ÀÚ¸¦ Á¶È¸ÇϹǷÎ) /* Åð¿øÁ¤¸®(º´µ¿) È®ÀÎÇØºÁ¾ßÇÔ... // »ó´Ü ȯÀÚÁ¤º¸ parameter var sIoflag = "I"; var sPid = model.getValue(dschPath + "[" + iRow + "]/pid"); model.removenode ("/root/send"); model.makeNode ("/root/send"); model.makeValue ("/root/send/reqdata/pid" , sPid); model.makeValue ("/root/send/reqdata/histstat", sIoflag); model.removeNodeset("/root/temp/gettoplist"); submit("TRMND00103"); var sCretno = model.getValue("/root/temp/gettoplist/gettopinfo/cretno" ); //»ý¼º¹øÈ£ var sSeqno = model.getValue("/root/temp/gettoplist/gettopinfo/seqno" ); //ÀϷùøÈ£ var sInstcd = model.getValue("/root/temp/gettoplist/gettopinfo/instcd" ); //±â°üÄÚµå var sIndd = model.getValue("/root/temp/gettoplist/gettopinfo/indd" ); //ÀÔ¿øÀÏÀÚ var sOrddd = model.getValue("/root/temp/gettoplist/gettopinfo/orddd" ); //Áø·áÀÏÀÚ var sAcptseqno = model.getValue("/root/temp/gettoplist/gettopinfo/acptseqno"); //µî·ÏÀϷùøÈ£ var sOrgorddd = model.getValue("/root/temp/gettoplist/gettopinfo/orgorddd" ); //¿øÁø·áÀÏÀÚ var sOrddd = model.getValue("/root/temp/gettoplist/gettopinfo/orddd" ); //Áø·áÀÏÀÚ var sParam; sParam = (sIoflag + "¢Ë" + sPid + "¢Ë" + sIndd + "¢Ë" + sCretno + "¢Ë" + sInstcd + "¢Ë" + sOrddd); setParameter("condparam", sParam); */ } //alert(sOprsrvno +"/" + param); setParameter("condparam", param); modal("SPMMO08900", 1, "", "", "", "", "", "left:0; right:0; width:0; height:0; sysmenu:hidden; caption:hidden; min:hidden, max:hidden;"); var curNurType2Obj = getOpenWindow("SMMNP00200"); if(curNurType2Obj != null){//ÁغñÈ®ÀÎÀÌ ¿­·ÁÀÖÀ¸¸é »ó´Ü ȯÀÚ·Î ÀçÁ¶È¸2010.01.04 K.J.M curNurType2Obj.javascript.fFormInit(); } // ÇÏ´Ü Ã³¹æ»ó¼¼Á¶È¸, ¼ö¼ú»ó¼¼Á¶È¸ fDscDataView(grd_dscList.row); } // -------------------------------------------------- // DSC ¸ÞÀθ®½ºÆ® ÀԽǽð¢, Åð½Ç½Ã°¢ ¼öÁ¤µÈ ³»¿ë ÀúÀå // -------------------------------------------------- function fSaveDscList(){ if(!checkGridUpdate(grd_dscList)){ messageBox("ÀúÀåÇÒ ÀÚ·á°¡ Á¸ÀçÇÏÁö ¾Ê½À´Ï´Ù.", "E"); return; } //alert(grd_dscList.getUpdateData()); model.removenode("/root/send"); model.removenode("/root/rtndata/dsc"); model.makeNode("/root/send"); model.makeValue("/root/send/dscList",grd_dscList.getUpdateData()); if(submit("TXMNP06001", false) == true) { //if(getNodesetCnt(model, "/root/rtndata/dsc/dscList") > 0){ // var rtnMsg = messageBox("ÀÔ½Çüũ ȯÀÚ¿¡ ´ëÇÑ ¿Ü·¡¿¹¾à ó¹æ Á¶È¸¸¦", "Q004"); // var chkcnt = 0 ; // if("6" == rtnMsg){ // for(var i = 1 ; i <= getNodesetCnt(model, "/root/rtndata/dsc/dscList") ; i++){ // var rtnVO = fGetRsrvPrcp(i); // if(rtnVO == "E"){ // messageBox("¿Ü·¡ ¿¹¾àó¹æ ½Â°è¿¡ ÇÊ¿äÇÑ Á¤º¸°¡ ´©¶ôµÇ¾î 󸮸¦ ½ÇÆÐÇÏ¿´½À´Ï´Ù.", "C000"); // }else if(rtnVO == "X"){ // chkcnt++; // } // } // } // // if(getNodesetCnt(model, "/root/rtndata/dsc/dscList") == chkcnt){ // messageBox("¿Ü·¡ ¿¹¾àó¹æÀÌ Á¸ÀçÇÏÁö ¾Ê½À´Ï´Ù.", "I000"); // } //} fCheckSpecOrdSign(); fDscDataRead(); // Á¶È¸ } } // -------------------------------------------------- // ¿Ü·¡¿¹¾àó¹æ ¼±Åà ¹× ÀúÀå È­¸é È£Ãâ_20090508Ãß°¡(ByJA) // -------------------------------------------------- function fGetRsrvPrcp(pRow){ // ¿Ü·¡¿¹¾àó¹æÁ¤º¸ Á¶È¸ model.removeNodeset("/root/send"); model.makeValue ( "/root/send/cond1", model.getValue("/root/rtndata/dsc/dscList["+pRow+"]/pid") ); model.makeValue ( "/root/send/cond2", getUserInfo("dutplceinstcd")); model.makeValue ( "/root/send/cond3", getCurrentDate()); submit ( "TRMMO00129", false ); // ¿Ü·¡¿¹¾àó¹æÁ¤º¸ Á¸Àç½Ã ¿Ü·¡¿¹¾àó¹æ ÀúÀåÈ­¸é È£Ãâ var srcNodeList = model.instances(0).selectNodes ("/root/result/prcplist"); var sParamPid = model.getValue("/root/rtndata/dsc/dscList["+pRow+"]/pid" ); var sParamIndd = model.getValue("/root/rtndata/dsc/dscList["+pRow+"]/indd" ); var sParamCretno = model.getValue("/root/rtndata/dsc/dscList["+pRow+"]/cretno" ); var sParamIoflag = model.getValue("/root/rtndata/dsc/dscList["+pRow+"]/iocls" ); var sParamActcertdrid = model.getValue("/root/rtndata/dsc/dscList["+pRow+"]/chngmedispclid" ); var sParamSexAge = model.getValue("/root/rtndata/dsc/dscList["+pRow+"]/sexage" ); var sParamPatNm = model.getValue("/root/rtndata/dsc/dscList["+pRow+"]/hngnm" ); if ( srcNodeList.length > 0 ) { if(sParamPid == "" || sParamIndd == "" || sParamCretno == "" || sParamIoflag == "" || sParamActcertdrid == "" || sParamPatNm == "") return "E" ; setParameter ( "SPMMO18200_pid" , sParamPid ); setParameter ( "SPMMO18200_orddd" , sParamIndd ); setParameter ( "SPMMO18200_cretno" , sParamCretno ); setParameter ( "SPMMO18200_prcpdd" , getCurrentDate() ); setParameter ( "SPMMO18200_prcpinptflag" , "00" ); // Àӽ÷Π09ÀÓ. ÃßÈÄ ¹øÈ£¹èÁ¤µÇ¾î ¼öÁ¤ÇؾßÇÔ. setParameter ( "SPMMO18200_ioflag" , sParamIoflag ); setParameter ( "SPMMO18200_prcpkindcd" , "00" ); setParameter ( "SPMMO18200_prcpsignflag" , "1" ); // ÇÊ¿ä½Ã Àû¿ë_󹿼­¸í±¸ºÐ(0:ÀÎÁõ¾ÈµÊ, 1:Àǻ簡 ÈÄÀÎÁõ, 2:ÀÎÁõ¿Ï·á(default)) setParameter ( "SPMMO18200_aftcertflag" , "12" ); // ÇÊ¿ä½Ã Àû¿ë_ÈÄÀÎÁõ¿©ºÎ setParameter ( "SPMMO18200_aftcertdrid" , sParamActcertdrid ); // ÇÊ¿ä½Ã Àû¿ë_ÈÄÀÎÁõÀÇ»çID chngmedispclid setParameter ( "SPMMO18200_title" , "ȯÀÚ¹øÈ£: " + sParamPid + " ȯÀÚ¸í : " + sParamPatNm + " S/A : " + sParamSexAge); //setParameter ( "SPMMO18200_prcpstatcd", "000"); //ÇÊ¿ä½Ã Àû¿ë //setParameter ( "SPMMO18200_oprsrvno", "0"); //ÇÊ¿ä½Ã Àû¿ë //setParameter ( "SPMMO18200_prcpauthflag", "0"); //ÇÊ¿ä½Ã Àû¿ë var xpt = window.screenleft + 200; var ypt = window.screenTop + 100; var coord = getRelativeCoordinate ( xpt, ypt ); var mon = coord[0]; xpt = coord[1]; ypt = coord[2]; modal ( "SPMMO18200", mon, xpt, ypt, "SPMMO01000", "/root/result", "/root/result", "", false ); // ¿Ü·¡¿¹¾àó¹æ ÀúÀåÈ­¸é È£Ãâ clearParameter ( "SPMMO18200_pid" ); clearParameter ( "SPMMO18200_orddd" ); clearParameter ( "SPMMO18200_cretno" ); clearParameter ( "SPMMO18200_prcpdd" ); clearParameter ( "SPMMO18200_prcpinptflag" ); clearParameter ( "SPMMO18200_ioflag" ); clearParameter ( "SPMMO18200_prcpkindcd" ); clearParameter ( "SPMMO18200_prcpsignflag" ); clearParameter ( "SPMMO18200_aftcertflag" ); clearParameter ( "SPMMO18200_aftcertdrid" ); return getParameter("SPMMO18200_rtnyn"); }else{ return "X"; } } // -------------------------------------------------- // ±×¸®µå ¼öÁ¤¿©ºÎ È®ÀÎ // -------------------------------------------------- function checkGridUpdate(grid) { var uData = grid.getUpdateDataXml("update"); if (uData=="") return false; else return true; } // -------------------------------------------------- // ¸®½ºÆ® Ãâ·Â // -------------------------------------------------- function fPrntList(){ /* var opcnfmdd = model.getValue("/root/main/dsc/dscList[1]/opcnfmdd"); if (opcnfmdd == ""){ messageBox("Á¶È¸°¡ µÇÁö", "E007"); return; } */ var pGrd = grd_dscList; if (pGrd.rows <= 1){ messageBox("Á¶È¸°¡ µÇÁö", "E007"); return; } model.removenode("/root/send"); model.makeNode("/root/send"); model.makeNode("/root/send/dsc"); model.copyNode("/root/send/dsc","/root/main/dsc"); exeReportPreview("RPMNP06000","XMLSTR"); } // -------------------------------------------------- // ¿¢¼¿ Ãâ·Â // -------------------------------------------------- function fPrntExcl(){ var opcnfmdd = model.getValue("/root/main/dsc/dscList[1]/opcnfmdd"); if (opcnfmdd == ""){ messageBox("Á¶È¸°¡ µÇÁö", "E007"); return; } var sPrntDD = model.getValue("/root/main/cond/opcnfmdd"); var file = window.fileDialog("save","","true","DSCȯÀÚÁ¤º¸_("+sPrntDD+")","xls","All Files (*.*)|*.*|Excel Files(*.xls)|*.xls"); if(file != "") { grd_dscList.saveExcel(file); } } // -------------------------------------------------- // dsc¸ÞÀο¡¼­ ¿À¸¥ÂÊ ¸¶¿ì½º¹öư // -------------------------------------------------- function fnonmousedown() { if (model.getValue( "/root/main/dsc/dscList["+grd_dscList.mouseRow+"]/pid")== "") return; var colnm = grd_dscList.valueMatrix(0, grd_dscList.mouseCol); var tmpcareinrmdd = model.getValue( "/root/main/dsc/dscList["+grd_dscList.mouseRow+"]/tmpcareinrmdd"); var oppatflagcd = model.getValue( "/root/main/dsc/dscList["+grd_dscList.mouseRow+"]/oppatflagcd"); //20101214_KNUH_Start seqflag Ãß°¡ var seqflag = model.getValue( "/root/main/dsc/dscList["+grd_dscList.mouseRow+"]/seqflag"); ; //20101214_KNUH_End colnm = colnm.substring(0,2); var sdschdd1 = model.getValue( "/root/main/dsc/dscList["+grd_dscList.mouseRow+"]/dschdd"); sdschdd1 = sdschdd1.replace("-",""); sdschdd1 = sdschdd1.substring(0,1); //---(¼ö¼úȯÀÚ+angio(¼ö¼úÁ¤º¸¾øÀ½) // if(oppatflagcd=="D"&&colnm== "ÀÔ½Ç"&&tmpcareinrmdd.substring(0,1)=="-") { // DSC ȯÀÚ, ÀԽǽð¢Ä®·³, ÀԽǽð¢ÀÌ Àû¿ëµÇÁö ¾ÊÀº °æ¿ì("-")¿¡¸¸ ÀԽǽ𢠸޴º ³ªÅ¸³ªµµ·Ï // fShowPopupMenu("grd_dscList","/root/main/menuitems/inmenu/item"); // }else { // fShowPopupMenu("grd_dscList","/root/main/menuitems/grdmenu/item"); // } if(seqflag == "1") { if (rdo_dscflag.value == "D") { //if(colnm== "ÀÔ½Ç"&&tmpcareinrmdd.substring(0,1)=="-") { // DSC ȯÀÚ, ÀԽǽð¢Ä®·³, ÀԽǽð¢ÀÌ Àû¿ëµÇÁö ¾ÊÀº °æ¿ì("-")¿¡¸¸ ÀԽǽ𢠸޴º ³ªÅ¸³ªµµ·Ï if(colnm== "ÀÔ½Ç") { // DSC ȯÀÚ, ÀԽǽð¢Ä®·³, ÀԽǽð¢ÀÌ Àû¿ëµÇÁö ¾ÊÀº °æ¿ì("-")¿¡¸¸ ÀԽǽ𢠸޴º ³ªÅ¸³ªµµ·Ï fShowPopupMenu("grd_dscList","/root/main/menuitems/inmenu/item"); }else { fShowPopupMenu("grd_dscList","/root/main/menuitems/grdmenu/item"); } } else { fShowPopupMenu("grd_dscList","/root/main/menuitems/grdmenu/item"); } } } //-------------------------------- // ¼ö¼ú»óÅ¿¡ µû¸¥ Áö½Ã»çÇ× ¸Þ½ÃÁö Ç¥½Ã //-------------------------------- function fMsgDisp() { var pGrd = grd_dscList; var pid = model.getValue('/root/main/dsc/dscList[' + grd_dscList.row + ']/pid'); var hngnm = model.getValue('/root/main/dsc/dscList[' + grd_dscList.row + ']/hngnm'); var sMsg = ""; if ( pGrd.rows <=1 || pGrd.row <= 0 ) sMsg = ""; var sPath = "/root/main/dsc/dscList[" + pGrd.row + "]"; var opstatcd = model.getValue(sPath + "/opstatcd"); //¼ö¼ú»óŰª var prcpcnt = parseInt( model.getValue(sPath + "/iprccount")) + parseInt( model.getValue(sPath + "/oprccount") );//󹿰¹¼ö var inflag = model.getValue(sPath + "/careinrmdd");//dscÀԽǿ©ºÎ var indschstat = model.getValue(sPath + "/indschstat");//Àç¿ø»óÅ inflag = fReplace(inflag, "-",""); inflag = fReplace(inflag, " ","") //alert( opstatcd + "/" + inflag + "/" + prcpcnt); //¸¶ÃëÃë¼Ò + ÀÔ½Ç Àü + Áø·áó¹æ À¯ if (opstatcd == '29' && inflag == "" & prcpcnt > 0) sMsg = hngnm + "(" + pid + ")´ÔÀº ¼ö¼ú Ãë¼Ò°¡ µÇ¾ú°í DSC ÀÔ½ÇÀüÀ̸ç Áø·áó¹æÀÌ ÀÖ½À´Ï´Ù. ¿ø¹«ÆÀ¿¡ ÀüÈ­·Î 'ÀÔ¿øÁ¤º¸' »èÁ¦¸¦ ¿äûÇϽʽÿÀ."; //¸¶ÃëÃë¼Ò + ÀÔ½Ç ÈÄ + Áø·áó¹æ ¹« + Åð¿ø¿¹°í¾øÀ½ if (opstatcd == '29' && inflag != "" & prcpcnt == 0 && indschstat == '') sMsg = hngnm + "(" + pid + ")´ÔÀº ¼ö¼ú Ãë¼Ò°¡ µÇ¾ú°í DSC ÀÔ½ÇÈÄÀ̸ç Áø·áó¹æÀÌ ¾ø½À´Ï´Ù. ¿ø¹«ÆÀ¿¡ ÀüÈ­·Î 'ÀÔ¿øÁ¤º¸' »èÁ¦¸¦ ¿äûÇϽʽÿÀ."; //¸¶ÃëÃë¼Ò + ÀÔ½Ç ÈÄ + Áø·áó¹æ ¹« + Åð¿ø¿¹°íÀÖÀ½ (20080917 dhkim - process ¹®ÀÇÇÊ¿ä) if (opstatcd == '29' && inflag != "" && prcpcnt == 0 && indschstat == '¨Ð') sMsg = hngnm + "(" + pid + ")´ÔÀº ¼ö¼ú Ãë¼Ò°¡ µÇ¾ú°í DSC ÀÔ½ÇÈÄÀ̸ç Åð¿ø¿¹°í µÇ¾ú½À´Ï´Ù. Åð½ÇÁ¤¸®¸¦ ÇϽʽÿÀ."; //¸¶ÃëÃë¼Ò + ÀÔ½Ç ÈÄ + Áø·áó¹æ À¯ + Åð¿ø¿¹°í¾øÀ½ (20080917 dhkim - Åð¿ø¿¹°í ¸Þ¼¼Áö º¯°æ) if (opstatcd == '29' && inflag != "" && prcpcnt > 0 && indschstat == '') sMsg = hngnm + "(" + pid + ")´ÔÀº ¼ö¼ú Ãë¼Ò°¡ µÇ¾ú°í DSC ÀÔ½ÇÈÄÀ̸ç Áø·áó¹æÀÌ ÀÖ½À´Ï´Ù. Áø·áÆÀ¿¡ Åð¿ø¿¹°í¸¦ ¿äûÇϽʽÿÀ."; //¸¶ÃëÃë¼Ò + ÀÔ½Ç ÈÄ + Áø·áó¹æ À¯ + Åð¿ø¿¹°íÀÖÀ½ (20080917 dhkim - Åð¿ø¿¹°í ¸Þ¼¼Áö º¯°æ) if (opstatcd == '29' && inflag != "" && prcpcnt > 0 && indschstat == '¨Ð') sMsg = hngnm + "(" + pid + ")´ÔÀº ¼ö¼ú Ãë¼Ò°¡ µÇ¾ú°í DSC ÀÔ½ÇÈÄÀ̸ç Áø·áó¹æÀÌ ÀÖ½À´Ï´Ù. Åð½ÇÁ¤¸®¸¦ ÇϽʽÿÀ."; if(sMsg != ""){ out_msg.visible = true; }else{ out_msg.visible = false; } out_msg.value = sMsg; } //-------------------------------- // ¹®ÀÚ¿­ ¹Ù²Ù±â //-------------------------------- function fReplace(str0,str1,str2) { str0 += ""; str1 += ""; str2 += ""; while ( str0.indexOf(str1) > -1 ) { str0 = str0.replace(str1,str2); } return str0; } //----------------------------------------- // dsc Åð½Ç Ãë¼Ò(20080129) //----------------------------------------- function fOutCancel() { var pGrd = grd_dscList; var sPath = "/root/main/dsc/dscList[" + pGrd.row + "]"; if (pGrd.rows <= 1 || pGrd.row < 1) { messageBox("ÀÚ·á°¡ ¼±ÅõÇÁö ¾Ê¾Ò½À´Ï´Ù.", "E999", ""); return; } var sChk = model.getValue(sPath + "/indschstat" ); var dschdd = model.getValue(sPath + "/dschdd"); //Å×½ºÆ®Áß.... //alert(sChk+dschdd); var jPid = model.getValue(sPath + "/pid"); // µî·Ï¹øÈ£ var jIndd = model.getValue(sPath + "/indd"); // ÀÔ¿øÀÏÀÚ var jCretno = model.getValue(sPath + "/cretno"); // »ý¼º¹øÈ£ model.removenode("/root/send/judginfo"); model.makeValue("/root/send/judginfo/pid", jPid); model.makeValue("/root/send/judginfo/indd", jIndd); model.makeValue("/root/send/judginfo/cretno", jCretno); submit("TRMNE00113"); var jJudginfo = model.getValue("/root/judginfo/dschjudgprcsstat"); if (jJudginfo != "A") { messageBox(" ½É»ç»óŸ¦ ÇØÁ¦Çϰí Åð½ÇÃë¼Ò¸¦ ÁøÇàÇϼ¼¿ä.\r\n\r\n" + "¡Ø Àϰú½Ã°£ Áß - ½É»ç½Ç·Î ¿¬¶ô, Àϰú½Ã°£ ¿Ü - ÀÀ±Þ¼ö³³À¸·Î ¿¬¶ô", "E999"); return; } if (sChk == "¨Ï" || (sChk == "¡ß" && dschdd != '-')) { //20081218 dhkim //6½Ã°£¹Ì¸¸ ȯÀÚÀÇ °æ¿ì ½É»ç¸¦ °ÅÄ¡Áö ¾Ê°í ¹Ù·Î Åð¿ø¼ö³³À» ÇÏ´Â °æ¿ì°¡ Á¸ÀçÇÔ(¾È°úÀǰæ¿ì¸¸ÇØ´ç) //±×¸®ÇÏ¿© Åð¿ø¼ö³³¿©ºÎ¸¦ Ã¼Å©ÇØ Åð¿ø¼ö³³µÈ ȯÀÚÀÇ °æ¿ì Åð½ÇÃë¼Ò¸¦ ÇÏÁö ¸øÇϵµ·Ï blockingó¸® Ãß°¡ var rcptyn = model.getValue('/root/main/dsc/dscList[' + pGrd.row + ']/rcptyn'); if(rcptyn == 'Y'){ messageBox("ÀÌ¹Ì Åð¿ø¼ö³³µÈ ȯÀÚÀÔ´Ï´Ù.\r\n¿ø¹«ÆÀ¿¡ Åð¿ø¼ö³³Ãë¼Ò¸¦ ¿äûÇϽŠÈÄ\r\n°£È£Åð½ÇÃë¼Ò¸¦ ÁøÇà ÇϽʽÿÀ.", "E999", ""); return; } //20081219 dhkim //¿À´ÃÀÏÀÚȯÀÚ°¡ ¾Æ´Ï¸é Ãë¼ÒºÒ°¡ var indd = model.getValue("/root/main/dsc/dscList[" + pGrd.row + "]/indd"); if(indd != getCurrentDate()){ messageBox("ÀÔ¿øÀÏÀÌ ¿À´ÃÀΠȯÀÚ¸¸ °£È£Åð½ÇÃë¼Ò ÇÒ ¼ö ÀÖ½À´Ï´Ù.", "E999", ""); return; } //if(!checkGridUpdate(grd_dscList)) //{ // alert("ÀúÀåÇÒ ÀÚ·á°¡ Á¸ÀçÇÏÁö ¾Ê½À´Ï´Ù."); // return; //} if (messageBox("°£È£»çÅð¿øÁ¤¸®¿Ï·á Ãë¼Ò ",'Q003',"") != 6) return; var sHeader = "m¢Ëcareinrmdd¢Ëpid¢Ëindd¢Ëcretno¢Ëseqno¢Ì"; var sData = "u" + "¢Ë" + model.getValue(sPath + "/careinrmdd") + "¢Ë" + model.getValue(sPath + "/pid") + "¢Ë" + model.getValue(sPath + "/indd") + "¢Ë" + model.getValue(sPath + "/cretno") + "¢Ë" + model.getValue(sPath + "/seqno") + "¢Ì"; model.removenode("/root/send"); model.makeNode("/root/send"); //model.makeValue("/root/send/dscList",grd_dscList.getUpdateData()); model.makeValue("/root/send/dscList",sHeader + sData ); // alert( sHeader + sData); // return; if ( submit("TXMNP06002") ) { fDscDataRead(); // Á¶È¸ } } else { messageBox("°£È£Åð½ÇÃë¼ÒÇÒ ¼ö ¾ø´Â »óÅÂÀÔ´Ï´Ù.", "E999", ""); } } /** * @group : * @ver : 2010.11.19 * @by : DARK9258 * @--------------------------------------------------- * @type : function * @access : public * @desc : ȯÀÚ name¶óº§ Ãâ·Â * @param : * @return : * @--------------------------------------------------- */ function fPrintNameLabel(pid, hngnm, sexage, oproomcdnm, depthngnm, prncnt, pPort){ ////////////////////////////////////////////////////////////////////////////////////////// ¿øº»_20090522 // //20080905 portã±â // //portÁ¤º¸ °¡Á®¿À±â // model.removenode('/root/send'); // model.removenode('/root/main/barcdprntsetup'); // model.makenode('/root/main/barcdprntsetup'); // model.makeValue('/root/send/scrnid', 'SMMNP00100'); // if(submit('TRLLC90101')){ // pPort = model.getValue('/root/main/barcdprntsetup/prntsetupinfo/setupinfo[1]/comm02/comm'); // } // // if(document.all("CommAX") != null) { // //¹ÙÄÚµå Ãâ·Â ½ÃÀÛ // // var portOpenTF = ""; // // // CommPort ¼³Á¤ // if (pPort == "" || pPort == null || pPort == " ") { // CommAX.CommPort = "1"; // default port setting // } else { // CommAX.CommPort = pPort; //Port ¼³Á¤ // } // // CommAX.Settings = "9600,n,8,1"; // // portOpenTF = CommAX.PortOpen("true"); //Port Open // // if(portOpenTF == "TRUE") { // // var iLeft = model.getValue("/root/main/barcdprntsetup/prntsetupinfo/setupinfo/blank/left"); // var iTop = model.getValue("/root/main/barcdprntsetup/prntsetupinfo/setupinfo/blank/top"); // // if(iLeft == "" || iLeft == "-"){ // iLeft = 0; // } // if(iTop == "" || iTop == "-"){ // iTop = 0; // } // // var sData = "^XA^LH0,20";//Ãâ·Â½ÃÀÛÁ¡ // // //Ãâ·ÂÀÏ // var prndd = getCurrentDate().substr(0,4) + "/" + getCurrentDate().substr(4,2) + "/" + getCurrentDate().substr(6,2); // sData += "^CFA,20,20";//bold, height, width // sData += "^FO10,20";//À§Ä¡ÁöÁ¤(xÃà, yÃà) // sData += "^FD"+ prndd + "^FS"; // // //¼ö¼úÁ¤º¸ // var opinfo = oproomcdnm + "R " + depthngnm + " " + pid; // sData += CommAX.PrtImgOut(20, 60, opinfo, 1, 1);//PrtImgOut(xÃà, yÃà, data, width, heigt) // sData += CommAX.HanImageData(); // // // //ȯÀÚ¸í // //±ÛÀÚ¼ö°¡ 4ÀÌ»óÀ̸é leftÁ¤·Ä 4ÀÌÇÏÀ̸é centerÁ¤·Ä // var hx = 20; var hy = 105; // /*var len = hngnm.length; // if(len > 4){ // hx = 10; // }else if(len == 4){ // hx = 90; // }else if(len == 3){ // hx = 120; // }else if(len == 2){ // hx = 150; // }else if(len == 1){ // hx = 180; // }*/ // sData += CommAX.PrtImgOut(hx, hy, hngnm, 2, 2);//PrtImgOut(xÃà, yÃà, data, width, heigt) // sData += CommAX.HanImageData(); // // //sexage // sData += "^CFE,20,20"; // sData += "^FO300,120";//À§Ä¡ÁöÁ¤ // sData += "^FD"+ sexage + "^FS"; // // sData += "^PQ"+ prncnt + "^XZ";//Ãâ·ÂÀå¼ö // // CommAX.SendMessage(sData); // Ãâ·Â // CommAX.PortOpen("false"); // Ãâ·ÂÁ¾·á // // // } else { // messageBox("¾Æ·¡ »çÇ×À» È®ÀÎÈÄ ÀçÃâ·ÂÇØÁֽʽÿÀ." // + " \n 1.ÇÁ¸°Æ®¼³Á¤ È­¸é¿¡¼­ Åë½ÅÀ¯ÇüÀ» com À¸·Î ¼±ÅÃÇÑ °æ¿ì port ¹øÈ£ È®ÀÎ" // + " \n 2.ÄÉÀ̺í È®ÀÎ" // + " \n 3.¸ÕÀú Ãâ·ÂÁßÀÎ ¹ÙÄÚµå È®ÀÎ(¸ðµÎ Ãâ·ÂµÈ ÈÄ ÀçÃâ·ÂÇϽʽÿÀ.)", "I", ""); // return; // } // } /////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////// // SATO¿ë Ãß°¡_20090522(ByJA) if(prncnt > 0){ //1. ¹ÙÄÚµå ¶óº§ ¼³Á¤°ª Á¶È¸ var scrnid = "SMMNP06000"; model.removeNodeset("/root/main/barcdprntsetup"); fGetBarCodeInfo(scrnid); // CareCom.js lzzfMakeBrcdPrntObjHanDo("CommAX"); //2. ¹ÙÄÚµå ¶óº§ È¯°æ¼³Á¤ var barcdRef = "/root/main/barcdprntsetup/prntsetupinfo/setupinfo"; var portOpenTF = fSetNursBarcdInfo(barcdRef); // CareCom.js ¹ÙÄÚµåÇÁ¸°Åͺ° ȯ°æ¼³Á¤(Zebra,SATO) /** *°³¹ßÀϽÃ: 2010.05.13 *°³¹ßÀÚ: ¾çõ´ö *¿äûº´¿ø: ¼¼Á¾º´¿ø *¿äûÆÄÆ®: °£È£ *°³¹ß³»¿ë: ¹ÙÄÚµå Ãâ·Â Çü½Ä º¯°æÀ¸·Î ¼öÁ¤ ó¸®(¼ö¼ú) */ fPrtORPatNameLabel(barcdRef, pid, hngnm, sexage, oproomcdnm, depthngnm, prncnt); return; } } function fLabelPrt() { group5.visible = true;//Ãâ·ÂÀå¼ö ¼±Åà } // ÀԽǽà ¼±ÅÃÁø·á È®ÀÎ function fCheckSpecOrdSign() { model.removeNode("/root/main/paminfo"); model.makeNode("/root/main/paminfo"); var node = getGlobalVariable("paminfo"); setCSVToNode("/root/main/paminfo", node); var s_pid = model.getValue("/root/main/paminfo/list/pid");; var s_ordtype = 'I'; var s_orddd = model.getValue("/root/main/paminfo/list/indd"); var s_orddeptcd = model.getValue("/root/main/paminfo/list/orddeptcd"); var s_orddrid = model.getValue("/root/main/paminfo/list/medispclid"); var s_fromdd = model.getValue("/root/main/paminfo/list/indd"); var s_hngnm = model.getValue("/root/main/paminfo/list/hngnm"); var s_rrgstno1 = model.getValue("/root/main/paminfo/list/rrgstno1"); var s_rrgstno2 = model.getValue("/root/main/paminfo/list/rrgstno2"); var s_specordyn = model.getValue("/root/main/paminfo/list/specordyn"); var sOrddeptcdMsg = model.getValue("/root/main/paminfo/list/orddeptnm"); var sOrddridMsg = model.getValue("/root/main/paminfo/list/orddrnm"); //alert(s_pid); model.makeValue("/root/send/data26/pid", s_pid); // pid model.makeValue("/root/send/data26/ordtype", "I"); // ordtype model.makeValue("/root/send/data26/indd", s_orddd);// orddd model.makeValue("/root/send/data26/orddd", s_orddd);// orddd model.makeValue("/root/send/data26/orddeptcd", s_orddeptcd); // orddeptcd model.makeValue("/root/send/data26/medispclid", s_orddrid); // orddrid model.makeValue("/root/send/data26/orddrid", s_orddrid); // orddrid submit("TRPMI00406"); if (model.getValue("/root/tempchk/specapp/rgstyn") == "N") { var sMsg = "[" + sOrddeptcdMsg + "]" + "[" + sOrddridMsg + "]"; if( s_specordyn == "Y") { if( messageBox(sMsg + " ¼±ÅÃÁø·á µî·ÏÀÌ µÇ¾î ÀÖÁö ¾Ê½À´Ï´Ù. µî·ÏÇϽðڽÀ´Ï±î?", "Q999", "") == 6 ){ fCallSpecPopUp(s_pid,s_ordtype,s_orddd,s_orddeptcd,s_orddrid,s_fromdd,s_hngnm,s_rrgstno1,s_rrgstno2); } } else { if( messageBox(sMsg + " Áø·áÁö¿ø À§ÀÓÀÌ µÇ¾î ÀÖÁö ¾Ê½À´Ï´Ù. À§ÀÓÇϽðڽÀ´Ï±î?", "Q999", "") == 6 ){ fCallSpecPopUp(s_pid,s_ordtype,s_orddd,s_orddeptcd,s_orddrid,s_fromdd,s_hngnm,s_rrgstno1,s_rrgstno2); } } } else { fCallSpecPopUp(s_pid,s_ordtype,s_orddd,s_orddeptcd,s_orddrid,s_fromdd,s_hngnm,s_rrgstno1,s_rrgstno2); } } /* ------------------------------------------------- */ /* ------End Of List ------------------------------- */ /* -------------------------------------------------- */