YNU_JEUS/app_home/himed/webapps/ast/healthexamrsrvacptweb/js/AHA.js

/************************************************************************************************
@(#)AHA001.js
@author 	: 손주연
@version 	: 2007-04-18
@desc		: 건진업무에서 사용하는 공용함수 관리
*************************************************************************************************/

/************************************************************************************************
**fMoveFocus
@author 	: 손주연
@version 	: 2007-04-18
@desc		: enter key입력시  특정 control로 focus 이동
*************************************************************************************************/
	function fMoveFocus(vCtrlID){
			if( event.keyCode == 13 ) {
				if( vCtrlID != "" ) model.setFocus(vCtrlID);
			}
	}

/************************************************************************************************
**fExcelUpload
@author 	: 손주연
@version 	: 2007-04-18
@desc 		:Excel File을 grid로 load한다.
@param 	: grid control id
*************************************************************************************************/
	function fExcelToGrid(grdObj){
				/*	if(grdObj == "xforms:datagrid"){*/
				var fileName = window.fileDialog("open", ",", false, "", "xls", "All Files (*.*)|*.*|Excel Files(*.xls)|*.xls");
				vId.loadExcel(fileName, 1, true);
				var cnt = grdObj.rows;
				var i = 0;
				for(  i = 1; i < cnt +1 ; i++)
				{
					grdObj.addStatus(i, "insert");
				}
				grdObj.deleteRow(1);
				grdObj.refresh();
	}

/**
*====================================================================================================================================.
@author 	: 손주연
@version 	: 2007-04-20
@desc 		: 건진구분 설정 =>  추후 로그인 시 건진구분 세션관리가 되지 않을 경우를 대비.
@param 	: grid control id
@return 	:  C: 종건/ G :일건
====================================================================================================================================*/
	function  fGetHealExamFlag(){
		var sFlag =  getScreenMenuParameter() ;
		var sFlagLen = parseInt(sFlag.length);
		// 한자리 이하 인경우 ==> 건진구분(C,G)로 구분
		if(sFlagLen <= 1) {
			if(  sFlag == "" ) sFlag = "G";		
		}else { // 한자리 초과인경우 => 건진상세구분 (CXX ,GXX)로 구분
			sFlag = sFlag.substr(0,1);
		}		
		return sFlag ;
	}



/**
*	기관코드 및 사업체코드가져오기======================================================================================================================
@author 	: 손주연
@version 	: 2007-04-30
@desc 		: 기관코드 및 사업체코드가져오기
@param 	:
				*vOpenerID	: 현재화면ID
				*vFlag 			: 코드구분  공통코드 A0114참조
									** 01	판정의
									** 02	건강보험공단
									** 03	관할군병원
									** 04	산업안전공단
									** 05	보건소
									** 06	노동청
									** 07	지도원
									** 08 	사업체
				* vCond 			:	검색구분(cd/nm)
				* vCdnm			: 검색조건(코드/명칭)
				* vDesXPathCd: code값을 setting할 목적노드
				* vDesXPathNm: name값을 setting할 목적노드
				*  SPAHA00500_PARAM1 : 코드구분  공통코드 A0114참조
				*  SPAHA00500_PARAM2 : 검색구분(cd/nm)
				*  SPAHA00500_PARAM3 : 검색조건(코드/명칭)
				*  SPAHA00500_PARAM4 : 기관코드
				*  SPAHA00500_PARAM5 : 코드구분  공통코드 A0114참조
				*  SPAHA00500_PARAM6 : code값을 setting할 목적노드
				*  SPAHA00500_PARAM7 : name값을 setting할 목적노드
*/
	function fGetComnCd(vOpenerID, vFlag , vCond, vCdnm , vDesXPathCd , vDesXPathNm ){
		clearParameter("SPAHA00500_PARAM1");
		clearParameter("SPAHA00500_PARAM2");
		clearParameter("SPAHA00500_PARAM3");
		clearParameter("SPAHA00500_PARAM4");
		clearParameter("SPAHA00500_PARAM5");
		clearParameter("SPAHA00500_PARAM6");
		clearParameter("SPAHA00500_PARAM7");

		setParameter ("SPAHA00500_PARAM1", vFlag);
		setParameter ("SPAHA00500_PARAM2", vCond);
		setParameter ("SPAHA00500_PARAM3", vCdnm);
		setParameter ("SPAHA00500_PARAM4", getUserInfo("dutplceinstcd"));
		setParameter ("SPAHA00500_PARAM5", vOpenerID);
		setParameter ("SPAHA00500_PARAM6", vDesXPathCd);
		setParameter ("SPAHA00500_PARAM7", vDesXPathNm);

		modal("SPAHA00500");
	}

/**
* Node가 존재하지 않을 경우 make.======================================================================================================================
@author 	: 손주연
@version 	: 2007-04-30
@desc 		: Node가 존재하지 않을 경우 make.
@param 	:
				* xPath : node XPath
				* bMake	: make 여부
@return 	: true/false (node 존재 여부 )
*/
	function fCheckNodeExist(xPath, bMake){
		var node = instance1.selectSingleNode( xPath);
		if(  node == null  ) {
			if(bMake==true){
				 model.makeNode(xPath);
				 return true;
			}
			else {
				return false;
			}
		}

		return true;
	}


/**
* 환자검색창 open=====================================================================================================================================
@author 	: 손주연
@version 	: 2007-04-30
@desc 		: 환자검색창 open
@param 	:
				* SPAHA00400_PARAM1 : 현재화면ID
				* SPAHA00400_PARAM2 : 검색조건 pnm/pid/rgstno
				* SPAHA00400_PARAM3 : 검색어
				* SPAHA00400_PARAM4 : nodeset전체 copy여부 (N일경우 원무등록번호와 환자 한글명만 copy)
				* SPAHA00400_PARAM5 : nodeset전체 copy여부 Y 일경우 대상노드
				* SPAHA00400_PARAM6 : nodeset전체 copy여부 N 일경우 원무등록번호 대상노드
				* SPAHA00400_PARAM7 : nodeset전체 copy여부 N 일경우 환자 한글명 대상노드
* =====================================================================================================================================================
*/
	function fSearchPatInfo(vOpenerID,   vCond, vCdnm, vSetYN, vDestXPath, vDestPid, vDestPnm, vRgstNo1, vRgstNo2 ){

		clearParameter("SPAHA00400_PARAM1");
		clearParameter("SPAHA00400_PARAM2");
		clearParameter("SPAHA00400_PARAM3");
		clearParameter("SPAHA00400_PARAM4");
		clearParameter("SPAHA00400_PARAM5");
		clearParameter("SPAHA00400_PARAM6");
		clearParameter("SPAHA00400_PARAM7");
		clearParameter("SPAHA00400_PARAM8");
		clearParameter("SPAHA00400_PARAM9");

		setParameter ("SPAHA00400_PARAM1", vOpenerID);
		setParameter ("SPAHA00400_PARAM2", vCond);
		setParameter ("SPAHA00400_PARAM3", vCdnm);
		setParameter ("SPAHA00400_PARAM4", vSetYN);
		setParameter ("SPAHA00400_PARAM5", vDestXPath);
		setParameter ("SPAHA00400_PARAM6", vDestPid);
		setParameter ("SPAHA00400_PARAM7", vDestPnm);
		setParameter ("SPAHA00400_PARAM8", vRgstNo1);
		setParameter ("SPAHA00400_PARAM9", vRgstNo2);


		modal("SPAHA00400");

	}


/**
* 환자인적사항저장=====================================================================================================================================
@author 	: 손주연
@version 	: 2007-04-30
@desc 		: 환자인적사항저장
@param 	:
				* vPidYN : 등록번호생성여부
*/
	function fSavePatInfo(vPidYN){
		if( fCheckPatInfo() == false ) return ;
		fCheckNodeExist("/root/main/info/patinfo/item/pidcretfg", true);
		model.removenode("/root/send/save");
		model.makeNode("/root/send/save");

		model.setValue("/root/main/info/patinfo/item/pidcretfg", vPidYN);
		model.copyNode("/root/send/save", "/root/main/info/patinfo/item");

		fCheckNodeExist("/root/send/save/userid", true);
		fCheckNodeExist("/root/send/save/instcd", true);
		model.setValue("/root/send/save/userid", getUserId() );
		model.setValue("/root/send/save/instcd", getUserInfo("dutplceinstcd") );
		model.makeValue("/root/send/save/healexamflag" , model.getValue("/root/send/srchhealexamflag") )
		model.makeNode("/root/send/save/healexamdetlflag");
		model.setValue("/root/send/save/healexamdetlflag", model.getValue("/root/send/srchhealexamdetlflag") );

		openLoadingBar("건진자 인적사항 저장  중입니다..") ;//처리중 화면을 오픈한다.

		submit("TXAHA00101");

		closeLoadingBar() ;//처리중 화면을 close한다.
	}

/**
*  건진자인적사항 내용 check.==========================================================================================================================
@author 	: 손주연
@version 	: 2007-04-30
@desc 		: 건진자인적사항 내용 check
@param 	:
*/
	function fCheckPatInfo(vFrom){
		if (vFrom=="1")
		{

			/**
			*  필수항목 입력여부 check.
			*/
			var vTmp = ipt_pnm.currentText ; // model.getValue("/root/main/info/patinfo/pnm");
			if( vTmp == "" ){
				messageBox("성명을 ", "C001");
				model.setFocus("ipt_pnm");
				return false;
			}
			/**
			*  외국인일 경우 별도의 구분 없이 주민번호 뒷번호가 남/여, 5/6으로 처리.
			*/
			vTmp  = ipt_rgstno1.currentText ;//model.getValue("/root/main/info/patinfo/rgstno1");
			if( vTmp == "" ){
				messageBox("주민번호를 ", "C001");
				model.setFous("ipt_rgstno1");
				return false;
			}

			vTmp  = ipt_rgstno2.currentText ;// model.getValue("/root/main/info/patinfo/rgstno2");
			if( vTmp == "" ){
				messageBox("주민번호를 ", "C001");
				model.setFocus("ipt_rgstno2");
				return false;
			}
			 /*주민번호 유효 체크
			if( fCheckRgstNo() == false){
			 	return false;
			 }
			 */
			return true;
		} else {
			return true;
		}
	}

/** ==========================================================================================================
* fCheckRgstNo
@author 	: 손주연
@version 	: 2007-04-30
@desc 		: 주민번호 유효여부 check
@param 	:
==========================================================================================================================*/
	function fCheckRgstNo(){
		var vTmp =  ipt_rgstno1.currentText  +   ipt_rgstno2.currentText  ;
		if( isResidentNo(vTmp) == false ){
			if( messageBox("유효하지 않은 주민번호 입니다. ", "Q003") == 6 ) {
				return true;
			}

			model.setFocus("ipt_rgstno1");
			return false;
		}
		if( isResidentNo(vTmp) == true  && vTmp.substr(7, 6)=='000000'){
			if( messageBox("외국인 입니다. ", "Q003") == 6 ) {
				return true;
			}

			model.setFocus("ipt_rgstno1");
			return false;
		}
		return true ;
	}

/** ==========================================================================================================
@author 	: 손주연
@version 	: 2007-04-30
@desc 		: 주민번호로 생년월일/성별/나이 기본 setting
@param 	:
* ==========================================================================================================*/
	function fSetBrthDD(){
		//if( ipt_brthdd.value != "" ) return ;
		var vrgstno1 = ipt_rgstno1.currentText;
		var vrgstno2 = ipt_rgstno2.currentText;
		var vSex     = vrgstno2.substr( 0, 1) ;
		var vBrthdd	 = "";
		if(( vSex == 3 ) || (vSex == 4)){
			vBrthdd = "20" + vrgstno1;
		}else{
			vBrthdd = "19" + vrgstno1;
		}
		ipt_brthdd.value = vBrthdd;
		opt_sex.value = getGender(vrgstno1+ vrgstno2);
		opt_age.value = getFullAge(vrgstno1+ vrgstno2);
  }

	function isResidentNo(pResidnetNo)
		{
			if(isNaN(pResidnetNo)) return false;

			if(pResidnetNo.length != 13) return false;

			var c = pResidnetNo.substr(6,1);
			if(c == '5' || c == '6') return true;

			var c2 = pResidnetNo.substr(7,6);
			if(c2 == '000000') return true;

			last = pResidnetNo.substr(12,1);

			regNo = new Array(12); regNo[12] = 0;

			for(var i = 0; i < (regNo.length - 1); i++) {
				regNo[i] = eval(pResidnetNo.substr(i, 1)) * ((i % 8) + 2);
			}

			for(var i = 0; i < (regNo.length - 1); i++) {
				regNo[12] += regNo[i];
			}

			var result = ((11 - (regNo[12] % 11)) % 10);

			if(result == eval(last)) {
				return true;
			} else {
				return false;
			}
		}


/** ==========================================================================================================
@author 	: 손주연
@version 	: 2007-04-30
@desc 		: 수진자 인적사항만 조회, 외국인일 경우 별도의 구분 없이 주민번호 뒷번호가 남/여, 5/6으로 처리.
@param    :
            * 조회조건  : vMode (0 -pnm:환자명, 1-rgstno: 주민번호, 2-pid:등록번호, 3-hpid:건진임시환자번호)
            * vPidXPath : pid node
            * vPnmXPath	: pnm node
* ==========================================================================================================*/
	function fGetPatInfo(vMode, vSrcNode){		
		if(vSrcNode == "" || vSrcNode == null) vSrcNode = "/root/send";

		var vCond       = "";
		var vChoiFlag   = "";
		vChoiFlag       = model.getValue("/root/main/info/rsrvacptinfo/item/choiflag");
    switch(vMode){
			case 0 : vCond = "pnm";
			  break;
			case 1 : vCond = "rgstno";
        if(fCheckRgstNo() == false){
          ipt_rgstno1.value = "";
          ipt_rgstno2.value = "";
          return false;
        }
			  break;
			case 2 : vCond = "pid";
			  break;
			default : vCond = "hid";
			  break;
		}
		
		model.removeNodeSet("/root/send/save");
		fCheckNodeExist(vSrcNode + "/save"              ,	true);
		fCheckNodeExist(vSrcNode + "/srchcond"	        ,	true);
		fCheckNodeExist(vSrcNode + "/srchinstcd"	      ,	true);
		fCheckNodeExist(vSrcNode + "/srchhealexampid"	  ,	true);
		fCheckNodeExist(vSrcNode + "/srchrgstno1"	      ,	true);
		fCheckNodeExist(vSrcNode + "/srchrgstno2"	      ,	true);
		fCheckNodeExist(vSrcNode + "/srchpid"	          ,	true);
		fCheckNodeExist(vSrcNode + "/srchpnm"	          ,	true);

		model.setValue(vSrcNode + "/srchcond"           , vCond);
		model.setValue(vSrcNode + "/srchinstcd"				  , getUserInfo("dutplceinstcd"));
		if(vCond == "pnm"){
			model.setValue(vSrcNode + "/srchpnm"				  , ipt_pnm.currentText);
		}else if(vCond == "pid"){
			model.setValue(vSrcNode + "/srchpid"				  , ipt_pid.currentText);
		}else if(vCond == "rgstno"){
			model.setValue(vSrcNode + "/srchrgstno1"		  , ipt_rgstno1.currentText);
			model.setValue(vSrcNode + "/srchrgstno2"		  , ipt_rgstno2.currentText);
		}else{
			model.setValue(vSrcNode + "/srchhealexampid"  , model.getValue("/root/main/info/patinfo/item/healexampid"));
		}
		fCheckNodeExist("/root/temp/patinfo/item", true);
		model.resetInstanceNode("/root/temp/patinfo/item");

		submit("TRAHA04011", false);
		
		//node clear현상때문임...
		var tmpnode = model.instance1.selectSingleNode("/root/temp/patinfo/item/pid");
		if(tmpnode != null){
			model.copyNode("/root/main/info/patinfo/item", "/root/temp/patinfo/item");
			var detladdr2 = model.getValue("/root/temp/patinfo/item/detladdr2");
      
      //공단건진의 경우 발송주소가 없다면 기존 주소값을 발송주소에 넣는다 .2009-07-18 심승욱			
			if(detladdr2 == '' &&  model.getValue("/root/send/srchhealexamdetlflag") == 'G01'){
				model.setValue("/root/main/info/patinfo/item/zipcd21"   , model.getValue("/root/temp/patinfo/item/zipcd11"));
				model.setValue("/root/main/info/patinfo/item/zipcd22"   , model.getValue("/root/temp/patinfo/item/zipcd12"));
				model.setValue("/root/main/info/patinfo/item/zipcdseq2"	, model.getValue("/root/temp/patinfo/item/zipcdseq1"));
				model.setValue("/root/main/info/patinfo/item/addr2"     , model.getValue("/root/temp/patinfo/item/addr1"));
				model.setValue("/root/main/info/patinfo/item/detladdr2"	, model.getValue("/root/temp/patinfo/item/detladdr1"));
			}
			model.makeValue("/root/main/info/rsrvacptinfo/item/choiflag", vChoiFlag);
		}else{
			model.makeValue("/root/main/info/rsrvacptinfo/item/choiflag", vChoiFlag);
		}
		model.refresh();
	}
	
	function fGetPatInfo2(vMode ){
		var vCond = "";
		switch( vMode ){
			case 0: vCond = "pnm";
			break;
			case 1: vCond = "rgstno";
						if( fCheckRgstNo() == false ){
							ipt_rgstno1.value = "";
							ipt_rgstno2.value = "";
							return ;
						}
			break;
			case 2: vCond = "pid";
			break;
			default : vCond = "hid";
			break;
		}
		model.removeNodeSet("/root/send/save");
		model.makeNode("/root/send/save");
		fCheckNodeExist("/root/send/srchcond"			, true );
		fCheckNodeExist("/root/send/srchpnm"			, true );
		fCheckNodeExist("/root/send/srchpid"				, true );
		fCheckNodeExist("/root/send/srchrgstno1"		, true );
		fCheckNodeExist("/root/send/srchrgstno2"		, true );
		fCheckNodeExist("/root/send/srchhealexampid", true );
		fCheckNodeExist("/root/send/srchinstcd"	    , true );

		model.setValue("/root/send/srchcond"				, vCond);
		if( vCond == "pnm") {
			model.setValue("/root/send/srchpnm"					, ipt_pnm.currentText );
		}
		else
		if( vCond == "pid") {
			model.setValue("/root/send/srchpid"					, model.getValue("/root/send/healexampid"));
		}
		else
		if( vCond == "rgstno") {
			model.setValue("/root/send/srchrgstno1"			, ipt_rgstno1.currentText );
			model.setValue("/root/send/srchrgstno2"			, ipt_rgstno2.currentText );
		}
		else {
			model.setValue("/root/send/srchhealexampid"	, model.getValue("/root/main/info/patinfo/item/healexampid"));
		}
		model.setValue("/root/send/srchinstcd"				, getUserInfo("dutplceinstcd"));

		fCheckNodeExist("/root/temp/patinfo/item", true);
		model.resetInstanceNode("/root/temp/patinfo/item");

		submit("TRAHA04011") ;
		//node clear현상때문임...

		var  tmpnode = model.instance1.selectSingleNode("/root/temp/patinfo/item/pid");
		if( tmpnode != null ){
			model.copyNode("/root/main/info/patinfo/item", "/root/temp/patinfo/item");
		}
		else {
			//model.resetInstanceNode("/root/main/info/patinfo/item");
		}
		model.refresh();
	}
	
	function setPkgInfo(){
    
	}

/** ==========================================================================================================
@author 	: 손주연
@version 	: 2007-09-30
@desc 		: 수진자 인적사항만 조회, 외국인일 경우 별도의 구분 없이 주민번호 뒷번호가 남/여, 5/6으로 처리.
@param 	:
				* 조회조건: vMode (0 -pnm:환자명, 1-rgstno: 주민번호, 2-pid:등록번호, 3-hpid:건진임시환자번호)
				* vCond1 			: 검색어1
				* vCond2 			: 검색어2 (주민번호일경우 ...)
				* vDestXPath	: 대상 노드
* ==========================================================================================================*/
	function ahafGetPatInfo(vMode, vCond1, vCond2, vDestXPath){
		var vCond = "";
		switch( vMode ){
			case 0: vCond = "pnm";
			break;
			case 1: vCond = "rgstno";
						if(fCheckRgstNo() == false ){
							ipt_rgstno1.value = "";
							ipt_rgstno2.value = "";
							return;
						}
			break;
			case 2: vCond = "pid";
			break;
			default : vCond = "hid";
			break;
		}

		fCheckNodeExist(vDestXPath							    , true );
		fCheckNodeExist("/root/send/srchcond"			  , true );
		fCheckNodeExist("/root/send/srchpnm"			  , true );
		fCheckNodeExist("/root/send/srchpid"				, true );
		fCheckNodeExist("/root/send/srchrgstno1"		, true );
		fCheckNodeExist("/root/send/srchrgstno2"		, true );
		fCheckNodeExist("/root/send/srchhealexampid", true );
		fCheckNodeExist("/root/send/srchinstcd"	    , true );

		model.setValue("/root/send/srchcond"					, vCond);
		if( vCond == "pnm"){
			model.setValue("/root/send/srchpnm"					, vCond1);
		}else if( vCond == "pid"){
			model.setValue("/root/send/srchpid"					, vCond1);
		}else if( vCond == "rgstno"){
			model.setValue("/root/send/srchrgstno1"			, vCond1 );
			model.setValue("/root/send/srchrgstno2"			, vCond2 );
		}else{
			model.setValue("/root/send/srchhealexampid"	, vCond1 );
		}
		model.setValue("/root/send/srchinstcd"				, getUserInfo("dutplceinstcd"));

		fCheckNodeExist("/root/temp/patinfo/item", true);
		model.resetInstanceNode("/root/temp/patinfo/item");

		var ret = submit("TRAHA04011");
		if(ret == false) return false;

		//node clear현상때문임...
		var tmpnode = model.instance1.selectSingleNode("/root/temp/patinfo/item/pid");
		if(tmpnode != null){
			model.copyNode(vDestXPath, "/root/temp/patinfo/item");
			return true ;
		}
		return false;
	}

/** ==========================================================================================================
@author 	: 손주연
@version 	: 2007-04-30
@desc 		: 예약/접수정보를 저장
@param 	:
				*  Mode : 공통코드A0107참조
								**A	예약
								**B	예약보류
								**C	예약확인
								**D	예약취소
								**E	접수
								**F	접수취소
								**G	결과
								**H	판정
* ==========================================================================================================*/
	function fSaveRsrvAcpt(vMode,vFrom){

	}


/** ==========================================================================================================
@author 	: 손주연
@version 	: 2007-04-30
@desc 		: 건진자별 건진이력조회
@param 	:
				*  vPid : 등록번호
* ==========================================================================================================*/
	function ahafGetHistList(vPid){
		//var node = instance1.selectSingleNode("/root/main/info/histlst/item");
		model.removeNodeset("/root/main/info/histlst/item");

		if( vPid == ""  ) return ;

		var vhf = "";
		if (model.getValue("/root/main/info/rsrvacptinfo/item/healexamflag")=="")
		{
			vhf = fGetHealExamFlag();
		} else {
			vhf = model.getValue("/root/main/info/rsrvacptinfo/item/healexamflag");
		}
		model.setValue("/root/send/srchhealexamflag"			, vhf);
		model.setValue("/root/send/srchhealexamdetlflag"		, cmb_healexamdetlflag.value );
		model.setValue("/root/send/srchinstcd"						, getUserInfo("dutplceinstcd"));
		model.setValue("/root/send/srchpid"							, vPid);

		submit("TRAHA00106");
	}

