YNU_JEUS/app_home/himed/xpapps/ast/healthexamrsrvacptxp/xp/AHA.xjs

<?xml version="1.0" encoding="utf-8"?>
<Script type="xscript4.0"><![CDATA[
include "com_zipcodexp::ZBP001.xjs";

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

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

/************************************************************************************************
**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 =  frmf_getMenuParam() ;
	var sFlagLen = parseInt(sFlag.length);
	// 한자리 이하 인경우 ==> 건진구분(C,G)로 구분
	if(sFlagLen <= 1) {
		if(  utlf_isNull(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 ){
	frmf_clearParameter("SPAHA00500_PARAM1");
	frmf_clearParameter("SPAHA00500_PARAM2");
	frmf_clearParameter("SPAHA00500_PARAM3");
	frmf_clearParameter("SPAHA00500_PARAM4");
	frmf_clearParameter("SPAHA00500_PARAM5");
	frmf_clearParameter("SPAHA00500_PARAM6");
	frmf_clearParameter("SPAHA00500_PARAM7");

	frmf_setParameter ("SPAHA00500_PARAM1", vFlag);
	frmf_setParameter ("SPAHA00500_PARAM2", vCond);
	frmf_setParameter ("SPAHA00500_PARAM3", vCdnm);
	frmf_setParameter ("SPAHA00500_PARAM4", sysf_getUserInfo("dutplceinstcd"));
	frmf_setParameter ("SPAHA00500_PARAM5", vOpenerID);
	frmf_setParameter ("SPAHA00500_PARAM6", vDesXPathCd);
	frmf_setParameter ("SPAHA00500_PARAM7", vDesXPathNm);
	
	frmf_modal("SPAHA00500","SPAHA00500",null,"","","","","","","","","","M");
}

/**********************************************************************************
 * 함수명		: fCheckNodeExist
 * 설  명		: 해당 데이터 셋에 컬럼 존재 체크
 * argument		: * xPath 	: node XPath
				  * xColumn : node Column //2.0 추가
				  * bMake	: make 여부
 * return Type	: true/false (node 존재 여부 )
 * 작성자		: 
**********************************************************************************/
function fCheckNodeExist(xPath, xColumn, bMake)
{
	var node = this.objects[xPath];
	
	if(utlf_isNull(node))
	{
		dsf_createDs(xPath);
	}
	
	if(!utlf_isNull(xColumn))
	{
		if(bMake == true)
		{
			dsf_makeValue(eval(xPath), xColumn, "string", "");
			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 ){

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

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

		frmf_modal("SPAHA00400","SPAHA00400",null,"","","","","","","","","","M");

	}

/*-**************************************************************************************
@author 	: 손주연
@version 	: 2007-04-30
@desc 		: 환자인적사항저장
@param 		: vPidYN : 등록번호생성여부
 ****************************************************************************************/
function fSavePatInfo(vPidYN){
	if( fCheckPatInfo() == false ) return ;
	fCheckNodeExist("ds_main_info_patinfo_item", "pidcretfg", true);
	dsf_createDs("ds_send_save");

	ds_main_info_patinfo_item.setColumn( 0, "pidcretfg", vPidYN);
	ds_send_save.copyData(ds_main_info_patinfo_item); 

	fCheckNodeExist("ds_send_save", "userid", true);
	fCheckNodeExist("ds_send_save", "instcd", true);
	
	ds_send_save.setColumn( 0, "userid", sysf_getUserId() );
	ds_send_save.setColumn( 0, "instcd", sysf_getUserInfo("dutplceinstcd") );
	dsf_makeValue( ds_send_save, "healexamflag", "string",  ds_send.getColumn(0, "srchhealexamflag") )
	dsf_makeValue( ds_send_save, "healexamdetlflag", "string", ds_send.getColumn(0, "srchhealexamdetlflag") );

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

	dsf_makeValue(ds_send_save, "rrgstno1", "string", ds_send_save.getColumn(0, "rgstno1"));
	dsf_makeValue(ds_send_save, "rrgstno2", "string", ds_send_save.getColumn(0, "rgstno2"));
	dsf_makeValue(ds_send_save, "srchrgstno1", "string", ds_send_save.getColumn(0, "rgstno1"));
	dsf_makeValue(ds_send_save, "srchrgstno2", "string", ds_send_save.getColumn(0, "rgstno2"));
	dsf_makeValue(ds_send_save, "srchinstcd", "string", ds_send_save.getColumn(0, "instcd"));
	dsf_makeValue(ds_send_save, "forgeryn", "string", ds_send_save.getColumn(0, "forgneryn"));
	
	var oParam = {};
		oParam.id          = "TXAHA00101";
		oParam.service     = "healexamrsrvacptapp.RsrvAcpt";
		oParam.method      = "reqExePatInfo";
		oParam.inds        = "save=ds_send_save";
		//oParam.outds       = "ds_hidden=save";
		oParam.async       = false;
		//oParam.callback    = "cf_TXAHA00101";

	tranf_submit(oParam);

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


/**********************************************************************************
 * 함수명		: fCheckPatInfo
 * 설  명		: 건진자인적사항 내용 check
 * argument		: 
 * return Type	: 
 * 작성자		: 
**********************************************************************************/
function fCheckPatInfo(vFrom)
{
	if (vFrom=="1")
	{
		var vTmp = frmf_getComponents("ipt_pnm").value;
		if( utlf_isNull(vTmp) )
		{
			sysf_messageBox("성명을 ", "C001");
			ipt_pnm.setFocus();
			return false;
		}
		vTmp  = frmf_getComponents("ipt_rgstno1").value;
		if( utlf_isNull(vTmp) )
		{
			sysf_messageBox("주민번호를 ", "C001");
			ipt_rgstno1.setFocus();
			return false;
		}

		vTmp  = frmf_getComponents("ipt_rgstno2").value;
		if( utlf_isNull(vTmp) )
		{
			sysf_messageBox("주민번호를 ", "C001");
			ipt_rgstno2.setFocus();
			return false;
		}
		return true;
	}
	else 
	{
		return true;
	}
}

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

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

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

/** ==========================================================================================================
@author 	: 손주연
@version 	: 2007-04-30
@desc 		: 주민번호로 생년월일/성별/나이 기본 setting
@param 	:
* ==========================================================================================================*/
function fSetBrthDD(){
	var objRgstno1	= frmf_getComponents("ipt_rgstno1", this);
	var objRgstno2	= frmf_getComponents("ipt_rgstno2", this);
	var objBrthdd	= frmf_getComponents("ipt_brthdd", this);
	var objSex		= frmf_getComponents("opt_sex", this);
	var objAge		= frmf_getComponents("opt_age", this);
	
	var vrgstno1 = objRgstno1.value;
	var vrgstno2 = utlf_transNullToEmpty(objRgstno2.value+"");
	var vSex     = vrgstno2.substr( 0, 1) ;
	var vBrthdd	 = "";
	
	if(( vSex == 3 ) || (vSex == 4)){
		vBrthdd = "20" + vrgstno1;
	}else{
		vBrthdd = "19" + vrgstno1;
	}
	
	objBrthdd.value	= vBrthdd;
	objSex.value	= utlf_getSex(vrgstno1+ vrgstno2);
	objAge.value	= utlf_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(utlf_isNull(vSrcNode)) vSrcNode = ds_send;

	var vCond       = "";
	var vChoiFlag   = "";
	vChoiFlag       = ds_main_info_rsrvacptinfo_item.getColumn(0, "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;
	}
	
	dsf_makeValue(vSrcNode, "srchcond", "string", vCond);
	dsf_makeValue(vSrcNode, "srchinstcd", "string", sysf_getUserInfo("dutplceinstcd"));
	
	if(vCond == "pnm")
	{
		vSrcNode.setColumn(0, "srchpnm"				  , frmf_getComponents("ipt_pnm").value);
	}
	else if(vCond == "pid")
	{
		vSrcNode.setColumn(0, "srchpid"				  , frmf_getComponents("ipt_pid").value);
	}
	else if(vCond == "rgstno")
	{
		vSrcNode.setColumn(0, "srchrgstno1"				  , frmf_getComponents("ipt_rgstno1").value);
		vSrcNode.setColumn(0, "srchrgstno2"				  , frmf_getComponents("ipt_rgstno2").value);
	}
	else
	{
		vSrcNode.setColumn(0, "srchhealexampid"  , ds_main_info_patinfo_item.getColumn(0, "healexampid"));
	}
	//fCheckNodeExist("/root/temp/patinfo/item", true);
	ds_temp_patinfo_item.clearData();
	
	var oParam = {};
		oParam.id          = "TRAHA00101";
		oParam.service     = "healthexamrsrvacptapp.PamMngt";
		oParam.method      = "reqGetPatInfo";
		oParam.inds        = "req="+vSrcNode.name;
		oParam.outds       = "ds_temp_patinfo_item=item";
		oParam.async       = false;
		//oParam.callback    = "cf_TRAHA00101";

	tranf_submit(oParam);
	
	if( !utlf_isNull(ds_temp_patinfo_item.getColumnInfo("rrgstno1")) ){
		ds_temp_patinfo_item.updateColID("rrgstno1", "rgstno1");
	}else{
		ds_temp_patinfo_item.addColumn("rgstno1", "string");
	}
	if( !utlf_isNull(ds_temp_patinfo_item.getColumnInfo("rrgstno2")) ){
		ds_temp_patinfo_item.updateColID("rrgstno2", "rgstno2");
	}else{
		ds_temp_patinfo_item.addColumn("rgstno2", "string");
	}
	if( !utlf_isNull(ds_temp_patinfo_item.getColumnInfo("instcd")) ){
		ds_temp_patinfo_item.updateColID("instcd", "patm_insucd");
	}else{
		ds_temp_patinfo_item.addColumn("patm_insucd", "string");
	}
	if( !utlf_isNull(ds_temp_patinfo_item.getColumnInfo("insuid")) ){
		ds_temp_patinfo_item.updateColID("insuid", "patm_insuid");
	}else{
		ds_temp_patinfo_item.addColumn("patm_insuid", "string");
	}
	if( !utlf_isNull(ds_temp_patinfo_item.getColumnInfo("insukind")) ){
		ds_temp_patinfo_item.updateColID("insukind", "patm_insukind");
	}else{
		ds_temp_patinfo_item.addColumn("patm_insukind", "string");
	}
	
	//node clear현상때문임...
	var tmpnode = ds_temp_patinfo_item.getColumn(0, "pid");
	if(!utlf_isNull(tmpnode)){
		ds_main_info_patinfo_item.copyData(ds_temp_patinfo_item);
		var detladdr2 = ds_temp_patinfo_item.getColumn(0, "detladdr2");
  
  //공단건진의 경우 발송주소가 없다면 기존 주소값을 발송주소에 넣는다 .2009-07-18 심승욱			
		if(utlf_isNull(detladdr2) &&  ds_send.getColumn(0, "srchhealexamdetlflag") == 'G01'){
			ds_main_info_patinfo_item.enableevent = false;
			ds_main_info_patinfo_item.setColumn(0, "zipcd21"   , ds_temp_patinfo_item.getColumn(0, "zipcd11"));
			ds_main_info_patinfo_item.setColumn(0, "zipcd22"   , ds_temp_patinfo_item.getColumn(0, "zipcd12"));
			ds_main_info_patinfo_item.setColumn(0, "zipcdseq2"	, ds_temp_patinfo_item.getColumn(0, "zipcdseq1"));
			ds_main_info_patinfo_item.setColumn(0, "addr2"     , ds_temp_patinfo_item.getColumn(0, "addr1"));
			ds_main_info_patinfo_item.setColumn(0, "detladdr2"	, ds_temp_patinfo_item.getColumn(0, "detladdr1"));
			ds_main_info_patinfo_item.enableevent = true;
		}
		ds_main_info_rsrvacptinfo_item.setColumn(0, "choiflag", vChoiFlag);
	}else{
		ds_main_info_rsrvacptinfo_item.setColumn(0, "choiflag", vChoiFlag);
	}
}
	
	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(){
    
	}

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

	fCheckNodeExist(vDestXPath,"", true );
	fCheckNodeExist("ds_send", "srchcond", true);
	fCheckNodeExist("ds_send", "srchpnm", true);
	fCheckNodeExist("ds_send", "srchpid", true);
	fCheckNodeExist("ds_send", "srchrgstno1", true);
	fCheckNodeExist("ds_send", "srchrgstno2", true);
	fCheckNodeExist("ds_send", "srchhealexampid", true);
	fCheckNodeExist("ds_send", "srchinstcd", true);
	
	ds_send.setColumn(0, "srchcond", vCond);
	
	if( vCond == "pnm") 
	{
		ds_send.setColumn(0, "srchpnm", vCond1);
	}
	else if( vCond == "pid") 
	{
		ds_send.setColumn(0, "srchpid", vCond1);
	}
	else if( vCond == "rgstno") 
	{
		ds_send.setColumn(0, "srchrgstno1", vCond1);
		ds_send.setColumn(0, "srchrgstno2", vCond2);
	}
	else
	{
		ds_send.setColumn(0, "srchhealexampid", vCond1);
	}
	
	
	ds_send.setColumn(0, "srchinstcd", sysf_getUserInfo("dutplceinstcd"));

	dsf_deleteDs("ds_temp_patinfo_item");
	dsf_createDs("ds_temp_patinfo_item");
	
	fCheckNodeExist("ds_temp_patinfo_item","", true);
	
	var oParam = {};
		oParam.id          = "TRAHA00101";
		oParam.service     = "healthexamrsrvacptapp.PamMngt";
		oParam.method      = "reqGetPatInfo";
		oParam.inds        = "req=ds_send";
		oParam.outds       = "ds_temp_patinfo_item=item";
		oParam.async       = false;
		oParam.callback    = "cf_TRAHA00101";

	tranf_submit(oParam);

	if(arErrorCode.pop("TRAHA00101") > -1)
	{
		ret = true;
	}
	else
	{
		ret = false;
	}
	
	if(ret == false) return false;

	var tmpnode = ds_temp_patinfo_item.getColumn(0, "pid");
	if(!utlf_isNull(tmpnode))
	{
		eval(vDestXPath).copyData(ds_temp_patinfo_item);
		return true ;
	}
	return false;
}

function cf_TRAHA00101(sSvcId, nErrorCode, sErrorMsg) 
{
	arErrorCode.push(sSvcId, nErrorCode);
    if(nErrorCode < 0) return;
}


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

	}


/**********************************************************************************
 * 함수명		: ahafGetHistList
 * 설  명		: 건진자별 건진이력조회
 * argument		: *  vPid : 등록번호
 * return Type	: 
 * 작성자		: 
**********************************************************************************/
function ahafGetHistList(vPid)
{
	ds_main_info_histlst_item.clearData();

	if(utlf_isNull(vPid)) return ;

	var vhf = "";
	
	if(utlf_isNull(ds_main_info_rsrvacptinfo_item.getColumn(0, "healexamflag")))
	{
		vhf = fGetHealExamFlag();
	} 
	else 
	{
		vhf = ds_main_info_rsrvacptinfo_item.getColumn(0, "healexamflag");
	}
	
	ds_send.setColumn(0, "srchhealexamflag", vhf);
	ds_send.setColumn(0, "srchhealexamdetlflag", frmf_getComponents("cmb_healexamdetlflag").value);
	ds_send.setColumn(0, "srchinstcd", sysf_getUserInfo("dutplceinstcd"));
	ds_send.setColumn(0, "srchpid", vPid);
	
	var oParam = {};
		oParam.id          = "TRAHA00101";
		oParam.service     = "healexamrsrvacptapp.RsrvAcpt";
		oParam.method      = "reqGetHealExamHistList";
		oParam.inds        = "req=ds_send";
		oParam.outds       = "ds_main_info_histlst_item=item";
		oParam.async       = false;
		///oParam.callback    = "cf_TRAHA00101";

	tranf_submit(oParam);
}

/**********************************************************************************
 * 함수명		: ahafGetPkgDetlList
 * 설  명		: 검진패키지 상세조회(예약/접수)
 * argument		: *  vPkgCd : 패키지 코드
 * return Type	: 
 * 작성자		: 
**********************************************************************************/
function ahafGetPkgDetlList(vPkgCd)
{
	if(utlf_isNull(vPkgCd))
	{
		sysf_messageBox("선택된 패키지가 없습니다.", "E999");
		return ;
	}
	dsf_makeValue(ds_send, "PkgCd", "string", vPkgCd);
	dsf_makeValue(ds_send, "cmpycd", "string", ds_main_info_rsrvacptinfo_item.getColumn(0, "cmpycd"));
	dsf_makeValue(ds_send, "conseq", "string", ds_main_info_rsrvacptinfo_item.getColumn(0, "conseq"));
	dsf_makeValue(ds_send, "conhistseq", "string", ds_main_info_rsrvacptinfo_item.getColumn(0, "conhistseq"));
	
	var oParam = {};
		oParam.id          = "TRAHA00113";
		oParam.service     = "healexamrsrvacptapp.RsrvAcpt";
		oParam.method      = "reqGetHealExamPkgDetlList";
		oParam.inds        = "req=ds_send";
		oParam.outds       = "ds_main_info_pkgdetl_item=item";
		oParam.async       = false;
		//oParam.callback    = "cf_TRAHA00113";

	tranf_submit(oParam);
}

	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);

	}


/**********************************************************************************
 * 함수명		: ahafGetHistList2
 * 설  명		: 건진자별 건진이력조회
 * argument		: *  vPid : 등록번호
 * return Type	: 
 * 작성자		: 
**********************************************************************************/
function ahafGetHistList2(vPid, vHealExamDetlFlag , vStatFlag)
{
	dsf_deleteDs("ds_main_info_histlst_item");
	dsf_createDs("ds_main_info_histlst_item");

	if( utlf_isNull(vPid) ) return ;

	ds_send.setColumn(0, "srchhealexamflag", String(vHealExamDetlFlag).substr(0,1));
	ds_send.setColumn(0, "srchhealexamdetlflag", vHealExamDetlFlag);
	ds_send.setColumn(0, "srchinstcd", sysf_getUserInfo("dutplceinstcd"));
	ds_send.setColumn(0, "srchpid", vPid);
	ds_send.setColumn(0, "srchstatflag", vStatFlag);

	var oParam = {};
		oParam.id          = "TRAHA00101";
		oParam.service     = "healexamrsrvacptapp.RsrvAcpt";
		oParam.method      = "reqGetHealExamHistList";
		oParam.inds        = "req=ds_send";
		oParam.outds       = "ds_main_info_histlst_item=item";
		oParam.async       = false;
		//oParam.callback    = "cf_TRAHA00101";

	tranf_submit(oParam);
}


/**********************************************************************************
 * 함수명		: fGetConAddList
 * 설  명		: 패키지 상세내역조회
 * argument		: * sPkgcd 		: 패키지코드
				  * sPkgnm		: 패키지명
				  * sSex		: 건진자 성별
				  * sCmpycd		: 단체코드
				  * iConseq		: 계약번호
				  * iConHistseq	: 계약이력번호 
 * return Type	: 
 * 작성자		: 
**********************************************************************************/
function fGetConAddList(sPkgcd, sPkgnm, sSex, sCmpycd, iConseq,iConHistseq )
{
	ds_temp_pkgtestcdlst_addlst.clearData()

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

	ds_send.setColumn(0, "srchinstcd", sysf_getUserInfo("dutplceinstcd") );
	ds_send.setColumn(0, "srchpkgcd", sPkgcd);
	
	var vhf = "";
	
	if (utlf_isNull(ds_main_info_rsrvacptinfo_item.getColumn(0, "healexamflag")))
	{
		vhf = fGetHealExamFlag();
	}
	else 
	{
		vhf = ds_main_info_rsrvacptinfo_item.getColumn(0, "healexamflag");
	}

	ds_send.setColumn(0, "srchhealexamflag", vhf);
	ds_send.setColumn(0, "srchcmpycd", sCmpycd);
	ds_send.setColumn(0, "srchconseq", iConseq);
	dsf_makeValue(ds_send, "srchconhistseq", "int", iConHistseq);
	ds_send.setColumn(0, "srchsex", sSex);
	dsf_makeValue(ds_send, "srchage", "string", ageCalc(ds_main_info_patinfo_item.getColumn(0, "rgstno1"),ds_main_info_patinfo_item.getColumn(0, "rgstno2")));
	
	var oParam = {};
		oParam.id          = "TRAHA00107";
		oParam.service     = "healexambaseapp.ComCode";
		oParam.method      = "reqGetPkgAddInfo";
		oParam.inds        = "req=ds_send";
		oParam.outds       = "ds_temp_pkgtestcdlst_addlst=addlst";
		oParam.async       = false;
		//oParam.callback    = "cf_TRAHA00107";

	tranf_submit(oParam);
	
	dsf_createDs("ds_temp2_addlst");
	ds_temp2_addlst.copyData(ds_main_info_rsrvacptinfo_addlst);
	
	var node = ds_temp_pkgtestcdlst_addlst;
	if( node.rowcount != 0)
	{
		var i = ds_main_info_rsrvacptinfo_addlst.rowcount;
		ds_main_info_rsrvacptinfo_addlst.clearData();
		
		ds_main_info_rsrvacptinfo_addlst.copyData(ds_temp_pkgtestcdlst_addlst);
		
		if(!utlf_isNull(ds_temp2_addlst.getColumn(0, "testcd")))
		{
			ds_main_info_rsrvacptinfo_addlst.copyData(ds_temp2_addlst);
		}
		var cnt = ds_temp_pkgtestcdlst_addlst.rowcount;
		
		for(var i = 0 ; i < cnt ; i++) 
		{
			ds_main_info_rsrvacptinfo_addlst.updatecontrol = false;
			ds_main_info_rsrvacptinfo_addlst.setRowType(i, "i");
			ds_main_info_rsrvacptinfo_addlst.updatecontrol = true;
		}
	}
	else
	{
		ds_main_info_rsrvacptinfo_addlst.clearData();
		if(!utlf_isNull(ds_temp2_addlst.getColumn(0, "testcd")))
		{
			ds_main_info_rsrvacptinfo_addlst.copyData(ds_temp2_addlst);
		}
	}
}


/** ==========================================================================================================
@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(  utlf_isNull(vRsrvdd) ||  utlf_isNull(vRsrvno) ) return ;

	var vhf = "";
	if (utlf_isNull(ds_main_info_rsrvacptinfo_item.getColumn(0, "healexamflag")))
	{
		vhf = fGetHealExamFlag();
	} 
	else 
	{
		vhf = ds_main_info_rsrvacptinfo_item.getColumn(0, "healexamflag");
	}

	ds_send.setColumn(0, "srchhealexamflag", vhf);
	ds_send.setColumn(0, "srchrsrvdd"			, vRsrvdd);
	ds_send.setColumn(0, "srchrsrvno"			, vRsrvno);
	ds_send.setColumn(0, "srchinstcd"			, sysf_getUserInfo("dutplceinstcd") );
	ds_send.setColumn(0, "scrnnm"					, vStatFlag == "A"&& vPid== "0" ? "internet":"" );

	ds_main_info_patinfo_item.clearData();
	ds_main_info_patinfo_item.addRow();
	ds_main_info_rsrvacptinfo_item.clearData();
	ds_main_info_rsrvacptinfo_item.addRow();
	ds_temp_info_rsrvacptinfo.clearData();
	ds_temp_info_patinfo.clearData();

	var oParam = {};
		oParam.id          = "TRAHA04033";
		oParam.service     = "healthexamrsrvacptapp.RsrvAcpt";
		oParam.method      = "reqGetRsrvAcptInfo";
		oParam.inds        = "req=ds_send";
		oParam.outds       = "ds_temp_info_patinfo=patinfo ds_temp_info_rsrvacptinfo=rsrvacptinfo ds_temp_info_addlst=addlst ds_temp_info_pkglst=pkglst ds_temp_info_judgone=judgone ds_temp_info_taginfo=taginfo ds_temp_info_cnst=cnst ds_temp_info_opmi_out=opmi_out";
		oParam.async       = false;
		oParam.callback    = "cf_TRAHA04033";

	tranf_submit(oParam);

	if( !utlf_isNull(ds_temp_info_patinfo.getColumnInfo("rgstno1")) ){
		ds_temp_info_patinfo.updateColID("rgstno1", "srchrgstno1");
	}else{
		ds_temp_info_patinfo.addColumn("srchrgstno1", "string");
	}
	if( !utlf_isNull(ds_temp_info_patinfo.getColumnInfo("rgstno2")) ){
		ds_temp_info_patinfo.updateColID("rgstno2", "srchrgstno1");
	}else{
		ds_temp_info_patinfo.addColumn("srchrgstno1", "string");
	}
	ds_temp_info_patinfo.updateColID("rrgstno1", "rgstno1");
	ds_temp_info_patinfo.updateColID("rrgstno2", "rgstno2");
	ds_temp_info_patinfo.updateColID("insucd", "patm_insucd");
	ds_temp_info_patinfo.updateColID("insuid", "patm_insuid");
	if( !utlf_isNull(ds_temp_info_patinfo.getColumnInfo("insukind")) ){
		ds_temp_info_patinfo.updateColID("insukind", "patm_insukind");
	}else{
		ds_temp_info_patinfo.addColumn("patm_insukind", "string");
	}
	if( utlf_isNull(ds_temp_info_patinfo.getColumnInfo("instcd")) ){
		ds_temp_info_patinfo.addColumn("instcd", "string");
	}
	ds_temp_info_patinfo.addColumn("srchinstcd", "string");

	ds_temp_info_patinfo.enableevent = false;
	ds_temp_info_patinfo.updatecontrol = false;
	for( var i=0 ; i<ds_temp_info_patinfo.rowcount ; i++ ){
		ds_temp_info_patinfo.setColumn(i, "srchinstcd", ds_temp_info_patinfo.getColumn(i, "instcd"));
	}
	ds_temp_info_patinfo.updatecontrol = true;
	ds_temp_info_patinfo.enableevent = true;

	if( !utlf_isNull(ds_temp_info_rsrvacptinfo.getColumnInfo("relacd")) ){
		ds_temp_info_rsrvacptinfo.updateColID("relacd", "emprelacd");
	}else{
		ds_temp_info_rsrvacptinfo.addColumn("emprelacd", "string");
	}
	ds_temp_info_rsrvacptinfo.updateColID("uncocd", "pkguncocd");

	ds_temp_info_addlst.updateColID("pkgflag", "testflag");

	for( var i=0 ; i<ds_temp_info_opmi_out.getColCount() ; i++ ){
		if( ds_temp_info_opmi_out.getColID(i) != "pid" ){
			ds_temp_info_opmi_out.updateColID(ds_temp_info_opmi_out.getColID(i), "opmi_"+ds_temp_info_opmi_out.getColID(i));
		}
	}

	if( arErrorCode.pop("TRAHA04033") < 0 ) 
	{
		return ;
	}

	var i = 0;
	var  tmpnode = ds_temp_info_rsrvacptinfo;
	if( !utlf_isNull(tmpnode) &&  ds_temp_info_rsrvacptinfo.rowcount > 0){
		ds_main_info_rsrvacptinfo_item.copyData(ds_temp_info_rsrvacptinfo);
	}

	if( utlf_isNull(ds_main_info_rsrvacptinfo_item.getColumnInfo("brthareacnts")) ){
		ds_main_info_rsrvacptinfo_item.addColumn("brthareacnts", "string");
	}
	if( utlf_isNull(ds_main_info_rsrvacptinfo_item.getColumnInfo("conhistseq")) ){
		ds_main_info_rsrvacptinfo_item.addColumn("conhistseq", "string");
	}

	ds_main_info_rsrvacptinfo_addlst.clearData();
	var nodelst = ds_temp_info_addlst;
	ds_main_info_rsrvacptinfo_addlst.copyData(ds_temp_info_addlst);
	var nodelst = ds_temp_info_judgone.rowcount;
	ds_main_info_judgone.copyData(ds_temp_info_judgone);
	
	nodelst = ds_temp_info_pkglst;
	ds_main_info_rsrvacptinfo_pkglst.clearData();
	
	ds_main_info_rsrvacptinfo_pkglst.copyData(ds_temp_info_pkglst);

	ds_send_selpkgexam.copyData(ds_main_info_rsrvacptinfo_addlst);
	var tagNode = ds_temp_info_taginfo;
	
	frmf_getComponents("btn_tag").text ="태그지급";

	if(tagNode.rowcount != 0)
	{
		ds_main_info_taginfo.copyData(ds_temp_info_taginfo);
		var suppStat = ds_main_info_taginfo.getColumn(0, "suppstat");
		if("0" ==  suppStat) 
		{
			frmf_getComponents("btn_tag").text = "태그반납";
			frmf_getComponents("ipt_tagno").enable = false;
		}
	}

	tmpnode = ds_temp_info_patinfo;
	if( tmpnode.rowcount != 0)
	{
		ds_main_info_patinfo_item.copyData(ds_temp_info_patinfo);
	}

	if(ds_main_info_rsrvacptinfo_item.getColumn(0, "disccd")!="-")
	{
		var nname = ds_main_info_rsrvacptinfo_item.getColumn(0, "disccd");
		var ncount = ds_init_baseinfo_pamcdlst_disccdlst.rowcount;

		for (var i = 0; i < ncount; i++)
		{
			if (nname == ds_init_baseinfo_pamcdlst_disccdlst.getColumn(i, "cd"))
			{
				dsf_makeValue(ds_main_info_rsrvacptinfo_item, "dcamt", "string", ds_init_baseinfo_pamcdlst_disccdlst.getColumn(i, "dcamt"));
				dsf_makeValue(ds_main_info_rsrvacptinfo_item, "adddcamt", "string", ds_init_baseinfo_pamcdlst_disccdlst.getColumn(i, "adddcamt"));
			}
		}
	 }

	tmpnode = ds_temp_info_opmi_out;
	if( tmpnode.rowcount != 0)
	{
		ds_main_info_rcptinfo.addColumn("pkgamt", "string");
		ds_main_info_rcptinfo.addColumn("addamt", "string");
		ds_main_info_rcptinfo.addColumn("subtotamt", "string");
		ds_main_info_rcptinfo.addColumn("preamt", "string");
		ds_main_info_rcptinfo.addColumn("discamt", "string");
		ds_main_info_rcptinfo.addColumn("uncoamt", "string");
		ds_main_info_rcptinfo.addColumn("realamt", "string");

		tmpnode = ds_temp_info_opmi_out.getColumnInfo("opmi_discamt");
		if (!utlf_isNull(tmpnode))
		{
			ds_main_info_rcptinfo.setColumn(0, "pkgamt", ds_temp_info_opmi_out.getColumn(0, "opmi_baseexamamt"));
			ds_main_info_rcptinfo.setColumn(0, "addamt", ds_temp_info_opmi_out.getColumn(0, "opmi_addexamamt"));
			ds_main_info_rcptinfo.setColumn(0, "subtotamt", ds_temp_info_opmi_out.getColumn(0, "opmi_totamt"));
			ds_main_info_rcptinfo.setColumn(0, "preamt", ds_temp_info_opmi_out.getColumn(0, "opmi_mdlrcptamt"));
			ds_main_info_rcptinfo.setColumn(0, "discamt", ds_temp_info_opmi_out.getColumn(0, "opmi_discamt"));
			dsf_makeValue(ds_temp, "discamt", "string", ds_temp_info_opmi_out.getColumn(0, "opmi_discamt"));
			dsf_makeValue(ds_main_info_rcptinfo, "uncoamt", "string", ds_temp_info_opmi_out.getColumn(0, "opmi_restamt"));
			dsf_makeValue(ds_main_info_rcptinfo, "realamt", "string", ds_temp_info_opmi_out.getColumn(0, "opmi_rcptamt"));
		}
		dsf_makeValue(ds_temp, "rcptCheck", "string", "true");
	}
	else
	{
		dsf_makeValue(ds_send, "cmpycd", "string", ds_main_info_rsrvacptinfo_item.getColumn(0, "cmpycd"));
		dsf_makeValue(ds_send, "conseq", "int", ds_main_info_rsrvacptinfo_item.getColumn(0, "conseq"));
		dsf_makeValue(ds_send, "conhistseq", "int", ds_main_info_rsrvacptinfo_item.getColumn(0, "conhistseq"));
		dsf_makeValue(ds_send, "sex", "string", ds_main_info_patinfo_item.getColumn(0, "sex"));
		dsf_makeValue(ds_send, "pkgcd", "string", ds_main_info_rsrvacptinfo_item.getColumn(0, "pkgcd"));
		dsf_makeValue(ds_send, "pid", "string", ds_main_info_patinfo_item.getColumn(0, "pid"));
		dsf_makeValue(ds_send, "age", "string", ageCalc(ds_main_info_patinfo_item.getColumn(0, "rgstno1"),ds_main_info_patinfo_item.getColumn(0, "rgstno2")));
		
		var oParam = {};
			oParam.id          = "TXAHA00903";
			oParam.service     = "healexamrcptapp.HealExamRcpt";
			oParam.method      = "reqExeHealExamAmtRsrvCalc";
			oParam.inds        = "req=ds_send";
			oParam.outds       = "ds_main_info_rcptinfo_rcptinfo=rcptinfo";
			oParam.async       = false;
			//oParam.callback    = "cf_TXAHA00903";

		tranf_submit(oParam);
		
		dsf_makeValue(ds_main_info_rcptinfo, "pkgamt" , "string",  ds_main_info_rcptinfo_rcptinfo.getColumn(0, "pkgamt"));
		dsf_makeValue(ds_main_info_rcptinfo, "discamt" , "string",  ds_main_info_rcptinfo_rcptinfo.getColumn(0, "discamt"));
		dsf_makeValue(ds_main_info_rcptinfo, "pkgamt" , "string",  ds_main_info_rcptinfo_rcptinfo.getColumn(0, "pkgamt"));
		dsf_makeValue(ds_main_info_rcptinfo, "discamt" , "string",  ds_main_info_rcptinfo_rcptinfo.getColumn(0, "discamt"));
		dsf_makeValue(ds_temp, "discamt" , "string",  ds_main_info_rcptinfo_rcptinfo.getColumn(0, "discamt"));
		dsf_makeValue(ds_main_info_rcptinfo, "subtotamt" , "string",  ds_main_info_rcptinfo_rcptinfo.getColumn(0, "subtotamt"));
		
		if(utlf_isNull(ds_main_info_rcptinfo.getColumn(0, "preamt"))|| ds_main_info_rcptinfo.getColumn(0, "preamt")=="0")
		{
			dsf_makeValue(ds_main_info_rcptinfo, "preamt", "string",  ds_main_info_rcptinfo_rcptinfo.getColumn(0, "cashamt"));
		}

		if(utlf_isNull(ds_main_info_rcptinfo.getColumnInfo("addamt")))
		{
			dsf_makeValue(ds_main_info_rcptinfo_rcptinfo, "addamt", "string","0");
		}

		dsf_makeValue(ds_main_info_rcptinfo, "addamt" , "string",  ds_main_info_rcptinfo_rcptinfo.getColumn(0, "addamt"));
		
		if (ds_main_info_rsrvacptinfo_item.getColumn(0, "cmpyflag")=="Y")
		{
			dsf_makeValue(ds_main_info_rsrvacptinfo_item, "pkguncocd", "string", ds_main_info_rcptinfo_rcptinfo.getColumn(0, "pkguncocd"));
		} 
		else
		{
			dsf_makeValue(ds_main_info_rsrvacptinfo, "realamt", "string", ds_main_info_rcptinfo_rcptinfo.getColumn(0, "subtotamt"));
		}
		dsf_makeValue(ds_temp, "rcptCheck" , "string", "false");
	}

	var sPid 	= ds_main_info_rsrvacptinfo_item.getColumn(0, "pid" );
	var sOrddd 	= ds_main_info_rsrvacptinfo_item.getColumn(0, "orddd" );
	var iCretno = ds_main_info_rsrvacptinfo_item.getColumn(0, "cretno" );

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

	fDcAmtCalc();
	fSetBtnStat();		 // 권한에 따른 버튼 설정
	
	if(ds_main_info_rsrvacptinfo_item.getColumn(0, "cmpyflag")=="Y")
	{
		dsf_makeValue(ds_main_info_rsrvacptinfo_item, "pkguncocd", "string","V02");
	}
}

/** ==========================================================================================================
@author 	: 손주연
@version 	: 2007-04-30
@desc 		: 예약접수 상세내역조회
@param 	:
				* vMode 	: 리스트 구분
* ==========================================================================================================*/
function ahafGetGnrlRsrvAcptDetl(vMode){
	fInitInfo();  // 오른쪽 정보들 초기화 및 기본 값 셋팅 //호출화면
	
	var vXpath = "";
	var idx = -1;
	switch (vMode) {
		case 1:
			vXpath = "ds_main_list_rsrvlst";
			idx = ds_main_list_rsrvlst.rowposition;
			break;
		case 2:
			vXpath = "ds_main_list_rsrvlst";
			idx = ds_main_list_rsrvlst.rowposition;
			break;
		case 3:
			vXpath = "ds_main_list_acptlst";
			idx = ds_main_list_acptlst.rowposition;
			break;
		case 4:
			vXpath = "ds_main_list_cncllst";
			idx = ds_main_list_cncllst.rowposition
			break;
		case 5: //일반건진 2차대상자 리스트
			vXpath = "ds_main_list_sndlst";
			idx = ds_main_list_sndlst.rowposition
			break;
		case 6 : //건진이력
			vXpath = "ds_main_info_histlst_item";
			idx = ds_main_info_histlst_item.rowposition;
			break;
		default:
			sysf_messageBox("인자가 잘못되었습니다", "E999");
			return ;
			break;
	}

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

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

	ahafGetGnrlRsrvAcpDetltInfo(vRsrvdd, vRsrvno , vStatFlag , vPid);// 바로 아래 함수
	ds_send_selpkgexam.clear();
	
	for(var i = 0; i < ds_main_info_rsrvacptinfo_addlst.rowcount; i++)
	{
		ds_send_selpkgexam.copyRow(ds_send_selpkgexam.addRow(), ds_main_info_rsrvacptinfo_addlst, i);
		if(utlf_isNull(ds_send_selpkgexam.getColumn(i, "uncocd")))
		{
			 setAmt(i);	//호출화면
		}
	}
}

/*-**************************************************************************************
 * Argument			: vRsrvdd 	: 예약등록일자
 *					: vRsrvno 	: 예약번호
 * Description		: 예약/접수 상세내역 조회
 ****************************************************************************************/
function ahafGetGnrlRsrvAcpDetltInfo(vRsrvdd, vRsrvno , vStatFlag , vPid) {
	if(utlf_isNull(vRsrvdd) || utlf_isNull(vRsrvno)) return ;
	if(utlf_isNull(this.objects["ds_send"])) dsf_createDs("ds_send");
	
	var vhf = "";
	if (utlf_isNull(ds_main_info_rsrvacptinfo_item.getColumn(0, "healexamflag")))
	{
		vhf = fGetHealExamFlag();
	} else {
		vhf = ds_main_info_rsrvacptinfo_item.getColumn(0, "healexamflag");
	}

	dsf_makeValue(ds_send, "srchhealexamflag", vhf);
	dsf_makeValue(ds_send, "srchrsrvdd", vRsrvdd);
	dsf_makeValue(ds_send, "srchrsrvno", vRsrvno);
	dsf_makeValue(ds_send, "srchinstcd", sysf_getUserInfo("dutplceinstcd"));
	dsf_makeValue(ds_send, "scrnnm", (vStatFlag == "A" && vPid == "0") ? "internet" : "");

	dsf_createDs("ds_main_info_patinfo_item");
	dsf_createDs("ds_main_info_rsrvacptinfo_item");
	dsf_createDs("ds_temp_info_rsrvacptinfo");
	dsf_createDs("ds_temp_info_patinfo");
	dsf_createDs("ds_temp_info_addlst");
	dsf_createDs("ds_temp_info_judgone");
	dsf_createDs("ds_temp_info_taginfo");
	dsf_createDs("ds_temp_info_cnst");
	dsf_createDs("ds_temp_info_opmi_out");

	//TRAHA04012 -> 접수정보/ 메모/ 최근 건진 내역/ 개인정보(접수정보랑 겹치지 않나 생각됨)// 검사코드 리스트// 추가검사내역? // 태그 넘버// 수납 내역
	// 상태 값을 넘겨서 조회를 해야할것와 하지 않아도 될것을 구분하면 좋을꺼 같음.
	var oParam = {};
		oParam.id          = "TRAHA04033";
		oParam.service     = "healthexamrsrvacptapp.RsrvAcpt";
		oParam.method      = "reqGetRsrvAcptInfo";
		oParam.inds        = "req=ds_send";
		oParam.outds       = "ds_temp_info_patinfo=patinfo ds_temp_info_rsrvacptinfo=rsrvacptinfo ds_temp_info_addlst=addlst ds_temp_info_pkglst=pkglst "
							+"ds_temp_info_judgone=judgone ds_temp_info_taginfo=taginfo ds_temp_info_cnst=cnst ds_temp_info_opmi_out=opmi_out";
		oParam.async       = false;
		oParam.callback    = "cf_TRAHA04033";

	tranf_submit(oParam);
	
	if( arErrorCode.pop("TRAHA04033") < 0 ) {
		return ;
	}

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

	// 건진정보
	var tmpnode = ds_temp_info_rsrvacptinfo;
	if( tmpnode.rowcount > 0 ){
		ds_main_info_rsrvacptinfo_item.copyData(ds_temp_info_rsrvacptinfo);
	}

	//추가검사내역
	dsf_createDs("ds_main_info_rsrvacptinfo_addlst");
	var nodelst = ds_temp_info_addlst;
	if( nodelst.rowcount > 0 ){
		dsf_copyDs(ds_main_info_rsrvacptinfo_addlst, ds_temp_info_addlst, "after");
	}

	//1차판정내역
	dsf_createDs("ds_main_info_judgone");
	ds_main_info_judgone.copyData(ds_temp_info_judgone);

	//추가패키지내역
	nodelst = ds_temp_info_pkglst;
	dsf_createDs("ds_main_info_rsrvacptinfo_pkglst");
	if( nodelst.rowcount > 0 ){
		dsf_copyDs(ds_main_info_rsrvacptinfo_pkglst, nodelst, "after");
	}

	ds_send_selpkgexam.copyData(ds_main_info_rsrvacptinfo_addlst); //일반검진 추가검사
	// 태그정보
	var tagNode = ds_temp_info_taginfo;
	btn_tag.text = "태그지급";
	if(tagNode.rowcount > 0) {
		ds_main_info_taginfo.copyData(ds_temp_info_taginfo);
		var suppStat = ds_main_info_taginfo.getColumn(0, "suppstat");
		if("0" ==  suppStat) {
			btn_tag.text = "태그반납";
			ipt_tagno.enable = false;
		}
	}
	
	// 결과상담 예약리스트
	ds_main_info_rsltcnstinfo_choicnst.cleareData(); ds_main_info_rsltcnstinfo_choicnst.addRow(); dsf_setDefaultVal(ds_main_info_rsltcnstinfo_choicnst, "all");
	ds_main_info_rsltcnstinfo_cnstlst_cnst.copyData(ds_temp_info_cnst);
	ds_main_info_rsltcnstinfo_choicnst.setColumn(0, "outexamyn", "N");

	//환자정보
	tmpnode = ds_temp_info_patinfo;
	if( tmpnode.rowcount > 0 ){
		ds_main_info_patinfo_item.copyData(ds_temp_info_patinfo);
	}
	
	//할인액 정보
	if(ds_main_info_rsrvacptinfo_item.getColumn(0, "disccd") != "-"){
		var nname = ds_main_info_rsrvacptinfo_item.getColumn(0, "disccd");
		var ncount = ds_init_baseinfo_pamcdlst_disccdlst.rowcount;

		for (var i = 0; i < ncount; i++){
			if (nname == ds_init_baseinfo_pamcdlst_disccdlst.getColumn(i, "cd")) {
				dsf_makeValue( ds_main_info_rsrvacptinfo_item, "dcamt", "string", ds_init_baseinfo_pamcdlst_disccdlst.getColumn(i, "dcamt"));
				dsf_makeValue( ds_main_info_rsrvacptinfo_item, "adddcamt", "string", ds_init_baseinfo_pamcdlst_disccdlst.getColumn(i, "adddcamt"));
			}
		}
	}

	//수납정보
	tmpnode = ds_temp_info_opmi_out;
	if( tmpnode.rowcount > 0 ){
		//ds_main_info_rcptinfo.addColumn(
		ds_main_info_rcptinfo.addColumn( "pkgamt", "string");
		ds_main_info_rcptinfo.addColumn( "addamt", "string");
		ds_main_info_rcptinfo.addColumn( "subtotamt", "string");
		ds_main_info_rcptinfo.addColumn( "preamt", "string");
		ds_main_info_rcptinfo.addColumn( "discamt", "string");
		ds_main_info_rcptinfo.addColumn( "uncoamt", "string");
		ds_main_info_rcptinfo.addColumn( "realamt", "string");

		tmpnode = ds_temp_info_opmi_out.getColumn(0, "opmi_discamt");
		if (!utlf_isNull(tmpnode)){
			ds_main_info_rcptinfo.setColumn( 0, "pkgamt"		, ds_temp_info_opmi_out.getColumn(0, "opmi_baseexamamt"));
			ds_main_info_rcptinfo.setColumn( 0, "addamt"		, ds_temp_info_opmi_out.getColumn(0, "opmi_addexamamt"));
			ds_main_info_rcptinfo.setColumn( 0, "subtotamt"		, ds_temp_info_opmi_out.getColumn(0, "opmi_totamt"));
			ds_main_info_rcptinfo.setColumn( 0, "preamt"		, ds_temp_info_opmi_out.getColumn(0, "opmi_mdlrcptamt"));
			ds_main_info_rcptinfo.setColumn( 0, "discamt"		, ds_temp_info_opmi_out.getColumn(0, "opmi_discamt"));
			dsf_makeValue( ds_temp, "discamt", "string",  ds_temp_info_opmi_out.getColumn(0, "opmi_discamt"));
			dsf_makeValue( ds_main_info_rcptinfo, "uncoamt", "string",  ds_temp_info_opmi_out.getColumn(0, "opmi_restamt"));
			dsf_makeValue( ds_main_info_rcptinfo, "realamt", "string",  ds_temp_info_opmi_out.getColumn(0, "opmi_rcptamt"));
		}
		dsf_makeValue( ds_temp, "rcptCheck", "string", "true");			//수납된 내역 체크
	} else{
		dsf_makeValue( ds_send, "srchcmpycd", "string", 			ds_main_info_rsrvacptinfo_item.getColumn(0, "cmpycd"));
		dsf_makeValue( ds_send, "srchconseq", "string", 			ds_main_info_rsrvacptinfo_item.getColumn(0, "conseq"));
		dsf_makeValue( ds_send, "srchconhistseq", "string", 		ds_main_info_rsrvacptinfo_item.getColumn(0, "conhistseq"));
		dsf_makeValue( ds_send, "srchsex", "string", 				ds_main_info_patinfo_item.getColumn(0, "sex"));
		dsf_makeValue( ds_send, "srchpkgcd", "string", 				ds_main_info_rsrvacptinfo_item.getColumn(0, "pkgcd"));
		dsf_makeValue( ds_send, "srchpid", "string", 				ds_main_info_patinfo_item.getColumn(0, "pid"));
		dsf_makeValue( ds_send, "srchage", "string", 				ageCalc(ds_main_info_patinfo_item.getColumn(0, "rgstno1"),ds_main_info_patinfo_item.getColumn(0, "rgstno2")));

		//선수금(RCPTFLAG - P, R / 패키지 금액(할인 포함)/ 수납 내역 조회
		dsf_createDs("ds_req");
		ds_req.copyData(ds_send);
		for(var j = 0 ; j < ds_req.colcount ; j++) {
			ds_req.updateColID(ds_req.getColID(j), ds_req.getColID(j).replace("srch",""));
		}
		dsf_createDs("ds_main_info_rcptinfo_rcptinfo");
		var oParam = {};
			oParam.id          = "TXAHA00903";
			oParam.service     = "healexamrcptapp.HealExamRcpt";
			oParam.method      = "reqExeHealExamAmtRsrvCalc";
			oParam.inds        = "req=ds_req";
			oParam.outds       = "ds_main_info_rcptinfo_rcptinfo=rcptinfo";
			oParam.async       = false;
			//oParam.callback    = "cf_TXAHA00903";

		tranf_submit(oParam);

		dsf_makeValue( ds_main_info_rcptinfo, "pkgamt", "string", 			 			ds_main_info_rcptinfo_rcptinfo.getColumn(0, "pkgamt"));
		dsf_makeValue( ds_main_info_rcptinfo, "discamt", "string",  					ds_main_info_rcptinfo_rcptinfo.getColumn(0, "discamt"));
		dsf_makeValue( ds_temp, "discamt", "string",									ds_main_info_rcptinfo_rcptinfo.getColumn(0, "discamt"));
		dsf_makeValue( ds_main_info_rcptinfo, "subtotamt", "string",  					ds_main_info_rcptinfo_rcptinfo.getColumn(0, "subtotamt"));

		if(utlf_isNull(ds_main_info_rcptinfo.getColumn(0, "preamt")) || ds_main_info_rcptinfo.getColumn(0, "preamt")=="0"){
			dsf_makeValue( ds_main_info_rcptinfo, "preamt", "string",  						ds_main_info_rcptinfo_rcptinfo.getColumn(0, "cashamt"));
		}

		if(utlf_isNull(ds_main_info_rcptinfo.getColumn(0, "addamt")))
			dsf_makeValue( ds_main_info_rcptinfo_rcptinfo, "addamt", "string", "0");

		dsf_makeValue( ds_main_info_rcptinfo, "addamt", "string",  						ds_main_info_rcptinfo_rcptinfo.getColumn(0, "addamt"));
		if (ds_main_info_rsrvacptinfo_item.getColumn(0, "cmpyflag")=="Y"){
			dsf_makeValue( ds_main_info_rsrvacptinfo_item, "pkguncocd", "string",  ds_main_info_rcptinfo_rcptinfo.getColumn(0, "pkguncocd"));
		} else{
			dsf_makeValue( ds_main_info_rcptinfo, "realamt", "string", 		ds_main_info_rcptinfo_rcptinfo.getColumn(0, "subtotamt"));
		}
		dsf_makeValue( ds_temp, "rcptCheck", "string", "false");			//수납된 내역 체크
	}

	//화면상단정보 설정
	var sPid 	= ds_main_info_rsrvacptinfo_item.getColumn(0, "pid");
	var sOrddd 	= ds_main_info_rsrvacptinfo_item.getColumn(0, "orddd");
	var iCretno = ds_main_info_rsrvacptinfo_item.getColumn(0, "cretno");

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

	fDcAmtCalc();
	fSetBtnStat();		 // 권한에 따른 버튼 설정
	
	if(ds_main_info_rsrvacptinfo_item.getColumn(0, "cmpyflag") == "Y"){
		dsf_makeValue( ds_main_info_rsrvacptinfo_item, "pkguncocd", "string", "V02");
	}
}

function cf_TRAHA04033(sSvcId, nErrorCode, sErrorMsg) {
    arErrorCode.push(sSvcId, nErrorCode);
    ds_temp_info_patinfo.updateColID("rgstno2", "srchrgstno1");
    ds_temp_info_patinfo.deleteColumn("rgstno1");
    ds_temp_info_patinfo.updateColID("rrgstno1", "rgstno1");
    ds_temp_info_patinfo.updateColID("rrgstno2", "rgstno2");
    ds_temp_info_patinfo.updateColID("insucd", "patm_insucd");
    ds_temp_info_patinfo.updateColID("insuid", "patm_insuid");
    ds_temp_info_patinfo.updateColID("insukind", "patm_insukind");
    fMakeCopyColumn(ds_temp_info_patinfo,"instcd","srchinstcd");
    
    ds_temp_info_rsrvacptinfo.updateColID("relacd", "emprelacd");
    ds_temp_info_rsrvacptinfo.updateColID("uncocd", "pkguncocd");

	for( var i = 0 ; i < ds_temp_info_opmi_out.colcount ; i++ ) {
		if(ds_temp_info_opmi_out.getColID(i) == "pid") continue;
		ds_temp_info_opmi_out.updateColID(ds_temp_info_opmi_out.getColID(i), "opmi_"+ds_temp_info_opmi_out.getColID(i));
	}
}

/****************************************************************************************
 * Argument			: objDs 	- Dataset ID
 *					: sColSrc	- 원본 컬럼
 *					: sColTgt	- 생성할 컬럼
 * Description		: 데이터셋 특정컬럼 카피하여 새컬럼 생성
 ****************************************************************************************/
function fMakeCopyColumn(objDs,sColSrc,sColTgt) {
	if(utlf_isNull(objDs.getColumnInfo(sColTgt))) objDs.addColumn(sColTgt,"string");
	for(var i = 0 ; i < objDs.rowcount ; i++) {
		objDs.setColumn(i,sColTgt,objDs.getColumn(i,sColSrc));
	}
}

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

	var vhf = "";
	if (utlf_isNull(ds_main_info_rsrvacptinfo_item.getColumn(0, "healexamflag"))) {
		vhf = fGetHealExamFlag();
	} else {
		vhf = ds_main_info_rsrvacptinfo_item.getColumn(0, "healexamflag");
	}

	dsf_makeValue(ds_send, "srchhealexamflag"		,"string", vhf);
	dsf_makeValue(ds_send, "srchhealexamdetlflag"	,"string", vHealExamDetlFg);
	dsf_makeValue(ds_send, "srchhealexampid"		,"string", vPid);
	dsf_makeValue(ds_send, "srchinstcd"				,"string", sysf_getUserInfo("dutplceinstcd") );
	dsf_makeValue(ds_send, "srchrsrvdd"			  	,"string", "" );
	dsf_makeValue(ds_send, "srchrsrvno"			  	,"string", "" );

	//해당 건진자의 년도 건진예약 내역 존재유무
	dsf_createDs("ds_temp_rsrvacptkey_item");
	dsf_createDs("ds_temp_rsrvacptkey_item1");
	var oParam = {};
		oParam.id          = "TRAHA00111";
		oParam.service     = "healexamrsrvacptapp.RsrvAcpt";
		oParam.method      = "reqGetRsrvAcptKeyWithPid";
		oParam.inds        = "req=ds_send";
		oParam.outds       = "ds_temp_rsrvacptkey_item=item ds_temp_rsrvacptkey_item1=item1";
		oParam.async       = false;
		oParam.callback    = "cf_TRAHA00111";

	tranf_submit(oParam);
	
	if( arErrorCode.pop("TRAHA00111") < 0 ) {
		if (!utlf_isNull(ds_temp_rsrvacptkey_item1.getColumn(0, "linfo")))
		{
			var linfo = ds_temp_rsrvacptkey_item1.getColumn(0, "linfo");
			var temp = new Date().getYear();

			ds_main_info_rsrvacptinfo_item.setColumn(0, "latestpkginfo", ds_temp_rsrvacptkey_item1.getColumn(0, "linfo"));

			var chklatestpkginfo = ds_main_info_rsrvacptinfo_item.getColumn(0, "latestpkginfo");

			if (temp - parseInt(chklatestpkginfo.substr(0,4)) <=1)
			{
				if(ds_main_info_rsrvacptinfo_item.getColumn(0, "healexamdetlflag") != "G02"){
					var rtn = sysf_messageBox("연속건진 할인을 사용   ", "S001") ;
					//6.예   7. 아니오  2.취소
					//6예이면 연속건진 할인을 사용하므로 할인계정에 셋팅
					if(rtn == 6){ 
						var objCmb = frmf_getComponents("cmb_disccd", this);
						if(!utlf_isNull(objCmb)) objCmb.value = "F71";
					}//if end
				}
			}
		}
		return ;
	}

	if (!utlf_isNull(ds_temp_rsrvacptkey_item1.getColumn(0, "linfo"))) {
		var linfo = ds_temp_rsrvacptkey_item1.getColumn(0, "linfo");
		var temp = new Date().getYear();

		ds_main_info_rsrvacptinfo_item.setColumn(0, "latestpkginfo", ds_temp_rsrvacptkey_item1.getColumn(0, "linfo"));
		var chklatestpkginfo = ds_main_info_rsrvacptinfo_item.getColumn(0, "latestpkginfo");

		if 	(temp - parseInt(String(chklatestpkginfo).substr(0,4)) <= 1)
		{
			if(ds_main_info_rsrvacptinfo_item.getColumn(0, "healexamdetlflag") != "G02"){
				var rtn = sysf_messageBox("연속건진 할인을 사용   ", "S001") ;
				//6.예   7. 아니오  2.취소
				//6예이면 연속건진 할인을 사용하므로 할인계정에 셋팅
				if(rtn == 6){
					var objCmb = frmf_getComponents("cmb_disccd", this);
					if(!utlf_isNull(objCmb)) objCmb.value = "F71";
				}//if end
			}
		}
	}

//	setPkgInfo();

	var  tmpnode = ds_temp_rsrvacptkey_item.getColumn(0, "rsrvdd");
	if( utlf_isNull(tmpnode) ) {
		fSetBtnStat();
		return ;
	}
	// *Q005=조회 하시겠습니까?
	if( sysf_messageBox("당해년도의 예약내역이 존재합니다.  ", "Q005") != 6 ){
		fSetBtnStat();
		return ;
	}else{
	}

	ds_send.setColumn(0, "srchrsrvdd", ds_temp_rsrvacptkey_item.getColumn(0, "rsrvdd"));
	ds_send.setColumn(0, "srchrsrvno", ds_temp_rsrvacptkey_item.getColumn(0, "rsrvno"));

	if(utlf_isNull(this.objects["ds_main_info_rsrvacptinfo_item"])) dsf_createDs("ds_main_info_rsrvacptinfo_item");
	else {
		ds_main_info_rsrvacptinfo_item.clearData();
	}
	dsf_createDs("ds_main_info_rsrvacptinfo_addlst");
	dsf_createDs("ds_main_info_rsrvacptinfo_pkglst");
	
	dsf_createDs("ds_temp_info_rsrvacptinfo");
	dsf_createDs("ds_temp_info_patinfo");
	dsf_createDs("ds_temp_info_addlst");
	dsf_createDs("ds_temp_info_judgone");
	dsf_createDs("ds_temp_info_taginfo");
	dsf_createDs("ds_temp_info_cnst");
	dsf_createDs("ds_temp_info_opmi_out");
	
	var oParam = {};
		oParam.id          = "TRAHA04012";
		oParam.service     = "healthexamrsrvacptapp.RsrvAcpt";
		oParam.method      = "reqGetRsrvAcptInfo";
		oParam.inds        = "req=ds_send";
		oParam.outds       = "ds_temp_info_patinfo=patinfo ds_temp_info_rsrvacptinfo=rsrvacptinfo ds_temp_info_addlst=addlst ds_temp_info_pkglst=pkglst "
							+"ds_temp_info_judgone=judgone ds_temp_info_taginfo=taginfo ds_temp_info_cnst=cnst ds_temp_info_opmi_out=opmi_out";
		oParam.async       = false;
		oParam.callback    = "cf_TRAHA04012";

	tranf_submit(oParam);
	
	if( arErrorCode.pop("TRAHA00102") < 0 ) {
		return ;
	}

	var i = 0;
	//node clear현상때문임..
	if( ds_temp_info_rsrvacptinfo.rowcount > 0 ){
		ds_main_info_rsrvacptinfo_item.copyRow(ds_main_info_rsrvacptinfo_item.addRow(), ds_temp_info_rsrvacptinfo, 0);
	}

	if( ds_temp_info_addlst.rowcount > 0 ){
		dsf_copyDs(ds_main_info_rsrvacptinfo_addlst, ds_temp_info_addlst, "after");
	}

	if( ds_temp_info_pkglst.rowcount > 0 ){
		dsf_copyDs(ds_main_info_rsrvacptinfo_pkglst, ds_temp_info_pkglst, "after");
	}
//trace("222+"+ds_main_info_rsrvacptinfo_item.saveXML());	
	//화면상단정보 설정
	var sOrdDD 	= ds_main_info_rsrvacptinfo_item.getColumn(0, "orddd");
	var iCretno = ds_main_info_rsrvacptinfo_item.getColumn(0, "cretno");
	var sPid 	= ds_main_info_rsrvacptinfo_item.getColumn(0, "pid");

	//외래등록내역이 있어야 조회 됨...
	if( !utlf_isNull(sOrdDD) &&
		!utlf_isNull(sPid) &&
		!utlf_isNull(iCretno) &&
		iCretno != "0"
	) {
		ahafSetScreenTopPatInfo( sPid , sOrdDD , iCretno );
	}
	fSetBtnStat();
}
function cf_TRAHA00111(sSvcId, nErrorCode, sErrorMsg) {
    arErrorCode.push(sSvcId, nErrorCode);
}
function cf_TRAHA04012(sSvcId, nErrorCode, sErrorMsg) {
    arErrorCode.push(sSvcId, nErrorCode);
    ds_temp_info_patinfo.updateColID("rgstno2", "srchrgstno1");
    ds_temp_info_patinfo.deleteColumn("rgstno1");
    ds_temp_info_patinfo.updateColID("rrgstno1", "rgstno1");
    ds_temp_info_patinfo.updateColID("rrgstno2", "rgstno2");
    ds_temp_info_patinfo.updateColID("insucd", "patm_insucd");
    ds_temp_info_patinfo.updateColID("insuid", "patm_insuid");
    ds_temp_info_patinfo.updateColID("insukind", "patm_insukind");
    fMakeCopyColumn(ds_temp_info_patinfo,"instcd","srchinstcd");
    
    ds_temp_info_rsrvacptinfo.updateColID("relacd", "emprelacd");
    ds_temp_info_rsrvacptinfo.updateColID("uncocd", "pkguncocd");
    
    ds_temp_info_addlst.updateColID("pkgflag", "testflag");
    dsf_setFixVal(ds_temp_info_addlst, "m:u");

	for( var i = 0 ; i < ds_temp_info_opmi_out.colcount ; i++ ) {
		if(ds_temp_info_opmi_out.getColID(i) == "pid") continue;
		ds_temp_info_opmi_out.updateColID(ds_temp_info_opmi_out.getColID(i), "opmi_"+ds_temp_info_opmi_out.getColID(i));
	}
}


