/**
 * 파 일 명 : SMADT30100.js
 * 설    명 : 마약향정처방관리 Javascriot
 * 설 계 자 : 공두경
 * 작 성 자 : 공두경
 * 수정이력 : 2007.08.10 / 최초작성 / 공두경
 */


var nextFlag = "GO";
var gTimer = null;
var sleepTime= 1000;
var autocnt =   1;   

var rtnprntflag = 'N';		// 20110422_laboru_경북대병원_반환처방전 반환확인 시 자동출력 될때 메시지 창 안뜨게 하기
var totqtyflag  = 'Y';		// 201120712 경북대병원_반환처방전 반환수량 (-) 뜨게하기   김치국
/**
 * 초기화
 */
function fInit() {
   grd_narclist.fixedcellcheckbox(0,1) = true;
   grd_sprelist.fixedcellcheckbox(0,1) = true;
   grd_outnarc.fixedcellcheckbox(0,1) = true;
   //구분 초기화(전체)

   //model.setValue("/root/temp/srchinfo/narcflag",   "M");
   model.setValue("/root/temp/srchinfo/narcflag",   "T");
   model.setValue("/root/temp/srchinfo/srchdrugkind",   "T");
   model.setValue("/root/temp/srchinfo/drugflag",   "I");
//   fChkIOTotal();
   model.setValue("/root/temp/srchinfo/narcstat",   "T");
   rdo_cncl.disabled = true;
   model.setValue("/root/temp/srchinfo/cnclstat",   "");
   rdo_rtn.disabled = true;
   model.setValue("/root/temp/srchinfo/rtnstat",   "");
   model.setValue("/root/temp/srchinfo/narctypeflag",   "T");
   model.setValue("/root/temp/srchinfo/srchioflag",   "I");
   
   ////자동시 표기 김치국 20170329
   cap_automess.visible = false;

   fChgIOFlag();

   //토글초기화
   model.setValue("/root/temp/srchinfo/srchroot", "M");
   model.toggle("case1");

   //조회날짜 초기화
   model.setValue("/root/temp/srchinfo/fst_dd",   getCurrentDate());
   model.setValue("/root/temp/srchinfo/last_dd",   getCurrentDate());

   //병동 Combo 조회
   model.setValue("/root/send/srchcond/deptflag", "W");
   submit("TRADT30101");
   astfAddCombo("/root/temp/srchcond", "ward", "wardcd,wardnm", ",");

	//로그인 사용자 셋팅
   var userid = getUserId();
   model.setValue("/root/temp/srchinfo/srchid", userid);
   fChgUserID();

   model.refresh();


    //바코드프린터설정 초기화
	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("TRADT30106");
	
	//잔량옵션
	submit("TRADT30107");
	
	// 출고부서 조회, 설정
	submit("TRADT01106");
	if(combo1.length == 1) {
		combo1.select(0);
	} else {
		// 2010.01.25 pymi 입원주사조제실 제거
		if(model.getValue("/root/init/misdeptlist/deptlist[1]/deptcd") == "3242104000") {
			combo1.choices.itemset.attribute("nodeset") = "/root/init/misdeptlist/deptlist[deptcd != '3242104000' ]";	
			combo1.refresh();
		} else {
			combo1.select(0);	// 20101019_laboru_경북대병원_cmc 셋팅을 경북대병원용으로 변경
		}
		// (e)
	}

	
	//1일기준인지 1회기준인지 체크하여 컬럼을 hidden
	var colHidnValue = grdBaseColHidn("D");
	//var colHidnValue = "C";
	//1회 기준
	if( colHidnValue == "C") {
		grd_outnarc.colHidden(grd_outnarc.colRef("prcpvol"))  = true;
		grd_outnarc.colHidden(grd_outnarc.colRef("prcpvolunit"))  = true;
		grd_outnarc.colHidden(grd_outnarc.colRef("dayprcpqty"))  = true;
		grd_outnarc.colHidden(grd_outnarc.colRef("dayprcpqtyunit"))  = true;

		grd_narclist.colHidden(grd_narclist.colRef("prcpvol"))  = true;
		grd_narclist.colHidden(grd_narclist.colRef("prcpvolunit"))  = true;
		grd_narclist.colHidden(grd_narclist.colRef("dayprcpqty"))  = true;
		grd_narclist.colHidden(grd_narclist.colRef("dayprcpqtyunit"))  = true;
	} else {						
		grd_outnarc.colHidden(grd_outnarc.colRef("prcpvol2"))  = true;
		grd_outnarc.colHidden(grd_outnarc.colRef("prcpvolunit2"))  = true;
		grd_outnarc.colHidden(grd_outnarc.colRef("prcpqty2")) = true;
		grd_outnarc.colHidden(grd_outnarc.colRef("prcpqtyunit2"))  = true;

		grd_narclist.colHidden(grd_narclist.colRef("prcpvol2"))  = true;
		grd_narclist.colHidden(grd_narclist.colRef("prcpvolunit2"))  = true;
		grd_narclist.colHidden(grd_narclist.colRef("prcpqty2")) = true;
		grd_narclist.colHidden(grd_narclist.colRef("prcpqtyunit2"))  = true;
	}
}

/**
 *	마약리스트 조회
 */
function fGetNarcData() {

	//이선경 2008-07-22 start (조회시 마약종류를 조회조건에 추가)
	var narccdlist = "";
	for(var i=1; i < datagrid1.rows; i++) {
		if(model.getValue("/root/temp/srchcond/narclist[" + i + "]/sel") == "Y") {

			if(narccdlist == "") {
				narccdlist = "'" + model.getValue("/root/temp/srchcond/narclist[" + i + "]/narccd") + "'";
			} else {
				narccdlist += ",'" + model.getValue("/root/temp/srchcond/narclist[" + i + "]/narccd") + "'";
			}
		}
	}
	
	model.setValue("/root/temp/srchinfo/narccd", narccdlist);

	//이선경 2008-07-22 start (조회시 마약종류를 조회조건에 추가)

	grd_narclist.fixedcellischeck(0, 1) = false;
	grd_outnarc.fixedcellischeck(0, 1) = false;
	model.copyNode("/root/send/srchinfo","/root/temp/srchinfo");
	
	if( model.getValue("/root/temp/srchinfo/prtab") == "Y") { // 향정반환반납장부 출력조건 2009.05.18 pymi
		model.setValue("/root/send/srchinfo/cnclflag", "Y");
		model.setValue("/root/send/srchinfo/rtnflag", "Y");
		model.setValue("/root/send/srchinfo/rtnstat", "T");
		model.setValue("/root/send/srchinfo/cnclstat", "T");
		model.setValue("/root/send/srchinfo/narcstat", "");
	}
	// (e)
	
	/*if(model.getValue("/root/send/srchinfo/narcflag") == "H" ) {
		submit("TRADT30105"); 	
	}*///주석처리 20090901 이선경 조회하는 로직안으로 옮김(향정이 반환대상이면 반환신청으로 잔량대상이면 잔량신청으로 업데이트 후 조회)
	
	if(chk_auto.value != "Y") {
		submit("TRADT30102");
	} else if(chk_auto.value == "Y") {
		submit("TRADT30110");
	}
}

/**
 *	바코드 변경시
 */
function fChgBarcode() {
	var sBar = model.getValue("/root/temp/srchinfo/barcode").toUpperCase();
	model.setValue("/root/temp/srchinfo/barcode", sBar);

	if(sBar.length >= 21){
		if(model.getValue("/root/temp/userinfo/userinfo/userid") == ""){
			messageBox("사용자ID가 없습니다. 사용자ID부터","C001");
			model.setValue("/root/temp/srchinfo/srchid","");
			model.setFocus("ipt_srchid");
		} else if(sBar.substr(0,1) != "M" && sBar.substr(0,1) != "H"){
			messageBox("바코드 정보가 다릅니다. 바코드를 다시","C001");
			model.setValue("/root/temp/srchinfo/barcode","");
			model.setFocus("input9");
		} else {
			//바코드로 먼저 해당처방을 조회함
			fGetNarcData();
			//바코드로 Acting처리가 가능한 처방인지 체크함
			//바코드로 처리가능한 Acting : 조제완료, 불출, 잔량반납확인, 반환확인
			//바코드로 조회시 데이터는 한건만 조회됨.
			if(sBar.substr(2,1) == "O" || sBar.substr(2,1) == "E" || sBar.substr(2,1) == "D"){
				if(model.getValue("/root/temp/srchinfo/srchroot") == "M"){
					if(model.getValue("/root/main/narclist/narclist["+1+"]/narcstat")=="3"){
						//바코드로 취소는 불가능 조회만가능
						model.setValue("/root/main/narclist/narclist["+1+"]/sel","Y");
						fNarcActing("Prcp");
						return;
					} else if(model.getValue("/root/main/narclist/narclist["+1+"]/narcstat")=="4"){
						//바코드로 취소는 불가능 조회만가능
						model.setValue("/root/main/narclist/narclist["+1+"]/sel","Y");
						//fNarcActing("Drug");
						messageBox("불출확인은 마약불출화면에서 마약수령자가 처리해야합니다.","I900");
						return;
					}
				} else {
					if(model.getValue("/root/main/narclist/narclist["+1+"]/narcstat")=="7"){
						//반납신청상태가 아니면 반납확인을 할수없음.
						//반납확인상태이면 조회만 가능
						fNarcActing("Spre");
						return;
					}
				}
			} else {
				if(model.getValue("/root/main/narclist/narclist["+1+"]/narcstat")=="9"){
					//반환신청상태가 아니면 반환확인을 할수없음.
					//그외 상태는 조회만 가능
					fNarcActing("Rtn");
					return;
				}
			}
			model.setValue("/root/temp/srchinfo/barcode","");
			model.refresh();
		}
	} else {
		messageBox("바코드 정보가 다릅니다.\n다시","C001");
		model.setValue("/root/temp/srchinfo/barcode","");
		model.setFocus("input9");
	}
	model.refresh();
}


/**
 *	바코드 변경시
 */
function fChgBarcodeSpre() {
	var sBar = model.getValue("/root/temp/srchinfo/barcodespre").toUpperCase();
	model.setValue("/root/temp/srchinfo/barcodespre", sBar);

	if(sBar.length >= 21){
		if(model.getValue("/root/temp/userinfo/userinfo/userid") == ""){
			messageBox("사용자ID가 없습니다. 사용자ID부터","C001");
			model.setValue("/root/temp/srchinfo/srchid","");
			model.setFocus("ipt_srchid");
		} else if(sBar.substr(0,1) != "M" && sBar.substr(0,1) != "H"){
			messageBox("바코드 정보가 다릅니다. 바코드를 다시","C001");
			model.setValue("/root/temp/srchinfo/barcode","");	
			model.setValue("/root/temp/srchinfo/barcodespre","");
			model.setFocus("input1");
		} else {
			//바코드로 먼저 해당처방을 조회함
			model.setValue("/root/temp/srchinfo/barcode",model.getValue("/root/temp/srchinfo/barcodespre"));
			fGetNarcData();
			//바코드로 Acting처리가 가능한 처방인지 체크함
			//바코드로 처리가능한 Acting : 조제완료, 불출, 잔량반납확인, 반환확인
			//바코드로 조회시 데이터는 한건만 조회됨.
			
			model.setValue("/root/main/narclist/narclist["+1+"]/sel","Y");
			fNarcActing("Spre");
			
			model.setValue("/root/temp/srchinfo/barcode","");	
			model.setValue("/root/temp/srchinfo/barcodespre","");
			model.refresh();
		}
	} else {
		messageBox("바코드 정보가 다릅니다.\n다시","C001");
		model.setValue("/root/temp/srchinfo/barcodespre","");
		model.setFocus("input1");
	}
	model.refresh();
}

/**
 *	마약 Acting 버튼 클릭시
 */