/** ==========================================================================================================
@author 	: 김호익
@version 	: 2007-11-15
@desc 		: 검진페키지 상세조회(예약/접수)
@param 	:
				*  vPkgCd : 패키지 코드
* ==========================================================================================================*/
	function ahafGetPkgDetlList(vPkgCd){
		if( vPkgCd == ""  ){
			messageBox("선택된 패키지가 없습니다.", "E999");
			return ;
		}
		model.makeValue("/root/send/PkgCd" , vPkgCd);
		model.makeValue("/root/send/cmpycd" , model.getValue("/root/main/info/rsrvacptinfo/item/cmpycd"));
		model.makeValue("/root/send/conseq" , model.getValue("/root/main/info/rsrvacptinfo/item/conseq"));
		model.makeValue("/root/send/conhistseq" , model.getValue("/root/main/info/rsrvacptinfo/item/conhistseq"));

		submit("TRAHA00113");
	}

	function fSetInstance(svalue){
			model.makeValue("/root/tmp/reqacpt/divflag",		svalue);
			model.makeValue("/root/tmp/reqadd/divflag",		svalue);
			model.makeValue("/root/tmp/reqpkg/divflag",		svalue);
			model.makeValue("/root/tmp/reqacptold/divflag",svalue);
			model.makeValue("/root/tmp/reqaddold/divflag",	svalue);
			model.makeValue("/root/tmp/opatvo/divflag",		svalue);
			model.makeValue("/root/tmp/getvo/divflag",			svalue);
			model.makeValue("/root/tmp/getsflag/divflag",		svalue);
			model.makeValue("/root/tmp/reqords/divflag",		svalue);
			model.makeValue("/root/tmp/retvo/divflag",			svalue);
			model.makeValue("/root/tmp/retstd/divflag",			svalue);
			model.makeValue("/root/tmp/reqpat/divflag",		svalue);

	}


/** ==========================================================================================================
@author 	: 손주연
@version 	: 2007-04-30
@desc 		: 건진자별 건진이력조회
@param 	:
				*  vPid : 등록번호
* ==========================================================================================================*/
	function ahafGetHistList2(vPid, vHealExamDetlFlag , vStatFlag){
		//var node = instance1.selectSingleNode("/root/main/info/histlst/item");
		model.removeNodeset("/root/main/info/histlst/item");

		if( vPid == ""  ) return ;


		model.setValue("/root/send/srchhealexamflag"			, vHealExamDetlFlag.substr(0,1));
		model.setValue("/root/send/srchhealexamdetlflag"		, vHealExamDetlFlag );
		model.setValue("/root/send/srchinstcd"						, getUserInfo("dutplceinstcd"));
		model.setValue("/root/send/srchpid"							, vPid);
		model.setValue("/root/send/srchstatflag"					, vStatFlag);

		submit("TRAHA04016");
	}


/** ==========================================================================================================
@author 	: 손주연
@version 	: 2007-04-30
@desc 		: 패키지 상세내역조회
@param 	:
				* sPkgcd 	: 패키지코드
				* sPkgnm	: 패키지명
				* sSex		: 건진자 성별
				* sCmpycd	: 단체코드
				* iConseq		: 계약번호
				* iConHistseq		: 계약이력번호
* ==========================================================================================================*/
	function  fGetConAddList(sPkgcd, sPkgnm, sSex, sCmpycd, iConseq,iConHistseq ){
		model.removeNodeset("/root/temp/pkgtestcdlst");

		if( ( (sCmpycd == "") || ( iConseq == "" ) || ( iConHistseq == "" )|| ( iConseq == "0" ) || ( iConHistseq == "0" ))
			&& ( (sPkgcd == "") ||(sPkgnm == "")) ) return ;

		model.setValue("/root/send/srchinstcd"		, getUserInfo("dutplceinstcd") );
		model.setValue("/root/send/srchpkgcd"			, sPkgcd);
		var vhf = "";
		if (model.getValue("/root/main/info/rsrvacptinfo/item/healexamflag")=="")
		{
			vhf = fGetHealExamFlag();
		} else {
			vhf = model.getValue("/root/main/info/rsrvacptinfo/item/healexamflag");
		}

		model.setValue("/root/send/srchhealexamflag", vhf);
		model.setValue("/root/send/srchcmpycd"		, sCmpycd);
		model.setValue("/root/send/srchconseq"		, iConseq  );
		model.makeNode("/root/send/srchconhistseq"	);
		model.setValue("/root/send/srchconhistseq"	, iConHistseq  );
		model.setValue("/root/send/srchsex"				, sSex );
		model.makeValue("/root/send/srchage"			, ageCalc(model.getValue("/root/main/info/patinfo/item/rgstno1"),model.getValue("/root/main/info/patinfo/item/rgstno2")));
		submit("TRAHA00107",false);
		copyNodeListType("/root/temp2","/root/main/info/rsrvacptinfo/addlst");
		//copyNodeListType("/root/temp2","/root/main/info/rsrvacptinfo/addlst[testflag='A']");
		var node = instance1.selectSingleNode("/root/temp/pkgtestcdlst/addlst");
		if( node != null ){
			var i = grd_addlst.rows;
			model.removeNodeset("/root/main/info/rsrvacptinfo/addlst");
			copyNodeListType("/root/main/info/rsrvacptinfo", "/root/temp/pkgtestcdlst/addlst", "after");
			if(model.getValue("/root/temp2/addlst/testcd") != ""){
				copyNodesetType("/root/main/info/rsrvacptinfo/addlst" , "/root/temp2/addlst","after");
			}
			var cnt = getNodesetCount("/root/temp/pkgtestcdlst") + i;
			//model.refresh();
			for( ; i < cnt ; i++) {
				grd_addlst.addStatus(i,"insert");
			}
		}else{
			model.removeNodeset("/root/main/info/rsrvacptinfo/addlst");
			if(model.getValue("/root/temp2/addlst/testcd") != ""){
				copyNodeListType("/root/main/info/rsrvacptinfo" , "/root/temp2/addlst","after");
			}
		}
	}


/** ==========================================================================================================
@author 	: 손주연
@version 	: 2007-04-30
@desc 		: 예약접수 상세내역조회
@param 	:
				* vMode 	: 리스트 구분
* ==========================================================================================================*/

	function ahafGetRsrvAcptDetl(vMode){
		fInitInfo();  // 오른쪽 정보들 초기화 및 기본 값 셋팅
		var vXpath = "";
		var idx = -1;
		switch (vMode) {
			case 1:
				vXpath = "/root/main/list/rsrvlst[";
				idx = grd_rsrvlst.row;
				break;
			case 2:
				vXpath = "/root/main/list/rsrvlst[";
				idx = grd_rsrventlst.row;
				break;
			case 3:
				vXpath = "/root/main/list/acptlst[";
				idx = grd_acptlst.row;
				break;
			case 4:
				vXpath = "/root/main/list/cncllst[";
				idx = grd_cncllst.row;
				break;
			case 5: //일반건진 2차대상자 리스트
				vXpath = "/root/main/list/sndlst[";
				idx = grd_sndlst.row;
				break;

			case 6 : //건진이력
				vXpath = "/root/main/info/histlst/item[";
//				idx = grd_sndlst.row;
				idx = grd_hist.row;
				break;
			default:
				messageBox("인자가 잘못되었습니다", "E999");
				return ;
				break;
		}

		if( idx < 1) {
			messageBox("건진내역을 ", "C002");
			return ;
		}

		var vRsrvdd = model.getValue(vXpath + idx + "]/rsrvdd");
		var vRsrvno = model.getValue(vXpath + idx + "]/rsrvno");
		/*
		*가예약 일경우 환자정보 patm의 정보만으로 조회
		* pid가 0일 경우 ptbs에 정보가 없을 수 있음
		*/
		var vStatFlag = model.getValue(vXpath + idx + "]/statflag");
		var vPid				= model.getValue(vXpath + idx + "]/pid");

		ahafGetRsrvAcpDetltInfo(vRsrvdd, vRsrvno , vStatFlag , vPid);// 바로 아래 함수
	}

/** ==========================================================================================================
@author 	: 손주연
@version 	: 2007-04-30
@desc 		: 예약/접수 상세내역 조회
@param 	:
				* vRsrvdd 	: 예약등록일자
				* vRsrvno 	: 예약번호
@return 	: 건진상세내역
* ==========================================================================================================*/
	function ahafGetRsrvAcpDetltInfo(  vRsrvdd, vRsrvno , vStatFlag , vPid){

		if(  (vRsrvdd == "") ||  (vRsrvno == "") ) return ;

		fCheckNodeExist("/root/send/srchhealexamflag" 	, true );
		fCheckNodeExist("/root/send/srchrsrvdd"			  	, true );
		fCheckNodeExist("/root/send/srchrsrvno"			  	, true );
		fCheckNodeExist("/root/send/srchinstcd"			  	, true );
		fCheckNodeExist("/root/send/scrnnm"			  			, true );

		var vhf = "";
		if (model.getValue("/root/main/info/rsrvacptinfo/item/healexamflag")=="")
		{
			vhf = fGetHealExamFlag();
		} else {
			vhf = model.getValue("/root/main/info/rsrvacptinfo/item/healexamflag");
		}


		model.setValue("/root/send/srchhealexamflag", vhf);


		model.setValue("/root/send/srchrsrvdd"			, vRsrvdd);
		model.setValue("/root/send/srchrsrvno"			, vRsrvno);
		model.setValue("/root/send/srchinstcd"			, getUserInfo("dutplceinstcd") );
		model.setValue("/root/send/scrnnm"					, vStatFlag == "A"&& vPid== "0" ? "internet":"" );

//		model.makeValue("/root/send/srchage"		, ageCalc(model.getValue("/root/main/info/patinfo/item/rgstno1"),model.getValue("/root/main/info/patinfo/item/rgstno2")) );

		model.resetInstanceNode("/root/main/info/patinfo/item");
		model.resetInstanceNode("/root/main/info/rsrvacptinfo/item");

		model.resetInstanceNode("/root/temp/info/rsrvacptinfo");
		model.resetInstanceNode("/root/temp/info/patinfo");

		//TRAHA04012 -> 접수정보/ 메모/ 최근 건진 내역/ 개인정보(접수정보랑 겹치지 않나 생각됨)// 검사코드 리스트// 추가검사내역? // 태그 넘버// 수납 내역
		// 상태 값을 넘겨서 조회를 해야할것와 하지 않아도 될것을 구분하면 좋을꺼 같음.
		if( submit("TRAHA04012",false) != true ) {

			return ;
		}

		 var i = 0;
		//node clear현상때문임..

		// 건진정보
		var  tmpnode = instance1.selectSingleNode("/root/temp/info/rsrvacptinfo");
		if( tmpnode != null){
			model.copyNode("/root/main/info/rsrvacptinfo/item", "/root/temp/info/rsrvacptinfo");
		}

		//추가검사내역

		model.removeNodeset("/root/main/info/rsrvacptinfo/addlst");
		var nodelst = instance1.selectNodes("/root/temp/info/addlst");

		// 2008-06-11 이성인
		//.refresh() 의 존재 이유를 모르기 때문에 일단 주석처리 -> 테스트 해본바 잘못된거 없는거 같음
		//	model.refresh();
		if( nodelst.length > 0 ){
			for (i = 0; i < nodelst.length; i++){
				model.duplicate("/root/main/info/rsrvacptinfo", nodelst.item(i));
			}
		}

		//1차판정내역

//		model.removeNodeset("/root/main/info/judgone");
		var nodelst = getNodesetCount("/root/temp/info/judgone");
		copyNodesetType("root/main/info/judgone","root/temp/info/judgone",   "replace");
/*		for (i = 0; i <= nodelst; i++){
				model.setValue("/root/main/info/judgone/judgcd",		 model.getValue("/root/temp/info/judgone["+i+"]/judgcd"));
				model.setValue("/root/main/info/judgone/judgdetlcd",	 model.getValue("/root/temp/info/judgone["+i+"]/judgdetlcd"));
				model.setValue("/root/main/info/judgone/etcdetlnm",	model.getValue("/root/temp/info/judgone["+i+"]/etcdetlnm"));
				model.setValue("/root/main/info/judgone/dulppkgcd",	model.getValue("/root/temp/info/judgone["+i+"]/dulppkgcd"));

		}

*/

		//추가패키지내역
		nodelst = instance1.selectNodes("/root/temp/info/pkglst");
		model.removeNodeset("/root/main/info/rsrvacptinfo/pkglst");
		// 2008-06-11 이성인
		//.refresh() 의 존재 이유를 모르기 때문에 일단 주석처리 -> 테스트 해본바 잘못된거 없는거 같음
		//model.refresh();
		if( nodelst.length > 0 ){
			for (i = 0; i < nodelst.length; i++){
				model.duplicate("/root/main/info/rsrvacptinfo", nodelst.item(i));
			}
		}

		copyNodesetType("root/send/selpkgexam","root/main/info/rsrvacptinfo/addlst","replace");//일반검진 추가검사
		// 태그정보
		var tagNode = instance1.selectSingleNode("/root/temp/info/taginfo");
		btn_tag.attribute("text") = "태그지급";

		if(tagNode != null) {
			copyNodesetType("/root/main/info/taginfo","/root/temp/info/taginfo","replace");
			var suppStat = model.getValue("/root/main/info/taginfo/suppstat");
			if("0" ==  suppStat) {
				btn_tag.attribute("text") = "태그반납";
				ipt_tagno.disabled = true;
			}
		}

		//환자정보
		tmpnode = instance1.selectSingleNode("/root/temp/info/patinfo");
		if( tmpnode != null){

			model.copyNode("/root/main/info/patinfo/item", "/root/temp/info/patinfo");
		}
		//할인액 정보

		 if(model.getValue("/root/main/info/rsrvacptinfo/item/disccd")!="-"){
		        var nname = model.getValue("/root/main/info/rsrvacptinfo/item/disccd");
		 		var ncount= getNodesetCount("/root/init/baseinfo/pamcdlst/disccdlst");

				for (var i=0;i<ncount;i++){
				 	if (nname == model.getValue("/root/init/baseinfo/pamcdlst/disccdlst["+i+"]/cd")){
				 		model.makeValue("/root/main/info/rsrvacptinfo/item/dcamt",model.getValue("/root/init/baseinfo/pamcdlst/disccdlst["+i+"]/dcamt"));
				 		model.makeValue("/root/main/info/rsrvacptinfo/item/adddcamt",model.getValue("/root/init/baseinfo/pamcdlst/disccdlst["+i+"]/adddcamt"));
				 	}
				}
		 }

		//수납정보
		tmpnode = instance1.selectSingleNode("/root/temp/info/opmi_out");
		if( tmpnode != null){
			model.makeNode("/root/main/info/rcptinfo/pkgamt"		);
			model.makeNode("/root/main/info/rcptinfo/addamt"		);
			model.makeNode("/root/main/info/rcptinfo/subtotamt"	);
			model.makeNode("/root/main/info/rcptinfo/preamt"		);
			model.makeNode("/root/main/info/rcptinfo/discamt"	);
			model.makeNode("/root/main/info/rcptinfo/uncoamt"	);
			model.makeNode("/root/main/info/rcptinfo/realamt"		);

			tmpnode = instance1.selectSingleNode("/root/temp/info/opmi_out/opmi_discamt");
			if (tmpnode!=null){


				model.setValue("/root/main/info/rcptinfo/pkgamt"		, model.getValue("/root/temp/info/opmi_out/opmi_baseexamamt"));
				model.setValue("/root/main/info/rcptinfo/addamt"		, model.getValue("/root/temp/info/opmi_out/opmi_addexamamt"));
				model.setValue("/root/main/info/rcptinfo/subtotamt"	, model.getValue("/root/temp/info/opmi_out/opmi_totamt"));
//				model.setValue("/root/main/info/rcptinfo/subtotamt"	, model.getValue("/root/temp/info/opmi_out/opmi_cmpyamt"));
//				model.setValue("/root/main/info/rcptinfo/preamt"		, model.getValue("/root/temp/info/opmi_out/opmi_mdlremamt"));
				model.setValue("/root/main/info/rcptinfo/preamt"		, model.getValue("/root/temp/info/opmi_out/opmi_mdlrcptamt"));
//				model.setValue("/root/main/info/rcptinfo/discamt"		, model.getValue("/root/temp/info/opmi_out/opmi_totdiscamt"));

				model.makeNode("root/temp/info/opmi_out/opmi_discamt");

				model.setValue("/root/main/info/rcptinfo/discamt"		, model.getValue("/root/temp/info/opmi_out/opmi_discamt"));
				model.makeValue("/root/temp/discamt"							, model.getValue("/root/temp/info/opmi_out/opmi_discamt"));
				model.makeValue("/root/main/info/rcptinfo/uncoamt"		, model.getValue("/root/temp/info/opmi_out/opmi_restamt"));
				model.makeValue("/root/main/info/rcptinfo/realamt"		, model.getValue("/root/temp/info/opmi_out/opmi_rcptamt"));
			}
			model.makeValue("/root/temp/rcptCheck","true");			//수납된 내역 체크
		} else{
			model.makeValue("/root/send/srchcmpycd",			model.getValue("/root/main/info/rsrvacptinfo/item/cmpycd"));
			model.makeValue("/root/send/srchconseq",			model.getValue("/root/main/info/rsrvacptinfo/item/conseq"));
			model.makeValue("/root/send/srchconhistseq",		model.getValue("/root/main/info/rsrvacptinfo/item/conhistseq"));
			model.makeValue("/root/send/srchsex",					model.getValue("/root/main/info/patinfo/item/sex"));
			model.makeValue("/root/send/srchpkgcd",				model.getValue("/root/main/info/rsrvacptinfo/item/pkgcd"));
			model.makeValue("/root/send/srchpid",					model.getValue("/root/main/info/patinfo/item/pid"));
			model.makeValue("/root/send/srchage",					ageCalc(model.getValue("/root/main/info/patinfo/item/rgstno1"),model.getValue("/root/main/info/patinfo/item/rgstno2")));

			//선수금(RCPTFLAG - P, R / 패키지 금액(할인 포함)/ 수납 내역 조회
			submit("TXAHA00903",false);
			model.makeValue("/root/main/info/rcptinfo/pkgamt" ,			 			model.getValue("/root/main/info/rcptinfo/rcptinfo/pkgamt"));
			model.makeValue("/root/main/info/rcptinfo/discamt" , 					model.getValue("/root/main/info/rcptinfo/rcptinfo/discamt"));
			model.makeValue("/root/temp/discamt",											model.getValue("/root/main/info/rcptinfo/rcptinfo/discamt"));
			model.makeValue("/root/main/info/rcptinfo/subtotamt" , 					model.getValue("/root/main/info/rcptinfo/rcptinfo/subtotamt"));

			if((model.getValue("/root/main/info/rcptinfo/preamt")=="")|| (model.getValue("/root/main/info/rcptinfo/preamt")=="0")){
				model.makeValue("/root/main/info/rcptinfo/preamt", 						model.getValue("/root/main/info/rcptinfo/rcptinfo/cashamt"));
			}

			if(instance1.selectSingleNode("/root/main/info/rcptinfo/addamt") ==  null)
				model.makeValue("/root/main/info/rcptinfo/rcptinfo/addamt","0");

			model.makeValue("/root/main/info/rcptinfo/addamt" , 						model.getValue("/root/main/info/rcptinfo/rcptinfo/addamt"));
			if (model.getValue("/root/main/info/rsrvacptinfo/item/cmpyflag")=="Y"){
				model.makeValue("/root/main/info/rsrvacptinfo/item/pkguncocd" , model.getValue("/root/main/info/rcptinfo/rcptinfo/pkguncocd"));
			} else{
				model.makeValue("/root/main/info/rcptinfo/realamt"			,		model.getValue("/root/main/info/rcptinfo/rcptinfo/subtotamt"));
			}
			model.makeValue("/root/temp/rcptCheck","false");			//수납된 내역 체크

		}

		//화면상단정보 설정
		var sPid 		= model.getValue("/root/main/info/rsrvacptinfo/item/pid" );
		var sOrddd 	= model.getValue("/root/main/info/rsrvacptinfo/item/orddd" );
		var iCretno 	= model.getValue("/root/main/info/rsrvacptinfo/item/cretno" );

		if(  (sPid != "" ) &&
		    (sOrddd != "" ) &&
		    (iCretno != "" ) &&
		    (iCretno != "0" ) ){
			ahafSetScreenTopPatInfo( sPid, sOrddd, iCretno );

		}

		 fDcAmtCalc();
		 fSetBtnStat();		 // 권한에 따른 버튼 설정
		if(model.getValue("/root/main/info/rsrvacptinfo/item/cmpyflag")=="Y"){
			model.makeValue("/root/main/info/rsrvacptinfo/item/pkguncocd","V02");
		}
		model.refresh();
	}

/** ==========================================================================================================
@author 	: 손주연
@version 	: 2007-04-30
@desc 		: 예약접수 상세내역조회
@param 	:
				* vMode 	: 리스트 구분
* ==========================================================================================================*/

	function ahafGetGnrlRsrvAcptDetl(vMode){
		fInitInfo();  // 오른쪽 정보들 초기화 및 기본 값 셋팅
		var vXpath = "";
		var idx = -1;
		switch (vMode) {
			case 1:
				vXpath = "/root/main/list/rsrvlst[";
				idx = grd_rsrvlst.row;
				break;
			case 2:
				vXpath = "/root/main/list/rsrvlst[";
				idx = grd_rsrventlst.row;
				break;
			case 3:
				vXpath = "/root/main/list/acptlst[";
				idx = grd_acptlst.row;
				break;
			case 4:
				vXpath = "/root/main/list/cncllst[";
				idx = grd_cncllst.row;
				break;
			case 5: //일반건진 2차대상자 리스트
				vXpath = "/root/main/list/sndlst[";
				idx = grd_sndlst.row;
				break;

			case 6 : //건진이력
				vXpath = "/root/main/info/histlst/item[";
//				idx = grd_sndlst.row;
				idx = grd_hist.row;
				break;
			default:
				messageBox("인자가 잘못되었습니다", "E999");
				return ;
				break;
		}

		if( idx < 1) {
			messageBox("건진내역을 ", "C002");
			return ;
		}

		var vRsrvdd = model.getValue(vXpath + idx + "]/rsrvdd");
		var vRsrvno = model.getValue(vXpath + idx + "]/rsrvno");
		/*
		*가예약 일경우 환자정보 patm의 정보만으로 조회
		* pid가 0일 경우 ptbs에 정보가 없을 수 있음
		*/
		var vStatFlag = model.getValue(vXpath + idx + "]/statflag");
		var vPid				= model.getValue(vXpath + idx + "]/pid");

		ahafGetGnrlRsrvAcpDetltInfo(vRsrvdd, vRsrvno , vStatFlag , vPid);// 바로 아래 함수
		for(var i = 1; i <= model.getXPathValue("count(/root/main/info/rsrvacptinfo/addlst)"); i++)
		{
			model.makeNode("/root/send/selpkgexam[" + i + "]");
			model.copyNode("/root/send/selpkgexam[" + i + "]", "/root/main/info/rsrvacptinfo/addlst[" + i + "]");
			if(model.getValue("/root/send/selpkgexam[" + i + "]/uncocd") == "")
			{
				 setAmt(i);
			}
		}

		/*
		var exPkgCd;
		grd_pkglst.isReadonly(1, grd_pkglst.colRef("sel"), grd_pkglst.rows, grd_pkglst.colRef("sel")) = false;
		for(var i = 1; i <= model.getXPathValue("count(/root/main/pkgaddlst/item)"); i++)
		{
			exPkgCd = model.getValue("/root/main/pkgaddlst/item[" + i + "]/pkgcd");
			if(parseInt(model.getXPathValue("count(/root/send/selpkgexam[pkgcd = '" + exPkgCd + "'])")) > 0){
				grd_pkglst.isReadOnly(i, grd_pkglst.colRef("sel")) = true;
				model.setValue("/root/main/pkgaddlst/item[" + i + "]/sel", "Y");
			}
		}
		*/
		model.refresh();
	}

