/**
 * @desc   : 화면초기화
 *
 * @param  :
 * @return :
 * @author : 경북대학교
 * @---------------------------------------------------
 */
function fInitialize(){
    mmbfGetDeptCodeComboList("/root/send/reqdata", "/root/init/orddept" , "D");   //부서코드 콤보
    addComboInstance("/root/init/orddept", "deptcd^depthngnm", "Z^전체", "dept"); //부서콤보 전체항목 추가
    
    model.setValue("/root/main/right_cond/orddeptcd", "Z");
    
    model.setValue("/root/main/right_cond/srch_flag", "I");
    model.setValue("/root/main/right_cond/srch_fromdd", getCurrentDate());
    model.setValue("/root/main/right_cond/srch_todd", getCurrentDate());
    
    model.setValue("/root/main/left_cond/srch_flag", "I");
    model.setValue("/root/main/left_cond/srch_fromdd", getCurrentDate());
    model.setValue("/root/main/left_cond/srch_todd", getCurrentDate());
    grd_left.deleteRow(1);
    grd_right.deleteRow(1);
	model.refresh();

}

/**
 * 저장 전 검색조건 체크
 * @return
 */
function fCheck(){
	if(model.getValue("/root/main/right_cond/srch_flag")=="A" && model.getValue("/root/main/right_cond/orddeptcd")=="Z"){
		messageBox("재원 중인 환자를 검색시 진료과 선택은", "I003");
		return false;
	}
	
	if(model.getValue("/root/main/right_cond/pid")=="" && 
	  (model.getValue("/root/main/right_cond/orddeptcd")=="Z" || model.getValue("/root/main/right_cond/srch_flag")=="Z" )){
		messageBox("진료과 또는 구분이 전체일 경우 환자번호는", "I003");
		return false;
	}
	return true;
}

/**
 * 환자검색
 * @return
 */
function fRightSearch(){
	if(fCheck()){
		model.copyNode("/root/send/right/reqdata", "/root/main/right_cond");
		submit("TRMRH00300");
	}else{
		return;
	}
	model.makeNode("/root/temp/right_chkyn"); // 진단코드를 검색하는 경우 노드가 사라져버리는 현상때문에 검색하면 동시에 노드 생성하도록 설정
	model.setValue("/root/temp/right_chkyn", "N");
	model.refresh();
} 

/**
 * 저장된 환자검색
 * @return
 */
function fLeftSearch(){
	model.removeNodeset("/root/send/left");
	model.makeNode("/root/send/left/reqdata");
	model.makeValue("/root/main/left_cond/recflag", "B");
	model.copyNode("/root/send/left/reqdata", "/root/main/left_cond");
	submit("TRMRH00310");
	model.refresh();
}

/**
 * 검색된 환자를 대상환자로 복사
 * @return
 */
