/** * ÆÄ ÀÏ ¸í : SMADT30100.js * ¼³ ¸í : ¸¶¾àÇâÁ¤Ã³¹æ°ü¸® Javascriot * ¼³ °è ÀÚ : °øµÎ°æ * ÀÛ ¼º ÀÚ : °øµÎ°æ * ¼öÁ¤ÀÌ·Â : 2007.08.10 / ÃÖÃÊÀÛ¼º / °øµÎ°æ */ var sNarc_Menu_Param = ""; var sNarc_Dept_Param = ""; var sSMADT30400_Fromdd = ""; //Ä«µ¦½º(°£È£)¿¡¼­ ³Ñ°ÜÁÜ_20090513_SMY /** * ÃʱâÈ­ */ function fInit() { var instcd =getUserInfo("dutplceinstcd"); if(instcd == '032') { chk_dschdrugyn.visible = true; } else { chk_dschdrugyn.visible = false; chk_dschdrugyn.value = "Y"; } grd_narclist.fixedcellcheckbox(0,1) = true; //È­¸é±¸¼º¿ë ÆÄ¶ó¹ÌÅÍ sNarc_Menu_Param = getScreenMenuParameter(); // I: ÀÔ¿ø O:¿Ü·¡ //sNarc_Menu_Param = "O"; //»ó´Ü¿¡¼­ Á¤º¸ Á¶È¸ var node = getGlobalVariable("paminfo"); setCSVToNode("/root/temp/topinfo", node); if(sNarc_Menu_Param.length > 1){ sNarc_Dept_Param = sNarc_Menu_Param.substr(1,sNarc_Menu_Param.length); sNarc_Menu_Param = sNarc_Menu_Param.substr(0,1); } // È­¸é±¸¼º //alert(opener.javascript.getParameter("Narc_Menu_Param")); if (sNarc_Menu_Param == "I") { model.setValue("/root/temp/srchinfo/srchioflag","I"); } else if(sNarc_Menu_Param == "O"){ model.setValue("/root/temp/srchinfo/srchioflag","O"); } else { sNarc_Menu_Param = model.getAttribute("Narc_Menu_Param"); if(sNarc_Menu_Param.length > 1){ sNarc_Dept_Param = sNarc_Menu_Param.substr(2,sNarc_Menu_Param.length); sNarc_Menu_Param = sNarc_Menu_Param.substr(0,1); } if (sNarc_Menu_Param == "I") { model.setValue("/root/temp/srchinfo/srchioflag","I"); } else if(sNarc_Menu_Param == "O"){ model.setValue("/root/temp/srchinfo/srchioflag","O"); } else { sNarc_Menu_Param = model.getValue("/root/temp/topinfo/list/ioflag"); if (sNarc_Menu_Param == "I") { model.setValue("/root/temp/srchinfo/srchioflag","I"); } else if(sNarc_Menu_Param == "O"){ model.setValue("/root/temp/srchinfo/srchioflag","O"); } else { model.setValue("/root/temp/srchinfo/srchioflag","I"); } } } fChgIOFlag(); model.makeValue("/root/hidden/narc_dept", sNarc_Dept_Param); //¸¶Ãë°ú, ³»½Ã°æ½Ç ºÒÃâºÎ¼­ÄÚµå Á¶È¸ var narc_dept = ""; if(sNarc_Dept_Param != "") { submit("TRADT30407"); narc_dept = model.getValue("/root/init/execdeptlist/dept/deptcd"); } if(sNarc_Dept_Param == "op"){ //¸¶Ãë°ú¿¡¼­ ¿¬ ÆË¾÷Àϰæ¿ì ºÒÃâ½ÅûºÎ¼­ ¼ÂÆÃ N002 //model.setValue("/root/temp/srchinfo/drugdeptcd", "3073100000"); model.setValue("/root/temp/srchinfo/drugdeptcd", narc_dept); } else if (sNarc_Dept_Param == "esop") { model.setValue("/root/temp/srchinfo/srchdrugdeptflag", "Y"); cap_n003.value = model.getValue("/root/init/execdeptlist/dept/deptnm"); // 20100114_laboru //model.setValue("/root/temp/srchinfo/drugdeptcd", "2010302030"); model.setValue("/root/temp/srchinfo/drugdeptcd", narc_dept); // 2011.03.22 pymi //³»½Ã°æ½Ç ¸Þ´º´Â ¹«Á¶°Ç ¿Ü·¡¿¡ ºÎ¼­´Â ³»½Ã°æ °Ë»ç½Ç·Î ¼¼ÆÃ if(model.getValue("/root/temp/srchinfo/srchioflag") == "O") { model.setValue("/root/temp/srchinfo/srchdutplcecd", narc_dept); } // (e) } //cap_n003.value = "¼ÒÈ­±â¼¾Åͳ»½Ã°æ½Ç"; // 20100114_laboru_±âº» ºÒÃ⠺μ­ caption //º´¿øº° ºÒÃâ½ÅûºÎ¼­ ¼ÂÆÃ N003 if(narc_dept == "") { model.makeValue("/root/hidden/setdeptchk", "Y"); submit("TRADT30407"); cap_n003.value = model.getValue("/root/init/execdeptlist/dept/deptnm"); // 20100114_laboru } model.setAttribute("Narc_Menu_Param", ""); //±¸ºÐ ÃʱâÈ­(Àüü) model.setValue("/root/temp/srchinfo/narcflag", "M"); model.setValue("/root/temp/srchinfo/narcstat", "T"); rdo_cncl.disabled = true; model.setValue("/root/temp/srchinfo/cnclstat", ""); rdo_rtn.disabled = true; model.setValue("/root/temp/srchinfo/rtnstat", ""); //Åä±ÛÃʱâÈ­ //model.setValue("/root/temp/srchinfo/srchroot", "M"); //model.toggle("case1"); //Á¶È¸³¯Â¥ ÃʱâÈ­ //model.setValue("/root/temp/srchinfo/fst_dd", getCurrentDate()); //model.setValue("/root/temp/srchinfo/last_dd", getCurrentDate()); //Ä«µ¦½º¿¡¼­ ½ÃÀÛÀÏÀÚ¸¦ ³Ñ°ÜÁÜ_20090513_SMY sSMADT30400_Fromdd = model.getAttribute("SMADT30400_Fromdd"); if(sSMADT30400_Fromdd != ""){ model.setValue("/root/temp/srchinfo/fst_dd", sSMADT30400_Fromdd); }else{ model.setValue("/root/temp/srchinfo/fst_dd", getCurrentDate()); } model.setValue("/root/temp/srchinfo/last_dd", getCurrentDate()); model.setAttribute("SMADT30400_Fromdd", ""); //·Î±×ÀÎ »ç¿ëÀÚ ¼ÂÆÃ var userid = getUserId(); model.setValue("/root/temp/srchinfo/srchid", userid); fChgUserID(); fGetNarcData(); //ȯÀÚº° Á¶È¸¶ó¸é üũ Ç¥½Ã fChkPatSearch(); model.setValue("/root/temp/userinfo/userinfo/userdeptcd", getUserInfo("dutplcecd")); model.setValue("/root/temp/userinfo/userinfo/userdeptnm", getUserInfo("dutplcenm")); model.setValue("/root/temp/srchinfo/drugdeptcd", model.getValue("/root/temp/userinfo/userinfo/userdeptcd")); model.setValue("/root/temp/srchinfo/drugdeptnm", model.getValue("/root/temp/userinfo/userinfo/userdeptnm")); model.refresh(); } /** * º´µ¿º¯°æ½Ã º´½Ç Á¶È¸ */ function fSrchRoomCD(){ model.setValue("/root/temp/srchinfo/srchpid", ""); model.setValue("/root/temp/srchinfo/srchpatnm", ""); model.setValue("/root/temp/srchinfo/barcode", ""); model.setValue("/root/temp/srchinfo/srchroomcd", ""); //20090513_SMY model.setValue("/root/send/srchcond/wardcd", model.getValue("/root/temp/srchinfo/srchward")); model.setValue("/root/send/srchcond/deptflag", "2"); submit("TRADT30404"); } /** * Åä±ÛŬ¸¯½Ã */ /* function fClickToggle(chk) { if(chk == "1"){ model.setValue("/root/temp/srchinfo/srchroot", "M"); if(model.getValue("/root/temp/srchinfo/srchflag") == ""){ model.setValue("/root/temp/srchinfo/srchflag", "1"); } model.setValue("/root/temp/srchinfo/rtnflag", ""); model.setValue("/root/temp/srchinfo/spreflag", ""); model.toggle("case1"); button65.selected = true; } else if(chk == "2"){ model.setValue("/root/temp/srchinfo/srchroot", "R"); model.setValue("/root/temp/srchinfo/srchflag", ""); model.setValue("/root/temp/srchinfo/rtnflag", ""); model.setValue("/root/temp/srchinfo/spreflag", "Y"); button16.selected = true; model.toggle("case2"); } else if(chk == "3"){ model.setValue("/root/temp/srchinfo/srchroot", "M"); model.setValue("/root/temp/srchinfo/srchflag", ""); model.setValue("/root/temp/srchinfo/rtnflag", "Y"); model.setValue("/root/temp/srchinfo/spreflag", ""); model.toggle("case1"); button65.selected = true; } model.setValue("/root/temp/srchinfo/barcode",""); model.refresh(); fGetNarcData(); }*/ /** * ¸¶¾à¸®½ºÆ® Á¶È¸ */ function fGetNarcData() { initGridStyle("grd_narclist"); grd_narclist.fixedcellischeck(0, 1) = false; model.removeNode("/root/send/srchinfo"); model.makeNode("/root/send/srchinfo"); model.copyNode("/root/send/srchinfo","/root/temp/srchinfo"); if( model.getValue("/root/temp/srchinfo/prtab") == "Y") { // ÇâÁ¤¹Ýȯ¹Ý³³ÀåºÎ Ãâ·ÂÁ¶°Ç 2009.05.18 pymi model.setValue("/root/send/srchinfo/cnclflag", "Y"); model.setValue("/root/send/srchinfo/rtnflag", "Y"); model.setValue("/root/send/srchinfo/rtnstat", "T"); model.setValue("/root/send/srchinfo/cnclstat", "T"); model.setValue("/root/send/srchinfo/narcstat", ""); } // (e) submit("TRADT30105"); submit("TRADT30402"); //fBtnDisable(); for(var i = grd_narclist.fixedRows; i < grd_narclist.rows; i++){ if ( model.getValue("/root/main/narclist/narclist["+(i-1)+"]/narcflag") =="H" ){ //grd_narclist.isReadOnly( i, grd_narclist.colRef("sel") )=true; grd_narclist.isReadOnly( i, grd_narclist.colRef("sel") )=false; } else { grd_narclist.isReadOnly( i, grd_narclist.colRef("sel") )=false; } if ( model.getValue("/root/main/narclist/narclist["+(i-1)+"]/prcpkindcd") =="35" ){ grd_narclist.cellStyle("background-color", i, grd_narclist.colRef("drugnm")) = "#c8e67b"; } if(fChkEndYN(i)) grd_narclist.isReadOnly( i, grd_narclist.colRef("sel"))=true; } //»ö±òó¸® setCellStyle("grd_narclist" , "6" , "0" , "cnclstat", "equal"); setCellStyle("grd_narclist" , "6" , "0" , "rtnstat", "equal"); grd_narclist.refresh(); } function fChkEndYN(row){ //´õÀÌ»ó ÁøÇàµÉ ó¹æÀÌ ¾Æ´Ñ °æ¿ì ¼±Åùڽº ºñȰ¼ºÈ­_20090509_SMY var narcstat = model.getValue("/root/main/narclist/narclist["+(row-1)+"]/narcstat"); //ºÒÃâ»óÅ var cnclstat = model.getValue("/root/main/narclist/narclist["+(row-1)+"]/cnclstat"); //¹Ýȯ»óÅ var rtnstat = model.getValue("/root/main/narclist/narclist["+(row-1)+"]/rtnstat"); //ÀÜ·®¹Ý³³»óÅ var narcflag = model.getValue("/root/main/narclist/narclist["+(row-1)+"]/narcflag"); //ºÒÃâ»óÅ var drugno = model.getValue("/root/main/narclist/narclist["+(row-1)+"]/drugno"); //Åõ¾à¹øÈ£ /* ÁøÇà¿Ï·á »óÅÂÀÇ Ç׸ñµé ¼±Åùڽº ºñȰ¼ºÈ­ 1. ºÎ¼­È®ÀÎ (Á¤»óÁ¾·áÀÇ °æ¿ì) 2. ¹ÝȯȮÀÎ (ºÎ¼­È®ÀÎ ÀÌÈÄ ¹Ýȯ½ÅûÀÌ °¡´É, ÀÜ·® ¾øÀ» °æ¿ì) 3. ÀÜ·®È®ÀÎ (Á¤»óÁ¾·áÀ̸鼭 ÀÜ·®ÀÌ »ý¼ºµÈ ó¹æÀÎ °æ¿ì) 4. ¹ÝȯȮÀÎ & ÀÜ·®È®ÀÎ (POÀÇ °æ¿ì Ƚ¼öó¹æÀÌ °¡´ÉÇϱ⠶§¹®¿¡ ºÎºÐ ¹ÝȯÀÌ °¡´ÉÇÔ. ¹Ýȯ·®°ú ÀÜ·®ÀÌ µ¿½Ã¿¡ »ý¼ºµÉ ¼ö ÀÖÀ½) 5. ¹ÝȯÁ¾·á (ºÒÃâ ÀÌÀü¿¡ DCµÈ °æ¿ì * ´Ü, all ¹ÝȯÀ϶§¸¸) 6. ÇâÁ¤ÀÇ °æ¿ì ¹Ì½ÅûÀ̸鼭 Åõ¾à¹øÈ£°¡ ¾øÀ»¶§ (ÇâÁ¤Àº ¾à±¹¿¡¼­¸¸ ¸¶°¨°¡´ÉÇϰí, °£È£¿¡¼­ ¹Ì½ÅûÀ϶§µµ Åõ¾à±â·Ï °¡´É) * °ú°Å ó¹æÁß Åõ¾à¹øÈ£°¡ ÀÖÀ¸¸é¼­ ¹Ì½ÅûÀÎ Ç׸ñÀÌ Á¸ÀçÇϱ⠶§¹®¿¡ Åõ¾à¹øÈ£ Á¸Àç¿©ºÎ Á¶°ÇÀ» ÁÜ. */ // alert("SMADT30400.js"+narcstat+ cnclstat + rtnstat ) ; if((narcstat == "6" && cnclstat == "" && rtnstat == "") || (cnclstat == "2" && rtnstat == "") || (cnclstat == "" && rtnstat == "2") || (cnclstat == "2" && rtnstat == "2") || (cnclstat == "7") //){ || (narcflag == "H" && narcstat == "1" && drugno == '')){ // alert("SMADT30400.js"+narcstat+ cnclstat + rtnstat + "true" ) ; return true; }else return false; } /** * ¹ÙÄÚµå º¯°æ½Ã */ function fChgBarcode() { model.setValue("/root/temp/srchinfo/srchpid", ""); model.setValue("/root/temp/srchinfo/srchpatnm", ""); model.setValue("/root/temp/srchinfo/srchward", ""); model.setValue("/root/temp/srchinfo/srchroomcd", ""); var sBar = model.getValue("/root/temp/srchinfo/barcode"); if(sBar.length >= 21){ if(model.getValue("/root/temp/userinfo/userinfo/userid") == ""){ messageBox("»ç¿ëÀÚID°¡ ¾ø½À´Ï´Ù. »ç¿ëÀÚIDºÎÅÍ","C001"); //model.setValue("/root/temp/srchinfo/srchid",""); model.setFocus("input1"); } else if(sBar.substr(0,1) != "M"){ messageBox("¹ÙÄÚµå Á¤º¸°¡ ´Ù¸¨´Ï´Ù. ¹ÙÄڵ带 ´Ù½Ã","C001"); model.setValue("/root/temp/srchinfo/barcode",""); model.setFocus("input9"); } else { //¹ÙÄÚµå·Î ¸ÕÀú ÇØ´çó¹æÀ» Á¶È¸ÇÔ fGetNarcData(); //¹ÙÄÚµå·Î Acting󸮰¡ °¡´ÉÇÑ Ã³¹æÀÎÁö üũÇÔ //¹ÙÄÚµå·Î 󸮰¡´ÉÇÑ Acting : ºÎ¼­È®ÀÎ //¹ÙÄÚµå·Î Á¶È¸½Ã µ¥ÀÌÅÍ´Â ÇѰǸ¸ Á¶È¸µÊ. if(model.getValue("/root/main/narclist/narclist["+1+"]/narcstat")=="5"){ //ºÒÃâ»óŰ¡ ¾Æ´Ï¸é ºÎ¼­È®ÀÎÀ» ÇÒ¼ö¾øÀ½.Á¶È¸¸¸°¡´É //¹Ýȯ¹ÙÄÚµå´Â ¾à±¹¿¡¼­ Ãâ·ÂÇϹǷΠ·ÎÁ÷¿¡¼­ Á¦¿ÜÇÔ model.setValue("/root/main/narclist/narclist["+1+"]/sel","Y"); fNarcActing("acpt"); } } } else { messageBox("¹ÙÄÚµå Á¤º¸°¡ ´Ù¸¨´Ï´Ù.\n´Ù½Ã","C001"); model.setValue("/root/temp/srchinfo/barcode",""); model.setFocus("input9"); } model.refresh(); } function fCountStat(sActing){ if(sActing == "drug") narcstat = "2"; // ºÒÃâ½Åû if(sActing == "drugcncl") narcstat = "1"; // ºÒÃâÃë¼Ò if(sActing == "acpt") narcstat = ""; // ºÎ¼­È®ÀÎ if(sActing == "rtn") narcstat = ""; // ¹Ýȯ½Åû if(sActing == "spre") narcstat = ""; // ÀÜ·®½Åû for(var i=grd_narclist.fixedRows; i < grd_narclist.rows; i++){ } } /** * ¸¶¾à Acting ¹öư Ŭ¸¯½Ã */ function fNarcActing(sActing) { if(model.getValue("/root/temp/userinfo/userinfo/userid") == ""){ messageBox("»ç¿ëÀÚID°¡ ¾ø½À´Ï´Ù. »ç¿ëÀÚID¸¦","C001"); model.setValue("/root/temp/srchinfo/barcode",""); model.setFocus("input1"); model.refresh(); return; } if(model.getValue("/root/temp/srchinfo/drugdeptcd") == ""){ messageBox("ºÒÃâ½ÅûºÎ¼­°¡ ¾ø½À´Ï´Ù. ºÒÃâ½ÅûºÎ¼­¸¦","C001"); model.setValue("/root/temp/srchinfo/barcode",""); model.setFocus("input1"); model.refresh(); return; } model.removeNodeset("/root/send/narcinfo/narclist"); var iSel_Cnt = 0; var iActing_Cnt = 0; var sActing_nm = ""; var sActing_After = ""; var iRtn_Cnt = 0; var iRtn_Chk = 0; var issmsg = ""; //¾×ÆÃÀü üũǥ½Ã cash fChkCash("before"); for(var i=grd_narclist.fixedRows; i < grd_narclist.rows; i++){ var sel = model.getValue("/root/main/narclist/narclist["+(i-1)+"]/sel"); var sNarcStat = model.getValue("/root/main/narclist/narclist["+(i-1)+"]/narcstat"); var sCnclStat = model.getValue("/root/main/narclist/narclist["+(i-1)+"]/cnclstat"); var sRtnStat = model.getValue("/root/main/narclist/narclist["+(i-1)+"]/rtnstat"); var ioflag = model.getValue("/root/temp/srchinfo/srchioflag"); var sInclprcpcd = model.getValue("/root/main/narclist/narclist["+(i-1)+"]/inclprcpcd"); var issdeptcd = model.getValue("/root/main/narclist/narclist["+(i-1)+"]/issdeptcd"); var deptchgyn = model.getValue("/root/main/narclist/narclist["+(i-1)+"]/deptchgyn"); if(sel == 'Y'){ if ( sActing =="rtn" ){ //alert("spre"); if(sCnclStat != "0" || sNarcStat == "5"){ //alert("rtn"); sActing="spre"; } } iSel_Cnt++; if(sActing == "drug"){ if(sNarcStat == "1"){ astfCopyNodeSet("/root/send/narcinfo/narclist", "/root/main/narclist/narclist["+(i-1)+"]"); //model.makeValue("/root/send/narcinfo/narclist["+getNodesetCount("/root/send/narcinfo/narclist")+"]/acting_after", "-"); iActing_Cnt++; //¼öÇàºÎ¼­¿Í ´Ù¸¥ ºÎ¼­ÀÇ °£È£»ç°¡ ºÒÃâ½ÅûÀ» ÇÒ °æ¿ì ¾È³» ÆË¾÷(M-SETÁ¦¿Ü)_20090509_SMY //if((sInclprcpcd == "-" || sInclprcpcd == "") && issdeptcd != getUserInfo("dutplcecd")){ if(deptchgyn == "Y" && issdeptcd != getUserInfo("dutplcecd")){ issmsg = "Y"; } } sActing_nm = "ºÒÃâ½Åû"; } else if(sActing == "drugcncl"){ if(sNarcStat == "2"){ astfCopyNodeSet("/root/send/narcinfo/narclist", "/root/main/narclist/narclist["+(i-1)+"]"); //model.makeValue("/root/send/narcinfo/narclist["+getNodesetCount("/root/send/narcinfo/narclist")+"]/acting_after", "-"); iActing_Cnt++; } sActing_nm = "ºÒÃâÃë¼Ò"; } else if(sActing == "acpt"){ if(sNarcStat == "5"){ astfCopyNodeSet("/root/send/narcinfo/narclist", "/root/main/narclist/narclist["+(i-1)+"]"); //model.makeValue("/root/send/narcinfo/narclist["+getNodesetCount("/root/send/narcinfo/narclist")+"]/acting_after", "-"); iActing_Cnt++; } sActing_nm = "ºÎ¼­È®ÀÎ"; } else if(sActing == "spre"){ if(sRtnStat == "0" && sNarcStat == "6"){ astfCopyNodeSet("/root/send/narcinfo/narclist", "/root/main/narclist/narclist["+(i-1)+"]"); iActing_Cnt++; if(sCnclStat == "0" && sNarcStat != "5"){ var vb_prcpcd = model.getValue("/root/main/narclist/narclist["+(i-1)+"]/prcpcd"); //var vb_Chk = messageBox(vb_prcpcd+"¸¶¾à¿¡ ´ëÇØ ¹Ýȯ½Åû µ¥ÀÌÅͰ¡ Á¸ÀçÇÕ´Ï´Ù.\n¹Ýȯ½ÅûÀ» ", "Q004"); //if(vb_Chk == 6){ model.makeValue("/root/send/narcinfo/narclist["+getNodesetCount("/root/send/narcinfo/narclist")+"]/acting_after", "rtn"); //} else { // model.makeValue("/root/send/narcinfo/narclist["+getNodesetCount("/root/send/narcinfo/narclist")+"]/acting_after", "-"); //} } else { model.makeValue("/root/send/narcinfo/narclist["+getNodesetCount("/root/send/narcinfo/narclist")+"]/acting_after", "-"); } } sActing_nm = "¹Ý³³/¹Ýȯ½Åû"; if(sNarcStat != "6"){ iRtn_Cnt++; //iRtn_Chk = 1; } } else if(sActing == "rtn"){ /* À̼±°æ 2008-07-23 start (°£È£ÀÇ ¹Ýȯ½Åû °¡´É¹üÀ§ È®´ë) if(sCnclStat == "0" && sNarcStat == "6" && model.getValue("/root/main/narclist/narclist["+(i-1)+"]/returnqty") != ""){ *///À̼±°æ 2008-07-23 end (°£È£ÀÇ ¹Ýȯ½Åû °¡´É¹üÀ§ È®´ë) if(sCnclStat == "0" && sNarcStat != "5"){ astfCopyNodeSet("/root/send/narcinfo/narclist", "/root/main/narclist/narclist["+(i-1)+"]"); iActing_Cnt++; if(sRtnStat == "0" && sNarcStat == "6"){ var vb_prcpcd = model.getValue("/root/main/narclist/narclist["+(i-1)+"]/prcpcd"); //var vb_Chk = messageBox(vb_prcpcd+"¸¶¾à¿¡ ´ëÇØ ÀÜ·®½Åû µ¥ÀÌÅͰ¡ Á¸ÀçÇÕ´Ï´Ù.\nÀܶû¹Ý³³½ÅûÀ» ", "Q004"); //if(sNarcStat == "6"){ model.makeValue("/root/send/narcinfo/narclist["+getNodesetCount("/root/send/narcinfo/narclist")+"]/acting_after", "spre"); //}else { // model.makeValue("/root/send/narcinfo/narclist["+getNodesetCount("/root/send/narcinfo/narclist")+"]/acting_after", "-"); //} } else { model.makeValue("/root/send/narcinfo/narclist["+getNodesetCount("/root/send/narcinfo/narclist")+"]/acting_after", "-"); if(model.getValue("/root/main/narclist/narclist["+(i-1)+"]/returnqty") == ""){ iRtn_Chk = 2; } } } sActing_nm = "¹Ý³³/¹Ýȯ½Åû"; if(sNarcStat == "5"){ iRtn_Cnt++; } } } } if(iSel_Cnt == 0){ messageBox("¼±ÅÃµÈ µ¥ÀÌÅͰ¡","I004"); return; } else if(iActing_Cnt == 0){ if (iRtn_Cnt != 0){ //if(ioflag == "O") { //ÁÖ¼®Ã³¸®_20090512_SMY messageBox("ºÎ¼­È®ÀÎ ÀÌÈÄ¿¡ "+sActing_nm+"ÀÌ","I006"); return; //} } else if(iRtn_Chk == 2){ messageBox("Åõ¾à±â·Ï¿¡¼­ ¹Ýȯó¸® ÀÌÈÄ¿¡ "+sActing_nm+"ÀÌ","I006"); return;; } else if(model.getValue("/root/temp/srchinfo/barcode") == ""){ messageBox("¼±ÅÃµÈ µ¥ÀÌÅÍÁß¿¡ "+sActing_nm+"ÇÒ µ¥ÀÌÅͰ¡","I004"); return; } else if(model.getValue("/root/temp/srchinfo/barcode") != ""){ messageBox("À̹Ì","I001"); model.setValue("/root/temp/srchinfo/barcode",""); model.setFocus("input9"); model.refresh(); return; } } var msg_val = 6; if(sActing == "drug"){ //msg_val = messageBox(model.getValue("/root/temp/srchinfo/drugdeptnm")+"(À¸)·Î ºÒÃâ½Åû","S001"); //¼öÇàºÎ¼­¿Í ´Ù¸¥ ºÎ¼­ÀÇ °£È£»ç°¡ ºÒÃâ½ÅûÀ» ÇÒ °æ¿ì ¾È³» ÆË¾÷(M-SETÁ¦¿Ü)_20090509_SMY if(issmsg == "Y"){ msg_val = messageBox("¼öÇàºÎ¼­°¡ "+ getUserInfo("dutplcenm") + "(À¸)·Î º¯°æµÇ¾î ½ÅûµË´Ï´Ù.","I"); } msg_val = 6; } else if(sActing == "spre"){ msg_val = messageBox(model.getValue("/root/temp/srchinfo/drugdeptnm")+"(À¸)·Î ¹Ýȯ/ÀÜ·®½Åû","Q003"); } else if(sActing == "rtn"){ msg_val = messageBox(model.getValue("/root/temp/srchinfo/drugdeptnm")+"(À¸)·Î ¹Ýȯ/ÀÜ·®½Åû","Q003"); } if(msg_val == 6){ model.copyNode("/root/send/narcinfo/srchinfo","/root/temp/srchinfo"); model.copyNode("/root/send/narcinfo/userinfo","/root/temp/userinfo/userinfo"); model.makeValue("/root/send/narcinfo/srchinfo/acting", sActing); if(submit("TXADT30401")) { grd_narclist.fixedcellischeck(0, 1) = false; var count = model.getValue("/root/main/narclist/ret/count"); //messageBox(count+"°ÇÀÇ µ¥ÀÌÅͰ¡ "+sActing_nm,"I001"); messageBox(iActing_Cnt+"°ÇÀÇ µ¥ÀÌÅͰ¡ "+sActing_nm,"I001"); grd_narclist.rebuildStyle(); } } //¾×ÆÃÀü üũǥ½Ã ´Ù½Ã Ç¥½Ã fChkCash("after"); //ÀçÁ¶È¸_20090512_SMY fGetNarcData(); } /** * userid º¯°æ½Ã */ function fChgUserID() { var sUserid = model.getValue("/root/temp/srchinfo/srchid"); //----------------(20100621:°æºÏ´ë) //if(sUserid.length == 8 || sUserid.length == 9 || sUserid.length == 10){ //----------------(20100621) model.setValue("/root/send/userinfo/userid", sUserid); submit("TRADT30403"); if(model.getValue("/root/temp/userinfo/userinfo/userid") == ""){ messageBox("»ç¿ëÀÚID Á¤º¸°¡ ¾ø½À´Ï´Ù.\n´Ù½Ã","C001"); //model.setValue("/root/temp/srchinfo/srchid",""); model.setFocus("input1"); } else { //model.setValue("/root/temp/srchinfo/srchid",""); model.setFocus("input1"); model.refresh(); model.setFocus("input9"); } //----------------(20100621:°æºÏ´ë) //} else { // messageBox("»ç¿ëÀÚID Á¤º¸°¡ ´Ù¸¨´Ï´Ù.\n´Ù½Ã","C001"); // //model.setValue("/root/temp/srchinfo/srchid",""); // model.setFocus("input1"); //} //----------------(20100621:°æºÏ´ë) model.refresh(); } //¿Ü·¡ ºÎ¼­±¸ºÐ º¯°æ½Ã function fChgOutDept() { var sDeptcd = model.getValue("/root/temp/srchinfo/srchdutplcenm"); model.setValue("/root/send/dutdeptinfo/deptcd", sDeptcd); submit("TRADT30405"); if(model.getValue("/root/temp/dutdeptinfo/dept/deptcd") == ""){ messageBox("Á¶È¸µÈ ºÎ¼­ Á¤º¸°¡ ¾ø½À´Ï´Ù.\n´Ù½Ã","C001"); model.setValue("/root/temp/srchinfo/srchdutplcenm",""); model.setFocus("input2"); } else { rdo_dutdept.visible = true; if(getNodesetCount("/root/temp/dutdeptinfo/dept") == 1 ){ model.setValue("/root/temp/srchinfo/srchdutplcenm",model.getValue("/root/temp/dutdeptinfo/dept/deptnm")); model.setValue("/root/temp/srchinfo/srchdutplcecd",model.getValue("/root/temp/dutdeptinfo/dept/deptcd")); rdo.dutdept.visible = false; } } model.refresh(); } /** * ÀÔ¿ø¿Ü·¡±¸ºÐ º¯°æ½Ã */ function fChgIOFlag(){ var ioflag = model.getValue("/root/temp/srchinfo/srchioflag"); // È­¸é±¸¼º if (ioflag == "I") { model.setValue("/root/temp/srchinfo/srchioflag","I"); model.toggle("case3"); chk_injectflag.visible = false; rdo_drugkind.visible = true; model.setValue("/root/temp/srchinfo/drugkind", "T"); //º´µ¿ Combo Á¶È¸ model.makeValue("/root/send/srchcond/deptflag", "W"); model.makeValue("/root/send/srchcond/narcflag", "M"); submit("TRADT30401"); model.copyNode("/root/temp/drugdeptinfo","/root/temp/srchcond"); //ºÒÃâ½ÅûºÎ¼­ ¼ÂÆÃ // astfAddCombo("/root/temp/drugdeptinfo", "dept", "deptcd,deptnm", "2010302030,¼ÒÈ­±â¼¾Åͳ»½Ã°æ½Ç"); //ºÒÃâ½ÅûºÎ¼­ ¼ÂÆÃ //astfAddCombo("/root/temp/drugdeptinfo", "dept", "deptcd,deptnm", "3073100000,¼ö¼ú½Ç ¸¶Ãë"); //ºÒÃâ½ÅûºÎ¼­ ¼ÂÆÃ //astfAddCombo("/root/temp/drugdeptinfo", "dept", "deptcd,deptnm", "3073300000,¼ö¼ú½Ç ȸº¹½Ç"); //ºÒÃâ½ÅûºÎ¼­ ¼ÂÆÃ //astfAddCombo("/root/temp/srchcond", "dept", "deptcd,deptnm", "3073100000,¼ö¼ú½Ç ¸¶Ãë"); //ºÒÃâ½ÅûºÎ¼­ ¼ÂÆÃ //astfAddCombo("/root/temp/srchcond", "dept", "deptcd,deptnm", "3073300000,¼ö¼ú½Ç ȸº¹½Ç"); //ºÒÃâ½ÅûºÎ¼­ ¼ÂÆÃ // astfAddCombo("/root/temp/drugdeptinfo", "dept", "deptcd,deptnm", "2010702000,Àΰø½ÅÀå½Ç"); //ºÒÃâ½ÅûºÎ¼­ ¼ÂÆÃ //submit("TRADT30405"); //copyNodeListType("/root/temp/drugdeptinfo","/root/temp/dutdeptinfo/dept ", "after"); //copyNodeListType("/root/temp/srchcond","/root/temp/dutdeptinfo/dept ", "after"); astfAddCombo("/root/temp/srchcond", "dept", "deptcd,deptnm", ","); model.refresh(); //»ó´Ü¿¡¼­ Á¤º¸ Á¶È¸ //var node = getGlobalVariable("paminfo"); //setCSVToNode("/root/temp/topinfo", node); if(model.getValue("/root/temp/topinfo/list/wardcd") != ""){ model.setValue("/root/temp/srchinfo/srchward", model.getValue("/root/temp/topinfo/list/wardcd")); //model.setValue("/root/temp/srchinfo/drugdeptcd", model.getValue("/root/temp/topinfo/list/wardcd")); model.refresh(); if(combo1.label == ""){ model.setValue("/root/temp/srchinfo/srchward", ""); } else { fSrchRoomCD(); model.setValue("/root/temp/srchinfo/srchroomcd", model.getValue("/root/temp/topinfo/list/roomcd")); model.refresh(); if(combo3.label == "") model.setValue("/root/temp/srchinfo/srchroomcd", ""); } } //ÀÔ¿øÀÏ °æ¿ì¸¸ ¹Ýȯ¿Ï·á¿É¼Ç Á¶È¸µÊ_20090517_SMY chk_rtnendflag.visible = true; chk_nodelive.visible = false; chk_rtnendflag.refresh(); chk_nodelive.refresh(); combo2.select(1);//±×¿Ü Àû¿ëÀÏÀÚ } else if(ioflag == "O"){ model.setValue("/root/temp/srchinfo/srchioflag","O"); model.toggle("case4"); rdo_drugkind.visible = false; chk_injectflag.visible = true; model.setValue("/root/temp/srchinfo/drugkind", "I"); //¿Ü·¡´Â Áֻ縸 º¸¿©Áü // //¿Ü·¡¿ë ½ÃÇàºÎ¼­ Á¶È¸ model.makeValue("/root/send/dutdeptinfo/deptcd", ""); submit("TRADT30405"); model.copyNode("/root/temp/drugdeptinfo","/root/temp/dutdeptinfo"); //ºÒÃâ½ÅûºÎ¼­ ¼ÂÆÃ // astfAddCombo("/root/temp/drugdeptinfo", "dept", "deptcd,deptnm", "3073100000,¼ö¼ú½Ç ¸¶Ãë"); //ºÒÃâ½ÅûºÎ¼­ ¼ÂÆÃ // astfAddCombo("/root/temp/drugdeptinfo", "dept", "deptcd,deptnm", "3073300000,¼ö¼ú½Ç ȸº¹½Ç"); //ºÒÃâ½ÅûºÎ¼­ ¼ÂÆÃ //astfAddCombo("/root/temp/srchcond", "dept", "deptcd,deptnm", "3073100000,¼ö¼ú½Ç ¸¶Ãë"); //ºÒÃâ½ÅûºÎ¼­ ¼ÂÆÃ // astfAddCombo("/root/temp/srchcond", "dept", "deptcd,deptnm", "3073300000,¼ö¼ú½Ç ȸº¹½Ç"); //ºÒÃâ½ÅûºÎ¼­ ¼ÂÆÃ // astfAddCombo("/root/temp/dutdeptinfo", "dept", "deptcd,deptnm", "3073100000,¼ö¼ú½Ç ¸¶Ãë"); //ºÒÃâ½ÅûºÎ¼­ ¼ÂÆÃ // astfAddCombo("/root/temp/dutdeptinfo", "dept", "deptcd,deptnm", "3073300000,¼ö¼ú½Ç ȸº¹½Ç"); //ºÒÃâ½ÅûºÎ¼­ ¼ÂÆÃ astfAddCombo("/root/temp/dutdeptinfo", "dept", "deptcd,deptnm", ",Àüü"); var dutplcecd = getUserInfo("dutplcecd"); var dutplcenm = getUserInfo("dutplcenm"); model.setValue("/root/temp/srchinfo/srchdutplcecd", dutplcecd); model.setValue("/root/temp/srchinfo/srchdutplcenm", dutplcenm); //model.setValue("/root/temp/srchinfo/drugdeptcd", dutplcecd); if(combo4.label == ""){ model.setValue("/root/temp/srchinfo/srchdutplcecd", ""); } if(model.getValue("/root/temp/topinfo/list/pid") != ""){ model.setValue("/root/temp/srchinfo/srchpid",model.getValue("/root/temp/topinfo/list/pid")); model.setValue("/root/temp/srchinfo/srchpatnm",model.getValue("/root/temp/topinfo/list/hngnm")); } grd_narclist.colwidth(2) = 0; //ÀÔ¿øÀÏ °æ¿ì¸¸ ¹Ýȯ¿Ï·á¿É¼Ç Á¶È¸µÊ_20090517_SMY chk_rtnendflag.visible = false; chk_nodelive.visible = true; chk_rtnendflag.refresh(); chk_nodelive.refresh(); if(model.getValue("/root/temp/srchinfo/narcflag") == "H") { combo2.select(2);//¿Ü·¡ÇâÁ¤À϶§ ½Ç½ÃÀÏÀÚ } else { combo2.select(1);//±×¿Ü Àû¿ëÀÏÀÚ } } if(model.getValue("/root/temp/topinfo/list/pid") != ""){ model.setValue("/root/temp/srchinfo/srchpid",model.getValue("/root/temp/topinfo/list/pid")); model.setValue("/root/temp/srchinfo/srchpatnm",model.getValue("/root/temp/topinfo/list/hngnm")); } else { model.setValue("/root/temp/srchinfo/srchward", getUserInfo("dutplcecd")); } model.refresh(); } /** * ȯÀÚº° Á¶È¸ÀÎÁö üũ */ function fChkPatSearch() { var pid = model.getValue("/root/temp/srchinfo/srchpid"); if(pid != "" && grd_narclist.rows != 0){ for(var i = grd_narclist.fixedRows; i < grd_narclist.rows; i++){ if ( model.getValue("/root/main/narclist/narclist["+(i-1)+"]/prcpno")== model.getValue("/root/temp/srchinfo/chkprcpno") ){ if(!fChkEndYN(i)) model.setValue("/root/main/narclist/narclist["+(i-1)+"]/sel", "Y"); // 2009-06-09 ±è±Í³² } } model.refresh(); } } /** * ¾×ÆÃÈÄ Ã¼Å©Ç¥½Ã cach */ function fChkCash(chk) { var pid = model.getValue("/root/temp/srchinfo/srchpid"); if(pid != "" && grd_narclist.rows != 0){ if(chk == "before"){ model.removeNodeset("/root/temp/chkcashinfo/narclist"); for(var i = grd_narclist.fixedRows; i < grd_narclist.rows; i++){ if(model.getValue("/root/main/narclist/narclist["+(i-1)+"]/sel") == "Y"){ astfCopyNodeSet("/root/temp/chkcashinfo/narclist", "/root/main/narclist/narclist["+(i-1)+"]"); } } } else if (chk == "after"){ for(var a = 1; a <= getNodesetCount("/root/temp/chkcashinfo/narclist"); a++){ var cash_prcpdd = model.getValue("/root/temp/chkcashinfo/narclist["+a+"]/prcpdd"); var cash_prcpno = model.getValue("/root/temp/chkcashinfo/narclist["+a+"]/prcpno"); for(var b = grd_narclist.fixedRows; b < grd_narclist.rows; b++){ var search_prcpdd = model.getValue("/root/main/narclist/narclist["+b+"]/prcpdd"); var search_prcpno = model.getValue("/root/main/narclist/narclist["+b+"]/prcpno"); if(cash_prcpdd == search_prcpdd && cash_prcpno == search_prcpno){ model.setValue("/root/main/narclist/narclist["+b+"]/sel", "Y"); } } } } else { } model.refresh(); } } /** * ¸¶¾à/ÇâÁ¤Ã¼Å©½Ã ¹öư º¯°æ */ function fBtnDisable(){ if(model.getValue("/root/temp/srchinfo/narcflag") != "M"){ btn_drug.disabled = true; // ºÒÃâ½Åû ºñȰ¼ºÈ­ btn_drugcncl.disabled = true; // ºÒÃâÃë¼Ò ºñȰ¼ºÈ­ }else{ btn_drug.disabled = false; // ºÒÃâ½Åû Ȱ¼ºÈ­ btn_drugcncl.disabled = false; // ºÒÃâÃë¼Ò Ȱ¼ºÈ­ } model.refresh(); }