/** ==========================================================================================================
@author 	: 손주연
@version 	: 2007-04-30
@desc 		: 예약/접수 상세내역 조회
@param 	:
				* vRsrvdd 	: 예약등록일자
				* vRsrvno 	: 예약번호
@return 	: 건진상세내역
* ==========================================================================================================*/
	function ahafGetGnrlRsrvAcpDetltInfo(  vRsrvdd, vRsrvno , vStatFlag , vPid){

		if(  (vRsrvdd == "") ||  (vRsrvno == "") ) return ;

		fCheckNodeExist("/root/send/srchhealexamflag" 	, true );
		fCheckNodeExist("/root/send/srchrsrvdd"			  	, true );
		fCheckNodeExist("/root/send/srchrsrvno"			  	, true );
		fCheckNodeExist("/root/send/srchinstcd"			  	, true );
		fCheckNodeExist("/root/send/scrnnm"			  			, true );

		var vhf = "";
		if (model.getValue("/root/main/info/rsrvacptinfo/item/healexamflag")=="")
		{
			vhf = fGetHealExamFlag();
		} else {
			vhf = model.getValue("/root/main/info/rsrvacptinfo/item/healexamflag");
		}


		model.setValue("/root/send/srchhealexamflag", vhf);


		model.setValue("/root/send/srchrsrvdd"			, vRsrvdd);
		model.setValue("/root/send/srchrsrvno"			, vRsrvno);
		model.setValue("/root/send/srchinstcd"			, getUserInfo("dutplceinstcd") );
		model.setValue("/root/send/scrnnm"					, vStatFlag == "A"&& vPid== "0" ? "internet":"" );

//		model.makeValue("/root/send/srchage"		, ageCalc(model.getValue("/root/main/info/patinfo/item/rgstno1"),model.getValue("/root/main/info/patinfo/item/rgstno2")) );

		model.resetInstanceNode("/root/main/info/patinfo/item");
		model.resetInstanceNode("/root/main/info/rsrvacptinfo/item");

		model.resetInstanceNode("/root/temp/info/rsrvacptinfo");
		model.resetInstanceNode("/root/temp/info/patinfo");

		//TRAHA04012 -> 접수정보/ 메모/ 최근 건진 내역/ 개인정보(접수정보랑 겹치지 않나 생각됨)// 검사코드 리스트// 추가검사내역? // 태그 넘버// 수납 내역
		// 상태 값을 넘겨서 조회를 해야할것와 하지 않아도 될것을 구분하면 좋을꺼 같음.
		if( submit("TRAHA04033",false) != true ) {

			return ;
		}

		 var i = 0;
		//node clear현상때문임..

		// 건진정보
		var  tmpnode = instance1.selectSingleNode("/root/temp/info/rsrvacptinfo");
		if( tmpnode != null){
			model.copyNode("/root/main/info/rsrvacptinfo/item", "/root/temp/info/rsrvacptinfo");
		}

		//추가검사내역

		model.removeNodeset("/root/main/info/rsrvacptinfo/addlst");
		var nodelst = instance1.selectNodes("/root/temp/info/addlst");

		// 2008-06-11 이성인
		//.refresh() 의 존재 이유를 모르기 때문에 일단 주석처리 -> 테스트 해본바 잘못된거 없는거 같음
		//	model.refresh();
		if( nodelst.length > 0 ){
			for (i = 0; i < nodelst.length; i++){
				model.duplicate("/root/main/info/rsrvacptinfo", nodelst.item(i));
			}
		}

		//1차판정내역

//		model.removeNodeset("/root/main/info/judgone");
		var nodelst = getNodesetCount("/root/temp/info/judgone");
		copyNodesetType("root/main/info/judgone","root/temp/info/judgone",   "replace");
/*		for (i = 0; i <= nodelst; i++){
				model.setValue("/root/main/info/judgone/judgcd",		 model.getValue("/root/temp/info/judgone["+i+"]/judgcd"));
				model.setValue("/root/main/info/judgone/judgdetlcd",	 model.getValue("/root/temp/info/judgone["+i+"]/judgdetlcd"));
				model.setValue("/root/main/info/judgone/etcdetlnm",	model.getValue("/root/temp/info/judgone["+i+"]/etcdetlnm"));
				model.setValue("/root/main/info/judgone/dulppkgcd",	model.getValue("/root/temp/info/judgone["+i+"]/dulppkgcd"));

		}

*/

		//추가패키지내역
		nodelst = instance1.selectNodes("/root/temp/info/pkglst");
		model.removeNodeset("/root/main/info/rsrvacptinfo/pkglst");
		// 2008-06-11 이성인
		//.refresh() 의 존재 이유를 모르기 때문에 일단 주석처리 -> 테스트 해본바 잘못된거 없는거 같음
		//model.refresh();
		if( nodelst.length > 0 ){
			for (i = 0; i < nodelst.length; i++){
				model.duplicate("/root/main/info/rsrvacptinfo", nodelst.item(i));
			}
		}

		copyNodesetType("root/send/selpkgexam","root/main/info/rsrvacptinfo/addlst","replace");//일반검진 추가검사
		// 태그정보
		var tagNode = instance1.selectSingleNode("/root/temp/info/taginfo");
		btn_tag.attribute("text") = "태그지급";

		if(tagNode != null) {
			copyNodesetType("/root/main/info/taginfo","/root/temp/info/taginfo","replace");
			var suppStat = model.getValue("/root/main/info/taginfo/suppstat");
			if("0" ==  suppStat) {
				btn_tag.attribute("text") = "태그반납";
				ipt_tagno.disabled = true;
			}
		}
		
		// 결과상담 예약리스트
		model.resetInstanceNode("/root/main/info/rsltcnstinfo/choicnst");				
		copyNodesetType("/root/main/info/rsltcnstinfo/cnstlst/cnst" , "/root/temp/info/cnst" , "replace");		
		if(model.getValue("/root/main/info/rsltcnstinfo/choicnst/outexamyn") == "") {
			model.makeValue("/root/main/info/rsltcnstinfo/choicnst/outexamyn","N");
		}

		//환자정보
		tmpnode = instance1.selectSingleNode("/root/temp/info/patinfo");
		if( tmpnode != null){

			model.copyNode("/root/main/info/patinfo/item", "/root/temp/info/patinfo");
		}
		//할인액 정보

		 if(model.getValue("/root/main/info/rsrvacptinfo/item/disccd")!="-"){
		        var nname = model.getValue("/root/main/info/rsrvacptinfo/item/disccd");
		 		var ncount= getNodesetCount("/root/init/baseinfo/pamcdlst/disccdlst");

				for (var i=0;i<ncount;i++){
				 	if (nname == model.getValue("/root/init/baseinfo/pamcdlst/disccdlst["+i+"]/cd")){
				 		model.makeValue("/root/main/info/rsrvacptinfo/item/dcamt",model.getValue("/root/init/baseinfo/pamcdlst/disccdlst["+i+"]/dcamt"));
				 		model.makeValue("/root/main/info/rsrvacptinfo/item/adddcamt",model.getValue("/root/init/baseinfo/pamcdlst/disccdlst["+i+"]/adddcamt"));
				 	}
				}
		 }

		//수납정보
		tmpnode = instance1.selectSingleNode("/root/temp/info/opmi_out");
		if( tmpnode != null){
			model.makeNode("/root/main/info/rcptinfo/pkgamt"		);
			model.makeNode("/root/main/info/rcptinfo/addamt"		);
			model.makeNode("/root/main/info/rcptinfo/subtotamt"	);
			model.makeNode("/root/main/info/rcptinfo/preamt"		);
			model.makeNode("/root/main/info/rcptinfo/discamt"	);
			model.makeNode("/root/main/info/rcptinfo/uncoamt"	);
			model.makeNode("/root/main/info/rcptinfo/realamt"		);

			tmpnode = instance1.selectSingleNode("/root/temp/info/opmi_out/opmi_discamt");
			if (tmpnode!=null){


				model.setValue("/root/main/info/rcptinfo/pkgamt"		, model.getValue("/root/temp/info/opmi_out/opmi_baseexamamt"));
				model.setValue("/root/main/info/rcptinfo/addamt"		, model.getValue("/root/temp/info/opmi_out/opmi_addexamamt"));
				model.setValue("/root/main/info/rcptinfo/subtotamt"	, model.getValue("/root/temp/info/opmi_out/opmi_totamt"));
//				model.setValue("/root/main/info/rcptinfo/subtotamt"	, model.getValue("/root/temp/info/opmi_out/opmi_cmpyamt"));
//				model.setValue("/root/main/info/rcptinfo/preamt"		, model.getValue("/root/temp/info/opmi_out/opmi_mdlremamt"));
				model.setValue("/root/main/info/rcptinfo/preamt"		, model.getValue("/root/temp/info/opmi_out/opmi_mdlrcptamt"));
//				model.setValue("/root/main/info/rcptinfo/discamt"		, model.getValue("/root/temp/info/opmi_out/opmi_totdiscamt"));

				model.makeNode("root/temp/info/opmi_out/opmi_discamt");

				model.setValue("/root/main/info/rcptinfo/discamt"		, model.getValue("/root/temp/info/opmi_out/opmi_discamt"));
				model.makeValue("/root/temp/discamt"							, model.getValue("/root/temp/info/opmi_out/opmi_discamt"));
				model.makeValue("/root/main/info/rcptinfo/uncoamt"		, model.getValue("/root/temp/info/opmi_out/opmi_restamt"));
				model.makeValue("/root/main/info/rcptinfo/realamt"		, model.getValue("/root/temp/info/opmi_out/opmi_rcptamt"));
			}
			model.makeValue("/root/temp/rcptCheck","true");			//수납된 내역 체크
		} else{
			model.makeValue("/root/send/srchcmpycd",			model.getValue("/root/main/info/rsrvacptinfo/item/cmpycd"));
			model.makeValue("/root/send/srchconseq",			model.getValue("/root/main/info/rsrvacptinfo/item/conseq"));
			model.makeValue("/root/send/srchconhistseq",		model.getValue("/root/main/info/rsrvacptinfo/item/conhistseq"));
			model.makeValue("/root/send/srchsex",					model.getValue("/root/main/info/patinfo/item/sex"));
			model.makeValue("/root/send/srchpkgcd",				model.getValue("/root/main/info/rsrvacptinfo/item/pkgcd"));
			model.makeValue("/root/send/srchpid",					model.getValue("/root/main/info/patinfo/item/pid"));
			model.makeValue("/root/send/srchage",					ageCalc(model.getValue("/root/main/info/patinfo/item/rgstno1"),model.getValue("/root/main/info/patinfo/item/rgstno2")));

			//선수금(RCPTFLAG - P, R / 패키지 금액(할인 포함)/ 수납 내역 조회
			submit("TXAHA00903",false);
			model.makeValue("/root/main/info/rcptinfo/pkgamt" ,			 			model.getValue("/root/main/info/rcptinfo/rcptinfo/pkgamt"));
			model.makeValue("/root/main/info/rcptinfo/discamt" , 					model.getValue("/root/main/info/rcptinfo/rcptinfo/discamt"));
			model.makeValue("/root/temp/discamt",											model.getValue("/root/main/info/rcptinfo/rcptinfo/discamt"));
			model.makeValue("/root/main/info/rcptinfo/subtotamt" , 					model.getValue("/root/main/info/rcptinfo/rcptinfo/subtotamt"));

			if((model.getValue("/root/main/info/rcptinfo/preamt")=="")|| (model.getValue("/root/main/info/rcptinfo/preamt")=="0")){
				model.makeValue("/root/main/info/rcptinfo/preamt", 						model.getValue("/root/main/info/rcptinfo/rcptinfo/cashamt"));
			}

			if(instance1.selectSingleNode("/root/main/info/rcptinfo/addamt") ==  null)
				model.makeValue("/root/main/info/rcptinfo/rcptinfo/addamt","0");

			model.makeValue("/root/main/info/rcptinfo/addamt" , 						model.getValue("/root/main/info/rcptinfo/rcptinfo/addamt"));
			if (model.getValue("/root/main/info/rsrvacptinfo/item/cmpyflag")=="Y"){
				model.makeValue("/root/main/info/rsrvacptinfo/item/pkguncocd" , model.getValue("/root/main/info/rcptinfo/rcptinfo/pkguncocd"));
			} else{
				model.makeValue("/root/main/info/rcptinfo/realamt"			,		model.getValue("/root/main/info/rcptinfo/rcptinfo/subtotamt"));
			}
			model.makeValue("/root/temp/rcptCheck","false");			//수납된 내역 체크

		}

		//화면상단정보 설정
		var sPid 		= model.getValue("/root/main/info/rsrvacptinfo/item/pid" );
		var sOrddd 	= model.getValue("/root/main/info/rsrvacptinfo/item/orddd" );
		var iCretno 	= model.getValue("/root/main/info/rsrvacptinfo/item/cretno" );

		if(  (sPid != "" ) &&
		    (sOrddd != "" ) &&
		    (iCretno != "" ) &&
		    (iCretno != "0" ) ){
			ahafSetScreenTopPatInfo( sPid, sOrddd, iCretno );

		}

		 fDcAmtCalc();
		 fSetBtnStat();		 // 권한에 따른 버튼 설정
		if(model.getValue("/root/main/info/rsrvacptinfo/item/cmpyflag")=="Y"){
			model.makeValue("/root/main/info/rsrvacptinfo/item/pkguncocd","V02");
		}
		
		
		model.refresh();
	}

/** ==========================================================================================================
@author 	: 손주연
@version 	: 2007-04-30
@desc 		: 예약/접수 상세내역 조회
@param 	:
				* vHealExamDetlFg 	: 건진상세구분
				* vPid 						: 환자등록번호
@return 	: 건진상세내역
* ==========================================================================================================*/
	function ahafGetRsrvAcpDetltInfoWithPid(  vHealExamDetlFg, vPid ){



		if(  (vHealExamDetlFg == "") ||  (vPid == "") ) return ;

		fCheckNodeExist("/root/send/srchhealexamflag" 		, true );
		fCheckNodeExist("/root/send/srchhealexamdetlflag"	, true );
		fCheckNodeExist("/root/send/srchhealexampid"			, true );
		fCheckNodeExist("/root/send/srchinstcd"			  		, true );
		fCheckNodeExist("/root/send/srchrsrvdd"			  		, true );
		fCheckNodeExist("/root/send/srchrsrvno"			  		, true );

		var vhf = "";
		if (model.getValue("/root/main/info/rsrvacptinfo/item/healexamflag")=="")
		{
			vhf = fGetHealExamFlag();
		} else {
			vhf = model.getValue("/root/main/info/rsrvacptinfo/item/healexamflag");
		}

		model.setValue("/root/send/srchhealexamflag"		, vhf);
		model.setValue("/root/send/srchhealexamdetlflag"	, vHealExamDetlFg);
		model.setValue("/root/send/srchhealexampid"		, vPid);
		model.setValue("/root/send/srchinstcd"					, getUserInfo("dutplceinstcd") );
		model.setValue("/root/send/srchrsrvdd"			  		, "" );
		model.setValue("/root/send/srchrsrvno"			  		, "" );



		//model.resetInstanceNode("/root/main/info/patinfo/item");
		//접수정보 초기화...
		//fInitRsrvAcptInfo();

		/*
		model.makeValue("/root/main/info/rsrvacptinfo/item/cmpycd",model.getValue("/root/main/info/patinfo/item/cmpycd"))		;
		model.makeValue("/root/main/info/rsrvacptinfo/item/pkgcd",model.getValue("/root/main/info/patinfo/item/pkgcd"))		;
		model.makeValue("/root/main/info/rsrvacptinfo/item/conseq",model.getValue("/root/main/info/patinfo/item/conseq"))		;
		model.makeValue("/root/main/info/rsrvacptinfo/item/conhistseq",model.getValue("/root/main/info/patinfo/item/conhistseq"))		;

		if (model.getValue("/root/main/info/patinfo/item/cmpycd")!=""){
			model.makeValue("/root/main/info/rsrvacptinfo/item/cmpyflag","Y");
		}
		*/

		//해당 건진자의 년도 건진예약 내역 존재유무
		if( submit("TRAHA00111",false) != true ) {
			if (model.getValue("/root/temp/rsrvacptkey/item1/linfo")!="")
			{
				var linfo = model.getValue("/root/temp/rsrvacptkey/item1/linfo");
				var temp = new Date().getYear();

				model.setValue("/root/main/info/rsrvacptinfo/item/latestpkginfo",model.getValue("/root/temp/rsrvacptkey/item1/linfo"));

				var chklatestpkginfo = model.getValue("/root/main/info/rsrvacptinfo/item/latestpkginfo");
				//if 	(linfo.indexOf(temp-1) !=-1)
				if 	(temp - parseInt(chklatestpkginfo.substr(0,4)) <=1)
				{
					//비자건진은 연속건진 없음 20081004 윤찬우 수정
					if(model.getValue("/root/main/info/rsrvacptinfo/item/healexamdetlflag") != "G02"){
						var rtn = messageBox("연속건진 할인을 사용   ", "S001") ;
						//6.예   7. 아니오  2.취소
						//6예이면 연속건진 할인을 사용하므로 할인계정에 셋팅
						if(rtn == 6){ model.setValue( cmb_disccd.attribute("ref")	,  "F71");
						// messageBox("연속건진 대상자입니다   ", "E999") ;
						}//if end
					}
				}

			}
			return ;
		}



		if (model.getValue("/root/temp/rsrvacptkey/item1/linfo")!="")
		{

			var linfo = model.getValue("/root/temp/rsrvacptkey/item1/linfo");
			var temp = new Date().getYear();

			model.setValue("/root/main/info/rsrvacptinfo/item/latestpkginfo",model.getValue("/root/temp/rsrvacptkey/item1/linfo"));
			var chklatestpkginfo = model.getValue("/root/main/info/rsrvacptinfo/item/latestpkginfo");
			//연속건진을 위해 수정 2008-05-29 이성인
			//	if 	(linfo.indexOf(temp-1) !=-1)
			if 	(temp - parseInt(chklatestpkginfo.substr(0,4)) <=1)
			{
			//비자건진은 연속건진 없음 20081004 윤찬우 수정
				if(model.getValue("/root/main/info/rsrvacptinfo/item/healexamdetlflag") != "G02"){
					var rtn = messageBox("연속건진 할인을 사용   ", "S001") ;
					//6.예   7. 아니오  2.취소
					//6예이면 연속건진 할인을 사용하므로 할인계정에 셋팅
						if(rtn == 6){
							model.setValue( cmb_disccd.attribute("ref")	,  "F71");
						}//if end
				}
			}

		}


		setPkgInfo();


		var  tmpnode = instance1.selectSingleNode("/root/temp/rsrvacptkey/item/rsrvdd");
		if( tmpnode == null ) {
			fSetBtnStat();
			return ;
		}
		// *Q005=조회 하시겠습니까?
		if( messageBox("당해년도의 예약내역이 존재합니다.  ", "Q005") != 6 ){
			fSetBtnStat();
			return ;
		}else{

		}

		model.setValue("/root/send/srchrsrvdd"	, model.getValue("/root/temp/rsrvacptkey/rsrvdd") );
		model.setValue("/root/send/srchrsrvno"	, model.getValue("/root/temp/rsrvacptkey/rsrvno") );

		if( submit("TRAHA04012",false) != true ) {
			return ;
		}

		 var i = 0;
		//node clear현상때문임..
		tmpnode = instance1.selectSingleNode("/root/temp/info/rsrvacptinfo");
		if( tmpnode != null){
			model.copyNode("/root/main/info/rsrvacptinfo/item", "/root/temp/info/rsrvacptinfo");
		}

		var nodelst = instance1.selectNodes("/root/temp/info/addlst");
		if( nodelst.length > 0 ){
			for (i = 0; i < nodelst.length; i++){
				model.duplicate("/root/main/info/rsrvacptinfo", nodelst.item(i));
			}
		}

		nodelst = instance1.selectNodes("/root/temp/info/pkglst");
		if( nodelst.length > 0 ){
			for (i = 0; i < nodelst.length; i++){
				model.duplicate("/root/main/info/rsrvacptinfo", nodelst.item(i));
			}
		}


		/*
		tmpnode = instance1.selectSingleNode("/root/temp/info/patinfo");
		if( tmpnode != null){
			model.copyNode("/root/main/info/patinfo/item", "/root/temp/info/patinfo");
		}
		*/


		//화면상단정보 설정
		var sOrdDD 	= model.getValue("/root/main/info/rsrvacptinfo/item/orddd" );
		var iCretno 	= model.getValue("/root/main/info/rsrvacptinfo/item/cretno" );
		var sPid 		= model.getValue("/root/main/info/rsrvacptinfo/item/pid" );

		//외래등록내역이 있어야 조회 됨...
		if(   (sOrdDD != ""   ) &&
			  (sPid != "") &&
			  (iCretno != "" ) &&
			  (iCretno != "0" )
		  ){

			ahafSetScreenTopPatInfo( sPid
													, sOrdDD
													, iCretno );

		}
		fSetBtnStat();


		model.refresh();
	}


/** ==========================================================================================================
@author 	: 손주연
@version 	: 2007-04-30
@desc 		: 주소 검색
@param 	:
@return 	:
* ==========================================================================================================*/

	function fSetAddr(vCond, vDestXPath) {
		fCheckNodeExist("/root/temp/addr/zipcd1"		, true);
		fCheckNodeExist("/root/temp/addr/zipcd2"		, true);
		fCheckNodeExist("/root/temp/addr/zipcdseq"	, true);
		fCheckNodeExist("/root/temp/addr/addr"			, true);

		zbcfOpenZipCodeList("combination", "", "/root/temp/addr/zipcd1",  "/root/temp/addr/zipcd2", "/root/temp/addr/zipcdseq", "/root/temp/addr/addr");
		var node =model.getValue("/root/temp/addr/zipcd1");
		if( node != "" ){
			model.setValue( vDestXPath + "/zipcd" 		+ vCond + "1" 	,  model.getValue("/root/temp/addr/zipcd1") );
			model.setValue( vDestXPath + "/zipcd" 		+ vCond + "2" 	,  model.getValue("/root/temp/addr/zipcd2") );
			model.setValue( vDestXPath + "/zipcdseq" 	+ vCond  			,  model.getValue("/root/temp/addr/zipcdseq") );
			model.setValue( vDestXPath + "/addr" 			+ vCond     		,  model.getValue("/root/temp/addr/addr") );
			model.setFocus("ipt_detladdr");
			model.refresh();
		}
	}

/**==================================================================================================================
@author 	: 손주연
@version 	: 2007-06-30
@desc 		: 주소 검색
@param 	  :
            * vCond 			: 주소1,2구분.(발송주소관련)
            * vDestXPath	: 목적노드(주소가 입력될)
            * vSrchCond 	: 검색조건 ( 주소(‘address’),  동명/아파트명/건물명(‘combination’), 우편번호(‘zipcode’) )
            * vSrchCondNm : 조건명
@return 	: 주소상세내역
*====================================================================================================================*/
	function ahafSetAddr(vCond, vDestXPath, vSrchCond, vSrchCondNm) {
		model.resetInstanceNode("/root/temp/address");
		model.makeNode("/root/temp/address/zipcd1");
		model.makeNode("/root/temp/address/zipcd2");
		model.makeNode("/root/temp/address/zipcdseq");
		model.makeNode("/root/temp/address/addr");
		model.makeNode("/root/temp/address/detladdr");
		model.makeNode("/root/temp/address/builno");		

		zbcfOpenZipCodeList(vSrchCond
										, vSrchCondNm
										, "/root/temp/address/zipcd1"
										, "/root/temp/address/zipcd2"
										, "/root/temp/address/zipcdseq"
										, "/root/temp/address/addr"
										, "hangul"
										, "/root/temp/address/detladdr"
										, "/root/temp/address/builno");											
		var node = model.getValue("/root/temp/address/zipcd1");
		if( node != "" ){
			model.setValue( vDestXPath + "/zipcd" 		+ vCond + "1" 	,  model.getValue("/root/temp/address/zipcd1"));
			model.setValue( vDestXPath + "/zipcd" 		+ vCond + "2" 	,  model.getValue("/root/temp/address/zipcd2"));
			model.setValue( vDestXPath + "/zipcdseq" 	+ vCond  		,  model.getValue("/root/temp/address/zipcdseq"));
			model.setValue( vDestXPath + "/addr" 		+ vCond       	,  model.getValue("/root/temp/address/addr"));
			model.setValue( vDestXPath + "/detladdr" 	+ vCond       	,  model.getValue("/root/temp/address/detladdr"));
			model.setValue( vDestXPath + "/builno" 	    + vCond      	,  model.getValue("/root/temp/address/builno"));				
			if( vCond == "1" ) vCond = "";
			model.setFocus("ipt_detladdr" + vCond );
			model.refresh();
		}

		return "/root/temp/address";
	}