function fNarcActing(sActing) {
	if(model.getValue("/root/temp/userinfo/userinfo/userid") == ""){
		messageBox("사용자ID가 없습니다. 사용자ID를 먼저","C001");
		model.setValue("/root/temp/srchinfo/srchid","");
		model.setFocus("ipt_srchid");
		model.refresh();
		return;
	}
	var iActing_Cnt = 0;			// 행위 구분을 위한 카운트값
	var sActing_nm = "";			// 해당 행위의 명칭
	var sActingAfter = "";
	var selCnt = 0;
	var RtnCnfmYN = "N";
  var chkAll = model.getValue("/root/send/chkall");  // 20101206 wify 경북대병원 일괄처리 추가
  var chkAll1 = model.getValue("/root/send/chkall1");  // 20101214 wify 경북대병원 일괄처리 추가(불출까지)
	//액팅전 체크표시 cash
	fChkCash("before");

	model.removeNodeset("/root/send/narcinfo/narclist");
	
	// **** 체크박스 선택 값 카운트 Start ****
	for(var i = grd_narclist.fixedRows; i < grd_narclist.rows; i++){
		var sel = model.getValue("/root/main/narclist/narclist["+i+"]/sel");
		var sNarcStat = model.getValue("/root/main/narclist/narclist["+i+"]/narcstat");
		if(sel == "Y" && sNarcStat != "1") selCnt++;		// 선택된 값(sel == "Y") 들 중 미신청 값은 제외
	}
	
	if(selCnt == 0) {
		 messageBox("선택된 데이터가","I004");
		 return;
	}
	
	//실출고부서 값 확인(조제확인/ 반환확인 시)
	if((sActing == "Prcp" || sActing == "Rtn" ) && model.getValue("/root/temp/srchinfo/stocdeptcd") == "") {
		 messageBox("실출고부서를 지정하십시오 ","I999");
		 return;
	}
	
	// **** 체크박스 선택 값 카운트 End ****

	for(var i = grd_narclist.fixedRows; i < grd_narclist.rows; i++){
		var sel = model.getValue("/root/main/narclist/narclist["+i+"]/sel");			// 선택여부
		var sNarcStat = model.getValue("/root/main/narclist/narclist["+i+"]/narcstat");		// 불출상태
		var sCnclStat = model.getValue("/root/main/narclist/narclist["+i+"]/cnclstat");		// 반환상태
		var sRtnStat = model.getValue("/root/main/narclist/narclist["+i+"]/rtnstat");		// 반납상태
		var sDrugFlag = model.getValue("/root/main/narclist/narclist["+i+"]/drugflag");		// 마약/향정구분
		var sReturnFlag = model.getValue("/root/main/narclist/narclist["+i+"]/returnflag");		// 반납여부
		var sDrugKind = model.getValue("/root/main/narclist/narclist["+i+"]/drugkind");		// 발생구분
		var sIOflag = model.getValue("/root/main/narclist/narclist["+i+"]/ioflag");			// 입원/외래구분
		var sPrcphistcd = model.getValue("/root/main/narclist/narclist["+i+"]/prcphistcd");	// 처방상태
		var sPid = model.getValue("/root/main/narclist/narclist["+i+"]/pid");			// 환자번호
		var sPrcpcd = model.getValue("/root/main/narclist/narclist["+i+"]/prcpcd");		// 약품코드
		var sDrugno = model.getValue("/root/main/narclist/narclist["+i+"]/drugno");		// 약품코드
		var sMsg = "*투약번호 : "+sDrugno+"  *환자번호 : "+ sPid+ "  *약품코드 : "+ sPrcpcd + "\n";

		//=========================================== 제한조건 체크 Start ================================================//
		// 변수명                  parameter	 	     명칭				동작가능상태			//
		//------------------------------------------------------------------------------------------------------------//
		// sCnclStat	1. 7		: 반환종료				sCnclStat == "7" ( 진행불가 )		//
		//------------------------------------------------------------------------------------------------------------//
		// sActing  
		//  	1. Prcp 	  	: 조제확인	  		             	sNarcStat == "3" [출력완료]		//
		//		2. PrcpCncl 	: 조제취소				              sNarcStat == "4" [조제완료]		//
		//		3. Drug	    	: 불출확인				              sNarcStat == "4" [조제완료]		//
		//		4. DrugCncl	  : 불출취소				              sNarcStat == "5" [불출]		    //
		//		5. Rtn		    : 반환확인				              sCnclStat == "1" [반환신청]		//
		//		6. RtnCncl		: 반환취소 (2009-05-05 추가)		sCnclStat == "2" [반환확인]		//
		//		7. Spre		    : 잔량확인				              sRtnStat  == "1" [잔량신청]		//
		//		8. SpreCncl	  : 잔량취소 (2009-05-05 추가)		sRtnStat  == "2" [잔량확인]		//
		//============================================================================================================//
		if(sel == 'Y'){
			// *** 반환종료 *** 처방 메시지 처리 (진행불가) Start
			if(sCnclStat == "7" && (sNarcStat == "3" || sNarcStat == "4")){
				//메세지처리 반환종료 된 처방입니다.
				messageBox(sMsg+"반환종료 되었습니다. 반환처방전을 출력","I008");
				return;
			} else if(sCnclStat == "7" && sNarcStat == "2"){
				//메세지처리 : 반환종료되었습니다.
				messageBox(sMsg+"반환종료 되었습니다.","");
				return;
			}
			// *** 반환종료 *** 처방 메시지 처리 (진행불가) End
			// 20101214 wify 경북대병원 일괄처리(Prcpdrug)추가 
			if(sActing == "Prcpdrug") {
				if(chkAll == "") {
					messageBox("일괄처리가 체크되지", "E007");
					return;
				}
				if(sNarcStat == "2" && chkAll == "Y") {
					astfCopyNodeSet("/root/send/narcinfo/narclist", "/root/main/narclist/narclist["+i+"]");
					sActing_nm = "불출"
					iActing_Cnt++;
				} else { // 불출상태가 [미신청]일때
					sActing_nm = "불출"
				}

			}else if(sActing == "Prcp"){		// ***조제확인*** 출력완료 일 때만 기능 동작

				//이선경 2008-07-23 start
				/*
				if(sPrcphistcd == "D"){
					if(messageBox("반환된 처방입니다. 조제완료를", "Q002") == "7") {
					//messageBox("반환된 처방입니다. 조제완료를 할 수 없습니다.", "I900")
						return;
					}
				}
				*/
				// 한영현/간호 ITC 협의사항 - 'D'인 처방도 정상적인 흐름으로 처리 후 다시 반환처리 - 2009.06.04 (목) 김귀남
				//이선경 2008-07-23 end

				// 20101206 wify 경북대병원 일괄처리 추가.. 일괄처리시 불출신청 체크 안함.
				if(sNarcStat == "2" && chkAll == ""){		// [불출신청] 상태일 때 
					messageBox("마약처방전이 출력되지","E007");
					return;
				}

				if(parseInt(sNarcStat, 10) > 3){	// [출력완료] 상태 이상일 때
					messageBox("이미 조제완료된 처방","E008");
					return;
				}

				// 20101206 wify 경북대병원 일괄처리시 조제완료까지 처리
				if(sNarcStat == "2" && chkAll == "Y") {
					astfCopyNodeSet("/root/send/narcinfo/narclist", "/root/main/narclist/narclist["+i+"]");
					sActing_nm = "조제완료";
				 	iActing_Cnt++;
				} else {			// 불출상태가 [미신청]일때
					sActing_nm = "조제완료";
				}
				
				if(sNarcStat == "3"){		// [출력완료] 일 때만 기능 동작
					astfCopyNodeSet("/root/send/narcinfo/narclist", "/root/main/narclist/narclist["+i+"]");
					sActing_nm = "조제완료";
				 	iActing_Cnt++;
				} else {			// 불출상태가 [미신청]일때
					sActing_nm = "조제완료";
				}

			} else if(sActing == "PrcpCncl"){	// ***조제취소***

				//이선경 2008-07-23 start
				if(sCnclStat != ""){
					if(messageBox("반환된 처방입니다. 조제취소를", "Q002") == "7") {
						return;
					}
				}
				//이선경 2008-07-23 end

				if(sNarcStat == "4"){		// [조제완료] 상태일 때
					astfCopyNodeSet("/root/send/narcinfo/narclist", "/root/main/narclist/narclist["+i+"]");
				 	iActing_Cnt++;
				}

				sActing_nm = "조제취소";

			} else if(sActing == "Drug"){		// ***불출확인***

				//이선경 2008-07-23 start
				/*
				if(sPrcphistcd == "D"){
					if(messageBox("반환된 처방입니다. 불출확인를", "Q002") == "7") {
						return;
					}
				}
				*/
				// 한영현/간호 ITC 협의사항 - 'D'인 처방도 정상적인 흐름으로 처리 후 다시 반환처리 - 2009.06.04 (목) 김귀남
				//이선경 2008-07-23 end

				// 20101214 wify 경북대병원 일괄처리 추가 (출력 --> 불출까지)
			 	if(sNarcStat == "4" && chkAll == "Y" && chkAll1 == "Y"){		// [조제완료] 상태일 때
					astfCopyNodeSet("/root/send/narcinfo/narclist", "/root/main/narclist/narclist["+i+"]");
				 	iActing_Cnt++;
				 	sActing_nm = "불출";
				}
 
				if(sNarcStat == "4"){		// [조제완료] 상태일 때
					astfCopyNodeSet("/root/send/narcinfo/narclist", "/root/main/narclist/narclist["+i+"]");
				 	iActing_Cnt++;
				}

			 	sActing_nm = "불출";

			} else if(sActing == "DrugCncl"){	// ***불출취소***

				//이선경 2008-07-23 start
				if(sCnclStat != ""){
					if(messageBox("반환된 처방입니다. 불출취소를", "Q002") == "7") {
						return;
					}
				}
				//이선경 2008-07-23 end

				if(sNarcStat == "5"){		// [불출] 상태일 때
					astfCopyNodeSet("/root/send/narcinfo/narclist", "/root/main/narclist/narclist["+i+"]");
				 	iActing_Cnt++;
				}
				sActing_nm = "불출취소";

			} else if(sActing == "Spre"){		// ***잔량확인***
			//alert(sActing);
				
			 	// 20091111 이선경 수정 : 잔량확인 가능한 조건 변경
			 	//    1. 잔량이 0 이 아닌 경우 (실제 잔량이 있는 경우)는 잔량신청일 경우만 잔량확인이 되도록
				//    2. 잔량이 0 인 경우(빈 앰플반납하는 경우)는 부서확인일 경우만 잔량확인이 되도록	
				// 20091201 이선경 수정 : 처방상태가 O 인 경우만 잔량확인 가능하도록 조건 추가				
				//if( model.getValue("/root/init/nartype/item/nartype") == "Y"  || sRtnStat == "1"){		// [잔량신청] 일 때
				var spreqty = model.getValue("/root/main/narclist/narclist["+i+"]/spreqty");
				
				if(sPrcphistcd == 'O' && ((spreqty > 0 && sRtnStat == "1") || (spreqty == "0"  && sNarcStat >= "6" ))) {
					astfCopyNodeSet("/root/send/narcinfo/narclist", "/root/main/narclist/narclist["+i+"]");
				 	iActing_Cnt++;
				 	
				 	// [반환신청] 이거나 [외래] 경구약 혹은 외용제이면서 처방상태(sReturnFlag)가 [D/C]일 경우
				 	//  반환일시가 존재할때.
				 	if((sCnclStat == "1" || (sIOflag == "O" && (sDrugKind == "N" || sDrugKind == "Y")  && sReturnFlag == "Y"))
				 		&& model.getValue("/root/main/narclist/narclist["+i+"]/rtndt") != ""){
				 		var vb_prcpcd = model.getValue("/root/main/narclist/narclist["+i+"]/prcpcd");
				 		var vb_Chk = messageBox(vb_prcpcd+"마약에 대해 반환확인 데이터가 존재합니다.\n반환확인을 ", "Q004");
				 		if(vb_Chk == 6){
				 			model.makeValue("/root/send/narcinfo/narclist["+getNodesetCount("/root/send/narcinfo/narclist")+"]/acting_after", "Rtn");
				 		}
					}
				} else {
					messageBox(sMsg+"잔량 처리 대상이 아닙니다", "");
				}
				sActing_nm = "잔량반납확인";

			} else if(sActing == "SpreCncl"){		// ***잔량취소***
				if(sRtnStat == "2"){		// [잔량확인] 일 때
					astfCopyNodeSet("/root/send/narcinfo/narclist", "/root/main/narclist/narclist["+i+"]");
				 	iActing_Cnt++;

				}
				sActing_nm = "잔량취소";

			} else if(sActing == "Rtn"){		// ***반환확인***
					/*
						1. 입원 약주사, 외래주사는 간호사가 반환신청을 함
						2. 퇴원/외박/외출은 약국에서 반환을 수행(삭제, 간호에서 반환신청해야함)
						3. 외래 원내 약/외용약은 약국에서 반환을 수행
					*/

					//이선경 2008-07-23 start
					if( sIOflag !="O" && sCnclStat == "1" && sPrcphistcd == "E" && sDrugFlag !="L" && sDrugFlag != 'G'){
						//messageBox("간호투약확인후 반환확인을 ", "C002");
						//return;
					}
					//이선경 2008-07-23 end

					if(sCnclStat == "1"){ 		// [반환신청]상태일 때 (입원/외래 공통)
						
					/*} else if((sDrugFlag == "L" || sDrugFlag == "G") && (parseInt(sNarcStat,10) < 6 ) && sReturnFlag == "Y"){
						if(model.getValue("/root/main/narclist/narclist["+i+"]/rtnqty") != ""){
							astfCopyNodeSet("/root/send/narcinfo/narclist", "/root/main/narclist/narclist["+i+"]");
						 	iActing_Cnt++;
					 	} else {
					 		messageBox("반환량이 없습니다. 반환량을","C001");
					 		return;
					 	}*/

					 	if(model.getValue("/root/main/narclist/narclist["+i+"]/rtnqty") != ""){

					 		//if( sIOflag =="O" || sDrugFlag =="L" || sDrugFlag == 'G'){
					 			//병동추가 처방도 반환확인시 ast.adthdrug에 반환정보 insert
					 			if(model.getValue("/root/temp/srchinfo/narcflag") == "H") {
					 				fIptRtnCnts(i);
					 			}
					 		//}					 	
					 		
					 		astfCopyNodeSet("/root/send/narcinfo/narclist", "/root/main/narclist/narclist["+i+"]");
						 	iActing_Cnt++;
						 		
						} else {
					 		messageBox("반환량이 없습니다. 반환량을","C001");
					 		return;
					 	}
					 	if(sRtnStat == "1" && model.getValue("/root/main/narclist/narclist["+i+"]/rtndt") != ""){
					 		var vb_Chk = messageBox("잔량확인 데이터가 존재합니다.\n잔랑반납확인을 ", "Q004");
					 		if(vb_Chk == 6){
					 			model.makeValue("/root/send/narcinfo/narclist["+getNodesetCount("/root/send/narcinfo/narclist")+"]/acting_after", "Spre");
					 		}
						}
					} else if(sIOflag == "O" && (sDrugKind == "N" || sDrugKind == "Y")  && sReturnFlag == "Y"){	// [외래] 경구/외용약이면서 prcphistcd가 D,C 일 때
						if(model.getValue("/root/main/narclist/narclist["+i+"]/rtnqty") == "" ){
					 		messageBox("반환량이 없습니다. 반환량을","C001");
					 		return;
					 	}
					 	if(isNaN(model.getValue("/root/main/narclist/narclist["+i+"]/rtnqty"))){
					 		messageBox("반환량은 숫자로","C001");
					 		model.setValue("/root/main/narclist/narclist["+i+"]/rtnqty", "");
					 		return;
					 	}
					 	astfCopyNodeSet("/root/send/narcinfo/narclist", "/root/main/narclist/narclist["+i+"]");
					 	iActing_Cnt++;
					 	if(sRtnStat == "1" && model.getValue("/root/main/narclist/narclist["+i+"]/rtndt") != ""){
					 		var vb_prcpcd = model.getValue("/root/main/narclist/narclist["+i+"]/prcpcd");
					 		var vb_Chk = messageBox(vb_prcpcd+"마약에 대해 잔량확인 데이터가 존재합니다.\n잔랑반납확인을 ", "Q004");
					 		if(vb_Chk == 6){
					 			model.makeValue("/root/send/narcinfo/narclist["+getNodesetCount("/root/send/narcinfo/narclist")+"]/acting_after", "Spre");
					 		}
						}
					}
				sActing_nm = "반환확인";
				RtnCnfmYN = "Y";
				rtnprntflag = "Y";
			} else if(sActing == "RtnCncl"){		// ***반환취소***
				if(sCnclStat == "2"){		// [반환확인] 일 때
					astfCopyNodeSet("/root/send/narcinfo/narclist", "/root/main/narclist/narclist["+i+"]");
				 	iActing_Cnt++;

				}
				sActing_nm = "반환취소";
			}
		}
 	}
 	//=========================================== 제한조건 체크 Start ===========================================
 	if(iActing_Cnt == 0 && model.getValue("/root/temp/srchinfo/barcode") == ""){
 		messageBox("선택된 데이터중에 ["+sActing_nm+"]할 데이터가 없거나 \n선택된 데이터가","I004");
 		return;
 	} else if(iActing_Cnt == 0 && model.getValue("/root/temp/srchinfo/barcode") != ""){
 		messageBox("이미","I001");
 		model.setValue("/root/temp/srchinfo/barcode","");
		model.setFocus("input9");
		model.refresh();
 		return;
 	}

/*
    if ( model.getValue("/root/init/lbltype/item/lbltype3") == "Y" ){
    	if ( model.getValue("/root/send/lblskip") != "Y" ){
	 		fNarcLBLPrint("Prnt");
	 	}
    } else {
	 	if(sActing == "Prcp" && model.getValue("/root/temp/srchinfo/srchioflag") == "I" && model.getValue("/root/temp/srchinfo/drugflag") != "L"){
	 		if ( model.getValue("/root/send/lblskip") != "Y" ){
		 		fNarcLBLPrint("Prnt");
		 	}
	 	}
	 }
*/
 	model.copyNode("/root/send/narcinfo/srchinfo","/root/temp/srchinfo");
 	model.copyNode("/root/send/narcinfo/userinfo","/root/temp/userinfo/userinfo");
	model.makeValue("/root/send/narcinfo/srchinfo/acting", sActing);

/*    
    if ( model.getValue("/root/init/lbltype/item/lbltype3") == "Y" ){
    	if ( model.getValue("/root/send/lblskip") != "Y" ){
			submit("TXADT30102"); //라벨 출력 횟수 저장
	 	}
    } else {
		if(sActing == "Prcp" && model.getValue("/root/temp/srchinfo/srchioflag") == "I" && model.getValue("/root/temp/srchinfo/drugflag") != "L"){
	 		if ( model.getValue("/root/send/lblskip") != "Y" ){
				submit("TXADT30102"); //라벨 출력 횟수 저장
		 	}
	 	}
	}
*/
	//20091015 이선경 수정 : 조제확인시 라벨자동출력은 fNarcLBLPrint 함수에서 처방조회시 가져온 ioflag로 체크해서 출력 여부 결정
	//(수정원인 : 외래,병동 전체 조회 후 조제확인시 라벨자동출력이 안되는 현상이 있음)
	//if ( model.getValue("/root/send/lblskip") != "Y"  && sActing == "Prcp"){
	// 20101221 wify 경북대병원 처방전 일괄처리할때 라벨도 같이 출력 되도록 함.
	if ( model.getValue("/root/send/lblskip") != "Y"  && sActing == "Prcpdrug"){
		//fNarcLBLPrint("Prnt");
		fNarcLBLPrintR("Prnt");
		submit("TXADT30102"); //라벨 출력 횟수 저장
	}
   // 2013년 3월26일 김치국 아래 수행을 밑으로 내림 	
	//submit("TXADT30101");	
	//액팅전 체크표시 다시 표시
	//grd_narclist.fixedcellischeck(0, 1) = false;
	//grd_outnarc.fixedcellischeck(0, 1) = false;
	//fChkCash("after");

	// 반환처방전 자동출력 2009.07.30 pymi
	if(sActing_nm == "반환확인" || RtnCnfmYN == "Y") {
		fNarcPrint();  
	}
	
    // 2013년 3월26일 김치국 아래 수행을 밑으로 내림 		
	submit("TXADT30101");	
	//액팅전 체크표시 다시 표시
	grd_narclist.fixedcellischeck(0, 1) = false;
	grd_outnarc.fixedcellischeck(0, 1) = false;
	fChkCash("after");
	
	model.setValue("/root/temp/srchinfo/barcode","");
	model.setFocus("input9");
	model.refresh();
}


