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

    진료 - 사본발급관리( SMMRC01100_사본발급관리.xrw - JScript )

      - Version :
          1)  : Ver.1.00.01
	

  - ▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩
**/
/**
 * @group  :
 * @ver    : 
 * @by     : 이은영    수정->이창록 2008-08-29 
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : 화면 초기화 
 * @param  :
 * @return : 
 * @---------------------------------------------------
 */
function fInit()
{
	zsdfGetInOutOrdDeptList(getUserInfo("dutplceinstcd"), "/root/init/deptlist", "depthngnm", "asc");//전체 진료과 조회
	// 공통코드 목록 가져오기
	zbcfGetCodeList(new Array("P0001", "M0332", "M0333", "M0011"), 
	new Array("/root/init/ioflag", "/root/init/issgoalcd", "/root/init/issscopcd", "/root/init/prcpstatcd") , true);
	model.makenode("/root/send/reqdata");
	mmbfGetHardCodeInfo("/root/send/reqdata","/root/hidden/calcscorcd", 77); //의무기록사본발행수가코드
	
	// KNUH_20101207_박성호_start_의무기록 부서코드 가져오기
	mmbfGetHardCodeInfo("/root/send/reqdata", "/root/hidden/deptcd", 5501);	
	// KNUH_20101207_박성호_end
	
	model.removeNode("/root/send/reqdata");
	model.resetInstanceNode("/root/send/cond");
	model.removeNodeset("/root/main/isshist/isslist");
	
	model.resetInstanceNode("/root/main/issinfo/copyinfo");
	model.removeNodeset("/root/main/issinfo/emrapplist");
	model.removeNodeset("/root/main/issinfo/rcptlist");
	
	//fDisabled(true);
	
	//상단 환자 정보 가져오기
	var node = getGlobalVariable("paminfo");
	setCSVToNode("/root/main/paminfo", node);
	
	//상단 정보 있는지 유무 체크	    
	if(node != "")
	{
	    model.setValue("/root/send/cond/pid", model.getValue("/root/main/paminfo/list/pid"));
	    //inputEnterKey("btn_pat", "DOMActivate");
	}
	
	// 오늘 날짜로 세팅
    var currentdate = getCurrentDate();
    //20080908 이창록 신청일자 시작일자 오늘 날짜로 변경 
	model.setValue("/root/send/cond/fromdd" , currentdate);
	model.setValue("/root/send/cond/todd"   , currentdate);
    model.setValue("/root/send/cond/prcsflag","N");
    fHistSearch();
    
	model.refresh();
}

// 초기화
function fClearView(){
	model.resetInstanceNode("/root/send/cond");
	model.resetInstanceNode("/root/main/issinfo/copyinfo");
	model.removeNodeset("/root/main/issinfo/emrapplist");
	model.removeNodeset("/root/main/issinfo/rcptlist");
	// 오늘 날짜로 세팅
	var currentdate = getCurrentDate();
    model.setValue("/root/send/cond/fromdd", currentdate.substr(0, 6) + "01");
	model.setValue("/root/send/cond/todd", currentdate);
	model.setValue("/root/send/cond/prcsflag","N");
	model.refresh();
}

// 환자찾기 Popup
function fPatPopUp(pFlag)
{
	if(pFlag == "1"){
    	model.makeValue("/root/temp/patcond/pid",     model.getValue("/root/send/cond/pid"));
    }else if(pFlag == "2"){
    	model.makeValue("/root/temp/patcond/hngnm",     model.getValue("/root/send/cond/hngnm"));
    }else if(pFlag == "3"){
    	model.makeValue("/root/temp/patcond/rrgstno1",     model.getValue("/root/send/cond/rrgstno1"));
    	model.makeValue("/root/temp/patcond/rrgstno2",     model.getValue("/root/send/cond/rrgstno2"));
    }
    model.makeValue("/root/temp/patcond/srchcond",pFlag);
    model.makeValue("/root/temp/patcond/autoflag","Y");  

    modal("SPPMC02500", 1,10, 10, "SPPMC02500", "/root/temp/patcond", "/root/send");
    
    model.resetInstanceNode("/root/main/patient/patinfolist");
    //model.resetInstanceNode("/root/send/cond");
    model.setValue("/root/send/cond/pid", model.getValue("/root/main/patinfo/patinfolist/pid"));
    model.setValue("/root/send/cond/hngnm", model.getValue("/root/main/patinfo/patinfolist/hngnm"));
		model.setValue("/root/send/cond/rrgstno1", model.getValue("/root/main/patinfo/patinfolist/rrgstno1"));
		model.setValue("/root/send/cond/rrgstno2", model.getValue("/root/main/patinfo/patinfolist/rrgstno2"));
	
	fHistSearch();
	
	model.refresh();

}

// 이전내역조회
function fHistSearch()
{
    // reqGetCopyIssHist
    // getCopyIssHist
    //model.resetInstanceNode("/root/main/issinfo/copyinfo");
    //model.removeNodeset("/root/main/issinfo/emrapplist");
    //model.removenode("/root/main/issinfo/rcptlist");
    //model.removeNodeset("/root/main/issinfo/rcptlist");
    if (submit("TRMRC01101",false) == true)
			{
				grd_isshist.rebuild();
				grd_isshist.rebuildStyle();
				setRowStyle("grd_isshist","0","입원","ioflagnm");
		  } 	
			else
			{
				messageBox("조회를", "E009");
			}
		   grd_isshist.rebuild();
}

