YNU_JEUS/app_home/himed/webapps/emr/chrtmngtweb/js/SPMRC03200.js

/**
  - ▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩

    진료 - 사본발행( SPMRC03200_사본발행.xrw - JScript )

      - Version : 이창록
          1)  : Ver.1.00.01
	

  - ▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩
/**
 * @group  :
 * @ver    : 
 * @by     : 이창록 2008-08-29 
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : 화면 초기화
 * @param  :
 * @return :   
 * @---------------------------------------------------
 */
function fInit_SPMRC03200()
{      
        model.removeNodeset("/root/main/apphist/applist");
        grd_apphist.refresh();       
        model.removeNodeset("/root/main/issinfo/emrapplist");    
        grd_emrapplist.refresh();
        zbcfGetCodeList(new Array("P0001","M0332"),new Array("/root/init/common/ioflaglist","/root/init/common/issgoalcd"),true)//공통코드      
        if(checkOpener()){
    		 var copyparam    = opener.javascript.getParameter("SMMRI00400_reqcopy");   // 사본발급관리창에서 open 일때              
             var copyparmsg   = opener.javascript.getParameter("SPMRC03100_copyparam");  //통합기록조회 open일때
             if(copyparam!=""){
                fGetCopyInfo(copyparam); 
    	     }else if(copyparmsg!=""){
    	        var parmsg = copyparmsg.split("▦");
        		model.makeValue("/root/temp/appinfo/patinfo/pid"      ,parmsg[0]);
        		model.makeValue("/root/temp/appinfo/patinfo/hngnm"    ,parmsg[1]);
        		model.makeValue("/root/temp/appinfo/patinfo/ioflag"   ,parmsg[2]);
        		model.makeValue("/root/temp/appinfo/patinfo/orddd"    ,parmsg[4]);
        		model.makeValue("/root/temp/appinfo/patinfo/cretno"   ,parmsg[5]);
        		model.makeValue("/root/temp/appinfo/patinfo/appdeptcd",parmsg[6]);
        		model.makeValue("/root/temp/appinfo/patinfo/appmanid" ,parmsg[7].substring(0,8));
    	    }    
    	 }

            var wndobj = getOpenWindow("SMMRI00400");
	        if(wndobj ==null){
	            open("SMMRI00400",1, "", "", "", "", "", "left:0; right:1600; width:750; height:800;");  
	        }   
    	   var paminfo = getGlobalVariable("paminfo");//상당정보 있을시 
        	setCSVToNode("/root/main/result/paminfo", paminfo);
        	if(paminfo!=""){
        		
        	}
    	    var userinfo = getUserInfo("dutplcecd"); 
    	    var userid   = getUserId();
    	    userid = userid.getTrim();  
            	if(userinfo == "3230000000"){ 
            	    cmb_emrorddeptcd.disabled = false;
                    cmb_orddrid.disabled = false;
                    zsdfGetInOutOrdDeptList(getUserInfo("dutplceinstcd"),"/root/init/deptlist","depthngnm","asc");//전체 진료과
                    cmb_emrorddeptcd.refresh();
                    zsufGetOrdDeptDoctorList("none", getUserInfo("dutplceinstcd"), cmb_emrorddeptcd.value, "/root/init/userinfo/userlist", "usernm", "asc")//해당 주치의
                    cmb_orddrid.refresh();      
            	}else{
                    zsdfGetInOutOrdDeptList(getUserInfo("dutplceinstcd"),"/root/init/deptlist","depthngnm","asc");//전체 진료과
        	    	model.setValue("/root/temp/appinfo/patinfo/appdeptcd",getUserInfo("dutplcecd"));
        	    	cmb_emrorddeptcd.refresh(); 
        	    	zsufGetOrdDeptDoctorList("none", getUserInfo("dutplceinstcd"), cmb_emrorddeptcd.value, "/root/init/userinfo/userlist", "usernm", "asc")//해당 주치의
        	    	model.setValue("/root/temp/appinfo/patinfo/appmanid",userid);  
        	    	cmb_orddrid.refresh(); 
                }
            fHistSearch();//이전사본신청내역 조회
            fCopyPatInfoList();//입원회차별 조회
            fAppManNmSetting();
            model.refresh();
}
/**
 * @group  :
 * @ver    : 
 * @by     : 이창록 2008-08-29 
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : 이전사본발행 내역 조회
 * @param  :
 * @return :
 * @---------------------------------------------------
 */
function fHistSearch()
{
    model.makeValue("/root/send/cond/pid",model.getValue("/root/temp/appinfo/patinfo/pid"));
        if(submit("TRMRC01201")){
        }   
    model.removeNodeset("/root/send/cond");
}
/**
 * @group  :
 * @ver    : 
 * @by     : 이창록 2008-08-29 
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : 환자 회차별 정보 조회(입원)
 * @param  :
 * @return :
 * @---------------------------------------------------
 */
function fCopyPatInfoList()
{
     model.makeValue("/root/send/patinfo/pid",model.getValue("/root/temp/appinfo/patinfo/pid"));
     if(submit("TRMRC03202")){  
     }
     model.removeNodeset("/root/send/patinfo");
}
 
/**
 * @group  :
 * @ver    : 
 * @by     : 이창록 2008-08-29 
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : 사본발행 목적 팝업 호출(사본발행신청 화면과 동일)
 * @param  :
 * @return :
 * @---------------------------------------------------
 */
function fIssGoalPopUp(){
	var sIssUsge = "";
	var sIssUsgeCnt = 0;
	var sIssGoalEtcYN = false;
	var sIssGoalEtc = "";
	var sIssGoalEtcCd = "";
	var sIssGoalCd = "";
	var sStndRow = 0;
    setParameter("SPMMR02200_multichkyn", "Y");
	modal("SPMMR02200");
	sIssUsge = model.getValue("/root/main/issusge");
	sIssUsgeCnt = model.getValue("/root/main/issusge").split("▩").length;
	if(sIssUsge != ""){
		for(var i=1; i<sIssUsgeCnt; i++){
			if(i != sIssUsgeCnt-1){
				if(sIssGoalEtc != "") sIssGoalEtc += ",";	
				if(sIssGoalEtcCd != "") sIssGoalEtcCd += ",";
			}
			
			sIssGoalEtc += getArrayData(sIssUsge, i, 1);	
			sIssGoalCd = getArrayData(sIssUsge, i, 0);	
			/*sStndRow = grd_apphist.findRow(sIssGoalCd, 0, 3);
			if(sStndRow > 0){
				messageBox("선택하신 사본발행목적은 이미 신청되었습니다. 다시","C002");	
				return;
			}*/
			if(sIssGoalCd == "99"){
				sIssGoalEtcYN = true;
			}
			sIssGoalEtcCd += sIssGoalCd;
		}
		if(sIssGoalEtcYN == true){
			ipt_issgoaletc.disabled = false;
		}else{
			model.setValue("/root/main/appinfo/copyinfo/issgoaletcnm","");             
			ipt_issgoaletc.disabled = true;
		}
		if(sIssGoalEtcCd.indexOf("06") > -1){
			messageBox("직할병원용 : 주치의가 8개 직할 병원으로 이동하여 환자도 함께 전원 가기를 희망하는 경우 선택","E008");	
		} 
		model.setValue("/root/main/appinfo/copyinfo/issgoaletc", sIssGoalEtc);
		model.setValue("/root/main/appinfo/copyinfo/issgoaletccd", sIssGoalEtcCd);
	}
	model.refresh();
}

/**
 * @group  :
 * @ver    : 
 * @by     : 이창록 2008-08-29 
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : 사본발행 기본정보 조회
 * @param  :
 * @return :
 * @---------------------------------------------------
 */
