YNU_JEUS/app_home/himed/webapps/ast/pharmacyatcweb/js/SMADT00200.js

/**
 * ?? ?? ?? : SMADT00200.js
 * ??    ?? : ATC ???? ???? Javascriot
 * ?? ?? ?? : ??????
 * ?? ?? ?? : ??????
 * ???????? : 2007.5.07 / ???????? / ??????
 */

/**
 * ??????
 */
function fInit() {

	var ioflag = "";
	ioflag = getScreenMenuParameter();
	
	model.setValue("/root/hidden/srchinfo/srchflag1", ioflag);
	if(ioflag == "O") {
		model.setValue("/root/hidden/srchinfo/atcioflag", "1");
	} else if( ioflag == "I") {
		model.setValue("/root/hidden/srchinfo/atcioflag", "2");
	}
	
	radio2.dispatch("xforms-value-changed");
					
	success = submit("TRADT00103");
	//???? ??????
	model.setValue("/root/hidden/srchinfo/srchtrsmflag","N");		
	//model.setValue("/root/hidden/srchinfo/srchflag1", "O");
	model.setValue("/root/hidden/srchinfo/srchflag2", "");
	//grd_pat.colhidden(3) = true; //srchflag1? ????? ??column hidden
	
	//???? ??????
    var curDate = new Date();
    model.setValue("/root/hidden/srchinfo/startdd",   getCurrentDate());
    model.setValue("/root/hidden/srchinfo/enddd",   getCurrentDate());
    model.setValue("/root/hidden/srchinfo/starttm",  "0000");
    model.setValue("/root/hidden/srchinfo/endtm",   "2359");
    
    //???? KEY ??????
    model.setValue("/root/hidden/srchinfo/drugno", "");
    model.setValue("/root/hidden/srchinfo/wardcd", "");
    model.setValue("/root/hidden/srchinfo/pid", "");  
	model.setValue("/root/hidden/srchinfo/srchsumdd", getCurrentDate() );  

    //TEST - ???? ???? ???? ?????? 
    model.setValue("/root/send/suminfo/pid", "");     
    model.setValue("/root/send/suminfo/orddd", "");     
    model.setValue("/root/send/suminfo/cretno", "");     
    model.setValue("/root/send/suminfo/orddrid", "");     
    model.setValue("/root/send/suminfo/orddeptcd", "");     
    
    grd_prcplist.fixedcellcheckbox(0,1)=true;
    grd_pat.fixedcellcheckbox(0,0)=true;
	
	//???? Combo ????
	model.setValue("/root/send/deptinfo/deptflag", "W");     
	//success = submit("TRADT00210"); 
	//if (success) astfAddCombo("/root/hidden/deptlist","ward","wardcd,wardnm",",전체");
	//병동 Combo 조회  20110102 이선경 수정
	submit("TRADT10203"); 
	astfAddCombo("/root/hidden/deptlist", "ward", "wardcd,wardnm", "T,전체");
	
	
	// 의정부 atc출력순서
	var dutplceinstcd = getUserInfo("dutplceinstcd");
	if(dutplceinstcd == "013") {
		model.makeValue("/root/hidden/srchinfo/atc3", "Y");
	} else {
		model.makeValue("/root/hidden/srchinfo/atc3", "N");
	}

	//20101209 이선경 추가 : 정제 작은라벨(리스트형식) 출력시 ptp 함께 출력할지 여부
	submit("TRADT10207");
	
	//20110927_laboru_atc 입력화면 자동출력 여부	
	if(model.getValue("/root/init/sumprcpflagyn/flagyn/atcautoflag") == "Y") {		
		checkbox2.selected = true;
		model.setValue("root/hidden/autolbl","Y");
	} else {
		checkbox2.deselect(1);
	}
		
	//라벨 출력 형식 옵션
	submit("TRADT10208");

    //바코드프린터설정 초기화
	model.setValue("/root/send/scrnid", getScreenID());
	submit("TRLLC90101");
	
	var comm = model.getValue("/root/main/barcdprntsetup/prntsetupinfo/setupinfo/comm02/comm");
	var prntkind = model.getValue("/root/main/barcdprntsetup/prntsetupinfo/setupinfo/prntkind");
	if(comm == "2") {
		model.setValue("/root/main/barcdprntsetup/prntsetupinfo/setupinfo/comm02/comm", "1");
	}
	if(prntkind == "1") {
		model.setValue("/root/main/barcdprntsetup/prntsetupinfo/setupinfo/prntkind", "5");
	}

	//라벨그룹, 출력구분 항목 리스트 조회
	submit("TRADT00215");
	
	//라벨그룹, 출력구분 저장값 조회
	submit("TRADT00216");

    model.refresh();
}


/**
 *	ATC 환자리스트 조회
 */
function fPatListSrch() {
    
	model.removeNodeset("/root/main/pat/patlist");	
	model.removeNodeset("/root/main/prcp/prcplist");
	model.removeNodeset("/root/main/pat/memoinfo");
	model.removeNodeset("/root/main/prcp/patdata");	
	model.removeNodeset("/root/main/prcp/diagdata/diagnm");		
	
	model.refresh();

        
    model.copyNode("/root/send/srchinfo", "/root/hidden/srchinfo");
    submit("TRADT00213");

	grd_pat.fixedcellcheckbox(0,0)=true;        
    if ( grd_pat.rows >0) {
    	grd_pat.row =1;
    }
    
    if(model.getValue("/root/hidden/srchinfo/powdflag") != "Y"){
    	for(var i = 1; i <= getNodesetCount("/root/main/pat/patlist"); i++) {
		    if (model.getValue("/root/main/pat/patlist[" + i + "]/powdflag") == "Y" || model.getValue("/root/main/pat/patlist[" + i + "]/age") == "Y") {
				grd_pat.isReadOnly(i, grd_pat.colRef("sel"), i, grd_pat.colRef("powdflag")) = true;
		    } else {
		    	grd_pat.isReadOnly(i, grd_pat.colRef("sel"), i, grd_pat.colRef("powdflag")) = false;
		    }
		}    
    }
        
}

/**
 *	ATC 환자리스트 선택시 전송대상자료 표시
 */
