var sOPPATLIST_PATH = "/root/main/oppatinfo/oppatlist";
var sORDERBY        = "";


function fInitialize_SMMMO04500(){
    model.removeNodeset(sOPPATLIST_PATH);
    model.setValue("/root/main/cond/opcnfmdd", String(getCurrentDate()));
    



    
    model.setValue("/root/main/cond/perfdeptcd", getUserInfo("dutplcecd"));  
		model.setValue("/root/main/cond/perfdrid", "-");  
		model.setValue("/root/main/cond/oproomcd", "-");  
		
		














        reqOpRoomList(model.getValue("/root/main/cond/opcnfmdd"), "/root/init/oproomlist", "total");           
        addComboInstance("/root/init/oproomlist", "oproomcd^oproomnm", "0000^방없음", "oproomlist");           


				
				copyNodeType("/root/hidden/mmo/oproomlists/oproomlist", "/root/init/oproomlist", "replace");
        addComboInstance("/root/hidden/mmo/oproomlists/oproomlist", "oproomcd^oproomnm", "-^전체", "oproomlist");               


        mmbfGetDeptCodeComboList("/root/send/reqdata", "/root/init/orddept" , "D", String(getCurrentDate()));  
        addComboInstance("/root/init/orddept", "deptcd^depthngnm", "-^전체", "dept");                          


        mmbfGetUserComboList("/root/send/reqdata", "/root/init/userlist" , getUserInfo("dutplcecd"), "0330", "", "N", "", "", "P");
        addComboInstance("/root/init/userlist", "userid^usernm", "-^전체", "usercombo");                       




























































    
    fReqOPPatList();
    

}

 
function fSelectOpPat(){      
    var ordrecflag = model.getValue(opener.instance1.selectSingleNode("root/main/cond/ordrecflag"));
    var currow     = grd_oppatlist.row;
    var dutplcecd  = getUserInfo("dutplcecd");       
    
    if(currow < 1){
        return;
    }
    var opstatcd     = model.getValue(sOPPATLIST_PATH + "[" + currow + "]/opstatcd");
    var painlessflag = model.getValue(sOPPATLIST_PATH + "[" + currow + "]/painlessflag");  
    var pid          = model.getValue(sOPPATLIST_PATH + "[" + currow + "]/pid");
    var hngnm        = model.getValue(sOPPATLIST_PATH + "[" + currow + "]/hngnm");    

    if(painlessflag == "N") {
        if(opstatcd == "00" || opstatcd == "10"){
            messageBox("선택된 환자는 수술확정이 되지", "E007");
            return;
        }
    }
    
    
    if(fChkScrnDisable()==false){
        return;
    }
    
    
   if(fChkCPPatValid(currow)==false){
     return;
   }

    
	var mainobj = getMainViewer();
	var mainscrnid  = mainobj.getScreenID(); 
	if(mainscrnid == "SMMMR00100"){
        var prvIntRecPamInfRtn = mainobj.window.fPrevInitRecPamInfo();
		if(prvIntRecPamInfRtn  == false){
			return;
		}
    }

   
   
   if(fReqOpPatPamInfo(currow)==true){
    
        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"); 
         curExamRsltObj = getOpenWindow("SMAER00800"); 
         curNurTprObj   = getOpenWindow("SMMNR00900"); 
         curNurBSEMRObj = getOpenWindow("SMMNR02500"); 
         curGrphObj     = getOpenWindow("SPMRF05200"); 
         curCunsultObj  = getOpenWindow("SMMMR05000"); 
         curExamRsltNewObj = getOpenWindow("SMMMI00100"); 
    
         
         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.fInitalize();
		 	    activateChild("SMMRI00400");
		    }    
		    if(curExamRsltObj != null){
		        curExamRsltObj.model.setvalue("/root/send/data/singdata/srchpid", pid );
		        curExamRsltObj.btn_srch.dispatch("DOMActivate");
		    } 
		
		    if(curNurTprObj != null){      
		        curNurTprObj.fInitialize("init");
		    } 
		    
		    if(curNurBSEMRObj != null){      
		        curNurBSEMRObj.fInitialize("init");
		    } 
		
		    if(curGrphObj != null){      
		        curGrphObj.fInitialize();
		    } 
		    
		       
		       if(curCunsultObj != null ){      
		        curCunsultObj.fInitalize();
		    } 
		    
		    if(curExamRsltNewObj != null){
		        curExamRsltNewObj.model.setvalue("/root/send/data/singdata/srchpid", pid );
		        curExamRsltNewObj.btn_srch.dispatch("DOMActivate");
		    } 
            
        
        
        
            curCpObj     = mainObj.getOpenWindow("SMMMP00800"); 
            curPrcpObj   = mainObj.getOpenWindow("SMMMO00100"); 
            curCpSrchObj = mainObj.getOpenWindow("SPMMP01200"); 
            
            if(curPrcpObj != null) {curPrcpObj.fPrcpWndClose(); }     
            if(curCpObj != null){curCpObj.fCloseGPS();}               
            if(curCpSrchObj != null){curCpSrchObj.fCpSrchWndClose();} 
            clearParameter("SMMMO04100_ANSWCNT");  
            opener.fChngEMRScrn();
        } else {
            opener.fOpenPrcpMainWnd();
            
        }
   
   }


   
}