function fAppInfoSearch(){
    var hRow = grd_apphist.row - grd_apphist.fixedRows +1;
    model.removeNodeset("/root/main/issinfo/emrapplist");
    model.setValue("/root/temp/appinfo/patinfo/appdeptcd", model.getValue("/root/main/apphist/applist[" + hRow + "]/appdeptcd"));
    cmb_emrorddeptcd.refresh();
   	zsufGetOrdDeptDoctorList("none", getUserInfo("dutplceinstcd"), cmb_emrorddeptcd.value, "/root/init/userinfo/userlist", "usernm", "asc");//해당 주치의
    model.setValue("/root/temp/appinfo/patinfo/appmanid", model.getValue("/root/main/apphist/applist[" + hRow + "]/appdrid"));
    cmb_orddrid.refresh();
    var issno =  model.getValue("/root/main/apphist/applist[" + hRow + "]/issno")
    model.makeValue("/root/send/search/copyseqno", model.getValue("/root/main/apphist/applist[" + hRow + "]/copyseqno"));
    model.makeValue("/root/send/search/pid", model.getValue("/root/main/apphist/applist[" + hRow + "]/pid"));
    if (submit("TRMRC01202",false))
    {   
        if(model.getValue("/root/main/appinfo/copyinfo/issgoaletc")==""){
            model.setValue("/root/main/appinfo/copyinfo/issgoaletc",model.getValue("/root/main/appinfo/copyinfo/appmannm" ));
            ipt_issgoalnm.refresh();
        }
        if(model.getValue("/root/main/appinfo/copyinfo/issgoaletcnm")==""){
           model.setValue("/root/main/appinfo/copyinfo/issgoaletcnm",model.getValue("/root/main/appinfo/copyinfo/appmanetc" ));
            ipt_issgoaletc.refresh();   
        }
    }
    fBfAppformInfo();
    btn_save.disabled          = true;
    //이창록수정 2008-12-17 (사용자 요구에 따라 의료정보팀이 아니면 이전발행된정보 클릭시 수정 버튼 disabled)
    if(issno!=""){    
    	if(getUserInfo("dutplcecd") == "3230000000"){
    		btn_update.disabled = false;
  		}else{
  			btn_update.disabled = true;
  		}
  	}else{
  		btn_update.disabled = false;
  	}
    btn_reappinfo.disabled     = false;
    grd_emrapplist.refresh();
    model.removeNodeset("/root/send/deptcond");
}
/**
 * @group  :
 * @ver    : 
 * @by     : 이창록 2008-08-29 
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : 통합기록조회에서 받아오는 정보 함수
 * @param  :
 * @return : 
 * @---------------------------------------------------
 */
function fGetCopyInfo(copyparam)
{
    var copyArr = copyparam.split("▩");
   	var duplFlag = false;
    for(var i = 0; i <(copyArr.length-1); i++){
        var reckeyno = copyArr[i].split("▦")[15];
        var sFormcd = copyArr[i].split("▦")[16];
        var sFormnm = copyArr[i].split("▦")[8];
        var orddd =   copyArr[i].split("▦")[11];
        var ioflag =  copyArr[i].split("▦")[6];
        //var keyno = grd_emrapplist.valueMatrix(grd_emrapplist.row, grd_emrapplist.colRef("reckeyno"));
        //var formcd = grd_emrapplist.valueMatrix(grd_emrapplist.row, grd_emrapplist.colRef("formcd")); 
        for(var rowcnt = 0; rowcnt < grd_emrapplist.rows; rowcnt++){
            if((model.getValue("/root/main/issinfo/emrapplist["+ rowcnt + "]/reckeyno") == reckeyno) && (model.getValue("/root/main/issinfo/emrapplist["+ rowcnt + "]/formcd") == sFormcd)){
                duplFlag = true;
                break;
            } else {
                duplFlag = false;
            }
        }
        if(!(duplFlag)){
            model.makeValue("/root/temp/appinfo/patinfo/pid"                                    ,copyArr[i].split("▦")[0]);
            model.makeValue("/root/temp/appinfo/patinfo/hngnm"                                  ,copyArr[i].split("▦")[1]);
            model.makeValue("/root/temp/appinfo/patinfo/sex"                                    ,copyArr[i].split("▦")[3]);
            if(copyArr[i].split("▦")[2].length==2){
                model.makeValue("/root/temp/appinfo/patinfo/age"                                ,copyArr[i].split("▦")[2].substring(0,1));
            }else{
                model.makeValue("/root/temp/appinfo/patinfo/age"                                ,copyArr[i].split("▦")[2].substring(0,2));
            }                                                                                            
            grd_emrapplist.addRow(false);                                                                
            model.makeValue("/root/main/issinfo/emrapplist["+grd_emrapplist.row+"]/pid"       	,copyArr[i].split("▦")[0]);
            model.makeValue("/root/main/issinfo/emrapplist["+grd_emrapplist.row+"]/shtno"       ,copyArr[i].split("▦")[4]);
            model.makeValue("/root/main/issinfo/emrapplist["+grd_emrapplist.row+"]/chrtflag"    ,copyArr[i].split("▦")[5]);
            model.makeValue("/root/main/issinfo/emrapplist["+grd_emrapplist.row+"]/ioflag"      ,copyArr[i].split("▦")[6]);
            model.makeValue("/root/main/issinfo/emrapplist["+grd_emrapplist.row+"]/dschdd"      ,copyArr[i].split("▦")[12]);
            model.makeValue("/root/main/issinfo/emrapplist["+grd_emrapplist.row+"]/formnm"      ,copyArr[i].split("▦")[8]);
            model.makeValue("/root/main/issinfo/emrapplist["+grd_emrapplist.row+"]/orddeptnm"   ,copyArr[i].split("▦")[9]);
            model.makeValue("/root/main/issinfo/emrapplist["+grd_emrapplist.row+"]/orddeptcd"   ,copyArr[i].split("▦")[10]);
            if((ioflag=="O")||(ioflag=="E")){                                                           
                model.makeValue("/root/main/issinfo/emrapplist["+grd_emrapplist.row+"]/orddd"   ,orddd);
            }else{                                                                                      
                model.makeValue("/root/main/issinfo/emrapplist["+grd_emrapplist.row+"]/indd"    ,orddd);
            }                                                                                           
            model.makeValue("/root/main/issinfo/emrapplist["+grd_emrapplist.row+"]/formrecdt"   ,copyArr[i].split("▦")[7]);
            model.makeValue("/root/main/issinfo/emrapplist["+grd_emrapplist.row+"]/atdoctnm"    ,copyArr[i].split("▦")[13]);
            model.makeValue("/root/main/issinfo/emrapplist["+grd_emrapplist.row+"]/atdoctid"    ,copyArr[i].split("▦")[14]);
            model.makeValue("/root/main/issinfo/emrapplist["+grd_emrapplist.row+"]/reckeyno"    ,copyArr[i].split("▦")[15]);
            model.makeValue("/root/main/issinfo/emrapplist["+grd_emrapplist.row+"]/formcd"      ,copyArr[i].split("▦")[16]);
            // 20090224 이창록 추가
            model.makeValue("/root/main/issinfo/emrapplist["+grd_emrapplist.row+"]/cretno"      ,copyArr[i].split("▦")[17]);
            //alert(model.getValue("/root/temp/appinfo/patinfo/pid"));
           // alert(copyArr[i].split("▦")[0]);
            //model.makeValue("/root/main/issinfo/emrapplist["+grd_emrapplist.row+"]/pid"       	,model.getValue("/root/temp/appinfo/patinfo/pid"));
            duplFlag = false;
        }

        /*
        if((reckeyno==keyno)&&(sFormcd==formcd)){
            //	return;
        }else{
            model.makeValue("/root/temp/appinfo/patinfo/pid"                                    ,copyArr[i].split("▦")[0]);
            model.makeValue("/root/temp/appinfo/patinfo/hngnm"                                  ,copyArr[i].split("▦")[1]);
            model.makeValue("/root/temp/appinfo/patinfo/sex"                                    ,copyArr[i].split("▦")[3]);
            if(copyArr[i].split("▦")[2].length==2){
                model.makeValue("/root/temp/appinfo/patinfo/age"                                  ,copyArr[i].split("▦")[2].substring(0,1));
            }else{
                model.makeValue("/root/temp/appinfo/patinfo/age"                                  ,copyArr[i].split("▦")[2].substring(0,2));
            }                                                                                            
            grd_emrapplist.addRow(false);                                                                
            model.makeValue("/root/main/issinfo/emrapplist["+grd_emrapplist.row+"]/shtno"       ,copyArr[i].split("▦")[4]);
            model.makeValue("/root/main/issinfo/emrapplist["+grd_emrapplist.row+"]/chrtflag"    ,copyArr[i].split("▦")[5]);
            model.makeValue("/root/main/issinfo/emrapplist["+grd_emrapplist.row+"]/ioflag"      ,copyArr[i].split("▦")[6]);
            model.makeValue("/root/main/issinfo/emrapplist["+grd_emrapplist.row+"]/dschdd"      ,copyArr[i].split("▦")[12]);
            model.makeValue("/root/main/issinfo/emrapplist["+grd_emrapplist.row+"]/formnm"      ,copyArr[i].split("▦")[8]);
            model.makeValue("/root/main/issinfo/emrapplist["+grd_emrapplist.row+"]/orddeptnm"   ,copyArr[i].split("▦")[9]);
            model.makeValue("/root/main/issinfo/emrapplist["+grd_emrapplist.row+"]/orddeptcd"   ,copyArr[i].split("▦")[10]);
            if((ioflag=="O")||(ioflag=="E")){                                                            
                model.makeValue("/root/main/issinfo/emrapplist["+grd_emrapplist.row+"]/orddd"   ,orddd); 
            }else{                                                                                       
                model.makeValue("/root/main/issinfo/emrapplist["+grd_emrapplist.row+"]/indd"    ,orddd); 
            }                                                                                            
            model.makeValue("/root/main/issinfo/emrapplist["+grd_emrapplist.row+"]/formrecdt"   ,copyArr[i].split("▦")[7]);        
            model.makeValue("/root/main/issinfo/emrapplist["+grd_emrapplist.row+"]/atdoctnm"    ,copyArr[i].split("▦")[13]); 
            model.makeValue("/root/main/issinfo/emrapplist["+grd_emrapplist.row+"]/atdoctid"    ,copyArr[i].split("▦")[14]); 
            model.makeValue("/root/main/issinfo/emrapplist["+grd_emrapplist.row+"]/reckeyno"    ,copyArr[i].split("▦")[15]); 
            model.makeValue("/root/main/issinfo/emrapplist["+grd_emrapplist.row+"]/formcd"      ,copyArr[i].split("▦")[16]);
        }
        */
    }
    grd_emrapplist.colDisabled(grd_emrapplist.colRef("chrtflag"))=true;
    grd_emrapplist.colDisabled(grd_emrapplist.colRef("ioflag"))=true;
    grd_emrapplist.refresh();
}
/**
 * @group  :
 * @ver    : 
 * @by     : 이창록 2008-08-29 
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : 사본발행 신청내역 저장
 * @param  :
 * @return :
 * @---------------------------------------------------
 */