// 신청정보 상세조회
function fIssSearch()
{ 
    if (grd_isshist.rows<= 1) return;
	if (grd_isshist.row < 1) return;
	
	var lrow = grd_isshist.row;
	var RecPrcpCd = model.getValue("/root/hidden/calcscorcd/hardcd/hardcd");//의무기록 사본발행 수가코드
	model.makeValue("/root/send/search/pid", model.getValue("/root/main/isshist/isslist[" + lrow + "]/pid"));
	model.makeValue("/root/send/search/copyseqno", model.getValue("/root/main/isshist/isslist[" + lrow + "]/copyseqno"));
	//model.removeNodeset("/root/main/issinfo/emrapplist");
	
	// reqGetCopyIssDetailInfo
	// getCopyIssInfo : 발행정보
	// getPaperScopCd : 종이서식범위
	// getCopyEmrAppList : emr서식
	// getCopyRcptList : 수가 
	if(model.getValue("/root/main/isshist/isslist[" + lrow + "]/unprepyn") == "Y"){
		messageBox("환자의 기록이 미완결","I009");	
	}	
	grd_rcptlist.clearStatus();
	if (submit("TRMRC01102", false) == true)
	{
	    //fDisabled(false);
//	    fAppManNmSetting("S");
//	    fIssGoalNmSetting();
	    model.setValue("/root/main/issinfo/copyinfo/status", "u");
	    model.refresh();
	    var issgoalcd = model.getValue("/root/main/issinfo/copyinfo/issgoalcd");
		if(grd_rcptlist.rows == grd_rcptlist.fixedrows){
			grd_rcptlist.additem();	
			var currentdate = getCurrentDate();
			var lrow = grd_rcptlist.rows - grd_rcptlist.fixedrows;			
			// 06: 직할병원 - 수가코드(HCDD001)
			if(issgoalcd == "06"){
				model.setValue("/root/main/issinfo/rcptlist[" + lrow + "]/calcscorcd", "HCDD001");
        		model.setValue("/root/main/issinfo/rcptlist[" + lrow + "]/calcscornm", "의무기록사본발행(CMC 의사)");
        		// 처방코드(임시로 수가코드로 함)
        		model.setValue("/root/main/issinfo/rcptlist[" + lrow + "]/prcpcd", "HCDD001");
			}else{ // 다른 목적 : 수가코드(HCDD027) ->200원짜리 수가코드로 (HCDD030) 변경 이창록
				// 20090413 하드코딩된 의무기록사본발행수가코드 하드코드 테이블로 변경
				model.setValue("/root/main/issinfo/rcptlist[" + lrow + "]/calcscorcd",RecPrcpCd);
        		model.setValue("/root/main/issinfo/rcptlist[" + lrow + "]/calcscornm", "의무기록사본발행");
        		// 처방코드(임시로 수가코드로 함)
        		// 20090413 하드코딩된 의무기록사본발행수가코드 하드코드 테이블로 변경
        		model.setValue("/root/main/issinfo/rcptlist[" + lrow + "]/prcpcd", RecPrcpCd);
			}
			
        	model.setValue("/root/main/issinfo/rcptlist[" + lrow + "]/unitcost", model.getValue("/root/temp/picmmech/picmmech_unitcost"));
			
			if (model.getValue("/root/main/issinfo/copyinfo/ioflag") == "O")
	        {
	            model.setValue("/root/main/issinfo/rcptlist[" + lrow + "]/prcpdd", model.getValue("/root/main/issinfo/copyinfo/orddd"));
	        }
	        model.setValue("/root/main/issinfo/rcptlist[" + lrow + "]/prcpdd"	, currentdate);
	        model.setValue("/root/main/issinfo/rcptlist[" + lrow + "]/prcpno"	, "0");
	        model.setValue("/root/main/issinfo/rcptlist[" + lrow + "]/prcphistno", "0");
	        model.setValue("/root/main/issinfo/rcptlist[" + lrow + "]/pid"		, model.getValue("/root/main/issinfo/copyinfo/pid"));
	        model.setValue("/root/main/issinfo/rcptlist[" + lrow + "]/orddd"	, model.getValue("/root/main/issinfo/copyinfo/orddd"));
	        model.setValue("/root/main/issinfo/rcptlist[" + lrow + "]/cretno"	, model.getValue("/root/main/issinfo/copyinfo/cretno"));
	        model.setValue("/root/main/issinfo/rcptlist[" + lrow + "]/shtno"	, "1");
	        model.setValue("/root/main/issinfo/rcptlist[" + lrow + "]/oldshtno"	, "1");
	        model.setValue("/root/main/issinfo/rcptlist[" + lrow + "]/prcpqty"	, "1");
	        model.setValue("/root/main/issinfo/rcptlist[" + lrow + "]/prcptims"	, model.getValue("/root/main/issinfo/copyinfo/emrappcopies"));
	        model.setValue("/root/main/issinfo/rcptlist[" + lrow + "]/copyseqno", model.getValue("/root/main/issinfo/copyinfo/copyseqno"));
	        
        	grd_rcptlist.addStatus(lrow, "insert");
        	btn_delete.disabled = false;
        	btn_delete.refresh();
		}else{
			var shtno = 0;
			var iFindRow =0;
			var RowCnt = 0;
			var lrow = 0;
			var currentdate = "";
			for(var iRow = grd_rcptlist.fixedrows; iRow <= (grd_rcptlist.rows-grd_rcptlist.fixedrows); iRow++){
				if(model.getValue("/root/main/issinfo/copyinfo/emrappcopies") != model.getValue("/root/main/issinfo/rcptlist[" + iRow + "]/prcptims")){
					model.setValue("/root/main/issinfo/rcptlist[" + iRow + "]/prcptims", model.getValue("/root/main/issinfo/copyinfo/emrappcopies"));
					grd_rcptlist.rowStatus(iRow) = 2;
				} 
			}
			// 직할병원
			if(issgoalcd == "06"){
				iFindRow = grd_rcptlist.findRow("HCDD001",0,2);
				if(iFindRow < 1){
					for(var iRow = grd_rcptlist.fixedrows; iRow <= (grd_rcptlist.rows-grd_rcptlist.fixedrows); iRow++){
						grd_rcptlist.rowStatus(iRow) = 4;
						grd_rcptlist.isReadOnly(iRow,4) = true;
						shtno += eval(model.getValue("/root/main/issinfo/rcptlist["+iRow+"]/shtno"));
					}					
					RowCnt = 1;
				}
			}else{// 그외 목적
				iFindRow = grd_rcptlist.findRow(RecPrcpCd,0,2);
				if(iFindRow < 1){
					for(var iRow = grd_rcptlist.fixedrows; iRow<= (grd_rcptlist.rows-grd_rcptlist.fixedrows); iRow++){
						grd_rcptlist.rowStatus(iRow) = 4;
						grd_rcptlist.isReadOnly(iRow,4) = true;
						shtno += eval(model.getValue("/root/main/issinfo/rcptlist["+iRow+"]/shtno"));
					}
					if(shtno > 10){
						RowCnt = 2;
					}else{
						RowCnt = 1;	
					}
					
	        	}
			}
			if(iFindRow < 1){
				for(var iRow = 1; iRow <= RowCnt; iRow++){
					grd_rcptlist.additem();	
					currentdate = getCurrentDate();
					lrow = grd_rcptlist.rows - grd_rcptlist.fixedrows;
					if(issgoalcd == "06"){
						model.setValue("/root/main/issinfo/rcptlist[" + lrow + "]/calcscorcd", "HCDD001");
	        			model.setValue("/root/main/issinfo/rcptlist[" + lrow + "]/calcscornm", "의무기록사본발행(CMC 의사)");
	        			// 처방코드(임시로 수가코드로 함)
	        			model.setValue("/root/main/issinfo/rcptlist[" + lrow + "]/prcpcd", "HCDD001");		
	        			model.setValue("/root/main/issinfo/rcptlist[" + lrow + "]/unitcost", model.getValue("/root/temp/picmmech/picmmech_unitcost"));
					}else{
						if(iRow == 1){
							model.setValue("/root/main/issinfo/rcptlist[" + lrow + "]/calcscorcd", RecPrcpCd);
			        		model.setValue("/root/main/issinfo/rcptlist[" + lrow + "]/calcscornm", "의무기록사본발행");
			        		// 처방코드(임시로 수가코드로 함)
			        		model.setValue("/root/main/issinfo/rcptlist[" + lrow + "]/prcpcd", RecPrcpCd);
			        		model.setValue("/root/main/issinfo/rcptlist[" + lrow + "]/unitcost", model.getValue("/root/temp/picmmech/picmmech_unitcost"));
			        	}else if(iRow == 2){
							model.setValue("/root/main/issinfo/rcptlist[" + lrow + "]/calcscorcd", "HCDD030");
		       				model.setValue("/root/main/issinfo/rcptlist[" + lrow + "]/calcscornm", "의무기록복사(추가한매당)");
		       				// 처방코드(임시로 수가코드로 함)
		        			model.setValue("/root/main/issinfo/rcptlist[" + lrow + "]/prcpcd", "HCDD030");
		        			model.setValue("/root/main/issinfo/rcptlist[" + lrow + "]/unitcost", "");			        		
			        	}
					}
					
				
					if (model.getValue("/root/main/issinfo/copyinfo/ioflag") == "O")
			        {
			            model.setValue("/root/main/issinfo/rcptlist[" + lrow + "]/prcpdd", model.getValue("/root/main/issinfo/copyinfo/orddd"));
			        }
			        model.setValue("/root/main/issinfo/rcptlist[" + lrow + "]/prcpdd", currentdate);
			        model.setValue("/root/main/issinfo/rcptlist[" + lrow + "]/prcpno", "0");
			        model.setValue("/root/main/issinfo/rcptlist[" + lrow + "]/prcphistno", "0");
			        
			        model.setValue("/root/main/issinfo/rcptlist[" + lrow + "]/pid", model.getValue("/root/main/issinfo/copyinfo/pid"));
			        model.setValue("/root/main/issinfo/rcptlist[" + lrow + "]/orddd", model.getValue("/root/main/issinfo/copyinfo/orddd"));
			        model.setValue("/root/main/issinfo/rcptlist[" + lrow + "]/cretno", model.getValue("/root/main/issinfo/copyinfo/cretno"));
			        if(RowCnt == 1){
				        model.setValue("/root/main/issinfo/rcptlist[" + lrow + "]/shtno", shtno);
				        model.setValue("/root/main/issinfo/rcptlist[" + lrow + "]/oldshtno", shtno);
				        if(issgoalcd == "06"){
				        	model.setValue("/root/main/issinfo/rcptlist[" + lrow + "]/prcpqty", shtno);
				        }else{
				        	model.setValue("/root/main/issinfo/rcptlist[" + lrow + "]/prcpqty", "1");
				        }
				    }else{	// 직할병원을 제외한 목적의 경우로 매수가 10매 이상인 경우
				    	if(iRow == 1){	// 수가코드 (HCDD027) 처리
					        model.setValue("/root/main/issinfo/rcptlist[" + lrow + "]/shtno", "10");
					        model.setValue("/root/main/issinfo/rcptlist[" + lrow + "]/oldshtno", "10");
					        model.setValue("/root/main/issinfo/rcptlist[" + lrow + "]/prcpqty", "1");
				    		
				    	}else if(iRow == 2){	// 수가코드(HCDD030) 처리
					        model.setValue("/root/main/issinfo/rcptlist[" + lrow + "]/shtno", (shtno-10));
					        model.setValue("/root/main/issinfo/rcptlist[" + lrow + "]/oldshtno", (shtno-10));
					        model.setValue("/root/main/issinfo/rcptlist[" + lrow + "]/prcpqty", (shtno-10));				    		
				    	}
				    }
				   
			        model.setValue("/root/main/issinfo/rcptlist[" + lrow + "]/prcptims", model.getValue("/root/main/issinfo/copyinfo/emrappcopies"));
			        model.setValue("/root/main/issinfo/rcptlist[" + lrow + "]/copyseqno", model.getValue("/root/main/issinfo/copyinfo/copyseqno"));
	        
        			grd_rcptlist.addStatus(lrow, "insert");
        		}
			}
			 //2008-10-24 이창록 수정 부수가 0이면 defalut 으로 1로 셋팅 
			if(model.getValue("/root/main/issinfo/copyinfo/emrappcopies")==0){
				model.setValue("/root/main/issinfo/copyinfo/emrappcopies",1);
				ipt_emrappcopies.refresh();
				fChangedAppCopies();
			}
			btn_delete.disabled = true;
			btn_delete.refresh();
		}
		
	}
	else
	{
		messageBox("조회를", "E009");
	}
	//model.refresh();
}