/** ==========================================================================================================
@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) {
		ds_temp_address.clearData();
		ds_temp_address.addRow();

		var objParam = zbcfOpenZipCodeList(vSrchCond
										, vSrchCondNm
										, ds_temp_address.getColumn(0, "zipcd1")
										, ds_temp_address.getColumn(0, "zipcd2")
										, ds_temp_address.getColumn(0, "zipcdseq")
										, ds_temp_address.getColumn(0, "addr")
										, "hangul"
										, ds_temp_address.getColumn(0, "detladdr")
										, ds_temp_address.getColumn(0, "builno"));											
		
		ds_temp_address.setColumn(0, "zipcd1", objParam.zipcdhead);
		ds_temp_address.setColumn(0, "zipcd2", objParam.zipcdfoot);
		ds_temp_address.setColumn(0, "zipcdseq", objParam.seqno);
		ds_temp_address.setColumn(0, "addr", objParam.address);
		ds_temp_address.setColumn(0, "builno", objParam.builno);
		
		var node = ds_temp_address.getColumn(0, "zipcd1");
		if( !utlf_isNull(node) ){
			vDestXPath.enableevent = false;
			vDestXPath.setColumn(0, "zipcd" 		+ vCond + "1" 	,  ds_temp_address.getColumn(0, "zipcd1"));
			vDestXPath.setColumn(0, "zipcd" 		+ vCond + "2" 	,  ds_temp_address.getColumn(0, "zipcd2"));
			vDestXPath.setColumn(0, "zipcdseq" 	+ vCond  		,  ds_temp_address.getColumn(0, "zipcdseq"));
			vDestXPath.setColumn(0, "addr" 		+ vCond       	,  ds_temp_address.getColumn(0, "addr"));
			vDestXPath.setColumn(0, "detladdr" 	+ vCond       	,  ds_temp_address.getColumn(0, "detladdr"));
			vDestXPath.setColumn(0, "builno" 	    + vCond      	,  ds_temp_address.getColumn(0, "builno"));				
			vDestXPath.enableevent = true;
			if( vCond == "1" ) vCond = "";
			
			if( !utlf_isNull(this.components["grp_addr2.ipt_detladdr" + vCond]) )
			eval("grp_addr2.ipt_detladdr" + vCond).setFocus();
		}

		return "ds_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, vidx){


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

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

		frmf_setParameter ("SPAHA00200_PARAM15"	, vforgneryn);
		
		if( utlf_isNull(vidx) ){
			frmf_setParameter ("SPAHA00200_PARAM16"	, "0");
		}else{
			frmf_setParameter ("SPAHA00200_PARAM16"	, vidx);
		}
		
		frmf_modal("SPAHA00200","SPAHA00200",null,"","","","","","","","","","M");
	}

/**==================================================================================================================
@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( ds_temp.getColumn(0, "okflag")  != "ok" ) return ;

	if( utlf_isNull(vGrdObj)) return ;
	if( utlf_isNull(vSrcXPath) ) return ;
	
	var vDataset = this.objects[vGrdObj.binddataset];
	var cnt = eval(vSrcXPath).rowcount;
	var vTestcd = "";
	var vTestnm = "";
	if( vPkgYN == "Y" )
	{
		for(var i = 0; i < cnt ; i++ )
		{
			vTestcd = eval(vSrcXPath).getColumn(i, "pkgcd" );
			vTestnm = eval(vSrcXPath).getColumn(i, "pkgnm" );
			if( vDupCheck == "Y" ) 
			{
				if( fCheckDup(vGrdObj , vTestCdCol, vTestcd ) == false )
				{
					if( sysf_messageBox("중복되는 Pkg코드[" + vTestcd + " - " + vTestnm  +"] 를 추가 ", "S001") != 6 )
					{
						continue ;
					}
				}
			}
			var danga = eval(vSrcXPath).getColumn(i, "scoreamt" );

			if(ds_main_info_rsrvacptinfo_item.getColumn(0, "cmpyflag") == "Y") 
			{
				danga = parseInt(parseFloat(danga)* 0.1)*10;
			}
			else 
			{
				danga = danga;
			}

			var grdcnt  = vDataset.addRow();
			vDataset.enableevent = false;
			dsf_makeValue(vDataset, "sel", "string", "Y", grdcnt);
			dsf_makeValue(vDataset, "pkgcd", "string", vTestcd, grdcnt);
			dsf_makeValue(vDataset, "pkgnm", "string", vTestnm, grdcnt);
			dsf_makeValue(vDataset, "uncocd", "string", "V03", grdcnt);
			dsf_makeValue(vDataset, "scoreamt", "string", danga, grdcnt);
			dsf_makeValue(vDataset, "addtotamt", "string", danga, grdcnt);
			dsf_makeValue(vDataset, "calcscorcd", "string", eval(vSrcXPath).getColumn(i, "calcscorcd"), grdcnt);
			dsf_makeValue(vDataset, "testdiscyn", "string", eval(vSrcXPath).getColumn(i, "testdiscyn"), grdcnt);
			
			if( !utlf_isNull(vDataset.getColumnInfo("colEdit1")) ){
				vDataset.setColumn(grdcnt, "colEdit1", "checkbox");
			}
			if( !utlf_isNull(vDataset.getColumnInfo("colEdit2")) ){
				vDataset.setColumn(grdcnt, "colEdit2", "none");
			}
			
			vDataset.enableevent = true;
		}
	}
	else 
	{
		for(var i = 0; i < cnt ; i++ )
		{
			vTestcd = eval(vSrcXPath).getColumn(i, "testcd" );
			vTestnm = eval(vSrcXPath).getColumn(i, "testnm" );
			
			if( vDupCheck == "Y" ) 
			{
				if( fCheckDup(vGrdObj , vTestCdCol, vTestcd ) == false )
				{
					if( sysf_messageBox("중복되는 검사코드[" + vTestcd + " - " + vTestnm  +"] 를 추가 ", "S001") != 6 )
					{
						continue ;
					}
				}
			}

			var danga = eval(vSrcXPath).getColumn(i, "scoreamt" );

			if(ds_main_info_rsrvacptinfo_item.getColumn(0, "cmpyflag") == "Y") 
			{
				danga = parseInt(parseFloat(danga)* 0.1)*10;
			}
			else 
			{
				danga = danga;
			}

			var grdcnt  = vDataset.addRow();
			vDataset.enableevent = false;
			dsf_makeValue(vDataset, "sel", "string", "Y", grdcnt);
			dsf_makeValue(vDataset, "testflag", "string", "A", grdcnt);
			dsf_makeValue(vDataset, "testcd", "string", vTestcd, grdcnt);
			dsf_makeValue(vDataset, "testnm", "string", vTestnm, grdcnt);
			dsf_makeValue(vDataset, "uncocd", "string", "V01", grdcnt);
			dsf_makeValue(vDataset, "scoreamt", "string", danga, grdcnt);
			dsf_makeValue(vDataset, "addtotamt", "string", danga, grdcnt);
			dsf_makeValue(vDataset, "calcscorcd", "string", eval(vSrcXPath).getColumn(i, "calcscorcd"), grdcnt);
			dsf_makeValue(vDataset, "prcptims", "string", "1", grdcnt);
			dsf_makeValue(vDataset, "prcpdayno", "string", "1", grdcnt);
			dsf_makeValue(vDataset, "testdiscyn", "string", eval(vSrcXPath).getColumn(i, "testdiscyn"), grdcnt);
			dsf_makeValue(vDataset, "payownbamt", "string", danga, grdcnt);
			dsf_makeValue(vDataset, "grupflag", "string", eval(vSrcXPath).getColumn(i, "grupflag"), grdcnt);
			
			if( !utlf_isNull(vDataset.getColumnInfo("colEdit1")) ){
				vDataset.setColumn(grdcnt, "colEdit1", "checkbox");
			}
			if( !utlf_isNull(vDataset.getColumnInfo("colEdit2")) ){
				vDataset.setColumn(grdcnt, "colEdit2", "none");
			}
			
			vDataset.enableevent = true;
		}
	}

	dsf_deleteDs("ds_send_test");
	dsf_createDs("ds_send_test");
	
	if(vDataset.rowcount >= 2)
	{
		for(var i = 0; i < vDataset.rowcount; i++)
		{
			dsf_makeValue(ds_send_test, "pkgcd", "string", vDataset.getColumn(i, "testcd"), i);
			dsf_makeValue(ds_send_test, "grupflag", "string", vDataset.getColumn(i, "grupflag"), i);
		}

		if(!utlf_isNull(vPkgCd)) { dsf_makeValue(ds_send_test, "srchpkgcd","string",	vPkgCd);}
		if(!utlf_isNull(vPkgCd)) { dsf_makeValue(ds_send_test, "healexamflag","string",	fGetHealExamFlag());}
		
		var oParam = {};
			oParam.id          = "TRAHA00013";
			oParam.service     = "healexamrsrvacptapp.RsrvAcpt";
			oParam.method      = "reqTestDuplex";
			oParam.inds        = "req=ds_send_test";
			oParam.outds       = "ds_tmp_testcount_testcount=testcount";
			oParam.async       = false;
			//oParam.callback    = "cf_TRAHA00013";

		tranf_submit(oParam);
	}
	var testnm ="";
	var testnmcount ="";
	var cnt = ds_tmp_testcount_testcount.rowcount;
	if (cnt != 0)
	{
		for (var i = 0; i < cnt ; i++)
		{
			testnm = ds_tmp_testcount_testcount.getColumn(i, "testnm");
			if (!utlf_isNull(testnm))
			{
				testnmcount = testnmcount + testnm + "/";
			}

		}

		sysf_messageBox(testnmcount + " 검사가 중복되었습니다","E999");
	}
}


/**==================================================================================================================
@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 )
{
	var cnt = this.objects[vGrdObj.binddataset].rowcount;
	var vDataSet = this.objects[vGrdObj.binddataset]
	
	for( var i = 0; i < cnt ; i++) 
	{
		if( vDataSet.getColumn(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(ds_main_info_rsrvacptinfo_item.getColumn(0, "discamt")!=""){
			iDiscAmt = parseInt(ds_main_info_rsrvacptinfo_item.getColumn(0, "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()
								, ds_main_info_rsrvacptinfo_item.getColumn(0, "rsrvdd")
								, ds_main_info_rsrvacptinfo_item.getColumn(0, "rsrvno")
								, model.getValue("/root/main/info/patinfo/item/pid")
								, ds_main_info_rsrvacptinfo_item.getColumn(0, "rcptstat")
								, ds_main_info_rsrvacptinfo_item.getColumn(0, "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 = ds_main_info_rsrvacptinfo_item.getColumn(0, "rsrvdd");
		if( vTmp== "" ) {
			messageBox("등록일자 ERROR .", "E999");
			return ;
		}
		model.setValue("/root/send/srchrsrvdd", vTmp );

		vTmp = ds_main_info_rsrvacptinfo_item.getColumn(0, "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 = this.objects[vOpmiRoot + "_opmi_out"].getColumn(0, "opmi_rcptamt");
	if( utlf_isNull(payownamt) ) {
		payownamt = "0";
	}
	payownamt = parseInt(payownamt);

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

	var vTmp  = vHealexamFlag;
	if( utlf_isNull(vTmp) ){
		sysf_messageBox("건진분류 ERROR .", "E999");
		return ;
	}
	dsf_makeValue( ds_send_savercpt, "srchhealexamflag", "string", vTmp );
	if( utlf_isNull(vPid) ) {
		sysf_messageBox("환자ID ERROR .", "E999");
		return ;
	}
	dsf_makeValue( ds_send_savercpt, "srchpid", "string", vPid );
	if( utlf_isNull(vRsrvdd) ) {
		sysf_messageBox("등록일자 ERROR .", "E999");
		return ;
	}
	dsf_makeValue( ds_send_savercpt, "srchrsrvdd", "string", vRsrvdd );
	if( utlf_isNull(vRsrvno) )  {
		sysf_messageBox("등록번호 ERROR .", "E999");
		return ;
	}
	dsf_makeValue( ds_send_savercpt, "srchrsrvno", "string", vRsrvno );
	dsf_makeValue( ds_send_savercpt, "srchinstcd", "string", sysf_getUserInfo("dutplceinstcd") );

	dsf_makeValue( ds_send_savercpt, "srchjobflag", "string", vJobFlag );
	dsf_makeValue( ds_send_savercpt, "srchrcptdd", "string", this.objects[vOpmiRoot + "_opmi_out"].getColumn(0, "opmi_orgrcptdd") );
	dsf_makeValue( ds_send_savercpt, "srchrcptno", "string", this.objects[vOpmiRoot + "_opmi_out"].getColumn(0, "opmi_orgrcptno") );
	dsf_makeValue( ds_send_savercpt, "srchrcptseqno", "string", this.objects[vOpmiRoot + "_opmi_out"].getColumn(0, "opmi_orgrcptseqno") );

	dsf_createDs("ds_send_savercpt_opmi_out");
	ds_send_savercpt_opmi_out.copyData(this.objects[vOpmiRoot + "_opmi_out"]);
	
	dsf_createDs("ds_send_savercpt_dcgm_out");
	ds_send_savercpt_dcgm_out.copyData(this.objects[vOpmiRoot + "_dcgm_out"]);
	
	dsf_createDs("ds_send_savercpt_unco_out");
	ds_send_savercpt_unco_out.copyData(this.objects[vOpmiRoot + "_unco_out"]);

	// 영수증채번을 먼저한다.
	// INPUT(1.수납일시)
	dsf_makeValue( ds_send, "rcptdd", "string", "" );
	dsf_makeValue( ds_send, "genrkind", "string", "" );
	ds_send.setColumn( 0, "rcptdd"				,  utlf_getCurrentDate() );
	ds_send.setColumn( 0, "genrkind"		, "R");

	//SPAHA02100 이 수납화면
	//결과는 수납 번호
	dsf_createDs("ds_temp_rcptno_out_rcptno");
	var oParam = {};
		oParam.id          = "TRAHA02105";
		oParam.service     = "healexamrcptapp.HealExamRcpt";
		oParam.method      = "reqGetRcptNo";
		oParam.inds        = "req=ds_send";
		oParam.outds       = "ds_temp_rcptno_out_rcptno=rcptno";
		oParam.async       = false;
		oParam.callback    = "cf_TRAHA02105";

	tranf_submit(oParam);

	if (arErrorCode.pop("TRAHA02105") > -1){
		//영수증번호를 채번하여 셋팅한다.
		var rcptno = ds_temp_rcptno_out_rcptno.getColumn(0, "opmi_rcptno");
		dsf_makeValue( ds_send_savercpt, "opmi_rcptno", "string", rcptno );
	}

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

	dsf_createDs("ds_send_savercpt_card");
	dsf_createDs("ds_send_savercpt_cash");
	dsf_createDs("ds_send_savercpt_bank");
	
	//수납화면의 내용을 채우는 카드나 현금. 추가 검사 내역, 감면정보등 모든 정보를 가져온다.
	dsf_createDs("ds_temp_rcptinfo_hidden_opmi_out");
	dsf_createDsRow("ds_req", 	[
                                {col:"healexamflag", type:"STRING", size:256, val:ds_send_savercpt.getColumn(0, "srchhealexamflag")}
                              , {col:"rsrvdd", type:"STRING", size:256, val:ds_send_savercpt.getColumn(0, "srchrsrvdd")}
                              , {col:"rsrvno", type:"STRING", size:256, val:ds_send_savercpt.getColumn(0, "srchrsrvno")}
                              , {col:"pid", type:"STRING", size:256, val:ds_send_savercpt.getColumn(0, "srchpid")}
                              , {col:"rcptdd", type:"STRING", size:256, val:ds_send_savercpt.getColumn(0, "srchrcptdd")}
                              , {col:"rcptno", type:"STRING", size:256, val:ds_send_savercpt.getColumn(0, "srchrcptno")}
                              , {col:"rcptseqno", type:"STRING", size:256, val:ds_send_savercpt.getColumn(0, "srchrcptseqno")}
                              , {col:"jobflag", type:"STRING", size:256, val:ds_send_savercpt.getColumn(0, "srchjobflag")}
                              , {col:"cardcancelyn", type:"STRING", size:256, val:ds_send_savercpt.getColumn(0, "srchcardcancelyn")}
                              , {col:"instcd", type:"STRING", size:256, val:ds_send_savercpt.getColumn(0, "srchinstcd")}
                              , {col:"chggb", type:"STRING", size:256, val:ds_send_savercpt.getColumn(0, "chggb")}
                                ]);
	var oParam = {};
		oParam.id          = "TXAHA02102";
		oParam.service     = "healexamrcptapp.HealExamRcpt";
		oParam.method      = "reqExeHealExamAmtRcpt";
		oParam.inds        = "req=ds_send_savercpt opmi=ds_send_savercpt_opmi_out dcgm=ds_send_savercpt_dcgm_out "
							+"dcgm_out=ds_send_savercpt_dcgm_out unco=ds_send_savercpt_unco_out unco_out=ds_send_savercpt_unco_out "
							+"card=ds_send_savercpt_card cash=ds_send_savercpt_cash bank=ds_send_savercpt_bank rcpt=ds_send_savercpt";
		oParam.outds       = "ds_temp_rcptinfo_hidden_opmi_out=opmi_out";
		oParam.async       = false;
		oParam.callback    = "cf_TXAHA02102";

	tranf_submit(oParam);

	if(arErrorCode.pop("TXAHA02102") > -1) {
		if (vJobFlag == 'CANCEL')
		{
			sysf_messageBox("접수취소 ","I001");
		} else {
			sysf_messageBox("수납 ","I001");
		}

	}
	
	frmf_closeLoadingBar() ;//처리중 화면을 close한다.
}
function cf_TRAHA02105(sSvcId, nErrorCode, sErrorMsg) {
    arErrorCode.push(sSvcId, nErrorCode);
}
function cf_TXAHA02102(sSvcId, nErrorCode, sErrorMsg) {
    arErrorCode.push(sSvcId, nErrorCode);
}

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

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

	var sRcptStat = "" ;

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

	frmf_setParameter("SMAHA02100_RTN", sRcptStat);
	frmf_modal("SMAHA02100","SMAHA02100","","","","","","","","","","","M");
}

/**==================================================================================================================
@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){
	frmf_clearParameter("SMAHA00400_PARAM1");
	frmf_clearParameter("SMAHA00400_PARAM2");
	frmf_clearParameter("SMAHA00400_PARAM3");
	frmf_clearParameter("SMAHA00400_PARAM4");
	frmf_clearParameter("SMAHA00400_PARAM5");
	frmf_clearParameter("SMAHA00400_PARAM6");
	frmf_clearParameter("SMAHA00400_PARAM7");
	frmf_clearParameter("SMAHA00400_PARAM8");
	frmf_clearParameter("SMAHA00400_PARAM9");
	frmf_clearParameter("SMAHA00400_PARAM10");
	frmf_clearParameter("SMAHA00400_PARAM11");
	frmf_clearParameter("SMAHA00400_PARAM12");
	frmf_clearParameter("SMAHA00400_PARAM13");

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

/**==================================================================================================================
@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)*/ ){

		frmf_clearParameter("SPAHB00500_PARAM1");
		frmf_clearParameter("SPAHB00500_PARAM2");
		frmf_clearParameter("SPAHB00500_PARAM3");
		frmf_clearParameter("SPAHB00500_PARAM4");
		frmf_clearParameter("SPAHB00500_PARAM5");
		frmf_clearParameter("SPAHB00500_PARAM6");
		
		dsf_createDs(vDestNode);

		frmf_setParameter("SPAHB00500_PARAM1", vLargFg);
		frmf_setParameter("SPAHB00500_PARAM2", vMidlFg);
		frmf_setParameter("SPAHB00500_PARAM3", vMultiYN);
		frmf_setParameter("SPAHB00500_PARAM4", vDestNode);
		frmf_setParameter("SPAHB00500_PARAM5", vMidlSetYN);
		frmf_setParameter("SPAHB00500_PARAM6", vOpenerID);
		
		frmf_modal("SPAHB00500","SPAHB00500",null,"",1,100,100,"","","","","","M");

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



//		modal("SMAHA00210");
		
		frmf_modal("SMAHA00210","SMAHA00210",null,"",1,400,400,"","","","","","M");



/*		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 + "▦" + sysf_getUserInfo("dutplceinstcd") + "▦"   ;
	frmf_setParameter("condparam", param);
	appf_initPatientInfo(param);
}

/**==================================================================================================================
@author 	: 김호익
@version 	:2007-12-12
@desc 		:통합예약관리 화면으로 이동
@param 	:
				* displayid		: 호출화면--통합예약 화면
				* maingridlistid	: 부서코드 Instance
				* path				: send Instance
====================================================================================================================*/
function aezfPopUpRsrvSample(displayid, maingridlistid, path) {
	var pid = utlf_transNullToEmpty(path.getColumn(0, "pid"));
	var suppdeptcd = sysf_getUserInfo("posdeptcd");

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

	frmf_open(displayid, displayid, null, null, 1, 1, 1, null, null, null, null, null, "M");
}

/*-**************************************************************************************
 * Argument			: N/A
 * Description		: 예약시 dc 금액 확인
 ****************************************************************************************/
function fDcAmtCalc()
{
	dsf_createDs("ds_send_priceamt");
	dsf_makeValue( ds_send_priceamt, "healexamflag", "string", 				fGetHealExamFlag());

	if(utlf_isNull(ds_main_info_rsrvacptinfo_item.getColumn(0, "pkgcd"))) {
		dsf_makeValue( ds_send_priceamt, "healexamdetlflag", "string", 	ds_main_info_rsrvacptinfo_item.getColumn(0, "healexamdetlflag"));
	}else {
		dsf_makeValue( ds_send_priceamt, "healexamdetlflag", "string",	ds_send.getColumn(0, "srchhealexamdetlflag"));
	}

	dsf_makeValue( ds_send_priceamt, "pkgcd", "string", 						ds_main_info_rsrvacptinfo_item.getColumn(0, "pkgcd"));
	dsf_makeValue( ds_send_priceamt, "cmpycd", "string", 						ds_main_info_rsrvacptinfo_item.getColumn(0, "cmpycd"));
	dsf_makeValue( ds_send_priceamt, "conseq", "string", 						ds_main_info_rsrvacptinfo_item.getColumn(0, "conseq"));
	dsf_makeValue( ds_send_priceamt, "conhistseq", "string", 					ds_main_info_rsrvacptinfo_item.getColumn(0, "conhistseq"));
	dsf_makeValue( ds_send_priceamt, "pid", "string", 							ds_main_info_rsrvacptinfo_item.getColumn(0, "pid"));
	dsf_makeValue( ds_send_priceamt, "rsrvdd", "string", 						ds_main_info_rsrvacptinfo_item.getColumn(0, "rsrvdd"));
	dsf_makeValue( ds_send_priceamt, "rsrvno", "string", 						ds_main_info_rsrvacptinfo_item.getColumn(0, "rsrvno"));
	dsf_makeValue( ds_send_priceamt, "sex", "string", 							ds_main_info_patinfo_item.getColumn(0, "sex"));
	dsf_makeValue( ds_send_priceamt, "age", "string", 							ageCalc(ds_main_info_patinfo_item.getColumn(0, "rgstno1") , ds_main_info_patinfo_item.getColumn(0, "rgstno2")));//ds_main_info_patinfo_item.getColumn(0, "age"));
	dsf_makeValue( ds_send_priceamt, "disccd", "string", 						ds_main_info_rsrvacptinfo_item.getColumn(0, "disccd"));
	dsf_makeValue( ds_send_priceamt, "pkguncocd", "string", 					ds_main_info_rsrvacptinfo_item.getColumn(0, "pkguncocd"));
	dsf_makeValue( ds_send_priceamt, "forgneryn", "string", 					ds_main_info_rsrvacptinfo_item.getColumn(0, "forgneryn"));
	dsf_makeValue( ds_send_priceamt, "choiflag", "string", 						ds_main_info_rsrvacptinfo_item.getColumn(0, "choiflag"));
	dsf_makeValue( ds_send_priceamt, "statflag", "string", 						ds_main_info_rsrvacptinfo_item.getColumn(0, "statflag"));

	dsf_createDs("ds_temp_priceamt_priceamt");
	dsf_createDs("ds_temp_priceamt_add");
	var oParam = {};
		oParam.id          = "TRAHA00509";
		oParam.service     = "healexamrsrvacptapp.RsrvAcpt";
		oParam.method      = "reqAmtPrice";
		oParam.inds        = "req=ds_send_priceamt";
		oParam.outds       = "ds_temp_priceamt_priceamt=save ds_temp_priceamt_add=add";
		oParam.async       = false;
		oParam.callback    = "cf_TRAHA00509";

	tranf_submit(oParam);

	if(arErrorCode.pop("TRAHA00509") > -1) {
		dsf_makeValue( ds_main_info_rcptinfo, "subtotamt", "string", 	ds_temp_priceamt_priceamt.getColumn(0, "subtotamt"));	//소계
		dsf_makeValue( ds_main_info_rcptinfo, "pkgamt", "string", 		ds_temp_priceamt_priceamt.getColumn(0, "pkgamt"));	//패키지금액
		dsf_makeValue( ds_main_info_rcptinfo, "cmpyaddamt", "string", 	ds_temp_priceamt_priceamt.getColumn(0, "cmpyaddamt"));	//단체추가검사금액
		dsf_makeValue( ds_main_info_rcptinfo, "psnaddamt", "string", 	ds_temp_priceamt_priceamt.getColumn(0, "psnaddamt"));	//개인추가검사금액
		dsf_makeValue( ds_main_info_rcptinfo, "preamt", "string", 		ds_temp_priceamt_priceamt.getColumn(0, "preamt"));	//선수금
		dsf_makeValue( ds_main_info_rcptinfo, "uncoamt", "string", 		ds_temp_priceamt_priceamt.getColumn(0, "uncoamt"));	//미수금
		dsf_makeValue( ds_main_info_rcptinfo, "discamt", "string", 		ds_temp_priceamt_priceamt.getColumn(0, "discamt"));	//할인액
		dsf_makeValue( ds_main_info_rcptinfo, "realamt", "string", 		ds_temp_priceamt_priceamt.getColumn(0, "realamt"));	//실수납액
		dsf_makeValue( ds_main_info_rcptinfo, "ownbamt", "string", 		ds_temp_priceamt_priceamt.getColumn(0, "ownbamt"));	//부담액

		//추가검사 금액셋팅
		fSetAddAmt();
	}
}
function cf_TRAHA00509(sSvcId, nErrorCode, sErrorMsg) {
    arErrorCode.push(sSvcId, nErrorCode);
}

/**==================================================================================================================
@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 (ds_main_info_rsrvacptinfo_item.getColumn(0, "healexamflag")=="")
		{
			vhf = fGetHealExamFlag();
		} else {
			vhf = ds_main_info_rsrvacptinfo_item.getColumn(0, "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 = utlf_transNullToEmpty(rgstno1);
		var ssno2 = utlf_transNullToEmpty(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() {
	ds_send_iemr.clearData();
	//ds_hidden_temp
	
	var prcpdd			 = 	ds_temp.getColumn(0, "prcpdd");
	var execprcpuniqno	 =	ds_temp.getColumn(0, "seqno");
	var instcd			 = 	sysf_getUserInfo("dutplceinstcd");

	var sprcpdd         = aezfTrim(prcpdd,              44);
	var sexecprcpuniqno = aezfTrim(execprcpuniqno, 		44);
	var sinstcd         = aezfTrim(instcd,              44);							

	dsf_makeValue(ds_send_iemr, "cmc_orddate", "string", sprcpdd);
	dsf_makeValue(ds_send_iemr, "cmc_orderseqno", "string", sexecprcpuniqno);
	dsf_makeValue(ds_send_iemr, "cmc_spcid", "string", sinstcd);
	dsf_makeValue(ds_send_iemr, "pid", "string", "");
	dsf_makeValue(ds_send_iemr, "orddeptcd", "string", "");
	dsf_makeValue(ds_send_iemr, "indd", "string", "");
	dsf_makeValue(ds_send_iemr, "docucd", "string", "");
	dsf_makeValue(ds_send_iemr, "ioflag", "string", "");
	dsf_makeValue(ds_send_iemr, "pagetot", "string", "");
	dsf_makeValue(ds_send_iemr, "treatno", "string", "");
	
	var objArg = new Object();
		objArg.arg_ds_hidden_temp = ds_send_iemr; 
	frmf_open("SSMRC03130", "SSMRC03130", objArg, null, null, null, null, null, null, null, null, null, "M");

}

/**********************************************************************************
 * 함수명		: fPriceCheck
 * 설  명		: 
 * argument		:
 * return Type	: 
 * 작성자		: 
**********************************************************************************/
function fPriceCheck()
{
	dsf_makeValue(ds_send_priceamt, "healexamflag", fGetHealExamFlag());

	if(utlf_isNull(ds_main_info_rsrvacptinfo_item.getColumn(0, "pkgcd")))
	{
		dsf_makeValue(ds_send_priceamt, "healexamdetlflag", "string", ds_main_info_rsrvacptinfo_item.getColumn(0, "healexamdetlflag"));
	}
	else
	{
		dsf_makeValue(ds_send_priceamt, "healexamdetlflag", "string", ds_main_info_rsrvacptinfo_item.getColumn(0, "srchhealexamdetlflag"));
	}

	dsf_makeValue(ds_send_priceamt, "pkgcd", "string",  ds_main_info_rsrvacptinfo_item.getColumn(0, "pkgcd"));
	dsf_makeValue(ds_send_priceamt, "cmpycd", "string",  ds_main_info_rsrvacptinfo_item.getColumn(0, "cmpycd"));
	dsf_makeValue(ds_send_priceamt, "conseq", "INT",  ds_main_info_rsrvacptinfo_item.getColumn(0, "conseq"));
	dsf_makeValue(ds_send_priceamt, "conhistseq", "INT",  ds_main_info_rsrvacptinfo_item.getColumn(0, "conhistseq"));
	dsf_makeValue(ds_send_priceamt, "pid", "string",  ds_main_info_rsrvacptinfo_item.getColumn(0, "pid"));
	dsf_makeValue(ds_send_priceamt, "rsrvdd", "string",  ds_main_info_rsrvacptinfo_item.getColumn(0, "rsrvdd"));
	dsf_makeValue(ds_send_priceamt, "rsrvno", "string",  ds_main_info_rsrvacptinfo_item.getColumn(0, "rsrvno"));
	dsf_makeValue(ds_send_priceamt, "sex", "string",  ds_main_info_rsrvacptinfo_item.getColumn(0, "sex"));
	dsf_makeValue(ds_send_priceamt, "age", "INT",  ageCalc(ds_main_info_patinfo_item.getColumn(0, "rgstno1"),ds_main_info_patinfo_item.getColumn(0, "rgstno2")));
	dsf_makeValue(ds_send_priceamt, "disccd", "string",  ds_main_info_rsrvacptinfo_item.getColumn(0, "disccd"));
	dsf_makeValue(ds_send_priceamt, "pkguncocd", "string",  ds_main_info_rsrvacptinfo_item.getColumn(0, "pkguncocd"));
	dsf_makeValue(ds_send_priceamt, "forgneryn", "string",  ds_main_info_rsrvacptinfo_item.getColumn(0, "forgneryn"));
	dsf_makeValue(ds_send_priceamt, "choiflag", "string",  ds_main_info_rsrvacptinfo_item.getColumn(0, "choiflag"));
	dsf_makeValue(ds_send_priceamt, "statflag", "string",  ds_main_info_rsrvacptinfo_item.getColumn(0, "statflag"));
	
	var oParam = {};
		oParam.id          = "TRAHA00509";
		oParam.service     = "healexamrsrvacptapp.RsrvAcpt";
		oParam.method      = "reqAmtPrice";
		oParam.inds        = "req=ds_send_priceamt";
		oParam.outds       = "ds_temp_priceamt_priceamt=save ds_=add";
		oParam.async       = false;
		oParam.callback    = "cf_TRAHA00509";

	tranf_submit(oParam);

	if(arErrorCode.pop("TRAHA00509") > -1)
	{
		dsf_makeValue(ds_main_info_rcptinfo, "subtotamt", "int", ds_temp_priceamt_priceamt.getColumn(0, "subtotamt"));
		dsf_makeValue(ds_main_info_rcptinfo, "pkgamt", "int", ds_temp_priceamt_priceamt.getColumn(0, "pkgamt"));
		dsf_makeValue(ds_main_info_rcptinfo, "addamt", "int", ds_temp_priceamt_priceamt.getColumn(0, "cmpyaddamt"));
		dsf_makeValue(ds_main_info_rcptinfo, "addamt", "int", ds_temp_priceamt_priceamt.getColumn(0, "psnaddamt"));
		dsf_makeValue(ds_main_info_rcptinfo, "preamt", "int", ds_temp_priceamt_priceamt.getColumn(0, "preamt"));
		dsf_makeValue(ds_main_info_rcptinfo, "uncoamt", "int", ds_temp_priceamt_priceamt.getColumn(0, "uncoamt"));
		dsf_makeValue(ds_main_info_rcptinfo, "discamt", "int", ds_temp_priceamt_priceamt.getColumn(0, "discamt"));
		dsf_makeValue(ds_main_info_rcptinfo, "realamt", "int", ds_temp_priceamt_priceamt.getColumn(0, "realamt"));
		dsf_makeValue(ds_main_info_rcptinfo, "ownbamt", "int", ds_temp_priceamt_priceamt.getColumn(0, "ownbamt"));
		fSetAddAmt();
	}
}
function cf_TRAHA00509(sSvcId, nErrorCode, sErrorMsg)
{
	arErrorCode.push(sSvcId, nErrorCode);
    if(nErrorCode < 0) return;
}
/*-**************************************************************************************
 * Argument			: vMode
 *					: GMode
 * Description		: 예약
 ****************************************************************************************/
function fSaveRsrvAcptPro(vMode, GMode){
	var vHealExamFlag = "";
	if(GMode == "1"){
		vHealExamFlag = ds_main_info_rsrvacptinfo_item.getColumn(0,"healexamflag");
	}else{
		vHealExamFlag = fGetHealExamFlag();
		if(utlf_isNull(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(sysf_messageBox(sMode, "Q002") != 6) return -1;
	if(fCheckPatInfo() == false) return -1;
	if(!fCheckAcpt(vMode)) return  -1;

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

	/*
	* 수진자정보
	*/
	dsf_createDs("ds_send_save_patinfo");
	ds_main_info_patinfo_item.setColumn( 0, "pidcretfg"   , vPidYN);
	ds_send_save_patinfo.copyData(ds_main_info_patinfo_item); 
	dsf_makeValue( ds_send_save_patinfo, "userid", "string", sysf_getUserId());
	dsf_makeValue( ds_send_save_patinfo, "instcd", "string", sysf_getUserInfo("dutplceinstcd"));
	dsf_makeValue( ds_send_save_patinfo, "pkgcd", "string",  ds_main_info_rsrvacptinfo_item.getColumn(0, "pkgcd"));
	dsf_makeValue( ds_send_save_patinfo, "cmpyflag", "string",  ds_main_info_rsrvacptinfo_item.getColumn(0, "cmpyflag"));
	dsf_makeValue( ds_send_save_patinfo, "cmpycd", "string",  ds_main_info_rsrvacptinfo_item.getColumn(0, "cmpycd"));
	dsf_makeValue( ds_send_save_patinfo, "conseq", "string",  ds_main_info_rsrvacptinfo_item.getColumn(0, "conseq"));
	dsf_makeValue( ds_send_save_patinfo, "conhistseq", "string",  ds_main_info_rsrvacptinfo_item.getColumn(0, "conhistseq"));
	dsf_makeValue( ds_send_save_patinfo, "choiflag", "string",  ds_main_info_rsrvacptinfo_item.getColumn(0, "choiflag"));
	dsf_makeValue( ds_send_save_patinfo, "zipcdseq1", "string",  ds_main_info_patinfo_item.getColumn(0, "zipcdseq1"));
	dsf_makeValue( ds_send_save_patinfo, "zipcdseq2", "string",  ds_main_info_patinfo_item.getColumn(0, "zipcdseq2"));
	dsf_makeValue( ds_send_save_patinfo, "clntempid", "string",  ds_main_info_rsrvacptinfo_item.getColumn(0, "clntempid"));
	dsf_makeValue( ds_send_save_patinfo, "clntpos", "string",  ds_main_info_rsrvacptinfo_item.getColumn(0, "clntpos"));
	dsf_makeValue( ds_send_save_patinfo, "patm_brthareacnts", "string",  ds_main_info_patinfo_item.getColumn(0, "brthareacnts"));
	dsf_makeValue( ds_send_save_patinfo, "acpt_brthareacnts", "string",  ds_main_info_rsrvacptinfo_item.getColumn(0, "brthareacnts"));	
	//전송데이터 변경
	dsf_makeValue( ds_send_save_patinfo, "rrgstno1", "string",  ds_send_save_patinfo.getColumn(0, "rgstno1"));	
	dsf_makeValue( ds_send_save_patinfo, "rrgstno2", "string",  ds_send_save_patinfo.getColumn(0, "rgstno2"));	
	dsf_makeValue( ds_send_save_patinfo, "srchinstcd", "string",  ds_send_save_patinfo.getColumn(0, "instcd"));	
	dsf_makeValue( ds_send_save_patinfo, "srchrgstno1", "string",  ds_send_save_patinfo.getColumn(0, "rgstno1"));	
	dsf_makeValue( ds_send_save_patinfo, "srchrgstno2", "string",  ds_send_save_patinfo.getColumn(0, "rgstno2"));	

	/*
	* 예약접수정보
	*/
	dsf_makeValue(ds_main_info_rsrvacptinfo_item, "mode", "string", vMode);
	dsf_makeValue(ds_main_info_rsrvacptinfo_item, "healexamflag", "string", vHealExamFlag);
	dsf_createDs("ds_send_save_rsrvacptinfo");
	ds_send_save_rsrvacptinfo.copyData(ds_main_info_rsrvacptinfo_item);
	dsf_makeValue( ds_send_save_rsrvacptinfo, "ownbamt", "string",  ds_main_info_rcptinfo.getColumn(0, "ownbamt"));
	//전송데이터 변경
	dsf_makeValue( ds_send_save_rsrvacptinfo, "uncocd", "string",  ds_send_save_rsrvacptinfo.getColumn(0, "pkguncocd"));	
	dsf_makeValue( ds_send_save_rsrvacptinfo, "srchrgstno1", "string",  ds_send_save_rsrvacptinfo.getColumn(0, "rgstno1"));	
	dsf_makeValue( ds_send_save_rsrvacptinfo, "srchrgstno2", "string",  ds_send_save_rsrvacptinfo.getColumn(0, "rgstno1"));	
	
	/*
	* RFID
	*/
	dsf_createDs("ds_send_save_taginfo");
	dsf_makeValue( ds_send_save_taginfo, "rtime", "string",  ds_main_info_taginfo.getColumn(0, "rtime"));
	dsf_makeValue( ds_send_save_taginfo, "tagno", "string",  ds_main_info_taginfo.getColumn(0, "tagno"));
	dsf_makeValue( ds_send_save_taginfo, "suppstat", "string",  ds_main_info_taginfo.getColumn(0, "suppstat"));

	/*
	* 결과상담 예약내역 저장
	*/
	//예약 및 접수취소일경우 현재 이후의 예약이며 결과상담이 완료되지 않은 내역은 삭제합니다.
	if(vMode == "F"|| vMode == "D"){
		var rsltRsrvCnt = ds_main_info_rsltcnstinfo_cnstlst_cnst.rowcount;
		for(var i=0; i<rsltRsrvCnt; i++){
			var cnstEndYN             = ds_main_info_rsltcnstinfo_cnstlst_cnst.getColumn(i, "rsltcnstendyn");
			var rsltCnstDD            = ds_main_info_rsltcnstinfo_cnstlst_cnst.getColumn(i, "rsltcnstdd");
			var rsltCnstRsrvStarttm   = ds_main_info_rsltcnstinfo_cnstlst_cnst.getColumn(i, "rsltcnstrsrvstarttm");
			var dtRsrvdd              = (rsltCnstDD + " " + rsltCnstRsrvStarttm + "00" ).toDate("YYYYMMDD hhmmss");

			if((cnstEndYN == "N" || utlf_isNull(cnstEndYN)) &&  dtRsrvdd > utlf_getCurrentDateTime().toDate("YYYYMMDD hhmmss")){
				ds_main_info_rsltcnstinfo_cnstlst_cnst.setColumn(i, "m" ,"d");
				ds_main_info_rsltcnstinfo_cnstlst_cnst.setColumn(i, "rsltrsrvsaveyn" ,"N");
			}
		}
	}
	dsf_createDs("ds_send_save_rsltrsrv");	
	ds_main_info_rsltcnstinfo_cnstlst_cnst.filter("rsltrsrvsaveyn=='N'");
	ds_send_save_rsltrsrv.copyData(ds_main_info_rsltcnstinfo_cnstlst_cnst, true);
	ds_main_info_rsltcnstinfo_cnstlst_cnst.filter("");
	//전송데이터 변경
	dsf_setFixVal( ds_send_save_rsltrsrv, "healexamflag:"+ds_send_save_rsrvacptinfo.getColumn(0, "healexamflag")
											+"rsrvdd:"+ds_send_save_rsrvacptinfo.getColumn(0, "rsrvdd")+"rsrvno:"+ds_send_save_rsrvacptinfo.getColumn(0, "rsrvno")
											+"healexamdetlflag:"+ds_send_save_rsrvacptinfo.getColumn(0, "healexamdetlflag") );

	//추가 검사 내역 rowheader를 i로 셋팅
	//추가검사 중 접수시 처방이 내려져야 하는검사가 있으므로 우선 추가검사 내역을 다 가져가야 하기에 u 모드로 변경
	var objGrd	= frmf_getComponents("grd_addlst", this);
	var objDs	= this.objects[objGrd.binddataset];
	objDs.applyChange();
	for(var i=0; i < objDs.rowcount;i++){
		if((objDs.getColumn(i, "sel")=="Y") || (objDs.getColumn(i, "sel")=="true")) {
			grdf_setStatus(objGrd, "U", [i]);
			objDs.setColumn(i, "m ", "u");
		}
	}
	dsf_createDs("ds_send_save_addlst");
	ds_send_save_addlst.copyData(grdf_getGridUpdateData(objGrd, "all"), true);
	//전송데이터 변경
	if(GMode == "1"){
		dsf_makeValue( ds_send_save_addlst, "calcscorcd", "string",  ds_send_save_addlst.getColumn(0, "testcd"));	
		dsf_makeValue( ds_send_save_addlst, "addtotamt", "string",  ds_send_save_addlst.getColumn(0, "totpayamt"));	
		dsf_makeValue( ds_send_save_addlst, "owndiscamt", "string",  ds_send_save_addlst.getColumn(0, "paydcbamt"));	
		dsf_setFixVal( ds_send_save_addlst, "pkgfg:G");
	} else {
		dsf_makeValue( ds_send_save_addlst, "pkgflag", "string",  ds_send_save_addlst.getColumn(0, "testflag"));	
		dsf_makeValue( ds_send_save_addlst, "prcpdayno", "string",  ds_send_save_addlst.getColumn(0, "prcptims"));	
	}
	
	frmf_openLoadingBar(sMode + " 처리 중입니다..") ;//처리중 화면을 오픈한다.
	
	dsf_createDs("ds_tmp_reqacpt");
	dsf_createDs("ds_tmp_reqadd");
	dsf_createDs("ds_tmp_reqrfid");
	dsf_createDs("ds_tmp_sytsrsrvchk");
	
	var retInstance;
	if(GMode == "1"){
		var oParam = {};
			oParam.id          = "TXAHA04032";
			oParam.service     = "healthexamrsrvacptapp.GnrlRsrvAcpt";
			oParam.method      = "reqExeGnrlRsrvSave";
			oParam.inds        = "patinfo=ds_send_save_patinfo rsrvacptinfo=ds_send_save_rsrvacptinfo addlst=ds_send_save_addlst taginfo=ds_send_save_taginfo rsltrsrv=ds_send_save_rsltrsrv";
			oParam.outds       = "ds_tmp_reqadd=reqadd ds_tmp_reqrfid=reqrfid ds_tmp_sytsrsrvchk=sytsrsrvchk";
			oParam.async       = false;
			oParam.callback    = "cf_TXAHA04032";

		tranf_submit(oParam);
		
		if(arErrorCode.pop("TXAHA04032") > -1) retInstance = true;
		else retInstance = false;
	}else{
		var oParam = {};
			oParam.id          = "TXAHA04027";
			oParam.service     = "healthexamrsrvacptapp.RsrvAcpt";
			oParam.method      = "reqExeRsrvSave";
			oParam.inds        = "patinfo=ds_send_save_patinfo rsrvacptinfo=ds_send_save_rsrvacptinfo addlst=ds_send_save_addlst taginfo=ds_send_save_taginfo rsltrsrv=ds_send_save_rsltrsrv";
			oParam.outds       = "ds_tmp_reqadd=reqadd ds_tmp_reqrfid=reqrfid ds_tmp_sytsrsrvchk=sytsrsrvchk";
			oParam.async       = false;
			oParam.callback    = "cf_TXAHA04027";

		tranf_submit(oParam);
		if(arErrorCode.pop("TXAHA04027") > -1) retInstance = true;
		else retInstance = false;
	}

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

		if(GMode == "1"){
			vHealExamFlag = ds_main_info_rsrvacptinfo_item.getColumn(0, "healexamflag");
		}else{
			//일부결과를 인스턴스에 복사
			//AHA001.JS
			fretinstanceset();
		}

		if( vMode == "E" ) { //접수
			ds_send.addColumn("srchjobflag"	 ,"string");
			ds_send.addColumn("srchrcptdd"	 ,"string");
			ds_send.addColumn("srchrcptno"	 ,"string");
			ds_send.addColumn("srchrcptseqno","string");

			//태그등록 상태변경
			var suppstat = ds_tmp_reqrfid.getColumn(0, "suppstat"); // 태그지급상태
			if(suppstat == "0"){
				ds_main_info_taginfo.setColumn(0, "rtime"    , ds_tmp_reqrfid.getColumn(0, "rtime"));
				ds_main_info_taginfo.setColumn(0, "tagno"    , ds_tmp_reqrfid.getColumn(0, "tagno"));
				ds_main_info_taginfo.setColumn(0, "suppstat" , ds_tmp_reqrfid.getColumn(0, "suppstat"));

				//태그 지급상태 실시값
				dsf_makeValue(ds_tag_taginfo, "tagstat", "string", ds_tmp_reqrfid.getColumn(0, "suppstat"));
				btn_tag.text = "태그반납";
				ipt_tagno.enable = false;
			}

			if(ds_main_info_rsrvacptinfo_item.getColumn(0, "healexamflag") == "C" || ds_main_info_rsrvacptinfo_item.getColumn(0, "healexamdetlflag") == "G02"){
				ret = fCalcAmt("RCPT");
			}

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

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

		frmf_closeLoadingBar() ;//처리중 화면을 close한다.
		
		var sytsrsrvchk = ds_tmp_sytsrsrvchk.getColumn(0, "sytsrsrvchk");

		if( sytsrsrvchk == "Y" ){// 통합예약할 내역이 있으면 "Y"
			ds_main_info_rsrvacptinfo_item.setColumn(0, "pid", ds_tmp_reqacpt.getColumn(0, "pid"));
			button2.click();
		}
	}else{
		sysf_messageBox("저장이 잘못되었습니다", "E999");
		frmf_closeLoadingBar() ;//처리중 화면을 close한다.
	}
	return 1;
}
function cf_TXAHA04032(sSvcId, nErrorCode, sErrorMsg) {
    arErrorCode.push(sSvcId, nErrorCode);
}
function cf_TXAHA04027(sSvcId, nErrorCode, sErrorMsg) {
    arErrorCode.push(sSvcId, nErrorCode);
}

function fretinstanceset()
{
	dsf_makeValue(ds_main_info_rsrvacptinfo_item, "rsrvdd", "string", ds_tmp_reqacpt.getColumn(0, "rsrvdd"));
	dsf_makeValue(ds_main_info_rsrvacptinfo_item, "rsrvno", "string", ds_tmp_reqacpt.getColumn(0, "rsrvno"));
	dsf_makeValue(ds_main_info_rsrvacptinfo_item, "pid", "string", ds_tmp_reqacpt.getColumn(0, "pid"));
	dsf_makeValue(ds_main_info_rsrvacptinfo_item, "orddd", "string", ds_tmp_reqacpt.getColumn(0, "orddd"));
	dsf_makeValue(ds_main_info_patinfo_item, "pid", "string", ds_tmp_reqacpt.getColumn(0, "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(){
	dsf_makeValue(ds_main_info_rsrvacptinfo_item, "insu1", "string", "", 0);
	dsf_makeValue(ds_main_info_rsrvacptinfo_item, "insu2", "string", "", 0);
	dsf_makeValue(ds_main_info_rsrvacptinfo_item, "insu3", "string", "", 0);
	dsf_makeValue(ds_main_info_rsrvacptinfo_item, "insu4", "string", "", 0);
	dsf_makeValue(ds_main_info_rsrvacptinfo_item, "insu5", "string", "", 0);
	dsf_makeValue(ds_main_info_rsrvacptinfo_item, "insu6", "string", "", 0);
	dsf_makeValue(ds_main_info_rsrvacptinfo_item, "insu7", "string", "", 0);
	dsf_makeValue(ds_main_info_rsrvacptinfo_item, "insu8", "string", "", 0);
	dsf_makeValue(ds_main_info_rsrvacptinfo_item, "insu9", "string", "", 0);
	dsf_makeValue(ds_main_info_rsrvacptinfo_item, "insu10", "string", "", 0);
	
	if (ds_main_info_rsrvacptinfo_item.getColumn(0, "healexamdetlflag")=="G01"){
		ds_main_info_rsrvacptinfo_item.setColumn(0, "insu1", "G01");				
	} else if (ds_main_info_rsrvacptinfo_item.getColumn(0, "healexamdetlflag")=="G02"){
		ds_main_info_rsrvacptinfo_item.setColumn(0, "insu2", "G02");				
	} else if (ds_main_info_rsrvacptinfo_item.getColumn(0, "healexamdetlflag")=="G03"){
		ds_main_info_rsrvacptinfo_item.setColumn(0, "insu3", "G03");				
	} else if (ds_main_info_rsrvacptinfo_item.getColumn(0, "healexamdetlflag")=="G04"){
		ds_main_info_rsrvacptinfo_item.setColumn(0, "insu4", "G04");				
	} else if (ds_main_info_rsrvacptinfo_item.getColumn(0, "healexamdetlflag")=="G05"){
		ds_main_info_rsrvacptinfo_item.setColumn(0, "insu5", "G05");				
	} else if (ds_main_info_rsrvacptinfo_item.getColumn(0, "healexamdetlflag")=="G06"){
		ds_main_info_rsrvacptinfo_item.setColumn(0, "insu6", "G06");
	} else if (ds_main_info_rsrvacptinfo_item.getColumn(0, "healexamdetlflag")=="G07"){
		ds_main_info_rsrvacptinfo_item.setColumn(0, "insu7", "G07");
	} else if (ds_main_info_rsrvacptinfo_item.getColumn(0, "healexamdetlflag")=="G08"){
		ds_main_info_rsrvacptinfo_item.setColumn(0, "insu8", "G08");
	} else if (ds_main_info_rsrvacptinfo_item.getColumn(0, "healexamdetlflag")=="G09"){
		ds_main_info_rsrvacptinfo_item.setColumn(0, "insu9", "G09");
	} else if (ds_main_info_rsrvacptinfo_item.getColumn(0, "healexamdetlflag")=="G010"){
		ds_main_info_rsrvacptinfo_item.setColumn(0, "insu10", "G010");
	}
}

		function fInsuChange(){
			if (!utlf_isNull(ds_send.getColumn(0, "srchcdnm")))
			{
				ds_send.setColumn(0, "srchflag"		, "02");
			 	ds_send.setColumn(0, "srchcond" 	, "nm" );
				ds_send.setColumn(0, "srchinstcd"	, sysf_getUserInfo("dutplceinstcd"));
				
				var oParam = {};
					oParam.id          = "TRAHA00105";
					oParam.service     = "healexambaseapp.ComCode";
					oParam.method      = "reqGetComnCdList";
					oParam.inds        = "req=ds_send";
					oParam.outds       = "ds_temp_cdlst_item=item";
					oParam.async       = false;
					//oParam.callback    = "cf_TRAHA00105";

				tranf_submit(oParam);
				
				if (!utlf_isNull(ds_temp_cdlst_item.getColumn(0, "cmpycd")))
				{
					opener.ds_main_info_rsrvacptinfo_item.setColumn(0, "insucorpbrchcd",ds_temp_cdlst_item.getColumn(0, "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;}
				}
	  }

/*-**************************************************************************************
 * Argument			: N/A
 * Description		: 등록번호 생성
 ****************************************************************************************/
function fSavePtbs(){
	if( fCheckPatInfo('1') == false ) return -1 ;
	/**
	* 수진자정보
	*/
	ds_send_save.copyData(ds_main_info_patinfo_item); 
	fCheckNodeExist("ds_send_save", "userid"	, true);
	fCheckNodeExist("ds_send_save", "instcd"	, true);
	ds_send_save.setColumn( 0, "userid"   , sysf_getUserId());
	ds_send_save.setColumn( 0, "instcd"   , sysf_getUserInfo("dutplceinstcd"));
	
	dsf_createDs("ds_tmp_patinfo");
	
	dsf_makeValue(ds_send_save, "rrgstno1", "string", ds_send_save.getColumn(0, "rgstno1"));
	dsf_makeValue(ds_send_save, "rrgstno2", "string", ds_send_save.getColumn(0, "rgstno2"));
	dsf_makeValue(ds_send_save, "srchrgstno1", "string", ds_send_save.getColumn(0, "rgstno1"));
	dsf_makeValue(ds_send_save, "srchrgstno2", "string", ds_send_save.getColumn(0, "rgstno2"));
	dsf_makeValue(ds_send_save, "srchinstcd", "string", ds_send_save.getColumn(0, "instcd"));

	var oParam = {};
		oParam.id          = "TXAHA00111";
		oParam.service     = "healexamrsrvacptapp.RsrvAcpt";
		oParam.method      = "reqSavePtbs";
		oParam.inds        = "patinfo=ds_send_save";
		oParam.outds       = "ds_tmp_patinfo=patinfo";
		oParam.async       = false;
		//oParam.callback    = "cf_TXAHA00111";

	tranf_submit(oParam);

	ds_main_info_patinfo_item.setColumn( 0, "pid" , ds_tmp_patinfo.getColumn(0, "pid"));
}

/*-**************************************************************************************
 * Argument			: N/A
 * Description		: 추가검사 금액셋팅
 ****************************************************************************************/
function fSetAddAmt() {
	var healexamdetlflag = ds_main_info_rsrvacptinfo_item.getColumn(0, "healexamdetlflag");
	var disccd = ds_main_info_rsrvacptinfo_item.getColumn(0, "disccd");	// 할인코드
	var cmpycd = ds_main_info_rsrvacptinfo_item.getColumn(0, "cmpycd");	// 단체코드
	var statflag = ds_main_info_rsrvacptinfo_item.getColumn(0, "statflag");	// 단체코드
	var chngyn = ds_temp_priceamt_priceamt.getColumn(0, "chngyn");				// 부담금 변경여부
	var pkgdiscyn = ds_main_info_rsrvacptinfo_item.getColumn(0, "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(ds_temp_priceamt_priceamt.getColumn(0, "subtotamt"));	//소계
	var	pkgamt = parseInt(ds_temp_priceamt_priceamt.getColumn(0, "pkgamt"));	//패키지금액
	var	cmpyaddamt = parseInt(ds_temp_priceamt_priceamt.getColumn(0, "cmpyaddamt"));	//단체추가검사금액
	var	psnaddamt = parseInt(ds_temp_priceamt_priceamt.getColumn(0, "psnaddamt"));	//개인추가검사금액
	var	preamt = parseInt(ds_temp_priceamt_priceamt.getColumn(0, "preamt"));	//선수금
	var	discamt = parseInt(ds_temp_priceamt_priceamt.getColumn(0, "discamt"));	//할인액
	var	realamt = parseInt(ds_temp_priceamt_priceamt.getColumn(0, "realamt"));	//실수납액
	var org_uncoamt = parseInt(ds_temp_priceamt_priceamt.getColumn(0, "orguncoamt")); // 계약처의 미수금(변경없는)
	var org_ownbamt = parseInt(ds_temp_priceamt_priceamt.getColumn(0, "orgownbamt"));	//게약처의 원래 부담금
	if(chngyn == "Y") {
		uncoamt = parseInt(ds_temp_priceamt_priceamt.getColumn(0, "chnguncoamt"));	//미수금
		ownbamt = parseInt(ds_temp_priceamt_priceamt.getColumn(0, "chngownbamt"));	//부담액
	}else {
		uncoamt = parseInt(ds_temp_priceamt_priceamt.getColumn(0, "uncoamt"));	//미수금
		ownbamt = parseInt(ds_temp_priceamt_priceamt.getColumn(0, "ownbamt"));	//부담액
	}

	// 할인율
	if(!utlf_isNull(disccd)) {
		 pkgDisc = parseInt(ds_init_baseinfo_pamcdlst_disccdlst.lookupExpr("cd == '" + disccd + "'", "dcamt"));
		 addDisc = parseInt(ds_init_baseinfo_pamcdlst_disccdlst.lookupExpr("cd == '" + disccd + "'", "adddcamt"));
	}
	
	// 개인일 경우 패키지의 할인율 적용
	if(utlf_isNull(cmpycd)) {
		if(pkgdiscyn == "Y") {
			discamt = discamt + Math.round(pkgamt*(pkgDisc/100));
			PkgDiscamt = Math.round(pkgamt*(pkgDisc/100));
		}				
	}

	var cnt = ds_main_info_rsrvacptinfo_addlst.rowcount;

	for(var i=0; i < cnt; i++) {
		var sel = ds_main_info_rsrvacptinfo_addlst.getColumn(i, "sel");
		var testflag = ds_main_info_rsrvacptinfo_addlst.getColumn(i, "testflag");	// 검사구분
		var uncocd = ds_main_info_rsrvacptinfo_addlst.getColumn(i, "uncocd");	// 청구구분
		var scoreamt = parseInt(ds_main_info_rsrvacptinfo_addlst.getColumn(i, "scoreamt"));	// 단가
		var testdiscyn = ds_main_info_rsrvacptinfo_addlst.getColumn(i, "testdiscyn"); //추가검사할인적용여부
		var dcamt = (testdiscyn == "Y"? Math.round(scoreamt*(addDisc/100)) : 0);	// 추가검사금액								

		if("Y" == sel) {
			if(testflag == "S") {
				sCnt++;
				if(!utlf_isNull(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(!utlf_isNull(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(utlf_isNull(cmpycd)) {
		if(sCnt > 1) {
			sysf_messageBox("선택검사을 2개이상" , "E005");
		}
	}

	dsf_makeValue( ds_main_info_rcptinfo, "subtotamt", "string",  subtotamt);	//소계
	dsf_makeValue( ds_main_info_rcptinfo, "pkgamt", "string", 	pkgamt);	//패키지금액
	dsf_makeValue( ds_main_info_rcptinfo, "cmpyaddamt", "string", 	cmpyaddamt);	//추가검사금액
	dsf_makeValue( ds_main_info_rcptinfo, "psnaddamt", "string", 	psnaddamt);	//추가검사금액
	dsf_makeValue( ds_main_info_rcptinfo, "preamt", "string", 	preamt);	//선수금
	dsf_makeValue( ds_main_info_rcptinfo, "uncoamt", "string", 	uncoamt);	//미수금
	dsf_makeValue( ds_main_info_rcptinfo, "discamt", "string", 	discamt);	//할인액

	if(statflag == "E" || statflag == "G" || statflag == "H" || statflag == "I") {
		dsf_makeValue( ds_main_info_rcptinfo, "realamt", "string", 	realamt);	//실수납액
	}else {
		if(cmpycd != "") {
			dsf_makeValue( ds_main_info_rcptinfo, "realamt", "string", 	pAddamt + ownbamt - realamt - preamt);	//실수납액
		}else {
			dsf_makeValue( ds_main_info_rcptinfo, "realamt", "string", 	pkgamt + pAddamt - PkgDiscamt  - realamt - preamt);	//실수납액
		}
	}
	
	if(healexamdetlflag == "G02") {
		dsf_createDs("ds_send1");
		dsf_makeValue( ds_send1, "healexamflag", "string",  fGetHealExamFlag());
		dsf_makeValue( ds_send1, "rsrvdd", "string",  ds_main_info_rsrvacptinfo_item.getColumn(0, "rsrvdd"));
		dsf_makeValue( ds_send1, "rsrvno", "string",  ds_main_info_rsrvacptinfo_item.getColumn(0, "rsrvno"));
		dsf_makeValue( ds_send1, "testflag", "string",  "A");
		dsf_makeValue( ds_send1, "testcd", "string",  ds_main_info_rsrvacptinfo_item.getColumn(0, "pkgcd"));
		dsf_makeValue( ds_send1, "cmpyflag", "string",  "N" );
		dsf_makeValue( ds_send1, "age", "string",  ds_main_info_patinfo_item.getColumn(0, "age"));
		dsf_makeValue( ds_send1, "cmpycd", "string",  "");
		dsf_makeValue( ds_send1, "conseq", "string",  "");
		dsf_makeValue( ds_send1, "conhistseq", "string",  "");
		dsf_makeValue( ds_send1, "statflag", "string",  ds_main_info_rsrvacptinfo_item.getColumn(0, "statflag"));

		dsf_createDs("ds_price_dangainfo");
		var oParam = {};
			oParam.id          = "TRAHA00702";
			oParam.service     = "healexamrsrvacptapp.RsrvAcpt";
			oParam.method      = "reqGetDangaInfo";
			oParam.inds        = "req=ds_send1";
			oParam.outds       = "ds_price_dangainfo=item";
			oParam.async       = false;
			//oParam.callback    = "cf_TRAHA00702";

		tranf_submit(oParam);
		
		if(!utlf_isNull(cmpycd)) {					
			dsf_makeValue( ds_main_info_rcptinfo, "pkgamt", "string", 	ds_price_dangainfo.getColumn(0, "danga"));	//패키지금액
			dsf_makeValue( ds_main_info_rcptinfo, "subtotamt", "string", parseInt(ds_main_info_rcptinfo.getColumn(0, "cmpyaddamt")) 
																													+ parseInt(ds_main_info_rcptinfo.getColumn(0, "psnaddamt"))
																													+ parseInt(ds_main_info_rcptinfo.getColumn(0, "pkgamt")));	//소계
			dsf_makeValue( ds_main_info_rcptinfo, "uncoamt", "string",  parseInt(ds_main_info_rcptinfo.getColumn(0, "cmpyaddamt"))
																													+ parseInt(ds_main_info_rcptinfo.getColumn(0, "pkgamt")));
		}else {
			if(statflag != "") {
				dsf_makeValue( ds_main_info_rcptinfo, "pkgamt", "string", 	ds_price_dangainfo.getColumn(0, "danga"));	//패키지금액
				dsf_makeValue( ds_main_info_rcptinfo, "subtotamt", "string", parseInt(ds_main_info_rcptinfo.getColumn(0, "cmpyaddamt")) 
																													+ parseInt(ds_main_info_rcptinfo.getColumn(0, "psnaddamt"))
																													+ parseInt(ds_main_info_rcptinfo.getColumn(0, "pkgamt")));	//소계
				dsf_makeValue( ds_main_info_rcptinfo, "uncoamt", "string",  parseInt(ds_main_info_rcptinfo.getColumn(0, "cmpyaddamt")));																									
			}
		}
	}
	
	dsf_makeValue(ds_main_info_rcptinfo, "ownbamt", "string", ownbamt);	//부담액
	dsf_makeValue(ds_main_info_rcptinfo, "tempamt", "string", org_uncoamt + org_ownbamt);	//계약처 미수금 + 부담금
	
	//화면별 디자인 맞춰서 디자인 하도록 수정 기존 내용 주석처리함(2018-03-07 이아영)
	if(frmf_getScreenID() == "SMAHA04020")
	{
		if(0 > parseInt(ds_main_info_rcptinfo.getColumn(0, "realamt")))	
		{
			opt_realamt.style.color = "#ff0000";
			opt_realamt.style.align = "right bottom";
		}
		else
		{
			opt_realamt.style.color = "#43c8f5";
			opt_realamt.style.font = "Dotum,36,bold"
			opt_realamt.style.align = "right bottom";
		}
	}
	else
	{
// 		if(0 > parseInt(ds_main_info_rcptinfo.getColumn(0, "realamt")))	{
// 			opt_realamt.style.background.color = "#ff0000";
// 			opt_realamt.position.left = 904;
// 			opt_realamt.position.top = 675;
// 			opt_realamt.position.width = 291;
// 			opt_realamt.position.height = 65;
// 			opt_realamt.style.align = "right bottom";
// 		}else {
// 			opt_realamt.style.background.color = "";
// 			opt_realamt.position.left = 904;
// 			opt_realamt.position.top = 675;
// 			opt_realamt.position.width = 291;
// 			opt_realamt.position.height = 65;
// 			opt_realamt.style.align = "right bottom";
// 		}
	}
}
		
/**********************************************************************************
 * 함수명		: fnSetImage
 * 설  명		: 
 * argument		:
 * return Type	: 
 * 작성자		: 
**********************************************************************************/
function fnSetImage()
{
	if(utlf_isNull(ds_send_attach.getColumn(0, "filedata") || utlf_isNull(ds_send.getColumn(0, "rsrvdd")) || utlf_isNull(ds_send.getColumn(0, "rsrvno"))))
	{
		return false;
	}
	
	dsf_makeValue(ds_send, "healexamdetlflag", "string", ds_send.getColumn(0, "srchhealexamdetlflag"))
	var oParam = {};
		oParam.id          = "TXAHA04028";
		oParam.service     = "healthexamrsrvacptapp.RsrvAcpt";
		oParam.method      = "reqExeVisaPhot";
		oParam.inds        = "attach=ds_send_attach rsrvinfo=ds_send";
		oParam.outds       = "ds_=item";
		oParam.async       = false;
		oParam.callback    = "cf_TXAHA04028";

	tranf_submit(oParam);

	if(arErrorCode.pop("TXAHA04028") > -1)
	{
		fnGetImage();
	}
}

function cf_TXAHA04028(sSvcId, nErrorCode, sErrorMsg) 
{
	arErrorCode.push(sSvcId, nErrorCode);
    if(nErrorCode < 0) return;
}

/**********************************************************************************
 * 함수명		: fnGetImage
 * 설  명		: 
 * argument		: 
 * return Type	: 
 * 작성자		: 
**********************************************************************************/
function fnGetImage()
{
	ds_image_attachfile.clearData();
	if(!utlf_isNull(ds_main_info_rsrvacptinfo_item.getColumn(0, "visaphotpath")))
	{
		ds_send.setColumn(0, "visaphotpath", ds_main_info_rsrvacptinfo_item.getColumn(0, "visaphotpath"));
		dsf_makeValue(ds_send, "filepath", "string", ds_main_info_rsrvacptinfo_item.getColumn(0, "visaphotpath"));
		
		var oParam = {};
			oParam.id          = "TRAHA04017";
			oParam.service     = "healthexamrsrvacptapp.RsrvAcpt";
			oParam.method      = "reqGetVisaPhot";
			oParam.inds        = "req=ds_send";
			oParam.outds       = "ds_image_attachfile=attachfile";
			oParam.async       = false;
			//oParam.callback    = "cf_TRAHA04017";

		tranf_submit(oParam);
		
		dsf_makeValue(ds_image_attachfile, "image", "BLOB", ds_image_attachfile.getColumn(0, "filedata"));
	}
}

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

	ds_send_save.copyData(ds_main_info_rsrvacptinfo_item); 

	fCheckNodeExist("ds_send_save", "userid", true);
	fCheckNodeExist("ds_send_save", "instcd", true);

	ds_send_save.setColumn( 0, "userid", sysf_getUserId() );
	ds_send_save.setColumn( 0, "instcd", sysf_getUserInfo("dutplceinstcd") );
	dsf_makeValue( ds_send_save, "healexamdetlflag", "string", ds_send.getColumn(0, "srchhealexamdetlflag") );
	dsf_makeValue( ds_send_save, "healexamplacecd", "string", ds_init_place.getColumn(0, "healexamplacecd") );

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

	var oParam = {};
		oParam.id          = "TXAHA04034";
		oParam.service     = "healthexamrsrvacptapp.GnrlRsrvAcpt";
		oParam.method      = "reqExeGnrlAcptInfo";
		oParam.inds        = "save=ds_send_save";
		oParam.outds       = "";
		oParam.async       = false;
		//oParam.callback    = "cf_TXAHA04034";

	tranf_submit(oParam);

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

/**
*====================================================================================================================================.
@author 	: 심승욱
@version 	: 2007-04-20
@desc 		: 건진장소 설정 =>  추후 로그인 시 건진구분 세션관리가 되지 않을 경우를 대비.
@param 	: grid control id
@return 	:  C: 종건/ G :일건
====================================================================================================================================*/
function fGetHealExamPlaceFlag()
{
	var sFlag =  frmf_getMenuParam() ;
	var sFlagLen = parseInt(sFlag.length);
	
	if(sFlagLen <= 1) 
	{
		if(  utlf_isNull(sFlag) ) sFlag = "S";		
	}
	else 
	{
		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) {
		frmf_clearParameter("SPAHA03110_PARAM1");
		frmf_clearParameter("SPAHA03110_PARAM2");
		frmf_clearParameter("SPAHA03110_PARAM3");
		frmf_clearParameter("SPAHA03110_PARAM4");
		frmf_clearParameter("SPAHA03110_PARAM5");
		frmf_clearParameter("SPAHA03110_PARAM6");		
		
		frmf_setParameter ("SPAHA03110_PARAM1", vMultiYn);		
		frmf_setParameter ("SPAHA03110_PARAM2", vGrpCd);
		frmf_setParameter ("SPAHA03110_PARAM3", vCdId);
		frmf_setParameter ("SPAHA03110_PARAM4", vDesNodeSet);
		frmf_setParameter ("SPAHA03110_PARAM5", vDesNodeCd);
		frmf_setParameter ("SPAHA03110_PARAM6", vDesNodeNm);
		
		frmf_modal("SPAHA03110","SPAHA03110",null,"","","","","","","","","","M");
}


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

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