function fCopySave()
{   
    model.removeNodeset("/root/send/savedata"); 
    if(model.getValue("/root/temp/appinfo/patinfo/appdeptcd")==""){
        messageBox("진료과를 먼저 선택","I008");   
        return;
    }
    if(model.getValue("/root/temp/appinfo/patinfo/appmanid")==""){
        messageBox("신청의사를 선택","I008");     
        return;
    } 
	
	if (model.getValue("/root/main/appinfo/copyinfo/appmanflag") == ""){
        model.setFocus("rdo_appmanflag");
        messageBox("사본발행 신청인을", "C001");
        return;
    }

    if (model.getValue("/root/main/appinfo/copyinfo/trustyn") == ""){
        model.setFocus("rdo_trustyn");
        messageBox("위임장/인감증명서 유무를", "C001");
        return;
    }

    if (model.getValue("/root/main/appinfo/copyinfo/issgoaletc") == ""){
        model.setFocus("ipt_issgoalnm");
        messageBox("사본발행목적을", "C001");
        return;
    }
	grd_emrapplist.clearStatus();
	// 신청부서 1부 default
	if (model.getValue("/root/main/appinfo/copyinfo/emrappcopies") == "0"
	|| model.getValue("/root/main/appinfo/copyinfo/emrappcopies") == ""  ){
	model.makeValue("/root/send/savedata/copyinfo/emrappcopies", "1" );
	}
	    // 신규일 때
	    if (model.getValue("/root/main/appinfo/copyinfo/status") == "")
	    {
             if(model.getValue("/root/temp/appinfo/patinfo/cretno") == ""){
            	model.removeNodeset("/root/send/savedata/otptinfo");
		    			model.makeValue("/root/send/savedata/otptinfo/otpt_flag","I");	// 구분자
		    			model.makeValue("/root/send/savedata/otptinfo/otpt_pid",model.getValue("/root/temp/appinfo/patinfo/pid"));	// 등록번호
		    			model.makeValue("/root/send/savedata/otptinfo/otpt_orddd",getCurrentDate());	// 진료일자
		    			model.makeValue("/root/send/savedata/otptinfo/otpt_orddeptcd", model.getValue("/root/temp/appinfo/patinfo/appdeptcd"));	// 진료과
		    			model.makeValue("/root/send/savedata/otptinfo/otpt_orddrid", model.getValue("/root/temp/appinfo/patinfo/appmanid"));	// 진료의사
		    			model.makeValue("/root/send/savedata/otptinfo/otpt_ordtm",getCurrentTime());	// 진료시간
		    			model.makeValue("/root/send/savedata/otptinfo/otpt_rsrvflag","4");	// 예약구분
		    			model.makeValue("/root/send/savedata/otptinfo/otpt_instcd",getUserInfo("dutplceinstcd"));	// 기관코드
		    			model.makeValue("/root/send/savedata/otptinfo/otpt_remfact", "");	// 참고사항
		    			model.makeValue("/root/send/savedata/otptinfo/sess_userid",getUserInfo("userid"));	// 사용자ID	
		    			model.makeValue("/root/send/savedata/otptinfo/otpt_medamtestmyn", "N"); // 진찰료산정여부
		    			model.makeValue("/root/send/savedata/otptinfo/otpt_medamtpostyn", "Y"); // 진찰료후불여부
		    			model.makeValue("/root/send/savedata/otptinfo/otpt_medamtfreeresn", "10"); // 진찰료미산정사유
            }
	            model.makeValue("/root/send/savedata/copyinfo/status", "i");
	            model.makeValue("/root/send/savedata/copyinfo/pid"           ,model.getValue("/root/temp/appinfo/patinfo/pid"));
	            model.makeValue("/root/send/savedata/copyinfo/appdd"         ,getCurrentDate());
        if(model.getValue("/root/main/appinfo/copyinfo/appmanflag")=="9"){
	            model.makeValue("/root/send/savedata/copyinfo/appmanflag"    ,model.getValue("/root/main/appinfo/copyinfo/appmanflag"));
	            model.makeValue("/root/send/savedata/copyinfo/appmannm"      ,rdo_appmanflag.label);
	            model.makeValue("/root/send/savedata/copyinfo/appmanetc"     ,ipt_appmannm.currentText);
        }else{
	            model.makeValue("/root/send/savedata/copyinfo/appmanflag"    ,model.getValue("/root/main/appinfo/copyinfo/appmanflag"));
	            model.makeValue("/root/send/savedata/copyinfo/appmannm"      ,rdo_appmanflag.label);
        }
            	model.makeValue("/root/send/savedata/copyinfo/trustyn"       ,model.getValue("/root/main/appinfo/copyinfo/trustyn"));
        if(model.getValue("/root/main/appinfo/copyinfo/issgoaletccd") == "99"){	// 사본발행목적이 기타일 경우
	             model.makeValue("/root/send/savedata/copyinfo/issgoaletccd" , model.getValue("/root/main/appinfo/copyinfo/issgoaletccd"));
	             model.makeValue("/root/send/savedata/copyinfo/issgoaletcnm" ,model.getValue("/root/main/appinfo/copyinfo/issgoaletcnm"));
	             model.makeValue("/root/send/savedata/copyinfo/issgoalcd"    ,model.getValue("/root/main/appinfo/copyinfo/issgoaletccd"));
			 			model.makeValue("/root/send/savedata/copyinfo/issgoalnm"    ,model.getValue("/root/main/appinfo/copyinfo/issgoaletcnm"));
        }else{
             model.makeValue("/root/send/savedata/copyinfo/issgoaletc"   ,model.getValue("/root/main/appinfo/copyinfo/issgoaletc"))
             model.makeValue("/root/send/savedata/copyinfo/issgoaletccd" ,model.getValue("/root/main/appinfo/copyinfo/issgoaletccd"));
             model.makeValue("/root/send/savedata/copyinfo/issgoalcd"    ,model.getValue("/root/main/appinfo/copyinfo/issgoaletccd"));
			 		model.makeValue("/root/send/savedata/copyinfo/issgoalnm"    ,model.getValue("/root/main/appinfo/copyinfo/issgoaletcnm"));
        }
            model.makeValue("/root/send/savedata/copyinfo/delivefact"    ,model.getValue("/root/main/appinfo/copyinfo/delivefact"));
            if((model.getValue("/root/temp/appinfo/patinfo/ioflag")=="O")||(model.getValue("/root/temp/appinfo/patinfo/ioflag")=="S")){
                model.makeValue("/root/send/savedata/copyinfo/orddd"     ,model.getValue("/root/temp/appinfo/patinfo/orddd"));
            }else{
                model.makeValue("/root/send/savedata/copyinfo/orddd"     ,model.getValue("/root/temp/appinfo/patinfo/indd"));
            }
            model.makeValue("/root/send/savedata/copyinfo/cretno"        ,model.getValue("/root/temp/appinfo/patinfo/cretno"));
            var userinfo = getUserInfo("dutplcecd"); 
            if(userinfo == "3230000000"){
               	 model.makeValue("/root/send/savedata/copyinfo/emrordflag"    ,"O");
            }else{
            	model.makeValue("/root/send/savedata/copyinfo/emrordflag"    ,model.getValue("/root/temp/appinfo/patinfo/ioflag"));
          	}
            model.makeValue("/root/send/savedata/copyinfo/emrorddeptcd"  ,model.getValue("/root/temp/appinfo/patinfo/appdeptcd"));
            model.makeValue("/root/send/savedata/copyinfo/appdeptcd"     ,model.getValue("/root/temp/appinfo/patinfo/appdeptcd"));
            model.makeValue("/root/send/savedata/copyinfo/appdrid"       ,model.getValue("/root/temp/appinfo/patinfo/appmanid"));
            grd_emrapplist.clearStatus();  
	        for(var i = grd_emrapplist.fixedrows; i < grd_emrapplist.rows; i++)
	        {
		        grd_emrapplist.addStatus(i, "insert")
		        var ioflag 	= model.getValue("/root/main/issinfo/emrapplist["+i+"]/ioflag");
		        var orddd 	= model.getValue("/root/main/issinfo/emrapplist["+i+"]/orddd");
		        var indd 	= model.getValue("/root/main/issinfo/emrapplist["+i+"]/indd");
		        if(orddd ==""){
		        	model.setValue("/root/main/issinfo/emrapplist["+i+"]/orddd",indd);
		        }else{
		        	model.setValue("/root/main/issinfo/emrapplist["+i+"]/orddd",orddd);
		        }
		
	        }
            model.makeValue("/root/send/savedata/emrapplist"   ,grd_emrapplist.getUpdateData());
        }else if(model.getValue("/root/main/appinfo/copyinfo/status") == "u"){
            if (model.getValue("/root/main/appinfo/copyinfo/emrappcopies") == "0"
            || model.getValue("/root/main/appinfo/copyinfo/emrappcopies") == ""  ){
            model.makeValue("/root/send/savedata/copyinfo/emrappcopies", "1" );}
		    if(model.getValue("/root/main/appinfo/copyinfo/issgoaletccd") == "99"){	// 사본발행목적이 기타일 경우
		         model.makeValue("/root/send/savedata/copyinfo/issgoaletccd" ,model.getValue("/root/main/appinfo/copyinfo/issgoaletccd"));
			     model.makeValue("/root/send/savedata/copyinfo/issgoaletcnm" ,model.getValue("/root/main/appinfo/copyinfo/issgoaletcnm"));
		         model.makeValue("/root/send/savedata/copyinfo/issgoalcd"    ,model.getValue("/root/main/appinfo/copyinfo/issgoaletccd"));
			     model.makeValue("/root/send/savedata/copyinfo/issgoalnm"    ,model.getValue("/root/main/appinfo/copyinfo/issgoaletcnm"));   
		    }else{
			     model.makeValue("/root/send/savedata/copyinfo/issgoaletc"   ,model.getValue("/root/main/appinfo/copyinfo/issgoaletc"));
			     model.makeValue("/root/send/savedata/copyinfo/issgoaletccd" ,model.getValue("/root/main/appinfo/copyinfo/issgoaletccd"));
			     model.makeValue("/root/send/savedata/copyinfo/issgoalcd"    ,model.getValue("/root/main/appinfo/copyinfo/issgoaletccd"));
			     model.makeValue("/root/send/savedata/copyinfo/issgoalnm"    ,model.getValue("/root/main/appinfo/copyinfo/issgoaletcnm"));
		    }
            if(model.getValue("/root/main/appinfo/copyinfo/appmanflag")=="9"){
                model.makeValue("/root/send/savedata/copyinfo/appmanflag" ,model.getValue("/root/main/appinfo/copyinfo/appmanflag"));
                model.makeValue("/root/send/savedata/copyinfo/appmannm"  ,rdo_appmanflag.label);
                model.makeValue("/root/send/savedata/copyinfo/appmannm"  ,ipt_appmannm.currentText);
            }else{                                               
                model.makeValue("/root/send/savedata/copyinfo/appmanflag" ,model.getValue("/root/main/appinfo/copyinfo/appmanflag"));
                model.makeValue("/root/send/savedata/copyinfo/appmannm"  ,rdo_appmanflag.label);
            }
            model.makeValue("/root/send/savedata/copyinfo/delivefact"     ,model.getValue("/root/main/appinfo/copyinfo/delivefact"));
            model.makeValue("/root/send/savedata/copyinfo/trustyn"        ,model.getValue("/root/main/appinfo/copyinfo/trustyn"));
            model.makeValue("/root/send/savedata/copyinfo/copyseqno"      ,model.getValue("/root/main/appinfo/copyinfo/copyseqno"));
            model.makeValue("/root/send/savedata/copyinfo/emrordflag"     ,model.getValue("/root/main/appinfo/copyinfo/emrordflag"));
            model.makeValue("/root/send/savedata/copyinfo/emrorddeptcd "  ,model.getValue("/root/main/appinfo/copyinfo/emrorddeptcd"));
            model.makeValue("/root/send/savedata/copyinfo/status"         ,model.getValue("/root/main/appinfo/copyinfo/status"));
	        	model.makeValue("/root/send/savedata/copyinfo/pid"            ,model.getValue("/root/temp/appinfo/patinfo/pid"));
            model.makeValue("/root/send/savedata/copyinfo/appdd"          ,getCurrentDate());
	        	model.makeValue("/root/send/savedata/copyinfo/orddd"          ,model.getValue("/root/main/appinfo/copyinfo/orddd"));
            model.makeValue("/root/send/savedata/copyinfo/cretno"         ,model.getValue("/root/main/appinfo/copyinfo/cretno"));
            model.makeValue("/root/send/savedata/copyinfo/appdeptcd"      ,model.getValue("/root/temp/appinfo/patinfo/appdeptcd"));
            model.makeValue("/root/send/savedata/copyinfo/appdrid"        ,model.getValue("/root/temp/appinfo/patinfo/appamanid"));
            model.makeValue("/root/send/savedata/copyinfo/copyseqno"      ,model.getValue("/root/main/appinfo/copyinfo/copyseqno"));
            grd_emrapplist.clearStatus();  
            for(var i = grd_emrapplist.fixedrows; i < grd_emrapplist.rows; i++)
            {   
                grd_emrapplist.addStatus(i, "update");
		        var ioflag 	= model.getValue("/root/main/issinfo/emrapplist["+i+"]/ioflag");
		        var orddd 	= model.getValue("/root/main/issinfo/emrapplist["+i+"]/orddd");
		        var indd 	= model.getValue("/root/main/issinfo/emrapplist["+i+"]/indd");
		        if(orddd ==""){
		        	model.setValue("/root/main/issinfo/emrapplist["+i+"]/orddd",indd);
		        }else{
		        	model.setValue("/root/main/issinfo/emrapplist["+i+"]/orddd",orddd);
		        }
            }
            model.makeValue("/root/send/savedata/emrapplist"   ,grd_emrapplist.getUpdateData());
	    }
     if(submit("TXMRC01201")==true){
        messageBox("저장","I002");
          
     }else{
       mssageBox("저장을","E009");
      }
     model.close(); 
}
/**
 * @group  :
 * @ver    : 
 * @by     : 이창록 2008-08-29 
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : 의사화면에서 사본신청창 open시 통합기록조회 환자아이디랑 비교 함수 
 * @param  :
 * @return :pid= 통합기록조회에서 의 환자 아이디
 * @---------------------------------------------------
 */
