YNU_JEUS/app_home/himed/xpapps/ast/healexamreqxp/xp/SMAHA02900.xjs

<?xml version="1.0" encoding="utf-8"?>
<Script type="xscript4.0"><![CDATA[//=======================================================================================
// Global Form Variable
//---------------------------------------------------------------------------------------
var sw_h;
var sw_t;

function fInitUnco() 
{
	sw_h = switch1.position.height;
	sw_t = switch1.position.top;
	
	var arrParam = [{dsNm: "ds_init_initlst_R0001list_R0001", cdGrpId: "R0001"}
				   ,{dsNm: "ds_init_initlst_A0458list_A0458", cdGrpId: "A0458"}]
	appf_getCodeList(arrParam); 
	
	var curDt 		= utlf_getCurrentDate();
	var startdate 	= String(curDt).substring(0, 4) + "0101";
	
	ds_send_srchinfo.setColumn(0, "fromdd", startdate);
	ds_send_srchinfo.setColumn(0, "todd", curDt);
	
	 var arrParam 	= [{dsNm: "ds_init_baseinfo_initaddrinfo_R001", cdGrpId: "R001"}	];
	healGetCodeList(arrParam);	
	
	dsf_createDs("ds_init_addrinfo")
	
	dsf_makeValue(ds_init_addrinfo, "CF1", "string", ds_init_baseinfo_initaddrinfo_R001.lookup("cdid", "CF1", "cdnm"), 0);
	dsf_makeValue(ds_init_addrinfo, "CP1", "string", ds_init_baseinfo_initaddrinfo_R001.lookup("cdid", "CP1", "cdnm"), 0);
	dsf_makeValue(ds_init_addrinfo, "CP2", "string", ds_init_baseinfo_initaddrinfo_R001.lookup("cdid", "CP2", "cdnm"), 0);
	dsf_makeValue(ds_init_addrinfo, "E01", "string", ds_init_baseinfo_initaddrinfo_R001.lookup("cdid", "E01", "cdnm"), 0);
	dsf_makeValue(ds_init_addrinfo, "E02", "string", ds_init_baseinfo_initaddrinfo_R001.lookup("cdid", "E02", "cdnm"), 0);
	dsf_makeValue(ds_init_addrinfo, "E03", "string", ds_init_baseinfo_initaddrinfo_R001.lookup("cdid", "E03", "cdnm"), 0);
	dsf_makeValue(ds_init_addrinfo, "E04", "string", ds_init_baseinfo_initaddrinfo_R001.lookup("cdid", "E04", "cdnm"), 0);
	dsf_makeValue(ds_init_addrinfo, "K01", "string", ds_init_baseinfo_initaddrinfo_R001.lookup("cdid", "K01", "cdnm"), 0);
	dsf_makeValue(ds_init_addrinfo, "K02", "string", ds_init_baseinfo_initaddrinfo_R001.lookup("cdid", "K02", "cdnm"), 0);
	dsf_makeValue(ds_init_addrinfo, "K03", "string", ds_init_baseinfo_initaddrinfo_R001.lookup("cdid", "K03", "cdnm"), 0);
	dsf_makeValue(ds_init_addrinfo, "K04", "string", ds_init_baseinfo_initaddrinfo_R001.lookup("cdid", "K04", "cdnm"), 0);
	dsf_makeValue(ds_init_addrinfo, "PV1", "string", ds_init_baseinfo_initaddrinfo_R001.lookup("cdid", "PV1", "cdnm"), 0);
	dsf_makeValue(ds_init_addrinfo, "PV2", "string", ds_init_baseinfo_initaddrinfo_R001.lookup("cdid", "PV2", "cdnm"), 0);
	dsf_makeValue(ds_init_addrinfo, "VF1", "string", ds_init_baseinfo_initaddrinfo_R001.lookup("cdid", "VF1", "cdnm"), 0);
	dsf_makeValue(ds_init_addrinfo, "logoimg", "string", rptf_getImageURL("cmc"), 0);
	
	ds_init_send_inputitem.setColumn(0, "incomeamt", "0");
	ds_init_send_inputitem.setColumn(0, "ownincomeamt", "0");
	ds_init_send_inputitem.setColumn(0, "chngamt", "0");
	ds_init_send_inputitem.setColumn(0, "discamt", "0");
	
	fGetUserInfosSampling();
	
	switch1.case1.grd_cmpydetllst.setCellProperty("Head", 1, "text", 0);

	ds_send_cardcashdata_aprv.setColumn(0, "cashcardflag", "C");
	frmf_inputEnterKey("group5.rdo_cashcardflag", "onitemchanged", new ItemChangeEventInfo); 
}

function fGetUserInfosSampling()
{
	var sUserInfosS = sysf_getUserInfos(); 
	sUserInfosS = sUserInfosS + "|";
	var UserInfosS_Array = sUserInfosS.split("|");
	var userid        	 = UserInfosS_Array[0];  //사용자번호
	var usernm        	 = UserInfosS_Array[1];  //사용자이름
	var posinstcd     	 = UserInfosS_Array[2];  //소속기관코드
	var posinstnm     	 = UserInfosS_Array[3];  //소속기관명
	var posdeptcd     	 = UserInfosS_Array[4];  //소속부서코드
	var posdeptnm      	 = UserInfosS_Array[5];  //소속부서명
	
	if(utlf_isNull(userid) || userid == "" || userid == " " || userid == "-") userid = "pam";
	if(utlf_isNull(posinstcd) || posinstcd == "" || posinstcd == " " || posinstcd == "-") posinstcd = "012";
	
	dsf_makeValue(ds_init_session, "userid", "string", userid);
	dsf_makeValue(ds_init_session, "usernm", "string", usernm);
	dsf_makeValue(ds_init_session, "posinstcd", "string", posinstcd);
	dsf_makeValue(ds_init_session, "posinstnm", "string", posinstnm);
	dsf_makeValue(ds_init_session, "posdeptcd", "string", posdeptcd);
	dsf_makeValue(ds_init_session, "posdeptnm", "string", posdeptnm);
}

function fSetGrdSize(vStat,vLoc )
{
	var gap = 30;
	var h_uGrd = grd_cmpylst.position.height;
	var top_uGrd = grd_cmpylst.position.top;
	
	var h_dGrd = switch1.position.height;
	var top_btn = btn_ularge.position.top;
	
	var h_btn = btn_ularge.position.height;

	if(vLoc == "U")	 
	{
		btn_usmall.visible = vStat;
		btn_ularge.visible = !vStat;
		btn_dsamll.visible = !vStat;
		btn_dlarge.visible = !vStat;
		switch1.visible = !vStat;
		switch1.case1.grd_cmpydetllst.visible = !vStat;
		btn_detlexcel.visible = !vStat;
		
		if(vStat == true) 
		{	
			grd_cmpylst.position.height = gap + h_uGrd + h_dGrd;
			grd_cmpylst.bringToFront();
		}
		else 
		{
			grd_cmpylst.position.height = h_uGrd - gap - h_dGrd;
		}
	}
	else if(vLoc == "D") 
	{
		btn_usmall.visible = !vStat;
		btn_ularge.visible = !vStat;
		btn_dsamll.visible = vStat;
		btn_dlarge.visible = !vStat;
		grd_cmpylst.visible = !vStat;
		btn_cmpyexcel.visible = !vStat;
		
		if(vStat == true) 
		{
			btn_dsamll.position.top = btn_ularge.position.top;
			btn_dsamll.position.height = btn_ularge.position.height;
			btn_detlexcel.position.top = cam_clam.position.top-6;
			btn_detlexcel.position.height = 22
			btn_dsamll.anchor = "top right";
			btn_detlexcel.anchor = "top right";
 			
			switch1.position.top = cam_clam.position.top-6;
			switch1.position.height = gap + h_uGrd + h_dGrd;
			
			
			cam_clam.visible = false;
			switch1.bringToFront();
			btn_dsamll.bringToFront();	
		}
		else 
		{	
			cam_clam.visible = true;
			
 			switch1.position.top = sw_t
 			switch1.position.height = sw_h;
 			
 			btn_detlexcel.position.top = btn_dlarge.position.top-2;
 			btn_detlexcel.position.bottom = btn_dlarge.position.bottom;
 			btn_dsamll.anchor = "right bottom";
			btn_detlexcel.anchor = "right bottom";
			
 			switch1.sendToBack();			
		}
	}
}

function fAfterChangeCardNo()
{
	if (String(group5.ipt_cardno.value).length >16) 
	{
		if(String(group5.ipt_cardno.value).indexOf("=") > 0)
		{
			var vSwipeData 		= "";
			var vCardno_array 	= "";
			var vCardno 			= "";
			
			vSwipeData = String(group5.ipt_cardno.value);
			
			if ( vSwipeData.indexOf("?") >= 0 ) 
			{
				vSwipeData = (vSwipeData).substr(1,37);
			}
			if ( vSwipeData.indexOf("/") >= 0 ) 
			{
				vSwipeData = (vSwipeData).substr(1,37);
			}
			
			ds_send_cardcashdata_aprv.setColumn(0, "swipedata", vSwipeData);
			vCardno_array = vSwipeData.split("=");
			vCardno = vCardno_array[0];
			
			if ( vCardno.indexOf("?") >= 0 ) 
			{
				vCardno = (vCardno).substr(1,16);
			}
			if ( vCardno.indexOf("/") >= 0 ) 
			{
				vCardno = (vCardno).substr(1,16);
			}
			
			var vValiterm = (vCardno_array[1]).substr(0,4);
			ds_send_cardcashdata_aprv.setColumn(0, "cardcashno" 	, vCardno);
			ds_send_cardcashdata_aprv.setColumn(0, "keyinptflag" 	, "S");
			ds_send_cardcashdata_aprv.setColumn(0, "valiterm" 	, vValiterm);
			ds_send_cardcashdata_aprv.setColumn(0, "allotmm" 	, "00");
		}
	}
	else if(String(group5.ipt_cardno.value).length == 16)
	{
		ds_send_cardcashdata_aprv.setColumn(0, "cardcashno", group5.ipt_cardno.value);
		ds_send_cardcashdata_aprv.setColumn(0, "keyinptflag", "K");
		ds_send_cardcashdata_aprv.setColumn(0, "allotmm", "00");
	}
}


function fAfterChangeCashNo()
{
	ds_send_cardcashdata_aprv.setColumn(0, "cardcashno", group5.ipt_cardno.value);
	var cardno =  ds_send_cardcashdata_aprv.getColumn(0, "cardcashno");
	if(String(cardno).length > 18)
	{
		if((cardno).indexOf("=") > 0 )
		{
			var vSwipeData 		= "";
			var vCardno_array 	= "";
			var vCardno 			= "";
			
			vSwipeData =  cardno;

			if(vSwipeData.indexOf("?") >= 0)
			{
				vSwipeData = (vSwipeData).substr(1,37);
			}
			if(vSwipeData.indexOf("/") >= 0)
			{
				vSwipeData = (vSwipeData).substr(1,37);
			}
			vSwipeData = vSwipeData.getRightPad(40, " ");
			
			ds_send_cardcashdata_aprv.setColumn(0, "swipedata" 		, vSwipeData);
			
			vCardno_array = vSwipeData.split("=");
			vCardno = vCardno_array[0];
			
			if(vCardno.indexOf("?") >= 0)
			{
				vCardno = (vCardno).substr(1,16);
			}
			
			var vValiterm = (vCardno_array[1]).substr(0, 4);
			ds_send_cardcashdata_aprv.setColumn(0, "cardcashno" 	, vCardno);
			ds_send_cardcashdata_aprv.setColumn(0, "keyinptflag" 	, "S");
			ds_send_cardcashdata_aprv.setColumn(0, "qualcnfmflag" 	, "3");
			ds_send_cardcashdata_aprv.setColumn(0, "allotmm" 	, ds_send_cardcashdata_aprv.getColumn(0, "indinstflag"));
		}
	}
	else if (String(cardno).length == 16 || String(cardno).length == 15 || String(cardno).length == 18)
	{
		var vSwipeData = "";
		vSwipeData = cardno+"=";
		vSwipeData = vSwipeData.getRightPad(40, " ");
		
		ds_send_cardcashdata_aprv.setColumn(0, "swipedata" 				, vSwipeData);
		ds_send_cardcashdata_aprv.setColumn(0, "keyinptflag" 			, "K");
		ds_send_cardcashdata_aprv.setColumn(0, "qualcnfmflag" 			, "3");
	}
	else
	{
		var vSwipeData = "";
		vSwipeData = cardno+"=";					
		vSwipeData = vSwipeData.getRightPad(40, " ");
		
		ds_send_cardcashdata_aprv.setColumn(0, "swipedata" 				, vSwipeData);
		ds_send_cardcashdata_aprv.setColumn(0, "keyinptflag" 			, "K");
		
		if(String(cardno).length == 13)
		{
			ds_send_cardcashdata_aprv.setColumn(0, "qualcnfmflag", "1");
		}
		else
		{
			if( cardno.substr(0,3)  == "010" || cardno.substr(0,3)  == "011" || cardno.substr(0,3)  == "016" || cardno.substr(0,3)  == "017" ||
				cardno.substr(0,4)  == "0130"|| cardno.substr(0,3)  == "018" || cardno.substr(0,3)  == "019")
			{
				ds_send_cardcashdata_aprv.setColumn(0, "qualcnfmflag" 	, "2");
			}
			else
			{
				ds_send_cardcashdata_aprv.setColumn(0, "qualcnfmflag", "4");
			}
		}
	}
}

function fCashReceiptB(flag)
{
	if(flag == "I")
	{
		var cashamt 		= ds_send_cardcashdata_aprv.getColumn(0, "depoAmt");
		var req_cash   		= ds_van_tmp_cash_req_cash;
		var rcv_cash   		= ds_van_tmp_cash_rcv_cash;
		var pid        		= "3134314";
		var ordtype    		= "H";
		var indinstflag		= ds_send_cardcashdata_aprv.getColumn(0, "indinstflag");
		var qualcnfmno		= ds_send_cardcashdata_aprv.getColumn(0, "cardcashno");
		var keyinptflag 	= ds_send_cardcashdata_aprv.getColumn(0, "keyinptflag");
		var swipedata 		= "";
		if(keyinptflag == "S")
		{
			swipedata = ds_send_cardcashdata_aprv.getColumn(0, "swipedata");
		}
		var qualcnfmflag	= ds_send_cardcashdata_aprv.getColumn(0, "qualcnfmflag");
		
		ds_van_tmp_cash_rcv_cash.clearData();
		ds_van_tmp_cash_req_cash.clearData();
		
		
		
		var parm = new Object();
			parm.multiCnt = 0; 		// 외래등록의 멀티접수인 경우만 해당멀티건수 나머지는 default '0'으로 세팅
			parm.dsMultiSend = "";		// 외래등록의 멀티접수인 경우 Opener로부터 받은 OPMI(데이터셋)
			parm.totRcptAmt = cashamt;   	// 수납대상금액
			parm.dsStrSend = req_cash; 	  	// Opener로부터 받은 수납내역(데이터셋)
			parm.dsStrRcv = rcv_cash;		// Opener에게 보내기 위한 수납내역(데이터셋)
			parm.pid = pid;			  	// 등록번호
			parm.ordType = ordtype; 	  	// 입원외래구분
			parm.keyinptflag = keyinptflag;  	// 키입력구분(S : 카드 / K : 입력)
			parm.indinstflag = indinstflag;  	// 개인법인구분
			parm.qualcnfmno = qualcnfmno;   	// 신분확인번호
			parm.swipedata = swipedata; 	  	// 트랙DATA(카드사용시)
			parm.orddd = "";			// 진료일자(입원 : 입원일자)			
			parm.qualcnfmflag = qualcnfmflag; 	// 신분확인구분(주민번호, 전화번호, 카드, 사업자번호)
			parm.flag = "";			// 입원외래 카드VAN 정보 구분
			parm.rtn = "";				// 현금영수증내역 변경사항 여부
		
		frmf_setParameter("SPPAO00500_PARM", parm);
		frmf_setParameter("SPPAO00500_FLAG", "I");	
		
		var ivrObjt = ivr_cashpopup.url;
	        
		if (utlf_isNull(ivrObjt)) 
		{
			ivr_cashpopup.url = "pam_pamcomnxp::SPPAO00501_현금영수증승인.xfdl";
		}

		ivr_cashpopup.objPam = parm;
		ivr_cashpopup.fInit();
		
		var retMsg = false;
			
		retMsg = ivr_cashpopup.fAutoGetCashAprv();
		ivr_cashpopup.url = "";
			
		if (retMsg == false) 
		{
			return false;
		}

		dsf_makeValue(ds_sendincm_cardcash, "vangb", "string", ds_van_tmp_cash_rcv_cash.getColumn(0, "cash_vancd"));
		dsf_makeValue(ds_sendincm_cardcash, "ordergb", "string", ds_van_tmp_cash_rcv_cash.getColumn(0, "cash_aprvflag"));
		dsf_makeValue(ds_sendincm_cardcash, "mdate", "string", ds_van_tmp_cash_rcv_cash.getColumn(0, "cash_aprvdd"));
		dsf_makeValue(ds_sendincm_cardcash, "seqno", "string", ds_van_tmp_cash_rcv_cash.getColumn(0, "cash_seqno"));
		dsf_makeValue(ds_sendincm_cardcash, "pano", "string", ds_van_tmp_cash_rcv_cash.getColumn(0, "cash_pid"));
		dsf_makeValue(ds_sendincm_cardcash, "clientid", "string", ds_van_tmp_cash_rcv_cash.getColumn(0, "cash_clientid"));
		dsf_makeValue(ds_sendincm_cardcash, "replystat", "string", ds_van_tmp_cash_rcv_cash.getColumn(0, "cash_replystat"));
		dsf_makeValue(ds_sendincm_cardcash, "approvaldate", "string", ds_van_tmp_cash_rcv_cash.getColumn(0, "cash_aprvdd"));
		dsf_makeValue(ds_sendincm_cardcash, "approvaltime", "string", ds_van_tmp_cash_rcv_cash.getColumn(0, "cash_aprvtm"));
		dsf_makeValue(ds_sendincm_cardcash, "approvalno", "string", ds_van_tmp_cash_rcv_cash.getColumn(0, "cash_aprvno"));
		dsf_makeValue(ds_sendincm_cardcash, "bankid", "string", "");
		dsf_makeValue(ds_sendincm_cardcash, "bankseqno", "string", "");
		dsf_makeValue(ds_sendincm_cardcash, "bankname", "string", "");
		dsf_makeValue(ds_sendincm_cardcash, "memberno", "string", "");
		dsf_makeValue(ds_sendincm_cardcash, "publishbank", "string", ds_van_tmp_cash_rcv_cash.getColumn(0, "cash_publishbank"));
		dsf_makeValue(ds_sendincm_cardcash, "vanseqno", "string", "");
		dsf_makeValue(ds_sendincm_cardcash, "cardname", "string", "");
		//2018/06/19 이정택 수정
		//dsf_makeValue(ds_sendincm_cardcash, "cardcashno", "string", qualcnfmno);
		dsf_makeValue(ds_sendincm_cardcash, "cardcashno", "string", ds_van_tmp_cash_rcv_cash.getColumn(0, "cash_qualcnfmno"));
		//2018/06/19 이정택 수정
		dsf_makeValue(ds_sendincm_cardcash, "cardcmpycd", "string", "");
		dsf_makeValue(ds_sendincm_cardcash, "incomeamt", "string", ds_send_cardcashdata_aprv.getColumn(0, "depoAmt"));
		dsf_makeValue(ds_sendincm_cardcash, "keyinptflag", "string", keyinptflag);
		dsf_makeValue(ds_sendincm_cardcash, "valiterm", "string", qualcnfmflag);
		dsf_makeValue(ds_sendincm_cardcash, "allotmm", "string", indinstflag);
		frmf_setParameter("SPPAO02101_ELCTSIGNKEY", "");
		frmf_setParameter("SPPAO02101_ELCTSIGNCNTS", "");
		return true;		
	}
	else if(flag=="D")
	{
		var selrow 			= ds_main_cmpydetllst_incmlst.rowposition;
		var grd_name		= ds_main_cmpydetllst_incmlst;
		var pid        		= "3134314";
		var orddd      		= "";
		var cretno     		= "";
		var orddeptcd		= "";
		var ordtype    		= "H";
		var keyinptflag  	= grd_name.getColumn(selrow, "keyinptflag");
		var swipedata 	  	= "";
		var qualcnfmflag	= "4";
		var indinstflag 	= grd_name.getColumn(selrow, "allotmm");
		var qualcnfmno 		= grd_name.getColumn(selrow, "cardcashno");
		var cashamt 		= grd_name.getColumn(selrow, "incomeamt");
		
		ds_van_tmp_cash_req_cash.clearData();
		ds_van_tmp_cash_rcv_cash.clearData();

		dsf_makeValue(ds_van_tmp_cash_req_cash, "cash_pid", "string", pid);
		dsf_makeValue(ds_van_tmp_cash_req_cash, "cash_rcptdd", "string", "");
		dsf_makeValue(ds_van_tmp_cash_req_cash, "cash_rcptno", "string", "");
		dsf_makeValue(ds_van_tmp_cash_req_cash, "cash_rcptseqno", "string", "");
		dsf_makeValue(ds_van_tmp_cash_req_cash, "cash_seqno", "string", "");
		dsf_makeValue(ds_van_tmp_cash_req_cash, "cash_instcd", "string", "");
		dsf_makeValue(ds_van_tmp_cash_req_cash, "cash_rcptstat", "string", "Y");
		dsf_makeValue(ds_van_tmp_cash_req_cash, "cash_ordtype", "string", "H");
		dsf_makeValue(ds_van_tmp_cash_req_cash, "cash_keyinptflag", "string", keyinptflag);
		dsf_makeValue(ds_van_tmp_cash_req_cash, "cash_indinstflag", "string", indinstflag);
		dsf_makeValue(ds_van_tmp_cash_req_cash, "cash_qualcnfmflag", "string", qualcnfmflag);
		dsf_makeValue(ds_van_tmp_cash_req_cash, "cash_qualcnfmno", "string", qualcnfmno);
		dsf_makeValue(ds_van_tmp_cash_req_cash, "cash_aprvflag", "string", grd_name.getColumn(selrow, "aprvflag"));
		dsf_makeValue(ds_van_tmp_cash_req_cash, "cash_aprvno", "string", grd_name.getColumn(selrow, "aprvno"));
		dsf_makeValue(ds_van_tmp_cash_req_cash, "cash_aprvdd", "string", grd_name.getColumn(selrow, "aprvdd"));
		dsf_makeValue(ds_van_tmp_cash_req_cash, "cash_aprvtm", "string", grd_name.getColumn(selrow, "aprvtm"));
		dsf_makeValue(ds_van_tmp_cash_req_cash, "cash_cashamt", "string", cashamt);
		dsf_makeValue(ds_van_tmp_cash_req_cash, "cash_rcptexecdd", "string", "");
		dsf_makeValue(ds_van_tmp_cash_req_cash, "cash_rcpttm", "string", "");
		dsf_makeValue(ds_van_tmp_cash_req_cash, "cash_rcptrid", "string", "");
		dsf_makeValue(ds_van_tmp_cash_req_cash, "cash_preamtyn", "string", "");
		dsf_makeValue(ds_van_tmp_cash_req_cash, "cash_innrtretyn", "string", "");
		dsf_makeValue(ds_van_tmp_cash_req_cash, "cash_fstrgstrid", "string", "");
		dsf_makeValue(ds_van_tmp_cash_req_cash, "cash_fstrgstdt", "string", "");
		dsf_makeValue(ds_van_tmp_cash_req_cash, "cash_lastupdtrid", "string", "");
		dsf_makeValue(ds_van_tmp_cash_req_cash, "cash_lastupdtdt", "string", "");
		//2018/06/19 이정택 추가
		dsf_makeValue(ds_van_tmp_cash_req_cash, "cash_aprvunino", "string", grd_name.getColumn(selrow, "aprvunino"));
		//2018/06/19 이정택 추가
		
		
		var req_cash   	= ds_van_tmp_cash_req_cash;
		var rcv_cash   	= ds_van_tmp_cash_rcv_cash;
		
		var parm = new Object();
			parm.pid = pid;			  	// 등록번호
			parm.ordType = ordtype; 	  	// 입원외래구분
			parm.keyinptflag = keyinptflag;  	// 키입력구분(S : 카드 / K : 입력)
			parm.indinstflag = indinstflag;  	// 개인법인구분
			parm.qualcnfmno = qualcnfmno;   	// 신분확인번호
			parm.swipedata = swipedata; 	  	// 트랙DATA(카드사용시)
			parm.dsStrSend = req_cash; 	  	// Opener로부터 받은 수납내역(데이터셋)
			parm.dsStrRcv = rcv_cash;		// Opener에게 보내기 위한 수납내역(데이터셋)
			parm.orddd = "";			// 진료일자(입원 : 입원일자)
			parm.totRcptAmt = cashamt;   	// 수납대상금액
			parm.multiCnt = 0; 		// 외래등록의 멀티접수인 경우만 해당멀티건수 나머지는 default '0'으로 세팅
			parm.dsMultiSend = "";		// 외래등록의 멀티접수인 경우 Opener로부터 받은 OPMI(데이터셋)
			parm.qualcnfmflag = qualcnfmflag; 	// 신분확인구분(주민번호, 전화번호, 카드, 사업자번호)
			parm.flag = "";			// 입원외래 카드VAN 정보 구분
			parm.rtn = "";				// 현금영수증내역 변경사항 여부
		
		frmf_setParameter("SPPAO00500_PARM", parm);
		frmf_setParameter("SPPAO00500_FLAG", "D");	
		
		var ivrObjt = ivr_cashpopup.url;
	        
		if (utlf_isNull(ivrObjt)) 
		{
			ivr_cashpopup.url = "pam_pamcomnxp::SPPAO00501_현금영수증승인.xfdl";
		}
		
		ivr_cashpopup.objPam = parm;
		ivr_cashpopup.fInit();
			
		var retMsg = false;
	
		retMsg = ivr_cashpopup.fAutoCnclCashAprv();

		if (retMsg == false) 
		{
			return false
		}
		else
		{
			
			dsf_makeValue(ds_sendincm_cardcash, "vangb", "string", ds_van_tmp_cash_rcv_cash.getColumn(0, "cash_vancd"));
			dsf_makeValue(ds_sendincm_cardcash, "ordergb", "string", ds_van_tmp_cash_rcv_cash.getColumn(0, "cash_aprvflag"));
			dsf_makeValue(ds_sendincm_cardcash, "mdate", "string", ds_van_tmp_cash_rcv_cash.getColumn(0, "cash_aprvdd"));
			dsf_makeValue(ds_sendincm_cardcash, "seqno", "string", ds_van_tmp_cash_rcv_cash.getColumn(0, "cash_seqno"));
			dsf_makeValue(ds_sendincm_cardcash, "pano", "string", ds_van_tmp_cash_rcv_cash.getColumn(0, "cash_pid"));
			dsf_makeValue(ds_sendincm_cardcash, "clientid", "string", ds_van_tmp_cash_rcv_cash.getColumn(0, "cash_clientid"));
			dsf_makeValue(ds_sendincm_cardcash, "replystat", "string", ds_van_tmp_cash_rcv_cash.getColumn(0, "cash_replystat"));
			dsf_makeValue(ds_sendincm_cardcash, "approvaldate", "string", ds_van_tmp_cash_rcv_cash.getColumn(0, "cash_aprvdd"));
			dsf_makeValue(ds_sendincm_cardcash, "approvaltime", "string", ds_van_tmp_cash_rcv_cash.getColumn(0, "cash_aprvtm"));
			dsf_makeValue(ds_sendincm_cardcash, "approvalno", "string", ds_van_tmp_cash_rcv_cash.getColumn(0, "cash_aprvno"));
			dsf_makeValue(ds_sendincm_cardcash, "bankid", "string", "");
			dsf_makeValue(ds_sendincm_cardcash, "bankseqno", "string", "");
			dsf_makeValue(ds_sendincm_cardcash, "bankname", "string", "");
			dsf_makeValue(ds_sendincm_cardcash, "memberno", "string", "");
			dsf_makeValue(ds_sendincm_cardcash, "publishbank", "string", ds_van_tmp_cash_rcv_cash.getColumn(0, "cash_publishbank"));
			dsf_makeValue(ds_sendincm_cardcash, "vanseqno", "string", "");
			dsf_makeValue(ds_sendincm_cardcash, "cardname", "string", "");
			dsf_makeValue(ds_sendincm_cardcash, "cardcashno", "string", qualcnfmno);
			dsf_makeValue(ds_sendincm_cardcash, "cardcmpycd", "string", "");
			dsf_makeValue(ds_sendincm_cardcash, "incomeamt", "string", cashamt);
			dsf_makeValue(ds_sendincm_cardcash, "keyinptflag", "string", keyinptflag);
			dsf_makeValue(ds_sendincm_cardcash, "valiterm", "string", qualcnfmflag);
			dsf_makeValue(ds_sendincm_cardcash, "allotmm", "string", indinstflag);
		}
		return true;
	}
}

function fCashReceiptK(flag)
{
	if(flag=="I")
	{
		var keyinptflag  	= ds_send_cardcashdata_aprv.getColumn(0, "keyinptflag");
		var qualcnfmflag	= ds_send_cardcashdata_aprv.getColumn(0, "qualcnfmflag");
		var indinstflag 	= ds_send_cardcashdata_aprv.getColumn(0, "indinstflag");
		var qualcnfmno 		= "";
		var swipedata 	  	= "";
		
		for(var i = 0; i < ds_main_cmpydetllst_item.rowcount; i++)
		{
			if(ds_main_cmpydetllst_item.getColumn(i, "sel") != "Y")
			{
				continue;
			}
			
			var pid        		= ds_main_cmpydetllst_item.getColumn(i, "pid");
			var orddd      		= ds_main_cmpydetllst_item.getColumn(i, "hopedd");
			var cretno     		= "";
			var orddeptcd		= "";
			var ordtype    		= "H";
			qualcnfmno 			= String(dsf_getColumnNullToEmpty(ds_main_cmpydetllst_item, i, "rrgstno")).replace("-", "");
			var cashamt 		= String(dsf_getColumnNullToEmpty(ds_main_cmpydetllst_item, i, "incomeamt")).replace(",", "");
			
			ds_van_tmp_cash_rcv_cash.clearData();
			ds_van_tmp_cash_req_cash.clearData();
			
			var req_cash   	= ds_van_tmp_cash_req_cash;
			var rcv_cash   	= ds_van_tmp_cash_rcv_cash;
			
			var parm = new Object();
				parm.multiCnt = 0; 		// 외래등록의 멀티접수인 경우만 해당멀티건수 나머지는 default '0'으로 세팅
				parm.dsMultiSend = "";		// 외래등록의 멀티접수인 경우 Opener로부터 받은 OPMI(데이터셋)
				parm.totRcptAmt = cashamt;   	// 수납대상금액
				parm.dsStrSend = req_cash; 	  	// Opener로부터 받은 수납내역(데이터셋)
				parm.dsStrRcv = rcv_cash;		// Opener에게 보내기 위한 수납내역(데이터셋)
				parm.pid = pid;			  	// 등록번호
				parm.ordType = ordtype; 	  	// 입원외래구분
				parm.keyinptflag = keyinptflag;  	// 키입력구분(S : 카드 / K : 입력)
				parm.indinstflag = indinstflag;  	// 개인법인구분
				parm.qualcnfmno = qualcnfmno;   	// 신분확인번호
				parm.swipedata = swipedata; 	  	// 트랙DATA(카드사용시)
				parm.orddd = orddd; //""			// 진료일자(입원 : 입원일자)
				parm.qualcnfmflag = qualcnfmflag; 	// 신분확인구분(주민번호, 전화번호, 카드, 사업자번호)
				parm.flag = "";			// 입원외래 카드VAN 정보 구분
				parm.rtn = "";				// 현금영수증내역 변경사항 여부
			
			frmf_setParameter("SPPAO00500_PARM", parm);
			frmf_setParameter("SPPAO00500_FLAG", "I");	
			
			var ivrObjt = ivr_cashpopup.url;
				
			if (utlf_isNull(ivrObjt)) 
			{
				ivr_cashpopup.url = "pam_pamcomnxp::SPPAO00501_현금영수증승인.xfdl";
			}
			
			ivr_cashpopup.objPam = parm;
			ivr_cashpopup.fInit();
			
			var retMsg = false;
			
			retMsg = ivr_cashpopup.fAutoGetCashAprv();
			
			if (retMsg == false) 
			{
				return false;
			}
		}
		
		dsf_makeValue(ds_sendincm_cardcash, "vangb", "string", ds_van_tmp_cash_rcv_cash.getColumn(0, "cash_vancd"));
		dsf_makeValue(ds_sendincm_cardcash, "ordergb", "string", ds_van_tmp_cash_rcv_cash.getColumn(0, "cash_aprvflag"));
		dsf_makeValue(ds_sendincm_cardcash, "mdate", "string", ds_van_tmp_cash_rcv_cash.getColumn(0, "cash_aprvdd"));
		dsf_makeValue(ds_sendincm_cardcash, "seqno", "string", ds_van_tmp_cash_rcv_cash.getColumn(0, "cash_seqno"));
		dsf_makeValue(ds_sendincm_cardcash, "pano", "string", ds_van_tmp_cash_rcv_cash.getColumn(0, "cash_pid"));
		dsf_makeValue(ds_sendincm_cardcash, "clientid", "string", ds_van_tmp_cash_rcv_cash.getColumn(0, "cash_clientid"));
		dsf_makeValue(ds_sendincm_cardcash, "replystat", "string", ds_van_tmp_cash_rcv_cash.getColumn(0, "cash_replystat"));
		dsf_makeValue(ds_sendincm_cardcash, "approvaldate", "string", ds_van_tmp_cash_rcv_cash.getColumn(0, "cash_aprvdd"));
		
		dsf_makeValue(ds_sendincm_cardcash, "approvaltime", "string", ds_van_tmp_cash_rcv_cash.getColumn(0, "cash_aprvtm"));
		dsf_makeValue(ds_sendincm_cardcash, "approvalno", "string", ds_van_tmp_cash_rcv_cash.getColumn(0, "cash_aprvno"));
		dsf_makeValue(ds_sendincm_cardcash, "bankid", "string", "");
		dsf_makeValue(ds_sendincm_cardcash, "bankseqno", "string", "");
		dsf_makeValue(ds_sendincm_cardcash, "bankname", "string", "");
		dsf_makeValue(ds_sendincm_cardcash, "memberno", "string", "");
		dsf_makeValue(ds_sendincm_cardcash, "publishbank", "string", ds_van_tmp_cash_rcv_cash.getColumn(0, "cash_publishbank"));
		dsf_makeValue(ds_sendincm_cardcash, "vanseqno", "string", "");
		dsf_makeValue(ds_sendincm_cardcash, "cardname", "string", "");
		//2018/06/19 IC결제관련 프로그램 수정
		//dsf_makeValue(ds_sendincm_cardcash, "cardcashno", "string", qualcnfmno);
		dsf_makeValue(ds_sendincm_cardcash, "cardcashno", "string", ds_van_tmp_cash_rcv_cash.getColumn(0, "cash_qualcnfmno"));
		//2018/06/19 IC결제관련 프로그램 수정
		dsf_makeValue(ds_sendincm_cardcash, "cardcmpycd", "string", "");
		dsf_makeValue(ds_sendincm_cardcash, "incomeamt", "string", ds_send_cardcashdata_aprv.getColumn(0, "depoAmt"));
		dsf_makeValue(ds_sendincm_cardcash, "keyinptflag", "string", keyinptflag);
		dsf_makeValue(ds_sendincm_cardcash, "valiterm", "string", qualcnfmflag);
		dsf_makeValue(ds_sendincm_cardcash, "allotmm", "string", indinstflag);
				
		frmf_setParameter("SPPAO02101_ELCTSIGNKEY", "");
		frmf_setParameter("SPPAO02101_ELCTSIGNCNTS", "");
		return true;		
	}
	else if(flag=="D")
	{
		
	}
}

/*-**************************************************************************************
 * Argument			: flag (I/D)
 * Description		: 카드 승인
 *					: 카드승인로직 원무 일원화 작업(2017/10/16)
 ****************************************************************************************/
function fCardReceipt(flag) {
	if(flag == "I")	{
		var parm;
		var pid        	= "3134314";
		var orddd      	= "";
		var cretno     	= "";
		var orddeptcd	= "";
		var strRcvVan  	= "";		
		var ordtype    	= "H"
		var fromdd     	= "";
		var todd       	= "";
		var cardAmt    	= ds_send_cardcashdata_aprv.getColumn(0, "depoAmt");
		var cardno      = ds_send_cardcashdata_aprv.getColumn(0, "cardcashno");
		var valiterm    = ds_send_cardcashdata_aprv.getColumn(0, "valiterm");
		var allotmm     = ds_send_cardcashdata_aprv.getColumn(0, "allotmm");
		var keyinptflag = ds_send_cardcashdata_aprv.getColumn(0, "keyinptflag");
		var swipedata   = ds_send_cardcashdata_aprv.getColumn(0, "swipedata");
		
		ds_van_tmp_card_rcv_card.clearData();
		ds_van_tmp_card_req_card.clearData();
		
		var req_card	= ds_van_tmp_card_req_card;
		var rcv_card	= ds_van_tmp_card_rcv_card;
		
		var parm = new Object();
			parm.multiCnt = 0;     				// 외래등록의 멀티접수인 경우만 해당멀티건수 나머지는 default '0'으로 세팅
			parm.dsMultiSend = "";  			// 외래등록 멀티접수인 경우만 각각의 본인부담액을 보낸다. 나머지는 '-'
			parm.rcptdd = "";       			// 영수일자
			parm.rcptNo = "";       			// 영수번호
			parm.rcptSeqNo = "";     			// 영수일련번호
			parm.totRcptAmt = cardAmt; 			// 수납대상금액
			parm.dsStrSend = req_card;			// Opener가 가지고 있던 카드내역
			parm.dsStrRcv = rcv_card;			// Opener에 보내기 위한 카드내역(Opener에서 카드내역을 받기 위한 데이터셋)
			parm.pid = pid; 					// 등록번호
			parm.orddd = orddd;					// 진료일자
			parm.cretNo = cretno;      			// 진료생성번호
			parm.dsStrRcvVan = strRcvVan;
			parm.ordType = ordtype;      		// 진료구분
			parm.fromdd = fromdd;      			// 시작일자
			parm.todd = todd;         			// 종료일자
			parm.ordDeptCd = orddeptcd;    		// 진료과
			parm.cardNo = cardno;     			// 카드번호
			parm.valiterm = valiterm;   		// 유효기간
			parm.allotmm = utlf_isNull(allotmm)?'00':allotmm;    			// 할부(NULL인경우는 00(일시불)로 세팅처리)
			parm.keyInptFlag = keyinptflag;		// 키입력구분
			parm.swipeData = swipedata;  		// 단말기로부터 넘어온 카드정보
			parm.flag = "";
			parm.multiCnt = "";     			// 외래등록의 멀티접수인 경우만 해당멀티건수 나머지는 default '0'으로 세팅
			parm.COTPT = "";        			// 멀티접수 개별 변경/취소 위해 필요 - 외래등록/수납
			parm.rtnType = "A";					// 리턴시 노드 전체 리턴 OR 일부만 리턴여부판별
			parm.pregDmndYN = "";				// 산전진료비지원 카드승인여부
			parm.rtn = "";
			parm.preCashAmt = "";				//기현금액
			parm.preCardAmt = "";				//기현금액
				
		frmf_setParameter("SPPAO00400_PARM",parm);
		frmf_setParameter("SPPAO00400_FLAG", "I");
		frmf_setParameter("SPPAO00400_RTNTYPE", "A");
				
		var ivrObjt = ivr_cashpopup.url;
	        
		if (utlf_isNull(ivrObjt)) 
		{
			ivr_cashpopup.url = "pam_pamcomnxp::SPPAO00400_신용카드승인.xfdl";
		}
		
		ivr_cashpopup.objPam = parm;
		ivr_cashpopup.fInit();
		var retMsg = ivr_cashpopup.fAutoGetCardAprv(); 

		if(retMsg == false) {
			return false;
		} else {
			dsf_makeValue( ds_sendincm_cardcash, "vangb", "string",  		ds_van_tmp_card_rcv_card.getColumn(0, "card_vancd"));
			dsf_makeValue( ds_sendincm_cardcash, "ordergb", "string",  		ds_van_tmp_card_rcv_card.getColumn(0, "card_aprvflag"));
			dsf_makeValue( ds_sendincm_cardcash, "mdate", "string",  		ds_van_tmp_card_rcv_card.getColumn(0, "card_aprvdd"));
			dsf_makeValue( ds_sendincm_cardcash, "seqno", "string",  		ds_van_tmp_card_rcv_card.getColumn(0, "card_seqno"));
			dsf_makeValue( ds_sendincm_cardcash, "pano", "string",  		ds_van_tmp_card_rcv_card.getColumn(0, "card_pid"));
			dsf_makeValue( ds_sendincm_cardcash, "clientid", "string",  	ds_van_tmp_card_rcv_card.getColumn(0, "card_clientid"));
			dsf_makeValue( ds_sendincm_cardcash, "replystat", "string",  	ds_van_tmp_card_rcv_card.getColumn(0, "card_replystat"));
			dsf_makeValue( ds_sendincm_cardcash, "approvaldate", "string",  ds_van_tmp_card_rcv_card.getColumn(0, "card_aprvdd"));
			dsf_makeValue( ds_sendincm_cardcash, "approvaltime", "string",  ds_van_tmp_card_rcv_card.getColumn(0, "card_aprvtm"));
			dsf_makeValue( ds_sendincm_cardcash, "approvalno", "string",  	ds_van_tmp_card_rcv_card.getColumn(0, "card_aprvno"));
			dsf_makeValue( ds_sendincm_cardcash, "bankid", "string",  		ds_van_tmp_card_rcv_card.getColumn(0, "card_bankid"));
			dsf_makeValue( ds_sendincm_cardcash, "bankseqno", "string",  	ds_van_tmp_card_rcv_card.getColumn(0, "card_bankseqno"));
			dsf_makeValue( ds_sendincm_cardcash, "bankname", "string",  	ds_van_tmp_card_rcv_card.getColumn(0, "card_bankname"));
			dsf_makeValue( ds_sendincm_cardcash, "memberno", "string",  	ds_van_tmp_card_rcv_card.getColumn(0, "card_memberno"));
			dsf_makeValue( ds_sendincm_cardcash, "publishbank", "string",  	ds_van_tmp_card_rcv_card.getColumn(0, "card_publishbank"));
			dsf_makeValue( ds_sendincm_cardcash, "vanseqno", "string",  	ds_van_tmp_card_rcv_card.getColumn(0, "card_vanseqno"));
			dsf_makeValue( ds_sendincm_cardcash, "cardname", "string",  	"");
			dsf_makeValue( ds_sendincm_cardcash, "cardcashno", "string",  	keyinptflag="K"?cardno:swipedata);
			dsf_makeValue( ds_sendincm_cardcash, "keyinptflag", "string",  	ds_van_tmp_card_rcv_card.getColumn(0, "card_keyinptflag"));
			dsf_makeValue( ds_sendincm_cardcash, "allotmm", "string",  		ds_van_tmp_card_rcv_card.getColumn(0, "card_allotmm"));
			dsf_makeValue( ds_sendincm_cardcash, "valiterm", "string",  	ds_van_tmp_card_rcv_card.getColumn(0, "card_valiterm"));
			dsf_makeValue( ds_sendincm_cardcash, "cardcmpycd", "string",  	ds_van_tmp_card_rcv_card.getColumn(0, "card_cardcmpycd"));
			dsf_makeValue( ds_sendincm_cardcash, "incomeamt", "string",  	ds_van_tmp_card_rcv_card.getColumn(0, "card_cardamt"));
			
			//2018/06/11 IC관련 프로그램 수정
			dsf_makeValue( ds_sendincm_cardcash, "cardcashno", "string",  	ds_van_tmp_card_rcv_card.getColumn(0, "card_cardno"));
			//2018/06/11 IC관련 프로그램 수정
		}
		
		frmf_setParameter("SPPAO02101_ELCTSIGNKEY", "");
		frmf_setParameter("SPPAO02101_ELCTSIGNCNTS", "");
		return true;		
	} else if(flag == "D") {
		var parm;
		var selrow 		= ds_main_cmpydetllst_incmlst.rowposition;
		var grd_name	= ds_main_cmpydetllst_incmlst;
		var pid       	= "3134314";
		var orddd      	= "";
		var cretno     	= "";
		var orddeptcd	= "";
		var strRcvVan  	= "";		
		var ordtype    	= "H";
		var fromdd     	= "";		
		var todd       	= "";		
		var cardAmt    	= grd_name.getColumn(selrow, "incomeamt");
		var cardno      = grd_name.getColumn(selrow, "cardcashno");
		var valiterm    = grd_name.getColumn(selrow, "valiterm");
		var allotmm     = grd_name.getColumn(selrow, "allotmm");
		var keyinptflag = grd_name.getColumn(selrow, "keyinptflag");
		var swipedata   = "";
		
		ds_van_tmp_card_req_card.clearData();
		ds_van_tmp_card_rcv_card.clearData();

		dsf_makeValue(ds_van_tmp_card_req_card, "card_pid", "string", "3134314");
		dsf_makeValue(ds_van_tmp_card_req_card, "card_rcptdd", "string", "");
		dsf_makeValue(ds_van_tmp_card_req_card, "card_rcptno", "string", "");
		dsf_makeValue(ds_van_tmp_card_req_card, "card_rcptseqno", "string", "");
		dsf_makeValue(ds_van_tmp_card_req_card, "card_seqno", "string", "");
		dsf_makeValue(ds_van_tmp_card_req_card, "card_instcd", "string", "");
		dsf_makeValue(ds_van_tmp_card_req_card, "card_rcptstat", "string", "");
		dsf_makeValue(ds_van_tmp_card_req_card, "card_ordtype", "string", "H");
		dsf_makeValue(ds_van_tmp_card_req_card, "card_keyinptflag", "string", keyinptflag);
		dsf_makeValue(ds_van_tmp_card_req_card, "card_cardcmpycd", "string", grd_name.getColumn(selrow, "cardcmpycd"));
		dsf_makeValue(ds_van_tmp_card_req_card, "card_cardno", "string", grd_name.getColumn(selrow, "cardcashno"));
		dsf_makeValue(ds_van_tmp_card_req_card, "card_aprvflag", "string", grd_name.getColumn(selrow, "aprvflag"));
		dsf_makeValue(ds_van_tmp_card_req_card, "card_aprvdd", "string", grd_name.getColumn(selrow, "aprvdd"));
		dsf_makeValue(ds_van_tmp_card_req_card, "card_aprvtm", "string", grd_name.getColumn(selrow, "aprvtm"));
		dsf_makeValue(ds_van_tmp_card_req_card, "card_aprvno", "string", grd_name.getColumn(selrow, "aprvno"));
		dsf_makeValue(ds_van_tmp_card_req_card, "card_vancd", "string", grd_name.getColumn(selrow, "vangb"));
		dsf_makeValue(ds_van_tmp_card_req_card, "card_allotmm", "string", grd_name.getColumn(selrow, "allotmm"));
		dsf_makeValue(ds_van_tmp_card_req_card, "card_cardamt", "string", grd_name.getColumn(selrow, "incomeamt"));
		dsf_makeValue(ds_van_tmp_card_req_card, "card_valiterm", "string", grd_name.getColumn(selrow, "valiterm"));
		dsf_makeValue(ds_van_tmp_card_req_card, "card_rcptexecdd", "string", "");
		dsf_makeValue(ds_van_tmp_card_req_card, "card_rcpttm", "string", "");
		dsf_makeValue(ds_van_tmp_card_req_card, "card_rcptrid", "string", "");
		dsf_makeValue(ds_van_tmp_card_req_card, "card_innrtretyn", "string", "N");
		dsf_makeValue(ds_van_tmp_card_req_card, "card_preamtyn", "string", "N");
		dsf_makeValue(ds_van_tmp_card_req_card, "card_remfact", "string", "");
		dsf_makeValue(ds_van_tmp_card_req_card, "card_fstrgstrid", "string", "");		
		dsf_makeValue(ds_van_tmp_card_req_card, "card_fstrgstdt", "string", "");
		dsf_makeValue(ds_van_tmp_card_req_card, "card_lastupdtrid", "string", "");
		dsf_makeValue(ds_van_tmp_card_req_card, "card_lastupdtdt", "string", "");
		
		//2018/06/19 이정택 추가
		dsf_makeValue(ds_van_tmp_card_req_card, "card_aprvunino", "string", grd_name.getColumn(selrow, "aprvunino"));
		//2018/06/19 이정택 추가
		
		
		
		var req_card	= ds_van_tmp_card_req_card;
		var rcv_card	= ds_van_tmp_card_rcv_card;
		
		var parm = new Object();
			parm.multiCnt = 0;     				// 외래등록의 멀티접수인 경우만 해당멀티건수 나머지는 default '0'으로 세팅
			parm.dsMultiSend = "";  			// 외래등록 멀티접수인 경우만 각각의 본인부담액을 보낸다. 나머지는 '-'
			parm.rcptdd = "";       			// 영수일자
			parm.rcptNo = "";       			// 영수번호
			parm.rcptSeqNo = "";     			// 영수일련번호
			parm.totRcptAmt = cardAmt; 			// 수납대상금액
			parm.dsStrSend = req_card;			// Opener가 가지고 있던 카드내역
			parm.dsStrRcv = rcv_card;			// Opener에 보내기 위한 카드내역(Opener에서 카드내역을 받기 위한 데이터셋)
			parm.pid = pid; 					// 등록번호
			parm.orddd = orddd;					// 진료일자
			parm.cretNo = cretno;      			// 진료생성번호
			parm.dsStrRcvVan = strRcvVan;
			parm.ordType = ordtype;      		// 진료구분
			parm.fromdd = fromdd;      			// 시작일자
			parm.todd = todd;         			// 종료일자
			parm.ordDeptCd = orddeptcd;    		// 진료과
			parm.cardNo = cardno;     			// 카드번호
			parm.valiterm = valiterm;   		// 유효기간
			parm.allotmm = allotmm;    			// 할부
			parm.keyInptFlag = keyinptflag;		// 키입력구분
			parm.swipeData = swipedata;  		// 단말기로부터 넘어온 카드정보
			parm.flag = "";
			parm.multiCnt = "";     			// 외래등록의 멀티접수인 경우만 해당멀티건수 나머지는 default '0'으로 세팅
			parm.COTPT = "";        			// 멀티접수 개별 변경/취소 위해 필요 - 외래등록/수납
			parm.rtnType = "A";					// 리턴시 노드 전체 리턴 OR 일부만 리턴여부판별
			parm.pregDmndYN = "";				// 산전진료비지원 카드승인여부
			parm.rtn = "";
			parm.preCashAmt = "";				//기현금액
			parm.preCardAmt = "";				//기현금액
			
		frmf_setParameter("SPPAO00400_PARM", parm);
		frmf_setParameter("SPPAO00400_FLAG", "D");
		frmf_setParameter("SPPAO00400_RTNTYPE", "A");
		
		var ivrObjt = ivr_cashpopup.url;
	        
		if (utlf_isNull(ivrObjt)) 
		{
			ivr_cashpopup.url = "pam_pamcomnxp::SPPAO00400_신용카드승인.xfdl";
		}
		
		ivr_cashpopup.objPam = parm;
		ivr_cashpopup.fInit();
		var retMsg = ivr_cashpopup.fAutoCnclCardAprv(); 

		if(retMsg == false) {
			return false;											
		} else {
			dsf_makeValue(ds_sendincm_cardcash, "vangb", "string", ds_van_tmp_card_rcv_card.lookup("card_rcptstat", "D", "card_vancd"));
			dsf_makeValue(ds_sendincm_cardcash, "ordergb", "string", ds_van_tmp_card_rcv_card.lookup("card_rcptstat", "D", "card_aprvflag"));
			dsf_makeValue(ds_sendincm_cardcash, "mdate", "string", ds_van_tmp_card_rcv_card.lookup("card_rcptstat", "D", "card_aprvdd"));
			dsf_makeValue(ds_sendincm_cardcash, "seqno", "string", ds_van_tmp_card_rcv_card.lookup("card_rcptstat", "D", "card_seqno"));
			dsf_makeValue(ds_sendincm_cardcash, "pano", "string", ds_van_tmp_card_rcv_card.lookup("card_rcptstat", "D", "card_pid"));
			dsf_makeValue(ds_sendincm_cardcash, "clientid", "string", ds_van_tmp_card_rcv_card.lookup("card_rcptstat", "D", "card_clientid"));
			dsf_makeValue(ds_sendincm_cardcash, "replystat", "string", ds_van_tmp_card_rcv_card.lookup("card_rcptstat", "D", "card_replystat"));
			dsf_makeValue(ds_sendincm_cardcash, "approvaldate", "string", ds_van_tmp_card_rcv_card.lookup("card_rcptstat", "D", "card_aprvdd"));
			dsf_makeValue(ds_sendincm_cardcash, "approvaltime", "string", ds_van_tmp_card_rcv_card.lookup("card_rcptstat", "D", "card_aprvtm"));
			dsf_makeValue(ds_sendincm_cardcash, "approvalno", "string", ds_van_tmp_card_rcv_card.lookup("card_rcptstat", "D", "card_aprvno"));
			dsf_makeValue(ds_sendincm_cardcash, "bankid", "string", ds_van_tmp_card_rcv_card.lookup("card_rcptstat", "D", "card_bankid"));
			dsf_makeValue(ds_sendincm_cardcash, "bankseqno", "string", ds_van_tmp_card_rcv_card.lookup("card_rcptstat", "D", "card_bankseqno"));
			dsf_makeValue(ds_sendincm_cardcash, "bankname", "string", ds_van_tmp_card_rcv_card.lookup("card_rcptstat", "D", "card_bankname"));
			dsf_makeValue(ds_sendincm_cardcash, "memberno", "string", ds_van_tmp_card_rcv_card.lookup("card_rcptstat", "D", "card_memberno"));
			dsf_makeValue(ds_sendincm_cardcash, "publishbank", "string", ds_van_tmp_card_rcv_card.lookup("card_rcptstat", "D", "card_publishbank"));
			dsf_makeValue(ds_sendincm_cardcash, "vanseqno", "string", ds_van_tmp_card_rcv_card.lookup("card_rcptstat", "D", "card_vanseqno"));
			dsf_makeValue(ds_sendincm_cardcash, "cardname", "string", "");
			//dsf_makeValue(ds_sendincm_cardcash, "cardcashno", "string", keyinptflag == "K" ? cardno : swipedata);
			dsf_makeValue(ds_sendincm_cardcash, "cardcashno", "string", cardno);
			dsf_makeValue(ds_sendincm_cardcash, "keyinptflag", "string", ds_van_tmp_card_rcv_card.lookup("card_rcptstat", "D", "card_keyinptflag"));
			dsf_makeValue(ds_sendincm_cardcash, "allotmm", "string", ds_van_tmp_card_rcv_card.lookup("card_rcptstat", "D", "card_allotmm"));
			dsf_makeValue(ds_sendincm_cardcash, "valiterm", "string", ds_van_tmp_card_rcv_card.lookup("card_rcptstat", "D", "card_valiterm"));
			dsf_makeValue(ds_sendincm_cardcash, "cardcmpycd", "string", ds_van_tmp_card_rcv_card.lookup("card_rcptstat", "D", "card_cardcmpycd"));
			dsf_makeValue(ds_sendincm_cardcash, "incomeamt", "string", ds_van_tmp_card_rcv_card.lookup("card_rcptstat", "D", "card_cardamt"));
		}
		return true;	
	}
}

/*-**************************************************************************************
 * Argument			: flag (I/D)
 * Description		: 현금영수증 승인
  ****************************************************************************************/
function fCashReceipt(flag) {
	var gubun = "";
	
	if(flag == "I")	{
		gubun = ds_send_cardcashdata_aprv.getColumn(0, "indinstflag");	
	} else if(flag == "D") {
		gubun = ds_main_cmpydetllst_incmlst.getColumn(ds_main_cmpydetllst_incmlst.rowposition, "allotmm");
	}
//trace("flag==="+flag+"/////"+"gubun ==="+gubun )
	if(flag == "D" && gubun == "00") {
		sysf_messageBox("법인(지출증빙)으로 결제된 내역 이외에는 취소 불가능합니다.", "E");
		return;
	}
	
	if(gubun == "00") {
		return fCashReceiptK(flag);	
	} else if(gubun == "01") {
		return fCashReceiptB(flag);	
	} else {
		sysf_messageBox("개인 또는 법인 이외의 값이 선택되었습니다.", "E");
		return false;
	}	
}

function fSetRcptSum()
{
	var exIncmAmt 	= ds_main_cmpylst_item.getColumn(ds_main_cmpylst_item.rowposition, "incomeamt");
	if(utlf_isNull(exIncmAmt)) exIncmAmt = 0;
	else exIncmAmt = parseInt(exIncmAmt);
	var depoAmt 	= 0;
	var totIncmAmt 	= 0;
	totIncmAmt 		= parseInt(totIncmAmt) + 
					  parseInt(ds_main_cmpydetllst_item.getSum("incomeamt")) + 
					  parseInt(ds_main_cmpydetllst_item.getSum("ownincomeamt"));
	depoAmt 		= totIncmAmt - exIncmAmt;

	ds_send_cardcashdata_aprv.setColumn(0, "depoAmt", depoAmt);
}

function fGetCmpyDetlList()
{
	ds_send_cardcashdata_aprv.clearData();
	ds_send_cardcashdata_aprv.addRow();
	
	ds_send_cardcashdata_aprv.setColumn(0, "keyinptflag" 		, "S");
	ds_send_cardcashdata_aprv.setColumn(0, "cashcardflag" 		, "C");
	
	frmf_inputEnterKey("group5.rdo_cashcardflag", "onitemchanged", new ItemChangeEventInfo ); 
	
	ds_main_cmpydetllst_item.clearData();
	ds_main_cmpydetllst_incmlst.clearData();
	ds_send_srchdetl_cmpydata.clearData();
	
	if(ds_send_srchinfo.getColumn(0, "condflag") == "H")
	{
		var condflagHtype = "";
		
		for(var i = 0; i < ds_main_cmpylst_item.rowcount; i++) 
		{
			var chk = ds_main_cmpylst_item.getColumn(i , "sel"); 
			if(chk == "Y") 
			{
				grdf_setStatus(grd_cmpylst, "I", [i]);
// 				ds_main_cmpylst_item.updatecontrol = false;
// 				ds_main_cmpylst_item.setRowType(i, "i");
// 				ds_main_cmpylst_item.updatecontrol = true;
				condflagHtype = "Y";
			}else{
				grdf_setStatus(grd_cmpylst, "", [i]);
// 				ds_main_cmpylst_item.updatecontrol = false;
// 				ds_main_cmpylst_item.setRowType(i, "1");
// 				ds_main_cmpylst_item.updatecontrol = true;
			}
		}
		if(condflagHtype == "Y")
		{
			ds_send_srchdetl_cmpydata.copyData(grdf_getGridUpdateData(grd_cmpylst, "insert"), true);
			ds_send_srchdetl_cmpydata.updateColID("clamfromdd", "fromdd");
			ds_send_srchdetl_cmpydata.updateColID("clamtodd", "todd");
			ds_send_srchdetl_cmpydata.setColumn("clamseqno", "0");

			var oParam = {};
				oParam.id          = "TRAHA02902";
				oParam.service     = "healexamreqapp.UncoMngt";
				oParam.method      = "reqGetClamCmpyDetlList";
				oParam.inds        = "req=ds_send_srchdetl_cmpydata";
				oParam.outds       = "ds_main_cmpydetllst_item=item ds_main_cmpydetllst_incmlst=incmlst";
				oParam.async       = false;
				//oParam.callback    = "cf_TRAHA02902";

			tranf_submit(oParam);
			
			ds_main_cmpydetllst_incmlst.updatecontrol = false;
			dsf_setFixVal(ds_main_cmpydetllst_incmlst, "sel:N");
			ds_main_cmpydetllst_incmlst.updatecontrol = true;
			
			fSetRcptSum(); 	
		}
	}
	else
	{
		for(var i = 0; i < ds_main_cmpylst_item.rowcount; i++)
		{
			ds_main_cmpylst_item.setColumn(i, "sel", "N");
		}
		ds_main_cmpylst_item.applyChange();
		
		var chkRow = ds_main_cmpylst_item.rowposition;
		ds_main_cmpylst_item.setColumn(chkRow, "sel", "Y");
		grdf_setStatus(grd_cmpylst, "I", [chkRow]);
// 		ds_main_cmpylst_item.updatecontrol = false;
// 		ds_main_cmpylst_item.setRowType(chkRow, "i");
// 		ds_main_cmpylst_item.updatecontrol = true;
		
		ds_send_srchdetl_cmpydata.copyData(grdf_getGridUpdateData(grd_cmpylst, "insert"), true);
		
		var oParam = {};
			oParam.id          = "TRAHA02902";
			oParam.service     = "healexamreqapp.UncoMngt";
			oParam.method      = "reqGetClamCmpyDetlList";
			oParam.inds        = "req=ds_send_srchdetl_cmpydata";
			oParam.outds       = "ds_main_cmpydetllst_item=item ds_main_cmpydetllst_incmlst=incmlst";
			oParam.async       = false;
			//oParam.callback    = "cf_TRAHA02902";

		tranf_submit(oParam);
		fSetRcptSum(); 
	}
	
	switch1.case1.grd_cmpydetllst.setCellProperty("Head", 1, "text", "");
}

/*-**************************************************************************************
 * Argument			: N/A
 * Description		: 청구 수금액 저장
 ****************************************************************************************/
function fSaveClamAmt()
{
	ds_sendincm_clamdetl.clearData();
	ds_sendincm_cardcash.clearData();
	ds_sendincm_clam.clearData();
	
	var row 			= ds_main_cmpylst_item.rowposition;
	var aprvFlag 		= "";
	var limitAmt 		= ds_main_cmpylst_item.getColumn(row, "clamamt");
	var exIncmAmt 		= ds_main_cmpylst_item.getColumn(row, "incomeamt");
	var cmpycd 			= ds_main_cmpylst_item.getColumn(row, "cmpycd");
	var cmpyno 			= ds_main_cmpylst_item.getColumn(row, "cmpyno");
	var depoAmt 		= ds_send_cardcashdata_aprv.getColumn(0, "depoAmt");
	var cashcardflag 	= ds_send_cardcashdata_aprv.getColumn(0, "cashcardflag");
	
	if(utlf_isNull(limitAmt)) limitAmt = 0;
	if(utlf_isNull(exIncmAmt)) exIncmAmt = 0;
	if(utlf_isNull(depoAmt)) depoAmt = 0;
	
	if(depoAmt <= 0) {
		sysf_messageBox("입금액이 없습니다.", "E");
		return false;
	}
	
	//R-카드, S-현금영수증, C-현금
	if("R" == cashcardflag)	{
		if(fCardReceipt("I")) {
			if(fSaveClam(cashcardflag)) {
				return true;
			}
		}
	} else if("S" == cashcardflag) {
		if(fCashReceipt("I")) {
			if(fSaveClam(cashcardflag)) {
				return true;
			}
		}
	} else if("C" == cashcardflag) {
		if(depoAmt > 300000) {
			if(sysf_messageBox("현금 30만원 이상 인 경우 현금영수증을 발행해야 됩니다.\n발행하지 않고 진행", "S001" ) != 6 ) {
				return false;
			} else {
				if(fSaveClam(cashcardflag)) {
					return true;
				}
			}
		} else {
			if(fSaveClam(cashcardflag)) {
				return true;
			}
		}
	}
}

/*-**************************************************************************************
 * Argument			: N/A
 * Description		: 입금정보 저장
 ****************************************************************************************/
function fSaveClam(cashcardflag) {
	ds_main_cmpylst_item.applyChange();
	grdf_setStatus(grd_cmpylst, "U", [grd_cmpylst.currentrow]);
	for(var j = 0; j < ds_main_cmpydetllst_item.rowcount; j++)
	{
		grdf_setStatus(switch1.case1.grd_cmpydetllst, "U", [j]);
	}
	
	ds_sendincm_clam.copyData(grdf_getGridUpdateData(grd_cmpylst, "update"), true);
	ds_sendincm_clamdetl.copyData(grdf_getGridUpdateData(switch1.case1.grd_cmpydetllst, "update"), true);
	dsf_setFixVal(ds_sendincm_clam, "cashcardflag:"+cashcardflag);

	var oParam = {};
		oParam.id          = "TXAHA02902";
		oParam.service     = "healexamreqapp.UncoMngt";
		oParam.method      = "reqExeClamCmpyIncmList";
		oParam.inds        = "clam=ds_sendincm_clam clamdetl=ds_sendincm_clamdetl cardcash=ds_sendincm_cardcash";
		oParam.outds       = "";
		oParam.async       = false;
		oParam.callback    = "cf_TXAHA02902";

	tranf_submit(oParam);
	
	if(arErrorCode.pop("TXAHA02902") > -1) return true;
}

function cf_TXAHA02902(sSvcId, nErrorCode, sErrorMsg) {
    arErrorCode.push(sSvcId, nErrorCode);
}

function fCretClam() 
{
	for(var i = 0; i < ds_main_cmpylst_item.rowcount; i++)
	{
		var chk = ds_main_cmpylst_item.getColumn(i, "sel");
		
		if(chk == "Y")
		{
			grdf_setStatus(grd_cmpylst, "I", [i]);
// 			ds_main_cmpylst_item.updatecontrol = false;
// 			ds_main_cmpylst_item.setRowType(i, "i");
// 			ds_main_cmpylst_item.updatecontrol = true;
		}
		else
		{
			grdf_setStatus(grd_cmpylst, "", [i]);
// 			ds_main_cmpylst_item.updatecontrol = false;
// 			ds_main_cmpylst_item.setRowType(i, "");
// 			ds_main_cmpylst_item.updatecontrol = true;
		}
	}
	
	for(var j = 0; j < ds_main_cmpydetllst_item.rowcount; j++) 
	{
		var chk = ds_main_cmpydetllst_item.getColumn(j, "sel"); 
		
		if(chk == "Y")
		{
			grdf_setStatus(switch1.case1.grd_cmpydetllst, "I", [j]);
// 			ds_main_cmpydetllst_item.updatecontrol = false;
// 			ds_main_cmpydetllst_item.setRowType(i, "i");
// 			ds_main_cmpydetllst_item.updatecontrol = true;
		}
		else
		{
			grdf_setStatus(switch1.case1.grd_cmpydetllst, "", [j]);
// 			ds_main_cmpydetllst_item.updatecontrol = false;
// 			ds_main_cmpydetllst_item.setRowType(i, "");
// 			ds_main_cmpydetllst_item.updatecontrol = true;
		}
	}
	
	ds_send_save_clam.copyData(grdf_getGridUpdateData(grd_cmpylst, "insert"), true);
	ds_send_save_clamdetl.copyData(grdf_getGridUpdateData(switch1.case1.grd_cmpydetllst, "insert"), true);

	var oParam = {};
		oParam.id          = "TXAHA02901";
		oParam.service     = "healexamreqapp.UncoMngt";
		oParam.method      = "reqExeClamCmpyList";
		oParam.inds        = "clam=ds_send_save_clam clamdetl=ds_send_save_clamdetl";
		oParam.outds       = "";
		oParam.async       = false;
		//oParam.callback    = "cf_TXAHA02901";

	tranf_submit(oParam);
}

function fDelClam()
{
	for(var i = 0; i < ds_main_cmpylst_item.rowcount; i++)
	{
		var chk = ds_main_cmpylst_item.getColumn(i, "sel");
		if(chk == "Y")
		{
			grdf_setStatus(grd_cmpylst, "D", [i]);
		}
	}
	
	var dsUpdate = grdf_getGridUpdateData(grd_cmpylst, "all");
	grdf_setStatusColumn(dsUpdate, "m");
	ds_send_save_cnclinfo.copyData(dsUpdate, true);
	
	var oParam = {};
		oParam.id          = "TXAHA02304";
		oParam.service     = "healexamreqapp.UncoMngt";
		oParam.method      = "reqExeCnclClam";
		oParam.inds        = "req=ds_send_save_cnclinfo";
		oParam.outds       = "";
		oParam.async       = false;
		oParam.callback    = "cf_TXAHA02304";

	tranf_submit(oParam);	
	
	if(arErrorCode.pop("TXAHA02304") > -1) return true;
	else return false;
}

function cf_TXAHA02304(sSvcId, nErrorCode, sErrorMsg) {
    arErrorCode.push(sSvcId, nErrorCode);
}
]]></Script>