/**==================================================================================================================
@author 	: 손주연
@version 	: 2007-06-30
@desc 		: Calendar관련 draw 공용 함수
@param 	:
@return 	:
*====================================================================================================================*/
	function initCalendar() {

		var curDate = getCurrentDate().toDate();
		model.setValue("/root/temp/calendar/year", curDate.getDateFormat('YYYY'));
		model.setValue("/root/temp/calendar/month", curDate.getDateFormat('MM'));
		model.refresh();

		setCalendar(curDate);
	}


	function setCalendar(dateObj) {

		// 그리드 초기화

		model.removeNodeset("/root/temp/calendar/weeklist/list");
		//grd_calendar.rebuild()

		dateObj.setDate(1);

		var startDay = dateObj.getDay();

		var days = dateObj.getMonthDay();

		var rows = Math.ceil( ( startDay + days ) / 7 );
		for( var i = 0; i < rows; i++ )
			grd_calendar.addRow(false);

		grd_calendar.rebuild();

		var rowIndex = grd_calendar.fixedRows;
		var colIndex = startDay;
		for( var i = 1; i <= days; i++ ) {
			grd_calendar.valueMatrix(rowIndex, colIndex) = i;
			colIndex++;
			if( colIndex == 7 ) {
				colIndex = 0;
				rowIndex++;
			}
		}
	}

	function setCellColor(gridObj) {

		var calRow = gridObj.row ;
		var calCol = gridObj.col;
		var tmpCalCol;

		if( calCol < 7 )
			tmpCalCol = calCol + 7;
		else
			tmpCalCol = calCol - 7;

		gridObj.rebuildStyle();

		gridObj.cellStyle("background-color", calRow, calCol) = "#daa7d9";
		gridObj.cellStyle("background-color", calRow, tmpCalCol) = "#daa7d9";
	}


/**==================================================================================================================
@author 	: 손주연
@version 	: 2007-06-30
@desc 		: Calendar 선택한 일자 얻기
@param 	:
				* grdObj( calendar grid control )
@return 	: date (YYYYMMDD)
*====================================================================================================================*/
	function fGetCalendarDate(grdObj){
		var  cal_row = grdObj.row;
		var  cal_col  = grdObj.col;
		if( cal_col > 6) cal_col -= 7;
		var rsrvdd = "";
		 if( cal_row > 0 ){
			var dd = model.getValue( grdObj.nodeset + "[" + cal_row  + "]/" + grdObj.colAttribute( cal_col,"ref") ) ;
			if( dd.length  < 2 ) {
				dd = "0" + dd;
			}
			 rsrvdd =  model.getValue("/root/temp/calendar/year") + model.getValue("/root/temp/calendar/month") + dd  ;
		}
		return rsrvdd;
	}

/**==================================================================================================================
@author 	: 손주연
@version 	: 2007-06-30
@desc 		: Calendar    새로그리기
@param 	:
				* vDateFg : Y-년도, M-월
				* vIncrease : 증감(+/-)
@return 	: date (YYYYMMDD)
*====================================================================================================================*/
	function fHRefreshCalender(vDateFg, vIncrease){
		if( (vDateFg != "Y" ) && (vDateFg != "M") ) {

			return ;
		}

		var iTerm = parseInt(vIncrease);
		var isMonth = model.getValue("/root/temp/calendar/month");
		var isYear = model.getValue("/root/temp/calendar/year");
		var isDate = (isYear+isMonth+1).toDate().getAddDate(iTerm,vDateFg);

		model.setValue("/root/temp/calendar/year", isDate.getDateFormat('YYYY'));
		model.setValue("/root/temp/calendar/month", isDate.getDateFormat('MM'));
		model.refresh();

		setCalendar(isDate);
	}


/**==================================================================================================================
@author 	: 손주연
@version 	: 2007-04-18
@desc 		: fExcelUpload 엑셀파일을 해당 그리드로 in
@param 	: grid object
*====================================================================================================================*/
	function fExcelUpload(grdObj){
		if( grdObj == null ){
			messageBox("grdObj is null!", "E999");
		 	return ;
		}
		var fileName = window.fileDialog("open", ",", false, "", "xls", "All Files (*.*)|*.*|Excel Files(*.xls)|*.xls");
		grdObj.loadExcel(fileName, 1, true);
		var cnt = grdObj.rows;
		var i = 0;
		for(  i = 1; i < cnt +1 ; i++)
		{
			grdObj.addStatus(i, "insert");
		}
		grdObj.deleteRow(1);
		grdObj.refresh();
	}



/**==================================================================================================================
@author 	: 손주연
@version 	: 2007-04-18
@desc 		: 질환코드 선택 창 open
@param 	: grid object
				* SPAHB00200_PARAM1 : 현재화면ID
				* SPAHB00200_PARAM2 : 질환코드
				* SPAHB00200_PARAM3 : 질환명
				* SPAHB00200_PARAM4 : 대상 nodeset count
				* SPAHB00200_PARAM5 : 대상 nodeset
*====================================================================================================================*/
	function ahafGetSickCd(vOpenerID, vCondCd, vCondNm, vDestCnt, vDestXPath, vMappSickCd ){
		clearParameter("SPAHB00200_PARAM1");
		clearParameter("SPAHB00200_PARAM2");
		clearParameter("SPAHB00200_PARAM3");
		clearParameter("SPAHB00200_PARAM4");
		clearParameter("SPAHB00200_PARAM5");
		clearParameter("SPAHB00200_PARAM6");

		setParameter ("SPAHB00200_PARAM1", vOpenerID);
		setParameter ("SPAHB00200_PARAM2", vCondCd);
		setParameter ("SPAHB00200_PARAM3", vCondNm);
		setParameter ("SPAHB00200_PARAM4", vDestCnt);
		setParameter ("SPAHB00200_PARAM5", vDestXPath);
		setParameter ("SPAHB00200_PARAM6", vMappSickCd);

		modal("SPAHB00200");
	}
/**==================================================================================================================
@author 	: 손범성
@version 	: 2007-12-18
@desc 		: 검사코드 선택 창 open
@param 	: grid object
				* SPAHB00500_PARAM1 : 현재화면ID
				* SPAHB00500_PARAM2 : 검사코드
				* SPAHB00500_PARAM3 : 검사명
				* SPAHB00500_PARAM4 : 대상 nodeset count
				* SPAHB00500_PARAM5 : 대상 nodeset
*====================================================================================================================*/
	function ahafGetTestCd(vOpenerID, vCondCd, vCondNm, vDestCnt, vDestXPath,vjudgexmpcd ){
		clearParameter("SPAHB00600_PARAM1");
		clearParameter("SPAHB00600_PARAM2");
		clearParameter("SPAHB00600_PARAM3");
		clearParameter("SPAHB00600_PARAM4");
		clearParameter("SPAHB00600_PARAM5");
		clearParameter("SPAHB00600_PARAM6");
		clearParameter("SPAHB00600_PARAM7");
		clearParameter("SPAHB00600_PARAM8");

		setParameter ("SPAHB00600_PARAM1", vOpenerID);
		setParameter ("SPAHB00600_PARAM2", vCondCd);
		setParameter ("SPAHB00600_PARAM3", vCondNm);
		setParameter ("SPAHB00600_PARAM4", vDestCnt);
		setParameter ("SPAHB00600_PARAM5", vDestXPath);

		setParameter ("SPAHB00600_PARAM6", vjudgexmpcd);

		modal("SPAHB00600");
	}

/**==================================================================================================================
@author 	: 손주연
@version 	: 2007-04-18
@desc 		: 처방가져오기
@param 	:
				* vOpenerID	: 현재화면ID
				*	vPkgFg 		:
				* bMultiyn 	:   다중체크여부
				* vCond 		:	검색구분(cd/nm)
				* vCdnm			: 검색조건(코드/명칭)
				* vHeDetlFg	:	건진상세구분
				*	vSex			:	성별구분(M/F)
				*  SPAHA00200_PARAM1 : P=>pkg, C=>단체pkg, A=>추가검사,S=>선택검사(추가검사와 동일한 검색조건임), T=>일반검사코드
				*  SPAHA00200_PARAM2 : 검색구분(cd/nm)
				*  SPAHA00200_PARAM3 : 검색조건(코드/명칭)
				*  SPAHA00200_PARAM4 : 기관코드
				*  SPAHA00200_PARAM5 : 건진구분( 공통코드 A0068참고)
				*  SPAHA00200_PARAM6 : 건진구분( 공통코드 A0069, A0070 참고)
				*  SPAHA00200_PARAM7 : vOpenerID
				*  SPAHA00200_PARAM8 : 성별구분(M/F)
				*  SPAHA00200_PARAM9 : 다중선택여부(Y/N)
				*  SPAHA00200_PARAM10 : single 입력일 경우 대상 nodeset
*====================================================================================================================*/

	function fGetPkgCd(vOpenerID, vPkgFg, bMultiyn,vCond, vCdnm , vHealExamDetlFlag, vSex, vDestXPath, vSrchDisableYN,vFrom,vage,vbrthareacnts,vforgneryn){


		clearParameter("SPAHA00200_PARAM1");
		clearParameter("SPAHA00200_PARAM2");
		clearParameter("SPAHA00200_PARAM3");
		clearParameter("SPAHA00200_PARAM4");
		clearParameter("SPAHA00200_PARAM5");
		clearParameter("SPAHA00200_PARAM6");
		clearParameter("SPAHA00200_PARAM7");
		clearParameter("SPAHA00200_PARAM8");
		clearParameter("SPAHA00200_PARAM9");
		clearParameter("SPAHA00200_PARAM10");
		clearParameter("SPAHA00200_PARAM11");
		clearParameter("SPAHA00200_PARAM12");
		clearParameter("SPAHA00200_PARAM13");
		clearParameter("SPAHA00200_PARAM14");
		clearParameter("SPAHA00200_PARAM15");

		setParameter ("SPAHA00200_PARAM1"		, vPkgFg);
		setParameter ("SPAHA00200_PARAM2"		, vCond);
		setParameter ("SPAHA00200_PARAM3"		, vCdnm);
		setParameter ("SPAHA00200_PARAM4"		, getUserInfo("dutplceinstcd"));
		if(vHealExamDetlFlag!="G01"){
			setParameter ("SPAHA00200_PARAM5"		, fGetHealExamFlag() );
		} else {
			setParameter ("SPAHA00200_PARAM5"		, "G" );
		}
		setParameter ("SPAHA00200_PARAM6"		, vHealExamDetlFlag);
		setParameter ("SPAHA00200_PARAM7"		, vOpenerID);
		setParameter ("SPAHA00200_PARAM8"		, vSex);
		setParameter ("SPAHA00200_PARAM9"		, bMultiyn);
		setParameter ("SPAHA00200_PARAM10"	, vDestXPath);
		setParameter ("SPAHA00200_PARAM11"	, vSrchDisableYN);
		setParameter ("SPAHA00200_PARAM12"	, vFrom);
		setParameter ("SPAHA00200_PARAM13"	, vage);
		setParameter ("SPAHA00200_PARAM14"	, vbrthareacnts);

		setParameter ("SPAHA00200_PARAM15"	, vforgneryn);

		modal("SPAHA00200");
	}

/**==================================================================================================================
@author 	: 손주연
@version 	: 2007-07-05
@desc 		: 검사코드 다중 선택 후 opener 화면에서 추가검사 setting.
@param 	:
				* vGrdObj(대상grid ID)
				* vTestCdCol( TestCode Column 순번)
				* vSrcXPath(검사코드선택 창으로 입력한 대상노드와 동일.)
*====================================================================================================================*/
	function fSetAddList(vGrdObj, vTestCdCol, vSrcXPath, vDupCheck, vPkgYN , vPkgCd) {
		if( model.getValue("/root/temp/okflag")  != "ok" ) return ;

		if( vGrdObj == null ) return ;
		if( vSrcXPath == "" ) return ;

		var cnt = getNodesetCount(vSrcXPath);
		var grdcnt  = vGrdObj.rows;
		var vTestcd = "";
		var vTestnm = "";
		var i = 0;

		if( vPkgYN == "Y" ){
			for(   i = 1 ; i <= cnt ; i++ ){
				vTestcd = model.getValue(vSrcXPath + "[" + i + "]/pkgcd" );
				vTestnm = model.getValue(vSrcXPath + "[" + i + "]/pkgnm" );
				if( vDupCheck == "Y" ) {
					if( fCheckDup(vGrdObj , vTestCdCol, vTestcd ) == false ){
						if( messageBox("중복되는 Pkg코드[" + vTestcd + " - " + vTestnm  +"] 를 추가 ", "S001") != 6 ){
							continue ;
						}
					}
				}
				var danga = model.getValue(vSrcXPath + "[" + i + "]/scoreamt" );

				if(model.getValue("/root/main/info/rsrvacptinfo/item/cmpyflag") == "Y") {
					danga = parseInt(parseFloat(danga)* 0.1)*10;
				}else {
					danga = danga;
				}

				vGrdObj.addRow();
				model.makeNode(vGrdObj.nodeset 	+ "[" + grdcnt + "]/sel");
				model.makeValue(vGrdObj.nodeset 	+ "[" + grdcnt + "]/sel" 				,  "Y" );
				model.makeValue(vGrdObj.nodeset 	+ "[" + grdcnt + "]/pkgcd" 			,  vTestcd );
				model.makeValue(vGrdObj.nodeset 	+ "[" + grdcnt + "]/pkgnm"			,vTestnm );
				model.makeNode(vGrdObj.nodeset	+ "[" + grdcnt + "]/uncocd" );
				model.makeValue(vGrdObj.nodeset 	+ "[" + grdcnt + "]/uncocd" 	  	, "V03"  );
				model.makeNode(vGrdObj.nodeset 	+ "[" + grdcnt + "]/scoreamt" );
				model.makeValue(vGrdObj.nodeset 	+ "[" + grdcnt + "]/scoreamt" 	,danga);
				model.makeNode(vGrdObj.nodeset 	+ "[" + grdcnt + "]/addtotamt" );
				model.makeValue(vGrdObj.nodeset 	+ "[" + grdcnt + "]/addtotamt" 	,danga);
				model.makeNode(vGrdObj.nodeset 	+ "[" + grdcnt + "]/calcscorcd" );
				model.makeValue(vGrdObj.nodeset 	+ "[" + grdcnt + "]/calcscorcd" ,model.getValue(vSrcXPath + "[" + i + "]/calcscorcd" )  );
				model.makeValue(vGrdObj.nodeset 	+ "[" + grdcnt + "]/testdiscyn" ,model.getValue(vSrcXPath + "[" + i + "]/testdiscyn" )  );

				grdcnt++;
			}
		}
		else {


			for(   i = 1 ; i <= cnt ; i++ ){
				vTestcd = model.getValue(vSrcXPath + "[" + i + "]/testcd" );
				vTestnm = model.getValue(vSrcXPath + "[" + i + "]/testnm" );
				if( vDupCheck == "Y" ) {
					if( fCheckDup(vGrdObj , vTestCdCol, vTestcd ) == false ){
						if( messageBox("중복되는 검사코드[" + vTestcd + " - " + vTestnm  +"] 를 추가 ", "S001") != 6 ){
							continue ;
						}
					}
				}

				var danga = model.getValue(vSrcXPath + "[" + i + "]/scoreamt" );

				if(model.getValue("/root/main/info/rsrvacptinfo/item/cmpyflag") == "Y") {
					danga = parseInt(parseFloat(danga)* 0.1)*10;
				}else {
					danga = danga;
				}

				vGrdObj.addRow();
				model.makeNode(vGrdObj.nodeset 		+ "[" + grdcnt + "]/sel");
				model.makeValue(vGrdObj.nodeset 	+ "[" + grdcnt + "]/sel" 			,  "Y" );
				
				model.makeNode(vGrdObj.nodeset 		+ "[" + grdcnt + "]/testflag");
				model.makeValue(vGrdObj.nodeset 	+ "[" + grdcnt + "]/testflag" 		,  "A" );
				model.makeValue(vGrdObj.nodeset 	+ "[" + grdcnt + "]/testcd" 		,  vTestcd );
				model.makeValue(vGrdObj.nodeset 	+ "[" + grdcnt + "]/testnm"			,vTestnm );
				
				model.makeNode(vGrdObj.nodeset		+ "[" + grdcnt + "]/uncocd" );
				model.makeValue(vGrdObj.nodeset 	+ "[" + grdcnt + "]/uncocd" 	  	, "V01"  );
				
				model.makeNode(vGrdObj.nodeset 		+ "[" + grdcnt + "]/scoreamt" );
				model.makeValue(vGrdObj.nodeset 	+ "[" + grdcnt + "]/scoreamt" 	,danga  );
				
				model.makeNode(vGrdObj.nodeset 		+ "[" + grdcnt + "]/addtotamt" );
				model.makeValue(vGrdObj.nodeset 	+ "[" + grdcnt + "]/addtotamt" 	,danga  );
				
				model.makeNode(vGrdObj.nodeset 		+ "[" + grdcnt + "]/calcscorcd" );
				model.makeValue(vGrdObj.nodeset 	+ "[" + grdcnt + "]/calcscorcd",model.getValue(vSrcXPath + "[" + i + "]/calcscorcd" )  );
				model.makeValue(vGrdObj.nodeset 	+ "[" + grdcnt + "]/prcptims", 	"1" );
				model.makeValue(vGrdObj.nodeset 	+ "[" + grdcnt + "]/prcpdayno", "1"  );
				model.makeValue(vGrdObj.nodeset 	+ "[" + grdcnt + "]/testdiscyn" , model.getValue(vSrcXPath + "[" + i + "]/testdiscyn" )  );
	
				model.makeValue(vGrdObj.nodeset 	+ "[" + grdcnt + "]/payownbamt" 	,danga  );
				
				//묵음처방 구분 추가 (2007.10.11 BY 손주연 )
				model.makeNode(vGrdObj.nodeset 	+ "[" + grdcnt + "]/grupflag" );
				model.setValue(vGrdObj.nodeset 	+ "[" + grdcnt + "]/grupflag" ,model.getValue(vSrcXPath + "[" + i + "]/grupflag" )  );

				grdcnt++;
			}
		}


		/*
		* 패키지 내부검사 중복여부 체크
		*/

		model.removeNodeSet("/root/send/test");
//		for(  i = 1; i <= vGrdObj.rows  ; i++)
	    if(vGrdObj.rows >= 2){
			for(  i = 1; i <= vGrdObj.rows - 1 ; i++)// 고정행까지 추가하는거같아서 -1 했음.
			{
			   model.makeValue("/root/send/test[" + i +"]/pkgcd"	,	    model.getValue(vGrdObj.nodeset 	+ "[" + i + "]/testcd"));
			   model.makeValue("/root/send/test[" + i +"]/grupflag"	,	model.getValue(vGrdObj.nodeset 	+ "[" + i + "]/grupflag"));
			}

			if(vPkgCd != "") { model.makeValue("/root/send/test/srchpkgcd"	,	vPkgCd);}
			if(vPkgCd != "") { model.makeValue("/root/send/test/healexamflag"	,	fGetHealExamFlag());}
			model.removeNodeSet("/root/send/testcount");
			submit("TRAHA00013",false);//패키지내 중복 체크*/
		}
		var testnm ="";
		var testnmcount ="";
		var cnt = getNodesetCount("/root/tmp/testcount/testcount");
		if (cnt != 0)
		{
			for (var i=0;i <=cnt ; i++)
			{
				testnm = model.getValue("/root/tmp/testcount/testcount["+i+"]/testnm");
				if (testnm!="")
				{
					testnmcount = testnmcount + testnm + "/";
				}

			}

			messageBox(testnmcount + " 검사가 중복되었습니다","E999");
		}
	    model.refresh();
	}


/**==================================================================================================================
@author 	: 손주연
@version 	: 2007-07-05
@desc 		: grid dup value check.
@param 	:
				* vGrdObj : grid control
				* vCheckCol : check대상 column ( 0,1,2,...)
				* vCheckVal : dup check 대상 값
*====================================================================================================================*/
	function fCheckDup( vGrdObj, vCheckCol , vCheckVal ){
		//if( vGrdObj.elementName() != "xforms:grid" ){
		//	messageBox("Invalid ObjName!", "E999");
		//	return false ;
		//}
		var cnt = vGrdObj.rows ;
		for( var i = 1; i <= cnt ; i++) {
			if( vGrdObj.valueMatrix(i, vCheckCol) == vCheckVal ){
				return false;
			}
		}
	}

/**==================================================================================================================
@author 	: 손주연
@version 	: 2007-07-05
@desc 		: 임시 건진금액 합계
@param 	:
				* vGrdObj 	: grid control
				* vCalcCol 	: 금액  column ( 0,1,2,...)
				* vPkgAmt		: 패키지금액
*====================================================================================================================*/
	function fTempCalc(	vPkgAmt , vGrdObj , vCalcCol , vPrcpTimsCol, vTotAmtCtrlID, vPkgAmtCtrlID, vAddAmtCtrlID){
/*		var iTotAmt = 0;
		var iAddAmt = 0;
		var iTotAdd = 0;
		var iTotAddExm  = 0;

		var vTotAddExm =0;
		var vTotAdd		 =0;
		var iPkgAmt 		= parseInt(vPkgAmt);
		var vAddAmt 		= "";
		var vPrcpTims 	= "";
		var iDiscAmt		=0;*///fDcAmtCalc()에서 처리

/*		iTotAddExm	 	= 	model.getValue("/root/main/info/rcptinfo/subtotamt");	//소계
		iTotAdd 		 	= 	model.getValue("/root/main/info/rcptinfo/addamt");//추가검사금액

		if(vPkgAmt 		== "")		vPkgAmt 		= "0";

		if(iTotAddExm	==	"")
		{
			vTotAddExm	= 0;
		} else {
			vTotAddExm	= parseInt(iTotAddExm);
		}

		if(iTotAdd		 	==	"")
		{
			vTotAdd		=0;
		} else {
			vTotAdd		=parseInt(iTotAdd);
		}
*/
/*		if(model.getValue("/root/main/info/rsrvacptinfo/item/discamt")!=""){
			iDiscAmt = parseInt(model.getValue("/root/main/info/rsrvacptinfo/item/discamt"));
		}

		model.setValue("/root/main/info/rcptinfo/discamt",iDiscAmt);

		for( var i = 1 ; i < vGrdObj.rows ; i++){
			vAddAmt 		= vGrdObj.valueMatrix(i, vCalcCol);
			vPrcpTims 	= vGrdObj.valueMatrix(i, vPrcpTimsCol);
			if( vAddAmt == "" ) vAddAmt 		= "0";
			if( vPrcpTims == "" ) vPrcpTims = "1";
			iAddAmt += parseInt(vAddAmt) * parseInt(vPrcpTims) ;
		}


		if( vPkgAmtCtrlID != null ) vPkgAmtCtrlID.value 	= iPkgAmt ;
		if( vAddAmtCtrlID != null ) vAddAmtCtrlID.value	= iAddAmt;// + vTotAdd;
		if( vTotAmtCtrlID  != null ) vTotAmtCtrlID.value 		= (iPkgAmt + iAddAmt) - iDiscAmt;// + vTotAddExm;


		model.refresh();*///fDcAmtCalc()에서 처리
		 fDcAmtCalc();
	}


