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

/**
 * @desc   : Source Node의 갯수를 구한다.
 * @
 * @param  : path  -  node path
 * @return : 
 * @authur : 김선태 2007. 5. 8
 * @---------------------------------------------------
 */
function getNodeSetCnt(path)
{
	var insXml = model.instances(0);
	var nodeList = insXml.selectNodes(path);
	return nodeList.length;
}


/**
 * @desc   : Source Node의 child nodelist를 Destination의 nodelist로 append한다.
 *           
 * @param  : strDest  -  도착node path
 *         : strSrc   -  출발node path
 * @return : void
 * @authur : 이상현 2007. 3. 27
 * @---------------------------------------------------
 */
function addCopyNodeset(strDest, strSrc, mode, destModel, srcModel) {

	if( destModel == null || destModel =="" )
		destModel = document.models.item(0);
		
	if( srcModel == null || srcModel =="" )
		srcModel = document.models.item(0);
		
	var srcNodeList = srcModel.instances(0).selectNodes(strSrc);
	var srcNode;
		
	var pDestNode = destModel.instances.item(0).selectSingleNode(strDest).parentNode;
	
	if( mode == "replace" || mode == null ) {	
		destModel.removeNodeset(strDest);
		while( srcNode = srcNodeList.nextNode() ) {
			pDestNode.appendChild(srcNode.cloneNode(true));
		}
	}
	
	else if( mode == "after" ) {
		while( srcNode = srcNodeList.nextNode() ) {
			pDestNode.appendChild(srcNode.cloneNode(true));
		}
	}
	
	else if( mode == "before" ) {	
		var destNode;				
		for( var i = srcNodeList.length - 1; i >= 0; i-- ) {
			destNode = destModel.instances.item(0).selectSingleNode(strDest + "[1]");
			pDestNode.insertBefore(srcNodeList.item(i).cloneNode(true), destNode);
		}
	}
}

/**
 * @desc : 사용자의 권한을 체크하여 버튼셋팅.
 *         btn_r 조회버튼, btn_x 저장 및 수정 버튼, btn_p : 출력버튼
 * @return : void
 * @authur : 김선태 2007. 5. 8
 */
function fchkAuth()
{
			
	for(var i=0; i<= document.controls.length-1 ; i++){
			if(document.controls.item(i).elementName == "xforms:button"){
				if(document.controls.item(i).attribute("id").substr(0,6) == "btn_r_"){
					document.controls.item(i).disabled = !checkAuth("R");	
				}
				
				if(document.controls.item(i).attribute("id").substr(0,6) == "btn_x_"){
					document.controls.item(i).disabled = !checkAuth("X");	
				}
				
				if(document.controls.item(i).attribute("id").substr(0,6) == "btn_p_"){
					document.controls.item(i).disabled = !checkAuth("P");	
				}
			
				if(document.controls.item(i).attribute("id").substr(0,6) == "btn_e_"){
					document.controls.item(i).disabled = !checkAuth("P");	
				}
			
			}
		}	

}




/**
 * @desc   : 폼초기화
 * @
 * @param  : 
 * @return :
 * @authur : 이은영 2008.03.18
 * @---------------------------------------------------
 */
