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

var extnflag = "false";

/**
 * @desc   : 폼초기화
 * @
 * @param  : 
 * @return : 
 * @authur : 이은영 2008.03.18
 * @---------------------------------------------------
 */
function fFormInit()
{
/* 마스터 정보 가져오기..
			//공통코드 가져오기...
			//M0392:챠트미대출사유코드
			//M0412:과보관사유코드
			//M0424:차트상태(분실)코드
			zbcfGetCodeList(new Array("M0392","M0412","M0424"),	new Array("/root/init/M0392","/root/init/M0412","/root/init/M0424"));
			// 대출용도, 대출과, 차트과, 차트담당자, 보관장소
			model.makeValue("/root/send/reqdata/ioflag"   , "O");
			model.makeValue("/root/send/reqdata/useyn"    , "");
			model.makeValue("/root/send/reqdata/allwardyn", "");
			model.refresh();
			submit("TRMRC00100");
//*/
		var today = getCurrentDate();
		model.setValue("/root/send/reqdata/rendcd"	 , "ALL");
		model.setValue("/root/send/reqdata/appdeptcd", "ALL");
		model.setValue("/root/send/reqdata/fromappdd", today);
		model.setValue("/root/send/reqdata/toappdd"	 , today);
		model.setValue("/root/send/reqdata/fromrtndd", "");
		model.setValue("/root/send/reqdata/tortndd"	 , "");
		model.setValue("/root/send/reqdata/resettm"	 , getCurrentTime());
		model.setValue("/root/send/reqdata/acptid"	 , getUserId());
		model.refresh();

		ipt_fromrtndd.disabled = true;
		ipt_tortndd.disabled = true;

		fOpenTop(extnflag);
					
}




/**
 * @desc   : 챠트 반납 우클릭시 - > 챠트 반납
 * @
 * @param  : 
 * @return : 
 * @authur : 이은영 2008.03.18
 * @---------------------------------------------------
 */
function fsetrtnchart()
{
		var ref = "/root/main/chrtrtn/rtntrgtlist";
		var grdObj = grd_rendlist2;

   		var savedata = "m▦chrtseqno▦medirecno▦pid▦appdeptcd▦appmanid▩";
		var dataString = "";
		var dataCount = 0;

		for ( var i = 0; i < grdObj.selectedRows; i++)
		{		
			var chrtseqno	= model.getValue(ref + "[" + grdObj.selectedrow(i) + "]/chrtseqno");
			var medirecno	= model.getValue(ref + "[" + grdObj.selectedrow(i) + "]/medirecno");
			var pid			= model.getValue(ref + "[" + grdObj.selectedrow(i) + "]/pid");
			var appdeptcd	= model.getValue(ref + "[" + grdObj.selectedrow(i) + "]/appdeptcd");
			var appmanid	= model.getValue(ref + "[" + grdObj.selectedrow(i) + "]/appmanid");

			if (chrtseqno != "") {
				dataString = dataString + "u▦" + chrtseqno + "▦" + medirecno + "▦" + pid + "▦" + appdeptcd + "▦" + appmanid + "▩";
				dataCount = dataCount + 1;
			}
		}
		
		if (dataString.length > 0)
		{
			model.makeValue("/root/send/savedata", savedata + dataString);
			model.refresh();
			submit("TXMRC00130");

			alert("총 " + dataCount + " 건 챠트반납 되었습니다.");

			// 다시 조회하기..
			fGetRtnList();
		}
}




/**
 * @desc   : 챠트 반납 우클릭시 - > 대출연장
 * @
 * @param  : 
 * @return : 
 * @authur : 이은영 2008.03.18
 * @---------------------------------------------------
 */
function fsetrtnschedd()
{
		if(grd_rendlist2.row < 1){
			return;
		}
		// 2008.01.13. 대출연장 입력하기...
		fShowWndIptBox("3");
}


/**
 * @desc   : 챠트 반납 우클릭시 - > 대출연장 (반납예정일)
 * @
 * @param  :  
 * @return : 
 * @authur : 이은영 2008.03.18
 * @---------------------------------------------------
 */