/**
 *	마약처방전 출력
 */
function fNarcPrint() {
	if(model.getValue("/root/temp/userinfo/userinfo/userid") == ""){
		messageBox("사용자ID가 없습니다. 사용자ID를 먼저","C001");
		model.setValue("/root/temp/srchinfo/barcode","");
		model.setFocus("input9");
		model.refresh();
		return;
	}
	var chkAll = model.getValue("/root/send/chkall");  // 20101206 wify 경북대병원 일괄처리 추가
	
	//액팅전 체크표시 cash
	fChkCash("before");

	for(var i = grd_narclist.fixedRows; i < grd_narclist.rows; i++){
		var sel = model.getValue("/root/main/narclist/narclist["+i+"]/sel");
		var narcstat = model.getValue("/root/main/narclist/narclist["+i+"]/narcstat");	// 불출상태
		var cnclstat = model.getValue("/root/main/narclist/narclist["+i+"]/cnclstat");	// 반환상태
		var ioflag = model.getValue("/root/main/narclist/narclist["+i+"]/ioflag");		// 입원외래구분
		var prntdt = model.getValue("/root/main/narclist/narclist["+i+"]/prntdt");		// 처방전출력일시
		var sPid = model.getValue("/root/main/narclist/narclist["+i+"]/pid");		// 환자번호
		var sPrcpcd = model.getValue("/root/main/narclist/narclist["+i+"]/prcpcd");	// 처방명
		var sDrugno = model.getValue("/root/main/narclist/narclist["+i+"]/drugno");	// 투약번호
		var rpt = model.getValue("/root/temp/reprnt"); //재출력구분 20101221 wify 경북대병원 처방전 재출력 추가
		
		var msg = "*투약번호 : "+sDrugno+"  *환자번호 : "+ sPid+ "  *약품코드 : "+ sPrcpcd + "\n";
		var result = "";
		var prntyn = "";	// 출력가능 여부
		

		/*이선경 2008-07-23 start
		if(sel == 'Y' && narcstat != "1")
		*///이선경 2008-07-23 end
		if(sel == 'Y'){
			
			
			// 20101221 wify 경북대병원 처방전 재출력시 재출력 체크 하지 않게 함.
			if (rpt=="Y" && narcstat == "1" || rpt == "Y" && narcstat == "2") {
				  alert("일괄처리후 재출력할수 있습니다.");
					return;
			}
			
			if(prntdt != "" && narcstat > 2 && rpt != "Y" && rtnprntflag != "Y") {
				var prntdata = prntdt.substring(0,4) + "년" + prntdt.substring(4,6) + "월" + prntdt.substring(6,8) + "일" +
								prntdt.substring(8,10) + ":" + prntdt.substring(10,12) + ":" + prntdt.substring(12,14);
				result = messageBox(prntdata + "에 출력한 처방입니다. 재출력을","Q003");
			} else {
				result = "6";
			}	

			if(result == "6") {
				model.copyNode("/root/send/prntinfo","/root/main/narclist/narclist["+i+"]");
				model.makeValue("/root/send/prntinfo/prntid", model.getValue("/root/temp/userinfo/userinfo/userid"));
				// ************************ [반환처방전] 출력 ************************
				if(cnclstat != ""){
					if(ioflag == "I"){
						// 반환신청, 반환확인, 반환종료시(출력완료, 조제완료 일 때만) 반환처방전 출력 가능
						// 20091201 이선경 수정 : 반환신청일때는 제외, 반환확인, 반환종료상태만 가능
						// 2013년 3월 26일 김치국 반환신청(cnclstat == "1")일때도 처방전 출력으로 원복
						if(cnclstat == "1" || cnclstat == "2" || (parseInt(narcstat) >= 3 && parseInt(narcstat) <= 4 && cnclstat == "7")){	
					//	if(cnclstat == "2" || (parseInt(narcstat) >= 3 && parseInt(narcstat) <= 4 && cnclstat == "7")){	
							model.makeValue("/root/send/prntinfo/prntflag", "D");
							prntyn = "Y";
						} else {
							if(cnclstat == "7" ){
								//메세지처리 반환종료 된 처방입니다.
								messageBox(msg+"반환","I002");
								continue;
							} else {
								//메세지처리 반환확인해야 합니다.
								messageBox(msg+"반환확인시 반환처방전 출력","I006");
								continue;
							}
							continue;
						}
					} else {
						if(cnclstat == "0"){
							//반환확인후 출력가능합니다.
							messageBox(msg+"반환확인후 출력","I006");
							continue;
						} else {
							model.makeValue("/root/send/prntinfo/prntflag", "D");
							prntyn = "Y";
						}
					}
				// ************************ [마약처방전] 출력 ************************
				} else {
					if(narcstat == "1"){
						//불출신청이 되어야 출력가능합니다.
						messageBox(msg+"불출신청 이후 출력","I006");
						continue;
					} else {
						model.makeValue("/root/send/prntinfo/prntflag", "O");
						prntyn = "Y";
					}
				}
				if(prntyn == "Y"){
			 		submit("TRADT30103");
				 	if(model.getValue("/root/main/prntlist/patinfo/drugno") != ""){
						//처방전에 DUR이 존재하면 RFADT30105 존재하지 않으면 RFADT30100 출력
						var resn = model.getValue("/root/main/prntlist/resn/resnnm");		
						// 반환일경우  수량에 (-) 표시
						if 	(cnclstat == '0' ||  cnclstat == '1' ||  cnclstat == '2' ||  cnclstat == '7' ) 
						{
							var totdrugqty =  model.getValue("/root/main/prntlist/prntlist/totdrugqty") ;
							totdrugqty = totdrugqty * -1 ;
									model.setValue("/root/main/prntlist/prntlist/totdrugqty", totdrugqty );
							}
						
						if( resn == ""){
							//1일기준인지 1회기준인지 체크하여 컬럼을 hidden
							var colHidnValue = grdBaseColHidn("D");
							if( colHidnValue == "C") {//1회 기준
								model.makeValue("/root/main/prntlist/patinfo/prcpvolchk", "Y");
							}
							//20101119_wify_경북대병원_마약처방전 폼 변경
							// RFADT30100 ==> RFADT30106
							// RFADT30105 ==> RFADT30107
				 			exeReportPreview("RFADT30106", "XMLSTR", "", "", "true","","","","","true");
				 		}else{
				 			exeReportPreview("RFADT30107", "XMLSTR", "", "", "true","","","","","true");
				 		}
				 	}
				}
			}
		}
	}
	// 20101206 wify 경북대병원 처방전 출력후 체크표시 및 출력완료 표시
	if ( chkAll == "" ) {
			fGetNarcData();
 			//액팅전 체크표시 다시 표시
 			grd_narclist.fixedcellischeck(0, 1) = false;
			grd_outnarc.fixedcellischeck(0, 1) = false;
			fChkCash("after");
	}		
}