/**==================================================================================================================
@author 	: 손주연
@version 	:2007-06-30
@desc 		: 수가내역 가져오기
@param 	:
				*  SPAHB00300_PARAM1 : 검색구분(cd/nm)
				*  SPAHB00300_PARAM2 : 검색조건(코드/명칭)
				*  SPAHB00300_PARAM3 : multiyn
				*  SPAHB00300_PARAM4 : multi선택 시 setting할 목적노드
				*  SPAHB00300_PARAM5 : code값을 setting할 목적노드
				*  SPAHB00300_PARAM6 : name값을 setting할 목적노드
				*  SPAHB00300_PARAM7 : 수가를 setting할 목적노드
*====================================================================================================================*/
	function fGetCalScorCd(  vCond, vCdnm, bMultiyn ,  vMultiDestXPath, vCdDestXPath, vNmDestXPath, vAmtDestXPath){
			clearParameter("SPAHB00300_PARAM1");
			clearParameter("SPAHB00300_PARAM2");
			clearParameter("SPAHB00300_PARAM3");
			clearParameter("SPAHB00300_PARAM4");
			clearParameter("SPAHB00300_PARAM5");
			clearParameter("SPAHB00300_PARAM6");
			clearParameter("SPAHB00300_PARAM7");

			setParameter ("SPAHB00300_PARAM1"		, vCond);
			setParameter ("SPAHB00300_PARAM2"		, vCdnm);
			setParameter ("SPAHB00300_PARAM3"		, bMultiyn);
			setParameter ("SPAHB00300_PARAM4"		, vMultiDestXPath);
			setParameter ("SPAHB00300_PARAM5"		, vCdDestXPath );
			setParameter ("SPAHB00300_PARAM6"		, vNmDestXPath);
			setParameter ("SPAHB00300_PARAM7"		, vAmtDestXPath);

			modal("SPAHB00300");
	}



/**==================================================================================================================
@author 	: 손주연
@version 	:2007-06-30
@desc 		: 수가내역 대상그리드 set
@param 	:
				*  vGrdObj			: 대상그리드
				*  vSrcXPath			: 목적노드set
				*  vDupCheckCo	: dup check column no
				*  vDupCheck		: dup check yn
				*  vCodeNode		: 수가코드 목적 노드
				*  vNameNode		: 수가처방명 목적 노드
				*  vAmtNode			: 수가 목적 노드
				* vHeaderAddRows : header row default값(1) 보다 큰 row수
*====================================================================================================================*/
	function fSetOcd(vGrdObj, vSrcXPath, vDupCheckCol, vDupCheck,  vCodeNode, vNameNode, vAmtNode, vHeaderAddRows ) {
		if( vGrdObj == null ) return ;
		if( vSrcXPath == "" ) return ;
		if( model.getValue("/root/temp/okflag")  != "ok" ) return ;
		var cnt = getNodesetCount(vSrcXPath);

		var grdcnt  = vGrdObj.rows;
		if( vHeaderAddRows != "" ){
			grdcnt  =parseInt( vGrdObj.rows) -  parseInt( vHeaderAddRows  ) ;
		}
		var vDupCheckVal = "";
		var i = 0;
		if( cnt == 1 ) {
			vDupCheckVal = model.getValue(vSrcXPath + "/calcscorcd" );
			if( vDupCheck == "Y" ) {
					if( fCheckDup(vGrdObj , vDupCheckCol, vDupCheckVal ) == false ){
						if( messageBox("중복되는 수가코드[" + vDupCheckVal + "] 를 추가", "S001") != 6 ){
							return ;
						}
					}
			}
			vGrdObj.addRow();

			if( vCodeNode != "" ){
				model.setValue(vGrdObj.nodeset + "[" + grdcnt + "]/" + vCodeNode 	,  vDupCheckVal );
			}
			if( vNameNode != "" ){
				model.setValue(vGrdObj.nodeset + "[" + grdcnt + "]/" + vNameNode	, model.getValue(vSrcXPath + "/hngnm"    ) );
			}
			if( vAmtNode != "" ){
				model.setValue(vGrdObj.nodeset + "[" + grdcnt + "]/" + vAmtNode 		, model.getValue(vSrcXPath + "/scoreamt" )  );
			}
			model.makeNode(vGrdObj.nodeset 	+ "[" + grdcnt + "]/calcscorcd" );
			model.makeValue(vGrdObj.nodeset 	+ "[" + grdcnt + "]/calcscorcd"   		, vDupCheckVal );
			model.makeNode(vGrdObj.nodeset 	+ "[" + grdcnt + "]/calcscornm" );
			model.makeValue(vGrdObj.nodeset 	+ "[" + grdcnt + "]/calcscornm"   		, model.getValue(vSrcXPath + "/ordnm" )   );
			model.makeNode(vGrdObj.nodeset 	+ "[" + grdcnt + "]/oldordcd" );
			model.makeValue(vGrdObj.nodeset 	+ "[" + grdcnt + "]/oldordcd"   			, model.getValue(vSrcXPath + "/oldordcd" ) );
		}
		else {
			for( var i = 1 ; i <= cnt ; i++ ){
				vDupCheckVal = model.getValue(vSrcXPath + "[" + i + "]/calcscorcd" );
				if( vDupCheck == "Y" ) {
					if( fCheckDup(vGrdObj , vDupCheckCol, vDupCheckVal ) == false ){
						if( messageBox("중복되는 수가코드[" + vDupCheckVal + "] 를 추가", "S001") != 6 ){
							continue ;
						}
					}
				}
				vGrdObj.addRow();

				if( vCodeNode != "" ){
					model.setValue(vGrdObj.nodeset + "[" + grdcnt + "]/" + vCodeNode 	,  vDupCheckVal );
				}
				if( vNameNode != "" ){
					model.setValue(vGrdObj.nodeset + "[" + grdcnt + "]/" + vNameNode	, model.getValue(vSrcXPath + "[" + i + "]/hngnm"    ) );
				}
				if( vAmtNode != "" ){
					model.setValue(vGrdObj.nodeset + "[" + grdcnt + "]/" + vAmtNode 	,model.getValue(vSrcXPath + "[" + i + "]/scoreamt" )  );
				}
				model.makeNode(vGrdObj.nodeset + "[" + grdcnt + "]/calcscorcd" );
				model.makeValue(vGrdObj.nodeset + "[" + grdcnt + "]/calcscorcd"   	,  vDupCheckVal );
				model.makeNode(vGrdObj.nodeset + "[" + grdcnt + "]/calcscornm" );
				model.makeValue(vGrdObj.nodeset + "[" + grdcnt + "]/calcscornm"   	,   model.getValue(vSrcXPath + "[" + i + "]/ordnm" )   );
				model.makeNode(vGrdObj.nodeset 	+ "[" + grdcnt + "]/oldordcd" );
				model.makeValue(vGrdObj.nodeset 	+ "[" + grdcnt + "]/oldordcd"   			, model.getValue(vSrcXPath + "/oldordcd" ) );
				grdcnt++;
			}
		}
		model.refresh();
	}



/**==================================================================================================================
@author 	: 손주연
@version 	:2007-08-30
@desc 		: 수납처리--임시..
@param 	:
				*  vJobFlag			: WORK/CANCEL 작업 구분.(접수/취소 구분)
	function fRcptAmt(vJobFlag){

		var payownamt = model.getValue("/root/temp/rcptinfo/hidden/opmi_out/opmi_rcptamt") ;
		if( payownamt == "") {
			payownamt = "0";
		}

		payownamt = parseInt(payownamt);

		if(  payownamt != 0  ) {
			ahafOpenRcpt(fGetHealExamFlag()
								, model.getValue("/root/main/info/rsrvacptinfo/item/rsrvdd")
								, model.getValue("/root/main/info/rsrvacptinfo/item/rsrvno")
								, model.getValue("/root/main/info/patinfo/item/pid")
								, model.getValue("/root/main/info/rsrvacptinfo/item/rcptstat")
								, model.getValue("/root/main/info/rsrvacptinfo/item/orddd")  );
			return ;
		}

		var vTmp  = fGetHealExamFlag();
		if( vTmp == "" ){
			messageBox("건진분류 ERROR .", "E999");
		 	return ;
		 }
		model.setValue("/root/send/srchhealexamflag", vTmp );
		vTmp = model.getValue(ipt_pid.attribute("ref"));
		if( vTmp == "" ) {
			messageBox("환자ID ERROR .", "E999");
			return ;
		}
		model.setValue("/root/send/srchpid", vTmp );

		vTmp = model.getValue("/root/main/info/rsrvacptinfo/item/rsrvdd");
		if( vTmp== "" ) {
			messageBox("등록일자 ERROR .", "E999");
			return ;
		}
		model.setValue("/root/send/srchrsrvdd", vTmp );

		vTmp = model.getValue("/root/main/info/rsrvacptinfo/item/rsrvno");
		if( vTmp == "" )  {
			messageBox("등록번호 ERROR .", "E999");
			return ;
		}
		model.setValue("/root/send/srchrsrvno", vTmp );
		model.setValue("/root/send/srchinstcd", getUserInfo("dutplceinstcd"));

		//2007-08-17 추가
		model.setValue("/root/send/srchjobflag"			,vJobFlag);
		model.setValue("/root/send/srchrcptdd"			,model.getValue("/root/temp/rcptinfo/hidden/opmi_out/org_rcptdd") );
		model.setValue("/root/send/srchrcptno"			,model.getValue("/root/temp/rcptinfo/hidden/opmi_out/org_rcptno") );
		model.setValue("/root/send/srchrcptseqno"	,model.getValue("/root/temp/rcptinfo/hidden/opmi_out/org_rcptseqno") );


		model.copyNode("/root/send/savercpt/opmi_out", "/root/temp/rcptinfo/hidden/opmi_out");

		openLoadingBar("수납 처리중입니다..") ;//처리중 화면을 오픈한다.
		if( submit("TXAHA02102") == true ){
			messageBox("수납 ","I001");
		}
		closeLoadingBar() ;//처리중 화면을 close한다.
	}

*====================================================================================================================*/
/**==================================================================================================================
@author 	: 	손주연
@version 	:	2007-10-11
@desc 		: 	수납처리
@param 	:
				*  vJobFlag			: WORK/CANCEL 작업 구분.(접수/취소 구분)
				*  vRsrvdd			:
*====================================================================================================================*/
	function ahafRcptAmt(vJobFlag, vRsrvdd, vRsrvno, vPid, vOrddd,  vRcptStat , vOpmiRoot,vHealexamFlag){
		var payownamt = model.getValue(vOpmiRoot + "/opmi_out/opmi_rcptamt") ;
		if( payownamt == "") {
			payownamt = "0";
		}
		payownamt = parseInt(payownamt);

		if(vHealexamFlag!="G"){
//		if(  payownamt != 0  ) {
		   //수납화면 팝업
			ahafOpenRcpt(fGetHealExamFlag()
								, vRsrvdd
								, vRsrvno
								, vPid
								, vRcptStat
								, vOrddd );
			return ;
		}

//		}

		var vTmp  = vHealexamFlag;//fGetHealExamFlag();
		if( vTmp == "" ){
			messageBox("건진분류 ERROR .", "E999");
		 	return ;
		 }
		model.makeNode("/root/send/savercpt/srchhealexamflag");
		model.setValue("/root/send/savercpt/srchhealexamflag", vTmp );

		if( vPid == "" ) {
			messageBox("환자ID ERROR .", "E999");
			return ;
		}
		model.makeNode("/root/send/savercpt/srchpid");
		model.setValue("/root/send/savercpt/srchpid", vPid );


		if( vRsrvdd== "" ) {
			messageBox("등록일자 ERROR .", "E999");
			return ;
		}
		model.makeNode("/root/send/savercpt/srchrsrvdd"  );
		model.setValue("/root/send/savercpt/srchrsrvdd", vRsrvdd );


		if( vRsrvno == "" )  {
			messageBox("등록번호 ERROR .", "E999");
			return ;
		}
		model.makeNode("/root/send/savercpt/srchrsrvno" );
		model.setValue("/root/send/savercpt/srchrsrvno", vRsrvno );

		model.makeNode("/root/send/savercpt/srchinstcd" );
		model.setValue("/root/send/savercpt/srchinstcd", getUserInfo("dutplceinstcd"));

		//2007-08-17 추가
		model.makeNode("/root/send/savercpt/srchjobflag"		);
		model.makeNode("/root/send/savercpt/srchrcptdd"		);
		model.makeNode("/root/send/savercpt/srchrcptno"		);
		model.makeNode("/root/send/savercpt/srchrcptseqno");

		model.setValue("/root/send/savercpt/srchjobflag"			,vJobFlag);
		model.setValue("/root/send/savercpt/srchrcptdd"			,model.getValue(vOpmiRoot +"/opmi_out/org_rcptdd") );
		model.setValue("/root/send/savercpt/srchrcptno"			,model.getValue(vOpmiRoot +"/opmi_out/org_rcptno") );
		model.setValue("/root/send/savercpt/srchrcptseqno"	,model.getValue(vOpmiRoot +"/opmi_out/org_rcptseqno") );

		model.makeNode("/root/send/savercpt/opmi_out");
		model.copyNode("/root/send/savercpt/opmi_out", vOpmiRoot + "/opmi_out" );

		model.makeNode("/root/send/savercpt/dcgm_out");
		model.copyNode("/root/send/savercpt/dcgm_out", vOpmiRoot + "/dcgm_out" );

		model.makeNode("/root/send/savercpt/unco_out");
		model.copyNode("/root/send/savercpt/unco_out", vOpmiRoot + "/unco_out" );

	    // 영수증채번을 먼저한다.

	   	// INPUT(1.수납일시)
	    model.makeNode("/root/send/rcptdd"	);
	    model.makeNode("/root/send/genrkind"	);
	   	model.setValue("/root/send/rcptdd"				,  getCurrentDate() );
		model.setValue( "/root/send/genrkind"		, "R");

	   //SPAHA02100 이 수납화면
	   //결과는 수납 번호
	    if ( submit("TRAHA02105",false)){
	        //영수증번호를 채번하여 셋팅한다.
	    	var rcptno = model.getValue("/root/temp/rcptno_out/rcptno/opmi_rcptno");
	    	model.makeNode( "/root/send/savercpt/opmi_rcptno");
			model.setValue( "/root/send/savercpt/opmi_rcptno", rcptno);
	    }

		openLoadingBar("수납 처리중입니다..") ;//처리중 화면을 오픈한다.

        //수납화면의 내용을 채우는 카드나 현금. 추가 검사 내역, 감면정보등 모든 정보를 가져온다.
		if( submit("TXAHA02102") == true ){
			if (vJobFlag == 'CANCEL')
			{
				messageBox("접수취소 ","I001");
			} else {
				messageBox("수납 ","I001");
			}
			
		}
		closeLoadingBar() ;//처리중 화면을 close한다.
	}


/**==================================================================================================================
@author 	: 손주연
@version 	:2007-08-30
@desc 		: 수납화면 open
@param 	:
				*   건진 구분, 예약등록일자, 예약등록번호, 등록번호
*====================================================================================================================*/
	function ahafOpenRcpt(vHealExamFlag, vRsrvDD, vRsrvNo, vPid, vRcptStat , vOrdDD ){
			clearParameter("SMAHA02100_PARAM_PID"					 	);
			clearParameter("SMAHA02100_PARAM_RSRVDD"			 	);
			clearParameter("SMAHA02100_PARAM_RSRVNO"			 	);
			clearParameter("SMAHA02100_PARAM_HEALEXAMFLAG" );

			setParameter("SMAHA02100_PARAM_PID"					, 	vPid);
			setParameter("SMAHA02100_PARAM_RSRVDD"			,	vRsrvDD);
			setParameter("SMAHA02100_PARAM_RSRVNO"			,	vRsrvNo);
			setParameter("SMAHA02100_PARAM_HEALEXAMFLAG"	, 	vHealExamFlag);
			setParameter("SMAHA02100_PARAM_ORDDD"				, 	vOrdDD);

			var sRcptStat = "" ;


			if( vRcptStat == "N" ){ //수납상태
				sRcptStat = "Y";
			}
			else {
				sRcptStat = "N";

			}
				setParameter("SMAHA02100_RTN"								,sRcptStat);
				modal("SMAHA02100");

	}

/**==================================================================================================================
@author 	: 손주연
@version 	:2007-08-30
@desc 		: 수납화면 open
@param 	:
				*   건진 구분, 예약등록일자, 예약등록번호, 등록번호
*====================================================================================================================*/
	function ahafOpenRcptGnrl(vHealExamFlag, vRsrvDD, vRsrvNo, vPid, vRcptStat , vOrdDD ){
			clearParameter("SMAHC00100_PARAM_PID"					 	);
			clearParameter("SMAHC00100_PARAM_RSRVDD"			 	);
			clearParameter("SMAHC00100_PARAM_RSRVNO"			 	);
			clearParameter("SMAHC00100_PARAM_HEALEXAMFLAG" );

			setParameter("SMAHC00100_PARAM_PID"					, 	vPid);
			setParameter("SMAHC00100_PARAM_RSRVDD"			,	vRsrvDD);
			setParameter("SMAHC00100_PARAM_RSRVNO"			,	vRsrvNo);
			setParameter("SMAHC00100_PARAM_HEALEXAMFLAG"	, 	vHealExamFlag);
			setParameter("SMAHC00100_PARAM_ORDDD"				, 	vOrdDD);

			var sRcptStat = "" ;


			if( vRcptStat == "N" ){ //수납상태
				sRcptStat = "Y";
			}
			else {
				sRcptStat = "N";

			}
				setParameter("SMAHC00100_RTN"								,sRcptStat);
				modal("SMAHC00200");

	}


/**==================================================================================================================
@author 	: 손주연
@version 	:2007-08-30
@desc 		: 수납처리	: 개인부담금 존재 시 수납창 load.
@param 	:
				*   수납창 open yn,  job flag, 건진 구분, 예약등록일자, 예약등록번호, 등록번호 , 진료일자, 기관코드
*====================================================================================================================*/
	/*function ahafRcptAmt(vRcptDlgOpenYN, vJobFlag, vHealExamFlag, vRsrvDD, vRsrvNo, vPid, vRcptStat , vOrdDD, vInstCd){

		var payownamt = model.getValue("/root/temp/rcptinfo/hidden/opmi_out/opmi_rcptamt") ;
		var payrcptamt = 0;
		if( payownamt != ""  ) {
			payrcptamt = parseInt(payownamt);
		}
		if( payrcptamt > 0  ) {
			ahafOpenRcpt(vHealExamFlag
								, vRsrvDD
								, vRsrvNo
								, vPid
								, vRcptStat
								, vOrdDD  );
			return ;
		}
		model.setValue("/root/send/srchhealexamflag"	, vHealExamFlag );
		model.setValue("/root/send/srchpid"					, vPid );
		model.setValue("/root/send/srchrsrvdd"				, vRsrvDD );
		model.setValue("/root/send/srchrsrvno"				, vRsrvNo );
		model.setValue("/root/send/srchinstcd"				, getUserInfo("dutplceinstcd"));

		//2007-08-17 추가
		model.setValue("/root/send/srchjobflag"			,vJobFlag);
		model.setValue("/root/send/srchrcptdd"			,model.getValue("/root/temp/rcptinfo/hidden/opmi_out/org_rcptdd") );
		model.setValue("/root/send/srchrcptno"			,model.getValue("/root/temp/rcptinfo/hidden/opmi_out/org_rcptno") );
		model.setValue("/root/send/srchrcptseqno"	,model.getValue("/root/temp/rcptinfo/hidden/opmi_out/org_rcptseqno") );


		model.copyNode("/root/send/savercpt/opmi_out", "/root/temp/rcptinfo/hidden/opmi_out");


	    // 영수증채번을 먼저한다.

	   	// INPUT(1.수납일시)
	   	model.setValue("/root/send/rcptdd"				,  getCurrentDate() );
		model.setValue( "/root/send/genrkind"		, "R");

	    if ( submit("TRAHA02105")){
	        //영수증번호를 채번하여 셋팅한다.
	    	var rcptno = model.getValue("/root/temp/rcptno_out/rcptno/opmi_rcptno")
			model.setValue( "/root/send/opmi_rcptno", rcptno);
	    }

		openLoadingBar("수납 처리중입니다..") ;//처리중 화면을 오픈한다.
		if( submit("TXAHA02102") == true ){
			messageBox("수납 ","I001");
		}
		closeLoadingBar() ;//처리중 화면을 close한다.
	}
*/
/**==================================================================================================================
@author 	: 손주연
@version 	:2007-08-01
@desc 		: 예약/접수 현황조회
@param 	:
				* SMAHA00400_PARAM1	:	건진구분
				* SMAHA00400_PARAM2	:	건진상세구분
				* SMAHA00400_PARAM3	:	일자체크여부(Y/N)
				* SMAHA00400_PARAM4	:	일자기준 및 상태기준 (예약:C, 예약등록: C1, 접수:E )
				* SMAHA00400_PARAM5	:	사업체코드
				* SMAHA00400_PARAM6	:	검사실코드
				* SMAHA00400_PARAM7	:	성명
				* SMAHA00400_PARAM8	:	등록번호
				* SMAHA00400_PARAM9	:	주민번호1
				* SMAHA00400_PARAM10	:	주민번호2
				* SMAHA00400_PARAM11	:	패키지코드
				* SMAHA00400_PARAM12	:	조회구분2(성명: pnm/등록번호:pid/주민번호:rgstno)
				* SMAHA00400_PARAM13	:	key값 setting 목적노드
*====================================================================================================================*/
	function ahafOpenRsrvAcptList(vOpenerID, vHealExamFg , vHealExamDetlFg, vDateChkYN , vStatFg , vCmpyCd , vRoomCd , vPnm, vPid, vRgstno1, vRgstno2, vPkgCd, vSrchCond2, vDestNode){
		clearParameter("SMAHA00400_PARAM1");
		clearParameter("SMAHA00400_PARAM2");
		clearParameter("SMAHA00400_PARAM3");
		clearParameter("SMAHA00400_PARAM4");
		clearParameter("SMAHA00400_PARAM5");
		clearParameter("SMAHA00400_PARAM6");
		clearParameter("SMAHA00400_PARAM7");
		clearParameter("SMAHA00400_PARAM8");
		clearParameter("SMAHA00400_PARAM9");
		clearParameter("SMAHA00400_PARAM10");
		clearParameter("SMAHA00400_PARAM11");
		clearParameter("SMAHA00400_PARAM12");
		clearParameter("SMAHA00400_PARAM13");

		setParameter("SMAHA00400_PARAM1", vHealExamFg);
		setParameter("SMAHA00400_PARAM2", vHealExamDetlFg);
		setParameter("SMAHA00400_PARAM3", vDateChkYN);
		setParameter("SMAHA00400_PARAM4", vStatFg);
		setParameter("SMAHA00400_PARAM5", vCmpyCd);
		setParameter("SMAHA00400_PARAM6", vRoomCd);
		setParameter("SMAHA00400_PARAM7", vPnm);
		setParameter("SMAHA00400_PARAM8", vPid );
		setParameter("SMAHA00400_PARAM9", vRgstno1);
		setParameter("SMAHA00400_PARAM10", vRgstno2);
		setParameter("SMAHA00400_PARAM11", vPkgCd);
		setParameter("SMAHA00400_PARAM12", vSrchCond2);
		setParameter("SMAHA00400_PARAM13", vDestNode);

		modal("SMAHA00400",100,10,"SMAHA00400");
	}

/**==================================================================================================================
@author 	: 손주연
@version 	:2007-08-01
@desc 		: 기본코드관리 관련 코드 선택 팝업
@param 	:
				*  vLargFg			: SPAHB00500_PARAM1 : 대분류코드
				*  vMidlFg				: SPAHB00500_PARAM2 : 중분류코드
				*  vMultiYN			: SPAHB00500_PARAM3 : multiyn => Y이면 소분류코드 다중선택입력모드
				*  vDestNode		: SPAHB00500_PARAM4 : 목적노드셋
				*  vMidlSetYN		: SPAHB00500_PARAM5 : 중분류코드 setting여부(Y/N)=>선택형결과의 경우 중분류 선택시 중분류 코드 해당 중분류에 속한 소분류 전코드를 부모창에 copy

*====================================================================================================================*/

	function ahzfOpenEtcCdSel( vOpenerID
												, vLargFg	/*대분류코드*/
												, vMidlFg	/*중분류코드*/
												, vMultiYN	/*multiyn*/
												, vDestNode	/*multiyn == 'Y'일때 목적노드셋*/
												, vMidlSetYN	/*중분류코드 setting여부(Y/N)*/ ){

		clearParameter("SPAHB00500_PARAM1");
		clearParameter("SPAHB00500_PARAM2");
		clearParameter("SPAHB00500_PARAM3");
		clearParameter("SPAHB00500_PARAM4");
		clearParameter("SPAHB00500_PARAM5");
		clearParameter("SPAHB00500_PARAM6");

		model.makeNode(vDestNode);

		setParameter("SPAHB00500_PARAM1", vLargFg);
		setParameter("SPAHB00500_PARAM2", vMidlFg);
		setParameter("SPAHB00500_PARAM3", vMultiYN);
		setParameter("SPAHB00500_PARAM4", vDestNode);
		setParameter("SPAHB00500_PARAM5", vMidlSetYN);
		setParameter("SPAHB00500_PARAM6", vOpenerID);

		modal("SPAHB00500",100,100,"SMAHB00500");

		if( model.getValue("/root/temp/okflag") == "ok" ){
			return true;
		}

		return false;
	}