function fUpdateRtnScheDD()
{
		// 2008.01.22. 대출연장 (반납예정일) 입력하기...
		var term	 = model.getValue("/root/hidden/lendlist/term");
		var termunit = model.getValue("/root/hidden/lendlist/termunit");

		if (term.isNumber == false)	{
			alert("숫자를 입력하세요.");
			return;
		}

		var rtnschedd = new Date();
		rtnschedd = rtnschedd.getAddDate(eval(term), termunit);
		rtnschedd = rtnschedd.getDateFormat("YYYYMMDD");

		var savedata ="chrtseqno▦rtnschedd▩";
		var dataString = "";
		var dataCount = 0;

		for ( var i = 0; i < grd_rendlist2.selectedRows; i++)
		{		
			var chrtseqno = model.getValue("/root/main/chrtrtn/rtntrgtlist[" + grd_rendlist2.selectedrow(i) + "]/chrtseqno");
			if (chrtseqno != "") {
				dataString = dataString + chrtseqno + "▦" + rtnschedd + "▩";
				dataCount = dataCount + 1;
			}
		}

		grup_addrtnschedd.visible = false;
		
		if (dataString.length > 0)
		{
			model.makeValue("/root/send/savedata", savedata + dataString);
			model.refresh();
			submit("TXMRC00106");
			alert("총 " + dataCount + " 건 대출연장 되었습니다.");

			// 다시 조회하기..
			fGetRtnList();
		}
		
}







/**
 * @desc   : 챠트 반납 우클릭시 - > 과보관 사유 입력
 * @
 * @param  : 
 * @return : 
 * @authur : 이은영 2008.03.18
 * @---------------------------------------------------
 */
function fsetdeptkeep()
{
		if(grd_rendlist2.row < 1){
			return;
		}
		// 2008.01.13. 과보관사유 입력하기...
		fShowWndIptBox("1");
}


/**
 * @desc   : 챠트 반납 우클릭시 - > 과보관 사유 입력 (update)
 * @
 * @param  :  
 * @return : 
 * @authur : 이은영 2008.03.18
 * @---------------------------------------------------
 */
function fUpdateDeptKeepresn()
{
		// 2008.01.13. 과보관사유 입력하기...
		var deptkeepcd	 = model.getValue("/root/hidden/lendlist/deptkeepcd");
		var deptkeepresn = model.getValue("/root/hidden/lendlist/deptkeepresn");

		var savedata ="chrtseqno▦deptkeepcd▦deptkeepresn▩";
		var dataString = "";
		var dataCount = 0;

		for ( var i = 0; i < grd_rendlist2.selectedRows; i++)
		{		
			var chrtseqno = model.getValue("/root/main/chrtrtn/rtntrgtlist[" + grd_rendlist2.selectedrow(i) + "]/chrtseqno");
			if (chrtseqno != "") {
				dataString = dataString + chrtseqno + "▦" + deptkeepcd + "▦" + deptkeepresn + "▩";
				dataCount = dataCount + 1;
			}
		}
		
		grup_deptkeep.visible = false;

		if (dataString.length > 0)
		{
			model.makeValue("/root/send/savedata", savedata + dataString);
			model.refresh();
			submit("TXMRC00103");
			alert("총 " + dataCount + " 건 과보관(사유입력) 되었습니다.");

			// 다시 조회하기..
			fGetRtnList();
		}
		
}


/**
 * @desc   : 챠트 반납 우클릭시 - > 차트 분실 처리
 * @
 * @param  : 
 * @return : 
 * @authur : 이은영 2008.07.28
 * @---------------------------------------------------
 */
function fsetlosschrt()
{
		if(grd_rendlist2.row < 1){
			return;
		}
		// 2008.07.28. 차트 분실 처리하기...
		fShowWndIptBox("4");
}


/**
 * @desc   : 챠트상태를 수정한다.
 * @
 * @param  : 
 * @return :
 * @authur : 이은영 2008.07.28
 * @---------------------------------------------------
 */