/**
 *	마약라벨 출력
 */
function fNarcLBLPrint(chk) {
	var reprint="";

	model.copyNode("/root/init/barcdprntsetup", "/root/main/barcdprntsetup");

	//20091015 이선경 수정 : 자동출력 기본이 병동(퇴원제외)만이나 lbltype3이 "Y"이면 외래, 퇴원도 모두 출력됨
	var lbltype3 = model.getValue("/root/init/lbltype/item/lbltype3");
	
	for(var i = grd_narclist.fixedRows; i < grd_narclist.rows; i++){
		var sel = model.getValue("/root/main/narclist/narclist["+i+"]/sel");
		var sNarcStat = model.getValue("/root/main/narclist/narclist["+i+"]/narcstat");
		var ioflag = model.getValue("/root/main/narclist/narclist["+i+"]/ioflag");
		var drugflag = model.getValue("/root/main/narclist/narclist["+i+"]/drugflag");
		var sPrcphistcd = model.getValue("/root/main/narclist/narclist["+ i +"]/prcphistcd");  // 2010.03.15 pymi
		//model.removeNodeset("/root/send/narcinfo/narclist");
		
		//20091015 이선경 수정 : 조제확인시 라벨자동출력은 fNarcLBLPrint 함수에서 처방조회시 가져온 ioflag로 체크해서 출력 여부 결정
		//(수정원인 : 외래,병동 전체 조회 후 조제확인시 라벨자동출력이 안되는 현상이 있음)

		if(sel == 'Y' && ((chk == "Prnt" && sNarcStat == "3" && sPrcphistcd != "D" && (lbltype3 == "Y" || (ioflag == "I" && drugflag != "L" && drugflag != "G"))) || (chk == "Reprnt" && parseInt(sNarcStat,10) > 3))){  // 2010.03.15 pymi 반환완료된 처방 제외
			// Comm 설정
			//CommAX.CommPort = "1";  // 출력 Port
			//CommAX.Settings = "9600,n,8,1";  // Comm 설정
			PrnKind = model.getvalue("/root/init/barcdprntsetup/prntsetupinfo/setupinfo/prntkind");
			PrnMarginLeft =  model.getvalue("/root/init/barcdprntsetup/prntsetupinfo/setupinfo/blank/left");
			PrnMarginTop =  model.getvalue("/root/init/barcdprntsetup/prntsetupinfo/setupinfo/blank/top");
			var commkind = model.getvalue("/root/init/barcdprntsetup/prntsetupinfo/setupinfo/commkind")
			if ( PrnKind ==7 ) {
				CommAX.PrnKind =4;
			} else {
				CommAX.PrnKind =PrnKind;
			}
			
			if(commkind == "02") {
				CommAX.PortNm = 1;
			} else {
				CommAX.PortNm = 2;
			}

			if(commkind == "01") {
				CommAX.PrtNm = model.getvalue("/root/init/barcdprntsetup/prntsetupinfo/setupinfo/comm01/setupval");
			}

			var sSndMsg = "";	//라벨출력내용

			if ( model.getValue("/root/main/narclist/narclist["+i+"]/lblprnttims")>0 ){
				reprint ="(재)";
			}

			//astfCopyNodeSet("/root/send/narcinfo/narclist", "/root/main/narclist/narclist["+i+"]");

			//if ( CommAX.PortOpen() == true) {
				//시작(X, Y)
				sSndMsg += astfStartFormat(0, 0, "S");
				//라벨이름
				var nm = "";
				if(model.getValue("/root/main/narclist/narclist["+i+"]/narcflag") == "M") {
					nm = "마 약";
				}else {
					nm = "향 정";
				}
				sSndMsg += astfPrintOut(50, 40, 10, nm,"");

				//처방일자
				sSndMsg += astfPrintOut(245, 40, 34, fGetDateString(model.getValue("/root/main/narclist/narclist["+i+"]/prcpdd")),"");
				//환자번호
				sSndMsg += astfPrintOut(245, 75, 34, model.getValue("/root/main/narclist/narclist["+i+"]/pid"),"");
				//수행부서명
				var issdept = model.getValue("/root/main/narclist/narclist["+i+"]/issdeptcdnm");
				sSndMsg += astfPrintOut(35, 120, 3,issdept.substring(0, 5) ,"");
				//병실
				sSndMsg += astfPrintOut(150, 120, 3, "("+model.getValue("/root/main/narclist/narclist["+i+"]/roomcd") + ")","");
				//환자이름+투약번호
				var sPid_Drugno  = model.getValue("/root/main/narclist/narclist["+i+"]/patnm")
										+ " (" + model.getValue("/root/main/narclist/narclist["+i+"]/drugno")+reprint + ")";
				sSndMsg += astfPrintOut(245, 120, 3, sPid_Drugno,"");
				//선그리기
				sSndMsg += astfGraphicBox(10, 155, 450, 0, 3);

				//마약코드
				sSndMsg += astfPrintOut(30, 170, 3, model.getValue("/root/main/narclist/narclist["+i+"]/prcpcd"),"");
				
				//1일기준인지 1회기준인지 체크
				var colHidnValue = grdBaseColHidn("D");
				if( colHidnValue == "C") {//1회 기준
					//일용량
					sSndMsg += astfPrintOut(250, 170, 4, model.getValue("/root/main/narclist/narclist["+i+"]/prcpvol2")+model.getValue("/root/main/narclist/narclist["+i+"]/prcpvolunit"),"");
					//일수량
					sSndMsg += astfPrintOut(360, 170, 4, model.getValue("/root/main/narclist/narclist["+i+"]/prcpqty2")+model.getValue("/root/main/narclist/narclist["+i+"]/prcpqtyunit"),"");
				} else {
					//일용량
					sSndMsg += astfPrintOut(250, 170, 4, model.getValue("/root/main/narclist/narclist["+i+"]/prcpvol")+model.getValue("/root/main/narclist/narclist["+i+"]/prcpvolunit"),"");
					//일수량
					sSndMsg += astfPrintOut(360, 170, 4, model.getValue("/root/main/narclist/narclist["+i+"]/totdrugqty")+model.getValue("/root/main/narclist/narclist["+i+"]/prcpqtyunit"),"");
				}

				//마약명칭
				sSndMsg += astfPrintOut(30, 210, 28, "("+model.getValue("/root/main/narclist/narclist["+i+"]/drugnm")+")","");

				// 바코드(21자리) : 마약구분(1)+입원/외래구분(1)+반납구분(1)+처방일자(8)+처방번호(10)
		        var narcflag = model.getValue("/root/main/narclist/narclist["+i+"]/narcflag");
		        var ioflag = model.getValue("/root/main/narclist/narclist["+i+"]/ioflag");
		        var returnflag = model.getValue("/root/main/narclist/narclist["+i+"]/returnflag");
		        if(returnflag ==""){
		        	returnflag = "O";
		        } else {
		        	returnflag = "D";
		        }
		        var prcpdd = model.getValue("/root/main/narclist/narclist["+i+"]/prcpdd");
		        var prcpno = model.getValue("/root/main/narclist/narclist["+i+"]/prcpno");
		        var drugseqno ="";
		        if ( ioflag =="O" ){
		        	drugseqno = model.getValue("/root/main/narclist/narclist["+i+"]/drugseqno");
		        }
				var iLen = prcpno.length;
		        for(var j=iLen; j<10; j++) {
		        	prcpno = "0" + prcpno;
		        }

		        var sResult = narcflag+ioflag+returnflag+prcpdd+prcpno+drugseqno;
				
		        //바코드(변환)
		        if(PrnKind == "2" || PrnKind == "7" ) {
					sSndMsg += astfBarCode_Code39(100, 242, "N", 40, sResult, "S");
				} else {
					sSndMsg += astfBarCode_Code39(30, 245, "N", 40, sResult, "S");
				}
				//sSndMsg += astfPrintOut(30, 310, 28, sResult,"");
				//처방입력일시
				sSndMsg += astfPrintOut(30, 310, 28, "처방입력일시 : "+fGetDateString(model.getValue("/root/main/narclist/narclist["+i+"]/rgstdt")),"");


	            sSndMsg += astfEndFormat(0);
	            CommAX.SendMsg(sSndMsg);
				sSndMsg = "";

				gTimer = window.setInterval("fStopTimer()",10000);

				//CommAX.PortClose();
				model.refresh();

			//}
	 	}
 	}
 	//submit("TXADT30102");
}

/**
 *
 */
function fStopTimer() {
	window.clearinterval(gTimer);
}

function fGetDateString( s ){
	var dates = "";
	if(s.length >8){
		dates = s.substring(0,4) +"/" +s.substring(4,6)+"/" +s.substring(6,8)+"  "+s.substring(8,10)+":"+s.substring(10,12)+":"+s.substring(12,14);
	} else {
		dates = s.substring(0,4) +"/" +s.substring(4,6)+"/" +s.substring(6,8);
	}
	return dates;
}

/**
 *	반환량입력시
 */
