YNU_JEUS/app_home/himed/webapps/ast/pharmacyconsultweb/js/SMADC02600.js

/**
 * 파 일 명 : SMADC02600.js
 * 설    명 : NST 환자관리 Javascriot
 * 설 계 자 : 김귀남
 * 작 성 자 : 김귀남
 * 수정이력 : 2009.08.17
 */


/*
	@ 의뢰 회신/ 미의뢰회신 여부를 구분
		- 의뢰회신 : R, 미의뢰회신 : NR
		- default : R (의뢰회신)
*/
var gv_consult 		= "R";
var gv_formrecseq   = "";                   //2010-01-04 Ready할때 Formrecseq 값 저장.

var cnstseqno 		= "";					// ast 의뢰번호
var cnstkind 		= "8";					// NST미의뢰회신 구분
var formrecseq 	    = "";					// emr 서식기록번호 : 의뢰/미의뢰 구분
var orddd 			= "";
var cretno 			= "";
var chosflag 		= "";
var cnstflag 		= "3"; 				// 컨설트구분 (1:진료의뢰, 3:타과의뢰)
var formcd 			= "";
var cnststat 		= "";
var eryn 			= "N" 				// 응급여부
var reqdeptcd 		= "";
var requserid 		= "";
var reqdd 			= "";
var reqhm 			= "";
var prcpno 			= model.getValue("/root/temp/cnstinfo/prcpno");
var prcpcd 			= model.getValue("/root/temp/cnstinfo/prcpcd");
var gv_sex 			= "";
var gv_CnstType	    = "";               // EDUC -  EN시 의뢰시 의뢰유형을 [영양교육]으로 의뢰시 NST환자관리 화면에서 [교육의뢰]TAB으로 조회.
var gv_replid 		= "";
var gv_Ritem		= "";

var tab				= "    ";

var cnstcnts9       = model.getValue("/root/temp/cnstinfo/cnstcnts9");               //2009-12-23 NST-EN 교육의뢰추가 - 의뢰유형 (1:영양평가 2:영양교육)
var NstNodepathINIT ="";            //구분별 Node Path ( 교육의뢰=  "/root/init/eduinfo/"                   )
var NstNodepath     ="";            //구분별 Node Path ( 교육의뢰=  "/root/main/edunstinfo/nutreduinfo/"    )
var NstNodepath2    ="";            //구분별 Node Path ( 교육의뢰=  "/root/main/edunstinfo/nutreduinfo2/"   )
var NstNodepathMain ="";            //구분별 Node Path ( 교육의뢰=  "/root/main/edunstinfo/"                )

var pursNstNodepathINIT ="";            //구분별 Node Path ( 추구관리=  "/root/init/pursinfo/")
var pursNstNodepath     ="";            //구분별 Node Path ( 추구관리=  "/root/main/pursnstinfo/nutrpursinfo/"	 )
var pursNstNodepath2    ="";            //구분별 Node Path ( 추구관리=  "/root/main/pursnstinfo/nutrpursinfo2/"	 )
var pursNstNodepathMain ="";            //구분별 Node Path ( 추구관리=  "/root/main/pursnstinfo/"	 )


/*
	@ 초기화
*/
function fInit(){

//fcheckAuthX();	//2008-12-02 버튼권한

	model.toggle("case5");  //영양이력관리
	model.toggle("case6");  //식사처방정보
	/*

	@ 콤보초기화

	1. 콤보의 초기화 실행, 해당 코드의 값을 확인 후 해당 사항으로 변경필요 (TABLE : AST.ADBMCODE)
	2. 2009. 06. 06 현재 임시적으로 AST.ADBMCODE 사용. 향후 테이블 변경 혹은 신규테이블 생성 필요
	3. 2014.10.22 NST영양집중지원팀장 history관리를 위해 AST.ADBMCODE -> COM.ZBCMCODE로 변경 by 김금련
	*/
	fGetCodeList("TRADC02607", "C200", "/root/init/codelist/suplnutr");		// 공급영양액
	//fGetCodeList("TRADC02607","C201", "/root/init/codelist/drid");				// 영양집중지원팀장
	/*=======================================================================================*/
	fGetCodeList("TRADC02608","", "/root/init/codelist/nstcode");				// 추천제형
	astfAddCombo("/root/init/codelist/nstcode", "codelist", "cdid,cdnm", ",");
	
	//2010-01-04 공통코드 관리  //20-01-28 EN-교육 - 교육/영양사의견 상용구 추가
	pharmacyGetCodeList( new Array("JCI1","PN30","PN31"),  new Array("/root/init/jcilist/careplanlist","/root/init/encodelist/edustandard","/root/init/encodelist/dietstandard") );

	/*
		@ 영양사 목록조회 START
	*/
	submit("TRANC00202");
	/*
		@ 영양사 목록조회 END
	*/

	var v_pid 					= model.getValue("/root/temp/cnstinfo/pid");
	var v_cretno 			  = model.getValue("/root/temp/cnstinfo/cretno");
	var v_orddd 				= model.getValue("/root/temp/cnstinfo/orddd");
	var v_prcpgenrflag 	= model.getValue("/root/temp/cnstinfo/prcpgenrflag");
	var v_rgstseqno 		= model.getValue("/root/temp/cnstinfo/rgstseqno");
	var v_cnstcnts9 		= model.getValue("/root/temp/cnstinfo/cnstcnts9");
	var v_cnstdd  		  = model.getValue("/root/temp/cnstinfo/cnstdd");   //의뢰일
	
	fGetNstDrCode("TRADC02616","C201",v_cnstdd, "/root/init/codelist/drid");	 // 영양집중지원팀장
	
	if ( v_pid != "") {

		cnstseqno 			    = model.getValue("/root/temp/cnstinfo/cnstseqno");
		formrecseq 			    = model.getValue("/root/temp/cnstinfo/formrecseq");
		gv_formrecseq 			= model.getValue("/root/temp/cnstinfo/formrecseq");
		formcd 					= model.getValue("/root/temp/cnstinfo/formcd");
		
		fCnstTypeChk(formcd);       //gv_CnstType 구분 (EN - PN - EDU)

		model.setValue("/root/main/patinfo/baseinfo/pid", 	            v_pid);
		model.setValue("/root/send/srchinfo/cnstseqno", 				cnstseqno);
		model.setValue("/root/send/srchinfo/formrecseq", 				formrecseq);
		model.setValue("/root/send/srchinfo/pid", 						v_pid);
		model.setValue("/root/send/srchinfo/cretno", 					v_cretno);
		model.setValue("/root/send/srchinfo/orddd", 					v_orddd);
		model.setValue("/root/send/srchinfo/prcpgenrflag", 				v_prcpgenrflag);
		model.setValue("/root/send/srchinfo/rgstseqno", 				v_rgstseqno);
		model.setValue("/root/send/srchinfo/cnstcnts11", 				gv_formrecseq);  //2010-01-08 원Formrecseq로 추구관리이력조회 하기 위함 
		model.makeValue("/root/send/srchinfo/cnstdd", v_cnstdd);		

		/*
			@ 환자정보조회			#TRADC02601#
				- 환자기본정보		/root/main/patinfo/baseinfo
				- 진단명				/root/main/patinfo/diaginfo
				- 수술정보				/root/main/patinfo/opinfo
				- 영양관리이력		/root/main/patinfo/nutrmngtinfo
				- 식사처방정보		/root/main/patinfo/mealprcpinfo
				- 약처방정보			/root/main/patinfo/drugteaminfo
				- 저장이력				/root/main/patinfo/rgstseqnolist
		*/
		submit("TRADC02601");

		fSetSexFlag();

		// 미의뢰회신 전역변수 변경
		// 의뢰시 발생되는 formrecseq 존재여부 체크
		if(formrecseq == ""){
			gv_consult = "NR";
			fCretCnstinfo();
		}

		if(gv_CnstType == "PN")
		{
			fInitBtn();	// 의뢰유형에 따른 버튼 활성화/비활성화 처리

			if ( model.getValue("/root/send/srchinfo/rgstseqno") == "" ) {
				model.setValue("/root/send/srchinfo/rgstseqno", model.getValue("/root/temp/cnstinfo/rgstseqno"));
			}
			if(gv_consult != "NR"){
				//cmb_rgstseqno.select(0);	// 최근 저장/회신한 이력으로 설정
			}

			// @ 저장/회신내역 조회

			submit("TRADC02603", false);

			/*
				@ 약사 이름 설정
			*/
     	// 회신약사 이름 설정 2014-9-25  김치국
	    submit("TRADC02615");
    //  var testpharmstnm       = model.getValue("/root/main/nstinfo/nutrpninfo/pharmstnm");  ///전산 테스트 김치국 2014.9.30 테스트후 삭제 바람
    //  alert(testpharmstnm);
			if(model.getValue("/root/main/nstinfo/nutrpninfo/pharmstnm") == ""){
				 model.setValue("/root/main/nstinfo/nutrpninfo/pharmstnm", getUserName());
				 model.setValue("/root/main/nstinfo/nutrpninfo/pharmstid", getUserId());
				 model.setValue("/root/temp/pharmstcode", getUserId());		
				 if(model.getValue("/root/temp/pharmstcode") == ""){
						 model.setValue("/root/main/nstinfo/nutrpninfo/pharmstnm", "");
						 model.setValue("/root/main/nstinfo/nutrpninfo/pharmstid", "");
         }   
			} else {
				 model.setValue("/root/temp/pharmstcode", model.getValue("/root/main/nstinfo/nutrpninfo/pharmstid"));				 				 
			}
			
			// 담당의사 이름 설정 jmkim 20141028
			if(model.getValue("/root/main/nstinfo/nutrpninfo/drnm") != ""){			
				model.setValue("/root/temp/drcode", model.getValue("/root/main/nstinfo/nutrpninfo/drnm"));
			} 
			
			/*
				@ 회신약사 이름 설정
			*/
			//fSetReplNm();

			
			// 회신자 id 전역변수 설정
			gv_replid = model.getValue("/root/main/nstinfo/nutrpninfo/replid");

			fSetBee("PN");		// 기초대사량 설정
			fSetTCN("PN");		// 필요열량 설정
			fSetEtc("PN");
			fCalRecmDrugVol();
			fBtnDisabled();  	 //회신상태에 따라 버튼 활성화 처리
			///2014년 10.16 김치국   ast.adchcnstinfo의  cnstcnts2 as drugpath 를 ast.adcdnstpn 의 drugpath로 정리
	    model.setValue("/root/main/nstinfo/nutrpninfo2/drugpath",model.getValue("/root/main/nstinfo/nutrpninfo/drugpath"));	
	   // alert(model.getValue("/root/main/nstinfo/nutrpninfo/drugpath")) 			;
			model.refresh();

			fCalcBee();
			fCalcNeedCal(true);
			model.refresh();
			//fCalcFPN();
			fNstExam();
			cmb_rgstseqno.select(0);    //2009-12-03 여러건의 데이타가 있을경우 최종것으로 조회
			//2009-12-17 추구관리 조회시 [추구관리 표시]/ 조회 adchcnstinfo - cnstcnts10 = 'PURS'
			if  (model.getValue("/root/main/nstinfo/nutrpninfo/pursflag") == "PURS") {
                out_pn_purs.attribute("text")="[ 추구관리 : " + model.getValue("/root/main/nstinfo/nutrpninfo/pursseq") + " ]";
			}else {
				out_pn_purs.attribute("text")="";
			}			
			
			///////2016.7.26.  김치국  NST처방 AI600 등록유무 체크
			//alert(model.getValue("/root/main/nstinfo/nutrpninfo/orderyn"));
			if ( model.getValue("/root/main/nstinfo/nutrpninfo/orderyn") == "Y") 	{
							  model.setValue("/root/send/srchinfo/orderyn","Y");
	              chk_orderyn.disabled = true;							  
			}
		
			model.refresh();

		}

		if(gv_CnstType == "EN")
		{	
            
			fInitBtn();         // 의뢰유형에 따른 버튼 활성화/비활성화 처리

			if ( model.getValue("/root/send/srchinfo/rgstseqno") == "" ) {
				model.setValue("/root/send/srchinfo/rgstseqno", model.getValue("/root/temp/cnstinfo/rgstseqno"));
			}

			submit("TRADC02602", false);
			
			//2010-01-08 투여경로 - 저장내역이 없을경우는 의뢰시 투여경로 가져오고 
			//                                 있을경우는 저장내역 가져오기(현재는 의뢰시 투여경로 가져옴.) - 전예나 샘 요청
			if (model.getValue("/root/temp/cnstinfo/rgstseqno") == "" ) {
			    model.setValue("/root/main/ennstinfo/nutreninfo/drugpath", model.getValue("/root/main/ennstinfo/nutreninfo2/cnstcnts2"));
		    }

			fSetBee("EN");			// 기초대사량 설정
			fSetTCN("EN");			// 필요열량 설정
			fSetEtc("EN");			// 기타사항 (나이, 의뢰일자, 실시일자, 약사, 영양사
			fBtnDisabled();         //회신상태에 따라 버튼 활성화 처리
			model.refresh();

			fCalcBeeEn();
			fCalcNeedCalEn(true);
			fCalcFPNEn();
			fNstExamEn();

			model.refresh();
		}

        //2009-12-23 NST-EN 교육의뢰추가 - 의뢰유형 (1:영양평가 2:영양교육) // 추구관리포함
		if(gv_CnstType == "EDU")
		{
		
			fInitBtn(); // 의뢰유형에 따른 버튼 활성화/비활성화 처리

			if ( model.getValue("/root/send/srchinfo/rgstseqno") == "" ) {
				model.setValue("/root/send/srchinfo/rgstseqno", model.getValue("/root/temp/cnstinfo/rgstseqno"));
			}

			submit("TRADC02611", false);      //EDU 의뢰정보 가져오기 (ast.adcdnsteduc)

			//2010-01-08 투여경로 - 저장내역이 없을경우는 의뢰시 투여경로 가져오고 
			//                                 있을경우는 저장내역 가져오기(현재는 의뢰시 투여경로 가져옴.) - 전예나 샘 요청
			if (model.getValue("/root/temp/cnstinfo/rgstseqno") == "" ) {
			    model.makeValue(NstNodepath + "drugpath", model.getValue(NstNodepath2 + "cnstcnts2"));      //2010-01-29 setValue->makeValue 수정
		    }
		    
			fSetBee_EduPurs(gv_CnstType     ,NstNodepathINIT    ,NstNodepath);			    // 기초대사량 설정
			fSetTCN_EduPurs(gv_CnstType     ,NstNodepathINIT    ,NstNodepath);			    // 필요열량 설정
			fSetEtc_EduPurs(gv_CnstType     ,NstNodepathINIT    ,NstNodepath);			    // 기타사항 (나이, 의뢰일자, 실시일자, 약사, 영양사
			fBtnDisabled();                                                                 //회신상태에 따라 버튼 활성화 처리
			model.refresh();

			fCalcBeeEn_EduPurs(gv_CnstType  ,NstNodepathINIT    ,NstNodepath);              //BEE계산
			fCalcNeedCalEn_EduPurs(gv_CnstType  ,NstNodepathINIT    ,NstNodepath, true);              //필요열량
			fCalcFPNEn_EduPurs(gv_CnstType  ,NstNodepathINIT    ,NstNodepath);
			fNstExamEn_EduPurs(gv_CnstType  ,NstNodepathINIT    ,NstNodepath);

			model.refresh();
		}

		//btn_mealinfo.selected =true;
	}
	
    //2010-01-05 CarePlan 병원별로 적용여부 Check
    if ( model.getValue ("/root/init/jcilist/careplanlist/JCI1[2]/cdid") == "Y" ) { 
        btn_careplan_en.visible     = true;         //EN - Care Plan
        chk_careplan_en.visible     = true;
        btn_enredu_edu.visible      = true;         //EN-교육의뢰 다학제
        chk_enredu_edu.visible      = true; 
        btn_careplan_edu.visible    = true;         //EN-교육의뢰 Care Plan
        chk_careplan_edu.visible    = true; 
        btn_careplan_purs.visible   = true;         //EN-추구관리 Care Plan
        chk_careplan_purs.visible   = true; 
        btn_tot_enredu.visible      = true;         //전체 메뉴의 다학제
        btn_tot_careplan.visible    = true;         //전체 메뉴의 다학제CarePlan
        btn_careplan_pn.visible     = true;         //2010-02-24 PN - CarePlan전송 추가     
    }
}

/*
	@ 의뢰유형 체크 
*/
function fCnstTypeChk(formcd){
	if(formcd == "0000000770") gv_CnstType = "PN";
	else if(formcd == "0000003019") {
	    if ( cnstcnts9 == "2" ) gv_CnstType = "EDU";   //2009-12-23 NST-EN 교육의뢰추가 - 의뢰유형 (1:영양평가 2:영양교육)
	    else gv_CnstType = "EN";
	}
	else gv_CnstType = "PN";
	    
	//기본path 지정    
	if (gv_CnstType == "PN") {
        NstNodepathINIT = "/root/init/pninfo/";
        NstNodepath     = "/root/main/nstinfo/nutrpninfo/";
        NstNodepath2    = "/root/main/nstinfo/nutrpninfo2/";
        NstNodepathMain = "/root/main/nstinfo/";

    }else if (gv_CnstType == "EN") {
        NstNodepathINIT = "/root/init/eninfo/";
        NstNodepath     = "/root/main/ennstinfo/nutreninfo/";
        NstNodepath2    = "/root/main/ennstinfo/nutreninfo2/";
        NstNodepathMain = "/root/main/ennstinfo/";
        pursNstNodepathINIT = "/root/init/pursinfo/";
        pursNstNodepath     = "/root/main/pursnstinfo/nutrpursinfo/";
        pursNstNodepath2    = "/root/main/pursnstinfo/nutrpursinfo2/";
        pursNstNodepathMain = "/root/main/pursnstinfo/";
    }else if (gv_CnstType == "EDU") {
        NstNodepathINIT = "/root/init/eduinfo/";
        NstNodepath     = "/root/main/edunstinfo/nutreduinfo/";
        NstNodepath2    = "/root/main/edunstinfo/nutreduinfo2/";
        NstNodepathMain = "/root/main/edunstinfo/";
        pursNstNodepathINIT = "/root/init/pursinfo/";
        pursNstNodepath     = "/root/main/pursnstinfo/nutrpursinfo/";
        pursNstNodepath2    = "/root/main/pursnstinfo/nutrpursinfo2/";
        pursNstNodepathMain = "/root/main/pursnstinfo/";
    }       
    
    model.makevalue("/root/hidden/cnsttypelist", gv_CnstType);  //2010-01-05 회신내용조회시 EN/교육의뢰/추구관리인지 구분하기 위함
}


/*
	@ 회신약사 이름 설정
*/
function fSetReplNm(){
	
	if(model.getValue("/root/main/nstinfo/nutrpninfo/replnm") == ""){
		model.setValue("/root/main/nstinfo/nutrpninfo/replnm", getUserName());
		model.setValue("/root/main/nstinfo/nutrpninfo/replid", getUserId());
	}
}


/*
	@  의뢰유형에 따른 버튼 활성화/비활성화 처리
*/
function fInitBtn(){
    
    model.toggle("case5");          //영양이력관리
    grd_nutrmngtinfo.selected = true;   //영양이력관리
    
	if(gv_CnstType == "PN"){
	
		btn_pn.selected = true;				// 영양상태판정 - PN
		model.toggle("case2");
		
		btn_edureq.disabled = true;		//교육의뢰
		btn_mngt.disabled = true;		//추구관리
		
		btn_mealinfo.selected = false;	// 식사처방정보
		btn_pham.selected =true;			// 약제팀
		model.toggle("case7");
		
		//2016.8.2. 종료일	  김치국
		if ( model.getValue("/root/main/patinfo/baseinfo/finishdd") != "" ){
			  btn_finish.disabled = true;
		}
		///
		
		
	}else if (gv_CnstType == "EN"){
	
		btn_en.selected = true;
		btn_edureq.disabled = false;    // 교육의뢰 //EN에 대해서는 활성화
		btn_mngt.disabled   = false;    // 추구관리 //EN에 대해서는 활성화
		model.toggle("case1");  //nst-en
    	model.toggle("case6");  //식사처방정보
		
		btn_mealinfo.selected = true;
		btn_pham.selected   = false;

	}else if (gv_CnstType == "EDU"){    //2009-12-23 NST-EN 교육의뢰추가 - 의뢰유형 (1:영양평가 2:영양교육)
	    
	    btn_edureq.selected = true;
		btn_en.disabled     = false;    // EN       //교육의뢰에 대해서는 활성화
		btn_mngt.disabled   = false;    // 추구관리 //교육의뢰에 대해서는 활성화
		model.toggle("case3");          // 교육의뢰
		model.toggle("case6");
		
		btn_mealinfo.selected = true;
		btn_pham.selected   = false;
		
	}else{
		btn_pn.selected = true;				// 영양상태판정 - PN
		model.toggle("case2");
		
		btn_edureq.disabled = true;		//교육의뢰
		btn_mngt.disabled = true;		//추구관리
		
		btn_mealinfo.selected = false;	// 식사처방정보
		btn_pham.selected =true;			// 약제팀
		model.toggle("case7");
	}
}


/*
	@ 환자의 성별 판별
*/
function fSetSexFlag(){
	if(isSearchString(model.getValue("/root/main/patinfo/baseinfo/sna"),"M")){
		gv_sex = "M";
	}else{
		gv_sex = "F"
	}
}


/*
	@ NST 회신내용 저장/회신

		#parameter
			- tmpflag		: pn/en 구분
			- statflag		: 저장/회신 동작 구분		D = 저장 , Z = 회신
			- cnststat		: 의뢰상태

*/
function fNutrJudgSave(tmpflag,statflag,cnststat) {
	// 의뢰건의 consult 상태 체크

    //2009-12-17 추구관리 조회시 [추구관리 표시]/ 조회 adchcnstinfo - cnstcnts10 = 'PURS'
	if(tmpflag == "pn" && model.getValue("/root/main/nstinfo/nutrpninfo/pursflag") == "PURS") {
		alert("PN - 추구관리입니다." + model.getValue("/root/send/srchinfo/rgstseqno").substr (8,3) ); 
	}else{
		if(submit("TRADC62202")){
			var chkcnststat = model.getValue("/root/hidden/cnststatinfo/cnststat");
			if(chkcnststat == "04"){
				messageBox("[취소] 더이상 수정하실 수","I004");
				return;
			}else if (chkcnststat == "30"){
				messageBox("[회신확정] 더이상 수정하실 수","I004");
				return;
			}
		}
	}

	// 2009-12-30  회신시 Care Plan 및 다학제간  전송 필수 데이터 체크 (필수항목없을 경우 오류메세지 회신처리안함) - Start
	//2010-01-05 CarePlan 병원별로 적용여부 Check
    if ( model.getValue ("/root/init/jcilist/careplanlist/JCI1[2]/cdid") == "Y" ) {             
            	if(statflag == "Z"){
            	    if(tmpflag == "pn") {                                   //NST-PN
            	       //2010-02-24 [CarePlan전송]버튼시 전송처리함 
            	    }else if(tmpflag == "en") {                             //NST-EN 
            
                    	        if (model.getValue("/root/hidden/sendENRCAREPLANData/nodesendYN") =="Y") {   //2010-01-04 임시-추후 반드시 삭제처리 
                    
                        			if(!checkENRCAREPLANData(NstNodepathMain)) {                                // Care Plan 전송 필수 데이터 체크
                        				return false;
                        			}
                        			model.setValue(NstNodepathMain + "careplaninfo/replyn","Y");				
                        		}		 			
            
            	    }else if(tmpflag == "EDU") {	                        //교육의뢰	
             
                                if (model.getValue("/root/hidden/sendENRCAREPLANData/nodesendYN") =="Y") {      //2010-01-04 임시-추후 반드시 삭제처리 
                        			if(!checkENRCAREPLANData(NstNodepathMain)) {                                // Care Plan 전송 필수 데이터 체크
                        				return false;
                        			}
                        			model.setValue(NstNodepathMain + "careplaninfo/replyn","Y");						 
                        		}									
            
                        if (model.getValue("/root/hidden/sendENREDUData/nodesendYN") =="Y") {                   //2010-01-04 임시-추후 반드시 삭제처리 
                			if(!checkENREDUData(NstNodepathMain)) {                                             // 다학제간 전송 필수 데이터 체크
                				return false;
                			}
                			model.setValue(NstNodepathMain + "careplaninfo/replyn","Y");						 
                		}
            	    }else if(tmpflag == "PURS") {			                //추구관리
                            	if (model.getValue("/root/hidden/sendENRCAREPLANData/nodesendYN") =="Y") {      //2010-01-04 임시-추후 반드시 삭제처리 
                    				if(!checkENRCAREPLANData(pursNstNodepathMain)) {                            // Care Plan 전송 필수 데이터 체크 
                    					return false;
                    				}
                    				model.setValue(pursNstNodepathMain + "careplaninfo/replyn","Y");						 
                    			}
                		}
            
                }
     }
	// 2009-12-30  회신시 Care Plan 및 다학제간  전송 필수 데이터 체크 (필수항목없을 경우 오류메세지 회신처리안함) - End
	
	
	if(tmpflag == "en") {
	    
        // 추구관리가 아닐경우는 ast.adchcnstinfo 저장정보 Clear - [저장]시 한번 확인함.
        if ( model.getValue(NstNodepath + "pursflag") == "PURS") {
                model.makeValue(NstNodepathMain + "adchcnstinfo/cnstcnts10"     , "PURS");	       // 추구관리-구분
           	    model.makeValue(NstNodepathMain + "adchcnstinfo/cnstcnts11"     , gv_formrecseq);	   // 추구관리-원Formrecseq
        }else{
                model.makeValue(NstNodepathMain + "adchcnstinfo/cnstcnts10"     , "");	           // 추구관리-구분
            	model.makeValue(NstNodepathMain + "adchcnstinfo/cnstcnts11"     , "");	           // 추구관리-원Formrecseq
            	model.makeValue(NstNodepathMain + "adchcnstinfo/cnstnewflag"    , "");	           // 추구관리-신규여부 확인
        } 
	    
		if(statflag == "Z"){
			if(fCretReplCntsEn(true) == false){
				return;
			}else{
				model.makeNode("/root/main/ennstinfo/nutreninfo/replid");
				model.setValue("/root/temp/popupdata/repltype","nst");
				model.makeValue("/root/temp/popupdata/writid", model.getValue("/root/main/ennstinfo/nutreninfo/dieterid"));
				model.makeValue("/root/temp/popupdata/writnm", combo28.label);
				model.setValue("/root/temp/popupdata/receivedata","/root/main/ennstinfo/nutreninfo/replid");
				modal("SPADC62300",0,400,300,"SPADC62300","/root/temp/popupdata","/root/temp/popupdata");
				if(model.getValue(model.getValue("/root/temp/popupdata/receivedata")) == "") return;
			}
		}
//						model.makeValue("/root/main/ennstinfo/nutreninfo/pid", model.getValue("/root/main/patinfo/baseinfo/pid"));
//						model.makeNode("/root/main/ennstinfo/nutrpninfo/rgstseqno");
//						model.setValue("/root/main/ennstinfo/nutrpninfo/rgstseqno", model.getValue("/root/send/srchinfo/rgstseqno"));
		model.setValue("/root/main/ennstinfo/nutreninfo/pid", model.getValue("/root/send/srchinfo/pid"));
		model.setValue("/root/main/ennstinfo/nutreninfo/formrecseq", formrecseq);
		model.makeValue("/root/main/ennstinfo/nutreninfo/cnstseqno", model.getValue("/root/main/ennstinfo/nutreninfo2/cnstseqno"));
		model.setValue("/root/main/ennstinfo/nutreninfo/statflag", statflag);
		model.makeValue("/root/main/ennstinfo/nutreninfo/cnststat", cnststat);


		if ( cnststat != "12" ) {     //삭제가 아닐 경우

			//기초대사량
			if( gv_sex == "M") {

				model.setValue("/root/main/ennstinfo/nutreninfo/basembolkg", model.getValue("/root/init/eninfo/basembolinfolist/mbasembolkg"));
				model.setValue("/root/main/ennstinfo/nutreninfo/basembolcm", model.getValue("/root/init/eninfo/basembolinfolist/mbasembolcm"));
				model.setValue("/root/main/ennstinfo/nutreninfo/basembolyy", model.getValue("/root/init/eninfo/basembolinfolist/mbasembolyy"));
				model.refresh();
				var basembolcalc = 66 + 13.7 * Number(model.getValue("/root/main/ennstinfo/nutreninfo/basembolkg")) + 5 * Number( model.getValue("/root/main/ennstinfo/nutreninfo/basembolcm")) - 6.8 * Number( model.getValue("/root/main/ennstinfo/nutreninfo/basembolyy"));
				model.setValue("/root/main/ennstinfo/nutreninfo/basembolcalc",  basembolcalc);
			}
			if( gv_sex == "F") {
				model.setValue("/root/main/ennstinfo/nutreninfo/basembolkg", model.getValue("/root/init/eninfo/basembolinfolist/wbasembolkg"));
				model.setValue("/root/main/ennstinfo/nutreninfo/basembolcm", model.getValue("/root/init/eninfo/basembolinfolist/wbasembolcm"));
				model.setValue("/root/main/ennstinfo/nutreninfo/basembolyy", model.getValue("/root/init/eninfo/basembolinfolist/wbasembolyy"));
				model.refresh();
				var  basembolcalc = 655 + 9.6 * Number(model.getValue("/root/main/ennstinfo/nutreninfo/basembolkg")) + 1.8 * Number( model.getValue("/root/main/ennstinfo/nutreninfo/basembolcm")) - 4.7 * Number( model.getValue("/root/main/ennstinfo/nutreninfo/basembolyy"));
				model.setValue("/root/main/ennstinfo/nutreninfo/basembolcalc", basembolcalc );
			}

			//필요열량
			if( model.getValue("/root/main/ennstinfo/nutreninfo/needcalrflag") == "1" ) {
				model.setValue("/root/main/ennstinfo/nutreninfo/needcalr1", model.getValue("/root/init/eninfo/needcalrlist/needcalr1"));
				model.setValue("/root/main/ennstinfo/nutreninfo/needcalr2", model.getValue("/root/init/eninfo/needcalrlist/needcalr2"));
			}
			if( model.getValue("/root/main/ennstinfo/nutreninfo/needcalrflag") == "2" ) {
				model.setValue("/root/main/ennstinfo/nutreninfo/needcalr1", model.getValue("/root/init/eninfo/needcalrlist/needcalr3"));
				model.setValue("/root/main/ennstinfo/nutreninfo/needcalr2", model.getValue("/root/init/eninfo/needcalrlist/needcalr4"));
				model.setValue("/root/main/ennstinfo/nutreninfo/needcalr3", model.getValue("/root/init/eninfo/needcalrlist/needcalr5"));
				model.refresh();
				var needcalrcalc = Number(model.getValue("/root/init/eninfo/needcalrlist/needcalr3")) * Number(model.getValue("/root/init/eninfo/needcalrlist/needcalr4")) * Number(model.getValue("/root/init/eninfo/needcalrlist/needcalr5"));
				model.setValue("/root/main/ennstinfo/nutreninfo/needcalrcalc", needcalrcalc);
			}
			if( model.getValue("/root/main/ennstinfo/nutreninfo/needcalrflag") == "3" ) {
				model.setValue("/root/main/ennstinfo/nutreninfo/needcalr1", model.getValue("/root/init/eninfo/needcalrlist/needcalr7"));
				model.setValue("/root/main/ennstinfo/nutreninfo/needcalr2", model.getValue("/root/init/eninfo/needcalrlist/needcalr8"));
				model.setValue("/root/main/ennstinfo/nutreninfo/needcalr3", model.getValue("/root/init/eninfo/needcalrlist/needcalr9"));
				model.setValue("/root/main/ennstinfo/nutreninfo/needcalr4", model.getValue("/root/init/eninfo/needcalrlist/needcalr10"));
				model.refresh();
				var needcalrcalc = Number(model.getValue("/root/init/eninfo/needcalrlist/needcalr7")) * Number(model.getValue("/root/init/eninfo/needcalrlist/needcalr8")) + Number(model.getValue("/root/init/eninfo/needcalrlist/needcalr9")) * Number(model.getValue("/root/init/eninfo/needcalrlist/needcalr10"));
				model.setValue("/root/main/ennstinfo/nutreninfo/needcalrcalc", needcalrcalc);
			}
			if( model.getValue("/root/main/ennstinfo/nutreninfo/needcalrflag") == "4" ) {
				model.setValue("/root/main/ennstinfo/nutreninfo/needcalr1", model.getValue("/root/init/eninfo/needcalrlist/needcalr12"));
				model.setValue("/root/main/ennstinfo/nutreninfo/needcalr2", model.getValue("/root/init/eninfo/needcalrlist/needcalr13"));
				model.setValue("/root/main/ennstinfo/nutreninfo/needcalr3", model.getValue("/root/init/eninfo/needcalrlist/needcalr14"));
				model.setValue("/root/main/ennstinfo/nutreninfo/needcalr4", model.getValue("/root/init/eninfo/needcalrlist/needcalr15"));
				model.setValue("/root/main/ennstinfo/nutreninfo/needcalr5", model.getValue("/root/init/eninfo/needcalrlist/needcalr16"));
				model.refresh();
				var needcalrcalc = 1784-11*Number(model.getValue("/root/init/eninfo/needcalrlist/needcalr12")) +5* Number(model.getValue("/root/init/eninfo/needcalrlist/needcalr13"))+244* Number(model.getValue("/root/init/eninfo/needcalrlist/needcalr14"))+239 *  Number(model.getValue("/root/init/eninfo/needcalrlist/needcalr15"))+804 * Number(model.getValue("/root/init/eninfo/needcalrlist/needcalr16"));
				model.setValue("/root/main/ennstinfo/nutreninfo/needcalrcalc", needcalrcalc);
			}
		}
		
		// fSetCnstinfo미의뢰 회신시 adchcnstinfo에 데이터를 생성하기 위한 변수들을 설정한다.
		if(gv_consult == "NR"){
		    formcd = "0000003019";		// EN의뢰 formcd 설정
			fSetCnstinfo_EN(NstNodepath);
		} 
        
		if (submit("TXADC02602")) {
			btn_en.dispatch("DOMActivate");
		    btn_en.selected = true;
		    
			model.setValue("/root/send/srchinfo/rgstseqno", model.getValue("/root/hidden/ret/rgstseqno"));
			btn_sea.dispatch("DOMActivate");
			
    		//2009-12-30 Care Plan 관련 항목 추가 - 시작 ( 다학제간 및 Care Plan 의 회신여부 세팅 )
        	//2010-01-05 CarePlan 병원별로 적용여부 Check
            if ( model.getValue ("/root/init/jcilist/careplanlist/JCI1[2]/cdid") == "Y" ) {  		     		 
        		 if(statflag == "Z"){       //회신일경우만 전송한다.
            		 sendENRCAREPLANData(NstNodepathMain);   // Care Plan 데이터 ENR 전송
        		 }
        	}
        	
		}
        model.makeValue(NstNodepathMain + "adchcnstinfo/cnstnewflag" ,"");     // EN-추구관리 New Clear
        
	}



	if(tmpflag == "pn") {
        // 추구관리가 아닐경우는 ast.adchcnstinfo 저장정보 Clear - [저장]시 한번 확인함.
        if ( model.getValue(NstNodepath + "pursflag") == "PURS") {
                model.makeValue(NstNodepath + "adchcnstinfo/cnstcnts10"     , "PURS");	       // 추구관리-구분
           	    model.makeValue(NstNodepath + "adchcnstinfo/cnstcnts11"     , gv_formrecseq);	   // 추구관리-원Formrecseq
        }else{
                model.makeValue(NstNodepath + "adchcnstinfo/cnstcnts10"     , "");	           // 추구관리-구분
            	model.makeValue(NstNodepath + "adchcnstinfo/cnstcnts11"     , "");	           // 추구관리-원Formrecseq
            	model.makeValue(NstNodepath + "adchcnstinfo/cnstnewflag"    , "");	           // 추구관리-신규여부 확인
        } 	   
         
		if(statflag == "Z"){
			if(fCretReplCnts(true) == false){
				return;
			}else{
				model.makeNode("/root/main/nstinfo/nutrpninfo/replid");
				model.makeValue("/root/temp/popupdata/writid", model.getValue("/root/main/nstinfo/nutrpninfo/pharmstid"));
				model.makeValue("/root/temp/popupdata/writnm", model.getValue("/root/main/nstinfo/nutrpninfo/pharmstnm"));
				model.setValue("/root/temp/popupdata/repltype","nst");
				model.setValue("/root/temp/popupdata/receivedata","/root/main/nstinfo/nutrpninfo/replid");
				modal("SPADC62300",0,400,300,"SPADC62300","/root/temp/popupdata","/root/temp/popupdata");
				if(model.getValue("/root/main/nstinfo/nutrpninfo/replid") == "") return;
				else {
					if(model.getValue("/root/main/nstinfo/nutrpninfo/replid") != getUserId()){
						model.setValue("/root/send/userinfo/userid", model.getValue(model.getValue("/root/temp/popupdata/receivedata")));
						if(submit("TRADC02609")){
							var userid 	= model.getValue("/root/hidden/userinfo/userid");
							var usernm 	= model.getValue("/root/hidden/userinfo/usernm");
							if(userid != "" && usernm != ""){
								model.setValue("/root/main/nstinfo/nutrpninfo/replnm",usernm);
							}else{
								messageBox("일치하는 사용자 정보가 일치하지 않습니다. 사용자 ID를 . ","I007");
								return;
							}
						}
//					 
						var Replinfo = "\n\n\n 담당약사 : " +model.getValue("/root/main/nstinfo/nutrpninfo/pharmstnm")+" / "+model.getValue("/root/main/nstinfo/nutrpninfo/replnm")+ "\t\t " + getCurrentDate().toDate().getDateFormat("YYYY/MM/DD") + "\t" + " / 영양집중지원팀 팀장 (Dr. "  ;
						    Replinfo += model.getValue("/root/init/codelist/drid/codelist/cdnm") + ")";
						
                        //2010-01-06 PN 회신시 로긴ID와 회신자ID가 틀릴경우 회신내용수동변경데이타 저장안됨
						//var replcnts = gv_Ritem+Replinfo;
                        var replcntsArr = model.getValue("/root/main/nstinfo/nutrpninfo/replcnts").split("\n\n\n 담당약사 : ");
						var replcnts = replcntsArr[0] + Replinfo;  //2010-01-06 PN 회신시 로긴ID와 회신자ID가 틀릴경우 회신내용수동변경데이타 저장안됨

						model.setValue("/root/main/nstinfo/nutrpninfo/replcnts", replcnts); // 회신내역 변수설정
						model.setValue("/root/main/nstreqinfo/data", replcnts);	
						model.refresh();
						
					}
				}
			}
		}

		model.setValue("/root/main/nstinfo/nutrpninfo/pid", model.getValue("/root/send/srchinfo/pid"));
		model.setValue("/root/main/nstinfo/nutrpninfo/formrecseq", formrecseq); // 전역변수 formrecseq 사용 - 추구관리 [+]버튼클릭시 변경됨. //2010-02-04 바로회신시 오류발생
		model.makeValue("/root/main/nstinfo/nutrpninfo/cnstseqno", model.getValue("/root/main/nstinfo/nutrpninfo2/cnstseqno"));
		model.setValue("/root/main/nstinfo/nutrpninfo/statflag", statflag);
		model.makeValue("/root/main/nstinfo/nutrpninfo/cnststat", cnststat);

		if ( cnststat != "12" ) {     //삭제가 아닐 경우


			//기초대사량
			if( gv_sex == "M") {
				model.setValue("/root/main/nstinfo/nutrpninfo/basembolkg", model.getValue("/root/init/pninfo/basembolinfolist/mbasembolkg"));
				model.setValue("/root/main/nstinfo/nutrpninfo/basembolcm", model.getValue("/root/init/pninfo/basembolinfolist/mbasembolcm"));
				model.setValue("/root/main/nstinfo/nutrpninfo/basembolyy", model.getValue("/root/init/pninfo/basembolinfolist/mbasembolyy"));
				model.refresh();
				var basembolcalc = 66 + 13.7 * Number(model.getValue("/root/main/nstinfo/nutrpninfo/basembolkg")) + 5 * Number( model.getValue("/root/main/nstinfo/nutrpninfo/basembolcm")) - 6.8 * Number( model.getValue("/root/main/nstinfo/nutrpninfo/basembolyy"));
				model.setValue("/root/main/nstinfo/nutrpninfo/basembolcalc",  basembolcalc);
			}
			if( gv_sex == "F") {
				model.setValue("/root/main/nstinfo/nutrpninfo/basembolkg", model.getValue("/root/init/pninfo/basembolinfolist/wbasembolkg"));
				model.setValue("/root/main/nstinfo/nutrpninfo/basembolcm", model.getValue("/root/init/pninfo/basembolinfolist/wbasembolcm"));
				model.setValue("/root/main/nstinfo/nutrpninfo/basembolyy", model.getValue("/root/init/pninfo/basembolinfolist/wbasembolyy"));
				model.refresh();
				var  basembolcalc = 655 + 9.6 * Number(model.getValue("/root/main/nstinfo/nutrpninfo/basembolkg")) + 1.8 * Number( model.getValue("/root/main/nstinfo/nutrpninfo/basembolcm")) - 4.7 * Number( model.getValue("/root/main/nstinfo/nutrpninfo/basembolyy"));
				model.setValue("/root/main/nstinfo/nutrpninfo/basembolcalc", basembolcalc );
			}

			//필요열량
			if( model.getValue("/root/main/nstinfo/nutrpninfo/needcalrflag") == "1" ) {
				model.setValue("/root/main/nstinfo/nutrpninfo/needcalr1", model.getValue("/root/init/pninfo/needcalrlist/needcalr1"));
				model.setValue("/root/main/nstinfo/nutrpninfo/needcalr2", model.getValue("/root/init/pninfo/needcalrlist/needcalr2"));
				var needcalrcalc = model.getValue("/root/init/pninfo/needcalrlist/needcalr7");
				model.setValue("/root/main/nstinfo/nutrpninfo/needcalrcalc", needcalrcalc);
			}
			if( model.getValue("/root/main/nstinfo/nutrpninfo/needcalrflag") == "2" ) {
				model.setValue("/root/main/nstinfo/nutrpninfo/needcalr1", model.getValue("/root/init/pninfo/needcalrlist/needcalr3"));
				model.setValue("/root/main/nstinfo/nutrpninfo/needcalr2", model.getValue("/root/init/pninfo/needcalrlist/needcalr4"));
				model.setValue("/root/main/nstinfo/nutrpninfo/needcalr3", model.getValue("/root/init/pninfo/needcalrlist/needcalr5"));
				model.refresh();

				//var needcalrcalc = Number(model.getValue("/root/init/pninfo/needcalrlist/needcalr3")) * Number(model.getValue("/root/init/pninfo/needcalrlist/needcalr4")) * Number(model.getValue("/root/init/pninfo/needcalrlist/needcalr5"));
				var needcalrcalc = model.getValue("/root/init/pninfo/needcalrlist/needcalr6");
				model.setValue("/root/main/nstinfo/nutrpninfo/needcalrcalc", needcalrcalc);
			}
			if( model.getValue("/root/main/nstinfo/nutrpninfo/needcalrflag") == "3" ) {
				model.setValue("/root/main/nstinfo/nutrpninfo/needcalr1", model.getValue("/root/init/pninfo/needcalrlist/needcalr7"));
				model.setValue("/root/main/nstinfo/nutrpninfo/needcalr2", model.getValue("/root/init/pninfo/needcalrlist/needcalr8"));
				model.setValue("/root/main/nstinfo/nutrpninfo/needcalr3", model.getValue("/root/init/pninfo/needcalrlist/needcalr9"));
				model.setValue("/root/main/nstinfo/nutrpninfo/needcalr4", model.getValue("/root/init/pninfo/needcalrlist/needcalr10"));
				model.refresh();
				//var needcalrcalc = Number(model.getValue("/root/init/pninfo/needcalrlist/needcalr7")) * Number(model.getValue("/root/init/pninfo/needcalrlist/needcalr8")) + Number(model.getValue("/root/init/pninfo/needcalrlist/needcalr9")) * Number(model.getValue("/root/init/pninfo/needcalrlist/needcalr10"));
				var needcalrcalc = model.getValue("/root/init/pninfo/needcalrlist/needcalr11");
				model.setValue("/root/main/nstinfo/nutrpninfo/needcalrcalc", needcalrcalc);
			}
			if( model.getValue("/root/main/nstinfo/nutrpninfo/needcalrflag") == "4" ) {
				model.setValue("/root/main/nstinfo/nutrpninfo/needcalr1", model.getValue("/root/init/pninfo/needcalrlist/needcalr12"));
				model.setValue("/root/main/nstinfo/nutrpninfo/needcalr2", model.getValue("/root/init/pninfo/needcalrlist/needcalr13"));
				model.setValue("/root/main/nstinfo/nutrpninfo/needcalr3", model.getValue("/root/init/pninfo/needcalrlist/needcalr14"));
				model.setValue("/root/main/nstinfo/nutrpninfo/needcalr4", model.getValue("/root/init/pninfo/needcalrlist/needcalr15"));
				model.setValue("/root/main/nstinfo/nutrpninfo/needcalr5", model.getValue("/root/init/pninfo/needcalrlist/needcalr16"));
				model.refresh();
				//var needcalrcalc = 1784-11*Number(model.getValue("/root/init/pninfo/needcalrlist/needcalr12")) +5* Number(model.getValue("/root/init/pninfo/needcalrlist/needcalr13"))+244* Number(model.getValue("/root/init/pninfo/needcalrlist/needcalr14"))+239 *  Number(model.getValue("/root/init/pninfo/needcalrlist/needcalr15"))+804 * Number(model.getValue("/root/init/pninfo/needcalrlist/needcalr16"));
				var needcalrcalc = model.getValue("/root/init/pninfo/needcalrlist/needcalr17");
				model.setValue("/root/main/nstinfo/nutrpninfo/needcalrcalc", needcalrcalc);
			}
		}
		// fSetCnstinfo미의뢰 회신시 adchcnstinfo에 데이터를 생성하기 위한 변수들을 설정한다.
		if(gv_consult == "NR"){
			formcd = "0000000770";		// PN의뢰 formcd 설정
			fSetCnstinfo();
		}

        //추구관린 신규일경우  formrecseq / cnstseqno Clear해 주어야만 adchcnstinfo / mmrhcnstinfo 데이타 발생
        if ( model.getValue(NstNodepath + "pursflag") == "PURS") {
            fSetCnstinfoPurs(NstNodepath,model.getValue(NstNodepathMain + "adchcnstinfo/cnstnewflag"));
        }    
                
		if(model.getValue("/root/main/nstinfo/nutrpninfo/reqdd") == "") {
			model.setValue("/root/main/nstinfo/nutrpninfo/reqdd", model.getValue("/root/temp/cnstinfo/cnstdd"));
		}
		//if(model.getValue("/root/main/nstinfo/nutrpninfo/formrecseq")) {    //원 fromrecseq로 돌아가는 현상있음. ????
		//	model.setValue("/root/main/nstinfo/nutrpninfo/formrecseq", model.getValue("/root/temp/cnstinfo/formrecseq"));
		//}
		if(model.getValue("/root/main/nstinfo/nutrpninfo/rgstseqno")=="") {
			model.setValue("/root/main/nstinfo/nutrpninfo/rgstseqno", model.getValue("/root/send/srchinfo/rgstseqno"));
		}
///		alert('제언');
    /////////////  2015.10.22 김치국   제언만 등록
    var userid = getUserInfo("userid");
		model.makeValue("/root/send/srchinfo/sabun", userid);   
		 ///사용자 구분 찾기
		submit("TRADC02617");   
		var cntlyn1 = model.getValue("/root/temp/kindcode/kindlist/cntlyn1");
     ///////////////
     //alert("smadc02600.js"+cntlyn1 ) ;
		model.makeValue("/root/main/nstinfo/nutrpninfo/advflag", cntlyn1);
		
		if (submit("TXADC02601")) {
			   if( tmpflag == "pn") {
				     btn_pn.dispatch("DOMActivate");
				     btn_pn.selected = true;
			   }

			   model.setValue("/root/send/srchinfo/rgstseqno", model.getValue("/root/hidden/ret/rgstseqno"));
			   model.setValue("/root/send/srchinfo/cnstseqno", model.getValue("/root/hidden/ret/cnstseqno"));
			   model.setValue("/root/send/srchinfo/formrecseq", model.getValue("/root/hidden/ret/formrecseq"));

			   //2009-01-22 추구관리 - 저장.회신후 현재 rgstseqno를 보여주지 않으므로 /root/temp/cnstinfo/rgstseqno 현재의 rgstseqno 강제 등록.
			   //model.setValue("/root/temp/cnstinfo/rgstseqno", model.getValue("/root/send/srchinfo/rgstseqno"));
			  if (model.getValue("/root/main/nstinfo/nutrpninfo/statflag") == "Z"){
    		     btn_pn_purs.attribute("visibility") = "visible";    //2009-12-08 회신후 [+]버튼 활성화
    		}
    		model.makeValue(NstNodepathMain + "adchcnstinfo/cnstnewflag" ,"");     // PN-추구관리 New Clear
    		
		    cmb_rgstseqno.select(0);                         //2009-12-08 회신후 [+]버튼 활성화
		    //2010-02-09 PN - 회신확정후 추구관리시 저장후바로회신처리할경우 formrecseq가 발생되지 않는 현상있음
		    rgstseqno   = model.getValue("/root/hidden/ret/rgstseqno");
		    cnstseqno   = model.getValue("/root/hidden/ret/cnstseqno");
		    formrecseq  = model.getValue("/root/hidden/ret/formrecseq");
			  btn_sea.dispatch("DOMActivate");              
			
				////////////2016년 8월 29일 김치국 NST처방 코드fee  생성 IPRC
		    //// 의사샘 회신체크후 처방발생 체크 할경우 운영
		   if  ( model.getValue("/root/main/nstinfo/nutrpninfo/droffrflag") == '2') {
		       if ( model.getValue("/root/main/nstinfo/nutrpninfo/orderyn") == 'N') {
		           if ( model.getValue("/root/send/srchinfo/orderyn") ==  'Y' ) {
		 		           model.setValue("/root/main/nstinfo/nutrpninfo/orderyn","Y");	
		 		           model.setValue("/root/send/srchinfo/orderyn","Y");			 		         
	                 submit("TRADC62203");
	                 chk_orderyn.disabled = true;	
                   model.refresh();	               						  	               		
  	           }
	  	     }
	     }
		   /////////////
		}
	}
	
	if (tmpflag == "EDU") {    //교육의뢰
		if(statflag == "Z"){
			if(fCretReplCntsEn_EduPurs(true,NstNodepath,NstNodepathMain,tmpflag) == false){
				return;
			}else{
				model.makeNode(NstNodepath + "replid");
				model.setValue("/root/temp/popupdata/repltype"      , "nst");
				model.makeValue("/root/temp/popupdata/writid"       , model.getValue(NstNodepath + "dieterid"));
				model.makeValue("/root/temp/popupdata/writnm"       , combo38.label);       //교육의뢰 -영양사
				model.setValue("/root/temp/popupdata/receivedata"   , NstNodepath + "replid");
				modal("SPADC62300",0,400,300,"SPADC62300","/root/temp/popupdata","/root/temp/popupdata");
				if(model.getValue(model.getValue("/root/temp/popupdata/receivedata")) == "") return;
			}
		}
		model.setValue(NstNodepath  + "pid"         , model.getValue("/root/send/srchinfo/pid"));
		model.setValue(NstNodepath  + "formrecseq"  , formrecseq);
		model.makeValue(NstNodepath + "cnstseqno"   , model.getValue(NstNodepath2 + "cnstseqno"));
		model.setValue(NstNodepath  + "statflag"    , statflag);
		model.makeValue(NstNodepath + "cnststat"    , cnststat);


		if ( cnststat != "12" ) {     //삭제가 아닐 경우
            fSetBee_EduPurs(tmpflag,NstNodepathINIT,NstNodepath) //기초대사량
		}
		
		// fSetCnstinfo미의뢰 회신시 adchcnstinfo에 데이터를 생성하기 위한 변수들을 설정한다.
		if(gv_consult == "NR"){
		    formcd = "0000003019";		// EN의뢰 formcd 설정
			fSetCnstinfo_EN(NstNodepath);
		}
              
		if (submit("TXADC02603")) {            //교육의뢰 저장
			btn_edureq.dispatch("DOMActivate");
			btn_edureq.selected = true;
		
		    model.setValue("/root/send/srchinfo/rgstseqno", model.getValue("/root/hidden/ret/rgstseqno"));
			btn_sea.dispatch("DOMActivate");
		    model.setValue("/root/send/srchinfo/cnstseqno", model.getValue("/root/hidden/ret/cnstseqno"));
		    model.setValue("/root/send/srchinfo/formrecseq", model.getValue("/root/hidden/ret/formrecseq"));

            /*
    		if (model.getValue(NstNodepath + "statflag") == "Z"){
    		    btn_en_purs.attribute("visibility") = visible"hidden";     //회신후 [+]버튼 활성화
    		}else{
    		    btn_en_purs.attribute("visibility") = "hidden";     
    	    }
            */
    	                                 
    		//다학제간, Care Plan 관련 항목 추가 -( 다학제간 및 Care Plan 의 회신여부 세팅 )
        	//2010-01-05 CarePlan 병원별로 적용여부 Check
            if ( model.getValue ("/root/init/jcilist/careplanlist/JCI1[2]/cdid") == "Y" ) { 		 
        		if(statflag == "Z"){       //회신일경우만 전송한다.
            		if (tmpflag == "EDU") {          //교육의뢰 
            		    sendENRCAREPLANData(NstNodepathMain);                      // Care Plan 데이터 ENR 전송
            		    sendENREDUData(NstNodepathMain);                           // 다학제간 데이터 ENR 전송
            		}
            	}
            }

		}
		model.makeValue(NstNodepathMain + "adchcnstinfo/cnstnewflag" ,"");     // 교육의뢰-추구관리 New Clear	    
		 	
	}	
	
	if (tmpflag == "PURS") {    //교육의뢰
	    
        // 추구관리가 아닐경우는 ast.adchcnstinfo 저장정보 Clear - [저장]시 한번 확인함.
        if ( model.getValue(pursNstNodepath + "pursflag") == "PURS") {
                model.makeValue(pursNstNodepathMain + "adchcnstinfo/cnstcnts10"     , "PURS");	       // 추구관리-구분
           	    model.makeValue(pursNstNodepathMain + "adchcnstinfo/cnstcnts11"     , gv_formrecseq);	   // 추구관리-원Formrecseq
        }else{
                model.makeValue(pursNstNodepathMain + "adchcnstinfo/cnstcnts10"     , "");	           // 추구관리-구분
            	model.makeValue(pursNstNodepathMain + "adchcnstinfo/cnstcnts11"     , "");	           // 추구관리-원Formrecseq
            	model.makeValue(pursNstNodepathMain + "adchcnstinfo/cnstnewflag"    , "");	           // 추구관리-신규여부 확인
        } 	    
		if(statflag == "Z"){
			if(fCretReplCntsEn_EduPurs(true,pursNstNodepath,pursNstNodepathMain,tmpflag) == false){
				return;
			}else{
				model.makeNode(pursNstNodepath + "replid");
				model.setValue("/root/temp/popupdata/repltype"      , "nst");
				model.makeValue("/root/temp/popupdata/writid"       , model.getValue(pursNstNodepath + "dieterid"));
				model.makeValue("/root/temp/popupdata/writnm"       , combo1.label);        //추구관리-영양사
				model.setValue("/root/temp/popupdata/receivedata"   , pursNstNodepath + "replid");
				modal("SPADC62300",0,400,300,"SPADC62300","/root/temp/popupdata","/root/temp/popupdata");
				if(model.getValue(model.getValue("/root/temp/popupdata/receivedata")) == "") return;
			}
		}
		model.setValue(pursNstNodepath  + "pid"         , model.getValue("/root/send/srchinfo/pid"));
		model.setValue(pursNstNodepath  + "formrecseq"  , formrecseq);
		model.makeValue(pursNstNodepath + "cnstseqno"   , model.getValue(pursNstNodepath2 + "cnstseqno"));
		model.setValue(pursNstNodepath  + "statflag"    , statflag);
		model.makeValue(pursNstNodepath + "cnststat"    , cnststat);

		if ( cnststat != "12" ) {     //삭제가 아닐 경우
            fSetBee_EduPurs(tmpflag, pursNstNodepathINIT, pursNstNodepath) //기초대사량
		}
		
		// fSetCnstinfo미의뢰 회신시 adchcnstinfo에 데이터를 생성하기 위한 변수들을 설정한다.
		if(gv_consult == "NR"){
		    formcd = "0000003019";		// EN의뢰 formcd 설정
			fSetCnstinfo_EN(pursNstNodepath);
		}

        //추구관린 신규일경우  formrecseq / cnstseqno Clear해 주어야만 adchcnstinfo / mmrhcnstinfo 데이타 발생
        if ( model.getValue(pursNstNodepath + "pursflag") == "PURS") {
            fSetCnstinfoPurs(pursNstNodepath,model.getValue(pursNstNodepathMain + "adchcnstinfo/cnstnewflag"));
        }      
        
		if (submit("TXADC02604")) {            //추구관리 저장
			//btn_mngt.dispatch("DOMActivate");     //원의뢰데이타를 조회한다 막기
			//btn_mngt.selected = true;             //원의뢰데이타를 조회한다 막기
		
			//btn_sea.dispatch("DOMActivate");      //원처방을 조회한다.
    		model.setValue("/root/send/srchinfo/pid", model.getValue("/root/send/srchinfo/pid"));
    		model.setValue("/root/send/srchinfo/rgstseqno", model.getValue("/root/hidden/ret/rgstseqno"));
    		model.setValue("/root/send/srchinfo/cnstseqno", model.getValue("/root/hidden/ret/cnstseqno"));
    		model.setValue("/root/send/srchinfo/formrecseq", model.getValue("/root/hidden/ret/formrecseq"));
    		
    		//다학제간 및 Care Plan 의 회신여부 세팅 
        	//2010-01-05 CarePlan 병원별로 적용여부 Check
            if ( model.getValue ("/root/init/jcilist/careplanlist/JCI1[2]/cdid") == "Y" ) { 		 
        		if(statflag == "Z"){       //회신일경우만 전송한다.	
            		    sendENRCAREPLANData(pursNstNodepathMain);                      // Care Plan 데이터 ENR 전송
            	}
            }
		    //2010-02-09 PN - 회신확정후 추구관리시 저장후바로회신처리할경우 formrecseq가 발생되지 않는 현상있음
		    rgstseqno   = model.getValue("/root/hidden/ret/rgstseqno");
		    cnstseqno   = model.getValue("/root/hidden/ret/cnstseqno");
		    formrecseq  = model.getValue("/root/hidden/ret/formrecseq");            
            submit("TRADC02601");   // 기본정보조회 - 추구관리이력 조회 위함.
            submit("TRADC02612");   // 2010-02-08 저장후 바로회신처리시 원의뢰로 Update 되는 경우가 발생되어 의뢰내역 재조회함.
            fBtnDisabled();
		}
        
		model.makeValue(pursNstNodepathMain + "adchcnstinfo/cnstnewflag" ,"");     // 추구관리 New Clear 
	}		
	
	opener.btn_sea.dispatch("DOMActivate");
	opener.model.refresh();
}

//회신상태에 따라 버튼 활성화 처리
function fBtnDisabled() {
	var statflag = "";
	if (btn_pn.selected == true ) {
		if(formcd != "0000003019"){
			statflag = model.getValue("/root/main/nstinfo/nutrpninfo/statflag");
		}else{
			btn_tempsave.disabled   = true;
			btn_save.disabled       = true;
			btn_repl.disabled       = true;
			btn_del.disabled        = true;
			btn_careplan_pn.disabled= true;    //2010-02-24 PN CarePlan전송 버튼 추가(비활성화)
			return false;
		}
	} else if (btn_en.selected == true ) {
	    /* //2009-12-23 NST-EN 교육의뢰추가 - 의뢰유형 (1:영양평가 2:영양교육)
		if(formcd != "0000000770"){
			statflag = model.getValue("/root/main/ennstinfo/nutreninfo/statflag");
		}else{
			btn_tempsave.disabled = true;
			btn_save.disabled = true;
			btn_repl.disabled = true;
			btn_del.disabled = true;
			return false;
		}
	    */
	    //2009-12-23 NST-EN 교육의뢰추가 - 의뢰유형 (1:영양평가 2:영양교육)
		if ((formcd == "0000003019")&& (gv_CnstType != "EDU")) {            //EN의 영양교육이  아닌겨우 //(cnstcnts9 != "2")
		    statflag = model.getValue("/root/main/ennstinfo/nutreninfo/statflag");
		}else{                                                          //EN의 영양평가 이외는 버튼 비활성화
			btn_tempsave.disabled = true;
			btn_save.disabled = true;
			btn_repl.disabled = true;
			btn_del.disabled = true;	
			return false;
		}
	} else if (btn_edureq.selected == true ) {      //2009-12-23 NST-EN 교육의뢰추가 - 의뢰유형 (1:영양평가 2:영양교육) //(cnstcnts9 == "2")
	    if ((formcd == "0000003019") && (gv_CnstType == "EDU"))  {
			statflag = model.getValue("/root/main/edunstinfo/nutreduinfo/statflag");
	    }else{    
			btn_tempsave.disabled = true;
			btn_save.disabled = true;
			btn_repl.disabled = true;
			btn_del.disabled = true;
			return false;
		}
	} else if (btn_mngt.selected == true ) {      //2009-12-23 NST-EN 추구관리추가
	    
		if(formcd == "0000003019"){
			statflag = model.getValue("/root/main/pursnstinfo/nutrpursinfo/statflag");
		}else{
			btn_tempsave.disabled = true;
			btn_save.disabled = true;
			btn_repl.disabled = true;
			btn_del.disabled = true;
			return false;
		}
		
	}
	
	/*
		회신내용 탭 클릭시 버튼 비활성화를 위해 추가 - Start
	*/
	if(formcd != "0000003019") {
		statflag = model.getValue("/root/main/nstinfo/nutrpninfo/statflag");
	} else {
	    if (gv_CnstType == "EDU")  statflag = model.getValue(NstNodepath + "statflag");  // 교육의뢰 //(cnstcnts9 == "2")
	    else  statflag = model.getValue("/root/main/ennstinfo/nutreninfo/statflag");
	    if (btn_mngt.selected == true ) {       //EN-추구관리 일경우 (2010-01-04) 
	        statflag = model.getValue("/root/main/pursnstinfo/nutrpursinfo/statflag");
	    } 
	}
	/*
		회신내용 탭 클릭시 버튼 비활성화를 위해 추가 - End
	*/
    btn_careplan_pn.disabled= true;    //2010-02-24 PN CarePlan전송 버튼 추가(비활성화)
    
	if ( statflag == "Z" ) {     //회신
		btn_tempsave.disabled = true;
		btn_save.disabled = true;
		btn_repl.disabled = true;
		btn_del.disabled = true;
		
		//회신인 경우 [+]버튼 활성화
		if (gv_CnstType=="PN")         btn_pn_purs.attribute("visibility") = "visible";       //pn
		else if (gv_CnstType=="EN")    btn_en_purs.attribute("visibility") = "visible";       //EN
		else if (gv_CnstType=="EDU")   btn_en_purs.attribute("visibility") = "visible";       //교육의뢰
		    
		if (gv_CnstType=="PN")		    btn_careplan_pn.disabled= false;    //2010-02-24 PN CarePlan전송 버튼 추가(활성화)    
		
	} else if ( statflag == "D" ) {     //확정저장
		btn_tempsave.disabled = true;
		btn_save.disabled = false;
		btn_repl.disabled = false;
		btn_del.disabled = true;
	} else {
		btn_tempsave.disabled = false;
		btn_save.disabled = false;
		btn_repl.disabled = false;
		btn_del.disabled = false;
		//fcheckAuthX();	//2008-12-02 버튼권한
	}
	
	if(model.getValue("/root/temp/cnstinfo/pidchkflag") == "Y") {
		// 20100119_laboru_약사 이외의 사용자인 경우
		btn_save.disabled = true;
		btn_repl.disabled = true;
		btn_del.disabled = true;
	}
}

//2008-12-02 버튼권한
function fcheckAuthX() {
	btn_save.disabled	= !checkAuth("X");	//저장
	btn_repl.disabled	= !checkAuth("X");	//회신
	btn_del.disabled	= !checkAuth("X");	//삭제
}

/*
	EN 회신내용 생성
*/
function fCretReplCntsEn(sendflag)
{

	//값 세팅
	var roomcd 				= model.getValue("/root/main/patinfo/baseinfo/roomcd"); //병실
	var orddeptnm 			= model.getValue("/root/main/patinfo/baseinfo/orddeptnm"); //진료과
	var orddrnm 			= model.getValue("/root/main/patinfo/baseinfo/orddrnm"); // 의뢰의사
	var reqdd 				= model.getValue("/root/main/patinfo/baseinfo/reqdd"); //의뢰일
	var diagengnm 		= model.getValue("/root/main/patinfo/diaginfo[1]/diagengnm"); //상병명
	var orddrnm 			= model.getValue("/root/main/patinfo/baseinfo/orddrnm"); //진료과
	var ht 						= model.getValue("/root/main/ennstinfo/nutreninfo/ht"); // 키
	var ubw  					= model.getValue("/root/main/ennstinfo/nutreninfo/ubw"); //UBW
	var wt  						= model.getValue("/root/main/ennstinfo/nutreninfo/wt"); //체중
	var ibw  					= model.getValue("/root/main/ennstinfo/nutreninfo/ibw"); //IBW

	var pibw  					= model.getValue("/root/main/ennstinfo/nutreninfo/pibw");  //pibw
	var lost  					= model.getValue("/root/main/ennstinfo/nutreninfo/ht");
	var per  					= model.getValue("/root/temp/ibwper");

	var hb 						= model.getValue("/root/main/ennstinfo/nutreninfo/hb");
	var na 						= model.getValue("/root/main/ennstinfo/nutreninfo/na");
	var k 						= model.getValue("/root/main/ennstinfo/nutreninfo/k");
	var cl 						= model.getValue("/root/main/ennstinfo/nutreninfo/cl");
	var alb 						= model.getValue("/root/main/ennstinfo/nutreninfo/alb");
	var tlc 						= model.getValue("/root/main/ennstinfo/nutreninfo/tlc");
	var trf 						= model.getValue("/root/main/ennstinfo/nutreninfo/trf");
	var ins 						= model.getValue("/root/main/ennstinfo/nutreninfo/ins");
	var uun 					= model.getValue("/root/main/ennstinfo/nutreninfo/uun");

	var needcaltotal 		= model.getValue("/root/main/ennstinfo/nutreninfo/corrcalr"); //수분요구량
	var waterreqvol 		= model.getValue("/root/main/ennstinfo/nutreninfo/waterreqvol"); //수분요구량
	var dexwdrugspd 	= model.getValue("/root/main/ennstinfo/nutreninfo/dexwdrugspd"); //당투여속도
	var protsuplvol 			= model.getValue("/root/main/ennstinfo/nutreninfo/protcalc"); //아미노산 공급량
	var suplplanetc 		= model.getValue("/root/main/ennstinfo/nutreninfo/nutrreqvol"); //기타
	var nlab = "============================\n==============================";

	var replcnts1 			=    "\n병실 :"+ roomcd +"호    \t\t의뢰일 :"+ reqdd + " " ;
	var replcnts2	 		=  	"\n진료과 :"+ orddeptnm +"   \t\t상병명 :" +"    ";
	var replcnts3	 		=  	"\n의뢰의사 : " + orddrnm + " \t\t  "+diagengnm + "   " ;
	var replcnts4	 		=  	"\n\nS:";
	var replcnts5	 		=  	"\nο 영양관련 문제점  : " + splitChkBox(checkbox1) + "   "  + model.getValue("/root/main/ennstinfo/nutreninfo/nutrprobetc");	//2009-02-09 영양관련문제점 - 기타 (입력내용) 회신조회
	var replcnts6	 		=  	"\nο 활동정도 : " + splitChkBox(checkbox2) + "   "  + model.getValue("/root/main/ennstinfo/nutreninfo/actgrdeetc");	        //2010-05-07 NST-EN 활동정도-기타 내역 회신내역조회 
	var replcnts7	 		=  	"\nο 투여경로 : " + splitChkBox(checkbox9);

	var replcnts8	 		=  	"\nο 식사섭취상태 : ";

	if (( model.getValue("/root/main/ennstinfo/nutreninfo/etrlfd")=="") || (model.getValue("/root/main/ennstinfo/nutreninfo/etrlfd")=="0")) {
		var replcnts8add	 = "";
	}else {
		replcnts8add	 =  	"경구영양 " + model.getValue("/root/main/ennstinfo/nutreninfo/etrlfd") + " kcal/d";
	}
	if (( model.getValue("/root/main/ennstinfo/nutreninfo/tubfd")=="") || (model.getValue("/root/main/ennstinfo/nutreninfo/tubfd")=="0")) {
		var replcnts9	 = "";
	}else {
		var replcnts9	 =  	"\t 경관영양 " + model.getValue("/root/main/ennstinfo/nutreninfo/tubfd")  + " kcal/d";
	}
	if (( model.getValue("/root/main/ennstinfo/nutreninfo/itvnfd")=="") || (model.getValue("/root/main/ennstinfo/nutreninfo/itvnfd")=="0")) {
		var replcnts10	 = "";
	}else {
		var replcnts10 =  	"\t 정맥영양 " + model.getValue("/root/main/ennstinfo/nutreninfo/itvnfd")  + " kcal/d";
	}
	if (( model.getValue("/root/main/ennstinfo/nutreninfo/totintkcalr")=="") || (model.getValue("/root/main/ennstinfo/nutreninfo/totintkcalr")=="0")) {
		var replcnts11	 = "";
	}else {
		var replcnts11 =  	"\n총섭취열량 " + model.getValue("/root/main/ennstinfo/nutreninfo/totintkcalr")  + " kcal/d";
	}
	if (( model.getValue("/root/main/ennstinfo/nutreninfo/totintkprot")=="") || (model.getValue("/root/main/ennstinfo/nutreninfo/totintkprot")=="0")) {
		var replcnts12	 = "";
	}else {
		var replcnts12 =  	"\t 총단백질량 " + model.getValue("/root/main/ennstinfo/nutreninfo/totintkprot")  + " g/d";
	}

	var replcnts13 =  	"\n\nO : ";

	var replcnts14 =  	"\nο Ht : " + ht +"cm ,  Wt : " +  wt + "kg ,   IBW : " + ibw + "kg ,  PIBW : "+ pibw + "%" ;
	var replcnts15 =  	"\nο Wt.change :  " +  model.getValue("/root/main/ennstinfo/nutreninfo/wtchngkg" ) +"kg  "
	                     + "(  " + model.getValue("/root/main/ennstinfo/nutreninfo/wtchngperc")  + " )% / "
	                     + model.getValue("/root/main/ennstinfo/nutreninfo/wtchngmm") + " 개월 " + model.getValue("/root/main/ennstinfo/nutreninfo/physmeasetc")
	                     + "\nο 검사결과";


	if (( model.getValue("/root/main/ennstinfo/nutreninfo/alb")=="") || (model.getValue("/root/main/ennstinfo/nutreninfo/alb")=="0")) {
		replcnts15 =  replcnts15 +   "";
	}else {
		 replcnts15 =  replcnts15 +   "     Alb : " +  model.getValue("/root/main/ennstinfo/nutreninfo/alb");
	}
	if (( model.getValue("/root/main/ennstinfo/nutreninfo/tlc")=="") || (model.getValue("/root/main/ennstinfo/nutreninfo/tlc")=="0")) {
		replcnts15 =  replcnts15 +   "";
	}else {
		 replcnts15 =  replcnts15 +   "     TLC : " +  model.getValue("/root/main/ennstinfo/nutreninfo/tlc");
	}
	if (( model.getValue("/root/main/ennstinfo/nutreninfo/hb")=="") || (model.getValue("/root/main/ennstinfo/nutreninfo/hb")=="0")) {
		 replcnts15 =  replcnts15 +   "";
	}else {
		 replcnts15 =  replcnts15 +   "     Hb : " +  model.getValue("/root/main/ennstinfo/nutreninfo/hb");
	}

	if (( model.getValue("/root/main/ennstinfo/nutreninfo/hct")=="") || (model.getValue("/root/main/ennstinfo/nutreninfo/hct")=="0")) {
		 replcnts15 =   replcnts15 +  "";
	}else {
		 replcnts15 =  replcnts15 +   "     Hct : " +  model.getValue("/root/main/ennstinfo/nutreninfo/hct");
	}

	if (( model.getValue("/root/main/ennstinfo/nutreninfo/trf")=="") || (model.getValue("/root/main/ennstinfo/nutreninfo/trf")=="0")) {
		 replcnts15 = replcnts15 +    "";
	}else {
		 replcnts15 =  replcnts15 +   "\n\tTRF : " +  model.getValue("/root/main/ennstinfo/nutreninfo/trf");
	}
	if (( model.getValue("/root/main/ennstinfo/nutreninfo/rbp")=="") || (model.getValue("/root/main/ennstinfo/nutreninfo/rbp")=="0")) {
		 replcnts15 =   replcnts15 +  "";
	}else {
		 replcnts15 =  replcnts15 +   "     RBP : " +  model.getValue("/root/main/ennstinfo/nutreninfo/rbp");
	}
//					if (( model.getValue("/root/main/ennstinfo/nutreninfo/alb")=="") || (model.getValue("/root/main/ennstinfo/nutreninfo/alb")=="0")) {
//						 replcnts15 =  replcnts15 +   "";
//					}else {
//						 replcnts15 =   replcnts15 +  "Alb : " +  model.getValue("/root/main/ennstinfo/nutreninfo/alb");
//					}
	if (( model.getValue("/root/main/ennstinfo/nutreninfo/na")=="") || (model.getValue("/root/main/ennstinfo/nutreninfo/na")=="0")) {
		 replcnts15 =  replcnts15 +   "";
	}else {
		 replcnts15 =   replcnts15 +   "     Na : " +  model.getValue("/root/main/ennstinfo/nutreninfo/na");
	}
	if (( model.getValue("/root/main/ennstinfo/nutreninfo/k")=="") || (model.getValue("/root/main/ennstinfo/nutreninfo/k")=="0")) {
		 replcnts15 =  replcnts15 +   "";
	}else {
		 replcnts15 =   replcnts15 +  "     K : " +  model.getValue("/root/main/ennstinfo/nutreninfo/k");
	}
	if (( model.getValue("/root/main/ennstinfo/nutreninfo/cl")=="") || (model.getValue("/root/main/ennstinfo/nutreninfo/cl")=="0")) {
		 replcnts15 =  replcnts15 +   "";
	}else {
		 replcnts15 =  replcnts15 +   "     Cl : " +  model.getValue("/root/main/ennstinfo/nutreninfo/cl");
	}
	if (( model.getValue("/root/main/ennstinfo/nutreninfo/bun")=="") || (model.getValue("/root/main/ennstinfo/nutreninfo/bun")=="0")) {
		 replcnts15 =   replcnts15 +  "";
	}else {
		 replcnts15 =  replcnts15 +   "\n\tBUN : " +  model.getValue("/root/main/ennstinfo/nutreninfo/bun");
	}
	if (( model.getValue("/root/main/ennstinfo/nutreninfo/cr")=="") || (model.getValue("/root/main/ennstinfo/nutreninfo/cr")=="0")) {
		 replcnts15 = replcnts15 +    "";
	}else {
		 replcnts15 =  replcnts15 +   "     Cr : " +  model.getValue("/root/main/ennstinfo/nutreninfo/cr");
	}
	if (( model.getValue("/root/main/ennstinfo/nutreninfo/chol")=="") || (model.getValue("/root/main/ennstinfo/nutreninfo/chol")=="0")) {
		 replcnts15 =  replcnts15 +   "";
	}else {
		 replcnts15 = replcnts15 +    "     Chol : " +  model.getValue("/root/main/ennstinfo/nutreninfo/chol");
	}
	if (( model.getValue("/root/main/ennstinfo/nutreninfo/tg")=="") || (model.getValue("/root/main/ennstinfo/nutreninfo/tg")=="0")) {
		 replcnts15 =  replcnts15 +   "";
	}else {
		 replcnts15 =  replcnts15 +   "     TG : " +  model.getValue("/root/main/ennstinfo/nutreninfo/tg");
	}
	if (( model.getValue("/root/main/ennstinfo/nutreninfo/ca")=="") || (model.getValue("/root/main/ennstinfo/nutreninfo/ca")=="0")) {
		 replcnts15 =  replcnts15 +   "";
	}else {
		 replcnts15 =   replcnts15 +  "\n\tCa : " +  model.getValue("/root/main/ennstinfo/nutreninfo/ca");
	}
	if (( model.getValue("/root/main/ennstinfo/nutreninfo/p")=="") || (model.getValue("/root/main/ennstinfo/nutreninfo/p")=="0")) {
		 replcnts15 = replcnts15 +    "";
	}else {
		 replcnts15 = replcnts15 +    "     P : " +  model.getValue("/root/main/ennstinfo/nutreninfo/p");
	}
	if (( model.getValue("/root/main/ennstinfo/nutreninfo/mg")=="") || (model.getValue("/root/main/ennstinfo/nutreninfo/mg")=="0")) {
		 replcnts15 =  replcnts15 +   "";
	}else {
		 replcnts15 =  replcnts15 +   "     Mg : " +  model.getValue("/root/main/ennstinfo/nutreninfo/mg");
	}
	if (( model.getValue("/root/main/ennstinfo/nutreninfo/ins")=="") || (model.getValue("/root/main/ennstinfo/nutreninfo/ins")=="0")) {
		 replcnts15 =  replcnts15 +   "";
	}else {
		 replcnts15 =  replcnts15 +   "     INS : " +  model.getValue("/root/main/ennstinfo/nutreninfo/ins");
	}
	if (( model.getValue("/root/main/ennstinfo/nutreninfo/nbcalval")=="") || (model.getValue("/root/main/ennstinfo/nutreninfo/nbcalval")=="0")) {
		 replcnts15 =  replcnts15 +   "";
	}else {
		 replcnts15 = replcnts15 +  "     N-Balance : " +  model.getValue("/root/main/ennstinfo/nutreninfo/nbcalval");
	}

	var replcnts16 =  	"\n\nA : "
	   			 + "\nο 영양상태 판정 : " + splitChkBox(checkbox11);

	var replcnts17 =  	"\nο 영양요구량 "   ;
	var replcnts18 =  	"\n* 열량 : "  + needcaltotal  + " kcal/day  ( BEE : " + model.getValue("/root/init/bee")  ;
	if (combo10.label !=""){
		replcnts18= replcnts18 + ", AF : " + combo10.value ;
	}else{
		if (combo11.label !=""){
			replcnts18= replcnts18 + ", AF : " + combo11.value ;
		}else{
			replcnts18= replcnts18 ;
		}
	}
	//2009-02-09 IF 추가
	if (combo18.label !=""){
		replcnts18= replcnts18 + ",  IF : " + combo18.value + " )";
	}else{
		replcnts18 = replcnts18 + ")";
	}


	var replcnts19 =  	"\n* 단백질 : "  + protsuplvol + " g/day ( IBW * " + model.getValue("/root/main/ennstinfo/nutreninfo/prot2") + " g/kg ) " ;
	var replcnts20 =  	"\n* 수분요구량 : "  + waterreqvol + "ml/d";
	if ( model.getValue("/root/main/ennstinfo/nutreninfo/nutrreqvol")=="") {
		replcnts20 = replcnts20 + "";
	}else {
		replcnts20 = replcnts20 +"\n* 기타 : "  + model.getValue("/root/main/ennstinfo/nutreninfo/nutrreqvol") ;
	}

	var replcnts21 =  	"\n\nP : "
	                    + 	"\nο 공급계획 ";
	var replcnts22 =  	"\n* 주입속도 : 초기공급시" + model.getValue("/root/main/ennstinfo/nutreninfo/infsinitspd")  + "cc/hr   "
	                    +  "목표도달시 : " + model.getValue("/root/main/ennstinfo/nutreninfo/infsaftspd") + "cc/hr ";
	var replcnts23 =  	"\n* 주입방법 : " + combo26.label;
	    replcnts23 += 	"\n* 관의위치 : " + combo25.label;
	var replcnts24 =  	"\n* 식사처방(공급영양액) : " + combo27.label;
	
	//2009-12-30 CarePaln회신내용 추가 Start
	//var replcnts25 =  	"\n모니터링 : " + model.getValue("/root/main/ennstinfo/nutreninfo/mntr");
	var carePlanData = model.getValue("/root/main/ennstinfo/careplaninfo/problemcareplan");
	if(carePlanData != "") {
	    var replcnts25 = "\nο Problem : Plan" + "\n";
	
    	// 로우 데이터 별로 나누기
    	carePlanData = carePlanData.split("§");
    	
    	for(var i = 1; i <= carePlanData.length; ++i) {
    		var problemPlanData = carePlanData[i-1].split("▦");
    		replcnts25 = replcnts25 + "   " + problemPlanData[0] + " : " + problemPlanData[1] + "\n";
    	}
    }
	//2009-12-30 CarePaln회신내용 추가 End

	var replcnts26 =    "\nο영양사제언 : " + "\n\t" + model.getValue("/root/main/ennstinfo/nutreninfo/dieteroffr").replace(/\n/gi,"\n\t");
	if (model.getValue("/root/main/ennstinfo/nutreninfo/droffr") !="") {
		var replcnts27 =  	"\nο의사제언 : " + "\n\t" + model.getValue("/root/main/ennstinfo/nutreninfo/droffr")
	}else{
		var replcnts27 = "";
	}
	if (model.getValue("/root/main/ennstinfo/nutreninfo/pharmstoffr") !="") {
		var replcnts28 =  	"\nο약사제언 : " + "\n\t" + model.getValue("/root/main/ennstinfo/nutreninfo/pharmstoffr")
	}else{
		var replcnts28 = "";
	}
	if (model.getValue("/root/main/ennstinfo/nutreninfo/nurseoffr") !="") {
		var replcnts30 =  	"\nο간호사제언 : " + "\n\t" + model.getValue("/root/main/ennstinfo/nutreninfo/nurseoffr")
	}else{
		var replcnts30 = "";
	}

	var replcnts29 =  	"\n\n\n" + getCurrentDate().toDate().getDateFormat("YYYY/MM/DD") + "     의사 : " + input122.label + "  " + "/ 영양사 : " + combo28.label + "  "  + "/ 약사 : " + input127.label + "  "+ "/ 간호사 : " + input129.label;  
	replcnts29 +=  "\n\t\t\tNST 위원장 : "+ model.getValue("/root/init/codelist/drid/codelist/cdnm");

	var RitemEN1 = replcnts1+replcnts2+replcnts3+replcnts4+replcnts5+replcnts6+replcnts7+replcnts8+replcnts8add+replcnts9+replcnts10
	var RitemEN2 = replcnts11+replcnts12+replcnts13+replcnts14+replcnts15+replcnts16+replcnts17+replcnts18+replcnts19+replcnts20
	var RitemEN3 = replcnts21+replcnts22+replcnts23+replcnts24+replcnts25+replcnts26+replcnts27+replcnts28+replcnts30+replcnts29
	var replcnts = RitemEN1 + RitemEN2 + RitemEN3

	model.makeNode("/root/main/ennstinfo/nutreninfo/replcnts"); // 회신내역 노드생성
	model.setValue("/root/main/ennstinfo/nutreninfo/replcnts", replcnts); // 회신내역 변수설정
	model.setValue("/root/main/nstreqinfo/data", replcnts);
	model.refresh();
	if(sendflag == true)
	{
		//2008-11-17 EN에 대해서 회신내용 수정가능하도록 처리.
		//2009-01-22 PN에 대해서 회신내용 수정가능하도록 처리.  formflag : EN -> NST 변경
		var sel = fSendReplForm(replcnts,"NST");
		if(sel == "cfm"){
			model.setValue("/root/main/ennstinfo/nutreninfo/replcnts",model.getValue("/root/temp/formdata/replinfo/replcnts"));
			return true;
		}else return false;
	}
	
	//2014.04.16  회신서 출력  by 김금련
	if (sendflag =="prnt"){
	var prntRitem1 	= "\n" + fSortWord(tab,splitChkBox(checkbox1),50,"N");        //1. 영양관련 문제점 
	var prntRitem2 	= "\n" + fSortWord(tab,splitChkBox(checkbox2),50,"N");        //2. 활동정도  
	var prntRitem3 	= "\n" + fSortWord(tab,splitChkBox(checkbox9),50,"N");        //3. 투여경로  
    var prntRitem4  = "\n" + replcnts8add+replcnts9+replcnts10 ;                  //4. 식사섭취상태 
    var prntRitem5  = "\n" + replcnts11+replcnts12 ;       	                      //5. 총섭취열량, 총단백질량
    var prntRitem6 = "\n" + "Ht : " + ht +"cm ,  Wt : " +  wt + "kg ,   IBW : " + ibw + "kg ,  PIBW : "+ pibw + "% ,  Wt.change :  " 
                      + model.getValue("/root/main/ennstinfo/nutreninfo/wtchngkg" ) +"kg  "
	                  + "(  " + model.getValue("/root/main/ennstinfo/nutreninfo/wtchngperc")  + " )% / "     //6.신체계측
	                  + model.getValue("/root/main/ennstinfo/nutreninfo/wtchngmm") + " 개월 " + model.getValue("/root/main/ennstinfo/nutreninfo/physmeasetc");   
	var prntRitem15 = "\n" ;	                              
	if (( model.getValue("/root/main/ennstinfo/nutreninfo/alb")=="") || (model.getValue("/root/main/ennstinfo/nutreninfo/alb")=="0")) {
	     prntRitem15 = prntRitem15 +   "";
	}else {
		 prntRitem15 =  prntRitem15 +   "     Alb : " +  model.getValue("/root/main/ennstinfo/nutreninfo/alb");
	}
	if (( model.getValue("/root/main/ennstinfo/nutreninfo/tlc")=="") || (model.getValue("/root/main/ennstinfo/nutreninfo/tlc")=="0")) {
		prntRitem15 =  prntRitem15 +   "";
	}else {
		 prntRitem15 =  prntRitem15 +   "     TLC : " +  model.getValue("/root/main/ennstinfo/nutreninfo/tlc");
	}
	if (( model.getValue("/root/main/ennstinfo/nutreninfo/hb")=="") || (model.getValue("/root/main/ennstinfo/nutreninfo/hb")=="0")) {
		 prntRitem15 =  prntRitem15 +   "";
	}else {
		 prntRitem15 =  prntRitem15 +   "     Hb : " +  model.getValue("/root/main/ennstinfo/nutreninfo/hb");
	}

	if (( model.getValue("/root/main/ennstinfo/nutreninfo/hct")=="") || (model.getValue("/root/main/ennstinfo/nutreninfo/hct")=="0")) {
		 prntRitem15 =   prntRitem15 +  "";
	}else {
		 prntRitem15 =  prntRitem15 +   "     Hct : " +  model.getValue("/root/main/ennstinfo/nutreninfo/hct");
	}

	if (( model.getValue("/root/main/ennstinfo/nutreninfo/trf")=="") || (model.getValue("/root/main/ennstinfo/nutreninfo/trf")=="0")) {
		 prntRitem15 = prntRitem15 +    "";
	}else {
		 prntRitem15 =  prntRitem15 +   "\n\tTRF : " +  model.getValue("/root/main/ennstinfo/nutreninfo/trf");
	}
	if (( model.getValue("/root/main/ennstinfo/nutreninfo/rbp")=="") || (model.getValue("/root/main/ennstinfo/nutreninfo/rbp")=="0")) {
		 prntRitem15 =   prntRitem15 +  "";
	}else {
		 prntRitem15 =  prntRitem15 +   "     RBP : " +  model.getValue("/root/main/ennstinfo/nutreninfo/rbp");
	}
	if (( model.getValue("/root/main/ennstinfo/nutreninfo/na")=="") || (model.getValue("/root/main/ennstinfo/nutreninfo/na")=="0")) {
		 prntRitem15 =  prntRitem15 +   "";
	}else {
		 prntRitem15 =   prntRitem15 +   "     Na : " +  model.getValue("/root/main/ennstinfo/nutreninfo/na");
	}
	if (( model.getValue("/root/main/ennstinfo/nutreninfo/k")=="") || (model.getValue("/root/main/ennstinfo/nutreninfo/k")=="0")) {
		 prntRitem15 =  prntRitem15 +   "";
	}else {
		 prntRitem15 =   prntRitem15 +  "     K : " +  model.getValue("/root/main/ennstinfo/nutreninfo/k");
	}
	if (( model.getValue("/root/main/ennstinfo/nutreninfo/cl")=="") || (model.getValue("/root/main/ennstinfo/nutreninfo/cl")=="0")) {
		 prntRitem15 =  prntRitem15 +   "";
	}else {
		 prntRitem15 =  prntRitem15 +   "     Cl : " +  model.getValue("/root/main/ennstinfo/nutreninfo/cl");
	}
	if (( model.getValue("/root/main/ennstinfo/nutreninfo/bun")=="") || (model.getValue("/root/main/ennstinfo/nutreninfo/bun")=="0")) {
		 prntRitem15 =   prntRitem15 +  "";
	}else {
		 prntRitem15 =  prntRitem15 +   "\nBUN : " +  model.getValue("/root/main/ennstinfo/nutreninfo/bun");
	}
	if (( model.getValue("/root/main/ennstinfo/nutreninfo/cr")=="") || (model.getValue("/root/main/ennstinfo/nutreninfo/cr")=="0")) {
		 prntRitem15 = prntRitem15 +    "";
	}else {
		 prntRitem15 =  prntRitem15 +   "     Cr : " +  model.getValue("/root/main/ennstinfo/nutreninfo/cr");
	}
	if (( model.getValue("/root/main/ennstinfo/nutreninfo/chol")=="") || (model.getValue("/root/main/ennstinfo/nutreninfo/chol")=="0")) {
		 prntRitem15 =  prntRitem15 +   "";
	}else {
		 prntRitem15 = prntRitem15 +    "     Chol : " +  model.getValue("/root/main/ennstinfo/nutreninfo/chol");
	}
	if (( model.getValue("/root/main/ennstinfo/nutreninfo/tg")=="") || (model.getValue("/root/main/ennstinfo/nutreninfo/tg")=="0")) {
		 prntRitem15 =  prntRitem15 +   "";
	}else {
		 prntRitem15 =  prntRitem15 +   "     TG : " +  model.getValue("/root/main/ennstinfo/nutreninfo/tg");
	}
	if (( model.getValue("/root/main/ennstinfo/nutreninfo/ca")=="") || (model.getValue("/root/main/ennstinfo/nutreninfo/ca")=="0")) {
		 prntRitem15 =  prntRitem15 +   "";
	}else {
		 prntRitem15 =   prntRitem15 +  "\nCa : " +  model.getValue("/root/main/ennstinfo/nutreninfo/ca");
	}
	if (( model.getValue("/root/main/ennstinfo/nutreninfo/p")=="") || (model.getValue("/root/main/ennstinfo/nutreninfo/p")=="0")) {
		 prntRitem15 = prntRitem15 +    "";
	}else {
		 prntRitem15 = prntRitem15 +    "     P : " +  model.getValue("/root/main/ennstinfo/nutreninfo/p");
	}
	if (( model.getValue("/root/main/ennstinfo/nutreninfo/mg")=="") || (model.getValue("/root/main/ennstinfo/nutreninfo/mg")=="0")) {
		 prntRitem15 =  prntRitem15 +   "";
	}else {
		 prntRitem15 =  prntRitem15 +   "     Mg : " +  model.getValue("/root/main/ennstinfo/nutreninfo/mg");
	}
	if (( model.getValue("/root/main/ennstinfo/nutreninfo/ins")=="") || (model.getValue("/root/main/ennstinfo/nutreninfo/ins")=="0")) {
		 prntRitem15 =  prntRitem15 +   "";
	}else {
		 prntRitem15 =  prntRitem15 +   "     INS : " +  model.getValue("/root/main/ennstinfo/nutreninfo/ins");
	}
	if (( model.getValue("/root/main/ennstinfo/nutreninfo/nbcalval")=="") || (model.getValue("/root/main/ennstinfo/nutreninfo/nbcalval")=="0")) {
		 prntRitem15 =  prntRitem15 +   "";
	}else {
		 prntRitem15 = prntRitem15 +  "     N-Balance : " +  model.getValue("/root/main/ennstinfo/nutreninfo/nbcalval");
	}                                                                            //15. 검사결과	                    
    var prntRitem7  = "\n" + fSortWord(tab,splitChkBox(checkbox11),50,"N");       //7. 영양상태 판정
    var prntRitem8  = "\n" + replcnts18+replcnts19+replcnts20 ;  	              //8. 영양요구량
    var prntRitem9  = "\n" + replcnts22+replcnts23+replcnts24 ;                   //9. 영양지원공급계획
	var carePlanData = model.getValue("/root/main/ennstinfo/careplaninfo/problemcareplan");    
    if(carePlanData != "") {
	    var prntRitem10 = "\n";
	
    	// 로우 데이터 별로 나누기
    	carePlanData = carePlanData.split("§");
    	
    	for(var i = 1; i <= carePlanData.length; ++i) {
    		var problemPlanData = carePlanData[i-1].split("▦");
    		prntRitem10 = prntRitem10 + problemPlanData[0] + " : " + problemPlanData[1] + "\n";
    	}
    }                                                                             //10. problem    
    var prntRitem11 = "\n" + model.getValue("/root/main/ennstinfo/nutreninfo/dieteroffr").replace(/\n/gi,"\n");     // 11. 영양사 제언
    if (model.getValue("/root/main/ennstinfo/nutreninfo/droffr") !="") {
		var prntRitem12=  "\n" + model.getValue("/root/main/ennstinfo/nutreninfo/droffr")
	}else{
		var prntRitem12 = "";
	}                                                                                                                 // 12. 의사 제언
	if (model.getValue("/root/main/ennstinfo/nutreninfo/pharmstoffr") !="") {
		var prntRitem13 =  	"\n" + model.getValue("/root/main/ennstinfo/nutreninfo/pharmstoffr")
	}else{
		var prntRitem13 = "";
	}                                                                                                                 // 13. 약사 제언
    if (model.getValue("/root/main/ennstinfo/nutreninfo/nurseoffr") !="") {
		var prntRitem16 =  	"\n" + model.getValue("/root/main/ennstinfo/nutreninfo/nurseoffr")
	}else{
		var prntRitem16 = "";
	}                                                                                                                 // 16. 간호사 제언

    var prntRitem14 = "\n" + "의사 : " + input122.label + " " + "/ 영양사 : "  + combo28.label + "  "  + "/ 약사 : "  + input127.label + "  "  + "/ 간호사 : "  + input129.label +"  "  + "/ NST 위원장 "
    	prntRitem14 += "(Dr." + model.getValue("/root/init/codelist/drid/codelist/cdnm") + ")"                        // 14. 마지막 문구	     
	
	model.makeValue("/root/hidden/prntdata/prntRitem1",     prntRitem1);		    //1. 영양관련 문제점  	
	model.makeValue("/root/hidden/prntdata/prntRitem2",     prntRitem2);		    //2. 활동정도 
	model.makeValue("/root/hidden/prntdata/prntRitem3",     prntRitem3);		    //3. 투여경로  
	model.makeValue("/root/hidden/prntdata/prntRitem4",     prntRitem4);		    //4. 식사섭취상태 	
	model.makeValue("/root/hidden/prntdata/prntRitem5",     prntRitem5);		    //5. 총섭취열량, 총단백질량	
	model.makeValue("/root/hidden/prntdata/prntRitem6",     prntRitem6);		    //6. 신체계측	
	model.makeValue("/root/hidden/prntdata/prntRitem15",    prntRitem15);		    //15. 검사결과			
	model.makeValue("/root/hidden/prntdata/prntRitem7",     prntRitem7);		    //7. 영양상태 판정	
	model.makeValue("/root/hidden/prntdata/prntRitem8",     prntRitem8);		    //8. 열량요구량	
	model.makeValue("/root/hidden/prntdata/prntRitem9",     prntRitem9);		    //9. 영양지원공급계획	
	model.makeValue("/root/hidden/prntdata/prntRitem10",    prntRitem10);		    //10. problem	
	model.makeValue("/root/hidden/prntdata/prntRitem11",     prntRitem11);		    //11. 영양사 제언	
	model.makeValue("/root/hidden/prntdata/prntRitem12",     prntRitem12);		    //12. 의사 제언	
	model.makeValue("/root/hidden/prntdata/prntRitem13",    prntRitem13);		    //13. 약사 제언
	model.makeValue("/root/hidden/prntdata/prntRitem16",    prntRitem16);		    //16. 간호사 제언		
	model.makeValue("/root/hidden/prntdata/prntRitem14",    prntRitem14);		    //14. 마지막 문구	
				
	}
}

/*
	@ PN 회신내용 생성
*/
function fCretReplCnts(sendflag){

	var tmp_replcnts = model.getValue("/root/temp/replcntsinfo/replcnts");

	//if(gv_sex == "M")   2010-01-14 ???? 이유가 뭘까요?
	
	if( model.getValue("/root/main/nstinfo/nutrpninfo/needcalrflag") == "1") {
		var needcaltotal = model.getValue("/root/main/nstinfo/nutrpninfo/corrcalr")+ "kcal/day";
	}else if( model.getValue("/root/main/nstinfo/nutrpninfo/needcalrflag") == "2") {
		var needcaltotal = model.getValue("/root/main/nstinfo/nutrpninfo/corrcalr")+ "kcal/day";
	}else if( model.getValue("/root/main/nstinfo/nutrpninfo/needcalrflag") == "3") {
		var needcaltotal =model.getValue("/root/main/nstinfo/nutrpninfo/corrcalr") + "( + T.F. : 20 ~ 30 %)  ( + W.F. : 20%)";
	}else if( model.getValue("/root/main/nstinfo/nutrpninfo/needcalrflag") == "4") {
		var needcaltotal = model.getValue("/root/main/nstinfo/nutrpninfo/corrcalr") + "kcal/day (Ventilator care시)";
	}else var needcaltotal = "";
	
	
	var nstcodetext = "";
	var kcalml = "";
	for(i = 1; i <= cmb_nstcode.length; i++){
		if(cmb_nstcode.value == model.getValue("/root/init/codelist/nstcode/codelist["+i+"]/cdnm")){
		  nstcodetext 	= model.getValue("/root/init/codelist/nstcode/codelist["+i+"]/cdnm");			//2014년 8월19일 김치국
//			nstcodetext 	= model.getValue("/root/init/codelist/nstcode/codelist["+i+"]/nstcodetext");
			kcalml 			= model.getValue("/root/init/codelist/nstcode/codelist["+i+"]/kcalml");
			break;
		}
	}
	
	/* 신체계측 정보*/
	var ht 				= model.getValue("/root/main/nstinfo/nutrpninfo/ht");
	var wt 				= model.getValue("/root/main/nstinfo/nutrpninfo/wt");
	var ibw 			= model.getValue("/root/main/nstinfo/nutrpninfo/ibw");
	//var ibwper 		    = model.getValue("/root/temp/ibwper");
	var ibwper 		    = model.getValue("/root/temp/ibwper").toString().getRound(-2,"HALF_UP");                     //소수점 둘째자리2010-01-13 까지 나오게 처리   
	var pibw 		    = model.getValue("/root/main/nstinfo/nutrpninfo/pibw").toString().getRound(-2,"HALF_UP");    //소수점 둘째자리2010-01-13 까지 나오게 처리
	var physMeas 	= ""
	
	if(ht != ""){
		if(physMeas != "") physMeas += ", ";
		physMeas += caption244.value + "  " + model.getValue("/root/main/nstinfo/nutrpninfo/ht") + " " + caption153.value;
	}
	if(wt != ""){
		if(physMeas != "") physMeas += ", ";
		physMeas += caption248.value + "  " + wt + " " + caption160.value;
	}
	if(ibw != "" || ibwper != ""){        
		if(physMeas != "") physMeas += ", ";
		physMeas += caption165.value + "  " +ibw + " " + caption101.value + ibwper + caption103.value;
	}
	
	//2010-01-13 Wt Change 항목추가
	var wtchngkg    = model.getValue("/root/main/nstinfo/nutrpninfo/wtchngkg"); 
	var wtchngprec  = model.getValue("/root/main/nstinfo/nutrpninfo/wtchngprec");
	var wtchngmm    = model.getValue("/root/main/nstinfo/nutrpninfo/wtchngmm");
	var physmeasetc = model.getValue("/root/main/nstinfo/nutrpninfo/physmeasetc");	
	if(wtchngkg != "" || wtchngprec != "" || wtchngmm != "" || physmeasetc != "" ){  
		if(physMeas != "") physMeas += ", ";
		physMeas += "\n        Wt Change  " + wtchngkg + caption116.value + wtchngprec + caption123.value + wtchngmm + caption441.value + "   " + physmeasetc;   //2010-01-13 PIBW 계산 - iBW %와 동일처리한다 (Ibw %대신 PIBE 적용)
	}
	
	/* 검사결과 정보 */
	var alb 				= model.getValue("/root/main/nstinfo/nutrpninfo/alb");
	var tlc 				= model.getValue("/root/main/nstinfo/nutrpninfo/tlc");
	var trf 				= model.getValue("/root/main/nstinfo/nutrpninfo/trf");
	var rbp 			= model.getValue("/root/main/nstinfo/nutrpninfo/rbp");
	var chol 			= model.getValue("/root/main/nstinfo/nutrpninfo/chol");
	var tg 				= model.getValue("/root/main/nstinfo/nutrpninfo/tg");
	var nbintake 		= model.getValue("/root/main/nstinfo/nutrpninfo/nbintake");
	var uun 			= model.getValue("/root/main/nstinfo/nutrpninfo/uun");
	var nbcalval 		= model.getValue("/root/main/nstinfo/nutrpninfo/nbcalval");
	var nbalance	= "";
	var testrslt		= "";
	
	if(alb != ""){
		if(testrslt != "") testrslt += ", ";
		testrslt += caption137.value + "  " + alb;
	}
	
	if(tlc != ""){
		if(testrslt != "") testrslt += ", ";
		testrslt += caption145.value + "  " + tlc;
	}
	if(trf != "" || rbp != ""){
		if(testrslt != "") testrslt += ", ";
		testrslt += caption164.value + "/"+caption168.value+ "  " + trf+"/"+rbp;
	}
	if(chol != "" || tg != "" ){
		if(testrslt != "") testrslt += ", ";
		testrslt += caption105.value + "  " + chol + "/" + tg;
	}
	if(nbintake != "" || uun != ""  || (nbcalval != "" && nbcalval != "-")){
		if(testrslt != "") testrslt += ", ";
		testrslt += caption104.value+"  "+nbintake +" "+ caption316.value+uun+" "+caption319.value+" "+nbcalval;
	}
	
	

	var title = "\n정맥경장영양지원" + "\n\n";
	var title1 = "\n병실 : " + model.getValue("/root/main/patinfo/baseinfo/roomcd") + "                                         등록번호 : " + model.getValue("/root/main/patinfo/baseinfo/pid");
	var title2 = "\n진료과 : " + model.getValue("/root/main/patinfo/baseinfo/orddeptnm"); + "                                          성명 : " + model.getValue("/root/main/patinfo/baseinfo/hngnm");
	var title3 = "\n의뢰의사 : " + model.getValue("/root/main/patinfo/baseinfo/orddrnm"); + "                                          S/Age : " + model.getValue("/root/main/patinfo/baseinfo/sna");

	// 회신내역
	var repltitle = "\n\n[회신내용]";
	
	//2010-01-07 추구관리 회신서(의사 화면의 협진 에서 확인되는 내용) 에서 추구관리임을 알리기 위한 문구
	var repltitle1= "";
	if ( model.getValue("/root/main/nstinfo/nutrpninfo/pursflag") == "PURS") {
	 //   repltitle1 = "\n\n TPN 지속사용에 따른 추구관리 회신입니다.";
    }
	/*
	var Ritem1 = "\n 1. 의뢰 TPN 제형 : ";
	var Ritem2 = "\n 2. 현재영양상태 : " + chk_nutjudg.label;
	var Ritem3 = "\n 3. 필요열량 : " + needcaltotal;
	var Ritem4 = "\n 4. 수분요구량 : " + ipt_pnwaterreqvol.label + "ml/day <1500 + 20 x (현재체중 - 20)";
	var Ritem5 = "\n 5. 당투여속도 : " + ipt_pndexwdrugspd.label + "mg/kg/min";
	var Ritem6 = "\n 6. 아미노산 공급량 : " + ipt_pnprotsuplvol.label + "g/kg/day";
	var Ritem7 = "\n 7. 투여계획 : \n" + txt_drugplan.label;
	var Ritem8 = "\n 8. Nutrition Lab : \n" + model.getValue("/root/temp/nutritontext");
	var Ritem9 = "\n 9. 기타 : \n"  + txt_suplplanetc.label;
	*/
	var Ritem1 	= "\n\n< Nutritional assessment >";
	var Ritem2 	= "\n1. 현재영양상태 : " + fSortWord(tab,splitChkBox(chk_nutjudg),50,"N");
	var Ritem3 	= "\n2. 신체계측 : " + fSortWord(tab,physMeas,60,"Y") + "\n" + fSortWord(tab,"검사결과 : "+testrslt, 65);
	//var Ritem4 	= "\n3. 필요열량 : "+ fSortWord( (tab,model.getValue("/root/main/nstinfo/nutrpninfo/corrcalr")).toString().getRound(-3,"HALF_UP") + " kcal/day",65);		// 보정열량값 
	var Ritem4 	= "\n3. 필요열량 : "+ fSortWord(tab,input104.label + " kcal/day",65);		// 보정열량값 
	var Ritem5 	= "\n"+fSortWord(tab," BEE : " + chkBee(),70);		// 보정열량값 
	var Ritem6 	= "\n"+fSortWord(tab,"TCN : " + chkTcn(),80);		// 보정열량값 
	var Ritem7   	= "\n4. 수분요구량 : "+ipt_pnwaterreqvol.label+" ml/day" ;
	
	
	var Ritem8 	= "\n\n< Nutritional plan >";
	var Ritem9 	= "\n1. 추천 제형 : "+fSortWord(tab,"" + nstcodetext,60,"N") ;
	var Ritem10 	= "\n2. 추천공급량 : "+fSortWord(tab,"" + (ipt_prot1.value/24).toString().getRound(-1,"HALF_UP") + "cc/hr" + " ("+(ipt_recmdrugvol.label)+"kcal/"+ipt_prot1.value+"ml/day)",50,"N") ;
	var Ritem11 	= "\n"+fSortWord(tab,"당투여속도 : "	+ ipt_pndexwdrugspd.label+"mg/kg/min\t단백 공급량 : " + ipt_pnprotsuplvol.label + "g/kg/day",50);
	var Ritem12 	= "\n3. Rec) : \n" + fSortWord(tab, txt_drugplan.label,50); //txt_drugplan.label;
	var Ritem13 	= "\n4. 기타 : \n"  + fSortWord(tab, txt_suplplanetc.label,50);
	//////2014.9.2 김치국
	var Ritem14 	= "\n5. 제언 :" ;
  var Ritem15 	= "\n   *의사: ";		
  var Ritem16 	= "\n  "  + fSortWord(tab,textarea10.label,80);	
  var Ritem17 	= "\n   *영양사: ";		
  var Ritem18 	= "\n  "  + fSortWord(tab,textarea8.label,80);	
  var Ritem19 	= "\n   *약사: ";		
  var Ritem20 	= "\n  "  + fSortWord(tab,textarea9.label,80);	
  var Ritem21 	= "\n   *간호사: ";		
  var Ritem22 	= "\n  "  + fSortWord(tab,textarea14.label,80);	
	///////	
	var NutritionLab = "\n\n6. Nutrition lab : 다음의 lab을 확인하여 주십시오.\n" + fSortWord(tab,tar_nutritionlab.value,60);
	
	var replnm = "";
	if(model.getValue("/root/main/nstinfo/nutrpninfo/replnm") != ""){
		replnm = model.getValue("/root/main/nstinfo/nutrpninfo/replnm");
	}else replnm = getUserName();
	
//	var Replinfo = "\n\n\n 담당약사 : " + model.getValue("/root/main/nstinfo/nutrpninfo/pharmstnm")+" / "+replnm+ "\t\t " + getCurrentDate().toDate().getDateFormat("YYYY/MM/DD") + "\t" + " / 영양집중지원팀 팀장 (Dr. "  ;   //2014.9.30 김치국
//    var prntRitem14 = "\n" + "의사 : " + input122.label + " " + "/ 영양사 : "  + combo28.label + "  "  + "/ 약사 : "  + input127.label + "  "  + "/ 간호사 : "  + input129.label +"  "  + "/ NST 위원장 "

//	var Replinfo = "\n\n\n 담당약사 : " + model.getValue("/root/main/nstinfo/nutrpninfo/pharmstnm")+" / \t" + getCurrentDate().toDate().getDateFormat("YYYY/MM/DD") + "\t" + " / 영양집중지원팀 팀장 (Dr. "  ;	
    var Replinfo = "\n" + "의사 : " + input153.label + " " + "/ 영양사 : "  + input165.label + "  "  + "/ 약사 : "  + model.getValue("/root/main/nstinfo/nutrpninfo/pharmstnm") + "  "  + "/ 간호사 : "  + input164.label +"  "  + "/ NST 위원장 "
//  Replinfo += model.getValue("/root/init/codelist/drid/codelist/cdnm") + ")"; 
	Replinfo += model.getValue("/root/init/codelist/drid/codelist/cdnm") + "  " + "| 회신일자 : " + getCurrentDate().toDate().getDateFormat("YYYY/MM/DD"); // 20141118 jmkim 날짜 추가
	var Ritem = repltitle + repltitle1 + Ritem1 + Ritem2 + Ritem3 + Ritem4 + Ritem5 + Ritem6 + Ritem7 + Ritem8 + Ritem9 + Ritem10+Ritem11+Ritem12+Ritem13+Ritem14+Ritem15+Ritem16+Ritem17+Ritem18+Ritem19+Ritem20+Ritem21+Ritem22+NutritionLab;
	var replcnts = title + title1 + title2 + title3 + Ritem+Replinfo;
	
	gv_Ritem = title + title1 + title2 + title3 + Ritem;

	if(!btn_rpl.selected){
		model.makeNode("/root/main/nstinfo/nutrpninfo/replcnts"); // 회신내역 노드생성
		model.setValue("/root/main/nstinfo/nutrpninfo/replcnts", replcnts); // 회신내역 변수설정
		model.setValue("/root/main/nstreqinfo/data", replcnts);
	}else{
		if(tmp_replcnts != "" && tmp_replcnts != replcnts && sendflag == true){
			var msg = messageBox("수정사항이 존재합니다. 수정된 사항을","Q009");
			if(msg == 6){
				model.makeNode("/root/main/nstinfo/nutrpninfo/replcnts"); // 회신내역 노드생성
				model.setValue("/root/main/nstinfo/nutrpninfo/replcnts", tmp_replcnts); // 회신내역 변수설정
				model.setValue("/root/main/nstreqinfo/data", tmp_replcnts );
				replcnts = tmp_replcnts;
			}else{
				model.makeNode("/root/main/nstinfo/nutrpninfo/replcnts"); // 회신내역 노드생성
				model.setValue("/root/main/nstinfo/nutrpninfo/replcnts", replcnts); // 회신내역 변수설정
				model.setValue("/root/main/nstreqinfo/data", replcnts);	
				tmp_replcnts = "";
			}
		}else{
			model.makeNode("/root/main/nstinfo/nutrpninfo/replcnts"); // 회신내역 노드생성
			model.setValue("/root/main/nstinfo/nutrpninfo/replcnts", replcnts); // 회신내역 변수설정
			model.setValue("/root/main/nstreqinfo/data", replcnts);	
		} 	
	}
	
	/*
	model.makeNode("/root/main/nstinfo/nutrpninfo/replcnts"); // 회신내역 노드생성
	model.setValue("/root/main/nstinfo/nutrpninfo/replcnts", replcnts); // 회신내역 변수설정
	model.setValue("/root/main/nstreqinfo/data", replcnts);
	*/
	model.refresh();
	if(sendflag == true)
	{
		var sel = fSendReplForm(replcnts);
		if(sel == "cfm"){
			model.setValue("/root/main/nstinfo/nutrpninfo/replcnts",model.getValue("/root/temp/formdata/replinfo/replcnts"));
			return true;
		}else return false;
	}
	
	//2009-01-30  회신서 출력
	if (sendflag =="prnt"){
	    /*
		var replcnts1 = title1 + title2; 									//<Nutritional assessment>
		var replcnts2 =  Ritem1 + Ritem2 + Ritem3 + Ritem4 + Ritem5 + Ritem6; 	//Nutritional plan
		var replcnts3 =  Ritem8;											//[ Nutrition lab ]
		var replcnts4 =  Ritem9;
		model.makeValue("/root/hidden/prntdata/replcnts1", replcnts1);		//<Nutritional assessment>
		model.makeValue("/root/hidden/prntdata/replcnts2", replcnts2);		//Nutritional plan
		model.makeValue("/root/hidden/prntdata/replcnts3", replcnts3);		//[ Nutrition lab ]
		model.makeValue("/root/hidden/prntdata/replcnts4", replcnts4);
		return true
        */
                
    	//var prntRitem1 	= "\n\n< Nutritional assessment >";
    	var prntRitem1  = repltitle1;                                                   //2010-01-07 추구관리 회신서(의사 화면의 협진 에서 확인되는 내용) 에서 추구관리임을 알리기 위한 문구
    	var prntRitem2 	= "\n" + fSortWord(tab,splitChkBox(chk_nutjudg),50,"N");        //1. 현재영양상태 : 
    	var prntRitem3 	= "\n" + fSortWord(tab,physMeas,60,"N");                        //2. 신체계측 : 
    	var prntRitem4 	= "\n" + fSortWord(tab,testrslt, 65);                           //   검사결과 : 
    	var prntRitem5 	= "\n" + fSortWord(tab,input104.label + " kcal/day",65);         //3. 필요열량 : // 보정열량값 
    	var prntRitem6 	= "\n" + fSortWord(tab," BEE : " + chkBee(),70);		        // 보정열량값 - BEE
    	var prntRitem7 	= "\n" + fSortWord(tab,"TCN : " + chkTcn(),80);		            // 보정열량값 - TCN
    	var prntRitem8  = "\n" + ipt_pnwaterreqvol.label+" ml/day" ;                    //4. 수분요구량 : 
    	
    	
    	var prntRitem9 	= "\n\n< Nutritional plan >";
    	var prntRitem10 = "\n" + fSortWord(tab,"" + nstcodetext,80,"N") ;               //1. 추천 제형 : 
    	var prntRitem11 = "\n" + fSortWord(tab,"" + (ipt_prot1.value/24).toString().getRound(-1,"HALF_UP") + "cc/hr" + " ("+(ipt_recmdrugvol.label)+"kcal/"+ipt_prot1.value+"ml/day)",50,"N") ;  //2. 추천공급량 : 
    	var prntRitem12 = "\n" + fSortWord(tab,"당투여속도 : "	+ ipt_pndexwdrugspd.label+"mg/kg/min\t단백 공급량 : " + ipt_pnprotsuplvol.label + "g/kg/day",50);
    	var prntRitem13 = "\n" + fSortWord(tab, txt_drugplan.label,50);     //txt_drugplan.label;  //3. Rec) : \n - Plan
    	var prntRitem14 = "\n" + fSortWord(tab, txt_suplplanetc.label,50);			   //4. 기타 : \n
			//////2014.9.16 김치국
		  var prntRitem15 	= "\n   *의사: ";		
		  var prntRitem16 	= "\n  "  + fSortWord(tab,textarea10.label,80);	
		  var prntRitem17 	= "\n   *영양사: ";		
		  var prntRitem18 	= "\n  "  + fSortWord(tab,textarea8.label,80);	
		  var prntRitem19 	= "\n   *약사: ";		
		  var prntRitem20 	= "\n  "  + fSortWord(tab,textarea9.label,80);	
		  var prntRitem21 	= "\n   *간호사: ";		
		  var prntRitem22 	= "\n  "  + fSortWord(tab,textarea14.label,80);	


    	
    	
    	var prntNutritionLab = "\n\n" + fSortWord(tab,tar_nutritionlab.value,60);      //5. Nutrition lab : 다음의 lab을 확인하여 주십시오.\n
    	
    	var replnm = "";        //회신
    	if(model.getValue("/root/main/nstinfo/nutrpninfo/replnm") != ""){
    		replnm = model.getValue("/root/main/nstinfo/nutrpninfo/replnm");
    	}
    	
//    	var Replinfo = "\n\n\n 담당약사 : " + model.getValue("/root/main/nstinfo/nutrpninfo/pharmstnm")+" / "+replnm+ "\t" + " / 영양집중지원팀 팀장 (Dr. "  ;
    	//var Replinfo = "\n\n\n 담당약사 : " + model.getValue("/root/main/nstinfo/nutrpninfo/pharmstnm") + " / 영양집중지원팀 팀장 (Dr. "  ;    	///2014.9.17 김치국
    var Replinfo = "\n" + "의사 : " + input153.label + " " + "/ 영양사 : "  + input165.label + "  "  + "/ 약사 : "  + model.getValue("/root/main/nstinfo/nutrpninfo/pharmstnm") + "  "  + "/ 간호사 : "  + input164.label +"  "  + "/ NST 위원장 "    		///2014.10.3 김치국
        Replinfo += model.getValue("/root/init/codelist/drid/codelist/cdnm") ;
    var ReplDate = model.getValue("/root/main/nstinfo/nutrpninfo/execdd"); 
    var ReplDocDate = model.getValue("/root/main/nstinfo/nutrpninfo/execdd"); 

		model.makeValue("/root/hidden/prntdata/prntRitem1",     prntRitem1);		    //<Nutritional assessment>
		model.makeValue("/root/hidden/prntdata/prntRitem2",     prntRitem2);		    //1. 현재영양상태 : 
		model.makeValue("/root/hidden/prntdata/prntRitem3",     prntRitem3);		    //2. 신체계측 :
		model.makeValue("/root/hidden/prntdata/prntRitem4",     prntRitem4);            //   검사결과
		model.makeValue("/root/hidden/prntdata/prntRitem5",     prntRitem5);            //3. 필요열량 :
		model.makeValue("/root/hidden/prntdata/prntRitem6",     prntRitem6);            //   보정열량값 - BEE
		model.makeValue("/root/hidden/prntdata/prntRitem7",     prntRitem7);            //   보정열량값 - TCN 
		model.makeValue("/root/hidden/prntdata/prntRitem8",     prntRitem8);            // 4. 수분요구량 : 
		
		model.makeValue("/root/hidden/prntdata/prntRitem9",     prntRitem9);            //
		model.makeValue("/root/hidden/prntdata/prntRitem10",    prntRitem10);           //1. 추천 제형 : 
		model.makeValue("/root/hidden/prntdata/prntRitem11",    prntRitem11);           //2. 추천공급량 : 
		model.makeValue("/root/hidden/prntdata/prntRitem12",    prntRitem12);           //   당투여속도
		model.makeValue("/root/hidden/prntdata/prntRitem13",    prntRitem13);           //3. Rec) : \n - Plan
		model.makeValue("/root/hidden/prntdata/prntRitem14",    prntRitem14);           //4. 기타 : \n
		model.makeValue("/root/hidden/prntdata/prntRitem15",    prntRitem15);           // 제언 2014.9.16 김치국
		model.makeValue("/root/hidden/prntdata/prntRitem16",    prntRitem16);           // 제언의사
		model.makeValue("/root/hidden/prntdata/prntRitem17",    prntRitem17);           // 제언 2014.9.16 김치국
		model.makeValue("/root/hidden/prntdata/prntRitem18",    prntRitem18);           // 제언영양사
		model.makeValue("/root/hidden/prntdata/prntRitem19",    prntRitem19);           // 제언 2014.9.16 김치국
		model.makeValue("/root/hidden/prntdata/prntRitem20",    prntRitem20);           // 제언약사
		model.makeValue("/root/hidden/prntdata/prntRitem21",    prntRitem21);           // 제언 2014.9.16 김치국
		model.makeValue("/root/hidden/prntdata/prntRitem22",    prntRitem22);           // 제언간호사
		model.makeValue("/root/hidden/prntdata/prntNutritionLab", prntNutritionLab);    //5. Nutrition lab 
		model.makeValue("/root/hidden/prntdata/ReplDate",       ReplDate);              //회신일
		model.makeValue("/root/hidden/prntdata/Replinfo",       Replinfo);              //담당약사/회신약사...
		

	}	


	//2016-07-27  회신서 통합기록   김치국
	if (sendflag =="doc"){
    	var replpid     = model.getValue("/root/main/patinfo/baseinfo/pid");
    	var replpname   = model.getValue("/root/main/patinfo/baseinfo/hngnm");
    	var replsexage  = model.getValue("/root/main/patinfo/baseinfo/sna");
    	var prntRitem1  = repltitle1;                                                   //2010-01-07 추구관리 회신서(의사 화면의 협진 에서 확인되는 내용) 에서 추구관리임을 알리기 위한 문구
    	var prntRitem2 	= "\n" + fSortWord(tab,splitChkBox(chk_nutjudg),50,"N");        //1. 현재영양상태 : 
    	var prntRitem3 	= "\n" + fSortWord(tab,physMeas,60,"N");                        //2. 신체계측 : 
    	var prntRitem4 	= "\n" + fSortWord(tab,testrslt, 65);                           //   검사결과 : 
    	var prntRitem5 	= "\n" + fSortWord(tab,input104.label + " kcal/day",65);         //3. 필요열량 : // 보정열량값 
    	var prntRitem6 	= "\n" + fSortWord(tab," BEE : " + chkBee(),70);		        // 보정열량값 - BEE
    	var prntRitem7 	= "\n" + fSortWord(tab,"TCN : " + chkTcn(),80);		            // 보정열량값 - TCN
    	var prntRitem8  = "\n" + ipt_pnwaterreqvol.label+" ml/day" ;                    //4. 수분요구량 : 
    	
    	
    	var prntRitem9 	= "\n\n< Nutritional plan >";
    	var prntRitem10 = "\n" + fSortWord(tab,"" + nstcodetext,80,"N") ;               //1. 추천 제형 : 
    	var prntRitem11 = "\n" + fSortWord(tab,"" + (ipt_prot1.value/24).toString().getRound(-1,"HALF_UP") + "cc/hr" + " ("+(ipt_recmdrugvol.label)+"kcal/"+ipt_prot1.value+"ml/day)",50,"N") ;  //2. 추천공급량 : 
    	var prntRitem12 = "\n" + fSortWord(tab,"당투여속도 : "	+ ipt_pndexwdrugspd.label+"mg/kg/min\t단백 공급량 : " + ipt_pnprotsuplvol.label + "g/kg/day",50);
    	var prntRitem13 = "\n" + fSortWord(tab, txt_drugplan.label,50);     //txt_drugplan.label;  //3. Rec) : \n - Plan
    	var prntRitem14 = "\n" + fSortWord(tab, txt_suplplanetc.label,50);			   //4. 기타 : \n
			//////2014.9.16 김치국
		  var prntRitem15 	= "\n   *의사: ";		
		  var prntRitem16 	= "\n  "  + fSortWord(tab,textarea10.label,80);	
		  var prntRitem17 	= "\n   *영양사: ";		
		  var prntRitem18 	= "\n  "  + fSortWord(tab,textarea8.label,80);	
		  var prntRitem19 	= "\n   *약사: ";		
		  var prntRitem20 	= "\n  "  + fSortWord(tab,textarea9.label,80);	
		  var prntRitem21 	= "\n   *간호사: ";		
		  var prntRitem22 	= "\n  "  + fSortWord(tab,textarea14.label,80);	


    	
    	
    	var prntNutritionLab = "\n\n" + fSortWord(tab,tar_nutritionlab.value,60);      //5. Nutrition lab : 다음의 lab을 확인하여 주십시오.\n
    	
    	var replnm = "";        //회신
    	if(model.getValue("/root/main/nstinfo/nutrpninfo/replnm") != ""){
    		replnm = model.getValue("/root/main/nstinfo/nutrpninfo/replnm");
    	}
    	
    var Replinfo = "\n" + "의사 : " + input153.label + " " + "/ 영양사 : "  + input165.label + "  "  + "/ 약사 : "  + model.getValue("/root/main/nstinfo/nutrpninfo/pharmstnm") + "  "  + "/ 간호사 : "  + input164.label +"  "  + "/ NST 위원장 "    		///2014.10.3 김치국
    	    Replinfo += model.getValue("/root/init/codelist/drid/codelist/cdnm") ;
    var ReplDate    = model.getValue("/root/main/nstinfo/nutrpninfo/execdd"); 
    var ReplDocDate = model.getValue("/root/main/nstinfo/nutrpninfo/execdd");     
    var Repldr      =  input153.label
    var Repldiet    =  input165.label
    var Replphmacy  =  model.getValue("/root/main/nstinfo/nutrpninfo/pharmstnm");
    var Replnr      =  input164.label
    var Replnstdr   =  model.getValue("/root/init/codelist/drid/codelist/cdnm");    

		model.makeValue("/root/hidden/prntdata/replpid",        replpid);  		  		
		model.makeValue("/root/hidden/prntdata/replpname",      replpname);  		  		
		model.makeValue("/root/hidden/prntdata/replsexage",     replsexage);  		  						
		model.makeValue("/root/hidden/prntdata/prntRitem1",     prntRitem1);		    //<Nutritional assessment>
		model.makeValue("/root/hidden/prntdata/prntRitem2",     prntRitem2);		    //1. 현재영양상태 : 
		model.makeValue("/root/hidden/prntdata/prntRitem3",     prntRitem3);		    //2. 신체계측 :
		model.makeValue("/root/hidden/prntdata/prntRitem4",     prntRitem4);            //   검사결과
		model.makeValue("/root/hidden/prntdata/prntRitem5",     prntRitem5);            //3. 필요열량 :
		model.makeValue("/root/hidden/prntdata/prntRitem6",     prntRitem6);            //   보정열량값 - BEE
		model.makeValue("/root/hidden/prntdata/prntRitem7",     prntRitem7);            //   보정열량값 - TCN 
		model.makeValue("/root/hidden/prntdata/prntRitem8",     prntRitem8);            // 4. 수분요구량 : 
		
		model.makeValue("/root/hidden/prntdata/prntRitem9",     prntRitem9);            //
		model.makeValue("/root/hidden/prntdata/prntRitem10",    prntRitem10);           //1. 추천 제형 : 
		model.makeValue("/root/hidden/prntdata/prntRitem11",    prntRitem11);           //2. 추천공급량 : 
		model.makeValue("/root/hidden/prntdata/prntRitem12",    prntRitem12);           //   당투여속도
		model.makeValue("/root/hidden/prntdata/prntRitem13",    prntRitem13);           //3. Rec) : \n - Plan
		model.makeValue("/root/hidden/prntdata/prntRitem14",    prntRitem14);           //4. 기타 : \n
		model.makeValue("/root/hidden/prntdata/prntRitem15",    prntRitem15);           // 제언 2014.9.16 김치국
		model.makeValue("/root/hidden/prntdata/prntRitem16",    prntRitem16);           // 제언의사
		model.makeValue("/root/hidden/prntdata/prntRitem17",    prntRitem17);           // 제언 2014.9.16 김치국
		model.makeValue("/root/hidden/prntdata/prntRitem18",    prntRitem18);           // 제언영양사
		model.makeValue("/root/hidden/prntdata/prntRitem19",    prntRitem19);           // 제언 2014.9.16 김치국
		model.makeValue("/root/hidden/prntdata/prntRitem20",    prntRitem20);           // 제언약사
		model.makeValue("/root/hidden/prntdata/prntRitem21",    prntRitem21);           // 제언 2014.9.16 김치국
		model.makeValue("/root/hidden/prntdata/prntRitem22",    prntRitem22);           // 제언간호사
		model.makeValue("/root/hidden/prntdata/prntNutritionLab", prntNutritionLab);    //5. Nutrition lab 
		model.makeValue("/root/hidden/prntdata/ReplDate",       ReplDate);              //회신일
		model.makeValue("/root/hidden/prntdata/Replinfo",       Replinfo);              //담당약사/회신약사...
		model.makeValue("/root/hidden/prntdata/Repldr",         Repldr);              
		model.makeValue("/root/hidden/prntdata/Repldiet",       Repldiet);              
		model.makeValue("/root/hidden/prntdata/Replphmacy",     Replphmacy);              
		model.makeValue("/root/hidden/prntdata/Replnr",         Replnr);  
		model.makeValue("/root/hidden/prntdata/Replnstdr",      Replnstdr);  		  
		model.makeValue("/root/hidden/prntdata/Replnstdocdate", ReplDate);  		  		
    model.makeNode("/root/main/signSaveData");
    model.copyNode("/root/main/signSaveData", "/root/hidden/prntdata");
	}	

	
}

/*
	추구관리 출력 생성  by 김금련 2014.04.29
*/
function fCretReplCntsMngt(sendflag)
{
	var ht 					= model.getValue("/root/main/pursnstinfo/nutrpursinfo/ht"); // 키
	var ubw  				= model.getValue("/root/main/pursnstinfo/nutrpursinfo/ubw"); //UBW
	var wt  				= model.getValue("/root/main/pursnstinfo/nutrpursinfo/wt"); //체중
	var ibw  				= model.getValue("/root/main/pursnstinfo/nutrpursinfo/ibw"); //IBW
	var pibw  				= model.getValue("/root/main/pursnstinfo/nutrpursinfo/pibw");  //pibw
	var needcaltotal 		= model.getValue("/root/main/pursnstinfo/nutrpursinfo/corrcalr"); //필요열량
	var waterreqvol 		= model.getValue("/root/main/pursnstinfo/nutrpursinfo/waterreqvol"); //수분요구량
	var dexwdrugspd 	    = model.getValue("/root/main/pursnstinfo/nutrpursinfo/dexwdrugspd"); //당투여속도
	var protsuplvol 		= model.getValue("/root/main/pursnstinfo/nutrpursinfo/protcalc"); //아미노산 공급량
	var suplplanetc 		= model.getValue("/root/main/pursnstinfo/nutrpursinfo/nutrreqvol"); //기타
	
	if (sendflag =="prnt"){
	var prntRitem1 	= "\n" + fSortWord(tab,splitChkBox(checkbox8),50,"N");        //1. 영양관련 문제점 
	var prntRitem2 	= "\n" + fSortWord(tab,splitChkBox(checkbox22),50,"N");        //2. 활동정도  
	var prntRitem3 	= "\n" + fSortWord(tab,splitChkBox(checkbox23),50,"N");        //3. 투여경로  
	
			if (( model.getValue("/root/main/pursnstinfo/nutrpursinfo/etrlfd")=="") || (model.getValue("/root/main/pursnstinfo/nutrpursinfo/etrlfd")=="0")) {
				var replcnts1 = "";
			}else {
				replcnts1	 =  	"경구영양 " + model.getValue("/root/main/pursnstinfo/nutrpursinfo/etrlfd") + " kcal/d";
			}
			if (( model.getValue("/root/main/pursnstinfo/nutrpursinfo/tubfd")=="") || (model.getValue("/root/main/pursnstinfo/nutrpursinfo/tubfd")=="0")) {
				var replcnts2	 = "";
			}else {
				var replcnts2	 =  	"\t 경관영양 " + model.getValue("/root/main/pursnstinfo/nutrpursinfo/tubfd")  + " kcal/d";
			}
			if (( model.getValue("/root/main/pursnstinfo/nutrpursinfo/itvnfd")=="") || (model.getValue("/root/main/pursnstinfo/nutrpursinfo/itvnfd")=="0")) {
				var replcnts3	 = "";
			}else {
				var replcnts3 =  	"\t 정맥영양 " + model.getValue("/root/main/pursnstinfo/nutrpursinfo/itvnfd")  + " kcal/d";
			}
			if (( model.getValue("/root/main/pursnstinfo/nutrpursinfo/totintkcalr")=="") || (model.getValue("/root/main/pursnstinfo/nutrpursinfo/totintkcalr")=="0")) {
				var replcnts4	 = "";
			}else {
				var replcnts4 =  	"\n총섭취열량 " + model.getValue("/root/main/pursnstinfo/nutrpursinfo/totintkcalr")  + " kcal/d";
			}
			if (( model.getValue("/root/main/pursnstinfo/nutrpursinfo/totintkprot")=="") || (model.getValue("/root/main/pursnstinfo/nutrpursinfo/totintkprot")=="0")) {
				var replcnts5	 = "";
			}else {
				var replcnts5 =  	"\t 총단백질량 " + model.getValue("/root/main/pursnstinfo/nutrpursinfo/totintkprot")  + " g/d";
			}

    var prntRitem4  = "\n" + replcnts1+replcnts2+replcnts3 ;                  //4. 식사섭취상태 
    var prntRitem5  = "\n" + replcnts4+replcnts5 ;       	                      //5. 총섭취열량, 총단백질량    
    var prntRitem6 = "\n" + "Ht : " + ht +"cm ,  Wt : " +  wt + "kg ,   IBW : " + ibw + "kg ,  PIBW : "+ pibw + "% ,  Wt.change :  " 
                      + model.getValue("/root/main/pursnstinfo/nutrpursinfo/wtchngkg" ) +"kg  "
	                  + "(  " + model.getValue("/root/main/pursnstinfo/nutrpursinfo/wtchngperc")  + " )% / "     
	                  + model.getValue("/root/main/pursnstinfo/nutrpursinfo/wtchngmm") + " 개월 " + model.getValue("/root/main/pursnstinfo/nutrpursinfo/physmeasetc");   	//6.신체계측                  
			var prntRitem7 = "\n" ;	                              
			if (( model.getValue("/root/main/pursnstinfo/nutrpursinfo/alb")=="") || (model.getValue("/root/main/pursnstinfo/nutrpursinfo/alb")=="0")) {
			     prntRitem7 = prntRitem7 +   "";
			}else {
				 prntRitem7 =  prntRitem7 +   "     Alb : " +  model.getValue("/root/main/pursnstinfo/nutrpursinfo/alb");
			}
			if (( model.getValue("/root/main/pursnstinfo/nutrpursinfo/tlc")=="") || (model.getValue("/root/main/pursnstinfo/nutrpursinfo/tlc")=="0")) {
				prntRitem7 =  prntRitem7 +   "";
			}else {
				 prntRitem7 =  prntRitem7 +   "     TLC : " +  model.getValue("/root/main/pursnstinfo/nutrpursinfo/tlc");
			}
			if (( model.getValue("/root/main/pursnstinfo/nutrpursinfo/hb")=="") || (model.getValue("/root/main/pursnstinfo/nutrpursinfo/hb")=="0")) {
				 prntRitem7 =  prntRitem7 +   "";
			}else {
				 prntRitem7 =  prntRitem7 +   "     Hb : " +  model.getValue("/root/main/pursnstinfo/nutrpursinfo/hb");
			}
			if (( model.getValue("/root/main/pursnstinfo/nutrpursinfo/hct")=="") || (model.getValue("/root/main/pursnstinfo/nutrpursinfo/hct")=="0")) {
				 prntRitem7 =   prntRitem7 +  "";
			}else {
				 prntRitem7=  prntRitem7+   "     Hct : " +  model.getValue("/root/main/pursnstinfo/nutrpursinfo/hct");
			}
			if (( model.getValue("/root/main/pursnstinfo/nutrpursinfo/trf")=="") || (model.getValue("/root/main/pursnstinfo/nutrpursinfo/trf")=="0")) {
				 prntRitem7 = prntRitem7 +    "";
			}else {
				 prntRitem7 =  prntRitem7 +   "\n\tTRF : " +  model.getValue("/root/main/pursnstinfo/nutrpursinfo/trf");
			}
			if (( model.getValue("/root/main/pursnstinfo/nutrpursinfo/rbp")=="") || (model.getValue("/root/main/pursnstinfo/nutrpursinfo/rbp")=="0")) {
				 prntRitem7 =   prntRitem7 +  "";
			}else {
				 prntRitem7 =  prntRitem7 +   "     RBP : " +  model.getValue("/root/main/pursnstinfo/nutrpursinfo/rbp");
			}
			if (( model.getValue("/root/main/pursnstinfo/nutrpursinfo/na")=="") || (model.getValue("/root/main/pursnstinfo/nutrpursinfo/na")=="0")) {
				 prntRitem7 =  prntRitem7 +   "";
			}else {
				 prntRitem7 =   prntRitem7 +   "     Na : " +  model.getValue("/root/main/pursnstinfo/nutrpursinfo/na");
			}
			if (( model.getValue("/root/main/pursnstinfo/nutrpursinfo/k")=="") || (model.getValue("/root/main/pursnstinfo/nutrpursinfo/k")=="0")) {
				 prntRitem7 =  prntRitem7+   "";
			}else {
				 prntRitem7 =   prntRitem7 +  "     K : " +  model.getValue("/root/main/pursnstinfo/nutrpursinfo/k");
			}
			if (( model.getValue("/root/main/pursnstinfo/nutrpursinfo/cl")=="") || (model.getValue("/root/main/pursnstinfo/nutrpursinfo/cl")=="0")) {
				 prntRitem7 =  prntRitem7 +   "";
			}else {
				 prntRitem7 =  prntRitem7 +   "     Cl : " +  model.getValue("/root/main/pursnstinfo/nutrpursinfo/cl");
			}
			if (( model.getValue("/root/main/pursnstinfo/nutrpursinfo/bun")=="") || (model.getValue("/root/main/pursnstinfo/nutrpursinfo/bun")=="0")) {
				 prntRitem7 =   prntRitem7 +  "";
			}else {
				 prntRitem7 =  prntRitem7 +   "\nBUN : " +  model.getValue("/root/main/pursnstinfo/nutrpursinfo/bun");
			}
			if (( model.getValue("/root/main/pursnstinfo/nutrpursinfo/cr")=="") || (model.getValue("/root/main/pursnstinfo/nutrpursinfo/cr")=="0")) {
				 prntRitem7 = prntRitem7 +    "";
			}else {
				 prntRitem7 =  prntRitem7 +   "     Cr : " +  model.getValue("/root/main/pursnstinfo/nutrpursinfo/cr");
			}
			if (( model.getValue("/root/main/pursnstinfo/nutrpursinfo/chol")=="") || (model.getValue("/root/main/pursnstinfo/nutrpursinfo/chol")=="0")) {
				 prntRitem7 =  prntRitem7 +   "";
			}else {
				 prntRitem7 = prntRitem7 +    "     Chol : " +  model.getValue("/root/main/pursnstinfo/nutrpursinfo/chol");
			}
			if (( model.getValue("/root/main/pursnstinfo/nutrpursinfo/tg")=="") || (model.getValue("/root/main/pursnstinfo/nutrpursinfo/tg")=="0")) {
				 prntRitem7 =  prntRitem7 +   "";
			}else {
				 prntRitem7 =  prntRitem7 +   "     TG : " +  model.getValue("/root/main/pursnstinfo/nutrpursinfo/tg");
			}
			if (( model.getValue("/root/main/pursnstinfo/nutrpursinfo/ca")=="") || (model.getValue("/root/main/pursnstinfo/nutrpursinfo/ca")=="0")) {
				 prntRitem7 =  prntRitem7 +   "";
			}else {
				 prntRitem7 =   prntRitem7 +  "\nCa : " +  model.getValue("/root/main/pursnstinfo/nutrpursinfo/ca");
			}
			if (( model.getValue("/root/main/pursnstinfo/nutrpursinfo/p")=="") || (model.getValue("/root/main/pursnstinfo/nutrpursinfo/p")=="0")) {
				 prntRitem7 = prntRitem7 +    "";
			}else {
				 prntRitem7 = prntRitem7 +    "     P : " +  model.getValue("/root/main/pursnstinfo/nutrpursinfo/p");
			}
			if (( model.getValue("/root/main/pursnstinfo/nutrpursinfo/mg")=="") || (model.getValue("/root/main/pursnstinfo/nutrpursinfo/mg")=="0")) {
				 prntRitem7 =  prntRitem7 +   "";
			}else {
				 prntRitem7 =  prntRitem7 +   "     Mg : " +  model.getValue("/root/main/pursnstinfo/nutrpursinfo/mg");
			}
			if (( model.getValue("/root/main/pursnstinfo/nutrpursinfo/ins")=="") || (model.getValue("/root/main/pursnstinfo/nutrpursinfo/ins")=="0")) {
				 prntRitem7 =  prntRitem7 +   "";
			}else {
				 prntRitem7 =  prntRitem7 +   "     INS : " +  model.getValue("/root/main/pursnstinfo/nutrpursinfo/ins");
			}
			if (( model.getValue("/root/main/pursnstinfo/nutrpursinfo/nbcalval")=="") || (model.getValue("/root/main/pursnstinfo/nutrpursinfo/nbcalval")=="0")) {
				 prntRitem7 =  prntRitem7 +   "";
			}else {
				 prntRitem7 = prntRitem7 +  "     N-Balance : " +  model.getValue("/root/main/pursnstinfo/nutrpursinfo/nbcalval");
			}                                                                                                                                                                                  //7. 검사결과	
    var prntRitem8  = "\n" + fSortWord(tab,splitChkBox(checkbox4),50,"N");       //8. 영양상태 판정
    
		    var replcnts6 =  	"\n* 열량 : "  + needcaltotal  + " kcal/day  ( BEE : " + model.getValue("/root/init/bee")  ;
			if (combo46.label !=""){
				replcnts6= replcnts6 + ", AF : " + combo46.value ;
			}else{
				if (combo48.label !=""){
					replcnts6= replcnts6 + ", AF : " + combo48.value ;
				}else{
					replcnts6= replcnts6 ;
				}
			}
		
			if (combo42.label !=""){
				replcnts6= replcnts6 + ",  IF : " + combo42.value + " )";
			}else{
				replcnts6 = replcnts6 + ")";
			}
			var replcnts7 =  	"\n* 단백질 : "  + protsuplvol + " g/day ( IBW * " + model.getValue("/root/main/pursnstinfo/nutrpursinfo/prot2") + " g/kg ) " ;
			var replcnts8 =  	"\n* 수분요구량 : "  + waterreqvol + "ml/d";
			if ( model.getValue("/root/main/pursnstinfo/nutrpursinfo/nutrreqvol")=="") {
				replcnts8 = replcnts8 + "";
			}else {
				replcnts8 = replcnts8 +"\n* 기타 : "  + model.getValue("/root/main/pursnstinfo/nutrpursinfo/nutrreqvol") ;
			}
    
   var prntRitem9  = "\n" + replcnts6+replcnts7+replcnts8 ;  	              //9. 영양요구량
   var carePlanData = model.getValue("/root/main/pursnstinfo/careplaninfo/problemcareplan");    
    if(carePlanData != "") {
	    var prntRitem10 = "\n";
	
    	// 로우 데이터 별로 나누기
    	carePlanData = carePlanData.split("§");
    	
    	for(var i = 1; i <= carePlanData.length; ++i) {
    		var problemPlanData = carePlanData[i-1].split("▦");
    		prntRitem10 = prntRitem10 + problemPlanData[0] + " : " + problemPlanData[1] + "\n";
    	}
    }                                                                                          //10. problem      
    var prntRitem11 = "\n" + model.getValue("/root/main/pursnstinfo/nutrpursinfo/dieteroffr").replace(/\n/gi,"\n");     // 11. 영양사 제언
    if (model.getValue("/root/main/pursnstinfo/nutrpursinfo/droffr") !="") {
		var prntRitem12=  "\n" + model.getValue("/root/main/pursnstinfo/nutrpursinfo/droffr")
	}else{
		var prntRitem12 = "";
	}                                                                                                                 // 12. 의사 제언
	if (model.getValue("/root/main/pursnstinfo/nutrpursinfo/pharmstoffr") !="") {
		var prntRitem13 =  	"\n" + model.getValue("/root/main/pursnstinfo/nutrpursinfo/pharmstoffr")
	}else{
		var prntRitem13 = "";
	}                                                                                                                 // 13. 약사 제언
	if (model.getValue("/root/main/pursnstinfo/nutrpursinfo/nurseoffr") !="") {
		var prntRitem16 =  	"\n" + model.getValue("/root/main/pursnstinfo/nutrpursinfo/nurseoffr")
	}else{
		var prntRitem16 = "";
	}                                                                                                                 // 16. 간호사 제언	
	if (model.getValue("/root/main/pursnstinfo/nutrpursinfo/mntr") !="") {
	var prntRitem15 = "\n" + model.getValue("/root/main/pursnstinfo/nutrpursinfo/mntr")
	}else{
		var prntRitem15 = "";
	} 																												// 15. 모니터링
	var prntRitem14 = "\n" + "의사 : " + input136.label + " " + "/ 영양사 : "  + combo1.label + "  "  + "/ 약사 : "  + input142.label + "  "  + "/ 간호사 : "  + input144.label +"  "  + "/ NST 위원장 "
    	prntRitem14 += "(Dr." + model.getValue("/root/init/codelist/drid/codelist/cdnm") + ")"                        // 14. 마지막 문구	     
	
	model.makeValue("/root/hidden/prntdata/prntRitem1",     prntRitem1);		    //1. 영양관련 문제점  	
	model.makeValue("/root/hidden/prntdata/prntRitem2",     prntRitem2);		    //2. 활동정도 
	model.makeValue("/root/hidden/prntdata/prntRitem3",     prntRitem3);		    //3. 투여경로  
	model.makeValue("/root/hidden/prntdata/prntRitem4",     prntRitem4);		    //4. 식사섭취상태 	
	model.makeValue("/root/hidden/prntdata/prntRitem5",     prntRitem5);		    //5. 총섭취열량, 총단백질량	
	model.makeValue("/root/hidden/prntdata/prntRitem6",     prntRitem6);		    //6. 신체계측	
	model.makeValue("/root/hidden/prntdata/prntRitem7",     prntRitem7);		    //7. 검사결과			
	model.makeValue("/root/hidden/prntdata/prntRitem8",     prntRitem8);		    //8. 영양상태 판정	
	model.makeValue("/root/hidden/prntdata/prntRitem9",     prntRitem9);		    //9. 열량요구량	
	model.makeValue("/root/hidden/prntdata/prntRitem10",    prntRitem10);		    //10. problem	
	model.makeValue("/root/hidden/prntdata/prntRitem11",    prntRitem11);		    //11. 영양사 제언	
	model.makeValue("/root/hidden/prntdata/prntRitem12",    prntRitem12);		    //12. 의사 제언	
	model.makeValue("/root/hidden/prntdata/prntRitem13",    prntRitem13);		    //13. 약사 제언	
	model.makeValue("/root/hidden/prntdata/prntRitem16",    prntRitem16);		    //16. 간호사 제언	
	model.makeValue("/root/hidden/prntdata/prntRitem14",    prntRitem14);		    //14. 마지막 문구	
	model.makeValue("/root/hidden/prntdata/prntRitem15",    prntRitem15);		    //15. 모니터링					
	}
}


//추구관리 임시 막기 (2009-02-10)
function fCretReplCnts_NEW(sendflag){
	// 필요열량(TCN)
	if( model.getValue("/root/main/nstinfo/nutrpninfo/needcalrflag") == "1") {
		var needcaltotal = "계수법 " + model.getValue ("/root/init/pninfo/needcalrlist/needcalr1") + " x "
						+ model.getValue("/root/init/pninfo/needcalrlist/needcalr2")
		                        + " kcal/kg = " + model.getValue("/root/init/pninfo/needcalrlist/needcalr7").getRound(-3,"HALF_UP")
		                        + " kcal/day";
	}else if( model.getValue("/root/main/nstinfo/nutrpninfo/needcalrflag") == "2") {
		var needcaltotal = model.getValue("/root/init/bee").getRound(-3,"HALF_UP") + "(BEE) x "
						+ model.getValue("/root/init/pninfo/needcalrlist/needcalr4") + "(AF) x "
						+ model.getValue("/root/init/pninfo/needcalrlist/needcalr5") + "(IF) = "
					   	+ model.getValue("/root/init/pninfo/needcalrlist/needcalr6").getRound(-3,"HALF_UP")
					   	+ " kcal/day" ;
	}else if( model.getValue("/root/main/nstinfo/nutrpninfo/needcalrflag") == "3") {
		var needcaltotal = model.getValue("/root/init/bee").getRound(-3,"HALF_UP") + "(BEE) x "
						+ model.getValue("/root/init/pninfo/needcalrlist/needcalr8") + "(AF) + "
		                      	+ model.getValue("/root/init/bee").getRound(-3,"HALF_UP") + "(BEE) x "
		                      	+ model.getValue("/root/init/pninfo/needcalrlist/needcalr10")
		                      	+ " = " + model.getValue("/root/init/pninfo/needcalrlist/needcalr11").getRound(-3,"HALF_UP")
		                      	+ "\n     ( + T.F. : 20 ~ 30 %) (+ W. F. : 20%)" ;
	}else if( model.getValue("/root/main/nstinfo/nutrpninfo/needcalrflag") == "4") {
		var needcaltotal = "1784-11*(" + model.getValue("/root/init/pninfo/basembolinfolist/age") + ")+5*("
	                             	+ model.getValue("/root/main/nstinfo/nutrpninfo/basewt") + ")+244*("
	                             	+ model.getValue("/root/init/pninfo/needcalrlist/needcalr14") + ")+239* ("
	                              + model.getValue("/root/init/pninfo/needcalrlist/needcalr15") + ")+804*("
	                             	+  model.getValue("/root/init/pninfo/needcalrlist/needcalr16") + ")"
	                             	+ " = " + model.getValue("/root/init/pninfo/needcalrlist/needcalr17").getRound(-3,"HALF_UP")
	                             	+ "\n     kcal/day(Ventilator care시)" ;
	}

	//기초대사량(BEE)
	var basemboltitle ="" ;
	if (model.getValue("/root/main/patinfo/baseinfo/sna").substr(0,1) == "F" ) {	// 여
		var  basemboltitle =  "655 + (9.6 x " + model.getValue("/root/main/nstinfo/nutrpninfo/basewt") + " Kg) + (1.9 x "
						+ model.getValue("/root/main/nstinfo/nutrpninfo/ht") + " cm) - (4.7 x "
						+ model.getValue("/root/init/pninfo/basembolinfolist/age") + " yr) = "
						+ model.getValue("/root/init/pninfo/basembolinfolist/wbasembolcalc").getRound(-3,"HALF_UP") ;
	}else{
		var  basemboltitle =  "66.5 + (13.7 x " + model.getValue("/root/main/nstinfo/nutrpninfo/basewt") + " Kg) + (5 x "
						+ model.getValue("/root/main/nstinfo/nutrpninfo/ht") + " cm) - (6.8 x "
						+ model.getValue("/root/init/pninfo/basembolinfolist/age") + " yr) = "
						+ model.getValue("/root/init/pninfo/basembolinfolist/mbasembolcalc").getRound(-3,"HALF_UP") ;
	}

	var title0 ="";
	if (model.getValue("/root/send/srchinfo/rgstseqno").substr (8,3) != "001" && model.getValue("/root/send/srchinfo/rgstseqno").substr (8,3) != "" ) {
		model.setValue("/root/send/modifysendsrc/pid", model.getValue("/root/main/patinfo/baseinfo/pid"));	//등록번호
		model.setValue("/root/send/modifysendsrc/formrecseq",model.getValue("/root/send/srchinfo/formrecseq"));	//fomrecseq
		model.setValue("/root/send/modifysendsrc/rgstseqno", model.getValue("/root/send/srchinfo/rgstseqno"));	//rgstseqno

		submit("TRADC02606");		//	기존데이타를 조회한다.
	     title0 = "\n\n----------------------------------------------------------------\n\n\n";
	     title0 = title0 + model.getValue("/root/hidden/redatalist/redata/replcnts");
	}

	if (model.getValue("/root/main/nstinfo/nutrpninfo/physmeasetc") == "Y") {		//  변경작업이 있을 경우
			// 기초대사량 (BEE)
			var basembolcalc;
			var wt	= model.getValue("/root/hidden/redatalist/redata/basewt");
			var ht	= model.getValue("/root/hidden/redatalist/redata/ht");
			var age	= model.getValue("/root/hidden/redatalist/redata/age");
			var OLD_basemboltitle=""	;

			if (model.getValue("/root/hidden/redatalist/redata/sex") =="F" ) {	// 여
				basembolcalc = 655 + (9.6 * wt) + (1.9 * ht) - (4.7 * age) ;
				basembolcalc = basembolcalc.toString().getRound(-3,"HALF_UP");
				OLD_basemboltitle =  "655 + (9.6 * " + wt + " Kg) + (1.9 x " + ht + " cm) - (4.7 x " +  age + " yr) = " + basembolcalc;
			}else{
				basembolcalc = 66.5 + (13.7 * wt) + (5 * ht) - (6.8 * age);
				basembolcalc = basembolcalc.toString().getRound(-3,"HALF_UP");
				OLD_basemboltitle =  "66.5 + (13.7 x " + wt + " Kg) + (5 x " + ht + " cm) - (6.8 x " +  age + " yr) = " + basembolcalc;
			}

			//필요열량(TCN)
			if( model.getValue("/root/hidden/redatalist/redata/needcalrflag") == "1") {
				var OLD_needcaltotal = "계수법 " + model.getValue ("/root/hidden/redatalist/redata/needcalr1") + " x "
					                      + model.getValue("/root/hidden/redatalist/redata/needcalr2") + " kcal/kg = "
					                      + model.getValue("/root/hidden/redatalist/redata/needcalrcalc").getRound(-3,"HALF_UP")
					                      + " kcal/day";
			}else if( model.getValue("/root/hidden/redatalist/redata/needcalrflag") == "2") {
				var OLD_needcaltotal = basembolcalc + " (BEE) x "
								    + model.getValue("/root/hidden/redatalist/redata/needcalr2") + "(AF) x "
					                      + model.getValue("/root/hidden/redatalist/redata/needcalr3") + "(IF) = "
					                      + model.getValue("/root/hidden/redatalist/redata/needcalrcalc").getRound(-3,"HALF_UP")
					                      + " kcal/day" ;
			}else if( model.getValue("/root/hidden/redatalist/redata/needcalrflag") == "3") {
				var OLD_needcaltotal = basembolcalc + " (BEE) x "
								    + model.getValue("/root/hidden/redatalist/redata/needcalr2") + "(AF) + "
					                      + basembolcalc + "(BEE) x "
					                      + model.getValue("/root/hidden/redatalist/redata/needcalr4")  + " = "
					                      + model.getValue("/root/hidden/redatalist/redata/needcalrcalc").getRound(-3,"HALF_UP")
					                      + "\n     ( + T.F. : 20 ~ 30 %) (+ W. F. : 20%)" ;
			}else if( model.getValue("/root/hidden/redatalist/redata/needcalrflag") == "4") {
				var OLD_needcaltotal = "1784-11*(" + model.getValue("/root/hidden/redatalist/redata/age") + ")+5*("
				                             + model.getValue("/root/hidden/redatalist/redata/basewt") + ")+244*("
				                             + model.getValue("/root/hidden/redatalist/redata/needcalr3") + ")+239* ("
				                             + model.getValue("/root/hidden/redatalist/redata/needcalr4") + ")+804*("
				                             +  model.getValue("/root/hidden/redatalist/redata/needcalr5") + ")"
				                             + " = " + model.getValue("/root/hidden/redatalist/redata/needcalrcalc").getRound(-3,"HALF_UP")
				                             + "\n     kcal/day(Ventilator care시)" ;
			}

			// Nutritional assessment ( old + new)
			var title    = "\n<Nutritional assessment>" + "\n" ;
			var title1  = "\n1. 현재 영양 상태 :  \n\t(" +  model.getValue("/root/hidden/redatalist/redata/repldd")  + ") " + chk_nutjudgOLD.label;
			     title1  = title1 + "\n\t(" +  model.getValue("/root/main/nstinfo/nutrpninfo/execdd") + ") " + chk_nutjudg.label ;
//							var title2  = "\n2. 필요 열량 :   ( 보정열량 :  (" + model.getValue("/root/hidden/redatalist/redata/repldd") + ") "
//							                                                             + model.getValue("/root/hidden/redatalist/redata/corrcalr") + "   ("
//							                                                             + model.getValue("/root/main/nstinfo/nutrpninfo/execdd") + ") "
//							                                                             +  model.getValue("/root/main/nstinfo/nutrpninfo/corrcalr").getRound(-3,"HALF_UP") + " ) ";
			var title2  = "\n2. 필요 열량 :    (" + model.getValue("/root/hidden/redatalist/redata/repldd") + ") "
			                                                             + model.getValue("/root/hidden/redatalist/redata/corrcalr") + " kcal/day   ("
			                                                             + model.getValue("/root/main/nstinfo/nutrpninfo/execdd") + ") "
			                                                             +  model.getValue("/root/main/nstinfo/nutrpninfo/corrcalr").getRound(-3,"HALF_UP") + " kcal/day ) ";
			     title2 += "\n   BEE : (" +  model.getValue("/root/hidden/redatalist/redata/repldd")  + ") " + OLD_basemboltitle ;	//기초대사량OLD
			     title2 += "\n            (" +  model.getValue("/root/main/nstinfo/nutrpninfo/execdd") + ") " + basemboltitle ;		// 기초대사량
			     title2 += "\n   TCN : (" +  model.getValue("/root/hidden/redatalist/redata/repldd")  + ") " + OLD_needcaltotal.replace(/\n/gi,"\n\t") ;  // 필요열량 OLD
			     title2 += "\n            (" +  model.getValue("/root/main/nstinfo/nutrpninfo/execdd") + ") " + needcaltotal.replace(/\n/gi,"\n\t") ;		// 필요열량

	}else{						//  현행유지  - 변경작업이 없을 경우

			// Nutritional assessment ( new)
			var title =  "\n<Nutritional assessment>" + "\n" ;
			var title1 = "\n1. 현재 영양 상태 : \n\t" + chk_nutjudg.label;
			var title2 = "\n2. 필요 열량 :  " +  model.getValue("/root/main/nstinfo/nutrpninfo/corrcalr").getRound(-3,"HALF_UP") + "  kcal/day" ;
			     title2 += "\n    BEE : " +	basemboltitle ;							//기초대사량OLD
			     title2 += "\n    TCN : " +	needcaltotal.replace(/\n/gi,"\n\t") ;		//필요열량
	}

	//Nutritional plan
	var title3 =  "\n\n\n<Nutritional plan>" ;
	var repltitle = "";
	var Ritem1 = "\n\n1. 추천 제형 : ";
	var Ritem2 = "\n    (당투여속도 : " + model.getValue("/root/main/nstinfo/nutrpninfo/dexwdrugspd")  + " mg/kg/min    "
	                                               + " /  단백 공급량 : " + model.getValue("/root/main/nstinfo/nutrpninfo/protsuplvol") + "  g/kg/day )" ;
	var Ritem3 = "\n\n2. Rec) \n";
	var Ritem4 = "\t" + model.getValue("/root/main/nstinfo/nutrpninfo/drugplan").replace(/\n/gi,"\n\t");
	var Ritem5 = "\n\n3. 기타 : \n" ;
	var Ritem6 = "\t" + model.getValue("/root/main/nstinfo/nutrpninfo/suplplanetc").replace(/\n/gi,"\n\t");

	var Ritem7 = "\n\n   [ Nutrition lab ] \n" ;
	var Ritem8 = model.getValue("/root/temp/nutritontext").replace(/\n/gi,"\n\t")    ;

	var Ritem9 = "\n\n\n 담당약사 : " + model.getValue("/root/main/nstinfo/nutrpninfo/pharmstnm")+ "\t\t " + getCurrentDate().toDate().getDateFormat("YYYY/MM/DD") + "\t" + " / 영양집중지원팀 팀장 (Dr. "  ;
	Ritem9 += model.getValue("/root/init/codelist/drid/codelist/cdnm") + ")";
	var Ritem = repltitle + Ritem1 + Ritem2 + Ritem3 + Ritem4 + Ritem5 + Ritem6 + Ritem7 + Ritem8 + Ritem9 ;
	var replcnts =  title + title1 + title2 + title3 + Ritem + title0 ;		// 2009-01-22 title0 기존 회신내역 추구(추구관리때문) - 최신의뢰(추구관리) 먼저 조회되도록...

	model.makeNode("/root/main/nstinfo/nutrpninfo/replcnts"); // 회신내역 노드생성
	model.setValue("/root/main/nstinfo/nutrpninfo/replcnts", replcnts); // 회신내역 변수설정
	model.setValue("/root/main/nstreqinfo/data", replcnts);
	model.refresh();

	//2009-01-30  회신서 출력
	if (sendflag =="prnt"){
		var replcnts1 = title1 + title2; 										//<Nutritional assessment>
		var replcnts2 =  Ritem1 + Ritem2 + Ritem3 + Ritem4 + Ritem5 + Ritem6; 	//Nutritional plan
		var replcnts3 =  Ritem8;											//[ Nutrition lab ]
		var replcnts4 =  Ritem9;
		model.makeValue("/root/hidden/prntdata/replcnts1", replcnts1);		//<Nutritional assessment>
		model.makeValue("/root/hidden/prntdata/replcnts2", replcnts2);		//Nutritional plan
		model.makeValue("/root/hidden/prntdata/replcnts3", replcnts3);		//[ Nutrition lab ]
		model.makeValue("/root/hidden/prntdata/replcnts4", replcnts4);
		return true
	}


	if(sendflag == true)
	{
						//2009-01-22 PN에 대해서 회신내용 수정가능하도록 처리.  formflag : PN -> NST 변경
//						var sel = fSendReplForm(replcnts);
		var sel = fSendReplForm(replcnts,"NST");
		if(sel == "cfm"){
			model.setValue("/root/main/nstinfo/nutrpninfo/replcnts",model.getValue("/root/temp/formdata/replinfo/replcnts"));
			return true;
		}else return false;
	}
}


/* ================================= 이하 계산 함수 ================================= */


/*
	@ 키와 몸무게에 대한 ibw와 기준체중 계산
	 - 키와 몸무게 변경시 자동 계산 반영항목
	   1) IBW
	   2) PIBW
	   3) ABW
	   4) 수분요구량
*/

/* PN - 키와 몸무게에 대한 ibw 계산*/
function fCalcWeight()
{
	var wt = model.getValue("/root/main/nstinfo/nutrpninfo/wt");
	var ht = model.getValue("/root/main/nstinfo/nutrpninfo/ht");
	//var abw = model.getValue("/root/main/nstinfo/nutrpninfo/abw");

	if(ht == "")
	{
		return false;
	}



	input108.attribute("editable") = false;
	var ibw = 0;
	var htsqare = eval(ht / 100)
	if(gv_sex == "M")
	{
		ibw = (22 * htsqare * htsqare).toString().getRound( -3,"HALF_UP");

	}
	else
	{
		ibw = (21 * htsqare * htsqare).toString().getRound( -3,"HALF_UP");
	}

	model.setValue("/root/main/nstinfo/nutrpninfo/ibw", ibw);
	
	fCalcWeightEx();
}


/* EN - 키와 몸무게에 대한 ibw 계산*/
function fCalcWeightEn()
{
	var wt = model.getValue("/root/main/ennstinfo/nutreninfo/wt");
	var ht = model.getValue("/root/main/ennstinfo/nutreninfo/ht");
	//var abw = model.getValue("/root/main/ennstinfo/nutreninfo/adw");

	if(ht == "")
	{
		return false;
	}


	input108.attribute("editable") = false;
	var ibw = 0;
	var htsqare = eval(ht / 100);
	if(gv_sex == "M")
	{
		ibw =  ( 22 * htsqare * htsqare ).toString().getRound( -2,"HALF_UP");

	}
	else
	{
		ibw = ( 21 * htsqare * htsqare ).toString().getRound( -2,"HALF_UP");
	}

	model.setValue("/root/main/ennstinfo/nutreninfo/ibw",  ibw );
	
	fCalcWeightEx();
}

/*
	@ PN/EN 기준체중 선택값 설정, 수분요구량 계산
	 - 함수호출시 
	 	1) abw값 계산/설정
	 	2) 기준체중 선택값 설정
	 	3) 수분요구량 계산/설정
	 	4) BEE 계산/설정 함수호출
	 	5) 필요열량 계산/설정 함수 호출
*/
function fCalcWeightEx(){
	if(gv_CnstType == "PN"){
		var wt = parseFloat(model.getValue("/root/main/nstinfo/nutrpninfo/wt"));
		var ht = parseFloat(model.getValue("/root/main/nstinfo/nutrpninfo/ht"));
		var ibw = parseFloat(model.getValue("/root/main/nstinfo/nutrpninfo/ibw"));
		model.setValue("/root/temp/ibwper", (wt / ibw * 100).toString().getRound( -2,"HALF_UP"));
		model.setValue("/root/main/nstinfo/nutrpninfo/pibw", (wt / ibw * 100).toString().getRound( -2,"HALF_UP"));    //2010-01-13 PIBW 계산 - iBW %와 동일처리한다
		
		// ABW  계산식 추가
		var abw = (ibw + (( wt - ibw )*0.25)).toString().getRound( -3,"HALF_UP");
		model.setValue("/root/main/nstinfo/nutrpninfo/abw", abw);
		if(model.getValue("/root/main/nstinfo/nutrpninfo/basewtflag") == "1")
		{
			model.setValue("/root/main/nstinfo/nutrpninfo/basewt", ibw);
		}
		else if(model.getValue("/root/main/nstinfo/nutrpninfo/basewtflag") == "2")
		{
			model.setValue("/root/main/nstinfo/nutrpninfo/basewt", abw);
			//input108.attribute("editable") = true;
		}
		else if(model.getValue("/root/main/nstinfo/nutrpninfo/basewtflag") == "3")
		{
			model.setValue("/root/main/nstinfo/nutrpninfo/basewt", wt);
		}
	
		var waterreq = (1500 + (20 * (wt - 20))).toString().getRound( -3,"HALF_UP");
	
		model.setValue("/root/main/nstinfo/nutrpninfo/waterreqvol", waterreq);
		fCalcBee();
		fCalcNeedCal();
		
	}else if(gv_CnstType == "EN"){
	
		var wt = parseFloat(model.getValue("/root/main/ennstinfo/nutreninfo/wt"));
		var ht = parseFloat(model.getValue("/root/main/ennstinfo/nutreninfo/ht"));
		var ibw = parseFloat(model.getValue("/root/main/ennstinfo/nutreninfo/ibw"));
	
		//2009-02-09 IBW => 단백질 로 Setting
		model.setValue(	"/root/main/ennstinfo/nutreninfo/prot1", ibw);
	
		//2008-11-17 전예나 영양사 요청: IBW의 percent -> PIBW로 보여져야 한다고 함.
	//					model.setValue("/root/temp/ibwper", wt / ibw * 100);
		model.setValue("/root/main/ennstinfo/nutreninfo/pibw", (wt / ibw * 100).toString().getRound( -2,"HALF_UP"));
	
		// ABW  계산식 추가
		//2008-11-17 전예나 영양사 요청: PIBW가 120이상일경우만 ABW보여준다
		//var abw = ( ibw + ( wt - ibw )*0.25 ).toString().getRound( -2,"HALF_UP");
		//2009-02-09 전예나 영양사 요청: PIBW가 120이상일경우만 ABW보여준다 (계산방법 바뀜)
		var ubw = parseFloat(model.getValue("/root/main/ennstinfo/nutreninfo/ubw"));
		
		var abw = (ibw + (( ubw - ibw) * 0.25)).toString().getRound( -2,"HALF_UP");
		if  (parseFloat(model.getValue("/root/main/ennstinfo/nutreninfo/pibw")) >= 120 )  {
			model.setValue("/root/main/ennstinfo/nutreninfo/abw", abw);
		}else{
			model.setValue("/root/main/ennstinfo/nutreninfo/abw", "");
		}
		
	
		if(model.getValue("/root/main/ennstinfo/nutreninfo/basewtflag") == "1")
		{
			model.setValue("/root/main/ennstinfo/nutreninfo/basewt", ibw);
		}
		else if(model.getValue("/root/main/ennstinfo/nutreninfo/basewtflag") == "2")
		{
			if  (model.getValue("/root/main/ennstinfo/nutreninfo/pibw") >= 120 ) {
				model.setValue("/root/main/ennstinfo/nutreninfo/basewt", abw);
			}
			//input108.attribute("editable") = true;
		}
		else if(model.getValue("/root/main/ennstinfo/nutreninfo/basewtflag") == "3")
		{
			model.setValue("/root/main/ennstinfo/nutreninfo/basewt", wt);
		}
	
		var waterreq = (1500 + (20 * (wt - 20)) ).toString().getRound( -2,"HALF_UP");
	
		model.setValue("/root/main/ennstinfo/nutreninfo/waterreqvol", waterreq);
		fCalcBeeEn();
		fCalcNeedCalEn();
	}	
	
}


/*
	@기초대사량 (Basal Energy Expenditure : BEE) 계산
		- 수식 필요 입력값 (체중, 신장, 나이)
		   
*/

/* PN - BEE계산*/
function fCalcBee()
{
	var manbee;
	var womenbee;
	var wt = model.getValue("/root/main/nstinfo/nutrpninfo/basewt");
	var ht = model.getValue("/root/main/nstinfo/nutrpninfo/ht");
	var age = model.getValue("/root/init/pninfo/basembolinfolist/age");
	if(wt == "" || ht == "") return false;

	manbee 		= (66.5 + (13.7 * wt) + (5 * ht) - (6.8 * age)).toString().getRound( -3,"HALF_UP");
	womenbee 	= (655 + (9.6 * wt) + (1.9 * ht) - (4.7 * age)).toString().getRound( -2,"HALF_UP");;

	model.setValue("/root/init/pninfo/basembolinfolist/mbasembolcalc", manbee);
	model.setValue("/root/init/pninfo/basembolinfolist/wbasembolcalc", womenbee);

	if(gv_sex == "M")
	{
		model.setValue("/root/init/bee", manbee);
	}
	else
	{
		model.setValue("/root/init/bee", womenbee);
	}
}

/* EN - BEE계산*/
function fCalcBeeEn()
{
	var manbee;
	var womenbee;
	var wt = model.getValue("/root/main/ennstinfo/nutreninfo/basewt");
	var ht = model.getValue("/root/main/ennstinfo/nutreninfo/ht");
	var age = model.getValue("/root/init/eninfo/basembolinfolist/age");
	if(wt == "" || ht == "") return false;

	manbee = ( 66.5 + (13.7 * wt) + (5 * ht) - (6.8 * age) ).toString().getRound( -2,"HALF_UP");
	womenbee = ( 655 + (9.6 * wt) + (1.9 * ht) - (4.7 * age) ).toString().getRound( -2,"HALF_UP");

	model.setValue("/root/init/eninfo/basembolinfolist/mbasembolcalc", manbee);
	model.setValue("/root/init/eninfo/basembolinfolist/wbasembolcalc", womenbee);

	if(gv_sex == "M")
	{
		model.setValue("/root/init/bee", manbee);
	}
	else
	{
		model.setValue("/root/init/bee", womenbee);
	}
}


//==================================== PN 필요열량 계산========================================
function fCalcNeedCal(calcflag)
{
	var bee = model.getValue("/root/init/bee");
	var tcn;

	model.setValue("/root/init/pninfo/needcalrlist/needcalr6", "");
	model.setValue("/root/init/pninfo/needcalrlist/needcalr7", "");
	model.setValue("/root/init/pninfo/needcalrlist/needcalr11", "");
	model.setValue("/root/init/pninfo/needcalrlist/needcalr17", "");

	// #1 => 계수법
	if(model.getValue("/root/main/nstinfo/nutrpninfo/needcalrflag") == "1")
	{
		var need1 = model.getValue("/root/init/pninfo/needcalrlist/needcalr1");
		var need2 = model.getValue("/root/init/pninfo/needcalrlist/needcalr2");
		tcn = need1 * need2;
		model.setValue("/root/init/pninfo/needcalrlist/needcalr7", tcn);
	// #2 => BEE * AF * IF
	}else if(model.getValue("/root/main/nstinfo/nutrpninfo/needcalrflag") == "2"){
		var af = model.getValue("/root/init/pninfo/needcalrlist/needcalr4");
		var ifv = model.getValue("/root/init/pninfo/needcalrlist/needcalr5");
		tcn = bee*af*ifv;
		model.setValue("/root/init/pninfo/needcalrlist/needcalr6", tcn);
	// #3 => BEE * AF * BEE
	}else if(model.getValue("/root/main/nstinfo/nutrpninfo/needcalrflag") == "3"){
		var af = model.getValue("/root/init/pninfo/needcalrlist/needcalr8");
		var ifv = model.getValue("/root/init/pninfo/needcalrlist/needcalr10");
		var question = model.getValue("/root/init/pninfo/needcalrlist/needcalr10");
		tcn = (bee*af) + (bee*question);
		model.setValue("/root/init/pninfo/needcalrlist/needcalr11", tcn);
	// #4
	}else if(model.getValue("/root/main/nstinfo/nutrpninfo/needcalrflag") == "4"){
		var wt = model.getValue("/root/main/nstinfo/nutrpninfo/basewt");
		var ht = model.getValue("/root/main/nstinfo/nutrpninfo/ht");
		var age = model.getValue("/root/init/pninfo/basembolinfolist/age");
		var wmflag = model.getValue("/root/init/pninfo/needcalrlist/needcalr14");
		var preflag = model.getValue("/root/init/pninfo/needcalrlist/needcalr15");
		var preflag2 = model.getValue("/root/init/pninfo/needcalrlist/needcalr16");
		tcn = 1784 - (11 * age) + (5 * wt) + (244 * wmflag) + (239 * preflag) + (804 * preflag2)
		model.setValue("/root/init/pninfo/needcalrlist/needcalr17", tcn);
	}

	if(calcflag != true)	model.setValue("/root/main/nstinfo/nutrpninfo/corrcalr", tcn);
}


function fCalcNeedCalEn(calcflag)
{
	var bee = model.getValue("/root/init/bee");
	var tcn;

	model.setValue("/root/init/eninfo/needcalrlist/needcalr6", "");
	model.setValue("/root/init/eninfo/needcalrlist/needcalr7", "");
	model.setValue("/root/init/eninfo/needcalrlist/needcalr11", "");
	model.setValue("/root/init/eninfo/needcalrlist/needcalr17", "");

	if(model.getValue("/root/main/ennstinfo/nutreninfo/needcalrflag") == "1")
	{
		var need1 = model.getValue("/root/init/eninfo/needcalrlist/needcalr1");
		var need2 = model.getValue("/root/init/eninfo/needcalrlist/needcalr2");
		tcn = ( need1 * need2).toString().getRound(-2,"HALF_UP");
		model.setValue("/root/init/eninfo/needcalrlist/needcalr7", tcn);

	}
	else if(model.getValue("/root/main/ennstinfo/nutreninfo/needcalrflag") == "2")
	{
		var af = model.getValue("/root/init/eninfo/needcalrlist/needcalr4");
		var ifv = model.getValue("/root/init/eninfo/needcalrlist/needcalr5");
		tcn = (bee*af*ifv ).toString().getRound(-2,"HALF_UP");
		model.setValue("/root/init/eninfo/needcalrlist/needcalr6", tcn);
	}
	else if(model.getValue("/root/main/ennstinfo/nutreninfo/needcalrflag") == "3")
	{
		var af = model.getValue("/root/init/eninfo/needcalrlist/needcalr8");
		var ifv = model.getValue("/root/init/eninfo/needcalrlist/needcalr10");
		var question = model.getValue("/root/init/eninfo/needcalrlist/needcalr10");
		tcn = ( (bee*af) + (bee*question) ).toString().getRound(-2,"HALF_UP");
		model.setValue("/root/init/eninfo/needcalrlist/needcalr11", tcn);

	}
	else if(model.getValue("/root/main/ennstinfo/nutreninfo/needcalrflag") == "4")
	{
		var wt = model.getValue("/root/main/ennstinfo/nutreninfo/basewt");
		var ht = model.getValue("/root/main/ennstinfo/nutreninfo/ht");
		var age = model.getValue("/root/init/eninfo/basembolinfolist/age");
		var wmflag = model.getValue("/root/init/eninfo/needcalrlist/needcalr14");
		var preflag = model.getValue("/root/init/eninfo/needcalrlist/needcalr15");
		var preflag2 = model.getValue("/root/init/eninfo/needcalrlist/needcalr16");

		tcn = (1784 - (11 * age) + (5 * wt) + (244 * wmflag) + (239 * preflag) + (804 * preflag2) ).toString().getRound(-2,"HALF_UP");
		model.setValue("/root/init/eninfo/needcalrlist/needcalr17", tcn);
	}

	if(calcflag != true)	model.setValue("/root/main/ennstinfo/nutreninfo/corrcalr", tcn);
}

function fCalcFPN()
{
	var ov = model.getValue("/root/main/nstinfo/nutrpninfo/prot1");
	var ov2 = model.getValue("/root/main/nstinfo/nutrpninfo/prot2")*0.01;
	var wt = model.getValue("/root/main/nstinfo/nutrpninfo/wt");
		
	model.setValue("/root/main/nstinfo/nutrpninfo/protcalc1", ov*(ov2));
	model.setValue("/root/main/nstinfo/nutrpninfo/protcalc2", ov * (ov2)/ 6.25);


	//var protcalc2 = model.getValue("/root/main/nstinfo/nutrpninfo/protcalc2");   //2008-10-01 protcalc2 -> protcalc1 이라고 하심(김은희약사)
	var protcalc1 = model.getValue("/root/main/nstinfo/nutrpninfo/protcalc1");
	var protsupl = (protcalc1 / wt);

	model.setValue("/root/main/nstinfo/nutrpninfo/protsuplvol", protsupl);
	
	//fCalDexwDrugSpd();        //계산식에 의한 계산.
	fCalDexwDrugSpdTPNCD();	    //2010-02-23 NST 마스터의 항목(혼합후 dextrose)으로 계산 <<  당투여속도 =   (혼합후 dextrose %) * ordervolume* 10 / (1440*현재 체중) >>
	fCalRecmDrugVol();          //추천공급량 계산
}


/* 
	@ 추천공급량 계산 
		- 추천공급량 = OrderVolume / 24hr
*/
function fCalRecmDrugVol(){
	var ov = model.getValue("/root/main/nstinfo/nutrpninfo/prot1");
	var kcalml = "";
	for(i = 1; i <= cmb_nstcode.length; i++){
		if(cmb_nstcode.value == model.getValue("/root/init/codelist/nstcode/codelist["+i+"]/cdnm")){
			nstcodetext 	= model.getValue("/root/init/codelist/nstcode/codelist["+i+"]/nstcodetext");
			kcalml 			= model.getValue("/root/init/codelist/nstcode/codelist["+i+"]/kcalml");
			break;
		}
	}
	
	model.makeValue("/root/main/nstinfo/nutrpninfo/recmdrugvol",(ov*kcalml).toString().getRound(-1,"HALF_UP"));
}

function fNstExam()
{
					//PN  LAB 결과값 가져오기 Start
//					model.setValue("/root/send/srchinfo/formrecseq", model.getValue("/root/temp/cnstinfo/formrecseq"));
//					model.setValue("/root/send/srchinfo/pid", model.getValue("/root/temp/cnstinfo/pid"));
//					model.setValue("/root/send/srchinfo/cretno", model.getValue("/root/temp/cnstinfo/cretno"));
//					model.setValue("/root/send/srchinfo/orddd", model.getValue("/root/temp/cnstinfo/orddd"));
//					model.setValue("/root/send/srchinfo/prcpgenrflag", model.getValue("/root/temp/cnstinfo/prcpgenrflag"));
//					model.setValue("/root/send/srchinfo/rgstseqno", model.getValue("/root/temp/cnstinfo/rgstseqno"));

        //2010-02-02 회신 및 임시저장상태일경우 검사결과를 가져오지 않는다.
        var tmpstatflag = model.getValue("/root/main/nstinfo/nutrpninfo/statflag");   //상태
        if (tmpstatflag == "Z" ||  tmpstatflag == "D" ){      //회신 - 임시저장 상태
            //검사결과 가져오지 않는다
            //alert("검사결과 가져오지 않는다");
        }else{  
        	submit("TRADC02605");
        
        
        	if (model.getValue("/root/main/nstinfo/nutrpninfo/alb") =="" ) {
        		model.setValue("/root/main/nstinfo/nutrpninfo/alb", model.getValue("/root/init/examrslt/alb"));
                //2010-02-19 NST-PN 검사결과값 없을경우는 [-] 표시
        		if (model.getValue("/root/main/nstinfo/nutrpninfo/alb") =="")  model.setValue("/root/main/nstinfo/nutrpninfo/alb", "-");
        	}
        	if (model.getValue("/root/main/nstinfo/nutrpninfo/trf") =="" ) {
        		model.setValue("/root/main/nstinfo/nutrpninfo/trf", model.getValue("/root/init/examrslt/trf"));
                //2010-02-19 NST-PN 검사결과값 없을경우는 [-] 표시
        		if (model.getValue("/root/main/nstinfo/nutrpninfo/trf") =="")  model.setValue("/root/main/nstinfo/nutrpninfo/trf", "-");
        	}
        	if (model.getValue("/root/main/nstinfo/nutrpninfo/hb") =="" ) {
        		model.setValue("/root/main/nstinfo/nutrpninfo/hb", model.getValue("/root/init/examrslt/hb"));
                //2010-02-19 NST-PN 검사결과값 없을경우는 [-] 표시
        		if (model.getValue("/root/main/nstinfo/nutrpninfo/hb") =="")  model.setValue("/root/main/nstinfo/nutrpninfo/hb", "-");
        	}
        	if (model.getValue("/root/main/nstinfo/nutrpninfo/na") =="" ) {
        		model.setValue("/root/main/nstinfo/nutrpninfo/na", model.getValue("/root/init/examrslt/na"));
                //2010-02-19 NST-PN 검사결과값 없을경우는 [-] 표시
        		if (model.getValue("/root/main/nstinfo/nutrpninfo/na") =="")  model.setValue("/root/main/nstinfo/nutrpninfo/na", "-");
        	}
        	if (model.getValue("/root/main/nstinfo/nutrpninfo/k") =="" ) {
        		model.setValue("/root/main/nstinfo/nutrpninfo/k", model.getValue("/root/init/examrslt/k"));
                //2010-02-19 NST-PN 검사결과값 없을경우는 [-] 표시
        		if (model.getValue("/root/main/nstinfo/nutrpninfo/k") =="")  model.setValue("/root/main/nstinfo/nutrpninfo/k", "-");
        	}
        	if (model.getValue("/root/main/nstinfo/nutrpninfo/cl") =="" ) {
        		model.setValue("/root/main/nstinfo/nutrpninfo/cl", model.getValue("/root/init/examrslt/cl"));
                //2010-02-19 NST-PN 검사결과값 없을경우는 [-] 표시
        		if (model.getValue("/root/main/nstinfo/nutrpninfo/cl") =="")  model.setValue("/root/main/nstinfo/nutrpninfo/cl", "-");
        	}
        	//2010-02-04 검사결과 항목추가
        	if (model.getValue("/root/main/nstinfo/nutrpninfo/tlc") =="" ) {
        	    //2010-02-10 TLC 결과값 변경(=WBC count (LHR100) * Lymphocytes(LHR10503) /1000*100  변경)
        	    var wbc = model.getValue("/root/init/examrslt/wbc");
        	    var tlc = model.getValue("/root/init/examrslt/tlc");
        	    if ((wbc!="")&& (tlc!="")) {
        	        var calc_tlc = (wbc * tlc * 10 ).toString().getRound(-3,"HALF_UP")
        		    model.setValue("/root/main/nstinfo/nutrpninfo/tlc", calc_tlc);
        	    }
                //2010-02-19 NST-PN 검사결과값 없을경우는 [-] 표시
        		if (model.getValue("/root/main/nstinfo/nutrpninfo/tlc") =="")  model.setValue("/root/main/nstinfo/nutrpninfo/tlc", "-");
        	}
        	if (model.getValue("/root/main/nstinfo/nutrpninfo/hct") =="" ) {
        		model.setValue("/root/main/nstinfo/nutrpninfo/hct", model.getValue("/root/init/examrslt/hct"));
                //2010-02-19 NST-PN 검사결과값 없을경우는 [-] 표시
        		if (model.getValue("/root/main/nstinfo/nutrpninfo/hct") =="")  model.setValue("/root/main/nstinfo/nutrpninfo/hct", "-");
        	}
        	if (model.getValue("/root/main/nstinfo/nutrpninfo/rbp") =="" ) {
        		model.setValue("/root/main/nstinfo/nutrpninfo/rbp", model.getValue("/root/init/examrslt/rbp"));
                //2010-02-19 NST-PN 검사결과값 없을경우는 [-] 표시
        		if (model.getValue("/root/main/nstinfo/nutrpninfo/rbp") =="")  model.setValue("/root/main/nstinfo/nutrpninfo/rbp", "-");
        	}
        	if (model.getValue("/root/main/nstinfo/nutrpninfo/bun") =="" ) {
        		model.setValue("/root/main/nstinfo/nutrpninfo/bun", model.getValue("/root/init/examrslt/bun"));
                //2010-02-19 NST-PN 검사결과값 없을경우는 [-] 표시
        		if (model.getValue("/root/main/nstinfo/nutrpninfo/bun") =="")  model.setValue("/root/main/nstinfo/nutrpninfo/bun", "-");
        	}
        	if (model.getValue("/root/main/nstinfo/nutrpninfo/cr") =="" ) {
        		model.setValue("/root/main/nstinfo/nutrpninfo/cr", model.getValue("/root/init/examrslt/cr"));
                //2010-02-19 NST-PN 검사결과값 없을경우는 [-] 표시
        		if (model.getValue("/root/main/nstinfo/nutrpninfo/cr") =="")  model.setValue("/root/main/nstinfo/nutrpninfo/cr", "-");
        	}
        	if (model.getValue("/root/main/nstinfo/nutrpninfo/chol") =="" ) {
        		model.setValue("/root/main/nstinfo/nutrpninfo/chol", model.getValue("/root/init/examrslt/chol"));
                //2010-02-19 NST-PN 검사결과값 없을경우는 [-] 표시
        		if (model.getValue("/root/main/nstinfo/nutrpninfo/chol") =="")  model.setValue("/root/main/nstinfo/nutrpninfo/chol", "-");
        	}
        	if (model.getValue("/root/main/nstinfo/nutrpninfo/tg") =="" ) {
        		model.setValue("/root/main/nstinfo/nutrpninfo/tg", model.getValue("/root/init/examrslt/tg"));
                //2010-02-19 NST-PN 검사결과값 없을경우는 [-] 표시
        		if (model.getValue("/root/main/nstinfo/nutrpninfo/tg") =="")  model.setValue("/root/main/nstinfo/nutrpninfo/tg", "-");
        	}
        	if (model.getValue("/root/main/nstinfo/nutrpninfo/ca") =="" ) {
        		model.setValue("/root/main/nstinfo/nutrpninfo/ca", model.getValue("/root/init/examrslt/ca"));
                //2010-02-19 NST-PN 검사결과값 없을경우는 [-] 표시
        		if (model.getValue("/root/main/nstinfo/nutrpninfo/ca") =="")  model.setValue("/root/main/nstinfo/nutrpninfo/ca", "-");
        	}
        	if (model.getValue("/root/main/nstinfo/nutrpninfo/p") =="" ) {
        		model.setValue("/root/main/nstinfo/nutrpninfo/p", model.getValue("/root/init/examrslt/p"));
                //2010-02-19 NST-PN 검사결과값 없을경우는 [-] 표시
        		if (model.getValue("/root/main/nstinfo/nutrpninfo/p") =="")  model.setValue("/root/main/nstinfo/nutrpninfo/p", "-");
        	}
        	if (model.getValue("/root/main/nstinfo/nutrpninfo/mg") =="" ) {
        		model.setValue("/root/main/nstinfo/nutrpninfo/mg", model.getValue("/root/init/examrslt/mg"));
                //2010-02-19 NST-PN 검사결과값 없을경우는 [-] 표시
        		if (model.getValue("/root/main/nstinfo/nutrpninfo/mg") =="")  model.setValue("/root/main/nstinfo/nutrpninfo/mg", "-");
        	}
        	if (model.getValue("/root/main/nstinfo/nutrpninfo/uun") =="" ) {
        	    if (model.getValue("/root/init/examrslt/uun") !="") {
        		    model.setValue("/root/main/nstinfo/nutrpninfo/uun", (model.getValue("/root/init/examrslt/uun") * 0.476));
        	    }
                //2010-02-19 NST-PN 검사결과값 없을경우는 [-] 표시 - UUN은 Null일경우는 nbcalval(계산값) ='-'
        		if (model.getValue("/root/main/nstinfo/nutrpninfo/uun") =="")  model.setValue("/root/main/nstinfo/nutrpninfo/nbcalval", "-");
        	}
        	
    		fNstPatHtWt();      // 2010-05-10 임상관찰기록지 or 간호정보조사지 키와 체중 가져오기
    		        	
        }
	//LAB 결과값 조회 End
}

function fNstExamEn()
{
						// EN LAB 결과값 가져오기 Start
//						model.setValue("/root/send/srchinfo/formrecseq", model.getValue("/root/temp/cnstinfo/formrecseq"));
//						model.setValue("/root/send/srchinfo/pid", model.getValue("/root/temp/cnstinfo/pid"));
//						model.setValue("/root/send/srchinfo/cretno", model.getValue("/root/temp/cnstinfo/cretno"));
//						model.setValue("/root/send/srchinfo/orddd", model.getValue("/root/temp/cnstinfo/orddd"));
//						model.setValue("/root/send/srchinfo/prcpgenrflag", model.getValue("/root/temp/cnstinfo/prcpgenrflag"));
//						model.setValue("/root/send/srchinfo/rgstseqno", model.getValue("/root/temp/cnstinfo/rgstseqno"));
        //2010-02-02 회신 및 임시저장상태일경우 검사결과를 가져오지 않는다.
        var tmpstatflag = model.getValue("/root/main/ennstinfo/nutreninfo/statflag");   //상태
        if (tmpstatflag == "Z" ||  tmpstatflag == "D" ){      //회신 - 임시저장 상태
            //검사결과 가져오지 않는다
            //alert("검사결과 가져오지 않는다");
        }else{  

    		submit("TRADC02605");
    
    		if (model.getValue("/root/main/ennstinfo/nutreninfo/alb") =="" ) {
    			model.setValue("/root/main/ennstinfo/nutreninfo/alb", model.getValue("/root/init/examrslt/alb"));
    		}
    		if (model.getValue("/root/main/ennstinfo/nutreninfo/trf") =="" ) {
    			model.setValue("/root/main/ennstinfo/nutreninfo/trf", model.getValue("/root/init/examrslt/trf"));
    		}
    		if (model.getValue("/root/main/ennstinfo/nutreninfo/hb") =="" ) {
    			model.setValue("/root/main/ennstinfo/nutreninfo/hb", model.getValue("/root/init/examrslt/hb"));
    		}
    		if (model.getValue("/root/main/ennstinfo/nutreninfo/na") =="" ) {
    			model.setValue("/root/main/ennstinfo/nutreninfo/na", model.getValue("/root/init/examrslt/na"));
    		}
    		if (model.getValue("/root/main/ennstinfo/nutreninfo/k") =="" ) {
    			model.setValue("/root/main/ennstinfo/nutreninfo/k", model.getValue("/root/init/examrslt/k"));
    		}
    		if (model.getValue("/root/main/ennstinfo/nutreninfo/cl") =="" ) {
    			model.setValue("/root/main/ennstinfo/nutreninfo/cl", model.getValue("/root/init/examrslt/cl"));
    		}
        	//2010-02-04 검사결과 항목추가
        	if (model.getValue("/root/main/ennstinfo/nutreninfo/tlc") =="" ) {
        	    //2010-02-10 TLC 결과값 변경(=WBC count (LHR100) * Lymphocytes(LHR10503) /1000*100  변경)
        	    var wbc = model.getValue("/root/init/examrslt/wbc");
        	    var tlc = model.getValue("/root/init/examrslt/tlc");
        	    if ((wbc!="")&& (tlc!="")) {
        	        var calc_tlc = (wbc * tlc * 10 ).toString().getRound(-3,"HALF_UP")
        		    model.setValue("/root/main/ennstinfo/nutreninfo/tlc", calc_tlc);
        	    }        	
        	}
        	if (model.getValue("/root/main/ennstinfo/nutreninfo/hct") =="" ) {
        		model.setValue("/root/main/ennstinfo/nutreninfo/hct", model.getValue("/root/init/examrslt/hct"));
        	}
        	if (model.getValue("/root/main/ennstinfo/nutreninfo/rbp") =="" ) {
        		model.setValue("/root/main/ennstinfo/nutreninfo/rbp", model.getValue("/root/init/examrslt/rbp"));
        	}
        	if (model.getValue("/root/main/ennstinfo/nutreninfo/bun") =="" ) {
        		model.setValue("/root/main/ennstinfo/nutreninfo/bun", model.getValue("/root/init/examrslt/bun"));
        	}
        	if (model.getValue("/root/main/ennstinfo/nutreninfo/cr") =="" ) {
        		model.setValue("/root/main/ennstinfo/nutreninfo/cr", model.getValue("/root/init/examrslt/cr"));
        	}
        	if (model.getValue("/root/main/ennstinfo/nutreninfo/chol") =="" ) {
        		model.setValue("/root/main/ennstinfo/nutreninfo/chol", model.getValue("/root/init/examrslt/chol"));
        	}
        	if (model.getValue("/root/main/ennstinfo/nutreninfo/tg") =="" ) {
        		model.setValue("/root/main/ennstinfo/nutreninfo/tg", model.getValue("/root/init/examrslt/tg"));
        	}
        	if (model.getValue("/root/main/ennstinfo/nutreninfo/ca") =="" ) {
        		model.setValue("/root/main/ennstinfo/nutreninfo/ca", model.getValue("/root/init/examrslt/ca"));
        	}
        	if (model.getValue("/root/main/ennstinfo/nutreninfo/p") =="" ) {
        		model.setValue("/root/main/ennstinfo/nutreninfo/p", model.getValue("/root/init/examrslt/p"));
        	}
        	if (model.getValue("/root/main/ennstinfo/nutreninfo/mg") =="" ) {
        		model.setValue("/root/main/ennstinfo/nutreninfo/mg", model.getValue("/root/init/examrslt/mg"));
        	}    		
    		
    		fNstPatHtWt();      // 2010-05-10 임상관찰기록지 or 간호정보조사지 키와 체중 가져오기
    	}
		// LAB 결과값 가져오기 End

}

// 2010-05-10 임상관찰기록지 or 간호정보조사지 키와 체중 가져오기
function fNstPatHtWt(tmpNstNodepath)
{
    submit("TRADC02614");     //임상관찰기록지에 없을경우 간호정보사지의 키와체중가져온다      //nstnoedpath

    if(gv_CnstType == "PN") {
    	if (model.getValue("/root/main/nstinfo/nutrpninfo/ht") =="" ) {     //키
    		model.setValue("/root/main/nstinfo/nutrpninfo/ht", model.getValue("/root/init/pathtwtlist/patbdht"));
    	}    		
    	if (model.getValue("/root/main/nstinfo/nutrpninfo/wt") =="" ) {     //체중
    		model.setValue("/root/main/nstinfo/nutrpninfo/wt", model.getValue("/root/init/pathtwtlist/patbdwt"));
    	}    		
    	input82.dispatch("DOMFocusOut");
    	
    }else if(gv_CnstType == "EN") {
    	if (model.getValue("/root/main/ennstinfo/nutreninfo/ht") =="" ) {     //키
    		model.setValue("/root/main/ennstinfo/nutreninfo/ht", model.getValue("/root/init/pathtwtlist/patbdht"));
    	}    		
    	if (model.getValue("/root/main/ennstinfo/nutreninfo/wt") =="" ) {     //체중
    		model.setValue("/root/main/ennstinfo/nutreninfo/wt", model.getValue("/root/init/pathtwtlist/patbdwt"));
    	}    		
        input1.dispatch("DOMFocusOut");
        
    }else if(gv_CnstType == "EDU") {
    	if (model.getValue(tmpNstNodepath + "ht") =="" ) {     //키
    		model.setValue(tmpNstNodepath + "ht", model.getValue("/root/init/pathtwtlist/patbdht"));
    	}    		
    	if (model.getValue(tmpNstNodepath + "wt") =="" ) {     //체중
    		model.setValue(tmpNstNodepath + "wt", model.getValue("/root/init/pathtwtlist/patbdwt"));
    	}   
    	input155.dispatch("DOMFocusOut"); 		
    }else {
    	if (model.getValue(tmpNstNodepath + "ht") =="" ) {     //키
    		model.setValue(tmpNstNodepath + "ht", model.getValue("/root/init/pathtwtlist/patbdht"));
    	}    		
    	if (model.getValue(tmpNstNodepath + "wt") =="" ) {     //체중
    		model.setValue(tmpNstNodepath + "wt", model.getValue("/root/init/pathtwtlist/patbdwt"));
    	}    
    	input175.dispatch("DOMFocusOut"); 				
    }
    
}

function fCalcNbalance()
{
	var intake = model.getValue("/root/main/nstinfo/nutrpninfo/nbintake");
	var uun = model.getValue("/root/main/nstinfo/nutrpninfo/uun");
	var nbalance = intake - (uun * 1.2 + 2);

	model.setValue("/root/main/nstinfo/nutrpninfo/nbcalval", nbalance);

}



//2009-02-10 Wt Change kg / % 구하기 추가
function fCalcWtChangeEn() {
	var wt	= model.getValue("/root/main/ennstinfo/nutreninfo/wt");
	var ubw	= model.getValue("/root/main/ennstinfo/nutreninfo/ubw");
	var wtchngkg;
	var wtchngperc;

	wtchngkg =   ( wt - ubw  ).toString().getRound(-2,"HALF_UP")  ;
	wtchngperc	=  ( ( wt - ubw ) / ubw *100 ).toString().getRound(-2,"HALF_UP");

	model.setValue("/root/main/ennstinfo/nutreninfo/wtchngkg",	wtchngkg );			// Wt Change - kg
	model.setValue("/root/main/ennstinfo/nutreninfo/wtchngperc", 	wtchngperc );		// Wt Change %

	fCalcWeightEn();
}


//2010-01-11 Wt Change kg / % 구하기 추가
function fCalcWtChange() {
	var wt	        = model.getValue("/root/main/nstinfo/nutrpninfo/wt");
	var wtchngkg	= model.getValue("/root/main/nstinfo/nutrpninfo/wtchngkg");
	var wtchngperc;
	
    if (wt !="") {
        wtchngperc  = (wtchngkg /(wt-wtchngkg) * 100).toString().getRound(-2,"HALF_UP");     // Change %
        model.setValue("/root/main/nstinfo/nutrpninfo/wtchngprec", 	wtchngperc )            // Wt 
        if (wtchngperc == '0') model.setValue("/root/main/nstinfo/nutrpninfo/wtchngprec", 	"" );	//2010-01-26 0일경우 Null 처리 (0-> 회신내역에 출력됨)
    }else{
        model.setValue("/root/main/nstinfo/nutrpninfo/wtchngprec", 	"" );		// Wt 
    }
      
}



function fCalcFPNEn()
{
	var ov = model.getValue("/root/main/ennstinfo/nutreninfo/prot1");
	var ov2 = model.getValue("/root/main/ennstinfo/nutreninfo/prot2");

	model.setValue("/root/main/ennstinfo/nutreninfo/protcalc", ( ov*ov2).toString().getRound(-2,"HALF_UP"));

	var wt = model.getValue("/root/main/ennstinfo/nutreninfo/wt");
}

function fCalcNbalanceEn()
{
	var intake = model.getValue("/root/main/ennstinfo/nutreninfo/nbintake");
	var uun = model.getValue("/root/main/ennstinfo/nutreninfo/uun");
	var nbalance = ( intake - (uun * 1.2 + 2) ).toString().getRound(-2,"HALF_UP");

	model.setValue("/root/main/ennstinfo/nutreninfo/nbcalval", nbalance);
}
/*
	@ 미의뢰 회신 - 조회된 환자정보 변수 설정
*/
function fCretCnstinfo(){

	orddd 			= model.getValue("/root/main/patinfo/baseinfo/orddd");
	cretno 			= model.getValue("/root/main/patinfo/baseinfo/cretno");
	chosflag 		= model.getValue("/root/main/patinfo/baseinfo/prcpgenrflag");
	reqdeptcd 	= getUserInfo("dutplcecd");									// 미의뢰회신 : 의뢰과를 로그인 사용자의 부서로..
	requserid 	= getUserId();											// 미의뢰회신 : 의뢰자를 로그인 사용자로..
	//reqdeptcd 	= model.getValue("/root/main/patinfo/baseinfo/orddeptcd");	//2009-01-22  미의뢰회신 : 주치의 부서로..
	//requserid 	= model.getValue("/root/main/patinfo/baseinfo/orddrcd");		//2009-01-22  미의뢰회신 : 주치의로..
}

// 미의뢰 회신 - mmrchcnstinfo, adchcnstinfo 테이블 정보생성
function fSetCnstinfo(){
	model.makeValue("/root/main/nstinfo/nutrpninfo/cnstkind", 	cnstkind);
	model.makeValue("/root/main/nstinfo/nutrpninfo/orddd", 		orddd);
	model.makeValue("/root/main/nstinfo/nutrpninfo/cretno",		cretno);
	model.makeValue("/root/main/nstinfo/nutrpninfo/chosflag", 	chosflag);
	model.makeValue("/root/main/nstinfo/nutrpninfo/cnstflag", 	cnstflag);
	model.makeValue("/root/main/nstinfo/nutrpninfo/formcd", 		formcd);
	model.makeValue("/root/main/nstinfo/nutrpninfo/eryn", 			eryn);
	model.makeValue("/root/main/nstinfo/nutrpninfo/reqdeptcd",	reqdeptcd);
	model.makeValue("/root/main/nstinfo/nutrpninfo/requserid", 	requserid);
	model.makeValue("/root/main/nstinfo/nutrpninfo/reqdd", 		reqdd);
	model.makeValue("/root/main/nstinfo/nutrpninfo/reqhm", 		reqhm);
	model.makeValue("/root/main/nstinfo/nutrpninfo/prcpno", 		prcpno);
	model.makeValue("/root/main/nstinfo/nutrpninfo/prcpcd", 		prcpcd);
}

// 미의뢰 회신 - mmrchcnstinfo, adchcnstinfo 테이블 정보생성 ( EN )
function fSetCnstinfo_EN(tmpNstNodepath){
	model.makeValue(tmpNstNodepath + "cnstkind"     ,cnstkind);
	model.makeValue(tmpNstNodepath + "orddd"        ,orddd);
	model.makeValue(tmpNstNodepath + "cretno"       ,cretno);
	model.makeValue(tmpNstNodepath + "chosflag"     ,chosflag);
	model.makeValue(tmpNstNodepath + "cnstflag"     ,cnstflag);
	model.makeValue(tmpNstNodepath + "formcd"       ,formcd);
	model.makeValue(tmpNstNodepath + "eryn"         ,eryn);
	model.makeValue(tmpNstNodepath + "reqdeptcd"    ,reqdeptcd);
	model.makeValue(tmpNstNodepath + "requserid"    ,requserid);
	model.makeValue(tmpNstNodepath + "reqdd"        ,reqdd);
	model.makeValue(tmpNstNodepath + "reqhm"        ,reqhm);
	model.makeValue(tmpNstNodepath + "prcpno"       ,prcpno);
	model.makeValue(tmpNstNodepath + "prcpcd"       ,prcpcd);
}


// 추구관리  회신 - mmrchcnstinfo, adchcnstinfo 테이블 정보생성
function fSetCnstinfoPurs(tmpNstNodepath,tmpNewFlag){

    if (tmpNewFlag == "Y") {
    	model.makeValue(tmpNstNodepath + "cnstseqno"       ,"");	        // 추구관리-의뢰구분
    	model.makeValue(tmpNstNodepath + "formrecseq"      ,"");	        // 추구관리-formrecseq
        model.makeValue(tmpNstNodepath + "rgstseqno"       ,"");	        // 추구관리-"rgstseqno"	
    }        
	model.makeValue(tmpNstNodepath + "cnstkind"        ,"A");
	model.makeValue(tmpNstNodepath + "orddd"           ,model.getValue("/root/main/patinfo/baseinfo/orddd"));
	model.makeValue(tmpNstNodepath + "cretno"          ,model.getValue("/root/main/patinfo/baseinfo/cretno"));
	model.makeValue(tmpNstNodepath + "chosflag"        ,model.getValue("/root/main/patinfo/baseinfo/prcpgenrflag"));
	model.makeValue(tmpNstNodepath + "cnstflag"        ,cnstflag);
	model.makeValue(tmpNstNodepath + "formcd"          ,formcd);
	model.makeValue(tmpNstNodepath + "eryn"            ,eryn);
	model.makeValue(tmpNstNodepath + "reqdeptcd"       ,model.getValue("/root/main/patinfo/baseinfo/orddeptcd"));
	model.makeValue(tmpNstNodepath + "requserid"       ,model.getValue("/root/main/patinfo/baseinfo/orddrcd"));
	model.makeValue(tmpNstNodepath + "reqdd"           ,model.getValue("/root/main/patinfo/baseinfo/cnstdd").substring(0, 8));
	model.makeValue(tmpNstNodepath + "reqhm"           ,model.getValue("/root/main/patinfo/baseinfo/cnstdd").substring(9,12));
	model.makeValue(tmpNstNodepath + "prcpno"          ,model.getValue("/root/main/patinfo/baseinfo/prcpno"));
	model.makeValue(tmpNstNodepath + "prcpcd"          ,model.getValue("/root/main/patinfo/baseinfo/prcpcd"));
	
}


function fGetCodeList(submitID, code, targetNode){
	if(submitID == "TRADC02607"){
		model.setValue("/root/send/srchinfo/code", code);
		submit("TRADC02607");
	}else{
		submit("TRADC02608");
	}
	if(getNodesetCount("/root/temp/code/codelist") != 0){
		model.copyNode(targetNode, "/root/temp/code");
	}
}

function fGetNstDrCode(submitID, code,reqdd, targetNode){
	if(submitID == "TRADC02616"){
		model.setValue("/root/send/srchinfo/code", code);
		model.makeValue("/root/send/srchinfo/reqdd", reqdd);
		submit("TRADC02616");
	}
	if(getNodesetCount("/root/temp/code/codelist") != 0){
		model.copyNode(targetNode, "/root/temp/code");
	}
}

/*
	@ 기초대사량 설정 (Basal Energy Expenditure : BEE)
	  - 성별에 의해 설정되어지는 변수가 다름 
	
*/
function fSetBee(NstFlag){
	if(NstFlag == "PN"){
		if( isSearchString(gv_sex,"M")) {
			ipt_mbasembolkg.disabled 		= false;		// M : kg
			ipt_mbasembolcm.disabled 		= false;		// M : cm
			ipt_mbasembolyy.disabled 		= false;		// M : yr
			ipt_mbasembolcalc.disabled 	= false;	// M : 기초대사량
			ipt_wbasembolkg.disabled 		= true;		// W : kg
			ipt_wbasembolcm.disabled 		= true;		// W : cm
			ipt_wbasembolyy.disabled 		= true;		// W : yr
			ipt_wbasembolcalc.disabled 	= true;		// W : 기초대사량
			
			ipt_wbasembolcalc.visible 		= false;		// W : 기초대사량
			
			model.setValue("/root/init/pninfo/basembolinfolist/wbasembolkg", "");
			model.setValue("/root/init/pninfo/basembolinfolist/wbasembolcm", "");
			model.setValue("/root/init/pninfo/basembolinfolist/wbasembolyy", "");
			model.setValue("/root/init/pninfo/basembolinfolist/wbasembolcalc", "");
			model.setValue("/root/init/pninfo/basembolinfolist/mbasembolkg", model.getValue("/root/main/nstinfo/nutrpninfo/basembolkg"));
			model.setValue("/root/init/pninfo/basembolinfolist/mbasembolcm", model.getValue("/root/main/nstinfo/nutrpninfo/basembolcm"));
			model.setValue("/root/init/pninfo/basembolinfolist/mbasembolyy", model.getValue("/root/main/nstinfo/nutrpninfo/basembolyy"));
			model.setValue("/root/init/pninfo/basembolinfolist/mbasembolcalc", model.getValue("/root/main/nstinfo/nutrpninfo/basembolcalc"));
		}
		if( isSearchString(gv_sex,"F")) {
			ipt_mbasembolkg.disabled 		= true;
			ipt_mbasembolcm.disabled 		= true;
			ipt_mbasembolyy.disabled 		= true;
			ipt_mbasembolcalc.disabled 	= true;
			ipt_wbasembolkg.disabled 		= false;
			ipt_wbasembolcm.disabled 		= false;
			ipt_wbasembolyy.disabled 		= false;
			ipt_wbasembolcalc.disabled 	= false;
			
			ipt_mbasembolcalc.visible 		= false;
			
			model.setValue("/root/init/pninfo/basembolinfolist/wbasembolkg", model.getValue("/root/main/nstinfo/nutrpninfo/basembolkg"));
			model.setValue("/root/init/pninfo/basembolinfolist/wbasembolcm", model.getValue("/root/main/nstinfo/nutrpninfo/basembolcm"));
			model.setValue("/root/init/pninfo/basembolinfolist/wbasembolyy", model.getValue("/root/main/nstinfo/nutrpninfo/basembolyy"));
			model.setValue("/root/init/pninfo/basembolinfolist/wbasembolcalc", model.getValue("/root/main/nstinfo/nutrpninfo/basembolcalc"));
			model.setValue("/root/init/pninfo/basembolinfolist/mbasembolkg", "");
			model.setValue("/root/init/pninfo/basembolinfolist/mbasembolcm", "");
			model.setValue("/root/init/pninfo/basembolinfolist/mbasembolyy", "");
			model.setValue("/root/init/pninfo/basembolinfolist/mbasembolcalc", "");
		}
	}else if (NstFlag == "EN"){

		if( isSearchString(gv_sex,"M")) {
			ipt_mkg.disabled 						= false;
			ipt_mcm.disabled 					= false;
			ipt_myr.disabled 						= false;
			ipt_mtotal.disabled 					= false;
			ipt_wkg.disabled 						= true;
			ipt_wcm.disabled 					= true;
			ipt_wyr.disabled 						= true;
			ipt_wtotal.disabled 					= true;
			ipt_wtotal.visible 						= false;
			model.setValue("/root/init/eninfo/basembolinfolist/wbasembolkg", "");
			model.setValue("/root/init/eninfo/basembolinfolist/wbasembolcm", "");
			model.setValue("/root/init/eninfo/basembolinfolist/wbasembolyy", "");
			model.setValue("/root/init/eninfo/basembolinfolist/wbasembolcalc", "");
			model.setValue("/root/init/eninfo/basembolinfolist/mbasembolkg", model.getValue("/root/main/ennstinfo/nutreninfo/basembolkg"));
			model.setValue("/root/init/eninfo/basembolinfolist/mbasembolcm", model.getValue("/root/main/ennstinfo/nutreninfo/basembolcm"));
			model.setValue("/root/init/eninfo/basembolinfolist/mbasembolyy", model.getValue("/root/main/ennstinfo/nutreninfo/basembolyy"));
			model.setValue("/root/init/eninfo/basembolinfolist/mbasembolcalc", model.getValue("/root/main/ennstinfo/nutreninfo/basembolcalc"));
		}
		if( isSearchString(gv_sex,"F")) {
			ipt_mkg.disabled 						= true;
			ipt_mcm.disabled 					= true;
			ipt_myr.disabled 						= true;
			ipt_mtotal.disabled 					= true;
			ipt_wkg.disabled 						= false;
			ipt_wcm.disabled 					= false;
			ipt_wyr.disabled 						= false;
			ipt_wtotal.disabled 					= false;
			ipt_mtotal.visible 						= false;
			model.setValue("/root/init/eninfo/basembolinfolist/wbasembolkg", model.getValue("/root/main/ennstinfo/nutreninfo/basembolkg"));
			model.setValue("/root/init/eninfo/basembolinfolist/wbasembolcm", model.getValue("/root/main/ennstinfo/nutreninfo/basembolcm"));
			model.setValue("/root/init/eninfo/basembolinfolist/wbasembolyy", model.getValue("/root/main/ennstinfo/nutreninfo/basembolyy"));
			model.setValue("/root/init/eninfo/basembolinfolist/wbasembolcalc", model.getValue("/root/main/ennstinfo/nutreninfo/basembolcalc"));
			model.setValue("/root/init/eninfo/basembolinfolist/mbasembolkg", "");
			model.setValue("/root/init/eninfo/basembolinfolist/mbasembolcm", "");
			model.setValue("/root/init/eninfo/basembolinfolist/mbasembolyy", "");
			model.setValue("/root/init/eninfo/basembolinfolist/mbasembolcalc", "");
		}
	}
}

/*
	@ 필요열량 설정 (Total Caloric Need : TCN)
	  - 기존에 선택된 항목에 의해 설정되는 변수가 상이함
*/
function	fSetTCN(NstFlag){
	if(	NstFlag == "PN"){

		// 노드 초기화
		
		model.resetInstanceNode("/root/init/pninfo/needcalrlist");
		/*
			필요열량 선택값 (radio button) -  /root/main/nstinfo/nutrpninfo/needcalrflag
		*/
		if( model.getValue("/root/main/nstinfo/nutrpninfo/needcalrflag") == "1" ) {
			model.setValue("/root/init/pninfo/needcalrlist/needcalr1", model.getValue("/root/main/nstinfo/nutrpninfo/needcalr1"));
			model.setValue("/root/init/pninfo/needcalrlist/needcalr2", model.getValue("/root/main/nstinfo/nutrpninfo/needcalr2"));
		}
		if( model.getValue("/root/main/nstinfo/nutrpninfo/needcalrflag") == "2" ) {
			model.setValue("/root/init/pninfo/needcalrlist/needcalr3", model.getValue("/root/main/nstinfo/nutrpninfo/needcalr1"));
			model.setValue("/root/init/pninfo/needcalrlist/needcalr4", model.getValue("/root/main/nstinfo/nutrpninfo/needcalr2"));
			model.setValue("/root/init/pninfo/needcalrlist/needcalr5", model.getValue("/root/main/nstinfo/nutrpninfo/needcalr3"));
			model.setValue("/root/init/pninfo/needcalrlist/needcalr6", model.getValue("/root/main/nstinfo/nutrpninfo/needcalrcalc"));
		}
		if( model.getValue("/root/main/nstinfo/nutrpninfo/needcalrflag") == "3" ) {
			model.setValue("/root/init/pninfo/needcalrlist/needcalr7", model.getValue("/root/main/nstinfo/nutrpninfo/needcalr1"));
			model.setValue("/root/init/pninfo/needcalrlist/needcalr8", model.getValue("/root/main/nstinfo/nutrpninfo/needcalr2"));
			model.setValue("/root/init/pninfo/needcalrlist/needcalr9", model.getValue("/root/main/nstinfo/nutrpninfo/needcalr3"));
			model.setValue("/root/init/pninfo/needcalrlist/needcalr10", model.getValue("/root/main/nstinfo/nutrpninfo/needcalr4"));
			model.setValue("/root/init/pninfo/needcalrlist/needcalr11", model.getValue("/root/main/nstinfo/nutrpninfo/needcalrcalc"));
		}
		if( model.getValue("/root/main/nstinfo/nutrpninfo/needcalrflag") == "4" ) {
			model.setValue("/root/init/pninfo/needcalrlist/needcalr12", model.getValue("/root/main/nstinfo/nutrpninfo/needcalr1"));
			model.setValue("/root/init/pninfo/needcalrlist/needcalr13", model.getValue("/root/main/nstinfo/nutrpninfo/needcalr2"));
			model.setValue("/root/init/pninfo/needcalrlist/needcalr14", model.getValue("/root/main/nstinfo/nutrpninfo/needcalr3"));
			model.setValue("/root/init/pninfo/needcalrlist/needcalr15", model.getValue("/root/main/nstinfo/nutrpninfo/needcalr4"));
			model.setValue("/root/init/pninfo/needcalrlist/needcalr16", model.getValue("/root/main/nstinfo/nutrpninfo/needcalr5"));
			model.setValue("/root/init/pninfo/needcalrlist/needcalr17", model.getValue("/root/main/nstinfo/nutrpninfo/needcalrcalc"));
		}
	}else if (NstFlag == "EN"){
		// 노드 초기화
		model.resetInstanceNode("/root/init/eninfo/needcalrlist");
		
		/*
			필요열량 선택값 (radio button) -  /root/main/nstinfo/nutrpninfo/needcalrflag
		*/
		if( model.getValue("/root/main/ennstinfo/nutreninfo/needcalrflag") == "1" ) {
			model.setValue("/root/init/eninfo/needcalrlist/needcalr1", model.getValue("/root/main/ennstinfo/nutreninfo/needcalr1"));
			model.setValue("/root/init/eninfo/needcalrlist/needcalr2", model.getValue("/root/main/ennstinfo/nutreninfo/needcalr2"));
		}
		if( model.getValue("/root/main/ennstinfo/nutreninfo/needcalrflag") == "2" ) {
			model.setValue("/root/init/eninfo/needcalrlist/needcalr3", model.getValue("/root/main/ennstinfo/nutreninfo/needcalr1"));
			model.setValue("/root/init/eninfo/needcalrlist/needcalr4", model.getValue("/root/main/ennstinfo/nutreninfo/needcalr2"));
			model.setValue("/root/init/eninfo/needcalrlist/needcalr5", model.getValue("/root/main/ennstinfo/nutreninfo/needcalr3"));
			model.setValue("/root/init/eninfo/needcalrlist/needcalr6", model.getValue("/root/main/ennstinfo/nutreninfo/needcalrcalc"));
		}
		if( model.getValue("/root/main/ennstinfo/nutreninfo/needcalrflag") == "3" ) {
			model.setValue("/root/init/eninfo/needcalrlist/needcalr7", model.getValue("/root/main/ennstinfo/nutreninfo/needcalr1"));
			model.setValue("/root/init/eninfo/needcalrlist/needcalr8", model.getValue("/root/main/ennstinfo/nutreninfo/needcalr2"));
			model.setValue("/root/init/eninfo/needcalrlist/needcalr9", model.getValue("/root/main/ennstinfo/nutreninfo/needcalr3"));
			model.setValue("/root/init/eninfo/needcalrlist/needcalr10", model.getValue("/root/main/ennstinfo/nutreninfo/needcalr4"));
			model.setValue("/root/init/eninfo/needcalrlist/needcalr11", model.getValue("/root/main/ennstinfo/nutreninfo/needcalrcalc"));
		}
		if( model.getValue("/root/main/ennstinfo/nutreninfo/needcalrflag") == "4" ) {
			model.setValue("/root/init/eninfo/needcalrlist/needcalr12", model.getValue("/root/main/ennstinfo/nutreninfo/needcalr1"));
			model.setValue("/root/init/eninfo/needcalrlist/needcalr13", model.getValue("/root/main/ennstinfo/nutreninfo/needcalr2"));
			model.setValue("/root/init/eninfo/needcalrlist/needcalr14", model.getValue("/root/main/ennstinfo/nutreninfo/needcalr3"));
			model.setValue("/root/init/eninfo/needcalrlist/needcalr15", model.getValue("/root/main/ennstinfo/nutreninfo/needcalr4"));
			model.setValue("/root/init/eninfo/needcalrlist/needcalr16", model.getValue("/root/main/ennstinfo/nutreninfo/needcalr5"));
			model.setValue("/root/init/eninfo/needcalrlist/needcalr17", model.getValue("/root/main/ennstinfo/nutreninfo/needcalrcalc"));
		}
	}
}

/*
	@ 기타 항목 설정
*/
function fSetEtc(NstFlag){
	if(NstFlag == "PN"){
		// 기준체중 설정
		if(model.getValue("/root/main/nstinfo/nutrpninfo/basewtflag") == "")
		{
			model.setValue("/root/main/nstinfo/nutrpninfo/basewtflag", "1");
		}
		// 필요열량 기본값 설정
		/* 필요열량 기본값 설정 막음 - 2009-11-13 - 안혜진약사 요청
		if(model.getValue("/root/main/nstinfo/nutrpninfo/needcalrflag") == "")
		{
			model.setValue("/root/main/nstinfo/nutrpninfo/needcalrflag", "1");
		}
		*/


		// 의뢰일자 설정
		var reqddstr = model.getValue("/root/main/patinfo/baseinfo/reqdd");

		if(reqddstr == "" || reqddstr == null){
		    //2010-02-01 미의뢰시 의뢰일자 없음 . 회신일자 기준. 회신일자 없을경우 오늘일자로 계산처리.(변경전:reqddstr = getCurrentDate();)
		    reqddstr = model.getValue("/root/main/patinfo/baseinfo/repldd");        //회신일자
		    if(reqddstr == "" || reqddstr == null) reqddstr = getCurrentDate();
		}

		var brthddstr = model.getValue("/root/main/patinfo/baseinfo/brthdd");
		var age = parseInt(reqddstr.substring(0, 4)) - parseInt(brthddstr.substring(0, 4));

		if(reqddstr.substr(4, 7) <=  brthddstr.substring(4, 7))
		{
			age = parseInt(age) - 1;
		}
		model.setValue("/root/init/pninfo/basembolinfolist/age", age);

		if(model.getValue("/root/main/nstinfo/nutrpninfo/execdd") == ""){
			model.setValue("/root/main/nstinfo/nutrpninfo/execdd", getCurrentDate());
		}

		var wt = model.getValue("/root/main/nstinfo/nutrpninfo/wt");
		var ibw = model.getValue("/root/main/nstinfo/nutrpninfo/ibw");
		model.setValue("/root/temp/ibwper", wt / ibw * 100);
		if (wt !=""){
		    model.setValue("/root/main/nstinfo/nutrpninfo/pibw", wt / ibw * 100);        //2010-01-13 PIBW 계산 - iBW %와 동일처리한다
		}else{
		    model.setValue("/root/main/nstinfo/nutrpninfo/pibw", "");        //2010-01-13 PIBW 계산 - iBW %와 동일처리한다
	    }
	}else if(NstFlag == "EN"){
	
		if(model.getValue("/root/main/ennstinfo/nutreninfo/basewtflag") == "")
		{
			model.setValue("/root/main/ennstinfo/nutreninfo/basewtflag", "1");
		}
		
		if(model.getValue("/root/main/ennstinfo/nutreninfo/needcalrflag") == "")
		{
			model.setValue("/root/main/ennstinfo/nutreninfo/needcalrflag", "1");
		}

		var brthddstr = model.getValue("/root/main/patinfo/baseinfo/brthdd");

		var reqddstr = model.getValue("/root/main/patinfo/baseinfo/reqdd");

        //2010-02-01 미의뢰시 의뢰일자 없음 . 회신일자 기준. 회신일자 없을경우 오늘일자로 계산처리.
		if(reqddstr == "" || reqddstr == null){
		    reqddstr = model.getValue("/root/main/patinfo/baseinfo/repldd");        //회신일자
		    if(reqddstr == "" || reqddstr == null) reqddstr = getCurrentDate();
		}

		var age = parseInt(reqddstr.substring(0, 4)) - parseInt(brthddstr.substring(0, 4));

		if(reqddstr.substr(4, 7) <=  brthddstr.substring(4, 7))
		{
			age = parseInt(age) - 1;
		}

		model.setValue("/root/init/eninfo/basembolinfolist/age", age);

		if(model.getValue("/root/main/ennstinfo/nutreninfo/execdd") == "") model.setValue("/root/main/ennstinfo/nutreninfo/execdd", getCurrentDate());

		if(model.getValue("/root/main/ennstinfo/nutreninfo/dieterid") == "" || model.getValue("/root/main/ennstinfo/nutreninfo/dieterid") == "1")
		{
			model.setValue("/root/main/ennstinfo/nutreninfo/dieterid", getUserId());
		}
		var wt = model.getValue("/root/main/ennstinfo/nutreninfo/wt");
		var ibw = model.getValue("/root/main/ennstinfo/nutreninfo/ibw");
		model.setValue("/root/temp/ibwper", wt / ibw * 100);
	}
}

/*
	@ 당투여속도량 계산  (계산식에 의한 계산)
*/
function fCalDexwDrugSpd(){
	//var vol = model.getValue("/root/main/nstinfo/nutrpninfo/waterreqvol");   //2008-10-01 김은희약사 ( Vol = 수분요구량이 아닌 Order Volume 이라고 함)
	var vol =model.getValue("/root/main/nstinfo/nutrpninfo/prot1");
	var wt = model.getValue("/root/main/nstinfo/nutrpninfo/wt");
	
	switch(model.getValue("/root/init/calc"))
	{
		case "1" :
		{
			var drugspd = ((250 * vol) / (1440 * wt)).toString().getRound( -3,"HALF_UP");
			model.setValue("/root/main/nstinfo/nutrpninfo/dexwdrugspd", drugspd);  
			break;
		}
		case "2" :
		{
			var drugspd = ((150 * vol) / (1440 * wt)).toString().getRound( -3,"HALF_UP");
			model.setValue("/root/main/nstinfo/nutrpninfo/dexwdrugspd", drugspd);
			break;
		}
		case "3" :
		{
			var drugspd = ((100 * vol) / (1440 * wt)).toString().getRound( -3,"HALF_UP");
			model.setValue("/root/main/nstinfo/nutrpninfo/dexwdrugspd", drugspd);
			break;
		}
		case "4" :
		{
			var drugspd = ((135 * vol) / (1440 * wt)).toString().getRound( -3,"HALF_UP");
			model.setValue("/root/main/nstinfo/nutrpninfo/dexwdrugspd", drugspd);
			break;
		}
		case "5" :
		{
			var drugspd = ((120 * vol) / (1440 * wt)).toString().getRound( -3,"HALF_UP");
			model.setValue("/root/main/nstinfo/nutrpninfo/dexwdrugspd", drugspd);
			break;
		}
		case "6" :
		{
			var drugspd = ((160 * vol) / (1440 * wt)).toString().getRound( -3,"HALF_UP");
			model.setValue("/root/main/nstinfo/nutrpninfo/dexwdrugspd", drugspd);
			break;
		}
		case "7" :
		{
			var drugspd = ((200 * vol) / (1440 * wt)).toString().getRound( -3,"HALF_UP");
			model.setValue("/root/main/nstinfo/nutrpninfo/dexwdrugspd", drugspd);
			break;
		}
		case "8" :
		{
			var drugspd = ((160 * vol) / (1440 * wt)).toString().getRound( -3,"HALF_UP");
			model.setValue("/root/main/nstinfo/nutrpninfo/dexwdrugspd", drugspd);
			break;
		}
		case "9" :
		{
			var drugspd = ((67 * vol) / (1440 * wt)).toString().getRound( -3,"HALF_UP");
			model.setValue("/root/main/nstinfo/nutrpninfo/dexwdrugspd", drugspd);
			break;
		}
		case "10" :
		{
			var drugspd = ((65* vol) / (1440 * wt)).toString().getRound( -3,"HALF_UP");
			model.setValue("/root/main/nstinfo/nutrpninfo/dexwdrugspd", drugspd);
			break;
		}
		case "11" :
		{
			var drugspd = ((120 * vol) / (1440 * wt)).toString().getRound( -3,"HALF_UP");
			model.setValue("/root/main/nstinfo/nutrpninfo/dexwdrugspd", drugspd);
			break;
		}
	}
}
/*
	@ 당투여속도량 계산 (NST 마스터(ast.adbmtpncd-혼합후 dextrose)에 의한 계산) 201-02-23
	  당투여속도 =   (혼합후 dextrose %) * ordervolume* 10 / (1440*현재 체중)
*/
function fCalDexwDrugSpdTPNCD(){
	var dexrate = "";
	for(i = 1; i <= cmb_nstcode.length; i++){
		if(cmb_nstcode.value == model.getValue("/root/init/codelist/nstcode/codelist["+i+"]/cdnm")){
			dexrate 			= model.getValue("/root/init/codelist/nstcode/codelist["+i+"]/dexrate");
        	var vol = model.getValue("/root/main/nstinfo/nutrpninfo/prot1");         //OrderVolume
        	var wt  = model.getValue("/root/main/nstinfo/nutrpninfo/wt");            //현재체중
			var drugspd = (dexrate * vol * 10 / (1440 * wt)).toString().getRound( -3,"HALF_UP");
			model.setValue("/root/main/nstinfo/nutrpninfo/dexwdrugspd", drugspd);
			break;
		}
	}	    
}
/*	
	@체크박스의 값을 분리하여 쉼표(,) 삽입  
*/
function splitChkBox(ctrlid){
	var value= "";
	var sep = ctrlid.attribute("sep");
	var tmp_value = ctrlid.label.split(sep);
	for(var i = 0; i < tmp_value.length; i++){
		if(value != "") value += ", ";
		value += tmp_value[i];
	}
	return value;
}

/*	
	@ 성별을 체크하여 BEE 계산수식을 반환한다.
*/
function chkBee(){
	if(gv_sex == "M"){
		var manbee 		= caption270.label + " " + ipt_mbasembolkg.label+ caption268.label +" " + ipt_mbasembolcm.label +caption140.label+" " +  ipt_mbasembolyy.label+caption81.label+" " +ipt_mbasembolcalc.label  ;
		 return manbee;
	}else if(gv_sex == "F"){
		var womenbee 	= caption275.label + " " + ipt_wbasembolkg.label + caption276.label + " " + ipt_wbasembolcm.label + caption282.label + " " + ipt_wbasembolyy.label + caption69.label+ " " +ipt_wbasembolcalc.label;
	 	return womenbee;
	 }
}

/*	
	@ 체크구분값을 판별하여 TCN값을 반환한다.
*/

function chkTcn(){
	var TCN = "";
	if(rdo_needcalrflag.value == "1"){					
		TCN = ipt_needcalr1.label +" "+ caption261.label + input5.label + caption263.label+" "+ caption234.label+" "+ input16.label + caption232.label;
	}else if(rdo_needcalrflag.value == "2"){		
		TCN = ipt_needcalr3.label + caption133.label+caption182.label +cmb_needcalr4.value + caption162.label + cmb_needcalr5.value +" "+ caption108.label+" "+ipt_needcalr6.label+caption157.label;
	}else if(rdo_needcalrflag.value == "3"){
		if(cmb_needcalr10.value == "0.2"){
		TCN = ipt_needcalr7.label + caption285.label+" "+caption257.label +" "+ cmb_needcalr8.value + caption323.label + ipt_needcalr9.label + caption324.label+" "+caption225.label+" "+cmb_needcalr10.value+"(TF) "+caption211.label+" "+ipt_needcalr11.label+caption195.label+caption210.label;
		}else{
		TCN = ipt_needcalr7.label + caption285.label+" "+caption257.label +" "+ cmb_needcalr8.value + caption323.label + ipt_needcalr9.label + caption324.label+" "+caption225.label+" "+cmb_needcalr10.value+"(WF) "+caption211.label+" "+ipt_needcalr11.label+caption195.label+caption210.label;
		}
	}else if(rdo_needcalrflag.value == "4"){
		TCN = caption149.label + ipt_needcalr12.label + caption89.label + ipt_needcal13.label + caption269.label + cmb_needcalr14.label+caption148.label+cmb_needcalr15.label+caption226.label+cmb_needcalr16.label+" "+caption326.label+" "+ipt_needcalr17.label+caption44.label;
	}
	return TCN;
}

/*
	@ 소아기준표 팝업 
*/

function popChildBaseTable(){

	modal("SPANC00305");
	if(gv_CnstType == "PN"){
		input90.value = model.getValue("/root/main/maindata/nutrstatjudg/physmeasibw");
		input90.refresh();
	    fCalcWeightEx();
	}else if(gv_CnstType == "EN"){
		input203.value = model.getValue("/root/main/maindata/nutrstatjudg/physmeasibw");
		input203.refresh();
	    fCalcWeightEx();
	}else if(gv_CnstType == "EDU"){     //2010-01-14 교육의뢰 
		input151.value = model.getValue("/root/main/maindata/nutrstatjudg/physmeasibw");
		input151.refresh();
	    fCalcWeightEx_EduPurs(gv_CnstType,NstNodepathINIT, NstNodepath);
	}else {                             //2010-01-14 추구관리
		input116.value = model.getValue("/root/main/maindata/nutrstatjudg/physmeasibw");
		input116.refresh();
	    fCalcWeightEx_EduPurs(gv_CnstType,pursNstNodepathINIT, pursNstNodepath);
	}
	 //fCalcWeightEx(); //2010-01-014 교육의뢰/추구관리 추가 각각 부분별로 이동
	 model.refresh();
	
}

/*
	@ 문단 정렬 (들여쓰기)
	fSrotWord
	 - tab 				: tab 길이
	 - word 			: 정렬하고자 하는 문장
	 - maxlength 	: 문장최대길이
	 - tabyn 			: 들여쓰기 여부
*/

function fSortWord(tab, word, maxlength,tabyn){	
	// 1.엔터 구분자로 분리
	var wordRow = word.split("\n");
	var returnStr = "";
	
	if(maxlength == "" || maxlength == null) maxlength = "70";
	
	if(tabyn == "" || tabyn == null) tabyn = "Y";
	
	for(var i = 0; i < wordRow.length; i++){
		// 2. 해당 row가 null이면 다음 row로 넘어감
		if(wordRow[i] == "") continue;
		var tempStr = "";
		var index = "0";
		var breakflag = true;
		
		while(breakflag){
		// 3-1. 해당 row가 최대 글자수를 넘었을 때
			if((wordRow[i].length > maxlength) && (wordRow[i]!= "")){
				var tmprow = wordRow[i].substr(0,maxlength);
				var nextIndex = "";
				
				/*
					4. 단어 완성 (최대글자수에서 우측의 공백을 조사하여 index설정)
					 - 우측에 공백이 존재할땐 최대길이만큼 문자열을 자름
					 - 우측에 공백이 존재하지 않을땐 이전의 공백까지 문자열을 자름 
				*/
				if(wordRow[i].substr(maxlength,1) != "") {
					
					nextIndex = getSearchStringRight(tmprow, " ");
					
					if(nextIndex <= 0) {	// 공백이 존재 하지 않을때 최대길이만큼 문자열을 자름
						nextIndex = maxlength;	
					}
				}else{
					nextIndex = maxlength;	
				}
				
				var row = wordRow[i].substr(0,nextIndex).getTrim();
				
				wordRow[i] = wordRow[i].substr(nextIndex, wordRow[i].length);
				if(tempStr != "") tempStr += "\n";
				if(tabyn == "Y") tempStr += tab;
				tempStr += row;
				
		// 3-2. 해당 row가 최대 글자수를 넘지 않았을때	(종료)
			}else{
				if(tempStr != "" && wordRow[i]!= "") tempStr += "\n";
				if(tabyn == "Y") tempStr += tab;
				tempStr += wordRow[i].getTrim();
				breakflag = false;
			}
		}
		
		if(returnStr != "") returnStr += "\n";
			returnStr += tempStr;
	}
	return(returnStr);
}

/*
	@ NST PN  추구관리 [+] 버튼 클릭시 - 2009-12-18

		#parameter
			- tmpflag		: pn(=PN)/en(=EN)/교육의뢰(=EDU)  구분 
			- pursflag		: PURS 추구관리
*/
function fPursuit(tmpflag, pursflag, tmpNstNodepathMain, tmpNstNodepath){
       
       model.setValue("/root/send/srchrgstseqnoinfo/pid"        , model.getValue("/root/temp/cnstinfo/pid"));          //pid
       model.setValue("/root/send/srchrgstseqnoinfo/formrecseq" , gv_formrecseq);   //formrecseq
       model.setValue("/root/send/srchrgstseqnoinfo/nstgubun"   , tmpflag);
       submit("TRADC02610");

       if (getNodesetCount("/root/hidden/rgstseqnolist") == "0" ) {
            messageBox("[추구관리] 진행불가 상태입니다. 상태를 ","I007");
            return;
        }

    	var rgstseqno = model.getValue("/root/main/patinfo/rgstseqnolist[1]/rgstseqno");
    	var node_cnt = getNodesetCount("/root/main/patinfo/rgstseqnolist");
    	node_cnt++;
    	model.makeNode("/root/main/patinfo/rgstseqnolist["+node_cnt+"]");
    	model.makeNode("/root/main/patinfo/rgstseqnolist["+node_cnt+"]/rgstseqno");

    	while(node_cnt != "1"){
    		var tmp_nodecnt = node_cnt - 1;
    		model.copyNode("/root/main/patinfo/rgstseqnolist["+node_cnt+"]", "/root/main/patinfo/rgstseqnolist["+tmp_nodecnt+"]");
    		node_cnt--;
    	}
    	
    	model.makeValue("/root/main/patinfo/rgstseqnolist[1]/rgstseqno", model.getValue("/root/hidden/rgstseqnolist/pursseqret/rgstseqno"));
       model.setValue("/root/send/srchinfo/rgstseqno", model.getValue("/root/hidden/rgstseqnolist/pursseqret/rgstseqno"));
        
    	//2009-12-17 추구관리 조회시 [추구관리 표시]/ 조회 adchcnstinfo - cnstcnts10 = 'PURS'
    	model.removeNodeset(tmpNstNodepathMain + "nutrpninfo/pursflag");
    	model.makeValue(tmpNstNodepathMain + "nutrpninfo/cnstkind","A");	                // 추구관리 Set
    	model.makeValue(tmpNstNodepathMain + "nutrpninfo/pursflag","PURS");	            // 추구관리 Set
    	model.makeValue(tmpNstNodepathMain + "nutrpninfo/pursseq",model.getValue("/root/hidden/rgstseqnolist/pursseqret/pursseq"))	;	    // 추구관리 Set
    	if (tmpflag == "PN") out_pn_purs.attribute("text")="[ 추구관리 : " + model.getValue("/root/hidden/rgstseqnolist/pursseqret/pursseq") + " ]";
    	else out_en_purs.attribute("text")="[ 추구관리 : " + model.getValue("/root/hidden/rgstseqnolist/pursseqret/pursseq") + " ]";
    
    	model.setValue(tmpNstNodepathMain + "nutrpninfo/execdd", getCurrentDate());	    // 수행일자 오늘일자로
    	model.setValue("/root/hidden/cnststatinfo/cnststat","");		                // 의뢰건의 consult 상태 체크
    	
   	
    	/*
    	* 추구관리 신규발생시 
    	* ast.adchcnstinfo에 정보 저장 하기 (  cnstcnts10(추구관리-구분)  cnstcnts11(추구관리-원Formrecseq) cnstcnts12(추구관리-순번))
    	*/
    	model.makeValue(tmpNstNodepathMain + "nutrpninfo/cnstseqno", "");	                // 추구관리-의뢰구분
    	model.makeValue(tmpNstNodepathMain + "nutrpninfo/formrecseq", "");	                // 추구관리-formrecseq
    	model.makeValue(tmpNstNodepathMain + "adchcnstinfo/cnstcnts10" , "PURS");	        // 추구관리-구분
    	model.makeValue(tmpNstNodepathMain + "adchcnstinfo/cnstcnts11" , gv_formrecseq);	// 추구관리-원Formrecseq
    	model.makeValue(tmpNstNodepathMain + "adchcnstinfo/cnstnewflag", "Y");	            // 추구관리-신규여부 확인
    	
    	/* @ 약사 이름 설정 */
    	model.setValue(tmpNstNodepathMain + "nutrpninfo/pharmstnm" , getUserName());  	    //작성자이름
    	model.setValue(tmpNstNodepathMain + "nutrpninfo/pharmstid" , getUserId());		    //작성자 ID
    	/* @ 회신약사 이름 설정 */
    	//fSetReplNm();
    	model.setValue(tmpNstNodepathMain + "nutrpninfo/replnm", "");  			            //회신자이름
    	model.setValue(tmpNstNodepathMain + "nutrpninfo/replid", "");				        //회신자 ID
    	// 회신자 id 전역변수 설정
        /*								gv_replid = model.getValue(NstNodepathMain + "nutrpninfo/replid");
        */			
      model.setValue(tmpNstNodepathMain + "nutrpninfo/drugplan","");			            // 투여계획
	    model.setValue(tmpNstNodepathMain + "nutrpninfo/suplplanetc","");		            // 기타
	    model.setValue(tmpNstNodepathMain + "nutrpninfo/statflag","");			            // 상태

        // 2010-02-19 추구관리 NEW 버튼 클릭시 최신검사결과값 가져오기 START (clear후 submit("TRADC02605")Call)
			model.setValue(tmpNstNodepathMain + "nutrpninfo/alb"        ,"");
			model.setValue(tmpNstNodepathMain + "nutrpninfo/tlc"        ,"");
			model.setValue(tmpNstNodepathMain + "nutrpninfo/hb"         ,"");
			model.setValue(tmpNstNodepathMain + "nutrpninfo/hct"        ,"");
			model.setValue(tmpNstNodepathMain + "nutrpninfo/trf"        ,"");
			model.setValue(tmpNstNodepathMain + "nutrpninfo/rbp"        ,"");
			model.setValue(tmpNstNodepathMain + "nutrpninfo/na"         ,"");
			model.setValue(tmpNstNodepathMain + "nutrpninfo/k"          ,"");
			model.setValue(tmpNstNodepathMain + "nutrpninfo/cl"         ,"");
			model.setValue(tmpNstNodepathMain + "nutrpninfo/bun"        ,"");
			model.setValue(tmpNstNodepathMain + "nutrpninfo/cr"         ,"");
			model.setValue(tmpNstNodepathMain + "nutrpninfo/chol"       ,"");
			model.setValue(tmpNstNodepathMain + "nutrpninfo/tg"         ,"");
			model.setValue(tmpNstNodepathMain + "nutrpninfo/ca"         ,"");
			model.setValue(tmpNstNodepathMain + "nutrpninfo/p"          ,"");
			model.setValue(tmpNstNodepathMain + "nutrpninfo/mg"         ,"");
			model.setValue(tmpNstNodepathMain + "nutrpninfo/nbintake"   ,"");
			model.setValue(tmpNstNodepathMain + "nutrpninfo/uun"        ,"");
			model.setValue(tmpNstNodepathMain + "nutrpninfo/nbcalval"   ,"");
			
    	/* @ 처방order유무 체크 */
    	// 2016년 8월 24일 김치국;
    	model.makeValue(tmpNstNodepathMain + "nutrpninfo/order", "");	
      model.setValue("/root/send/srchinfo/orderyn","") ;    	
      chk_orderyn.disabled = false;			
      //////
   	  fNstExam();          //검사결과값
   	  // 2010-02-19 추구관리 NEW 버튼 클릭시 최신검사결과값 가져오기 END
    	btn_save.disabled	= false;
    	btn_repl.disabled 	= false;
    	btn_del.disabled 	= false;
    
    	model.refresh();

		  
}

/*
	@ NST EN  추구관리 [NEW] 버튼 클릭시 - 2009-12-18

		#parameter
			- tmpflag		: pn(=PN)/en(=EN)/교육의뢰(=EDU)  구분 
			- pursflag		: PURS 추구관리
*/
function fPursuit_EN(tmpflag, pursflag, tmpNstNodepathMain, tmpNstNodepath){
       
       var pursseq = Number( getNodesetCount("/root/main/patinfo/purshistinfo/formrecseq")) + 1;
       var pursseq = String(pursseq).getLeftPad(3, "0");
       
    	//2009-12-17 추구관리 조회시 [추구관리 표시]/ 조회 adchcnstinfo - cnstcnts10 = 'PURS'
    	model.removeNodeset(tmpNstNodepath + "pursflag");
    	model.makeValue(tmpNstNodepath + "cnstkind"    ,"A");	                // 추구관리 Set
    	model.makeValue(tmpNstNodepath + "pursflag"    ,"PURS");	            // 추구관리 Set
    	model.makeValue(tmpNstNodepath + "pursseq"     , pursseq);	            // 추구관리 Set
        out_en_purs.attribute("text")="[ 추구관리 : " + pursseq + " ]";
    
    	model.setValue(tmpNstNodepath + "execdd", getCurrentDate());	        // 수행일자 오늘일자로
    	model.makeValue("/root/hidden/cnststatinfo/cnststat","");		        // 의뢰건의 consult 상태 체크
    	
    	/*
    	* 추구관리 신규발생시 
    	* ast.adchcnstinfo에 정보 저장 하기 (  cnstcnts10(추구관리-구분)  cnstcnts11(추구관리-원Formrecseq) cnstcnts12(추구관리-순번))
    	*/
        model.makeValue("/root/send/srchinfo/rgstseqno" , "");    	                        // 추구관리-의뢰구분
    	model.makeValue(tmpNstNodepath + "cnstseqno"   , "");	                            // 추구관리-의뢰구분
    	model.makeValue(tmpNstNodepath + "formrecseq"  , "");	                            // 추구관리-formrecseq
    	model.makeValue(tmpNstNodepathMain + "adchcnstinfo/cnstcnts10" , "PURS");	        // 추구관리-구분
    	model.makeValue(tmpNstNodepathMain + "adchcnstinfo/cnstcnts11" , gv_formrecseq);	// 추구관리-원Formrecseq
    	model.makeValue(tmpNstNodepathMain + "adchcnstinfo/cnstnewflag", "Y");	            // 추구관리-신규여부 확인

// 2014-12-22 추구관리 NEW 버튼 클릭시 최신검사결과값 가져오기 START (clear후 submit("TRADC02605")Call)
		model.setValue(tmpNstNodepath + "alb"       ,"");
		model.setValue(tmpNstNodepath + "tlc"       ,"");
		model.setValue(tmpNstNodepath + "hb"        ,"");
		model.setValue(tmpNstNodepath + "hct"       ,"");
		model.setValue(tmpNstNodepath + "trf"       ,"");
		model.setValue(tmpNstNodepath + "rbp"       ,"");
		model.setValue(tmpNstNodepath + "na"        ,"");
		model.setValue(tmpNstNodepath + "k"         ,"");
		model.setValue(tmpNstNodepath + "cl"        ,"");
		model.setValue(tmpNstNodepath + "bun"       ,"");
		model.setValue(tmpNstNodepath + "cr"        ,"");
		model.setValue(tmpNstNodepath + "chol"      ,"");
		model.setValue(tmpNstNodepath + "tg"        ,"");
		model.setValue(tmpNstNodepath + "ca"        ,"");
		model.setValue(tmpNstNodepath + "p"         ,"");
		model.setValue(tmpNstNodepath + "mg"        ,"");
		model.setValue(tmpNstNodepath + "nbintake"  ,"");
		model.setValue(tmpNstNodepath + "uun"       ,"");
		model.setValue(tmpNstNodepath + "nbcalval"  ,"");
		model.setValue(tmpNstNodepath + "ins"       ,"");
   	   // fNstExamEn_EduPurs(pursflag,"",tmpNstNodepath);      //검사결과값
   	    
   	    submit("TRADC02605");
    
    		if (model.getValue(tmpNstNodepath + "alb") =="" ) {
    			model.setValue(tmpNstNodepath + "alb", model.getValue("/root/init/examrslt/alb"));
    		}
    		if (model.getValue(tmpNstNodepath + "trf") =="" ) {
    			model.setValue(tmpNstNodepath + "trf", model.getValue("/root/init/examrslt/trf"));
    		}
    		if (model.getValue(tmpNstNodepath + "hb") =="" ) {
    			model.setValue(tmpNstNodepath + "hb", model.getValue("/root/init/examrslt/hb"));
    		}
    		if (model.getValue(tmpNstNodepath + "na") =="" ) {
    			model.setValue(tmpNstNodepath + "na", model.getValue("/root/init/examrslt/na"));
    		}
    		if (model.getValue(tmpNstNodepath + "k") =="" ) {
    			model.setValue(tmpNstNodepath + "k", model.getValue("/root/init/examrslt/k"));
    		}
    		if (model.getValue(tmpNstNodepath + "cl") =="" ) {
    			model.setValue(tmpNstNodepath + "cl", model.getValue("/root/init/examrslt/cl"));
    		}
        	//2010-02-04 검사결과 항목추가
        	if (model.getValue(tmpNstNodepath + "tlc") =="" ) {
        	    //2010-02-10 TLC 결과값 변경(=WBC count (LHR100) * Lymphocytes(LHR10503) /1000*100  변경)
        	    var wbc = model.getValue("/root/init/examrslt/wbc");
        	    var tlc = model.getValue("/root/init/examrslt/tlc");
        	    if ((wbc!="")&& (tlc!="")) {
        	        var calc_tlc = (wbc * tlc * 10 ).toString().getRound(-3,"HALF_UP")
            		model.setValue(tmpNstNodepath + "tlc", calc_tlc);
        	    }   
        	}

        	if (model.getValue(tmpNstNodepath + "hct") =="" ) {
        		model.setValue(tmpNstNodepath + "hct", model.getValue("/root/init/examrslt/hct"));
        	}
        	if (model.getValue(tmpNstNodepath + "rbp") =="" ) {
        		model.setValue(tmpNstNodepath + "rbp", model.getValue("/root/init/examrslt/rbp"));
        	}
        	if (model.getValue(tmpNstNodepath + "bun") =="" ) {
        		model.setValue(tmpNstNodepath + "bun", model.getValue("/root/init/examrslt/bun"));
        	}
        	if (model.getValue(tmpNstNodepath + "cr") =="" ) {
        		model.setValue(tmpNstNodepath + "cr", model.getValue("/root/init/examrslt/cr"));
        	}
        	if (model.getValue(tmpNstNodepath + "chol") =="" ) {
        		model.setValue(tmpNstNodepath + "chol", model.getValue("/root/init/examrslt/chol"));
        	}
        	if (model.getValue(tmpNstNodepath + "tg") =="" ) {
        		model.setValue(tmpNstNodepath + "tg", model.getValue("/root/init/examrslt/tg"));
        	}
        	if (model.getValue(tmpNstNodepath + "ca") =="" ) {
        		model.setValue(tmpNstNodepath + "ca", model.getValue("/root/init/examrslt/ca"));
        	}
        	if (model.getValue(tmpNstNodepath + "p") =="" ) {
        		model.setValue(tmpNstNodepath + "p", model.getValue("/root/init/examrslt/p"));
        	}
        	if (model.getValue(tmpNstNodepath + "mg") =="" ) {
        		model.setValue(tmpNstNodepath + "mg", model.getValue("/root/init/examrslt/mg"));
        	}     
   	    // 2010-02-19 추구관리 NEW 버튼 클릭시 최신검사결과값 가져오기 END

    	btn_save.disabled	= false;
    	btn_repl.disabled 	= false;
    	btn_del.disabled 	= false;
    
    	model.refresh();		  
}
/* 
    @ 총섭취열량 계산 = 경구영양 + 경관영양 + 정맥영양

	  #parameter
    	  - NstFlag         : 교육의뢰=EDU  / 추구관리=PURS 구분
    	  - tmpNstNodepathINIT : 교육의뢰=EDU  / 추구관리=PURS 구분별 Node Path 
    	                      교육의뢰=  "/root/init/eduinfo/"
    	                      추구관리=  "/root/init/pursinfo/"
    	  - tmpNstNodepath     : 교육의뢰=EDU  / 추구관리=PURS 구분별 Node Path 
    	                      교육의뢰=  "/root/main/edunstinfo/nutreduinfo/"
    	                      추구관리=  "/root/main/pursnstinfo/nutrpursinfo/"	  

*/   
function fCalcintkcalr(NstFlag,tmpNstNodepathINIT,tmpNstNodepath)
{
	var etrlfd  = Number(model.getValue(tmpNstNodepath + "etrlfd"));    //경구영양
	var tubfd   = Number(model.getValue(tmpNstNodepath + "tubfd"));     //경관영양
	var itvnfd  = Number(model.getValue(tmpNstNodepath + "itvnfd"));    //정맥영양

	model.setValue(tmpNstNodepath + "totintkcalr", ( etrlfd + tubfd + itvnfd ).toString().getRound(-2,"HALF_UP"));

}

/*
 * =======================================================================================================
 * =======================================================================================================
 * ===================== 여기서 부터 NST -EN의 교육관리 와 추구관리 부분 추가 입니다 =====================
 * =======================================================================================================
 * =======================================================================================================
*/


/*
	@ 기초대사량 설정 (Basal Energy Expenditure : BEE)
	  - 성별에 의해 설정되어지는 변수가 다름 
	  
	  - NstFlag         : 교육의뢰=EDU  / 추구관리=PURS 구분
	  - tmpNstNodepathINIT : 교육의뢰=EDU  / 추구관리=PURS 구분별 Node Path 
	                      교육의뢰=  "/root/init/eduinfo/"
	                      추구관리=  "/root/init/pursinfo/"
	  - tmpNstNodepath     : 교육의뢰=EDU  / 추구관리=PURS 구분별 Node Path 
	                      교육의뢰=  "/root/main/edunstinfo/nutreduinfo/"
	                      추구관리=  "/root/main/pursnstinfo/nutrpursinfo/"
*/
function fSetBee_EduPurs(NstFlag,tmpNstNodepathINIT,tmpNstNodepath)
{

	if( isSearchString(gv_sex,"M")) {
	    if ( NstFlag == "EDU" ) {       //교육의뢰
    		ipt_mkg_edu.disabled 	                    = false;
    		ipt_mcm_edu.disabled 	                    = false;
    		ipt_myr_edu.disabled 	                    = false;
    		ipt_mtotal_edu.disabled                     = false;
    		ipt_wkg_edu.disabled 	                    = true;
    		ipt_wcm_edu.disabled 	                    = true;
    		ipt_wyr_edu.disabled 	                    = true;
    		ipt_wtotal_edu.disabled                     = true;
    		ipt_wtotal_edu.visible 	                    = false;
    	}else{                          //추구관리
    		ipt_mkg_purs.disabled 	                    = false;
    		ipt_mcm_purs.disabled 	                    = false;
    		ipt_myr_purs.disabled 	                    = false;
    		ipt_mtotal_purs.disabled                    = false;
    		ipt_wkg_purs.disabled 	                    = true;
    		ipt_wcm_purs.disabled 	                    = true;
    		ipt_wyr_purs.disabled 	                    = true;
    		ipt_wtotal_purs.disabled                    = true;
    		ipt_wtotal_purs.visible 	                = false;
        }    	    
		model.setValue(tmpNstNodepathINIT + "basembolinfolist/wbasembolkg"      , "");
		model.setValue(tmpNstNodepathINIT + "basembolinfolist/wbasembolcm"      , "");
		model.setValue(tmpNstNodepathINIT + "basembolinfolist/wbasembolyy"      , "");
		model.setValue(tmpNstNodepathINIT + "basembolinfolist/wbasembolcalc"    , "");
		model.setValue(tmpNstNodepathINIT + "basembolinfolist/mbasembolkg"      , model.getValue(tmpNstNodepath + "basembolkg"));
		model.setValue(tmpNstNodepathINIT + "basembolinfolist/mbasembolcm"      , model.getValue(tmpNstNodepath + "basembolcm"));
		model.setValue(tmpNstNodepathINIT + "basembolinfolist/mbasembolyy"      , model.getValue(tmpNstNodepath + "basembolyy"));
		model.setValue(tmpNstNodepathINIT + "basembolinfolist/mbasembolcalc"    , model.getValue(tmpNstNodepath + "basembolcalc"));
	}
	if( isSearchString(gv_sex,"F")) {
	    if ( NstFlag == "EDU" ) {       //교육의뢰
    		ipt_mkg_edu.disabled 	                    = true;
    		ipt_mcm_edu.disabled 					    = true;
    		ipt_myr_edu.disabled 						= true;
    		ipt_mtotal_edu.disabled 					= true;
    		ipt_wkg_edu.disabled 						= false;
    		ipt_wcm_edu.disabled 					    = false;
    		ipt_wyr_edu.disabled 						= false;
    		ipt_wtotal_edu.disabled 					= false;
    		ipt_mtotal_edu.visible 						= false;
    	}else{                          //추구관리
    	    ipt_mkg_purs.disabled 	                    = true;
    		ipt_mcm_purs.disabled 					    = true;
    		ipt_myr_purs.disabled 						= true;
    		ipt_mtotal_purs.disabled 					= true;
    		ipt_wkg_purs.disabled 						= false;
    		ipt_wcm_purs.disabled 					    = false;
    		ipt_wyr_purs.disabled 						= false;
    		ipt_wtotal_purs.disabled 					= false;
    		ipt_mtotal_purs.visible 					= false;
        }
		model.setValue(tmpNstNodepathINIT + "basembolinfolist/wbasembolkg"      , model.getValue(tmpNstNodepath + "basembolkg"));
		model.setValue(tmpNstNodepathINIT + "basembolinfolist/wbasembolcm"      , model.getValue(tmpNstNodepath + "basembolcm"));
		model.setValue(tmpNstNodepathINIT + "basembolinfolist/wbasembolyy"      , model.getValue(tmpNstNodepath + "basembolyy"));
		model.setValue(tmpNstNodepathINIT + "basembolinfolist/wbasembolcalc"    , model.getValue(tmpNstNodepath + "basembolcalc"));
		model.setValue(tmpNstNodepathINIT + "basembolinfolist/mbasembolkg"      , "");
		model.setValue(tmpNstNodepathINIT + "basembolinfolist/mbasembolcm"      , "");
		model.setValue(tmpNstNodepathINIT + "basembolinfolist/mbasembolyy"      , "");
		model.setValue(tmpNstNodepathINIT + "basembolinfolist/mbasembolcalc"    , "");
	}

}

/*
	@ 회신시 기초대사량 Set (Basal Energy Expenditure : BEE)
	  - 성별에 의해 설정되어지는 변수가 다름 
	  
	  - NstFlag         : 교육의뢰=EDU  / 추구관리=PURS 구분
	  - tmpNstNodepathINIT : 교육의뢰=EDU  / 추구관리=PURS 구분별 Node Path 
	                      교육의뢰=  "/root/init/eduinfo/"
	                      추구관리=  "/root/init/pursinfo/"
	  - tmpNstNodepath     : 교육의뢰=EDU  / 추구관리=PURS 구분별 Node Path 
	                      교육의뢰=  "/root/main/edunstinfo/nutreduinfo/"
	                      추구관리=  "/root/main/pursnstinfo/nutrpursinfo/"
*/
function fSetBeeTot_EduPurs(NstFlag,tmpNstNodepathINIT,tmpNstNodepath)
{
		if( gv_sex == "M") {

			model.setValue(tmpNstNodepath + "basembolkg", model.getValue(tmpNstNodepathINIT + "basembolinfolist/mbasembolkg"));
			model.setValue(tmpNstNodepath + "basembolcm", model.getValue(tmpNstNodepathINIT + "basembolinfolist/mbasembolcm"));
			model.setValue(tmpNstNodepath + "basembolyy", model.getValue(tmpNstNodepathINIT + "basembolinfolist/mbasembolyy"));
			model.refresh();
			var basembolcalc = 66 + 13.7 * Number(model.getValue(tmpNstNodepath + "basembolkg")) + 5 * Number( model.getValue(tmpNstNodepath + "basembolcm")) - 6.8 * Number( model.getValue(tmpNstNodepath + "basembolyy"));
			model.setValue(tmpNstNodepath + "basembolcalc",  basembolcalc);
		}
		if( gv_sex == "F") {
			model.setValue(tmpNstNodepath + "basembolkg", model.getValue(tmpNstNodepath + "wbasembolkg"));
			model.setValue(tmpNstNodepath + "basembolcm", model.getValue(tmpNstNodepath + "wbasembolcm"));
			model.setValue(tmpNstNodepath + "basembolyy", model.getValue(tmpNstNodepath + "wbasembolyy"));
			model.refresh();
			var  basembolcalc = 655 + 9.6 * Number(model.getValue(tmpNstNodepath + "basembolkg")) + 1.8 * Number( model.getValue(tmpNstNodepath + "basembolcm")) - 4.7 * Number( model.getValue(tmpNstNodepath + "basembolyy"));
			model.setValue(tmpNstNodepath + "basembolcalc", basembolcalc );
		}

		//필요열량
		if( model.getValue(tmpNstNodepath + "needcalrflag") == "1" ) {
			model.setValue(tmpNstNodepath + "needcalr1", model.getValue(tmpNstNodepathINIT + "needcalrlist/needcalr1"));
			model.setValue(tmpNstNodepath + "needcalr2", model.getValue(tmpNstNodepathINIT + "needcalrlist/needcalr2"));
		}
		if( model.getValue(tmpNstNodepath + "needcalrflag") == "2" ) {
			model.setValue(tmpNstNodepath + "needcalr1", model.getValue(tmpNstNodepathINIT + "needcalrlist/needcalr3"));
			model.setValue(tmpNstNodepath + "needcalr2", model.getValue(tmpNstNodepathINIT + "needcalrlist/needcalr4"));
			model.setValue(tmpNstNodepath + "needcalr3", model.getValue(tmpNstNodepathINIT + "needcalrlist/needcalr5"));
			model.refresh();
			var needcalrcalc = Number(model.getValue(tmpNstNodepathINIT + "needcalrlist/needcalr3")) * Number(model.getValue(tmpNstNodepathINIT + "needcalrlist/needcalr4")) * Number(model.getValue(tmpNstNodepathINIT + "needcalrlist/needcalr5"));
			model.setValue(tmpNstNodepath + "needcalrcalc", needcalrcalc);
		}
		if( model.getValue(tmpNstNodepath + "needcalrflag") == "3" ) {
			model.setValue(tmpNstNodepath + "needcalr1", model.getValue(tmpNstNodepathINIT + "needcalrlist/needcalr7"));
			model.setValue(tmpNstNodepath + "needcalr2", model.getValue(tmpNstNodepathINIT + "needcalrlist/needcalr8"));
			model.setValue(tmpNstNodepath + "needcalr3", model.getValue(tmpNstNodepathINIT + "needcalrlist/needcalr9"));
			model.setValue(tmpNstNodepath + "needcalr4", model.getValue(tmpNstNodepathINIT + "needcalrlist/needcalr10"));
			model.refresh();
			var needcalrcalc = Number(model.getValue(tmpNstNodepathINIT + "needcalrlist/needcalr7")) * Number(model.getValue(tmpNstNodepathINIT + "needcalrlist/needcalr8")) + Number(model.getValue(tmpNstNodepathINIT + "needcalrlist/needcalr9")) * Number(model.getValue(tmpNstNodepathINIT + "needcalrlist/needcalr10"));
			model.setValue(NstNodepath + "needcalrcalc", needcalrcalc);
		}
		if( model.getValue(tmpNstNodepath + "needcalrflag") == "4" ) {
			model.setValue(tmpNstNodepath + "needcalr1", model.getValue(tmpNstNodepathINIT + "needcalrlist/needcalr12"));
			model.setValue(tmpNstNodepath + "needcalr2", model.getValue(tmpNstNodepathINIT + "needcalrlist/needcalr13"));
			model.setValue(tmpNstNodepath + "needcalr3", model.getValue(tmpNstNodepathINIT + "needcalrlist/needcalr14"));
			model.setValue(tmpNstNodepath + "needcalr4", model.getValue(tmpNstNodepathINIT + "needcalrlist/needcalr15"));
			model.setValue(tmpNstNodepath + "needcalr5", model.getValue(tmpNstNodepathINIT + "needcalrlist/needcalr16"));
			model.refresh();
			var needcalrcalc = 1784-11*Number(model.getValue(tmpNstNodepathINIT + "needcalrlist/needcalr12")) +5* Number(model.getValue(tmpNstNodepathINIT + "needcalrlist/needcalr13"))+244* Number(model.getValue(tmpNstNodepathINIT + "needcalrlist/needcalr14"))+239 *  Number(model.getValue(tmpNstNodepathINIT + "needcalrlist/needcalr15"))+804 * Number(model.getValue(tmpNstNodepathINIT + "needcalrlist/needcalr16"));
			model.setValue(tmpNstNodepath + "needcalrcalc", needcalrcalc);
		}
}

/*
	@ 필요열량 설정 (Total Caloric Need : TCN)
	  - 기존에 선택된 항목에 의해 설정되는 변수가 상이함
	  #parameter
    	  - NstFlag         : 교육의뢰=EDU  / 추구관리=PURS 구분
    	  - tmpNstNodepathINIT : 교육의뢰=EDU  / 추구관리=PURS 구분별 Node Path 
    	                      교육의뢰=  "/root/init/eduinfo/"
    	                      추구관리=  "/root/init/pursinfo/"
    	  - tmpNstNodepath     : 교육의뢰=EDU  / 추구관리=PURS 구분별 Node Path 
    	                      교육의뢰=  "/root/main/edunstinfo/nutreduinfo/"
    	                      추구관리=  "/root/main/pursnstinfo/nutrpursinfo/"	  
*/ 
function fSetTCN_EduPurs(NstFlag,tmpNstNodepathINIT,tmpNstNodepath)
{
		// 노드 초기화
		model.resetInstanceNode(tmpNstNodepathINIT + "needcalrlist");
		
		/*
			필요열량 선택값 (radio button) -  /root/main/nstinfo/nutrpninfo/needcalrflag
		*/
		if( model.getValue(tmpNstNodepath + "needcalrflag") == "1" ) {
			model.setValue(tmpNstNodepathINIT + "needcalrlist/needcalr1"   , model.getValue(tmpNstNodepath + "needcalr1"));
			model.setValue(tmpNstNodepathINIT + "needcalrlist/needcalr2"   , model.getValue(tmpNstNodepath + "needcalr2"));
		}
		if( model.getValue(tmpNstNodepath + "needcalrflag") == "2" ) {
			model.setValue(tmpNstNodepathINIT + "needcalrlist/needcalr3"   , model.getValue(tmpNstNodepath + "needcalr1"));
			model.setValue(tmpNstNodepathINIT + "needcalrlist/needcalr4"   , model.getValue(tmpNstNodepath + "needcalr2"));
			model.setValue(tmpNstNodepathINIT + "needcalrlist/needcalr5"   , model.getValue(tmpNstNodepath + "needcalr3"));
			model.setValue(tmpNstNodepathINIT + "needcalrlist/needcalr6"   , model.getValue(tmpNstNodepath + "needcalrcalc"));
		}
		if( model.getValue(tmpNstNodepath + "needcalrflag") == "3" ) {
			model.setValue(tmpNstNodepathINIT + "needcalrlist/needcalr7"   , model.getValue(tmpNstNodepath + "needcalr1"));
			model.setValue(tmpNstNodepathINIT + "needcalrlist/needcalr8"   , model.getValue(tmpNstNodepath + "needcalr2"));
			model.setValue(tmpNstNodepathINIT + "needcalrlist/needcalr9"   , model.getValue(tmpNstNodepath + "needcalr3"));
			model.setValue(tmpNstNodepathINIT + "needcalrlist/needcalr10"  , model.getValue(tmpNstNodepath + "needcalr4"));
			model.setValue(tmpNstNodepathINIT + "needcalrlist/needcalr11"  , model.getValue(tmpNstNodepath + "needcalrcalc"));
		}
		if( model.getValue(tmpNstNodepath + "needcalrflag") == "4" ) {
			model.setValue(tmpNstNodepathINIT + "needcalrlist/needcalr12"  , model.getValue(tmpNstNodepath + "needcalr1"));
			model.setValue(tmpNstNodepathINIT + "needcalrlist/needcalr13"  , model.getValue(tmpNstNodepath + "needcalr2"));
			model.setValue(tmpNstNodepathINIT + "needcalrlist/needcalr14"  , model.getValue(tmpNstNodepath + "needcalr3"));
			model.setValue(tmpNstNodepathINIT + "needcalrlist/needcalr15"  , model.getValue(tmpNstNodepath + "needcalr4"));
			model.setValue(tmpNstNodepathINIT + "needcalrlist/needcalr16"  , model.getValue(tmpNstNodepath + "needcalr5"));
			model.setValue(tmpNstNodepathINIT + "needcalrlist/needcalr17"  , model.getValue(tmpNstNodepath + "needcalrcalc"));
		}
}

/*
	@ 기타 항목 설정
	
	  #parameter
    	  - NstFlag         : 교육의뢰=EDU  / 추구관리=PURS 구분
    	  - tmpNstNodepathINIT : 교육의뢰=EDU  / 추구관리=PURS 구분별 Node Path 
    	                      교육의뢰=  "/root/init/eduinfo/"
    	                      추구관리=  "/root/init/pursinfo/"
    	  - tmpNstNodepath     : 교육의뢰=EDU  / 추구관리=PURS 구분별 Node Path 
    	                      교육의뢰=  "/root/main/edunstinfo/nutreduinfo/"
    	                      추구관리=  "/root/main/pursnstinfo/nutrpursinfo/"	  

*/	 
function fSetEtc_EduPurs(NstFlag,tmpNstNodepathINIT,tmpNstNodepath)
{	
		if(model.getValue(tmpNstNodepath + "basewtflag") == "")
		{
			model.setValue(tmpNstNodepath + "basewtflag", "1");
		}
		
		if(model.getValue(tmpNstNodepath + "needcalrflag") == "")
		{
			model.setValue(tmpNstNodepath + "needcalrflag", "1");
		}

		var brthddstr = model.getValue("/root/main/patinfo/baseinfo/brthdd");

		var reqddstr = model.getValue("/root/main/patinfo/baseinfo/reqdd");

        //2010-02-01 미의뢰시 의뢰일자 없음 . 오늘일자로 계산처리
		if(reqddstr == "" || reqddstr == null){
		    reqddstr = model.getValue("/root/main/patinfo/baseinfo/repldd");
		    if(reqddstr == "" || reqddstr == null) reqddstr = getCurrentDate();
		}
		
		var age = parseInt(reqddstr.substring(0, 4)) - parseInt(brthddstr.substring(0, 4));

		if(reqddstr.substr(4, 7) <=  brthddstr.substring(4, 7))
		{
			age = parseInt(age) - 1;
		}

		model.setValue(tmpNstNodepathINIT + "basembolinfolist/age", age);

		if(model.getValue(tmpNstNodepath + "execdd") == "") model.setValue(tmpNstNodepath + "execdd", getCurrentDate());

		if(model.getValue(tmpNstNodepath + "dieterid") == "" || model.getValue(tmpNstNodepath + "dieterid") == "1")
		{
			model.setValue(tmpNstNodepath + "dieterid", getUserId());
		}
		var wt = model.getValue(tmpNstNodepath + "wt");
		var ibw = model.getValue(tmpNstNodepath + "ibw");
		model.setValue("/root/temp/ibwper", wt / ibw * 100);
}


/* 
    @ BEE계산

	  #parameter
    	  - NstFlag         : 교육의뢰=EDU  / 추구관리=PURS 구분
    	  - tmpNstNodepathINIT : 교육의뢰=EDU  / 추구관리=PURS 구분별 Node Path 
    	                      교육의뢰=  "/root/init/eduinfo/"
    	                      추구관리=  "/root/init/pursinfo/"
    	  - tmpNstNodepath     : 교육의뢰=EDU  / 추구관리=PURS 구분별 Node Path 
    	                      교육의뢰=  "/root/main/edunstinfo/nutreduinfo/"
    	                      추구관리=  "/root/main/pursnstinfo/nutrpursinfo/"	  

*/
function fCalcBeeEn_EduPurs(NstFlag,tmpNstNodepathINIT,tmpNstNodepath)
{	   
	var manbee;
	var womenbee;
	var wt = model.getValue(tmpNstNodepath + "basewt");
	var ht = model.getValue(tmpNstNodepath + "ht");
	var age = model.getValue(tmpNstNodepathINIT + "basembolinfolist/age");
	if(wt == "" || ht == "") return false;

	manbee = ( 66.5 + (13.7 * wt) + (5 * ht) - (6.8 * age) ).toString().getRound( -2,"HALF_UP");
	womenbee = ( 655 + (9.6 * wt) + (1.9 * ht) - (4.7 * age) ).toString().getRound( -2,"HALF_UP");

	model.setValue(tmpNstNodepathINIT + "basembolinfolist/mbasembolcalc", manbee);
	model.setValue(tmpNstNodepathINIT + "basembolinfolist/wbasembolcalc", womenbee);

	if(gv_sex == "M")
	{
		model.setValue("/root/init/bee", manbee);
	}
	else
	{
		model.setValue("/root/init/bee", womenbee);
	}
}

/* 
    @필요열량계산
       	 
	  #parameter
	      - calcflag        :
    	  - NstFlag         : 교육의뢰=EDU  / 추구관리=PURS 구분
    	  - tmpNstNodepathINIT : 교육의뢰=EDU  / 추구관리=PURS 구분별 Node Path 
    	                      교육의뢰=  "/root/init/eduinfo/"
    	                      추구관리=  "/root/init/pursinfo/"
    	  - tmpNstNodepath     : 교육의뢰=EDU  / 추구관리=PURS 구분별 Node Path 
    	                      교육의뢰=  "/root/main/edunstinfo/nutreduinfo/"
    	                      추구관리=  "/root/main/pursnstinfo/nutrpursinfo/"	  

*/     
function fCalcNeedCalEn_EduPurs(NstFlag,tmpNstNodepathINIT,tmpNstNodepath,calcflag)	
{
	var bee = model.getValue("/root/init/bee");
	var tcn;

	model.setValue(tmpNstNodepathINIT + "needcalrlist/needcalr6", "");
	model.setValue(tmpNstNodepathINIT + "needcalrlist/needcalr7", "");
	model.setValue(tmpNstNodepathINIT + "needcalrlist/needcalr11", "");
	model.setValue(tmpNstNodepathINIT + "needcalrlist/needcalr17", "");

	if(model.getValue(tmpNstNodepath + "needcalrflag") == "1")
	{
		var need1 = model.getValue(tmpNstNodepathINIT + "needcalrlist/needcalr1");
		var need2 = model.getValue(tmpNstNodepathINIT + "needcalrlist/needcalr2");
		tcn = ( need1 * need2).toString().getRound(-2,"HALF_UP");
		model.setValue(tmpNstNodepathINIT + "needcalrlist/needcalr7", tcn);

	}
	else if(model.getValue(tmpNstNodepath + "needcalrflag") == "2")
	{
		var af  = model.getValue(tmpNstNodepathINIT + "needcalrlist/needcalr4");
		var ifv = model.getValue(tmpNstNodepathINIT + "needcalrlist/needcalr5");
		tcn = (bee*af*ifv ).toString().getRound(-2,"HALF_UP");
		model.setValue(tmpNstNodepathINIT + "needcalrlist/needcalr6", tcn);
	}
	else if(model.getValue(tmpNstNodepath + "needcalrflag") == "3")
	{
		var af  = model.getValue(tmpNstNodepathINIT + "needcalrlist/needcalr8");
		var ifv = model.getValue(tmpNstNodepathINIT + "needcalrlist/needcalr10");
		var question = model.getValue(tmpNstNodepathINIT + "needcalrlist/needcalr10");
		tcn = ( (bee*af) + (bee*question) ).toString().getRound(-2,"HALF_UP");
		model.setValue(tmpNstNodepathINIT + "needcalrlist/needcalr11", tcn);

	}
	else if(model.getValue(tmpNstNodepath + "needcalrflag") == "4")
	{
		var wt      = model.getValue(tmpNstNodepath + "basewt");
		var ht      = model.getValue(tmpNstNodepath + "ht");
		var age     = model.getValue(tmpNstNodepathINIT + "basembolinfolist/age");
		var wmflag  = model.getValue(tmpNstNodepathINIT + "needcalrlist/needcalr14");
		var preflag = model.getValue(tmpNstNodepathINIT + "needcalrlist/needcalr15");
		var preflag2= model.getValue(tmpNstNodepathINIT + "needcalrlist/needcalr16");

		tcn = (1784 - (11 * age) + (5 * wt) + (244 * wmflag) + (239 * preflag) + (804 * preflag2) ).toString().getRound(-2,"HALF_UP");
		model.setValue(tmpNstNodepathINIT + "needcalrlist/needcalr17", tcn);
	}

	if(calcflag != true)	model.setValue(tmpNstNodepath + "corrcalr", tcn);
}



/* 
    @ 

	  #parameter
    	  - NstFlag         : 교육의뢰=EDU  / 추구관리=PURS 구분
    	  - tmpNstNodepathINIT : 교육의뢰=EDU  / 추구관리=PURS 구분별 Node Path 
    	                      교육의뢰=  "/root/init/eduinfo/"
    	                      추구관리=  "/root/init/pursinfo/"
    	  - tmpNstNodepath     : 교육의뢰=EDU  / 추구관리=PURS 구분별 Node Path 
    	                      교육의뢰=  "/root/main/edunstinfo/nutreduinfo/"
    	                      추구관리=  "/root/main/pursnstinfo/nutrpursinfo/"	  

*/   
function fCalcFPNEn_EduPurs(NstFlag,tmpNstNodepathINIT,tmpNstNodepath)
{
	var ov = model.getValue(tmpNstNodepath + "prot1");
	var ov2 = model.getValue(tmpNstNodepath + "prot2");

	model.setValue(tmpNstNodepath + "protcalc", ( ov*ov2).toString().getRound(-2,"HALF_UP"));

	var wt = model.getValue(tmpNstNodepath + "wt");
}

/* 
    @ 

	  #parameter
    	  - NstFlag         : 교육의뢰=EDU  / 추구관리=PURS 구분
    	  - tmpNstNodepathINIT : 교육의뢰=EDU  / 추구관리=PURS 구분별 Node Path 
    	                      교육의뢰=  "/root/init/eduinfo/"
    	                      추구관리=  "/root/init/pursinfo/"
    	  - tmpNstNodepath     : 교육의뢰=EDU  / 추구관리=PURS 구분별 Node Path 
    	                      교육의뢰=  "/root/main/edunstinfo/nutreduinfo/"
    	                      추구관리=  "/root/main/pursnstinfo/nutrpursinfo/"	  

*/  
function fNstExamEn_EduPurs(NstFlag,tmpNstNodepathINIT,tmpNstNodepath)
{
        //2010-02-02 회신 및 임시저장상태일경우 검사결과를 가져오지 않는다.
        var tmpstatflag = model.getValue(tmpNstNodepath + "statflag");   //상태
        if (tmpstatflag == "Z" ||  tmpstatflag == "D" ){      //회신 - 임시저장 상태
            //검사결과 가져오지 않는다
            //alert("검사결과 가져오지 않는다");
        }else{      
    		submit("TRADC02605");
    
    		if (model.getValue(tmpNstNodepath + "alb") =="" ) {
    			model.setValue(tmpNstNodepath + "alb", model.getValue("/root/init/examrslt/alb"));
    		}
    		if (model.getValue(tmpNstNodepath + "trf") =="" ) {
    			model.setValue(tmpNstNodepath + "trf", model.getValue("/root/init/examrslt/trf"));
    		}
    		if (model.getValue(tmpNstNodepath + "hb") =="" ) {
    			model.setValue(tmpNstNodepath + "hb", model.getValue("/root/init/examrslt/hb"));
    		}
    		if (model.getValue(tmpNstNodepath + "na") =="" ) {
    			model.setValue(tmpNstNodepath + "na", model.getValue("/root/init/examrslt/na"));
    		}
    		if (model.getValue(tmpNstNodepath + "k") =="" ) {
    			model.setValue(tmpNstNodepath + "k", model.getValue("/root/init/examrslt/k"));
    		}
    		if (model.getValue(tmpNstNodepath + "cl") =="" ) {
    			model.setValue(tmpNstNodepath + "cl", model.getValue("/root/init/examrslt/cl"));
    		}
        	//2010-02-04 검사결과 항목추가
        	if (model.getValue(tmpNstNodepath + "tlc") =="" ) {
        	    //2010-02-10 TLC 결과값 변경(=WBC count (LHR100) * Lymphocytes(LHR10503) /1000*100  변경)
        	    var wbc = model.getValue("/root/init/examrslt/wbc");
        	    var tlc = model.getValue("/root/init/examrslt/tlc");
        	    if ((wbc!="")&& (tlc!="")) {
        	        var calc_tlc = (wbc * tlc * 10 ).toString().getRound(-3,"HALF_UP")
            		model.setValue(tmpNstNodepath + "tlc", calc_tlc);
        	    }   
        	}

        	if (model.getValue(tmpNstNodepath + "hct") =="" ) {
        		model.setValue(tmpNstNodepath + "hct", model.getValue("/root/init/examrslt/hct"));
        	}
        	if (model.getValue(tmpNstNodepath + "rbp") =="" ) {
        		model.setValue(tmpNstNodepath + "rbp", model.getValue("/root/init/examrslt/rbp"));
        	}
        	if (model.getValue(tmpNstNodepath + "bun") =="" ) {
        		model.setValue(tmpNstNodepath + "bun", model.getValue("/root/init/examrslt/bun"));
        	}
        	if (model.getValue(tmpNstNodepath + "cr") =="" ) {
        		model.setValue(tmpNstNodepath + "cr", model.getValue("/root/init/examrslt/cr"));
        	}
        	if (model.getValue(tmpNstNodepath + "chol") =="" ) {
        		model.setValue(tmpNstNodepath + "chol", model.getValue("/root/init/examrslt/chol"));
        	}
        	if (model.getValue(tmpNstNodepath + "tg") =="" ) {
        		model.setValue(tmpNstNodepath + "tg", model.getValue("/root/init/examrslt/tg"));
        	}
        	if (model.getValue(tmpNstNodepath + "ca") =="" ) {
        		model.setValue(tmpNstNodepath + "ca", model.getValue("/root/init/examrslt/ca"));
        	}
        	if (model.getValue(tmpNstNodepath + "p") =="" ) {
        		model.setValue(tmpNstNodepath + "p", model.getValue("/root/init/examrslt/p"));
        	}
        	if (model.getValue(tmpNstNodepath + "mg") =="" ) {
        		model.setValue(tmpNstNodepath + "mg", model.getValue("/root/init/examrslt/mg"));
        	}     

    		fNstPatHtWt(tmpNstNodepath);      // 2010-05-10 임상관찰기록지 or 간호정보조사지 키와 체중 가져오기
    		
    	}
		// LAB 결과값 가져오기 End

}

/* 
    @ 키와 몸무게에 대한 ibw 계산

	  #parameter
    	  - NstFlag         : 교육의뢰=EDU  / 추구관리=PURS 구분
    	  - tmpNstNodepathINIT : 교육의뢰=EDU  / 추구관리=PURS 구분별 Node Path 
    	                      교육의뢰=  "/root/init/eduinfo/"
    	                      추구관리=  "/root/init/pursinfo/"
    	  - tmpNstNodepath     : 교육의뢰=EDU  / 추구관리=PURS 구분별 Node Path 
    	                      교육의뢰=  "/root/main/edunstinfo/nutreduinfo/"
    	                      추구관리=  "/root/main/pursnstinfo/nutrpursinfo/"	  

*/
function fCalcWeightEn_EduPurs(NstFlag,tmpNstNodepathINIT,tmpNstNodepath)
{
	var wt = model.getValue(tmpNstNodepath + "wt");
	var ht = model.getValue(tmpNstNodepath + "ht");

	if(ht == "")
	{
		return false;
	}

	//input108.attribute("editable") = false;  // 왜 사용하였을까요???
	var ibw = 0;
	var htsqare = eval(ht / 100);
	if(gv_sex == "M")
	{
		ibw =  ( 22 * htsqare * htsqare ).toString().getRound( -2,"HALF_UP");

	}
	else
	{
		ibw = ( 21 * htsqare * htsqare ).toString().getRound( -2,"HALF_UP");
	}

	model.setValue(tmpNstNodepath + "ibw",  ibw );
	
	fCalcWeightEx_EduPurs(NstFlag,tmpNstNodepathINIT,tmpNstNodepath);
}

/*
	@ PN/EN 기준체중 선택값 설정, 수분요구량 계산
	 - 함수호출시 
	 	1) abw값 계산/설정
	 	2) 기준체중 선택값 설정
	 	3) 수분요구량 계산/설정
	 	4) BEE 계산/설정 함수호출
	 	5) 필요열량 계산/설정 함수 호출
	 	
	  #parameter
    	  - NstFlag         : 교육의뢰=EDU  / 추구관리=PURS 구분
    	  - tmpNstNodepathINIT : 교육의뢰=EDU  / 추구관리=PURS 구분별 Node Path 
    	                      교육의뢰=  "/root/init/eduinfo/"
    	                      추구관리=  "/root/init/pursinfo/"
    	  - tmpNstNodepath     : 교육의뢰=EDU  / 추구관리=PURS 구분별 Node Path 
    	                      교육의뢰=  "/root/main/edunstinfo/nutreduinfo/"
    	                      추구관리=  "/root/main/pursnstinfo/nutrpursinfo/"	  

*/	
function fCalcWeightEx_EduPurs(NstFlag,tmpNstNodepathINIT,tmpNstNodepath)
{		
		var wt  = parseFloat(model.getValue(tmpNstNodepath + "wt"));
		var ht  = parseFloat(model.getValue(tmpNstNodepath + "ht"));
		var ibw = parseFloat(model.getValue(tmpNstNodepath + "ibw"));
	
		model.setValue(	tmpNstNodepath + "prot1", ibw);
	
		model.setValue(tmpNstNodepath + "pibw", (wt / ibw * 100).toString().getRound( -2,"HALF_UP"));
	
		var ubw = parseFloat(model.getValue(tmpNstNodepath + "ubw"));
		
		var abw = (ibw + (( ubw - ibw) * 0.25)).toString().getRound( -2,"HALF_UP");
		if  (parseFloat(model.getValue(tmpNstNodepath + "pibw")) >= 120 )  {
			model.setValue(tmpNstNodepath + "abw", abw);
		}else{
			model.setValue(tmpNstNodepath + "abw", "");
		}
		
		if(model.getValue(tmpNstNodepath + "basewtflag") == "1")
		{
			model.setValue(tmpNstNodepath + "basewt", ibw);
		}
		else if(model.getValue(tmpNstNodepath + "basewtflag") == "2")
		{
			if  (model.getValue(tmpNstNodepath + "pibw") >= 120 ) {
				model.setValue(tmpNstNodepath + "basewt", abw);
			}
			//input108.attribute("editable") = true;
		}
		else if(model.getValue(tmpNstNodepath + "basewtflag") == "3")
		{
			model.setValue(tmpNstNodepath + "basewt", wt);
		}
	
		var waterreq = (1500 + (20 * (wt - 20)) ).toString().getRound( -2,"HALF_UP");
	
		model.setValue(tmpNstNodepath + "waterreqvol", waterreq);
		
		fCalcBeeEn_EduPurs(NstFlag,tmpNstNodepathINIT,tmpNstNodepath);            //BEE계산
		fCalcNeedCalEn_EduPurs(NstFlag,tmpNstNodepathINIT,tmpNstNodepath);        //필요열량

}

/* 
    @ Wt Change kg / % 구하기 추가

	  #parameter
    	  - NstFlag         : 교육의뢰=EDU  / 추구관리=PURS 구분
    	  - tmpNstNodepathINIT : 교육의뢰=EDU  / 추구관리=PURS 구분별 Node Path 
    	                      교육의뢰=  "/root/init/eduinfo/"
    	                      추구관리=  "/root/init/pursinfo/"
    	  - tmpNstNodepath     : 교육의뢰=EDU  / 추구관리=PURS 구분별 Node Path 
    	                      교육의뢰=  "/root/main/edunstinfo/nutreduinfo/"
    	                      추구관리=  "/root/main/pursnstinfo/nutrpursinfo/"	  

*/
function fCalcWtChangeEn_EduPurs(NstFlag, tmpNstNodepathINIT, tmpNstNodepath)
{	
	var wt	= model.getValue(tmpNstNodepath + "wt");
	var ubw	= model.getValue(tmpNstNodepath + "ubw");
	var wtchngkg;
	var wtchngperc;

	wtchngkg =   ( wt - ubw  ).toString().getRound(-2,"HALF_UP")  ;
	wtchngperc	=  ( ( wt - ubw ) / ubw *100 ).toString().getRound(-2,"HALF_UP");

	model.setValue(tmpNstNodepath + "wtchngkg",	wtchngkg );			// Wt Change - kg
	model.setValue(tmpNstNodepath + "wtchngperc", 	wtchngperc );		// Wt Change %

	fCalcWeightEn_EduPurs(NstFlag,tmpNstNodepathINIT,tmpNstNodepath);
}
/* 
    @ 

	  #parameter
    	  - NstFlag         : 교육의뢰=EDU  / 추구관리=PURS 구분
    	  - tmpNstNodepathINIT : 교육의뢰=EDU  / 추구관리=PURS 구분별 Node Path 
    	                      교육의뢰=  "/root/init/eduinfo/"
    	                      추구관리=  "/root/init/pursinfo/"
    	  - tmpNstNodepath     : 교육의뢰=EDU  / 추구관리=PURS 구분별 Node Path 
    	                      교육의뢰=  "/root/main/edunstinfo/nutreduinfo/"
    	                      추구관리=  "/root/main/pursnstinfo/nutrpursinfo/"	  

*/
function fCalcNbalanceEn_EduPurs(NstFlag,tmpNstNodepathINIT,tmpNstNodepath)
{
	var intake = model.getValue(tmpNstNodepath + "nbintake");
	var uun = model.getValue(tmpNstNodepath + "uun");
	var nbalance = ( intake - (uun * 1.2 + 2) ).toString().getRound(-2,"HALF_UP");

	model.setValue(tmpNstNodepath + "nbcalval", nbalance);
}
//8888888888888888888888888888888888888888888888888888888888888
//8888888888888888888888888888888888888888888888888888888888888
//8888888888888888888888888888888888888888888888888888888888888
//8888888888888888888888888888888888888888888888888888888888888



/*
	@ NST EN 교육관리 - 2009-12-23 NST-EN 교육의뢰추가 - 의뢰유형 (1:영양평가 2:영양교육)

		#parameter
			- sendflag		: 회신내용 수정가능여부
*/
function fCretReplCntsEn_Edu(sendflag)
{	
    //sendflag              : 회신내용 수정가능여부  
    //tmpNstNodepath        :  EN-교육의뢰 / EN-추구관리  기본 노드 path
    //tmpNstNodepathMAIN    :  EN-교육의뢰 / EN-추구관리  기본 노드 path
    //NstEnGubun            : EN 구분 (교육관리=EDU / 추구관리= PURS )
    var tmpNstNodepath = "/root/main/edunstinfo/nutreduinfo/";
    var tmpNstNodepathMAIN = "/root/main/edunstinfo/";
    fCretReplCntsEn_EduPurs(sendflag,tmpNstNodepath,tmpNstNodepathMAIN ,"EDU");
}

/*
	@ NST EN 추구관리 - 2009-12-23 NST-EN 추구관리추가

		#parameter
			- sendflag		: 회신내용 수정가능여부
*/
function fCretReplCntsEn_Purs(sendflag)
{	

    //sendflag              : 회신내용 수정가능여부  
    //tmpNstNodepath        : EN-교육의뢰 / EN-추구관리  기본 노드 path
    //tmpNstNodepathMAIN    : EN-교육의뢰 / EN-추구관리  기본 노드 path
    //NstEnGubun            : EN 구분 (교육관리=EDU / 추구관리= PURS )
    var tmpNstNodepath = "/root/main/pursnstinfo/nutrpursinfo/";
    var tmpNstNodepathMAIN = "/root/main/pursnstinfo/nutrpursinfo/";
    
    fCretReplCntsEn_EduPurs(sendflag,tmpNstNodepath,tmpNstNodepathMAIN ,"PURS");
}

/*
	@ NST EN 교육관리/ 추구관리 회신내용 가져오기 - 2009-12-23 

		#parameter
		    - sendflag              : 회신내용 수정가능여부  
			- tmpNstNodepath		: EN-교육의뢰 / EN-추구관리  기본 노드 path
			- tmpNstNodepathMain	: EN-교육의뢰 / EN-추구관리  기본 노드 path
			- NstEnGubun            : EN 구분 (교육관리=EDU / 추구관리= PURS )
*/
function fCretReplCntsEn_EduPurs(sendflag,tmpNstNodepath,tmpNstNodepathMain,NstEnGubun)
{
	//값 세팅
	var roomcd 				= model.getValue("/root/main/patinfo/baseinfo/roomcd");             //병실
	var orddeptnm 			= model.getValue("/root/main/patinfo/baseinfo/orddeptnm");          //진료과
	var orddrnm 			= model.getValue("/root/main/patinfo/baseinfo/orddrnm");            // 의뢰의사
	var reqdd 				= model.getValue("/root/main/patinfo/baseinfo/reqdd");              //의뢰일
	var diagengnm 		    = model.getValue("/root/main/patinfo/diaginfo[1]/diagengnm");       //상병명
	var orddrnm 			= model.getValue("/root/main/patinfo/baseinfo/orddrnm");            //진료과
	var tmpreqdd            = model.getValue("/root/main/patinfo/baseinfo/reqdd")               //의뢰일	
	var ht 					= model.getValue(tmpNstNodepath + "ht"); // 키
	var ubw  				= model.getValue(tmpNstNodepath + "ubw"); //UBW
	var wt  				= model.getValue(tmpNstNodepath + "wt"); //체중
	var ibw  				= model.getValue(tmpNstNodepath + "ibw"); //IBW

	var pibw  				= model.getValue(tmpNstNodepath + "pibw");  //pibw
	var lost  				= model.getValue(tmpNstNodepath + "ht");
	var per  				= model.getValue("/root/temp/ibwper");

	var hb 					= model.getValue(tmpNstNodepath + "hb");
	var na 					= model.getValue(tmpNstNodepath + "na");
	var k 					= model.getValue(tmpNstNodepath + "k");
	var cl 					= model.getValue(tmpNstNodepath + "cl");
	var alb 				= model.getValue(tmpNstNodepath + "alb");
	var tlc 				= model.getValue(tmpNstNodepath + "tlc");
	var trf 				= model.getValue(tmpNstNodepath + "trf");
	var ins 				= model.getValue(tmpNstNodepath + "ins");
	var uun 				= model.getValue(tmpNstNodepath + "uun");

	var needcalrflag 		= model.getValue(tmpNstNodepath + "needcalrflag");  //2010-02-01 필요열량 계산법
	var needcaltotal 		= model.getValue(tmpNstNodepath + "corrcalr");      //보정열량
	var waterreqvol 		= model.getValue(tmpNstNodepath + "waterreqvol"); //수분요구량
	var dexwdrugspd 	    = model.getValue(tmpNstNodepath + "dexwdrugspd"); //당투여속도
	var protsuplvol 		= model.getValue(tmpNstNodepath + "protcalc"); //아미노산 공급량
	var suplplanetc 		= model.getValue(tmpNstNodepath + "nutrreqvol"); //기타
	var nlab = "============================\n==============================";
	
    if (NstEnGubun == "EDU") {                      //EN - 교육의뢰일경우
        var nutrprob    = splitChkBox(checkbox7);           // 영양관련 문제점
        var actgrde     = splitChkBox(checkbox14);          // 활동정도
        var drugpath    = splitChkBox(checkbox20);          // 투여경로
        var nutrjudg    = splitChkBox(checkbox5);           // 영양상태 판정
        var needcalr1   = model.getValue("/root/init/eduinfo/needcalrlist/needcalr1");   // 2010-02-01 필요열량-계수법 1
        var needcalr2   = model.getValue("/root/init/eduinfo/needcalrlist/needcalr2");   // 2010-02-01 필요열량-계수법 2
        var needcalr8   = combo33.value;                    // AF
    	var needcalr4   = combo35.value;                    // AF
    	var needcalr5   = combo30.value;                    // IF
    	var dietedustandard = cmb_cnstcd.label;                             // 영양교육내용 - 상용구          
    	var dietedurslt = model.getValue(tmpNstNodepath + "dietedurslt");   // 영양교육내용
    	var dieteroffr  = model.getValue(tmpNstNodepath + "dieteroffr");    // 영양사의견
    	var dieterid    = combo38.label;                    //영양사
        
    }else {                                         //EN - 추구관리
        var nutrprob    = splitChkBox(checkbox8);           // 영양관련 문제점 checkbox22
        var actgrde     = splitChkBox(checkbox22);          // 활동정도 checkbox22
        var drugpath    = splitChkBox(checkbox23);          // 투여경로
        var nutrjudg    = splitChkBox(checkbox4);           // 영양상태 판정
        var needcalr1   = model.getValue("/root/init/pursinfo/needcalrlist/needcalr1");   // 2010-02-01 필요열량-계수법 1
        var needcalr2   = model.getValue("/root/init/pursinfo/needcalrlist/needcalr2");   // 2010-02-01 필요열량-계수법 2
        var needcalr8   = combo46.value;                    // AF
    	var needcalr4   = combo48.value;                    // AF
    	var needcalr5   = combo42.value;                    // IF 
    	var dietedustandard = "";                                           // 영양교육내용 - 상용구          
    	var dietedurslt = "";                                               // 영양교육내용 
    	var dieteroffr  = model.getValue(tmpNstNodepath + "dieteroffr");    // 영양사제언 2010-04-20 NST-EN 추구관리 회신내역에 영양사의견 및 모니터링 조회안됨
    	var dieterid    = combo1.label;                     // 영양사 	     
    	var drnm        = input136.label;                   // 제언의사성명 	  2014-09-03
    	var pharmstnm   = input142.label;                   // 제언약사성명 	  2014-09-03
    	var nursenm     = input144.label;                   // 제언간호사성명   2014-09-03	
    	var nurseoffr   = model.getValue(tmpNstNodepath + "nurseoffr");     // 간호사제언     2014-09-03    	    	    	
    	var droffr  = model.getValue(tmpNstNodepath + "droffr");            // 의사제언   	2014-05-26
    	var pharmstoffr = model.getValue(tmpNstNodepath + "pharmstoffr");   // 약사제언     2014-05-26
    }
    
	var replcnts1 			=   "\n병실 :"+ roomcd +"호    \t\t의뢰일 :"+ tmpreqdd + " " ;
	var replcnts2	 		=  	"\n진료과 :"+ orddeptnm +"   \t\t상병명 :" +"    ";
	var replcnts3	 		=  	"\n의뢰의사 : " + orddrnm + " \t\t  "+diagengnm + "   " ;
	var replcnts4	 		=  	"\n\nS : 영양관련 문제점";
	var replcnts5	 		=  	"\nο 식사시 문제점  : " + nutrprob + "   "  + model.getValue(tmpNstNodepath + "nutrprobetc");	//2009-02-09 영양관련문제점 - 기타 (입력내용) 회신조회
	var replcnts6	 		=  	"\nο 활동정도 : " + actgrde + "   "  + model.getValue(tmpNstNodepath + "actgrdeetc");     //2010-04-27 NST-EN 추구관리 ( 영양관련문제점/활동정도 기타사항 저장오류)-회신내역추가
	var replcnts7	 		=  	"\nο 투여경로 : " + drugpath;

	var replcnts8	 		=  	"\nο 식사섭취상태 : ";

	if (( model.getValue(tmpNstNodepath + "etrlfd")=="") || (model.getValue(tmpNstNodepath + "etrlfd")=="0")) {
		var replcnts8add	 = "";
	}else {
		replcnts8add	 =  	"경구영양 " + model.getValue(tmpNstNodepath + "etrlfd") + " kcal/d";
	}
	if (( model.getValue(tmpNstNodepath + "tubfd")=="") || (model.getValue(tmpNstNodepath + "tubfd")=="0")) {
		var replcnts9	 = "";
	}else {
		var replcnts9	 =  	"\t 경관영양 " + model.getValue(tmpNstNodepath + "tubfd")  + " kcal/d";
	}
	if (( model.getValue(tmpNstNodepath + "itvnfd")=="") || (model.getValue(tmpNstNodepath + "itvnfd")=="0")) {
		var replcnts10	 = "";
	}else {
		var replcnts10 =  	"\t 정맥영양 " + model.getValue(tmpNstNodepath + "itvnfd")  + " kcal/d";
	}
	if (( model.getValue(tmpNstNodepath + "totintkcalr")=="") || (model.getValue(tmpNstNodepath + "totintkcalr")=="0")) {
		var replcnts11	 = "";
	}else {
		var replcnts11 =  	"\n총섭취열량 " + model.getValue(tmpNstNodepath + "totintkcalr")  + " kcal/d";
	}
	if (( model.getValue(tmpNstNodepath + "totintkprot")=="") || (model.getValue(tmpNstNodepath + "totintkprot")=="0")) {
		var replcnts12	 = "";
	}else {
		var replcnts12 =  	"\t 총단백질량 " + model.getValue(tmpNstNodepath + "totintkprot")  + " g/d";
	}

	var replcnts13 =  	"\n\nO : ";

	var replcnts14 =  	"\nο Ht : " + ht +"cm ,  Wt : " +  wt + "kg ,   IBW : " + ibw + "kg ,  PIBW : "+ pibw + "%" ;
	var replcnts15 =  	"\nο Wt.change :  " +  model.getValue(tmpNstNodepath + "wtchngkg" ) +"kg  "
	                     + "(  " + model.getValue(tmpNstNodepath + "wtchngperc")  + " )% / "
	                     + model.getValue(tmpNstNodepath + "wtchngmm") + " 개월 " + model.getValue(tmpNstNodepath + "physmeasetc")
	                     + "\nο 검사결과";


	if (( model.getValue(tmpNstNodepath + "alb")=="") || (model.getValue(tmpNstNodepath + "/alb")=="0")) {
		replcnts15 =  replcnts15 +   "";
	}else {
		 replcnts15 =  replcnts15 +   "     Alb : " +  model.getValue(tmpNstNodepath + "alb");
	}
	if (( model.getValue(tmpNstNodepath + "tlc")=="") || (model.getValue(tmpNstNodepath + "tlc")=="0")) {
		replcnts15 =  replcnts15 +   "";
	}else {
		 replcnts15 =  replcnts15 +   "     TLC : " +  model.getValue(tmpNstNodepath + "tlc");
	}
	if (( model.getValue(tmpNstNodepath + "hb")=="") || (model.getValue(tmpNstNodepath + "hb")=="0")) {
		 replcnts15 =  replcnts15 +   "";
	}else {
		 replcnts15 =  replcnts15 +   "     Hb : " +  model.getValue(tmpNstNodepath + "hb");
	}

	if (( model.getValue(tmpNstNodepath + "hct")=="") || (model.getValue(tmpNstNodepath + "hct")=="0")) {
		 replcnts15 =   replcnts15 +  "";
	}else {
		 replcnts15 =  replcnts15 +   "     Hct : " +  model.getValue(tmpNstNodepath + "hct");
	}

	if (( model.getValue(tmpNstNodepath + "trf")=="") || (model.getValue(tmpNstNodepath + "trf")=="0")) {
		 replcnts15 = replcnts15 +    "";
	}else {
		 replcnts15 =  replcnts15 +   "\n\tTRF : " +  model.getValue(tmpNstNodepath + "trf");
	}
	if (( model.getValue(tmpNstNodepath + "rbp")=="") || (model.getValue(tmpNstNodepath + "rbp")=="0")) {
		 replcnts15 =   replcnts15 +  "";
	}else {
		 replcnts15 =  replcnts15 +   "     RBP : " +  model.getValue(tmpNstNodepath + "rbp");
	}

	if (( model.getValue(tmpNstNodepath + "na")=="") || (model.getValue(tmpNstNodepath + "na")=="0")) {
		 replcnts15 =  replcnts15 +   "";
	}else {
		 replcnts15 =   replcnts15 +   "     Na : " +  model.getValue(tmpNstNodepath + "na");
	}
	if (( model.getValue(tmpNstNodepath + "k")=="") || (model.getValue(tmpNstNodepath + "k")=="0")) {
		 replcnts15 =  replcnts15 +   "";
	}else {
		 replcnts15 =   replcnts15 +  "     K : " +  model.getValue(tmpNstNodepath + "k");
	}
	if (( model.getValue(tmpNstNodepath + "cl")=="") || (model.getValue(tmpNstNodepath + "cl")=="0")) {
		 replcnts15 =  replcnts15 +   "";
	}else {
		 replcnts15 =  replcnts15 +   "     Cl : " +  model.getValue(tmpNstNodepath + "cl");
	}
	if (( model.getValue(tmpNstNodepath + "bun")=="") || (model.getValue(tmpNstNodepath + "bun")=="0")) {
		 replcnts15 =   replcnts15 +  "";
	}else {
		 replcnts15 =  replcnts15 +   "\n\tBUN : " +  model.getValue(tmpNstNodepath + "bun");
	}
	if (( model.getValue(tmpNstNodepath + "cr")=="") || (model.getValue(tmpNstNodepath + "cr")=="0")) {
		 replcnts15 = replcnts15 +    "";
	}else {
		 replcnts15 =  replcnts15 +   "     Cr : " +  model.getValue(tmpNstNodepath + "cr");
	}
	if (( model.getValue(tmpNstNodepath + "chol")=="") || (model.getValue(tmpNstNodepath + "chol")=="0")) {
		 replcnts15 =  replcnts15 +   "";
	}else {
		 replcnts15 = replcnts15 +    "     Chol : " +  model.getValue(tmpNstNodepath + "chol");
	}
	if (( model.getValue(tmpNstNodepath + "tg")=="") || (model.getValue(tmpNstNodepath + "tg")=="0")) {
		 replcnts15 =  replcnts15 +   "";
	}else {
		 replcnts15 =  replcnts15 +   "     TG : " +  model.getValue(tmpNstNodepath + "tg");
	}
	if (( model.getValue(tmpNstNodepath + "ca")=="") || (model.getValue(tmpNstNodepath + "ca")=="0")) {
		 replcnts15 =  replcnts15 +   "";
	}else {
		 replcnts15 =   replcnts15 +  "\n\tCa : " +  model.getValue(tmpNstNodepath + "ca");
	}
	if (( model.getValue(tmpNstNodepath + "p")=="") || (model.getValue(tmpNstNodepath + "p")=="0")) {
		 replcnts15 = replcnts15 +    "";
	}else {
		 replcnts15 = replcnts15 +    "     P : " +  model.getValue(tmpNstNodepath + "p");
	}
	if (( model.getValue(tmpNstNodepath + "mg")=="") || (model.getValue(tmpNstNodepath + "mg")=="0")) {
		 replcnts15 =  replcnts15 +   "";
	}else {
		 replcnts15 =  replcnts15 +   "     Mg : " +  model.getValue(tmpNstNodepath + "mg");
	}
	if (( model.getValue(tmpNstNodepath + "ins")=="") || (model.getValue(tmpNstNodepath + "ins")=="0")) {
		 replcnts15 =  replcnts15 +   "";
	}else {
		 replcnts15 =  replcnts15 +   "     INS : " +  model.getValue(tmpNstNodepath + "ins");
	}
	if (( model.getValue(tmpNstNodepath + "nbcalval")=="") || (model.getValue(tmpNstNodepath + "nbcalval")=="0")) {
		 replcnts15 =  replcnts15 +   "";
	}else {
		 replcnts15 = replcnts15 +  "     N-Balance : " +  model.getValue(tmpNstNodepath + "nbcalval");
	}

	var replcnts16 =  	"\n\nA : "
	   			 + "\nο 영양상태 판정 : " + nutrjudg ;

	var replcnts17 =  	"\nο 영양요구량 "   ;
	var replcnts18 =  	"\n  * 열량 : "  + needcaltotal  + " kcal/day" ;
	
	//계수법
	if ( needcalrflag == "1") {
	   // replcnts18= replcnts18 + "  ( " + needcalr1+ " x "  + needcalr2 + " kcal/kg )";
    }else{
    	if (needcalr8 !=""){
    		replcnts18= replcnts18 + "  ( BEE : " + model.getValue("/root/init/bee") + ", AF : " + needcalr8 ;
    	}else{
    		if (needcalr4 !=""){
    			replcnts18= replcnts18 + "  ( BEE : " + model.getValue("/root/init/bee") +  ", AF : " + needcalr4 ;
    		}else{
    			replcnts18= replcnts18 ;
    		}
    	}
   		//2009-02-09 IF 추가
    	if (needcalr5 !=""){
    		replcnts18= replcnts18 + ",  IF : " + needcalr5 + " )";
    	}else{
    		replcnts18 = replcnts18 + ")";
    	}

    }

    // 2010-05-07 추구관리 단백질/수분요구량 회신내역 추가
    var replcnts181 ="";    //단백질
    var replcnts182 ="";    //수분요구량
    
	replcnts181 =  	"\n  * 단백질 : "  + protsuplvol + " g/day ( IBW * " + model.getValue(tmpNstNodepath + "prot2") + " g/kg ) " ;
	replcnts182 =  	"\n  * 수분요구량 : "  + waterreqvol + "ml/d";
	if ( model.getValue(tmpNstNodepath + "nutrreqvol")=="") {
		replcnts182 = replcnts182 + "";
	}else {
		replcnts182 = replcnts182 +"\n  * 기타 : "  + model.getValue(tmpNstNodepath + "nutrreqvol") ;
	}


    var replcnts19 ="";
    var replcnts20 ="";
    var replcnts21 ="";
    var replcnts22="";
    var replcnts23="";
    
    if (NstEnGubun == "EDU") {          //EN - 교육의뢰일경우만 해당됨
    	    replcnts19 =  	"\n\nP : "
    	                + 	"\nο 영양교육내용 : " + dietedustandard 
    	                +   "\n      " + dietedurslt ;

        	                
    	//2009-12-30 CarePaln회신내용 추가 Start
    	var carePlanData = model.getValue(tmpNstNodepathMain + "careplaninfo/problemcareplan");
    	if(carePlanData != "") {
    	    replcnts20 = "\nο Problem : Plan "+ "\n";
    	
        	// 로우 데이터 별로 나누기
        	carePlanData = carePlanData.split("§");
        	
        	for(var i = 1; i <= carePlanData.length; ++i) {
        		var problemPlanData = carePlanData[i-1].split("▦");
        		replcnts20 = replcnts20 + "   " + problemPlanData[0] + " : " + problemPlanData[1] + "\n";
        	}
        }
    	//2009-12-30 CarePaln회신내용 추가 End           
        if (dieteroffr !="") {
        	var replcnts21 =  	"\nο 영양사 의견 : " + dieteroffr ;
        }

    	//2014-05-26 의사제언 추가          
        if (droffr !="") {
        	var replcnts40 =  	"\nο 의사 의견 : " + droffr ;
        }  
        
    	//2014-05-26 약사제언 추가          
        if (pharmstoffr !="") {
        	var replcnts41 =  	"\nο 약사 의견 : " + pharmstoffr ;
        } 
        
    }
    
    
    
    //EN-교육/추구관리 해당없음
    if (NstEnGubun == "PURS") {
            replcnts19     =  	"\n\nP : "
        if (dieteroffr !="") {
        	var replcnts21 =    "\nο 영양사 제언 : " + "\n" + fSortWord(tab,dieteroffr,60) ;  //영양사제언
        }
        if (droffr !="") {
        	var replcnts40 =    "\nο 의사 제언 : " + "\n" + fSortWord(tab,droffr,60) ;  //의사제언
        } 
        if (pharmstoffr !="") {
        	var replcnts41 =    "\nο 약사 제언 : " + "\n" + fSortWord(tab,pharmstoffr,60) ;  //약사제언
        }  
    	//2014-09-03 간호사제언 추가          
        if (nurseoffr !="") {
        	var replcnts55 =  	"\nο 간호사 의견 : " + "\n" + fSortWord(tab,nurseoffr,60) ;  //간호사제언 
        }                        
        if (model.getValue(tmpNstNodepath + "mntr") !="") {
        	var replcnts22 =    "\nο 모니터링 : " + "\n" + fSortWord(tab,model.getValue(tmpNstNodepath + "mntr"),60) ;  //모니터링
        }
     }
    
	var replcnts29 =  	"\n\n\n" + getCurrentDate().toDate().getDateFormat("YYYY/MM/DD") + "     의사 : " + drnm + "  " + "/영양사 : " + dieterid + "  " + "/약사 : " + pharmstnm + "  " + "/간호사 : "+ nursenm ;
	replcnts29 += "\n\t\t\tNST 위원장 : " +model.getValue("/root/init/codelist/drid/codelist/cdnm");

	var RitemEN1 = replcnts1+replcnts2+replcnts3+replcnts4+replcnts5+replcnts6+replcnts7+replcnts8+replcnts8add+replcnts9+replcnts10;
	var RitemEN2 = replcnts11+replcnts12+replcnts13+replcnts14+replcnts15+replcnts16+replcnts17+replcnts18+replcnts181+replcnts182+replcnts19+replcnts20;
	var RitemEN3 = replcnts21+replcnts40+replcnts41+replcnts55+replcnts22+replcnts23+ replcnts29;
	var replcnts = RitemEN1 + RitemEN2 + RitemEN3;

	model.makeNode(tmpNstNodepath + "replcnts"); // 회신내역 노드생성
	model.setValue(tmpNstNodepath + "replcnts", replcnts); // 회신내역 변수설정
	model.setValue("/root/main/nstreqinfo/data", replcnts);
	model.refresh();
	if(sendflag == true)
	{
		//2008-11-17 EN에 대해서 회신내용 수정가능하도록 처리.
		//2009-01-22 PN에 대해서 회신내용 수정가능하도록 처리.  formflag : EN -> NST 변경
		var sel = fSendReplForm(replcnts,"NST");
		if(sel == "cfm"){
			model.setValue(tmpNstNodepath + "replcnts",model.getValue("/root/temp/formdata/replinfo/replcnts"));
			return true;
		}else return false;
	}
}

/*
* =========================================================================================================
* =========================================================================================================
* ====================== Care Plan  및 환자교육통합기록조호(다학제)관려부분입니다  ========================
* =========================================================================================================
* =========================================================================================================
*/

/* 
 *	Care Plan 관련 ENR 데이터 전송
 */
function sendENRCAREPLANData(tmpNstNodepathMain) {
	
	if (model.getValue("/root/hidden/sendENRCAREPLANData/nodesendYN") !="Y") return true;   //2010-01-04 임시-추후 반드시 삭제처리 
	
	// Care Plan 전송 필수 데이터 체크
	if(!checkENRCAREPLANData(tmpNstNodepathMain)) {
		return false;
	}
	
	var sendCheck = "N";
	var sColSep = "▦";
	var sRowSep = "▩";
	
	// 그리드 헤더값 생성
	var rCSV = "m▦instcd▦careplanseq▦pid▦orddd▦cretno▦workflag▦problem▦careplan▦rgstdd▦rgsttm";
	var m = "";
	var instcd = "";
	var careplanseq = "";
	var pid = "";
	var orddd = "";
	var cretno = "";
	var workflag = "";
	var problem = "";
	var careplan = "";
	var rgstdd = "";
	var rgsttm = "";
	var problemcareplan = "";

	m               = "i";	
	instcd          = getUserInfo("dutplceinstcd");
	pid             = model.getValue("/root/main/patinfo/baseinfo/pid");
	orddd           = model.getValue("/root/main/patinfo/baseinfo/orddd");
	cretno          = model.getValue("/root/main/patinfo/baseinfo/cretno");
	workflag        = "004" //model.getValue(tmpNstNodepathMain + "careplaninfo/workflag");
	problemcareplan = model.getValue(tmpNstNodepathMain + "careplaninfo/problemcareplan");
	rgstdd          = model.getValue(tmpNstNodepathMain + "careplaninfo/rgstdd");
	rgsttm          = model.getValue(tmpNstNodepathMain + "careplaninfo/rgsttm");	

	// problem, careplan 데이터 나누기
	var splitData = problemcareplan.split("§");
	
	for(var i = 0; i < splitData.length; ++i) {
		rCSV +=
		sRowSep +
		m + sColSep +
		instcd + sColSep +
		careplanseq + sColSep +
		pid + sColSep +
		orddd + sColSep +
		cretno + sColSep +
		workflag + sColSep +
		splitData[i] + sColSep +
		rgstdd + sColSep +
		rgsttm;
	}
	
	// Care Plan 관련 전송 데이터 세팅
	model.makeValue("/root/send/data/careplan/listdata", rCSV);
	if(submit("TXANC00357")) {
	    //2010-02-24 NST-PN에 대해서는 회신시 전송되는 것이 아니라 
	    //          회신후 [CarePlan전송]버튼 클릭시 전송되므로 별도의 전송정보를 저장한다.
	    if (gv_CnstType =="PN") {
			model.makeValue ("/root/send/data/careplan/nstpndata/pid"			    ,pid)			    //등록번호
			model.makeValue ("/root/send/data/careplan/nstpndata/formcd"	        ,"0000000770")	    //FormCD
			model.makeValue ("/root/send/data/careplan/nstpndata/rgstseqno"	        ,model.getValue("/root/main/nstinfo/nutrpninfo/rgstseqno"))			//저장순번
			model.makeValue ("/root/send/data/careplan/nstpndata/replyn"		    ,"Y")			    //전송여부
			model.makeValue ("/root/send/data/careplan/nstpndata/workflag"	        ,workflag)			//작업구분
			model.makeValue ("/root/send/data/careplan/nstpndata/problemcareplan"	,problemcareplan)	//CarePlan 내용
			model.makeValue ("/root/send/data/careplan/nstpndata/jcirgstdd"	        ,rgstdd)			//전송일자
			model.makeValue ("/root/send/data/careplan/nstpndata/jcirgsttm"	        ,rgsttm)			//전송시간
			if (submit("TXADC00905")) {;		//TDM 데이타 저장 //NST 데이타 저장
			    //2010-03-08 NST-PN JCI CarePlan전송후 CarePlan 메인 화면 띄우기
    			//messageBox("정상적으로 [CarePlan 전송]이 ", "I002");
    			model.makeValue (tmpNstNodepathMain + "careplaninfo/replyn"			    ,"Y")				//전송여부
    			//JCI Care Plan 통합조회 화면  개발 연동
				var  pid= model.getValue("/root/main/patinfo/baseinfo/pid")
				setParameter("SMMRJ00100_pid", pid);
				modal("SMMRJ00100");			// CarePlan 연동
		    }
	    }
		return true;
	} else {
		messageBox("Care Plan 전송 처리 오류!! 시스템 담당자에게 문의", "I008");
		return false;
	}
}

/*
 * Care Plan 전송 필수 데이터 체크
 */ 
function checkENRCAREPLANData(tmpNstNodepathMain) {
    
	var instcd      = "";
	var careplanseq = "";
	var pid         = "";
	var orddd       = "";
	var cretno      = "";
	var workflag    = "";
	var problem     = "";
	var careplan    = "";
	var rgstdd      = "";
	var rgsttm      = "";
	var problemcareplan = "";

	//  데이터 세팅
	instcd          = getUserInfo("dutplceinstcd");
	pid             = model.getValue("/root/main/patinfo/baseinfo/pid");
	orddd           = model.getValue("/root/main/patinfo/baseinfo/orddd");
	cretno          = model.getValue("/root/main/patinfo/baseinfo/cretno");
	workflag        = model.getValue(tmpNstNodepathMain + "careplaninfo/workflag");
	problemcareplan = model.getValue(tmpNstNodepathMain + "careplaninfo/problemcareplan");
	rgstdd          = model.getValue(tmpNstNodepathMain + "careplaninfo/rgstdd");
	rgsttm          = model.getValue(tmpNstNodepathMain + "careplaninfo/rgsttm");
	
	// Care Plan 전송 필수 데이터 체크
	if(instcd == "" || pid == "" || orddd == "" || cretno == "" || 
		workflag == "" || problemcareplan == "" || rgstdd == "" || 
		rgsttm == "") {
		messageBox("Care Plan 전송 항목인 'problem', 'plan', '등록일자', '등록시간' 은", "I003");
		return false;
	}
	
	return true;
}

/* 
 *	Care Plan 관련 ENR 데이터 전송 
 *    NST -PN [CarePlan전송]버튼 클릭시 전송데이타를 만들어 전송처리한다.  
 */
function sendENRCAREPLANDataPN(tmpNstNodepathMain) {
    
   	//2010-03-08 머리말 넣기 (TPN)
   	//var problem 	= fSortWord(tab,splitChkBox(chk_nutjudg),50,"N");     //영양상태 판정
    var problem = "";
    if ( fSortWord(tab,splitChkBox(chk_nutjudg),50,"N") !="") {
   	    problem 	= "[TPN]\n" + fSortWord(tab,splitChkBox(chk_nutjudg),50,"N");     //영양상태 판정
    }
    var careplan="";    
    if ( fSortWord(tab,input104.label + " kcal/day",65) !="") {
	    careplan += "필요열량 : "+ fSortWord(tab,input104.label + " kcal/day",65) +"\n";		// 보정열량값 
    }
    if (fSortWord(tab,"" + nstcodetext,60,"N") !="") {
	    careplan += "추천제형 : "+ cmb_nstcode.value + "\n";            //추천 제형 //2010-03-08 ()내용제외 : fSortWord(tab,"" + nstcodetext,60,"N")+"\n";           
    }
    if (ipt_prot1.value!="") {
	    careplan += "추천공급량 : "+fSortWord(tab,"" + (ipt_prot1.value/24).toString().getRound(-1,"HALF_UP") + "cc/hr" + " ("+(ipt_recmdrugvol.label)+"kcal/"+ipt_prot1.value+"ml/day)",50,"N")+"\n";
    }
    
	if(problem == "" || careplan=="" ) {
		messageBox("Care Plan 전송 항목인 'problem', 'care plan & goal' 은", "I003");
		return false;
	}else{
		careplan +=  "(자세한사항은 Consult관리- 정맥영양지원(NST) 회신내용을 참고하십시오.)"	;						
	}	    
    	    
	var problemcareplan =  problem + "▦" + careplan ;    
	model.setValue(tmpNstNodepathMain + "careplaninfo/problemcareplan"  ,problemcareplan);      //problemcareplan
	model.setValue(tmpNstNodepathMain + "careplaninfo/rgstdd"           ,getCurrentDate());     //등록일자
	model.setValue(tmpNstNodepathMain + "careplaninfo/rgsttm"           ,getCurrentTime());     //등록시간

    sendENRCAREPLANData(tmpNstNodepathMain);        //Care Plan 관련 ENR 데이터 전송
        
}

/* 
 *	다학제간 관련 ENR 데이터 전송
 */
function sendENREDUData(tmpNstNodepathMain) {
	
	if (model.getValue("/root/hidden/sendENREDUData/nodesendYN") !="Y") return true;        //2010-01-04 임시-추후 반드시 삭제처리 
	
	// 다학제간 전송 필수 데이터 체크
	if(!checkENREDUData(tmpNstNodepathMain)) {
		return false;
	}
	
	var sColSep = "▦";
	var sRowSep = "▩";
	
	// 그리드 헤더값 생성
	var rCSV = "m▦instcd▦pid▦orddd▦cretno▦histno▦delyn▦educd▦educnts▦eduprepyn▦eduwho▦eduway▦edurslt▦edudd▦edutm▦eduid▦fstrgstrid▦fstrgstdt▦lastupdtrid▦lastupdtdt";
	
	var m           = "";
	var instcd      = "";
	var pid         = "";
	var orddd       = "";
	var cretno      = "";
	var histno      = "";
	var delyn       = "";
	var educd       = "";
	var educnts     = "";
	var eduprepyn   = "";
	var eduwho      = "";
	var eduway      = "";
	var edurslt     = "";
	var edudd       = "";
	var edutm       = "";
	var eduid       = "";
	var fstrgstrid  = "";
	var fstrgstdt   = "";
	var lastupdtrid = "";
	var lastupdtdt  = "";
	
    // 데이터 세팅
	m               = "i";
	instcd          = getUserInfo("dutplceinstcd");
	pid             = model.getValue("/root/main/patinfo/baseinfo/pid");
	orddd           = model.getValue("/root/main/patinfo/baseinfo/orddd");
	cretno          = model.getValue("/root/main/patinfo/baseinfo/cretno");
	histno          = "";
	delyn           = model.getValue(tmpNstNodepathMain + "enreduinfo/delyn");         // 삭제유무
	educd           = model.getValue(tmpNstNodepathMain + "enreduinfo/educd");         // 교육항목코드
	educnts         = model.getValue(tmpNstNodepathMain + "enreduinfo/educnts");       // 교육내용
	eduprepyn       = model.getValue(tmpNstNodepathMain + "enreduinfo/eduprepyn");     // 학습준비도(Y/N)
	eduwho          = model.getValue(tmpNstNodepathMain + "enreduinfo/eduwho");        // 교육대상자(환자, 보호자, 기타)
	eduway          = model.getValue(tmpNstNodepathMain + "enreduinfo/eduway");        // 교육방법
	edurslt         = model.getValue(tmpNstNodepathMain + "enreduinfo/edurslt");       // 교육결과
	edudd           = model.getValue(tmpNstNodepathMain + "enreduinfo/edudd");         // 교육일자
	edutm           = model.getValue(tmpNstNodepathMain + "enreduinfo/edutm");         // 교육시간
	eduid           = "";
	fstrgstrid      = "";
	fstrgstdt       = "";
	lastupdtrid     = "";
	lastupdtdt      = "";
	

	
	// ENR 전송 데이터 생성
	rCSV +=
	sRowSep +
	m + sColSep +
	instcd + sColSep +
	pid + sColSep +
	orddd + sColSep +
	cretno + sColSep +
	histno + sColSep +
	delyn + sColSep +
	educd + sColSep +
	educnts + sColSep +
	eduprepyn + sColSep +
	eduwho + sColSep +
	eduway + sColSep +
	edurslt + sColSep +
	edudd + sColSep +
	edutm + sColSep +
	eduid + sColSep +
	fstrgstrid + sColSep +
	fstrgstdt + sColSep +
	lastupdtrid + sColSep +
	lastupdtdt;
	
	// 다학제간 관련 전송 데이터 세팅
	model.makeValue("/root/send/data/mrjhedu/listdata", rCSV);
	
	if(submit("TXANC00356")) {
		return true;
	} else {
		messageBox("다학제간 전송 처리 오류!! 시스템 담당자에게 문의", "I008");
		return false;
	}
}

/*
 * 다학제간 전송 필수 데이터 체크
 */ 
function checkENREDUData(tmpNstNodepathMain) {
	var m           = "";
	var instcd      = "";
	var pid         = "";
	var orddd       = "";
	var cretno      = "";
	var histno      = "";
	var delyn       = "";
	var educd       = "";
	var educnts     = "";
	var eduprepyn   = "";
	var eduwho      = "";
	var eduway      = "";
	var edurslt     = "";
	var edudd       = "";
	var edutm       = "";
	var eduid       = "";
	var fstrgstrid  = "";
	var fstrgstdt   = "";
	var lastupdtrid = "";
	var lastupdtdt  = "";
	/*
	var cnts = cmb_cnstcd.label;	// 상용구선택
	var cnstcnts = model.getValue("/root/main/maindata/cnstreq/cnstcnts");	// 상용구 아래 텍스트 박스 내용
	var cnstpsn1 = chk_cnstpsn.label;	// 피상담자
	
	// 피상담자
	cnstpsn1 = cnstpsn1.replace("▩", ", ");
	
	// 교육내용
	if(cnts == "" && cnstcnts == "") {
		cnts = "";
	}
    */
	// 데이터 세팅
	
	instcd          = getUserInfo("dutplceinstcd");
	pid             = model.getValue("/root/main/patinfo/baseinfo/pid");
	orddd           = model.getValue("/root/main/patinfo/baseinfo/orddd");
	cretno          = model.getValue("/root/main/patinfo/baseinfo/cretno");

	histno          = "";
	delyn           = model.getValue(tmpNstNodepathMain + "enreduinfo/delyn");         // 삭제유무
	educd           = model.getValue(tmpNstNodepathMain + "enreduinfo/educd");         // 교육항목코드
	educnts         = model.getValue(tmpNstNodepathMain + "enreduinfo/educnts");       // 교육내용
	eduprepyn       = model.getValue(tmpNstNodepathMain + "enreduinfo/eduprepyn");     // 학습준비도(Y/N)
	eduwho          = model.getValue(tmpNstNodepathMain + "enreduinfo/eduwho");        // 교육대상자(환자, 보호자, 기타)
	eduway          = model.getValue(tmpNstNodepathMain + "enreduinfo/eduway");        // 교육방법
	edurslt         = model.getValue(tmpNstNodepathMain + "enreduinfo/edurslt");       // 교육결과
	edudd           = model.getValue(tmpNstNodepathMain + "enreduinfo/edudd");         // 교육일자
	edutm           = model.getValue(tmpNstNodepathMain + "enreduinfo/edutm");         // 교육시간
	eduid           = "";
	fstrgstrid      = "";
	fstrgstdt       = "";
	lastupdtrid     = "";
	lastupdtdt      = "";

	
	// 다학제간 전송 필수 데이터 체크
	if(instcd == "" || pid == "" || orddd == "" || cretno == "" || 
		delyn == "" || educd == "" || educnts == "" || eduprepyn == "" || 
		eduwho == "" || eduway == "" || edurslt == "" || edudd == "" || 
		edutm == "") {
			
		messageBox(" 다학제 전송 항목인 '영양상담내용', '학습준비도', '교육대상자', '교육방법', '교육결과' 는", "I003");
		return false;
	}
	
	// 다학제간 전송 필수 데이터 체크
	if(edudd == "" || edutm == "") {
		messageBox("다학제간 전송 필수 항목인 '교육일자', '교육시간' 은", "I003");
		return false;
	}
	
	return true;
}