function fUpdateChrtStat()
{		
		// 2008.07.28. 차트 분실 처리하기...
		var chrtstat   = model.getValue("/root/hidden/lendlist/chrtstat");
		var chrtstatnm = model.getValue("/root/init/M0424/M0424[cdid='" + chrtstat + "']/cdnm");

		var savedata ="medirecno▦chrtseqno▦chrtstat▦unrtnresn▩";
		var dataString = "";
		var dataCount = 0;

		for ( var i = 0; i < grd_rendlist2.selectedRows; i++)
		{		
			var medirecno = model.getValue("/root/main/chrtrtn/rtntrgtlist[" + grd_rendlist2.selectedrow(i) + "]/medirecno");
			var chrtseqno = model.getValue("/root/main/chrtrtn/rtntrgtlist[" + grd_rendlist2.selectedrow(i) + "]/chrtseqno");
			var unrtnresn = "[" + chrtstatnm + "]";

			if (chrtseqno != "") {
				dataString = dataString + medirecno + "▦" + chrtseqno + "▦" + chrtstat + "▦" + unrtnresn + "▩";
				dataCount = dataCount + 1;
			}
		}
		
		grup_losschrt.visible = false;

		if (dataString.length > 0)
		{
			model.makeValue("/root/send/savedata", savedata + dataString);
			model.refresh();
			submit("TXMRC00107");
			alert("총 " + dataCount + " 건 차트 분실 처리 되었습니다.");

			// 다시 조회하기..
			fGetRtnList();
		}		
}





/**
 * @desc   : 챠트 반납 조회
 * @
 * @param  : 
 * @return : 
 * @authur : 이은영 2008.03.18
 * @---------------------------------------------------
 */
function fGetRtnList()
{
		submit("TRMRC00130");	

		// 2008.01.02. 반납현황 조회 총건수..
		//model.setValue ("/root/init/count", grd_rtnlist.rows - 1);
		//cap_rtnlist.refresh();
}



/**
 * @desc   : 챠트 반납 조회 - 바크도 입력후 반납현황만 다시조회한다. (로그인 사용자별)
 * @
 * @param  : 
 * @return : 
 * @authur : 이은영 2008.03.18
 * @---------------------------------------------------
 */
function fGetUserRtnList()
{
		submit("TRMRC00131");			

		// 2008.01.02. 반납현황 조회 총건수..
		//model.setValue ("/root/init/count", grd_rtnlist.rows - 1);
		//cap_rtnlist.refresh();
}



/**
 * @desc   : 바코드입력 후 엔터시 -> 챠트반납
 * @
 * @param  : 
 * @return : 
 * @authur : 이은영 2008.03.18
 * @---------------------------------------------------
 */
function fSetReturnChartBcno()
{	
		var bcno     = model.getValue("/root/send/reqdata/bcno");

		if (bcno == "" || bcno == "0"){ 
			window.alert("바코드를 입력해 주세요", "차트대출 및 반납", 0 | 64);
			model.setFocus("ipt_lendbcno");
			return;
		}

		// 2009.04.13. 의정부 성모인 경우.. 
		// 바코드 리딩시  lpad 로 해서 '0' 을 체움.. 
		// 리팅값과 DB값이 다를수 있음.. 
		// 바코드번호를 외래간호에서 생성하면 '0' 이 없고, 
		// 의료정보팀에서 생성하면 '0' 이 있음..
		if (getUserInfo("dutplceinstcd") == "013") {
			if (bcno.length < 12) { bcno = bcno.getLeftPad(12, "0"); }
		}

		// 데이타 셋하기.. 외래/입원구분, 처리자ID, 대출일, 조회시간, 바코드
		var resettm  = model.getValue("/root/send/reqdata/resettm");
		model.makeValue("/root/send/req/ioflag"  , "O");
		model.makeValue("/root/send/req/acptid"  , getUserId());
		model.makeValue("/root/send/req/renddd"  , getCurrentDate());
		model.makeValue("/root/send/req/resettm" , resettm);
		model.makeValue("/root/send/req/bcno"    , bcno.toUpperCase());
		
		submit("TXMRC03002", "", "/root/send/req", "/root/main/chrtrtn/rtnlist");

		// 반납현황을 키우기...
		fOpenTop("true");

		// 2008.01.25. 바코드 번호 클리어...
		model.makeValue("/root/send/reqdata/bcno", "");
		ipt_rtnbcno.refresh();
		model.setFocus("ipt_rtnbcno");
		// 2008.01.02. 반납현황 조회 총건수..
		//model.setValue ("/root/init/count", grd_rtnlist.rows - 1);
		//cap_rtnlist.refresh();

}									