function fGetCopyCmpPid(pid)
{		
    var spid    = model.getValue("/root/main/result/paminfo/list/pid");
    var orddd   = model.getValue("/root/main/result/paminfo/list/orddd");
    var indd    = model.getValue("/root/main/result/paminfo/list/indd");
    var hngnm   = model.getValue("/root/main/result/paminfo/list/hngnm");
    var sex     = model.getValue("/root/main/result/paminfo/list/sex");
    var age     = model.getValue("/root/main/result/paminfo/list/age");
    var cretno  = model.getValue("/root/main/result/paminfo/list/cretno");
        if(pid ==spid){
    	    model.setValue("/root/temp/appinfo/patinfo/pid"   ,pid);
    	    if((model.getValue("/root/main/result/paminfo/list/ioflag")=="O")||(model.getValue("/root/main/result/paminfo/list/ioflag")=="S")){
    	        model.setValue("/root/temp/appinfo/patinfo/orddd"   ,orddd);
                model.setValue("/root/temp/appinfo/patinfo/ioflag"  ,model.getValue("/root/main/result/paminfo/list/ioflag")); 
            }else{
                model.setValue("/root/temp/appinfo/patinfo/indd"    ,indd);
    	        model.setValue("/root/temp/appinfo/patinfo/ioflag"  ,model.getValue("/root/main/result/paminfo/list/ioflag"));   
            }
        	model.setValue("/root/temp/appinfo/patinfo/hngnm" ,hngnm);	
            model.setValue("/root/temp/appinfo/patinfo/cretno",model.getValue("/root/main/result/paminfo/list/cretno"));   
        }else if(pid!=spid){
            messageBox("환자정보가","E004");
            return;
        } 
    var userinfo = getUserInfo("dutplcecd"); 
	    var userid   = getUserId();
	    userid = userid.getTrim(); 
        	if(userinfo == "3230000000"){
        	    	cmb_emrorddeptcd.disabled   = false;
                cmb_orddrid.disabled        = false;
                zsdfGetInOutOrdDeptList(getUserInfo("dutplceinstcd"),"/root/init/deptlist","depthngnm","asc");//전체 진료과
                cmb_emrorddeptcd.refresh();   
        	}else{
                zsdfGetInOutOrdDeptList(getUserInfo("dutplceinstcd"),"/root/init/deptlist","depthngnm","asc");//전체 진료과
        	    	model.setValue("/root/temp/appinfo/patinfo/appdeptcd",getUserInfo("dutplcecd"));
        	     	cmb_emrorddeptcd.refresh(); 
        	    	zsufGetOrdDeptDoctorList("none", getUserInfo("dutplceinstcd"), cmb_emrorddeptcd.value, "/root/init/userinfo/userlist", "usernm", "asc");//해당 주치의
        	    	model.setValue("/root/temp/appinfo/patinfo/appmanid",userid);  
        	    	cmb_orddrid.refresh(); 
            }	
   fHistSearch();
   model.refresh();
}
/**
 * @group  :
 * @ver    : 
 * @by     : 이창록 2008-08-29 
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : 외래 종이 차트 조회
 * @param  :s
 * @return :
 * @---------------------------------------------------
 */
