YNU_JEUS/app_home/himed/imsi/xpapps/emr/chrtmngtxp/xp/SSMRC03400.xjs

<?xml version="1.0" encoding="utf-8"?>
<Script type="xscript4.0"><![CDATA[/***************************************************************************************  
 * System Name		:	DBS
 * Job Name 		:	
 * File Name 		:	SSMRC03400.xjs
 * Creator 	    	:	
 * Make Date 		:	2014-11-21
 *                                                                                        
 * Description  	:	                                                                   
 *--------------------------------------------------------------------------------------- 
 * Modify Date     	Modifier  	Modify Description                                     
 *--------------------------------------------------------------------------------------- 
 * 2014-11-21        DBS       Converting Program(TF->XP)
 *                                                                                        
 *--------------------------------------------------------------------------------------- 
 ****************************************************************************************/

//=======================================================================================
// Transaction Callback 
//---------------------------------------------------------------------------------------

/****************************************************************************************
 * Argument			: 01.sSvcId	: 서비스 ID
 *					: 02.nErrorCode	: 에러코드
 *					: 03.sErrorMsg	: 에러메시지
 * Description		: tr_getCodeList의 콜백함수
 ****************************************************************************************/
function cf_TXMRC00103(sSvcId, nErrorCode, sErrorMsg) {
    arErrorCode.push(sSvcId, nErrorCode);
    if(nErrorCode < 0) return;
	sysf_trace("***** cf_TXMRC00103 *****");
}

function cf_TXMRC00106(sSvcId, nErrorCode, sErrorMsg) {
    arErrorCode.push(sSvcId, nErrorCode);
    if(nErrorCode < 0) return;
	sysf_trace("***** cf_TXMRC00106 *****");
}

function cf_TXMRC03002(sSvcId, nErrorCode, sErrorMsg) {
    arErrorCode.push(sSvcId, nErrorCode);
    if(nErrorCode < 0) return;
	sysf_trace("***** cf_TXMRC03002 *****");
	
	ds_grd_rtnlist.rowposition = -1;
}

function cf_TRMRC00130(sSvcId, nErrorCode, sErrorMsg) {
    arErrorCode.push(sSvcId, nErrorCode);
    if(nErrorCode < 0) return;
	sysf_trace("***** cf_TRMRC00130 *****");
	
	ds_grd_rendlist2.rowposition = -1;
	ds_grd_rtnlist.rowposition = -1;
}

function cf_TXMRC00107(sSvcId, nErrorCode, sErrorMsg) {
    arErrorCode.push(sSvcId, nErrorCode);
    if(nErrorCode < 0) return;
	sysf_trace("***** cf_TXMRC00107 *****");
}

function cf_TRPMC02500(sSvcId, nErrorCode, sErrorMsg) {
    arErrorCode.push(sSvcId, nErrorCode);
    if(nErrorCode < 0) return;
	sysf_trace("***** cf_TRPMC02500 *****");
}

function cf_TXMRC00130(sSvcId, nErrorCode, sErrorMsg) {
    arErrorCode.push(sSvcId, nErrorCode);
    if(nErrorCode < 0) return;
	sysf_trace("***** cf_TXMRC00130 *****");
	
	ds_grd_rendlist2.rowposition = -1;
	ds_grd_rtnlist.rowposition = -1;
}

function cf_TRMRC00131(sSvcId, nErrorCode, sErrorMsg) {
    arErrorCode.push(sSvcId, nErrorCode);
    if(nErrorCode < 0) return;
	sysf_trace("***** cf_TRMRC00131 *****");
	
	ds_grd_rtnlist.rowposition = -1;
}


//=======================================================================================
// Global Form Variable
//---------------------------------------------------------------------------------------
var extnflag = "false";
var arErrorCode = new HashArray();
//var arErrorMsg = new HashArray();
var screenX = "";
var screenY = "";





//=======================================================================================
// Function 
//---------------------------------------------------------------------------------------

/****************************************************************************************
 * Argument			: 01.sKey	: 코드아이디
 *					: 02.sValue	: 코드명
 * Description		: 공통코드를 가져온다.
 ****************************************************************************************/


/**
 * @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 = utlf_getCurrentDate();
		ds_send_reqdata.setColumn(0, "rendcd"	 	, "ALL");
		ds_send_reqdata.setColumn(0, "appdeptcd"	, "ALL");
		ds_send_reqdata.setColumn(0, "fromappdd"	, today);
		ds_send_reqdata.setColumn(0, "toappdd"	 	, today);
		ds_send_reqdata.setColumn(0, "fromrtndd"	, "");
		ds_send_reqdata.setColumn(0, "tortndd"	 	, "");
		ds_send_reqdata.setColumn(0, "resettm"	 	, utlf_getCurrentTime());
		ds_send_reqdata.setColumn(0, "acptid"	 	, sysf_getUserId());

		ipt_fromrtndd.enable = false;
		ipt_tortndd.enable = false;

		fOpenTop(extnflag);
					
}




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

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

		var selectedRows = grdf_getSelectedRows(grdObj);
		for ( var i = 0; i < selectedRows.length; i++)
		{		
			var chrtseqno	= grdDs.getColumn(selectedRows[i], "chrtseqno");
			var medirecno	= grdDs.getColumn(selectedRows[i], "medirecno");
			var pid			= grdDs.getColumn(selectedRows[i], "pid");
			var appdeptcd	= grdDs.getColumn(selectedRows[i], "appdeptcd");
			var appmanid	= grdDs.getColumn(selectedRows[i], "appmanid");

			if (!utlf_isNull(chrtseqno)) {
				dataString = dataString + "u▦" + chrtseqno + "▦" + medirecno + "▦" + pid + "▦" + appdeptcd + "▦" + appmanid + "▩";
				dataCount = dataCount + 1;
			}
		}
		
		if (dataString.length > 0)
		{
			dsf_setCSVToDs("ds_send_savedata", savedata + dataString);
			
			var oParam = {};
				oParam.id       = "TXMRC00130";
				oParam.service  = "chrtmngtapp.ChrtRendMngt";
				oParam.method   = "setRtnList";
				oParam.inds     = "req=ds_send_savedata";
				oParam.outds    = "ds_grd_rendlist2=rtntrgtlist ds_grd_rtnlist=rtnlist";
				oParam.async    = true;
				oParam.callback = "cf_TXMRC00130";

			tranf_submit(oParam);

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

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




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


/**
 * @desc   : 챠트 반납 우클릭시 - > 대출연장 (반납예정일)
 * @
 * @param  :  
 * @return : 
 * @authur : 이은영 2008.03.18
 * @---------------------------------------------------
 */
function fUpdateRtnScheDD()
{
		// 2008.01.22. 대출연장 (반납예정일) 입력하기...
		var term	 = ds_hidden_lendlist.getColumn(0, "term");
		var termunit = ds_hidden_lendlist.getColumn(0, "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;

		var selectedRows = grdf_getSelectedRows(grd_rendlist2);
		for ( var i = 0; i < selectedRows.length; i++)
		{		
			var chrtseqno = ds_grd_rendlist2.getColumn(selectedRows[i] , "chrtseqno");
			if (!utlf_isNull(chrtseqno)) {
				dataString = dataString + chrtseqno + "▦" + rtnschedd + "▩";
				dataCount = dataCount + 1;
			}
		}

		grup_addrtnschedd.visible = false;
		
		if (dataString.length > 0)
		{
			dsf_setCSVToDs("ds_send_savedata", savedata + dataString);

			var oParam = {};
				oParam.id       = "TXMRC00106";
				oParam.service  = "chrtmngtapp.ChrtRendMngt";
				oParam.method   = "setRtnSchedd";
				oParam.inds     = "savedata=ds_send_savedata";
				//oParam.outds    = "null";
				oParam.async    = true;
				oParam.callback = "cf_TXMRC00106";

			tranf_submit(oParam);
			alert("총 " + dataCount + " 건 대출연장 되었습니다.");

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







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


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

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

		var selectedRows = grdf_getSelectedRows(grd_rendlist2);
		for ( var i = 0; i < selectedRows.length; i++)
		{		
			var chrtseqno = ds_grd_rendlist2.getColumn(selectedRows[i], "chrtseqno");
			if (!utlf_isNull(chrtseqno)) {
				dataString = dataString + chrtseqno + "▦" + deptkeepcd + "▦" + deptkeepresn + "▩";
				dataCount = dataCount + 1;
			}
		}
		
		grup_deptkeep.visible = false;

		if (dataString.length > 0)
		{
			
			dsf_setCSVToDs("ds_send_savedata", savedata + dataString);
			
			var oParam = {};
				oParam.id       = "TXMRC00103";
				oParam.service  = "chrtmngtapp.ChrtRendMngt";
				oParam.method   = "setDeptKeep";
				oParam.inds     = "savedata=ds_send_savedata";
				//oParam.outds    = "null";
				oParam.async    = true;
				oParam.callback = "cf_TXMRC00103";

			tranf_submit(oParam);
			
			alert("총 " + dataCount + " 건 과보관(사유입력) 되었습니다.");

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


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


/**
 * @desc   : 챠트상태를 수정한다.
 * @
 * @param  : 
 * @return :
 * @authur : 이은영 2008.07.28
 * @---------------------------------------------------
 */
function fUpdateChrtStat()
{		
		// 2008.07.28. 차트 분실 처리하기...
		var chrtstat   = ds_hidden_lendlist.getColumn(0, "chrtstat");
		var chrtstatnm = ds_init_M0424.lookup("cdid", chrtstat, "cdnm");

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

		var selectedRows = grdf_getSelectedRows(grd_rendlist2);
		for ( var i = 0; i < selectedRows.length; i++)
		{		
			var medirecno = ds_grd_rendlist2.getColumn(selectedRows[i], "medirecno");
			var chrtseqno = ds_grd_rendlist2.getColumn(selectedRows[i], "chrtseqno");
			var unrtnresn = "[" + chrtstatnm + "]";

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

		if (dataString.length > 0)
		{
			dsf_setCSVToDs("ds_send_savedata", savedata + dataString);
			
			var oParam = {};
				oParam.id       = "TXMRC00107";
				oParam.service  = "chrtmngtapp.ChrtRendMngt";
				oParam.method   = "reqExeLossChrt";
				oParam.inds     = "savedata=ds_send_savedata";
				//oParam.outds    = "null";
				oParam.async    = true;
				oParam.callback = "cf_TXMRC00107";

			tranf_submit(oParam);
			
			alert("총 " + dataCount + " 건 차트 분실 처리 되었습니다.");

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





/**
 * @desc   : 챠트 반납 조회
 * @
 * @param  : 
 * @return : 
 * @authur : 이은영 2008.03.18
 * @---------------------------------------------------
 */
function fGetRtnList()
{
		var oParam = {};
			oParam.id       = "TRMRC00130";
			oParam.service  = "chrtmngtapp.ChrtRendMngt";
			oParam.method   = "reqGetRtnList";
			oParam.inds     = "req=ds_send_reqdata";
			oParam.outds    = "ds_grd_rendlist2=rtntrgtlist ds_grd_rtnlist=rtnlist";
			oParam.async    = true;
			oParam.callback = "cf_TRMRC00130";

		tranf_submit(oParam);
}



/**
 * @desc   : 챠트 반납 조회 - 바크도 입력후 반납현황만 다시조회한다. (로그인 사용자별)
 * @
 * @param  : 
 * @return : 
 * @authur : 이은영 2008.03.18
 * @---------------------------------------------------
 */
function fGetUserRtnList()
{
		
		var oParam = {};
			oParam.id       = "TRMRC00131";
			oParam.service  = "chrtmngtapp.ChrtRendMngt";
			oParam.method   = "reqGetUserRtnList";
			oParam.inds     = "req=ds_send_reqdata";
			oParam.outds    = "ds_grd_rtnlist=rtnlist";
			oParam.async    = true;
			oParam.callback = "cf_TRMRC00131";

		tranf_submit(oParam);

}



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

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

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

		// 데이타 셋하기.. 외래/입원구분, 처리자ID, 대출일, 조회시간, 바코드
		var resettm  = ds_send_reqdata.getColumn(0, "resettm");
		ds_send_req.setColumn(0, "ioflag"  , "O");
		ds_send_req.setColumn(0, "acptid"  , sysf_getUserId());
		ds_send_req.setColumn(0, "renddd"  , utlf_getCurrentDate());
		ds_send_req.setColumn(0, "resettm" , resettm);
		ds_send_req.setColumn(0, "bcno"    , bcno.toUpperCase());
		
		var oParam = {};
			oParam.id       = "TXMRC03002";
			oParam.service  = "chrtmngtapp.ChrtRendMngt";
			oParam.method   = "reqExeRtnChrtByBcno";
			oParam.inds     = "req=ds_send_req";
			oParam.outds    = "ds_grd_rtnlist=rtnlist";
			oParam.async    = true;
			oParam.callback = "cf_TXMRC03002";

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

		// 2008.01.25. 바코드 번호 클리어...
		ds_send_reqdata.setColumn(0, "bcno", "");
		ipt_rtnbcno.setFocus();
}									


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

		if (flag == "true") {
			grup_rtnlist.position2.top = 24;   
			grup_rtnlist.position2.height = 700;
			grup_rtnlist.grd_rtnlist.position2.height = 672;
			caption65.visible = false;
		} else 	{
			grup_rtnlist.grd_rtnlist.position2.height = 390;
			grup_rtnlist.position2.top = 306;
			grup_rtnlist.position2.height = 418;
			caption65.visible = true;
		}
}


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



/**
 * @desc   : 등록된 환자번호인지 체킹한다..
 * @
 * @param  : iptObj - 환자번호 입력 컨트롤 (pid)
 * @return : pnm    - 환자명
 * @authur : 이은영 2008.03.18
 * @---------------------------------------------------
 */
function fCheckPid(iptObj, refoDs:Dataset, refPnm)
{
		ds_send_req.setColumn(0, "srchcond", "1");
		ds_send_req.setColumn(0, "pid", iptObj.text);
		
		//환자등록번호 체크
		if(iptObj.text.length > 0 ){
			
			ds_main_result_patinfo_patinfolist.clearData();
			
			var oParam = {};
				oParam.id       = "TRPMC02500";
				oParam.service  = "patinfomngtapp.PatBaseInfo";
				oParam.method   = "reqGetPatInfo";
				oParam.inds     = "req=ds_send_req";
				oParam.outds    = "ds_main_result_patinfo_patinfolist=patinfolist";
				oParam.async    = false;
				oParam.callback = "cf_TRPMC02500";

			tranf_submit(oParam);
			
			if(arErrorCode.pop("TRPMC02500") > -1){
				//fSearch는 인적사항 화면을 임포트 해간 화면에서 구현해 주어야 하는 함수이다.	
				if( ds_main_result_patinfo_patinfolist.rowcount > 0 ){
					ds_patinfolist.copyData(ds_main_result_patinfo_patinfolist);
					//* 2009.04.07. 이중번호 메세지 ( 14257937 박용석  -> 13275912 신옥순 )
					var sBindPid = ds_main_result_patinfo_patinfolist.getColumn(0, "bindpid");
					if( sBindPid != '-' && !utlf_isNull(sBindPid) && sBindPid != ' ' ){
						//합번된 등록번호 메세지 처리
						var sPid = ds_main_result_patinfo_patinfolist.getColumn(0, "pid");
						var sHngnm = ds_main_result_patinfo_patinfolist.getColumn(0, "hngnm");
						var retValue = sysf_messageBox(sPid + " (" + sHngnm + ") 환자의 등록번호가 [ " + sBindPid + " ] 로 합번 되었습니다. 합번된 등록번호로 재조회 하시겠습니까?", "Q999", "");
						if( retValue == '6' ){
							iptObj.value = sBindPid;
							iptObj.updateToDataset();
							fCheckPid(iptObj, refoDs, refPnm);
							return "";
						}
					}
					//*/
					var pid = ds_main_result_patinfo_patinfolist.getColumn(0, "pid");
					var pnm = ds_main_result_patinfo_patinfolist.getColumn(0, "hngnm");							
					if (refPnm != null)
					{
						refoDs.setColumn(0, refPnm, pnm);
					}
					return pnm;
				}else{
					ds_patinfolist.clearData();
					sysf_messageBox("없는 환자 번호 입니다.", "E999", "");
					return "";
				}								
			}	
				
		}else{
			sysf_messageBox("환자등록번호를 정확히", "C001");
			return "";
		}		
}



/**
 * @desc   : 환자등록번호 조회 팝업
 * @
 * @param  : refPid - 환자번호 참고 node path
 *           refPnm - 환자명   참고 node path
 * @return : 
 * @authur : 이은영 2008.03.18
 * @---------------------------------------------------
 */
function fGetPid(refoDs:Dataset, refPid, refPnm)
{

		//조회건수가 1건일 경우 팝업창을 바로 닫는다.
		var objColInfo = new Array();
		objColInfo.push({col: "pid", type:"string", size:256, val:""});
		objColInfo.push({col: "hngnm", type:"string", size:256, val:""});
		objColInfo.push({col: "srchcond", type:"string", size:256, val:"2"});
		objColInfo.push({col: "autoflag", type:"string", size:256, val:"N"});
		objColInfo.push({col: "rrgstno1", type:"string", size:256, val:""});
		objColInfo.push({col: "rrgstno2", type:"string", size:256, val:""});
		objColInfo.push({col: "checkfnexam", type:"string", size:256, val:"1"});
		dsf_createDsRow("ds_hidden_tmp_pidpopupinfo", objColInfo);
		
	
		var objArgs = new Object();
		objArgs.ds_SPPMC02500 = ds_hidden_tmp_pidpopupinfo;
		frmf_modal("SPPMC02500", "SPPMC02500", objArgs, null, "1", "10", "10", null, null, null, null, null, "M");

		//model.resetInstanceNode("/root/source");
		//환자번호 copy
		ds_main.setColumn(0, "popupendflag", frmf_getParameter("SPPMC02500_popupendflag"));
		var popupendflag = ds_main.getColumn(0, "popupendflag");
		
		if (popupendflag == "ok")
		{
			refoDs.setColumn(0, refPid, ds_patinfolist.getColumn(0, "pid"));
			if (refPnm == null) { refPnm = "" }
			if (!utlf_isNull(refPnm)) {
				refoDs.setColumn(0, refPnm, ds_patinfolist.getColumn(0, "hngnm"));
			}
		}	
}



/**
 * @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, e, job)
{
	var oDs = this.objects[gridObj.binddataset];
	if( oDs.rowcount < 1 ) return;
	if (e.row > -1 && e.col > -1) {
		if (job == "1") {
			oDs.rowposition = e.row;
			ds_send_savedata.clearData();
			ds_send_savedata.addRow();
			popupmenu.trackPopup(e.screenX,e.screenY);
			screenX = e.clientX;
			screenY = e.clientY;
			//window.setPopupMenu(true, "/root/hidden/rtntrgtlist_menu/menu", "label", "func", 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;	

		var nX = screenX;
		var nY = screenY;
		var widGrup = 0;
		var widGrd = parseInt(grd_rendlist2.position2.width);
		var grupObj;
		
		if (job == "1") {
			ds_hidden_lendlist.setColumn(0, "deptkeepcd", "00");
			ds_hidden_lendlist.setColumn(0, "deptkeepresn", "");
			widGrup = parseInt(grup_deptkeep.position.width);
			grupObj = grup_deptkeep;
// 			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") {
			ds_hidden_lendlist.setColumn(0, "term", "");
			ds_hidden_lendlist.setColumn(0, "termunit", "D");
			widGrup = parseInt(grup_addrtnschedd.position.width);
			grupObj = grup_addrtnschedd;
// 			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") {
			ds_hidden_lendlist.setColumn(0, "chrtstat", "01");
			widGrup = parseInt(grup_losschrt.position.width);
			grupObj = grup_losschrt;
// 			if (event.clientY < 300) {
// 				grup_losschrt.attribute("top") = event.clientY-110;
// 			} else {
// 				grup_losschrt.attribute("top") = 200;
// 			}
// 			grup_losschrt.visible = "true";	
		} 
		
		if( job == "1" || job == "3" || job == "4" ){
			if (widGrd < nX + widGrup)
			{
				nX = widGrd - widGrup - 17;
			}
			
			nX = system.clientToScreenX(grd_rendlist2,nX);
			nY = system.clientToScreenY(grd_rendlist2,nY);
			grupObj.trackPopup(nX,nY);
		}
		
}



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


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



/**
 * @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(refoDs:Dataset, refUserid, refUsernm, refUserDeptcd, cmbObj)
{
		//sysf_trace("cmbObj : " + cmbObj);
		ds_hidden_tmp_tempuserinfo.clearData();

		var user = refoDs.getColumn(0, refUserid);
		var flag = "userid";
		
		if(isNaN(user)){
			flag = "usernm";
		}
		
		ds_hidden_tmp_userpopupinfo.setColumn(0, "param", "_OneS");
		ds_hidden_tmp_userpopupinfo.setColumn(0, "flag", flag);
		ds_hidden_tmp_userpopupinfo.setColumn(0, "searchitem", user);
		
		var objArgs = new Object();
		objArgs.param = 	ds_hidden_tmp_userpopupinfo.getColumn(0, "param");
		objArgs.flag = 		ds_hidden_tmp_userpopupinfo.getColumn(0, "flag");
		objArgs.searchitem = 	ds_hidden_tmp_userpopupinfo.getColumn(0, "searchitem");
		var rtn = frmf_modal("SPZSU10103", "SPZSU10103", objArgs, null, "1", "10", "10", null, null, null, null, null, "P");
		//modal("SPZSU10103", "", "200", "200", "SPZSU10103","/root/hidden/tmp/userpopupinfo","/root/main/temp");
		
// 		var iParam = frmf_getParameter("SPZSU10103_"); 
// 		
// 		dsf_setCSVToDs("ds_hidden_tmp_tempuserinfo", iParam);
// 		frmf_clearParameter("SPZSU10103_");
		ds_hidden_tmp_tempuserinfo.copyData(rtn);

		
		//fSearch는 인적사항 화면을 임포트 해간 화면에서 구현해 주어야 하는 함수이다.	
		if( ds_hidden_tmp_tempuserinfo.rowcount > 0 ){
			
			var userid		= ds_hidden_tmp_tempuserinfo.getColumn(0, "userid");
			var usernm		= ds_hidden_tmp_tempuserinfo.getColumn(0, "usernm");
			var posdeptcd	= ds_hidden_tmp_tempuserinfo.getColumn(0, "posdeptcd");

			if (!utlf_isNull(refUsernm)){
				if (isNaN(refUsernm)){
					refoDs.setColumn(0, refUsernm, usernm);
				}
			}
			if (!utlf_isNull(refUserDeptcd)){
				if (isNaN(refUserDeptcd)){
					refoDs.setColumn(0, refUserDeptcd, posdeptcd);		
				}
			}
			if (cmbObj != null){
				fAddUser(userid, usernm, cmbObj);
			}
			refoDs.setColumn(0, refUserid, userid);
		}
}

/**
 * @desc   : 사용자 조회
 * @
 * @param  : Userid - 사용자ID, Usernm - 사용자명 
 * @return : 
 * @authur : 이은영 2008.09.01
 * @---------------------------------------------------
 */
function fAddUser(Userid, Usernm, cmbObj)
{
	if( cmbObj == "[object Combo]" ){
		var objCombo = cmbObj;
	}else{
		var objCombo = eval(cmbObj);
	}
	//innerdataset
	if(!((objCombo.innerdataset).toString() == "[object Dataset]"))
	{
		var objDs = eval(objCombo.innerdataset);
	}
	else
	{
		var objDs = objCombo.innerdataset;
	}
	
	var userid = objDs.lookup("userid", Userid, "userid");
	if( utlf_isNull(userid) ){
	
		var nRow = objDs.addRow();
		objDs.setColumn(nRow, cmbObj.codecolumn, Userid);
		objDs.setColumn(nRow, cmbObj.datacolumn, Usernm);
		
		objCombo.value = Userid;
		objCombo.updateToDataset();
	}
}



/**
 * @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);
// 		}
		grdf_exportExcel(gridObj, title, "SheetName");
}


/**
 * @desc   : 선택된 환자등록번호로 현위치조회 텝이동..
 * @
 * @param  : gridObj - 그리드 컨트롤, ref - node path
 * @return :
 * @authur : 이은영 2008.03.18
 * @---------------------------------------------------
 */
function fMoveTabChartByPid(gridObj, e){
 
		var oDs = this.objects[gridObj.binddataset];
		if( oDs.rowcount < 1 ) return;
		if( e.row < 0 && e.col < 0 ){
			return;
		}	
			
		if (oDs.rowposition < 0){
			return;
		}
				
		var pid		 = oDs.getColumn(oDs.rowposition, "pid");
		var pnm		 = oDs.getColumn(oDs.rowposition, "pnm");
		this.getOwnerFrame().form.ds_send_reqdata.setColumn(0, "pid"	  , pid);
		this.getOwnerFrame().form.ds_send_reqdata.setColumn(0, "pnm"	  , pnm);
		this.getOwnerFrame().form.ds_send_reqdata.setColumn(0, "rrgstno", "");
		this.getOwnerFrame().form.group2.switch1.tabindex = 0;
		this.getOwnerFrame().form.fChartHistory();
}

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

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




]]></Script>