/**
 * @desc   : 메인 그리드 화면을 보여주기 / 차트 줄이기
 * @
 * @param  :
 * @return :
 * @---------------------------------------------------
 *             
 */
function fOpenTop(flag)
{
		extnflag = flag;

		if (flag == "true") {
			grup_rtnlist.attribute("style") = "left:255px; top:25px; width:915px; height:709px; ";
			grd_rtnlist.attribute("style") = "left:0px; top:26px; width:914px; height:682px; ";
		} else 	{
			grup_rtnlist.attribute("style") = "left:255px; top:306px; width:915px; height:418px; ";
			grd_rtnlist.attribute("style") = "left:0px; top:26px; width:914px; height:390px; ";
		}
}


/**
 * @desc   : 등록된 환자번호인지 체킹한다..
 * @
 * @param  : iptObj - 환자번호 입력 컨트롤 (pid)
 * @return : 
 * @authur : 이은영 2008.09.17
 * @---------------------------------------------------
 */
function fGetPidNo(iptObj, ref)
{
		var chkyn = model.getValue(ref);
		if (chkyn == "Y") {
			if (iptObj.currentText.length > 0) {
				var pid = iptObj.currentText;
				pid = getCretCheckNo(pid, getUserInfo("dutplceinstcd"));
				model.makeValue(iptObj.attribute("ref"), pid);
				iptObj.refresh();
			}
		}
}



/**
 * @desc   : 등록된 환자번호인지 체킹한다..
 * @
 * @param  : iptObj - 환자번호 입력 컨트롤 (pid)
 * @return : pnm    - 환자명
 * @authur : 이은영 2008.03.18
 * @---------------------------------------------------
 */
function fCheckPid(iptObj, refPnm)
{
		model.makeValue("/root/send/req/srchcond", "1");
		model.makeValue("/root/send/req/pid", iptObj.currentText);
		
		//환자등록번호 체크
		if(iptObj.currentText.length > 0 ){
			
			model.resetInstanceNode("/root/main/result/patinfo");
			model.makeNode("/root/main/result/patinfo");
					
			if(submit("TRPMC02500", "", "/root/send/req", "/root/main/result/patinfo")){
				//fSearch는 인적사항 화면을 임포트 해간 화면에서 구현해 주어야 하는 함수이다.	
				if( getNodesetCount("/root/main/result/patinfo/patinfolist") > 0 ){
					model.copyNode("/root/main/patinfo", "/root/main/result/patinfo");
					//* 2009.04.07. 이중번호 메세지 ( 14257937 박용석  -> 13275912 신옥순 )
					var sBindPid = model.getValue("/root/main/result/patinfo/patinfolist/bindpid");
					if( sBindPid != '-' && sBindPid != '' && sBindPid != ' ' ){
						//합번된 등록번호 메세지 처리
						var sPid = model.getValue("/root/main/result/patinfo/patinfolist/pid");
						var sHngnm = model.getValue("/root/main/result/patinfo/patinfolist/hngnm");
						var retValue = messageBox(sPid + " (" + sHngnm + ") 환자의 등록번호가 [ " + sBindPid + " ] 로 합번 되었습니다. 합번된 등록번호로 재조회 하시겠습니까?", "Q999", "");
						if( retValue == '6' ){
							model.makeValue(iptObj.attribute("ref"), sBindPid);
							iptObj.refresh();
							fCheckPid(iptObj, refPnm);
							return "";
						}
					}
					//*/
					var pid = model.getValue("/root/main/result/patinfo/patinfolist/pid");
					var pnm = model.getValue("/root/main/result/patinfo/patinfolist/hngnm");							
					if (refPnm != null)
					{
						model.makeValue(refPnm, pnm);
					}
					return pnm;
				}else{
					model.resetInstanceNode("/root/main/patinfo/patinfolist");
					messageBox("없는 환자 번호 입니다.", "E999", "");
					model.refresh();
					return "";
				}								
			}	
				
		}else{
			messageBox("환자등록번호를 정확히", "C001");
			return "";
		}		
}