/**==================================================================================================================
@author 	: 손주연
@version 	:2007-05-01
@desc 		: 코드입력 시  공통코드 및 사업체 코드 가져오기, map : TRAHA00105 , ref=  root/temp/cdlst  로 setting
@param 	:
				* vSrchFlag		: 검색구분
					** 01	판정의
					** 02	건강보험공단
					** 03	관할군병원
					** 04	산업안전공단
					** 05	보건소
					** 06	노동청
					** 07	지도원
					** 08 	사업체
				* vCode			: 검색코드
				* vAllYN			: 전체정보 여부 ( Y일 경우  vDestNodeSet으로 copy)
				* vCodeNode	: 코드값이 setting될 목적노드
				* vNameNode	: 코드명이 setting될 목적노드
				* vDestNodeSet: vAllYN == 'Y' 인 경우 목적노드셋
====================================================================================================================*/
	function ahafGetCmpyInfo( vSrchFlag,  vCode , vAllYN,  vCodeNode, vNameNode , vDestNodeSet){

	 	model.makeNode("/root/send/srchflag" );
	 	model.makeNode("/root/send/srchcond" );
	 	model.makeNode("/root/send/srchcdnm" );
	 	model.makeNode("/root/send/srchinstcd" );

		model.setValue("/root/send/srchflag"		, vSrchFlag);
	 	model.setValue("/root/send/srchcond" 	, "cd" );
	 	model.setValue("/root/send/srchcdnm" 	, vCode);
		model.setValue("/root/send/srchinstcd"	, getUserInfo("dutplceinstcd"));

		submit("TRAHA00105");
		var SrcNode = model.instance1.selectSingleNode("/root/temp/cdlst/item");
		if( SrcNode != null ) {
			if( vAllYN == "Y" ) {
				model.copyNode(vDestNodeSet, "/root/temp/cdlst/item");
			}
			else {
				model.setValue(vCodeNode 	, model.getValue("/root/temp/cdlst/item/cmpycd") );
				model.setValue(vNameNode	, model.getValue("/root/temp/cdlst/item/cmpynm") );
			}
			model.refresh();
			return true;
		}

		return false;
	}

/**==================================================================================================================
@author 	: 손주연
@version 	:2007-09-01
@desc 		: 통합검사결과조회 창 띄우기
@param 	:
				vPidNode  : 환자ID값이 있는 경로
====================================================================================================================*/
	function ahafOpenRsltView(vPidNode ){
		modal( "SMAER00800",100,10,"SMAER00800","/root/send/data/singdata/srchpid",vPidNode);
	}

/**==================================================================================================================
@author 	: 손주연
@version 	:2007-10-01
@desc 		: 종합판정 창 띄우기
@param 	:
				sPid : 환자ID
====================================================================================================================*/
	function ahafOpenColgJudg(sPid ){
		setParameter("SMAHR00500_PARAM1", sPid);

		open( "SMAHR00500",100,10,"SMAHR00500" );
	}


function ahafGetInsuAge(sRgstNo1, sRgstNo2)
{
	var brthYY = "";
	if(sRgstNo2.substr(0, 1) == 1 || sRgstNo2.substr(0, 1) == 2)
	{
		brthYY = "19" + sRgstNo1.substr(0, 2);
	}
	else
	{
		brthYY = "20" + sRgstNo1.substr(0, 2);
	}
	if(parseInt(getCurrentDate().substr(0,4)) - parseInt(brthYY) == 40 || parseInt(getCurrentDate().substr(0,4)) - parseInt(brthYY) == 66)
	{
		return true;
	}
	else
	{
		return false;
	}
	
}

/**==================================================================================================================
@author 	: 손주연
@version 	:2007-10-11
@desc 		:보험증번호 조회(보험자격조회)
@param 	:
				* sRgstNo1/sRgstNo2		: 주민번호
				* sHngNm						: 이름
				* sOrdDD 						: 진료일자
				값을 받을 노드 경로
				* vInsuKind						: 보험유형
				* vInsuNo							: 증번호
				* vInsuCd							: 보험자기호
				* vFromDD						: 취득일자
				* vInsuNm						: 보험자성명
				* vInsuBranchCd				: 관할지사 코드
				* vInsuBranchNm				: 관할지사 명칭
====================================================================================================================*/
	function ahafGetInsuCnts(sRgstNo1, sRgstNo2, sHngNm, sOrdDD
											,vInsuKind, vInsuNo, vInsuCd, vFromDD, vInsuNm, vInsuBranchCd, vInsuBranchNm ){

		if( 	(sRgstNo1 == "" ) ||
			(sRgstNo2 == "" ) ||
			(sHngNm == "" ) ||
			(sOrdDD  == "" )  ) {
			messageBox("자격조회 필수조건(주민번호/성명/진료일자) 입력이 누락되었습니다. ", "E999");
			return ;
		}
		//보험증번호 조회(보험자격조회)
		var parm	= 	sRgstNo1 + sRgstNo2 + "▦" + //주민번호
							sHngNm 	+ "▦" + //이름
							sOrdDD 	+ "▦" ;	//진료일자



//		modal("SMAHA00210");
		
		modal("SMAHA00210","1", "400",  "400", "SMAHA00210","","","");



/*		setParameter("SPPMC03700_PARM",parm);
		setParameter("SPPMC03700_RTN","");

		modal("SPPMC03700", "1","400", "400", "SPPMC03700", "", "");

		if (getParameter("SPPMC03700_RTN") == "N" || getParameter("SPPMC03700_RTN") == "") {
			return;
		}

		if (getParameter("SPPMC03700_RTN") == "Y") {

			//return 값이 있으면,
			if( vInsuKind != "" ) {
				model.makeNode(vInsuKind);
				model.setValue(vInsuKind 			, getParameter("SPPMC03700_insukind")); //건강보험 :11, 의료급여1/2종 : 21/22
			}

			if( vInsuCd != "" ) {
				model.makeNode(vInsuCd);
				model.setValue(vInsuCd 			, getParameter("SPPMC03700_insucd")); //보험자 기호
			}

			if( vInsuNo != "" ) {
				model.makeNode(vInsuNo);
				model.setValue(vInsuNo 			, getParameter("SPPMC03700_insuno")); //증번호
			}

			if( vInsuNm != "" ) {
				model.makeNode(vInsuNm);
				model.setValue(vInsuNm 			, getParameter("SPPMC03700_insdnm")); //피보험자성명
			}

			if( vFromDD != "" ) {
				model.makeNode(vFromDD);
				model.setValue(vFromDD 			, getParameter("SPPMC03700_insufromdd")); //취득일자
			}
			//관할지사코드
			if( vInsuBranchCd ){
				model.makeNode(vInsuBranchCd);
				model.setValue(vInsuBranchCd 			, getParameter("SPPMC03700_choicorpmark1")); //관할지사
			}

			//관할지사명
			if( vInsuBranchNm ){
				model.makeNode(vInsuBranchNm);
				model.setValue(vInsuBranchNm 			, getParameter("SPPMC03700_choicorpnm1")); //관할지사
			}
			model.refresh();
		}*/
	}
/**==================================================================================================================
@author 	: 손주연
@version 	:2007-10-11
@desc 		:화면 상단 환자정보 설정
@param 	:
				* vOrddd	 	: 진료일자
				* vPid			: 환자id
====================================================================================================================*/
	function ahafSetScreenTopPatInfo( vPid , vOrddd , vCretno ){

		 var  param = "O" + "▦" + vPid + "▦" + vOrddd + "▦" + vCretno + "▦" + getUserInfo("dutplceinstcd") + "▦"   ;
		 setParameter("condparam", param);

		 //setParameter("condparam", "S" + "▦" + vPrcpDD + "▦"  +  vExecprcpuniqno + "▦"  +  getUserInfo("dutplceinstcd")  );

		 modal("SPMMO08900", 1, "", "", "", "", "", "left:0; right:0; width:0; height:0; sysmenu:hidden; caption:hidden; min:hidden, max:hidden;");

	}

/**==================================================================================================================
@author 	: 김호익
@version 	:2007-12-12
@desc 		:통합예약관리 화면으로 이동
@param 	:
				* displayid		: 호출화면--통합예약 화면
				* maingridlistid	: 부서코드 Instance
				* path				: send Instance
====================================================================================================================*/

	function aezfPopUpRsrvSample(displayid, maingridlistid, path) {

		var pid = model.getValue(path +"/pid" );
		var suppdeptcd = getUserInfo("posdeptcd");

		var sflag = pid + "▦" + "S" + "▦" + suppdeptcd; // 플래그 S
		setParameter("opener_parameter_id", sflag);


		open(displayid, 1, "", "", "", "", "", "left:0; right:0; width:0; height:0;  min:hidden, max:hidden;");
	}
/**==================================================================================================================
@author 	: 김호익
@version 	:2007-12-12
@desc 		:예약시 dc 금액 확인
@param 	:
====================================================================================================================*/

	function fDcAmtCalc(){
			model.makeValue("/root/send/priceamt/healexamflag",				fGetHealExamFlag());

			if(model.getValue("/root/main/info/rsrvacptinfo/item/pkgcd") == "") {
				model.makeValue("/root/send/priceamt/healexamdetlflag"	,	model.getValue("/root/main/info/rsrvacptinfo/item/healexamdetlflag"));
			}else {
				model.makeValue("/root/send/priceamt/healexamdetlflag",		model.getValue("/root/send/srchhealexamdetlflag"));
			}

			model.makeValue("/root/send/priceamt/pkgcd"	,							model.getValue("/root/main/info/rsrvacptinfo/item/pkgcd"));
			model.makeValue("/root/send/priceamt/cmpycd",							model.getValue("/root/main/info/rsrvacptinfo/item/cmpycd"));
			model.makeValue("/root/send/priceamt/conseq",							model.getValue("/root/main/info/rsrvacptinfo/item/conseq"));
			model.makeValue("/root/send/priceamt/conhistseq",					model.getValue("/root/main/info/rsrvacptinfo/item/conhistseq"));
			model.makeValue("/root/send/priceamt/pid",								model.getValue("/root/main/info/rsrvacptinfo/item/pid"));
			model.makeValue("/root/send/priceamt/rsrvdd",							model.getValue("/root/main/info/rsrvacptinfo/item/rsrvdd"));
			model.makeValue("/root/send/priceamt/rsrvno",							model.getValue("/root/main/info/rsrvacptinfo/item/rsrvno"));
			model.makeValue("/root/send/priceamt/sex",								model.getValue("/root/main/info/patinfo/item/sex"));
			model.makeValue("/root/send/priceamt/age",								ageCalc(model.getValue("/root/main/info/patinfo/item/rgstno1") , model.getValue("/root/main/info/patinfo/item/rgstno2")));//model.getValue("/root/main/info/patinfo/item/age"));
			model.makeValue("/root/send/priceamt/disccd",							model.getValue("/root/main/info/rsrvacptinfo/item/disccd"));
			model.makeValue("/root/send/priceamt/pkguncocd",					model.getValue("/root/main/info/rsrvacptinfo/item/pkguncocd"));
			model.makeValue("/root/send/priceamt/forgneryn",					model.getValue("/root/main/info/rsrvacptinfo/item/forgneryn"));
			model.makeValue("/root/send/priceamt/choiflag",						model.getValue("/root/main/info/rsrvacptinfo/item/choiflag"));
			model.makeValue("/root/send/priceamt/statflag",						model.getValue("/root/main/info/rsrvacptinfo/item/statflag"));

			model.removenode("/root/priceamt/priceamt");


			if(submit("TRAHA00509")) {

				model.makeValue("/root/main/info/rcptinfo/subtotamt", model.getValue("/root/temp/priceamt/priceamt/subtotamt"));	//소계
				model.makeValue("/root/main/info/rcptinfo/pkgamt",	model.getValue("/root/temp/priceamt/priceamt/pkgamt"));	//패키지금액
				model.makeValue("/root/main/info/rcptinfo/cmpyaddamt",	model.getValue("/root/temp/priceamt/priceamt/cmpyaddamt"));	//단체추가검사금액
				model.makeValue("/root/main/info/rcptinfo/psnaddamt",	model.getValue("/root/temp/priceamt/priceamt/psnaddamt"));	//개인추가검사금액
				model.makeValue("/root/main/info/rcptinfo/preamt",	model.getValue("/root/temp/priceamt/priceamt/preamt"));	//선수금
				model.makeValue("/root/main/info/rcptinfo/uncoamt",	model.getValue("/root/temp/priceamt/priceamt/uncoamt"));	//미수금
				model.makeValue("/root/main/info/rcptinfo/discamt",	model.getValue("/root/temp/priceamt/priceamt/discamt"));	//할인액
				model.makeValue("/root/main/info/rcptinfo/realamt",	model.getValue("/root/temp/priceamt/priceamt/realamt"));	//실수납액
				model.makeValue("/root/main/info/rcptinfo/ownbamt",	model.getValue("/root/temp/priceamt/priceamt/ownbamt"));	//부담액

				//추가검사 금액셋팅
				fSetAddAmt();
			}
	}

/**==================================================================================================================
@author 	: 김호익
@version 	:2007-12-17
@desc 		:추가검사 그리드의 행삭제 버튼 클릭시 금액 계산
@param 	:
====================================================================================================================*/


	function fDcCode( ChoiceCD ,vpkguncocd){

		var dcb = false;

		if((ChoiceCD!="") &&(ChoiceCD!="-")){

				for(var i=0 ;i <100 ;i++){

					CodeCD			 =  model.getValue("/root/init/baseinfo/pamcdlst/disccdlst[" +i+"]/cd");

					if (ChoiceCD 	 == CodeCD) {
					  /* 추가검사 할인일경우는 추가 검사 할인액이 따로 설정되어있다 */
/*						if(vpkguncocd=="V01"){
							dcamt   = parseInt(model.getValue("/root/init/baseinfo/pamcdlst/disccdlst[" +i+"]/dcamt"));
							dcb 		= true;
							return 	parseFloat(dcamt/100);
							break;
						}else{
							dcamt   = parseInt(model.getValue("/root/init/baseinfo/pamcdlst/disccdlst[" +i+"]/adddcamt"));
							dcb 		= true;
							return 	parseFloat(dcamt/100);
							break;
						}*/
							dcamt   = parseInt(model.getValue("/root/init/baseinfo/pamcdlst/disccdlst[" +i+"]/dcamt"));
							dcb 		= true;
							return 	parseFloat(dcamt/100);
							break;

					}
				}
			} else {
				return 0.0;
			}

			if (dcb==false){
				return 0.0;
			}

	}

/**==================================================================================================================
@author 	: 김호익
@version 	:2007-12-17
@desc 		: 해당할인계정의 금액 확인
@param 	:
====================================================================================================================*/

	function fDcCodeAdd( ChoiceCD ,vpkguncocd){

		var dcb = false;

		if((ChoiceCD!="") &&(ChoiceCD!="-")){

				for(var i=0 ;i <100 ;i++){

					CodeCD			 =  model.getValue("/root/init/baseinfo/pamcdlst/disccdlst[" +i+"]/cd");

					if (ChoiceCD 	 == CodeCD) {
					  /* 추가검사 할인일경우는 추가 검사 할인액이 따로 설정되어있다 */
/*						if(vpkguncocd=="V01"){
							dcamt   = parseInt(model.getValue("/root/init/baseinfo/pamcdlst/disccdlst[" +i+"]/dcamt"));
							dcb 		= true;
							return 	parseFloat(dcamt/100);
							break;
						}else{
							dcamt   = parseInt(model.getValue("/root/init/baseinfo/pamcdlst/disccdlst[" +i+"]/adddcamt"));
							dcb 		= true;
							return 	parseFloat(dcamt/100);
							break;
						}*/
							dcamt   = parseInt(model.getValue("/root/init/baseinfo/pamcdlst/disccdlst[" +i+"]/adddcamt"));
							dcb 		= true;
							return 	parseFloat(dcamt/100);
							break;

					}
				}
			} else {
				return 0.0;
			}

			if (dcb==false){
				return 0.0;
			}

	}

	function fRowDeleteCalc(scoreamtco){
		var	scoreamt 	= 	0;
		var 	addamt 	=	0;
		var 	subtotamt	=	0;

/*		if (model.getValue(grd_addlst.nodeset + "[" + grd_addlst.row + "]/scoreamt")!="")	{
			scoreamt = parseInt( model.getValue(grd_addlst.nodeset + "[" + grd_addlst.row + "]/scoreamt"));

		}*/
		if(scoreamtco!=""){
			scoreamt = parseInt( scoreamtco);
		}


		if (model.getValue("/root/main/info/rcptinfo/addamt")!=""){
			addamt = parseInt(model.getValue("/root/main/info/rcptinfo/addamt")) - scoreamt;

		}

		if (model.getValue("/root/main/info/rcptinfo/subtotamt")!=""){
			subtotamt = parseInt(model.getValue("/root/main/info/rcptinfo/subtotamt"));
		}

		if (scoreamt!=0){

			model.setValue("/root/main/info/rcptinfo/addamt",addamt);
			model.setValue("/root/main/info/rcptinfo/subtotamt",subtotamt - scoreamt);
			model.refresh();
		}
		 fDcAmtCalc();
	}

/**==================================================================================================================
@author 	: 김호익
@version 	:2007-12-17
@desc 		: 소견등록시 이전검사 결과와 틀린부분 체크
@param 	:
====================================================================================================================*/

	function fOldRsltChk(){

			if (model.getValue("/root/main/judgdetl/judginfo/item/hngjudgcnts")!=""){

					var cnt = grd_rsltlst.rows;
					for (var ci=1;ci <cnt;ci++){
							var rsltVal1 = grd_rsltlst.valueMatrix(ci,grd_rsltlst.colRef("rslt1"));
							var rsltVal2 = grd_rsltlst.valueMatrix(ci,grd_rsltlst.colRef("rslt2"));
							var rsltVal3 = grd_rsltlst.valueMatrix(ci,grd_rsltlst.colRef("rslt3"));

							if (rsltVal1 =="처방없음"){
									grd_rsltlst.cellstyle("color", ci ,2, ci,2 ) = "#ff99cc";
							} else if (rsltVal1 != grd_rsltlst.valueMatrix(ci,grd_rsltlst.colRef("judgrslt"))){
									grd_rsltlst.cellstyle("background-color", ci, 2, ci, 2) = "#FFF000";
							}

					}

					cnt = grd_rslttextlst.rows;
					for (var ci=1;ci <cnt;ci++){
							var rsltText1 = grd_rslttextlst.valueMatrix(ci,grd_rslttextlst.colRef("rslt1"));
							var rsltText2 = grd_rslttextlst.valueMatrix(ci,grd_rslttextlst.colRef("rslt2"));
							var rsltText3 = grd_rslttextlst.valueMatrix(ci,grd_rslttextlst.colRef("rslt3"));

							if (rsltText1 != grd_rslttextlst.valueMatrix(ci,grd_rslttextlst.colRef("judgrslt"))){
									grd_rslttextlst.cellstyle("background-color", ci, 1, ci, 1) = "#FFF000";
							}

					}
			}
	}

	 function fDocCmtChoice(){

			var cnt = getNodesetCount("/root/main/judgexmpcdlst/item");

			var sCmtH 	=	model.getValue("/root/main/judgdetl/judginfo/item/hngjudgcnts");
			var sCmtE		=	model.getValue("/root/main/judgdetl/judginfo/item/engjudgcnts");
			var sCmtSH 	=	model.getValue("/root/main/judgdetl/judginfo/item/shrthngjudgcnts");
			var sCmtSE 	=	model.getValue("/root/main/judgdetl/judginfo/item/shrtengjudgcnts");

			for (var i=0; i<=cnt;i++){

				if (model.getValue("/root/main/judgexmpcdlst/item["+i+"]/sel")=="Y" && model.getValue("/root/main/judgexmpcdlst/item["+i+"]/lvl") != "1"){
					sCmtH 		= sCmtH 	+ model.getValue("/root/main/judgexmpcdlst/item["+i+"]/judghangcnts") + "\n";
					sCmtE 		= sCmtE 	+ model.getValue("/root/main/judgexmpcdlst/item["+i+"]/judgengcnts")+ "\n";
					sCmtSH 	= sCmtSH + model.getValue("/root/main/judgexmpcdlst/item["+i+"]/judghangshrtcnts")+ "\n";
					sCmtSE 	= sCmtSE + model.getValue("/root/main/judgexmpcdlst/item["+i+"]/judgengshrtcnts")+ "\n";
				}

			}
			model.setValue("/root/main/judgdetl/judginfo/item/hngjudgcnts", 		sCmtH);
			model.setValue("/root/main/judgdetl/judginfo/item/shrthngjudgcnts", sCmtSH);
			model.setValue("/root/main/judgdetl/judginfo/item/engjudgcnts", 		sCmtE);
			model.setValue("/root/main/judgdetl/judginfo/item/shrtengjudgcnts", sCmtSE);

			model.refresh();
	}

	function fAddExmAmt(){


		var cnt = grd_addlst.rows;// getNodesetCount("/root/main/info/rsrvacptinfo/addlst");

		var addTotamt =0;

		for (var i=1 ;i<cnt;i++){

			if ((grd_addlst.valueMatrix(i,grd_addlst.colRef("scoreamt"))!="")){
				addTotamt = addTotamt + parseInt(grd_addlst.valueMatrix(i,6));
			}

		}

		if (cnt == 1) {
			addTotamt = 0;
		}


		return addTotamt;

	}

	function deleteTest(delrow){
		model.makeValue("/root/temp/judgexmpcd" 	, model.getValue("/root/main/judgexmpcdlst/item[" +grd_judgexmplst.row+ "]/judgexmpcd" ));
		model.makeValue("/root/temp/testcd" 				, model.getValue("/root/main/judgexmpdetl/itemtest[" +delrow+"]/testcd"));
		model.makeValue("/root/temp/instcd" 				, getUserInfo("dutplceinstcd"));

		var vhf = "";
		if (model.getValue("/root/main/info/rsrvacptinfo/item/healexamflag")=="")
		{
			vhf = fGetHealExamFlag();
		} else {
			vhf = model.getValue("/root/main/info/rsrvacptinfo/item/healexamflag");
		}

		model.makeValue("/root/temp/healexamflag" 	, vhf);

		if( messageBox("검사항목을", "Q001") != 6) return -1;

			submit("TXAHB00803");

			grd_testlst.deleteRow(grd_testlst.row);
	}