function fPaperList()
{  
    if(model.getValue("/root/temp/appinfo/patinfo/appdeptcd")==""){
        messageBox("진료과를 먼저 선택","I008");   
        return;
    }
    if(model.getValue("/root/temp/appinfo/patinfo/appmanid")==""){
        messageBox("주치의를 선택","I008");   
        return; 
    }
    
    var iFndRow2 = grd_emrapplist.findRow(rdo_outchrtflag.value, 0, parseInt(grd_emrapplist.colRef("formcd")), "true", "true");//중복 서식 check
    if(iFndRow2>0){
        messageBox("이미 신청하신 종이차트","I009");
        return;
    }else{
        grd_emrapplist.additem();
        model.makeValue("/root/main/issinfo/emrapplist["+grd_emrapplist.row+"]/chrtflag"     ,"P");
        model.makeValue("/root/main/issinfo/emrapplist["+grd_emrapplist.row+"]/ioflag"		 ,"O");
        model.makeValue("/root/main/issinfo/emrapplist["+grd_emrapplist.row+"]/pid"		 	 ,model.getValue("/root/temp/appinfo/patinfo/pid"));
        
        model.makeValue("/root/main/issinfo/emrapplist["+grd_emrapplist.row+"]/orddeptnm"    ,cmb_emrorddeptcd.label);
        model.makeValue("/root/main/issinfo/emrapplist["+grd_emrapplist.row+"]/orddeptcd"    ,cmb_emrorddeptcd.value);
        model.makeValue("/root/main/issinfo/emrapplist["+grd_emrapplist.row+"]/atdoctnm"     ,cmb_orddrid.label);
        model.makeValue("/root/main/issinfo/emrapplist["+grd_emrapplist.row+"]/atdoctid"     ,cmb_orddrid.value);
        model.makeValue("/root/main/issinfo/emrapplist["+grd_emrapplist.row+"]/formnm"       ,rdo_outchrtflag.label);
        model.makeValue("/root/main/issinfo/emrapplist["+grd_emrapplist.row+"]/formcd"       ,rdo_outchrtflag.value);  	           
        model.removeNodeset("/root/init/tmp/ioflag");
        model.makeValue("/root/init/tmp/ioflag","O");
    }
    grd_emrapplist.colDisabled(grd_emrapplist.colRef("chrtflag"))=true;
    grd_emrapplist.colDisabled(grd_emrapplist.colRef("ioflag"))=true;
    grd_emrapplist.refresh();
}

/**
 * @group  :
 * @ver    : 
 * @by     : 이창록 2008-08-29 
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   :  회차별 입원 차트 조회
 * @param  :
 * @return :
 * @---------------------------------------------------
 */
function fEMRChrtList()
{
    //test=""10612189""
    model.makeValue("/root/send/search/pid"         ,model.getValue("/root/temp/appinfo/patinfo/pid"));
    //model.makeValue("/root/send/search/pid"         ,"10612189");
    model.makeValue("/root/send/search/orddd"       ,model.getValue("/root/main/copypatinfo/patinfolist/indg"));
    var indd = model.getValue("/root/main/copypatinfo/patinfolist/indg")
    model.makeValue("/root/send/search/cretno"      ,model.getValue("/root/hidden/copypatinfo/patinfolist[indd='"+indd+"']/cretno"));
    model.makeValue("/root/send/search/deptcd"      ,model.getValue("/root/hidden/copypatinfo/patinfolist[indd='"+indd+"']/orddeptcd"));
    model.makeValue("/root/send/search/chrtflag"    ,"A");
    model.removeNodeset("/root/main/emrinfo/emrlist");
    if (submit("TRMRC01203", false) == true)
    {
        addComboItem("cmb_formcd","전체", "-", "below");
        cmb_formcd.value="-";    
    }
    model.refresh() 
    model.removeNodeset("/root/send/search");
} 