function fATCPrcpData(rowid) {
		
    var pat_info;
    var irow = 0;
    
    if(rowid == "") {
    	irow = grd_pat.row;
    } else {
    	irow = rowid;
    }
        
	/* model.resetInstanceNode("/root/main/prcp/prcplist");
	grd_prcplist.refresh();	 */
	model.removeNodeset("/root/main/prcp/prcplist");
	model.removeNodeset("/root/main/pat/memoinfo");
	model.removeNodeset("/root/main/prcp/patdata");	
	model.removeNodeset("/root/main/prcp/diagdata/diagnm");		
	model.refresh();
	
	/* 
    	@ 용법코드 변경 옵션 여부 설정 - 20091107
    		- gv_mthdOpt 
    		- default : N 
    */
    gv_mthdOpt = model.getValue("/root/main/pat/patlist["+irow+"]/mthdopt");
		
    model.setValue("/root/send/prcpinfo/drugdd", model.getValue("/root/main/pat/patlist["+irow+"]/drugdd"));
    model.setValue("/root/send/prcpinfo/drugno", model.getValue("/root/main/pat/patlist["+irow+"]/drugno"));
    model.setValue("/root/send/prcpinfo/ioflag", model.getValue("/root/main/pat/patlist["+irow+"]/ioflag"));
    model.setValue("/root/send/prcpinfo/pid", model.getValue("/root/main/pat/patlist["+irow+"]/pid"));
    model.setValue("/root/send/prcpinfo/srchpid", model.getValue("/root/main/pat/patlist["+irow+"]/pid"));
    model.setValue("/root/send/prcpinfo/orddd", model.getValue("/root/main/pat/patlist["+irow+"]/orddd"));
    model.setValue("/root/send/prcpinfo/srchindd", model.getValue("/root/main/pat/patlist["+irow+"]/orddd"));    
    model.setValue("/root/send/prcpinfo/cretno", model.getValue("/root/main/pat/patlist["+irow+"]/cretno"));
    model.setValue("/root/send/prcpinfo/orddeptcd", model.getValue("/root/main/pat/patlist["+irow+"]/orddeptcd"));
    model.setValue("/root/send/prcpinfo/prcpgenrflag", model.getValue("/root/main/pat/patlist["+irow+"]/prcpgenrflag"));
    model.setValue("/root/send/prcpinfo/prnt_drugflag", model.getValue("/root/main/pat/patlist["+irow+"]/prnt_drugflag"));
    model.setValue("/root/send/prcpinfo/prcpflag", model.getValue("/root/main/pat/patlist["+irow+"]/prnt_drugflag"));
    model.setValue("/root/send/prcpinfo/atcioflag", model.getValue("/root/hidden/srchinfo/atcioflag"));
    model.makeValue("/root/send/prcpinfo/powdflag", model.getValue("/root/hidden/srchinfo/powdflag"));  // 산제구분
    if(rowid == "") { //일괄전송시 hidden/atcno를 변경하지 않음
        model.setValue("/root/hidden/atcno",model.getValue("/root/main/pat/patlist["+irow+"]/atcno"));
    } 
    
    model.setValue("/root/temp/selrow", irow);
    
    model.refresh();
    if ( model.getValue("/root/hidden/srchinfo/srchflag1") =="O" ){
 		pat_info =  "O▦"+ model.getValue("/root/main/pat/patlist["+irow+"]/pid") +"▦"+model.getValue("/root/main/pat/patlist["+irow+"]/drugdd")+"▦"+model.getValue("/root/main/pat/patlist["+irow+"]/cretno")+"▦"+getUserInfo("dutplceinstcd")+"▦1▦"+model.getValue("/root/main/pat/patlist["+irow+"]/drugdd");	
    } else if ( model.getValue("/root/hidden/srchinfo/srchflag1") =="I" ){
    	pat_info =  "I▦"+ model.getValue("/root/main/pat/patlist["+irow+"]/pid") +"▦"+model.getValue("/root/main/pat/patlist["+irow+"]/orddd")+"▦"+model.getValue("/root/main/pat/patlist["+irow+"]/cretno")+"▦1▦"+getUserInfo("dutplceinstcd");
    }
    setParameter("condparam",pat_info);
	//modal("SPMMO08900", 1, "", "", "", "", "", "left:0; right:0; width:0; height:0; sysmenu:hidden; caption:hidden; min:hidden, max:hidden;");
	
    submit("TRADT00209");
    /*var pamInfoCvs = getGlobalVariable("paminfo");  
						alert(pamInfoCvs);
						if(!isNull(pamInfoCvs)){ //cvs가 null이 아닌 경우에만 처리함.
							model.removeNodeSet ( "/root/paminfo/list" ); //상단화면 정보 초기화
							setCSVToNode ( "/root/paminfo", pamInfoCvs );
						}*/
   // for ( var i = 1 ; i < grd_prcplist.rows; i++){
   // 	grd_prcplist.addStatus(i,"update");	
   // }
   
   /*
   // 2008-10-16 이선경 수정 (기타용법(zzz)을 낸 경우 default값으로 1회는 아침, 2회는 아침,저녁으로 선택되도록)
   for(i = 1; i <= getNodesetCount("/root/main/prcp/prcplist") ; i++){
		if(model.getValue("/root/main/prcp/prcplist["+ i + "]/mthdcd1") == "Z"){
			if(model.getValue("/root/main/prcp/prcplist["+ i + "]/prcptims") == 1 ) {
				model.setValue("/root/main/prcp/prcplist["+ i + "]/morningadminqty", "1");
				model.setValue("/root/main/prcp/prcplist["+ i + "]/lunchadminqty", "0");
				model.setValue("/root/main/prcp/prcplist["+ i + "]/dinneradminqty", "0");
				model.setValue("/root/main/prcp/prcplist["+ i + "]/bedtimeadminqty", "0");
				model.setValue("/root/main/prcp/prcplist["+ i + "]/specialadminqty", "0");
			} else if(model.getValue("/root/main/prcp/prcplist["+ i + "]/prcptims") == 2 ) {
				model.setValue("/root/main/prcp/prcplist["+ i + "]/morningadminqty", "1");
				model.setValue("/root/main/prcp/prcplist["+ i + "]/lunchadminqty", "0");
				model.setValue("/root/main/prcp/prcplist["+ i + "]/dinneradminqty", "1");
				model.setValue("/root/main/prcp/prcplist["+ i + "]/bedtimeadminqty", "0");
				model.setValue("/root/main/prcp/prcplist["+ i + "]/specialadminqty", "0");
			}
		}	
   }
   model.refresh();*/
   
   
   // 20100322_laboru_저장된 데이터일 경우 약품코드와 용법코드가 동일한 처방에 대한 재정리만 함.
   /*if(model.getValue("/root/main/prcp/prcplist/savedataynflag") == "N" ) {
	   //2009-02-23 이선경 추가(mixno 정리)
      fMakeMixno("Y");
   } else {
	  fSaveDataMakeMixno_knu("Y");
   }*/

	//20101228 이선경 수정 : 같은 약번호에서 정제/산제 구분하고 산제(p)일때만 mixno 자동생성( atc화면에서 저장 or 전송한 데이터 조회시에는 제외)
	if(model.getValue("/root/main/prcp/prcplist/savedataynflag") == "N" ) {
		fMakeMixno_knu();
	} else {
		fSaveDataMakeMixno("Y");
	}
		 
}