function fReqOpPatPamInfo(iRow){
   var ioflag     = "T" 
   var pid        = model.getValue(sOPPATLIST_PATH + "[" + iRow + "]/pid");
   var opcnfmdd   = model.getValue(sOPPATLIST_PATH + "[" + iRow + "]/opcnfmdd");
   var cretno     = "";
   var instcd     = model.getValue(sOPPATLIST_PATH + "[" + iRow + "]/instcd");
   var perfdeptcd = model.getValue(sOPPATLIST_PATH + "[" + iRow + "]/perfdeptcd");
   var perfdrid   = model.getValue(sOPPATLIST_PATH + "[" + iRow + "]/perfdrid");
   var patflag    = model.getValue(sOPPATLIST_PATH + "[" + iRow + "]/ioflag");   
   var procflag   = "F"; 
   var cnstopflag = model.getValue(sOPPATLIST_PATH + "[" + iRow + "]/cnstopflag");
   var oprsrvno   = model.getValue(sOPPATLIST_PATH + "[" + iRow + "]/oprsrvno");
   var mainoprsrvno   = model.getValue(sOPPATLIST_PATH + "[" + iRow + "]/mainoprsrvno");
   
   var ophistno   = model.getValue(sOPPATLIST_PATH + "[" + iRow + "]/ophistno");
   var srchdd     = model.getValue("/root/main/cond/opcnfmdd"); 
   
   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;
   }
}


function fReqOPPatList(){
    
    
    
    
    model.copyNode("/root/send/reqdata", "/root/main/cond");    
    var anstpaindeptcd = model.getValue("/root/init/hardcdno/hardcd/hardcd");    
    if(anstpaindeptcd == model.getValue("/root/main/cond/perfdeptcd")){
        model.setValue("/root/send/reqdata/perfdeptcd", "-"); 
        model.setValue("/root/send/reqdata/perfdrid"  , "-"); 
    }
    
    
   var offset = parseInt(model.getValue("root/page/curpage"));
    
    if(offset == 1)
    {
    	offset = offset - 1;    	
    }
    else
    {
    	offset = (offset - 1) * 10;
  	}		
  	
    model.makeValue("/root/send/reqdata/offset", String(offset));		
    model.makeValue("/root/send/reqdata/pagesize", model.getValue("root/page/pagesize")); 
    
    
    
    
    if(submit("TRMOB00003")){    	
        var totrow = grd_oppatlist.rows;
        model.setValue("/root/main/totcnt/totcnt", totrow-1);
        model.copyNode(opener.instance1.selectSingleNode("root/temp/oppatlist"), instance1.selectSingleNode("root/init"));
        model.copyNode(opener.instance1.selectSingleNode("root/cond/oppatlist"), instance1.selectSingleNode("root/main/cond"));
    }
	
		var maxpage = parseInt(model.getValue("/root/main/oppatinfo/retcnt/oppatcnt"));
 		
		if(maxpage < 10)
		{
			model.setValue("/root/page/maxpage", "1");
		}
		else
		{	
			maxpage = (maxpage / 10) - ((maxpage % 10) / 10) + 1;
			model.setValue("/root/page/maxpage", String(maxpage));
			model.refresh();
		}
  
    var orderby = model.getValue("/root/main/cond/orderby");
    var sortcol = model.getValue("/root/main/cond/sortcol");
    if(sortcol != "" && orderby != ""){
        sORDERBY = orderby;
		
		grd_oppatlist.colsort(sortcol) = sORDERBY
        grd_oppatlist.setSort(1, 1, grd_oppatlist.rows -1, grd_oppatlist.cols -1, "usersort");  
        grd_oppatlist.gridToInstance(); 
		grd_oppatlist.refresh();
    }
}