/**
 * @group  :
 * @ver    : 
 * @by     : 이창록 2008-08-29 
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   :  회차별 입원 차트 사본 신청 
 * @param  :
 * @return :
 * @---------------------------------------------------
 */
 function fEMRChrtListSelect()
{     
    if(model.getValue("/root/temp/appinfo/patinfo/appdeptcd")==""){
        messageBox("진료과를 먼저 선택","I008");   
        return;
    }
    if(model.getValue("/root/temp/appinfo/patinfo/appmanid")==""){
        messageBox("주치의를 선택","I008");
        return;
    } 
    if(cmb_indg.value==""){
        messageBox("입원 회차를","C002");
        return;
        model.setFocus("cmb_indg");
    }
    //var formcd = model.getValue("/root/main/copypatinfo/patinfolist/formcd");
    //var reckeyno = model.getValue("/root/main/emrinfo/emrlist[formcd='"+formcd+"']/reckeyno");
    //var iFndRow1 = grd_emrapplist.findRow(reckeyno, 0, parseInt(grd_emrapplist.colRef("reckeyno")), "true", "true");//중복 서식 check
    //var iFndRow2 = grd_emrapplist.findRow(formcd, 0 , parseInt(grd_emrapplist.colRef("formcd")), "true", "true");//중복 서식 check
    var formcd = "";
    var reckeyno = "";
    var duplFlag = false;

    if(cmb_formcd.value !="-"){
        formcd = model.getValue("/root/main/copypatinfo/patinfolist/formcd");
        reckeyno = model.getValue("/root/main/emrinfo/emrlist[formcd='"+formcd+"']/reckeyno");
        //if((iFndRow1>0)&&(iFndRow2>0)){
            //var Formcd = model.getValue("/root/main/emrinfo/emrlist/formnm");
            //messageBox(Formcd+"은(는) 이미 신청하신 서식지","I009");
        for(var rowcnt = 0; rowcnt < grd_emrapplist.rows; rowcnt++){
            if((model.getValue("/root/main/issinfo/emrapplist["+ rowcnt + "]/reckeyno") == reckeyno) && (model.getValue("/root/main/issinfo/emrapplist["+ rowcnt + "]/formcd") == formcd)){
                duplFlag = true;
                break;
            } else {
                duplFlag = false;
            }
        }
        if((duplFlag)){
        }else{
            grd_emrapplist.additem();
            model.makeValue("/root/main/issinfo/emrapplist["+grd_emrapplist.row+"]/formcd"   ,model.getValue("/root/main/copypatinfo/patinfolist/formcd"));
            var formcd = model.getValue("/root/main/copypatinfo/patinfolist/formcd");
            model.makeValue("/root/main/issinfo/emrapplist["+grd_emrapplist.row+"]/formnm"   ,model.getValue("/root/main/emrinfo/emrlist[formcd='"+formcd+"']/formnm"));
            model.makeValue("/root/main/issinfo/emrapplist["+grd_emrapplist.row+"]/chrtflag" ,model.getValue("/root/main/emrinfo/emrlist[formcd='"+formcd+"']/chrtflag"));
            model.makeValue("/root/main/issinfo/emrapplist["+grd_emrapplist.row+"]/formrecdt",model.getValue("/root/main/emrinfo/emrlist[formcd='"+formcd+"']/formrecdt"));        
            model.makeValue("/root/main/issinfo/emrapplist["+grd_emrapplist.row+"]/reckeyno" ,model.getValue("/root/main/emrinfo/emrlist[formcd='"+formcd+"']/reckeyno"));        
            model.makeValue("/root/main/issinfo/emrapplist["+grd_emrapplist.row+"]/ioflag"   ,"I");
            model.makeValue("/root/main/issinfo/emrapplist["+grd_emrapplist.row+"]/indd"     ,model.getValue("/root/main/copypatinfo/patinfolist/indg"));
            var indd = model.getValue("/root/main/copypatinfo/patinfolist/indg")
            model.makeValue("/root/main/issinfo/emrapplist["+grd_emrapplist.row+"]/dschdd"   ,model.getValue("/root/hidden/copypatinfo/patinfolist[indd='"+indd+"']/dschdd"));
            model.makeValue("/root/main/issinfo/emrapplist["+grd_emrapplist.row+"]/orddeptcd",model.getValue("/root/main/emrinfo/emrlist[formcd='"+formcd+"']/formrecdeptcd"));
            model.makeValue("/root/main/issinfo/emrapplist["+grd_emrapplist.row+"]/orddeptnm",model.getValue("/root/main/emrinfo/emrlist[formcd='"+formcd+"']/formrecdeptnm"));
            model.makeValue("/root/main/issinfo/emrapplist["+grd_emrapplist.row+"]/atdoctnm" ,model.getValue("/root/main/emrinfo/emrlist[formcd='"+formcd+"']/formrecusernm"));
            model.makeValue("/root/main/issinfo/emrapplist["+grd_emrapplist.row+"]/atdoctid" ,model.getValue("/root/main/emrinfo/emrlist[formcd='"+formcd+"']/formrecuserid"));
            //20090225 이창록 추가
            model.makeValue("/root/main/issinfo/emrapplist["+grd_emrapplist.row+"]/cretno"   ,model.getValue("/root/hidden/copypatinfo/patinfolist[indd='"+indd+"']/cretno"));
            model.makeValue("/root/main/issinfo/emrapplist["+grd_emrapplist.row+"]/pid"      ,model.getValue("/root/temp/appinfo/patinfo/pid"));
            grd_emrapplist.refresh();
            duplFlag = false;
        }
    }else if(cmb_formcd.value=="-"){
        if(getNodesetCnt(model,"/root/main/emrinfo/emrlist")-1 > 0){
            for(var i=1;i<=getNodesetCnt(model,"/root/main/emrinfo/emrlist")-1;i++){
                reckeyno = model.getValue("/root/main/emrinfo/emrlist["+i+"]/reckeyno");
                formcd = model.getValue("/root/main/emrinfo/emrlist["+i+"]/formcd");
                //var keyno 	= grd_emrapplist.valueMatrix (i,grd_emrapplist.colRef("reckeyno"));
                //var sFormcd = grd_emrapplist.valueMatrix(i,grd_emrapplist.colRef("formcd"));
                for(var rowcnt = 0; rowcnt < grd_emrapplist.rows; rowcnt++){
                    if((model.getValue("/root/main/issinfo/emrapplist["+ rowcnt + "]/reckeyno") == reckeyno) && (model.getValue("/root/main/issinfo/emrapplist["+ rowcnt + "]/formcd") == formcd)){
                        duplFlag = true;
                        break;
                    } else {
                        duplFlag = false;
                    }
                }
                if((duplFlag)){
                    //messageBox(sFormnm+"은(는) 이미 신청하신 서식지","I009");
                }else{
                    grd_emrapplist.additem();
                    model.makeValue("/root/main/issinfo/emrapplist["+grd_emrapplist.row+"]/formcd"   ,model.getValue("/root/main/emrinfo/emrlist["+i+"]/formcd"));
                    var formcd = model.getValue("/root/main/copypatinfo/patinfolist/formcd");
                    model.makeValue("/root/main/issinfo/emrapplist["+grd_emrapplist.row+"]/formnm"   ,model.getValue("/root/main/emrinfo/emrlist["+i+"]/formnm"));
                    model.makeValue("/root/main/issinfo/emrapplist["+grd_emrapplist.row+"]/chrtflag" ,model.getValue("/root/main/emrinfo/emrlist["+i+"]/chrtflag"));
                    model.makeValue("/root/main/issinfo/emrapplist["+grd_emrapplist.row+"]/formrecdt",model.getValue("/root/main/emrinfo/emrlist["+i+"]/formrecdt")); 
                    model.makeValue("/root/main/issinfo/emrapplist["+grd_emrapplist.row+"]/reckeyno" ,model.getValue("/root/main/emrinfo/emrlist["+i+"]/reckeyno"));         
                    model.makeValue("/root/main/issinfo/emrapplist["+grd_emrapplist.row+"]/ioflag"   ,"I");
                    model.makeValue("/root/main/issinfo/emrapplist["+grd_emrapplist.row+"]/indd"     ,cmb_indg.value);
                    var indd = model.getValue("/root/main/copypatinfo/patinfolist/indg")
                    model.makeValue("/root/main/issinfo/emrapplist["+grd_emrapplist.row+"]/dschdd"   ,model.getValue("/root/hidden/copypatinfo/patinfolist[indd='"+indd+"']/dschdd"));
                    model.makeValue("/root/main/issinfo/emrapplist["+grd_emrapplist.row+"]/orddeptcd",model.getValue("/root/main/emrinfo/emrlist["+i+"]/formrecdeptcd"));
                    model.makeValue("/root/main/issinfo/emrapplist["+grd_emrapplist.row+"]/orddeptnm",model.getValue("/root/main/emrinfo/emrlist["+i+"]/formrecdeptnm"));
                    model.makeValue("/root/main/issinfo/emrapplist["+grd_emrapplist.row+"]/atdoctnm" ,model.getValue("/root/main/emrinfo/emrlist["+i+"]/formrecusernm"));
                    model.makeValue("/root/main/issinfo/emrapplist["+grd_emrapplist.row+"]/atdoctid" ,model.getValue("/root/main/emrinfo/emrlist["+i+"]/formrecuserid"));
                    //20090225 이창록 추가
                    model.makeValue("/root/main/issinfo/emrapplist["+grd_emrapplist.row+"]/cretno"   ,model.getValue("/root/hidden/copypatinfo/patinfolist[indd='"+indd+"']/cretno"));
                    model.makeValue("/root/main/issinfo/emrapplist["+grd_emrapplist.row+"]/pid"   ,model.getValue("/root/temp/appinfo/patinfo/pid"));
                    grd_emrapplist.refresh();
                    duplFlag = false;
                }
            }
        }else{
            messageBox("신청할 서식이","I004"); 
            return;
        }
        grd_emrapplist.colDisabled(grd_emrapplist.colRef("chrtflag"))=true;
        grd_emrapplist.colDisabled(grd_emrapplist.colRef("ioflag"))=true;              
    }
}
/**
 * @group  :
 * @ver    : 
 * @by     : 이창록 2008-08-29 
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : 초기화 버튼
 * @param  :
 * @return :
 * @---------------------------------------------------
 */