function fCopyData(){
	var rihgt_rows=grd_right.rows-grd_right.fixedRows; // 오른쪽 그리드 행의 갯수
	var left_rows=grd_left.rows-grd_left.fixedRows;	   // 왼쪽 그리드 행의 갯수
	var j=left_rows+1;
	var lgrd_chk = false; // 왼쪽 그리드에 오른쪽에서 이동할려는 환자가 있는지 없는지 확인하는 플래그
	
	for(var i=1; i<=rihgt_rows; i++){
		var chkyn=model.getValue("/root/main/grd_right["+i+"]/chkbox");
		if(chkyn=="Y"){
			
			var r_pid=model.getValue("/root/main/grd_right["+i+"]/pid");
			var r_orddd=model.getValue("/root/main/grd_right["+i+"]/orddd");
			var r_cretno=model.getValue("/root/main/grd_right["+i+"]/cretno");
			for(var k=1; k<=left_rows; k++){
				var l_pid=model.getValue("/root/main/grd_left["+k+"]/pid");
				var l_orddd=model.getValue("/root/main/grd_left["+k+"]/orddd");
				var l_cretno=model.getValue("/root/main/grd_left["+k+"]/cretno");
				if(r_pid==l_pid && r_orddd==l_orddd && r_cretno==l_cretno){
					lgrd_chk=true;
					break;
				}
			}
			if(lgrd_chk==true){
				lgrd_chk = false;
				continue;
			}
			grd_left.addRow();
			model.setValue("/root/main/grd_left["+j+"]/saveyn", "Y");
			model.setValue("/root/main/grd_left["+j+"]/indxyn", "Y");
			model.setValue("/root/main/grd_left["+j+"]/cdstyn", "N");
			model.setValue("/root/main/grd_left["+j+"]/eduyn", "Y");
			model.setValue("/root/main/grd_left["+j+"]/pid", model.getValue("/root/main/grd_right["+i+"]/pid"));
			model.setValue("/root/main/grd_left["+j+"]/hngnm", model.getValue("/root/main/grd_right["+i+"]/hngnm"));
			model.setValue("/root/main/grd_left["+j+"]/sex", model.getValue("/root/main/grd_right["+i+"]/sex"));
			model.setValue("/root/main/grd_left["+j+"]/age", model.getValue("/root/main/grd_right["+i+"]/age"));
			model.setValue("/root/main/grd_left["+j+"]/diagengnm", model.getValue("/root/main/grd_right["+i+"]/diagengnm"));
			model.setValue("/root/main/grd_left["+j+"]/orddd", model.getValue("/root/main/grd_right["+i+"]/orddd"));
			model.setValue("/root/main/grd_left["+j+"]/dschdd", model.getValue("/root/main/grd_right["+i+"]/dschdd"));
			model.setValue("/root/main/grd_left["+j+"]/telno", model.getValue("/root/main/grd_right["+i+"]/telno"));
			model.setValue("/root/main/grd_left["+j+"]/followup", "");
			model.setValue("/root/main/grd_left["+j+"]/cretno", model.getValue("/root/main/grd_right["+i+"]/cretno"));
			model.setValue("/root/main/grd_left["+j+"]/ordtype", model.getValue("/root/main/grd_right["+i+"]/ordtype"));
			j++;
		}
	}
	model.refresh();
}

/**
 * @desc   : 진단 팝업
 * @
 * @param  : 
 * @return :
 * @---------------------------------------------------
 */
function fClickPopUp(flag){
	var instance = document.models(0).instances(0);

    var nodelistTemp = instance.selectNodes("/root/temp/selectdiaglist");
	for (var i=1 ; i <= nodelistTemp.length ; i++) {				
		model.destroy("/root/temp/selectdiaglist["+ i +"]");
	}							
	model.refresh();

	modal("../../../emr/prcpmngtweb/xrw/SPMMO03200_진단팝업.xrw", 1, 0, 0, "", "", "");
    
    var sTmpdiagcd = "";
    var sTmpdiagengnm = "";
    var nodelistTemp = instance.selectNodes("/root/temp/selectdiaglist");
    if(nodelistTemp.length >= 1){

		sTmpdiagcd = model.getValue("/root/temp/selectdiaglist[1]/diagcd");
		sTmpdiagengnm = model.getValue("/root/temp/selectdiaglist[1]/diagengnm");

		if (flag == "1") {
			model.setValue("/root/main/right_cond/diagcd", sTmpdiagcd);
		} 
		model.refresh();
    }
}

/**
 * @desc   : 저장
 * @
 * @param  : 
 * @return :
 * @---------------------------------------------------
 */
function fSave(){
	var chk=false;
	var left_rows=grd_left.rows-grd_left.fixedRows;
	var savedata = "instcd▦pid▦orddd▦cretno▦ordtype▦recflag▦indxyn▦cdstyn▦eduyn▩";
	var datapath =	"/root/main/grd_left";
	var srchdata = "pid▦srch_flag▦srch_fromdd▦srch_todd▦recflag▩";
	var srchpath =	"/root/main/left_cond";

	for(var i=1; i<=left_rows; i++){
		var saveyn = model.getValue("/root/main/grd_left["+i+"]/saveyn");
		if(saveyn=="Y"){
			chk=true;
			savedata += getUserInfo("dutplceinstcd") + "▦";
			savedata += model.getValue(datapath+"["+ i +"]/pid") + "▦";
			savedata += model.getValue(datapath+"["+ i +"]/orddd") + "▦";
			savedata += model.getValue(datapath+"["+ i +"]/cretno") + "▦";
			savedata += model.getValue(datapath+"["+ i +"]/ordtype") + "▦";
			savedata += "B" + "▦";
			savedata += model.getValue(datapath+"["+ i +"]/indxyn") + "▦";
			savedata += model.getValue(datapath+"["+ i +"]/cdstyn") + "▦";
			savedata += model.getValue(datapath+"["+ i +"]/eduyn") + "▩";
		}
	}
	
	if(chk==false){
		messageBox("수정된 데이터가", "I004");
		return;
	}
	
	if(model.getValue(srchpath+"/pid")==""){
		srchdata += "-" + "▦";
	}else{
		srchdata += model.getValue(srchpath+"/pid") + "▦";
	}
	srchdata += model.getValue(srchpath+"/srch_flag") + "▦";
	srchdata += model.getValue(srchpath+"/srch_fromdd") + "▦";
	srchdata += model.getValue(srchpath+"/srch_todd") + "▦";
	srchdata += "B" + "▩";
	
	model.removeNodeset("/root/send/left");
	model.makeNode("/root/send/left");
	model.makeValue("/root/send/left/reqdata", srchdata);
	model.makeValue("/root/send/left/savedata", savedata);
	
	submit("TXMRH00300");
	model.refresh();
}