/**
* mixno 재정리
**/
function fMakeMixno(pwdflag) {

   var prevno = 0;
   var minno = 70;
   var mthdcdall = "";
   var mthdcdall2 = "";
   var preprcpcd = "";
   var prcpcd = "";

   //산제용법별 mix 번호생성 옵션일 경우(조회조건은 산제만이고 산제처방이고 병동처방이고 퇴원, 외출/외박은 아니고 )
   if(model.getValue("/root/main/pat/patlist[" + grd_pat.row + "]/atcpwdlblyn") == "Y" && pwdflag == "Y" ) {
   		for(var i = 1; i <= getNodesetCount("/root/main/prcp/prcplist") ; i++) {
   			if(model.getValue("/root/main/prcp/prcplist["+ i + "]/prcpmixnoyn") == "-") {
	   			mthdcdall = model.getValue("/root/main/prcp/prcplist["+ i + "]/mthdcd1") + model.getValue("/root/main/prcp/prcplist["+ i + "]/mthdcd2")  
	   								+ model.getValue("/root/main/prcp/prcplist["+ i + "]/mthdcd3") + model.getValue("/root/main/prcp/prcplist["+ i + "]/mthdcd4") 
	   								+ model.getValue("/root/main/prcp/prcplist["+ i + "]/mthdcd5") + model.getValue("/root/main/prcp/prcplist["+ i + "]/mthdcd6") ;
	   			model.setValue("/root/main/prcp/prcplist["+ i + "]/prcpmixno", minno);
				model.setValue("/root/main/prcp/prcplist["+ i + "]/prcpmixnoyn", "Y");
	   			
	   			for(var j = i +1; j <= getNodesetCount("/root/main/prcp/prcplist") ; j++) {
	   			
		   			mthdcdall2 = model.getValue("/root/main/prcp/prcplist["+ j + "]/mthdcd1") + model.getValue("/root/main/prcp/prcplist["+ j + "]/mthdcd2")  
		   								+ model.getValue("/root/main/prcp/prcplist["+ j + "]/mthdcd3") + model.getValue("/root/main/prcp/prcplist["+ j + "]/mthdcd4") 
		   								+ model.getValue("/root/main/prcp/prcplist["+ j + "]/mthdcd5") + model.getValue("/root/main/prcp/prcplist["+ j + "]/mthdcd6") ;

	   				if(mthdcdall == mthdcdall2 && model.getValue("/root/main/prcp/prcplist["+ j + "]/prcpmixno") == "-") {
	   					model.setValue("/root/main/prcp/prcplist["+ j + "]/prcpmixno", minno);
		   				model.setValue("/root/main/prcp/prcplist["+ j + "]/prcpmixnoyn", "Y");
	   					
	   				} 
	   			}
	   			minno++;
	   		}
   		}
   			                   
   } else {
   		   
	   for(var i = 1; i <= getNodesetCount("/root/main/prcp/prcplist") ; i++) {
	   		
	   		if(model.getValue("/root/main/prcp/prcplist["+ i + "]/prcpmixno") != "-" && model.getValue("/root/main/prcp/prcplist["+ i + "]/prcpmixnoyn") == "-") {	   			
	   			if( prevno == 0) {
	   				prevno = model.getValue("/root/main/prcp/prcplist["+ i + "]/prcpmixno");
	   				model.setValue("/root/main/prcp/prcplist["+ i + "]/prcpmixno", minno);
	   				model.setValue("/root/main/prcp/prcplist["+ i + "]/prcpmixnoyn", "Y");
	
	   			} else {
	   			
	   				if(prevno == model.getValue("/root/main/prcp/prcplist["+ i + "]/prcpmixno")) {
	   					model.setValue("/root/main/prcp/prcplist["+ i + "]/prcpmixno", minno);
	   					model.setValue("/root/main/prcp/prcplist["+ i + "]/prcpmixnoyn", "Y");
	
	   				} else {
	   					prevno = model.getValue("/root/main/prcp/prcplist["+ i + "]/prcpmixno");
	   					model.setValue("/root/main/prcp/prcplist["+ i + "]/prcpmixno", minno++);
	   					model.setValue("/root/main/prcp/prcplist["+ i + "]/prcpmixnoyn", "Y");
	   				}
		   		}
		   		
		   		for(var j = i; j <= getNodesetCount("/root/main/prcp/prcplist") ; j++) {
		   			if(prevno == model.getValue("/root/main/prcp/prcplist["+ j + "]/prcpmixnofix")) {
		   				model.setValue("/root/main/prcp/prcplist["+ j + "]/prcpmixno", minno);
	   					model.setValue("/root/main/prcp/prcplist["+ j + "]/prcpmixnoyn", "Y");
	   				}
		   		}
			} 
		
		
			//약품코드와 용법코드가 동일한 처방이 2개 이상 들어왔을 경우 1개만 빼고 나머지는 분리번호 셋팅
	   		if(model.getValue("/root/main/prcp/prcplist["+ i + "]/prcpmixno") == "-") {
	   			preprcpcd = model.getValue("/root/main/prcp/prcplist["+ i + "]/prcpcd");
	   			mthdcdall = model.getValue("/root/main/prcp/prcplist["+ i + "]/mthdcd1") + model.getValue("/root/main/prcp/prcplist["+ i + "]/mthdcd2")
	   								+ model.getValue("/root/main/prcp/prcplist["+ i + "]/mthdcd3") + model.getValue("/root/main/prcp/prcplist["+ i + "]/mthdcd4")
	   								+ model.getValue("/root/main/prcp/prcplist["+ i + "]/mthdcd5") + model.getValue("/root/main/prcp/prcplist["+ i + "]/mthdcd6") ;
	   								
	   			for(var k = i+1 ; k <= getNodesetCount("/root/main/prcp/prcplist") ; k++) {
	   				prcpcd = model.getValue("/root/main/prcp/prcplist["+ k + "]/prcpcd");
	   				mthdcdall2 = model.getValue("/root/main/prcp/prcplist["+ k + "]/mthdcd1") + model.getValue("/root/main/prcp/prcplist["+ k + "]/mthdcd2")
		   								+ model.getValue("/root/main/prcp/prcplist["+ k + "]/mthdcd3") + model.getValue("/root/main/prcp/prcplist["+ k + "]/mthdcd4")
		   								+ model.getValue("/root/main/prcp/prcplist["+ k + "]/mthdcd5") + model.getValue("/root/main/prcp/prcplist["+ k + "]/mthdcd6") ;

	   				if(preprcpcd == prcpcd && mthdcdall == mthdcdall2) {
	   					model.setValue("/root/main/prcp/prcplist["+ k + "]/prcpmixno", minno);
	   				}
	   			}
	   		}
		}
	}
	
	model.refresh();
 }
 
 /**
* 20100322_laboru
* 저장된 데이터의 mixno 재정리
**/
function fSaveDataMakeMixno(pwdflag) {
   var prevno = 0;
   var minno = 70;	
   var tdivno = 1;   // 20110513_laboru_구분 t 일 경우 분리번호 1 부터 적용
   var mthdcdall = "";
   var mthdcdall2 = "";
   var preprcpcd = "";
   var prcpcd = "";
   
   //산제용법별 mix 번호생성 옵션일 경우(조회조건은 산제만이고 산제처방이고 병동처방이고 퇴원, 외출/외박은 아니고 )
   if(model.getValue("/root/main/pat/patlist[" + grd_pat.row + "]/atcpwdlblyn") == "Y" && pwdflag == "Y" ) {
   
   } else {
   	 for(var i = 1; i <= getNodesetCount("/root/main/prcp/prcplist") ; i++) {
   	 	//약품코드와 용법코드가 동일한 처방이 2개 이상 들어왔을 경우 1개만 빼고 나머지는 분리번호 셋팅
   		if(model.getValue("/root/main/prcp/prcplist["+ i + "]/prcpmixno") == "-") {
   			preprcpcd = model.getValue("/root/main/prcp/prcplist["+ i + "]/prcpcd");
   			mthdcdall = model.getValue("/root/main/prcp/prcplist["+ i + "]/mthdcd1") + model.getValue("/root/main/prcp/prcplist["+ i + "]/mthdcd2")
   								+ model.getValue("/root/main/prcp/prcplist["+ i + "]/mthdcd3") + model.getValue("/root/main/prcp/prcplist["+ i + "]/mthdcd4")
   								+ model.getValue("/root/main/prcp/prcplist["+ i + "]/mthdcd5") + model.getValue("/root/main/prcp/prcplist["+ i + "]/mthdcd6") ;
   								
   			for(var k = i+1 ; k <= getNodesetCount("/root/main/prcp/prcplist") ; k++) {
   				prcpcd = model.getValue("/root/main/prcp/prcplist["+ k + "]/prcpcd");
   				mthdcdall2 = model.getValue("/root/main/prcp/prcplist["+ k + "]/mthdcd1") + model.getValue("/root/main/prcp/prcplist["+ k + "]/mthdcd2")
	   								+ model.getValue("/root/main/prcp/prcplist["+ k + "]/mthdcd3") + model.getValue("/root/main/prcp/prcplist["+ k + "]/mthdcd4")
	   								+ model.getValue("/root/main/prcp/prcplist["+ k + "]/mthdcd5") + model.getValue("/root/main/prcp/prcplist["+ k + "]/mthdcd6") ;

   				if(preprcpcd == prcpcd && mthdcdall == mthdcdall2) {
   					model.setValue("/root/main/prcp/prcplist["+ k + "]/prcpmixno", minno);
   				}
   			}
   		}
   		
   		var mthdcd1 = model.getValue("/root/main/prcp/prcplist["+ i + "]/mthdcd1") + model.getValue("/root/main/prcp/prcplist["+ i + "]/mthdcd2")
   								+ model.getValue("/root/main/prcp/prcplist["+ i + "]/mthdcd3") + model.getValue("/root/main/prcp/prcplist["+ i + "]/mthdcd4")
   								+ model.getValue("/root/main/prcp/prcplist["+ i + "]/mthdcd5") + model.getValue("/root/main/prcp/prcplist["+ i + "]/mthdcd6") ;
        var mthdcdfive1 = model.getValue("/root/main/prcp/prcplist["+ i + "]/mthdcd5");
        var dayno1 = model.getValue("/root/main/prcp/prcplist["+ i + "]/prcpdayno");
        var prcpmixno1 = model.getValue("/root/main/prcp/prcplist["+ i + "]/prcpmixno");
   		
   		// 20110513_laboru_구분 t 일 경우 라벨 묶이는 것과 동일하게 분리번호 묶기
   		if(model.getValue("/root/main/prcp/prcplist["+ i + "]/drugkind") == "t" && model.getValue("/root/main/prcp/prcplist["+ i + "]/prcpmixno") == "-") {
   			model.setValue("/root/main/prcp/prcplist["+ i + "]/prcpmixno", tdivno);
   			
   			for(var k = i+1 ; k <= getNodesetCount("/root/main/prcp/prcplist") ; k++) {
   				if(model.getValue("/root/main/prcp/prcplist["+ k + "]/drugkind") == "t" ) {
	   				var mthdcd2 = model.getValue("/root/main/prcp/prcplist["+ k + "]/mthdcd1") + model.getValue("/root/main/prcp/prcplist["+ k + "]/mthdcd2")
		   								+ model.getValue("/root/main/prcp/prcplist["+ k + "]/mthdcd3") + model.getValue("/root/main/prcp/prcplist["+ k + "]/mthdcd4")
		   								+ model.getValue("/root/main/prcp/prcplist["+ k + "]/mthdcd5") + model.getValue("/root/main/prcp/prcplist["+ k + "]/mthdcd6") ;
					var mthdcdfive2 = model.getValue("/root/main/prcp/prcplist["+ k + "]/mthdcd5");
					var dayno2 = model.getValue("/root/main/prcp/prcplist["+ k + "]/prcpdayno");
					var prcpmixno2 = model.getValue("/root/main/prcp/prcplist["+ k + "]/prcpmixno");
					
	   				if( (mthdcdfive1 == mthdcdfive2 && dayno1 == dayno2 ) || (dayno1 == dayno2 && mthdcdfive1 == "P" && (mthdcd2 == "A11D" || mthdcd2 == "A11DI") && prcpmixno1 == prcpmixno2  )   
	   						|| (dayno1 == dayno2 && mthdcdfive2 == "P" && (mthdcd1 == "A11D" || mthdcd1 == "A11DI") && prcpmixno1 == prcpmixno2 )  
	   						|| (dayno1 == dayno2 && mthdcd1 == mthdcd2)  ) {
	   					model.setValue("/root/main/prcp/prcplist["+ k + "]/prcpmixno", tdivno);
					}
				}
   			}
   			
   			tdivno++;
   		}
   	 }
   }
   model.refresh();
}
 