// 수가추가 버튼
function fRcptPopUp()
{
        
    model.removeNodeset("/root/temp");
    model.makeValue("/root/temp", "HCDD");
    modal("SMPIC00200", 1,10, 10, "SMPIC00200", "/root/temp", "/root/temp");   
    var currentdate = getCurrentDate();
    
    if (model.instances(0).selectNodes("/root/temp/picmmech").length > 0 )
    {
        grd_rcptlist.additem();
        
        var lrow = grd_rcptlist.rows - 1;
        
        model.setValue("/root/main/issinfo/rcptlist[" + lrow + "]/calcscorcd", model.getValue("/root/temp/picmmech/picmmech_calcscorcd"));
        model.setValue("/root/main/issinfo/rcptlist[" + lrow + "]/calcscornm", model.getValue("/root/temp/picmmech/picmmech_hngnm"));
        model.setValue("/root/main/issinfo/rcptlist[" + lrow + "]/unitcost", model.getValue("/root/temp/picmmech/picmmech_unitcost"));
                                                                                      
        if (model.getValue("/root/main/issinfo/copyinfo/ioflag") == "O")
        {
            model.setValue("/root/main/issinfo/rcptlist[" + lrow + "]/prcpdd", model.getValue("/root/main/issinfo/copyinfo/orddd"));
        }
        model.setValue("/root/main/issinfo/rcptlist[" + lrow + "]/prcpdd", currentdate);
        model.setValue("/root/main/issinfo/rcptlist[" + lrow + "]/prcpno", "0");
        model.setValue("/root/main/issinfo/rcptlist[" + lrow + "]/prcphistno", "0");
        
        model.setValue("/root/main/issinfo/rcptlist[" + lrow + "]/pid", model.getValue("/root/main/issinfo/copyinfo/pid"));
        model.setValue("/root/main/issinfo/rcptlist[" + lrow + "]/orddd", model.getValue("/root/main/issinfo/copyinfo/orddd"));
        model.setValue("/root/main/issinfo/rcptlist[" + lrow + "]/cretno", model.getValue("/root/main/issinfo/copyinfo/cretno"));
        model.setValue("/root/main/issinfo/rcptlist[" + lrow + "]/shtno", "1");
        model.setValue("/root/main/issinfo/rcptlist[" + lrow + "]/oldshtno", "1");
        
        // 처방코드(임시로 수가코드로 함)
        model.setValue("/root/main/issinfo/rcptlist[" + lrow + "]/prcpcd", model.getValue("/root/temp/picmmech/picmmech_calcscorcd"));
         
        
        grd_rcptlist.addStatus(lrow, "insert");
    }
}