/**
*/
	function ageCalc(rgstno1,rgstno2){
		var ssno1 = rgstno1;
		var ssno2 = rgstno2;
		var temp1 = ssno1.substring(0,2);
		var temp2 = ""
		var sexTyp = ssno2.substring(0,1);

		var temp = new Date().getYear();
		if(sexTyp == "1" || sexTyp == "2") {
			temp2 =  "19"
			var age = (parseInt(temp) - parseInt(temp2+temp1));
			return age;
		}else {
			temp2 =  "20"
			var age = (parseInt(temp) - parseInt(temp2+temp1));
			return age;
		}
	}

	function gridMergeRow(grd_nm){
	  var cnt   = grd_nm.rows;
		var oldnm = "";
		var grdnm = "";
		var lt    = 1;
		var lb    = 1;

		for(var i=1; i<=cnt; i++){
			if(grdnm == grd_nm.valueMatrix(i, 2)){
        //grd_nm.valueMatrix(i,1) = "";
      }else{
        grdnm = grd_nm.valueMatrix(i, 2);
        grd_nm.mergeByFree(lt, 2, i-1, 2);
				lt = i;
			}
		}
		model.refresh();
	}
	
	function gridCellName(codecd){
			var cnt = getNodesetCount("/root/temp/pkgtestcdlst");
			for(var i = 0 ; i<cnt;i++ ){
				if(model.getValue("/root/init/baseinfo/comcodelst/item[" +i+"]/cd")==codecd){
					return model.getValue("/root/init/baseinfo/comcodelst/item[" +i+"]/nm");
				}
			}
	}

	function grdImage(grd_nm){
		var cnt = grd_nm.rows;
		for(var i=1; i<=cnt; i++){
			if(grd_nm.valueMatrix(i, grd_nm.colRef("rsltflag")) == "O"){
				grd_nm.cellstyle("background-image", i, 5) = "../../../ast/healexamweb/image/si.bmp";
				grd_nm.cellstyle("background-position", i, 5) = "center center";
			}
		}
		model.refresh();
	}

	/**==================================================================================================================
@author 	: 김호익
@version 	:2007-12-17
@desc 		: pacs 연동
@param 	:
====================================================================================================================*/


	function fClickPACSOrdPatResultList(pacsorderid, pid) {
					/*if ( grdobj.rows >= grdobj.fixedRows ) {

						var rowidx = grdobj.row;

						if ( btn_case1.selected == true ) {

							if ( model.getValue("/root/main/ordlist1/maindailylist["+rowidx+"]/execprcpuniqno") == "" ||
							     model.getValue("/root/main/ordlist1/maindailylist["+rowidx+"]/execprcpuniqno") == 0 ) {
							    	messageBox("PACS Viewer와 연동할 수 없습니다.(유일번호가 0이거나 NULL입니다)","I999");
							    	return;
							}
							var pacsorderid = model.getValue("/root/main/ordlist1/maindailylist["+rowidx+"]/prcpdd")+model.getValue("/root/main/ordlist1/maindailylist["+rowidx+"]/execprcpuniqno");
							var pid = model.getValue("/root/main/ordlist1/maindailylist["+rowidx+"]/pid");
						}

						if ( btn_case2.selected == true ) {
							if ( model.getValue("/root/main/ordlist2/mainserious["+rowidx+"]/execprcpuniqno") == "" ||
							     model.getValue("/root/main/ordlist2/mainserious["+rowidx+"]/execprcpuniqno") == 0 ) {
							    	messageBox("PACS Viewer와 연동할 수 없습니다.(유일번호가 0이거나 NULL입니다)","I999");
							    	return;
							}
							var pacsorderid = model.getValue("/root/main/ordlist2/mainserious["+rowidx+"]/prcpdd")+model.getValue("/root/main/ordlist2/mainserious["+rowidx+"]/execprcpuniqno");
							var pid = model.getValue("/root/main/ordlist2/mainserious["+rowidx+"]/pid");
						}
						// PACS Viewer 호출
						//zepfpacsOrderID("2007082725595");

					}*/
					zepfpacsAll(pacsorderid, pid);
	}
	function fClickCDISResultList() {
		model.resetInstanceNode("/root/send/iemr");
		model.makeNode("/root/hidden/temp");

		var prcpdd = 				model.getValue("/root/temp/prcpdd");
		var execprcpuniqno=	model.getValue("/root/temp/seqno");
		var instcd				 = 		getUserInfo("dutplceinstcd");
		var sprcpdd         = aezfTrim(prcpdd,         44);
		var sexecprcpuniqno = aezfTrim(execprcpuniqno, 44);
		var sinstcd         = aezfTrim(instcd,         44);


		model.makeValue("/root/send/iemr/cmc_orddate"     , sprcpdd);
		model.makeValue("/root/send/iemr/cmc_orderseqno"  , sexecprcpuniqno);
		model.makeValue("/root/send/iemr/cmc_spcid"       ,	sinstcd);
		if(window.children.item("imgemrviewer") == null){
				window.load("../../../emr/imgemrweb/xrw/SSMRC03130.xrw","modeless", "imgemrviewer", "", "/root/send/iemr", "/root/hidden/temp");
        /*			
        window.children.item("imgemrviewer").document.title = "Image EMR Viewer";
				window.children.item("imgemrviewer").javaScript.searchChart("/root/hidden/temp");
				if(window.children.item("imgemrviewer").javaScript.downloadChart() == true){
				  window.children.item("imgemrviewer").javaScript.setupChart("ChartView");
				}
				*/
		}

	}

	function fPriceCheck(){

			model.makeValue("/root/send/priceamt/healexamflag",				fGetHealExamFlag());

			if(model.getValue("/root/main/info/rsrvacptinfo/item/pkgcd") == "") {
				model.makeValue("/root/send/priceamt/healexamdetlflag"	,	model.getValue("/root/main/info/rsrvacptinfo/item/healexamdetlflag"));
			}else {
				model.makeValue("/root/send/priceamt/healexamdetlflag",		model.getValue("/root/send/srchhealexamdetlflag"));
			}

			model.makeValue("/root/send/priceamt/pkgcd"	,							model.getValue("/root/main/info/rsrvacptinfo/item/pkgcd"));
			model.makeValue("/root/send/priceamt/cmpycd",							model.getValue("/root/main/info/rsrvacptinfo/item/cmpycd"));
			model.makeValue("/root/send/priceamt/conseq",							model.getValue("/root/main/info/rsrvacptinfo/item/conseq"));
			model.makeValue("/root/send/priceamt/conhistseq",					model.getValue("/root/main/info/rsrvacptinfo/item/conhistseq"));
			model.makeValue("/root/send/priceamt/pid",								model.getValue("/root/main/info/rsrvacptinfo/item/pid"));
			model.makeValue("/root/send/priceamt/rsrvdd",							model.getValue("/root/main/info/rsrvacptinfo/item/rsrvdd"));
			model.makeValue("/root/send/priceamt/rsrvno",							model.getValue("/root/main/info/rsrvacptinfo/item/rsrvno"));
			model.makeValue("/root/send/priceamt/sex",								model.getValue("/root/main/info/patinfo/item/sex"));
			model.makeValue("/root/send/priceamt/age",								ageCalc(model.getValue("/root/main/info/patinfo/item/rgstno1") , model.getValue("/root/main/info/patinfo/item/rgstno2")));//model.getValue("/root/main/info/patinfo/item/age"));
			model.makeValue("/root/send/priceamt/disccd",							model.getValue("/root/main/info/rsrvacptinfo/item/disccd"));
			model.makeValue("/root/send/priceamt/pkguncocd",					model.getValue("/root/main/info/rsrvacptinfo/item/pkguncocd"));
			model.makeValue("/root/send/priceamt/forgneryn",					model.getValue("/root/main/info/rsrvacptinfo/item/forgneryn"));
			model.makeValue("/root/send/priceamt/choiflag",						model.getValue("/root/main/info/rsrvacptinfo/item/choiflag"));
			model.makeValue("/root/send/priceamt/statflag",						model.getValue("/root/main/info/rsrvacptinfo/item/statflag"));

			model.removenode("/root/priceamt/priceamt");


			if(submit("TRAHA00509")) {

				model.makeValue("/root/main/info/rcptinfo/subtotamt", model.getValue("/root/temp/priceamt/priceamt/subtotamt"));	//소계
				model.makeValue("/root/main/info/rcptinfo/pkgamt",	model.getValue("/root/temp/priceamt/priceamt/pkgamt"));	//패키지금액
				model.makeValue("/root/main/info/rcptinfo/addamt",	model.getValue("/root/temp/priceamt/priceamt/cmpyaddamt"));	//단체추가검사금액
				model.makeValue("/root/main/info/rcptinfo/addamt",	model.getValue("/root/temp/priceamt/priceamt/psnaddamt"));	//개인추가검사금액
				model.makeValue("/root/main/info/rcptinfo/preamt",	model.getValue("/root/temp/priceamt/priceamt/preamt"));	//선수금
				model.makeValue("/root/main/info/rcptinfo/uncoamt",	model.getValue("/root/temp/priceamt/priceamt/uncoamt"));	//미수금
				model.makeValue("/root/main/info/rcptinfo/discamt",	model.getValue("/root/temp/priceamt/priceamt/discamt"));	//할인액
				model.makeValue("/root/main/info/rcptinfo/realamt",	model.getValue("/root/temp/priceamt/priceamt/realamt"));	//실수납액
				model.makeValue("/root/main/info/rcptinfo/ownbamt",	model.getValue("/root/temp/priceamt/priceamt/ownbamt"));	//부담액

				//추가검사 금액셋팅
				fSetAddAmt();
			}
	}

  function fSaveRsrvAcptPro(vMode, GMode){
		if(GMode == "1"){
			var vHealExamFlag = model.getValue("/root/main/info/rsrvacptinfo/item/healexamflag");
		}else{
			var vHealExamFlag = fGetHealExamFlag();
			if(vHealExamFlag == "") return -1;
		}

		var sMode = "";
		switch(vMode){
			case  "A" : sMode = "가예약";
			break;
			case  "B" : sMode = "보류";
			break;
			case  "C" : sMode = "예약";
			break;
			case  "D" : sMode = "예약취소";
			break;
			case  "E" : sMode = "접수";
			break;
			case  "F" : sMode = "접수취소";
			break;
		}
		sMode = sMode + "정보를";
		if(messageBox(sMode, "Q002") != 6) return -1;

    //if(fChoiChk() == false) return -1;  //패키지 검사중 둘중 하나를 반듯이 선택해야하는 검사 체크(예 : 소화기 내시경 패키지)
		//setInputNodeCurText();
		if(fCheckPatInfo() == false) return -1;
		if(!fCheckAcpt(vMode)) return  -1;

		var vPidYN = "Y";
		//예약/예약보류는 등록번호 생성하지 않음.
		if((vMode == "A") || (vMode == "B")){
			vPidYN = "N";
		}

		/*
		* 수진자정보
		*/
		model.setValue("/root/main/info/patinfo/item/pidcretfg"   , vPidYN);
		model.copyNode("/root/send/save"                          , "/root/main/info/patinfo/item");
		fCheckNodeExist("/root/send/save/userid"                  , true);
		model.setValue("/root/send/save/userid"                   , getUserId());
		fCheckNodeExist("/root/send/save/instcd"                  , true);
		model.setValue("/root/send/save/instcd"                   , getUserInfo("dutplceinstcd"));

		/*
		* 예약접수정보
		*/
		fCheckNodeExist("/root/main/info/rsrvacptinfo/item/mode"          , true );
		model.setValue("/root/main/info/rsrvacptinfo/item/mode"           , vMode);
		fCheckNodeExist("/root/main/info/rsrvacptinfo/item/healexamflag"  , true );
		model.setValue("/root/main/info/rsrvacptinfo/item/healexamflag"   , vHealExamFlag);
		model.duplicate("/root/send/save"                                 , "/root/main/info/rsrvacptinfo/item");

		model.makeValue("/root/send/save/item/ownbamt"        , model.getValue("/root/main/info/rcptinfo/ownbamt"));
		model.makeValue("/root/send/save/pkgcd"               , model.getValue("/root/main/info/rsrvacptinfo/item/pkgcd"));
		model.makeValue("/root/send/save/cmpyflag"            , model.getValue("/root/main/info/rsrvacptinfo/item/cmpyflag"));
		model.makeValue("/root/send/save/cmpycd"              , model.getValue("/root/main/info/rsrvacptinfo/item/cmpycd"));
		model.makeValue("/root/send/save/conseq"              , model.getValue("/root/main/info/rsrvacptinfo/item/conseq"));
		model.makeValue("/root/send/save/conhistseq"          , model.getValue("/root/main/info/rsrvacptinfo/item/conhistseq"));
		model.makeValue("/root/send/save/choiflag"            , model.getValue("/root/main/info/rsrvacptinfo/item/choiflag"));
		model.makeValue("/root/send/save/zipcdseq1"           , model.getValue("/root/main/info/patinfo/item/zipcdseq1"));
		model.makeValue("/root/send/save/zipcdseq2"           , model.getValue("/root/main/info/patinfo/item/zipcdseq2"));
		model.makeValue("/root/send/save/clntempid"           , model.getValue("/root/main/info/rsrvacptinfo/item/clntempid"));
		model.makeValue("/root/send/save/clntpos"             , model.getValue("/root/main/info/rsrvacptinfo/item/clntpos"));
		model.makeValue("/root/send/save/patm_brthareacnts"   , model.getValue("/root/main/info/patinfo/item/brthareacnts"));
		model.makeValue("/root/send/save/acpt_brthareacnts"   , model.getValue("/root/main/info/rsrvacptinfo/item/brthareacnts"));

		/*
		* RFID
		*/
		fCheckNodeExist("/root/send/save"                     , true );
		model.makeValue("/root/send/save/taginfo/rtime"       ,model.getValue("/root/main/info/taginfo/rtime"));
		model.makeValue("/root/send/save/taginfo/tagno"       ,model.getValue("/root/main/info/taginfo/tagno"));
		model.makeValue("/root/send/save/taginfo/suppstat"    ,model.getValue("/root/main/info/taginfo/suppstat"));

		/*
		* 결과상담 예약내역 저장
		*/
    //예약 및 접수취소일경우 현재 이후의 예약이며 결과상담이 완료되지 않은 내역은 삭제합니다.
		if(vMode == "F"|| vMode == "D"){
			var rsltRsrvCnt = getNodesetCount("/root/main/info/rsltcnstinfo/cnstlst/cnst");			
			for(var i=1; i<=rsltRsrvCnt; i++){
			  var cnstEndYN             = model.getValue("/root/main/info/rsltcnstinfo/cnstlst/cnst[" + i + "]/rsltcnstendyn");
				var rsltCnstDD            = model.getValue("/root/main/info/rsltcnstinfo/cnstlst/cnst[" + i + "]/rsltcnstdd");
				var rsltCnstRsrvStarttm   = model.getValue("/root/main/info/rsltcnstinfo/cnstlst/cnst[" + i + "]/rsltcnstrsrvstarttm");
				var dtRsrvdd              = (rsltCnstDD + " " + rsltCnstRsrvStarttm + "00" ).toDate("YYYYMMDD hhmmss");
				
				if((cnstEndYN == "N" || cnstEndYN == "") &&  dtRsrvdd > getCurrentDateTime().toDate("YYYYMMDD hhmmss")){
						model.setValue("/root/main/info/rsltcnstinfo/cnstlst/cnst[" + i + "]/m" ,"d");
						model.setValue("/root/main/info/rsltcnstinfo/cnstlst/cnst[" + i + "]/rsltrsrvsaveyn" ,"N");
				}
			}
		}
		
		var rsltRsrvList = instance1.selectNodes("/root/main/info/rsltcnstinfo/cnstlst/cnst[rsltrsrvsaveyn='N']");
		model.makeNode("/root/send/save/rsltsave");
		model.makeValue("/root/send/save/rsltsave/rsltrsrv" , getNodeListCSV(rsltRsrvList));

		/*
		* 추가검사정보
		* 종검을 제외한 나머지 검진은 선택된 프로파일을 추가검사정보에 가지고 있으므로 여기서 삭제한다
		*/
    /*
    if(model.getValue("/root/main/info/rsrvacptinfo/item/healexamflag") == "G"){
      for(i=1; i<grd_addlst.rows;i++ ){
				if (model.getValue("/root/main/info/rsrvacptinfo/item/pkgcd") == grd_addlst.valueMatrix(i,2)){
					grd_addlst.valueMatrix(i,grd_addlst.colRef("sel")) = "";
        }
      }
		}
		*/

    //model.refresh(); 2008-06-12이성인 주석 처리 및 맨 끝으로 이동
		//model.refresh();
		//추가 검사 내역 rowheader를 i로 셋팅
		//추가검사 중 접수시 처방이 내려져야 하는검사가 있으므로 우선 추가검사 내역을 다 가져가야 하기에 u 모드로 변경
		grd_addlst.clearStatus();
		if(GMode == "1"){
			for(var i=1; i < grd_addlst.rows;i++){
				if((grd_addlst.valueMatrix(i,grd_addlst.colRef("sel"))=="Y")|| (grd_addlst.valueMatrix(i,grd_addlst.colRef("sel"))=="true")){
					grd_addlst.rowStatus(i) = 2;
					model.setValue("/root/send/selpkgexam["+ i + "]/m ", "u");
				}
			}
		}else{
			for(var i=1; i<grd_addlst.rows; i++){
				if((grd_addlst.valueMatrix(i,grd_addlst.colRef("sel"))=="Y")|| (grd_addlst.valueMatrix(i,grd_addlst.colRef("sel"))=="true")){
					grd_addlst.rowStatus(i) = 2;
					model.setValue("/root/main/info/rsrvacptinfo/addlst["+ i + "]/m ", "u");
				}
			}
		}

		model.makeValue("/root/send/save/addlst", grd_addlst.getUpdateData());
		openLoadingBar(sMode + " 처리 중입니다..") ;//처리중 화면을 오픈한다.
		model.resetInstanceNode("/root/hidden");
		model.removeNodeset("/root/tmp");
		var retInstance;
		/*
		if(vMode == "D" || vMode == "F"){
			retInstance = submit("TXAHA00013", false);
		}else{
			retInstance = submit("TXAHA04027",false);
		}
		*/

		if(GMode == "1"){
			retInstance = submit("TXAHA04032",false) ;
		}else{
			retInstance = submit("TXAHA04027",false) ;
		}

    //if((retInstance==true) ||(retInstance==True)){
    if(retInstance == true ){
			var ret = 0 ;
			var rst = "R";

      if(GMode == "1"){
          var vHealExamFlag = model.getValue("/root/main/info/rsrvacptinfo/item/healexamflag");
      }else{
				//일부결과를 인스턴스에 복사
				//AHA001.JS
				fretinstanceset();
			}

			if( vMode == "E" ){ //접수
				model.makeNode("/root/send/srchjobflag"	);
				model.makeNode("/root/send/srchrcptdd"	);
				model.makeNode("/root/send/srchrcptno"	);
				model.makeNode("/root/send/srchrcptseqno");

        //root/send/srchpid , srchrsrvdd , srchrsrvno , srchinstcd , srchjobflag 를 기준으로 TXAHA02101(수납)서브미션
				//SMAHA00100_예약접수

				//태그등록 상태변경
				var suppstat = model.getValue("/root/tmp/reqrfid/suppstat"); // 태그지급상태
				if(suppstat == "0"){
					model.setValue("/root/main/info/taginfo/rtime"    , model.getValue("/root/tmp/reqrfid/rtime"));
					model.setValue("/root/main/info/taginfo/tagno"    , model.getValue("/root/tmp/reqrfid/tagno"));
					model.setValue("/root/main/info/taginfo/suppstat" , model.getValue("/root/tmp/reqrfid/suppstat"));

					//태그 지급상태 실시값
					model.makeValue("/root/tag/taginfo/tagstat" , model.getValue("/root/tmp/reqrfid/suppstat"));
					btn_tag.attribute("text") = "태그반납";
					ipt_tagno.disabled = true;
        }

				if(model.getValue("/root/main/info/rsrvacptinfo/item/healexamflag") == "C"  || model.getValue("/root/main/info/rsrvacptinfo/item/healexamdetlflag") == "G02"){
					ret = fCalcAmt("RCPT");
				}

        //1은 서브미션결과가 TRUE
				if(ret  == 1){
          //함수 내에서 조건에 따라 수납화면 팝업
					//TRAHA02105로 영수증번호 채번
					//TXAHA02102로 수납화면에 뿌려지는 내용인 카드현금수납내역, 할인내역, 검사내역등 을 조회해온다. /root/hidden/rcpt_out에 결과저장
					//ahafRcptAmt("RCPT");
					// 2008.09.30 비자건진 담당자 요청에 따라 비자건진 접수시 수납창 안띄워줌
					if(model.getValue("/root/main/info/rsrvacptinfo/item/healexamflag") != "G" && model.getValue("/root/main/info/rsrvacptinfo/item/healexamdetlflag") != "G02"){
						ahafRcptAmt("RCPT"
											, model.getValue("/root/main/info/rsrvacptinfo/item/rsrvdd")
											, model.getValue("/root/main/info/rsrvacptinfo/item/rsrvno")
											, model.getValue("/root/main/info/rsrvacptinfo/item/pid")
											, model.getValue("/root/main/info/rsrvacptinfo/item/orddd")
											, model.getValue("/root/main/info/rsrvacptinfo/item/rcptstat")
											, "/root/temp/rcptinfo/hidden"
											, model.getValue("/root/main/info/rsrvacptinfo/item/healexamflag")
            )
            rst = "T";
					}
				}
			}else if( vMode == "F" ){ //F접수 취소
				model.makeNode("/root/send/srchjobflag");
				model.makeNode("/root/send/srchrcptdd");
				model.makeNode("/root/send/srchrcptno");
				model.makeNode("/root/send/srchrcptseqno");
				ret =  fCalcAmt("CANCEL") ;
				if( ret == 1){
					ahafRcptAmt("CANCEL"
										, model.getValue("/root/main/info/rsrvacptinfo/item/rsrvdd")
										, model.getValue("/root/main/info/rsrvacptinfo/item/rsrvno")
										, model.getValue("/root/main/info/rsrvacptinfo/item/pid")
										, model.getValue("/root/main/info/rsrvacptinfo/item/orddd")
										, model.getValue("/root/main/info/rsrvacptinfo/item/rcptstat")
										, "/root/temp/rcptinfo/hidden"
										, model.getValue("/root/main/info/rsrvacptinfo/item/healexamflag")
          )
          rst = "T";
				}
			}

	    fInitInfo(); 	              //접수 정보 및 건진자 정보 초기화
			ipt_pnm.currentText ="";
			fSetBtnStat();              //예약,접수등 상태에 맞는 버튼 셋팅
			fGetList();	                //TRAHA00103 -건진자 리스트 조회

			closeLoadingBar() ;//처리중 화면을 close한다.
			var sytsrsrvchk =	model.getValue("/root/tmp/sytsrsrvchk/sytsrsrvchk");

      if(sytsrsrvchk == "Y" ){// 통합예약할 내역이 있으면 "Y"
	      model.setValue("/root/main/info/rsrvacptinfo/item/pid" ,model.getValue("/root/tmp/reqacpt/pid"));
			  button2.dispatch("onclick");
      }
			model.refresh();

		}else{
      messageBox("저장이 잘못되었습니다", "E999");
			closeLoadingBar() ;//처리중 화면을 close한다.
		}
		return 1;
	}

	function fretinstanceset(){
		model.makeValue("/root/main/info/rsrvacptinfo/item/rsrvdd",model.getValue("/root/tmp/reqacpt/rsrvdd"));
		model.makeValue("/root/main/info/rsrvacptinfo/item/rsrvno",model.getValue("/root/tmp/reqacpt/rsrvno"));
		model.makeValue("/root/main/info/rsrvacptinfo/item/pid",model.getValue("/root/tmp/reqpat/pid"));
		model.makeValue("/root/main/info/rsrvacptinfo/item/orddd",model.getValue("/root/tmp/reqpat/orddd"));
		model.makeValue("/root/main/info/patinfo/item/pid",model.getValue("/root/tmp/reqpat/pid"));
	}
	function fGetPro(){
			model.makeValue("/root/send/srchpkgflag" , "");
			model.makeValue("/root/send/srchhealexamflag" , "G");

			model.makeValue("/root/send/srchcond"	,	"");
			if (model.getValue("/root/send/pkgcd") == ""){
				model.makeValue("/root/send/srchcond"	,	"");
				model.makeValue("/root/send/srchcdnm"	,	"");
			} else{
				model.makeValue("/root/send/srchcond"	,	"cd");
				model.makeValue("/root/send/srchcdnm"	,	model.getValue("/root/send/pkgcd"));

			}

			if (model.getValue("/root/send/srchcond") == ""){
				if (model.getValue("/root/send/pkgnm") == ""){
					model.makeValue("/root/send/srchcond"	,	"");
					model.makeValue("/root/send/srchcdnm"	,	"");
				} else{
					model.makeValue("/root/send/srchcond"	,	"nm");
					model.makeValue("/root/send/srchcdnm"	,	model.getValue("/root/send/pkgnm"));
				}
			}
			submit("TRAHB00303");
	}

		function finsuCheck(){
			model.makeValue("/root/main/info/rsrvacptinfo/item/insu1","");
			model.makeValue("/root/main/info/rsrvacptinfo/item/insu2","");
			model.makeValue("/root/main/info/rsrvacptinfo/item/insu3","");
			model.makeValue("/root/main/info/rsrvacptinfo/item/insu4","");
			model.makeValue("/root/main/info/rsrvacptinfo/item/insu5","");
			model.makeValue("/root/main/info/rsrvacptinfo/item/insu6","");
			model.makeValue("/root/main/info/rsrvacptinfo/item/insu7","");
			model.makeValue("/root/main/info/rsrvacptinfo/item/insu8","");
			model.makeValue("/root/main/info/rsrvacptinfo/item/insu9","");
			model.makeValue("/root/main/info/rsrvacptinfo/item/insu10","");


			if (model.getValue("/root/main/info/rsrvacptinfo/item/healexamdetlflag")=="G01"){
				model.makeValue("/root/main/info/rsrvacptinfo/item/insu1", "G01");				
			} else if (model.getValue("/root/main/info/rsrvacptinfo/item/healexamdetlflag")=="G02"){
				model.makeValue("/root/main/info/rsrvacptinfo/item/insu2", "G02");				
			} else if (model.getValue("/root/main/info/rsrvacptinfo/item/healexamdetlflag")=="G03"){
				model.makeValue("/root/main/info/rsrvacptinfo/item/insu3", "G03");				
			} else if (model.getValue("/root/main/info/rsrvacptinfo/item/healexamdetlflag")=="G04"){
				model.makeValue("/root/main/info/rsrvacptinfo/item/insu4", "G04");				
			} else if (model.getValue("/root/main/info/rsrvacptinfo/item/healexamdetlflag")=="G05"){
				model.makeValue("/root/main/info/rsrvacptinfo/item/insu5", "G05");				
			} else if (model.getValue("/root/main/info/rsrvacptinfo/item/healexamdetlflag")=="G06"){
				model.makeValue("/root/main/info/rsrvacptinfo/item/insu6", "G06");
			} else if (model.getValue("/root/main/info/rsrvacptinfo/item/healexamdetlflag")=="G07"){
				model.makeValue("/root/main/info/rsrvacptinfo/item/insu7", "G07");
			} else if (model.getValue("/root/main/info/rsrvacptinfo/item/healexamdetlflag")=="G08"){
				model.makeValue("/root/main/info/rsrvacptinfo/item/insu8", "G08");
			} else if (model.getValue("/root/main/info/rsrvacptinfo/item/healexamdetlflag")=="G09"){
				model.makeValue("/root/main/info/rsrvacptinfo/item/insu9", "G09");
			} else if (model.getValue("/root/main/info/rsrvacptinfo/item/healexamdetlflag")=="G010"){
				model.makeValue("/root/main/info/rsrvacptinfo/item/insu10", "G010");
			}

		}
		function fInsuChange(){
			if (model.getValue("/root/send/srchcdnm") !="")
			{
				model.makeValue("/root/send/srchflag"		, "02");
			 	model.makeValue("/root/send/srchcond" 	, "nm" );
				model.makeValue("/root/send/srchinstcd"	, getUserInfo("dutplceinstcd"));
				submit("TRAHA00105");
				if (model.getValue("/root/temp/cdlst/item/cmpycd")!="")
				{
					opener.model.makeValue("/root/main/info/rsrvacptinfo/item/insucorpbrchcd",model.getValue("/root/temp/cdlst/item/cmpycd"));
				}
			}
		}
		function fGetAutoCode(vMode,dgflag){
			model.makeValue("/root/tmp/cdflag",vMode);
			model.makeValue("/root/tmp/dgflag",dgflag);
			modal("SPAHA00700");
		}