function fChkCPPatValid(currow){
    var instcd     = getUserInfo("dutplceinstcd");
    var pid        = model.getValue(sOPPATLIST_PATH + "[" + currow + "]/pid");
    var opcnfmdd   = model.getValue(sOPPATLIST_PATH + "[" + currow + "]/opcnfmdd");
    var perfdeptcd = model.getValue(sOPPATLIST_PATH + "[" + currow + "]/perfdeptcd");
    var perfdrid   = model.getValue(sOPPATLIST_PATH + "[" + currow + "]/perfdrid");
    var ioflag     = model.getValue(sOPPATLIST_PATH + "[" + currow + "]/ioflag");
    var srchdd     = model.getValue("/root/main/cond/opcnfmdd");
    if(isNull(perfdeptcd)) perfdeptcd = model.getValue("/root/main/cond/orddeptcd");
    if(isNull(ioflag))     ioflag     = "T";
				        		
    model.removeNodeset("/root/send/reqdata");
    model.makeValue("/root/send/reqdata/ioflag"   , "T"); 
    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); 
    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 ioflag= model.getValue("/root/init/pamkeyinfo/pamkeyinfo/ioflag");
        var hngnm = model.getValue("/root/init/pamkeyinfo/pamkeyinfo/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/hngnm"       , hngnm);	
        model.makeValue("/root/send/reqdata/prcpgenrflag", ioflag);        
        model.makeValue("/root/send/reqdata/srchtabflag" , "D");	  
        
        if(submit("TRMMO04303")==true){ 
            var cppatnode = instance1.selectNodes("/root/init/rsltgetdata/getdata");
            if(cppatnode.length < 1){ 
                model.setValue(opener.instance1.selectSingleNode("root/cpflag"), "N"); 
                return true;
                
            }else{ 
                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"); 
                
                if(appstat == 52){
				          
				          var rtnval = messageBox(msgcnts, msgflag);
				          if(rtnval == 6){
					          model.setValue(opener.instance1.selectSingleNode("root/cpflag"), "X");		
					          return true;
					        }else{
				            model.setValue(opener.instance1.selectSingleNode("root/cpflag"), "N");
				      		  if(fUpdtCPPatAppStatVal(41) != false && instance1.selectSingleNode(sOPPATLIST_PATH + "[" + currow + "]/cpyn") != null){			
				      		    model.setValue(sOPPATLIST_PATH + "[" + currow + "]/cpyn", "N");
				      		    return;
				      		  }else{
				      		  	return false;
				      		  }
					        }
				 
                }else{
                	if( prtlflagcd == "02" && isNull(appstat) && msgflag == "P" ){ 
				        		
				        		setParameter("SMMMO041_hngnm"      , hngnm);
				        		setParameter("SMMMO041_pid"        , pid);
				        		setParameter("SMMMO041_cretno"     , cretno);
				        		setParameter("SMMMO041_orddd"      , orddd);
				        		setParameter("SMMMO041_ordtype"    , ioflag);
				        		setParameter("SMMMO041_orddeptcd"  , perfdeptcd);
				        		setParameter("SMMMO041_slipnm"     , model.getValue(instance1.selectSingleNode("root/init/rsltgetdata/getdata/msgcnts")));  
				        		setParameter("SMMMO041_cpgmntrflag", appstat);	
				        		setParameter("SMMMO041_cpgappno"   , cpgappno); 
				        		setParameter("SMMMO041_cpgnm"      , cpgnm);    
				        		
				        		modal("SPMMP03200");  
				        		
				        		if( cpgappno > 0 && cpgappno != getParameter("SPMMP032_cpgappno") && instance1.selectSingleNode(sOPPATLIST_PATH + "[" + currow + "]/cpyn") != null){ 
				        			model.setValue(sOPPATLIST_PATH + "[" + currow + "]/cpyn", "N");
				        		}
				        		if( !isNull(getParameter("SPMMP032_cpgappno")) && getParameter("SPMMP032_cpgappno") > 0 ){
				        			model.setValue(opener.instance1.selectSingleNode("root/cpflag"), "Y");  
				        		}else{
				        			model.setValue(opener.instance1.selectSingleNode("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{
					        	
					        	
					        	if( !isNull(msgcnts) && !isNull(msgflag) ){
					        		
					        		
					        		messageBox(msgcnts, msgflag);
					        		setParameter("SMMMO043_cpgappno", cpgappno);	
					        		setParameter("SMMMO043_drop"    , "N");				
					        		
					        		modal("SPMMP02300");								
					        		
					        		model.setValue(opener.instance1.selectSingleNode("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.instance1.selectSingleNode("root/cpflag"), "Y");
					          return true;
					        }
	           		}
            }
       }
    }
}


function fUpdtCPPatAppStatVal(appstat){
  var cpgappno = model.getValue("/root/init/rsltgetdata/getdata/cpgappno");
  model.removeNodeset("/root/send/savedata");
  model.makeValue("/root/send/savedata/cpgappno", cpgappno);
  model.makeValue("/root/send/savedata/appstat" , appstat);
  if(submit("TXMMO04301")==false){
      return false;
  }
}