function fFormInit()
{
		// KNUH_20101207_박성호_start_의무기록 부서코드 가져오기
		mmbfGetHardCodeInfo("/root/send/reqdata", "/root/init/dutplcecd", 5502);	
		// KNUH_20101207_박성호_end


		// 대출목록을 먼저 보여준다.
		btn_rendlsit.dispatch("onclick");
		//	버튼권한체크
		fchkAuth();
		
		//공통코드 가져오기...
		//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();
		var valitodd = (today.toDate()).getAddDate(-14);	// 디폴트는 몇일 이전 기준으로 보여주나??
		valitodd = valitodd.getDateFormat();

		model.setValue("/root/condition/rendlist/fromrenddd"		, today);
		model.setValue("/root/condition/rendlist/torenddd"			, today);					
		model.setValue("/root/condition/rendlist/rendcd"			, "ALL");
		model.setValue("/root/condition/rendlist/appdeptcd"			, "ALL");
		model.setValue("/root/condition/rendlist/chrtdeptcd"		, "ALL");
		model.setValue("/root/condition/rendlist/setcd"				, "90000000000000060");

		model.setValue("/root/condition/rtnlist/fromrtndd"			, today);
		model.setValue("/root/condition/rtnlist/tortndd"			, today);	
		model.setValue("/root/condition/rtnlist/fromrenddd"			, today);
		model.setValue("/root/condition/rtnlist/torenddd"			, today);		
		model.setValue("/root/condition/rtnlist/rendcd"				, "ALL");
		model.setValue("/root/condition/rtnlist/appdeptcd"			, "ALL");
		model.setValue("/root/condition/rtnlist/chrtdeptcd"			, "ALL");
		model.setValue("/root/condition/rtnlist/setcd"				, "90000000000000060");
		
		model.setValue("/root/condition/unrtnlist/fromschertndd"	, today);
		model.setValue("/root/condition/unrtnlist/toschertndd"		, today);	
		model.setValue("/root/condition/unrtnlist/fromrenddd"		, today);
		model.setValue("/root/condition/unrtnlist/torenddd"			, today);		
		model.setValue("/root/condition/unrtnlist/rendcd"			, "ALL");
		model.setValue("/root/condition/unrtnlist/appdeptcd"		, "ALL");
		model.setValue("/root/condition/unrtnlist/chrtdeptcd"		, "ALL");
		model.setValue("/root/condition/unrtnlist/setcd"			, "90000000000000060");
		
		model.setValue("/root/condition/wardunrtnlist/fromdschdd"	, today);
		model.setValue("/root/condition/wardunrtnlist/todschdd"		, today);	
		model.setValue("/root/condition/wardunrtnlist/fromrenddd"	, today);
		model.setValue("/root/condition/wardunrtnlist/torenddd"		, today);		
		model.setValue("/root/condition/wardunrtnlist/rendcd"		, "ALL");
		model.setValue("/root/condition/wardunrtnlist/appdeptcd"	, "ALL");
		model.setValue("/root/condition/wardunrtnlist/chrtdeptcd"	, "ALL");
		model.setValue("/root/condition/wardunrtnlist/sortwardcd"	, "Y");
		model.setValue("/root/condition/wardunrtnlist/setcd"		, "90000000000000060");

		model.refresh();

		// 2009.01.12. 대출용도 셋 조회... (의료정보팀..3230000000) 
		// KNUH_20101207_박성호_start_의무기록 부서코드 가져오기
		var dutplcecd = model.getValue("/root/init/dutplcecd/hardcd/hardcd");
		//model.makeValue("/root/send/reqdata/deptcd"	 , "3230000000");
		model.makeValue("/root/send/reqdata/deptcd"	 , dutplcecd);
		// KNUH_20101207_박성호_end
		submit("TRMRC01312");		
}


/**
 * @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  : refUserid - 대출자 ID, refUserDeptcd - 소속부서코드 ( posdeptcd )
 * @return : 
 * @authur : 이은영 2008.03.18
 * @---------------------------------------------------
 */
function fGetUserid(refUserid, refUsernm)
{
		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");

			model.makeValue(refUserid, userid);
			if (refUsernm == null) { refUsernm = ""; }
			if (refUsernm != "") {
			model.makeValue(refUsernm, usernm);
			}
			model.refresh();
		}
}


/**
 * @desc   : 대출목록 조회
 * @
 * @param  :  
 * @return :
 * @authur : 이은영 2008.03.18
 * @---------------------------------------------------
 */
function fGetLendList()
{
		model.copyNode("/root/send/reqdata", "/root/condition/rendlist");
		// 2009.01.12. 대출용도 셋 아이템 셋하기.. ^^
		fSetRendCdList();
		submit("TRMRC00200");

		// 2008.01.02. 대출목록 조회 총건수..
		model.setValue ("/root/hidden/rendcnt", grd_rendlist.rows - 1);
		cap_lendlist.refresh();
}


/**
 * @desc   : 미반납목록 조회
 * @
 * @param  :  
 * @return :
 * @authur : 이은영 2008.03.18
 * @---------------------------------------------------
 */
function fGetUnRtnList()
{
		model.copyNode("/root/send/reqdata", "/root/condition/unrtnlist");		
		// 2009.01.12. 대출용도 셋 아이템 셋하기.. ^^
		fSetRendCdList();
		submit("TRMRC00220");

		// 2008.01.02. 미반납목록 조회 총건수..
		model.setValue ("/root/hidden/unrtncnt", grd_unrtnlist.rows - 1);
		cap_unrtnlist.refresh();
}


/**
 * @desc   : 미반납목록 조회 - 병동
 * @
 * @param  :  
 * @return :
 * @authur : 이은영 2008.03.18
 * @---------------------------------------------------
 */
function fGetWardUnRtnList()
{
		model.copyNode("/root/send/reqdata", "/root/condition/wardunrtnlist");		
		// 2009.01.12. 대출용도 셋 아이템 셋하기.. ^^
		fSetRendCdList();
		submit("TRMRC00240");

		// 2008.01.02. 미반납목록 조회 총건수..
		model.setValue ("/root/hidden/wardunrtncnt", grd_wardunrtnlist.rows - 1);
		cap_wardunrtnlist.refresh();
}