// 수가삭제 버튼
function fRcptRowDel(){
	if (grd_rcptlist.rows <= 1) return;
	grd_rcptlist.deleteItem(grd_rcptlist.row);
}

// 발행목적 팝업 조회
function fIssGoalPopUp(pIssGoalNMPath, pIssGoalCDPath){
	var sIssUsge = "";
	var sIssUsgeCnt = 0;
	var sIssGoalEtc = "";
	var sIssGoalEtcCd = "";
	setParameter("SPMMR02200_usage", "");
	
	setParameter("SPMMR02200_multichkyn", "N");
	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);			
			sIssGoalEtcCd += getArrayData(sIssUsge, i, 0);
		}
		model.setValue(pIssGoalNMPath, sIssGoalEtc);
		model.setValue(pIssGoalCDPath, sIssGoalEtcCd);
	}
	model.refresh();
}

// 저장
function fSave()
{
        
    model.makeNode("/root/send/savedata/copyinfo");
    model.makeNode("/root/send/savedata/emrapplist");
    model.makeNode("/root/send/savedata/rcptlist");
    var iIssHistRow = grd_isshist.row;
    var sIssNo = model.getValue("/root/main/isshist/isslist["+iIssHistRow+"]/issno");
    // 신청정보
    if (model.getValue("/root/main/issinfo/copyinfo/appmanflag") == "9")
    {
        model.setValue("/root/main/issinfo/copyinfo/appmannm", ipt_appmannm.currentText);
    }
      
    // 사본목적
    if(model.getValue("/root/main/issinfo/copyinfo/issgoaletccd") == "99"){
    	model.setValue("/root/main/issinfo/copyinfo/issgoalnm", model.getValue("/root/main/issinfo/copyinfo/issgoaletcnm"));
    }else{
    	model.setValue("/root/main/issinfo/copyinfo/issgoalnm", model.getValue("/root/main/issinfo/copyinfo/issgoaletc"));
    }
    model.setValue("/root/main/issinfo/copyinfo/issgoalcd", model.getValue("/root/main/issinfo/copyinfo/issgoaletccd"));
    
    model.copyNode("/root/send/savedata/copyinfo", "/root/main/issinfo/copyinfo");
    
    // emr서식정보
    model.setValue("/root/send/savedata/emrapplist", grd_emrapplist.getUpdateData());
           
    // 수가처방
    model.setValue("/root/send/savedata/rcptlist", grd_rcptlist.getUpdateData());
    
    var sCopySeqNo = model.getValue("/root/main/issinfo/copyinfo/copyseqno");
    var sEMRAppCopies = model.getValue("/root/main/issinfo/copyinfo/emrappcopies");
    if (submit("TXMRC01101", false) == true)
	{
	    grd_emrapplist.clearStatus();
	    grd_rcptlist.clearStatus();
	    if(model.getValue("/root/send/cond/prcsflag") == "N"){
	    	model.setValue("/root/send/cond/prcsflag","Y");
	    }
		fHistSearch();
		var iRow = grd_isshist.findRow(sCopySeqNo,1,19);
		grd_isshist.row = iRow;
		fIssSearch();
		model.refresh();
		// 신규로 발행번호 발생시 출력.
		if(sIssNo == ""){
			fPrnt(); 
		}else if((sIssNo!="")&&(sEMRAppCopies!=0)){//2008-10-24 이창록 추가 수정(사본 반환후 다시 입력시출력 가능)
			fPrnt(); 
		}
		//2008-09-26 이창록 수정
			var iRow = grd_rcptlist.fixedrows;
			var iStatus = grd_rcptlist.rowstatus(iRow);
	    model.setValue("/root/send/cond/prcsflag","N");
	    cmb_prcsflag.refresh();
	    fHistSearch();
	    if(iStatus!=2){
	    	model.setValue("/root/main/issinfo/copyinfo/emrappcopies","");	
	   		ipt_emrappcopies.refresh();
	  	}
	}
	else
	{
		messageBox("저장에", "E009");
	}
    
}
// 삭제
function fDelete(){
	model.makeNode("/root/send/savedata/copyinfo");
	model.makeNode("/root/send/savedata/rcptlist");
	model.setValue("/root/main/issinfo/copyinfo/status","d");
	model.copyNode("/root/send/savedata/copyinfo", "/root/main/issinfo/copyinfo");
	var iStatus = 0;
	for(var iRow=grd_rcptlist.fixedrows; iRow<=grd_rcptlist.rows-grd_rcptlist.fixedrows; iRow++){
		iStatus = grd_rcptlist.rowStatus(iRow);
		if(iStatus != 1 && iStatus != 3){
			grd_rcptlist.rowStatus(iRow) = 4;
		}	
	}
	for(var iRow=grd_rcptlist.fixedrows; iRow<=grd_rcptlist.rows-grd_rcptlist.fixedrows; iRow++){
		iStatus = grd_rcptlist.rowStatus(iRow);
		if(iStatus == 1 || iStatus == 3){
			grd_rcptlist.deleteRow(iRow);
		}	
	}
	// 수가처방
    model.setValue("/root/send/savedata/rcptlist", grd_rcptlist.getUpdateData());
    
    if (submit("TXMRC01101", false) == true)
	{
	    grd_emrapplist.clearStatus();
	    grd_rcptlist.clearStatus();
	    
		fHistSearch();
	}
	else
	{
		messageBox("저장에", "E009");
	}
	model.refresh();
}
	
