/** * ÆÄ ÀÏ ¸í : SMADT30200.js * ¼³ ¸í : ¸¶¾àÇâÁ¤Ã³¹æ°ü¸® Javascriot * ¼³ °è ÀÚ : ±èÄ¡±¹ * ÀÛ ¼º ÀÚ : ±èÄ¡±¹ * ¼öÁ¤ÀÌ·Â : 2015.04.22 */ var sNarc_Menu_Param = ""; var sNarc_Dept_Param = ""; var sSMADT30400_Fromdd = ""; /** * ÃʱâÈ­ */ function fInit() { var instcd =getUserInfo("dutplceinstcd"); 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) } model.setAttribute("Narc_Menu_Param", ""); //±¸ºÐ ÃʱâÈ­(Àüü) model.setValue("/root/temp/srchinfo/narcflag", "M"); model.setValue("/root/temp/srchinfo/srchdrugkind", "I"); model.setValue("/root/temp/srchinfo/drugflag", "I"); // fChkIOTotal(); 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/narctypeflag", "T"); model.setValue("/root/temp/srchinfo/srchioflag", "I"); model.setValue("/root/temp/srchinfo/drugkind", "I"); fChgIOFlag(); //Åä±ÛÃʱâÈ­ //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(); // -- ¿À·ù ¹ß»ýÀ¸·Î ÀÎÇÑ ÀÚµ¿Ã¼Å© ±â´É ¸·À½(°£È£ ¸¶¾à/Ç×Á¤¾à 󹿰ü¸® È­¸é¿¡¼­ ¾²´ø ·ÎÁ÷À» ±×´ë·Î ¹Ý¿µÇؼ­ ¹ß»ý _2015.12.31_by.Shaun 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/srchroomcd", ""); model.setValue("/root/send/srchcond/wardcd", model.getValue("/root/temp/srchinfo/srchward")); model.setValue("/root/send/srchcond/deptflag", "2"); submit("TRADT30404"); } /** * ¸¶¾à¸®½ºÆ® Á¶È¸ */ 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) // alert("row:226 Call"); submit("TRADT30105"); submit("TRADT30402"); //fBtnDisable(); ///2015³â 5¿ù11 ÀÏ ±èÄ¡±¹ 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") )=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; } else { grd_narclist.isReadOnly( i, grd_narclist.colRef("sel"))=false; } // grd_narclist.refresh(); } /////// //»ö±òó¸® 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)+"]/narcstat"); //ºÒÃâ»óÅ var cnclstat = model.getValue("/root/main/narclist/narclist["+(row)+"]/cnclstat"); //¹Ýȯ»óÅ var rtnstat = model.getValue("/root/main/narclist/narclist["+(row)+"]/rtnstat"); //ÀÜ·®¹Ý³³»óÅ var narcflag = model.getValue("/root/main/narclist/narclist["+(row)+"]/narcflag"); //ºÒÃâ»óÅ var drugno = model.getValue("/root/main/narclist/narclist["+(row)+"]/drugno"); //Åõ¾à¹øÈ£ var vname = model.getValue("/root/main/narclist/narclist["+(row)+"]/patnm"); //ºÒÃâ»óÅ /* ÁøÇà¿Ï·á »óÅÂÀÇ Ç׸ñµé ¼±Åùڽº ºñȰ¼ºÈ­ 1. ºÎ¼­È®ÀÎ (Á¤»óÁ¾·áÀÇ °æ¿ì) 2. ¹ÝȯȮÀÎ (ºÎ¼­È®ÀÎ ÀÌÈÄ ¹Ýȯ½ÅûÀÌ °¡´É, ÀÜ·® ¾øÀ» °æ¿ì) 3. ÀÜ·®È®ÀÎ (Á¤»óÁ¾·áÀ̸鼭 ÀÜ·®ÀÌ »ý¼ºµÈ ó¹æÀÎ °æ¿ì) 4. ¹ÝȯȮÀÎ & ÀÜ·®È®ÀÎ (POÀÇ °æ¿ì Ƚ¼öó¹æÀÌ °¡´ÉÇϱ⠶§¹®¿¡ ºÎºÐ ¹ÝȯÀÌ °¡´ÉÇÔ. ¹Ýȯ·®°ú ÀÜ·®ÀÌ µ¿½Ã¿¡ »ý¼ºµÉ ¼ö ÀÖÀ½) 5. ¹ÝȯÁ¾·á (ºÒÃâ ÀÌÀü¿¡ DCµÈ °æ¿ì * ´Ü, all ¹ÝȯÀ϶§¸¸) 6. ÇâÁ¤ÀÇ °æ¿ì ¹Ì½ÅûÀ̸鼭 Åõ¾à¹øÈ£°¡ ¾øÀ»¶§ (ÇâÁ¤Àº ¾à±¹¿¡¼­¸¸ ¸¶°¨°¡´ÉÇϰí, °£È£¿¡¼­ ¹Ì½ÅûÀ϶§µµ Åõ¾à±â·Ï °¡´É) * °ú°Å ó¹æÁß Åõ¾à¹øÈ£°¡ ÀÖÀ¸¸é¼­ ¹Ì½ÅûÀÎ Ç׸ñÀÌ Á¸ÀçÇϱ⠶§¹®¿¡ Åõ¾à¹øÈ£ Á¸Àç¿©ºÎ Á¶°ÇÀ» ÁÜ. */ // if( (narcstat == "6" && cnclstat == "" && rtnstat == "") // || (narcstat == "6" && rtnstat == "") // || (cnclstat == "" && rtnstat == "2") || (cnclstat == "2" && rtnstat == "2") // || (cnclstat == "7") // || (narcflag == "H" && narcstat == "1" && drugno == '')){ // return true; // }else return false; if( (narcstat != "6" ) || ((narcstat == "6" && cnclstat == "2") || (narcstat == "6" && cnclstat == "7") ) || (narcstat == "6" && rtnstat == "2") //(narcstat == "6" && cnclstat == "" && rtnstat == "") // || (narcstat == "6" && cnclstat == "" && rtnstat == "1") // || (narcstat == "6" && rtnstat == "1") // || (cnclstat == "2" && rtnstat == "") // || (cnclstat == "" && rtnstat == "2") || (cnclstat == "2" && rtnstat == "2") // || (cnclstat == "7") // || (narcflag == "H" && narcstat == "1" && drugno == '')) ){ return true; }else return false; ///-- alert(row + ":"+vname+" ok"); } /** * ¹ÙÄÚµå º¯°æ½Ã */ 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 = ""; // ÀÜ·®È®ÀÎ if(sActing == "sprein") 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)+"]/sel"); var sNarcStat = model.getValue("/root/main/narclist/narclist["+(i)+"]/narcstat"); var sCnclStat = model.getValue("/root/main/narclist/narclist["+(i)+"]/cnclstat"); var sRtnStat = model.getValue("/root/main/narclist/narclist["+(i)+"]/rtnstat"); var ioflag = model.getValue("/root/temp/srchinfo/srchioflag"); var sInclprcpcd = model.getValue("/root/main/narclist/narclist["+(i)+"]/inclprcpcd"); var issdeptcd = model.getValue("/root/main/narclist/narclist["+(i)+"]/issdeptcd"); var deptchgyn = model.getValue("/root/main/narclist/narclist["+(i)+"]/deptchgyn"); var vprcpcd = model.getValue("/root/main/narclist/narclist["+(i)+"]/prcpcd"); 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 == "1" && 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"); 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", "-"); } } sActing_nm = "¹Ý³³/¹Ýȯ½Åû"; if(sNarcStat != "6"){ iRtn_Cnt++; } } else if(sActing == "sprein"){ var Pprcpvol = model.getValue("/root/main/narclist/narclist["+(i)+"]/prcpvol"); var Psprevol = model.getValue("/root/main/narclist/narclist["+(i)+"]/sprevol"); var totdrugqty = model.getValue("/root/main/narclist/narclist["+(i)+"]/totdrugqty"); if ( Psprevol == 0 ) { for(var i=grd_narclist.fixedRows; i < grd_narclist.rows; i++){ var sel = model.getValue("/root/main/narclist/narclist["+(i)+"]/sel"); if(sel == 'Y'){ model.setValue("/root/main/narclist/narclist["+(i)+"]/rtnstat",""); } } messageBox("½ÅûÀÜ·®ÀÌ 0","I009"); return; } //alert(parseFloat(Pprcpvol)); //alert(parseFloat(Psprevol) * parseFloat(totdrugqty)); if ( parseFloat(Pprcpvol) <= (parseFloat(Psprevol) * parseFloat(totdrugqty)) ) { for(var i=grd_narclist.fixedRows; i < grd_narclist.rows; i++){ var sel = model.getValue("/root/main/narclist/narclist["+(i)+"]/sel"); if(sel == 'Y'){ model.setValue("/root/main/narclist/narclist["+(i)+"]/rtnstat",""); } } messageBox(vprcpcd +"Äڵ尡 Ãѿ뷮º¸´Ù ÀÜ·®½Åû·®ÀÌ À۾ƾß","I006"); return; } var PRtncnts = model.getValue("/root/main/narclist/narclist["+(i)+"]/rtncnts"); if ( PRtncnts == "") { for(var i=grd_narclist.fixedRows; i < grd_narclist.rows; i++){ var sel = model.getValue("/root/main/narclist/narclist["+(i)+"]/sel"); if(sel == 'Y'){ model.setValue("/root/main/narclist/narclist["+(i)+"]/rtnstat",""); } } messageBox("ÀÜ·®½Åû »çÀ¯°¡ ÀÖ¾î¾ß ","I006"); return; } if(sRtnStat == "1" && sNarcStat == "6"){ astfCopyNodeSet("/root/send/narcinfo/narclist", "/root/main/narclist/narclist["+(i)+"]"); iActing_Cnt++; if(sCnclStat == "0" && sNarcStat != "5"){ var vb_prcpcd = model.getValue("/root/main/narclist/narclist["+(i)+"]/prcpcd"); 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", "-"); } } sActing_nm = "¹Ý³³/¹Ýȯ½Åû"; if(sNarcStat != "6"){ iRtn_Cnt++; } } else if(sActing == "SpreCncl"){ // ***ÀÜ·®½Åû Ãë¼Ò*** if(sRtnStat == "1" ){ // [ÀÜ·®½Åû Ãë¼Ò] ÀÏ ¶§ astfCopyNodeSet("/root/send/narcinfo/narclist", "/root/main/narclist/narclist["+i+"]"); //alert(model.getValue("/root/main/narclist/narclist["+(i)+"]/sprevol")); iActing_Cnt++; } sActing_nm = "ÀÜ·®½ÅûÃë¼Ò"; } else if(sActing == "rtn"){ 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"); 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", "-"); 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; }*/ } // debugger; 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 == "sprein"){ // msg_val = messageBox(model.getValue("/root/temp/srchinfo/drugdeptnm")+"(À¸)·Î ÀÜ·®½Åû","Q003"); msg_val = messageBox("¸¶¾à,ÇâÁ¤ ÀÜ·®½ÅûÀ» ","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); // alert("SMADT30200.JS Row:463 TXADT30401 Call "); if(sActing == "SpreCncl"){ if(submit("TXADT30101")) { // alert("SMADT30200.JS Row:463 TXADT30101 Call "); grd_narclist.fixedcellischeck(0, 1) = false; var count = model.getValue("/root/main/narclist/ret/count"); messageBox(iActing_Cnt+"°ÇÀÇ µ¥ÀÌÅͰ¡ "+sActing_nm,"I001"); grd_narclist.rebuildStyle(); } } else { if(submit("TXADT30401")) { // alert("SMADT30200.JS Row:463 TXADT30401 Call "); grd_narclist.fixedcellischeck(0, 1) = false; var count = model.getValue("/root/main/narclist/ret/count"); messageBox(iActing_Cnt+"°ÇÀÇ µ¥ÀÌÅͰ¡ "+sActing_nm,"I001"); grd_narclist.rebuildStyle(); } } //submit("TXADT30101"); TXADT30401 } //¾×ÆÃÀü üũǥ½Ã ´Ù½Ã Ç¥½Ã 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"); model.setValue("/root/temp/srchinfo/drugkind", "I"); rdo_drugkind.visible = true; combo5.visible = true; combo4.visible = true; caption7.text = 'º´µ¿ :'; caption6.visible = true; combo1.visible = false; //º´µ¿ 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/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.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", ""); } } combo2.select(1);//±×¿Ü Àû¿ëÀÏÀÚ } else if(ioflag == "O"){ model.setValue("/root/temp/srchinfo/srchioflag","O"); model.toggle("case4"); rdo_drugkind.visible = false; // combo5.visible = false; combo4.visible = false; caption7.text = 'ºÎ¼­ :'; caption6.visible = false; combo1.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/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); 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")); } if(model.getValue("/root/temp/srchinfo/narcflag") == "H") { combo2.select(2);//¿Ü·¡ÇâÁ¤À϶§ ½Ç½ÃÀÏÀÚ } else { combo2.select(1);//±×¿Ü Àû¿ëÀÏÀÚ } //¿Ü·¡Àϰæ¿ì º´µ¿Àº Ŭ¸®¾î model.setValue("/root/temp/srchinfo/srchward", ""); model.setValue("/root/temp/srchinfo/srchdeptcd", ""); } 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(); }