/**
 * @desc   : 반납목록 조회
 * @
 * @param  :  
 * @return :
 * @authur : 이은영 2008.03.18
 * @---------------------------------------------------
 */
function fGetRtnList()
{
		model.copyNode("/root/send/reqdata", "/root/condition/rtnlist");		
		// 2009.01.12. 대출용도 셋 아이템 셋하기.. ^^
		fSetRendCdList();
		submit("TRMRC00210");

		// 2008.01.02. 미반납목록 조회 총건수..
		model.setValue ("/root/hidden/rtncnt", grd_rtnlist.rows - 1);
		cap_rtnlist.refresh();
}


/**
 * @desc   : 분실차트 조회
 * @
 * @param  :  
 * @return :
 * @authur : 이은영 2008.06.11
 * @---------------------------------------------------
 */
function fGetCherStatList()
{
		model.copyNode("/root/send/reqdata", "/root/condition/chrtstatlist");		
		submit("TRMRC00230");

		// 2008.01.02. 차트 리스트 조회 총건수..
		model.setValue ("/root/hidden/chrtstatcnt", grd_chrtstat.rows - 1);
		cap_chrtstat.refresh();
}



/**
 * @desc   : 외래/입원 구분에 따른 컨트롤 보여주기..
 * @
 * @param  :  
 * @return :
 * @authur : 이은영 2008.06.11
 * @---------------------------------------------------
 */
function fDisplayControl()
{
		var ioflag = rdo_ioflag.value ;

		if (ioflag == "O") {
			cap_indd.visible   = false;
			ipt_indd.visible   = false;
			cap_dcshdd.visible = false;
			ipt_dcshdd.visible = false;
		} else {
			cap_indd.visible   = true;
			ipt_indd.visible   = true;
			cap_dcshdd.visible = true;
			ipt_dcshdd.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/condition/unrtnlist/fromrenddd", today);
			model.setValue("/root/condition/unrtnlist/torenddd"	, today);	
			ipt_fromrendd.disabled = false;
			ipt_torendd.disabled = false;				
		} else {
			model.setValue("/root/condition/unrtnlist/fromrenddd", "");
			model.setValue("/root/condition/unrtnlist/torenddd"	, "");	
			ipt_fromrendd.disabled = true;
			ipt_torendd.disabled = true;					
		}	
			ipt_fromrendd.refresh();			
			ipt_torendd.refresh();		
}


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


/**
 * @desc   : 차트 반납에서 대출일자 기간 콤보 보여줄까? 말까? -> 병동
 * @
 * @param  : 
 * @return :
 * @authur : 이은영 2008.05.30
 * @---------------------------------------------------
 */
function fWardLendTermDisabled()
{
		var lendtermdisabled = wardlendterm_disabled.value;
		if (lendtermdisabled == "Y") {									
			var today = getCurrentDate();
			model.setValue("/root/condition/wardunrtnlist/fromrenddd", today);
			model.setValue("/root/condition/wardunrtnlist/torenddd"	, today);	
			ipt_wardfromrendd.disabled = false;
			ipt_wardtorendd.disabled = false;				
		} else {
			model.setValue("/root/condition/wardunrtnlist/fromrenddd", "");
			model.setValue("/root/condition/wardunrtnlist/torenddd"	, "");	
			ipt_wardfromrendd.disabled = true;
			ipt_wardtorendd.disabled = true;					
		}	
			ipt_wardfromrendd.refresh();			
			ipt_wardtorendd.refresh();		
}


/**
 * @desc   : 차트 반납에서 반납예정일 기간 콤보 보여줄까? 말까? -> 병동
 * @
 * @param  : 
 * @return :
 * @authur : 이은영 2008.05.30
 * @---------------------------------------------------
 */
function fWardDschTermDisabled()
{
		var dschtermdisabled = warddschterm_disabled.value;
		if (dschtermdisabled == "Y") {									
			var today = getCurrentDate();
			model.setValue("/root/condition/wardunrtnlist/fromdschdd", today);
			model.setValue("/root/condition/wardunrtnlist/todschdd"  , today);
			ipt_wardfromdschdd.disabled = false;
			ipt_wardtodschdd.disabled = false;
		} else {
			model.setValue("/root/condition/wardunrtnlist/fromdschdd", "");
			model.setValue("/root/condition/wardunrtnlist/todschdd"  , "");
			ipt_wardfromdschdd.disabled = true;
			ipt_wardtodschdd.disabled = true;
		}
			ipt_wardfromdschdd.refresh();			
			ipt_wardtodschdd.refresh();							
}