/**
 * @desc   : 환자등록번호 조회 팝업
 * @
 * @param  : refPid - 환자번호 참고 node path
 *           refPnm - 환자명   참고 node path
 * @return : 
 * @authur : 이은영 2008.03.18
 * @---------------------------------------------------
 */
function fGetPid(refPid, refPnm)
{
		//조회건수가 1건일 경우 팝업창을 바로 닫는다.
		model.makeValue("/root/hidden/tmp/pidpopupinfo/checkfnexam", "1");
		model.makeValue("/root/hidden/tmp/pidpopupinfo/autoflag", "N");
		if( model.getValue("/root/hidden/tmp/pidpopupinfo/srchcond") == '' ){
			model.makeValue("/root/hidden/tmp/pidpopupinfo/srchcond", '2');	
		}
		
		modal("SPPMC02500", "1","150", "150", "SPPMC02500", "/root/hidden/tmp/pidpopupinfo", "/root/send");
		model.resetInstanceNode("/root/source");
		//환자번호 copy
		var popupendflag = model.getValue("/root/main/popupendflag");
		
		if (popupendflag == "ok")
		{
			model.makeValue(refPid, model.getValue("/root/main/patinfo/patinfolist/pid"));
			if (refPnm == null) { refPnm = "" }
			if (refPnm != "") {
			model.makeValue(refPnm, model.getValue("/root/main/patinfo/patinfolist/hngnm"));
			}
			model.refresh();
		}	
}



/**
 * @desc   : 등록된 사용자 번호인지 체킹한다..
 * @
 * @param  : iptObj    - 사용자 ID 입력 컨트롤 (userid)
 * @return : posdeptcd - 사용자 부서코드
 * @authur : 이은영 2008.03.18
 * @---------------------------------------------------
 */
function fCheckUserid(iptObj)
{
		setInputNodeCurText();

		// 사용자 번호 체크
		if(iptObj.currentText.length > 0 ){

			// 사용자 조회
			model.removenode("/root/hidden/tmp/tempuserinfo/list");
			model.reset("/root/hidden/tmp/tempuserinfo");
			
			model.setValue("/root/hidden/tmp/userpopupinfo/param", "_OneS");
			model.setValue("/root/hidden/tmp/userpopupinfo/flag", "userid");
			model.setValue("/root/hidden/tmp/userpopupinfo/searchitem", iptObj.currentText);
			
			modal("SPZSU10103", "", "200", "200", "SPZSU10103","/root/hidden/tmp/userpopupinfo","/root/main/temp");
			
			var iParam = getParameter("SPZSU10103_"); 

			setCSVToNode("/root/hidden/tmp/tempuserinfo", iParam);
			clearParameter("SPZSU10103_");			

			//fSearch는 인적사항 화면을 임포트 해간 화면에서 구현해 주어야 하는 함수이다.	
			if( getNodesetCount("/root/hidden/tmp/tempuserinfo/list") > 0 ){
				
				var userid		= model.getValue("/root/hidden/tmp/tempuserinfo/list/userid");
				var posdeptcd	= model.getValue("/root/hidden/tmp/tempuserinfo/list/posdeptcd");

				iptObj.value = userid;
				model.refresh();

				return posdeptcd;
				
				//fSearch();	
			}else{
				model.resetInstanceNode("/root/hidden/tmp/tempuserinfo/list");
				messageBox("없는 사용자 번호 입니다.", "E999", "");
				model.refresh();
			}	
				
		}else{
			messageBox("사용자 번호를 정확히", "C001");
			iptObj.value = "";
			model.refresh();
		}		

		return "";
}