function fIptRtnCnts(rowid) {
 	var RtnCnts = model.getValue("/root/main/narclist/narclist["+rowid+"]/rtnqty");
 	var RtnCnfmDt = model.getValue("/root/main/rtnlist/rtnlist["+rowid+"]/rtncnfmdt");
 	if(RtnCnts != ""){
	 	//반납의뢰인 약품만 반납처리함
	 	if(RtnCnfmDt != ""){
	 		messageBox("반환종료된 약품","E008");
	 		return;
	 	}
	 	//반납량을 입력하지 않았을 경우
	 	if(RtnCnts == "0"){
	 		messageBox("반환량을","C001");
	 		model.setValue("/root/main/narclist/narclist["+rowid+"]/rtnqty", "");
	 		return;
	 	}

	 	if(isNaN(RtnCnts)){
	 		messageBox("반환량은 숫자로","C001");
	 		model.setValue("/root/main/narclist/narclist["+rowid+"]/rtnqty", "");
	 		return;
	 	}
	 	
	 	//반납로직을 위한 변수 선언
	 	var IOFlag = model.getValue("/root/main/narclist/narclist["+rowid+"]/ioflag");
	 	var PrcpClscd = model.getValue("/root/main/narclist/narclist["+rowid+"]/prcpclscd");
	 	var PrcpGenrflag = model.getValue("/root/main/narclist/narclist["+rowid+"]/prcpgenrflag");
	 	var PrcpKindcd = model.getValue("/root/main/narclist/narclist["+rowid+"]/prcpkindcd");	
	 	
	 	
	 	if(IOFlag == "O"){ 	
	 		//수가계산방식에 따른 변화량
	    	var sCalcmthdcd = model.getValue("/root/main/narclist/narclist["+rowid+"]/calcmthdcd");
	 		//반납재고량 계산을 위한 변수 선언
	 		var DeliveCrite = model.getValue("/root/main/narclist/narclist["+rowid+"]/delivecrite");
		 	var iRtnCnts = parseInt(RtnCnts, 10);
		 	var iLimitCnts = 0;
		 	var PrcpQty = parseFloat(model.getValue("/root/main/narclist/narclist["+rowid+"]/prcpqty"));
		 	var DayPrcpQty = parseFloat(model.getValue("/root/main/narclist/narclist["+rowid+"]/dayprcpqty"));
		 	var PrcpTims = parseInt(model.getValue("/root/main/narclist/narclist["+rowid+"]/prcptims"), 10);
		 	var PrcpDayno = parseInt(model.getValue("/root/main/narclist/narclist["+rowid+"]/prcpdayno"), 10);
		 	var RtnStocQty = 0;	
	 		if(PrcpClscd == "A4" || sCalcmthdcd == 4){
	 			//외래 외용제 (수량반납)
	 			if(sCalcmthdcd == 4){
		 			iLimitCnts = DayPrcpQty;
		 		} else if(sCalcmthdcd == 5){
	 				iLimitCnts = DayPrcpQty*PrcpDayno;
	 			} else {
	 				iLimitCnts = DayPrcpQty*PrcpDayno;
	 			}
	 			if(iRtnCnts > iLimitCnts){
	 				messageBox("반납 가능한 양을","E003");
			 		model.setValue("/root/main/narclist/narclist["+rowid+"]/rtncnts", "");		 		
			 		return;
	 			}
				RtnStocQty = fCalStocQty("Q", DeliveCrite, iRtnCnts, "", "", rowid); 	
				
				//투약내역에 들어간 반납결과 수치 계산
				model.setValue("/root/main/narclist/narclist["+rowid+"]/rtndrugtims", model.getValue("/root/main/narclist/narclist["+rowid+"]/prcptims"));
		 		model.setValue("/root/main/narclist/narclist["+rowid+"]/rtndrugdayno", model.getValue("/root/main/narclist/narclist["+rowid+"]/prcpdayno"));	
	 		} else if(PrcpGenrflag == "O" || 
	 			((PrcpGenrflag == "I" || PrcpGenrflag == "E" || PrcpGenrflag == "D") && (PrcpKindcd == "50" || PrcpKindcd == "60" || PrcpKindcd == "70")) ){
	 			//외래 약주사 또는 입원에서 전환된 퇴원/외출/외박약 (일수반납)
	 			iLimitCnts = PrcpDayno;
	 			if(iRtnCnts > iLimitCnts){
	 				messageBox("반납 가능한 양을","E003");
			 		model.setValue("/root/main/narclist/narclist["+rowid+"]/rtncnts", "");
			 		return;
	 			}
	 			/*if(PrcpClscd == "A6"){
	 				//주사제 처리 반납량 따로 계산
	 				RtnStocQty = fCalStocQty("I", DeliveCrite, iRtnCnts, PrcpQty, PrcpTims);
	 			} else {
	 				RtnStocQty = fCalStocQty("D", DeliveCrite, iRtnCnts, PrcpQty, PrcpTims);
	 			}*/
	 			RtnStocQty = fCalStocQty("D", DeliveCrite, iRtnCnts, PrcpQty, PrcpTims, rowid);
	 			
	 			
	 			//투약내역에 들어간 반납결과 수치 계산	 			
	 			model.setValue("/root/main/narclist/narclist["+rowid+"]/rtndrugtims", model.getValue("/root/main/narclist/narclist["+rowid+"]/prcptims"));
		 		model.setValue("/root/main/narclist/narclist["+rowid+"]/rtndrugdayno", iRtnCnts);	
	 		} else if(PrcpGenrflag == "I" || PrcpGenrflag == "E" || PrcpGenrflag == "D"){
	 			//입원에서 전환된 그외 처방 (횟수반납)
	 			iLimitCnts = PrcpTims*PrcpDayno;
	 			if(iRtnCnts > iLimitCnts){
	 				messageBox("반납 가능한 양을","E003");
			 		model.setValue("/root/main/narclist/narclist["+rowid+"]/rtncnts", "");
			 		return;
	 			}
	 			
	 			RtnStocQty = fCalStocQty("T", DeliveCrite, iRtnCnts, PrcpQty, "", "", rowid); 
	 			
	 			//투약내역에 들어간 반납결과 수치 계산
	 			var temp = iRtnCnts%PrcpDayno;
	 			var RtnDrugDayno = 0;
	 			var RtnDrugTims = 0;
	 			RtnDrugTims = iRtnCnts;
	 			RtnDrugDayno = 1;
	 			model.setValue("/root/main/narclist/narclist["+rowid+"]/rtndrugtims", RtnDrugTims);
		 		model.setValue("/root/main/narclist/narclist["+rowid+"]/rtndrugdayno", RtnDrugDayno);		
	 		}
	 	} else if(IOFlag == "I"){
	 		//반납재고량 계산을 위한 변수 선언
	 		var DeliveCrite = model.getValue("/root/main/narclist/narclist["+rowid+"]/delivecrite");
		 	var iRtnCnts = parseInt(RtnCnts, 10);
		 	var iLimitCnts = 0;
		 	var PrcpQty = parseFloat(model.getValue("/root/main/narclist/narclist["+rowid+"]/prcpqty"));
		 	var DayPrcpQty = parseFloat(model.getValue("/root/main/narclist/narclist["+rowid+"]/dayprcpqty"));
		 	var PrcpTims = parseInt(model.getValue("/root/main/narclist/narclist["+rowid+"]/prcptims"), 10);
		 	var PrcpDayno = parseInt(model.getValue("/root/main/narclist/narclist["+rowid+"]/prcpdayno"), 10);
		 	var RtnStocQty = 0;	
	 		if(PrcpClscd == "A4"){
	 			//외래 외용제 (수량반납)
	 			if(sCalcmthdcd == 4){
		 			iLimitCnts = DayPrcpQty;
		 		} else if(sCalcmthdcd == 5){
	 				iLimitCnts = DayPrcpQty*PrcpDayno;
	 			} else {
	 				iLimitCnts = DayPrcpQty*PrcpDayno;
	 			}
	 			if(iRtnCnts > iLimitCnts){
	 				messageBox("반납 가능한 양을","E003");
			 		model.setValue("/root/main/narclist/narclist["+rowid+"]/rtncnts", "");
			 		return;
	 			}
				RtnStocQty = fCalStocQty("Q", DeliveCrite, iRtnCnts, "", "", rowid); 	
				
				//투약내역에 들어간 반납결과 수치 계산
				model.setValue("/root/main/narclist/narclist["+rowid+"]/rtndrugtims", model.getValue("/root/main/narclist/narclist["+rowid+"]/prcptims"));
		 		model.setValue("/root/main/narclist/narclist["+rowid+"]/rtndrugdayno", model.getValue("/root/main/narclist/narclist["+rowid+"]/prcpdayno"));	
	 		} else if(PrcpGenrflag == "O" || 
	 			((PrcpGenrflag == "I" || PrcpGenrflag == "E" || PrcpGenrflag == "D") && (PrcpKindcd == "50" || PrcpKindcd == "60" || PrcpKindcd == "70")) ){
	 			//외래 약주사 또는 입원에서 전환된 퇴원/외출/외박약 (일수반납)
	 			iLimitCnts = PrcpDayno;
	 			if(iRtnCnts > iLimitCnts){
	 				messageBox("반납 가능한 양을","E003");
			 		model.setValue("/root/main/narclist/narclist["+rowid+"]/rtncnts", "");
			 		return;
	 			}
	 			
	 			RtnStocQty = fCalStocQty("D", DeliveCrite, iRtnCnts, PrcpQty, PrcpTims, rowid); 		
	 			
	 			
	 			//투약내역에 들어간 반납결과 수치 계산
	 			model.setValue("/root/main/narclist/narclist["+rowid+"]/rtndrugtims", model.getValue("/root/main/narclist/narclist["+rowid+"]/prcptims"));
			 	model.setValue("/root/main/narclist/narclist["+rowid+"]/rtndrugdayno", iRtnCnts); 		
	 		} else if(PrcpGenrflag == "I" || PrcpGenrflag == "E" || PrcpGenrflag == "D"){
	 			//입원에서 전환된 그외 처방 (횟수반납)
	 			iLimitCnts = PrcpTims*PrcpDayno;
	 			if(iRtnCnts > iLimitCnts){
	 				messageBox("반납 가능한 양을","E003");
			 		model.setValue("/root/main/narclist/narclist["+rowid+"]/rtncnts", "");
			 		return;
	 			}
	 			
	 			RtnStocQty = fCalStocQty("T", DeliveCrite, iRtnCnts, PrcpQty, "", rowid); 	
	 			
	 			//투약내역에 들어간 반납결과 수치 계산
	 			var temp = iRtnCnts%PrcpDayno;
	 			var RtnDrugDayno = 0;
	 			var RtnDrugTims = 0;
	 			RtnDrugTims = iRtnCnts;
	 			RtnDrugDayno = 1;
	 			model.setValue("/root/main/narclist/narclist["+rowid+"]/rtndrugtims", RtnDrugTims);
		 		model.setValue("/root/main/narclist/narclist["+rowid+"]/rtndrugdayno", RtnDrugDayno);	
	 		}
	 	}
	 	
	 	model.setValue("/root/main/narclist/narclist["+rowid+"]/rtnstocqty", fChkFloat(RtnStocQty));
	 	model.setValue("/root/main/narclist/narclist["+rowid+"]/sel", "Y");
	 	//rowid++;
	 	//grd_outnarc.isSelected(rowid) = true;
	 	model.refresh();
	 	
 	}
 }


/**
 * 
 */
function fChkFloat(qty) {
	var fQty = parseFloat(qty);
	var fRst = "";
	
	if(fQty%1 == 0){
		fRst = parseInt(qty);
	} else {
		fRst = qty;
	}
	
	return fRst;
}

/**
 *	병동/외래구분 체크시
 */
function fChkIOFlag() {
 	var chk = model.getValue("/root/temp/srchinfo/srchioflag");
 	if(chk.length == 7){
 		model.setValue("/root/temp/srchinfo/iototalflag", "T");
 	} else {
 		model.setValue("/root/temp/srchinfo/iototalflag", "");
 	}
 	model.refresh();
}

/**
 *	userid 변경시
 */
function fChgUserID() {
	var sUserid = model.getValue("/root/temp/srchinfo/srchid");
	// 20100728_경북대_laboru_userid 길이체크 삭제
	//if(sUserid.length == 8 || sUserid.length == 9 || sUserid.length == 10){
		model.setValue("/root/send/userinfo/userid", sUserid);
		submit("TRADT30104");
		if(model.getValue("/root/temp/userinfo/userinfo/userid") == ""){
			messageBox("사용자ID 정보가 없습니다.\n다시","C001");
			model.setValue("/root/temp/srchinfo/srchid","");
			model.setFocus("ipt_srchid");
		} else {
			model.setValue("/root/temp/srchinfo/srchid","");
			model.setFocus("ipt_srchid");
			model.refresh();
			model.setFocus("input9");
		}
	/*} else {
		messageBox("사용자ID 정보가 다릅니다.\n다시","C001");
		model.setValue("/root/temp/srchinfo/srchid","");
		model.setFocus("ipt_srchid");
	}*/

	model.refresh();
}