/**
 * @desc   : 차트 반납에서 대출일자 기간 콤보 보여줄까? 말까? 
 * @
 * @param  : 
 * @return :
 * @authur : 이은영 2008.05.30
 * @---------------------------------------------------
 */
function fRtnLendTermDisabled()
{
		var lendtermdisabled = rtnlendterm_disabled.value;
		if (lendtermdisabled == "Y") {									
			var today = getCurrentDate();
			model.setValue("/root/condition/rtnlist/fromrenddd" , today);
			model.setValue("/root/condition/rtnlist/torenddd"	, today);	
			ipt_rtnfromrendd.disabled = false;
			ipt_rtntorendd.disabled = false;				
		} else {
			model.setValue("/root/condition/rtnlist/fromrenddd" , "");
			model.setValue("/root/condition/rtnlist/torenddd"   , "");	
			ipt_rtnfromrendd.disabled = true;
			ipt_rtntorendd.disabled = true;					
		}	
			ipt_rtnfromrendd.refresh();			
			ipt_rtntorendd.refresh();		
}


/**
 * @desc   : 차트 반납에서 반납예정일 기간 콤보 보여줄까? 말까? 
 * @
 * @param  : 
 * @return :
 * @authur : 이은영 2008.05.30
 * @---------------------------------------------------
 */
function fRtnRtnTermDisabled()
{
		var rtntermdisabled = rtnrtnterm_disabled.value;
		if (rtntermdisabled == "Y") {									
			var today = getCurrentDate();
			model.setValue("/root/condition/rtnlist/fromrtndd", today);
			model.setValue("/root/condition/rtnlist/tortndd"  , today);
			ipt_rtnfromrtndd.disabled = false;
			ipt_rtntortndd.disabled = false;
		} else {
			model.setValue("/root/condition/rtnlist/fromrtndd", "");
			model.setValue("/root/condition/rtnlist/tortndd"  , "");
			ipt_rtnfromrtndd.disabled = true;
			ipt_rtntortndd.disabled = true;
		}
			ipt_rtnfromrtndd.refresh();			
			ipt_rtntortndd.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  : 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  : 
 * @return : 
 * @authur : 이은영 2009.01.12
 * @---------------------------------------------------
 */
function fGetChkRendCdList(setcd, refData, cboObj)
{
		model.makeValue("/root/send/reqdata/setcd"	 , setcd);
		submit("TRMRC01313");

		var ref = "/root/init/lendsetitem/setitemlist";
		var cnt = getNodesetCnt(model, ref);
		var chkrendcdlist = "";
		for ( var i = 1; i <= cnt; i++)
		{		
			var rendcd		= model.getValue(ref + "[" + i + "]/rendcd");
			var srchuseyn	= model.getValue(ref + "[" + i + "]/srchuseyn");
			if (srchuseyn == "Y") {
				chkrendcdlist = chkrendcdlist + rendcd + "|";
			}
		}
		var rendcdlist = chkrendcdlist.split("|");
		if (rendcdlist.length > 0) {
			chkrendcdlist = chkrendcdlist.substring(0, chkrendcdlist.length -1);
		}
		model.setValue(refData, chkrendcdlist);
		cboObj.refresh();
}


/**
 * @desc   : 대출용도 셋 코드 아이템 리스트 저장하기 전 셋 해주기..
 * @
 * @param  :  
 * @return :
 * @authur : 이은영 2009.01.12
 * @---------------------------------------------------
 */
function fSetRendCdList()
{
		// 2009.01.12. 대출용도 셋으로 조회하기.. ^^
		var rendcd = model.getValue("/root/send/reqdata/rendcdlist");
		var rendcdlist = rendcd.split("|");
		if (rendcd.length > 0) {
			for (var i = 0 ; i < rendcdlist.length ; i++) {
				rendcd = rendcd.replace("|","','");
			}
			rendcd = "'" + rendcd + "'";
		}
		if (rendcd != "") {
			model.setValue("/root/send/reqdata/rendcd", rendcd);
		}		
}

/**
 * @desc   : 하드코드 조회
 * @
 * @param  : ref      - reference path
 *           rsltref  - result reference path
 *           hardcd   - 하드코드
 * @return :
 * @author : 오지훈
 * @---------------------------------------------------
 */
function mmbfGetHardCodeInfo(ref, rsltref, hardcd){
    var mmb_rsltref = "/root/hidden/mmb/hardcd";
    model.removeNode(mmb_rsltref);
    model.makeNode(mmb_rsltref);
    model.removeNode(ref);
    model.makeValue(ref + "/hardcd", hardcd);
    if(submit("TRMMB04103", "false", ref, mmb_rsltref)==true){
        model.copyNode(rsltref, mmb_rsltref);
        model.removeNode(mmb_rsltref);
    }
    model.refresh();
}