/**
* mixno 재정리 (경북대병원)
**/
function fMakeMixno_knu(pwdflag) {

   var prevno = 0;
   var minno = 70;
   var tdivno = 1;   // 20110513_laboru_구분 t 일 경우 분리번호 1 부터 적용
   var mthdcdall = "";
   var mthdcdall2 = "";
   var preprcpcd = "";
   var prcpcd = "";
   var prcpdayno1 = "";
   var prcpdayno2 = "";

   //산제용법별 mix 번호생성 
   for(var i = 1; i <= getNodesetCount("/root/main/prcp/prcplist") ; i++) {
   	
	   //산제일때 (p)
	   if(model.getValue("/root/main/prcp/prcplist["+ i + "]/drugkind") == "p") {
   			if(model.getValue("/root/main/prcp/prcplist["+ i + "]/prcpmixnoyn") == "-") {
	   			mthdcdall = model.getValue("/root/main/prcp/prcplist["+ i + "]/mthdcd1") + model.getValue("/root/main/prcp/prcplist["+ i + "]/mthdcd2")  
	   								+ model.getValue("/root/main/prcp/prcplist["+ i + "]/mthdcd3") + model.getValue("/root/main/prcp/prcplist["+ i + "]/mthdcd4") 
	   								+ model.getValue("/root/main/prcp/prcplist["+ i + "]/mthdcd5") + model.getValue("/root/main/prcp/prcplist["+ i + "]/mthdcd6") ;
	   			model.setValue("/root/main/prcp/prcplist["+ i + "]/prcpmixno", minno);
				model.setValue("/root/main/prcp/prcplist["+ i + "]/prcpmixnoyn", "Y");
				
				prcpdayno1 = model.getValue("/root/main/prcp/prcplist["+ i + "]/prcpdayno");
				//alert("p) i : " + i + "   1  : " + minno);
	   		    
	   			for(var j = i +1; j <= getNodesetCount("/root/main/prcp/prcplist") ; j++) {
	   				if(model.getValue("/root/main/prcp/prcplist["+ j + "]/drugkind") == "p" && model.getValue("/root/main/prcp/prcplist["+ j + "]/prcpmixnoyn") == "-") {
						mthdcdall2 = model.getValue("/root/main/prcp/prcplist["+ j + "]/mthdcd1") + model.getValue("/root/main/prcp/prcplist["+ j + "]/mthdcd2")  
											+ model.getValue("/root/main/prcp/prcplist["+ j + "]/mthdcd3") + model.getValue("/root/main/prcp/prcplist["+ j + "]/mthdcd4") 
											+ model.getValue("/root/main/prcp/prcplist["+ j + "]/mthdcd5") + model.getValue("/root/main/prcp/prcplist["+ j + "]/mthdcd6") ;
						prcpdayno2 = model.getValue("/root/main/prcp/prcplist["+ j + "]/prcpdayno");
						
						if(mthdcdall == mthdcdall2 && prcpdayno1 == prcpdayno2 && model.getValue("/root/main/prcp/prcplist["+ j + "]/prcpmixno") == "-") {	// 20110512_laboru_날짜수가 같고 용법이 같은 것 끼리 묶음
							model.setValue("/root/main/prcp/prcplist["+ j + "]/prcpmixno", minno);
							model.setValue("/root/main/prcp/prcplist["+ j + "]/prcpmixnoyn", "Y");
							//alert("p) j : " + j + "   2  : " + minno);
							
						} 
					}
	   			}
				minno++;
	   		}	   		

   		} else { //산제외 (t, e)
   		    var mthdcdall3 = model.getValue("/root/main/prcp/prcplist["+ i + "]/mthdcd1") + model.getValue("/root/main/prcp/prcplist["+ i + "]/mthdcd2")  
											+ model.getValue("/root/main/prcp/prcplist["+ i+ "]/mthdcd3") + model.getValue("/root/main/prcp/prcplist["+ i + "]/mthdcd4") 
											+ model.getValue("/root/main/prcp/prcplist["+ i + "]/mthdcd5") + model.getValue("/root/main/prcp/prcplist["+ i + "]/mthdcd6") ;
											
	   		if(model.getValue("/root/main/prcp/prcplist["+ i + "]/prcpmixno") != "-" && model.getValue("/root/main/prcp/prcplist["+ i + "]/prcpmixnoyn") == "-" && mthdcdall3 != 'O10DE') {	   			
	   			if( prevno == 0) {
	   				prevno = model.getValue("/root/main/prcp/prcplist["+ i + "]/prcpmixno");
	   				model.setValue("/root/main/prcp/prcplist["+ i + "]/prcpmixno", minno);
	   				model.setValue("/root/main/prcp/prcplist["+ i + "]/prcpmixnoyn", "Y");
					//alert("t) i : " + i + "    3  : " + minno);
	
	   			} else {
	   			
	   				if(prevno == model.getValue("/root/main/prcp/prcplist["+ i + "]/prcpmixno")) {
	   					model.setValue("/root/main/prcp/prcplist["+ i + "]/prcpmixno", minno);
	   					model.setValue("/root/main/prcp/prcplist["+ i + "]/prcpmixnoyn", "Y");
						//alert("t) i : " + i + "    4  : " + minno);
	   				} else {
	   					prevno = model.getValue("/root/main/prcp/prcplist["+ i + "]/prcpmixno");
	   					model.setValue("/root/main/prcp/prcplist["+ i + "]/prcpmixno", minno);
	   					model.setValue("/root/main/prcp/prcplist["+ i + "]/prcpmixnoyn", "Y");
						//alert("t) i : " + i + "     5  : " + minno);
	   				}
		   		}
		   		
		   		for(var j = i; j <= getNodesetCount("/root/main/prcp/prcplist") ; j++) {
					if(model.getValue("/root/main/prcp/prcplist["+ i + "]/drugkind") != "p") {
						if(prevno == model.getValue("/root/main/prcp/prcplist["+ j + "]/prcpmixnofix")) {
							model.setValue("/root/main/prcp/prcplist["+ j + "]/prcpmixno", minno);
							model.setValue("/root/main/prcp/prcplist["+ j + "]/prcpmixnoyn", "Y");
							//alert("t) j : " + j + "    6  : " + minno);
						}
					}
		   		}
				minno++;
			} 
		
		
			//약품코드와 용법코드가 동일한 처방이 2개 이상 들어왔을 경우 1개만 빼고 나머지는 분리번호 셋팅
	   		if(model.getValue("/root/main/prcp/prcplist["+ i + "]/prcpmixno") == "-") {
	   			preprcpcd = model.getValue("/root/main/prcp/prcplist["+ i + "]/prcpcd");
	   			mthdcdall = model.getValue("/root/main/prcp/prcplist["+ i + "]/mthdcd1") + model.getValue("/root/main/prcp/prcplist["+ i + "]/mthdcd2")
	   								+ model.getValue("/root/main/prcp/prcplist["+ i + "]/mthdcd3") + model.getValue("/root/main/prcp/prcplist["+ i + "]/mthdcd4")
	   								+ model.getValue("/root/main/prcp/prcplist["+ i + "]/mthdcd5") + model.getValue("/root/main/prcp/prcplist["+ i + "]/mthdcd6") ;
	   								
	   			for(var k = i+1 ; k <= getNodesetCount("/root/main/prcp/prcplist") ; k++) {
	   				prcpcd = model.getValue("/root/main/prcp/prcplist["+ k + "]/prcpcd");
	   				mthdcdall2 = model.getValue("/root/main/prcp/prcplist["+ k + "]/mthdcd1") + model.getValue("/root/main/prcp/prcplist["+ k + "]/mthdcd2")
		   								+ model.getValue("/root/main/prcp/prcplist["+ k + "]/mthdcd3") + model.getValue("/root/main/prcp/prcplist["+ k + "]/mthdcd4")
		   								+ model.getValue("/root/main/prcp/prcplist["+ k + "]/mthdcd5") + model.getValue("/root/main/prcp/prcplist["+ k + "]/mthdcd6") ;

	   				if(preprcpcd == prcpcd && mthdcdall == mthdcdall2) {
	   					model.setValue("/root/main/prcp/prcplist["+ k + "]/prcpmixno", minno);
						//alert("t) 7  : " + minno);
	   				}
	   			}
	   		}
	   		
	   		var mthdcd1 = model.getValue("/root/main/prcp/prcplist["+ i + "]/mthdcd1") + model.getValue("/root/main/prcp/prcplist["+ i + "]/mthdcd2")
	   								+ model.getValue("/root/main/prcp/prcplist["+ i + "]/mthdcd3") + model.getValue("/root/main/prcp/prcplist["+ i + "]/mthdcd4")
	   								+ model.getValue("/root/main/prcp/prcplist["+ i + "]/mthdcd5") + model.getValue("/root/main/prcp/prcplist["+ i + "]/mthdcd6") ;
  	        var mthdcdfive1 = model.getValue("/root/main/prcp/prcplist["+ i + "]/mthdcd5");
  	        var dayno1 = model.getValue("/root/main/prcp/prcplist["+ i + "]/prcpdayno");
  	        var prcpmixno1 = model.getValue("/root/main/prcp/prcplist["+ i + "]/prcpmixno");  
	   		
	   		// 20110513_laboru_구분 t 일 경우 라벨 묶이는 것과 동일하게 분리번호 묶기
	   		if(model.getValue("/root/main/prcp/prcplist["+ i + "]/drugkind") == "t" && model.getValue("/root/main/prcp/prcplist["+ i + "]/prcpmixno") == "-") {
	   			model.setValue("/root/main/prcp/prcplist["+ i + "]/prcpmixno", tdivno);
	   			
	   			if(!fChkSumcls(i)) {
		   			for(var k = i+1 ; k <= getNodesetCount("/root/main/prcp/prcplist") ; k++) {
		   				if(model.getValue("/root/main/prcp/prcplist["+ k + "]/drugkind") == "t" ) {
		   					
			   				var mthdcd2 = model.getValue("/root/main/prcp/prcplist["+ k + "]/mthdcd1") + model.getValue("/root/main/prcp/prcplist["+ k + "]/mthdcd2")
				   								+ model.getValue("/root/main/prcp/prcplist["+ k + "]/mthdcd3") + model.getValue("/root/main/prcp/prcplist["+ k + "]/mthdcd4")
				   								+ model.getValue("/root/main/prcp/prcplist["+ k + "]/mthdcd5") + model.getValue("/root/main/prcp/prcplist["+ k + "]/mthdcd6") ;
							var mthdcdfive2 = model.getValue("/root/main/prcp/prcplist["+ k + "]/mthdcd5");
							var dayno2 = model.getValue("/root/main/prcp/prcplist["+ k + "]/prcpdayno");
							var prcpmixno2 = model.getValue("/root/main/prcp/prcplist["+ k + "]/prcpmixno");
							
			   				if( (mthdcdfive1 != "" && mthdcdfive2 != "" && mthdcdfive1 == mthdcdfive2 && dayno1 == dayno2 && prcpmixno1 == prcpmixno2 && !fChkSumcls(k) ) 
			   						|| (dayno1 == dayno2 && mthdcdfive1 == "P" && (mthdcd2 == "A11D" || mthdcd2 == "A11DI") && prcpmixno1 == prcpmixno2 && !fChkSumcls(k) )   
			   						|| (dayno1 == dayno2 && mthdcdfive2 == "P" && (mthdcd1 == "A11D" || mthdcd1 == "A11DI") && prcpmixno1 == prcpmixno2 && !fChkSumcls(k) )  
		   							|| (dayno1 == dayno2 && mthdcd1 == mthdcd2 && prcpmixno1 == prcpmixno2 && !fChkSumcls(k) )	) {
			   					model.setValue("/root/main/prcp/prcplist["+ k + "]/prcpmixno", tdivno);
			   					model.setValue("/root/main/prcp/prcplist["+ k + "]/prcpmixnoyn", "Y");
							}
						}
		   			}
		   		}
	   			
	   			tdivno++;
	   		}
	   		
	   		// 20120216_laboru_안과 용법 O10DE 일때는 외용제라도 정제처럼 라벨 묶기
	   		if(model.getValue("/root/main/prcp/prcplist["+ i + "]/drugkind") == "e" 
	   			&& model.getValue("/root/main/prcp/prcplist["+ i + "]/mthdcd1") == "O" 
	   			&& model.getValue("/root/main/prcp/prcplist["+ i + "]/mthdcd2") == "1" 
	   			&& model.getValue("/root/main/prcp/prcplist["+ i + "]/mthdcd3") == "0" 
	   			&& model.getValue("/root/main/prcp/prcplist["+ i + "]/mthdcd4") == "D"  
	   			&& model.getValue("/root/main/prcp/prcplist["+ i + "]/mthdcd5") == "E"
	   			&& model.getValue("/root/main/prcp/prcplist["+ i + "]/prcpmixno") == "-" ) {
	   			model.setValue("/root/main/prcp/prcplist["+ i + "]/prcpmixno", tdivno);
	   			
	   			//if(!fChkSumcls(i)) {
		   			for(var k = i+1 ; k <= getNodesetCount("/root/main/prcp/prcplist") ; k++) {
		   				if(model.getValue("/root/main/prcp/prcplist["+ k + "]/drugkind") == "e"  
		   					 && model.getValue("/root/main/prcp/prcplist["+ k + "]/mthdcd1") == "O"
		   					 && model.getValue("/root/main/prcp/prcplist["+ k + "]/mthdcd2") == "1" 
		   					 && model.getValue("/root/main/prcp/prcplist["+ k + "]/mthdcd3") == "0" 
		   					 && model.getValue("/root/main/prcp/prcplist["+ k + "]/mthdcd4") == "D" 
		   					 && model.getValue("/root/main/prcp/prcplist["+ k + "]/mthdcd5") == "E")  {
			   				var mthdcd2 = model.getValue("/root/main/prcp/prcplist["+ k + "]/mthdcd1") + model.getValue("/root/main/prcp/prcplist["+ k + "]/mthdcd2")
				   								+ model.getValue("/root/main/prcp/prcplist["+ k + "]/mthdcd3") + model.getValue("/root/main/prcp/prcplist["+ k + "]/mthdcd4")
				   								+ model.getValue("/root/main/prcp/prcplist["+ k + "]/mthdcd5") + model.getValue("/root/main/prcp/prcplist["+ k + "]/mthdcd6") ;
							var mthdcdfive2 = model.getValue("/root/main/prcp/prcplist["+ k + "]/mthdcd5");
							var dayno2 = model.getValue("/root/main/prcp/prcplist["+ k + "]/prcpdayno");
							var prcpmixno2 = model.getValue("/root/main/prcp/prcplist["+ k + "]/prcpmixno");
							
			   				//if( (mthdcdfive1 != "" && mthdcdfive2 != "" && mthdcdfive1 == mthdcdfive2 && dayno1 == dayno2 && prcpmixno1 == prcpmixno2  ) 
			   				//		|| (dayno1 == dayno2 && mthdcdfive1 == "P" && (mthdcd2 == "A11D" || mthdcd2 == "A11DI") && prcpmixno1 == prcpmixno2  )   
			   				//		|| (dayno1 == dayno2 && mthdcdfive2 == "P" && (mthdcd1 == "A11D" || mthdcd1 == "A11DI") && prcpmixno1 == prcpmixno2  )  
		   					//		|| (dayno1 == dayno2 && mthdcd1 == mthdcd2 && prcpmixno1 == prcpmixno2  )	) {
			   					model.setValue("/root/main/prcp/prcplist["+ k + "]/prcpmixno", tdivno);
			   					model.setValue("/root/main/prcp/prcplist["+ k + "]/prcpmixnoyn", "Y");
							//}
							//alert(model.getValue("/root/main/prcp/prcplist["+ k + "]/mthdcd5") + " " + model.getValue("/root/main/prcp/prcplist["+ k + "]/prcpmixno")  + " " + model.getValue("/root/main/prcp/prcplist["+ k + "]/prcpcd"));
						}
		   			}
		   		//}
	   			
	   			tdivno++;
	   		}
	   		
		}
		
	}
	
	model.refresh();
 }
 
 
  