/**
 *	토글클릭시
 */
function fClickToggle(chk) {
	if(chk == "1"){
		model.setValue("/root/temp/srchinfo/srchroot", "M");
	} else if(chk == "2"){
		model.setValue("/root/temp/srchinfo/srchroot", "R");
	}
	fChgSwitch();

	fGetNarcData();

}

/**
 *	입원외래구분 클릭시
 */
function fChgIOFlag() {
	var ioflag = model.getValue("/root/temp/srchinfo/srchioflag");
	
	// ========================== 병동, 퇴원/외박/외출 radio 컨트롤 visible ==========================
	if(ioflag == "O"){
		model.setValue("/root/temp/srchinfo/drugflag", "");
		rdo_drugflag.visible = false;
		grd_outnarc.colhidden(grd_outnarc.colRef("prcpkindnm")) = true; //20090811 처방구분숨기기
		
		if(model.getValue("/root/temp/srchinfo/narcflag") == "H") {
	   		combo2.select(3);//외래향정일때 실시일자
	   } else {
	   		combo2.select(1);//그외 적용일자
	   }
	} else if(ioflag == "I"){
		model.setValue("/root/temp/srchinfo/drugflag", "I");
		rdo_drugflag.visible = true;
		grd_outnarc.colhidden(grd_outnarc.colRef("prcpkindnm")) = false; //20090811 처방구분보이기
		combo2.select(1);//그외 적용일자
	}
	// =========================================================================================

	// ========================== 병동 Combo 조회===========================
	model.makeValue("/root/send/srchcond/deptflag", "W");
	
	submit("TRADT30401");
	model.copyNode("/root/temp/drugdeptinfo","/root/temp/srchcond"); 	//수행부서 셋팅
	//astfAddCombo("/root/temp/drugdeptinfo", "dept", "deptcd,deptnm", "2010302030,소화기센터내시경실");	//수행부서 셋팅
	astfAddCombo("/root/temp/drugdeptinfo", "dept", "deptcd,deptnm", "3073100000,수술실 마취");	//수행부서 셋팅
	astfAddCombo("/root/temp/drugdeptinfo", "dept", "deptcd,deptnm", "3073300000,수술실 회복실");	//수행부서 셋팅
    	astfAddCombo("/root/temp/drugdeptinfo", "dept", "deptcd,deptnm", ",");

	astfAddCombo("/root/temp/srchcond", "dept", "deptcd,deptnm", "3073100000,수술실 마취");	//불출신청부서 셋팅
	astfAddCombo("/root/temp/srchcond", "dept", "deptcd,deptnm", "3073300000,수술실 회복실");	//불출신청부서 셋팅
	// astfAddCombo("/root/temp/drugdeptinfo", "dept", "deptcd,deptnm", "2010702000,인공신장실");	//불출신청부서 셋팅
	
	
	submit("TRADT30405");
	copyNodeListType("/root/temp/drugdeptinfo","/root/temp/dutdeptinfo/dept	", "after");
	copyNodeListType("/root/temp/srchcond","/root/temp/dutdeptinfo/dept	", "after");
	astfAddCombo("/root/temp/srchcond", "dept", "deptcd,deptnm", ",");
	model.refresh();

	fChgSwitch();

	fGetNarcData();
	submit("TRADT30101");
}

/**
 *	switch case변경
 */
function fChgSwitch() {
	var srchroot = model.getValue("/root/temp/srchinfo/srchroot");
	var ioflag = model.getValue("/root/temp/srchinfo/srchioflag");
	var drugflag = model.getValue("/root/temp/srchinfo/drugflag");
	if(srchroot == "M"){
		if(ioflag == "O"){
			model.toggle("case3");
		} else {
			if(drugflag == "L"){
				model.toggle("case3");
			} else {
				model.toggle("case1");
			}
		}
	} else if(srchroot == "R"){
		model.toggle("case2");
	}
	model.refresh();
}

/**
 *	환자별 조회인지 체크
 */
function fChkPatSearch(param_grid) {
	var pid = model.getValue("/root/temp/srchinfo/pid");
	if(pid != "" && param_grid.rows != 0){
		for(var i = param_grid.fixedRows; i < param_grid.rows; i++){
			if(model.getValue("/root/main/narclist/narclist["+i+"]/narcstat") != "1"){
				model.setValue("/root/main/narclist/narclist["+i+"]/sel", "Y");
			}
		}
		model.refresh();
	}
}

/**
 *	액팅후 체크표시 cach
 */
function fChkCash(chk) {
	var pid = model.getValue("/root/temp/srchinfo/pid");
	var param_grid = "";
	if(switch1.selectedIndex == 0){
		param_grid = grd_narclist;
	} else {
		param_grid = grd_outnarc;
	}

	//if(pid != "" && param_grid.rows != 0){
	if(param_grid.rows != 0){  // 2009.07.30 pymi
		if(chk == "before"){
			model.removeNodeset("/root/temp/chkcashinfo/narclist");
			for(var i = param_grid.fixedRows; i < param_grid.rows; i++){
				if(model.getValue("/root/main/narclist/narclist["+i+"]/sel") == "Y"){
					astfCopyNodeSet("/root/temp/chkcashinfo/narclist", "/root/main/narclist/narclist["+i+"]");
				}
			}
		} else if (chk == "after"){
			for(var a = 1; a <= getNodesetCount("/root/temp/chkcashinfo/narclist"); a++){
				var cash_prcpdd = model.getValue("/root/temp/chkcashinfo/narclist["+a+"]/prcpdd");
				var cash_prcpno = model.getValue("/root/temp/chkcashinfo/narclist["+a+"]/prcpno");
				for(var b = param_grid.fixedRows; b < param_grid.rows; b++){
					var search_prcpdd = model.getValue("/root/main/narclist/narclist["+b+"]/prcpdd");
					var search_prcpno = model.getValue("/root/main/narclist/narclist["+b+"]/prcpno");
					if(cash_prcpdd == search_prcpdd && cash_prcpno == search_prcpno){
						model.setValue("/root/main/narclist/narclist["+b+"]/sel", "Y");
					}
				}
			}
		} else {

		}
		model.refresh();
	}
}


/**
 *  불출계산에 따른 반납재고량 계산
 *  계산 방식 
 *  원처방 불출량(totdrugqty) - 살아있는처방 불출량 계산 = 반환된 불출량
 */
function fCalStocQty(RtnType, DeliveCrite, RtnCnts, Qty, Tims, rowid) {
    var dResult = 0;
	var PackVol = parseFloat(model.getValue("/root/main/narclist/narclist["+rowid+"]/packvol"));
	var NearIntNum = 0;
	var RoundNum = 0;
//alert("Start : " + DeliveCrite + ", " + pQty + ", " + pRtnTims);

	//수가계산방식에 따른 변화량
    var sCalcmthdcd = model.getValue("/root/main/narclist/narclist["+rowid+"]/calcmthdcd");
   
    if ( Tims == null ) { Tims =1; }
	if(RtnType == "Q"){
		//수량반납
		//외용약만 수량반납하므로 무조건 올림처리
        dResult = Math.ceil(RtnCnts);
    } else if(RtnType == "T"){
    	//횟수반납
    	// 횟수반납시에는 RtnCnts가 횟수이므로 Tims는 제외
    	
    	//살아있는 처방 불출량 계산을 위한 횟수 변환
    	var iPrcptims = model.getValue("/root/main/narclist/narclist["+rowid+"]/prcptims");
    	var itotdrugqty = model.getValue("/root/main/narclist/narclist["+rowid+"]/totdrugqty");
    	if(iPrcptims == RtnCnts){
    		//살아있는 처방이 없으므로 불출량은 원처방 불출량(totdrugqty)임
    		return itotdrugqty;
    	} else {
    		//살아있는 처방이 있으면 살아있는 처방의 횟수를 계산
    		RtnCnts = iPrcptims - RtnCnts;
    	}
    	
    	// 1 : 단가*수량*횟수*일수
	    // 4 : 단가*수량
	    // 5 : 단가*수량*일수             
	    if(sCalcmthdcd ==  "1"){
	    	//초기화 없이 다 계산처리함	            
	    } else  if(sCalcmthdcd == "4" || sCalcmthdcd == "5"){
	    	//횟수, 일수 1로 초기화
	        RtnCnts = "1";
	    }    	
    	
	    if (DeliveCrite == "1") {
	    	// 처방대로
	        dResult = Math.round(Qty*RtnCnts*1000)/1000;
	    } else if (DeliveCrite == "2") {
	    	// 1/4 1회 올림  --> 1/2 1회 올림 수정 
	    	/*NearIntNum = Math.floor(Qty);
            RoundNum = Qty - NearIntNum;    	
			if(RoundNum >= 0.5){
	        	dResult = Math.round((NearIntNum+0.5)*RtnCnts*1000)/1000;
	        } else {
	        	dResult = Math.round((NearIntNum+1)*RtnCnts*1000)/1000;
	        }*/
	        dResult = Math.round(Math.ceil(Qty)*Tims*RtnCnts*1000)/1000;			
	    } else if (DeliveCrite == "3") {
	    	// 1/2 1회 올림 
        	dResult = Math.round(Math.ceil(Qty)*RtnCnts*1000)/1000;
	        
	    } else if (DeliveCrite == "4") {
	    	// 1/4 1일 올림 
	    	NearIntNum = Math.floor(Qty*Tims);
            RoundNum = (Qty*Tims) - NearIntNum;    
	    	if(RoundNum >= 0.5){
	        	dResult = Math.round((NearIntNum+0.5)*(RtnCnts/Tims)*1000)/1000;
	        } else {
	        	dResult = Math.round((NearIntNum+1)*(RtnCnts/Tims)*1000)/1000;
	        }
	    } else if (DeliveCrite == "5") {
	    	// 1/2 1일 올림
	    	//alert(Tims);
        	dResult = Math.round(Math.ceil(Qty*Tims)*(RtnCnts/Tims)*1000)/1000;
	    } else if (DeliveCrite == "6") {
	    	// 계산후 올림
	        dResult = Math.ceil(Qty*RtnCnts);
	    }
	    // 원처방 불출량(totdrugqty) - 살아있는처방 불출량 계산 = 반환된 불출량
	    dResult = itotdrugqty - dResult;	    
	    
    } else if(RtnType == "D"){
	    //일수반납
	    
	    //살아있는 처방 불출량 계산을 위한 횟수 변환
    	var iPrcpDayno = model.getValue("/root/main/narclist/narclist["+rowid+"]/prcpdayno");
    	var itotdrugqty = model.getValue("/root/main/narclist/narclist["+rowid+"]/totdrugqty");
    	if(iPrcpDayno == RtnCnts){
    		//살아있는 처방이 없으므로 불출량은 원처방 불출량(totdrugqty)임
    		return itotdrugqty;
    	} else {
    		//살아있는 처방이 있으면 살아있는 처방의 횟수를 계산
    		RtnCnts = iPrcpDayno - RtnCnts;
    	}	    
	    
	    // 1 : 단가*수량*횟수*일수
	    // 4 : 단가*수량
	    // 5 : 단가*수량*일수             
	    if(sCalcmthdcd ==  "1"){
	    	//초기화 없이 다 계산처리함	            
	    } else  if(sCalcmthdcd == "4"){
	    	//횟수, 일수 1로 초기화
	        Tims = "1";
	        RtnCnts = "1";
	    } else  if(sCalcmthdcd == "5"){
	    	//횟수 1로 초기화
	        Tims = "1";
	    }  
	    
	    if (DeliveCrite == "1") {
	    	// 처방대로
	        dResult = Math.round(Qty*Tims*RtnCnts*1000)/1000;
	    } else if (DeliveCrite == "2") {
	    	// 1/4 1회 올림 --> 1/2 1회 올림 수정 
	    	/*NearIntNum = Math.floor(Qty);
            RoundNum = Qty - NearIntNum;    
	    	if(RoundNum >= 0.5){
	        	dResult = Math.round((NearIntNum+0.5)*Tims*RtnCnts*1000)/1000;
	        } else {
	        	dResult = Math.round((NearIntNum+1)*Tims*RtnCnts*1000)/1000;
	        }*/			
	        dResult = Math.round(Math.ceil(Qty)*Tims*RtnCnts*1000)/1000;
	    } else if (DeliveCrite == "3") {
	    	// 1/2 1회 올림 
	        dResult = Math.round(Math.ceil(Qty)*Tims*RtnCnts*1000)/1000;
	    } else if (DeliveCrite == "4") {
	    	// 1/4 1일 올림 
	        NearIntNum = Math.floor(Qty*Tims);
            RoundNum = (Qty*Tims) - NearIntNum;    
	    	if(RoundNum >= 0.5){
	        	dResult = Math.round((NearIntNum+0.5)*RtnCnts*1000)/1000;
	        } else {
	        	dResult = Math.round((NearIntNum+1)*RtnCnts*1000)/1000;
	        }	    	
	    } else if (DeliveCrite == "5") {
	    	// 1/2 1일 올림
	        dResult = Math.round(Math.ceil(Qty*Tims)*RtnCnts*1000)/1000;
	    } else if (DeliveCrite == "6") {
	    	// 계산후 올림
	        dResult = Math.ceil(Qty*Tims*RtnCnts);
	    }
	    // 원처방 불출량(totdrugqty) - 살아있는처방 불출량 계산 = 반환된 불출량
	    dResult = itotdrugqty - dResult;	  
    }
//model.alert("End : " + dResult);
    return dResult;
}

