/* - ¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì ȯÀÚ°Ë»ö ( SMMMO04700_ȯÀÚ°Ë»ö.xrw - JScript ) - ¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì */ var sPATSRCHLIST_PATH = "/root/main/patsrchinfo/patsrchlist"; var sORDERBY = "asc"; /** * @desc : È­¸é ÃʱâÈ­ * @ * @param : * @return : * @author : ¿ÀÁöÈÆ * @--------------------------------------------------- */ function fInitialize_SMMMO04700(){ model.removeNodeset(sPATSRCHLIST_PATH); model.setValue("/root/main/cond/fromdd" ,((getCurrentDate().toDate()).getAddDate(-3,"M")).getDateFormat()); //½ÃÀÛÀÏÀÚ´Â 3°³¿ù Àü LYJ (¿äû¹øÈ£ 1896¹ø) model.setValue("/root/main/cond/todd" , getCurrentDate()); //Á¾·áÀÏÀÚ´Â ÇöÀçÀÏÀÚ var openflag = model.getValue(opener.root.list.srchpatlistflag); var reopenflag = model.getValue(opener.root.reopen.reopenflag); //Áø·á´ë»óÀÚ ¸®½ºÆ® open¿©ºÎ var chngcolflag= model.getValue(opener.root.chngcol.chngcolflag); //Ä÷³º¯°æ ¿©ºÎ if(openflag == "N"){ zbcfGetCodeList(new Array("P0008"), new Array("/root/init/P0008")); //°øÅëÄÚµå º¸ÇèÀ¯Çü Á¶È¸ mmbfGetDeptCodeComboList("/root/send/reqdata", "/root/init/orddept" , "A"); //ºÎ¼­ÄÚµå ÄÞº¸ mmbfGetUserComboList("/root/send/reqdata" , "/root/init/userlist" , getUserInfo("dutplcecd"), "0330"); addComboInstance("/root/init/orddept" , "deptcd^depthngnm", "-^Àüü", "dept"); //ºÎ¼­ÄÚµå ÄÞº¸ Àüü instanceÃß°¡ addComboInstance("/root/init/userlist", "userid^usernm", "-^Àüü" , "usercombo"); //ÀÇ»çÄÞº¸ Àüü instanceÃß°¡ model.copyNode(opener.root.temp.srchpatlist , root.init); model.setValue(opener.root.list.srchpatlistflag, "Y"); if(reopenflag != "Y"){ //´Ù½Ã ¿­¸° °æ¿ì°¡ ¾Æ´Ï¸é, ±âº» Á¶È¸ Á¶°Ç ¼³Á¤ model.setValue("/root/main/cond/orddeptcd", getUserInfo("dutplcecd")); model.setValue("/root/main/cond/orddrid" , getUserInfo("userid")); model.refresh(); }else{ //´Ù½Ã ¿­¸° °æ¿ì, main¿¡ ordtabÀÇ condlist(È­¸éÀÌ ´ÝÈú¶§ ¼³Á¤µÈ Á¤º¸)¸¦ ±×´ë·Î Àç¼³Á¤ model.copyNode(root.main.cond , opener.root.reopen.condlist.condlist); model.setValue(opener.root.reopen.reopenflag, "N"); mmbfGetUserComboList("/root/send/reqdata", "/root/init/userlist", cmb_orddept.value, "0330"); addComboInstance("/root/init/userlist" , "userid^usernm" , "-^Àüü" , "usercombo"); //ÀÇ»çÄÞº¸ ÀüüÇ׸ñ Ãß°¡ } model.copyNode(opener.root.cond.srchpatlist, root.main.cond); }else{ //´Ù½Ã ¿­¸° °æ¿ì, main¿¡ ordtabÀÇ condlist(È­¸éÀÌ ´ÝÈú¶§ ¼³Á¤µÈ Á¤º¸)¸¦ ±×´ë·Î Àç¼³Á¤ model.copyNode(root.init , opener.root.temp.srchpatlist); model.copyNode(root.main.cond, opener.root.cond.srchpatlist); var xmlnode = model.instance1.selectSingleNode("/root/init/userscrnenvinfo/gridseq"); if(xmlnode != null){ var refdata = model.getValue("/root/init/userscrnenvinfo/gridseq/compsrefcnts"); var sizedata = model.getValue("/root/init/userscrnenvinfo/gridseq/compssizecnts"); var frozencol = model.getValue("/root/init/userscrnenvinfo/gridseq/frozencol"); setOrderInfoOfCol("grd_srchpatlist", refdata, sizedata, frozencol); //¼ö¼úȯÀÚ¸®½ºÆ® Ä÷³ ¼³Á¤, ±âÁ¸¿¡ Á¶È¸ÇÑ ³»¿ëÀ¸·Î ó¸® } } if(cmb_orddept.label==""){cmb_orddept.select(0);} if(cmb_orddrid.label==""){cmb_orddrid.select(0);} if(chngcolflag == "Y"){ //Ä÷³¼³Á¤À» ÅëÇØ Àç¼³Á¤ ÇÑ °æ¿ì, Ä÷³¼ø¼­¸¦ ´Ù½Ã Á¶È¸ ó¸® reqOrderInfoOfCol("SMMMO04700", "grd_srchpatlist"); //¿Ü·¡È¯ÀÚ¸®½ºÆ® Ä÷³ Á¶È¸ ¹× ¼³Á¤ model.setValue(opener.root.chngcol.chngcolflag, "N"); } model.refresh(); opener.javascript.fCtrlBtnDisable(false); } /** * @desc : ȯÀÚ °Ë»ö * @ * @param : * @return : * @author : ¿ÀÁöÈÆ * @--------------------------------------------------- */ function fReqPatSrchList(){ var pid = model.getValue("/root/main/cond/pid"); if(pid.length < 1){ messageBox("ȯÀÚÀÇ µî·Ï¹øÈ£¸¦", "C001"); return; } model.copyNode("/root/send/reqdata", "/root/main/cond"); if(submit("TRMMO04701")){ var totrow = grd_srchpatlist.rows-1; model.setValue("/root/main/totcnt/totcnt", totrow); model.copyNode(opener.root.cond.srchpatlist , root.main.cond); model.copyNode(opener.root.temp.srchpatlist , root.init); } } /** * @desc : ȯÀÚ ¼±ÅýÃ, ó¹æÈ­¸é ¹× ±â·ÏÁö ¿¬µ¿¿©ºÎ È®ÀÎ ¹× È­¸é open * @ * @param : * @return : * @author : ¿ÀÁöÈÆ * @--------------------------------------------------- */ function fSelectPatSrch(){ var ordrecflag = model.getValue(opener.root.main.cond.ordrecflag); //±â·ÏÁö¿¬°á ¿©ºÎ var currow = grd_srchpatlist.row; if(currow < 1){ return; } if( getGlobalVariable("able_sel_patlist", "M") == "N" ) { // ȯÀÚ ¼±Åà °¡´É ¿©ºÎ üũ 2012.09.03 ¾ö¿µ¸¸ messageBox("ÇöÀç ·Î±×ÀÎÇÑ '"+ getUserInfo("dutplcenm") +"' ºÎ¼­´Â ±â·ÏÀúÀå ¹× Ã³¹æ¹ßÇàÀÌ ºÒ°¡´ÉÇÑ ºÎ¼­ ÀÔ´Ï´Ù.\n\n´Ù½Ã ·Î±×ÀÎ ÈÄ ÁøÇà ÇϽʽÿÀ.","E"); return false; } //ó¹æ, CPÈ­¸é¿¡ modal ¶Ç´Â modaless°¡ ¶á °æ¿ì, ȯÀÚ ¼±Åà ºÒ°¡ if(fChkScrnDisable()==false){ return; } //CPȯÀÚ ¿©ºÎ È®ÀÎ if(fChkCPPatValid(currow)==false){ return; } var pid = model.getValue(sPATSRCHLIST_PATH + "[" + currow + "]/pid"); var hngnm = model.getValue(sPATSRCHLIST_PATH + "[" + currow + "]/hngnm"); var orddd = model.getValue(sPATSRCHLIST_PATH + "[" + currow + "]/orddd"); var cretno = model.getValue(sPATSRCHLIST_PATH + "[" + currow + "]/cretno"); var ordtype = model.getValue(sPATSRCHLIST_PATH + "[" + currow + "]/ioflag"); var orddeptcd = model.getValue(sPATSRCHLIST_PATH + "[" + currow + "]/orddeptcd"); setParameter("SPMMO016000_resnflag" , "P"); // Áø·á´ë»óÀÚ¿¡¼­ ¼ö¼ú½Ã ¿¹¹æÀû Ç×»ýÁ¦¸¦ ¶ç¿ï°æ¿ì setParameter("SPMMO016000_pid" , pid); setParameter("SPMMO016000_orddd" , orddd); setParameter("SPMMO016000_cretno" , cretno); setParameter("SPMMO016000_ordtype" , ordtype); setParameter("SPMMO016000_orddeptcd" , orddeptcd); // Áø·á±â·Ï¿¡ ¼öÁ¤µÈ »çÇ×ÀÌ ÀÖÀ» °æ¿ì ÀúÀåÇÒ °ÍÀÎÁö ¹¯´Â ÇÔ¼ö È£Ãâ : 2009. 07. 27 ±è¿µÇÐ var mainobj = getMainViewer(); var mainscrnid = mainobj.javascript.getScreenID(); //¸ÞÀÎÈ­¸éÀÇ ±â·ÏÁö ID if(mainscrnid == "SMMMR00100"){ var prvIntRecPamInfRtn = mainobj.window.javascript.fPrevInitRecPamInfo(); if(prvIntRecPamInfRtn == false){ return; }// ±â·ÏÁö¿¡ Çʼö ÀԷ»çÇ×À» ÀÔ·ÂÇÏÁö ¾Ê¾ÒÀ» ¶§ ±×³É ³Ñ¾î°¡ ¹ö¸®´Â ¿À·ù ¼öÁ¤ 20100305 LYJ } //»ó´ÜÁ¤º¸ ¼³Á¤ ¹× Áø·á±â·Ï ó¹æÈ­¸é ¿¬µ¿ //var mainObj = getMainViewer(); var mainObj = getViewer("sysMessage"); if(fReqPatSrchPamInfo() == true){ if (fChkOpDrugResn() == false) { return; } var cpflag = opener.model.getValue("/root/cpflag"); var ordrecflag = opener.model.getValue("/root/main/cond/ordrecflag"); var recflag = opener.model.getValue("/root/main/cond/recflag"); var chngflag = opener.model.getValue("/root/main/cond/chngflag"); var mainObj = getMainViewer(); if (recflag == "Y") { var mainObj = getMainViewer(); curEmrRecObj = getOpenWindow("SMMRI00400"); //Ȱ¼ºÈ­µÈ Áø·á±â·Ï È­¸é object loading curExamRsltObj = getOpenWindow("SMAER00800"); //Ȱ¼ºÈ­µÈ °Ë»ç°á°ú È­¸é object loading curNurTprObj = getOpenWindow("SMMNR00900"); //Ȱ¼ºÈ­µÈ °£È£ TPR È­¸é object loading curNurBSEMRObj = getOpenWindow("SMMNR02500"); //Ȱ¼ºÈ­µÈ °£È£ TPR È­¸é object loading curGrphObj = getOpenWindow("SPMRF05200"); //Ȱ¼ºÈ­µÈ ±×·¡ÇÁ ¼­½Ä È­¸é object loading curCunsultObj = getOpenWindow("SMMMR05000"); //Ȱ¼ºÈ­µÈ Consult È­¸é object loading curExamRsltNewObj = getOpenWindow("SMMMI00100"); //Ȱ¼ºÈ­µÈ °Ë»ç°á°ú È­¸é object loading //if(curEmrRecObj != null){curEmrRecObj.javascript.fClose();} //Áø·á±â·Ï È­¸é close var wndobj = getOpenWindow("SMMRI00400"); if(wndobj != null) { setParameter("SMMRI00400_param_pid" , model.getValue("/root/source/pid")); setParameter("SMMRI00400_param_chosflag", model.getValue("/root/main/paminfo/list/ordtype")); wndobj.javascript.fInitalize(); activateChild("SMMRI00400"); } if(curExamRsltObj != null){ curExamRsltObj.model.setvalue("/root/send/data/singdata/srchpid", pid ); curExamRsltObj.javascript.btn_srch.dispatch("DOMActivate"); } //°Ë»ç°á°ú È­¸é refresh; if(curNurTprObj != null){ //°£È£ TPR È­¸é refresh : 2008-11-28 : ±è¿µÇÐ ; curNurTprObj.javascript.fInitialize("init"); } //°£È£ TPR È­¸é refresh; if(curNurBSEMRObj != null){ //Ç÷´ç°£È£±â·Ï refresh : 2008-12-24 : ±è¿µÇÐ ; curNurBSEMRObj.javascript.fInitialize("init"); } //Ç÷´ç°£È£±â·Ï refresh; if(curGrphObj != null){ //±×·¡ÇÁ ¼­½Ä refresh : 2009-01-02 : ¹Ú¹Î±Ô SW ¿äû : ±è¿µÇÐ ; curGrphObj.javascript.fInitialize(); } //±×·¡ÇÁ ¼­½Ä refresh; // if(curCunsultObj != null && consulyn !="T"){ if(curCunsultObj != null ){ curCunsultObj.javascript.fInitalize(); } //±×·¡ÇÁ ¼­½Ä refresh; if(curExamRsltNewObj != null){ curExamRsltNewObj.model.setvalue("/root/send/data/singdata/srchpid", pid ); curExamRsltNewObj.javascript.btn_srch.dispatch("DOMActivate"); } //°Ë»ç°á°ú È­¸é NEW refresh; curCpObj = mainObj.javascript.getOpenWindow("SMMMP00800"); //Ȱ¼ºÈ­µÈ CP Main È­¸é object loading curPrcpObj = mainObj.javascript.getOpenWindow("SMMMO00100"); //Ȱ¼ºÈ­µÈ ó¹æMain È­¸é object loading curCpSrchObj = mainObj.javascript.getOpenWindow("SPMMP01200"); //Ȱ¼ºÈ­µÈ CP °Ë»ö È­¸é object loading if(curPrcpObj != null) {curPrcpObj.javascript.fPrcpWndClose(); } ////Ȱ¼ºÈ­µÈ ó¹æMain È­¸éÀÌ ÀÖ´Â °æ¿ì close if(curCpObj != null){curCpObj.javascript.fCloseGPS();} //Ȱ¼ºÈ­µÈ CP MainÈ­¸éÀÌ ÀÖ´Â °æ¿ì close if(curCpSrchObj != null){curCpSrchObj.javascript.fCpSrchWndClose();} //Ȱ¼ºÈ­µÈ CP°Ë»öÈ­¸éÀÌ ÀÖ´Â °æ¿ì close clearParameter("SMMMO04100_ANSWCNT"); opener.javascript.fChngEMRScrn();// Áø·á±â·Ï Open } else { opener.javascript.fOpenPrcpMainWnd(); //mainObj.window.javascript.openEmrScrn("SMMMO00100"); //ó¹æÈ­¸é open } } /* if(fReqPatSrchPamInfo() == true){ opener.javascript.fOpenPrcpMainWnd(); } */ /* if(fReqPatSrchPamInfo()== true){ if(ordrecflag == "N"){ //±â·ÏÁö¿¬°á ¿©ºÎ YÀÎ °æ¿ì, mainÈ­¸é Áø·á±â·ÏÁö ±³Ã¼, È­¸é»ó´ÜÁ¤º¸ ¼³Á¤ ¹× ó¹æÈ­¸é OPEN fOpenOrdRecMainWnd(); }else{ fOpenEmptyWnd(); //±â·ÏÁö¿¬°á ¿©ºÎ NÀÎ °æ¿ì, mainÈ­¸é ºóÈ­¸é ±³Ã¼, È­¸é»ó´ÜÁ¤º¸ ¼³Á¤ ¹× ó¹æÈ­¸é OPEN } }*/ } /** * @desc : ȯÀÚ °Ë»ö * @ * @param : * @return : * @author : ¿ÀÁöÈÆ * @--------------------------------------------------- */ function fReqPatSrchPamInfo(){ var currow = grd_srchpatlist.row; var ioflag = model.getValue(sPATSRCHLIST_PATH + "[" + currow + "]/ioflag"); var pid = model.getValue(sPATSRCHLIST_PATH + "[" + currow + "]/pid"); var orddd = model.getValue(sPATSRCHLIST_PATH + "[" + currow + "]/orddd"); var cretno = model.getValue(sPATSRCHLIST_PATH + "[" + currow + "]/cretno"); var instcd = model.getValue(sPATSRCHLIST_PATH + "[" + currow + "]/instcd"); var dschdd = model.getValue(sPATSRCHLIST_PATH + "[" + currow + "]/dschdd"); var srchdd = "99991231"; if (dschdd == "99991231") { srchdd = getCurrentDate(); } else { srchdd = dschdd; } if(ioflag == "O"){ //¿Ü·¡È¯ÀÚÀÎ °æ¿ì var param = "O" + "¢Ë" + pid + "¢Ë" + orddd + "¢Ë" + cretno + "¢Ë" + instcd + "¢Ë"; }else if(ioflag == "I" || ioflag == "D"){ //ÀÔ¿øÈ¯ÀÚÀÇ °æ¿ì var param = "I" + "¢Ë" + pid + "¢Ë" + orddd + "¢Ë" + cretno + "¢Ë" + instcd + "¢Ë" + srchdd; }else if(ioflag == "E"){ //ÀÀ±ÞȯÀÚÀÇ °æ¿ì var param = "E" + "¢Ë" + pid + "¢Ë" + orddd + "¢Ë" + cretno + "¢Ë" + instcd + "¢Ë" + srchdd; } setParameter("condparam", param); modal("SPMMO08900", 1, 0, 0, "", "", "", "left:0; right:0; width:0; height:0; sysmenu:hidden; caption:hidden; min:hidden, max:hidden;"); var useyn = getParameter("SPMMO08900_rtn_useyn"); if(useyn == "Y"){ setParameter("SPMMO08900_rtn_useyn", ""); return true; }else{ return false; } } /** * @desc : ±×¸®µå data ¿¢¼¿È­ÀÏ·Î ÀúÀå * @ * @param : * @return : * @author : ¿ÀÁöÈÆ * @--------------------------------------------------- */ function fSaveGridToExcel(){ saveGridToExcel(grd_srchpatlist); } /** * @desc : (ȯÀÚ°Ë»ö)°ü½ÉȯÀÚµî·Ïâ È£Ãâ * @ * @param : * @return : * @author : ¿ÀÁöÈÆ * @--------------------------------------------------- */ function fCallWndConcPatRgst(){ var currow = grd_srchpatlist.row; var ioflag = model.getValue(sPATSRCHLIST_PATH + "[" + currow + "]/ioflag"); var pid = model.getValue(sPATSRCHLIST_PATH + "[" + currow + "]/pid"); var hngnm = model.getValue(sPATSRCHLIST_PATH + "[" + currow + "]/hngnm"); var orddd = model.getValue(sPATSRCHLIST_PATH + "[" + currow + "]/orddd"); var cretno = model.getValue(sPATSRCHLIST_PATH + "[" + currow + "]/cretno"); var instcd = model.getValue(sPATSRCHLIST_PATH + "[" + currow + "]/instcd"); var seqno = ""; var param = ioflag + "¢Ì" + pid + "¢Ì" + hngnm + "¢Ì" + orddd + "¢Ì" + cretno + "¢Ì" + seqno + "¢Ì" + instcd; setParameter("param", param); open("SPMMO08200"); //modal("SPMMO08200"); //fReqPatSrchList(); } /** * @desc : (¼ö¼ú)ÁÖÀÇ¿ä¸ÁȯÀÚâ È£Ãâ * @ * @param : * @return : * @author : ¾ö¿µ¸¸ * @--------------------------------------------------- */ function fCallWndWarnPat(){ var nCurRow = grd_srchpatlist.row; var sPid = model.getValue(sPATSRCHLIST_PATH + "[" + nCurRow + "]/pid"); var sHngnm = model.getValue(sPATSRCHLIST_PATH + "[" + nCurRow + "]/hngnm"); setParameter("SMMMO19100_warncd" , sPid); setParameter("SMMMO19100_warnnm" , sHngnm); modal("SMMMO19100"); clearParameter("SMMMO19100_warncd"); clearParameter("SMMMO19100_warnnm"); } /** * @desc : CPȯÀÚ ¿©ºÎ °Ë»ç * @ * @param : * @return : * @author : ¿ÀÁöÈÆ * @--------------------------------------------------- */ function fChkCPPatValid(currow){ var pid = model.getValue(sPATSRCHLIST_PATH + "[" + currow + "]/pid"); var orddd = model.getValue(sPATSRCHLIST_PATH + "[" + currow + "]/orddd"); var cretno = model.getValue(sPATSRCHLIST_PATH + "[" + currow + "]/cretno"); var ioflag = model.getValue(sPATSRCHLIST_PATH + "[" + currow + "]/ioflag"); var hngnm = model.getValue(sPATSRCHLIST_PATH + "[" + currow + "]/hngnm"); var orddeptcd = model.getValue(sPATSRCHLIST_PATH + "[" + currow + "]/orddeptcd"); model.removeNodeset("/root/send/reqdata"); model.makeValue("/root/send/reqdata/pid" , pid); model.makeValue("/root/send/reqdata/orddd" , orddd); model.makeValue("/root/send/reqdata/cretno" , cretno); model.makeValue("/root/send/reqdata/hngnm" , hngnm); //Ãß°¡(2008.08.25) model.makeValue("/root/send/reqdata/prcpgenrflag", ioflag); model.makeValue("/root/send/reqdata/srchtabflag" , "D"); //´ë»óÀÚ¸®½ºÆ®ÅÇ(I/D):Á¶È¸°á°úorddd,cretno´Â ¿Ü·¡ÀÌ·ÂÀÇ ¼öÀüÁ¤º¸ÀÓ if(submit("TRMMO04303")==true){ //CPÀû¿ë ¿©ºÎ È®ÀÎ var cppatnode = model.instance1.selectNodes("/root/init/rsltgetdata/getdata"); if(cppatnode.length < 1){ //cpÀû¿ëȯÀÚ tbl¿¡ À¯È¿ÇÑ µ¥ÀÌÅͰ¡ ¾ø´Â °æ¿ì model.setValue(opener.root.cpflag, "N"); //ó¹æopen return true; }else{ //CPÀû¿ëȯÀÚ tbl¿¡ À¯È¿ÇÑ µ¥ÀÌÅͰ¡ ÀÖ´Â °æ¿ì var appstat = model.getValue("/root/init/rsltgetdata/getdata/appstat"); var cpgnm = model.getValue("/root/init/rsltgetdata/getdata/cpgnm"); var cpgappno = model.getValue("/root/init/rsltgetdata/getdata/cpgappno"); var msgcnts = model.getValue("/root/init/rsltgetdata/getdata/msgcnts"); var msgflag = model.getValue("/root/init/rsltgetdata/getdata/msgflag"); var prtlflagcd = model.getValue("/root/init/rsltgetdata/getdata/prtlflagcd"); //01:CP,02:CPG if(appstat == 52){ //case52: ÀÔ¿øÀå CP var rtnval = messageBox(msgcnts, msgflag); if(rtnval == 6){ model.setValue(opener.root.cpflag, "X"); // CP Main open return true; }else{ model.setValue(opener.root.cpflag, "N"); if(fUpdtCPPatAppStatVal(41) != false && instance1.selectSingleNode(sPATSRCHLIST_PATH + "[" + currow + "]/cpyn") != null){ //41 : CP Ãë¼Ò model.setValue(sPATSRCHLIST_PATH + "[" + currow + "]/cpyn", "N"); return; }else{ return false; } } }else{ if( prtlflagcd == "02" && isNull(appstat) && msgflag == "P" ){ //¸ð´ÏÅ͸µ±¸ºÐ:´ë»óÀÚŽ»ö Case. CPG & È£Ãâflag:Popup(appyn:Æò°¡¿ë¿©ºÎ) //CPGÀû¿ë´ë»óÀÚ ¾Ë¸² ÆË¾÷ È£Ãâ (2009.05.04) setParameter("SMMMO041_hngnm" , hngnm); setParameter("SMMMO041_pid" , pid); setParameter("SMMMO041_cretno" , cretno); setParameter("SMMMO041_orddd" , orddd); setParameter("SMMMO041_ordtype" , ioflag); setParameter("SMMMO041_orddeptcd" , orddeptcd); setParameter("SMMMO041_slipnm" , model.getValue(root.init.rsltgetdata.getdata.msgcnts)); //cpgno¢Ëcpghistseq¢Ëcpgnm¢Ëslipno¢Ëslipnm¢Ëvalusgeyn¢Ëvalunm¢Ëguidedocucnts setParameter("SMMMO041_cpgmntrflag", appstat); //null, SPMMP03200È­¸é¿¡¼­ cpgmntrflag(M or S)À¸·Î µûÁü setParameter("SMMMO041_cpgappno" , cpgappno); //Àû¿ëÁßÀÎ CP°¡ Á¸ÀçÇÏ¸é °ªÀÌ ÀÖÀ½ setParameter("SMMMO041_cpgnm" , cpgnm); //Àû¿ëÁßÀÎ CP°¡ Á¸ÀçÇÏ¸é °ªÀÌ ÀÖÀ½ modal("SPMMP03200"); //CP´ë»óÀÚ ¾Ë¶÷ ÆË¾÷ if( cpgappno > 0 && cpgappno != getParameter("SPMMP032_cpgappno") && instance1.selectSingleNode(sPATSRCHLIST_PATH + "[" + currow + "]/cpyn") != null){ //ÁøÇàÁßÀÎ CP°¡ Àִµ¥ ÆË¾÷¿¡¼­ DropÇÑ °æ¿ì CP¿©ºÎ NÀ¸·Î.. model.setValue(sPATSRCHLIST_PATH + "[" + currow + "]/cpyn", "N"); } if( !isNull(getParameter("SPMMP032_cpgappno")) && getParameter("SPMMP032_cpgappno") > 0 ){ model.setValue(opener.root.cpflag, "Y"); //CPGÀû¿ëÇÑ °æ¿ì, MGPS È£Ãâ }else{ model.setValue(opener.root.cpflag, "N"); //¹ÌÀû¿ë ½Ã ó¹æ È­¸é È£Ãâ } clearParameter("SPMMP032_cpgappno"); clearParameter("SMMMO041_hngnm"); clearParameter("SMMMO041_pid"); clearParameter("SMMMO041_cretno"); clearParameter("SMMMO041_orddd"); clearParameter("SMMMO041_ordtype"); clearParameter("SMMMO041_orddeptcd"); clearParameter("SMMMO041_slipnm"); clearParameter("SMMMO041_cpgmntrflag"); clearParameter("SMMMO041_cpgappno"); clearParameter("SMMMO041_cpgnm"); return true; }else{ //case 12 : D0 ~ D1 CP //±×¿Ü case : (10 : ÁøÇàÁß...) if( !isNull(msgcnts) && !isNull(msgflag) ){ //12: D0 ó¹æÀϰú == ÀÔ¿øÀÏ -> Drop À¯µµ //±×¿Ü: ¿À´Ã³¯Â¥ > CPÅð¿ø¿¹Á¤ÀÏ -> Drop À¯µµ messageBox(msgcnts, msgflag); setParameter("SMMMO043_cpgappno", cpgappno); //drop ÆË¾÷¿¡¼­ ÀνÄÇÒ ¼ö ÀÖ´Â param setParameter("SMMMO043_drop" , "N"); //drop ÆË¾÷¿¡¼­ ÀνÄÇÒ ¼ö ÀÖ´Â param modal("SPMMP02300"); //Drop ÆË¾÷ È£Ãâ model.setValue(opener.root.cpflag, "N"); if( getParameter("SMMMO043_drop") == "Y" ){ model.setValue(sINPATLIST_PATH + "[" + currow + "]/cpyn", "N"); }else{ return false; } clearParameter("SMMMO043_cpgappno"); clearParameter("SMMMO043_drop"); return true; } model.setValue(opener.root.cpflag, "Y"); return true; } } } } } function fChkOpDrugResn() { var currow = grd_srchpatlist.row; var ioflag = model.getValue(sPATSRCHLIST_PATH + "[" + currow + "]/ioflag"); var orddeptcd = model.getValue(sPATSRCHLIST_PATH + "[" + currow + "]/orddeptcd"); if (ioflag == "I") { if (orddeptcd =="2040000000" || orddeptcd =="2050000000" || orddeptcd =="2100000000" || orddeptcd =="2070000000") { var resnyn = getPatientInfoDetail("resnyn"); if (resnyn == "") { modal("SPMMO16000", "", "510px", "427px", "SPMMO16000", "", "", "sysmenu:hidden; min:visible; max:visible; icon:visible", false); } } } return true; } function fPrtPatList() { messageBox("ȯÀÚ°Ë»öÅÇÀº Ãâ·ÂÀ» Áö¿øÇÏÁö ¾Ê½À´Ï´Ù.", ""); }