/**
  - ▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩

    의료협력 - 타병원진료의뢰서 팝업 ( SPARC02900.xrw - JScript )
	
	* Version :
		- Ver.1.00.01
      
	* 개발자: 이경희
	         
	* 최초작성일:
		- 2009.6.24
          
	* 수정이력:
						
	* 기타:
	
  - ▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩▩		
*/	

/**
			 * 하드코드 조회
			 * 
			 * @param  
			 * ref      reference path
			 * rsltref  result reference path
			 * hardcd   - 하드코드  
			 */
			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();
			}
			
			// 초기값
			function fInit()
			{				
				mmbfGetHardCodeInfo("/root/send/formhrdcd", "/root/temp/formhardcd", 1300);	// 전원의뢰팝업 사용여부
				
				if(model.getValue("/root/temp/formhardcd/hardcd/hardcd") == "Y")
				{
					button2.visible = true;
					
				}
				iviewer1.window.javascript.fInitPage(false, false, parseInt(iviewer1.attribute("height")));
				
				// 오늘 날짜로 세팅
				var CurrentDate = getCurrentDate();

				model.setValue("/root/send/search/fromdd", CurrentDate);
				model.setValue("/root/send/search/todd", CurrentDate);
				
				// 공통코드 목록 가져오기
				zbcfGetCodeList(new Array("A0439", "A0438", "A0426"), new Array("/root/init/resncd", "/root/init/rsltcd", "/root/init/areacd") , true);
				
				// 유형코드 가져오기
				zbcfGetKindCodeList(
						new Array("A0014"),
						new Array("A0426"), 
						new Array("/root/init/areacd"),
						true,
						new Array(""), 
						new Array("")
						);

				// 진료과
				//var instcd = "012";
				var instcd = getUserInfo("dutplceinstcd");
				//var standard_yn = "orduseyn";
				var standard_yn = "rcptuseyn";
				var ord_deptflag = 'D';
				var rslt_ref  = "/root/init/dept";
				var sort_method = "depthngnm";
				//zbcfGetDeptCodeList(instcd, standard_yn, ord_deptflag, rslt_ref, sort_method);
				sort_field = "depthngnm"
				zsdfGetInOutOrdDeptList(instcd, rslt_ref, sort_field, sort_method);
				
				addComboItem("cmb_orddeptcd", "", "", "above");
				
				fDoctSerach();
				
				model.removeNodeset("/root/main/req_info/req_pat_list");
				model.resetInstanceNode("/root/main/req_pat_info/patinfo/patinfo");
				
				model.refresh();
			}
			
			
			// 진료의사 조회
			function fDoctSerach()
			{
				//  진료의사
				model.removenode("/root/send/doctor");	
				model.makeValue("/root/send/doctor/orddd", model.getValue("/root/send/search/fromdd"));		
				model.makeValue("/root/send/doctor/orddeptcd", model.getValue("/root/send/search/orddeptcd"));	
								
				submit("TRARC01302", false);	
				
				cmb_orddrid.select(0);				

				//model.setValue("/root/main/patient/orddrid", orddrid);
			}
	
			// 조회전 필수 체크
			function fCheckDateSend()
			{
				var fromdd = model.getValue("/root/send/search/fromdd");
				var todd = model.getValue("/root/send/search/todd");
				var pid = model.getValue("/root/send/search/pid");
				var olddateyn = model.getValue("/root/send/search/olddateyn");
				
				if (isNull(pid) == true)
				{
					if (olddateyn != "Y")
					{
						if( ! isValidDateTime( fromdd, 'YYYYMMDD') || ! isValidDateTime( todd, 'YYYYMMDD') ){
							
							messageBox("입력하신 일자구분이 정확한 날짜타입이 아닙니다.", "E999", "");
							return false;	
						}
						 
						if( getDateInterval(fromdd, todd) > 31 ){
							messageBox("조회가능한 최대 기간은 1달입니다. 일자구분에서 날짜를 수정하세요!", "E999", "");
							return false;	
						}
		
						if( getDateInterval(fromdd, todd) < 0 ){
							messageBox("일자구분에서 시작일자가 종료일자보다 미래일자 입니다. 확인하세요!", "E999", "");
							return false;
						}
						
						// 날짜 계산
						var daycnt = getDateInterval(fromdd, todd);
						
						// 1일이 아닌 경우는 조건을 타야 함
						if (daycnt != 0)
						{
							// 진료과 체크
							if (model.getValue("/root/send/search/orddeptcd") == "")
							{
								messageBox("일자구분에서 하루 이상의 기간을 선택했을 경우, 진료과는 조회 필수 조건입니다. 진료과를 입력하세요.", "E999", "");
								//messageBox("진료과를 ","C002");
								return false;
							}
							
							if (ipt_hngnm.currentText.length > 0 && ipt_hngnm.currentText.length < 2)  {
								messageBox("환자명은 2글자 이상으로 해주십시요!","E999","");
								model.setFocus("ipt_hngnm");
								return false;
							}
							
							if (ipt_rumint.currentText.length > 0 && ipt_rumint.currentText.length < 2)  {
								messageBox("전원의뢰병원명은 2글자 이상으로 해주십시요!","E999","");
								model.setFocus("ipt_rumint");
								return false;
							}
												
						}
					}
				}

				return true;
			}
	

			//조회(전원의뢰내역)
			function fSearch()
			{
				model.resetInstanceNode("/root/main/req_pat_info/patinfo");
				iviewer1.src = "../../../emr/medirecweb/xrw/SMMMR00000_Empty.xrw";
				//var formcd = "0000001539";
				//iviewer1.window.javascript.fLoadNewForm(formcd);
				
				// getReqPatList
				if (submit("TRARC01401", false) == true)
				{
					//var formrecseq = 0;
					
					//iviewer1.object1.RemoveAll();
					//iviewer1.window.javascript.fLoadRecForm(formrecseq);
					
					//iviewer1.window.javascirpt.fLoadNewForm();
					//model.refresh();
				}
				else
				{
					messageBox("조회를", "E009");
				}
				
				
			}

			// 저장전 필수 체크
			function fCheckDate()
			{
				if (model.getValue("/root/main/req_pat_info/patinfo/pid") == "") {
					messageBox("저장하고자 하는 환자를", "C002");
					return false;
				}
				
				/*
				if (model.getValue("/root/main/req_pat_info/patinfo/enddd") == "") {
					messageBox("완료일자를 ","C001");
					model.setFocus("ipt_enddd");
					
					return false;
				}
				*/

				return true;
			}

			
			// 저장
			function fSave()
			{
				
				/*
				var pid = model.getValue("/root/main/req_pat_info/patinfo/pid")
				
				if (pid == "") 
				{
					messageBox("저장하고자 하는 환자를", "C002");
					return;
				}
				*/

				model.setValue("/root/main/req_pat_info/patinfo/reqflag", "C");
				var enddd = model.getValue("/root/main/req_pat_info/patinfo/enddd");
				
				if (enddd == "")
				{
					model.setValue("/root/main/req_pat_info/patinfo/enddd", "00000000");
					//enddd = "00000000";   
				}
				
				model.resetInstanceNode("/root/send/savedata");
				
				model.copyNode("/root/send/savedata","/root/main/req_pat_info/patinfo");
				
				mmbfGetHardCodeInfo("/root/send/formhrdcd", "/root/temp/formhardcd", 1300);	// 전원의뢰팝업 사용여부
				
				if(model.getValue("/root/temp/formhardcd/hardcd/hardcd") == "Y")
				{
					var originNode = findNode(model, "/root/send/savedata"); 
					var copyNode = findNode(model, "/root/send/adddata");
				
					originNode.appendChild(copyNode);
					model.makeValue("/root/send/savedata/popup", "Y");
				}
				
				if  (submit("TXARC01401", false) == true)
				{
					//fSearch();				 	
				}
				else
				{
					messageBox("저장에", "E009");	
				}
			}
			
			// 삭제
			function fDelete()
			{
				if (grd_list.rows <= 1) return;
				if (grd_list.row < 1) return;
				
				// 데이터 삭제시
				if(messageBox("해당 데이터를", "Q001")== "6")
				{
					if (isNull(cmb_confflag.value) == true)
					{
						messageBox("구분", "C001");
						model.setFocus("cmb_flag");
						return;
					}
					
					if (isNull(ipt_confdd.value) == true)
					{
						messageBox("등록일자를", "C001");
						model.setFocus("ipt_confdd");
						return;
					}
					
					model.setValue("/root/send/savedata/status", "d");	
					
					if (submit("TXARC01401") == true)
					{
						fSearch();
					}
					else
					{
						messageBox("삭제에", "E009");
					}
	
				}
				else
				{
					return;
				}
			}
			
			// 병원 팝업
			function fHospPopup()
			{
				model.setValue("/root/main/hospflag", "N");
				//modal("SPARH00200",1,1,1);
				modal("SPARH00200", 1,10, 10, "SPARH00200", "", "");
				/*
				var flag = getParameter("flag")
				if (flag == "Y")
				{
					model.setValue("/root/main/req_pat_info/patinfo/coophospnm", getParameter("coophospnm"));
					model.setValue("/root/main/req_pat_info/patinfo/coophospcd", getParameter("coophospcd"));
					model.setValue("/root/main/req_pat_info/patinfo/telno", getParameter("telno1"));
					model.setValue("/root/main/req_pat_info/patinfo/faxno", getParameter("faxno"));
					model.setValue("/root/main/req_pat_info/patinfo/areacd", getParameter("areacd"));
					model.refresh();
				}
				*/
				
				if( model.getValue("/root/main/hospflag") == "Y" )
				{
					model.setValue("/root/main/req_pat_info/patinfo/coophospnm", model.getValue("/root/main/hospinfo/hospinfolist/coophospnm"));
					model.setValue("/root/main/req_pat_info/patinfo/coophospcd", model.getValue("/root/main/hospinfo/hospinfolist/coophospcd"));
					model.setValue("/root/main/req_pat_info/patinfo/areacd", model.getValue("/root/main/hospinfo/hospinfolist/areacd"));
					model.setValue("/root/main/req_pat_info/patinfo/telno", model.getValue("/root/main/hospinfo/hospinfolist/telno"));
					model.setValue("/root/main/req_pat_info/patinfo/faxno", model.getValue("/root/main/hospinfo/hospinfolist/faxno"));
					
					model.setValue("/root/main/req_pat_info/patinfo/drnm", model.getValue("/root/main/hospinfo/hospinfolist/drnm"));
					model.setValue("/root/main/req_pat_info/patinfo/coopdrcd", model.getValue("/root/main/hospinfo/hospinfolist/coopdrcd"));
					model.setValue("/root/main/req_pat_info/patinfo/fromdd", model.getValue("/root/main/hospinfo/hospinfolist/fromdd"));
					
					model.refresh();
				}
				
			}
			
			
			// 의뢰환자 정보 Popup
			function fReqPatPopup()
			{
				var pid = setParameter("pid", model.getValue("/root/main/req_pat_info/patinfo/pid"));   //팝업 등록화면의 교육명에 값 가져가기
				
				if (isNull(opt_pid.value) == true)
				{
					messageBox("등록일자를", "C001");
					model.setFocus("opt_pid");
					return;
				}
				
				model.setValue("/root/main/reqpopupflag", "N");
				modal("SPARC02100", 1,10, 10, "SPARC02100", "", "");
				
				if( model.getValue("/root/main/reqpopupflag") == "Y" )
				{
					//alert(model.getValue("/root/main/reqpopupflag"));
					model.setValue("/root/main/req_pat_info/patinfo/reqcoophospnm", model.getValue("/root/main/reqpopup/reqpopuplist/coophospnm"));
					model.setValue("/root/main/req_pat_info/patinfo/reqdrnm", model.getValue("/root/main/reqpopup/reqpopuplist/drnm"));
					model.setValue("/root/main/req_pat_info/patinfo/reqdd", model.getValue("/root/main/reqpopup/reqpopuplist/reqdd"));
					model.setValue("/root/main/req_pat_info/patinfo/reqorddeptnm", model.getValue("/root/main/reqpopup/reqpopuplist/orddeptnm"));
					model.setValue("/root/main/req_pat_info/patinfo/reqorddrnm", model.getValue("/root/main/reqpopup/reqpopuplist/orddrnm"));
					model.setValue("/root/main/req_pat_info/patinfo/reqorddd", model.getValue("/root/main/reqpopup/reqpopuplist/orddd"));
					model.setValue("/root/main/req_pat_info/patinfo/reqcretno", model.getValue("/root/main/reqpopup/reqpopuplist/cretno"));
					model.setValue("/root/main/req_pat_info/patinfo/reqacptseqno", model.getValue("/root/main/reqpopup/reqpopuplist/acptseqno"));
					model.setValue("/root/main/req_pat_info/patinfo/reqseqno", model.getValue("/root/main/reqpopup/reqpopuplist/seqno"));
					
					model.refresh();
				}
			}
			
			function fReqAgnInfo()
			{
				if (grd_list.rows <= 0) return;
		               if (grd_list.row < 0) return;

				//그리드에서 해당 환자 선택
				var idxRow = grd_list.row;   

                              var pid = model.getValue("/root/main/req_pat_list["+idxRow+"]/pid");
                              var hngnm = model.getValue("/root/main/req_pat_list["+idxRow+"]/hngnm");
                              var orddd = model.getValue("/root/main/req_pat_list["+idxRow+"]/orddd");
                              var deptnm = model.getValue("/root/main/req_pat_list["+idxRow+"]/deptnm");
                              var atdoctnm = model.getValue("/root/main/req_pat_list["+idxRow+"]/atdoctnm");
				
				model.setValue("/root/main/req_pat_info/patinfo/pid", pid);
				model.setValue("/root/main/req_pat_info/patinfo/hngnm", hngnm);
				model.setValue("/root/main/req_pat_info/patinfo/orddd", orddd);
				model.setValue("/root/main/req_pat_info/patinfo/deptnm", deptnm);
				model.setValue("/root/main/req_pat_info/patinfo/atdoctnm", atdoctnm);
				
				model.refresh();
			}
			
			// 등록번호 조회 팝업
			function fPatPopUp()
			{
				//model.makeValue("/root/temp/pid",     model.getValue("/root/send/search/pid"));
				//model.makeValue("/root/temp/srchcond","1");
				//model.makeValue("/root/temp/autoflag","N");  
				
				modal("SPPMC02500", 1,10, 10, "SPPMC02500", "/root/temp", "/root/send");
				    
				//model.resetInstanceNode("/root/main/patinfo/patinfolist");
				//model.resetInstanceNode("/root/send/cond");
				if (model.getValue("/root/main/popupendflag") == "ok")
				{
					model.setValue("/root/send/search/pid", model.getValue("/root/main/patinfo/patinfolist/pid"));
					model.setValue("/root/send/search/hngnm", model.getValue("/root/main/patinfo/patinfolist/hngnm"));
				}
				
				//fHistSearch();
				
				model.refresh();
			
			}
			
			// 전원의뢰 리스트 선택
			function fGrdClick()
			{
				if (grd_list.rows <= 1) return;
				if (grd_list.row < 1) return;
				
				var lrow = grd_list.row;

				if(grd_list.isCell(event.target) && grd_list.mouseRow >= grd_list.fixedrows)
				{
					//fBiztrgtClick();
				}
				else
				{
					return;
				}
				
				/*				
				model.copyNode("/root/main/req_pat_info/patinfo", "/root/main/req_info/req_pat_list[" + lrow + "]");
				//model.setValue("/root/main/req_pat_into/reqflag", "A"); 
				*/
				
				model.resetInstanceNode("/root/send/cond");
				
				model.setValue("/root/send/cond/pid", model.getValue("/root/main/req_info/req_pat_list[" + lrow + "]/pid"));
				model.setValue("/root/send/cond/orddd", model.getValue("/root/main/req_info/req_pat_list[" + lrow + "]/orddd"));
				model.setValue("/root/send/cond/cretno", model.getValue("/root/main/req_info/req_pat_list[" + lrow + "]/cretno"));
				model.setValue("/root/send/cond/seqno", model.getValue("/root/main/req_info/req_pat_list[" + lrow + "]/seqno"));
				model.setValue("/root/send/cond/formrecseq", model.getValue("/root/main/req_info/req_pat_list[" + lrow + "]/formrecseq"));
				model.setValue("/root/send/cond/orddeptcd", model.getValue("/root/main/req_info/req_pat_list[" + lrow + "]/orddeptcd"));
				model.setValue("/root/send/cond/orddrid", model.getValue("/root/main/req_info/req_pat_list[" + lrow + "]/orddrid"));
				model.setValue("/root/send/cond/oldyn", model.getValue("/root/main/req_info/req_pat_list[" + lrow + "]/oldyn"));
								
				if (submit("TRARC01402", false) == true)
				{
					if (model.getValue("/root/main/req_pat_info/patinfo/pid") == "")
					{
						model.setValue("/root/main/req_pat_info/patinfo/pid", model.getValue("/root/main/req_info/req_pat_list[" + lrow + "]/pid"));
						model.setValue("/root/main/req_pat_info/patinfo/hngnm", model.getValue("/root/main/req_info/req_pat_list[" + lrow + "]/hngnm"));
						model.setValue("/root/main/req_pat_info/patinfo/sex", model.getValue("/root/main/req_info/req_pat_list[" + lrow + "]/sex"));
						model.setValue("/root/main/req_pat_info/patinfo/age", model.getValue("/root/main/req_info/req_pat_list[" + lrow + "]/age"));
						model.setValue("/root/main/req_pat_info/patinfo/orddd", model.getValue("/root/main/req_info/req_pat_list[" + lrow + "]/orddd"));
						model.setValue("/root/main/req_pat_info/patinfo/cretno", model.getValue("/root/main/req_info/req_pat_list[" + lrow + "]/cretno"));
						model.setValue("/root/main/req_pat_info/patinfo/orddeptnm", model.getValue("/root/main/req_info/req_pat_list[" + lrow + "]/orddeptnm"));
						model.setValue("/root/main/req_pat_info/patinfo/orddrnm", model.getValue("/root/main/req_info/req_pat_list[" + lrow + "]/orddrnm"));
						model.setValue("/root/main/req_pat_info/patinfo/orddeptcd", model.getValue("/root/main/req_info/req_pat_list[" + lrow + "]/orddeptcd"));
						model.setValue("/root/main/req_pat_info/patinfo/orddrid", model.getValue("/root/main/req_info/req_pat_list[" + lrow + "]/orddrid"));
						
						model.setValue("/root/main/req_pat_info/patinfo/formrecseq", model.getValue("/root/main/req_info/req_pat_list[" + lrow + "]/formrecseq"));
						model.setValue("/root/main/req_pat_info/patinfo/status", "i");
					}
					
					mmbfGetHardCodeInfo("/root/send/formhrdcd", "/root/temp/formhardcd", 1300);	// 전원의뢰팝업 사용여부
					
					if(model.getValue("/root/temp/formhardcd/hardcd/hardcd") == "Y")
					{
						if (submit("TRARC01403", false) == true)
						{
							//fSetPopup();
						}
					}
				}
				
				var oldyn = model.getValue("/root/main/req_info/req_pat_list[" + lrow + "]/oldyn");
				
				if (oldyn != "Y")
				{
					iviewer1.src= "../../../emr/medirecweb/xrw/SSMMR01100_서식로더.xrw";
					iviewer1.window.javascript.fInitPage(false, false, parseInt(iviewer1.attribute("height")), parseInt(iviewer1.attribute("width")));
					
					// 서식 로드
					var formrecseq = model.getValue("/root/send/cond/formrecseq");
					//alert(formrecseq);
					
					iviewer1.window.javascript.fLoadRecForm(formrecseq, false);
				}

				/*
				model.setValue("/root/main/req_pat_info/patinfo/pid", model.getValue("/root/main/req_info/req_pat_list[" + lrow + "]/pid"));
				model.setValue("/root/main/req_pat_info/patinfo/hngnm", model.getValue("/root/main/req_info/req_pat_list[" + lrow + "]/hngnm"));
				model.setValue("/root/main/req_pat_info/patinfo/sex", model.getValue("/root/main/req_info/req_pat_list[" + lrow + "]/sex"));
				model.setValue("/root/main/req_pat_info/patinfo/age", model.getValue("/root/main/req_info/req_pat_list[" + lrow + "]/age"));
				model.setValue("/root/main/req_pat_info/patinfo/orddd", model.getValue("/root/main/req_info/req_pat_list[" + lrow + "]/odrdd"));
				model.setValue("/root/main/req_pat_info/patinfo/orddeptnm", model.getValue("/root/main/req_info/req_pat_list[" + lrow + "]/orddeptnm"));
				model.setValue("/root/main/req_pat_info/patinfo/orddrnm", model.getValue("/root/main/req_info/req_pat_list[" + lrow + "]/orddrnm"));
				model.setValue("/root/main/req_pat_info/patinfo/coophospnm", model.getValue("/root/main/req_info/req_pat_list[" + lrow + "]/coophospnm"));
				model.setValue("/root/main/req_pat_info/patinfo/areacd", model.getValue("/root/main/req_info/req_pat_list[" + lrow + "]/areacd"));
				model.setValue("/root/main/req_pat_info/patinfo/telno", model.getValue("/root/main/req_info/req_pat_list[" + lrow + "]/telno"));
				model.setValue("/root/main/req_pat_info/patinfo/faxno", model.getValue("/root/main/req_info/req_pat_list[" + lrow + "]/faxno"));
				model.setValue("/root/main/req_pat_info/patinfo/resncd", model.getValue("/root/main/req_info/req_pat_list[" + lrow + "]/resncd"));
				model.setValue("/root/main/req_pat_info/patinfo/enddd", model.getValue("/root/main/req_info/req_pat_list[" + lrow + "]/enddd"));
				model.setValue("/root/main/req_pat_info/patinfo/rsltcd", model.getValue("/root/main/req_info/req_pat_list[" + lrow + "]/rsltcd"));
				model.setValue("/root/main/req_pat_info/patinfo/reqorddd", model.getValue("/root/main/req_info/req_pat_list[" + lrow + "]/reqorddd"));
				model.setValue("/root/main/req_pat_info/patinfo/reqcretno", model.getValue("/root/main/req_info/req_pat_list[" + lrow + "]/reqcretno"));
				model.setValue("/root/main/req_pat_info/patinfo/reqacptseqno", model.getValue("/root/main/req_info/req_pat_list[" + lrow + "]/reqacptseqno"));
				model.setValue("/root/main/req_pat_info/patinfo/reqseqno", model.getValue("/root/main/req_info/req_pat_list[" + lrow + "]/reqseqno"));
				model.setValue("/root/main/req_pat_info/patinfo/reqcoophospnm", model.getValue("/root/main/req_info/req_pat_list[" + lrow + "]/reqcoophospnm"));
				model.setValue("/root/main/req_pat_info/patinfo/reqdrnm", model.getValue("/root/main/req_info/req_pat_list[" + lrow + "]/reqdrnm"));
				model.setValue("/root/main/req_pat_info/patinfo/reqorddeptnm", model.getValue("/root/main/req_info/req_pat_list[" + lrow + "]/reqorddeptnm"));
				model.setValue("/root/main/req_pat_info/patinfo/reqorddrnm", model.getValue("/root/main/req_info/req_pat_list[" + lrow + "]/reqorddrnm"));
				model.setValue("/root/main/req_pat_info/patinfo/orddeptcd", model.getValue("/root/main/req_info/req_pat_list[" + lrow + "]/orddeptcd"));
				model.setValue("/root/main/req_pat_info/patinfo/orddrid", model.getValue("/root/main/req_info/req_pat_list[" + lrow + "]/orddrid"));
				model.setValue("/root/main/req_pat_info/patinfo/coophospcd", model.getValue("/root/main/req_info/req_pat_list[" + lrow + "]/coophospcd"));
				model.setValue("/root/main/req_pat_info/patinfo/reqflag", model.getValue("/root/main/req_info/req_pat_list[" + lrow + "]/reqflag"));
				model.setValue("/root/main/req_pat_info/patinfo/formrecseq", model.getValue("/root/main/req_info/req_pat_list[" + lrow + "]/formrecseq"));
				model.setValue("/root/main/req_pat_info/patinfo/cretno", model.getValue("/root/main/req_info/req_pat_list[" + lrow + "]/cretno"));
				model.setValue("/root/main/req_pat_info/patinfo/acptseqno", model.getValue("/root/main/req_info/req_pat_list[" + lrow + "]/acptseqno"));
				model.setValue("/root/main/req_pat_info/patinfo/seqno", model.getValue("/root/main/req_info/req_pat_list[" + lrow + "]/seqno"));
				
				model.setValue("/root/main/req_pat_info/patinfo/status", model.getValue("/root/main/req_info/req_pat_list[" + lrow + "]/status"));
				*/
				model.refresh();
			}
			
			// 의뢰정보 삭제
			function fReqDel()
			{
				/*
				opt_reqcoophospnm.value = "";
				opt_reqdrnm.value = "";
				opt_reqdd.value = "";
				opt_reqorddeptnm.value = "";
				opt_reqorddrnm.value = "";
				*/
				var stat =  model.getValue("/root/main/req_info/req_pat_list[" +grd_list.row + "]/stat");
				
				model.setValue("/root/main/req_pat_info/patinfo/reqcoophospnm", "");
				model.setValue("/root/main/req_pat_info/patinfo/reqdrnm", "");
				model.setValue("/root/main/req_pat_info/patinfo/reqdd", "");
				model.setValue("/root/main/req_pat_info/patinfo/reqorddeptnm", "");
				model.setValue("/root/main/req_pat_info/patinfo/reqorddrnm", "");
				model.setValue("/root/main/req_pat_info/patinfo/reqorddd", "");
				model.setValue("/root/main/req_pat_info/patinfo/reqcretno", "0");
				model.setValue("/root/main/req_pat_info/patinfo/reqacptseqno", "0");
				model.setValue("/root/main/req_pat_info/patinfo/reqseqno", "0");
				
				model.refresh();
				
			}

			// 전원의뢰 정보 삭제
			function fReqAgnDel()
			{
				var stat =  model.getValue("/root/main/req_info/req_pat_list[" +grd_list.row + "]/stat");
				
				model.setValue("/root/main/req_pat_info/patinfo/coophospnm", "");
				model.setValue("/root/main/req_pat_info/patinfo/rsltcd", "");
				model.setValue("/root/main/req_pat_info/patinfo/areacd", "");
				model.setValue("/root/main/req_pat_info/patinfo/telno", "");
				model.setValue("/root/main/req_pat_info/patinfo/faxno", "");
				model.setValue("/root/main/req_pat_info/patinfo/resncd", "");
				model.setValue("/root/main/req_pat_info/patinfo/enddd", "");
				model.setValue("/root/main/req_pat_info/patinfo/coophospcd", "");

				model.refresh();
				
			}

			// 출력
			function fReplcheck()
			{
				/*
				if (model.getValue("/root/main/req_pat_info/patinfo/status") != "u")
				{
					messageBox("저장하지 않은 데이터는 출력할 수", "I004");
					return;
				}
				*/
				
				var currow = grd_list.row; 
				var sREPLDOCULIST_PATH = "/root/main/req_pat_info/patinfo";
				var formrecseq = model.getValue(sREPLDOCULIST_PATH+"/formrecseq")
				var pid = model.getValue(sREPLDOCULIST_PATH+"/pid")
				//var irow = grd_list.rows;
				//var cnt = 0;	
				//var savedata = getNodeListCSV(instance1.selectNodes(sREPLDOCULIST_PATH));
			
				//model.setValue("/root/send/savedata", savedata);
				
				if (pid == "")
				{
					messageBox("저장하고자 하는 환자를", "C002");
					return;
				}

				var ivwCtrl = iviewer1.window.document.controls("ivw_base");
				copyNodeset("/root/main/recinfo", "/root/main/recinfo", "replace", model, ivwCtrl.model);                    //서식지 정보 설정
				model.makeValue("/root/hidden/docinfo/signimge", ivwCtrl.model.getValue("/root/hidden/docinfo/signimge"));   //서식서명이미지 설정
				
				fDoMakeProfPrntInfo(ivwCtrl);
				
				//alert(formrecseq);
				getFormData("0000002536", formrecseq);
				
				setParameter("reportprintyn", "");
				exeReportPreview("RFM0253600", "XMLSTR");
				
				//alert(getParameter("reportprintyn"));
				
				if (getParameter("reportprintyn") == "Y")
				{
					model.resetInstanceNode("/root/send/savedata");
				
					model.copyNode("/root/send/savedata","/root/main/req_pat_info/patinfo")
					
					if(submit("TXARC01402", false)==true){
						messageBox("출력이", "I002");
					}
				}
				
				/*
				for(var i=1; i < irow; i++){	
					var chk = model.getValue(sREPLDOCULIST_PATH+"["+ i +"]/chk")
			
						if (chk == "true"){
			
						     model.makeValue("/root/send/savedata/instcd"   ,model.getValue(sREPLDOCULIST_PATH+"["+ i +"]/instcd"));
						     model.makeValue("/root/send/savedata/formrecseq"   ,model.getValue(sREPLDOCULIST_PATH+"["+ i +"]/formrecseq"));
						     model.makeValue("/root/send/savedata/pid"   ,model.getValue(sREPLDOCULIST_PATH+"["+ i +"]/pid"));
						     model.makeValue("/root/send/savedata/orddd"   ,model.getValue(sREPLDOCULIST_PATH+"["+ i +"]/orddd"));
						     model.makeValue("/root/send/savedata/cretno"   ,model.getValue(sREPLDOCULIST_PATH+"["+ i +"]/cretno"));
						     model.makeValue("/root/send/savedata/reqorddd"   ,model.getValue(sREPLDOCULIST_PATH+"["+ i +"]/orddd"));
						     model.makeValue("/root/send/savedata/reqcretno"   ,model.getValue(sREPLDOCULIST_PATH+"["+ i +"]/cretno"));
						     model.makeValue("/root/send/savedata/reqseqno"   ,model.getValue(sREPLDOCULIST_PATH+"["+ i +"]/seqno")); 
						     
							getFormData("0000001536", model.getValue(sREPLDOCULIST_PATH+"["+ i +"]/formrecseq"));
				
							setParameter("reportprintyn", "");
							exeReportPreview("RFM0153600", "XMLSTR");
						//	alert(getParameter('reportprintyn'));
								if (getParameter("reportprintyn") == "Y"){							
									if(submit("TXARC02001",false)==true){
										messageBox("출력저장", "I001");
									}
								}
							cnt++;
					     model.resetInstanceNode("/root/send/savedata"); 
						}	
				}
				
				
				if(cnt == 0){
					messageBox("출력할 정보가", "I004");
					return;
				}
				
				
				fSearch();	
				
				*/
				
				
				model.refresh();			
			}
			
				
			function fDoMakeProfPrntInfo(ivwCtrl){
				//진단코드 3자리마다 점(.)표시
	                    	var totcnt = getNodesetCount("/root/main/recinfo/grid[degnitemlevlcd='0016650.0000960']/recitem[degnitemlevlcd='0016650.0000960.0000960']");
	                    	for(var i = 0; i < totcnt; i++){
					var diagroflag   = model.getValue("/root/main/recinfo/grid[degnitemlevlcd='0016650.0000960']/recitem[degnitemlevlcd='0016650.0000960.0004249' and rowno='" + i + "' and colno='0']/reccnts");
					var diagkindflag = model.getValue("/root/main/recinfo/grid[degnitemlevlcd='0016650.0000960']/recitem[degnitemlevlcd='0016650.0000960.0001443' and rowno='" + i + "' and colno='1']/reccnts");
					var rectermcd    = model.getValue("/root/main/recinfo/grid[degnitemlevlcd='0016650.0000960']/recitem[rowno='" + i + "' and colno='2']/rectermcd");
					var rectermnm    = model.getValue("/root/main/recinfo/grid[degnitemlevlcd='0016650.0000960']/recitem[rowno='" + i + "' and colno='2']/rectermnm");
					var reccnts      = model.getValue("/root/main/recinfo/grid[degnitemlevlcd='0016650.0000960']/recitem[rowno='" + i + "' and colno='2']/reccnts");
					var langflag     = ivwCtrl.model.getValue("/root/main/forminfo/formmast/langflag");
	
					if(langflag == "KO"){
					//if(isHangul(rectermnm)== "H"){
						if(diagkindflag == "M"){
							rectermnm = "(주)".concat(rectermnm);
						}
						if(diagroflag == "R"){
							rectermnm = "(의증)".concat(rectermnm);
						}
						if(reccnts != ""){
							reccnts = " [" + reccnts + "]";
						}
						rectermnm = rectermnm + reccnts;
	
					}else if(langflag == "EN"){
					//}else if(isHangul(rectermnm)== "E"){
	
						if(diagkindflag == "M"){
							rectermnm = "(Principle)".concat(rectermnm);
						}
						if(diagroflag == "R"){
							rectermnm = "(R/O)".concat(rectermnm);
						}
						if(reccnts != ""){
							reccnts = " [" + reccnts + "]";
						}
						rectermnm = rectermnm + reccnts;
					}
	
					rectermcd = removeChar(rectermcd, ".");    //점을 제거
					rectermcd = insertChar(rectermcd, ".", 3); // 3개 단위로 점을 입력
					model.setValue("/root/main/recinfo/grid[degnitemlevlcd='0016650.0000960']/recitem[rowno='" + i + "' and colno='2']/rectermcd", rectermcd);
					model.setValue("/root/main/recinfo/grid[degnitemlevlcd='0016650.0000960']/recitem[rowno='" + i + "' and colno='2']/rectermnm", rectermnm);
				}
	
				var stmt = "";
				var formcd = ivwCtrl.model.getValue("/root/main/forminfo/formmast/formcd");
	
				//전원소견서, 응급실전원소견서
				if(formcd == "0000002536" || formcd == "0000003129"){
					stmt = model.getValue("/root/main/recinfo/recitem[degnitemlevlcd='0010597']/reccnts"); //내용
					fDoSepProfPage(stmt, 47);
				}
			}

			/**
			 * @desc   : 제증명 페이지 설정(출력시, 제증명 내용이 늘어지는 것을 막는다)
			 * @
			 * @param  :
			 * @return :
			 * @author : 오지훈
			 * @---------------------------------------------------
			 */
			function fDoSepProfPage(stmt, maxcnt){
				model.removeNodeset("/root/main/contents");
			    
				var detail  = "";
				var wordcnt = 0;
				var rowcnt  = 1;
			    
				if(stmt != ""){        
					for(var i = 0; i < stmt.length ; i++){
						if(stmt.charAt(i)=='\n'){ //Enter입력인 경우
							model.makeNode("/root/main/contents[" + rowcnt + "]");
							model.makeValue("/root/main/contents[" + rowcnt + "]/detail", detail);
							detail  = "";
							wordcnt = 0;
							rowcnt++;
						}
			                                    
						detail = detail.concat(stmt.charAt(i));
						wordcnt++;
			            
						if(wordcnt == maxcnt){
							model.makeNode("/root/main/contents[" + rowcnt + "]");
							model.makeValue("/root/main/contents[" + rowcnt + "]/detail", detail);
							detail  = "";
							wordcnt = 0;
							rowcnt++;
						}
					}
				}
				model.makeNode("/root/main/contents[" + rowcnt + "]");
				model.makeValue("/root/main/contents[" + rowcnt + "]/detail", detail);
				model.refresh();
			}	
			
			
						/**
			 * 단어에 특정 문자 제거
			 * 
			 * @param
			 * word 단어
			 * ch   문자 
			 */ 
			function removeChar(word, ch){
				var temp = "";
				var res = "";
				var len = word.length
				for(i = 0; i < len; i++){
					temp = word.charAt(i);
					if(temp == ch){
						continue;
						
					}else{
						res += temp;
					}
				}
				return res;
			}
			
			/**
			 * 단어에 step간격 특정 문자 삽입
			 * 
			 * @param
			 * word 단어
			 * ch   문자
			 * step 간격 
			 */
			function insertChar(word, ch, step){
				var temp = "";
				var res  = "";
				var cnt  = 0;
				var len  = word.length;
				for(i = 0; i < len; i++){
					cnt++;
					temp = word.charAt(i);
					if(cnt % step == 0 && cnt != len){
						temp = temp + ch;
					}
					res += temp;
				}
				return res;
			}