/** * ?? ?? ?? : SMADT00200.js * ?? ?? : ATC ???? ???? Javascriot * ?? ?? ?? : ?????? * ?? ?? ?? : ?????? * ???????? : 2007.5.07 / ???????? / ?????? */ /** * ?????? */ function fInit() { var ioflag = ""; ioflag = getScreenMenuParameter(); model.setValue("/root/hidden/srchinfo/srchflag1", ioflag); if(ioflag == "O") { model.setValue("/root/hidden/srchinfo/atcioflag", "1"); } else if( ioflag == "I") { model.setValue("/root/hidden/srchinfo/atcioflag", "2"); } radio2.dispatch("xforms-value-changed"); success = submit("TRADT00103"); //???? ?????? model.setValue("/root/hidden/srchinfo/srchtrsmflag","N"); //model.setValue("/root/hidden/srchinfo/srchflag1", "O"); model.setValue("/root/hidden/srchinfo/srchflag2", ""); //grd_pat.colhidden(3) = true; //srchflag1? ????? ??column hidden //???? ?????? var curDate = new Date(); model.setValue("/root/hidden/srchinfo/startdd", getCurrentDate()); model.setValue("/root/hidden/srchinfo/enddd", getCurrentDate()); model.setValue("/root/hidden/srchinfo/starttm", "0000"); model.setValue("/root/hidden/srchinfo/endtm", "2359"); //???? KEY ?????? model.setValue("/root/hidden/srchinfo/drugno", ""); model.setValue("/root/hidden/srchinfo/wardcd", ""); model.setValue("/root/hidden/srchinfo/pid", ""); model.setValue("/root/hidden/srchinfo/srchsumdd", getCurrentDate() ); //TEST - ???? ???? ???? ?????? model.setValue("/root/send/suminfo/pid", ""); model.setValue("/root/send/suminfo/orddd", ""); model.setValue("/root/send/suminfo/cretno", ""); model.setValue("/root/send/suminfo/orddrid", ""); model.setValue("/root/send/suminfo/orddeptcd", ""); grd_prcplist.fixedcellcheckbox(0,1)=true; grd_pat.fixedcellcheckbox(0,0)=true; //???? Combo ???? model.setValue("/root/send/deptinfo/deptflag", "W"); //success = submit("TRADT00210"); //if (success) astfAddCombo("/root/hidden/deptlist","ward","wardcd,wardnm",",Àüü"); //º´µ¿ Combo Á¶È¸ 20110102 À̼±°æ ¼öÁ¤ submit("TRADT10203"); astfAddCombo("/root/hidden/deptlist", "ward", "wardcd,wardnm", "T,Àüü"); // ÀÇÁ¤ºÎ atcÃâ·Â¼ø¼­ var dutplceinstcd = getUserInfo("dutplceinstcd"); if(dutplceinstcd == "013") { model.makeValue("/root/hidden/srchinfo/atc3", "Y"); } else { model.makeValue("/root/hidden/srchinfo/atc3", "N"); } //20101209 À̼±°æ Ãß°¡ : Á¤Á¦ ÀÛÀº¶óº§(¸®½ºÆ®Çü½Ä) Ãâ·Â½Ã ptp ÇÔ²² Ãâ·ÂÇÒÁö ¿©ºÎ submit("TRADT10207"); //20110927_laboru_atc ÀÔ·ÂÈ­¸é ÀÚµ¿Ãâ·Â ¿©ºÎ if(model.getValue("/root/init/sumprcpflagyn/flagyn/atcautoflag") == "Y") { checkbox2.selected = true; model.setValue("root/hidden/autolbl","Y"); } else { checkbox2.deselect(1); } //¶óº§ Ãâ·Â Çü½Ä ¿É¼Ç submit("TRADT10208"); //¹ÙÄÚµåÇÁ¸°Åͼ³Á¤ ÃʱâÈ­ model.setValue("/root/send/scrnid", getScreenID()); submit("TRLLC90101"); var comm = model.getValue("/root/main/barcdprntsetup/prntsetupinfo/setupinfo/comm02/comm"); var prntkind = model.getValue("/root/main/barcdprntsetup/prntsetupinfo/setupinfo/prntkind"); if(comm == "2") { model.setValue("/root/main/barcdprntsetup/prntsetupinfo/setupinfo/comm02/comm", "1"); } if(prntkind == "1") { model.setValue("/root/main/barcdprntsetup/prntsetupinfo/setupinfo/prntkind", "5"); } //¶óº§±×·ì, Ãâ·Â±¸ºÐ Ç׸ñ ¸®½ºÆ® Á¶È¸ submit("TRADT00215"); //¶óº§±×·ì, Ãâ·Â±¸ºÐ ÀúÀå°ª Á¶È¸ submit("TRADT00216"); model.refresh(); } /** * ATC ȯÀÚ¸®½ºÆ® Á¶È¸ */ function fPatListSrch() { model.removeNodeset("/root/main/pat/patlist"); model.removeNodeset("/root/main/prcp/prcplist"); model.removeNodeset("/root/main/pat/memoinfo"); model.removeNodeset("/root/main/prcp/patdata"); model.removeNodeset("/root/main/prcp/diagdata/diagnm"); model.refresh(); model.copyNode("/root/send/srchinfo", "/root/hidden/srchinfo"); submit("TRADT00213"); grd_pat.fixedcellcheckbox(0,0)=true; if ( grd_pat.rows >0) { grd_pat.row =1; } if(model.getValue("/root/hidden/srchinfo/powdflag") != "Y"){ for(var i = 1; i <= getNodesetCount("/root/main/pat/patlist"); i++) { if (model.getValue("/root/main/pat/patlist[" + i + "]/powdflag") == "Y" || model.getValue("/root/main/pat/patlist[" + i + "]/age") == "Y") { grd_pat.isReadOnly(i, grd_pat.colRef("sel"), i, grd_pat.colRef("powdflag")) = true; } else { grd_pat.isReadOnly(i, grd_pat.colRef("sel"), i, grd_pat.colRef("powdflag")) = false; } } } } /** * ATC ȯÀÚ¸®½ºÆ® ¼±Åýà Àü¼Û´ë»óÀÚ·á Ç¥½Ã */ function fATCPrcpData(rowid) { var pat_info; var irow = 0; if(rowid == "") { irow = grd_pat.row; } else { irow = rowid; } /* model.resetInstanceNode("/root/main/prcp/prcplist"); grd_prcplist.refresh(); */ model.removeNodeset("/root/main/prcp/prcplist"); model.removeNodeset("/root/main/pat/memoinfo"); model.removeNodeset("/root/main/prcp/patdata"); model.removeNodeset("/root/main/prcp/diagdata/diagnm"); model.refresh(); /* @ ¿ë¹ýÄÚµå º¯°æ ¿É¼Ç ¿©ºÎ ¼³Á¤ - 20091107 - gv_mthdOpt - default : N */ gv_mthdOpt = model.getValue("/root/main/pat/patlist["+irow+"]/mthdopt"); model.setValue("/root/send/prcpinfo/drugdd", model.getValue("/root/main/pat/patlist["+irow+"]/drugdd")); model.setValue("/root/send/prcpinfo/drugno", model.getValue("/root/main/pat/patlist["+irow+"]/drugno")); model.setValue("/root/send/prcpinfo/ioflag", model.getValue("/root/main/pat/patlist["+irow+"]/ioflag")); model.setValue("/root/send/prcpinfo/pid", model.getValue("/root/main/pat/patlist["+irow+"]/pid")); model.setValue("/root/send/prcpinfo/srchpid", model.getValue("/root/main/pat/patlist["+irow+"]/pid")); model.setValue("/root/send/prcpinfo/orddd", model.getValue("/root/main/pat/patlist["+irow+"]/orddd")); model.setValue("/root/send/prcpinfo/srchindd", model.getValue("/root/main/pat/patlist["+irow+"]/orddd")); model.setValue("/root/send/prcpinfo/cretno", model.getValue("/root/main/pat/patlist["+irow+"]/cretno")); model.setValue("/root/send/prcpinfo/orddeptcd", model.getValue("/root/main/pat/patlist["+irow+"]/orddeptcd")); model.setValue("/root/send/prcpinfo/prcpgenrflag", model.getValue("/root/main/pat/patlist["+irow+"]/prcpgenrflag")); model.setValue("/root/send/prcpinfo/prnt_drugflag", model.getValue("/root/main/pat/patlist["+irow+"]/prnt_drugflag")); model.setValue("/root/send/prcpinfo/prcpflag", model.getValue("/root/main/pat/patlist["+irow+"]/prnt_drugflag")); model.setValue("/root/send/prcpinfo/atcioflag", model.getValue("/root/hidden/srchinfo/atcioflag")); model.makeValue("/root/send/prcpinfo/powdflag", model.getValue("/root/hidden/srchinfo/powdflag")); // »êÁ¦±¸ºÐ if(rowid == "") { //ÀϰýÀü¼Û½Ã hidden/atcno¸¦ º¯°æÇÏÁö ¾ÊÀ½ model.setValue("/root/hidden/atcno",model.getValue("/root/main/pat/patlist["+irow+"]/atcno")); } model.setValue("/root/temp/selrow", irow); model.refresh(); if ( model.getValue("/root/hidden/srchinfo/srchflag1") =="O" ){ pat_info = "O¢Ë"+ model.getValue("/root/main/pat/patlist["+irow+"]/pid") +"¢Ë"+model.getValue("/root/main/pat/patlist["+irow+"]/drugdd")+"¢Ë"+model.getValue("/root/main/pat/patlist["+irow+"]/cretno")+"¢Ë"+getUserInfo("dutplceinstcd")+"¢Ë1¢Ë"+model.getValue("/root/main/pat/patlist["+irow+"]/drugdd"); } else if ( model.getValue("/root/hidden/srchinfo/srchflag1") =="I" ){ pat_info = "I¢Ë"+ model.getValue("/root/main/pat/patlist["+irow+"]/pid") +"¢Ë"+model.getValue("/root/main/pat/patlist["+irow+"]/orddd")+"¢Ë"+model.getValue("/root/main/pat/patlist["+irow+"]/cretno")+"¢Ë1¢Ë"+getUserInfo("dutplceinstcd"); } setParameter("condparam",pat_info); //modal("SPMMO08900", 1, "", "", "", "", "", "left:0; right:0; width:0; height:0; sysmenu:hidden; caption:hidden; min:hidden, max:hidden;"); submit("TRADT00209"); /*var pamInfoCvs = getGlobalVariable("paminfo"); alert(pamInfoCvs); if(!isNull(pamInfoCvs)){ //cvs°¡ nullÀÌ ¾Æ´Ñ °æ¿ì¿¡¸¸ ó¸®ÇÔ. model.removeNodeSet ( "/root/paminfo/list" ); //»ó´ÜÈ­¸é Á¤º¸ ÃʱâÈ­ setCSVToNode ( "/root/paminfo", pamInfoCvs ); }*/ // for ( var i = 1 ; i < grd_prcplist.rows; i++){ // grd_prcplist.addStatus(i,"update"); // } /* // 2008-10-16 À̼±°æ ¼öÁ¤ (±âŸ¿ë¹ý(zzz)À» ³½ °æ¿ì default°ªÀ¸·Î 1ȸ´Â ¾ÆÄ§, 2ȸ´Â ¾ÆÄ§,Àú³áÀ¸·Î ¼±Åõǵµ·Ï) for(i = 1; i <= getNodesetCount("/root/main/prcp/prcplist") ; i++){ if(model.getValue("/root/main/prcp/prcplist["+ i + "]/mthdcd1") == "Z"){ if(model.getValue("/root/main/prcp/prcplist["+ i + "]/prcptims") == 1 ) { model.setValue("/root/main/prcp/prcplist["+ i + "]/morningadminqty", "1"); model.setValue("/root/main/prcp/prcplist["+ i + "]/lunchadminqty", "0"); model.setValue("/root/main/prcp/prcplist["+ i + "]/dinneradminqty", "0"); model.setValue("/root/main/prcp/prcplist["+ i + "]/bedtimeadminqty", "0"); model.setValue("/root/main/prcp/prcplist["+ i + "]/specialadminqty", "0"); } else if(model.getValue("/root/main/prcp/prcplist["+ i + "]/prcptims") == 2 ) { model.setValue("/root/main/prcp/prcplist["+ i + "]/morningadminqty", "1"); model.setValue("/root/main/prcp/prcplist["+ i + "]/lunchadminqty", "0"); model.setValue("/root/main/prcp/prcplist["+ i + "]/dinneradminqty", "1"); model.setValue("/root/main/prcp/prcplist["+ i + "]/bedtimeadminqty", "0"); model.setValue("/root/main/prcp/prcplist["+ i + "]/specialadminqty", "0"); } } } model.refresh();*/ // 20100322_laboru_ÀúÀåµÈ µ¥ÀÌÅÍÀÏ °æ¿ì ¾àǰÄÚµå¿Í ¿ë¹ýÄڵ尡 µ¿ÀÏÇÑ Ã³¹æ¿¡ ´ëÇÑ ÀçÁ¤¸®¸¸ ÇÔ. /*if(model.getValue("/root/main/prcp/prcplist/savedataynflag") == "N" ) { //2009-02-23 À̼±°æ Ãß°¡(mixno Á¤¸®) fMakeMixno("Y"); } else { fSaveDataMakeMixno_knu("Y"); }*/ //20101228 À̼±°æ ¼öÁ¤ : °°Àº ¾à¹øÈ£¿¡¼­ Á¤Á¦/»êÁ¦ ±¸ºÐÇÏ°í »êÁ¦(p)À϶§¸¸ mixno ÀÚµ¿»ý¼º( atcÈ­¸é¿¡¼­ ÀúÀå or Àü¼ÛÇÑ µ¥ÀÌÅÍ Á¶È¸½Ã¿¡´Â Á¦¿Ü) if(model.getValue("/root/main/prcp/prcplist/savedataynflag") == "N" ) { fMakeMixno_knu(); } else { fSaveDataMakeMixno("Y"); } } /** * mixno ÀçÁ¤¸® **/ function fMakeMixno(pwdflag) { var prevno = 0; var minno = 70; var mthdcdall = ""; var mthdcdall2 = ""; var preprcpcd = ""; var prcpcd = ""; //»êÁ¦¿ë¹ýº° mix ¹øÈ£»ý¼º ¿É¼ÇÀÏ °æ¿ì(Á¶È¸Á¶°ÇÀº »êÁ¦¸¸ÀÌ°í »êÁ¦Ã³¹æÀÌ°í º´µ¿Ã³¹æÀ̰í Åð¿ø, ¿ÜÃâ/¿Ü¹ÚÀº ¾Æ´Ï°í ) if(model.getValue("/root/main/pat/patlist[" + grd_pat.row + "]/atcpwdlblyn") == "Y" && pwdflag == "Y" ) { for(var i = 1; i <= getNodesetCount("/root/main/prcp/prcplist") ; i++) { if(model.getValue("/root/main/prcp/prcplist["+ i + "]/prcpmixnoyn") == "-") { mthdcdall = model.getValue("/root/main/prcp/prcplist["+ i + "]/mthdcd1") + model.getValue("/root/main/prcp/prcplist["+ i + "]/mthdcd2") + model.getValue("/root/main/prcp/prcplist["+ i + "]/mthdcd3") + model.getValue("/root/main/prcp/prcplist["+ i + "]/mthdcd4") + model.getValue("/root/main/prcp/prcplist["+ i + "]/mthdcd5") + model.getValue("/root/main/prcp/prcplist["+ i + "]/mthdcd6") ; model.setValue("/root/main/prcp/prcplist["+ i + "]/prcpmixno", minno); model.setValue("/root/main/prcp/prcplist["+ i + "]/prcpmixnoyn", "Y"); for(var j = i +1; j <= getNodesetCount("/root/main/prcp/prcplist") ; j++) { mthdcdall2 = model.getValue("/root/main/prcp/prcplist["+ j + "]/mthdcd1") + model.getValue("/root/main/prcp/prcplist["+ j + "]/mthdcd2") + model.getValue("/root/main/prcp/prcplist["+ j + "]/mthdcd3") + model.getValue("/root/main/prcp/prcplist["+ j + "]/mthdcd4") + model.getValue("/root/main/prcp/prcplist["+ j + "]/mthdcd5") + model.getValue("/root/main/prcp/prcplist["+ j + "]/mthdcd6") ; if(mthdcdall == mthdcdall2 && model.getValue("/root/main/prcp/prcplist["+ j + "]/prcpmixno") == "-") { model.setValue("/root/main/prcp/prcplist["+ j + "]/prcpmixno", minno); model.setValue("/root/main/prcp/prcplist["+ j + "]/prcpmixnoyn", "Y"); } } minno++; } } } else { for(var i = 1; i <= getNodesetCount("/root/main/prcp/prcplist") ; i++) { if(model.getValue("/root/main/prcp/prcplist["+ i + "]/prcpmixno") != "-" && model.getValue("/root/main/prcp/prcplist["+ i + "]/prcpmixnoyn") == "-") { if( prevno == 0) { prevno = model.getValue("/root/main/prcp/prcplist["+ i + "]/prcpmixno"); model.setValue("/root/main/prcp/prcplist["+ i + "]/prcpmixno", minno); model.setValue("/root/main/prcp/prcplist["+ i + "]/prcpmixnoyn", "Y"); } else { if(prevno == model.getValue("/root/main/prcp/prcplist["+ i + "]/prcpmixno")) { model.setValue("/root/main/prcp/prcplist["+ i + "]/prcpmixno", minno); model.setValue("/root/main/prcp/prcplist["+ i + "]/prcpmixnoyn", "Y"); } else { prevno = model.getValue("/root/main/prcp/prcplist["+ i + "]/prcpmixno"); model.setValue("/root/main/prcp/prcplist["+ i + "]/prcpmixno", minno++); model.setValue("/root/main/prcp/prcplist["+ i + "]/prcpmixnoyn", "Y"); } } for(var j = i; j <= getNodesetCount("/root/main/prcp/prcplist") ; j++) { if(prevno == model.getValue("/root/main/prcp/prcplist["+ j + "]/prcpmixnofix")) { model.setValue("/root/main/prcp/prcplist["+ j + "]/prcpmixno", minno); model.setValue("/root/main/prcp/prcplist["+ j + "]/prcpmixnoyn", "Y"); } } } //¾àǰÄÚµå¿Í ¿ë¹ýÄڵ尡 µ¿ÀÏÇÑ Ã³¹æÀÌ 2°³ ÀÌ»ó µé¾î¿ÔÀ» °æ¿ì 1°³¸¸ »©°í ³ª¸ÓÁö´Â ºÐ¸®¹øÈ£ ¼ÂÆÃ if(model.getValue("/root/main/prcp/prcplist["+ i + "]/prcpmixno") == "-") { preprcpcd = model.getValue("/root/main/prcp/prcplist["+ i + "]/prcpcd"); mthdcdall = model.getValue("/root/main/prcp/prcplist["+ i + "]/mthdcd1") + model.getValue("/root/main/prcp/prcplist["+ i + "]/mthdcd2") + model.getValue("/root/main/prcp/prcplist["+ i + "]/mthdcd3") + model.getValue("/root/main/prcp/prcplist["+ i + "]/mthdcd4") + model.getValue("/root/main/prcp/prcplist["+ i + "]/mthdcd5") + model.getValue("/root/main/prcp/prcplist["+ i + "]/mthdcd6") ; for(var k = i+1 ; k <= getNodesetCount("/root/main/prcp/prcplist") ; k++) { prcpcd = model.getValue("/root/main/prcp/prcplist["+ k + "]/prcpcd"); mthdcdall2 = model.getValue("/root/main/prcp/prcplist["+ k + "]/mthdcd1") + model.getValue("/root/main/prcp/prcplist["+ k + "]/mthdcd2") + model.getValue("/root/main/prcp/prcplist["+ k + "]/mthdcd3") + model.getValue("/root/main/prcp/prcplist["+ k + "]/mthdcd4") + model.getValue("/root/main/prcp/prcplist["+ k + "]/mthdcd5") + model.getValue("/root/main/prcp/prcplist["+ k + "]/mthdcd6") ; if(preprcpcd == prcpcd && mthdcdall == mthdcdall2) { model.setValue("/root/main/prcp/prcplist["+ k + "]/prcpmixno", minno); } } } } } model.refresh(); } /** * 20100322_laboru * ÀúÀåµÈ µ¥ÀÌÅÍÀÇ mixno ÀçÁ¤¸® **/ function fSaveDataMakeMixno(pwdflag) { var prevno = 0; var minno = 70; var tdivno = 1; // 20110513_laboru_±¸ºÐ t ÀÏ °æ¿ì ºÐ¸®¹øÈ£ 1 ºÎÅÍ Àû¿ë var mthdcdall = ""; var mthdcdall2 = ""; var preprcpcd = ""; var prcpcd = ""; //»êÁ¦¿ë¹ýº° mix ¹øÈ£»ý¼º ¿É¼ÇÀÏ °æ¿ì(Á¶È¸Á¶°ÇÀº »êÁ¦¸¸ÀÌ°í »êÁ¦Ã³¹æÀÌ°í º´µ¿Ã³¹æÀ̰í Åð¿ø, ¿ÜÃâ/¿Ü¹ÚÀº ¾Æ´Ï°í ) if(model.getValue("/root/main/pat/patlist[" + grd_pat.row + "]/atcpwdlblyn") == "Y" && pwdflag == "Y" ) { } else { for(var i = 1; i <= getNodesetCount("/root/main/prcp/prcplist") ; i++) { //¾àǰÄÚµå¿Í ¿ë¹ýÄڵ尡 µ¿ÀÏÇÑ Ã³¹æÀÌ 2°³ ÀÌ»ó µé¾î¿ÔÀ» °æ¿ì 1°³¸¸ »©°í ³ª¸ÓÁö´Â ºÐ¸®¹øÈ£ ¼ÂÆÃ if(model.getValue("/root/main/prcp/prcplist["+ i + "]/prcpmixno") == "-") { preprcpcd = model.getValue("/root/main/prcp/prcplist["+ i + "]/prcpcd"); mthdcdall = model.getValue("/root/main/prcp/prcplist["+ i + "]/mthdcd1") + model.getValue("/root/main/prcp/prcplist["+ i + "]/mthdcd2") + model.getValue("/root/main/prcp/prcplist["+ i + "]/mthdcd3") + model.getValue("/root/main/prcp/prcplist["+ i + "]/mthdcd4") + model.getValue("/root/main/prcp/prcplist["+ i + "]/mthdcd5") + model.getValue("/root/main/prcp/prcplist["+ i + "]/mthdcd6") ; for(var k = i+1 ; k <= getNodesetCount("/root/main/prcp/prcplist") ; k++) { prcpcd = model.getValue("/root/main/prcp/prcplist["+ k + "]/prcpcd"); mthdcdall2 = model.getValue("/root/main/prcp/prcplist["+ k + "]/mthdcd1") + model.getValue("/root/main/prcp/prcplist["+ k + "]/mthdcd2") + model.getValue("/root/main/prcp/prcplist["+ k + "]/mthdcd3") + model.getValue("/root/main/prcp/prcplist["+ k + "]/mthdcd4") + model.getValue("/root/main/prcp/prcplist["+ k + "]/mthdcd5") + model.getValue("/root/main/prcp/prcplist["+ k + "]/mthdcd6") ; if(preprcpcd == prcpcd && mthdcdall == mthdcdall2) { model.setValue("/root/main/prcp/prcplist["+ k + "]/prcpmixno", minno); } } } var mthdcd1 = model.getValue("/root/main/prcp/prcplist["+ i + "]/mthdcd1") + model.getValue("/root/main/prcp/prcplist["+ i + "]/mthdcd2") + model.getValue("/root/main/prcp/prcplist["+ i + "]/mthdcd3") + model.getValue("/root/main/prcp/prcplist["+ i + "]/mthdcd4") + model.getValue("/root/main/prcp/prcplist["+ i + "]/mthdcd5") + model.getValue("/root/main/prcp/prcplist["+ i + "]/mthdcd6") ; var mthdcdfive1 = model.getValue("/root/main/prcp/prcplist["+ i + "]/mthdcd5"); var dayno1 = model.getValue("/root/main/prcp/prcplist["+ i + "]/prcpdayno"); var prcpmixno1 = model.getValue("/root/main/prcp/prcplist["+ i + "]/prcpmixno"); // 20110513_laboru_±¸ºÐ t ÀÏ °æ¿ì ¶óº§ ¹­ÀÌ´Â °Í°ú µ¿ÀÏÇÏ°Ô ºÐ¸®¹øÈ£ ¹­±â if(model.getValue("/root/main/prcp/prcplist["+ i + "]/drugkind") == "t" && model.getValue("/root/main/prcp/prcplist["+ i + "]/prcpmixno") == "-") { model.setValue("/root/main/prcp/prcplist["+ i + "]/prcpmixno", tdivno); for(var k = i+1 ; k <= getNodesetCount("/root/main/prcp/prcplist") ; k++) { if(model.getValue("/root/main/prcp/prcplist["+ k + "]/drugkind") == "t" ) { var mthdcd2 = model.getValue("/root/main/prcp/prcplist["+ k + "]/mthdcd1") + model.getValue("/root/main/prcp/prcplist["+ k + "]/mthdcd2") + model.getValue("/root/main/prcp/prcplist["+ k + "]/mthdcd3") + model.getValue("/root/main/prcp/prcplist["+ k + "]/mthdcd4") + model.getValue("/root/main/prcp/prcplist["+ k + "]/mthdcd5") + model.getValue("/root/main/prcp/prcplist["+ k + "]/mthdcd6") ; var mthdcdfive2 = model.getValue("/root/main/prcp/prcplist["+ k + "]/mthdcd5"); var dayno2 = model.getValue("/root/main/prcp/prcplist["+ k + "]/prcpdayno"); var prcpmixno2 = model.getValue("/root/main/prcp/prcplist["+ k + "]/prcpmixno"); if( (mthdcdfive1 == mthdcdfive2 && dayno1 == dayno2 ) || (dayno1 == dayno2 && mthdcdfive1 == "P" && (mthdcd2 == "A11D" || mthdcd2 == "A11DI") && prcpmixno1 == prcpmixno2 ) || (dayno1 == dayno2 && mthdcdfive2 == "P" && (mthdcd1 == "A11D" || mthdcd1 == "A11DI") && prcpmixno1 == prcpmixno2 ) || (dayno1 == dayno2 && mthdcd1 == mthdcd2) ) { model.setValue("/root/main/prcp/prcplist["+ k + "]/prcpmixno", tdivno); } } } tdivno++; } } } model.refresh(); } /** * mixno ÀçÁ¤¸® (°æºÏ´ëº´¿ø) **/ function fMakeMixno_knu(pwdflag) { var prevno = 0; var minno = 70; var tdivno = 1; // 20110513_laboru_±¸ºÐ t ÀÏ °æ¿ì ºÐ¸®¹øÈ£ 1 ºÎÅÍ Àû¿ë var mthdcdall = ""; var mthdcdall2 = ""; var preprcpcd = ""; var prcpcd = ""; var prcpdayno1 = ""; var prcpdayno2 = ""; //»êÁ¦¿ë¹ýº° mix ¹øÈ£»ý¼º for(var i = 1; i <= getNodesetCount("/root/main/prcp/prcplist") ; i++) { //»êÁ¦À϶§ (p) if(model.getValue("/root/main/prcp/prcplist["+ i + "]/drugkind") == "p") { if(model.getValue("/root/main/prcp/prcplist["+ i + "]/prcpmixnoyn") == "-") { mthdcdall = model.getValue("/root/main/prcp/prcplist["+ i + "]/mthdcd1") + model.getValue("/root/main/prcp/prcplist["+ i + "]/mthdcd2") + model.getValue("/root/main/prcp/prcplist["+ i + "]/mthdcd3") + model.getValue("/root/main/prcp/prcplist["+ i + "]/mthdcd4") + model.getValue("/root/main/prcp/prcplist["+ i + "]/mthdcd5") + model.getValue("/root/main/prcp/prcplist["+ i + "]/mthdcd6") ; model.setValue("/root/main/prcp/prcplist["+ i + "]/prcpmixno", minno); model.setValue("/root/main/prcp/prcplist["+ i + "]/prcpmixnoyn", "Y"); prcpdayno1 = model.getValue("/root/main/prcp/prcplist["+ i + "]/prcpdayno"); //alert("p) i : " + i + " 1 : " + minno); for(var j = i +1; j <= getNodesetCount("/root/main/prcp/prcplist") ; j++) { if(model.getValue("/root/main/prcp/prcplist["+ j + "]/drugkind") == "p" && model.getValue("/root/main/prcp/prcplist["+ j + "]/prcpmixnoyn") == "-") { mthdcdall2 = model.getValue("/root/main/prcp/prcplist["+ j + "]/mthdcd1") + model.getValue("/root/main/prcp/prcplist["+ j + "]/mthdcd2") + model.getValue("/root/main/prcp/prcplist["+ j + "]/mthdcd3") + model.getValue("/root/main/prcp/prcplist["+ j + "]/mthdcd4") + model.getValue("/root/main/prcp/prcplist["+ j + "]/mthdcd5") + model.getValue("/root/main/prcp/prcplist["+ j + "]/mthdcd6") ; prcpdayno2 = model.getValue("/root/main/prcp/prcplist["+ j + "]/prcpdayno"); if(mthdcdall == mthdcdall2 && prcpdayno1 == prcpdayno2 && model.getValue("/root/main/prcp/prcplist["+ j + "]/prcpmixno") == "-") { // 20110512_laboru_³¯Â¥¼ö°¡ °°°í ¿ë¹ýÀÌ °°Àº °Í ³¢¸® ¹­À½ model.setValue("/root/main/prcp/prcplist["+ j + "]/prcpmixno", minno); model.setValue("/root/main/prcp/prcplist["+ j + "]/prcpmixnoyn", "Y"); //alert("p) j : " + j + " 2 : " + minno); } } } minno++; } } else { //»êÁ¦¿Ü (t, e) var mthdcdall3 = model.getValue("/root/main/prcp/prcplist["+ i + "]/mthdcd1") + model.getValue("/root/main/prcp/prcplist["+ i + "]/mthdcd2") + model.getValue("/root/main/prcp/prcplist["+ i+ "]/mthdcd3") + model.getValue("/root/main/prcp/prcplist["+ i + "]/mthdcd4") + model.getValue("/root/main/prcp/prcplist["+ i + "]/mthdcd5") + model.getValue("/root/main/prcp/prcplist["+ i + "]/mthdcd6") ; if(model.getValue("/root/main/prcp/prcplist["+ i + "]/prcpmixno") != "-" && model.getValue("/root/main/prcp/prcplist["+ i + "]/prcpmixnoyn") == "-" && mthdcdall3 != 'O10DE') { if( prevno == 0) { prevno = model.getValue("/root/main/prcp/prcplist["+ i + "]/prcpmixno"); model.setValue("/root/main/prcp/prcplist["+ i + "]/prcpmixno", minno); model.setValue("/root/main/prcp/prcplist["+ i + "]/prcpmixnoyn", "Y"); //alert("t) i : " + i + " 3 : " + minno); } else { if(prevno == model.getValue("/root/main/prcp/prcplist["+ i + "]/prcpmixno")) { model.setValue("/root/main/prcp/prcplist["+ i + "]/prcpmixno", minno); model.setValue("/root/main/prcp/prcplist["+ i + "]/prcpmixnoyn", "Y"); //alert("t) i : " + i + " 4 : " + minno); } else { prevno = model.getValue("/root/main/prcp/prcplist["+ i + "]/prcpmixno"); model.setValue("/root/main/prcp/prcplist["+ i + "]/prcpmixno", minno); model.setValue("/root/main/prcp/prcplist["+ i + "]/prcpmixnoyn", "Y"); //alert("t) i : " + i + " 5 : " + minno); } } for(var j = i; j <= getNodesetCount("/root/main/prcp/prcplist") ; j++) { if(model.getValue("/root/main/prcp/prcplist["+ i + "]/drugkind") != "p") { if(prevno == model.getValue("/root/main/prcp/prcplist["+ j + "]/prcpmixnofix")) { model.setValue("/root/main/prcp/prcplist["+ j + "]/prcpmixno", minno); model.setValue("/root/main/prcp/prcplist["+ j + "]/prcpmixnoyn", "Y"); //alert("t) j : " + j + " 6 : " + minno); } } } minno++; } //¾àǰÄÚµå¿Í ¿ë¹ýÄڵ尡 µ¿ÀÏÇÑ Ã³¹æÀÌ 2°³ ÀÌ»ó µé¾î¿ÔÀ» °æ¿ì 1°³¸¸ »©°í ³ª¸ÓÁö´Â ºÐ¸®¹øÈ£ ¼ÂÆÃ if(model.getValue("/root/main/prcp/prcplist["+ i + "]/prcpmixno") == "-") { preprcpcd = model.getValue("/root/main/prcp/prcplist["+ i + "]/prcpcd"); mthdcdall = model.getValue("/root/main/prcp/prcplist["+ i + "]/mthdcd1") + model.getValue("/root/main/prcp/prcplist["+ i + "]/mthdcd2") + model.getValue("/root/main/prcp/prcplist["+ i + "]/mthdcd3") + model.getValue("/root/main/prcp/prcplist["+ i + "]/mthdcd4") + model.getValue("/root/main/prcp/prcplist["+ i + "]/mthdcd5") + model.getValue("/root/main/prcp/prcplist["+ i + "]/mthdcd6") ; for(var k = i+1 ; k <= getNodesetCount("/root/main/prcp/prcplist") ; k++) { prcpcd = model.getValue("/root/main/prcp/prcplist["+ k + "]/prcpcd"); mthdcdall2 = model.getValue("/root/main/prcp/prcplist["+ k + "]/mthdcd1") + model.getValue("/root/main/prcp/prcplist["+ k + "]/mthdcd2") + model.getValue("/root/main/prcp/prcplist["+ k + "]/mthdcd3") + model.getValue("/root/main/prcp/prcplist["+ k + "]/mthdcd4") + model.getValue("/root/main/prcp/prcplist["+ k + "]/mthdcd5") + model.getValue("/root/main/prcp/prcplist["+ k + "]/mthdcd6") ; if(preprcpcd == prcpcd && mthdcdall == mthdcdall2) { model.setValue("/root/main/prcp/prcplist["+ k + "]/prcpmixno", minno); //alert("t) 7 : " + minno); } } } var mthdcd1 = model.getValue("/root/main/prcp/prcplist["+ i + "]/mthdcd1") + model.getValue("/root/main/prcp/prcplist["+ i + "]/mthdcd2") + model.getValue("/root/main/prcp/prcplist["+ i + "]/mthdcd3") + model.getValue("/root/main/prcp/prcplist["+ i + "]/mthdcd4") + model.getValue("/root/main/prcp/prcplist["+ i + "]/mthdcd5") + model.getValue("/root/main/prcp/prcplist["+ i + "]/mthdcd6") ; var mthdcdfive1 = model.getValue("/root/main/prcp/prcplist["+ i + "]/mthdcd5"); var dayno1 = model.getValue("/root/main/prcp/prcplist["+ i + "]/prcpdayno"); var prcpmixno1 = model.getValue("/root/main/prcp/prcplist["+ i + "]/prcpmixno"); // 20110513_laboru_±¸ºÐ t ÀÏ °æ¿ì ¶óº§ ¹­ÀÌ´Â °Í°ú µ¿ÀÏÇÏ°Ô ºÐ¸®¹øÈ£ ¹­±â if(model.getValue("/root/main/prcp/prcplist["+ i + "]/drugkind") == "t" && model.getValue("/root/main/prcp/prcplist["+ i + "]/prcpmixno") == "-") { model.setValue("/root/main/prcp/prcplist["+ i + "]/prcpmixno", tdivno); if(!fChkSumcls(i)) { for(var k = i+1 ; k <= getNodesetCount("/root/main/prcp/prcplist") ; k++) { if(model.getValue("/root/main/prcp/prcplist["+ k + "]/drugkind") == "t" ) { var mthdcd2 = model.getValue("/root/main/prcp/prcplist["+ k + "]/mthdcd1") + model.getValue("/root/main/prcp/prcplist["+ k + "]/mthdcd2") + model.getValue("/root/main/prcp/prcplist["+ k + "]/mthdcd3") + model.getValue("/root/main/prcp/prcplist["+ k + "]/mthdcd4") + model.getValue("/root/main/prcp/prcplist["+ k + "]/mthdcd5") + model.getValue("/root/main/prcp/prcplist["+ k + "]/mthdcd6") ; var mthdcdfive2 = model.getValue("/root/main/prcp/prcplist["+ k + "]/mthdcd5"); var dayno2 = model.getValue("/root/main/prcp/prcplist["+ k + "]/prcpdayno"); var prcpmixno2 = model.getValue("/root/main/prcp/prcplist["+ k + "]/prcpmixno"); if( (mthdcdfive1 != "" && mthdcdfive2 != "" && mthdcdfive1 == mthdcdfive2 && dayno1 == dayno2 && prcpmixno1 == prcpmixno2 && !fChkSumcls(k) ) || (dayno1 == dayno2 && mthdcdfive1 == "P" && (mthdcd2 == "A11D" || mthdcd2 == "A11DI") && prcpmixno1 == prcpmixno2 && !fChkSumcls(k) ) || (dayno1 == dayno2 && mthdcdfive2 == "P" && (mthdcd1 == "A11D" || mthdcd1 == "A11DI") && prcpmixno1 == prcpmixno2 && !fChkSumcls(k) ) || (dayno1 == dayno2 && mthdcd1 == mthdcd2 && prcpmixno1 == prcpmixno2 && !fChkSumcls(k) ) ) { model.setValue("/root/main/prcp/prcplist["+ k + "]/prcpmixno", tdivno); model.setValue("/root/main/prcp/prcplist["+ k + "]/prcpmixnoyn", "Y"); } } } } tdivno++; } // 20120216_laboru_¾È°ú ¿ë¹ý O10DE À϶§´Â ¿Ü¿ëÁ¦¶óµµ Á¤Á¦Ã³·³ ¶óº§ ¹­±â if(model.getValue("/root/main/prcp/prcplist["+ i + "]/drugkind") == "e" && model.getValue("/root/main/prcp/prcplist["+ i + "]/mthdcd1") == "O" && model.getValue("/root/main/prcp/prcplist["+ i + "]/mthdcd2") == "1" && model.getValue("/root/main/prcp/prcplist["+ i + "]/mthdcd3") == "0" && model.getValue("/root/main/prcp/prcplist["+ i + "]/mthdcd4") == "D" && model.getValue("/root/main/prcp/prcplist["+ i + "]/mthdcd5") == "E" && model.getValue("/root/main/prcp/prcplist["+ i + "]/prcpmixno") == "-" ) { model.setValue("/root/main/prcp/prcplist["+ i + "]/prcpmixno", tdivno); //if(!fChkSumcls(i)) { for(var k = i+1 ; k <= getNodesetCount("/root/main/prcp/prcplist") ; k++) { if(model.getValue("/root/main/prcp/prcplist["+ k + "]/drugkind") == "e" && model.getValue("/root/main/prcp/prcplist["+ k + "]/mthdcd1") == "O" && model.getValue("/root/main/prcp/prcplist["+ k + "]/mthdcd2") == "1" && model.getValue("/root/main/prcp/prcplist["+ k + "]/mthdcd3") == "0" && model.getValue("/root/main/prcp/prcplist["+ k + "]/mthdcd4") == "D" && model.getValue("/root/main/prcp/prcplist["+ k + "]/mthdcd5") == "E") { var mthdcd2 = model.getValue("/root/main/prcp/prcplist["+ k + "]/mthdcd1") + model.getValue("/root/main/prcp/prcplist["+ k + "]/mthdcd2") + model.getValue("/root/main/prcp/prcplist["+ k + "]/mthdcd3") + model.getValue("/root/main/prcp/prcplist["+ k + "]/mthdcd4") + model.getValue("/root/main/prcp/prcplist["+ k + "]/mthdcd5") + model.getValue("/root/main/prcp/prcplist["+ k + "]/mthdcd6") ; var mthdcdfive2 = model.getValue("/root/main/prcp/prcplist["+ k + "]/mthdcd5"); var dayno2 = model.getValue("/root/main/prcp/prcplist["+ k + "]/prcpdayno"); var prcpmixno2 = model.getValue("/root/main/prcp/prcplist["+ k + "]/prcpmixno"); //if( (mthdcdfive1 != "" && mthdcdfive2 != "" && mthdcdfive1 == mthdcdfive2 && dayno1 == dayno2 && prcpmixno1 == prcpmixno2 ) // || (dayno1 == dayno2 && mthdcdfive1 == "P" && (mthdcd2 == "A11D" || mthdcd2 == "A11DI") && prcpmixno1 == prcpmixno2 ) // || (dayno1 == dayno2 && mthdcdfive2 == "P" && (mthdcd1 == "A11D" || mthdcd1 == "A11DI") && prcpmixno1 == prcpmixno2 ) // || (dayno1 == dayno2 && mthdcd1 == mthdcd2 && prcpmixno1 == prcpmixno2 ) ) { model.setValue("/root/main/prcp/prcplist["+ k + "]/prcpmixno", tdivno); model.setValue("/root/main/prcp/prcplist["+ k + "]/prcpmixnoyn", "Y"); //} //alert(model.getValue("/root/main/prcp/prcplist["+ k + "]/mthdcd5") + " " + model.getValue("/root/main/prcp/prcplist["+ k + "]/prcpmixno") + " " + model.getValue("/root/main/prcp/prcplist["+ k + "]/prcpcd")); } } //} tdivno++; } } } model.refresh(); } /** * ATC Àü¼Û´ë»óÀÚ·á ÀúÀå */ function fSavePrcpList(trsmflag, irow) { //alert("SMADT00200.js fSavePrcpList") var rowno = ""; var idx = model.getValue("/root/temp/selrow"); if(irow == "") { rowno = idx; // 20100312_laboru_Àü¼Û´ë»ó ȯÀÚÁ¤º¸¿Í Àü¼Û´ë»óÀڷḦ µ¿±âÈ­.(üũ¹Ú½º Ŭ¸¯½Ã ¹®Á¦ µÇ¾úÀ½) //rowno = grd_pat.row; } else { rowno = irow; } if(idx == "") { idx = rowno; } // if (model.getValue("/root/main/pat/patlist["+ model.getValue("/root/temp/selrow")+"]/atcno") != "0" && model.getValue("/root/main/pat/patlist["+ model.getValue("/root/temp/selrow")+"]/atcno") != "" ) { if (model.getValue("/root/main/pat/patlist["+ rowno+"]/atcno") != "0" && model.getValue("/root/main/pat/patlist["+ rowno+"]/atcno") != "" ) { var lastdt = model.getValue("/root/main/pat/patlist[" + idx + "]/trsmlastdt"); var trsmdt = ""; if(trim(lastdt) != "") trsmdt = "'" + lastdt.substring(0, 4) + "-" + lastdt.substring(4, 6) + "-" + lastdt.substring(6, 8) + " " + lastdt.substring(8, 10) + ":" + lastdt.substring(10, 12) + ":" + lastdt.substring(12, 14) + "' ¿¡"; var str = ""; if(irow == "") {//ÀϰýÀü¼Û½Ã¿¡´Â ¸Þ½ÃÁö üũ¾ÈÇÔ if(trsmflag == "T") { str = trsmdt + "Àü¼ÛµÈ ó¹æÀÔ´Ï´Ù. ÀúÀå ÇϽðڽÀ´Ï±î?" ; } else { str = trsmdt + "Àü¼ÛµÈ ó¹æÀÔ´Ï´Ù. ÀçÀü¼Û ÇϽðڽÀ´Ï±î?" ; } if (messageBox(str, "Q099") !=6){ return; } } } else { //ÀçÀü¼ÛÀÌ ¾Æ´Ò¶§ Á¶Á¦¿Ï·á ó¸® // Àü¼ÛÁ¤º¸ model.setValue("/root/send/req/drugdd" , model.getValue("/root/send/prcpinfo/drugdd")); model.setValue("/root/send/req/drugno" , model.getValue("/root/send/prcpinfo/drugno")); model.setValue("/root/send/req/ioflag" , model.getValue("/root/send/prcpinfo/ioflag")); model.setValue("/root/send/req/drugstat" , "D"); model.setValue("/root/send/req/userid" , getUserId()); model.setValue("/root/send/req/instcd" , getUserInfo("dutplceinstcd")); model.setValue("/root/send/req/dispflag" ,"D"); model.setValue("/root/send/req/inputtm" ,getCurrentTime()); //Àü±¤ÆÇ µ¥ÀÌÅÍ //submit("TXADT00702"); // ¼öÁ¤ //var success = submit("TXADT00701"); //¿äû¿¡ µû¶ó »­ } if(irow != "") {//ÀϰýÀü¼Û½Ã¿¡´Â ¸Þ½ÃÁö üũ¾ÈÇÔ if (trsmflag != "T" && ( model.getValue("/root/hidden/atcno") =="" || model.getValue("/root/hidden/atcno") =="0" ) ){ messageBox("ATC È£±â¸¦ ","C002"); return; } } model.copyNode("/root/send/atcinfo/patinfo", "/root/main/pat/patlist["+ rowno +"]"); if(trsmflag != "T") { model.setValue("/root/send/atcinfo/patinfo/atcno", model.getValue("/root/hidden/atcno")); } else { model.setValue("/root/send/atcinfo/patinfo/atcno", ""); } model.setValue("/root/send/atcinfo/patinfo/trsmflag", trsmflag); //model.setValue( "/root/send/atcinfo/prcplist", grd_prcplist.getUpdateData()); nodeList = instance1.selectNodes("/root/main/prcp/prcplist"); rCSV = getNodeListCSV(nodeList); model.makeValue("/root/send/atcinfo/prcplist",rCSV); //model.setValue("/root/main/pat/patlist["+ model.getValue("/root/temp/selrow")+"]/atcno", model.getValue("/root/hidden/atcno")); if(trsmflag != "T") { model.setValue("/root/main/pat/patlist["+ rowno +"]/atcno", model.getValue("/root/hidden/atcno")); } else { model.setValue("/root/main/pat/patlist["+ rowno +"]/atcno", ""); } model.refresh(); model.makeValue("/root/send/atcinfo/patinfo/atcioflag", model.getValue("/root/hidden/srchinfo/atcioflag")); if(model.getValue("/root/hidden/emtrns") == "Y") { model.makeValue("/root/send/atcinfo/patinfo/emtrns", "E"); } else { model.makeValue("/root/send/atcinfo/patinfo/emtrns", ""); } // 2011.03.24 pymi if(model.getValue("/root/hidden/noname") == "Y") { model.makeValue("/root/send/atcinfo/patinfo/noname", "Y"); } else { model.makeValue("/root/send/atcinfo/patinfo/noname", "N"); } // (e) // À̼±°æ 2008-07-17 start (ast.adbmmthd¿¡ mthdcd °ªÀÌ Á¸ÀçÇÏ´Â ¿ë¹ýÀÎÁö üũÈÄ ¾øÀ¸¸é ¸Þ½ÃÁö) var mthdcd = ""; var saveyn = "N"; /* for(var i = 1; i < grd_prcplist.rows; i++) { mthdcd = model.getValue("/root/main/prcp/prcplist[" + i + "]/mthdcd1") +model.getValue("/root/main/prcp/prcplist[" + i + "]/mthdcd2") +model.getValue("/root/main/prcp/prcplist[" + i + "]/mthdcd3") +model.getValue("/root/main/prcp/prcplist[" + i + "]/mthdcd4") +model.getValue("/root/main/prcp/prcplist[" + i + "]/mthdcd5"); model.setValue("/root/send/mthdcd", mthdcd); submit("TRADT00212"); if(model.getValue("/root/temp/checkmthdcd/mthdcdyn") == "N") { messageBox(mthdcd + " ¿ë¹ýÀº", "I004"); return; } else { saveyn = "Y"; } } */ saveyn = "Y"; if(saveyn == "Y") { if ( submit("TXADT00207", false) == true ){ if(irow == "") { submit("TRADT00209", false); model.setFocus("ipt_drugno"); model.removeNodeset("/root/main/prcp/prcplist"); //fPatListSrch(); model.setValue("/root/hidden/srchinfo/drugno",""); model.setValue("/root/hidden/srchinfo/pid",""); model.setValue("/root/hidden/srchinfo/wardcd",""); model.refresh(); } } //model.copyNode("/root/send/atcinfo/actlist", "/root/main/prcp/prcplist["+grd_prcplist.row+"]"); /*var chk = getGridUpdateData(grd_prcplist); if( chk != ""){ model.removeNodeset("/root/send/atcinfo/actlist"); setCSVToNode("/root/send/atcinfo", chk, "actlist"); //submit("TXADT00206"); } else { messageBox("?????? ????????", "I004"); } model.refresh();*/ // fPatListSrch(); //20101213 À̼±°æ Ãß°¡ : ÀÚµ¿Ãâ·Â üũ°¡ 'Y'À̸é Àü¼Û½Ã ¶óº§Ãâ·ÂÀ» ÇÔ // (trsmflag != "T") 2012³â 7¿ù26ÀÏ Ã³¹æ¼öÁ¤ÀúÀå½Ã ¶óº§ Ãâ·ÂµÇÁö ¾Ê°Ô ÇϱâÀ§ÇØ ¼öÁ¤, trsmflag = "T"´Â ÀúÀå½Ã ³Ñ¾î¿À´Â Flag ±èÄ¡±¹ if(model.getValue("/root/hidden/autolbl") == "Y" && (trsmflag != "T")) { //¶óº§Ãâ·Â button28.dispatch("onclick"); } } // À̼±°æ 2008-07-17 end (Á¸ÀçÇÏ´Â ¿ë¹ýÀÎÁö üũÈÄ ¾øÀ¸¸é ¸Þ½ÃÁö ¿Ã¹Ù¸¥ ¿ë¹ýÀÌ Çϳª¶óµµ Á¸ÀçÇϸé ÀúÀå) } function fResetMemo(){ model.setValue("/root/main/prcp/memoinfo/pid" , model.getValue("/root/main/prcp/baseinfo/pid")); model.setValue("/root/main/prcp/memoinfo/indd" , model.getValue("/root/main/prcp/baseinfo/indd")); model.setValue("/root/main/prcp/memoinfo/useyn" , "Y"); model.setValue("/root/main/prcp/memoinfo/seqno" , ""); model.setValue("/root/main/prcp/memoinfo/memo" , ""); model.setValue("/root/main/prcp/memoinfo/orddeptcd" , model.getValue("/root/main/prcp/baseinfo/orddeptcd")); model.setValue("/root/main/prcp/memoinfo/writid" , getUserId()); model.setValue("/root/main/prcp/memoinfo/writid2" , ""); model.setValue("/root/main/prcp/memoinfo/writnm" , getUserName()); model.setValue("/root/main/prcp/memoinfo/writdt" , model.getValue("/root/init/dateinfo/currentdt")); model.setValue("/root/main/prcp/memoinfo/ioflag" ,"I"); // »ç¹ø/À̸§/ÀÏÀÚ ´Ù½Ã ¼¼ÆÃ model.refresh(); } // 2011.03.23 pymi function fPrintNameLbl() { var ipage = 1; model.removeNode("/root/temp/namelblist/namelblist"); model.makeNode("/root/temp/namelblist/namelblist"); var iselrow = model.getValue("/root/hidden/select_row") if(model.getValue("/root/hidden/srchinfo/srchflag1") == "I") {//º´µ¿ for(var i = grd_pat.fixedRows; i < grd_pat.rows; i++ ) { if(model.getValue("/root/main/pat/patlist["+ i +"]/sel") == "Y" || iselrow == i ) { var drugdd = model.getValue("/root/main/pat/patlist["+ i +"]/drugdd"); model.makeValue("/root/temp/namelblist/namelblist["+ ipage +"]/drugdd", drugdd.substring(0,4) + "-" + drugdd.substring(4,6) + "-" + drugdd.substring(6,8) + " " + "[" + model.getValue("/root/main/pat/patlist["+ i +"]/drugno") + "]" ); // Àû¿ëÀÏÀÚ/¾à¹øÈ£ model.makeValue("/root/temp/namelblist/namelblist["+ ipage +"]/rwardnm", model.getValue("/root/main/pat/patlist["+ i +"]/rwardnm") + " - " + model.getValue("/root/main/pat/patlist["+ i +"]/wardnm") + "È£½Ç" ); // º´µ¿/È£½Ç model.makeValue("/root/temp/namelblist/namelblist["+ ipage +"]/pid", model.getValue("/root/main/pat/patlist["+ i +"]/pid") + " " + model.getValue("/root/main/pat/patlist["+ i +"]/hngnm")); // µî·Ï¹øÈ£/ ¼º¸í ipage++; } } makeReportPreview(0,0,10, 10, ""); fPrintRexbar("RFADT00201"); model.refresh(); } } function fChkSumcls(cnt) { var chk = false; var sSumcls = model.getValue("/root/main/lbllist/lbllist["+cnt+"]/sumcls"); var sSnglyn = model.getValue("/root/main/lbllist/lbllist["+cnt+"]/atcifsnglyn"); var sDrugindependpackflag = model.getValue("/root/main/lbllist/lbllist["+cnt+"]/drugindependpackflag"); if(sSumcls == "DI" || sSumcls == "DS"|| sSumcls == "DX"|| sSumcls == "DT" || sSumcls == "DM" || sSumcls == "IH"|| sSumcls == "IO" || sSumcls == "DG" //20110512_laboru_pack Ãß°¡ || sSumcls == "IS"|| sSumcls == "IX"|| sSumcls == "X" || sSumcls == "ZZZ" || sSumcls == "A10PQ" || sSumcls == "I"){ chk = true; } if ( sSumcls == "D" && sSnglyn =="Y" ) { chk = true; } if ( sDrugindependpackflag =="Y"){ chk = true; } return chk; }