/**
 * @desc   : 마우스 오른쪽 버튼 팝업창
 * @		
 * @param  : job - 0:챠트대출, 1:챠트반납, 2:접수자명단
 * @return :
 * @authur : 이은영 2008.03.18
 * @---------------------------------------------------
 */
function fMouseRghtBtnPopup(gridObj, job)
{
    if (event.button == 3) {
        if (gridObj.isCell(event.target) && gridObj.mouseRow >= gridObj.fixedrows) {
			if (job == "1") {
				model.removeNodeset("/root/send/savedata");
				window.setPopupMenu(true, "/root/hidden/rtntrgtlist_menu/menu", "label", "func", false);									      	
			} else {
				window.setPopupMenu(false);
			} 
        } else {
            window.setPopupMenu(false);
        }
    } else {
    	window.setPopupMenu(false);
    } 
}


/**
 * @desc   : 팝업폼 보여주기..
 * @		
 * @param  : job -	0:챠트대출(미대출사유)	, 1:챠트반납(과보관사유), 
 * @				2:접수자명단(미대출사유), 3:챠트반납(대출연장)  , 4:챠트반납(차트분실)
 * @return :
 * @authur : 이은영 2008.03.18
 * @---------------------------------------------------
 */
function fShowWndIptBox(job) 
{
		grup_deptkeep.visible		= "false";	
		grup_addrtnschedd.visible	= "false";	
		grup_losschrt.visible		= "false";	

		if (job == "1") {
			model.setValue("/root/hidden/lendlist/deptkeepcd", "00");
			model.setValue("/root/hidden/lendlist/deptkeepresn", "");
			model.refresh();
			if (event.clientY < 100) {
				grup_deptkeep.attribute("top") = event.clientY-90;
			} else {
				grup_deptkeep.attribute("top") = 100;
			}
			grup_deptkeep.visible = "true";	
		} else if (job == "3") {
			model.setValue("/root/hidden/lendlist/term", "");
			model.setValue("/root/hidden/lendlist/termunit", "D");
			model.refresh();
			if (event.clientY < 280) {
				grup_addrtnschedd.attribute("top") = event.clientY-90;
			} else {
				grup_addrtnschedd.attribute("top") = 200;
			}
			grup_addrtnschedd.visible = "true";	
		} else if (job == "4") {
			model.setValue("/root/hidden/lendlist/chrtstat", "01");
			model.refresh();
			if (event.clientY < 300) {
				grup_losschrt.attribute("top") = event.clientY-110;
			} else {
				grup_losschrt.attribute("top") = 200;
			}
			grup_losschrt.visible = "true";	
		} 
}



/**
 * @desc   : 차트 반납에서 대출일자 기간 콤보 보여줄까? 말까?
 * @
 * @param  : 
 * @return :
 * @authur : 이은영 2008.05.30
 * @---------------------------------------------------
 */
function fLendTermDisabled()
{
		var lendtermdisabled = lendterm_disabled.value;
		if (lendtermdisabled == "Y") {									
			var today = getCurrentDate();
			model.setValue("/root/send/reqdata/fromappdd", today);
			model.setValue("/root/send/reqdata/toappdd"	, today);
			ipt_rtnfromappdd.refresh();
			ipt_rtntoappdd.refresh();
			ipt_rtnfromappdd.disabled = false;
			ipt_rtntoappdd.disabled = false;
		} else {
			model.setValue("/root/send/reqdata/fromappdd", "");
			model.setValue("/root/send/reqdata/toappdd"	, "");	
			ipt_rtnfromappdd.refresh();
			ipt_rtntoappdd.refresh();
			ipt_rtnfromappdd.disabled = true;
			ipt_rtntoappdd.disabled = true;								
		}
}


/**
 * @desc   : 차트 반납에서 반납예정일 기간 콤보 보여줄까? 말까?
 * @
 * @param  : 
 * @return :
 * @authur : 이은영 2008.05.30
 * @---------------------------------------------------
 */