// 통합기록조회
function fViewer()
{
    if (grd_isshist.rows<= 1) return;
	if (grd_isshist.row < 1) return;
	var iRow = grd_emrapplist.row;

// 한 장출력에서 여러장 출력으로 변경 2008/07/28 나종천 수정
/*
    if (iRow < 1){
    	messageBox("출력할 서식을 ","C002");
    	return;	
    }

    var pid = model.getValue("/root/main/isshist/isslist/pid");
    var sChrtFlag = model.getValue("/root/main/issinfo/emrapplist["+iRow+"]/chrtflag");
    var msg = "";
    // 영상 or EMR
    if(sChrtFlag == "E"){
    	msg = sChrtFlag + "▦" + model.getValue("/root/main/issinfo/emrapplist["+iRow+"]/formrecseq") + "▦";	
		setParameter("SPMRI02400_prtrecinfo", msg); //oldflag▦signno▦
		modal("SPMRI02400");   
	}else if(sChrtFlag == "I"){
    	msg = sChrtFlag + "▦" + model.getValue("/root/main/issinfo/emrapplist["+iRow+"]/medirecno") + "▦";	
		setParameter("SPMRI02400_prtrecinfo", msg); //oldflag▦signno▦
		modal("SPMRI02400");   
		
	}
*/

    if(grd_emrapplist.findRow("E", 1, grd_emrapplist.colRef("chrtflag"), false, false) == -1 && grd_emrapplist.findRow("I", 1, grd_emrapplist.colRef("chrtflag"), false, false) == -1){
    	messageBox("출력할 EMR 서식이 ","I004");
    	return;	
    }

    var pid = model.getValue("/root/main/isshist/isslist/pid");
    var msg = "";
    var sChrtFlag = "";

    // 영상 or EMR
    for(var rowCnt = 1; rowCnt <= grd_emrapplist.rows; rowCnt++){
        sChrtFlag = model.getValue("/root/main/issinfo/emrapplist["+rowCnt+"]/chrtflag");
        if(sChrtFlag == "E"){
        	msg = msg + sChrtFlag + "▦" + model.getValue("/root/main/issinfo/emrapplist["+rowCnt+"]/reckeyno") + "▦" + model.getValue("/root/main/issinfo/emrapplist["+rowCnt+"]/formcd") + "▩";
	    }else if(sChrtFlag == "I"){
        	msg = msg + sChrtFlag + "▦" + model.getValue("/root/main/issinfo/emrapplist["+rowCnt+"]/reckeyno") + "▦" + model.getValue("/root/main/issinfo/emrapplist["+rowCnt+"]/formcd") + "▩";
		
	    }
	}
    setParameter("SPMRI02400_prtrecinfo", msg); //oldflag▦signno▦
    modal("SPMRI02400");
}


// 신청인 선택에 따른 신청인 명 셋팅
function fAppManNmSetting(pFlag)
{
    // 기타명 기타란 활성화
    
    if (model.getValue("/root/main/issinfo/copyinfo/appmanflag") != "9")
    //if (rdo_appmanflag.value != "9")
    {
        ipt_appmannm.disabled = true;
        ipt_appmannm.value = "";
        model.setValue("/root/main/issinfo/copyinfo/appmannm", rdo_appmanflag.label);
    }
    else
    {
        ipt_appmannm.disabled = false;
        ipt_appmannm.value = "";
    }
    // 위임장/인감증명서 유무
   /* if (model.getValue("/root/main/issinfo/copyinfo/appmanflag") == "1")
    //if (rdo_appmanflag.value == "1")
    {
        cmb_trustyn.disabled = true;
        if(pFlag != "S") cmb_trustyn.value = "N";
    }
    else
    {
        cmb_trustyn.disabled = false;
        if(pFlag != "S") cmb_trustyn.value = "Y";
    }*/
    
}

// 사본발행목적에 따른 목적명 셋팅
/*
function fIssGoalNmSetting()
{
    // 기타명 기타란 활성화
    if (model.getValue("/root/main/issinfo/copyinfo/issgoalcd") != "99")
    //if (cmb_issgoalcd.value != "99")
    {
        ipt_issgoalnm.disabled = true;
        ipt_issgoalnm.value = "";
        model.setValue("/root/main/issinfo/copyinfo/issgoalnm", cmb_issgoalcd.label);
    }
    else
    {
        ipt_issgoalnm.disabled = false;
        //ipt_issgoalnm.value = "";
    }
    
    //model.refresh();
    
}*/

