//=================================================================== // °øÅëÀ¸·Î »ç¿ëÇÏ´Â ÇÔ¼ö //=================================================================== /** * @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 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 if(curEmrRecObj != null){curEmrRecObj.javascript.fClose();} //Áø·á±â·Ï È­¸é close if(curExamRsltObj != null){curExamRsltObj.javascript.fClose();} //°Ë»ç°á°ú È­¸é close 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 = model.getValue(root.main.cond.ordrecflag); 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/fromdd"); 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 = model.getValue(root.main.cond.ordrecflag); 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(); /* if(fReqMiniOutPatPamInfo()==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È­¸é open }else if(cpflag == "X"){ mainObj.window.javascript.openEmrScrn("SPMMP01200"); //CP°Ë»öÈ­¸é open }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(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 searflag = model.getValue("/root/main/cond/searflag"); if (searflag =='O'){ model.setValue("/root/main/cond/fromdd" , getCurrentDate()); rdo_patflag.visible = true; rdo_patflagstat.visible = false; ipt_todd.visible = false; cmb_concslip.visible = false; caption4.visible = true; chk_myPat.visible = false; caption5.visible = false; rdo_opstatcd.visible = false; caption1.text = "Á¶È¸±â°£ :"; rdo_clsflag.visible = true; caption2.text= "ºÐ·ù±¸ºÐ :"; cmb_orddept.visible = false; bool1.visible = false; caption6.visible = false; model.toggle("case1"); } else if (searflag =='I') { model.setValue("/root/main/cond/fromdd" , getCurrentDate()); rdo_patflag.visible = false; rdo_patflagstat.visible = true; ipt_todd.visible = false; cmb_concslip.visible = false; caption4.visible = true; chk_myPat.visible = true; caption5.visible = true; chk_myPat.value = 'Y' rdo_opstatcd.visible = false; caption1.text = "Á¶È¸±â°£ :"; rdo_clsflag.visible = true; caption2.text= "ºÐ·ù±¸ºÐ :"; cmb_orddept.visible = false; bool1.visible = false; caption6.visible = false; model.toggle("case2"); } else if (searflag =='P'){ fInitialize(); var cur_day = getCurrentDate(); var idate = new Date(); var peveDate = idate.getAddDate(-2, "D"); model.setValue("/root/main/cond/fromdd", peveDate.getDateFormat()); model.setValue("/root/main/cond/todd" , cur_day ); rdo_patflag.visible = false; rdo_patflagstat.visible = false; ipt_todd.visible = true; cmb_concslip.visible = true; caption4.visible = false; chk_myPat.visible = false; caption5.visible = false; rdo_opstatcd.visible = false; caption1.text = "Á¶È¸±â°£ :"; rdo_clsflag.visible = true; caption2.text= "ºÐ·ù±¸ºÐ :"; cmb_orddept.visible = false; bool1.visible = false; caption6.visible = false; model.toggle("case3"); } else if (searflag =='A'){ fInitialize(); var cur_day = getCurrentDate(); var idate = new Date(); var peveDate = idate.getAddDate(-2, "D"); model.setValue("/root/main/cond/fromdd", cur_day); model.setValue("/root/main/cond/todd" , cur_day ); rdo_patflag.visible = false; rdo_patflagstat.visible = false; ipt_todd.visible = false; cmb_concslip.visible = false; caption4.visible = true; chk_myPat.visible = false; caption5.visible = false; rdo_opstatcd.visible = true; caption1.text = "¼ö¼úÀÏÀÚ :"; rdo_clsflag.visible = false; caption2.text= "Áýµµ°ú :"; cmb_orddept.visible = true; bool1.visible = true; caption6.visible = true; model.toggle("case4"); } model.refresh(); } /*=============================================================================== @desc : ÀÔ¿ø½Ã Á¶È¸ ===============================================================================*/ function fInPatList() { model.removeNodeset("/root/main/inpatinfo/inpatlist"); model.removeNodeset("/root/main/outpatinfo/outpatlist"); model.removeNodeset("/root/main/info/concslippatlist"); model.removeNodeset("/root/main/oppatinfo/oppatlist"); 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.removeNodeset("/root/main/info/concslippatlist"); model.removeNodeset("/root/main/oppatinfo/oppatlist"); model.resetInstanceNode("/root/send/reqdata"); model.copyNode("/root/send/reqdata", "/root/main/cond"); submit("TRMMO04207"); window.modelesstopmost = true; } /*=============================================================================== @desc : Á¶È¸ÀÏÀÚ°¡ 2ÀÏÀÌ ³ÑÁö ¾Êµµ·Ï ¼³Á¤ ===============================================================================*/ function fChkDate() { var todd = model.getValue("/root/main/cond/todd"); fromdd2 = Number(todd-2) var fromdd = model.getValue("/root/main/cond/fromdd"); Number(fromdd); if (fromdd < fromdd2 || fromdd > todd) { var cur_day = getCurrentDate(); model.setValue("/root/main/cond/fromdd" , todd ); ipt_fromdd.refresh(); messageBox("½ÃÀÛÀÏÀº 2ÀÏ ÀÌÀüÀÏ ¶Ç´Â Á¾·áÀϺ¸´Ù Ŭ ¼ö ","E001"); } else { fChkGetData() ; } } 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"); } /*=============================================================================== @desc : °ü½É½½¸³´ë»óÀÚ Á¶È¸ ===============================================================================*/ function fGetConcSlipPatList(){ model.makeNode("/root/send/cond"); 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("TRMMB00102"); window.modelesstopmost = true; model.refresh(); } /*=============================================================================== @desc : ¼ö¼ú¸¶Ãë´ë»óÀÚÁ¶È¸ ===============================================================================*/ function fGetOpPatList(){ model.makeNode("/root/send/cond"); model.removeNodeset("/root/main/inpatinfo/inpatlist"); model.removeNodeset("/root/main/outpatinfo/outpatlist"); model.removeNodeset("/root/main/info/concslippatlist"); model.removeNodeset("/root/main/oppatinfo/oppatlist"); // 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("TRMMO04206"); window.modelesstopmost = true; model.refresh(); } function fChkGetData() { var searflag = model.getValue("/root/main/cond/searflag"); if (searflag =="P") { fInitialize(); fGetConcSlipPatList(); } else if(searflag =="A") { fGetOpPatList(); } else if(searflag =="O") { fOutPatList() ; } else if (searflag == "I") { fInPatList() ; fMyPatChngColor(); } } function fMyPatChngColor(){ for(var currow = 1; currow < grd_inpatlist.rows; currow++){ var color = model.getValue("/root/main/inpatinfo/inpatlist[" + currow + "]/color"); if(color == ""){ color = "ffffff"; } grd_inpatlist.rowStyle(currow, "data", "background-color") = "#" + color; } grd_inpatlist.refresh(); } //=================================================================== // ¼ö¼ú¿¡¼­ »ç¿ëÇÏ´Â ÇÔ¼öµé //=================================================================== /** * @desc : ȯÀÚ ¼±Åà ÈÄ, ȯÀÚ Á¤º¸ Á¶È¸ ¹× ±â·ÏÁö È­¸é ¿¬µ¿ * @ * @param : * @return : * @author : ¿ÀÁöÈÆ * @--------------------------------------------------- */ /** * @desc : ¼ö¼úȯÀÚ ¼±Åà * @ * @param : * @return : * @author : ¿ÀÁöÈÆ * @--------------------------------------------------- */ function fMiniOpPat(){ var ordrecflag = model.getValue(root.main.cond.ordrecflag); var currow = grd_oppatlist.row; if(currow < 1){ return; } var opstatcd = model.getValue("/root/main/oppatinfo/oppatlist[" + currow + "]/opstatcd"); if(opstatcd == "00" || opstatcd == "10"){ messageBox("¼±ÅÃµÈ È¯ÀÚ´Â ¼ö¼úÈ®Á¤ÀÌ µÇÁö", "E007"); return; } //ó¹æ, CPÈ­¸é¿¡ modal ¶Ç´Â modaless°¡ ¶á °æ¿ì, ȯÀÚ ¼±Åà ºÒ°¡ if(fChkScrnModal()==false){ return; } //CPȯÀÚ ¿©ºÎ È®ÀÎ if(fChkCPMiniOpPatValid(currow)==false){ return; } //»ó´ÜÁ¤º¸ ¼³Á¤ //model.setValue(opener.root.cpflag, "N"); //ó¹æopen if(fReqMiniOpPatPamInfo(currow)==true){ fOpenPrcpMainWnd(); } var mainobj = getMainViewer(); var mainscrnid = mainobj.javascript.getScreenID(); //¸ÞÀÎÈ­¸éÀÇ ±â·ÏÁö ID if(getUserInfo("dutplcecd") == "2090000000"){ //·Î±×ÀÎÇÑ Àǻ簡 ¸¶ÃëÅëÁõÀÇÇаúÀÎ °æ¿ì if(mainscrnid == "SMMMR03700"){ mainobj.javascript.fFormInit(); }else{ mainobj.javascript.navigate("SMMMR03700"); } } } /** * @desc : ¼ö¼úȯÀÚ È¯ÀÚ ±âº»Á¤º¸¼³Á¤ * @ ¼öÁ¤ : ¹Ì´ÏÁø·á´ë»óÀÚ¿¡ ¸Â°Ô²û ³»¿ë ¼öÁ¤ * @ * @param : * @return : * @author : ¿ÀÁöÈÆ * @--------------------------------------------------- */ function fReqMiniOpPatPamInfo(iRow){ var ioflag = "T" // ¼ö¼úÀÏ °æ¿ì ioflag:T var pid = model.getValue("/root/main/oppatinfo/oppatlist[" + iRow + "]/pid"); var opcnfmdd = model.getValue("/root/main/oppatinfo/oppatlist[" + iRow + "]/opcnfmdd"); var cretno = ""; var instcd = model.getValue("/root/main/oppatinfo/oppatlist[" + iRow + "]/instcd"); var perfdeptcd = model.getValue("/root/main/oppatinfo/oppatlist[" + iRow + "]/perfdeptcd"); var perfdrid = model.getValue("/root/main/oppatinfo/oppatlist[" + iRow + "]/perfdrid"); var patflag = model.getValue("/root/main/oppatinfo/oppatlist[" + iRow + "]/ioflag"); var procflag = "F"; // ÃÖÃÊÁ¶È¸:F , ÀçÁ¶È¸:R var oprsrvno = model.getValue("/root/main/oppatinfo/oppatlist[" + iRow + "]/oprsrvno"); var ophistno = model.getValue("/root/main/oppatinfo/oppatlist[" + iRow + "]/ophistno"); var srchdd = model.getValue("/root/main/cond/fromdd"); //Á¶È¸ÀÏÀÚ var param = ioflag + "¢Ë" + pid + "¢Ë" + opcnfmdd + "¢Ë" + cretno + "¢Ë" + instcd + "¢Ë" + perfdeptcd + "¢Ë" + perfdrid + "¢Ë" + patflag + "¢Ë" + procflag + "¢Ë" + oprsrvno + "¢Ë" + ophistno + "¢Ë" + srchdd; setParameter("condparam", param); model.setValue("/root/init", 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 : ¼ö¼úȯÀÚ CPÀû¿ë¿©ºÎ È®ÀÎ * @ * @param : * @return : * @author : ¿ÀÁöÈÆ * @--------------------------------------------------- */ function fChkCPMiniOpPatValid(currow){ var pid = model.getValue("/root/main/oppatinfo/oppatlist[" + currow + "]/pid"); var opcnfmdd = model.getValue("/root/main/oppatinfo/oppatlist[" + currow + "]/opcnfmdd"); var perfdeptcd = model.getValue("/root/main/oppatinfo/oppatlist[" + currow + "]/perfdeptcd"); var perfdrid = model.getValue("/root/main/oppatinfo/oppatlist[" + currow + "]/perfdrid"); var ioflag = model.getValue("/root/main/oppatinfo/oppatlist[" + currow + "]/ioflag"); var instcd = model.getValue("/root/main/oppatinfo/oppatlist[" + currow + "]/instcd"); var srchdd = model.getValue("/root/main/cond/opcnfmdd"); model.removeNodeset("/root/send/reqdata"); model.makeValue("/root/send/reqdata/ioflag" , "T"); //¼ö¼úȯÀÚ ioflag´Â T·Î ¼³Á¤, ½ÇÁ¦·Î T´Â ¾øÀ¸³ª, ·ÎÁ÷󸮸¦ À§ÇØ Àӽ÷Î, ½ÇÁ¦ ioflag´Â patflag model.makeValue("/root/send/reqdata/pid" , pid); model.makeValue("/root/send/reqdata/orddd" , opcnfmdd); model.makeValue("/root/send/reqdata/orddeptcd", perfdeptcd); model.makeValue("/root/send/reqdata/orddrid" , perfdrid); model.makeValue("/root/send/reqdata/patflag" , ioflag); //½ÇÁ¦ ioflag´Â patflag·Î ¼³Á¤ model.makeValue("/root/send/reqdata/instcd" , instcd); //±â°üÄÚµå model.makeValue("/root/send/reqdata/srchdd" , srchdd); //±âÁØÀÏÀÚ if(submit("TRMMO04503")==true){ //¼ö¼úȯÀÚÀÇ ¿ø¹«Å° Á¶È¸ var pid = model.getValue("/root/init/pamkeyinfo/pamkeyinfo/pid"); var orddd = model.getValue("/root/init/pamkeyinfo/pamkeyinfo/orddd"); var cretno= model.getValue("/root/init/pamkeyinfo/pamkeyinfo/cretno"); var instcd= model.getValue("/root/init/pamkeyinfo/pamkeyinfo/instcd"); var ioflag= model.getValue("/root/init/pamkeyinfo/pamkeyinfo/ioflag"); 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", ioflag); var ocsflag = model.getValue("root/main/cond/ocsflag"); if(ocsflag == "Y"){ if(submit("TRMMO04303")==true){ //¼ö¼úȯÀÚÀÇ CPÀû¿ë ¿©ºÎ È®ÀÎ 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 == 12){ //CPÀû¿ë»óŰ¡ 12ÀÎ °æ¿ì model.setValue(root.cpflag, "Y"); return true; /* var rtnval = messageBox("[" + hngnm + "]ȯÀÚÀÇ [" + cpgnm + "] CP¸¦", "Q003"); if(rtnval == 6){ //¿¹ ¼±ÅÃ, CP Main open, CPÀû¿ëȯÀÚ tbl¿¡ appstat 10 ÁøÇàÁß model.setValue(opener.root.cpflag, "N"); return fUpdtCPPatAppStatVal(52); }else{ //¾Æ´Ï¿À ¼±ÅÃ, ó¹æ Main open, CPÀû¿ëȯÀÚ tbl¿¡ appstat 51 drop out model.setValue(opener.root.cpflag, "Y"); return fUpdtCPPatAppStatVal(10); }*/ }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Àû¿ë»óŰ¡ 11°¡ ¾Æ´Ñ °æ¿ì, CP Mainâ open model.setValue(root.cpflag, "Y"); return true; } } } } } } /** * @desc : OCS Check Box Ŭ¸¯½Ã ó¸® * : check ÇÒ °æ¿ì Áø·á±â·Ï È­¸é¸¸ ¿­¸®°í ó¹æÈ­¸éÀº ¿­Áö ¾Ê´Â´Ù * @ * @param : * @return : * @author : ¿ÀÁöÈÆ * @--------------------------------------------------- */ function fClkCheckBoxOCS(){ var ocsflag = model.getValue("/root/main/cond/ocsflag"); if(ocsflag == "Y"){ model.setValue("/root/main/cond/ocsflag", "Y"); }else{ model.setValue("/root/main/cond/ocsflag", "N"); } model.refresh(); }