function fRrtTermDisabled()
{
		var rtntermdisabled = rtnterm_disabled.value;
		if (rtntermdisabled == "Y") {									
			var today = getCurrentDate();
			model.setValue("/root/send/reqdata/fromrtndd", today);
			model.setValue("/root/send/reqdata/tortndd"	, today);
			ipt_fromrtndd.refresh();
			ipt_tortndd.refresh();
			ipt_fromrtndd.disabled = false;
			ipt_tortndd.disabled = false;
		} else {
			model.setValue("/root/send/reqdata/fromrtndd", "");
			model.setValue("/root/send/reqdata/tortndd"	, "");
			ipt_fromrtndd.refresh();
			ipt_tortndd.refresh();
			ipt_fromrtndd.disabled = true;
			ipt_tortndd.disabled = true;
		}
}



/**
 * @desc   : 환자등록번호 찾기...
 * @
 * @param  : 
 * @return :
 * @authur : 이은영 2008.07.21
 * @---------------------------------------------------
 */
function fFindPid(grdObj, pidRef)
{
		var pid = model.getValue(pidRef);
		var col = grdObj.colRef("pid");
		var startRow = grdObj.row + 1;
		if(startRow <= 0) {	startRow = 1; }			
		var row = grdObj.findRow(pid, parseInt(startRow), parseInt(grdObj.colRef("pid")), false, false);
		if(row < 0){
			alert("no more");
		} else {
			grdObj.row = row;
			grdObj.topRow = row;
		}
}


/**
 * @desc   : 사용자콤보 조회
 * @
 * @param  : ref       - reference path
 *           rsltref   - result reference path
 *           deptcd    - 부서코드
 *           jobkindcd - 직종코드
 *           jobposcd  - 직책코드
 *           specordyn - 선택진료여부
 * @return :
 * @author : 
 * @---------------------------------------------------
 */
function fGetUserComboList(ref, rsltref, deptcd, jobkindcd, specordyn)
{  
		model.removeNode(ref);
		model.makeValue(ref + "/deptcd"   , deptcd);    //부서코드
		model.makeValue(ref + "/jobkindcd", jobkindcd); //직종코드(의사:0330)
		model.makeValue(ref + "/specordyn", specordyn); //선택진료여부

		model.removeNode(rsltref);
		model.makeValue(rsltref + "/userlist/usercombo[1]/usernm", '-');
		model.makeValue(rsltref + "/userlist/usercombo[1]/userid", '');
		model.refresh();

		submit("TRMMB04102", "false", ref, rsltref + "/userlist");
}



/**
 * @desc   : 사용자 조회
 * @
 * @param  : refUserid - 사용자 ID, refUserDeptcd - 소속부서코드 ( posdeptcd )
 * @return : 
 * @authur : 이은영 2008.03.18
 * @---------------------------------------------------
 */
function fGetUserid(refUserid, refUsernm, refUserDeptcd, cmbObj)
{
		model.removenode("/root/hidden/tmp/tempuserinfo/list");
		model.reset("/root/hidden/tmp/tempuserinfo");

		var user = model.getValue(refUserid);
		var flag = "userid";
		
		if(isNaN(user)){
			flag = "usernm";
		}
		
		model.setValue("/root/hidden/tmp/userpopupinfo/param", "_OneS");
		model.setValue("/root/hidden/tmp/userpopupinfo/flag", flag);
		model.setValue("/root/hidden/tmp/userpopupinfo/searchitem", user);
		
		modal("SPZSU10103", "", "200", "200", "SPZSU10103","/root/hidden/tmp/userpopupinfo","/root/main/temp");
		
		var iParam = getParameter("SPZSU10103_"); 

		setCSVToNode("/root/hidden/tmp/tempuserinfo", iParam);
		clearParameter("SPZSU10103_");
		
		model.refresh();

		//fSearch는 인적사항 화면을 임포트 해간 화면에서 구현해 주어야 하는 함수이다.	
		if( getNodesetCount("/root/hidden/tmp/tempuserinfo/list") > 0 ){
			
			var userid		= model.getValue("/root/hidden/tmp/tempuserinfo/list/userid");
			var usernm		= model.getValue("/root/hidden/tmp/tempuserinfo/list/usernm");
			var posdeptcd	= model.getValue("/root/hidden/tmp/tempuserinfo/list/posdeptcd");

			if (!isNull(refUsernm)){
				if (isNaN(refUsernm)){
					model.makeValue(refUsernm, usernm);
				}
			}
			if (!isNull(refUserDeptcd)){
				if (isNaN(refUserDeptcd)){
					model.makeValue(refUserDeptcd, posdeptcd);		
				}
			}
			if (cmbObj != null){
				fAddUser(userid, usernm, cmbObj);
			}
			model.makeValue(refUserid, userid);
			model.refresh();
		}
}