function fAppCopyInfoClear(){     
    
        model.resetInstanceNode("/root/send");
        model.resetInstanceNode("/root/main/appinfo");
        model.removeNodeset("/root/main/issinfo/emrapplist");
        model.resetInstanceNode("/root/result");
        model.removeNodeset("/root/main/ordinfo/ordlist");
        model.removeNodeset("/root/main/emrinfo/emrlist");
        rdo_appmanflag.disabled  = false;
        rdo_trustyn.disabled     = false;
        btn_save.disabled        = false;
        btn_issgoal.disabled     = false;
        btn_update.disabled      = true;
        model.makeValue("/root/main/appinfo/copyinfo/status","");
        model.refresh();  
}
/**
 * @group  :
 * @ver    : 
 * @by     : 이창록 2008-08-29 
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : 신청인에 따른 위임장유뮤 변경
 * @param  :
 * @return :
 * @---------------------------------------------------
 */
function fAppManNmSetting()
{       
        if(model.getValue("/root/main/appinfo/copyinfo/appmanflag")!="9"){
            ipt_appmannm.disabled = true;
            ipt_appmannm.value = "";
            var appmanflag = model.getValue("/root/main/appinfo/copyinfo/appmanflag");
            if(appmanflag=="1"){
                rdo_trustyn.value="N";
                rdo_trustyn.refresh();
            }else{
                rdo_trustyn.value="Y";
                rdo_trustyn.refresh();
            }
        }else{
            ipt_appmannm.disabled = false;
        }
     ipt_appmannm.refresh();
}
/**
 * @group  :
 * @ver    : 
 * @by     : 이창록 2008-08-29 
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : 상단정보 없을시 통합기록조회에서 환자 정보 불러오기
 * @param  :
 * @return :  keyparam=pid▦hngnm▦sex▦age▩//parameter
 * @---------------------------------------------------
 */
function fEnterPatinfo(keyparam)
{		
     var param = keyparam.split("▦");
     var spid    = model.getValue("/root/main/result/paminfo/list/pid");
     if(param!=""){
        if(getUserInfo("dutplcecd")!="3230000000"){
            if(spid!=param[0]){
                messageBox("사본신청은 진료중인 환자에 대해서만 신청이 가능합니다.\n등록번호를 상단 환자등록번호와 일치시켜서","C003");
                return;
            }
        }
        model.makeValue("/root/temp/appinfo/patinfo/pid"             ,param[0]);
        model.makeValue("/root/temp/appinfo/patinfo/hngnm"           ,param[1]);
        model.makeValue("/root/temp/appinfo/patinfo/sex"             ,param[2]);
        if(param[3].length ==2){
            model.makeValue("/root/temp/appinfo/patinfo/age"          ,param[3].substring(0,1));  
        }else if(param[3].length==3){
            model.makeValue("/root/temp/appinfo/patinfo/age"          ,param[3].substring(0,2));  
        }
        var userinfo = getUserInfo("dutplcecd"); 
    	    var userid   = getUserId();
    	    userid = userid.getTrim(); 
        	if(userinfo == "3230000000"){
        	    model.removeNodeset("/root/init/deptlist");
        	    model.makeNode("/root/init/deptlist"); 
        	    cmb_emrorddeptcd.disabled   = false;
                cmb_orddrid.disabled        = false;
                zsdfGetInOutOrdDeptList(getUserInfo("dutplceinstcd"),"/root/init/deptlist","depthngnm","asc");//전체 진료과
                cmb_emrorddeptcd.refresh();   
        	}else{
        	    model.removeNodeset("/root/init/deptlist");
        	    model.makeNode("/root/init/deptlist"); 
                zsdfGetInOutOrdDeptList(getUserInfo("dutplceinstcd"),"/root/init/deptlist","depthngnm","asc");//전체 진료과
        	    cmb_emrorddeptcd.refresh(); 
        	    model.setValue("/root/temp/appinfo/patinfo/appdeptcd",getUserInfo("dutplcecd"));
        	    zsufGetOrdDeptDoctorList("none", getUserInfo("dutplceinstcd"), cmb_emrorddeptcd.value, "/root/init/userinfo/userlist", "usernm", "asc");//해당 주치의
        	    model.setValue("/root/temp/appinfo/patinfo/appmanid",userid);  
        	    cmb_orddrid.refresh(); 
            }
        rdo_appmanflag.refresh();
        // rdo_trustyn.refresh();
        ipt_issgoalnm.refresh();
        rdo_outchrtflag.refresh();
        txt_delivefact.refresh();
        rdo_appmanflag.disabled  = false;
        rdo_trustyn.disabled     = false;
        btn_save.disabled        = false;
        btn_issgoal.disabled     = false;
        btn_update.disabled      = true;   	
        model.removeNodeset("/root/main/emrinfo/emrlist");
        model.removeNodeset("/root/main/issinfo/emrapplist");
        fHistSearch();
        fCopyPatInfoList();
        model.refresh();
    }
}    
 
/**
 * @group  :
 * @ver    : 
 * @by     : 이창록 2008-08-29 
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : 사본발행 재신청된 정보저장
 * @param  :
 * @return :
 * @---------------------------------------------------
 */   