// 그리드 열 변경
function fChangedGridRow(){
	var iRow = 	grd_rcptlist.row;
	var sShtNo= eval(model.getValue("/root/main/issinfo/rcptlist["+iRow+"]/shtno"));
	var sValue = 0;
	var sCalcScorCd = model.getValue("/root/main/issinfo/rcptlist["+iRow+"]/calcscorcd");
	var sExtraPrcpTims = 0;
	var currentdate = getCurrentDate();
	var iStatus = grd_rcptlist.rowStatus(iRow);
	if(iStatus == 2){
		if(model.getValue("/root/main/issinfo/rcptlist["+iRow+"]/shtno") == model.getValue("/root/main/issinfo/rcptlist["+iRow+"]/oldshtno")){
			grd_rcptlist.rowStatus(iRow) = 0;
		}
	}
	/*if(sCalcScorCd == "HCDD027"){
		if(sShtNo < 1){			
			messageBox("매수는","I003");
			model.setValue("/root/main/issinfo/rcptlist["+iRow+"]/shtno",model.getValue("/root/main/issinfo/rcptlist["+iRow+"]/oldshtno"));			
			if(iStatus == 2){
				grd_rcptlist.rowStatus(iRow) = 0;
			}
		}else if(sShtNo > 10){
			sValue = sShtNo - 10;
			model.setValue("/root/main/issinfo/rcptlist["+iRow+"]/shtno","10");
			if(model.getValue("/root/main/issinfo/rcptlist[calcscorcd ='HCDD030']/calcscorcd") == ""){
				grd_rcptlist.additem();	
				var lrow = grd_rcptlist.rows - 1;
				model.setValue("/root/main/issinfo/rcptlist[" + lrow + "]/calcscorcd", "HCDD030");
		        model.setValue("/root/main/issinfo/rcptlist[" + lrow + "]/calcscornm", "의무기록복사(추가한매당)");
		        model.setValue("/root/main/issinfo/rcptlist[" + lrow + "]/unitcost", "");
		                                                                                      
		        if (model.getValue("/root/main/issinfo/copyinfo/ioflag") == "O")
		        {
		            model.setValue("/root/main/issinfo/rcptlist[" + lrow + "]/prcpdd", model.getValue("/root/main/issinfo/copyinfo/orddd"));
		        }
		        model.setValue("/root/main/issinfo/rcptlist[" + lrow + "]/prcpdd", currentdate);
		        model.setValue("/root/main/issinfo/rcptlist[" + lrow + "]/prcpno", "0");
		        model.setValue("/root/main/issinfo/rcptlist[" + lrow + "]/prcphistno", "0");
		        
		        model.setValue("/root/main/issinfo/rcptlist[" + lrow + "]/pid", model.getValue("/root/main/issinfo/copyinfo/pid"));
		        model.setValue("/root/main/issinfo/rcptlist[" + lrow + "]/orddd", model.getValue("/root/main/issinfo/copyinfo/orddd"));
		        model.setValue("/root/main/issinfo/rcptlist[" + lrow + "]/cretno", model.getValue("/root/main/issinfo/copyinfo/cretno"));
		        model.setValue("/root/main/issinfo/rcptlist[" + lrow + "]/shtno", sValue);
		        model.setValue("/root/main/issinfo/rcptlist[" + lrow + "]/oldshtno", sValue);
		        model.setValue("/root/main/issinfo/rcptlist[" + lrow + "]/prcpqty", sValue);
		        model.setValue("/root/main/issinfo/rcptlist[" + lrow + "]/prcptims", model.getValue("/root/main/issinfo/copyinfo/emrappcopies"));
		        model.setValue("/root/main/issinfo/rcptlist[" + lrow + "]/copyseqno", model.getValue("/root/main/issinfo/copyinfo/copyseqno"));
		        model.setValue("/root/main/issinfo/rcptlist[" + lrow + "]/issno", model.getValue("/root/main/issinfo/rcptlist[" + iRow + "]/issno"));
		        // 처방코드(임시로 수가코드로 함)
		        model.setValue("/root/main/issinfo/rcptlist[" + lrow + "]/prcpcd", "HCDD030");
		         
		        
		        grd_rcptlist.addStatus(lrow, "insert");
			}else{
				var sExtraRow = grd_rcptlist.findRow("HCDD030", grd_rcptlist.fixedrows+1,2);
				var sExtraStatus = grd_rcptlist.rowStatus(sExtraRow);
				if(sExtraStatus != 1 && sExtraStatus != 3) grd_rcptlist.rowStatus(sExtraRow) = 2;
				model.setValue("/root/main/issinfo/rcptlist[calcscorcd ='HCDD030']/shtno", sValue);		
				model.setValue("/root/main/issinfo/rcptlist[calcscorcd ='HCDD030']/prcpqty", sValue);		
				
			}
		}else{
			var sExtraRow = grd_rcptlist.findRow("HCDD030", grd_rcptlist.fixedrows+1,2);
			var sExtraStatus = grd_rcptlist.rowStatus(sExtraRow);
			if(sExtraStatus == 1 || sExtraStatus == 3){
				grd_rcptlist.deleteRow(sExtraRow, true);
			}else{
				grd_rcptlist.rowStatus(sExtraRow) = 4;
			}
		}
	}*/if(sCalcScorCd == "HCDD001"){
		if(sShtNo < 1){
			messageBox("매수는","I003");
			model.setValue("/root/main/issinfo/rcptlist["+iRow+"]/shtno",model.getValue("/root/main/issinfo/rcptlist["+iRow+"]/oldshtno"));			
			if(iStatus == 2){
				grd_rcptlist.rowStatus(iRow) = 0;
			}
			sShtNo = model.getValue("/root/main/issinfo/rcptlist["+iRow+"]/oldshtno");		
		}
		if(sShtNo != model.getValue("/root/main/issinfo/rcptlist["+iRow+"]/prcpqty")){
			model.setValue("/root/main/issinfo/rcptlist["+iRow+"]/prcpqty", sShtNo);	
		}
	}else{	// 추가
		if(sShtNo < 1){
			var iStatus = grd_rcptlist.rowStatus(iRow);
			if(iStatus == 1 || iStatus == 3)
				grd_rcptlist.deleteRow(iRow, true);	
			else 
				grd_rcptlist.rowStatus(iRow) = 4;
		}else{
			if(sShtNo != model.getValue("/root/main/issinfo/rcptlist["+iRow+"]/prcpqty")){
				model.setValue("/root/main/issinfo/rcptlist["+iRow+"]/prcpqty", sShtNo);	
			}
		}
	}	
}


// 신청부수가 변경될 경우
function fChangedAppCopies(){
	var sEMRAppCopies = model.getValue("/root/main/issinfo/copyinfo/emrappcopies");
	var iPrcpTims = 0;
	var sShtNo = 0;
	var sOldShtNo = 0;
	var iStatus = 0;
	
	for(var iRow = grd_rcptlist.fixedrows; iRow <= grd_rcptlist.rows - grd_rcptlist.fixedrows; iRow++){
		iPrcpTims = model.getValue("/root/main/issinfo/rcptlist["+iRow+"]/oldprcptims");
		iStatus = grd_rcptlist.rowstatus(iRow);
		if(sEMRAppCopies != iPrcpTims){
			model.setValue("/root/main/issinfo/rcptlist["+iRow+"]/prcptims",sEMRAppCopies);
			if(iStatus == 0) grd_rcptlist.rowstatus(iRow) = 2;
		}else{
			sShtNo = model.getValue("/root/main/issinfo/rcptlist["+iRow+"]/shtno");
			sOldShtNo = model.getValue("/root/main/issinfo/rcptlist["+iRow+"]/oldshtno");
			if(sShtNo == sOldShtNo && iStatus == 2){
				grd_rcptlist.rowstatus(iRow) = 0;
			}
		}
	}
}
 