/**
 *	ATC 전송대상자료 저장
 */
function fSavePrcpList(trsmflag, irow) {
	//alert("SMADT00200.js   fSavePrcpList")
	
	var rowno = "";
	var idx = model.getValue("/root/temp/selrow");
	
    if(irow == "") {
	    rowno = idx;		// 20100312_laboru_전송대상 환자정보와 전송대상자료를 동기화.(체크박스 클릭시 문제 되었음)
    	//rowno = grd_pat.row;
    } else {
    	rowno = irow;
    }
    
    if(idx == "") {
    	idx = rowno;
    }
    
    
   // if (model.getValue("/root/main/pat/patlist["+ model.getValue("/root/temp/selrow")+"]/atcno") != "0" && model.getValue("/root/main/pat/patlist["+ model.getValue("/root/temp/selrow")+"]/atcno") != "" ) {
    if (model.getValue("/root/main/pat/patlist["+ rowno+"]/atcno") != "0" && model.getValue("/root/main/pat/patlist["+ rowno+"]/atcno") != "" ) {
    	var lastdt = model.getValue("/root/main/pat/patlist[" + idx + "]/trsmlastdt");
	 	var trsmdt = "";
	 	
    	if(trim(lastdt) != "") trsmdt = "'" + lastdt.substring(0, 4) + "-" + lastdt.substring(4, 6) + "-" + lastdt.substring(6, 8) + " " + lastdt.substring(8, 10) + ":" + lastdt.substring(10, 12) + ":" + lastdt.substring(12, 14) + "' 에";
	    
	    var str = "";
	    
	    if(irow == "") {//일괄전송시에는 메시지 체크안함
		    if(trsmflag == "T") {
		    	str = trsmdt + "전송된 처방입니다. 저장 하시겠습니까?" ;
		    } else {
		    	str = trsmdt + "전송된 처방입니다. 재전송 하시겠습니까?" ;
		    }
		    
	    	if (messageBox(str, "Q099") !=6){
	    		return;
	    	}
	    }
   } else {  //재전송이 아닐때 조제완료 처리
    	// 전송정보
		model.setValue("/root/send/req/drugdd"    , model.getValue("/root/send/prcpinfo/drugdd"));
		model.setValue("/root/send/req/drugno"    , model.getValue("/root/send/prcpinfo/drugno"));
		model.setValue("/root/send/req/ioflag"      , model.getValue("/root/send/prcpinfo/ioflag"));
		model.setValue("/root/send/req/drugstat"  , "D");
		model.setValue("/root/send/req/userid"    , getUserId());
		model.setValue("/root/send/req/instcd"    , getUserInfo("dutplceinstcd"));
		
		model.setValue("/root/send/req/dispflag"  ,"D");
		model.setValue("/root/send/req/inputtm"  ,getCurrentTime());
		//전광판 데이터
		//submit("TXADT00702");

		// 수정
		//var success = submit("TXADT00701"); //요청에 따라 뺌 
    }
    
    if(irow != "") {//일괄전송시에는 메시지 체크안함
	    if (trsmflag != "T" && ( model.getValue("/root/hidden/atcno") =="" || model.getValue("/root/hidden/atcno") =="0" ) ){
	    	messageBox("ATC 호기를 ","C002");
	    	return;
	    }
    }
    
    
    model.copyNode("/root/send/atcinfo/patinfo", "/root/main/pat/patlist["+ rowno +"]");
    if(trsmflag != "T") {
    	model.setValue("/root/send/atcinfo/patinfo/atcno", model.getValue("/root/hidden/atcno"));
    } else {
    	model.setValue("/root/send/atcinfo/patinfo/atcno", "");
    }
    model.setValue("/root/send/atcinfo/patinfo/trsmflag", trsmflag);
    
    //model.setValue( "/root/send/atcinfo/prcplist", grd_prcplist.getUpdateData());
   
    nodeList = instance1.selectNodes("/root/main/prcp/prcplist");
	rCSV = getNodeListCSV(nodeList);  								

	model.makeValue("/root/send/atcinfo/prcplist",rCSV);
	
    //model.setValue("/root/main/pat/patlist["+ model.getValue("/root/temp/selrow")+"]/atcno", model.getValue("/root/hidden/atcno"));
    if(trsmflag != "T") {
        model.setValue("/root/main/pat/patlist["+ rowno +"]/atcno", model.getValue("/root/hidden/atcno"));
    } else {
    	model.setValue("/root/main/pat/patlist["+ rowno +"]/atcno", "");
    }
    model.refresh();
    
    model.makeValue("/root/send/atcinfo/patinfo/atcioflag", model.getValue("/root/hidden/srchinfo/atcioflag"));
    if(model.getValue("/root/hidden/emtrns") == "Y") {
    	model.makeValue("/root/send/atcinfo/patinfo/emtrns", "E");
    } else {
    	model.makeValue("/root/send/atcinfo/patinfo/emtrns", "");
    }
    
    // 2011.03.24 pymi
    if(model.getValue("/root/hidden/noname") == "Y") {
    	model.makeValue("/root/send/atcinfo/patinfo/noname", "Y");
    } else {
    	model.makeValue("/root/send/atcinfo/patinfo/noname", "N");
    }
    // (e)
    
    // 이선경 2008-07-17 start (ast.adbmmthd에 mthdcd 값이 존재하는 용법인지 체크후 없으면 메시지)
    var mthdcd = "";
    var saveyn = "N";
   /* 
    for(var i = 1; i < grd_prcplist.rows; i++) {
    
    	mthdcd = model.getValue("/root/main/prcp/prcplist[" + i + "]/mthdcd1")
    			+model.getValue("/root/main/prcp/prcplist[" + i + "]/mthdcd2")
    			+model.getValue("/root/main/prcp/prcplist[" + i + "]/mthdcd3")
    			+model.getValue("/root/main/prcp/prcplist[" + i + "]/mthdcd4")
    			+model.getValue("/root/main/prcp/prcplist[" + i + "]/mthdcd5");
    			
    	model.setValue("/root/send/mthdcd", mthdcd);
    	
    	submit("TRADT00212");
    	
    	if(model.getValue("/root/temp/checkmthdcd/mthdcdyn") == "N") {
    		messageBox(mthdcd + " 용법은", "I004");
    		return;
    	} else {
    		saveyn = "Y";
    	}
    	
    }
    */
    

    saveyn = "Y";
    if(saveyn == "Y") {
    	    	
    	if ( submit("TXADT00207", false) == true ){
		    
		    if(irow == "") {
			    submit("TRADT00209", false);
			    
			    model.setFocus("ipt_drugno");
			    
			    model.removeNodeset("/root/main/prcp/prcplist");
				//fPatListSrch();
				model.setValue("/root/hidden/srchinfo/drugno","");
				model.setValue("/root/hidden/srchinfo/pid","");
				model.setValue("/root/hidden/srchinfo/wardcd","");
				model.refresh();
			}
		}
	    //model.copyNode("/root/send/atcinfo/actlist", "/root/main/prcp/prcplist["+grd_prcplist.row+"]");
		/*var chk = getGridUpdateData(grd_prcplist);
		if( chk != ""){
			model.removeNodeset("/root/send/atcinfo/actlist");	
			setCSVToNode("/root/send/atcinfo", chk, "actlist");
		
		    //submit("TXADT00206");
	    } else {
	    	messageBox("?????? ????????", "I004");
	    }
	        
	    model.refresh();*/
	    
	   // fPatListSrch();
	     
		//20101213 이선경 추가 : 자동출력 체크가 'Y'이면 전송시 라벨출력을 함
		// (trsmflag !=  "T")  2012년 7월26일 처방수정저장시 라벨 출력되지 않게 하기위해 수정, trsmflag = "T"는 저장시 넘어오는 Flag   김치국
		if(model.getValue("/root/hidden/autolbl") == "Y"  &&  (trsmflag !=  "T"))  {
			//라벨출력
			button28.dispatch("onclick");
		}
		
    }
    
    // 이선경 2008-07-17 end (존재하는 용법인지 체크후 없으면 메시지 올바른 용법이 하나라도 존재하면 저장)
    
    
}