/**
 *	마약라벨 출력
 */
function fNarcLBLPrintR(chk) {

	var reprint="";

	//20091015 이선경 수정 : 자동출력 기본이 병동(퇴원제외)만이나 lbltype3이 "Y"이면 외래, 퇴원도 모두 출력됨
	var lbltype3 = model.getValue("/root/init/lbltype/item/lbltype3");
	var prcpclscdflag = "N";
	
	for(var i = 1; i <= getNodesetCount("/root/main/narclist/narclist") ; i++){
		var sel = model.getValue("/root/main/narclist/narclist["+i+"]/sel");
		var sNarcStat = model.getValue("/root/main/narclist/narclist["+i+"]/narcstat");
		var ioflag = model.getValue("/root/main/narclist/narclist["+i+"]/ioflag");
		var drugflag = model.getValue("/root/main/narclist/narclist["+i+"]/drugflag");
		var sPrcphistcd = model.getValue("/root/main/narclist/narclist["+ i +"]/prcphistcd");  // 2010.03.15 pymi
		
		//20091015 이선경 수정 : 조제확인시 라벨자동출력은 fNarcLBLPrint 함수에서 처방조회시 가져온 ioflag로 체크해서 출력 여부 결정
		//(수정원인 : 외래,병동 전체 조회 후 조제확인시 라벨자동출력이 안되는 현상이 있음)
		//if(sel == 'Y' && ((chk == "Prnt" && sNarcStat == "3" && sPrcphistcd != "D" && (lbltype3 == "Y" || (ioflag == "I" && drugflag != "L" && drugflag != "G"))) || (chk == "Reprnt" && parseInt(sNarcStat,10) > 3))){  // 2010.03.15 pymi 반환완료된 처방 제외
		if(sel == 'Y' && ((chk == "Prnt" && sNarcStat == "2" && sPrcphistcd != "D" && (lbltype3 == "Y" || (ioflag == "I" && drugflag != "L" && drugflag != "G"))) || (chk == "Reprnt" && parseInt(sNarcStat,10) > 3))){  // 2010.03.15 pymi 반환완료된 처방 제외
			PrnKind = model.getvalue("/root/init/barcdprntsetup/prntsetupinfo/setupinfo/prntkind");
			PrnMarginLeft =  model.getvalue("/root/init/barcdprntsetup/prntsetupinfo/setupinfo/blank/left");
			PrnMarginTop =  model.getvalue("/root/init/barcdprntsetup/prntsetupinfo/setupinfo/blank/top");
			var commkind = model.getvalue("/root/init/barcdprntsetup/prntsetupinfo/setupinfo/commkind")
			
			if(model.getValue("/root/main/narclist/narclist["+i+"]/prcpclscd") == "A6") {
		    	prcpclscdflag = "Y";  // 20120724_주사라벨이 아닐때만
		    }

			if ( model.getValue("/root/main/narclist/narclist["+i+"]/lblprnttims")>0 ){
				reprint ="(재)";
			}

				// 바코드(21자리) : 마약구분(1)+입원/외래구분(1)+반납구분(1)+처방일자(8)+처방번호(10)
		        var narcflag = model.getValue("/root/main/narclist/narclist["+i+"]/narcflag");
		        var ioflag = model.getValue("/root/main/narclist/narclist["+i+"]/ioflag");
		        var returnflag = model.getValue("/root/main/narclist/narclist["+i+"]/returnflag");
		        if(returnflag ==""){
		        	returnflag = "O";
		        } else {
		        	returnflag = "D";
		        }
		        var prcpdd = model.getValue("/root/main/narclist/narclist["+i+"]/prcpdd");
		        var prcpno = model.getValue("/root/main/narclist/narclist["+i+"]/prcpno");
		        var drugseqno ="";
		        if ( ioflag =="O" ){
		        	drugseqno = model.getValue("/root/main/narclist/narclist["+i+"]/drugseqno");
		        }
				var iLen = prcpno.length;
		        for(var j=iLen; j<10; j++) {
		        	prcpno = "0" + prcpno;
		        }

		        var sResult = narcflag+ioflag+returnflag+prcpdd+prcpno+drugseqno;
				model.makeValue("/root/main/narclist/narclist["+i+"]/barcode", sResult);
				
				//라벨이름
				var nm = "";
				if(model.getValue("/root/main/narclist/narclist["+i+"]/narcflag") == "M") {
					nm = "마 약";
				}else {
					nm = "향 정";
				}
				model.setValue("/root/main/narclist/narclist["+i+"]/drugkindnm", nm);
				model.setValue("/root/main/narclist/narclist["+i+"]/prcpdd",  fGetDateString(model.getValue("/root/main/narclist/narclist["+i+"]/prcpdd")) );

				// issdeptcdnm 글자 수 5자이상 자르기 안되게 수정 2011.9.23. jmkim
				var issdept = model.getValue("/root/main/narclist/narclist["+i+"]/issdeptcdnm");
				// var issdept = model.getValue("/root/main/narclist/narclist["+i+"]/issdeptcdnm").substring(0, 5); - original ver. 2011.9.23 jmkim
				
				model.setValue("/root/main/narclist/narclist["+i+"]/issdeptcdnm", issdept + "("+model.getValue("/root/main/narclist/narclist["+i+"]/roomcd") + ")" );
				
				// issdeptcdnm(발행부서) 문자열 길이가 15자 이상일 때 체크 2011.9.23 jmkim ex. 508병동(무균)(1111)	
				var issdeptcdnmvalue = model.getvalue("/root/main/narclist/narclist["+i+"]/issdeptcdnm");
				if(issdeptcdnmvalue.length >= 15)
					model.makeValue("/root/main/narclist/narclist["+i+"]/issdeptcdnmlengthflag", "Y");

				var sPid_Drugno  = model.getValue("/root/main/narclist/narclist["+i+"]/patnm")
										+ " (" + model.getValue("/root/main/narclist/narclist["+i+"]/drugno")+reprint + ")";
				model.setValue("/root/main/narclist/narclist["+i+"]/patnm", sPid_Drugno);

		//		var colHidnValue = grdBaseColHidn("D");
		//		if( colHidnValue == "C") { // 1회기준
			// 일용량 + 일수량
		//			var unit = model.getValue("/root/main/narclist/narclist["+i+"]/prcpvol2")+model.getValue("/root/main/narclist/narclist["+i+"]/prcpvolunit") + "   "
		//						+ model.getValue("/root/main/narclist/narclist["+i+"]/prcpqty2")+model.getValue("/root/main/narclist/narclist["+i+"]/prcpqtyunit");
		//		} else {
		//			var unit = model.getValue("/root/main/narclist/narclist["+i+"]/prcpvol")+model.getValue("/root/main/narclist/narclist["+i+"]/prcpvolunit") + "   "
		//						+ model.getValue("/root/main/narclist/narclist["+i+"]/totdrugqty")+model.getValue("/root/main/narclist/narclist["+i+"]/prcpqtyunit");				
		//		}
//				var unit = model.getValue("/root/main/narclist/narclist["+i+"]/prcpvol")+model.getValue("/root/main/narclist/narclist["+i+"]/prcpvolunit") + "   "
//								+ model.getValue("/root/main/narclist/narclist["+i+"]/totdrugqty")+model.getValue("/root/main/narclist/narclist["+i+"]/prcpqtyunit");
//  2015년 1월 15일 김치국
				var unit = model.getValue("/root/main/narclist/narclist["+i+"]/totdrugqty")+model.getValue("/root/main/narclist/narclist["+i+"]/prcpqtyunit");

				model.makeValue("/root/main/narclist/narclist["+i+"]/unit", unit);
				model.setValue("/root/main/narclist/narclist["+i+"]/drugnm", "("+model.getValue("/root/main/narclist/narclist["+i+"]/drugnm")+")" );
				
				// 20120719_일일수량과 영문상품명 추가
				model.makeValue("/root/main/narclist/narclist["+i+"]/qtyname",model.getValue("/root/main/narclist/narclist["+i+"]/totdrugqty") + " " + model.getValue("/root/main/narclist/narclist["+i+"]/lblnm"));
				var day = model.getValue("/root/main/narclist/narclist["+i+"]/prcpdayno");
				var prcptims = model.getValue("/root/main/narclist/narclist["+i+"]/prcptims");
				var prcpqty2 = model.getValue("/root/main/narclist/narclist["+i+"]/prcpqty2");
				var prcpqtyunit = model.getValue("/root/main/narclist/narclist["+i+"]/prcpqtyunit");
				
				model.makeValue("/root/main/narclist/narclist["+i+"]/narcunit", "1일 " + prcptims + "회 " + prcpqty2 + prcpqtyunit + "씩 " + day + "일분");
				

				var rgstdt =  "처방입력일시 : "+ fGetDateString(model.getValue("/root/main/narclist/narclist["+i+"]/rgstdt")) ;
				model.setValue("/root/main/narclist/narclist["+i+"]/rgstdt" , rgstdt);
	 	} else {
	 		model.removeNode("/root/main/narclist/narclist["+i+"]");
	 		i--;
	 	}
 	}
 	var instcd = getUserInfo("dutplceinstcd");
 
 	if(chk_auto.value != "Y") {
	 	//makeReportPreview(0,0,10, 10, "");
		//fPrintRexbar("RFADT30111", "false");
	/*	var printnm = "";
		var infoXPath = "";
		if(infoXPath == "" || infoXPath == "undefined" || infoXPath == null) infoXPath = "/root/main/barcdprntsetup/prntsetupinfo";

		if(model.getValue(infoXPath + "/setupinfo/rexgbn") != "1") return false;
		
		printnm = model.getValue(infoXPath + "/setupinfo/pcl/pcllist[barnm='"+"RFADT30111"+"']/prtnm");*/
		//fPrintRexbar("RFADT30111","true");
		var posx = '';
		var posy = '';
		
		posx = model.getValue("/root/main/barcdprntsetup/prntsetupinfo/setupinfo/pcl/pcllist[barnm='"+"RFADT30111"+"']/xpos");
		posy = model.getValue("/root/main/barcdprntsetup/prntsetupinfo/setupinfo/pcl/pcllist[barnm='"+"RFADT30111"+"']/ypos");
		
		if(posx == '') posx = "0";
		if(posy == '') posy = "0";
		
		var printnm = model.getValue("/root/main/barcdprntsetup/prntsetupinfo/setupinfo/pcl/pcllist[barnm='"+"RFADT30111"+"']/prtnm");
	//	alert("row 1651, SMADT30100.js");
		if(instcd == "031") {  // 20120724_임시로 본원, 칠곡 구분
			// 2015년 4월9일 김치국 마약처방을 ATC출력물로 통일
		//	exeReportPreview("RFADT30111", "XMLSTR", "", "", printnm,"","","","","true","","","","","","","",'offsetx=' + posx + ';offsety=' + posy + ';',"","","");
    //  alert("row 1655, SMADT30100.js,  RFADT30113");		
      exeReportPreview("RFADT30113", "XMLSTR", "", "", printnm,"","","","","true","","","","","","","",'offsetx=' + posx + ';offsety=' + posy + ';',"","","");			
     // exeReportPreview("RFADT62303", "XMLSTR", "", "", printnm,"","","","","true","","","","","","","",'offsetx=' + posx + ';offsety=' + posy + ';',"","","");			      
			
		} else {
    //  alert("row 1655, SMADT30100.js,  RFADT30111");					
			if(prcpclscdflag == "Y" ) {
				exeReportPreview("RFADT30111", "XMLSTR", "", "", printnm,"","","","","true","","","","","","","",'offsetx=' + posx + ';offsety=' + posy + ';',"","","");
			} else {
				exeReportPreview("RFADT30112", "XMLSTR", "", "", printnm,"","","","","true","","","","","","","",'offsetx=' + posx + ';offsety=' + posy + ';',"","","");
			}
		}
		
	} else if(chk_auto.value == "Y") {	
		
		if(instcd == "031") {  // 20120724_임시로 본원, 칠곡 구분
			// 2015년 4월9일 김치국 마약처방을 ATC출력물로 통일
//			exeReportPreview("RFADT30111", "XMLSTR", "", "", printnm,"","","","","true","","","","","","","",'offsetx=' + posx + ';offsety=' + posy + ';',"","","");
      exeReportPreview("RFADT30113", "XMLSTR", "", "", printnm,"","","","","true","","","","","","","",'offsetx=' + posx + ';offsety=' + posy + ';',"","","");			

		} else {
			if(prcpclscdflag == "Y" ) {
				exeReportPreview("RFADT30111", "XMLSTR", "", "", printnm,"","","","","true","","","","","","","",'offsetx=' + posx + ';offsety=' + posy + ';',"","","");
			} else {
				exeReportPreview("RFADT30112", "XMLSTR", "", "", printnm,"","","","","true","","","","","","","",'offsetx=' + posx + ';offsety=' + posy + ';',"","","");
			}
		}
		//exeReportPreview("RFADT30111", "XMLSTR", "", "", "true","","","","","true");
	}
	
	submit("TRADT30102");
	model.refresh();
}