/**
 * @desc   : 사용자 조회
 * @
 * @param  : Userid - 사용자ID, Usernm - 사용자명 
 * @return : 
 * @authur : 이은영 2008.09.01
 * @---------------------------------------------------
 */
function fAddUser(Userid, Usernm, cmbObj)
{
		var ref = cmbObj.choices.itemset.attribute("nodeset");
		var cnt = getNodesetCnt(model, ref) + 1 ;
		var userid = model.getValue(ref + "[userid ='" + Userid + "']/userid");
		if (userid == ""){
			model.makeValue(ref + "["+ cnt +"]/userid", Userid);
			model.makeValue(ref + "["+ cnt +"]/usernm", Usernm);
			var dataRef = cmbObj.attribute("ref");
			model.setValue(dataRef, Userid);
			cmbObj.refresh();
		}
}



/**
 * @desc   : excel 저장 하기
 * @
 * @param  : 
 * @return :
 * @authur : 이은영 2008.07.14
 * @---------------------------------------------------
 */
function fExcel(gridObj, title){

		if (title == null)	{ title = "" }
		var fileName = window.fileDialog("save", ",", false, title + "_" + getCurrentDate(), "xls", "Excel Files(*.xls)|*.xls|All Files (*.*)|*.*");
		if (fileName != "")	{
			gridObj.saveExcel(fileName, "SheetName", true, true, "", "", true);
		}
}


/**
 * @desc   : 선택된 환자등록번호로 현위치조회 텝이동..
 * @
 * @param  : gridObj - 그리드 컨트롤, ref - node path
 * @return :
 * @authur : 이은영 2008.03.18
 * @---------------------------------------------------
 */
function fMoveTabChartByPid(gridObj, ref){
 
		if (isDataCell() == false){
			return;
		}		
		if (gridObj.row < 1){
			return;
		}		
		var pid		 = model.getValue(ref + "[" + gridObj.row + "]/pid");
		var pnm		 = model.getValue(ref + "[" + gridObj.row + "]/pnm");
		window.parent.model.makeValue("/root/send/reqdata/pid"	  , pid);
		window.parent.model.makeValue("/root/send/reqdata/pnm"	  , pnm);
		window.parent.model.makeValue("/root/send/reqdata/rrgstno", "");
		window.parent.model.refresh();	
		window.parent.btn_ChrtInfo.dispatch("onclick");
		window.parent.javascript.fChartHistory();
}

/**
 * @desc   : 단축키 선택시 커서이동
 * @
 * @param  : 
 * @return :
 * @authur : 이은영 2009.01.28
 * @---------------------------------------------------
 */
function fMoveCursor(){
 
		model.setFocus("ipt_rtnbcno");	
		ipt_rtnbcno.refresh();	
}

/**
 * @desc   : 단축키 선택시 커서이동
 * @
 * @param  : 
 * @return :
 * @authur : 이은영 2009.01.28
 * @---------------------------------------------------
 */
function fKeyDown(){
		// F7 : 118, F8 : 119 ,  F9 : 120,  F10 : 121
		var keyCode = event.keyCode;
		if (keyCode == "118") {
			window.parent.javascript.fAccessKey1();
		} else if (keyCode == "119") {
			window.parent.javascript.fAccessKey2();
		} else if (keyCode == "120") {
			window.parent.javascript.fAccessKey3();
		} else if (keyCode == "121") {
			window.parent.javascript.fAccessKey4();
		}
}