// 승락서/증명서 출력
function fPrnt(pFlag){
	var iRow = grd_isshist.row;
	var pid = model.getValue("/root/main/issinfo/copyinfo/pid");
	if(pid == ""){
		messageBox("환자를 먼저","C002");
		return;				
	}
	var issno = model.getValue("/root/main/isshist/isslist["+iRow+"]/issno");
	if(issno == "" ){
		messageBox("발행번호 부여 후에 출력","I006");
		return;	
	}	
	
	// 증명서
	if(pFlag == "crtfct" || pFlag == null){
		var sIssGoalCd = "";
		var sIssGoalNm = "";
		model.setValue("/root/temp/crtfctinfo/issno", issno);	// 발행번호
		model.setValue("/root/temp/crtfctinfo/pid", model.getValue("/root/main/isshist/isslist["+iRow+"]/pid"));
		model.setValue("/root/temp/crtfctinfo/hngnm", model.getValue("/root/main/isshist/isslist["+iRow+"]/hngnm"));
		sIssGoalCd = model.getValue("/root/main/issinfo/copyinfo/issgoalcd");
		sIssGoalNm = model.getValue("/root/main/issinfo/copyinfo/issgoalnm");	
		if(sIssGoalCd == "99"){	// 기타
			sIssGoalNm += "("+model.getValue("/root/main/issinfo/copyinfo/issgoaletcnm")+")";
		}
		model.setValue("/root/temp/crtfctinfo/issgoalnm", sIssGoalNm);
		model.setValue("/root/temp/crtfctinfo/totalcopies", model.getValue("/root/main/isshist/isslist["+iRow+"]/totalcopies"));
		model.setValue("/root/temp/crtfctinfo/issdd", model.getValue("/root/main/isshist/isslist["+iRow+"]/issdt").substr(0,8));
		model.setValue("/root/temp/crtfctinfo/issdd", model.getValue("/root/main/isshist/isslist["+iRow+"]/issdt").substr(0,8));
		model.setValue("/root/temp/crtfctinfo/hospnm", model.getValue("/root/main/issinfo/issbasinfolist/hospnm"));
		model.setValue("/root/temp/crtfctinfo/addr"  , model.getValue("/root/main/issinfo/issbasinfolist/addr"));
		model.makeValue("/root/temp/crtfctinfo/usernm", getUserInfo("usernm"));
		//2008-09-20 이창록 추가 (신청 부수만큼 증명서 출력) 
		var sEMRAppCopies = model.getValue("/root/main/issinfo/copyinfo/emrappcopies");
		exeReportPreview("RPMRC01100", "XMLSTR", "", "", "true", "", "", "", "", "true","","","","","",sEMRAppCopies);
		//exeReportPreview("RPMRC01100", "XMLSTR", "", "", "false", "", "", "", "", "true");
	}
	
	if(pFlag == "cnfm" || pFlag == null){	// 승락서
		var formnm = "";
		model.resetInstanceNode("/root/temp/cnfminfo/issinfo");
		model.setValue("/root/temp/cnfminfo/issinfo/pid", pid);
		model.setValue("/root/temp/cnfminfo/issinfo/issno", issno);
		model.setValue("/root/temp/cnfminfo/issinfo/orddeptnm", model.getValue("/root/main/isshist/isslist["+iRow+"]/orddeptnm"));
		model.setValue("/root/temp/cnfminfo/issinfo/atdoctnm", model.getValue("/root/main/isshist/isslist["+iRow+"]/atdoctnm"));
		model.setValue("/root/temp/cnfminfo/issinfo/hngnm", model.getValue("/root/main/isshist/isslist["+iRow+"]/hngnm"));
		model.setValue("/root/temp/cnfminfo/issinfo/rrgstno1", model.getValue("/root/main/isshist/isslist["+iRow+"]/rrgstno1"));
		model.setValue("/root/temp/cnfminfo/issinfo/rrgstno2", model.getValue("/root/main/isshist/isslist["+iRow+"]/rrgstno2"));
		model.setValue("/root/temp/cnfminfo/issinfo/totalcopies", model.getValue("/root/main/isshist/isslist["+iRow+"]/totalcopies"));
		model.setValue("/root/temp/cnfminfo/issinfo/issgoalcd", model.getValue("/root/main/isshist/isslist["+iRow+"]/issgoalcd"));
		model.setValue("/root/temp/cnfminfo/issinfo/issgoaletcnm", model.getValue("/root/main/issinfo/copyinfo/issgoaletcnm"));
		model.setValue("/root/temp/cnfminfo/issinfo/hospnm", model.getValue("/root/main/issinfo/issbasinfolist/hospnm"));
		var emrordflag = model.getValue("/root/main/issinfo/copyinfo/emrordflag");
		if (emrordflag.indexOf("O") >= 0 || emrordflag.indexOf("A") >= 0){
			model.setValue("/root/temp/cnfminfo/issinfo/outflag", "O");	
		}
		if (emrordflag.indexOf("I") >= 0 || emrordflag.indexOf("A") >= 0){
			model.setValue("/root/temp/cnfminfo/issinfo/inflag", "I");	
		}	
		if (emrordflag.indexOf("E") >= 0 || emrordflag.indexOf("A") >= 0){
			model.setValue("/root/temp/cnfminfo/issinfo/erflag", "E");	
		}	
		model.setValue("/root/temp/cnfminfo/issinfo/appdd", model.getValue("/root/main/isshist/isslist["+iRow+"]/appdt").substr(0,8));		
		model.setValue("/root/temp/cnfminfo/issinfo/issdd", model.getValue("/root/main/isshist/isslist["+iRow+"]/issdt").substr(0,8));
		for(var i = grd_emrapplist.fixedrows; i <= grd_emrapplist.rows - grd_emrapplist.fixedrows; i++){
			if(formnm != "") formnm += ",";
			if(model.getValue("/root/main/issinfo/emrapplist["+i+"]/chrtflag") == "P"){
				formnm += "종이차트("+model.getValue("/root/main/issinfo/emrapplist["+i+"]/formnm")+")";
			}else{
				formnm += model.getValue("/root/main/issinfo/emrapplist["+i+"]/formnm");
			}
		}
		model.setValue("/root/temp/cnfminfo/issinfo/formnm", formnm);
		var instcd = "";
		instcd = getUserInfo("dutplceinstcd");
		if( instcd == '031'){
			exeReportPreview("RPMRC01102", "XMLSTR", "", "", "true", "", "", "", "", "true");
		}else{
			exeReportPreview("RPMRC01101", "XMLSTR", "", "", "true", "", "", "", "", "true");
		}		
	}
}