function fAutoOutNarc() {
									
	// 실불출신청 대상 조회
	fGetNarcData();
  autocnt =  autocnt + 1; 
  cap_automess.value = '자동 출력 '+autocnt+'번 실행중!.';   
  //if ( autocnt == 1 ){
  //	cap_automess.value = '자동 출력 *';   
  //	autocnt = 2;
  //}else if ( autocnt == 2 ) {
  //	cap_automess.value = '자동 출력 +';     	
  //	autocnt = 1;  	
  //}
	//alert('call fAutoOutNarc : '+ getNodesetCount("/root/temp/narclist/narclist") + ", flag : " + nextFlag );
	if(getNodesetCount("/root/temp/narclist/narclist") > 0 && nextFlag == "GO") {
		nextflag ="STOP";
		model.removeNodeset("/root/main/narclist/narclist");
		model.makeNode("/root/main/narclist/narclist");
		var i = grd_narclist.fixedRows;
		model.copyNode("/root/main/narclist/narclist", "/root/temp/narclist/narclist[1]");
		model.setValue("/root/main/narclist/narclist/sel", "Y");
		//grd_narclist.refresh();
		fNarcActing_auto("Prcpdrug");
	}	
	
}


function fNarcActing_auto(sActing) {
	if(model.getValue("/root/temp/userinfo/userinfo/userid") == ""){
		messageBox("사용자ID가 없습니다. 사용자ID를 먼저","C001");
		model.setValue("/root/temp/srchinfo/srchid","");
		model.setFocus("ipt_srchid");
		model.refresh();
		return;
	}
	var iActing_Cnt = 0;			// 행위 구분을 위한 카운트값
	var sActing_nm = "";			// 해당 행위의 명칭
	var sActingAfter = "";
	var selCnt = 0;
	var RtnCnfmYN = "N";
  var chkAll = model.getValue("/root/send/chkall");  // 20101206 wify 경북대병원 일괄처리 추가
  var chkAll1 = model.getValue("/root/send/chkall1");  // 20101214 wify 경북대병원 일괄처리 추가(불출까지)
	//액팅전 체크표시 cash
	fChkCash("before");

	model.removeNodeset("/root/send/narcinfo/narclist");
	
	// **** 체크박스 선택 값 카운트 Start ****
	/*for(var i = grd_narclist.fixedRows; i < grd_narclist.rows; i++){
		var sel = model.getValue("/root/main/narclist/narclist["+i+"]/sel");
		var sNarcStat = model.getValue("/root/main/narclist/narclist["+i+"]/narcstat");
		if(sel == "Y" && sNarcStat != "1") selCnt++;		// 선택된 값(sel == "Y") 들 중 미신청 값은 제외
	}
	
	if(selCnt == 0) {
		 messageBox("선택된 데이터가","I004");
		 return;
	}*/
	
	//실출고부서 값 확인(조제확인/ 반환확인 시)
	/*if((sActing == "Prcp" || sActing == "Rtn" ) && model.getValue("/root/temp/srchinfo/stocdeptcd") == "") {
		 messageBox("실출고부서를 지정하십시오 ","I999");
		 return;
	}*/
	
	// **** 체크박스 선택 값 카운트 End ****
 // debugger;
	for(var i = grd_narclist.fixedRows; i < grd_narclist.rows; i++){
		var sel = model.getValue("/root/main/narclist/narclist["+i+"]/sel");
		var narcstat = model.getValue("/root/main/narclist/narclist["+i+"]/narcstat");	// 불출상태
		var cnclstat = model.getValue("/root/main/narclist/narclist["+i+"]/cnclstat");	// 반환상태
		var ioflag = model.getValue("/root/main/narclist/narclist["+i+"]/ioflag");		// 입원외래구분
		var prntdt = model.getValue("/root/main/narclist/narclist["+i+"]/prntdt");		// 처방전출력일시
		var sPid = model.getValue("/root/main/narclist/narclist["+i+"]/pid");		// 환자번호
		var sPrcpcd = model.getValue("/root/main/narclist/narclist["+i+"]/prcpcd");	// 처방명
		var sDrugno = model.getValue("/root/main/narclist/narclist["+i+"]/drugno");	// 투약번호
		var rpt = model.getValue("/root/temp/reprnt"); //재출력구분 20101221 wify 경북대병원 처방전 재출력 추가

		if(sel == "Y"){
	
			// 20101214 wify 경북대병원 일괄처리(Prcpdrug)추가 
			if(sActing == "Prcpdrug") {
				if(chkAll == "") {
					messageBox("일괄처리가 체크되지", "E007");
					return;
				}
				if(narcstat == "2" && chkAll == "Y") {
					astfCopyNodeSet("/root/send/narcinfo/narclist", "/root/main/narclist/narclist["+i+"]");
					sActing_nm = "불출"
					iActing_Cnt++;
				//} else { // 불출상태가 [미신청]일때
				//	sActing_nm = "불출"
				//}
				} else { // 불출신청 상태가 아닌데 일괄처리시 진행안되게 수정   2014.8.28 김치국
					messageBox("불출신청 자료만 일괄처리로 처리 할 수 있습니다.");   
					return;
				}

			}

			// 처방전			
			model.copyNode("/root/send/prntinfo","/root/main/narclist/narclist["+i+"]");
			model.makeValue("/root/send/prntinfo/prntid", model.getValue("/root/temp/userinfo/userinfo/userid"));
			model.makeValue("/root/send/prntinfo/prntflag", "O");

			submit("TRADT30103");
		 	if(model.getValue("/root/main/prntlist/patinfo/drugno") != ""){
				//처방전에 DUR이 존재하면 RFADT30105 존재하지 않으면 RFADT30100 출력
				var resn = model.getValue("/root/main/prntlist/resn/resnnm");		
				if( resn == ""){
					//1일기준인지 1회기준인지 체크하여 컬럼을 hidden
					var colHidnValue = grdBaseColHidn("D");
					if( colHidnValue == "C") {//1회 기준
						model.makeValue("/root/main/prntlist/patinfo/prcpvolchk", "Y");
					}
					//20101119_wify_경북대병원_마약처방전 폼 변경
					// RFADT30100 ==> RFADT30106
					// RFADT30105 ==> RFADT30107
		 			exeReportPreview("RFADT30106", "XMLSTR", "", "", "true","","","","","true");
		 		}else{
		 			exeReportPreview("RFADT30107", "XMLSTR", "", "", "true","","","","","true");
		 		}
		 		
		 		nextFlag ="GO";
		 		fSleep(sleepTime);
		 	}
		 	//
			
		}
 	}


 	model.copyNode("/root/send/narcinfo/srchinfo","/root/temp/srchinfo");
 	model.copyNode("/root/send/narcinfo/userinfo","/root/temp/userinfo/userinfo");
	model.makeValue("/root/send/narcinfo/srchinfo/acting", sActing);


	//20091015 이선경 수정 : 조제확인시 라벨자동출력은 fNarcLBLPrint 함수에서 처방조회시 가져온 ioflag로 체크해서 출력 여부 결정
	//(수정원인 : 외래,병동 전체 조회 후 조제확인시 라벨자동출력이 안되는 현상이 있음)
	//if ( model.getValue("/root/send/lblskip") != "Y"  && sActing == "Prcp"){
	// 20101221 wify 경북대병원 처방전 일괄처리할때 라벨도 같이 출력 되도록 함.
	if ( nextFlag =="GO" && model.getValue("/root/send/lblskip") != "Y"  && sActing == "Prcpdrug"){
		//fNarcLBLPrint("Prnt");
		fNarcLBLPrintR("Prnt");
		submit("TXADT30102"); //라벨 출력 횟수 저장
	}
	
	//model.makeValue("", model.getValue("/root/temp/srchinfo/srchdeptcd"));
	submit("TXADT30101");

  //액팅전 체크표시 다시 표시
	//grd_narclist.fixedcellischeck(0, 1) = false;
	//grd_outnarc.fixedcellischeck(0, 1) = true;
	fChkCash("after");

	//nextflag ="Y";
	//model.setValue("/root/temp/srchinfo/barcode","");
	//model.setFocus("input9");
	model.refresh();
}

function fSleep(numberMillis) {
     var now = new Date();
     var exitTime = now.getTime() + numberMillis;


     while (true) {
          now = new Date();
          if (now.getTime() > exitTime)
              return;
     }
}

//불출확인서 출력시 출력일자 설정
function fSetNarcPrintDt() {
	if (getNodesetCount(grd_narclist.nodeset) == 0)
		return;
		
	model.setValue("/root/send/prntdt/narcdata",grd_narclist.getUpdateDataAll("u"));
	submit("TXADT30104");	
}

//재출력 선택시 출력일자(콤보박스) 조회
function fGetNarcPrintDt() {
	var narccdlist = "";
	for(var i=1; i < datagrid1.rows; i++) {
		if(model.getValue("/root/temp/srchcond/narclist[" + i + "]/sel") == "Y") {

			if(narccdlist == "") {
				narccdlist = "'" + model.getValue("/root/temp/srchcond/narclist[" + i + "]/narccd") + "'";
			} else {
				narccdlist += ",'" + model.getValue("/root/temp/srchcond/narclist[" + i + "]/narccd") + "'";
			}
		}
	}

	model.setValue("/root/temp/srchinfo/narccd", narccdlist);

	//이선경 2008-07-22 start (조회시 마약종류를 조회조건에 추가)

	grd_narclist.fixedcellischeck(0, 1) = false;
	grd_outnarc.fixedcellischeck(0, 1) = false;
	model.copyNode("/root/send/srchinfo","/root/temp/srchinfo");
	
	if( model.getValue("/root/temp/srchinfo/prtab") == "Y") { // 향정반환반납장부 출력조건 2009.05.18 pymi
		model.setValue("/root/send/srchinfo/cnclflag", "Y");
		model.setValue("/root/send/srchinfo/rtnflag", "Y");
		model.setValue("/root/send/srchinfo/rtnstat", "T");
		model.setValue("/root/send/srchinfo/cnclstat", "T");
		model.setValue("/root/send/srchinfo/narcstat", "");
	}
	// (e)
	submit("TRADT30111");	
}