/** * ?? ?? ?? : SMADT00200.js * ?? ?? : ATC ???? ???? Javascriot * ?? ?? ?? : ?????? * ?? ?? ?? : ?????? * ???????? : 2007.5.07 / ???????? / ?????? */ /** * ?????? */ function fInit() { var ioflag = ""; ioflag = getScreenMenuParameter(); model.setValue("/root/hidden/srchinfo/srchflag1", ioflag); 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(1) = 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; //???? Combo ???? model.setValue("/root/send/deptinfo/deptflag", "W"); success = submit("TRADT00203"); if (success) astfAddCombo("/root/hidden/deptlist","ward","wardcd,wardnm",",Àüü"); model.refresh(); } /** * ATC ȯÀÚ¸®½ºÆ® Á¶È¸ */ function fPatListSrch() { model.copyNode("/root/send/srchinfo", "/root/hidden/srchinfo"); submit("TRADT00206"); if ( grd_pat.rows >0) { grd_pat.row =1; } } /** * ATC ȯÀÚ¸®½ºÆ® ¼±Åýà Àü¼Û´ë»óÀÚ·á Ç¥½Ã */ function fATCPrcpData() { var pat_info; model.setValue("/root/send/prcpinfo/drugdd", model.getValue("/root/main/pat/patlist["+grd_pat.row+"]/drugdd")); model.setValue("/root/send/prcpinfo/drugno", model.getValue("/root/main/pat/patlist["+grd_pat.row+"]/drugno")); model.setValue("/root/send/prcpinfo/ioflag", model.getValue("/root/main/pat/patlist["+grd_pat.row+"]/ioflag")); model.setValue("/root/send/prcpinfo/pid", model.getValue("/root/main/pat/patlist["+grd_pat.row+"]/pid")); model.setValue("/root/send/prcpinfo/srchpid", model.getValue("/root/main/pat/patlist["+grd_pat.row+"]/pid")); model.setValue("/root/send/prcpinfo/orddd", model.getValue("/root/main/pat/patlist["+grd_pat.row+"]/orddd")); model.setValue("/root/send/prcpinfo/srchindd", model.getValue("/root/main/pat/patlist["+grd_pat.row+"]/orddd")); model.setValue("/root/send/prcpinfo/cretno", model.getValue("/root/main/pat/patlist["+grd_pat.row+"]/cretno")); model.setValue("/root/send/prcpinfo/orddeptcd", model.getValue("/root/main/pat/patlist["+grd_pat.row+"]/orddeptcd")); model.setValue("/root/send/prcpinfo/prcpgenrflag", model.getValue("/root/main/pat/patlist["+grd_pat.row+"]/prcpgenrflag")); model.setValue("/root/send/prcpinfo/prnt_drugflag", model.getValue("/root/main/pat/patlist["+grd_pat.row+"]/prnt_drugflag")); model.setValue("/root/hidden/atcno",model.getValue("/root/main/pat/patlist["+grd_pat.row+"]/atcno")); model.setValue("/root/temp/selrow", grd_pat.row); model.refresh(); if ( model.getValue("/root/hidden/srchinfo/srchflag1") =="O" ){ pat_info = "O¢Ë"+ model.getValue("/root/main/pat/patlist["+grd_pat.row+"]/pid") +"¢Ë"+model.getValue("/root/main/pat/patlist["+grd_pat.row+"]/drugdd")+"¢Ë"+model.getValue("/root/main/pat/patlist["+grd_pat.row+"]/cretno")+"¢Ë"+getUserInfo("dutplceinstcd")+"¢Ë1¢Ë"+model.getValue("/root/main/pat/patlist["+grd_pat.row+"]/drugdd"); } else if ( model.getValue("/root/hidden/srchinfo/srchflag1") =="I" ){ pat_info = "I¢Ë"+ model.getValue("/root/main/pat/patlist["+grd_pat.row+"]/pid") +"¢Ë"+model.getValue("/root/main/pat/patlist["+grd_pat.row+"]/orddd")+"¢Ë"+model.getValue("/root/main/pat/patlist["+grd_pat.row+"]/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("TRADT00202"); /*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();*/ } /** * ATC Àü¼Û´ë»óÀÚ·á ÀúÀå */ function fSavePrcpList() { 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") != "" ) { var lastdt = model.getValue("/root/main/pat/patlist[" + model.getValue("/root/temp/selrow") + "]/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) + "' ¿¡"; if (messageBox(trsmdt + "Àü¼ÛµÈ ó¹æÀÔ´Ï´Ù. ÀçÀü¼Û ÇϽðڽÀ´Ï±î?", "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 ( 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["+grd_pat.row+"]"); model.setValue("/root/send/atcinfo/patinfo/atcno", model.getValue("/root/hidden/atcno")); model.setValue("/root/send/atcinfo/patinfo/trsmflag", "N"); //model.setValue( "/root/send/atcinfo/prcplist", grd_prcplist.getUpdateData()); nodeList = instance1.selectNodes("/root/main/prcp/prcplist"); rCSV = getNodeListCSV(nodeList); model.setValue("/root/send/atcinfo/prcplist",rCSV); model.setValue("/root/main/pat/patlist["+ model.getValue("/root/temp/selrow")+"]/atcno", model.getValue("/root/hidden/atcno")); model.refresh(); // À̼±°æ 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("TRADT00205"); if(model.getValue("/root/temp/checkmthdcd/mthdcdyn") == "N") { messageBox(mthdcd + " ¿ë¹ýÀº", "I004"); return; } else { saveyn = "Y"; } } */ saveyn = "Y"; if(saveyn == "Y") { if ( submit("TXADT00203") == true ){ submit("TRADT00202"); 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("TXADT00202"); } else { messageBox("?????? ????????", "I004"); } model.refresh();*/ // fPatListSrch(); } // À̼±°æ 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(); }