//마약 집게 추가(대장내시경시 마약 신청)
      function fDrugSum(){
		submit("TXAHA00105");
	  }

	  function fChoiChk(){
			var a = "";
			var cnt = 0;
			var cnt2 = 0;
				for(var i=1; i < grd_addlst.rows;i++){
				   if ((grd_addlst.valueMatrix(i,grd_addlst.colRef("testflag"))=="S")){cnt2 = cnt2 +1 ; }
				   if ((grd_addlst.valueMatrix(i,grd_addlst.colRef("testflag"))=="S") && (grd_addlst.valueMatrix(i,grd_addlst.colRef("sel")) =="Y")){
						  cnt = cnt+ 1;
				   }
				}

				if(cnt == 0 && cnt2 != 0 ){
					var rtn = messageBox("패키지내 선택검사 중  1개의 선택검사도 선택 되지 않았습니다, 계속 하시겠습니까? ", "Q0999");
					if(rtn == 6){return true;}
					else if(rtn == 7){return false;}
				}
	  }

    function fSavePtbs(){
  		if( fCheckPatInfo('1') == false ) return -1 ;
  		/**
  		* 수진자정보
  		*/
  		model.copyNode("/root/send/save"          , "/root/main/info/patinfo/item");
  		fCheckNodeExist("/root/send/save/userid"	, true);
  		model.setValue("/root/send/save/userid"   , getUserId());
  		fCheckNodeExist("/root/send/save/instcd"	, true);
  		model.setValue("/root/send/save/instcd"   , getUserInfo("dutplceinstcd"));
      submit("TXAHA00111", false) ;
    		
  		model.setValue("/root/main/info/patinfo/item/pid" , model.getValue("/root/tmp/patinfo/pid"));
  		ipt_pid.refresh();
    }

		// 추가검사 금액셋팅
		function fSetAddAmt() {
			var healexamdetlflag = model.getValue("/root/main/info/rsrvacptinfo/item/healexamdetlflag");
			var disccd = model.getValue("/root/main/info/rsrvacptinfo/item/disccd");	// 할인코드
			var cmpycd = model.getValue("/root/main/info/rsrvacptinfo/item/cmpycd");	// 단체코드
			var statflag = model.getValue("/root/main/info/rsrvacptinfo/item/statflag");	// 단체코드
			var chngyn = model.getValue("/root/temp/priceamt/priceamt/chngyn");				// 부담금 변경여부
			var pkgdiscyn = model.getValue("/root/main/info/rsrvacptinfo/item/pkgdiscyn");				// 패키지 할인 여부
			var disc = 0;
			var pAddamt = 0;
			var sCnt = 0;
			var pkgDisc = 0;
			var addDisc = 0;
			var	uncoamt = 0;
			var	ownbamt = 0;
			var PkgDiscamt = 0;
			var subtotamt = parseInt(model.getValue("/root/temp/priceamt/priceamt/subtotamt"));	//소계
			var	pkgamt = parseInt(model.getValue("/root/temp/priceamt/priceamt/pkgamt"));	//패키지금액
			var	cmpyaddamt = parseInt(model.getValue("/root/temp/priceamt/priceamt/cmpyaddamt"));	//단체추가검사금액
			var	psnaddamt = parseInt(model.getValue("/root/temp/priceamt/priceamt/psnaddamt"));	//개인추가검사금액
			var	preamt = parseInt(model.getValue("/root/temp/priceamt/priceamt/preamt"));	//선수금
			var	discamt = parseInt(model.getValue("/root/temp/priceamt/priceamt/discamt"));	//할인액
			var	realamt = parseInt(model.getValue("/root/temp/priceamt/priceamt/realamt"));	//실수납액
			var org_uncoamt = parseInt(model.getValue("/root/temp/priceamt/priceamt/orguncoamt")); // 계약처의 미수금(변경없는)
			var org_ownbamt = parseInt(model.getValue("/root/temp/priceamt/priceamt/orgownbamt"));	//게약처의 원래 부담금
			if(chngyn == "Y") {
				uncoamt = parseInt(model.getValue("/root/temp/priceamt/priceamt/chnguncoamt"));	//미수금
				ownbamt = parseInt(model.getValue("/root/temp/priceamt/priceamt/chngownbamt"));	//부담액
			}else {
				uncoamt = parseInt(model.getValue("/root/temp/priceamt/priceamt/uncoamt"));	//미수금
				ownbamt = parseInt(model.getValue("/root/temp/priceamt/priceamt/ownbamt"));	//부담액
			}

			// 할인율
			if(disccd != "") {
				 pkgDisc = parseInt(model.getValue("/root/init/baseinfo/pamcdlst/disccdlst[cd='"+ disccd + "']/dcamt"));
				 addDisc = parseInt(model.getValue("/root/init/baseinfo/pamcdlst/disccdlst[cd='"+ disccd + "']/adddcamt"));
			}
			// 개인일 경우 패키지의 할인율 적용
			if(cmpycd == "") {
					if(pkgdiscyn == "Y") {
						discamt = discamt + Math.round(pkgamt*(pkgDisc/100));
						PkgDiscamt = Math.round(pkgamt*(pkgDisc/100));
					}				
			}


			var cnt = getNodesetCount("/root/main/info/rsrvacptinfo/addlst") ;

			for(var i=1; i <= cnt; i++) {
				var sel = model.getValue("/root/main/info/rsrvacptinfo/addlst[" + i + "]/sel");
				var testflag = model.getValue("/root/main/info/rsrvacptinfo/addlst[" + i + "]/testflag");	// 검사구분
				var uncocd = model.getValue("/root/main/info/rsrvacptinfo/addlst[" + i + "]/uncocd");	// 청구구분
				var scoreamt = parseInt(model.getValue("/root/main/info/rsrvacptinfo/addlst[" + i + "]/scoreamt"));	// 단가
				var testdiscyn = model.getValue("/root/main/info/rsrvacptinfo/addlst[" + i + "]/testdiscyn"); //추가검사할인적용여부
				var dcamt = testdiscyn == "Y"? Math.round(scoreamt*(addDisc/100)) : 0;	// 추가검사금액								


				if("Y" == sel) {

					if(testflag == "S") {
							sCnt++;
							if(cmpycd != "") {
								if("V01" == uncocd)	{
									pAddamt += (scoreamt - dcamt);
									psnaddamt 	+= scoreamt;
									discamt += dcamt;
									subtotamt += scoreamt;
								}else	if("V02" == uncocd) {
									uncoamt += (scoreamt - dcamt);	// 미수금액
									cmpyaddamt 	+= scoreamt;
									discamt += dcamt;
									subtotamt += scoreamt;
								}
							}
					}else {
						if(cmpycd != "") {
							if("V01" == uncocd) {
								pAddamt += (scoreamt - dcamt);	// 개인추가금액
								psnaddamt += scoreamt;

							}else if("V02" == uncocd) {
								uncoamt += (scoreamt - dcamt);	//미수금액
								cmpyaddamt 		+= scoreamt;
							}

							discamt 	+= dcamt;
							subtotamt += scoreamt;
						}else {
							pAddamt += (scoreamt - dcamt);
							psnaddamt		+= scoreamt;
							discamt 	+= dcamt;
							subtotamt += scoreamt;
						}
					}
				}
			}

			// 개인 일 경우
			if(cmpycd == "") {
				if(sCnt > 1) {
					messageBox("선택검사을 2개이상" , "E005");
				}
			}

			model.makeValue("/root/main/info/rcptinfo/subtotamt", subtotamt);	//소계
			model.makeValue("/root/main/info/rcptinfo/pkgamt",	pkgamt);	//패키지금액
			model.makeValue("/root/main/info/rcptinfo/cmpyaddamt",	cmpyaddamt);	//추가검사금액
			model.makeValue("/root/main/info/rcptinfo/psnaddamt",	psnaddamt);	//추가검사금액
			model.makeValue("/root/main/info/rcptinfo/preamt",	preamt);	//선수금
			model.makeValue("/root/main/info/rcptinfo/uncoamt",	uncoamt);	//미수금
			model.makeValue("/root/main/info/rcptinfo/discamt",	discamt);	//할인액

			if(statflag == "E" || statflag == "G" || statflag == "H" || statflag == "I") {
				model.makeValue("/root/main/info/rcptinfo/realamt",	realamt);	//실수납액
			}else {
				if(cmpycd != "") {
					model.makeValue("/root/main/info/rcptinfo/realamt",	pAddamt + ownbamt - realamt - preamt);	//실수납액
				}else {
					model.makeValue("/root/main/info/rcptinfo/realamt",	pkgamt + pAddamt - PkgDiscamt  - realamt - preamt);	//실수납액
				}
			}
			
			if(healexamdetlflag == "G02") {
				model.makeNode("/root/send1");
				model.removeNodeset("/root/send1");
				model.makeValue("/root/send1/healexamflag", fGetHealExamFlag());
				model.makeValue("/root/send1/rsrvdd", model.getValue("/root/main/info/rsrvacptinfo/item/rsrvdd"));
				model.makeValue("/root/send1/rsrvno", model.getValue("/root/main/info/rsrvacptinfo/item/rsrvno"));
				model.makeValue("/root/send1/testflag", "A");
				model.makeValue("/root/send1/testcd", model.getValue("/root/main/info/rsrvacptinfo/item/pkgcd"));
				model.makeValue("/root/send1/cmpyflag", "N" );
				model.makeValue("/root/send1/age", model.getValue("/root/main/info/patinfo/item/age"));
				model.makeValue("/root/send1/cmpycd", "");
				model.makeValue("/root/send1/conseq", "");
				model.makeValue("/root/send1/conhistseq", "");
				model.makeValue("/root/send1/statflag", model.getValue("/root/main/info/rsrvacptinfo/item/statflag"));
				submit("TRAHA00702",false);
				if(cmpycd != "") {					
					
					model.makeValue("/root/main/info/rcptinfo/pkgamt",	model.getValue("/root/price/dangainfo/danga"));	//패키지금액
					model.makeValue("/root/main/info/rcptinfo/subtotamt",parseInt(model.getValue("/root/main/info/rcptinfo/cmpyaddamt")) 
																															+ parseInt(model.getValue("/root/main/info/rcptinfo/psnaddamt"))
																															+ parseInt(model.getValue("/root/main/info/rcptinfo/pkgamt")));	//소계
					model.makeValue("/root/main/info/rcptinfo/uncoamt", parseInt(model.getValue("/root/main/info/rcptinfo/cmpyaddamt"))
																															+ parseInt(model.getValue("/root/main/info/rcptinfo/pkgamt")));
				}else {
					if(statflag != "") {
						model.makeValue("/root/main/info/rcptinfo/pkgamt",	model.getValue("/root/price/dangainfo/danga"));	//패키지금액
						model.makeValue("/root/main/info/rcptinfo/subtotamt",parseInt(model.getValue("/root/main/info/rcptinfo/cmpyaddamt")) 
																															+ parseInt(model.getValue("/root/main/info/rcptinfo/psnaddamt"))
																															+ parseInt(model.getValue("/root/main/info/rcptinfo/pkgamt")));	//소계
						model.makeValue("/root/main/info/rcptinfo/uncoamt", parseInt(model.getValue("/root/main/info/rcptinfo/cmpyaddamt")));																									
					}
				}
			}
			
			model.makeValue("/root/main/info/rcptinfo/ownbamt",	ownbamt);	//부담액
			model.makeValue("/root/main/info/rcptinfo/tempamt",	org_uncoamt + org_ownbamt);	//게약처 미수금 + 부담금
						
			if(0 > parseInt(model.getValue("/root/main/info/rcptinfo/realamt")))	{
				opt_realamt.attribute("style") = "left:904px; top:675px; width:291px; height:65px; text-align:right; vertical-align:bottom; color:#ff0000 ";
			}else {
				opt_realamt.initStyle("color");
				opt_realamt.attribute("style") = "left:904px; top:675px; width:291px; height:65px; text-align:right; vertical-align:bottom;";
			}
			model.refresh();
		}
		
		
	function fnSetImage()
	{
		/*예약정보가 존재하지 않거나 파일이 존재하지 않을 경우 실행하지 않는다. */
		if(model.getValue("/root/send/attach/file") == "" || 
		   model.getValue("/root/send/srchrsrvdd") == "" || 
		   model.getValue("/root/send/srchrsrvno") == "")
		{
			return false;
		}
		
		if(submit("TXAHA04028"))
		{
			fnGetImage();
		}
	}
	
	function fnGetImage()
	{
		model.removenode("/root/image/attachfile/image");
		if(model.getValue("/root/main/info/rsrvacptinfo/item/visaphotpath") != "")
		{
			model.setValue("/root/send/visaphotpath", model.getValue("/root/main/info/rsrvacptinfo/item/visaphotpath"));
			setImageRefInstance("/root/image/attachfile/image");
			submit("TRAHA04017");
			img_visaphot.refresh();
			model.refresh();
			setImageRefInstance("/root/image/attachfile/image");
		}
	}

/**
* 사업장정보저장=====================================================================================================================================
@author 	: 손주연
@version 	: 2007-04-30
@desc 		: 환자인적사항저장
@param 	:
				* vPidYN : 등록번호생성여부
*/
	function fSaveGnrlInfo(vPidYN){
		if( fCheckPatInfo() == false ) return ;
		fCheckNodeExist("/root/send/save/instcd", true);
		fCheckNodeExist("/root/main/info/rsrvacptinfo/item/cmpycd", true);
		fCheckNodeExist("/root/main/info/rsrvacptinfo/item/bizoffccd"	, true);
		fCheckNodeExist("/root/main/info/rsrvacptinfo/item/acpt_insuid"	, true);
		fCheckNodeExist("/root/main/info/rsrvacptinfo/item/insutrgtflag", true);
		fCheckNodeExist("/root/main/info/rsrvacptinfo/item/insuflag", true);
		fCheckNodeExist("/root/main/info/rsrvacptinfo/item/jobkindflag", true);
		fCheckNodeExist("/root/main/info/rsrvacptinfo/item/insucorpbrchcd", true);
		fCheckNodeExist("/root/main/info/rsrvacptinfo/item/healcntrcd", true);
		fCheckNodeExist("/root/main/info/rsrvacptinfo/item/armyhos", true);
		fCheckNodeExist("/root/main/info/rsrvacptinfo/item/deptcd", true);
		fCheckNodeExist("/root/main/info/rsrvacptinfo/item/entcodd", true);
		fCheckNodeExist("/root/main/info/rsrvacptinfo/item/clntempid", true);
		fCheckNodeExist("/root/main/info/rsrvacptinfo/item/plceflag", true);
		fCheckNodeExist("/root/main/info/rsrvacptinfo/item/oraltestyn", true);
		fCheckNodeExist("/root/main/info/rsrvacptinfo/item/scndhptstrgtyn", true);
		fCheckNodeExist("/root/main/info/rsrvacptinfo/item/stmccncrflag", true);
		fCheckNodeExist("/root/main/info/rsrvacptinfo/item/largeintescncrflag", true);
		fCheckNodeExist("/root/main/info/rsrvacptinfo/item/livcncrflag", true);
		fCheckNodeExist("/root/main/info/rsrvacptinfo/item/mamcncrflag", true);
		fCheckNodeExist("/root/main/info/rsrvacptinfo/item/cervcncrflag", true);
		fCheckNodeExist("/root/main/info/rsrvacptinfo/item/remcnts", true);
		fCheckNodeExist("/root/main/info/rsrvacptinfo/item/subscrhngnm", true);
		fCheckNodeExist("/root/main/info/rsrvacptinfo/item/subscrrrgstno1", true);
		fCheckNodeExist("/root/main/info/rsrvacptinfo/item/subscrrrgstno2", true);
		fCheckNodeExist("/root/init/place/healexamplacecd", true);

		model.copyNode("/root/send/save", "/root/main/info/rsrvacptinfo/item");

		fCheckNodeExist("/root/send/save/userid", true);
		fCheckNodeExist("/root/send/save/instcd", true);

		model.setValue("/root/send/save/userid", getUserId() );
		model.setValue("/root/send/save/instcd", getUserInfo("dutplceinstcd") );
		model.makeNode("/root/send/save/healexamdetlflag");
		model.setValue("/root/send/save/healexamdetlflag", model.getValue("/root/send/srchhealexamdetlflag") );
		model.makeNode("/root/send/save/healexamplacecd");
		model.setValue("/root/send/save/healexamplacecd", model.getValue("/root/init/place/healexamplacecd") );

		openLoadingBar("건진자 수진자격 정보를  저장  중입니다..") ;//처리중 화면을 오픈한다.

		submit("TXAHA04034");

		closeLoadingBar() ;//처리중 화면을 close한다.
	}

/**
*====================================================================================================================================.
@author 	: 심승욱
@version 	: 2007-04-20
@desc 		: 건진장소 설정 =>  추후 로그인 시 건진구분 세션관리가 되지 않을 경우를 대비.
@param 	: grid control id
@return 	:  C: 종건/ G :일건
====================================================================================================================================*/
	function  fGetHealExamPlaceFlag(){
		var sFlag =  getScreenMenuParameter() ;
		var sFlagLen = parseInt(sFlag.length);
		// 한자리 이하 인경우 ==> 건진장소구분(K,S)로 구분
		if(sFlagLen <= 1) {
			if(  sFlag == "" ) sFlag = "S";		
		}else { // 한자리 초과인경우 => 건진상세구분 (CXX ,GXX)로 구분
			sFlag = sFlag.substr(1,2);
		}		
		return sFlag ;
	}

/**
*====================================================================================================================================.
@author 	: 손범성
@version 	: 2007-04-20
@desc 		: 재외국인 체크
@param 	: 주민번호
@return 	:  true: 외국인/ false :내국인
====================================================================================================================================*/
	function check_fgnno(fgnno) {
      var sum=0;
      var odd=0;
      buf = new Array(13);
      for(i=0; i<13; i++) { buf[i]=parseInt(fgnno.charAt(i)); }
      odd = buf[7]*10 + buf[8];
      if(odd%2 != 0) { return false; }
      if( (buf[11]!=6) && (buf[11]!=7) && (buf[11]!=8) && (buf[11]!=9) ) {
              return false;
      }
      multipliers = [2,3,4,5,6,7,8,9,2,3,4,5];
      for(i=0, sum=0; i<12; i++) { sum += (buf[i] *= multipliers[i]); }
      sum = 11 - (sum%11);
      if(sum >= 10) { sum -= 10; }
      sum += 2;
      if(sum >= 10) { sum -= 10; }
      if(sum != buf[12]) { return false }
      return true;
	}
/**
*====================================================================================================================================.
@author 	: 손범성
@version 	: 2010-01-26
@desc 		: 공통코드 조회
@param 	: 다중선택여부,조회활성화여부,그룹코드,코드ID,목적노드셋,목적코드노드,목적명노드
====================================================================================================================================*/
function fGetCommonCode(vMultiYn,vGrpCd,vCdId,vDesNodeSet,vDesNodeCd,vDesNodeNm) {
		clearParameter("SPAHA03110_PARAM1");
		clearParameter("SPAHA03110_PARAM2");
		clearParameter("SPAHA03110_PARAM3");
		clearParameter("SPAHA03110_PARAM4");
		clearParameter("SPAHA03110_PARAM5");
		clearParameter("SPAHA03110_PARAM6");		
		
		setParameter ("SPAHA03110_PARAM1", vMultiYn);		
		setParameter ("SPAHA03110_PARAM2", vGrpCd);
		setParameter ("SPAHA03110_PARAM3", vCdId);
		setParameter ("SPAHA03110_PARAM4", vDesNodeSet);
		setParameter ("SPAHA03110_PARAM5", vDesNodeCd);
		setParameter ("SPAHA03110_PARAM6", vDesNodeNm);
				
		modal("SPAHA03110");
}


/**
 * 신우편번호 체계 관련 공통함수
 */
function fNewZipCdCheck(zipcd1, zipcd2){
	if(zipcd2.length!=2){
		messageBox("2015년 8월 1일부터 우편번호 뒷자리는 2자리 변경되었습니다.\n확인 후 수정부탁드립니다.", "E");
		return;
	}
}

/**
 * 공단건진 그리드 클릭시 동명이인 확인을 위해서 로직 추가(2016/10/25)
 */
function fChkPatNameG(gridNode, colName, patName){
	var cnt=getNodeSetCnt(gridNode + "["+ colName + "='" + patName + "']");
	if(parseInt(cnt)>1){
		messageBox("["+patName+"]님으로 동명이인이 존재합니다. 확인 후 진행부탁드립니다.", "I");
	}
}