/**
 * @desc   : 상태값 변경
 * @
 * @param  : 
 * @return :
 * @---------------------------------------------------
 */
function fChangeData(){
	if(grd_left.colRef("indxyn")==grd_left.col || grd_left.colRef("cdstyn")==grd_left.col || grd_left.colRef("eduyn")==grd_left.col){
		model.setValue("/root/main/grd_left["+grd_left.row+"]/saveyn", "Y");
	}
	model.refresh();
}

/**
 * @desc   : 오른쪽 전체 선택 및 전체 선택 해제
 * @
 * @param  : 
 * @return :
 * @---------------------------------------------------
 */
function fStatusyn(){
	if(bool1.value == "Y"){
		for(var i = 0 ; i < grd_right.rows ; i++){
			grd_right.valueMatrix(i , grd_right.colRef("chkbox")) = "Y";
		}
	}else{
		for(var i = 0 ; i < grd_right.rows ; i++){
			grd_right.valueMatrix(i , grd_right.colRef("chkbox")) = "N";
		}						
	}
}

/**
 * @desc   : 통합기록 연동
 * @
 * @param  : 
 * @return :
 * @---------------------------------------------------
 */
function fOpenRec(){
	var row = grd_right.row;
	if(row >0){
		setParameter("SMMRI00400_param_pid", model.getValue("/root/main/grd_right["+row+"]/pid"));
		setParameter("SMMRI00400_param_chosflag", model.getValue("/root/main/grd_right["+row+"]/ordtype"));
		setParameter("SMMRI00400_param_authflag", "N");
		modal("SMMRI00400", 1, 0, 0, "", "", "");
	}
}

/**
 * @desc   : 저장된 환자 삭제
 * @
 * @param  : 
 * @return :
 * @---------------------------------------------------
 */
function fDeletePat(){
	var row = grd_left.row;
	var savedata = "instcd▦pid▦orddd▦cretno▦recflag▩";
	var datapath =	"/root/main/grd_left";
	var srchdata = "pid▦srch_flag▦srch_fromdd▦srch_todd▦recflag▩";
	var srchpath =	"/root/main/left_cond";

	savedata += getUserInfo("dutplceinstcd") + "▦";
	savedata += model.getValue(datapath+"["+ row +"]/pid") + "▦";
	savedata += model.getValue(datapath+"["+ row +"]/orddd") + "▦";
	savedata += model.getValue(datapath+"["+ row +"]/cretno") + "▦";
	savedata += "B" + "▩";

	if(model.getValue(srchpath+"/pid")==""){
		srchdata += "-" + "▦";
	}else{
		srchdata += model.getValue(srchpath+"/pid") + "▦";
	}
	srchdata += model.getValue(srchpath+"/srch_flag") + "▦";
	srchdata += model.getValue(srchpath+"/srch_fromdd") + "▦";
	srchdata += model.getValue(srchpath+"/srch_todd") + "▦";
	srchdata += "B" + "▩";
	
	model.removeNodeset("/root/send/left");
	model.makeNode("/root/send/left");
	model.makeValue("/root/send/left/reqdata", srchdata);
	model.makeValue("/root/send/left/savedata", savedata);
	
	submit("TXMRH00310");
	fLeftSearch();
	model.refresh();
}