// 사본신청 팝업 호출
function fPopUpIssApp(){
	var iRow = grd_isshist.row;
	if(iRow < 1){
		messageBox("환자를 먼저", "C002");
		 return;	
	}
	var cRow = grd_isshist.row - grd_isshist.fixedRows + 1;
	var IssNo = model.getValue("/root/main/isshist/isslist["+cRow+"]/issno");
	//이창록 수정2008-12-17 사용자 요구에 따라 의료정보팀이 아니면 발행번호 부여된 환자 수정 불가
	var userinfo = getUserInfo("dutplcecd");  
  	
  	// KNUH_20101207_박성호_start_의무기록 부서코드 가져오기
  	//if(userinfo != "3230000000"){
  	if(model.getValue("/root/hidden/deptcd/hardcd[hardcd='" + userinfo + "']/hardcd") != "")
	{
	// KNUH_20101207_박성호_end
  
		if(IssNo!=""){
		    messageBox("발행번호가 부여된 환자는 수정할 수","I004");
			return;
		}
	}  
	setParameter("SPMRC03000_copyparam", "");
	 var sParamMsg = "pid▦hngnm▦ioflag▦orddd▦cretno▦orddeptcd▦orddrid▩";
	 var sParamMsg = model.getValue("/root/main/isshist/isslist["+iRow+"]/pid")+"▦"
				+ model.getValue("/root/main/isshist/isslist["+iRow+"]/hngnm")+"▦"
				+ model.getValue("/root/main/isshist/isslist["+iRow+"]/ioflag")+"▦"
				+ model.getValue("/root/main/isshist/isslist["+iRow+"]/rrgstno2")+"▦"
				+ model.getValue("/root/main/isshist/isslist["+iRow+"]/orddd")+"▦"
				+ model.getValue("/root/main/isshist/isslist["+iRow+"]/cretno")+"▦"
				+ model.getValue("/root/main/isshist/isslist["+iRow+"]/orddeptcd")+"▦"
				+ model.getValue("/root/main/isshist/isslist["+iRow+"]/orddrid")+"▩";
	setParameter("SPMRC03100_copyparam",sParamMsg);
	open("SPMRC03200", 2, "", "", "", "", "", "left:1500; right:0; width:750; height:800;");
	setParameter("SMMRI00400_param_pid",model.getValue("/root/main/isshist/isslist["+iRow+"]/pid"));
	open("SMMRI00400", 1, "", "", "", "", "", "left:0; right:200; width:750; height:800;");      
	/*setParameter("SMMRC01200_Param", "");
	var sParamMsg = "pid▦hngnm▦ioflag▦orddd▦cretno▦orddeptcd▦orddrid▩";
	sParamMsg += model.getValue("/root/main/isshist/isslist["+iRow+"]/pid")+"▦"
				+ model.getValue("/root/main/isshist/isslist["+iRow+"]/hngnm")+"▦"
				+ model.getValue("/root/main/isshist/isslist["+iRow+"]/ioflag")+"▦"
				+ model.getValue("/root/main/isshist/isslist["+iRow+"]/orddd")+"▦"
				+ model.getValue("/root/main/isshist/isslist["+iRow+"]/cretno")+"▦"
				+ model.getValue("/root/main/isshist/isslist["+iRow+"]/orddeptcd")+"▦"
				+ model.getValue("/root/main/isshist/isslist["+iRow+"]/orddrid")+"▩";
	setParameter("SMMRC01200_Param",sParamMsg);
	modal("SMMRC01200");
    fHistSearch();
    model.refresh();*/
}

// 처방이력 팝업 호출
function fPopUpPrcpHist(){
	if(grd_isshist.row < 1){
		messageBox("환자를 먼저", "C002");
		return;	
	}
	var copyseqno = model.getValue("/root/main/issinfo/copyinfo/copyseqno");
	setParameter("SPMRC02400_Param", copyseqno);
	modal("SPMRC02400");
}

// 통합기록조회 호출
function fMedirecListCall(){
	if(grd_emrapplist.row < 1){
		alert("서식범위 신청내역에 환자 선택이 안 되었습니다.");
		return;
	}	
	var selRow = grd_isshist.row ;		
	var pid = model.getValue("/root/main/isshist/isslist[" + selRow + "]/pid");
	if(pid == ""){
		messageBox("통합기록조회를 검색할 환자를", "C002");
		return;
	}
	var wndobj = getOpenWindow("SMMRI00400");
	if(wndobj != null){
		setParameter("SMMRI00400_param_pid", pid);
		wndobj.javascript.fInitalize();
	}else{
		setParameter("SMMRI00400_param_pid", pid);
		open("SMMRI00400");
	}	
	
}

// 검사결과조회 호출 
function fExamRultListCall(){		
	if(grd_isshist.row < 1){
		alert("사본발급관리내역에 환자 선택이 안 되었습니다.");
		return;
	}
	
	var selRow = grd_isshist.row ;		
	var pid = model.getValue("/root/main/isshist/isslist[" + selRow + "]/pid");
	
	if(pid == ""){
		messageBox("검사결과조회 할 환자를", "C002");
		return;
	}	
	open("SMAER00800","","","","SMAER00800", "/root/main/isshist/isslist[" + selRow + "]/pid", "/root/send/data/singdata/srchpid");
}

/**
 * @group  :
 * @ver    : 
 * @by     : 이창록 2008-09-19 추가
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : 사본출력에서 출력된 매수 받기
 * @param  :
 * @return :parameter  = pagecurrent
 * @---------------------------------------------------
 */
function fGetShtNo(pageCurrent)
{
    var iRow = grd_rcptlist.row;
    model.makeValue("/root/main/issinfo/rcptlist["+iRow+"]/shtno",pageCurrent);   
    fChangedGridRow();
}
/**
 * @group  :
 * @ver    : 
 * @by     : 이창록 2008-09-19 추가
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : 발급제한 환자  제한 
 * @param  :
 * @return :
 * @---------------------------------------------------
 */
function fSaveExcp()
{
    var iIssHistRow = grd_isshist.row;
    var msg = messageBox("사본 발급 제한 사유 : "+ model.getValue("/root/main/isshist/isslist["+iIssHistRow+"]/limrem")
    		+"\n"+ model.getValue("/root/main/isshist/isslist["+iIssHistRow+"]/hngnm")+"환자는 사본발급 제한 환자입니다\n","Q002");
    if(msg=="6"){
        fSave();
    }else if(msg=="7"){
        return;
    }   
}