function fReCopyAppInfoSave()
{
    model.removeNodeset("/root/send/savedata"); 
    if(model.getValue("/root/temp/appinfo/patinfo/appdeptcd")==""){
        messageBox("진료과를 먼저 선택","I008");   
        return;
    }
    if(model.getValue("/root/temp/appinfo/patinfo/appmanid")==""){
        messageBox("신청의사를 선택","I008");     
        return;
    } 
	
	if (model.getValue("/root/main/appinfo/copyinfo/appmanflag") == ""){
        model.setFocus("rdo_appmanflag");
        messageBox("사본발행 신청인을", "C001");
        return;
    }

    if (model.getValue("/root/main/appinfo/copyinfo/trustyn") == ""){
        model.setFocus("rdo_trustyn");
        messageBox("위임장/인감증명서 유무를", "C001");
        return;
    }

    if (model.getValue("/root/main/appinfo/copyinfo/issgoaletc") == ""){
        model.setFocus("ipt_issgoalnm");
        messageBox("사본발행목적을", "C001");
        return;
    }
	var userinfo = getUserInfo("dutplcecd"); 
    if(userinfo == "3230000000"){
        model.setValue("/root/main/appinfo/copyinfo/status","");
        model.setValue("/root/temp/appinfo/patinfo/cretno","");
    }else{
        model.setValue("/root/main/appinfo/copyinfo/status","I");
    }
	// 신청부서 1부 default
	if (model.getValue("/root/main/appinfo/copyinfo/emrappcopies") == "0"
	|| model.getValue("/root/main/appinfo/copyinfo/emrappcopies") == ""  ){
	model.makeValue("/root/send/savedata/copyinfo/emrappcopies", "1" );
	}
		  if(userinfo == "3230000000"){
		     if(model.getValue("/root/temp/appinfo/patinfo/cretno") == ""){
	        	model.removeNodeset("/root/send/savedata/otptinfo");
				model.makeValue("/root/send/savedata/otptinfo/otpt_flag","I");	// 구분자
				model.makeValue("/root/send/savedata/otptinfo/otpt_pid",model.getValue("/root/temp/appinfo/patinfo/pid"));	// 등록번호
				model.makeValue("/root/send/savedata/otptinfo/otpt_orddd",getCurrentDate());	// 진료일자
				model.makeValue("/root/send/savedata/otptinfo/otpt_orddeptcd", model.getValue("/root/temp/appinfo/patinfo/appdeptcd"));	// 진료과
				model.makeValue("/root/send/savedata/otptinfo/otpt_orddrid", model.getValue("/root/temp/appinfo/patinfo/appmanid"));	// 진료의사
				model.makeValue("/root/send/savedata/otptinfo/otpt_ordtm",getCurrentTime());	// 진료시간
				model.makeValue("/root/send/savedata/otptinfo/otpt_rsrvflag","4");	// 예약구분
				model.makeValue("/root/send/savedata/otptinfo/otpt_instcd",getUserInfo("dutplceinstcd"));	// 기관코드
				model.makeValue("/root/send/savedata/otptinfo/otpt_remfact", "");	// 참고사항
				model.makeValue("/root/send/savedata/otptinfo/sess_userid",getUserInfo("userid"));	// 사용자ID	
				model.makeValue("/root/send/savedata/otptinfo/otpt_medamtestmyn", "N"); // 진찰료산정여부
				model.makeValue("/root/send/savedata/otptinfo/otpt_medamtpostyn", "Y"); // 진찰료후불여부
				model.makeValue("/root/send/savedata/otptinfo/otpt_medamtfreeresn", "10"); // 진찰료미산정사유
		    	}
			}
            model.makeValue("/root/send/savedata/copyinfo/status", "i");
            model.makeValue("/root/send/savedata/copyinfo/pid"           ,model.getValue("/root/temp/appinfo/patinfo/pid"));
            model.makeValue("/root/send/savedata/copyinfo/appdd"         ,getCurrentDate());
        if(model.getValue("/root/main/appinfo/copyinfo/appmanflag")=="9"){
            model.makeValue("/root/send/savedata/copyinfo/appmanflag"    ,model.getValue("/root/main/appinfo/copyinfo/appmanflag"));
            model.makeValue("/root/send/savedata/copyinfo/appmannm"      ,rdo_appmanflag.label);
            model.makeValue("/root/send/savedata/copyinfo/appmanetc"     ,ipt_appmannm.currentText);
        }else{
            model.makeValue("/root/send/savedata/copyinfo/appmanflag"    ,model.getValue("/root/main/appinfo/copyinfo/appmanflag"));
            model.makeValue("/root/send/savedata/copyinfo/appmannm"      ,rdo_appmanflag.label);
        }
            model.makeValue("/root/send/savedata/copyinfo/trustyn"       ,model.getValue("/root/main/appinfo/copyinfo/trustyn"));
        if(model.getValue("/root/main/appinfo/copyinfo/issgoaletccd") == "99"){	// 사본발행목적이 기타일 경우
             model.makeValue("/root/send/savedata/copyinfo/issgoaletccd" ,model.getValue("/root/main/appinfo/copyinfo/issgoaletccd"));
             model.makeValue("/root/send/savedata/copyinfo/issgoaletcnm" ,model.getValue("/root/main/appinfo/copyinfo/issgoaletcnm"));
             model.makeValue("/root/send/savedata/copyinfo/issgoalcd"    ,model.getValue("/root/main/appinfo/copyinfo/issgoaletccd"));
			 model.makeValue("/root/send/savedata/copyinfo/issgoalnm"    ,model.getValue("/root/main/appinfo/copyinfo/issgoaletcnm"));
        }else{
             model.makeValue("/root/send/savedata/copyinfo/issgoaletc"   ,model.getValue("/root/main/appinfo/copyinfo/issgoaletc"))
             model.makeValue("/root/send/savedata/copyinfo/issgoaletccd" ,model.getValue("/root/main/appinfo/copyinfo/issgoaletccd"));
             model.makeValue("/root/send/savedata/copyinfo/issgoalcd"    ,model.getValue("/root/main/appinfo/copyinfo/issgoaletccd"));
			 model.makeValue("/root/send/savedata/copyinfo/issgoalnm"    ,model.getValue("/root/main/appinfo/copyinfo/issgoaletcnm"));
        }
            model.makeValue("/root/send/savedata/copyinfo/delivefact"    ,model.getValue("/root/main/appinfo/copyinfo/delivefact"));
            if((model.getValue("/root/temp/appinfo/patinfo/ioflag")=="O")||(model.getValue("/root/temp/appinfo/patinfo/ioflag")=="S")){
                model.makeValue("/root/send/savedata/copyinfo/orddd"     ,model.getValue("/root/temp/appinfo/patinfo/orddd"));
            }else{
                model.makeValue("/root/send/savedata/copyinfo/orddd"     ,model.getValue("/root/temp/appinfo/patinfo/indd"));
            }
            if(userinfo != "3230000000"){
            	var cretno = model.getValue("/root/temp/appinfo/patinfo/cretno");
            	if(cretno ==""){
            	var cretno = model.getValue("/root/main/apphist/applist/cretno");
            	  model.makeValue("/root/send/savedata/copyinfo/cretno"        ,cretno);
            	}else{
            	  model.makeValue("/root/send/savedata/copyinfo/cretno"        ,model.getValue("/root/temp/appinfo/patinfo/cretno"));
            	}
        	}else if(userinfo == "3230000000"){
            	model.makeValue("/root/send/savedata/copyinfo/cretno"        	,model.getValue("/root/temp/appinfo/patinfo/cretno"));
        	}
            if(model.getValue("/root/init/tmp/ioflag")=="O"){
                model.makeValue("/root/send/savedata/copyinfo/emrordflag"    	,"O");
            }else{
                model.makeValue("/root/send/savedata/copyinfo/emrordflag"    	,"I");
            }
            model.makeValue("/root/send/savedata/copyinfo/emrorddeptcd"  ,model.getValue("/root/temp/appinfo/patinfo/appdeptcd"));
            model.makeValue("/root/send/savedata/copyinfo/appdeptcd"     ,getUserInfo("dutplcecd"));
            model.makeValue("/root/send/savedata/copyinfo/appdrid"       ,model.getValue("/root/temp/appinfo/patinfo/appmanid"));
            grd_emrapplist.clearStatus();  
	       	for(var i = grd_emrapplist.fixedrows; i < grd_emrapplist.rows; i++)
	       	{	
		       	grd_emrapplist.addStatus(i, "insert");
				var ioflag 	= model.getValue("/root/main/issinfo/emrapplist["+i+"]/ioflag");
		        var orddd 	= model.getValue("/root/main/issinfo/emrapplist["+i+"]/orddd");
		        var indd 	= model.getValue("/root/main/issinfo/emrapplist["+i+"]/indd");
		        if(orddd ==""){
		        	model.setValue("/root/main/issinfo/emrapplist["+i+"]/orddd",indd);
		        }else{
		        	model.setValue("/root/main/issinfo/emrapplist["+i+"]/orddd",orddd);
		        }
	       }
           model.makeValue("/root/send/savedata/emrapplist"   ,grd_emrapplist.getUpdateData());
     	var hRow = grd_apphist.row - grd_apphist.fixedRows +1
	 	var IssNo = model.getValue("/root/main/apphist/applist["+hRow+"]/issno");
	if(IssNo!=""){  
	    var Msg= messageBox("한번 발행한 사본입니다.그래도 재신청을","Q004");
	    if(Msg=="6"){
            if(submit("TXMRC01201")==true){
                messageBox("재신청이","I002");  
            }else{
                mssageBox("재신청이","E009");
            } 
            window.close();
	    }else if(Msg=="7"){
	      model.removeNodeset("/root/send/savedata");   
	      fAppCopyInfoClear();
	      return;  
	    }
	}else{
	    var Msg= messageBox("신청된 사본입니다 그래도 재신청을","Q004");
        if(Msg=="6"){
            if(submit("TXMRC01201")==true){
                messageBox("재신청이","I002");  
            }else{
                messageBox("재신청이","E009");
            } 
            window.close();
        }else if(Msg=="7"){
          model.removeNodeset("/root/send/savedata");   
	      fAppCopyInfoClear();
	      return;    
        }
	}  
}


/**
 * @group  :
 * @ver    : 
 * @by     : 이창록 2008-08-29 
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : 체크박스 선택시 전달사항에 전달
 * @param  :
 * @return :
 * @---------------------------------------------------
 */  
 function fSendChkLabelText(label)
{
        model.setValue("/root/main/appinfo/copyinfo/delivefact",txt_delivefact.currentText+label);     
        txt_delivefact.refresh();  
}
/**
 * @group  :
 * @ver    : 
 * @by     : 이창록 2008-08-29 
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : 통합뷰어 창 close 시 사본신청 창 close
 * @param  :
 * @return :
 * @---------------------------------------------------
 */  
function fCopyInfoClose()
{
    window.close();
}
/**
 * @group  :
 * @ver    : 
 * @by     : 이창록 2008-08-29 
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : 서식신청이 없을 시 메세지 
 * @param  :
 * @return :
 * @---------------------------------------------------
 */  
function fSaveExcp()
{
       var msg = messageBox("사본 신청된 내역이 없습니다\n"+"검사 결과에 대해서만 사본신청을","Q004"
       ,"\n(검사결과 신청내용은 텍스트로 전달사항에 기재해주세요)");
       if(msg=="6"){
         fCopySave();
       }else if(msg=="7"){
        messageBox("사본신청 취소가","I001");
        return;
       } 
}

function fBfAppformInfo()
{
        model.makeValue("/root/send/search/pid"				,model.getValue("/root/temp/appinfo/patinfo/pid"));
	    	model.makeValue("/root/send/search/copyseqno"	, model.getValue("/root/main/apphist/applist[" +grd_apphist.row+ "]/copyseqno"));
	    	model.makeValue("/root/send/search/srchflag"	,"Y");
        if (submit("TRMRC01102", false) == true)
        {    
        	
        }
        else
        {
        	messageBox("조회를", "E009");
        }    
        model.refresh();
        model.removeNodeset("/root/send/search");
}