function fResetMemo(){
	model.setValue("/root/main/prcp/memoinfo/pid"		, model.getValue("/root/main/prcp/baseinfo/pid"));
	model.setValue("/root/main/prcp/memoinfo/indd"	       , model.getValue("/root/main/prcp/baseinfo/indd"));
	model.setValue("/root/main/prcp/memoinfo/useyn"		, "Y");
	model.setValue("/root/main/prcp/memoinfo/seqno"		, "");
	model.setValue("/root/main/prcp/memoinfo/memo"	, "");
	model.setValue("/root/main/prcp/memoinfo/orddeptcd"	, model.getValue("/root/main/prcp/baseinfo/orddeptcd"));
	model.setValue("/root/main/prcp/memoinfo/writid"		, getUserId());
	model.setValue("/root/main/prcp/memoinfo/writid2"		, "");
	model.setValue("/root/main/prcp/memoinfo/writnm"		, getUserName());
	model.setValue("/root/main/prcp/memoinfo/writdt"		, model.getValue("/root/init/dateinfo/currentdt"));
	model.setValue("/root/main/prcp/memoinfo/ioflag"           ,"I");
	
	// 사번/이름/일자 다시 세팅
	model.refresh();
}

// 2011.03.23 pymi
function fPrintNameLbl() {
	var ipage = 1;
	model.removeNode("/root/temp/namelblist/namelblist");
	model.makeNode("/root/temp/namelblist/namelblist");
  var iselrow = model.getValue("/root/hidden/select_row")		
	
	if(model.getValue("/root/hidden/srchinfo/srchflag1") == "I") {//병동
	for(var i = grd_pat.fixedRows; i < grd_pat.rows; i++ ) {
		if(model.getValue("/root/main/pat/patlist["+ i +"]/sel") == "Y" || iselrow == i	) {
			var drugdd = model.getValue("/root/main/pat/patlist["+ i +"]/drugdd");
	
			model.makeValue("/root/temp/namelblist/namelblist["+ ipage +"]/drugdd", drugdd.substring(0,4) + "-" + drugdd.substring(4,6) + "-" + drugdd.substring(6,8)
							+ "                 " + "[" +  model.getValue("/root/main/pat/patlist["+ i +"]/drugno") + "]" ); // 적용일자/약번호
			model.makeValue("/root/temp/namelblist/namelblist["+ ipage +"]/rwardnm", model.getValue("/root/main/pat/patlist["+ i +"]/rwardnm") 
							+ " - " + model.getValue("/root/main/pat/patlist["+ i +"]/wardnm") + "호실" ); // 병동/호실
			model.makeValue("/root/temp/namelblist/namelblist["+ ipage +"]/pid", model.getValue("/root/main/pat/patlist["+ i +"]/pid") 
							+ "      " + model.getValue("/root/main/pat/patlist["+ i +"]/hngnm")); // 등록번호/ 성명
			ipage++;
		}
	}
	makeReportPreview(0,0,10, 10, "");
	fPrintRexbar("RFADT00201");
	model.refresh();
	}
}

function fChkSumcls(cnt) {
	var chk = false;
	var sSumcls = model.getValue("/root/main/lbllist/lbllist["+cnt+"]/sumcls");
	var sSnglyn = model.getValue("/root/main/lbllist/lbllist["+cnt+"]/atcifsnglyn");
	var sDrugindependpackflag = model.getValue("/root/main/lbllist/lbllist["+cnt+"]/drugindependpackflag");
	if(sSumcls == "DI" || sSumcls == "DS"|| sSumcls == "DX"|| sSumcls == "DT" || sSumcls == "DM" || sSumcls == "IH"|| sSumcls == "IO"  || sSumcls == "DG"   //20110512_laboru_pack 추가
		|| sSumcls == "IS"|| sSumcls == "IX"|| sSumcls == "X" || sSumcls == "ZZZ" || sSumcls == "A10PQ" || sSumcls == "I"){		
		chk = true;
	}
	if ( sSumcls == "D" && sSnglyn =="Y" ) {
		chk = true;
	}
	if ( sDrugindependpackflag =="Y"){
		chk = true;
	}
	return chk;
}