/* --------------------------------------------------------------------- CHEMO MAIN µî·Ï - Version : 1) : Ver.1.00.01 : Create By Francis Choi : 2015.05.02 2) : Ver.2.00.01 : Edit By dhkim : 2009.02.24 »ç¿ëºÎ¼­¸¦ BMT¼¾ÅÍ¿Í ¾Ï¼¾ÅÍ·Î ºÐ¸®ÇÔ : spclcare/js/MNS.js ½ºÅ©¸³Æ® °øÀ¯ ---------------------------------------------------------------------- */ // ÇϵåÄÚµù ¼öÁ¤ ¹× ¾Ï¼¾ÅÍ/BMT¼¾ÅÍ ÁÖ»ç½Ç ³ª´²Áú¶§ ó¹æÀü¼Û ¾î¶»°Ô Çϳª ¹®ÀÇÇÒ°Í.. //var injSpclRoom = '3120400000';//Ư¼öÁÖ»ç½ÇºÎ¼­ÄÚµå //20090213 dhkim ±Û·Î¹ú º¯¼ö ¼±¾ð var suppdeptcd;//¸Þ´º±×·ì »ç¿ëó·Î º¯°æÇÔ var suppdeptnm; var drprcpetc2; //BMT, ¾Ï¼¾ÅÍ ±¸ºÐ (BMT¼¾ÅÍ : B, ¾Ï¼¾ÅÍ : Y) //20090223 dhkim ¼¾ÅÍÄÚµå ¼±¾ð Ãß°¡ var centcd;//BMT, ¾Ï¼¾ÅÍ ±¸ºÐ (BMT¼¾ÅÍ : B, ¾Ï¼¾ÅÍ : Y) ±¸ºÐÀÚ¿¡ µû¶ó ´Þ¶óÁü var centnm; var sSIGNDATA_PATH = "/root/main/signdata/signprcplist"; //20090225 dhkim //ȯÀÚ°Ë»ö ÆË¾÷ È£Ãâ function fGetPatinfo(){ var pid = model.getValue('/root/main/cond/pid'); if(pid == null || pid == ''){ //messageBox('µî·Ï¹øÈ£¸¦ ÀÔ·ÂÇϼ¼¿ä.', 'E999'); model.setValue("/root/main/cond/pid", ""); model.setValue("/root/main/cond/hngnm", ""); model.setValue("/root/main/cond/gndrage", ""); model.setValue("/root/main/cond/rrgstno", ""); model.refresh(); }else{ //----------Á¶°Ç model.removenode("/root/temppatinfo/pid"); model.makeValue("/root/temppatinfo/pid", model.getValue('/root/main/cond/pid')); model.makeValue("/root/temppatinfo/srchcond", "1") modal("SPPMC02500", "1","150", "150", "SPPMC02500", "/root/temppatinfo", "/root/send"); //---------¸®Åϰª if (model.getValue("/root/main/popupendflag") == "ok") { model.setValue("/root/main/cond/pid", model.getValue("/root/main/patinfo/patinfolist/pid")); model.setValue("/root/main/cond/hngnm", model.getValue("/root/main/patinfo/patinfolist/hngnm")); model.setValue("/root/main/cond/gndrage", model.getValue("/root/main/patinfo/patinfolist/sex") + '/' + model.getValue("/root/main/patinfo/patinfolist/age")); var rrgstno = model.getValue("/root/main/patinfo/patinfolist/rrgstno1") + model.getValue("/root/main/patinfo/patinfolist/rrgstno2"); model.setValue("/root/main/cond/rrgstno", rrgstno.substring(0, 6) + '-' + rrgstno.substring(6, 7) + '******'); model.refresh(); }else{ model.setValue("/root/main/cond/pid", ""); model.setValue("/root/main/cond/hngnm", ""); model.setValue("/root/main/cond/gndrage", ""); model.setValue("/root/main/cond/rrgstno", ""); model.refresh(); } } //Äɸ𸮽ºÆ®Á¶È¸ fInqurySelectedPrgm(); } // -------------------------------------------------- // È­¸é init() // -------------------------------------------------- function fInitialize() { // °£È£ÇϵåÄÚµù Å×À̺í Á¶È¸_20100316_SMY var pCode = "'077','C06'"; // Á¶È¸ÇÒ CdGrupID ÄÚµåÁ¤º¸ var pDate = getCurrentDate(); //Á¶È¸±âÁØÀÏÀÚ fGetNursHardCdInfo(pCode, pDate); //20090213 dhkim //È­¸é ŸÀÌÆ²À» ÇØ´ç ºÎ¼­¿¡ ¸Â°Ô º¯°æÇÑ´Ù. suppdeptcd = aezfSetSuppDeptcd(); suppdeptnm = getMenuDeptnm('/root/send/deptcd', suppdeptcd, 'TRMNI02031', '/root/temp/menudeptinfo/deptnm'); model.removenode('/root/menudeptinfo/deptcd'); model.removenode('/root/menudeptinfo/deptnm'); model.makeValue('/root/menudeptinfo/deptcd', suppdeptcd); model.makeValue('/root/menudeptinfo/deptnm', suppdeptnm); if(suppdeptnm == null || suppdeptnm == ''){ suppdeptnm = 'Ç×¾Ï'; } capt_maintitl.attribute('text') = suppdeptnm + ' ¸ÞÀÎ'; btn_sm.attribute('text') = suppdeptnm + ' Main'; //20090217 dhkim //°£È£ºÎ¼­ÄÚµåÅ×ÀÌºí¿¡ µî·ÏµÈ bmt¿Í ¾Ï¼¾ÅÍ ÁÖ»ç½ÇÀÇ Äڵ带 Á¶È¸ÇÑ´Ù. //injspecialroomweb/js/MNI001.js //fGetNursComnDept(cdgrupid, sendnode, recivenode, submitid, errmessage) fGetNursComnDept('025', '/root/send/cdgrupid', '/root/nursdeptinfo/bmtinfo', 'TRMNI02032', '°£È£¿¡ µî·ÏµÈ bmt¼¾ÅÍ ¼Ò¼Ó°£È£ºÎ¼­Á¶È¸¸¦ ½ÇÆÐÇÏ¿´½À´Ï´Ù.'); fGetNursComnDept('026', '/root/send/cdgrupid', '/root/nursdeptinfo/cncrinfo', 'TRMNI02033', '°£È£¿¡ µî·ÏµÈ ¾Ï¼¾ÅÍ ¼Ò¼Ó°£È£ºÎ¼­Á¶È¸¸¦ ½ÇÆÐÇÏ¿´½À´Ï´Ù.'); var bmttempnode = "/root/nursdeptinfo/bmtinfo/nursdeptlist"; var cncrtempnode = "/root/nursdeptinfo/cncrinfo/nursdeptlist"; drprcpetc2 = fGetDrPrcpEtc2(bmttempnode, cncrtempnode);//ÇØ´çÈ­¸éÀÌ BMT¼¾ÅÍÀÎÁö ¾Ï¼¾ÅÍÀÎÁö ¿©ºÎ¸¦ Á¶È¸ if(drprcpetc2 == 'B'){//BMT¼¾ÅÍÁÖ»ç½Ç fGetNursComnDept('027', '/root/send/cdgrupid', '/root/nursdeptinfo/centinfo', 'TRMNI02034', '°£È£¿¡ µî·ÏµÈ BMT¼¾ÅÍÄÚµåÁ¶È¸¸¦ ½ÇÆÐÇÏ¿´½À´Ï´Ù.'); }else if(drprcpetc2 == 'Y'){//¾Ï¼¾ÅÍÁÖ»ç½Ç fGetNursComnDept('028', '/root/send/cdgrupid', '/root/nursdeptinfo/centinfo', 'TRMNI02034', '°£È£¿¡ µî·ÏµÈ ¾Ï¼¾ÅÍÄÚµåÁ¶È¸¸¦ ½ÇÆÐÇÏ¿´½À´Ï´Ù.'); }else{ messageBox('¸Þ´º±×·ì¿¡ ÇØ´ç »ç¿ëó°¡ µî·ÏµÇ¾î ÀÖÁö ¾Ê½À´Ï´Ù.', 'E999'); // return false; } //±Û·Î¹úº¯¼ö¿¡ ¼¾ÅÍÄÚµå ÇÒ´ç centcd = model.getValue('/root/nursdeptinfo/centinfo/nursdeptlist/deptcd'); centnm = model.getValue('/root/nursdeptinfo/centinfo/nursdeptlist/deptnm'); //alert('¼¾ÅÍÄÚµå : ' + centcd + ' ¼¾Å͸í : ' + model.getValue('/root/nursdeptinfo/centinfo/nursdeptlist/deptnm')); //alert('BMT ¼¾ÅÍ ¹× ¾Ï¼¾ÅÍ ±¸ºÐ : ' + drprcpetc2); //¼¾Åͱ¸ºÐ¿¡ µû¸¥ ¼¾ÅÍÄÚµå Á¶È¸ var xPathMain = "/root/main"; var xPathInitCond = "/root/init/cond"; var xPathMainCond = "/root/main/cond"; model.setValue("/root/main/cond/prestimportid", "cm");//¿Ü·¡¸ÞÀÎÀÌ ¸ÞÀÎÀ¸·Î ¼öÁ¤(20080924)Ư¼öÁÖ»ç½ÇÀÇ °æ¿ì ±×¸®µå º¯°æÀ¸·Î ÀÎÇØ ¸Þ´ºÆÄ¶ó¹ÌÅÍ(spclinj)¸¦ ¾²Áö¸øÇÔ(Nurse MainÀ¸·Î ±âº» ¼ÂÆÃ) //¿À´Ã ³¯Â¥·Î ÃʱâÈ­ ÇÏ´Â ºÎºÐ.(Áø·áÀÏÀÚ¸¦ default·Î ¿À´Ã ³¯Â¥·Î ¼±ÅÃÇÔ) model.setValue("/root/main/cond/userid", getUserId()); model.setValue("/root/main/cond/usernm", getUserName()); model.setValue("/root/main/cond/wardcd", getUserInfo("dutplcecd")); model.setValue("/root/main/cond/orddd", getCurrentDate()); model.setValue("/root/main/cond/orddeptcd", ""); model.setValue("/root/main/cond/medispclid", ""); model.setValue("/root/main/cond/atdoctid", ""); model.setValue("/root/main/cond/indschacptstat", "1"); //model.setValue("/root/main/cond/chemoindschacptstat", "1"); //2090910 dhkim Ç×¾Ï󹿏¸ üũ»óÅ µðÆúÆ® //¿©Àǵµ¼º¸ðº´¿ø : Ư¼öÁÖ»ç½Ç ¸Þ´º±×·ì ¼±Åýà default [Ç×¾Ï󹿏¸] üũ Ç®µµ·Ï _20100316_SMY if(model.getValue("/root/code/codeinfo/codelist[cdgrupid = '077' and supcdid = '05' and cdid = '"+ getUserInfo("dutplceinstcd") +"']/cdid")){ //supcdid='05' : ¿©Àǵµ¼º¸ðº´¿ø model.setValue('/root/main/cond/antcncryn', ''); chk_antcncryn.refresh(); }else{ model.setValue('/root/main/cond/antcncryn', 'Y'); chk_antcncryn.select(0); chk_antcncryn.refresh(); } //20091102 dhkim ³»È¯ÀÚ¼¼ÆÃ Á¶È¸ fChemoSettingRnID(); //¿À´Ã ³¯Â¥·Î ÃʱâÈ­ ÇÏ´Â ºÎºÐ.(Áø·áÀÏÀÚ¸¦ default·Î ¿À´Ã ³¯Â¥·Î ¼±ÅÃÇÔ) var dt = getCurrentDate(); model.setValue(xPathMainCond + "/prcpdd", dt); var colcaption = "";//grd_acting Ä÷³±æÀÌ var pGrd = grd_acting;//grd_acting Çì´õ °áÁ¤ /* for (var i=0;i 0) { model.removeNodeset("/root/main/paminfo/list"); } //Ư¼öÁÖ»ç½Çº´µ¿À» ã¾Æ³Ö´Â´Ù. fSetWardcd(); //ÀÚµ¿Á¶È¸½ÃŲ´Ù. fInqurySelectedPrgm(); } //20091102 dhkim //³»È¯ÀÚ¼¼ÆÃ Á¶È¸ function fChemoSettingRnID(){ model.setValue("/root/main/cond/settingrnid", ""); model.removenode("/root/send"); model.makeValue("/root/send/wardcd", model.getValue("/root/main/cond/wardcd")); submit("TRMNW00101"); model.removenode("/root/init/ward[wardcd = '2280200000']"); // ÀÀ±ÞÀÇ·á¼¾ÅÍ Á¦¿Ü model.setValue("/root/main/cond/settingrnid", ""); for(i = 1; i <= getNodesetCount("/root/init/settingrn"); i++ ) { if (model.getValue("/root/main/cond/userid") == model.getValue("/root/init/settingrn["+ i +"]/settingrnid")) { model.setValue("/root/main/cond/settingrnid", model.getValue("/root/main/cond/userid")); } } model.refresh(); fInqurySelectedPrgm(); } //20081007 ¼öÁ¤ //º´µ¿À» Ư¼öÁÖ»ç½Ç(3120400000)·Î ÀÚµ¿¼¼ÆÃ function fSetWardcd(){ //·Î±×ÀÎÇÑ »ç¿ëÀÚÀÇ ºÎ¼­¸¦ ¸ÕÀú ¼¼ÆÃ var userDeptcd = getUserInfo('dutplcecd'); if(userDeptcd != suppdeptcd){ userDeptcd = suppdeptcd; } model.setValue('/root/main/cond/wardcd', userDeptcd); model.refresh(); } //Ç÷¾×Áغñ, Ç׾Ϲ̽ÂÀÎ Á¶È¸ function fGetWardPrescond() { model.removenode("/root/send"); model.makeValue("/root/send/wardcd", model.getValue("/root/main/cond/wardcd")); model.makeValue("/root/send/orddd", model.getValue("/root/main/cond/orddd")); submit("TRMNW00104"); var blodpreppatlist = ""; // var chngroomaprvpatlist = ""; var anticncrlistpatlist = ""; //Ç÷¾×ÁغñȯÀÚ¸®½ºÆ® Á¶ÇÕ for(var i = 1; i <= getNodesetCount("/root/init/wardprescondinfo/blodprep"); i++) { if (i == 1) { blodpreppatlist += model.getValue("/root/init/wardprescondinfo/blodprep["+ i +"]/patnm"); } else { blodpreppatlist += ", " + model.getValue("/root/init/wardprescondinfo/blodprep["+ i +"]/patnm"); } } /* //Àü½Ç½ÂÀÎȯÀÚ¸®½ºÆ® Á¶ÇÕ for(var i = 1; i <= getNodesetCount("/root/init/wardprescondinfo/chngroomaprv"); i++) { if (i == 1) { chngroomaprvpatlist += model.getValue("/root/init/wardprescondinfo/chngroomaprv["+ i +"]/patnm"); } else { chngroomaprvpatlist += ", " + model.getValue("/root/init/wardprescondinfo/chngroomaprv["+ i +"]/patnm"); } } */ //Ç׾Ϲ̽ÂÀÎȯÀÚ¸®½ºÆ® Á¶ÇÕ for(var i = 1; i <= getNodesetCount("/root/init/wardprescondinfo/anticncr"); i++) { if (i == 1) { anticncrlistpatlist += model.getValue("/root/init/wardprescondinfo/anticncr["+ i +"]/patnm"); } else { anticncrlistpatlist += ", " + model.getValue("/root/init/wardprescondinfo/anticncr["+ i +"]/patnm"); } } model.setValue("/root/main/precondlist/blodpreplist", blodpreppatlist); // model.setValue("/root/main/precondlist/chngroomaprvlist", chngroomaprvpatlist); model.setValue("/root/main/precondlist/anticncrlist", anticncrlistpatlist); tar_blodprep.refresh(); // tar_chngroomaprv.refresh(); tar_anticncrt.refresh(); } function fInqurySelectedPrgm(){ fGetWardPrescond();//Àç¿øÈ¯ÀÚ¼ö, Àü½Ç½ÂÀÎ, Ç÷¾×Áغñ, Ç׾Ϲ̽ÂÀÎ Á¶È¸ switch(model.getValue("/root/main/cond/prestimportid")) { case "cm": //Ư¼öÁÖ»ç½Ç main btn_sm.selected = true; sha_state.visible = true; cap_state.visible = true; cap_color.visible = false; cap_uncnfm.visible = false; cap_prcp.visible = false; caption7.visible = false;//Àü½Ç½ÂÀÎĸ¼Ç tar_chngroomaprv.visible = false;//Àü½Ç½ÂÀÎÅØ½ºÆ®¾Ö¸®¾î btn_prnt.disabled = true;//ȯÀÚÄ«µåÃâ·Â model.toggle("case_cm"); fGetChemoList();//ÄɸðȯÀÚ¸®½ºÆ® Á¶È¸ // fGetChkActing(); break; case "ac": //Ç×¾ÏÀü¼Û btn_ac.selected = true; 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;//Àü½Ç½ÂÀÎÅØ½ºÆ®¾Ö¸®¾î //20090326 dhkim Àüü üũ¹Ú½º Ȱ¼ºÈ­ grd_acting.fixedcellcheckbox(0,0) = true; model.toggle("case_ac"); fGetActingList(); break; case "om" ://order manage btn_om.selected = true; sha_state.visible = false; cap_state.visible = false; 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"; caption7.visible = false;//Àü½Ç½ÂÀÎĸ¼Ç tar_chngroomaprv.visible = false;//Àü½Ç½ÂÀÎÅØ½ºÆ®¾Ö¸®¾î model.toggle("case_om"); fGetDrugStat(); fGetOMPatList(); break; case "nm" : //nurse main btn_nm.selected = true; sha_state.visible = false; cap_state.visible = true; cap_color.visible = false; cap_uncnfm.visible = false; cap_prcp.visible = true; cap_ser.visible = true; cap_prcp.attribute("left") = "698px"; cap_prcp.attribute("color") = "#000000"; grd_wardpatlist.visible = true; caption7.visible = false;//Àü½Ç½ÂÀÎĸ¼Ç tar_chngroomaprv.visible = false;//Àü½Ç½ÂÀÎÅØ½ºÆ®¾Ö¸®¾î model.toggle("case_nm"); fGetWardPatList(); break; case "prn" : btn_om.selected = true; 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.setValue("/root/main/cond/wardcd",model.getValue( "/root/main/wardcdinfo/wardcdlist/chemowardcd")); model.setValue("/root/main/cond/orddd",model.getValue( "/root/main/cond/prcpdd")); model.refresh(); model.toggle("case_om"); fSetPrnMode(); fGetOMPatList("chemo"); break; //20090702 dhkim ¿Ü·¡¿¹¾àó¹æÅÇ Ãß°¡ case "rp" : 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;//Àü½Ç½ÂÀÎÅØ½ºÆ®¾Ö¸®¾î //20091119 dhkim //¿¹¾àó¹æÀü¼Û ÆÄ¶ó¹ÌÅͰªÀ» »ó´ÜÁ¤º¸±âÁØÀ¸·Î »ó´Ü¿¡ Àִ ȯÀÚÀÇ ÆÄ¶ó¹ÌÅͰªÀ¸·Î ¹Þ¾Æ¿Àµµ·Ï º¯°æ //(ÇöÀç´Â ¸ÞÀα׸®µå¿¡ ¼±ÅÃµÈ È¯ÀÚÀÇ ÆÄ¶ó¹ÌÅ͸¦ ³Ñ±è) var curROw = grd_chemo.row; var pid = ""; var indd = ""; var cretno = ""; var ordtype = ""; var medispclid = ""; var roomcd = ""; var sexage = ""; var hngnm = ""; //2010.01.25 dhkim ÁÖ¼® // var curRow = fSincMainGridTopInfo();//»ó´ÜÁ¤º¸¸¦ ¹Þ¾Æ¿Í ÇöÀç row¸¦ Á¶È¸ var topInfoRetn = fGetTopInfoToChemoPatInfo(); var pid = getTopInfoKeysIndex(topInfoRetn, "pid"); if(pid != null && pid != ""){ indd = getTopInfoKeysIndex(topInfoRetn, "indd"); cretno = getTopInfoKeysIndex(topInfoRetn, "cretno"); ordtype = getTopInfoKeysIndex(topInfoRetn, "ordtype"); medispclid = getTopInfoKeysIndex(topInfoRetn, "medispclid"); roomcd = getTopInfoKeysIndex(topInfoRetn, "roomcd"); sexage = getTopInfoKeysIndex(topInfoRetn, "sexage"); hngnm = getTopInfoKeysIndex(topInfoRetn, "hngnm"); }else{ messageBox("»ó´ÜÁ¤º¸°¡ ¾ø°Å³ª ȯÀÚÁ¤º¸°¡ Á¸ÀçÇÏÁö ¾Ê½À´Ï´Ù.", "E"); } /* var pid = model.getValue('/root/main/chemoinfo/chemolist[' + curRow + ']/pid'); var indd = model.getValue('/root/main/chemoinfo/chemolist[' + curRow + ']/rp_indd'); var cretno = model.getValue('/root/main/chemoinfo/chemolist[' + curRow + ']/rp_cretno'); var ordtype = model.getValue('/root/main/chemoinfo/chemolist[' + curRow + ']/rp_ordtype'); var medispclid = model.getValue('/root/main/chemoinfo/chemolist[' + curRow + ']/rp_medispclid'); var roomcd = model.getValue('/root/main/chemoinfo/chemolist[' + curRow + ']/roomcd'); var sexage = model.getValue('/root/main/chemoinfo/chemolist[' + curRow + ']/age'); var hngnm = model.getValue('/root/main/chemoinfo/chemolist[' + curRow + ']/hngnm'); */ if(indd == null || indd == ''){ indd = getCurrentDate(); } model.toggle("case_rp"); fGetRsrvPrcpChemo(pid, indd, cretno, ordtype, medispclid, roomcd, sexage, hngnm); break; } model.refresh(); } /** * 2010.01.25 dhkim - »ó´ÜÁ¤º¸¿¡¼­ °¡Á®¿Â ³»¿ª¹è¿­¿¡¼­ key°ªÀ¸·Î µ¥ÀÌÅÍ Á¶È¸ */ function getTopInfoKeysIndex(topInfoRetn, topKey){ var topInfoRowArry = topInfoRetn.split("¢Æ"); var retnStr = ""; if(topInfoRowArry.length > 0){ var topInfoKeys = topInfoRowArry[0]; var topInfoColsStr = topInfoRowArry[1]; if(topInfoKeys != "" && topInfoColsStr != ""){ var topInfoKeys = topInfoKeys.split("|"); var topInfoDatas = topInfoColsStr.split("|"); for(var i = 0; i < topInfoKeys.length; i++){ if(topInfoKeys[i] == topKey){ retnStr = topInfoDatas[i]; break; } } }else{ retnStr = ""; } }else{ retnStr = ""; } return retnStr; } // -------------------------------------------------- // ±×¸®µå¿¡¼­ Ä÷³¸íÀ¸·Î Ä÷³idx ã±â // -------------------------------------------------- function fGridfindColIdx(pGrd,colNm) { var iCols = pGrd.Cols; var colFindIdx=1; for( var col = 0; col < iCols; col++ ) { if (pGrd.colAttribute(col,"ref") == colNm) { colFindIdx = col; break; } } return colFindIdx; } // -------------------------------------------------- //switch ÀÛ¾÷ ÅäŬ // -------------------------------------------------- function fSelectedPrgm() { var xPathMainCond = "/root/main/cond"; var flag = model.getValue(xPathMainCond + "/workflag"); switch(flag) { case "cm": btn_sm.selected = true; model.toggle("case_cm"); fGetChemoList();//ÄɸðȯÀÚ¸®½ºÆ® Á¶È¸ break; case "ac": btn_ac.selected = true; model.toggle("case_ac"); fGetActingList(); break; case "om" : btn_om.selected = true; model.setValue("/root/main/cond/wardcd",model.getValue( "/root/main/wardcdinfo/wardcdlist/chemowardcd")); model.setValue("/root/main/cond/orddd",model.getValue( "/root/main/cond/prcpdd")); model.refresh(); model.toggle("case_om"); fGetOMPatList("chemo"); break; case "prn" : btn_om.selected = true; model.setValue("/root/main/cond/wardcd",model.getValue( "/root/main/wardcdinfo/wardcdlist/chemowardcd")); model.setValue("/root/main/cond/orddd",model.getValue( "/root/main/cond/prcpdd")); model.refresh(); model.toggle("case_om"); fSetPrnMode(); fGetOMPatList("chemo"); break; default : model.toggle("case_cm"); fGetChemoList();//ÄɸðȯÀÚ¸®½ºÆ®Á¶È¸ } } // -------------------------------------------------- //chemo ¸ÞÀÎ Á¶È¸ // 20091119 dhkim // ¸ÞÀθ®½ºÆ® Á¶È¸½Ã »ó´ÜÁ¤º¸ ÃʱâÈ­Ãß°¡ // -------------------------------------------------- function fGetChemoList() { //20091119 dhkim //È­¸é»ó´ÜÁ¤º¸ »èÁ¦ //delPatientInfos(); // setGlobalVariable("paminfo", ""); //¿ø¹«Á¤º¸ reset // if(getNodesetCount("/root/main/paminfo") > 0) { // model.removeNodeset("/root/main/paminfo/list"); // } var xPathSend = "/root/send"; var xPathSendReqdata = "/root/send/reqdata"; var row = grd_chemo.row; model.removeNodeset(xPathSend); model.makeNode(xPathSendReqdata); model.makeValue(xPathSendReqdata + "/prcpdd", model.getValue("/root/main/cond/prcpdd")); model.makeValue(xPathSendReqdata + "/pid", model.getValue("/root/main/cond/pid")); model.makeValue(xPathSendReqdata + "/ordseqflag", model.getValue("/root/main/cond/ordseqflag")); //[20081127 dhkim] itc º¯°æ°³¹ß¿äû¿¡ µû¸¥ ÀÔÅð½Ç±¸ºÐ Ãß°¡ //model.makeValue(xPathSendReqdata + "/indschacptstat", model.getValue("/root/main/cond/chemoindschacptstat")); model.makeValue(xPathSendReqdata + "/indschacptstat", model.getValue("/root/main/cond/indschacptstat")); model.makeValue(xPathSendReqdata + "/orddeptcd", model.getValue("/root/main/cond/orddeptcd")); model.makeValue(xPathSendReqdata + "/medispclid", model.getValue("/root/main/cond/medispclid")); model.makeValue(xPathSendReqdata + "/atdoctid", model.getValue("/root/main/cond/atdoctid")); //20090223 dhkim º´µ¿ÄÚµåÁ¶°ÇÃß°¡ //º´µ¿ÀÌ nullÀÌ¸é µðÆúÆ®·Î ·Î±×Àλç¿ëÀںμ­·Î Á¶È¸ var wardcd = model.getValue('/root/main/cond/wardcd'); if(wardcd == null || wardcd == ''){ wardcd = getUserInfo('dutplcecd'); } //20090223 dhkim ÇØ´ç º´µ¿ÀÌ ¼Ò¼ÓµÈ ¼¾ÅÍÀÇ ÄÚµå ÆÄ¶ó¹ÌÅÍ Ãß°¡ model.makeValue(xPathSendReqdata + "/centcd", centcd); //20090223 dhkim ÇØ´ç º´µ¿ ÀÔ¿øÇÑ È¯ÀÚ Á¶È¸ model.makeValue(xPathSendReqdata + "/wardcd", wardcd); //20090407 dhkim //¾Ï¼¾ÅÍÁÖ»ç½Ç°ú BMTÁÖ»ç½Ç ±¸ºÐÀ» Ãß°¡ (¾Ï¼¾ÅÍÁÖ»ç½Ç : Y, BMTÁÖ»ç½Ç :B) model.makeValue(xPathSendReqdata + "/drprcpetc2", drprcpetc2); //20090306 dhkim //Á¶È¸Á¶°Ç¿¡ µî·Ï¹øÈ£°¡ ÀԷµǾî ÀÖÁö ¾ÊÀº°æ¿ì´Â ¼º¸í sexage ÁֹιøÈ£ clear var pid = model.getValue('/root/main/cond/pid'); if(pid == null || pid == ''){ model.setValue('/root/main/cond/hngnm', ''); model.setValue('/root/main/cond/gndrage', ''); model.setValue('/root/main/cond/rrgstno', ''); model.refresh(); } //20090910 dhkim Ç×¾Ï󹿏¸ üũ¹Ú½º Ãß°¡ var indschacptstat = model.getValue('/root/main/cond/indschacptstat'); if(indschacptstat == '4'){ //±¸ºÐÀÌ Åð½Ç¿Ï·á»óÅ·ΠÁ¶È¸½Ã Ç×¾Ï󹿏¸ üũ¹Ú½º üũ»óÅ °­Á¦ÇØÁ¦ model.setValue('/root/main/cond/antcncryn', ''); chk_antcncryn.disabled = true; model.refresh(); chk_antcncryn.deselect(0); chk_antcncryn.refresh(); }else{ chk_antcncryn.disabled = false; } model.makeValue(xPathSendReqdata + '/antcncryn', model.getValue('/root/main/cond/antcncryn')); //20091102 dhkim ³»È¯ÀÚ¼¼ÆÃ Á¶°Ç Ãß°¡ model.makeValue(xPathSendReqdata + '/settingrnid', model.getValue('/root/main/cond/settingrnid')); if(!submit("TRMNI02003")){ messageBox('Ç׾ϸÞÀΠȯÀÚ ¸®½ºÆ® Á¶È¸¸¦ ½ÇÆÐÇÏ¿´½À´Ï´Ù.', 'E999'); return false; }else{ //2010.01.25 dhkim - ÁÖ¼® /* //20091119 dhkim //ȯÀÚ¸®½ºÆ® Á¶È¸ÈÄ »ó´ÜÁ¤º¸¿¡ Àִ ȯÀÚ ÀÚµ¿¼±ÅûóÅ·Πº¯°æÇÑ´Ù. var curRow = fSincMainGridTopInfo(); grd_chemo.row = curRow; */ } var xPath = grd_chemo.nodeset; for( var i=grd_chemo.fixedRows; i ¿äû¹øÈ£ ; 9091) // -------------------------------------------------- function fGetActingList() { //2010.01.25 dhkim ÁÖ¼®Ã³¸® var curRow = grd_chemo.row; /* //20091119 dhkim »ó´ÜÁ¤º¸°¡ ¼¼ÆÃµÈ ȯÀÚÀÇ Ã³¹æ Á¶È¸·Î º¯°æ var curRow = fSincMainGridTopInfo();//»ó´ÜÁ¤º¸¸¦ ¹Þ¾Æ¿Í ÇöÀç row¸¦ Á¶È¸ */ //2010.02.11 dhkim - ¸ÞÀα׸®µå¸¦ »ó´ÜÁ¤º¸ÀÇ È¯ÀÚ·Î ¼¼ÆÃ var curr = fSincMainGridTopInfo(); // alert("chemo row : "+curr); grd_chemo.row = curr; var pGrd = grd_chemo; if (pGrd.row <= 0) { model.removeNodeset("/root/main/actinginfo/actinglist"); //ÀÚ·á°¡ ³ª¿ÀÁö ¾Ê°Ô ÁúÀÇÇϱâ À§Çؼ­ model.removeNodeset("/root/main/actingbasicinfo"); //ÀÚ·á°¡ ³ª¿ÀÁö ¾Ê°Ô ÁúÀÇÇϱâ À§Çؼ­ model.refresh(); return; } var cpgappno = ""; var prtldg = ""; var prcpdd = ""; var sickclsnm = ""; var prtlnm = ""; var prtldg = ""; var prtldg_d = ""; var inptflag = ""; var detstatus = ""; var disp_patnm = ""; var disp_pid = ""; var disp_age = ""; var disp_depthngnm = ""; var disp_orddrnm = ""; var careinrmdd = ""; var wardcd = ""; var wardnm = ""; //2010.01.25 dhkim - »ó´ÜÁ¤º¸ÀÇ È¯ÀÚÁ¤º¸·Î ±×¸®µåÀÇ Ç×¾ÏÇÁ·ÎÅäÄÝ Á¤º¸¸¦ °¡Á®¿Â´Ù. var topInfoRetn = fGetTopInfoToChemoPatInfo(); var pid = getTopInfoKeysIndex(topInfoRetn, "pid"); if(pid == null || pid == ""){ //messageBox("»ó´ÜÁ¤º¸°¡ ¾ø°Å³ª ȯÀÚÁ¤º¸°¡ Á¸ÀçÇÏÁö ¾Ê½À´Ï´Ù.", "E"); //2010.02.11 dhkim - ȯÀÚ¸®½ºÆ®¿¡ ȯÀÚ»ó´Ü¿¡ ÇØ´çµÇ´Â Á¤º¸°¡ ¾øÀ»°æ¿ì »ó´ÜÁ¤º¸ »èÁ¦ÈÄ ¸®ÅÏ delPatientInfos(); //È­¸é»ó´ÜÁ¤º¸ »èÁ¦ setGlobalVariable("paminfo", ""); //¿ø¹«Á¤º¸ reset if(getNodesetCount("/root/main/paminfo") > 0) { model.removeNodeset("/root/main/paminfo/list"); } }else{ cpgappno = getTopInfoKeysIndex(topInfoRetn, "cpgappno"); prtldg = getTopInfoKeysIndex(topInfoRetn, "prtldg"); prcpdd = getTopInfoKeysIndex(topInfoRetn, "prcpdd"); sickclsnm = getTopInfoKeysIndex(topInfoRetn, "sickclsnm"); prtlnm = getTopInfoKeysIndex(topInfoRetn, "prtlnm"); prtldg_d = getTopInfoKeysIndex(topInfoRetn, "prtldg_d"); inptflag = getTopInfoKeysIndex(topInfoRetn, "inptflag"); detstatus = getTopInfoKeysIndex(topInfoRetn, "detstatus"); disp_patnm = getTopInfoKeysIndex(topInfoRetn, "hngnm"); disp_pid = getTopInfoKeysIndex(topInfoRetn, "pid"); disp_age = getTopInfoKeysIndex(topInfoRetn, "age"); disp_depthngnm = getTopInfoKeysIndex(topInfoRetn, "depthngnm"); disp_orddrnm = getTopInfoKeysIndex(topInfoRetn, "orddrnm"); careinrmdd = getTopInfoKeysIndex(topInfoRetn, "careinrmdd"); wardcd = getTopInfoKeysIndex(topInfoRetn, "wardcd"); wardnm = getTopInfoKeysIndex(topInfoRetn, "wardnm"); } //2010.02.11 dhkim actingbasicinfo¸¦ À籸¼º model.removenode("/root/main/actingbasicinfo"); model.makeValue("/root/main/actingbasicinfo/cpgappno", cpgappno); model.makeValue("/root/main/actingbasicinfo/prtldg", prtldg); model.makeValue("/root/main/actingbasicinfo/prcpdd", prcpdd); model.makeValue("/root/main/actingbasicinfo/sickclsnm", sickclsnm); model.makeValue("/root/main/actingbasicinfo/prtlnm", prtlnm); model.makeValue("/root/main/actingbasicinfo/prtldg_d", prtldg_d); model.makeValue("/root/main/actingbasicinfo/inptflag", inptflag); model.makeValue("/root/main/actingbasicinfo/detstatus", detstatus); model.makeValue("/root/main/actingbasicinfo/disp_patnm", disp_patnm); model.makeValue("/root/main/actingbasicinfo/disp_pid", disp_pid); model.makeValue("/root/main/actingbasicinfo/disp_age", disp_age); model.makeValue("/root/main/actingbasicinfo/disp_depthngnm", disp_depthngnm); model.makeValue("/root/main/actingbasicinfo/disp_orddrnm", disp_orddrnm); model.makeValue("/root/main/actingbasicinfo/careinrmdd", careinrmdd); model.makeValue("/root/main/actingbasicinfo/wardcd", wardcd); model.makeValue("/root/main/actingbasicinfo/wardnm", wardnm); /* //20091119 dhkim Áø´Ü¸í, ÇÁ·ÎÅäÄݸí, ȯÀÚ¸í, µî·Ï¹øÈ£, Â÷¼ö, ±¸ºÐ, »óÅ µî display model.setValue("/root/main/actingbasicinfo/cpgappno", cpgappno); model.setValue("/root/main/actingbasicinfo/prtldg", prtldg); model.setValue("/root/main/actingbasicinfo/prcpdd", prcpdd); model.setValue("/root/main/actingbasicinfo/sickclsnm", sickclsnm); model.setValue("/root/main/actingbasicinfo/prtlnm", prtlnm); model.setValue("/root/main/actingbasicinfo/prtldg_d", prtldg_d); model.setValue("/root/main/actingbasicinfo/inptflag", inptflag); model.setValue("/root/main/actingbasicinfo/detstatus", detstatus); model.setValue("/root/main/actingbasicinfo/disp_patnm", disp_patnm); model.setValue("/root/main/actingbasicinfo/disp_pid", disp_pid); model.setValue("/root/main/actingbasicinfo/disp_age", disp_age); model.setValue("/root/main/actingbasicinfo/disp_depthngnm", disp_depthngnm); model.setValue("/root/main/actingbasicinfo/disp_orddrnm", disp_orddrnm); model.setValue("/root/main/actingbasicinfo/careinrmdd", careinrmdd); model.setValue("/root/main/actingbasicinfo/wardcd", wardcd); model.setValue("/root/main/actingbasicinfo/wardnm", wardnm); */ /* //2010.01.25 dhkim - ÁÖ¼®Ã³¸® cpgappno = model.getValue("/root/main/chemoinfo/chemolist["+ curRow + "]/cpgappno"); prtldg = model.getValue("/root/main/chemoinfo/chemolist["+ curRow + "]/prtldg"); prcpdd = model.getValue("/root/main/chemoinfo/chemolist["+ curRow + "]/prcpdd"); //20091119 dhkim Áø´Ü¸í, ÇÁ·ÎÅäÄݸí, ȯÀÚ¸í, µî·Ï¹øÈ£, Â÷¼ö, ±¸ºÐ, »óÅ µî display model.setValue("/root/main/actingbasicinfo/sickclsnm", model.getValue("/root/main/chemoinfo/chemolist[" + curRow + "]/sickclsnm")); model.setValue("/root/main/actingbasicinfo/prtlnm", model.getValue("/root/main/chemoinfo/chemolist[" + curRow + "]/prtlnm")); model.setValue("/root/main/actingbasicinfo/prtldg", model.getValue("/root/main/chemoinfo/chemolist[" + curRow + "]/prtldg")); model.setValue("/root/main/actingbasicinfo/prtldg_d", model.getValue("/root/main/chemoinfo/chemolist[" + curRow + "]/prtldg_d")); model.setValue("/root/main/actingbasicinfo/inptflag", model.getValue("/root/main/chemoinfo/chemolist[" + curRow + "]/inptflag")); model.setValue("/root/main/actingbasicinfo/detstatus", model.getValue("/root/main/chemoinfo/chemolist[" + curRow + "]/detstatus")); model.setValue("/root/main/actingbasicinfo/disp_patnm", model.getValue("/root/main/chemoinfo/chemolist[" + curRow + "]/hngnm")); model.setValue("/root/main/actingbasicinfo/disp_pid", model.getValue("/root/main/chemoinfo/chemolist[" + curRow + "]/pid")); model.setValue("/root/main/actingbasicinfo/disp_age", model.getValue("/root/main/chemoinfo/chemolist[" + curRow + "]/age")); model.setValue("/root/main/actingbasicinfo/disp_depthngnm", model.getValue("/root/main/chemoinfo/chemolist[" + curRow + "]/depthngnm")); model.setValue("/root/main/actingbasicinfo/disp_orddrnm", model.getValue("/root/main/chemoinfo/chemolist[" + curRow + "]/orddrnm")); model.setValue("/root/main/actingbasicinfo/careinrmdd", model.getValue("/root/main/chemoinfo/chemolist[" + curRow + "]/careinrmdd")); model.setValue("/root/main/actingbasicinfo/wardcd", model.getValue("/root/main/chemoinfo/chemolist[" + curRow + "]/wardcd")); model.setValue("/root/main/actingbasicinfo/wardnm", model.getValue("/root/main/chemoinfo/chemolist[" + curRow + "]/wardnm")); */ //var cpgappno = model.getValue("/root/main/chemoinfo/chemolist["+ pGrd.row + "]/cpgappno"); //var prtldg = in_actingprtldg.value; /* //20091119 dhkim ºÒÇÊ¿äÇÑ visible·Î ÆÇ´ÜµÇ¾î ÁÖ¼®Ã³¸®ÇÔ var prcpddidx = fGridfindColIdx(grd_acting,"prcpdd"); var prcpdd = ""; grd_acting.colWidth(prcpddidx) = 0; grd_acting.colHidden(prcpddidx) = true; if (prtldg == "") { //ÇÁ·ÎÅäÄÝ Â÷¼ö°¡¾øÀ» °æ¿ì Àû¿ëÀÏÀÚ¸¦ displayÇÑ´Ù. var prcpdd = ""; grd_acting.colWidth(prcpddidx) = 80; grd_acting.colHidden(prcpddidx) = false; } */ var xPathSend = "/root/send"; var xPathSendReqdata = "/root/send/reqdata"; //Ç×¾Ïó¹æÁ¶È¸½Ã ÇÊ¿äÇÑ key : cpgappno, prcpdd, prtldg model.removeNodeset(xPathSend); model.makeNode(xPathSendReqdata); model.makeValue(xPathSendReqdata + "/cpgappno",cpgappno ); model.makeValue(xPathSendReqdata + "/prcpdd",prcpdd ); model.makeValue(xPathSendReqdata + "/prtldg",prtldg ); submit("TRMNI02004"); var cnt = 0; var nodeCnt = getNodesetCount("/root/main/actinginfo/actinglist"); for( var i = 1; i <= nodeCnt; i++ ) { //------------------(20081006) var saveflag = model.getValue("/root/main/actinginfo/actinglist["+i+"]/saveflag"); if( saveflag == "D" ) {//¹ÝȯÀÎ °æ¿ì ±×¸®µå »ö º¯°æ grd_acting.rowstyle( i , "data", "background-color") = "#FFCCCC"; } else { grd_acting.rowstyle( i , "data", "background-color") = "#FFFFFF"; } //------------------(20081006) if( model.getValue("/root/main/actinginfo/actinglist["+i+"]/chk") == "true" ){ grd_acting.isReadOnly(i,0) = true; cnt++ } //20090407 dhkim ¹Ýȯó¹æÀÇ °æ¿ì üũ¹Ú½º ÇØÁ¦ ¹× ºñȰ¼ºÈ­Ã³¸® else if(saveflag == "D"){ grd_acting.isReadOnly(i,0) = true; } else{ grd_acting.isReadOnly(i,0) = false; } if ( model.getValue("/root/main/actinginfo/actinglist["+i+"]/prtlabsnyn") == "Y" ) { grd_acting.isReadOnly(i,0) = true; grd_acting.rowstyle( i , "data", "background-color") = "#ffbbd5"; } } if( cnt == nodeCnt ) {//All üũ µÇ¾î ÀÖÀ¸¸é grd_acting.fixedcellcheckbox(0,0) = false; } var drugmastspec; var spclcd; for( i = grd_acting.fixedRows; i < grd_acting.rows; i++) { drugmastspec = grd_acting.valueMatrix(i, grd_acting.colRef("drugmastspec")); spclcd = new Array(); spclcd = drugmastspec.split("|"); if(spclcd[13] == "D") { grd_acting.cellStyle("background-color", i, grd_acting.colRef("prcpcd"), i, grd_acting.colRef("prcpcd")) = "#ffff00" } } model.refresh(); } // -------------------------------------------------- //Áø·á¿¹¾àÁ¤º¸/°Ë»ç¿¹¾àÁ¤º¸ DISPLAY // -------------------------------------------------- function fGridReservationInfo() { var pGrd = grd_chemo; var xPathMainCond = "/root/main/cond"; //°ª¼³Á¤ var rsrvinfoflag = model.getValue(xPathMainCond + "/rsrvinfoflag"); if(rsrvinfoflag == 1) model.toggle("case1"); else if(rsrvinfoflag == 2) model.toggle("case2"); //üũ if (pGrd.row <= 0) { //alert("µî·Ï¹øÈ£°¡ Á¸ÀçÇÏÁö ¾Ê½À´Ï´Ù"); messageBox("ÀÚ·á°¡","I004"); model.setValue("/root/main/patdetinfo/rsrvinfocnt/ordrsrvinfocnt","0"); model.setValue("/root/main/patdetinfo/rsrvinfocnt/testrsrvinfocnt","0"); model.removenode("/root/main/patdetinfo/ordrsrvinfo"); model.removenode("/root/main/patdetinfo/testrsrvinfo"); model.refresh(); return; } var ipid = model.getValue("/root/main/chemoinfo/chemolist[" + pGrd.row + "]/pid"); var iorddd= model.getValue("/root/main/chemoinfo/chemolist[" + pGrd.row + "]/prcpdd"); var iorddeptcd = model.getValue("/root/main/chemoinfo/chemolist[" + pGrd.row + "]/orddeptcd"); var iorddrid = model.getValue("/root/main/chemoinfo/chemolist[" + pGrd.row + "]/orddrid"); var xPathSend = "/root/send"; var xPathReqData = "/root/send/reqdata"; model.removeNodeset(xPathSend); model.makeNode(xPathReqData); model.makeValue(xPathReqData + "/ordrsrvinforef/pid", ipid); model.makeValue(xPathReqData + "/ordrsrvinforef/orddd", iorddd); model.makeValue(xPathReqData + "/ordrsrvinforef/orddeptcd", iorddeptcd); model.makeValue(xPathReqData + "/ordrsrvinforef/orddrid", iorddrid); model.makeValue(xPathReqData + "/testrsrvinforef/pid", ipid); model.makeValue(xPathReqData + "/testrsrvinforef/orddd", iorddd); submit("TRMNI02001"); model.refresh(); } //------------------------------------------------------------------------ // chemo_row change ½Ã µÚ È­¸é¿¡ Á¤º¸¸¦ displayÇÔ // desc : - ÀԽǵî·ÏµÇÁö ¾ÊÀº ȯÀÚ Åð½Çµî·Ï¹öư, ȯÀÚÄ«µåÃâ·Â¹öư ºñȰ¼ºÈ­ // - ¼ö³³¿Ï·áµÈ ȯÀÚÀÇ Åð½ÇÃë¼Ò¹öư ºñȰ¼ºÈ­Ã³¸® // 20091119 dhkim // ¸ÞÀθ®½ºÆ®ÀÇ rowChangeÀ̺¥Æ®½Ã¿¡´Â switchÀÇ ¸ÞÀκκи¸ º¯°æÇϵµ·ÏÇÔ // (Ç×¾Ïó¹æÀü¼ÛÈ­¸éÀº Ç×¾Ïó¹æÀü¼Û¹öư Ŭ¸¯ À̺¥Æ®½Ã¿¡ ¼¼ÆÃÇÔ) //------------------------------------------------------------------------ function fGrdChemoRowChange() { var pGrd = grd_chemo; var row = pGrd.row; //20091119 dhkim itc ¿äûÀ¸·Î ÁÙ¹Ù²Þ ½ÇÇà½Ã »ó´Ü¼¼ÆÃ »èÁ¦. ¿äû¹øÈ£(9091) //20090702 dhkim »ó´ÜÁ¤º¸È£Ãâ Ãß°¡ (rowChange½Ã) //fSetPatInfo_chemo() ; //20090123 dhkim //º¯°æ¿äû³»¿ª ¹Ý¿µ itc±è¼÷ÀÎ //ÀԽǵî·ÏÀÌ µÇÁö ¾ÊÀº ȯÀÚ ¼±Åýà Åð½Çµî·Ï ¹öư ºñȰ¼ºÈ­ var calcdd = model.getValue("/root/main/chemoinfo/chemolist[" + row + "]/calcdd"); var calctm = model.getValue("/root/main/chemoinfo/chemolist[" + row + "]/calctm"); if(calcdd != '' && calctm != ''){ btn_outrgst.disabled = false;//ÀԽǵî·Ï µÈ °æ¿ì Åð½Çµî·Ï¹öư Ȱ¼ºÈ­ btn_prnt.disabled = false;//ÀÚµ¿Ãâ·Â(Ä«µåÃâ·Â) }else{ btn_outrgst.disabled = true;//ÀԽǵî·Ï ¾ÈµÈ °æ¿ì Åð½Çµî·Ï¹öư ºñȰ¼ºÈ­ btn_prnt.disabled = true; } //20090122 dhkim //¼ö³³¿Ï·áµÈ ȯÀÚÀÇ Åð½ÇÃë¼Ò¹öư ºñȰ¼ºÈ­ var rcptyn = model.getValue("/root/main/chemoinfo/chemolist[" + row + "]/rcptyn"); if (row <= 0 ) return; //ÀԽǽð£/Åð½Ç½Ã°£ model.setValue("/root/main/careinfo/calcdd",model.getValue("/root/main/chemoinfo/chemolist[" + row + "]/calcdd")); model.setValue("/root/main/careinfo/calctm",model.getValue("/root/main/chemoinfo/chemolist[" + row + "]/calctm")); model.setValue("/root/main/careinfo/caredschrmdd",model.getValue("/root/main/chemoinfo/chemolist[" + row + "]/dschnotidd")); model.setValue("/root/main/careinfo/caredschrmtm",model.getValue("/root/main/chemoinfo/chemolist[" + row + "]/dschnotitm")); //20091119 dhkim //Ç×¾Ïó¹æÀü¼ÛÈ­¸éÀº Ç×¾Ïó¹æÀü¼Û¹öư Ŭ¸¯ À̺¥Æ®½Ã¿¡ ¼¼ÆÃÇϵµ·Ï º¯°æ /* //actingÈ­¸é model.setValue("/root/main/actingbasicinfo/sickclsnm",model.getValue("/root/main/chemoinfo/chemolist[" + row + "]/sickclsnm")); model.setValue("/root/main/actingbasicinfo/prtlnm",model.getValue("/root/main/chemoinfo/chemolist[" + row + "]/prtlnm")); //20090225 dhkim prtldg_d Ãß°¡ (itc¿äû»çÇ×) model.setValue("/root/main/actingbasicinfo/prtldg",model.getValue("/root/main/chemoinfo/chemolist[" + row + "]/prtldg")); model.setValue("/root/main/actingbasicinfo/prtldg_d",model.getValue("/root/main/chemoinfo/chemolist[" + row + "]/prtldg_d")); model.setValue("/root/main/actingbasicinfo/inptflag",model.getValue("/root/main/chemoinfo/chemolist[" + row + "]/inptflag")); model.setValue("/root/main/actingbasicinfo/detstatus",model.getValue("/root/main/chemoinfo/chemolist[" + row + "]/detstatus")); model.setValue("/root/main/actingbasicinfo/disp_patnm",model.getValue("/root/main/chemoinfo/chemolist[" + row + "]/hngnm")); model.setValue("/root/main/actingbasicinfo/disp_pid",model.getValue("/root/main/chemoinfo/chemolist[" + row + "]/pid")); model.setValue("/root/main/actingbasicinfo/disp_age",model.getValue("/root/main/chemoinfo/chemolist[" + row + "]/age")); model.setValue("/root/main/actingbasicinfo/disp_depthngnm",model.getValue("/root/main/chemoinfo/chemolist[" + row + "]/depthngnm")); model.setValue("/root/main/actingbasicinfo/disp_orddrnm",model.getValue("/root/main/chemoinfo/chemolist[" + row + "]/orddrnm")); model.setValue("/root/main/actingbasicinfo/careinrmdd",model.getValue("/root/main/chemoinfo/chemolist[" + row + "]/careinrmdd")); //20090224 dhkim Ãß°¡ model.setValue("/root/main/actingbasicinfo/wardcd", model.getValue("/root/main/chemoinfo/chemolist[" + row + "]/wardcd")); model.setValue("/root/main/actingbasicinfo/wardnm", model.getValue("/root/main/chemoinfo/chemolist[" + row + "]/wardnm")); */ //------------------(20081006) var detstatus = model.getValue("/root/main/chemoinfo/chemolist[" + pGrd.row + "]/detstatus"); //if (detstatus.indexOf('°£È£Åð¿øÈ®Á¤') != -1 ) { //20090122 dhkim //¼ö³³¿©ºÎ Á¶°Ç Ãß°¡ (½É»ç¿Ï·á¾ÈÇÏ°í ¼ö³³¹Ù·ÎÇÑ °æ¿ìc»óÅ·Π³²¾ÆÀÖÀ¸¹Ç·Î Åð½ÇÃë¼Ò¹öư ºñȰ¼ºÈ­Ã³¸®) if(detstatus.indexOf('¨Ï') != -1 && rcptyn == 'Y'){//20081208 dhkim //Åð½ÇÁ¤¸®¿Ï·á»óÅÂ, ¼ö³³¿Ï·á»óÅ //20090216 dhkim //ÀԽǵî·Ï, Åð½Çµî·Ï, Åð½ÇÃë¼Ò ¹öư ºñȰ¼ºÈ­ btn_outcancel.disabled = true;//Åð½ÇÃë¼Ò ºñȰ¼ºÈ­ btn_inrgst.disabled = true;//ÀԽǵî·Ï ºñȰ¼ºÈ­ btn_outrgst.disabled = true;//Åð½Çµî·Ï ºñȰ¼ºÈ­ } else { //Á¤¸®¾ÈµÈ»óÅÂÀ϶§ btn_outcancel.disabled = false;//Åð½ÇÃë¼ÒȰ¼ºÈ­ //20090216 dhkim //ÀԽǵî·Ï, Åð½Çµî·Ï, Åð½ÇÃë¼Ò ¹öư Ȱ¼ºÈ­ btn_inrgst.disabled = false;//ÀԽǵî·Ï Ȱ¼ºÈ­ btn_outrgst.disabled = false;//Åð½Çµî·Ï Ȱ¼ºÈ­ } //------------------(20081006) /*20090209 if(model.getValue("/root/main/actingbasicinfo/careinrmdd") !='') { btn_prnt.disabled = "false"; //ÀÚµ¿Ãâ·Â(Ä«µåÃâ·Â) } else { btn_prnt.disabled = "true"; } */ model.refresh(); } //---------------------------------------------- // acting_row change ½Ã ÀԷºҰ¡ ¿©ºÎ È®ÀÎ //---------------------------------------------- function fGrdActingCheck() { var pGrdCh = grd_chemo; var pGrdAc = grd_acting; var rowCh = pGrdCh.row; var rowAc = pGrdAc.row; if (rowCh <= 0) return; if (rowAc <= 0) return; //Â÷¼ö·Î ºñ±³ var sChemo = model.getValue("/root/main/chemoinfo/chemolist[" + rowCh + "]/prtldg"); var prcpmixno = model.getValue("/root/main/actinginfo/actinglist[" + rowAc + "]/prcpmixno"); var sActing = model.getValue("/root/main/actinginfo/actinglist[" + rowAc + "]/prtldg"); var sRowstart; var sRowend; sRowstart = 1; sRowend = pGrdAc.rows; //ÇöÀç for (var row=sRowstart ; row 0){ messageBox("µ¿ÀÏ ¿¹¾àÀÏ/Áø·á°ú/Áø·áÀÇ·Î ¹Ì¼öÇàµÈ ¿¹¾àÀÌ Á¸ÀçÇÏ¿© ÀÔ½ÇÀúÀåÀÌ ºÒ°¡´É ÇÕ´Ï´Ù.","I"); return false; } } //170306_Ç×¾ÏÁÖ»ç½ÇȯÀÚ_µ¿¸íÀÌÀÎ_üũ_By AYS var chkcnt = 0; var ihngnm = model.getValue(xPathChemoList + "[" + iRow + "]/hngnm"); for(var i= pGrd.fixedRows; i < pGrd.rows; i++) { chknm = pGrd.valueMatrix(i, pGrd.colRef("hngnm")); if(ihngnm == chknm){ chkcnt++; } } if(chkcnt > 1) { var rtn = messageBox("µ¿¸íÀÌÀΠȯÀÚÀÔ´Ï´Ù. ÁøÇàÇϽðڽÀ´Ï±î?", "Q"); if(rtn != "6") { return false; } } //20090227 dhkim //¿ø¹«¿¡ Àü´ÞÇÒ ÆÄ¶ó¹ÌÅͰªÀ» ¾Ï¼¾Åͺ´µ¿¿¡ ÀÔ¿ø½Ãų°æ¿ì C, BMTÁÖ»ç½Çº´µ¿¿¡ ÀÔ¿ø½Ãų°æ¿ì B·Î ³Ñ±ä´Ù //var iflag = "C"; //±¸ºÐÀÚ(»ý¼º) var iflag = ''; // [drprcpetc2] Y : ¾Ï¼¾ÅÍÁÖ»ç½Ç, B : BMTÁÖ»ç½Ç if(drprcpetc2 == 'Y'){ iflag = 'C'; } else if(drprcpetc2 == 'B') { iflag = 'B'; } else { messageBox('¸Þ´º±×·ì¿¡ ÇØ´ç »ç¿ëó°¡ µî·ÏµÇ¾î ÀÖÁö ¾Ê½À´Ï´Ù.', 'E999'); return false; } var scretno = model.getValue(xPathChemoList + "[" + iRow + "]/inptcretno"); //ÀÔ¿ø»ý¼º¹øÈ£ //---------------------------------------------- //0. send ³ëµå»ý¼º(º¸³»´Â instance Á¦°Å) //---------------------------------------------- var xPathSend = "/root/send"; model.removeNodeset(xPathSend); model.makeNode(xPathSend+ "/reqdata"); model.makeNode(xPathSend+ "/senddata"); model.makeNode(xPathSend+ "/savedata"); model.makeValue("/root/send/reqdata2/pid", ipid); model.makeValue("/root/send/reqdata2/orddd", getCurrentDate()); submit("TRMNI02016"); var cnt = model.getValue("/root/tempinfo/bfjudglist/cnt"); if(cnt > 0) { messageBox("´çÀÏ ¿Ü·¡¿¡ »çÀü½É»ç ÁøÇàÁßÀΠó¹æÀÌ Á¸ÀçÇÕ´Ï´Ù. ÀÔ¿øÇϽǼö ¾ø½À´Ï´Ù.", "E"); return; } //---------------------------------------------- // Áø´Ü¸í º¹»ç¸¦ À§ÇÑ Á¤º¸ //---------------------------------------------- var copydiagnmHeader = "instcd¢Ëpid¢Ëorddd_old¢Ëcretno_old¢Ëgenrflagcd_old¢Ëdiagdd¢Ëorddd¢Ëcretno¢Ëgenrflagcd¢Ì"; var copydiagnmData = model.getValue(xPathChemoList + "[" + iRow + "]/instcd") + "¢Ë"//±â°üÄÚµå + model.getValue(xPathChemoList + "[" + iRow + "]/pid") + "¢Ë"//µî·Ï¹øÈ£ + model.getValue(xPathChemoList + "[" + iRow + "]/otptorddd") + "¢Ë"//º¹»çÇÒ Áø·áÀÏÀÚ + model.getValue(xPathChemoList + "[" + iRow + "]/otptcretno") + "¢Ë"//º¹»çÇÒ »ý¼º¹øÈ£ + "O" + "¢Ë"//º¹»çÇÒ È¯ÀÚ±¸ºÐ + getCurrentDate().substring(0, 8) + "¢Ë"//Áø´ÜÀÏ + icalcdd + "¢Ë"//Áø·áÀÏÀÚ + "" + "¢Ë"//»ý¼º¹öÈ£ + "I" + "¢Ì";//¿Ü·¡ÀÔ¿ø±¸ºÐ model.makeValue(xPathSend+ "/diagsave",copydiagnmHeader + copydiagnmData); //---------------------------------------------- //1. ÀçÁ¶È¸¸¦ À§ÇÑ Á¶°Ç //---------------------------------------------- //20090223 dhkim //¼¾ÅÍÄÚµå, º´µ¿ÄÚµå Ãß°¡ var wardcd = model.getValue("/root/main/cond/wardcd"); var reqdataHeader = "prcpdd¢Ëpid¢Ëindschacptstat¢Ëwardcd¢Ëcentcd¢Ì"; var reqdataData = model.getValue("/root/main/cond/prcpdd") + "¢Ë" + model.getValue("/root/main/cond/pid") + "¢Ë" + model.getValue("/root/main/cond/indschacptstat") + "¢Ë" + wardcd + "¢Ë" + centcd + "¢Ì"; model.setValue(xPathSend+ "/reqdata",reqdataHeader + reqdataData); //---------------------------------------------- //2. ÀÔ¿øµî·Ï½Ã »óÅ º¯°æ //---------------------------------------------- var senddataHeader = "cpgappno¢Ëprtldg¢Ëcretno¢Ëpid¢Ëcalcdd¢Ëcalctm¢Ëprtlnm¢Ëinptflag¢Ì"; var senddataData = icpgappno + "¢Ë" + iprtldg + "¢Ë" + icretno + "¢Ë" + ipid + "¢Ë" + icalcdd + "¢Ë" + icalctm + "¢Ë" + prtlnm + "¢Ë" + inptflag + "¢Ì"; model.setValue(xPathSend+ "/senddata",senddataHeader + senddataData); //---------------------------------------------- //3. ÀÔ¿øµî·Ï ¿ø¹« Á¤º¸¸¦ ¹Ý¿µÇÑ´Ù. //---------------------------------------------- var savedataHeader = "pid¢Ëindd¢Ëcareinrmdd¢Ëcareinrmtm¢Ëinsukind¢Ësuppkind¢Ësuppkinresn¢Ëorddeptcd¢Ëorddrid¢Ëuserid¢Ëflag¢Ëcareinrmrgstrid¢Ëcalcdd¢Ëcalctm¢Ëwardcd¢Ëscretno¢Ì"; var savedataData = ipid + "¢Ë" //20090225 dhkim ¼öÁ¤ indd°¡ µé¾î°¡¾ßÇÔ //+ icalcdd + "¢Ë" + iindd + "¢Ë" + icalcdd + "¢Ë" + icalctm + "¢Ë" + iinsukind + "¢Ë" + isuppkind + "¢Ë" + isuppkinresn+ "¢Ë" + iorddeptcd + "¢Ë" + iorddrid + "¢Ë" + iuserid + "¢Ë" + iflag + "¢Ë" + iuserid + "¢Ë" + icalcdd + "¢Ë" + icalctm + "¢Ë" + iwardcd + "¢Ë" + scretno + "¢Ì"; model.setValue(xPathSend+ "/savedata",savedataHeader + savedataData); //common.js¿¡ ÀÖÀ½ //20090224 dhkim //ÀÔ¿øµî·Ï ¸Þ¼¼Áö¸¦ bmt¼¾ÅÍ/¾Ï¼¾ÅÍ È¯ÀÚ ¿©ºÎ¿¡ µû¶ó ´Ù¸£°Ô µî·ÏÇÑ´Ù. var inMsg = ''; var patCentcd = model.getValue(xPathChemoList + "[" + iRow + "]/centcd"); var patCentnm = model.getValue(xPathChemoList + "[" + iRow + "]/centnm"); //20090429 dhkim bmtÀÀ±Þµî·ÏȯÀÚ°¡ ¾Æ´Ñ°æ¿ì¸¸ ¸Þ¼¼Áöº¯°æ var wardcd = model.getValue(xPathChemoList + "[" + iRow + "]/wardcd"); //20090429 dhkim ¾Ï¼¾ÅÍ/bmtÁÖ»ç½Ç¸íĪ ¹× ÄÚµå Àӽú¯¼ö¿¡ ÀúÀå var cncrcd = model.getValue('/root/nursdeptinfo/cncrinfo/nursdeptlist/deptcd');//¾Ï¼¾ÅÍÁÖ»ç½ÇÄÚµå var cncrnm = model.getValue('/root/nursdeptinfo/cncrinfo/nursdeptlist/deptnm');//¾Ï¼¾ÅÍÁÖ»ç½Ç¸í var cncrctcd = model.getValue('/root/nursdeptinfo/cncrinfo/nursdeptlist/centcd');//¾Ï¼¾ÅÍÄÚµå var cncrctnm = model.getValue('/root/nursdeptinfo/cncrinfo/nursdeptlist/centnm');//¾Ï¼¾Å͸í var bmtcd = model.getValue('/root/nursdeptinfo/bmtinfo/nursdeptlist/deptcd');//bmtÁÖ»ç½ÇÄÚµå var bmtnm = model.getValue('/root/nursdeptinfo/bmtinfo/nursdeptlist/deptnm');//bmtÁÖ»ç½Ç¸í var bmtctcd = model.getValue('/root/nursdeptinfo/bmtinfo/nursdeptlist/centcd');//bmt¼¾ÅÍÄÚµå var bmtctnm = model.getValue('/root/nursdeptinfo/bmtinfo/nursdeptlist/centnm');//bmt¼¾Å͸í //20090408 dhkim ÇØ´ç¼±ÅÃµÈ È¯ÀÚÀÇ row¸¦ Àӽú¯¼ö¿¡ ÀúÀå var pidRow = grd_chemo.row; //20090429 dhkim //¾Ï¼¾ÅÍÁÖ»ç½Ç¹× bmtÁÖ»ç½Ç ´ë»óȯÀÚ°¡ ¾Æ´Ñ°æ¿ìÀÇ ¸Þ¼¼Áö // //[¾Ï¼¾ÅÍÁÖ»ç½Ç´ë»óÀÚ°¡ ¾Æ´Ñ°æ¿ì] // 1. ¼¾ÅͰ¡ bmt¼¾ÅÍÀΰæ¿ì // 2. ¼¾ÅͰ¡ bmt¼¾ÅͰ¡ ¾Æ´Ï¸é¼­ º´µ¿Äڵ尡 bmtÁÖ»ç½ÇÀÎ °æ¿ì // //[bmtÁÖ»ç½Ç´ë»óÀÚ°¡ ¾Æ´Ñ°æ¿ì] // 1. ¼¾ÅͰ¡ bmt¼¾ÅͰ¡ ¾Æ´Ñ°æ¿ì // 2. ¼¾ÅͰ¡ bmt¼¾ÅͰ¡ ¾Æ´Ï¸é¼­ º´µ¿Äڵ尡 bmtÁÖ»ç½ÇÀÌ ¾Æ´Ñ°æ¿ì //alert('drprcpetc2-' + drprcpetc2 + ',patCentcd-' + patCentcd + ',bmtctcd-'+ bmtctcd + ',wardcd-' + wardcd + ',bmtcd-' + bmtcd + ',bmtctnm-' + bmtctnm + ',centnm-' + centnm); if(drprcpetc2 == 'Y'){ if((patCentcd == bmtctcd) || (patCentcd != bmtctcd && wardcd == bmtcd)){ inMsg = 'ÇØ´ç ȯÀÚ´Â ' + bmtctnm + ' ȯÀÚ ÀÔ´Ï´Ù. ' + centnm + ' ·Î ÀԽǵî·ÏÀ»'; } else { inMsg = 'ÀԽǵî·ÏÀ»'; } } else if(drprcpetc2 == 'B') { if (patCentcd != bmtctcd && wardcd != bmtcd) { inMsg = 'ÇØ´ç ȯÀÚ´Â ' + cncrctnm + ' ȯÀÚ ÀÔ´Ï´Ù. ' + centnm + ' ·Î ÀԽǵî·ÏÀ»'; } else { inMsg = 'ÀԽǵî·ÏÀ»'; } } /* //20090429 dhkim ÀÌÀü³»¿ë ÁÖ¼®Ã³¸® if(patCentcd != "" && patCentcd != centcd){ //20090408 dhkim ¼¾ÅÍȯÀÚ°¡ ¾Æ´Ñ°æ¿ì ¾Ï¼¾ÅÍ·Î ¼¼ÆÃ if(patCentcd == '-'){ //20090429 dhkim BMTÀÀ±Þµî·ÏȯÀÚ°¡ ¾Æ´Ñ°æ¿ì ¾Ï¼¾ÅÍ·Î ¼¼ÆÃ if(wardcd != bmtcd && wardcd != cncrcd){ //patCentnm = '¾Ï¼¾ÅÍÁÖ»ç½Ç'; //20090429 dhkim ¾Ï¼¾ÅÍÁÖ»ç½Ç ¸íĪ ÇϵåÄÚµù ¼öÁ¤ patCentnm = cncrnm; } } inMsg = 'ÇØ´ç ȯÀÚ´Â ' + patCentnm + ' ȯÀÚ ÀÔ´Ï´Ù. ' + centnm + ' ·Î ÀԽǵî·ÏÀ»'; }else{ inMsg = 'ÀԽǵî·ÏÀ»'; } */ if (messageBox(inMsg, 'Q003') != 6) return false; //-------(20110422) °æºÏ´ë // ¿ø¿Üó¹æÈ®ÀÎ var chkflag = fnoutorderchk(); var chkmsg = ""; var deptsize = getNodesetCount("/root/main/outorderinfo/deptlist"); if (chkflag == "Y" ) { /*chkmsg = "´çÀÏ ¿ø¿Üó¹æÀÌ Á¸ÀçÇÕ´Ï´Ù.\n\n" + "6½Ã°£ÀÌÈÄ ÀÔÅð´ë»ó ȯÀÚÀÏ °æ¿ì\n" + "¹Ýµå½Ã ¿ø¿Üó¹æÀ» D/CÇϽðí\n" + "¿ø³»Ã³¹æÀ¸·Î ´Ù½Ã ó¹æÇÏ¼Å¾ß ÇÕ´Ï´Ù.\n\n";*/ chkmsg = "ó¹æÀüÀÌ Ãâ·ÂµÇÁö ¾ÊÀº ´çÀÏ ¿ø¿Üó¹æÀÌ Á¸ÀçÇÕ´Ï´Ù.\n\n" + "µ¿ÀÏ Áø·á°ú ¿ø¿Üó¹æÀÏ °æ¿ì ¿ø³»Ã³¹æÀ¸·Î º¯°æÇϽðí,\n" + "Ÿ Áø·á°úÀÇ ¿ø¿Üó¹æÀÏ °æ¿ì ¹Ýµå½Ã ó¹æÀüÀ» Ãâ·ÂÇÏ¼Å¾ß ÇÕ´Ï´Ù.\n\n"; //messageBox(chkmsg, 'E999'); var inordeptnm = "¿ø¿Üó¹æ ¹ßÇàºÎ¼­´Â"; for ( i=1; i<=deptsize; i++) { var inor = model.getValue("/root/main/outorderinfo/deptlist[" + i + "]/inorddeptnm"); //alert(inor); inordeptnm = inordeptnm + "\n" + inor; } alert( chkmsg + inordeptnm + " ÀÔ´Ï´Ù" ); //alert(inordeptnm.length); //alert(inordeptnm); return false; //if (messageBox(chkmsg,'Q003',"") != 6) return; } //-------(20110422) °æºÏ´ë //2010.02.01 dhkim - ¼±ÅÃµÈ È¯ÀÚ paramter ¼¼ÆÃ var prt_pid = model.getValue("/root/main/chemoinfo/chemolist[" + pGrd.row + "]/pid"); var prt_hngnm = model.getValue("/root/main/chemoinfo/chemolist[" + pGrd.row + "]/hngnm"); var prt_sexage = model.getValue("/root/main/chemoinfo/chemolist[" + pGrd.row + "]/age"); var prt_depthngnm = model.getValue("/root/main/chemoinfo/chemolist[" + pGrd.row + "]/depthngnm"); var prt_orddrnm = model.getValue("/root/main/chemoinfo/chemolist[" + pGrd.row + "]/orddrnm"); var prt_prtlnm = model.getValue("/root/main/chemoinfo/chemolist[" + pGrd.row + "]/prtlnm"); var prt_instcd = model.getValue("/root/main/chemoinfo/chemolist[" + pGrd.row + "]/instcd"); var prt_prtldg_d = model.getValue("/root/main/chemoinfo/chemolist[" + pGrd.row + "]/prtldg_d"); if (submit("TXMNI02006")== true ) { var instcd = getUserInfo("dutplceinstcd"); if (instcd == '031') { fPreview(prt_pid, prt_hngnm, prt_sexage, prt_depthngnm, prt_orddrnm, prt_prtlnm, prt_instcd, prt_prtldg_d); //ȯÀÚÄ«µåÃâ·Â } else { group1.visible = true; } //20090408 dhkim ÀԽǵî·Ï ÈÄ ÀçÁ¶È¸ fGetChemoList(); //20090408 dhkim ÀԽǵî·Ï ¿Ï·áÈÄ ÇØ´ç ȯÀÚ¸¦ ¼±ÅÃµÈ »óÅ·Πº¯°æ var pid = ""; for(var i = grd_chemo.fixedRows; i < grd_chemo.rows; i++) { pid = grd_chemo.valueMatrix(i, grd_chemo.colRef("pid")); if(pid == ipid) { pidRow = i; break; } } grd_chemo.row = pidRow; grd_chemo.refresh(); var patnm = model.getValue('/root/main/chemoinfo/chemolist[' + grd_chemo.row + ']/hngnm'); var pid = model.getValue('/root/main/chemoinfo/chemolist[' + grd_chemo.row + ']/pid'); model.removenode('/root/temp/patnm'); model.removenode('/root/temp/pid'); model.makeValue('/root/temp/patnm', '"' +patnm + '" ´Ô'); model.makeValue('/root/temp/pid', pid); model.refresh(); fSetPatInfo_chemo(); // 20110929 wify °æºÏ´ëº´¿ø ȯÀÚ ¿Ü·¡ ´ýÇÁó¹æÀÌ ¼±ÅÃÁø·áÀÎÁö ¿©ºÎ È®ÀÎ; model.removenode("/root/send/chkdata"); model.makeValue("/root/send/chkdata/pid", model.getValue("/root/main/chemoinfo/chemolist[" + pGrd.row + "]/pid")); model.makeValue("/root/send/chkdata/execdd", model.getValue("/root/main/cond/prcpdd")); submit("TRMNI02042"); if (model.getValue("/root/temp/chkdata/choiyn") == "Y") { fCheckSpecOrdSign(); } // Ç׾ϵ¿ÀǼ­ È®ÀÎ 2012.06.18 KJS // Ç×¾ÏÇÁ·ÎÅäÄÝ Á¾·ù var pid = model.getValue('/root/main/chemoinfo/chemolist[' + grd_chemo.row + ']/pid'); var appdd = model.getValue('/root/main/chemoinfo/chemolist[' + grd_chemo.row + ']/prcpdd'); var prtlcd = model.getValue('/root/main/chemoinfo/chemolist[' + grd_chemo.row + ']/prtlcd'); model.removenode("/root/send/xproto") model.makeValue("/root/send/xproto/pid", pid); model.makeValue("/root/send/xproto/appdd", appdd); model.makeValue("/root/send/xproto/prtlcd", prtlcd); submit("TRMNI02014"); var xappdd = model.getValue("/root/temp/xprotcnt/xappdd"); model.makeValue("/root/send/xproto/xappdd", xappdd); submit("TRMNI02015"); var cnt = model.getValue("/root/temp/xprotcnt/cnt"); if (cnt < 1){ if (xappdd == 'N') { messageBox("ÇØ´ç ÇÁ·ÎÅäÄÝ¿¡ ´ëÇÑ Ç×¾ÏÈ­ÇÐ µ¿ÀǼ­°¡ ¾øÀ¸´Ï ´Ù½Ã È®ÀÎÇØÁֽñ⠹ٶø´Ï´Ù.","I999"); } else { messageBox("Ç×¾Ï ÇÁ·ÎÅäÄÝÀÌ ´Þ¶óÁ³À¸´Ï µ¿ÀǼ­¸¦ »õ·Î ¹Þ¾ÆÁֽñ⠹ٶø´Ï´Ù.","I999"); } } // fGetPrcpSetList(); // if(grd_prcplist2.rows > 0) { // fSavePrcpInfo(); // } else { // } return true; } else { //alert("ÀúÀå½ÇÆÐ"); messageBox("ÀÔ¿øµî·ÏÀÌ ","E009"); //½ÇÆÐÇÏ¿´½À´Ï´Ù. fGetChemoList(); return false; } } //---------------------------------------------- //Åð½ÇÀúÀå //---------------------------------------------- //20090224 dhkim //flagÃß°¡ - flag °¡ gridÀÎ °æ¿ì´Â ±×¸®µå¿¡¼­ ¿À¸¥ÂÊ ¸¶¿ì½º·Î µé¾î¿Â °æ¿ìÀÓ function fdschSave(flag) { var pGrd = grd_chemo; var xPathChemoList = "/root/main/chemoinfo/chemolist"; //---------------------------------------------- //üũ //---------------------------------------------- if (pGrd.rows <= 1 || pGrd.row <= 0 ) { messageBox("ÀÚ·á°¡","I004"); //¾ø½À´Ï´Ù. return; } //20090224 dhkim //ó¹æÀü¼Û ¸Þ¼¼Áö¸¦ ȯÀÚÀÇ ÀԽǵȺ´µ¿°ú Á¶È¸µÈ º´µ¿ÀÌ ´Ù¸¦°æ¿ì blockingÇÑ´Ù. var sendMsg = ''; var wardcd = model.getValue("/root/main/chemoinfo/chemolist[" + pGrd.row + "]/wardcd"); var wardnm = model.getValue("/root/main/chemoinfo/chemolist[" + pGrd.row + "]/wardnm"); if(wardcd != suppdeptcd){ messageBox('ÇØ´ç ȯÀÚ´Â ' + wardnm + ' ȯÀÚ ÀÔ´Ï´Ù. ' + suppdeptnm + ' ¿¡ ÀÔ½ÇµÈ È¯ÀÚ¸¸ Åð½Çµî·Ï °¡´ÉÇÕ´Ï´Ù.', 'E999'); //Åð½ÇÀϽÃ, Åð½Ç½Ã°£ ÃʱâÈ­ model.setValue('/root/main/careinfo/caredschrmdd', ''); model.setValue('/root/main/careinfo/caredschrmtm', ''); model.refresh(); return; } //20110923 wify °æºÏ´ëº´¿ø ¼±ÅÃÁø·á °ü·Ã Ãß°¡ fChkSpecOrdPrt(); //20090306 dhkim //Åð½Çµî·ÏÀº Åð¿ø¿¹°í, º´µ¿ÀÔ¿ø½ÂÀγ­ ȯÀÚ¸¸ ÇÒ°Í var detstatus = model.getValue("/root/main/chemoinfo/chemolist[" + pGrd.row + "]/detstatus"); //alert(model.getValue("/root/main/chemoinfo/chemolist[" + pGrd.row + "]/dschnotidd")); //alert(detstatus); //alert(detstatus.indexOf('¨Ð')); //alert(detstatus.indexOf('¡á')); if(detstatus.indexOf('¨Ð') == -1 && detstatus.indexOf('¡á') == -1 ) { messageBox('ȯÀÚÀÇ ±¸ºÐÀÌ ¨Ð(Åð¿ø¿¹°í)À̰ųª ¡á(º´µ¿ÀÔ¿ø½ÂÀÎ) »óÅÂÀÏ ¶§¿¡¸¸ Åð½Çµî·Ï °¡´ÉÇÕ´Ï´Ù.', 'E999'); return; } //20090224 dhkim //flagÃß°¡ÇÔ. //±×¸®µå¿¡¼­ ¿À¸¥ÂÊ ¸¶¿ì½º Ŭ¸¯ÇÏ¿© µé¾î¿Â °æ¿ì if(flag == 'grid'){ //20090123 dhkim //itc±è¼÷ÀÎ º¯°æ¿äû»çÇ× ¹Ý¿µ //ÀԽǽð¢ÀÌ ÀԷµÇÁö ¾ÊÀº »óÅ¿¡¼­ ¿À¸¥ÂÊ ¸¶¿ì½ºÀÇ Åð½ÇÁ¤¸® ¼±Åýà [ÀÔ½Çüũ ÈÄ Åð½ÇÁ¤¸®°¡ °¡´ÉÇÕ´Ï´Ù.]¶ó´Â blocking¸Þ½ÃÁö¿Í ÇÔ²² Åð½ÇÁ¤¸® blockingÇÔ. var calcdd = model.getValue("/root/main/careinfo/calcdd"); var calctm = model.getValue("/root/main/careinfo/calctm"); if(calcdd == '' || calctm == ''){ messageBox('ÀÔ½Çüũ ÈÄ Åð½ÇÁ¤¸®°¡ °¡´ÉÇÕ´Ï´Ù.', 'E999'); return; } //Åð½ÇÀÏÀÚ, ½Ã°£ÀÌ ¾øÀ¸¸é ÇöÀç ÀϽ÷Π¼ÂÆÃ if( (model.getValue("/root/main/careinfo/caredschrmdd") == "")||(model.getValue("/root/main/careinfo/caredschrmtm") == "") ) { in_dschdd.value = getCurrentDate(); //Åð½ÇÀÏÀÚ in_dschtm.value = getCurrentTime().substring(0,4); //Åð½Ç½Ã°£ } } /* if (model.getValue("/root/main/chemoinfo/chemolist[" + pGrd.row + "]/dschnotidd") != "") { //alert("Åð½ÇÀÌÀü ȯÀÚ¸¸ Åð½ÇÀÌ °¡´É ÇÕ´Ï´Ù"); //--(20080123Ãß°¡) //if ( detstatus.indexOf('Á¤»ê¿Ï·á') != -1 || // detstatus.indexOf('½É»çÁß') != -1 || // detstatus.indexOf('°£È£Åð¿øÈ®Á¤') != -1 ) { // 20081208 dhkim ¸íĪº¯°æ /* if ( detstatus.indexOf('¨Ò') != -1 || detstatus.indexOf('¨Õ') != -1 || detstatus.indexOf('¨Ï') != -1 ) { * / if ( detstatus != '¨Ò' && detstatus != '¨Õ' && detstatus != '¨Ï' ) { if(messageBox ( "°£È£Åð¿øÈ®Á¤ÀÌ ÁøÇàµÇ¾ú½À´Ï´Ù ", "Q003" ) == "6") { //°è¼ÓÁøÇàÇϽðڽÀ´Ï±î? } else { return; } } } //--------------------(20080930) */ var ipid = model.getValue("/root/main/chemoinfo/chemolist[" + pGrd.row + "]/pid"); //µî·Ï¹øÈ£ var iindd = model.getValue("/root/main/chemoinfo/chemolist[" + pGrd.row + "]/prcpdd"); //ÀÔ¿øÀÏÀÚ var icretno = model.getValue("/root/main/chemoinfo/chemolist[" + pGrd.row + "]/inptcretno"); //ÀÔÅð¿ø³»¿ª»ý¼º¹øÈ£ var icaredschdd = model.getValue("/root/main/careinfo/caredschrmdd"); //Åð½ÇÀϽà var icaredschtm = model.getValue("/root/main/careinfo/caredschrmtm"); //Åð½Ç½Ã°£ var iprtldg = model.getValue("/root/main/chemoinfo/chemolist[" + pGrd.row + "]/prtldg"); //ÇÁ·ÎÅäÄÝÂ÷¼ö var icpgappno = model.getValue("/root/main/chemoinfo/chemolist[" + pGrd.row + "]/cpgappno"); //CPGÀû¿ë¹øÈ£ var prtlnm = model.getValue(xPathChemoList + "[" + pGrd.row + "]/prtlnm"); //---------------------------------------------- // º¸³»´Â instance Á¦°Å //---------------------------------------------- var xPathSend = "/root/send"; model.removeNodeset("/root/send"); model.makeNode(xPathSend+ "/reqdata"); model.makeNode(xPathSend+ "/senddata"); //---------------------------------------------- //1. ÀçÁ¶È¸¸¦ À§ÇÑ Á¶°Ç //---------------------------------------------- //20090306 dhkim //¼¾ÅÍÄÚµå, º´µ¿ÄÚµå Ãß°¡ var wardcd = model.getValue("/root/main/cond/wardcd"); var reqdataHeader = "prcpdd¢Ëpid¢Ëindschacptstat¢Ëwardcd¢Ëcentcd¢Ì"; var reqdataData = model.getValue("/root/main/cond/prcpdd") + "¢Ë" + model.getValue("/root/main/cond/pid") + "¢Ë" + model.getValue("/root/main/cond/indschacptstat") + "¢Ë" + wardcd + "¢Ë" + centcd + "¢Ì"; /* //---------------------------------------------- //1. ÀçÁ¶È¸¸¦ À§ÇÑ Á¶°Ç //---------------------------------------------- var reqdataHeader = "prcpdd¢Ëpid¢Ëindschacptstat¢Ì"; var reqdataData = model.getValue("/root/main/cond/prcpdd") + "¢Ë" + model.getValue("/root/main/cond/pid") + "¢Ë" + model.getValue("/root/main/cond/indschacptstat")+ "¢Ì"; */ model.setValue(xPathSend+ "/reqdata",reqdataHeader+reqdataData); //---------------------------------------------- //2. Åð½Çµî·Ï½Ã »óꝰæ //---------------------------------------------- var senddataHeader = "pid¢Ëindd¢Ëcretno¢Ëdschnotidd¢Ëdschnotitm¢Ëprtldg¢Ëcpgappno¢Ëprtlnm¢Ì"; var senddataData = ipid + "¢Ë" + iindd + "¢Ë" + icretno + "¢Ë" + icaredschdd + "¢Ë" + icaredschtm + "¢Ë" + iprtldg + "¢Ë" + icpgappno + "¢Ë" + prtlnm + "¢Ì"; model.setValue(xPathSend+ "/senddata",senddataHeader+senddataData); //-------(20110422) °æºÏ´ë //6½Ã°£ ÀÌ»óÀΠȯÀÚ¿¡ ´ëÇØ¼­ Åð½Ç½Ã check var chkflag0 = fnChemoIOChk(); var chkmsg = ""; /* if (chkflag0 == "I" ) { // ¿ø¿Üó¹æÃ¼Å© var chkflag = fnoutorderchk(); var chkmsg = ""; var deptsize = getNodesetCount("/root/main/outorderinfo/deptlist"); if (chkflag == "Y" ) { chkmsg = "´çÀÏ ¿ø¿Üó¹æÀÌ Á¸ÀçÇÕ´Ï´Ù.\n\n" + "6½Ã°£ÀÌÈÄ ÀÔÅð´ë»ó ȯÀÚÀÏ °æ¿ì\n" + "¹Ýµå½Ã ¿ø¿Üó¹æÀ» D/CÇϽðí\n" + "¿ø³»Ã³¹æÀ¸·Î ´Ù½Ã ó¹æÇÏ¼Å¾ß ÇÕ´Ï´Ù.\n\n"; // messageBox(chkmsg, 'E999'); var inordeptnm = "¿ø¿Üó¹æ ¹ßÇàºÎ¼­´Â"; for ( i=1; i<=deptsize; i++) { var inor = model.getValue("/root/main/outorderinfo/deptlist[" + i + "]/inorddeptnm"); //alert(inor); inordeptnm = inordeptnm + "\n" + inor; } alert( chkmsg + inordeptnm + " ÀÔ´Ï´Ù" ); return; } } else if (chkflag0 == "" ) { chkmsg = "ÀÔ½ÇÀϽà ¶Ç´Â Åð½ÇÀϽð¡ Á¤È®ÇÏÁö ¾Ê½À´Ï´Ù.\n" + "È®ÀÎÇϽñ⠹ٶø´Ï´Ù"; messageBox(chkmsg, 'E999'); return; } */ if (chkflag0 == "" ) { chkmsg = "ÀÔ½ÇÀϽà ¶Ç´Â Åð½ÇÀϽð¡ Á¤È®ÇÏÁö ¾Ê½À´Ï´Ù.\n" + "È®ÀÎÇϽñ⠹ٶø´Ï´Ù"; messageBox(chkmsg, 'E999'); return; } else { // ¿ø¿Üó¹æÃ¼Å© var chkflag = fnoutorderchk(); var chkmsg = ""; var deptsize = getNodesetCount("/root/main/outorderinfo/deptlist"); if (chkflag == "Y" ) { chkmsg = "ó¹æÀüÀÌ Ãâ·ÂµÇÁö ¾ÊÀº ´çÀÏ ¿ø¿Üó¹æÀÌ Á¸ÀçÇÕ´Ï´Ù.\n\n" + "µ¿ÀÏ Áø·á°ú ¿ø¿Üó¹æÀÏ °æ¿ì ¿ø³»Ã³¹æÀ¸·Î º¯°æÇϽðí,\n" + "Ÿ Áø·á°úÀÇ ¿ø¿Üó¹æÀÏ °æ¿ì ¹Ýµå½Ã ó¹æÀüÀ» Ãâ·ÂÇÏ¼Å¾ß ÇÕ´Ï´Ù.\n\n"; var inordeptnm = "¿ø¿Üó¹æ ¹ßÇàºÎ¼­´Â"; for ( i=1; i<=deptsize; i++) { var inor = model.getValue("/root/main/outorderinfo/deptlist[" + i + "]/inorddeptnm"); inordeptnm = inordeptnm + "\n" + inor; } alert( chkmsg + inordeptnm + " ÀÔ´Ï´Ù" ); return; } } //-------(20110422) °æºÏ´ë //common.js¿¡ ÀÖÀ½ // 150818_Ç×¾ÏÁÖ»ç½Ç ¿äû¿¡ ÀÇÇÑ ÁÖ¼®Ã³¸® //if (messageBox("Åð½Çµî·Ï",'Q003',"") != 6) return; if (submit("TXMNI02008") ) { //alert("Åð½ÇÁ¤º¸°¡ ¹Ý¿µµÇ¾ú½À´Ï´Ù"); // 150818_Ç×¾ÏÁÖ»ç½Ç ¿äû¿¡ ÀÇÇÑ ÁÖ¼®Ã³¸® // messageBox("ÀÔ·ÂÇÑ Åð½ÇÀÏÀÚ¿Í Åð½Ç½Ã°£ÀÌ ¹Ý¿µ","I001"); //open("SMMNW01200","1","20","128"); //Åð½ÇÁ¤¸®ÇÁ·Î±×·¥ È£Ãâ model.removeNodeset("/root/temp/param"); model.makeNode("/root/temp/param"); //alert(wardcd); //model.makeValue("/root/temp/param/wardcd",model.getValue("/root/main/wardcdinfo/wardcdlist/chemowardcd" )); model.makeValue("/root/temp/param/wardcd", wardcd); open("SMMNI02010", "", "", "", "SMMNI02010", "/root/temp/param/wardcd", "/root/temp/param/wardcd"); //modal("SMMNI02010" ,"", "", "", "SMMNI02010"); //¸ÞÀÎÀçÁ¶È¸ //fInqurySelectedPrgm(); } else { //alert("ÀúÀå½ÇÆÐ"); messageBox("Åð½Çµî·Ï","E009"); } } //---------------------------------------------- // ó¹æÀü¼Û //---------------------------------------------- function fActing() { //¼±ÅûçÇ×À» ÀúÀåÇÑ´Ù. var pGrdAc = grd_acting; var pGrdCh = grd_chemo; var xPathChemoList = "/root/main/chemoinfo/chemolist"; var checkmessage = "Y"; var iRows = -1; var chkflag; var cnt = 0; var FlagInfoData = ""; var RgstInfoData = ""; var PrcpInfoData = ""; var SignInfoData = ""; //---------------------------------------------- //Àüüüũ±â´É(Ãß°¡ÇؾßÇÔ) //---------------------------------------------- var rowCh = pGrdCh.row; //alert(model.getValue(xPathChemoList+ "[" + grd_chemo.row + "]/pid") + " , " + model.getValue(xPathChemoList+ "[" + grd_chemo.row + "]/hngnm") ); if (pGrdCh.rows <= 1 || pGrdCh.row <= 0 ) { //alert("ÀÚ·á°¡ Á¸ÀçÇÏÁö ¾Ê½À´Ï´Ù"); messageBox("ÀÚ·á°¡","I004"); //¾ø½À´Ï´Ù. return; } //-------------(20080930) var detstatus = model.getValue(xPathChemoList + "[" + pGrdCh.row + "]/detstatus"); //if (model.getValue(xPathChemoList + "[" + pGrdCh.row + "]/detstatus") != "Àç¿ø") { //---------------------(20081006) //Åð¿ø¿¹°íȯÀÚµµ ó¹æÀü¼ÛÇÒ ¼ö ÀÖµµ·Ï ÇÔ //if (detstatus.indexOf('Àç¿ø') == -1) { // messageBox("Àç¿øÈ¯ÀÚÀܴ̿ ó¸®","E001"); //ÇÒ¼ö ¾ø½À´Ï´Ù. // return; //} //---------------------(20081006) //20081208 dhkim ÁÖ¼® if (model.getValue(xPathChemoList + "[" + pGrdCh.row + "]/inptflag") != "½Ç") { //alert(model.getValue(xPathChemoList + "[" + pGrdCh.row + "]/inptflag")); messageBox("ÀÔ½ÇȯÀÚÀܴ̿ ó¹æ¹ß»ý","E001"); return; } //if (model.getValue(xPathChemoList + "[" + pGrdCh.row + "]/detstatus") == "Åð½Ç") { //20081208 dhkim ÁÖ¼® //if (detstatus.indexOf('Åð½Ç') != -1) { if (detstatus.indexOf('Åð½Ç') != -1) { messageBox("Åð½ÇȯÀÚ´Â","E001"); return; } //alert("test--------------------20081006"); //----------------------(20080930) //---------------------------------------------- //ÃʱâÈ­ //---------------------------------------------- var xPathSend = "/root/send"; model.removeNodeset(xPathSend); model.makeNode(xPathSend + "/reqdata"); //ÀúÀ屸ºÐÁ¤º¸(saveFlagInfoVO) model.makeNode(xPathSend + "/senddata"); //ÀúÀåµî·ÏÁ¤º¸(saveRgstInfoVO) // model.makeNode(xPathSend + "/inptdata"); //ÀúÀåó¹æÁ¤º¸(savePrcpInfoVO) model.makeNode(xPathSend + "/savedata"); //ÀúÀåÀÎÁõÁ¤º¸(saveSignInfoVO) model.makeNode(xPathSend + "/savedata/saveflaginfo"); //ÀúÀ屸ºÐÁ¤º¸(saveFlagInfoVO) model.makeNode(xPathSend + "/savedata/savergstinfo"); //ÀúÀåµî·ÏÁ¤º¸(saveRgstInfoVO) model.makeNode(xPathSend + "/savedata/saveprcpinfo"); //ÀúÀåó¹æÁ¤º¸(savePrcpInfoVO) model.makeNode(xPathSend + "/savedata/savesigninfo"); //ÀúÀåÀÎÁõÁ¤º¸(saveSignInfoVO) //---------------------------------------------- //***** ÀúÀå ÈÄ Á¶È¸Á¶°Ç //---------------------------------------------- var cpgappno = model.getValue("/root/main/chemoinfo/chemolist[" + pGrdCh.row + "]/cpgappno"); //¹øÈ£ var prtldg = in_actingprtldg.value;//ÇöÀçÂ÷¼ö //alert('ÇöÀçÂ÷¼ö: ' + prtldg); var reqdataHeader = "cpgappno¢Ëprcpdd¢Ëprtldg¢Ëlastprtldg¢Ì"; var reqdataData = cpgappno + "¢Ë"//ó¹æÀü¼Û¹øÈ£ + "" + "¢Ë"//ó¹æÀÏÀÚ + prtldg + "¢Ì";//ÇöÀçÂ÷¼ö model.setValue(xPathSend + "/reqdata",reqdataHeader+reqdataData); // model.makeValue(xPathSend + "/reqdata/cpgappno",cpgappno); // model.makeValue(xPathSend + "/reqdata/prtldg",prtldg); //---------------------------------------------- //***** ÀúÀ屸ºÐÁ¤º¸(saveFlagInfoVO):ÀÔ¿øÃ³¹æ //---------------------------------------------- var deptcd = ""; //ºÎ¼­ÄÚµå var deptnm = ""; //ºÎ¼­¸í var ordtype = "D" ; //ȯÀÚÁø·áÇüÅÂ(¿Ü·¡ O, ÀÀ±Þ E ,ÀÔ¿ø I) deptcd = getUserInfo("posdeptcd"); // "1000000000"; //getUserInfo("posdeptcd");(Å×½ºÆ®¿ë) deptnm = getUserInfo("posdeptnm"); //"1000000000"; //getUserInfo("posdeptnm");(Å×½ºÆ®¿ë) //alert(deptcd + "/" + deptnm); //---------------------------------------------- //ÀÚ·á»ý¼º //---------------------------------------------- // if (model.getValue("/root/main/prcpposinfo/cond/poscd") == '1') { //ȯÀÚÀ§Ä¡ // deptcd = model.getValue("/root/main/cond/wardcd"); // deptnm = model.getValue("/root/init/deptinfo/deptlist[deptcd = '" + model.getValue("/root/main/cond/wardcd") + "']/depthngnm"); // } else { //UserÀ§Ä¡ // deptcd = model.getValue("/root/main/prcpposinfo/cond/deptcd"); // deptnm = model.getValue("/root/init/deptinfo/deptlist[deptcd = '" + model.getValue("/root/main/prcpposinfo/cond/deptcd") + "']/depthngnm"); // } var FlagInfoHeader = "savedataflag¢Ësaveflag¢Ëprcpflag¢Ëinptflag¢Ëpamflag¢Ëdiagflag¢Ëprcperrflag¢Ëdeptcd¢Ëdeptnm¢Ëuserid¢Ëusernm¢Ësignyn¢Ì"; //------------------(20080812) // FlagInfoData = '2' +"¢Ë" //ÀúÀåÀڷᱸºÐ (2:ó¹æ) // + ordtype +"¢Ë" //ÀúÀ屸ºÐ (O:¿Ü·¡, I:ÀÔ¿ø, E:ÀÀ±Þ, S:°ÇÁø) // + '1' +"¢Ë" //󹿱¸ºÐ(M0035 󹿱ÇÇÑ¿¡ ´ëÇÑ ±¸ºÐÁ¾·ù : °£È£ Ãß°¡Ã³¹æ)(1:ÀÇ»ç+°£È£Ã³¹æ,2:°£È£Ãß°¡Ã³¹æ) // + '09' +"¢Ë" //ÀԷ±¸ºÐ(M0034 ó¹æÀԷ¿¡ ´ëÇÑ ±¸ºÐÁ¾·ù : °£È£Ã³¹æ)(09:°£È£Ã³¹æ) // + 'Y' +"¢Ë" //¿ø¹«Á¤º¸ 󸮱¸ºÐ (Y/N)(Y:¿ø¹«ÀÚ·áüũ) // + 'N' +"¢Ë" //Áø´ÜÁ¤º¸ 󸮱¸ºÐ (Y/N)(N:Áø·áÀÚ·áüũÇÏÁö ¾ÊÀ½) // + 'Y' +"¢Ë" //ó¹æ¿À·ù±¸ºÐ(Y/N) -> YÀÏ °æ¿ì ÀÇ»ç󹿰ú µ¿ÀÏÇÏ°Ô ¿À·ù¸®½ºÆ®¸¦ ¹Ýȯ, NÀÌ¸é ¿À·ù¸¦ È®ÀÎÇÏÁö ¾ÊÀ½ // + deptcd +"¢Ë" //ºÎ¼­ÄÚµå (ÀÔ·ÂÀÚ ¶Ç´Â ·Î±×ÀÎÇÑ »ç¿ëÀÚÀÇ ºÎ¼­ÄÚµå) // + deptnm +"¢Ë" //ºÎ¼­¸í (ÀÔ·ÂÀÚ ¶Ç´Â ·Î±×ÀÎÇÑ »ç¿ëÀÚÀÇ ºÎ¼­¸í) // + getUserId() +"¢Ë" //»ç¿ëÀÚID (ÀÔ·ÂÀÚ ¶Ç´Â ·Î±×ÀÎÇÑ »ç¿ëÀÚID) // + getUserName() +"¢Ë" //»ç¿ëÀÚ¸í (ÀÔ·ÂÀÚ ¶Ç´Â ·Î±×ÀÎÇÑ »ç¿ëÀÚ¸í) // + 'N' +"¢Ì"; //ÀüÀÚ¼­¸í¿©ºÎ (Y/N)(ÀÏ´ÜN) //------------------ //---------------------------------------------- //***** ÀúÀåµî·ÏÁ¤º¸(saveRgstInfoVO) //---------------------------------------------- var xPathMainChemo = "/root/main/chemoinfo/chemolist"; var nowrow = pGrdCh.row //------------------(20080827) //°£È£»ç Á¤º¸¿¡¼­ Áø·á°ú , ÁÖÄ¡ÀÇ·Î ¹Ý¿µÇÔ var tdeptcd = model.getValue(xPathMainChemo+ "[" + nowrow + "]/orddeptcd"); var tdeptnm = model.getValue(xPathMainChemo+ "[" + nowrow + "]/depthngnm"); var tuserid = model.getValue(xPathMainChemo+ "[" + nowrow + "]/orddrid"); var tusernm = model.getValue(xPathMainChemo+ "[" + nowrow + "]/orddrnm"); FlagInfoData = '2' +"¢Ë" //ÀúÀåÀڷᱸºÐ (2:ó¹æ) + ordtype +"¢Ë" //ÀúÀ屸ºÐ (O:¿Ü·¡, I:ÀÔ¿ø, E:ÀÀ±Þ, S:°ÇÁø) + '1' +"¢Ë" //󹿱¸ºÐ(M0035 󹿱ÇÇÑ¿¡ ´ëÇÑ ±¸ºÐÁ¾·ù : °£È£ Ãß°¡Ã³¹æ)(1:ÀÇ»ç+°£È£Ã³¹æ,2:°£È£Ãß°¡Ã³¹æ) + '09' +"¢Ë" //ÀԷ±¸ºÐ(M0034 ó¹æÀԷ¿¡ ´ëÇÑ ±¸ºÐÁ¾·ù : °£È£Ã³¹æ)(09:°£È£Ã³¹æ) + 'Y' +"¢Ë" //¿ø¹«Á¤º¸ 󸮱¸ºÐ (Y/N)(Y:¿ø¹«ÀÚ·áüũ) + 'N' +"¢Ë" //Áø´ÜÁ¤º¸ 󸮱¸ºÐ (Y/N)(N:Áø·áÀÚ·áüũÇÏÁö ¾ÊÀ½) + 'Y' +"¢Ë" //ó¹æ¿À·ù±¸ºÐ(Y/N) -> YÀÏ °æ¿ì ÀÇ»ç󹿰ú µ¿ÀÏÇÏ°Ô ¿À·ù¸®½ºÆ®¸¦ ¹Ýȯ, NÀÌ¸é ¿À·ù¸¦ È®ÀÎÇÏÁö ¾ÊÀ½ + tdeptcd +"¢Ë" //ºÎ¼­ÄÚµå (ÀÔ·ÂÀÚ ¶Ç´Â ·Î±×ÀÎÇÑ »ç¿ëÀÚÀÇ ºÎ¼­ÄÚµå) + tdeptnm +"¢Ë" //ºÎ¼­¸í (ÀÔ·ÂÀÚ ¶Ç´Â ·Î±×ÀÎÇÑ »ç¿ëÀÚÀÇ ºÎ¼­¸í) + tuserid +"¢Ë" //»ç¿ëÀÚID (ÀÔ·ÂÀÚ ¶Ç´Â ·Î±×ÀÎÇÑ »ç¿ëÀÚID) + tusernm +"¢Ë" //»ç¿ëÀÚ¸í (ÀÔ·ÂÀÚ ¶Ç´Â ·Î±×ÀÎÇÑ »ç¿ëÀÚ¸í) + 'N' +"¢Ì"; //ÀüÀÚ¼­¸í¿©ºÎ (Y/N)(ÀÏ´ÜN) //------------------(20080827) var pid = model.getValue(xPathMainChemo+ "[" + nowrow + "]/pid") ; //µî·Ï¹øÈ£ var orddd = "-"; //Áø·áÀÏÀÚ(¿ø¹«Key) - ÀÔ¿øÀϰæ¿ì´Â '-' var indd = model.getValue(xPathMainChemo+ "[" + nowrow + "]/prcpdd") ; //ÀÔ¿øÀÏÀÚ var cretno = model.getValue(xPathMainChemo+ "[" + nowrow + "]/inptcretno") ; //ÀÔ¿ø»ý¼º¹øÈ£(Å×½ºÆ®¿ë) var orddeptcd = model.getValue(xPathMainChemo+ "[" + nowrow + "]/orddeptcd") ; //Áø·á°ú var orderid = model.getValue(xPathMainChemo+ "[" + nowrow + "]/orddrid") ; //Áø·áÀÇID var instcd = model.getValue(xPathMainChemo+ "[" + nowrow + "]/instcd") ; //±â°üÄÚµå(Å×½ºÆ®¿ë) var RgstInfoHeader = "pid¢Ëorddd¢Ëindd¢Ëcretno¢Ëorddeptcd¢Ëorddrid¢Ëinstcd¢Ì"; RgstInfoData = pid +"¢Ë" + orddd +"¢Ë" + indd +"¢Ë" + cretno +"¢Ë" + orddeptcd +"¢Ë" + orderid +"¢Ë" + instcd +"¢Ì"; //---------------------------------------------- //***** ½Çó¹æ½Ã »óꝰæ //---------------------------------------------- var OrdseqnoHeader = "cpgappno¢Ëordseqno¢Ëprcpno¢Ëprcpcd¢Ì"; var OrdseqnoData = ""; //---------------------------------------------- //***** ÀúÀåó¹æÁ¤º¸(savePrcpInfoVO) //---------------------------------------------- var xPathMainActing = "/root/main/actinginfo/actinglist"; var xPathMainChemo = "/root/main/chemoinfo/chemolist"; var chkflag; var cnt = 0; var PrcpInfoHeader = "status¢Ërowno¢Ëdruglnkno¢Ëprcpdd¢Ëprcpno¢Ëprcphistno¢Ëinstcd¢Ëpid¢Ëorddd¢Ëcretno¢Ëorddeptcd¢Ëorddrid¢Ëprcpgenrflag¢Ëprcpstatcd¢Ëprcpkindcd¢Ëprcpcd¢Ëcalcscorcd¢Ëinclprcpcd¢Ë" +"inclprcpno¢Ëprcpexecdeptcd¢Ëprcphopedd¢Ëprcpqty¢Ëprcpqtyunitflag¢Ëprcptims¢Ëprcpdayno¢Ëpayflagcd¢Ëerprcpflag¢Ëprecureprcpflag¢Ënigtprcpflag¢Ëportprcpflag¢Ëfixprcpflag¢Ë" +"choiordflag¢Ëanamneflag¢Ëprcpdirecflag¢Ëangioflagcd¢Ëopansflagcd¢Ëansttm¢Ëoffictourhealexamflag¢Ëstemcellflag¢Ëhosinhosoutflag¢Ëhosinprcpresncd¢Ëissdeptcd¢Ëprcpauthflag¢Ë" +"prcpinptflag¢Ëprcpsignflag¢Ëoprsrvno¢Ëclincstdyflag¢Ëclincstdycd¢Ëdrugmthdspccd¢Ëprcpdelivefact¢Ëtootfact¢Ëmatrsetprcpspec¢Ëcalcflag¢Ërsrvflag¢Ërsrvdd¢Ërsrvtm¢Ërsrvrid¢Ëexecdd¢Ë" +"exectm¢Ëexecrid¢Ëdirecprcplnkdd¢Ëdirecprcplnkno¢Ëordreqlnkno¢Ëtestreqlnkno¢Ë"; //PrcpInfoHeader += "anticncrprtlno¢Ëdrugrateqty¢Ëprnprcpflag¢Ëprcpmixno¢Ëprcpvol¢Ì"; //20090227 dhkim anticncrdayno Ãß°¡ PrcpInfoHeader += "anticncrprtlno¢Ëdrugrateqty¢Ëprnprcpflag¢Ëprcpmixno¢Ëprcpvol¢Ëanticncrdayno¢Ëprnprcpdtl¢Ëdrprcpetc7¢Ëdrprcpetc8¢Ì"; // 20100125 PRN »çÀ¯/Ƚ¼ö Ãß°¡ by LYJ //----------------(20071203Ãß°¡) // '00000000' as execdd --½Ç½ÃÀÏÀÚ // '000000' as exectm --½Ç½Ã½Ã°£ // '-' as execrid --½Ç½ÃÀÚID // prtl.cpgappno anticncrprtlno // '-' drugrateqty // prtl.prnprcpflag prnprcpflag // prtl.prcpmixno prcpmixno // ast.adbhprtlord prtl //----------------------------------------------- //for ( i = 1; i<= getNodesetCount("/root/main/prcpposinfo/prcpinfo/prcplist"); i++) { for (var row = 1; row < pGrdAc.rows; row++) { //¼±ÅÃÇÏÁö ¾ÊÀº ÀÚ·á´Â °Å¸¥´Ù. chkflag = model.getValue(xPathMainActing + "["+row+"]/chk"); if( chkflag != "true" ) continue; //ÀÌ¹Ì ÀúÀåµÈ ÀÚ·á´Â °Å¸¥´Ù. chkflag = model.getValue(xPathMainActing + "["+row+"]/saveflag"); // 20090408 dhkim ¹ÝȯµÈ ÀÚ·áÀÇ Ã¼Å©»óŸ¦ ÇØÁ¦ÇÑ´Ù if(chkflag == "D"){ model.setValue(xPathMainActing + "["+row+"]/chk", "false"); model.refresh(); } if( chkflag == "Y" || chkflag == "D" ) continue; chkflag = model.getValue(xPathMainActing + "["+row+"]/prcpno"); if( chkflag != "0" ) { //±×³É ³Ñ¾î°¥¼öµµ ÀÖÀ½ //alert("ÀÌ¹Ì Ã³¹æ¹ß»ýÀÚ·áÀÔ´Ï´Ù"); if(checkmessage == "Y"){ // ¸Þ½ÃÁö´Â Çѹø¸¸ ¶ßµµ·Ï º¯°æ messageBox("ÀÌ¹Ì Ã³¹æÀÌ ¹ßÇàµÈ ÀÚ·á´Â ó¸®","E001"); //ÇÒ¼ö ¾ø½À´Ï´Ù. checkmessage = "N"; } model.setValue(xPathMainActing + "["+row+"]/chk", 'false'); continue; } cnt += 1; // if (model.getValue("/root/main/prcpposinfo/prcpinfo/prcplist[" + i + "]/status") == 'C') { //DC // prcphistno = model.getValue("/root/main/prcpposinfo/prcpinfo/prcplist[" + i + "]/prcphistno"); // prcpno = model.getValue("/root/main/prcpposinfo/prcpinfo/prcplist[" + i + "]/prcpno"); // // } else if (model.getValue("/root/main/prcpposinfo/prcpinfo/prcplist[" + i + "]/status") == 'I' ) { //½Å±Ô // prcphistno = 0; // prcpno = 0; // } var prcpdd = model.getValue(xPathMainChemo + "[" + rowCh+ "]/prcpdd"); var prcpno = "0"; var prcphistno = "0"; //20090226 dhkim // var instcd = getUserInfo("posinstcd"); var instcd = getUserInfo("dutplceinstcd"); var pid = model.getValue(xPathMainChemo + "[" + rowCh+ "]/pid"); var ordindd = prcpdd; var orddeptcd = model.getValue(xPathMainChemo + "[" + rowCh+ "]/orddeptcd"); var orddrid = model.getValue(xPathMainChemo + "[" + rowCh+ "]/orddrid"); var ordtype = "D"; //------------------(20081010) //var druglnkno = model.getValue(xPathMainActing + "[" + rowCh+ "]/ordseqno"); 1009 var druglnkno = model.getValue(xPathMainActing + "[" + row+ "]/ordseqno"); if ( druglnkno == "") { //alert( row + "/" + model.getValue(xPathMainActing + "[" + row+ "]/ordseqno") ); messageBox("DrugLnkNo Ç×¾ÏÇÁ·ÎÅäÄÝ »ó¼¼Á¤º¸°¡ Á¸ÀçÇÏÁö ¾Ê½À´Ï´Ù.","E999"); return; } //------------------(20081010) //cretno = "1"; //model.getValue(xPathMainActing + "[" + row + "]/cretno"); (Å×½ºÆ®¿ë) //±âº»°øÅëÁ¤º¸ PrcpInfoData += "I" +"¢Ë" //½Å±Ô(I), DC(C) + row +"¢Ë" //ÁÙ¹øÈ£ (º´¸® ¿ä±¸) + druglnkno +"¢Ë" //󹿼ø¹ø + prcpdd +"¢Ë" //ó¹æÀÏÀÚ(¿Ü·¡/Á¾°ÇÀº orddd¿Í µ¿ÀÏ, ÀÔ¿øÀº ó¹æÀÏÀÚ) + prcpno +"¢Ë" //󹿹øÈ£ (status°¡ 'I'ÀÏ °æ¿ì 0) + prcphistno +"¢Ë" //ó¹æÀ̷¹øÈ£ (status°¡ 'I'ÀÏ °æ¿ì 0) + instcd +"¢Ë" //±â°üÄÚµå + pid +"¢Ë" //µî·Ï¹øÈ£(¿ø¹«Key) + ordindd +"¢Ë" //Áø·áÀÏÀÚ(¿ø¹«Key) - ÀÔ¿øÈ¯ÀÚÀÏ °æ¿ì indd + cretno +"¢Ë" //»ý¼º¹øÈ£(¿ø¹«Key) + orddeptcd +"¢Ë" //Áø·á°ú(¿ø¹«) + orddrid +"¢Ë" //Áø·áÀÇID(¿ø¹«) + ordtype +"¢Ë" //󹿹߻ý±¸ºÐ(¿ø¹«) - O:¿Ü·¡, I:ÀÔ¿ø, E:ÀÀ±Þ, S:°ÇÁø + '000' +"¢Ë" //󹿻óÅ : '000' + '20' +"¢Ë"; //ó¹æÁ¾·ù : '20' //emr.mmbtprcd(󹿏¶½ºÅ¸)¿¡ 'ó¹æÄÚµå'·Î '¼ö°¡ÄÚµå'¸¦ ãÀ»°Í(½ÄÀ̸¦ Á¦¿ÜÇϰí´Â ó¹æÄÚµå=¼ö°¡Äڵ尡 ÀÏÄ¡ÇÏ´Â °æ¿ì°¡ ´ëºÎºÐÀÌ´Ù. var calcscorcd = model.getValue(xPathMainActing + "[" + row + "]/prcpcd"); //¼ö°¡ÄÚµå(?) = ó¹æÄÚµå var prcpqty = model.getValue(xPathMainActing + "[" + row + "]/prcpqty"); //¾î¶²°ÍÀÎÁö(󹿼ö·®)(?) ==> actingfinfo¿¡ Ãß°¡ ¿øº»¿¡´Â prcpqty°¡ ÀÖÀ½ var prcptims = model.getValue(xPathMainActing + "[" + row + "]/prcptims"); //ó¹æÈ½¼ö var prcpdayno = "1"; //ó¹æÀϼö(?) ==> ¹«Á¶°Ç 1ÀÏ var payflagcd = model.getValue(xPathMainActing + "[" + row + "]/payflagcd"); var erprcpflag = model.getValue(xPathMainActing + "[" + row + "]/erprcpflag"); // ÀÀ±Þ󹿱¸ºÐ (Y/N) var drugmthdspccd = model.getValue(xPathMainActing + "[" + row + "]/drugmthdspccd"); //º¹¿ë¹æ¹ý var remark = model.getValue(xPathMainActing + "[" + row + "]/remark") + " " + model.getValue(xPathMainActing + "[" + row + "]/nursrem") ; //Àü´Þ»çÇ×(20080110) var prcpqtyunitflag = model.getValue(xPathMainActing + "[" + row + "]/prcpqtyunitflag"); //󹿼ö·®´ÜÀ§ //20090227 dhkim anticncrdayno Ãß°¡ var anticncrdayno = prtldg; //ó¹æÂ÷¼ö //alert('anticncrdayno : ' + anticncrdayno ); //-----------(20081006)TEST //alert ( prcpqtyunitflag); ADBDPRTLORD.prcpqtyunitflag ¿¡ °ªÀÌ ¾ø´Â°æ¿ì //-----------(20081006) //---(20080129) var prcpvol = model.getValue(xPathMainActing + "[" + row + "]/prcpvol"); //prcpvol +"¢Ë" var clincstdyflag = model.getValue(xPathMainActing + "[" + row + "]/clincstdyflag") //var prcpvolunitflag = model.getValue(xPathMainActing + "[" + row + "]/prcpqtyunitflag"); //prcpvolunitflag // alert(prcpqty +"/"+drugmthdspccd); /* //20081013 Ư¼öÁÖ»ç½Ç ÄÚµå·Î parameter ¼¼ÆÃ if(injSpclRoom == null || injSpclRoom != '3120400000'){ injSpclRoom = '3120400000'; } */ //20090223 dhkim //¹ßÇàºÎ¼­¸¦ ÇØ´ç »ç¿ëÀÚÀÇ º´µ¿À¸·Î ¼¼ÆÃ //suppdeptcd //20081013 //Ư¼öÁÖ»ç½Ç ÄÚµå ±Û·Î¹úº¯¼ö ==> injSpclRoom /*±è±Í³² 10-13 18:43 Ư¼öÁÖ»ç½Ç¿¡¼­ Ç×¾Ï ½ÃÇàÇÒ¶§ issdeptcd ¿¡ ÇöÀç orddeptcd°¡ µé¾î°¡´Âµ¥ wardcd ¸¦ ³Ö¾îÁֽʽÿÀ. ±è±Í³² 10-13 18:43 Áï, ¹ßÇàºÎ¼­´Â ÇØ´çº´µ¿ÀÔ´Ï´Ù. */ //»ó¼¼Á¤º¸ PrcpInfoData += model.getValue(xPathMainActing + "[" + row + "]/prcpcd") +"¢Ë" //ó¹æÄÚµå + calcscorcd +"¢Ë" //¼ö°¡ÄÚµå(ó¹æÄÚµåÀΰ¡?) + '-' +"¢Ë" //Á¾¼Óó¹æÄÚµå ('-') => default : '-' //*** + 0 +"¢Ë" //Á¾¼Ó󹿹øÈ£ (ÀϷùøÈ£ - Á¾¼Óó¹æÄڵ庰·Î »ý¼º) => default : 0 //*** + orddeptcd +"¢Ë" //ó¹æ½Ç½ÃºÎ¼­ÄÚµå (¼ö°¡ÀÇ Á¢¼öºÎ¼­¸¦ ³Ö¾î Áְųª, Á¢¼öÇÏ´Â ºÎ¼­ÄÚµå, ¾øÀ» °æ¿ì '-'·Î ó¸®) + prcpdd +"¢Ë" //ó¹æÈñ¸ÁÀÏÀÚ (ó¹æÀÏÀÚ ÀÌÀüÀ¸·Î ¹ß»ýºÒ°¡) + prcpqty +"¢Ë" //󹿼ö·® (1) (¾àǰÀÏ °æ¿ì ¹Ýµå½Ã Æ÷Àå´ÜÀ§ ¼ö·®À» ³Ö¾î ÁÖ¾î¾ß µÊ) => default : 1 + prcpqtyunitflag +"¢Ë" //󹿼ö·®´ÜÀ§ (¾àǰÀÏ °æ¿ì '3', ±×·¸Áö ¾ÊÀ»°æ¿ì '-') => default : '-' //*** + prcptims +"¢Ë" //ó¹æÈ½¼ö (1) (ÀÔ¿øÀÏ °æ¿ì Ƚ¼ö¿¡ µû¶ó Ç®¸²) => default : 1 //*** + prcpdayno +"¢Ë" //ó¹æÀϼö (1) (Áö¿øºÎ¼­¿¡¼­´Â ÁÖ»çó¹æ¿¡ ´ëÇÏ¿© Àϼö¸¦ ³ÖÀ¸¸é ¾ÈµÊ, ³ÖÀ¸¸é ÀÚ·á°¡ ¹®Á¦°¡ »ý±è) => default : 1 //*** + payflagcd +"¢Ë" //±Þ¿©±¸ºÐÄÚµå (M0029 ÂüÁ¶) -> '-'·Î ³ÖÀ¸ÁÖ¸é ȯÀÚÀÇ º¸ÇèÀ¯Çü¿¡ µû¶ó ÀÚµ¿ ¹ß»ý + erprcpflag +"¢Ë" //ÀÀ±Þ󹿱¸ºÐ (Y/N) ==> default : 'N' //*** + 'N' +"¢Ë" //¼±Ã³Ä¡Ã³¹æ±¸ºÐ (Y/N) ==> default : 'N' + 'N' +"¢Ë" //¾ß°£Ã³¹æ±¸ºÐ (Y/N) : ¾ß°£°¡»ê¿¡ ÇØ´ç µÉ °æ¿ì ==> default : 'N' //*** + 'N' +"¢Ë" //Æ÷Åͺí󹿱¸ºÐ (Y/N) ==> default : 'N' //*** + 'N' +"¢Ë" //Á¤¾×󹿱¸ºÐ (Y/N) ==> default : 'N' //*** + 'N' +"¢Ë" //¼±ÅÃ󹿱¸ºÐ (Y/N) -> ¸¸¾à '-'ÀÏ °æ¿ì ¿ø¹«Á¤º¸ ±âÁØÀ¸·Î ó¸® ==> default : 'N' //*** + 'N' +"¢Ë" //±â¿Õ·Â(Áõ)±¸ºÐ (Y/N) ==> default : 'N' //*** + '-' +"¢Ë" //󹿹æÇⱸºÐ (ÄÚµåÁ¤ÀǼ­ M0041 ÂüÁ¶), ÀçȰÀº À§Ä¡±¸ºÐÀ¸·Î »ç¿ë : '-' => default : '-' //*** + '-' +"¢Ë" //Angio±¸ºÐ (ÄÚµåÁ¤ÀǼ­ M0006 ÂüÁ¶) : '-' => default : '-' //*** + '-' +"¢Ë" //¼ö¼ú¸¶Ã뱸ºÐ (ÄÚµåÁ¤ÀǼ­ M0007, M0008 ÂüÁ¶) : '-' => default : '-' //*** + '0000' +"¢Ë" //¸¶Ãëó¹æ¿¡ ´ëÇÑ ¸¶ÃëÀû¿ë½Ã°£ - ºÐÀ» 4ÀÚ¸®·Î Ç¥Çö, ¿¬¼Ó°Ë»ç °Ë»ç°£°Ý => default : '0000' //*** + 'N' +"¢Ë" //ÃâÀå°ËÁø±¸ºÐ (Y/N) => default : 'N' //*** + '00NNN' +"¢Ë" //'00NNN' °ÇÁøÃ»±¸±¸ºÐ, Á¶Ç÷¸ð(ÁÙ±â)¼¼Æ÷ ±¸ºÐ - Stem Cell Source ¿©ºÎ ,Cryo¿©ºÎ, CD34 äÁý¿©ºÎ, ÇØµ¿¿©ºÎÀÇ Á¶ÇÕÀ¸·Î ±¸¼º => default : '00NNN' //*** + 'I' +"¢Ë" //¿ø³»¿Ü±¸ºÐ(°ÇÁøÀº 'I', ¾àÀÌ ¾Æ´Ò°æ¿ì '-') => default : '-' //***(20080110¿¡ I·Î º¯°æ) + '00' +"¢Ë" //¿ø³»Ã³¹æ»çÀ¯ (°ÇÁø¿¡ ÇØ´çÇÏ´Â »çÀ¯ - Á¤ÀÇ, ¾àÀÌ ¾Æ´Ò°æ¿ì '00') => default : '00' //*** + suppdeptcd +"¢Ë" //¹ßÇàºÎ¼­ÄÚµå (Áý°è°¡ ŸºÎ¼­ÀÏ °æ¿ì Ÿ°úÄÚµå, ÀÔ¿øÀº ±âº»ÀÌ º´µ¿) -> '-' ·Î ó¸®Çϸé ÀÚµ¿ ó¸®(±âº»Àº ó¹æÀԷºμ­À̳ª ÀÔ¿øÀº ÇØ´ç º´µ¿À¸·Î ó¸®) => default : '-' //*** //+ orddeptcd +"¢Ë" //¹ßÇàºÎ¼­ÄÚµå (Áý°è°¡ ŸºÎ¼­ÀÏ °æ¿ì Ÿ°úÄÚµå, ÀÔ¿øÀº ±âº»ÀÌ º´µ¿) -> '-' ·Î ó¸®Çϸé ÀÚµ¿ ó¸®(±âº»Àº ó¹æÀԷºμ­À̳ª ÀÔ¿øÀº ÇØ´ç º´µ¿À¸·Î ó¸®) => default : '-' //*** // + '2' +"¢Ë" //󹿱ÇÇѱ¸ºÐ(0:ÀÇ»çó¹æÈ­¸é, 1:ÀÇ»ç¹×°£È£»ç°øÀ¯Ã³¹æ, 2:¼ø¼ö°£È£Ã³¹æ, 3:Áö¿øºÎ¼­ÀÇ»çó¹æ, 4:±âŸó¹æ - ±âŸ Áö¿øºÎ¼­ Ãß°¡, 5:°è»ê¿ë¿ø¹«Ã³¹æ, 6:°ÇÁøÃ³¹æ ==> 0,1¸¸ ÀÇ»çó¹æÈ­¸é¿¡ º¸ÀÓ, ´Ü 3Àº ÃßÈÄ¿¡ °áÁ¤) + '0' +"¢Ë" //󹿱ÇÇѱ¸ºÐ(0:ÀÇ»çó¹æÈ­¸é, 1:ÀÇ»ç¹×°£È£»ç°øÀ¯Ã³¹æ, 2:¼ø¼ö°£È£Ã³¹æ, 3:Áö¿øºÎ¼­ÀÇ»çó¹æ, 4:±âŸó¹æ - ±âŸ Áö¿øºÎ¼­ Ãß°¡, 5:°è»ê¿ë¿ø¹«Ã³¹æ, 6:°ÇÁøÃ³¹æ ==> 0,1¸¸ ÀÇ»çó¹æÈ­¸é¿¡ º¸ÀÓ, ´Ü 3Àº ÃßÈÄ¿¡ °áÁ¤) + '06' +"¢Ë" //ó¹æÀԷ±¸ºÐ(ÀúÀ屸ºÐÁ¤º¸ÀÇ inptflag¿Í µ¿ÀÏÇÏ°Ô Ã³¸®) + '0' +"¢Ë" //󹿼­¸í±¸ºÐ(0:ÀÎÁõ¾ÈµÊ, 1:Àǻ簡 ÈÄÀÎÁõ, 2:ÀÎÁõ¿Ï·á) => default : '2' //***???? + '-' +"¢Ë" //¼ö¼ú¿¹¾à¹øÈ£(0) => default : '-' //*** + clincstdyflag +"¢Ë" //Àӻ󿬱¸±¸ºÐ (Y/N) + '-' +"¢Ë" //Àӻ󿬱¸ÄÚµå ('-') -> Àӻ󿬱¸±¸ºÐÀÌ 'Y'ÀÏ °æ¿ì Àӻ󿬱¸Äڵ带 µî·Ï => default : '-' //*** + drugmthdspccd +"¢Ë" //Åõ¿©¹æ¹ý¹×°ËüÄÚµå(¾àÀÏ °æ¿ì º¹¿ë¹æ¹ý, Áø°Ë ¹× º´¸®ÀÏ °æ¿ì °ËüÄÚµå, Default '-') => default : '-' //*** + remark +"¢Ë" //ó¹æÀü´Þ»çÇ× //*** + '-' +"¢Ë" //Ä¡½Ä (º´¸®¸¸ »ç¿ë, ³ª¸ÓÁö´Â '-') => default : '-' //*** + '-' +"¢Ë" //Àç·á󹿳»¿ë ('-') -> ÃßÈÄÁ¤ÀÇ //*** + 'N' +"¢Ë" //°è»ê±¸ºÐ (Y/N) + 'N' +"¢Ë" //¿¹¾à±¸ºÐ (Y/N) + '00000000' +"¢Ë" //¿¹¾àÀÏÀÚ ('N'ÀÏ °æ¿ì '00000000') + '000000' +"¢Ë" //¿¹¾à½Ã°£ ('N'ÀÏ °æ¿ì '000000') + '-' +"¢Ë"; //¿¹¾àÀÚID ('-') var anticncrprtlno = model.getValue(xPathMainChemo + "[" + rowCh+ "]/cpgappno"); var prnprcpflag = model.getValue(xPathMainActing + "[" + row + "]/prnprcpflag"); var prcpmixno = model.getValue(xPathMainActing + "[" + row + "]/prcpmixno"); PrcpInfoData += '00000000' +"¢Ë" //½Ç½ÃÀÏÀÚ ('00000000') getCurrentDate() + '000000' +"¢Ë" //½Ç½Ã½Ã°£ ('000000') getCurrentTime() + '-' +"¢Ë" //½Ç½ÃÀÚID ('-') getUserId() + '00000000' +"¢Ë" //Áö½Ãó¹æ¿¬°èÀÏÀÚ (00000000) -> Áö¿øºÎ¼­¿¡¼­ »ç¿ë - ¿øÁö½Ãó¹æÀÇ Ã³¹æÀÏÀÚ + '0' +"¢Ë" //Áö½Ãó¹æ¿¬°è¹øÈ£ (0) -> Áö¿øºÎ¼­¿¡¼­ »ç¿ë - ¿øÁö½Ãó¹æÀÇ ½Ç½Ãó¹æÀ¯ÀϹøÈ£ + '0' +"¢Ë" //Áø·áÀÇ·Ú¿¬°è¹øÈ£ (0) + '0' +"¢Ë" //°Ë»çÀÇ·Ú¿¬°è¹øÈ£ (0) -> º´¸®¿Í Áø´Ü°Ë»ç »ç¿ë + anticncrprtlno +"¢Ë" //Ç×¾ÏÇÁ·ÎÅäÄݹøÈ£(anticncrprtlno) + '-' +"¢Ë" + prnprcpflag +"¢Ë" + prcpmixno +"¢Ë" + prcpvol +"¢Ë" //(20080129) //20090227 dhkim anticncrdayno Ãß°¡ + anticncrdayno +"¢Ë" + model.getValue(xPathMainActing + "[" + row + "]/prnprcpdtl")+ + model.getValue(xPathMainActing + "[" + row + "]/drprcpetc7")+ + model.getValue(xPathMainActing + "[" + row + "]/drprcpetc8")+ "¢Ì" //20100125 PRN »çÀ¯/Ƚ¼ö Ãß°¡ by LYJ //+ prcpvol +"¢Ì" //(20080129) //ÀÚµ¿ °£È£È®ÀÎÀ» À§ÇÑ µ¥ÀÌÅÍ(20080828) //var carechklist = "prcpdd¢Ëprcpno¢Ëprcphistno¢Ëinstcd¢Ëhsctlnkno" //carechklist = carechklist + "¢Ì" + model.getValue(xPathMainChemo + "[" + rowCh+ "]/prcpdd"); + "¢Ë" + goodcd + "¢Ë" + allsizespecid // + "¢Ë" + windd + "¢Ë" + (parseInt(winqty) - parseInt(oldqty)) + "¢Ë" + "2" // + "¢Ë" + "0000" + "¢Ë" + (parseInt(winqty) * parseInt(acmlbaseqty)) + "¢Ë" + deptflag; //----------------(20071203Ãß°¡) // '00000000' as execdd --½Ç½ÃÀÏÀÚ // '000000' as exectm --½Ç½Ã½Ã°£ // '-' as execrid --½Ç½ÃÀÚID // prtl.cpgappno anticncrprtlno // '-' drugrateqty // prtl.prnprcpflag prnprcpflag // prtl.prcpmixno prcpmixno // ast.adbhprtlord prtl //----------------------------------------------- //---------------------------------------------- //***** ½Çó¹æ½Ã »óꝰæ //---------------------------------------------- var cpgappno = model.getValue(xPathMainActing + "[" + row + "]/cpgappno"); //cpgappno var ordseqno = model.getValue(xPathMainActing + "[" + row + "]/ordseqno"); //ordseqno var prcpno = model.getValue(xPathMainActing + "[" + row + "]/prcpno"); //prcpno var prcpcd = model.getValue(xPathMainActing + "[" + row + "]/prcpcd"); //prcpno OrdseqnoData += "" + cpgappno +"¢Ë" //CPGÀû¿ë¹øÈ£ + ordseqno +"¢Ë" //󹿼ø¹ø + prcpno +"¢Ë" //ÀÔ¿øÃ³¹æ»ý¼º¹øÈ£ + prcpcd +"¢Ì" //ó¹æÄÚµå //alert("test------------------"+ OrdseqnoData); } if (cnt == 0) { //alert("󹿹߻ýÇÒ ÀÚ·á°¡ Á¸ÀçÇÏÁö ¾Ê½À´Ï´Ù"); messageBox("󹿹ßÇàÇÒ ÀÚ·á°¡","I004"); //¾ø½À´Ï´Ù. return; } //---------------------------------------------- //***** ÀúÀåó¹æÁ¤º¸(savePrcpInfoVO) //---------------------------------------------- // var SignInfoHeader = "signdd¢Ësignno¢Ëinstcd¢Ëpid¢Ëorddd¢Ëcretno¢Ësignflag¢Ësigngenrflag¢Ërgstdeptcd¢Ërgstdd¢Ërgsttm¢Ërgstrid¢Ëupdtdeptcd¢Ëupdtdd¢Ëupdttm¢Ëupdtrid¢Ëfstrgstrid¢Ëfstrgstdt¢Ëlastupdtrid¢Ë" // +"lastupdtdt¢Ësignbfcnts¢Ësignaftcnts¢Ì"; //---------------------------------------------- //***** ÀúÀåinstance¿¡¹Ý¿µ //---------------------------------------------- model.setValue(xPathSend + "/savedata/saveflaginfo", FlagInfoHeader+FlagInfoData); model.setValue(xPathSend + "/savedata/savergstinfo", RgstInfoHeader+RgstInfoData); model.setValue(xPathSend + "/savedata/saveprcpinfo", PrcpInfoHeader+PrcpInfoData); model.setValue(xPathSend + "/senddata", OrdseqnoHeader+OrdseqnoData); //20090224 dhkim //ó¹æÀü¼Û ¸Þ¼¼Áö¸¦ ȯÀÚÀÇ ÀԽǵȺ´µ¿°ú Á¶È¸µÈ º´µ¿ÀÌ ´Ù¸¦°æ¿ì blockingÇÑ´Ù. var sendMsg = ''; var wardcd = model.getValue("/root/main/actingbasicinfo/wardcd"); var wardnm = model.getValue("/root/main/actingbasicinfo/wardnm"); //alert('wardcd : ' + wardcd + 'wardnm : ' + wardnm); //alert('wardcd : ' + wardcd + ', suppdeptcd : ' + suppdeptcd); if(wardcd == suppdeptcd){ sendMsg = 'ó¹æÀü¼ÛÀ»'; }else{ messageBox('ÇØ´ç ȯÀÚ´Â ' + wardnm + ' ȯÀÚ ÀÔ´Ï´Ù. ' + suppdeptnm + ' ¿¡ ÀÔ½ÇµÈ È¯ÀÚ¸¸ ó¹æÀü¼Û °¡´ÉÇÕ´Ï´Ù.', 'E999'); return; } if (messageBox(sendMsg, 'Q003', "") != 6) return; if (submit("TXMNI02007", false)) { //¿À·ùÆË¾÷ var prcpErrList = model.instances(0).selectNodes( "/root/temp/result/prcperrlist" ); if ( prcpErrList.length > 0 ) { if ( !isNull(model.getValue ("/root/temp/result/prcperrlist/prcpcd"))){ var xpt = window.screenleft + 100; var ypt = window.screenTop + 50; var coord = getRelativeCoordinate ( xpt, ypt ); var mon = coord[0]; xpt = coord[1]; ypt = coord[2]; open ( "SPMMO00600", mon, xpt, ypt, "prcpdetl", "/root/temp/result", "/root/result", "", false ); model.removeNodeset("/root/temp/result/prcperrlist"); } } else { // model.removeNodeset("/root/main/prcpposinfo/prcpinfo"); // model.copyNode("/root/main/bfprcpinfo/bfprcplistinfo", "/root/temp/result"); //model.copyNode("/root/main/prcpposinfo/prcpinfo", "/root/temp/result"); //grd_prcpposlist.colDisabled(1) = false; //fPrcpListRef("Bf"); if(model.getValue("/root/code/codeinfo/codelist[cdgrupid = '077' and supcdid = '02']/cdid") == getUserInfo("dutplceinstcd")){ fprint(); } } model.refresh(); } else { //alert("½Ç󹿹߻ý ½ÇÆÐ"); messageBox("½Çó¹æÀ» ¹ßÇà","E001"); } var nodeCnt = getNodesetCount("/root/main/actinginfo/actinglist"); for( var i = 1; i <= nodeCnt; i++ ) { if( model.getValue("/root/main/actinginfo/actinglist["+i+"]/chk") == "true" || model.getValue("/root/main/actinginfo/actinglist["+i+"]/prtlabsnyn")=="Y"){ grd_acting.isReadOnly(i,0) = true; }else { grd_acting.isReadOnly(i,0) = false; } } model.refresh(); } //----------------------------------------------------------------------------------- //---------------------------------------------- // ¼±ÅÃÇÑ ±×¸®µå ÀÚ·á¿¡ ´ëÇÑ È¯ÀÚÁ¤º¸ »ó´Ü¿¡ ¿Ã¸®±â // 20090212 dhkim (Ãß°¡) // »ó´Ü¼¼ÆÃÀü ¼­¿ï¼º¸ð ÀüȯȯÀÚÀÎÁö Á¶È¸ //---------------------------------------------- function fSetPatInfo_chemo() { var pGrd = grd_chemo; var xPathChemo = "/root/main/chemoinfo"; var condparam = ""; if (pGrd.row <= 0 ) return; //20090212 dhkim Ãß°¡ //»ó´ÜÁ¤º¸¼¼ÆÃÀü ¼­¿ï¼º¸ð ÀüȯȯÀÚÀÎÁö Á¶È¸ var pid = model.getValue('/root/main/chemoinfo/chemolist[' + grd_chemo.row + ']/pid'); model.removenode('/root/send'); model.makeValue('/root/send/pid', pid); if(!submit('TRMNI02030')){ messageBox('»ó´ÜÁ¤º¸¼¼ÆÃÁß ÀüȯȯÀÚ ¿©ºÎÁ¶È¸¸¦ ½ÇÆÐÇÏ¿´½À´Ï´Ù.', 'E999'); }else{ var pidflag = model.getValue('/root/bmtinfo/pidflag'); var hngnm = model.getValue('/root/bmtinfo/hngnm'); if(hngnm != ''){ hngnm = '"' + hngnm + '"´ÔÀº '; } if(pidflag == 'Y'){ messageBox(hngnm + '¿©Àǵµ¼º¸ð¿¡¼­ ¼­¿ï¼º¸ð Àüȯ BMTȯÀÚÀÔ´Ï´Ù.', 'I999'); } } //--------------------------»ó´Ü¿Ã¸®±â flag -------------------------- // 01 O:¿Ü·¡, I:ÀÔ¿ø±¸ºÐ, T:¼ö¼ú¿¹¾à , E:ÀÀ±Þ // 02 µî·Ï¹øÈ£ // 03 ¼ö¼ú½ÃÀÛÀÏÀÚ // 04 cretno(¾ø´Â °æ¿ì ""·Î ó¸®) // 05 ±â°üÄÚµå // 06 Áýµµ°úºÎ¼­ // 07 ÁýµµÀÇID // 08 ȯÀÚ±¸ºÐ // 09 F -󸮱¸ºÐ ¹«Á¶°Ç F·Î ¼³Á¤ // 10 ¼ö¼ú¿¹¾à¹øÈ£ // 11 ¼ö¼úÀ̷¹øÈ£ // 12 Á¶È¸ÀÏÀÚ 2007-09-13 ¿ÀÁöÈÆ Ãß°¡... //------------------------------------------------------------------ var pid = ""; var indd= ""; var cretno=""; var instcd = ""; var orddd= ""; var ordtype = ""; //----------(20080913) var ioflag = model.getValue("/root/main/chemoinfo/chemolist["+pGrd.row+"]/inptcretno") ; var detstatus = model.getValue("/root/main/chemoinfo/chemolist["+pGrd.row+"]/detstatus") ; //if ( ioflag != "") { //ÀÔ¿øÁ¤º¸¸¦ ±âÁØÀ¸·Î »ó´Ü¿¡ ¹Ý¿µ if(detstatus == "¿Ü·¡") { pid = model.getValue("/root/main/chemoinfo/chemolist["+pGrd.row+"]/pid") ; indd = model.getValue("/root/main/chemoinfo/chemolist["+pGrd.row+"]/otptorddd") ; cretno = model.getValue("/root/main/chemoinfo/chemolist["+pGrd.row+"]/otptcretno") ; instcd = model.getValue("/root/main/chemoinfo/chemolist["+pGrd.row+"]/instcd"); orddd = model.getValue("/root/main/chemoinfo/chemolist["+pGrd.row+"]/otptorddd"); //ó¹æÀÏ(orddd) ordtype = "O"; } else { //¿Ü·¡Á¤º¸¸¦ ±âÁØÀ¸·Î »ó´Ü¿¡ ¹Ý¿µ pid = model.getValue("/root/main/chemoinfo/chemolist["+pGrd.row+"]/pid") ; indd = model.getValue("/root/main/chemoinfo/chemolist["+pGrd.row+"]/prcpdd") ; cretno = model.getValue("/root/main/chemoinfo/chemolist["+pGrd.row+"]/inptcretno") ; instcd = model.getValue("/root/main/chemoinfo/chemolist["+pGrd.row+"]/instcd"); orddd = model.getValue("/root/main/chemoinfo/chemolist["+pGrd.row+"]/prcpdd"); //ó¹æÀÏ(orddd) //======================================================================================================= ordtype = "I"; //--> 'D' (Å×½ºÆ®) ==> '»ó´ÜÁ¤º¸parameter°ªÀÌ À߸ø ¼³Á¤ µÇ¾ú½À´Ï´Ù' ·Î ³ª¿È //======================================================================================================= } //----------(20080913) //Ç×¾Ï ÇÁ·ÎÅäÄÝ ½ºÄÉÁì È­¸é Á¶È¸¸¦ À§ÇØ ¼ÂÆÃ model.setValue("/root/hidden/antisch/pid", pid); model.setValue("/root/hidden/antisch/cpgappno", model.getValue("/root/main/chemoinfo/chemolist["+pGrd.row+"]/cpgappno")); // »ó´Ü ¼¼ÆÃÀ» À§ÇÑ ÆÄ¶ó¹ÌÅÍ condparam = ordtype + "¢Ë" + pid + "¢Ë" + indd + "¢Ë" + cretno + "¢Ë" + instcd+ "¢Ë" + orddd; setParameter("condparam", condparam); modal("SPMMO08900", 1, "", "", "", "", "", "left:0; right:0; width:0; height:0; sysmenu:hidden; caption:hidden; min:hidden, max:hidden;"); //20090102 dhkim //¿¹¾àÁ¤º¸Á¶È¸ fGridReservationInfo(); model.makeNode("/root/main/paminfo"); var node = getGlobalVariable("paminfo"); setCSVToNode("/root/main/paminfo", node); //---------------------------------------------------- //¼³Á¤µÈ »ó´ÜÁ¤º¸¸¦ ºÒ·¯¿È // alert("³»¸®±â"); // model.makeNode("/root/main/paminfo"); // var node = getGlobalVariable("paminfo"); // setCSVToNode("/root/main/paminfo", node); //---------------------------------------------------- var flowSheetObj = getOpenWindow("SMMNR00900"); if(flowSheetObj != null){//Ä«µ¦½º] flowSheetObj.javascript.fInitialize("init"); } var careRecObj = getOpenWindow("SMMNR03400"); if(careRecObj != null){//Ä«µ¦½º] careRecObj.javascript.fInitialize(); careRecObj.javascript.fcolwidth(); } // // Ç׾ϵ¿ÀǼ­ È®ÀÎ 2012.06.18 KJS // //Ç×¾ÏÇÁ·ÎÅäÄÝ Á¾·ù // var pid = model.getValue('/root/main/chemoinfo/chemolist[' + grd_chemo.row + ']/pid'); // var appdd = model.getValue('/root/main/chemoinfo/chemolist[' + grd_chemo.row + ']/prcpdd'); // var prtlcd = model.getValue('/root/main/chemoinfo/chemolist[' + grd_chemo.row + ']/prtlcd'); // // model.removenode("/root/send/xproto") // model.makeValue("/root/send/xproto/pid", pid); // model.makeValue("/root/send/xproto/appdd", appdd); // model.makeValue("/root/send/xproto/prtlcd", prtlcd); // // submit("TRMNI02014"); // // // // var xappdd = model.getValue("/root/temp/xprotcnt/xappdd"); // model.makeValue("/root/send/xproto/xappdd", xappdd); // //alert(model.getValue("/root/send/xproto/xappdd")); // //alert(instance1.selectNodesXml("/root/send/xproto")); // submit("TRMNI02015"); // // var cnt = model.getValue("/root/temp/xprotcnt/cnt"); // if (cnt < 1){ // if (xappdd == 'N') // { // messageBox("ÇØ´ç ÇÁ·ÎÅäÄÝ¿¡ ´ëÇÑ Ç×¾ÏÈ­ÇÐ µ¿ÀǼ­°¡ ¾øÀ¸´Ï ´Ù½Ã È®ÀÎÇØÁֽñ⠹ٶø´Ï´Ù.","I999"); // } else { // messageBox("Ç×¾Ï ÇÁ·ÎÅäÄÝÀÌ ´Þ¶óÁ³À¸´Ï µ¿ÀǼ­¸¦ »õ·Î ¹Þ¾ÆÁֽñ⠹ٶø´Ï´Ù.","I999"); // } // } } /** * @ver : 2010.01.25 dhkim * @desc : »ó´ÜÁ¤º¸¿¡¼­ ȯÀÚÁ¤º¸¸¦ °¡Áö°í ÄɸðȯÀÚ¸®½ºÆ®ÀÇ Á¤º¸¸¦ getÇÑ´Ù. * @param : * @return : [retnArry] * [0] pid µî·Ï¹øÈ£ * [1] rp_indd ¿¹¾àó¹æÀü¼Ûparam_ÀÔ¿øÀÏ * [2] rp_cretno ¿¹¾àó¹æÀü¼Ûparam_»ý¼º¹øÈ£ * [3] rp_ordtype ¿¹¾àó¹æÀü¼Ûparam_¿Ü·¡ÀÔ¿ø±¸ºÐ * [4] rp_medispclid ¿¹¾àó¹æÀü¼Ûparam_ÁÖÄ¡ÀǾÆÀ̵ð * [5] roomcd º´½ÇÄÚµå * [6] age ȯÀÚ³ªÀÌ * [7] hngnm ȯÀÚ¸í * [8] cpgappno Ç×¾ÏÇÁ·ÎÅäÄÝcpg¹øÈ£ * [9] prtldg Ç×¾ÏÇÁ·ÎÅäÄÝÂ÷¼öÄÚµå * [10]prcpdd Ç×¾ÏÇÁ·ÎÅäÄÝó¹æÀÏÀÚ * [11]sickclsnm Áø´Ü¸í * [12]prtlnm Ç×¾ÏÇÁ·ÎÅäÄÝ󹿏í * [13]prtldg_d Ç×¾ÏÇÁ·ÎÅäÄÝÂ÷¼öºä * [14]inptflag ÀÔ¿ø±¸ºÐ * [15]detstatus ÁøÇà»óÅ * [16]depthngnm Áø·á°ú¸í * [17]orddrnm ÁÖÄ¡ÀǸí * [18]careinrmdd °£È£ÀÔ½ÇÀÏÀÚ * [19]wardcd º´µ¿ÄÚµå * [20]wardnm º´µ¿¸í */ function fGetTopInfoToChemoPatInfo(){ var retnArry = "";//¸®Åϰª var paminfo = getGlobalVariable("paminfo"); if(paminfo.length > 0){//¿ø¹«Á¤º¸(±âº»Á¤º¸)°¡ Àִ°æ¿ì //¼³Á¤µÈ »ó´ÜÁ¤º¸¸¦ ºÒ·¯¿È model.removenode("/root/main/paminfo"); model.makeNode("/root/main/paminfo"); setCSVToNode("/root/main/paminfo", paminfo); var pid = model.getValue("/root/main/paminfo/list/pid"); var indd = model.getValue("/root/main/paminfo/list/indd"); var cretno = model.getValue("/root/main/paminfo/list/cretno"); var orddd = model.getValue("/root/main/paminfo/list/orddd"); var ioflag = model.getValue("/root/main/paminfo/list/ioflag"); if(pid != ""){ retnArry = "pid" + "|" + "rp_indd" + "|" + "rp_cretno" + "|" + "rp_ordtype" + "|" + "rp_medispclid" + "|" + "roomcd" + "|" + "age" + "|" + "hngnm" + "|" + "cpgappno" + "|" + "prtldg" + "|" + "prcpdd" + "|" + "sickclsnm" + "|" + "prtlnm" + "|" + "prtldg_d" + "|" + "inptflag" + "|" + "detstatus" + "|" + "depthngnm" + "|" + "orddrnm" + "|" + "careinrmdd" + "|" + "wardcd" + "|" + "wardnm" + "¢Æ"; //»ó´ÜÁ¤º¸°¡ ÀÖÀ»°æ¿ì ±×¸®µå ¸®½ºÆ®¿¡¼­ ÇØ´ç ȯÀÚ¸¦ ã¾Æ ÇÊ¿ä Á¤º¸¸¦ ¹è¿­¿¡ ÀúÀåÇÑ ÈÄ ¸®ÅÏÇÑ´Ù. var _pid, _indd, _orddd, _inptcretno, _otptcretno; for(var i = 1; i < grd_chemo.rows; i++){ _pid = model.getValue("/root/main/chemoinfo/chemolist[" + i + "]/pid"); _indd = model.getValue("/root/main/chemoinfo/chemolist[" + i + "]/prcpdd"); _orddd = model.getValue("/root/main/chemoinfo/chemolist[" + i + "]/otptorddd"); _inptcretno = model.getValue("/root/main/chemoinfo/chemolist[" + i + "]/inptcretno"); _otptcretno = model.getValue("/root/main/chemoinfo/chemolist[" + i + "]/otptcretno"); //alert('i: ' + i + ', _pid:' + _pid + ', tpid:' + pid //+ ', _indd:' + _indd + ', tindd:' + indd //+ ', _orddd:' + _orddd + ', torddd:' + orddd //+ ', _inptcretno: ' + _inptcretno + ', _otptcretno: ' + _otptcretno + ', tcretno : ' + cretno + ', ioflag :' + ioflag ); if(_pid == pid){ if( (ioflag == 'O' && _orddd == orddd && _otptcretno == cretno) //¿Ü·¡ || (ioflag == 'I' && _indd == indd && _inptcretno == cretno) //ÀÔ¿ø || (ioflag == 'D' && _indd == indd && _inptcretno == cretno) //DSC/CHEMO ){ retnArry += model.getValue("/root/main/chemoinfo/chemolist[" + i + "]/pid") + "|" + model.getValue("/root/main/chemoinfo/chemolist[" + i + "]/rp_indd") + "|" + model.getValue("/root/main/chemoinfo/chemolist[" + i + "]/rp_cretno") + "|" + model.getValue("/root/main/chemoinfo/chemolist[" + i + "]/rp_ordtype") + "|" + model.getValue("/root/main/chemoinfo/chemolist[" + i + "]/rp_medispclid") + "|" + model.getValue("/root/main/chemoinfo/chemolist[" + i + "]/roomcd") + "|" + model.getValue("/root/main/chemoinfo/chemolist[" + i + "]/age") + "|" + model.getValue("/root/main/chemoinfo/chemolist[" + i + "]/hngnm") + "|" + model.getValue("/root/main/chemoinfo/chemolist[" + i + "]/cpgappno") + "|" + model.getValue("/root/main/chemoinfo/chemolist[" + i + "]/prtldg") + "|" + model.getValue("/root/main/chemoinfo/chemolist[" + i + "]/prcpdd") + "|" + model.getValue("/root/main/chemoinfo/chemolist[" + i + "]/sickclsnm") + "|" + model.getValue("/root/main/chemoinfo/chemolist[" + i + "]/prtlnm") + "|" + model.getValue("/root/main/chemoinfo/chemolist[" + i + "]/prtldg_d") + "|" + model.getValue("/root/main/chemoinfo/chemolist[" + i + "]/inptflag") + "|" + model.getValue("/root/main/chemoinfo/chemolist[" + i + "]/detstatus") + "|" + model.getValue("/root/main/chemoinfo/chemolist[" + i + "]/depthngnm") + "|" + model.getValue("/root/main/chemoinfo/chemolist[" + i + "]/orddrnm") + "|" + model.getValue("/root/main/chemoinfo/chemolist[" + i + "]/careinrmdd") + "|" + model.getValue("/root/main/chemoinfo/chemolist[" + i + "]/wardcd") + "|" + model.getValue("/root/main/chemoinfo/chemolist[" + i + "]/wardnm") + "¢Æ"; break; } } } } } return retnArry; } //20091119 dhkim //»ó´ÜÁ¤º¸¸¦ °¡Á®¿Í¼­ ¸ÞÀα׸®µåÀÇ È¯ÀÚ¸¦ ¼±ÅûóÅ·Πº¯°æ function fSincMainGridTopInfo(){ var curRow = 0; //»ó´ÜÁ¤º¸ ¹Þ¾Æ¿È var paminfo = getGlobalVariable("paminfo"); if(paminfo.length > 0){//¿ø¹«Á¤º¸(±âº»Á¤º¸)°¡ ÀÖ´Â °æ¿ì //¼³Á¤µÈ »ó´ÜÁ¤º¸¸¦ ºÒ·¯¿È model.removenode("/root/main/paminfo"); model.makeNode("/root/main/paminfo"); setCSVToNode("/root/main/paminfo", paminfo); var pid = model.getValue("/root/main/paminfo/list/pid"); var indd = model.getValue("/root/main/paminfo/list/indd"); var cretno = model.getValue("/root/main/paminfo/list/cretno"); var orddd = model.getValue("/root/main/paminfo/list/orddd"); var ioflag = model.getValue("/root/main/paminfo/list/ioflag"); if(pid != ""){ var _pid, _indd, _orddd, _inptcretno, _otptcretno; for(var i = 1; i < grd_chemo.rows; i++){ _pid = model.getValue("/root/main/chemoinfo/chemolist[" + i + "]/pid"); _indd = model.getValue("/root/main/chemoinfo/chemolist[" + i + "]/prcpdd"); _orddd = model.getValue("/root/main/chemoinfo/chemolist[" + i + "]/otptorddd"); _inptcretno = model.getValue("/root/main/chemoinfo/chemolist[" + i + "]/inptcretno"); _otptcretno = model.getValue("/root/main/chemoinfo/chemolist[" + i + "]/otptcretno"); //alert('i: ' + i + ', _pid:' + _pid + ', tpid:' + pid //+ ', _indd:' + _indd + ', tindd:' + indd //+ ', _orddd:' + _orddd + ', torddd:' + orddd //+ ', _inptcretno: ' + _inptcretno + ', _otptcretno: ' + _otptcretno + ', tcretno : ' + cretno + ', ioflag :' + ioflag ); if(_pid == pid){ if( (ioflag == 'O' && _orddd == orddd && _otptcretno == cretno) //¿Ü·¡ || (ioflag == 'I' && _indd == indd && _inptcretno == cretno) //ÀÔ¿ø || (ioflag == 'D' && _indd == indd && _inptcretno == cretno) //DSC/CHEMO ){ curRow = i; break; } } } } } //2010.02.11 dhkim »ó´Ü»èÁ¦ ÁÖ¼®Ã³¸® /* //curRow°¡ 0ÀÌ¸é »ó´ÜÁ¤º¸ »èÁ¦ delPatientInfos(); //È­¸é»ó´ÜÁ¤º¸ »èÁ¦ setGlobalVariable("paminfo", ""); //¿ø¹«Á¤º¸ reset if(getNodesetCount("/root/main/paminfo") > 0) { model.removeNodeset("/root/main/paminfo/list"); } */ return curRow; } function fInitGrid() { model.removeNodeset("/root/main/actinginfo/actinglist"); //ÃʱâÈ­½Ã ±×¸®µå 1¹øÂ° row »èÁ¦ model.removeNodeset("/root/main/chemoinfo/chemolist"); //ÃʱâÈ­½Ã ±×¸®µå 1¹øÂ° row »èÁ¦ model.removeNodeset("/root/main/patdetinfo/ordrsrvinfo"); //ÃʱâÈ­½Ã ±×¸®µå 1¹øÂ° row »èÁ¦ model.removeNodeset("/root/main/patdetinfo/testrsrvinfo"); //ÃʱâÈ­½Ã ±×¸®µå 1¹øÂ° row »èÁ¦ model.refresh(); } function fSetBackColor() { // var elbulbodstat; // for(var i = 1; i < grd_opatmngt.rows; i++) { // elbulbodstat = model.getValue("/root/main/opatlist/opatlist[" + i + "]/elbulbodstat"); // // if(elbulbodstat == "3") { // grd_opatmngt.isReadOnly(i,1) = true; // grd_opatmngt.cellstyle("background-color", i, 1, i, grd_opatmngt.cols-1) ="#FAC8C8"; // // } else { // grd_opatmngt.isReadOnly(i,1) = false; // grd_opatmngt.cellstyle("background-color", i, 1, i, grd_opatmngt.cols-1) ="#FFFFF"; // } // } // grd_opatmngt.refresh(); } //-------------------------------------------- // ¿ìÃø¸¶¿ì½º ÆË¾÷ //-------------------------------------------- function fShowPopupMenu(gridID, menuPath) { var gridObj = document.controls.item(gridID); if(event.button == 3) { if(gridObj.isCell(event.target) && gridObj.mouseRow >= gridObj.fixedrows){ window.setPopupMenu(true, menuPath, "name", "func", false); }else{ window.setPopupMenu(false); } } } // -------------------------------------------------- // Ãâ·Â // -------------------------------------------------- function fprint() { var pGrdCh = grd_chemo; var pGrdAc = grd_acting; var prt_prtlinfo = "/root/main/prtlinfo"; var prt_data = "/root/main/data"; var prt_prtlprcpprelist = "/root/main/prtlprcpprelist"; var prt_diaginfo = "/root/main/diaginfo"; var chemolist = "/root/main/chemoinfo/chemolist"; var Actinglist = "/root/main/actinginfo/actinglist"; var prtflag; var pGrdChRow = pGrdCh.row; //üũ if (pGrdCh.rows <= 1 ) return; if (pGrdAc.rows <= 1 ) return; //ÃʱâÈ­ var xPathSendReqdata = "/root/send/reqdata"; model.removeNodeset(xPathSendReqdata); model.makeNode(xPathSendReqdata); model.removeNodeset("/root/temp/detailprint"); model.removeNodeset(prt_prtlinfo); model.removeNodeset(prt_data); model.removeNodeset(prt_prtlprcpprelist); model.removeNodeset(prt_diaginfo); var chemolist = "/root/main/chemoinfo/chemolist"; var pGrdChRow = grd_chemo.row; model.makeValue(xPathSendReqdata + "/prcpdd", ""); //model.getValue(chemolist + "["+ pGrdChRow + "]/prcpdd") ); model.makeValue(xPathSendReqdata + "/pid", model.getValue(chemolist + "["+ pGrdChRow + "]/pid") ); model.makeValue(xPathSendReqdata + "/indd", model.getValue(chemolist + "["+ pGrdChRow + "]/inptindd") ); model.makeValue(xPathSendReqdata + "/cpgappno", model.getValue(chemolist + "["+ pGrdChRow + "]/cpgappno") ); model.makeValue(xPathSendReqdata + "/prtflag", "Y"); if(submit("TRMNI02008")){ }else{} //alert('ó¹æÄÚµå : ' + model.getValue("/root/temp/detailprint/prcplist[2]/prcpcd")); model.refresh(); var datacnt = model.instances(0).selectNodes( "/root/temp/detailprint/prcplist" ); if (datacnt.length > 0 ) { model.removeNodeset("/root/main/prtlinfo"); model.removeNodeset("/root/main/data"); model.removeNodeset("/root/main/prtlprcpprelist"); model.removeNodeset("/root/main/diaginfo"); model.makeNode("/root/main/prtlinfo"); model.makeNode("/root/main/data"); model.makeNode("/root/main/prtlprcpprelist"); model.makeNode("/root/main/diaginfo/diagcdlist"); model.copyNode("/root/main/prtlinfo", "/root/temp/detailprint/prtlinfo"); model.copyNode("/root/main/data", "/root/temp/detailprint/data"); model.copyNode("/root/main/diaginfo/diagcdlist", "/root/temp/detailprint/diagcdlist"); model.makeValue("/root/main/data/disp1" , model.getValue(chemolist + "["+ pGrdChRow + "]/disp1")); // 15.02.06 - AYS Ãß°¡ model.makeValue("/root/main/data/disp2" , model.getValue(chemolist + "["+ pGrdChRow + "]/disp2")); model.makeValue("/root/main/data/disp3" , model.getValue(chemolist + "["+ pGrdChRow + "]/disp3")); for (var idx=0;idx<= datacnt.length;idx++) { model.makeNode("/root/main/prtlprcpprelist/prcplist[" + idx + "]" ); model.copyNode("/root/main/prtlprcpprelist/prcplist[" + idx + "]", "/root/temp/detailprint/prcplist[" + idx + "]"); } model.makeNode("/root/main1"); copyNodesetType("/root/main1", "/root/main"); //Ãâ·Â //ù¹øÂ° true : Ãâ·Â¿©ºÎ //µÎ¹øÂ° true : ¹Ì¸®º¸±â ´Ý±â¿©ºÎ //exeReportPreview("RPADB01011", "XMLSTR", "", "", "true","","","","","true", "", ""); // 141203 - AYS Ãß°¡ if(model.getValue("/root/main/cond/chk_printoption") == 'Y') { exeReportPreview("RPADB01015", "XMLSTR", "", "", "true","","","","","true", "", ""); //exeReportPreview("RPADB01015", "XMLSTR", "", "", "true","","","","","", "", ""); } else { exeReportPreview("RPADB01013", "XMLSTR", "", "", "true","","","","","true", "", ""); //exeReportPreview("RPADB01013", "XMLSTR", "", "", "true","","","","","", "", ""); } model.removeNodeset("/root/main1"); } else { messageBox("Ãâ·ÂÇÒ ÀÚ·á°¡ ","I004"); } /* (20080121)ÀÌÀü //ÃʱâÈ­ model.removeNodeset(prt_data); model.removeNodeset(prt_prtlprcpprelist); //data instance »ý¼º model.makeNode(prt_data); model.makeValue(prt_data + "/ht" , model.getValue(chemolist + "["+ pGrdChRow + "]/ht")); model.makeValue(prt_data + "/wt" , model.getValue(chemolist + "["+ pGrdChRow + "]/wt")); model.makeValue(prt_data + "/ibw" , model.getValue(chemolist + "["+ pGrdChRow + "]/ibw")); model.makeValue(prt_data + "/bsa" , model.getValue(chemolist + "["+ pGrdChRow + "]/bsa")); model.makeValue(prt_data + "/age" , model.getValue(chemolist + "["+ pGrdChRow + "]/age")); model.makeValue(prt_data + "/sc" , model.getValue(chemolist + "["+ pGrdChRow + "]/sc")); model.makeValue(prt_data + "/urvol" , model.getValue(chemolist + "["+ pGrdChRow + "]/urvol")); model.makeValue(prt_data + "/urcr" , model.getValue(chemolist + "["+ pGrdChRow + "]/urcr")); model.makeValue(prt_data + "/auc" , model.getValue(chemolist + "["+ pGrdChRow + "]/auc")); model.makeValue(prt_data + "/carbovol" , model.getValue(chemolist + "["+ pGrdChRow + "]/carbovol")); model.makeValue(prt_data + "/gfrflag" , model.getValue(chemolist + "["+ pGrdChRow + "]/gfrflag")); model.makeValue(prt_data + "/gfr" , model.getValue(chemolist + "["+ pGrdChRow + "]/gfr")); model.makeValue(prt_data + "/sexrate" , model.getValue(chemolist + "["+ pGrdChRow + "]/sexrate")); model.makeValue(prt_data + "/wtflag" , model.getValue(chemolist + "["+ pGrdChRow + "]/wtflag")); model.makeValue(prt_data + "/prtlnm" , model.getValue(chemolist + "["+ pGrdChRow + "]/prtlnm")); model.makeValue(prt_data + "/pid" , model.getValue(chemolist + "["+ pGrdChRow + "]/pid")); model.makeValue(prt_data + "/hngnm" , model.getValue(chemolist + "["+ pGrdChRow + "]/hngnm")); //prtlprcpprelist instance »ý¼º prtflag = false; model.makeNode(prt_prtlprcpprelist); prt_prtlprcpprelist = prt_prtlprcpprelist + "/prcplist"; var cnt=0; for (var row=1;row