//=================================================================== // °øÅëÀ¸·Î »ç¿ëÇÏ´Â ÇÔ¼ö //=================================================================== /** * @desc : È­¸é ÃʱâÈ­ * @ * @param : * @return : * @author : ¾ö¿µ¸¸ * @--------------------------------------------------- */ function fInitialize_SMMMO02900(){ var cur_day = getCurrentDate(); var idate = new Date(); var peveDate = idate.getAddDate(-1, "D"); model.setValue("/root/main/cond/orddd", cur_day); model.setValue("/root/main/cond/userid", getUserId()); fGrdInit() ; mainObj = getMainViewer(); curCpObj = mainObj.javascript.getOpenWindow("SMMMP00800"); //Ȱ¼ºÈ­µÈ CP Main È­¸é object loading curPrcpObj = mainObj.javascript.getOpenWindow("SMMMO00100"); //Ȱ¼ºÈ­µÈ ó¹æMain È­¸é object loading mmbfGetDeptCodeComboList("/root/send/reqdata", "/root/init/orddept", "D"); mmbfGetUserComboList("/root/send/reqdata", "/root/init/userlist", getUserInfo("dutplcecd"), "0330"); addComboInstance("/root/init/userlist", "userid^usernm", "-^Àüü", "usercombo"); //ÀÇ»çÄÞº¸ ÀüüÇ׸ñ Ãß°¡ if(opener.root.prcppatlist.childNodes.length > 0) { // ÃÖÃÊ ¿ÀÇÂÀÌ ¾Æ´Ï¸é model.copyNode(root.main.cond, opener.root.prcppatlist); } else { // ÃÖÃÊ ¿ÀÇÂÀ϶§ model.setValue("/root/main/cond/orddeptcd", getUserInfo("dutplcecd")); model.setValue("/root/main/cond/orddrid" , getUserInfo("userid")); var sUserEnv057 = mmbfGetUserEnvQuestValue("057"); // Áø·á´ë»óÀÚ ¿Ü·¡ÅÇ Áö¿¬È¯ÀÚ Ç¥½Ã¿©ºÎ if(sUserEnv057 == "001") { // Áö¿¬È¯ÀÚ Ç¥½ÃÀϰæ¿ì var sUserEnv058 = mmbfGetUserEnvQuestValue("058"); // Áø·á´ë»óÀÚ ¿Ü·¡ÅÇ Áö¿¬È¯ÀÚ Áö¿¬½Ã°£ var sUserEnv059 = mmbfGetUserEnvQuestValue("059"); // Áø·á´ë»óÀÚ ¿Ü·¡ÅÇ Áö¿¬È¯ÀÚ Áö¿¬ Á¦¿Ü½Ã°£ if(sUserEnv058 == "001") { model.setValue("/root/main/cond/delaytime", "10"); } else if(sUserEnv058 == "002") { model.setValue("/root/main/cond/delaytime", "20"); } else if(sUserEnv058 == "003") { model.setValue("/root/main/cond/delaytime", "30"); } else if(sUserEnv058 == "004") { model.setValue("/root/main/cond/delaytime", "40"); } else if(sUserEnv058 == "005") { model.setValue("/root/main/cond/delaytime", "50"); } else if(sUserEnv058 == "006") { model.setValue("/root/main/cond/delaytime", "60"); } else { model.setValue("/root/main/cond/delaytime", "30"); } if(sUserEnv059 == "001") { model.setValue("/root/main/cond/delayexpt", "0"); } else if(sUserEnv059 == "002") { model.setValue("/root/main/cond/delayexpt", "10"); } else if(sUserEnv059 == "003") { model.setValue("/root/main/cond/delayexpt", "20"); } else if(sUserEnv059 == "004") { model.setValue("/root/main/cond/delayexpt", "30"); } else { model.setValue("/root/main/cond/delayexpt", "10"); } model.setValue("/root/main/cond/delayflag" , "Y"); } else { model.setValue("/root/main/cond/delayflag" , "N"); } } fChkGetData() ; } /** * @desc : ȯÀÚ ¼ö¼ú¿©ºÎ ¹× ¼ö¼úó¹æ È®ÀÎ * @ ¼öÁ¤ : ¹Ì´ÏÁø·á´ë»óÀÚ¿¡ ¸Â°Ô²û ³»¿ë ¼öÁ¤ * @ * @param : * @return : * @author : ¿ÀÁöÈÆ * @--------------------------------------------------- */ function fChkMiniPatOpPrcp(pid, stnddd){ model.removeNodeset("/root/send/reqdata"); model.makeValue("/root/send/reqdata/pid" , pid); model.makeValue("/root/send/reqdata/stnddd", stnddd); if(submit("TRMMO04109")){ var opprcpflag = model.getValue("/root/main/opprcpinfo/opprcpinfo/opprcpflag"); if(opprcpflag == "N"){ return false; } } return true; } /** * @desc : ó¹æÈ­¸é, CPÈ­¸é¿¡ modal·Î ¶á È­¸éÀÌ ÀÖ´ÂÁö ¿©ºÎ¸¦ °Ë»çÇÑ´Ù. * @ ¼öÁ¤ : ¹Ì´ÏÁø·á´ë»óÀÚ¿¡ ¸Â°Ô²û ³»¿ë ¼öÁ¤ * @ * @param : * @return : * @author : ¿ÀÁöÈÆ * @--------------------------------------------------- */ function fChkScrnModal(){ var cpflag = model.getValue(root.cpflag); //cpflag¿©ºÎ if(cpflag == "N"){ var wndobj = getOpenWindow("SMMMO00100"); }else if(cpflag == "Y"){ var wndobj = getOpenWindow("SMMMP00800"); } if(wndobj != null){ var status = wndobj.javascript.getScreenDisabled(); if(status == true){ return false; } } } /** * @desc : ó¹æMain È­¸é Open, CPȯÀÚÀÎ °æ¿ì CP Main È­¸é Open ¶Ç´Â CP°Ë»öÈ­¸é Open (CP¾÷¹« Ãß°¡ 2007.09.27) * @ * @param : * @return : * @--------------------------------------------------- */ function fOpenPrcpMainWnd(){ var cpflag = model.getValue("/root/cpflag"); var iRow = ""; var pid = ""; var ordtype = model.getValue("/root/main/cond/ordtype"); if(ordtype == "O") { iRow = grd_outpatlist.row; pid = model.getValue("/root/main/outpatinfo/outpatlist[" + iRow + "]/pid"); } else { iRow = grd_inpatlist.row; pid = model.getValue("/root/main/inpatinfo/inpatlist[" + iRow + "]/pid"); } var mainObj = getMainViewer(); var monitorNumber = app.monitorNumber; var monitorResolutions = app.monitorResolution; var monitorResolutionsArr = monitorResolutions.split('|'); var resolution = monitorResolutionsArr[monitorNumber-1]; var resolution_width = resolution.split(',')[0]; var resolution_height = resolution.split(',')[1]; //alert(monitorNumber); 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 var wndobj = getOpenWindow("SMMRI00400"); if(wndobj != null){ wndobj.javascript.fClose(); //Áø·á±â·Ï È­¸é close //wndobj.javascript.fInitalize(); // ÃʱâÈ­ÇÔ¼ö È£Ãâ //activateChild("SMMRI00400"); } if(curExamRsltObj != null){ //°Ë»ç°á°ú È­¸é refresh; 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.fInitViewer(); 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"){ // Consult refresh : 2009-02-17 : ÀÌ»óÇö D/L ¿äû : ±è¿µÇÐ ; curCunsultObj.javascript.fInitalize(); } // Consult refresh if(curExamRsltNewObj != null){ //°Ë»ç°á°ú È­¸é NEW refresh; curExamRsltNewObj.model.setvalue("/root/send/data/singdata/srchpid", pid ); curExamRsltNewObj.javascript.btn_srch.dispatch("DOMActivate"); } 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(cpflag == "N"){ //ó¹æ Main Open if(curCpObj != null){curCpObj.javascript.fCloseGPS();} //Ȱ¼ºÈ­µÈ CP MainÈ­¸éÀÌ ÀÖ´Â °æ¿ì close if(curCpSrchObj != null){curCpSrchObj.javascript.fCpSrchWndClose();} //Ȱ¼ºÈ­µÈ CP°Ë»öÈ­¸éÀÌ ÀÖ´Â °æ¿ì close if(curPrcpObj == null){ //Ȱ¼ºÈ­µÈ ó¹æÈ­¸éÀÌ ¾ø´Â °æ¿ì, ½Å±ÔÈ­¸éÀ» ¿ÀÇ var xpt = (resolution_width - 1210)/2; var ypt = (resolution_height- 784)/2; mainObj.javascript.setParameter("SMMMO00100_ordrecflag", model.getValue("/root/main/cond/ordrecflag")); mainObj.javascript.open("SMMMO00100", monitorNumber, xpt, ypt, "SMMMO00100", "", "", "", false); fChngMainEMRScrn(); }else{ if(curPrcpObj.javascript.fPrcpSavePatList()){} curPrcpObj.model.setValue("/root/init/bfprcpload" , "N"); //Àüó¹æÀ» ÃʱâÈ­ÇÑ´Ù. //curPrcpObj.javascript.fInitializeConDone(); //curPrcpObj.javascript.fInitializeReady(); curPrcpObj.javascript.fXReReady(); curPrcpObj.model.setValue("/root/init/fstopenflag", "Y"); //ó¹æÃÖÃÊ open¿©ºÎ¸¦ Àç¼³Á¤, Áø·á±â·ÏÀ» ¿­±âÀ§ÇØ //curPrcpObj.javascript.fChngMainScrn(); fChngMainEMRScrn(); } } else if(cpflag =="Y"){ //CP Main Open if(curPrcpObj != null){curPrcpObj.javascript.fPrcpWndClose();} //Ȱ¼ºÈ­µÈ ó¹æMainÈ­¸éÀÌ ÀÖ´Â °æ¿ì close if(curCpSrchObj != null){curCpSrchObj.javascript.fCpSrchWndClose();} //Ȱ¼ºÈ­µÈ CP°Ë»öÈ­¸éÀÌ ÀÖ´Â °æ¿ì close if(curCpObj == null){ //Ȱ¼ºÈ­µÈ CPÈ­¸éÀÌ ¾ø´Â °æ¿ì, ½Å±ÔÈ­¸éÀ» ¿ÀÇ var xpt = (resolution_width - 1236)/2; var ypt = (resolution_height- 985)/2; mainObj.javascript.setParameter("SMMMO00100_ordrecflag", model.getValue("/root/main/cond/ordrecflag")); mainObj.javascript.open("SMMMP00800", monitorNumber, xpt, ypt, "SMMMP00800", "", "", "sysmenu:hidden; min:visible; max:visible; icon:visible", false); //JJE- »èÁ¦ //fChngMainEMRScrn(); } else{ curCpObj.javascript.fReconstruct(); } }else if(cpflag =="X"){ //CP °Ë»ö Open if(curCpObj != null){curCpObj.javascript.fCloseGPS();} //Ȱ¼ºÈ­µÈ CP MainÈ­¸éÀÌ ÀÖ´Â °æ¿ì close if(curPrcpObj != null){curPrcpObj.javascript.fPrcpWndClose();} //Ȱ¼ºÈ­µÈ ó¹æMainÈ­¸éÀÌ ÀÖ´Â °æ¿ì close if(curCpSrchObj == null){ mainObj.javascript.open("SPMMP01200", monitorNumber, xpt, ypt, "SPMMP01200", "", "", "", false); } } } function fChngMainEMRScrn() { var mainobj = getMainViewer(); var mainscrnid = mainobj.javascript.getScreenID(); //¸ÞÀÎÈ­¸éÀÇ ±â·ÏÁö ID var cpflag = model.getValue("/root/cpflag"); if (cpflag =="Y"){ var curPrcpObj= getOpenWindow("SMMMP00800"); } else { var curPrcpObj= getOpenWindow("SMMMO00100"); } var fstopenflag = curPrcpObj.model.getValue("/root/init/fstopenflag"); //ó¹æÈ­¸éÀÌ ÃÖÃÊ »ý¼º ¿©ºÎ var bfprcpload = curPrcpObj.model.getValue("/root/init/bfprcpload"); //Àüó¹æÈ­¸é ÃÖÃÊ »ý¼º ¿©ºÎ var cpflag = curPrcpObj.model.getValue("/root/cp"); //CPÈ­¸é¿©ºÎ var ordrecflag = model.getValue("/root/main/cond/ordrecflag"); //OCS üũ¿©ºÎ var chngflag = model.getValue("/root/main/cond/chngflag"); //OCS üũ¿©ºÎ if(mainobj != null){ var dutplcecd = getUserInfo("dutplcecd"); //»ç¿ëÀںμ­ var operation = getGlobalVariable("operation"); //¼ö¼úÁ¤º¸ var wndid = "SMMMR00100"; //Áø·á±â·ÏÈ­¸éÀÌ default if(fstopenflag !="N" || chngflag == "Y"){ //ó¹æÈ­¸éÀÌ ÃÖÃÊ·Î ¿­¸° °æ¿ì, Áø·á´ë»óÀÚÀÇ ocsüũ°ªÀÌ º¯°æµÈ °æ¿ì¿¡´Â ¸ÞÀÎÈ­¸é º¯°æ if(bfprcpload != "Y"){ //Àüó¹æÈ­¸éÀÌ ·ÎµùµÈ ¿©ºÎ,(´Ü¼øÈ÷ tabº¯°æÀÎ °æ¿ì¿¡´Â ¸ÞÀÎÈ­¸é º¯°æ ·ÎÁ÷À» ó¸®ÇÏÁö ¾ÊÀ½ /* if(cpflag == "Y"){ //CPÈ­¸éÀÎ °æ¿ì, CPÃʱâÈ­ ÈÄ, ¸ÞÀÎÈ­¸é º¯°æ ¼öÇà var cpendflag = curPrcpObj.javascript.fReconstruct(); if(cpendflag == "True"){ } } */ //if(cpendflag == "True"){ //CPMainÀÇ fReconstruct()°¡ ¿Ï·áµÈ ÀÌÈÄ Áø·á±â·Ï º¯°æ·ÎÁ÷À» ¼öÇà if(dutplcecd == "2090000000" || dutplcecd == "2090300000"){ //»ç¿ëÀںμ­°¡ ¸¶ÃëÅëÁõÀÇÇаú, ÅëÁõŬ¸®´ÐÀÎ °æ¿ì if(operation.length > 0){ //¼ö¼úȯÀÚ¸®½ºÆ®¿¡¼­ ȯÀÚ ¼±ÅÃµÈ °æ¿ì, ¸ÞÀÎÈ­¸éÀº '¸¶ÃëȯÀÚ±â·Ï' loading wndid = "SMMMR03700"; }else{ if(ordrecflag == "Y"){ wndid = "SMMMR00100"; } } }else{ if(ordrecflag == "Y"){ wndid = "SMMMR00100"; } } curPrcpObj.model.setValue("/root/init/bfprcpload" , "Y"); curPrcpObj.model.setValue("/root/init/fstopenflag", "N"); if(mainscrnid == wndid){ if(wndid == "SMMMR03700"){ mainobj.javascript.fFormInit(); }else{ mainobj.javascript.fInitRecPamInfo(); } }else{ //if(cpflag != "Y"){ mainobj.javascript.navigate(wndid); //} } //} }else{ //Àüó¹æÈ­¸éÀÌ ÃÖÃÊ »ý¼ºµÈ °æ¿ì, bfprcpload¸¦ Y·Î º¯°æ, ÃßÈÄ tabº¯°æ½Ã ¸ÞÀÎÈ­¸é º¯°æÀÌ µÇÁö ¾Ê°ÔÇÔ curPrcpObj.model.setValue("/root/init/bfprcpload", "Y"); } } } } //=================================================================== // ÀÔ¿ø¿¡¼­ »ç¿ëÇÏ´Â ÇÔ¼öµé //=================================================================== /** * @desc : ȯÀÚ ¼±Åà ÈÄ, ȯÀÚ Á¤º¸ Á¶È¸ ¹× ±â·ÏÁö È­¸é ¿¬µ¿ * @ ¼öÁ¤ : ¹Ì´ÏÁø·á´ë»óÀÚ¿¡ ¸Â°Ô²û ³»¿ë ¼öÁ¤ * @ * @param : * @return : * @author : ±è¿µÇÐ * @--------------------------------------------------- */ function fMiniInPat(){ var ordrecflag = "Y"; var currow = grd_inpatlist.row; if(currow < 1){ return; } //ó¹æ, CPÈ­¸é¿¡ modal ¶Ç´Â modaless°¡ ¶á °æ¿ì, ȯÀÚ ¼±Åà ºÒ°¡ if(fChkScrnModal()==false){ return; } var pid = model.getValue("/root/main/inpatinfo/inpatlist[" + currow + "]/pid"); var hngnm = model.getValue("/root/main/inpatinfo/inpatlist[" + currow + "]/hngnm"); var reqptype = model.getValue("/root/main/inpatinfo/inpatlist[" + currow + "]/reqptype"); var stnddd = model.getValue("/root/main/cond/orddd"); setParameter("SPMMO04200_openflag", "SPMMO04200"); //ȯÀÚ¼ö¼ú ¿©ºÎ ¹× ¼ö¼úó¹æ È®ÀÎ, ¼ö¼úó¹æÀÌ ¾ø´Â °æ¿ì ó¹æÈ­¸éÀ» blocking if(fChkMiniPatOpPrcp(pid, stnddd)==false){ var opcnfmdd = model.getValue("/root/main/opprcpinfo/opprcpinfo/opcnfmdd"); opcnfmdd = opcnfmdd.substring(0, 4) + "-" + opcnfmdd.substring(4, 6) + "-" + opcnfmdd.substring(6, 8); messageBox("[" + hngnm + "]ȯÀÚÀÇ [" + opcnfmdd + "]ÀÏÀÚ ¼ö¼ú ó¹æÀ»", "C001"); } //CPȯÀÚ ¿©ºÎ È®ÀÎ if(fChkCPMiniPatValid(currow)==false){ return; } //»ó´ÜÁ¤º¸ ¼³Á¤ ¹× Áø·á±â·Ï ó¹æÈ­¸é ¿¬µ¿ var mainObj = getMainViewer(); /* if(fReqInPatPamInfo()==true){ opener.javascript.setParameter("SMMMO04100_reqptype", reqptype); var cpflag = opener.model.getValue("/root/cpflag"); var ordrecflag = opener.model.getValue("/root/main/cond/ordrecflag"); var mainObj = getMainViewer(); if(cpflag == "Y"){ mainObj.window.javascript.openEmrScrn("SMMMP00800"); //CPó¹æ È­¸é }else if(cpflag == "X"){ mainObj.window.javascript.openEmrScrn("SPMMP01200"); //CP°Ë»ö È­¸é }else{ opener.javascript.setParameter("SMMMO04100_reqptype", reqptype); opener.javascript.fOpenPrcpMainWnd(); } if(cpflag == "Y" || cpflag == "X"){ if(ordrecflag == "Y"){ mainObj.window.javascript.openEmrScrn("SMMMB08100"); //empty }else{ mainObj.window.javascript.openEmrScrn("SMMMR00100"); //Áø·á±â·Ï } } } */ //»ó´ÜÁ¤º¸ ¼³Á¤ if(fReqMiniInPatPamInfo()==true){ setParameter("SMMMO04100_reqptype", reqptype); fOpenPrcpMainWnd(); } } /** * @desc : ÀÔ¿øÈ¯ÀÚ È¯ÀÚ ±âº»Á¤º¸¼³Á¤ * @ ¼öÁ¤ : ¹Ì´ÏÁø·á´ë»óÀÚ¿¡ ¸Â°Ô²û ³»¿ë ¼öÁ¤ * @ * @param : * @return : * @author : ¿ÀÁöÈÆ * @--------------------------------------------------- */ function fReqMiniInPatPamInfo(){ var iRow = grd_inpatlist.row; var pid = model.getValue("/root/main/inpatinfo/inpatlist[" + iRow + "]/pid"); var indd = model.getValue("/root/main/inpatinfo/inpatlist[" + iRow + "]/indd"); var cretno = model.getValue("/root/main/inpatinfo/inpatlist[" + iRow + "]/cretno"); var instcd = model.getValue("/root/main/inpatinfo/inpatlist[" + iRow + "]/instcd"); var srchdd = model.getValue("/root/main/cond/indd"); //Á¶È¸ÀÏÀÚ var param; param = "I" + "¢Ë" + pid + "¢Ë" + indd + "¢Ë" + cretno + "¢Ë" + instcd + "¢Ë" + srchdd; setParameter("condparam", param); modal("SPMMO08900", 1, "", "", "", "", "", "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 : CPȯÀÚ ¿©ºÎ °Ë»ç * @ * @param : * @return : * @author : ¿ÀÁöÈÆ * @--------------------------------------------------- */ function fChkCPMiniPatValid(currow){ var pid = model.getValue("/root/main/inpatinfo/inpatlist[" + currow + "]/pid"); var orddd = model.getValue("/root/main/inpatinfo/inpatlist[" + currow + "]/indd"); var cretno = model.getValue("/root/main/inpatinfo/inpatlist[" + currow + "]/cretno"); var cpyn = model.getValue("/root/main/inpatinfo/inpatlist[" + currow + "]/cpyn"); var hngnm = model.getValue("/root/main/inpatinfo/inpatlist[" + currow + "]/hngnm"); //ÀÔ¿øÈ¯ÀÚÀ̳ª ¿Ü·¡CP°¡ ÁøÇàÁßÀÎ °æ¿ì, °æ°í ¸Þ½ÃÁö¸¦ ¶ç¿î´Ù. (¹ÚÀ¯¹Ì¿äû) //2008. 07. 25 ¿ÀÁöÈÆ model.removeNodeset("/root/send/reqdata"); model.makeValue("/root/send/reqdata/pid" , pid); model.makeValue("/root/send/reqdata/orddd", orddd); if(submit("TRMMO04303")==true){ var outcppatnode = model.instance1.selectNodes("/root/init/getdata/getdata"); if(outcppatnode.length > 0){ messageBox("¿Ü·¡ cpÀû¿ëÁßÀΠȯÀÚÀÔ´Ï´Ù. ¿Ü·¡ CP DropÀ»", "C003"); model.setValue(opener.root.cpflag, "N"); return false; } } 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/prcpgenrflag", "I"); if(submit("TRMMO04303")==true){ var cppatnode = model.instance1.selectNodes("/root/init/rsltgetdata/getdata"); if(cppatnode.length < 1){ //cpÀû¿ëȯÀÚ tbl¿¡ À¯È¿ÇÑ µ¥ÀÌÅͰ¡ ¾ø´Â °æ¿ì model.setValue(root.cpflag, "N"); return true; }else{ //CPÀû¿ëȯÀÚ tbl¿¡ À¯È¿ÇÑ µ¥ÀÌÅͰ¡ ÀÖ´Â °æ¿ì var appstat = model.getValue("/root/init/rsltgetdata/getdata/appstat"); var cpgnm = model.getValue("/root/init/rsltgetdata/getdata/cpgnm"); if(appstat == 12){ //CPÀû¿ë»óŰ¡ 12ÀÎ °æ¿ì, ¹«Á¶°Ç CP(M-GPS)âÀ» ¶ç¿î´Ù model.setValue(root.cpflag, "Y"); return true; }else if(appstat == 52){ var rtnval = messageBox("[" + hngnm + "]ȯÀÚ¿¡°Ô CP¸¦", "Q003"); if(rtnval == 6){ //¿¹, CP Main open, CPÀû¿ëȯÀÚ tbl¿¡ appstat 10 ÁøÇàÁß model.setValue(root.cpflag, "X"); return true; }else{ model.setValue(root.cpflag, "N"); return fUpdtCPPatAppStatVal(41); //41 : CPÃë¼Ò } }else{ //CPÀû¿ë»óŰ¡ 12°¡ ¾Æ´Ñ °æ¿ì, CP Mainâ open model.setValue(root.cpflag, "Y"); return true; } } } } //=================================================================== // ¿Ü·¡¿¡¼­ »ç¿ëÇÏ´Â ÇÔ¼öµé //=================================================================== /** * @desc : ȯÀÚ ¼±Åà ÈÄ, ȯÀÚ Á¤º¸ Á¶È¸ ¹× ±â·ÏÁö È­¸é ¿¬µ¿ * @ * @param : * @return : * @author : ¿ÀÁöÈÆ * @--------------------------------------------------- */ function fMiniOutPat(){ var ordrecflag = "Y"; var currow = grd_outpatlist.row; if(currow < 1){ return; } //ó¹æ, CPÈ­¸é¿¡ modal ¶Ç´Â modaless°¡ ¶á °æ¿ì, ȯÀÚ ¼±Åà ºÒ°¡ if(fChkScrnModal()==false){ return; } var pid = model.getValue("/root/main/outpatinfo/outpatlist[" + currow + "]/pid"); var stnddd = model.getValue("/root/main/outpatinfo/outpatlist[" + currow + "]/orddd"); var hngnm = model.getValue("/root/main/outpatinfo/outpatlist[" + currow + "]/hngnm"); var reqptype = model.getValue("/root/main/outpatinfo/outpatlist[" + currow + "]/reqptype"); setParameter("SPMMO04200_openflag", "SPMMO04200"); //ȯÀÚ¼ö¼ú ¿©ºÎ ¹× ¼ö¼úó¹æ È®ÀÎ, ¼ö¼úó¹æÀÌ ¾ø´Â °æ¿ì ó¹æÈ­¸éÀ» blocking if(fChkPatOpPrcp(pid, stnddd)==false){ var opcnfmdd = model.getValue("/root/main/opprcpinfo/opprcpinfo/opcnfmdd"); opcnfmdd = opcnfmdd.substring(0, 4) + "-" + opcnfmdd.substring(5, 6) + "-" + opcnfmdd.substring(7, 8); messageBox("[" + hngnm + "]ȯÀÚÀÇ [" + opcnfmdd + "]ÀÏÀÚ ¼ö¼ú ó¹æÀ»", "C001"); } //CPȯÀÚ ¿©ºÎ È®ÀÎ, update½Ã ¿¡·¯³ª¸é º¯°æ ºÒ°¡ if(fChkCPMiniOutPatValid(currow)==false){ return; } //»ó´ÜÁ¤º¸ ¼³Á¤ ¹× Áø·á±â·Ï, ó¹æÈ­¸é ¿¬µ¿ var mainObj = getMainViewer(); //2011.09.07 ¾ö¿µ¸¸ ȯÀÚ Å¬¸¯½Ã ȯÀÚÁ¤º¸ üũ SMMMO04100.js ÆÄÀÏ ÇÔ¼ö È£Ãâ ioflag, pid ÀÎÀÚ if(!fCheckSelectPatInfo("O", pid)){ return false; } //»ó´ÜÁ¤º¸ ¼³Á¤ if(fReqMiniOutPatPamInfo()==true){ setParameter("SMMMO04100_reqptype", reqptype); fOpenPrcpMainWnd(); } } /** * @desc : CPȯÀÚ ¿©ºÎ °Ë»ç * @ * @param : * @return : * @author : ¿ÀÁöÈÆ * @--------------------------------------------------- */ function fChkCPMiniOutPatValid(currow){ var pid = model.getValue("/root/main/outpatinfo/outpatlist[" + currow + "]/pid"); var orddd = model.getValue("/root/main/outpatinfo/outpatlist[" + currow + "]/orddd"); var cretno = model.getValue("/root/main/outpatinfo/outpatlist[" + currow + "]/cretno"); var cpyn = model.getValue("/root/main/outpatinfo/outpatlist[" + currow + "]/cpyn"); var hngnm = model.getValue("/root/main/outpatinfo/outpatlist[" + currow + "]/hngnm"); 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/prcpgenrflag", "O"); if(submit("TRMMO04303")==true){ var cppatnode = model.instance1.selectNodes("/root/init/rsltgetdata/getdata"); if(cppatnode.length < 1){ //cpÀû¿ëȯÀÚ tbl¿¡ À¯È¿ÇÑ µ¥ÀÌÅͰ¡ ¾ø´Â °æ¿ì model.setValue(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"); if(appstat == 11){ //CPÀû¿ë»óŰ¡ 11ÀÎ °æ¿ì var rtnval = messageBox("[" + hngnm + "]ȯÀÚÀÇ [" + cpgnm + "] CP¸¦", "Q003"); if(rtnval == 6){ //¿¹ ¼±ÅÃ, CP Main open, CPÀû¿ëȯÀÚ tbl¿¡ appstat 10 ÁøÇàÁß model.setValue(root.cpflag, "N"); return fUpdtCPPatAppStatVal(51); }else{ //¾Æ´Ï¿À ¼±ÅÃ, ó¹æ Main open, CPÀû¿ëȯÀÚ tbl¿¡ appstat 51 drop out model.setValue(root.cpflag, "Y"); return fUpdtCPPatAppStatVal(10); } }else if(appstat == 53){ model.setValue(root.cpflag, "X"); return true; }else{ //CPÀû¿ë»óŰ¡ 11°¡ ¾Æ´Ñ °æ¿ì, CP Mainâ open model.setValue(root.cpflag, "Y"); return true; } } } } /** * @desc : ¿Ü·¡È¯ÀÚ È¯ÀÚ ±âº»Á¤º¸¼³Á¤ * @ ¼öÁ¤ : ¹Ì´ÏÁø·á´ë»óÀÚ¿¡ ¸Â°Ô²û ³»¿ë ¼öÁ¤ * @ * @param : * @return : * @author : ¿ÀÁöÈÆ * @--------------------------------------------------- */ function fReqMiniOutPatPamInfo(){ var iRow = grd_outpatlist.row; var pid = model.getValue("/root/main/outpatinfo/outpatlist[" + iRow + "]/pid"); var orddd = model.getValue("/root/main/outpatinfo/outpatlist[" + iRow + "]/orddd"); var cretno = model.getValue("/root/main/outpatinfo/outpatlist[" + iRow + "]/cretno"); var instcd = model.getValue("/root/main/outpatinfo/outpatlist[" + iRow + "]/instcd"); var param = "O" + "¢Ë" + pid + "¢Ë" + orddd + "¢Ë" + cretno + "¢Ë" + instcd; 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 : °Ë»ö±¸ºÐ¿¡ ´ëÇÑ Ç׸ñ ¼±Åýà °¢ È­¸é ¼±Åà ===============================================================================*/ function fGrdInit() { var sOrdType = model.getValue("/root/main/cond/ordtype"); if (sOrdType =='O'){ model.setValue("/root/main/cond/orddd" , getCurrentDate()); rdo_patflag.visible = true; rdo_patflagstat.visible = false; caption4.visible = true; model.toggle("case1"); } else if (sOrdType =='I') { model.setValue("/root/main/cond/orddd" , getCurrentDate()); rdo_patflag.visible = false; rdo_patflagstat.visible = true; model.toggle("case2"); } model.refresh(); } /*=============================================================================== @desc : ÀÔ¿ø½Ã Á¶È¸ ===============================================================================*/ function fInPatList() { model.removeNodeset("/root/main/inpatinfo/inpatlist"); model.removeNodeset("/root/main/outpatinfo/outpatlist"); model.resetInstanceNode("/root/send/reqdata"); model.copyNode("/root/send/reqdata", "/root/main/cond"); submit("TRMMO04205"); window.modelesstopmost = true; } /*=============================================================================== @desc : ¿Ü·¡½Ã Á¶È¸ ===============================================================================*/ function fOutPatList() { model.removeNodeset("/root/main/inpatinfo/inpatlist"); model.removeNodeset("/root/main/outpatinfo/outpatlist"); model.resetInstanceNode("/root/send/reqdata"); model.copyNode("/root/send/reqdata", "/root/main/cond"); if(submit("TRMMO02901")){ model.copyNode(opener.root.prcppatlist, root.main.cond); // ÇöÀç Á¶È¸ Á¶°ÇÀ» ó¹æÈ­¸é¿¡ ÀνºÅϽº¿¡ º¹»ç ÇÑ´Ù. ´ë»óÀÚ È­¸é ´Ù½Ã ¿­¶§ ÂüÁ¶ } window.modelesstopmost = true; } function fInitialize() { //°ü½É½½¸³ÄÞº¸ ¾ÆÀÌÅÛÃß°¡ if (model.getValue ("/root/main/cond/clsflag") == "P" ){ model.setValue("/root/main/cond/userid", getUserInfo("userid")); } else if ( model.getValue ("/root/main/cond/clsflag") == "G" ) { model.setValue("/root/main/cond/userid", getUserInfo("dutplcecd")); } model.copyNode("/root/send/reqdata", "/root/main/cond"); submit("TRMMB00101"); addComboItem("cmb_concslip","","","above"); } function fChkGetData() { var sOrdType = model.getValue("/root/main/cond/ordtype"); if(sOrdType =="O") { fOutPatList(); } else if (sOrdType == "I") { fInPatList() ; } fChngGrdCellColor(sOrdType); } /** * @desc : ´ë±âȯÀÚ »ö»ó ¼³Á¤ * : ³»È¯ÀÚÀû¿ë ȯÀÚ´Â color instance¿¡ ffffffÀÌ¿ÜÀÇ °ªÀÌ µé¾î¿È * @param : * @return : * @author : ¿ÀÁöÈÆ * @--------------------------------------------------- */ function fChngGrdCellColor(sOrdType){ var sColor = ""; if(sOrdType == "O") { for(var currow = 1; currow < grd_outpatlist.rows; currow++){ sColor = model.getValue("/root/main/outpatinfo/outpatlist[" + currow + "]/color"); if(sColor == ""){ sColor = "ffffff"; } grd_outpatlist.rowStyle(currow, "data", "background-color") = "#" + sColor; } grd_outpatlist.refresh(); } }